Python-2.3.7/0000755001241000117560000000000010765544545012267 5ustar loewishpifb6Python-2.3.7/Include/0000755001241000117560000000000010765544467013655 5ustar loewishpifb6Python-2.3.7/Include/pymem.h0000644001241000117560000001020210762607371015137 0ustar loewishpifb6/* The PyMem_ family: low-level memory allocation interfaces. See objimpl.h for the PyObject_ memory family. */ #ifndef Py_PYMEM_H #define Py_PYMEM_H #include "pyport.h" #ifdef __cplusplus extern "C" { #endif /* BEWARE: Each interface exports both functions and macros. Extension modules should use the functions, to ensure binary compatibility across Python versions. Because the Python implementation is free to change internal details, and the macros may (or may not) expose details for speed, if you do use the macros you must recompile your extensions with each Python release. Never mix calls to PyMem_ with calls to the platform malloc/realloc/ calloc/free. For example, on Windows different DLLs may end up using different heaps, and if you use PyMem_Malloc you'll get the memory from the heap used by the Python DLL; it could be a disaster if you free()'ed that directly in your own extension. Using PyMem_Free instead ensures Python can return the memory to the proper heap. As another example, in PYMALLOC_DEBUG mode, Python wraps all calls to all PyMem_ and PyObject_ memory functions in special debugging wrappers that add additional debugging info to dynamic memory blocks. The system routines have no idea what to do with that stuff, and the Python wrappers have no idea what to do with raw blocks obtained directly by the system routines then. */ /* * Raw memory interface * ==================== */ /* Functions Functions supplying platform-independent semantics for malloc/realloc/ free. These functions make sure that allocating 0 bytes returns a distinct non-NULL pointer (whenever possible -- if we're flat out of memory, NULL may be returned), even if the platform malloc and realloc don't. Returned pointers must be checked for NULL explicitly. No action is performed on failure (no exception is set, no warning is printed, etc). */ PyAPI_FUNC(void *) PyMem_Malloc(size_t); PyAPI_FUNC(void *) PyMem_Realloc(void *, size_t); PyAPI_FUNC(void) PyMem_Free(void *); /* Starting from Python 1.6, the wrappers Py_{Malloc,Realloc,Free} are no longer supported. They used to call PyErr_NoMemory() on failure. */ /* Macros. */ #ifdef PYMALLOC_DEBUG /* Redirect all memory operations to Python's debugging allocator. */ #define PyMem_MALLOC PyObject_MALLOC #define PyMem_REALLOC PyObject_REALLOC #else /* ! PYMALLOC_DEBUG */ /* PyMem_MALLOC(0) means malloc(1). Some systems would return NULL for malloc(0), which would be treated as an error. Some platforms would return a pointer with no memory behind it, which would break pymalloc. To solve these problems, allocate an extra byte. */ #define PyMem_MALLOC(n) malloc((n) ? (n) : 1) #define PyMem_REALLOC(p, n) realloc((p), (n) ? (n) : 1) #endif /* PYMALLOC_DEBUG */ /* In order to avoid breaking old code mixing PyObject_{New, NEW} with PyMem_{Del, DEL} and PyMem_{Free, FREE}, the PyMem "release memory" functions have to be redirected to the object deallocator. */ #define PyMem_FREE PyObject_FREE /* * Type-oriented memory interface * ============================== * * These are carried along for historical reasons. There's rarely a good * reason to use them anymore (you can just as easily do the multiply and * cast yourself). */ #define PyMem_New(type, n) \ ( assert((n) <= PY_SIZE_MAX / sizeof(type)) , \ ( (type *) PyMem_Malloc((n) * sizeof(type)) ) ) #define PyMem_NEW(type, n) \ ( assert((n) <= PY_SIZE_MAX / sizeof(type)) , \ ( (type *) PyMem_MALLOC((n) * sizeof(type)) ) ) #define PyMem_Resize(p, type, n) \ ( assert((n) <= PY_SIZE_MAX / sizeof(type)) , \ ( (p) = (type *) PyMem_Realloc((p), (n) * sizeof(type)) ) ) #define PyMem_RESIZE(p, type, n) \ ( assert((n) <= PY_SIZE_MAX / sizeof(type)) , \ ( (p) = (type *) PyMem_REALLOC((p), (n) * sizeof(type)) ) ) /* In order to avoid breaking old code mixing PyObject_{New, NEW} with PyMem_{Del, DEL} and PyMem_{Free, FREE}, the PyMem "release memory" functions have to be redirected to the object deallocator. */ #define PyMem_Del PyObject_Free #define PyMem_DEL PyObject_FREE #ifdef __cplusplus } #endif #endif /* !Py_PYMEM_H */ Python-2.3.7/Include/compile.h0000644001241000117560000000647707620315174015457 0ustar loewishpifb6 /* Definitions for bytecode */ #ifndef Py_COMPILE_H #define Py_COMPILE_H #ifdef __cplusplus extern "C" { #endif /* Bytecode object */ typedef struct { PyObject_HEAD int co_argcount; /* #arguments, except *args */ int co_nlocals; /* #local variables */ int co_stacksize; /* #entries needed for evaluation stack */ int co_flags; /* CO_..., see below */ PyObject *co_code; /* instruction opcodes */ PyObject *co_consts; /* list (constants used) */ PyObject *co_names; /* list of strings (names used) */ PyObject *co_varnames; /* tuple of strings (local variable names) */ PyObject *co_freevars; /* tuple of strings (free variable names) */ PyObject *co_cellvars; /* tuple of strings (cell variable names) */ /* The rest doesn't count for hash/cmp */ PyObject *co_filename; /* string (where it was loaded from) */ PyObject *co_name; /* string (name, for reference) */ int co_firstlineno; /* first source line number */ PyObject *co_lnotab; /* string (encoding addr<->lineno mapping) */ } PyCodeObject; /* Masks for co_flags above */ #define CO_OPTIMIZED 0x0001 #define CO_NEWLOCALS 0x0002 #define CO_VARARGS 0x0004 #define CO_VARKEYWORDS 0x0008 #define CO_NESTED 0x0010 #define CO_GENERATOR 0x0020 /* The CO_NOFREE flag is set if there are no free or cell variables. This information is redundant, but it allows a single flag test to determine whether there is any extra work to be done when the call frame it setup. */ #define CO_NOFREE 0x0040 /* XXX Temporary hack. Until generators are a permanent part of the language, we need a way for a code object to record that generators were *possible* when it was compiled. This is so code dynamically compiled *by* a code object knows whether to allow yield stmts. In effect, this passes on the "from __future__ import generators" state in effect when the code block was compiled. */ #define CO_GENERATOR_ALLOWED 0x1000 /* no longer used in an essential way */ #define CO_FUTURE_DIVISION 0x2000 PyAPI_DATA(PyTypeObject) PyCode_Type; #define PyCode_Check(op) ((op)->ob_type == &PyCode_Type) #define PyCode_GetNumFree(op) (PyTuple_GET_SIZE((op)->co_freevars)) #define CO_MAXBLOCKS 20 /* Max static block nesting within a function */ /* Public interface */ struct _node; /* Declare the existence of this type */ PyAPI_FUNC(PyCodeObject *) PyNode_Compile(struct _node *, const char *); PyAPI_FUNC(PyCodeObject *) PyCode_New( int, int, int, int, PyObject *, PyObject *, PyObject *, PyObject *, PyObject *, PyObject *, PyObject *, PyObject *, int, PyObject *); /* same as struct above */ PyAPI_FUNC(int) PyCode_Addr2Line(PyCodeObject *, int); /* Future feature support */ typedef struct { int ff_found_docstring; int ff_last_lineno; int ff_features; } PyFutureFeatures; PyAPI_FUNC(PyFutureFeatures *) PyNode_Future(struct _node *, const char *); PyAPI_FUNC(PyCodeObject *) PyNode_CompileFlags(struct _node *, const char *, PyCompilerFlags *); #define FUTURE_NESTED_SCOPES "nested_scopes" #define FUTURE_GENERATORS "generators" #define FUTURE_DIVISION "division" /* for internal use only */ #define _PyCode_GETCODEPTR(co, pp) \ ((*(co)->co_code->ob_type->tp_as_buffer->bf_getreadbuffer) \ ((co)->co_code, 0, (void **)(pp))) #ifdef __cplusplus } #endif #endif /* !Py_COMPILE_H */ Python-2.3.7/Include/pgenheaders.h0000644001241000117560000000217007541112262016271 0ustar loewishpifb6#ifndef Py_PGENHEADERS_H #define Py_PGENHEADERS_H #ifdef __cplusplus extern "C" { #endif /* Include files and extern declarations used by most of the parser. */ #include "Python.h" PyAPI_FUNC(void) PySys_WriteStdout(const char *format, ...) Py_GCC_ATTRIBUTE((format(printf, 1, 2))); PyAPI_FUNC(void) PySys_WriteStderr(const char *format, ...) Py_GCC_ATTRIBUTE((format(printf, 1, 2))); #define addarc _Py_addarc #define addbit _Py_addbit #define adddfa _Py_adddfa #define addfirstsets _Py_addfirstsets #define addlabel _Py_addlabel #define addstate _Py_addstate #define delbitset _Py_delbitset #define dumptree _Py_dumptree #define findlabel _Py_findlabel #define mergebitset _Py_mergebitset #define meta_grammar _Py_meta_grammar #define newbitset _Py_newbitset #define newgrammar _Py_newgrammar #define pgen _Py_pgen #define printgrammar _Py_printgrammar #define printnonterminals _Py_printnonterminals #define printtree _Py_printtree #define samebitset _Py_samebitset #define showtree _Py_showtree #define tok_dump _Py_tok_dump #define translatelabels _Py_translatelabels #ifdef __cplusplus } #endif #endif /* !Py_PGENHEADERS_H */ Python-2.3.7/Include/complexobject.h0000644001241000117560000000270407547306326016661 0ustar loewishpifb6/* Complex number structure */ #ifndef Py_COMPLEXOBJECT_H #define Py_COMPLEXOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { double real; double imag; } Py_complex; /* Operations on complex numbers from complexmodule.c */ #define c_sum _Py_c_sum #define c_diff _Py_c_diff #define c_neg _Py_c_neg #define c_prod _Py_c_prod #define c_quot _Py_c_quot #define c_pow _Py_c_pow PyAPI_FUNC(Py_complex) c_sum(Py_complex, Py_complex); PyAPI_FUNC(Py_complex) c_diff(Py_complex, Py_complex); PyAPI_FUNC(Py_complex) c_neg(Py_complex); PyAPI_FUNC(Py_complex) c_prod(Py_complex, Py_complex); PyAPI_FUNC(Py_complex) c_quot(Py_complex, Py_complex); PyAPI_FUNC(Py_complex) c_pow(Py_complex, Py_complex); /* Complex object interface */ /* PyComplexObject represents a complex number with double-precision real and imaginary parts. */ typedef struct { PyObject_HEAD Py_complex cval; } PyComplexObject; PyAPI_DATA(PyTypeObject) PyComplex_Type; #define PyComplex_Check(op) PyObject_TypeCheck(op, &PyComplex_Type) #define PyComplex_CheckExact(op) ((op)->ob_type == &PyComplex_Type) PyAPI_FUNC(PyObject *) PyComplex_FromCComplex(Py_complex); PyAPI_FUNC(PyObject *) PyComplex_FromDoubles(double real, double imag); PyAPI_FUNC(double) PyComplex_RealAsDouble(PyObject *op); PyAPI_FUNC(double) PyComplex_ImagAsDouble(PyObject *op); PyAPI_FUNC(Py_complex) PyComplex_AsCComplex(PyObject *op); #ifdef __cplusplus } #endif #endif /* !Py_COMPLEXOBJECT_H */ Python-2.3.7/Include/objimpl.h0000644001241000117560000002743707647562162015474 0ustar loewishpifb6/* The PyObject_ memory family: high-level object memory interfaces. See pymem.h for the low-level PyMem_ family. */ #ifndef Py_OBJIMPL_H #define Py_OBJIMPL_H #include "pymem.h" #ifdef __cplusplus extern "C" { #endif /* BEWARE: Each interface exports both functions and macros. Extension modules should use the functions, to ensure binary compatibility across Python versions. Because the Python implementation is free to change internal details, and the macros may (or may not) expose details for speed, if you do use the macros you must recompile your extensions with each Python release. Never mix calls to PyObject_ memory functions with calls to the platform malloc/realloc/ calloc/free, or with calls to PyMem_. */ /* Functions and macros for modules that implement new object types. - PyObject_New(type, typeobj) allocates memory for a new object of the given type, and initializes part of it. 'type' must be the C structure type used to represent the object, and 'typeobj' the address of the corresponding type object. Reference count and type pointer are filled in; the rest of the bytes of the object are *undefined*! The resulting expression type is 'type *'. The size of the object is determined by the tp_basicsize field of the type object. - PyObject_NewVar(type, typeobj, n) is similar but allocates a variable-size object with room for n items. In addition to the refcount and type pointer fields, this also fills in the ob_size field. - PyObject_Del(op) releases the memory allocated for an object. It does not run a destructor -- it only frees the memory. PyObject_Free is identical. - PyObject_Init(op, typeobj) and PyObject_InitVar(op, typeobj, n) don't allocate memory. Instead of a 'type' parameter, they take a pointer to a new object (allocated by an arbitrary allocator), and initialize its object header fields. Note that objects created with PyObject_{New, NewVar} are allocated using the specialized Python allocator (implemented in obmalloc.c), if WITH_PYMALLOC is enabled. In addition, a special debugging allocator is used if PYMALLOC_DEBUG is also #defined. In case a specific form of memory management is needed (for example, if you must use the platform malloc heap(s), or shared memory, or C++ local storage or operator new), you must first allocate the object with your custom allocator, then pass its pointer to PyObject_{Init, InitVar} for filling in its Python- specific fields: reference count, type pointer, possibly others. You should be aware that Python no control over these objects because they don't cooperate with the Python memory manager. Such objects may not be eligible for automatic garbage collection and you have to make sure that they are released accordingly whenever their destructor gets called (cf. the specific form of memory management you're using). Unless you have specific memory management requirements, use PyObject_{New, NewVar, Del}. */ /* * Raw object memory interface * =========================== */ /* Functions to call the same malloc/realloc/free as used by Python's object allocator. If WITH_PYMALLOC is enabled, these may differ from the platform malloc/realloc/free. The Python object allocator is designed for fast, cache-conscious allocation of many "small" objects, and with low hidden memory overhead. PyObject_Malloc(0) returns a unique non-NULL pointer if possible. PyObject_Realloc(NULL, n) acts like PyObject_Malloc(n). PyObject_Realloc(p != NULL, 0) does not return NULL, or free the memory at p. Returned pointers must be checked for NULL explicitly; no action is performed on failure other than to return NULL (no warning it printed, no exception is set, etc). For allocating objects, use PyObject_{New, NewVar} instead whenever possible. The PyObject_{Malloc, Realloc, Free} family is exposed so that you can exploit Python's small-block allocator for non-object uses. If you must use these routines to allocate object memory, make sure the object gets initialized via PyObject_{Init, InitVar} after obtaining the raw memory. */ PyAPI_FUNC(void *) PyObject_Malloc(size_t); PyAPI_FUNC(void *) PyObject_Realloc(void *, size_t); PyAPI_FUNC(void) PyObject_Free(void *); /* Macros */ #ifdef WITH_PYMALLOC #ifdef PYMALLOC_DEBUG PyAPI_FUNC(void *) _PyObject_DebugMalloc(size_t nbytes); PyAPI_FUNC(void *) _PyObject_DebugRealloc(void *p, size_t nbytes); PyAPI_FUNC(void) _PyObject_DebugFree(void *p); PyAPI_FUNC(void) _PyObject_DebugDumpAddress(const void *p); PyAPI_FUNC(void) _PyObject_DebugCheckAddress(const void *p); PyAPI_FUNC(void) _PyObject_DebugMallocStats(void); #define PyObject_MALLOC _PyObject_DebugMalloc #define PyObject_Malloc _PyObject_DebugMalloc #define PyObject_REALLOC _PyObject_DebugRealloc #define PyObject_Realloc _PyObject_DebugRealloc #define PyObject_FREE _PyObject_DebugFree #define PyObject_Free _PyObject_DebugFree #else /* WITH_PYMALLOC && ! PYMALLOC_DEBUG */ #define PyObject_MALLOC PyObject_Malloc #define PyObject_REALLOC PyObject_Realloc #define PyObject_FREE PyObject_Free #endif #else /* ! WITH_PYMALLOC */ #define PyObject_MALLOC PyMem_MALLOC #define PyObject_REALLOC PyMem_REALLOC /* This is an odd one! For backward compatability with old extensions, the PyMem "release memory" functions have to invoke the object allocator's free() function. When pymalloc isn't enabled, that leaves us using the platform free(). */ #define PyObject_FREE free #endif /* WITH_PYMALLOC */ #define PyObject_Del PyObject_Free #define PyObject_DEL PyObject_FREE /* for source compatibility with 2.2 */ #define _PyObject_Del PyObject_Free /* * Generic object allocator interface * ================================== */ /* Functions */ PyAPI_FUNC(PyObject *) PyObject_Init(PyObject *, PyTypeObject *); PyAPI_FUNC(PyVarObject *) PyObject_InitVar(PyVarObject *, PyTypeObject *, int); PyAPI_FUNC(PyObject *) _PyObject_New(PyTypeObject *); PyAPI_FUNC(PyVarObject *) _PyObject_NewVar(PyTypeObject *, int); #define PyObject_New(type, typeobj) \ ( (type *) _PyObject_New(typeobj) ) #define PyObject_NewVar(type, typeobj, n) \ ( (type *) _PyObject_NewVar((typeobj), (n)) ) /* Macros trading binary compatibility for speed. See also pymem.h. Note that these macros expect non-NULL object pointers.*/ #define PyObject_INIT(op, typeobj) \ ( (op)->ob_type = (typeobj), _Py_NewReference((PyObject *)(op)), (op) ) #define PyObject_INIT_VAR(op, typeobj, size) \ ( (op)->ob_size = (size), PyObject_INIT((op), (typeobj)) ) #define _PyObject_SIZE(typeobj) ( (typeobj)->tp_basicsize ) /* _PyObject_VAR_SIZE returns the number of bytes (as size_t) allocated for a vrbl-size object with nitems items, exclusive of gc overhead (if any). The value is rounded up to the closest multiple of sizeof(void *), in order to ensure that pointer fields at the end of the object are correctly aligned for the platform (this is of special importance for subclasses of, e.g., str or long, so that pointers can be stored after the embedded data). Note that there's no memory wastage in doing this, as malloc has to return (at worst) pointer-aligned memory anyway. */ #if ((SIZEOF_VOID_P - 1) & SIZEOF_VOID_P) != 0 # error "_PyObject_VAR_SIZE requires SIZEOF_VOID_P be a power of 2" #endif #define _PyObject_VAR_SIZE(typeobj, nitems) \ (size_t) \ ( ( (typeobj)->tp_basicsize + \ (nitems)*(typeobj)->tp_itemsize + \ (SIZEOF_VOID_P - 1) \ ) & ~(SIZEOF_VOID_P - 1) \ ) #define PyObject_NEW(type, typeobj) \ ( (type *) PyObject_Init( \ (PyObject *) PyObject_MALLOC( _PyObject_SIZE(typeobj) ), (typeobj)) ) #define PyObject_NEW_VAR(type, typeobj, n) \ ( (type *) PyObject_InitVar( \ (PyVarObject *) PyObject_MALLOC(_PyObject_VAR_SIZE((typeobj),(n)) ),\ (typeobj), (n)) ) /* This example code implements an object constructor with a custom allocator, where PyObject_New is inlined, and shows the important distinction between two steps (at least): 1) the actual allocation of the object storage; 2) the initialization of the Python specific fields in this storage with PyObject_{Init, InitVar}. PyObject * YourObject_New(...) { PyObject *op; op = (PyObject *) Your_Allocator(_PyObject_SIZE(YourTypeStruct)); if (op == NULL) return PyErr_NoMemory(); PyObject_Init(op, &YourTypeStruct); op->ob_field = value; ... return op; } Note that in C++, the use of the new operator usually implies that the 1st step is performed automatically for you, so in a C++ class constructor you would start directly with PyObject_Init/InitVar */ /* * Garbage Collection Support * ========================== */ /* C equivalent of gc.collect(). */ long PyGC_Collect(void); /* Test if a type has a GC head */ #define PyType_IS_GC(t) PyType_HasFeature((t), Py_TPFLAGS_HAVE_GC) /* Test if an object has a GC head */ #define PyObject_IS_GC(o) (PyType_IS_GC((o)->ob_type) && \ ((o)->ob_type->tp_is_gc == NULL || (o)->ob_type->tp_is_gc(o))) PyAPI_FUNC(PyVarObject *) _PyObject_GC_Resize(PyVarObject *, int); #define PyObject_GC_Resize(type, op, n) \ ( (type *) _PyObject_GC_Resize((PyVarObject *)(op), (n)) ) /* for source compatibility with 2.2 */ #define _PyObject_GC_Del PyObject_GC_Del /* GC information is stored BEFORE the object structure. */ typedef union _gc_head { struct { union _gc_head *gc_next; union _gc_head *gc_prev; int gc_refs; } gc; long double dummy; /* force worst-case alignment */ } PyGC_Head; extern PyGC_Head *_PyGC_generation0; #define _Py_AS_GC(o) ((PyGC_Head *)(o)-1) #define _PyGC_REFS_UNTRACKED (-2) #define _PyGC_REFS_REACHABLE (-3) #define _PyGC_REFS_TENTATIVELY_UNREACHABLE (-4) /* Tell the GC to track this object. NB: While the object is tracked the * collector it must be safe to call the ob_traverse method. */ #define _PyObject_GC_TRACK(o) do { \ PyGC_Head *g = _Py_AS_GC(o); \ if (g->gc.gc_refs != _PyGC_REFS_UNTRACKED) \ Py_FatalError("GC object already tracked"); \ g->gc.gc_refs = _PyGC_REFS_REACHABLE; \ g->gc.gc_next = _PyGC_generation0; \ g->gc.gc_prev = _PyGC_generation0->gc.gc_prev; \ g->gc.gc_prev->gc.gc_next = g; \ _PyGC_generation0->gc.gc_prev = g; \ } while (0); /* Tell the GC to stop tracking this object. * gc_next doesn't need to be set to NULL, but doing so is a good * way to provoke memory errors if calling code is confused. */ #define _PyObject_GC_UNTRACK(o) do { \ PyGC_Head *g = _Py_AS_GC(o); \ assert(g->gc.gc_refs != _PyGC_REFS_UNTRACKED); \ g->gc.gc_refs = _PyGC_REFS_UNTRACKED; \ g->gc.gc_prev->gc.gc_next = g->gc.gc_next; \ g->gc.gc_next->gc.gc_prev = g->gc.gc_prev; \ g->gc.gc_next = NULL; \ } while (0); PyAPI_FUNC(PyObject *) _PyObject_GC_Malloc(size_t); PyAPI_FUNC(PyObject *) _PyObject_GC_New(PyTypeObject *); PyAPI_FUNC(PyVarObject *) _PyObject_GC_NewVar(PyTypeObject *, int); PyAPI_FUNC(void) PyObject_GC_Track(void *); PyAPI_FUNC(void) PyObject_GC_UnTrack(void *); PyAPI_FUNC(void) PyObject_GC_Del(void *); #define PyObject_GC_New(type, typeobj) \ ( (type *) _PyObject_GC_New(typeobj) ) #define PyObject_GC_NewVar(type, typeobj, n) \ ( (type *) _PyObject_GC_NewVar((typeobj), (n)) ) /* This is here for the sake of backwards compatibility. Extensions that * use the old GC API will still compile but the objects will not be * tracked by the GC. */ #define PyGC_HEAD_SIZE 0 #define PyObject_GC_Init(op) #define PyObject_GC_Fini(op) #define PyObject_AS_GC(op) (op) #define PyObject_FROM_GC(op) (op) /* Test if a type supports weak references */ #define PyType_SUPPORTS_WEAKREFS(t) \ (PyType_HasFeature((t), Py_TPFLAGS_HAVE_WEAKREFS) \ && ((t)->tp_weaklistoffset > 0)) #define PyObject_GET_WEAKREFS_LISTPTR(o) \ ((PyObject **) (((char *) (o)) + (o)->ob_type->tp_weaklistoffset)) #ifdef __cplusplus } #endif #endif /* !Py_OBJIMPL_H */ Python-2.3.7/Include/enumobject.h0000644001241000117560000000032307525661026016146 0ustar loewishpifb6#ifndef Py_ENUMOBJECT_H #define Py_ENUMOBJECT_H /* Enumerate Object */ #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(PyTypeObject) PyEnum_Type; #ifdef __cplusplus } #endif #endif /* !Py_ENUMOBJECT_H */ Python-2.3.7/Include/errcode.h0000644001241000117560000000240707526600720015436 0ustar loewishpifb6#ifndef Py_ERRCODE_H #define Py_ERRCODE_H #ifdef __cplusplus extern "C" { #endif /* Error codes passed around between file input, tokenizer, parser and interpreter. This is necessary so we can turn them into Python exceptions at a higher level. Note that some errors have a slightly different meaning when passed from the tokenizer to the parser than when passed from the parser to the interpreter; e.g. the parser only returns E_EOF when it hits EOF immediately, and it never returns E_OK. */ #define E_OK 10 /* No error */ #define E_EOF 11 /* End Of File */ #define E_INTR 12 /* Interrupted */ #define E_TOKEN 13 /* Bad token */ #define E_SYNTAX 14 /* Syntax error */ #define E_NOMEM 15 /* Ran out of memory */ #define E_DONE 16 /* Parsing complete */ #define E_ERROR 17 /* Execution error */ #define E_TABSPACE 18 /* Inconsistent mixing of tabs and spaces */ #define E_OVERFLOW 19 /* Node had too many children */ #define E_TOODEEP 20 /* Too many indentation levels */ #define E_DEDENT 21 /* No matching outer block for dedent */ #define E_DECODE 22 /* Error in decoding into Unicode */ #define E_EOFS 23 /* EOF in triple-quoted string */ #define E_EOLS 24 /* EOL in single-quoted string */ #ifdef __cplusplus } #endif #endif /* !Py_ERRCODE_H */ Python-2.3.7/Include/pydebug.h0000644001241000117560000000205107610562230015442 0ustar loewishpifb6 #ifndef Py_PYDEBUG_H #define Py_PYDEBUG_H #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(int) Py_DebugFlag; PyAPI_DATA(int) Py_VerboseFlag; PyAPI_DATA(int) Py_InteractiveFlag; PyAPI_DATA(int) Py_OptimizeFlag; PyAPI_DATA(int) Py_NoSiteFlag; PyAPI_DATA(int) Py_UseClassExceptionsFlag; PyAPI_DATA(int) Py_FrozenFlag; PyAPI_DATA(int) Py_TabcheckFlag; PyAPI_DATA(int) Py_UnicodeFlag; PyAPI_DATA(int) Py_IgnoreEnvironmentFlag; PyAPI_DATA(int) Py_DivisionWarningFlag; /* _XXX Py_QnewFlag should go away in 3.0. It's true iff -Qnew is passed, on the command line, and is used in 2.2 by ceval.c to make all "/" divisions true divisions (which they will be in 3.0). */ PyAPI_DATA(int) _Py_QnewFlag; /* this is a wrapper around getenv() that pays attention to Py_IgnoreEnvironmentFlag. It should be used for getting variables like PYTHONPATH and PYTHONHOME from the environment */ #define Py_GETENV(s) (Py_IgnoreEnvironmentFlag ? NULL : getenv(s)) PyAPI_FUNC(void) Py_FatalError(const char *message); #ifdef __cplusplus } #endif #endif /* !Py_PYDEBUG_H */ Python-2.3.7/Include/dictobject.h0000644001241000117560000001207507654663417016145 0ustar loewishpifb6#ifndef Py_DICTOBJECT_H #define Py_DICTOBJECT_H #ifdef __cplusplus extern "C" { #endif /* Dictionary object type -- mapping from hashable object to object */ /* The distribution includes a separate file, Objects/dictnotes.txt, describing explorations into dictionary design and optimization. It covers typical dictionary use patterns, the parameters for tuning dictionaries, and several ideas for possible optimizations. */ /* There are three kinds of slots in the table: 1. Unused. me_key == me_value == NULL Does not hold an active (key, value) pair now and never did. Unused can transition to Active upon key insertion. This is the only case in which me_key is NULL, and is each slot's initial state. 2. Active. me_key != NULL and me_key != dummy and me_value != NULL Holds an active (key, value) pair. Active can transition to Dummy upon key deletion. This is the only case in which me_value != NULL. 3. Dummy. me_key == dummy and me_value == NULL Previously held an active (key, value) pair, but that was deleted and an active pair has not yet overwritten the slot. Dummy can transition to Active upon key insertion. Dummy slots cannot be made Unused again (cannot have me_key set to NULL), else the probe sequence in case of collision would have no way to know they were once active. Note: .popitem() abuses the me_hash field of an Unused or Dummy slot to hold a search finger. The me_hash field of Unused or Dummy slots has no meaning otherwise. */ /* PyDict_MINSIZE is the minimum size of a dictionary. This many slots are * allocated directly in the dict object (in the ma_smalltable member). * It must be a power of 2, and at least 4. 8 allows dicts with no more * than 5 active entries to live in ma_smalltable (and so avoid an * additional malloc); instrumentation suggested this suffices for the * majority of dicts (consisting mostly of usually-small instance dicts and * usually-small dicts created to pass keyword arguments). */ #define PyDict_MINSIZE 8 typedef struct { long me_hash; /* cached hash code of me_key */ PyObject *me_key; PyObject *me_value; } PyDictEntry; /* To ensure the lookup algorithm terminates, there must be at least one Unused slot (NULL key) in the table. The value ma_fill is the number of non-NULL keys (sum of Active and Dummy); ma_used is the number of non-NULL, non-dummy keys (== the number of non-NULL values == the number of Active items). To avoid slowing down lookups on a near-full table, we resize the table when it's two-thirds full. */ typedef struct _dictobject PyDictObject; struct _dictobject { PyObject_HEAD int ma_fill; /* # Active + # Dummy */ int ma_used; /* # Active */ /* The table contains ma_mask + 1 slots, and that's a power of 2. * We store the mask instead of the size because the mask is more * frequently needed. */ int ma_mask; /* ma_table points to ma_smalltable for small tables, else to * additional malloc'ed memory. ma_table is never NULL! This rule * saves repeated runtime null-tests in the workhorse getitem and * setitem calls. */ PyDictEntry *ma_table; PyDictEntry *(*ma_lookup)(PyDictObject *mp, PyObject *key, long hash); PyDictEntry ma_smalltable[PyDict_MINSIZE]; }; PyAPI_DATA(PyTypeObject) PyDict_Type; #define PyDict_Check(op) PyObject_TypeCheck(op, &PyDict_Type) PyAPI_FUNC(PyObject *) PyDict_New(void); PyAPI_FUNC(PyObject *) PyDict_GetItem(PyObject *mp, PyObject *key); PyAPI_FUNC(int) PyDict_SetItem(PyObject *mp, PyObject *key, PyObject *item); PyAPI_FUNC(int) PyDict_DelItem(PyObject *mp, PyObject *key); PyAPI_FUNC(void) PyDict_Clear(PyObject *mp); PyAPI_FUNC(int) PyDict_Next( PyObject *mp, int *pos, PyObject **key, PyObject **value); PyAPI_FUNC(PyObject *) PyDict_Keys(PyObject *mp); PyAPI_FUNC(PyObject *) PyDict_Values(PyObject *mp); PyAPI_FUNC(PyObject *) PyDict_Items(PyObject *mp); PyAPI_FUNC(int) PyDict_Size(PyObject *mp); PyAPI_FUNC(PyObject *) PyDict_Copy(PyObject *mp); /* PyDict_Update(mp, other) is equivalent to PyDict_Merge(mp, other, 1). */ PyAPI_FUNC(int) PyDict_Update(PyObject *mp, PyObject *other); /* PyDict_Merge updates/merges from a mapping object (an object that supports PyMapping_Keys() and PyObject_GetItem()). If override is true, the last occurrence of a key wins, else the first. The Python dict.update(other) is equivalent to PyDict_Merge(dict, other, 1). */ PyAPI_FUNC(int) PyDict_Merge(PyObject *mp, PyObject *other, int override); /* PyDict_MergeFromSeq2 updates/merges from an iterable object producing iterable objects of length 2. If override is true, the last occurrence of a key wins, else the first. The Python dict constructor dict(seq2) is equivalent to dict={}; PyDict_MergeFromSeq(dict, seq2, 1). */ PyAPI_FUNC(int) PyDict_MergeFromSeq2(PyObject *d, PyObject *seq2, int override); PyAPI_FUNC(PyObject *) PyDict_GetItemString(PyObject *dp, const char *key); PyAPI_FUNC(int) PyDict_SetItemString(PyObject *dp, const char *key, PyObject *item); PyAPI_FUNC(int) PyDict_DelItemString(PyObject *dp, const char *key); #ifdef __cplusplus } #endif #endif /* !Py_DICTOBJECT_H */ Python-2.3.7/Include/patchlevel.h0000644001241000117560000000230510765544250016143 0ustar loewishpifb6 /* Newfangled version identification scheme. This scheme was added in Python 1.5.2b2; before that time, only PATCHLEVEL was available. To test for presence of the scheme, test for defined(PY_MAJOR_VERSION). When the major or minor version changes, the VERSION variable in configure.in must also be changed. There is also (independent) API version information in modsupport.h. */ /* Values for PY_RELEASE_LEVEL */ #define PY_RELEASE_LEVEL_ALPHA 0xA #define PY_RELEASE_LEVEL_BETA 0xB #define PY_RELEASE_LEVEL_GAMMA 0xC #define PY_RELEASE_LEVEL_FINAL 0xF /* Serial should be 0 here */ /* Higher for patch releases */ /* Version parsed out into numeric values */ #define PY_MAJOR_VERSION 2 #define PY_MINOR_VERSION 3 #define PY_MICRO_VERSION 7 #define PY_RELEASE_LEVEL PY_RELEASE_LEVEL_FINAL #define PY_RELEASE_SERIAL 0 /* Version as a string */ #define PY_VERSION "2.3.7" /* Version as a single 4-byte hex number, e.g. 0x010502B2 == 1.5.2b2. Use this for numeric comparisons, e.g. #if PY_VERSION_HEX >= ... */ #define PY_VERSION_HEX ((PY_MAJOR_VERSION << 24) | \ (PY_MINOR_VERSION << 16) | \ (PY_MICRO_VERSION << 8) | \ (PY_RELEASE_LEVEL << 4) | \ (PY_RELEASE_SERIAL << 0)) Python-2.3.7/Include/descrobject.h0000644001241000117560000000407207575217615016315 0ustar loewishpifb6/* Descriptors */ #ifndef Py_DESCROBJECT_H #define Py_DESCROBJECT_H #ifdef __cplusplus extern "C" { #endif typedef PyObject *(*getter)(PyObject *, void *); typedef int (*setter)(PyObject *, PyObject *, void *); typedef struct PyGetSetDef { char *name; getter get; setter set; char *doc; void *closure; } PyGetSetDef; typedef PyObject *(*wrapperfunc)(PyObject *self, PyObject *args, void *wrapped); typedef PyObject *(*wrapperfunc_kwds)(PyObject *self, PyObject *args, void *wrapped, PyObject *kwds); struct wrapperbase { char *name; int offset; void *function; wrapperfunc wrapper; char *doc; int flags; PyObject *name_strobj; }; /* Flags for above struct */ #define PyWrapperFlag_KEYWORDS 1 /* wrapper function takes keyword args */ /* Various kinds of descriptor objects */ #define PyDescr_COMMON \ PyObject_HEAD \ PyTypeObject *d_type; \ PyObject *d_name typedef struct { PyDescr_COMMON; } PyDescrObject; typedef struct { PyDescr_COMMON; PyMethodDef *d_method; } PyMethodDescrObject; typedef struct { PyDescr_COMMON; struct PyMemberDef *d_member; } PyMemberDescrObject; typedef struct { PyDescr_COMMON; PyGetSetDef *d_getset; } PyGetSetDescrObject; typedef struct { PyDescr_COMMON; struct wrapperbase *d_base; void *d_wrapped; /* This can be any function pointer */ } PyWrapperDescrObject; PyAPI_DATA(PyTypeObject) PyWrapperDescr_Type; PyAPI_FUNC(PyObject *) PyDescr_NewMethod(PyTypeObject *, PyMethodDef *); PyAPI_FUNC(PyObject *) PyDescr_NewClassMethod(PyTypeObject *, PyMethodDef *); PyAPI_FUNC(PyObject *) PyDescr_NewMember(PyTypeObject *, struct PyMemberDef *); PyAPI_FUNC(PyObject *) PyDescr_NewGetSet(PyTypeObject *, struct PyGetSetDef *); PyAPI_FUNC(PyObject *) PyDescr_NewWrapper(PyTypeObject *, struct wrapperbase *, void *); #define PyDescr_IsData(d) ((d)->ob_type->tp_descr_set != NULL) PyAPI_FUNC(PyObject *) PyDictProxy_New(PyObject *); PyAPI_FUNC(PyObject *) PyWrapper_New(PyObject *, PyObject *); PyAPI_DATA(PyTypeObject) PyProperty_Type; #ifdef __cplusplus } #endif #endif /* !Py_DESCROBJECT_H */ Python-2.3.7/Include/classobject.h0000644001241000117560000000551507644614471016323 0ustar loewishpifb6 /* Class object interface */ /* Revealing some structures (not for general use) */ #ifndef Py_CLASSOBJECT_H #define Py_CLASSOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { PyObject_HEAD PyObject *cl_bases; /* A tuple of class objects */ PyObject *cl_dict; /* A dictionary */ PyObject *cl_name; /* A string */ /* The following three are functions or NULL */ PyObject *cl_getattr; PyObject *cl_setattr; PyObject *cl_delattr; } PyClassObject; typedef struct { PyObject_HEAD PyClassObject *in_class; /* The class object */ PyObject *in_dict; /* A dictionary */ PyObject *in_weakreflist; /* List of weak references */ } PyInstanceObject; typedef struct { PyObject_HEAD PyObject *im_func; /* The callable object implementing the method */ PyObject *im_self; /* The instance it is bound to, or NULL */ PyObject *im_class; /* The class that asked for the method */ PyObject *im_weakreflist; /* List of weak references */ } PyMethodObject; PyAPI_DATA(PyTypeObject) PyClass_Type, PyInstance_Type, PyMethod_Type; #define PyClass_Check(op) ((op)->ob_type == &PyClass_Type) #define PyInstance_Check(op) ((op)->ob_type == &PyInstance_Type) #define PyMethod_Check(op) ((op)->ob_type == &PyMethod_Type) PyAPI_FUNC(PyObject *) PyClass_New(PyObject *, PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyInstance_New(PyObject *, PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyInstance_NewRaw(PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyMethod_New(PyObject *, PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyMethod_Function(PyObject *); PyAPI_FUNC(PyObject *) PyMethod_Self(PyObject *); PyAPI_FUNC(PyObject *) PyMethod_Class(PyObject *); /* Look up attribute with name (a string) on instance object pinst, using * only the instance and base class dicts. If a descriptor is found in * a class dict, the descriptor is returned without calling it. * Returns NULL if nothing found, else a borrowed reference to the * value associated with name in the dict in which name was found. * The point of this routine is that it never calls arbitrary Python * code, so is always "safe": all it does is dict lookups. The function * can't fail, never sets an exception, and NULL is not an error (it just * means "not found"). */ PyAPI_FUNC(PyObject *) _PyInstance_Lookup(PyObject *pinst, PyObject *name); /* Macros for direct access to these values. Type checks are *not* done, so use with care. */ #define PyMethod_GET_FUNCTION(meth) \ (((PyMethodObject *)meth) -> im_func) #define PyMethod_GET_SELF(meth) \ (((PyMethodObject *)meth) -> im_self) #define PyMethod_GET_CLASS(meth) \ (((PyMethodObject *)meth) -> im_class) PyAPI_FUNC(int) PyClass_IsSubclass(PyObject *, PyObject *); #ifdef __cplusplus } #endif #endif /* !Py_CLASSOBJECT_H */ Python-2.3.7/Include/Python.h0000644001241000117560000000752707525661026015311 0ustar loewishpifb6#ifndef Py_PYTHON_H #define Py_PYTHON_H /* Since this is a "meta-include" file, no #ifdef __cplusplus / extern "C" { */ /* Include nearly all Python header files */ #include "patchlevel.h" #include "pyconfig.h" /* Cyclic gc is always enabled, starting with release 2.3a1. Supply the * old symbol for the benefit of extension modules written before then * that may be conditionalizing on it. The core doesn't use it anymore. */ #ifndef WITH_CYCLE_GC #define WITH_CYCLE_GC 1 #endif #ifdef HAVE_LIMITS_H #include #else #error "limits.h is required by std C -- why isn't HAVE_LIMITS_H defined?" #endif #if defined(__sgi) && defined(WITH_THREAD) && !defined(_SGI_MP_SOURCE) #define _SGI_MP_SOURCE #endif #include #ifndef NULL # error "Python.h requires that stdio.h define NULL." #endif #include #include #ifdef HAVE_STDLIB_H #include #endif #ifdef HAVE_UNISTD_H #include #endif /* CAUTION: Build setups should ensure that NDEBUG is defined on the * compiler command line when building Python in release mode; else * assert() calls won't be removed. */ #include #include "pyport.h" /* pyconfig.h or pyport.h may or may not define DL_IMPORT */ #ifndef DL_IMPORT /* declarations for DLL import/export */ #define DL_IMPORT(RTYPE) RTYPE #endif #ifndef DL_EXPORT /* declarations for DLL import/export */ #define DL_EXPORT(RTYPE) RTYPE #endif /* Debug-mode build with pymalloc implies PYMALLOC_DEBUG. * PYMALLOC_DEBUG is in error if pymalloc is not in use. */ #if defined(Py_DEBUG) && defined(WITH_PYMALLOC) && !defined(PYMALLOC_DEBUG) #define PYMALLOC_DEBUG #endif #if defined(PYMALLOC_DEBUG) && !defined(WITH_PYMALLOC) #error "PYMALLOC_DEBUG requires WITH_PYMALLOC" #endif #include "pymem.h" #include "object.h" #include "objimpl.h" #include "pydebug.h" #include "unicodeobject.h" #include "intobject.h" #include "boolobject.h" #include "longobject.h" #include "floatobject.h" #ifndef WITHOUT_COMPLEX #include "complexobject.h" #endif #include "rangeobject.h" #include "stringobject.h" #include "bufferobject.h" #include "tupleobject.h" #include "listobject.h" #include "dictobject.h" #include "enumobject.h" #include "methodobject.h" #include "moduleobject.h" #include "funcobject.h" #include "classobject.h" #include "fileobject.h" #include "cobject.h" #include "traceback.h" #include "sliceobject.h" #include "cellobject.h" #include "iterobject.h" #include "descrobject.h" #include "weakrefobject.h" #include "codecs.h" #include "pyerrors.h" #include "pystate.h" #include "modsupport.h" #include "pythonrun.h" #include "ceval.h" #include "sysmodule.h" #include "intrcheck.h" #include "import.h" #include "abstract.h" /* _Py_Mangle is defined in compile.c */ PyAPI_FUNC(int) _Py_Mangle(char *p, char *name, \ char *buffer, size_t maxlen); /* PyArg_GetInt is deprecated and should not be used, use PyArg_Parse(). */ #define PyArg_GetInt(v, a) PyArg_Parse((v), "i", (a)) /* PyArg_NoArgs should not be necessary. Set ml_flags in the PyMethodDef to METH_NOARGS. */ #define PyArg_NoArgs(v) PyArg_Parse(v, "") /* Convert a possibly signed character to a nonnegative int */ /* XXX This assumes characters are 8 bits wide */ #ifdef __CHAR_UNSIGNED__ #define Py_CHARMASK(c) (c) #else #define Py_CHARMASK(c) ((c) & 0xff) #endif #include "pyfpe.h" /* These definitions must match corresponding definitions in graminit.h. There's code in compile.c that checks that they are the same. */ #define Py_single_input 256 #define Py_file_input 257 #define Py_eval_input 258 #ifdef HAVE_PTH /* GNU pth user-space thread support */ #include #endif /* Define macros for inline documentation. */ #define PyDoc_VAR(name) static char name[] #define PyDoc_STRVAR(name,str) PyDoc_VAR(name) = PyDoc_STR(str) #ifdef WITH_DOC_STRINGS #define PyDoc_STR(str) str #else #define PyDoc_STR(str) "" #endif #endif /* !Py_PYTHON_H */ Python-2.3.7/Include/longobject.h0000644001241000117560000001100607647574261016152 0ustar loewishpifb6#ifndef Py_LONGOBJECT_H #define Py_LONGOBJECT_H #ifdef __cplusplus extern "C" { #endif /* Long (arbitrary precision) integer object interface */ typedef struct _longobject PyLongObject; /* Revealed in longintrepr.h */ PyAPI_DATA(PyTypeObject) PyLong_Type; #define PyLong_Check(op) PyObject_TypeCheck(op, &PyLong_Type) #define PyLong_CheckExact(op) ((op)->ob_type == &PyLong_Type) PyAPI_FUNC(PyObject *) PyLong_FromLong(long); PyAPI_FUNC(PyObject *) PyLong_FromUnsignedLong(unsigned long); PyAPI_FUNC(PyObject *) PyLong_FromDouble(double); PyAPI_FUNC(long) PyLong_AsLong(PyObject *); PyAPI_FUNC(unsigned long) PyLong_AsUnsignedLong(PyObject *); PyAPI_FUNC(unsigned long) PyLong_AsUnsignedLongMask(PyObject *); /* _PyLong_AsScaledDouble returns a double x and an exponent e such that the true value is approximately equal to x * 2**(SHIFT*e). e is >= 0. x is 0.0 if and only if the input is 0 (in which case, e and x are both zeroes). Overflow is impossible. Note that the exponent returned must be multiplied by SHIFT! There may not be enough room in an int to store e*SHIFT directly. */ PyAPI_FUNC(double) _PyLong_AsScaledDouble(PyObject *vv, int *e); PyAPI_FUNC(double) PyLong_AsDouble(PyObject *); PyAPI_FUNC(PyObject *) PyLong_FromVoidPtr(void *); PyAPI_FUNC(void *) PyLong_AsVoidPtr(PyObject *); #ifdef HAVE_LONG_LONG PyAPI_FUNC(PyObject *) PyLong_FromLongLong(PY_LONG_LONG); PyAPI_FUNC(PyObject *) PyLong_FromUnsignedLongLong(unsigned PY_LONG_LONG); PyAPI_FUNC(PY_LONG_LONG) PyLong_AsLongLong(PyObject *); PyAPI_FUNC(unsigned PY_LONG_LONG) PyLong_AsUnsignedLongLong(PyObject *); PyAPI_FUNC(unsigned PY_LONG_LONG) PyLong_AsUnsignedLongLongMask(PyObject *); #endif /* HAVE_LONG_LONG */ PyAPI_FUNC(PyObject *) PyLong_FromString(char *, char **, int); #ifdef Py_USING_UNICODE PyAPI_FUNC(PyObject *) PyLong_FromUnicode(Py_UNICODE*, int, int); #endif /* _PyLong_Sign. Return 0 if v is 0, -1 if v < 0, +1 if v > 0. v must not be NULL, and must be a normalized long. There are no error cases. */ PyAPI_FUNC(int) _PyLong_Sign(PyObject *v); PyAPI_FUNC(size_t) _PyLong_NumBits(PyObject *v); /* _PyLong_NumBits. Return the number of bits needed to represent the absolute value of a long. For example, this returns 1 for 1 and -1, 2 for 2 and -2, and 2 for 3 and -3. It returns 0 for 0. v must not be NULL, and must be a normalized long. (size_t)-1 is returned and OverflowError set if the true result doesn't fit in a size_t. */ PyAPI_FUNC(size_t) _PyLong_NumBits(PyObject *v); /* _PyLong_FromByteArray: View the n unsigned bytes as a binary integer in base 256, and return a Python long with the same numeric value. If n is 0, the integer is 0. Else: If little_endian is 1/true, bytes[n-1] is the MSB and bytes[0] the LSB; else (little_endian is 0/false) bytes[0] is the MSB and bytes[n-1] the LSB. If is_signed is 0/false, view the bytes as a non-negative integer. If is_signed is 1/true, view the bytes as a 2's-complement integer, non-negative if bit 0x80 of the MSB is clear, negative if set. Error returns: + Return NULL with the appropriate exception set if there's not enough memory to create the Python long. */ PyAPI_FUNC(PyObject *) _PyLong_FromByteArray( const unsigned char* bytes, size_t n, int little_endian, int is_signed); /* _PyLong_AsByteArray: Convert the least-significant 8*n bits of long v to a base-256 integer, stored in array bytes. Normally return 0, return -1 on error. If little_endian is 1/true, store the MSB at bytes[n-1] and the LSB at bytes[0]; else (little_endian is 0/false) store the MSB at bytes[0] and the LSB at bytes[n-1]. If is_signed is 0/false, it's an error if v < 0; else (v >= 0) n bytes are filled and there's nothing special about bit 0x80 of the MSB. If is_signed is 1/true, bytes is filled with the 2's-complement representation of v's value. Bit 0x80 of the MSB is the sign bit. Error returns (-1): + is_signed is 0 and v < 0. TypeError is set in this case, and bytes isn't altered. + n isn't big enough to hold the full mathematical value of v. For example, if is_signed is 0 and there are more digits in the v than fit in n; or if is_signed is 1, v < 0, and n is just 1 bit shy of being large enough to hold a sign bit. OverflowError is set in this case, but bytes holds the least-signficant n bytes of the true value. */ PyAPI_FUNC(int) _PyLong_AsByteArray(PyLongObject* v, unsigned char* bytes, size_t n, int little_endian, int is_signed); #ifdef __cplusplus } #endif #endif /* !Py_LONGOBJECT_H */ Python-2.3.7/Include/abstract.h0000644001241000117560000010746207744771210015632 0ustar loewishpifb6#ifndef Py_ABSTRACTOBJECT_H #define Py_ABSTRACTOBJECT_H #ifdef __cplusplus extern "C" { #endif /* Abstract Object Interface (many thanks to Jim Fulton) */ /* PROPOSAL: A Generic Python Object Interface for Python C Modules Problem Python modules written in C that must access Python objects must do so through routines whose interfaces are described by a set of include files. Unfortunately, these routines vary according to the object accessed. To use these routines, the C programmer must check the type of the object being used and must call a routine based on the object type. For example, to access an element of a sequence, the programmer must determine whether the sequence is a list or a tuple: if(is_tupleobject(o)) e=gettupleitem(o,i) else if(is_listitem(o)) e=getlistitem(o,i) If the programmer wants to get an item from another type of object that provides sequence behavior, there is no clear way to do it correctly. The persistent programmer may peruse object.h and find that the _typeobject structure provides a means of invoking up to (currently about) 41 special operators. So, for example, a routine can get an item from any object that provides sequence behavior. However, to use this mechanism, the programmer must make their code dependent on the current Python implementation. Also, certain semantics, especially memory management semantics, may differ by the type of object being used. Unfortunately, these semantics are not clearly described in the current include files. An abstract interface providing more consistent semantics is needed. Proposal I propose the creation of a standard interface (with an associated library of routines and/or macros) for generically obtaining the services of Python objects. This proposal can be viewed as one components of a Python C interface consisting of several components. From the viewpoint of C access to Python services, we have (as suggested by Guido in off-line discussions): - "Very high level layer": two or three functions that let you exec or eval arbitrary Python code given as a string in a module whose name is given, passing C values in and getting C values out using mkvalue/getargs style format strings. This does not require the user to declare any variables of type "PyObject *". This should be enough to write a simple application that gets Python code from the user, execs it, and returns the output or errors. (Error handling must also be part of this API.) - "Abstract objects layer": which is the subject of this proposal. It has many functions operating on objects, and lest you do many things from C that you can also write in Python, without going through the Python parser. - "Concrete objects layer": This is the public type-dependent interface provided by the standard built-in types, such as floats, strings, and lists. This interface exists and is currently documented by the collection of include files provided with the Python distributions. From the point of view of Python accessing services provided by C modules: - "Python module interface": this interface consist of the basic routines used to define modules and their members. Most of the current extensions-writing guide deals with this interface. - "Built-in object interface": this is the interface that a new built-in type must provide and the mechanisms and rules that a developer of a new built-in type must use and follow. This proposal is a "first-cut" that is intended to spur discussion. See especially the lists of notes. The Python C object interface will provide four protocols: object, numeric, sequence, and mapping. Each protocol consists of a collection of related operations. If an operation that is not provided by a particular type is invoked, then a standard exception, NotImplementedError is raised with a operation name as an argument. In addition, for convenience this interface defines a set of constructors for building objects of built-in types. This is needed so new objects can be returned from C functions that otherwise treat objects generically. Memory Management For all of the functions described in this proposal, if a function retains a reference to a Python object passed as an argument, then the function will increase the reference count of the object. It is unnecessary for the caller to increase the reference count of an argument in anticipation of the object's retention. All Python objects returned from functions should be treated as new objects. Functions that return objects assume that the caller will retain a reference and the reference count of the object has already been incremented to account for this fact. A caller that does not retain a reference to an object that is returned from a function must decrement the reference count of the object (using DECREF(object)) to prevent memory leaks. Note that the behavior mentioned here is different from the current behavior for some objects (e.g. lists and tuples) when certain type-specific routines are called directly (e.g. setlistitem). The proposed abstraction layer will provide a consistent memory management interface, correcting for inconsistent behavior for some built-in types. Protocols xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx*/ /* Object Protocol: */ /* Implemented elsewhere: int PyObject_Print(PyObject *o, FILE *fp, int flags); Print an object, o, on file, fp. Returns -1 on error. The flags argument is used to enable certain printing options. The only option currently supported is Py_Print_RAW. (What should be said about Py_Print_RAW?) */ /* Implemented elsewhere: int PyObject_HasAttrString(PyObject *o, char *attr_name); Returns 1 if o has the attribute attr_name, and 0 otherwise. This is equivalent to the Python expression: hasattr(o,attr_name). This function always succeeds. */ /* Implemented elsewhere: PyObject* PyObject_GetAttrString(PyObject *o, char *attr_name); Retrieve an attributed named attr_name form object o. Returns the attribute value on success, or NULL on failure. This is the equivalent of the Python expression: o.attr_name. */ /* Implemented elsewhere: int PyObject_HasAttr(PyObject *o, PyObject *attr_name); Returns 1 if o has the attribute attr_name, and 0 otherwise. This is equivalent to the Python expression: hasattr(o,attr_name). This function always succeeds. */ /* Implemented elsewhere: PyObject* PyObject_GetAttr(PyObject *o, PyObject *attr_name); Retrieve an attributed named attr_name form object o. Returns the attribute value on success, or NULL on failure. This is the equivalent of the Python expression: o.attr_name. */ /* Implemented elsewhere: int PyObject_SetAttrString(PyObject *o, char *attr_name, PyObject *v); Set the value of the attribute named attr_name, for object o, to the value, v. Returns -1 on failure. This is the equivalent of the Python statement: o.attr_name=v. */ /* Implemented elsewhere: int PyObject_SetAttr(PyObject *o, PyObject *attr_name, PyObject *v); Set the value of the attribute named attr_name, for object o, to the value, v. Returns -1 on failure. This is the equivalent of the Python statement: o.attr_name=v. */ /* implemented as a macro: int PyObject_DelAttrString(PyObject *o, char *attr_name); Delete attribute named attr_name, for object o. Returns -1 on failure. This is the equivalent of the Python statement: del o.attr_name. */ #define PyObject_DelAttrString(O,A) PyObject_SetAttrString((O),(A),NULL) /* implemented as a macro: int PyObject_DelAttr(PyObject *o, PyObject *attr_name); Delete attribute named attr_name, for object o. Returns -1 on failure. This is the equivalent of the Python statement: del o.attr_name. */ #define PyObject_DelAttr(O,A) PyObject_SetAttr((O),(A),NULL) PyAPI_FUNC(int) PyObject_Cmp(PyObject *o1, PyObject *o2, int *result); /* Compare the values of o1 and o2 using a routine provided by o1, if one exists, otherwise with a routine provided by o2. The result of the comparison is returned in result. Returns -1 on failure. This is the equivalent of the Python statement: result=cmp(o1,o2). */ /* Implemented elsewhere: int PyObject_Compare(PyObject *o1, PyObject *o2); Compare the values of o1 and o2 using a routine provided by o1, if one exists, otherwise with a routine provided by o2. Returns the result of the comparison on success. On error, the value returned is undefined. This is equivalent to the Python expression: cmp(o1,o2). */ /* Implemented elsewhere: PyObject *PyObject_Repr(PyObject *o); Compute the string representation of object, o. Returns the string representation on success, NULL on failure. This is the equivalent of the Python expression: repr(o). Called by the repr() built-in function and by reverse quotes. */ /* Implemented elsewhere: PyObject *PyObject_Str(PyObject *o); Compute the string representation of object, o. Returns the string representation on success, NULL on failure. This is the equivalent of the Python expression: str(o).) Called by the str() built-in function and by the print statement. */ /* Implemented elsewhere: PyObject *PyObject_Unicode(PyObject *o); Compute the unicode representation of object, o. Returns the unicode representation on success, NULL on failure. This is the equivalent of the Python expression: unistr(o).) Called by the unistr() built-in function. */ PyAPI_FUNC(int) PyCallable_Check(PyObject *o); /* Determine if the object, o, is callable. Return 1 if the object is callable and 0 otherwise. This function always succeeds. */ PyAPI_FUNC(PyObject *) PyObject_Call(PyObject *callable_object, PyObject *args, PyObject *kw); /* Call a callable Python object, callable_object, with arguments and keywords arguments. The 'args' argument can not be NULL, but the 'kw' argument can be NULL. */ PyAPI_FUNC(PyObject *) PyObject_CallObject(PyObject *callable_object, PyObject *args); /* Call a callable Python object, callable_object, with arguments given by the tuple, args. If no arguments are needed, then args may be NULL. Returns the result of the call on success, or NULL on failure. This is the equivalent of the Python expression: apply(o,args). */ PyAPI_FUNC(PyObject *) PyObject_CallFunction(PyObject *callable_object, char *format, ...); /* Call a callable Python object, callable_object, with a variable number of C arguments. The C arguments are described using a mkvalue-style format string. The format may be NULL, indicating that no arguments are provided. Returns the result of the call on success, or NULL on failure. This is the equivalent of the Python expression: apply(o,args). */ PyAPI_FUNC(PyObject *) PyObject_CallMethod(PyObject *o, char *m, char *format, ...); /* Call the method named m of object o with a variable number of C arguments. The C arguments are described by a mkvalue format string. The format may be NULL, indicating that no arguments are provided. Returns the result of the call on success, or NULL on failure. This is the equivalent of the Python expression: o.method(args). */ PyAPI_FUNC(PyObject *) PyObject_CallFunctionObjArgs(PyObject *callable, ...); /* Call a callable Python object, callable_object, with a variable number of C arguments. The C arguments are provided as PyObject * values, terminated by a NULL. Returns the result of the call on success, or NULL on failure. This is the equivalent of the Python expression: apply(o,args). */ PyAPI_FUNC(PyObject *) PyObject_CallMethodObjArgs(PyObject *o, PyObject *m, ...); /* Call the method named m of object o with a variable number of C arguments. The C arguments are provided as PyObject * values, terminated by NULL. Returns the result of the call on success, or NULL on failure. This is the equivalent of the Python expression: o.method(args). */ /* Implemented elsewhere: long PyObject_Hash(PyObject *o); Compute and return the hash, hash_value, of an object, o. On failure, return -1. This is the equivalent of the Python expression: hash(o). */ /* Implemented elsewhere: int PyObject_IsTrue(PyObject *o); Returns 1 if the object, o, is considered to be true, 0 if o is considered to be false and -1 on failure. This is equivalent to the Python expression: not not o */ /* Implemented elsewhere: int PyObject_Not(PyObject *o); Returns 0 if the object, o, is considered to be true, 1 if o is considered to be false and -1 on failure. This is equivalent to the Python expression: not o */ PyAPI_FUNC(PyObject *) PyObject_Type(PyObject *o); /* On success, returns a type object corresponding to the object type of object o. On failure, returns NULL. This is equivalent to the Python expression: type(o). */ PyAPI_FUNC(int) PyObject_Size(PyObject *o); /* Return the size of object o. If the object, o, provides both sequence and mapping protocols, the sequence size is returned. On error, -1 is returned. This is the equivalent to the Python expression: len(o). */ /* For DLL compatibility */ #undef PyObject_Length PyAPI_FUNC(int) PyObject_Length(PyObject *o); #define PyObject_Length PyObject_Size PyAPI_FUNC(PyObject *) PyObject_GetItem(PyObject *o, PyObject *key); /* Return element of o corresponding to the object, key, or NULL on failure. This is the equivalent of the Python expression: o[key]. */ PyAPI_FUNC(int) PyObject_SetItem(PyObject *o, PyObject *key, PyObject *v); /* Map the object, key, to the value, v. Returns -1 on failure. This is the equivalent of the Python statement: o[key]=v. */ PyAPI_FUNC(int) PyObject_DelItemString(PyObject *o, char *key); /* Remove the mapping for object, key, from the object *o. Returns -1 on failure. This is equivalent to the Python statement: del o[key]. */ PyAPI_FUNC(int) PyObject_DelItem(PyObject *o, PyObject *key); /* Delete the mapping for key from *o. Returns -1 on failure. This is the equivalent of the Python statement: del o[key]. */ PyAPI_FUNC(int) PyObject_AsCharBuffer(PyObject *obj, const char **buffer, int *buffer_len); /* Takes an arbitrary object which must support the (character, single segment) buffer interface and returns a pointer to a read-only memory location useable as character based input for subsequent processing. 0 is returned on success. buffer and buffer_len are only set in case no error occurs. Otherwise, -1 is returned and an exception set. */ PyAPI_FUNC(int) PyObject_CheckReadBuffer(PyObject *obj); /* Checks whether an arbitrary object supports the (character, single segment) buffer interface. Returns 1 on success, 0 on failure. */ PyAPI_FUNC(int) PyObject_AsReadBuffer(PyObject *obj, const void **buffer, int *buffer_len); /* Same as PyObject_AsCharBuffer() except that this API expects (readable, single segment) buffer interface and returns a pointer to a read-only memory location which can contain arbitrary data. 0 is returned on success. buffer and buffer_len are only set in case no error occurrs. Otherwise, -1 is returned and an exception set. */ PyAPI_FUNC(int) PyObject_AsWriteBuffer(PyObject *obj, void **buffer, int *buffer_len); /* Takes an arbitrary object which must support the (writeable, single segment) buffer interface and returns a pointer to a writeable memory location in buffer of size buffer_len. 0 is returned on success. buffer and buffer_len are only set in case no error occurrs. Otherwise, -1 is returned and an exception set. */ /* Iterators */ PyAPI_FUNC(PyObject *) PyObject_GetIter(PyObject *); /* Takes an object and returns an iterator for it. This is typically a new iterator but if the argument is an iterator, this returns itself. */ #define PyIter_Check(obj) \ (PyType_HasFeature((obj)->ob_type, Py_TPFLAGS_HAVE_ITER) && \ (obj)->ob_type->tp_iternext != NULL) PyAPI_FUNC(PyObject *) PyIter_Next(PyObject *); /* Takes an iterator object and calls its tp_iternext slot, returning the next value. If the iterator is exhausted, this returns NULL without setting an exception. NULL with an exception means an error occurred. */ /* Number Protocol:*/ PyAPI_FUNC(int) PyNumber_Check(PyObject *o); /* Returns 1 if the object, o, provides numeric protocols, and false otherwise. This function always succeeds. */ PyAPI_FUNC(PyObject *) PyNumber_Add(PyObject *o1, PyObject *o2); /* Returns the result of adding o1 and o2, or null on failure. This is the equivalent of the Python expression: o1+o2. */ PyAPI_FUNC(PyObject *) PyNumber_Subtract(PyObject *o1, PyObject *o2); /* Returns the result of subtracting o2 from o1, or null on failure. This is the equivalent of the Python expression: o1-o2. */ PyAPI_FUNC(PyObject *) PyNumber_Multiply(PyObject *o1, PyObject *o2); /* Returns the result of multiplying o1 and o2, or null on failure. This is the equivalent of the Python expression: o1*o2. */ PyAPI_FUNC(PyObject *) PyNumber_Divide(PyObject *o1, PyObject *o2); /* Returns the result of dividing o1 by o2, or null on failure. This is the equivalent of the Python expression: o1/o2. */ PyAPI_FUNC(PyObject *) PyNumber_FloorDivide(PyObject *o1, PyObject *o2); /* Returns the result of dividing o1 by o2 giving an integral result, or null on failure. This is the equivalent of the Python expression: o1//o2. */ PyAPI_FUNC(PyObject *) PyNumber_TrueDivide(PyObject *o1, PyObject *o2); /* Returns the result of dividing o1 by o2 giving a float result, or null on failure. This is the equivalent of the Python expression: o1/o2. */ PyAPI_FUNC(PyObject *) PyNumber_Remainder(PyObject *o1, PyObject *o2); /* Returns the remainder of dividing o1 by o2, or null on failure. This is the equivalent of the Python expression: o1%o2. */ PyAPI_FUNC(PyObject *) PyNumber_Divmod(PyObject *o1, PyObject *o2); /* See the built-in function divmod. Returns NULL on failure. This is the equivalent of the Python expression: divmod(o1,o2). */ PyAPI_FUNC(PyObject *) PyNumber_Power(PyObject *o1, PyObject *o2, PyObject *o3); /* See the built-in function pow. Returns NULL on failure. This is the equivalent of the Python expression: pow(o1,o2,o3), where o3 is optional. */ PyAPI_FUNC(PyObject *) PyNumber_Negative(PyObject *o); /* Returns the negation of o on success, or null on failure. This is the equivalent of the Python expression: -o. */ PyAPI_FUNC(PyObject *) PyNumber_Positive(PyObject *o); /* Returns the (what?) of o on success, or NULL on failure. This is the equivalent of the Python expression: +o. */ PyAPI_FUNC(PyObject *) PyNumber_Absolute(PyObject *o); /* Returns the absolute value of o, or null on failure. This is the equivalent of the Python expression: abs(o). */ PyAPI_FUNC(PyObject *) PyNumber_Invert(PyObject *o); /* Returns the bitwise negation of o on success, or NULL on failure. This is the equivalent of the Python expression: ~o. */ PyAPI_FUNC(PyObject *) PyNumber_Lshift(PyObject *o1, PyObject *o2); /* Returns the result of left shifting o1 by o2 on success, or NULL on failure. This is the equivalent of the Python expression: o1 << o2. */ PyAPI_FUNC(PyObject *) PyNumber_Rshift(PyObject *o1, PyObject *o2); /* Returns the result of right shifting o1 by o2 on success, or NULL on failure. This is the equivalent of the Python expression: o1 >> o2. */ PyAPI_FUNC(PyObject *) PyNumber_And(PyObject *o1, PyObject *o2); /* Returns the result of bitwise and of o1 and o2 on success, or NULL on failure. This is the equivalent of the Python expression: o1&o2. */ PyAPI_FUNC(PyObject *) PyNumber_Xor(PyObject *o1, PyObject *o2); /* Returns the bitwise exclusive or of o1 by o2 on success, or NULL on failure. This is the equivalent of the Python expression: o1^o2. */ PyAPI_FUNC(PyObject *) PyNumber_Or(PyObject *o1, PyObject *o2); /* Returns the result of bitwise or on o1 and o2 on success, or NULL on failure. This is the equivalent of the Python expression: o1|o2. */ /* Implemented elsewhere: int PyNumber_Coerce(PyObject **p1, PyObject **p2); This function takes the addresses of two variables of type PyObject*. If the objects pointed to by *p1 and *p2 have the same type, increment their reference count and return 0 (success). If the objects can be converted to a common numeric type, replace *p1 and *p2 by their converted value (with 'new' reference counts), and return 0. If no conversion is possible, or if some other error occurs, return -1 (failure) and don't increment the reference counts. The call PyNumber_Coerce(&o1, &o2) is equivalent to the Python statement o1, o2 = coerce(o1, o2). */ PyAPI_FUNC(PyObject *) PyNumber_Int(PyObject *o); /* Returns the o converted to an integer object on success, or NULL on failure. This is the equivalent of the Python expression: int(o). */ PyAPI_FUNC(PyObject *) PyNumber_Long(PyObject *o); /* Returns the o converted to a long integer object on success, or NULL on failure. This is the equivalent of the Python expression: long(o). */ PyAPI_FUNC(PyObject *) PyNumber_Float(PyObject *o); /* Returns the o converted to a float object on success, or NULL on failure. This is the equivalent of the Python expression: float(o). */ /* In-place variants of (some of) the above number protocol functions */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceAdd(PyObject *o1, PyObject *o2); /* Returns the result of adding o2 to o1, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 += o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceSubtract(PyObject *o1, PyObject *o2); /* Returns the result of subtracting o2 from o1, possibly in-place or null on failure. This is the equivalent of the Python expression: o1 -= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceMultiply(PyObject *o1, PyObject *o2); /* Returns the result of multiplying o1 by o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 *= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceDivide(PyObject *o1, PyObject *o2); /* Returns the result of dividing o1 by o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 /= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceFloorDivide(PyObject *o1, PyObject *o2); /* Returns the result of dividing o1 by o2 giving an integral result, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 /= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceTrueDivide(PyObject *o1, PyObject *o2); /* Returns the result of dividing o1 by o2 giving a float result, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 /= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceRemainder(PyObject *o1, PyObject *o2); /* Returns the remainder of dividing o1 by o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 %= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlacePower(PyObject *o1, PyObject *o2, PyObject *o3); /* Returns the result of raising o1 to the power of o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 **= o2, or pow(o1, o2, o3) if o3 is present. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceLshift(PyObject *o1, PyObject *o2); /* Returns the result of left shifting o1 by o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 <<= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceRshift(PyObject *o1, PyObject *o2); /* Returns the result of right shifting o1 by o2, possibly in-place or null on failure. This is the equivalent of the Python expression: o1 >>= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceAnd(PyObject *o1, PyObject *o2); /* Returns the result of bitwise and of o1 and o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 &= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceXor(PyObject *o1, PyObject *o2); /* Returns the bitwise exclusive or of o1 by o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 ^= o2. */ PyAPI_FUNC(PyObject *) PyNumber_InPlaceOr(PyObject *o1, PyObject *o2); /* Returns the result of bitwise or of o1 and o2, possibly in-place, or null on failure. This is the equivalent of the Python expression: o1 |= o2. */ /* Sequence protocol:*/ PyAPI_FUNC(int) PySequence_Check(PyObject *o); /* Return 1 if the object provides sequence protocol, and zero otherwise. This function always succeeds. */ PyAPI_FUNC(int) PySequence_Size(PyObject *o); /* Return the size of sequence object o, or -1 on failure. */ /* For DLL compatibility */ #undef PySequence_Length PyAPI_FUNC(int) PySequence_Length(PyObject *o); #define PySequence_Length PySequence_Size PyAPI_FUNC(PyObject *) PySequence_Concat(PyObject *o1, PyObject *o2); /* Return the concatenation of o1 and o2 on success, and NULL on failure. This is the equivalent of the Python expression: o1+o2. */ PyAPI_FUNC(PyObject *) PySequence_Repeat(PyObject *o, int count); /* Return the result of repeating sequence object o count times, or NULL on failure. This is the equivalent of the Python expression: o1*count. */ PyAPI_FUNC(PyObject *) PySequence_GetItem(PyObject *o, int i); /* Return the ith element of o, or NULL on failure. This is the equivalent of the Python expression: o[i]. */ PyAPI_FUNC(PyObject *) PySequence_GetSlice(PyObject *o, int i1, int i2); /* Return the slice of sequence object o between i1 and i2, or NULL on failure. This is the equivalent of the Python expression: o[i1:i2]. */ PyAPI_FUNC(int) PySequence_SetItem(PyObject *o, int i, PyObject *v); /* Assign object v to the ith element of o. Returns -1 on failure. This is the equivalent of the Python statement: o[i]=v. */ PyAPI_FUNC(int) PySequence_DelItem(PyObject *o, int i); /* Delete the ith element of object v. Returns -1 on failure. This is the equivalent of the Python statement: del o[i]. */ PyAPI_FUNC(int) PySequence_SetSlice(PyObject *o, int i1, int i2, PyObject *v); /* Assign the sequence object, v, to the slice in sequence object, o, from i1 to i2. Returns -1 on failure. This is the equivalent of the Python statement: o[i1:i2]=v. */ PyAPI_FUNC(int) PySequence_DelSlice(PyObject *o, int i1, int i2); /* Delete the slice in sequence object, o, from i1 to i2. Returns -1 on failure. This is the equivalent of the Python statement: del o[i1:i2]. */ PyAPI_FUNC(PyObject *) PySequence_Tuple(PyObject *o); /* Returns the sequence, o, as a tuple on success, and NULL on failure. This is equivalent to the Python expression: tuple(o) */ PyAPI_FUNC(PyObject *) PySequence_List(PyObject *o); /* Returns the sequence, o, as a list on success, and NULL on failure. This is equivalent to the Python expression: list(o) */ PyAPI_FUNC(PyObject *) PySequence_Fast(PyObject *o, const char* m); /* Returns the sequence, o, as a tuple, unless it's already a tuple or list. Use PySequence_Fast_GET_ITEM to access the members of this list, and PySequence_Fast_GET_SIZE to get its length. Returns NULL on failure. If the object does not support iteration, raises a TypeError exception with m as the message text. */ #define PySequence_Fast_GET_SIZE(o) \ (PyList_Check(o) ? PyList_GET_SIZE(o) : PyTuple_GET_SIZE(o)) /* Return the size of o, assuming that o was returned by PySequence_Fast and is not NULL. */ #define PySequence_Fast_GET_ITEM(o, i)\ (PyList_Check(o) ? PyList_GET_ITEM(o, i) : PyTuple_GET_ITEM(o, i)) /* Return the ith element of o, assuming that o was returned by PySequence_Fast, and that i is within bounds. */ #define PySequence_ITEM(o, i)\ ( o->ob_type->tp_as_sequence->sq_item(o, i) ) /* Assume tp_as_sequence and sq_item exist and that i does not need to be corrected for a negative index */ PyAPI_FUNC(int) PySequence_Count(PyObject *o, PyObject *value); /* Return the number of occurrences on value on o, that is, return the number of keys for which o[key]==value. On failure, return -1. This is equivalent to the Python expression: o.count(value). */ PyAPI_FUNC(int) PySequence_Contains(PyObject *seq, PyObject *ob); /* Return -1 if error; 1 if ob in seq; 0 if ob not in seq. Use __contains__ if possible, else _PySequence_IterSearch(). */ #define PY_ITERSEARCH_COUNT 1 #define PY_ITERSEARCH_INDEX 2 #define PY_ITERSEARCH_CONTAINS 3 PyAPI_FUNC(int) _PySequence_IterSearch(PyObject *seq, PyObject *obj, int operation); /* Iterate over seq. Result depends on the operation: PY_ITERSEARCH_COUNT: return # of times obj appears in seq; -1 if error. PY_ITERSEARCH_INDEX: return 0-based index of first occurrence of obj in seq; set ValueError and return -1 if none found; also return -1 on error. PY_ITERSEARCH_CONTAINS: return 1 if obj in seq, else 0; -1 on error. */ /* For DLL-level backwards compatibility */ #undef PySequence_In PyAPI_FUNC(int) PySequence_In(PyObject *o, PyObject *value); /* For source-level backwards compatibility */ #define PySequence_In PySequence_Contains /* Determine if o contains value. If an item in o is equal to X, return 1, otherwise return 0. On error, return -1. This is equivalent to the Python expression: value in o. */ PyAPI_FUNC(int) PySequence_Index(PyObject *o, PyObject *value); /* Return the first index for which o[i]=value. On error, return -1. This is equivalent to the Python expression: o.index(value). */ /* In-place versions of some of the above Sequence functions. */ PyAPI_FUNC(PyObject *) PySequence_InPlaceConcat(PyObject *o1, PyObject *o2); /* Append o2 to o1, in-place when possible. Return the resulting object, which could be o1, or NULL on failure. This is the equivalent of the Python expression: o1 += o2. */ PyAPI_FUNC(PyObject *) PySequence_InPlaceRepeat(PyObject *o, int count); /* Repeat o1 by count, in-place when possible. Return the resulting object, which could be o1, or NULL on failure. This is the equivalent of the Python expression: o1 *= count. */ /* Mapping protocol:*/ PyAPI_FUNC(int) PyMapping_Check(PyObject *o); /* Return 1 if the object provides mapping protocol, and zero otherwise. This function always succeeds. */ PyAPI_FUNC(int) PyMapping_Size(PyObject *o); /* Returns the number of keys in object o on success, and -1 on failure. For objects that do not provide sequence protocol, this is equivalent to the Python expression: len(o). */ /* For DLL compatibility */ #undef PyMapping_Length PyAPI_FUNC(int) PyMapping_Length(PyObject *o); #define PyMapping_Length PyMapping_Size /* implemented as a macro: int PyMapping_DelItemString(PyObject *o, char *key); Remove the mapping for object, key, from the object *o. Returns -1 on failure. This is equivalent to the Python statement: del o[key]. */ #define PyMapping_DelItemString(O,K) PyObject_DelItemString((O),(K)) /* implemented as a macro: int PyMapping_DelItem(PyObject *o, PyObject *key); Remove the mapping for object, key, from the object *o. Returns -1 on failure. This is equivalent to the Python statement: del o[key]. */ #define PyMapping_DelItem(O,K) PyObject_DelItem((O),(K)) PyAPI_FUNC(int) PyMapping_HasKeyString(PyObject *o, char *key); /* On success, return 1 if the mapping object has the key, key, and 0 otherwise. This is equivalent to the Python expression: o.has_key(key). This function always succeeds. */ PyAPI_FUNC(int) PyMapping_HasKey(PyObject *o, PyObject *key); /* Return 1 if the mapping object has the key, key, and 0 otherwise. This is equivalent to the Python expression: o.has_key(key). This function always succeeds. */ /* Implemented as macro: PyObject *PyMapping_Keys(PyObject *o); On success, return a list of the keys in object o. On failure, return NULL. This is equivalent to the Python expression: o.keys(). */ #define PyMapping_Keys(O) PyObject_CallMethod(O,"keys",NULL) /* Implemented as macro: PyObject *PyMapping_Values(PyObject *o); On success, return a list of the values in object o. On failure, return NULL. This is equivalent to the Python expression: o.values(). */ #define PyMapping_Values(O) PyObject_CallMethod(O,"values",NULL) /* Implemented as macro: PyObject *PyMapping_Items(PyObject *o); On success, return a list of the items in object o, where each item is a tuple containing a key-value pair. On failure, return NULL. This is equivalent to the Python expression: o.items(). */ #define PyMapping_Items(O) PyObject_CallMethod(O,"items",NULL) PyAPI_FUNC(PyObject *) PyMapping_GetItemString(PyObject *o, char *key); /* Return element of o corresponding to the object, key, or NULL on failure. This is the equivalent of the Python expression: o[key]. */ PyAPI_FUNC(int) PyMapping_SetItemString(PyObject *o, char *key, PyObject *value); /* Map the object, key, to the value, v. Returns -1 on failure. This is the equivalent of the Python statement: o[key]=v. */ PyAPI_FUNC(int) PyObject_IsInstance(PyObject *object, PyObject *typeorclass); /* isinstance(object, typeorclass) */ PyAPI_FUNC(int) PyObject_IsSubclass(PyObject *object, PyObject *typeorclass); /* issubclass(object, typeorclass) */ #ifdef __cplusplus } #endif #endif /* Py_ABSTRACTOBJECT_H */ Python-2.3.7/Include/traceback.h0000644001241000117560000000073107525661026015735 0ustar loewishpifb6 #ifndef Py_TRACEBACK_H #define Py_TRACEBACK_H #ifdef __cplusplus extern "C" { #endif /* Traceback interface */ struct _frame; PyAPI_FUNC(int) PyTraceBack_Here(struct _frame *); PyAPI_FUNC(int) PyTraceBack_Print(PyObject *, PyObject *); /* Reveal traceback type so we can typecheck traceback objects */ PyAPI_DATA(PyTypeObject) PyTraceBack_Type; #define PyTraceBack_Check(v) ((v)->ob_type == &PyTraceBack_Type) #ifdef __cplusplus } #endif #endif /* !Py_TRACEBACK_H */ Python-2.3.7/Include/py_curses.h0000644001241000117560000001010007677604715016033 0ustar loewishpifb6 #ifndef Py_CURSES_H #define Py_CURSES_H #ifdef __APPLE__ /* ** On Mac OS X 10.2 [n]curses.h and stdlib.h use different guards ** against multiple definition of wchar_t. */ #ifdef _BSD_WCHAR_T_DEFINED_ #define _WCHAR_T #endif #endif #ifdef __FreeBSD__ /* ** On FreeBSD, [n]curses.h and stdlib.h/wchar.h use different guards ** against multiple definition of wchar_t and wint_t. */ #ifdef _XOPEN_SOURCE_EXTENDED #ifndef __FreeBSD_version #include #endif #if __FreeBSD_version >= 500000 #ifndef __wchar_t #define __wchar_t #endif #ifndef __wint_t #define __wint_t #endif #else #ifndef _WCHAR_T #define _WCHAR_T #endif #ifndef _WINT_T #define _WINT_T #endif #endif #endif #endif #ifdef HAVE_NCURSES_H #include #else #include #ifdef HAVE_TERM_H /* for tigetstr, which is not declared in SysV curses */ #include #endif #endif #ifdef HAVE_NCURSES_H /* configure was checking , but we will use , which has all these features. */ #ifndef WINDOW_HAS_FLAGS #define WINDOW_HAS_FLAGS 1 #endif #ifndef MVWDELCH_IS_EXPRESSION #define MVWDELCH_IS_EXPRESSION 1 #endif #endif #ifdef __cplusplus extern "C" { #endif #define PyCurses_API_pointers 4 /* Type declarations */ typedef struct { PyObject_HEAD WINDOW *win; } PyCursesWindowObject; #define PyCursesWindow_Check(v) ((v)->ob_type == &PyCursesWindow_Type) #ifdef CURSES_MODULE /* This section is used when compiling _cursesmodule.c */ #else /* This section is used in modules that use the _cursesmodule API */ static void **PyCurses_API; #define PyCursesWindow_Type (*(PyTypeObject *) PyCurses_API[0]) #define PyCursesSetupTermCalled {if (! ((int (*)(void))PyCurses_API[1]) () ) return NULL;} #define PyCursesInitialised {if (! ((int (*)(void))PyCurses_API[2]) () ) return NULL;} #define PyCursesInitialisedColor {if (! ((int (*)(void))PyCurses_API[3]) () ) return NULL;} #define import_curses() \ { \ PyObject *module = PyImport_ImportModule("_curses"); \ if (module != NULL) { \ PyObject *module_dict = PyModule_GetDict(module); \ PyObject *c_api_object = PyDict_GetItemString(module_dict, "_C_API"); \ if (PyCObject_Check(c_api_object)) { \ PyCurses_API = (void **)PyCObject_AsVoidPtr(c_api_object); \ } \ } \ } #endif /* general error messages */ static char *catchall_ERR = "curses function returned ERR"; static char *catchall_NULL = "curses function returned NULL"; /* Function Prototype Macros - They are ugly but very, very useful. ;-) X - function name TYPE - parameter Type ERGSTR - format string for construction of the return value PARSESTR - format string for argument parsing */ #define NoArgNoReturnFunction(X) \ static PyObject *PyCurses_ ## X (PyObject *self) \ { \ PyCursesInitialised \ return PyCursesCheckERR(X(), # X); } #define NoArgOrFlagNoReturnFunction(X) \ static PyObject *PyCurses_ ## X (PyObject *self, PyObject *args) \ { \ int flag = 0; \ PyCursesInitialised \ switch(PyTuple_Size(args)) { \ case 0: \ return PyCursesCheckERR(X(), # X); \ case 1: \ if (!PyArg_ParseTuple(args, "i;True(1) or False(0)", &flag)) return NULL; \ if (flag) return PyCursesCheckERR(X(), # X); \ else return PyCursesCheckERR(no ## X (), # X); \ default: \ PyErr_SetString(PyExc_TypeError, # X " requires 0 or 1 arguments"); \ return NULL; } } #define NoArgReturnIntFunction(X) \ static PyObject *PyCurses_ ## X (PyObject *self) \ { \ PyCursesInitialised \ return PyInt_FromLong((long) X()); } #define NoArgReturnStringFunction(X) \ static PyObject *PyCurses_ ## X (PyObject *self) \ { \ PyCursesInitialised \ return PyString_FromString(X()); } #define NoArgTrueFalseFunction(X) \ static PyObject *PyCurses_ ## X (PyObject *self) \ { \ PyCursesInitialised \ if (X () == FALSE) { \ Py_INCREF(Py_False); \ return Py_False; \ } \ Py_INCREF(Py_True); \ return Py_True; } #define NoArgNoReturnVoidFunction(X) \ static PyObject *PyCurses_ ## X (PyObject *self) \ { \ PyCursesInitialised \ X(); \ Py_INCREF(Py_None); \ return Py_None; } #ifdef __cplusplus } #endif #endif /* !defined(Py_CURSES_H) */ Python-2.3.7/Include/import.h0000644001241000117560000000275107521243066015330 0ustar loewishpifb6 /* Module definition and import interface */ #ifndef Py_IMPORT_H #define Py_IMPORT_H #ifdef __cplusplus extern "C" { #endif PyAPI_FUNC(long) PyImport_GetMagicNumber(void); PyAPI_FUNC(PyObject *) PyImport_ExecCodeModule(char *name, PyObject *co); PyAPI_FUNC(PyObject *) PyImport_ExecCodeModuleEx( char *name, PyObject *co, char *pathname); PyAPI_FUNC(PyObject *) PyImport_GetModuleDict(void); PyAPI_FUNC(PyObject *) PyImport_AddModule(char *name); PyAPI_FUNC(PyObject *) PyImport_ImportModule(char *name); PyAPI_FUNC(PyObject *) PyImport_ImportModuleEx( char *name, PyObject *globals, PyObject *locals, PyObject *fromlist); PyAPI_FUNC(PyObject *) PyImport_Import(PyObject *name); PyAPI_FUNC(PyObject *) PyImport_ReloadModule(PyObject *m); PyAPI_FUNC(void) PyImport_Cleanup(void); PyAPI_FUNC(int) PyImport_ImportFrozenModule(char *); PyAPI_FUNC(PyObject *)_PyImport_FindExtension(char *, char *); PyAPI_FUNC(PyObject *)_PyImport_FixupExtension(char *, char *); struct _inittab { char *name; void (*initfunc)(void); }; PyAPI_DATA(struct _inittab *) PyImport_Inittab; PyAPI_FUNC(int) PyImport_AppendInittab(char *name, void (*initfunc)(void)); PyAPI_FUNC(int) PyImport_ExtendInittab(struct _inittab *newtab); struct _frozen { char *name; unsigned char *code; int size; }; /* Embedding apps may change this pointer to point to their favorite collection of frozen modules: */ PyAPI_DATA(struct _frozen *) PyImport_FrozenModules; #ifdef __cplusplus } #endif #endif /* !Py_IMPORT_H */ Python-2.3.7/Include/iterobject.h0000644001241000117560000000101607525661026016145 0ustar loewishpifb6#ifndef Py_ITEROBJECT_H #define Py_ITEROBJECT_H /* Iterators (the basic kind, over a sequence) */ #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(PyTypeObject) PySeqIter_Type; #define PySeqIter_Check(op) ((op)->ob_type == &PySeqIter_Type) PyAPI_FUNC(PyObject *) PySeqIter_New(PyObject *); PyAPI_DATA(PyTypeObject) PyCallIter_Type; #define PyCallIter_Check(op) ((op)->ob_type == &PyCallIter_Type) PyAPI_FUNC(PyObject *) PyCallIter_New(PyObject *, PyObject *); #ifdef __cplusplus } #endif #endif /* !Py_ITEROBJECT_H */ Python-2.3.7/Include/marshal.h0000644001241000117560000000122507631742750015446 0ustar loewishpifb6 /* Interface for marshal.c */ #ifndef Py_MARSHAL_H #define Py_MARSHAL_H #ifdef __cplusplus extern "C" { #endif PyAPI_FUNC(void) PyMarshal_WriteLongToFile(long, FILE *); PyAPI_FUNC(void) PyMarshal_WriteObjectToFile(PyObject *, FILE *); PyAPI_FUNC(PyObject *) PyMarshal_WriteObjectToString(PyObject *); PyAPI_FUNC(long) PyMarshal_ReadLongFromFile(FILE *); PyAPI_FUNC(int) PyMarshal_ReadShortFromFile(FILE *); PyAPI_FUNC(PyObject *) PyMarshal_ReadObjectFromFile(FILE *); PyAPI_FUNC(PyObject *) PyMarshal_ReadLastObjectFromFile(FILE *); PyAPI_FUNC(PyObject *) PyMarshal_ReadObjectFromString(char *, int); #ifdef __cplusplus } #endif #endif /* !Py_MARSHAL_H */ Python-2.3.7/Include/intrcheck.h0000644001241000117560000000042207525661026015765 0ustar loewishpifb6 #ifndef Py_INTRCHECK_H #define Py_INTRCHECK_H #ifdef __cplusplus extern "C" { #endif PyAPI_FUNC(int) PyOS_InterruptOccurred(void); PyAPI_FUNC(void) PyOS_InitInterrupts(void); PyAPI_FUNC(void) PyOS_AfterFork(void); #ifdef __cplusplus } #endif #endif /* !Py_INTRCHECK_H */ Python-2.3.7/Include/structseq.h0000644001241000117560000000153607553612013016050 0ustar loewishpifb6 /* Tuple object interface */ #ifndef Py_STRUCTSEQ_H #define Py_STRUCTSEQ_H #ifdef __cplusplus extern "C" { #endif typedef struct PyStructSequence_Field { char *name; char *doc; } PyStructSequence_Field; typedef struct PyStructSequence_Desc { char *name; char *doc; struct PyStructSequence_Field *fields; int n_in_sequence; } PyStructSequence_Desc; extern char* PyStructSequence_UnnamedField; PyAPI_FUNC(void) PyStructSequence_InitType(PyTypeObject *type, PyStructSequence_Desc *desc); PyAPI_FUNC(PyObject *) PyStructSequence_New(PyTypeObject* type); typedef struct { PyObject_VAR_HEAD PyObject *ob_item[1]; } PyStructSequence; /* Macro, *only* to be used to fill in brand new objects */ #define PyStructSequence_SET_ITEM(op, i, v) \ (((PyStructSequence *)(op))->ob_item[i] = v) #ifdef __cplusplus } #endif #endif /* !Py_STRUCTSEQ_H */ Python-2.3.7/Include/weakrefobject.h0000644001241000117560000000421210141027023016604 0ustar loewishpifb6/* Weak references objects for Python. */ #ifndef Py_WEAKREFOBJECT_H #define Py_WEAKREFOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct _PyWeakReference PyWeakReference; /* PyWeakReference is the base struct for the Python ReferenceType, ProxyType, * and CallableProxyType. */ struct _PyWeakReference { PyObject_HEAD /* The object to which this is a weak reference, or Py_None if none. * Note that this is a stealth reference: wr_object's refcount is * not incremented to reflect this pointer. */ PyObject *wr_object; /* A callable to invoke when wr_object dies, or NULL if none. */ PyObject *wr_callback; /* A cache for wr_object's hash code. As usual for hashes, this is -1 * if the hash code isn't known yet. */ long hash; /* If wr_object is weakly referenced, wr_object has a doubly-linked NULL- * terminated list of weak references to it. These are the list pointers. * If wr_object goes away, wr_object is set to Py_None, and these pointers * have no meaning then. */ PyWeakReference *wr_prev; PyWeakReference *wr_next; }; PyAPI_DATA(PyTypeObject) _PyWeakref_RefType; PyAPI_DATA(PyTypeObject) _PyWeakref_ProxyType; PyAPI_DATA(PyTypeObject) _PyWeakref_CallableProxyType; #define PyWeakref_CheckRef(op) \ ((op)->ob_type == &_PyWeakref_RefType) #define PyWeakref_CheckProxy(op) \ (((op)->ob_type == &_PyWeakref_ProxyType) || \ ((op)->ob_type == &_PyWeakref_CallableProxyType)) #define PyWeakref_Check(op) \ (PyWeakref_CheckRef(op) || PyWeakref_CheckProxy(op)) PyAPI_FUNC(PyObject *) PyWeakref_NewRef(PyObject *ob, PyObject *callback); PyAPI_FUNC(PyObject *) PyWeakref_NewProxy(PyObject *ob, PyObject *callback); PyAPI_FUNC(PyObject *) PyWeakref_GetObject(PyObject *ref); PyAPI_FUNC(long) _PyWeakref_GetWeakrefCount(PyWeakReference *head); PyAPI_FUNC(void) _PyWeakref_ClearRef(PyWeakReference *self); #define PyWeakref_GET_OBJECT(ref) (((PyWeakReference *)(ref))->wr_object) #ifdef __cplusplus } #endif #endif /* !Py_WEAKREFOBJECT_H */ Python-2.3.7/Include/sysmodule.h0000644001241000117560000000146307541112262016034 0ustar loewishpifb6 /* System module interface */ #ifndef Py_SYSMODULE_H #define Py_SYSMODULE_H #ifdef __cplusplus extern "C" { #endif PyAPI_FUNC(PyObject *) PySys_GetObject(char *); PyAPI_FUNC(int) PySys_SetObject(char *, PyObject *); PyAPI_FUNC(FILE *) PySys_GetFile(char *, FILE *); PyAPI_FUNC(void) PySys_SetArgv(int, char **); PyAPI_FUNC(void) PySys_SetPath(char *); PyAPI_FUNC(void) PySys_WriteStdout(const char *format, ...) Py_GCC_ATTRIBUTE((format(printf, 1, 2))); PyAPI_FUNC(void) PySys_WriteStderr(const char *format, ...) Py_GCC_ATTRIBUTE((format(printf, 1, 2))); PyAPI_DATA(PyObject *) _PySys_TraceFunc, *_PySys_ProfileFunc; PyAPI_DATA(int) _PySys_CheckInterval; PyAPI_FUNC(void) PySys_ResetWarnOptions(void); PyAPI_FUNC(void) PySys_AddWarnOption(char *); #ifdef __cplusplus } #endif #endif /* !Py_SYSMODULE_H */ Python-2.3.7/Include/bufferobject.h0000644001241000117560000000157507525661026016465 0ustar loewishpifb6 /* Buffer object interface */ /* Note: the object's structure is private */ #ifndef Py_BUFFEROBJECT_H #define Py_BUFFEROBJECT_H #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(PyTypeObject) PyBuffer_Type; #define PyBuffer_Check(op) ((op)->ob_type == &PyBuffer_Type) #define Py_END_OF_BUFFER (-1) PyAPI_FUNC(PyObject *) PyBuffer_FromObject(PyObject *base, int offset, int size); PyAPI_FUNC(PyObject *) PyBuffer_FromReadWriteObject(PyObject *base, int offset, int size); PyAPI_FUNC(PyObject *) PyBuffer_FromMemory(void *ptr, int size); PyAPI_FUNC(PyObject *) PyBuffer_FromReadWriteMemory(void *ptr, int size); PyAPI_FUNC(PyObject *) PyBuffer_New(int size); #ifdef __cplusplus } #endif #endif /* !Py_BUFFEROBJECT_H */ Python-2.3.7/Include/pyerrors.h0000644001241000117560000002147207700365731015707 0ustar loewishpifb6#ifndef Py_ERRORS_H #define Py_ERRORS_H #ifdef __cplusplus extern "C" { #endif /* Error handling definitions */ PyAPI_FUNC(void) PyErr_SetNone(PyObject *); PyAPI_FUNC(void) PyErr_SetObject(PyObject *, PyObject *); PyAPI_FUNC(void) PyErr_SetString(PyObject *, const char *); PyAPI_FUNC(PyObject *) PyErr_Occurred(void); PyAPI_FUNC(void) PyErr_Clear(void); PyAPI_FUNC(void) PyErr_Fetch(PyObject **, PyObject **, PyObject **); PyAPI_FUNC(void) PyErr_Restore(PyObject *, PyObject *, PyObject *); /* Error testing and normalization */ PyAPI_FUNC(int) PyErr_GivenExceptionMatches(PyObject *, PyObject *); PyAPI_FUNC(int) PyErr_ExceptionMatches(PyObject *); PyAPI_FUNC(void) PyErr_NormalizeException(PyObject**, PyObject**, PyObject**); /* Predefined exceptions */ PyAPI_DATA(PyObject *) PyExc_Exception; PyAPI_DATA(PyObject *) PyExc_StopIteration; PyAPI_DATA(PyObject *) PyExc_StandardError; PyAPI_DATA(PyObject *) PyExc_ArithmeticError; PyAPI_DATA(PyObject *) PyExc_LookupError; PyAPI_DATA(PyObject *) PyExc_AssertionError; PyAPI_DATA(PyObject *) PyExc_AttributeError; PyAPI_DATA(PyObject *) PyExc_EOFError; PyAPI_DATA(PyObject *) PyExc_FloatingPointError; PyAPI_DATA(PyObject *) PyExc_EnvironmentError; PyAPI_DATA(PyObject *) PyExc_IOError; PyAPI_DATA(PyObject *) PyExc_OSError; PyAPI_DATA(PyObject *) PyExc_ImportError; PyAPI_DATA(PyObject *) PyExc_IndexError; PyAPI_DATA(PyObject *) PyExc_KeyError; PyAPI_DATA(PyObject *) PyExc_KeyboardInterrupt; PyAPI_DATA(PyObject *) PyExc_MemoryError; PyAPI_DATA(PyObject *) PyExc_NameError; PyAPI_DATA(PyObject *) PyExc_OverflowError; PyAPI_DATA(PyObject *) PyExc_RuntimeError; PyAPI_DATA(PyObject *) PyExc_NotImplementedError; PyAPI_DATA(PyObject *) PyExc_SyntaxError; PyAPI_DATA(PyObject *) PyExc_IndentationError; PyAPI_DATA(PyObject *) PyExc_TabError; PyAPI_DATA(PyObject *) PyExc_ReferenceError; PyAPI_DATA(PyObject *) PyExc_SystemError; PyAPI_DATA(PyObject *) PyExc_SystemExit; PyAPI_DATA(PyObject *) PyExc_TypeError; PyAPI_DATA(PyObject *) PyExc_UnboundLocalError; PyAPI_DATA(PyObject *) PyExc_UnicodeError; PyAPI_DATA(PyObject *) PyExc_UnicodeEncodeError; PyAPI_DATA(PyObject *) PyExc_UnicodeDecodeError; PyAPI_DATA(PyObject *) PyExc_UnicodeTranslateError; PyAPI_DATA(PyObject *) PyExc_ValueError; PyAPI_DATA(PyObject *) PyExc_ZeroDivisionError; #ifdef MS_WINDOWS PyAPI_DATA(PyObject *) PyExc_WindowsError; #endif #ifdef __VMS PyAPI_DATA(PyObject *) PyExc_VMSError; #endif PyAPI_DATA(PyObject *) PyExc_MemoryErrorInst; /* Predefined warning categories */ PyAPI_DATA(PyObject *) PyExc_Warning; PyAPI_DATA(PyObject *) PyExc_UserWarning; PyAPI_DATA(PyObject *) PyExc_DeprecationWarning; PyAPI_DATA(PyObject *) PyExc_PendingDeprecationWarning; PyAPI_DATA(PyObject *) PyExc_SyntaxWarning; PyAPI_DATA(PyObject *) PyExc_OverflowWarning; PyAPI_DATA(PyObject *) PyExc_RuntimeWarning; PyAPI_DATA(PyObject *) PyExc_FutureWarning; /* Convenience functions */ PyAPI_FUNC(int) PyErr_BadArgument(void); PyAPI_FUNC(PyObject *) PyErr_NoMemory(void); PyAPI_FUNC(PyObject *) PyErr_SetFromErrno(PyObject *); PyAPI_FUNC(PyObject *) PyErr_SetFromErrnoWithFilenameObject( PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyErr_SetFromErrnoWithFilename(PyObject *, char *); #ifdef Py_WIN_WIDE_FILENAMES PyAPI_FUNC(PyObject *) PyErr_SetFromErrnoWithUnicodeFilename( PyObject *, Py_UNICODE *); #endif /* Py_WIN_WIDE_FILENAMES */ PyAPI_FUNC(PyObject *) PyErr_Format(PyObject *, const char *, ...) Py_GCC_ATTRIBUTE((format(printf, 2, 3))); #ifdef MS_WINDOWS PyAPI_FUNC(PyObject *) PyErr_SetFromWindowsErrWithFilenameObject( int, const char *); PyAPI_FUNC(PyObject *) PyErr_SetFromWindowsErrWithFilename( int, const char *); #ifdef Py_WIN_WIDE_FILENAMES PyAPI_FUNC(PyObject *) PyErr_SetFromWindowsErrWithUnicodeFilename( int, const Py_UNICODE *); #endif /* Py_WIN_WIDE_FILENAMES */ PyAPI_FUNC(PyObject *) PyErr_SetFromWindowsErr(int); PyAPI_FUNC(PyObject *) PyErr_SetExcFromWindowsErrWithFilenameObject( PyObject *,int, PyObject *); PyAPI_FUNC(PyObject *) PyErr_SetExcFromWindowsErrWithFilename( PyObject *,int, const char *); #ifdef Py_WIN_WIDE_FILENAMES PyAPI_FUNC(PyObject *) PyErr_SetExcFromWindowsErrWithUnicodeFilename( PyObject *,int, const Py_UNICODE *); #endif /* Py_WIN_WIDE_FILENAMES */ PyAPI_FUNC(PyObject *) PyErr_SetExcFromWindowsErr(PyObject *, int); #endif /* MS_WINDOWS */ /* Export the old function so that the existing API remains available: */ PyAPI_FUNC(void) PyErr_BadInternalCall(void); PyAPI_FUNC(void) _PyErr_BadInternalCall(char *filename, int lineno); /* Mask the old API with a call to the new API for code compiled under Python 2.0: */ #define PyErr_BadInternalCall() _PyErr_BadInternalCall(__FILE__, __LINE__) /* Function to create a new exception */ PyAPI_FUNC(PyObject *) PyErr_NewException(char *name, PyObject *base, PyObject *dict); PyAPI_FUNC(void) PyErr_WriteUnraisable(PyObject *); /* Issue a warning or exception */ PyAPI_FUNC(int) PyErr_Warn(PyObject *, char *); PyAPI_FUNC(int) PyErr_WarnExplicit(PyObject *, const char *, const char *, int, const char *, PyObject *); /* In sigcheck.c or signalmodule.c */ PyAPI_FUNC(int) PyErr_CheckSignals(void); PyAPI_FUNC(void) PyErr_SetInterrupt(void); /* Support for adding program text to SyntaxErrors */ PyAPI_FUNC(void) PyErr_SyntaxLocation(const char *, int); PyAPI_FUNC(PyObject *) PyErr_ProgramText(const char *, int); #ifdef Py_USING_UNICODE /* The following functions are used to create and modify unicode exceptions from C */ /* create a UnicodeDecodeError object */ PyAPI_FUNC(PyObject *) PyUnicodeDecodeError_Create( const char *, const char *, int, int, int, const char *); /* create a UnicodeEncodeError object */ PyAPI_FUNC(PyObject *) PyUnicodeEncodeError_Create( const char *, const Py_UNICODE *, int, int, int, const char *); /* create a UnicodeTranslateError object */ PyAPI_FUNC(PyObject *) PyUnicodeTranslateError_Create( const Py_UNICODE *, int, int, int, const char *); /* get the encoding attribute */ PyAPI_FUNC(PyObject *) PyUnicodeEncodeError_GetEncoding(PyObject *); PyAPI_FUNC(PyObject *) PyUnicodeDecodeError_GetEncoding(PyObject *); /* get the object attribute */ PyAPI_FUNC(PyObject *) PyUnicodeEncodeError_GetObject(PyObject *); PyAPI_FUNC(PyObject *) PyUnicodeDecodeError_GetObject(PyObject *); PyAPI_FUNC(PyObject *) PyUnicodeTranslateError_GetObject(PyObject *); /* get the value of the start attribute (the int * may not be NULL) return 0 on success, -1 on failure */ PyAPI_FUNC(int) PyUnicodeEncodeError_GetStart(PyObject *, int *); PyAPI_FUNC(int) PyUnicodeDecodeError_GetStart(PyObject *, int *); PyAPI_FUNC(int) PyUnicodeTranslateError_GetStart(PyObject *, int *); /* assign a new value to the start attribute return 0 on success, -1 on failure */ PyAPI_FUNC(int) PyUnicodeEncodeError_SetStart(PyObject *, int); PyAPI_FUNC(int) PyUnicodeDecodeError_SetStart(PyObject *, int); PyAPI_FUNC(int) PyUnicodeTranslateError_SetStart(PyObject *, int); /* get the value of the end attribute (the int *may not be NULL) return 0 on success, -1 on failure */ PyAPI_FUNC(int) PyUnicodeEncodeError_GetEnd(PyObject *, int *); PyAPI_FUNC(int) PyUnicodeDecodeError_GetEnd(PyObject *, int *); PyAPI_FUNC(int) PyUnicodeTranslateError_GetEnd(PyObject *, int *); /* assign a new value to the end attribute return 0 on success, -1 on failure */ PyAPI_FUNC(int) PyUnicodeEncodeError_SetEnd(PyObject *, int); PyAPI_FUNC(int) PyUnicodeDecodeError_SetEnd(PyObject *, int); PyAPI_FUNC(int) PyUnicodeTranslateError_SetEnd(PyObject *, int); /* get the value of the reason attribute */ PyAPI_FUNC(PyObject *) PyUnicodeEncodeError_GetReason(PyObject *); PyAPI_FUNC(PyObject *) PyUnicodeDecodeError_GetReason(PyObject *); PyAPI_FUNC(PyObject *) PyUnicodeTranslateError_GetReason(PyObject *); /* assign a new value to the reason attribute return 0 on success, -1 on failure */ PyAPI_FUNC(int) PyUnicodeEncodeError_SetReason( PyObject *, const char *); PyAPI_FUNC(int) PyUnicodeDecodeError_SetReason( PyObject *, const char *); PyAPI_FUNC(int) PyUnicodeTranslateError_SetReason( PyObject *, const char *); #endif /* These APIs aren't really part of the error implementation, but often needed to format error messages; the native C lib APIs are not available on all platforms, which is why we provide emulations for those platforms in Python/mysnprintf.c, WARNING: The return value of snprintf varies across platforms; do not rely on any particular behavior; eventually the C99 defn may be reliable. */ #if defined(MS_WIN32) && !defined(HAVE_SNPRINTF) # define HAVE_SNPRINTF # define snprintf _snprintf # define vsnprintf _vsnprintf #endif #include PyAPI_FUNC(int) PyOS_snprintf(char *str, size_t size, const char *format, ...) Py_GCC_ATTRIBUTE((format(printf, 3, 4))); PyAPI_FUNC(int) PyOS_vsnprintf(char *str, size_t size, const char *format, va_list va) Py_GCC_ATTRIBUTE((format(printf, 3, 0))); #ifdef __cplusplus } #endif #endif /* !Py_ERRORS_H */ Python-2.3.7/Include/bitset.h0000644001241000117560000000143007154035731015301 0ustar loewishpifb6 #ifndef Py_BITSET_H #define Py_BITSET_H #ifdef __cplusplus extern "C" { #endif /* Bitset interface */ #define BYTE char typedef BYTE *bitset; bitset newbitset(int nbits); void delbitset(bitset bs); #define testbit(ss, ibit) (((ss)[BIT2BYTE(ibit)] & BIT2MASK(ibit)) != 0) int addbit(bitset bs, int ibit); /* Returns 0 if already set */ int samebitset(bitset bs1, bitset bs2, int nbits); void mergebitset(bitset bs1, bitset bs2, int nbits); #define BITSPERBYTE (8*sizeof(BYTE)) #define NBYTES(nbits) (((nbits) + BITSPERBYTE - 1) / BITSPERBYTE) #define BIT2BYTE(ibit) ((ibit) / BITSPERBYTE) #define BIT2SHIFT(ibit) ((ibit) % BITSPERBYTE) #define BIT2MASK(ibit) (1 << BIT2SHIFT(ibit)) #define BYTE2BIT(ibyte) ((ibyte) * BITSPERBYTE) #ifdef __cplusplus } #endif #endif /* !Py_BITSET_H */ Python-2.3.7/Include/cellobject.h0000644001241000117560000000114007525661026016117 0ustar loewishpifb6/* Cell object interface */ #ifndef Py_CELLOBJECT_H #define Py_CELLOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { PyObject_HEAD PyObject *ob_ref; } PyCellObject; PyAPI_DATA(PyTypeObject) PyCell_Type; #define PyCell_Check(op) ((op)->ob_type == &PyCell_Type) PyAPI_FUNC(PyObject *) PyCell_New(PyObject *); PyAPI_FUNC(PyObject *) PyCell_Get(PyObject *); PyAPI_FUNC(int) PyCell_Set(PyObject *, PyObject *); #define PyCell_GET(op) (((PyCellObject *)(op))->ob_ref) #define PyCell_SET(op, v) (((PyCellObject *)(op))->ob_ref = v) #ifdef __cplusplus } #endif #endif /* !Py_TUPLEOBJECT_H */ Python-2.3.7/Include/methodobject.h0000644001241000117560000000453107616540556016474 0ustar loewishpifb6 /* Method object interface */ #ifndef Py_METHODOBJECT_H #define Py_METHODOBJECT_H #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(PyTypeObject) PyCFunction_Type; #define PyCFunction_Check(op) ((op)->ob_type == &PyCFunction_Type) typedef PyObject *(*PyCFunction)(PyObject *, PyObject *); typedef PyObject *(*PyCFunctionWithKeywords)(PyObject *, PyObject *, PyObject *); typedef PyObject *(*PyNoArgsFunction)(PyObject *); PyAPI_FUNC(PyCFunction) PyCFunction_GetFunction(PyObject *); PyAPI_FUNC(PyObject *) PyCFunction_GetSelf(PyObject *); PyAPI_FUNC(int) PyCFunction_GetFlags(PyObject *); /* Macros for direct access to these values. Type checks are *not* done, so use with care. */ #define PyCFunction_GET_FUNCTION(func) \ (((PyCFunctionObject *)func) -> m_ml -> ml_meth) #define PyCFunction_GET_SELF(func) \ (((PyCFunctionObject *)func) -> m_self) #define PyCFunction_GET_FLAGS(func) \ (((PyCFunctionObject *)func) -> m_ml -> ml_flags) PyAPI_FUNC(PyObject *) PyCFunction_Call(PyObject *, PyObject *, PyObject *); struct PyMethodDef { char *ml_name; PyCFunction ml_meth; int ml_flags; char *ml_doc; }; typedef struct PyMethodDef PyMethodDef; PyAPI_FUNC(PyObject *) Py_FindMethod(PyMethodDef[], PyObject *, char *); #define PyCFunction_New(ML, SELF) PyCFunction_NewEx((ML), (SELF), NULL) PyAPI_FUNC(PyObject *) PyCFunction_NewEx(PyMethodDef *, PyObject *, PyObject *); /* Flag passed to newmethodobject */ #define METH_OLDARGS 0x0000 #define METH_VARARGS 0x0001 #define METH_KEYWORDS 0x0002 /* METH_NOARGS and METH_O must not be combined with the flags above. */ #define METH_NOARGS 0x0004 #define METH_O 0x0008 /* METH_CLASS and METH_STATIC are a little different; these control the construction of methods for a class. These cannot be used for functions in modules. */ #define METH_CLASS 0x0010 #define METH_STATIC 0x0020 typedef struct PyMethodChain { PyMethodDef *methods; /* Methods of this type */ struct PyMethodChain *link; /* NULL or base type */ } PyMethodChain; PyAPI_FUNC(PyObject *) Py_FindMethodInChain(PyMethodChain *, PyObject *, char *); typedef struct { PyObject_HEAD PyMethodDef *m_ml; PyObject *m_self; PyObject *m_module; } PyCFunctionObject; #ifdef __cplusplus } #endif #endif /* !Py_METHODOBJECT_H */ Python-2.3.7/Include/longintrepr.h0000644001241000117560000000366007525661026016365 0ustar loewishpifb6#ifndef Py_LONGINTREPR_H #define Py_LONGINTREPR_H #ifdef __cplusplus extern "C" { #endif /* This is published for the benefit of "friend" marshal.c only. */ /* Parameters of the long integer representation. These shouldn't have to be changed as C should guarantee that a short contains at least 16 bits, but it's made changeable anyway. Note: 'digit' should be able to hold 2*MASK+1, and 'twodigits' should be able to hold the intermediate results in 'mul' (at most MASK << SHIFT). Also, x_sub assumes that 'digit' is an unsigned type, and overflow is handled by taking the result mod 2**N for some N > SHIFT. And, at some places it is assumed that MASK fits in an int, as well. */ typedef unsigned short digit; typedef unsigned int wdigit; /* digit widened to parameter size */ #define BASE_TWODIGITS_TYPE long typedef unsigned BASE_TWODIGITS_TYPE twodigits; typedef BASE_TWODIGITS_TYPE stwodigits; /* signed variant of twodigits */ #define SHIFT 15 #define BASE ((digit)1 << SHIFT) #define MASK ((int)(BASE - 1)) /* Long integer representation. The absolute value of a number is equal to SUM(for i=0 through abs(ob_size)-1) ob_digit[i] * 2**(SHIFT*i) Negative numbers are represented with ob_size < 0; zero is represented by ob_size == 0. In a normalized number, ob_digit[abs(ob_size)-1] (the most significant digit) is never zero. Also, in all cases, for all valid i, 0 <= ob_digit[i] <= MASK. The allocation function takes care of allocating extra memory so that ob_digit[0] ... ob_digit[abs(ob_size)-1] are actually available. CAUTION: Generic code manipulating subtypes of PyVarObject has to aware that longs abuse ob_size's sign bit. */ struct _longobject { PyObject_VAR_HEAD digit ob_digit[1]; }; PyAPI_FUNC(PyLongObject *) _PyLong_New(int); /* Return a copy of src. */ PyAPI_FUNC(PyObject *) _PyLong_Copy(PyLongObject *src); #ifdef __cplusplus } #endif #endif /* !Py_LONGINTREPR_H */ Python-2.3.7/Include/grammar.h0000644001241000117560000000374507154035731015450 0ustar loewishpifb6 /* Grammar interface */ #ifndef Py_GRAMMAR_H #define Py_GRAMMAR_H #ifdef __cplusplus extern "C" { #endif #include "bitset.h" /* Sigh... */ /* A label of an arc */ typedef struct { int lb_type; char *lb_str; } label; #define EMPTY 0 /* Label number 0 is by definition the empty label */ /* A list of labels */ typedef struct { int ll_nlabels; label *ll_label; } labellist; /* An arc from one state to another */ typedef struct { short a_lbl; /* Label of this arc */ short a_arrow; /* State where this arc goes to */ } arc; /* A state in a DFA */ typedef struct { int s_narcs; arc *s_arc; /* Array of arcs */ /* Optional accelerators */ int s_lower; /* Lowest label index */ int s_upper; /* Highest label index */ int *s_accel; /* Accelerator */ int s_accept; /* Nonzero for accepting state */ } state; /* A DFA */ typedef struct { int d_type; /* Non-terminal this represents */ char *d_name; /* For printing */ int d_initial; /* Initial state */ int d_nstates; state *d_state; /* Array of states */ bitset d_first; } dfa; /* A grammar */ typedef struct { int g_ndfas; dfa *g_dfa; /* Array of DFAs */ labellist g_ll; int g_start; /* Start symbol of the grammar */ int g_accel; /* Set if accelerators present */ } grammar; /* FUNCTIONS */ grammar *newgrammar(int start); dfa *adddfa(grammar *g, int type, char *name); int addstate(dfa *d); void addarc(dfa *d, int from, int to, int lbl); dfa *PyGrammar_FindDFA(grammar *g, int type); int addlabel(labellist *ll, int type, char *str); int findlabel(labellist *ll, int type, char *str); char *PyGrammar_LabelRepr(label *lb); void translatelabels(grammar *g); void addfirstsets(grammar *g); void PyGrammar_AddAccelerators(grammar *g); void PyGrammar_RemoveAccelerators(grammar *); void printgrammar(grammar *g, FILE *fp); void printnonterminals(grammar *g, FILE *fp); #ifdef __cplusplus } #endif #endif /* !Py_GRAMMAR_H */ Python-2.3.7/Include/token.h0000644001241000117560000000322207525661026015134 0ustar loewishpifb6 /* Token types */ #ifndef Py_TOKEN_H #define Py_TOKEN_H #ifdef __cplusplus extern "C" { #endif #define ENDMARKER 0 #define NAME 1 #define NUMBER 2 #define STRING 3 #define NEWLINE 4 #define INDENT 5 #define DEDENT 6 #define LPAR 7 #define RPAR 8 #define LSQB 9 #define RSQB 10 #define COLON 11 #define COMMA 12 #define SEMI 13 #define PLUS 14 #define MINUS 15 #define STAR 16 #define SLASH 17 #define VBAR 18 #define AMPER 19 #define LESS 20 #define GREATER 21 #define EQUAL 22 #define DOT 23 #define PERCENT 24 #define BACKQUOTE 25 #define LBRACE 26 #define RBRACE 27 #define EQEQUAL 28 #define NOTEQUAL 29 #define LESSEQUAL 30 #define GREATEREQUAL 31 #define TILDE 32 #define CIRCUMFLEX 33 #define LEFTSHIFT 34 #define RIGHTSHIFT 35 #define DOUBLESTAR 36 #define PLUSEQUAL 37 #define MINEQUAL 38 #define STAREQUAL 39 #define SLASHEQUAL 40 #define PERCENTEQUAL 41 #define AMPEREQUAL 42 #define VBAREQUAL 43 #define CIRCUMFLEXEQUAL 44 #define LEFTSHIFTEQUAL 45 #define RIGHTSHIFTEQUAL 46 #define DOUBLESTAREQUAL 47 #define DOUBLESLASH 48 #define DOUBLESLASHEQUAL 49 /* Don't forget to update the table _PyParser_TokenNames in tokenizer.c! */ #define OP 50 #define ERRORTOKEN 51 #define N_TOKENS 52 /* Special definitions for cooperation with parser */ #define NT_OFFSET 256 #define ISTERMINAL(x) ((x) < NT_OFFSET) #define ISNONTERMINAL(x) ((x) >= NT_OFFSET) #define ISEOF(x) ((x) == ENDMARKER) PyAPI_DATA(char *) _PyParser_TokenNames[]; /* Token names */ PyAPI_FUNC(int) PyToken_OneChar(int); PyAPI_FUNC(int) PyToken_TwoChars(int, int); PyAPI_FUNC(int) PyToken_ThreeChars(int, int, int); #ifdef __cplusplus } #endif #endif /* !Py_TOKEN_H */ Python-2.3.7/Include/fileobject.h0000644001241000117560000000462707725706074016141 0ustar loewishpifb6 /* File object interface */ #ifndef Py_FILEOBJECT_H #define Py_FILEOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { PyObject_HEAD FILE *f_fp; PyObject *f_name; PyObject *f_mode; int (*f_close)(FILE *); int f_softspace; /* Flag used by 'print' command */ int f_binary; /* Flag which indicates whether the file is open in binary (1) or text (0) mode */ char* f_buf; /* Allocated readahead buffer */ char* f_bufend; /* Points after last occupied position */ char* f_bufptr; /* Current buffer position */ char *f_setbuf; /* Buffer for setbuf(3) and setvbuf(3) */ #ifdef WITH_UNIVERSAL_NEWLINES int f_univ_newline; /* Handle any newline convention */ int f_newlinetypes; /* Types of newlines seen */ int f_skipnextlf; /* Skip next \n */ #endif PyObject *f_encoding; } PyFileObject; PyAPI_DATA(PyTypeObject) PyFile_Type; #define PyFile_Check(op) PyObject_TypeCheck(op, &PyFile_Type) #define PyFile_CheckExact(op) ((op)->ob_type == &PyFile_Type) PyAPI_FUNC(PyObject *) PyFile_FromString(char *, char *); PyAPI_FUNC(void) PyFile_SetBufSize(PyObject *, int); PyAPI_FUNC(int) PyFile_SetEncoding(PyObject *, const char *); PyAPI_FUNC(PyObject *) PyFile_FromFile(FILE *, char *, char *, int (*)(FILE *)); PyAPI_FUNC(FILE *) PyFile_AsFile(PyObject *); PyAPI_FUNC(PyObject *) PyFile_Name(PyObject *); PyAPI_FUNC(PyObject *) PyFile_GetLine(PyObject *, int); PyAPI_FUNC(int) PyFile_WriteObject(PyObject *, PyObject *, int); PyAPI_FUNC(int) PyFile_SoftSpace(PyObject *, int); PyAPI_FUNC(int) PyFile_WriteString(const char *, PyObject *); PyAPI_FUNC(int) PyObject_AsFileDescriptor(PyObject *); /* The default encoding used by the platform file system APIs If non-NULL, this is different than the default encoding for strings */ PyAPI_DATA(const char *) Py_FileSystemDefaultEncoding; #ifdef WITH_UNIVERSAL_NEWLINES /* Routines to replace fread() and fgets() which accept any of \r, \n or \r\n as line terminators. */ #define PY_STDIOTEXTMODE "b" char *Py_UniversalNewlineFgets(char *, int, FILE*, PyObject *); size_t Py_UniversalNewlineFread(char *, size_t, FILE *, PyObject *); #else #define PY_STDIOTEXTMODE "" #define Py_UniversalNewlineFgets(buf, len, fp, obj) fgets((buf), (len), (fp)) #define Py_UniversalNewlineFread(buf, len, fp, obj) \ fread((buf), 1, (len), (fp)) #endif /* WITH_UNIVERSAL_NEWLINES */ #ifdef __cplusplus } #endif #endif /* !Py_FILEOBJECT_H */ Python-2.3.7/Include/pygetopt.h0000644001241000117560000000046207525661026015672 0ustar loewishpifb6 #ifndef Py_PYGETOPT_H #define Py_PYGETOPT_H #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(int) _PyOS_opterr; PyAPI_DATA(int) _PyOS_optind; PyAPI_DATA(char *) _PyOS_optarg; PyAPI_FUNC(int) _PyOS_GetOpt(int argc, char **argv, char *optstring); #ifdef __cplusplus } #endif #endif /* !Py_PYGETOPT_H */ Python-2.3.7/Include/graminit.h0000644001241000117560000000272007523262220015617 0ustar loewishpifb6#define single_input 256 #define file_input 257 #define eval_input 258 #define funcdef 259 #define parameters 260 #define varargslist 261 #define fpdef 262 #define fplist 263 #define stmt 264 #define simple_stmt 265 #define small_stmt 266 #define expr_stmt 267 #define augassign 268 #define print_stmt 269 #define del_stmt 270 #define pass_stmt 271 #define flow_stmt 272 #define break_stmt 273 #define continue_stmt 274 #define return_stmt 275 #define yield_stmt 276 #define raise_stmt 277 #define import_stmt 278 #define import_as_name 279 #define dotted_as_name 280 #define dotted_name 281 #define global_stmt 282 #define exec_stmt 283 #define assert_stmt 284 #define compound_stmt 285 #define if_stmt 286 #define while_stmt 287 #define for_stmt 288 #define try_stmt 289 #define except_clause 290 #define suite 291 #define test 292 #define and_test 293 #define not_test 294 #define comparison 295 #define comp_op 296 #define expr 297 #define xor_expr 298 #define and_expr 299 #define shift_expr 300 #define arith_expr 301 #define term 302 #define factor 303 #define power 304 #define atom 305 #define listmaker 306 #define lambdef 307 #define trailer 308 #define subscriptlist 309 #define subscript 310 #define sliceop 311 #define exprlist 312 #define testlist 313 #define testlist_safe 314 #define dictmaker 315 #define classdef 316 #define arglist 317 #define argument 318 #define list_iter 319 #define list_for 320 #define list_if 321 #define testlist1 322 #define encoding_decl 323 Python-2.3.7/Include/modsupport.h0000644001241000117560000000665007530263166016237 0ustar loewishpifb6 #ifndef Py_MODSUPPORT_H #define Py_MODSUPPORT_H #ifdef __cplusplus extern "C" { #endif /* Module support interface */ #include PyAPI_FUNC(int) PyArg_Parse(PyObject *, char *, ...); PyAPI_FUNC(int) PyArg_ParseTuple(PyObject *, char *, ...); PyAPI_FUNC(int) PyArg_ParseTupleAndKeywords(PyObject *, PyObject *, char *, char **, ...); PyAPI_FUNC(int) PyArg_UnpackTuple(PyObject *, char *, int, int, ...); PyAPI_FUNC(PyObject *) Py_BuildValue(char *, ...); PyAPI_FUNC(int) PyArg_VaParse(PyObject *, char *, va_list); PyAPI_FUNC(PyObject *) Py_VaBuildValue(char *, va_list); PyAPI_FUNC(int) PyModule_AddObject(PyObject *, char *, PyObject *); PyAPI_FUNC(int) PyModule_AddIntConstant(PyObject *, char *, long); PyAPI_FUNC(int) PyModule_AddStringConstant(PyObject *, char *, char *); #define PYTHON_API_VERSION 1012 #define PYTHON_API_STRING "1012" /* The API version is maintained (independently from the Python version) so we can detect mismatches between the interpreter and dynamically loaded modules. These are diagnosed by an error message but the module is still loaded (because the mismatch can only be tested after loading the module). The error message is intended to explain the core dump a few seconds later. The symbol PYTHON_API_STRING defines the same value as a string literal. *** PLEASE MAKE SURE THE DEFINITIONS MATCH. *** Please add a line or two to the top of this log for each API version change: 19-Aug-2002 GvR 1012 Changes to string object struct for interning changes, saving 3 bytes. 17-Jul-2001 GvR 1011 Descr-branch, just to be on the safe side 25-Jan-2001 FLD 1010 Parameters added to PyCode_New() and PyFrame_New(); Python 2.1a2 14-Mar-2000 GvR 1009 Unicode API added 3-Jan-1999 GvR 1007 Decided to change back! (Don't reuse 1008!) 3-Dec-1998 GvR 1008 Python 1.5.2b1 18-Jan-1997 GvR 1007 string interning and other speedups 11-Oct-1996 GvR renamed Py_Ellipses to Py_Ellipsis :-( 30-Jul-1996 GvR Slice and ellipses syntax added 23-Jul-1996 GvR For 1.4 -- better safe than sorry this time :-) 7-Nov-1995 GvR Keyword arguments (should've been done at 1.3 :-( ) 10-Jan-1995 GvR Renamed globals to new naming scheme 9-Jan-1995 GvR Initial version (incompatible with older API) */ #ifdef MS_WINDOWS /* Special defines for Windows versions used to live here. Things have changed, and the "Version" is now in a global string variable. Reason for this is that this for easier branding of a "custom DLL" without actually needing a recompile. */ #endif /* MS_WINDOWS */ #ifdef Py_TRACE_REFS /* When we are tracing reference counts, rename Py_InitModule4 so modules compiled with incompatible settings will generate a link-time error. */ #define Py_InitModule4 Py_InitModule4TraceRefs #endif PyAPI_FUNC(PyObject *) Py_InitModule4(char *name, PyMethodDef *methods, char *doc, PyObject *self, int apiver); #define Py_InitModule(name, methods) \ Py_InitModule4(name, methods, (char *)NULL, (PyObject *)NULL, \ PYTHON_API_VERSION) #define Py_InitModule3(name, methods, doc) \ Py_InitModule4(name, methods, doc, (PyObject *)NULL, \ PYTHON_API_VERSION) PyAPI_DATA(char *) _Py_PackageContext; #ifdef __cplusplus } #endif #endif /* !Py_MODSUPPORT_H */ Python-2.3.7/Include/pyfpe.h0000644001241000117560000002045706422767051015150 0ustar loewishpifb6#ifndef Py_PYFPE_H #define Py_PYFPE_H #ifdef __cplusplus extern "C" { #endif /* --------------------------------------------------------------------- / Copyright (c) 1996. \ | The Regents of the University of California. | | All rights reserved. | | | | Permission to use, copy, modify, and distribute this software for | | any purpose without fee is hereby granted, provided that this en- | | tire notice is included in all copies of any software which is or | | includes a copy or modification of this software and in all | | copies of the supporting documentation for such software. | | | | This work was produced at the University of California, Lawrence | | Livermore National Laboratory under contract no. W-7405-ENG-48 | | between the U.S. Department of Energy and The Regents of the | | University of California for the operation of UC LLNL. | | | | DISCLAIMER | | | | This software was prepared as an account of work sponsored by an | | agency of the United States Government. Neither the United States | | Government nor the University of California nor any of their em- | | ployees, makes any warranty, express or implied, or assumes any | | liability or responsibility for the accuracy, completeness, or | | usefulness of any information, apparatus, product, or process | | disclosed, or represents that its use would not infringe | | privately-owned rights. Reference herein to any specific commer- | | cial products, process, or service by trade name, trademark, | | manufacturer, or otherwise, does not necessarily constitute or | | imply its endorsement, recommendation, or favoring by the United | | States Government or the University of California. The views and | | opinions of authors expressed herein do not necessarily state or | | reflect those of the United States Government or the University | | of California, and shall not be used for advertising or product | \ endorsement purposes. / --------------------------------------------------------------------- */ /* * Define macros for handling SIGFPE. * Lee Busby, LLNL, November, 1996 * busby1@llnl.gov * ********************************************* * Overview of the system for handling SIGFPE: * * This file (Include/pyfpe.h) defines a couple of "wrapper" macros for * insertion into your Python C code of choice. Their proper use is * discussed below. The file Python/pyfpe.c defines a pair of global * variables PyFPE_jbuf and PyFPE_counter which are used by the signal * handler for SIGFPE to decide if a particular exception was protected * by the macros. The signal handler itself, and code for enabling the * generation of SIGFPE in the first place, is in a (new) Python module * named fpectl. This module is standard in every respect. It can be loaded * either statically or dynamically as you choose, and like any other * Python module, has no effect until you import it. * * In the general case, there are three steps toward handling SIGFPE in any * Python code: * * 1) Add the *_PROTECT macros to your C code as required to protect * dangerous floating point sections. * * 2) Turn on the inclusion of the code by adding the ``--with-fpectl'' * flag at the time you run configure. If the fpectl or other modules * which use the *_PROTECT macros are to be dynamically loaded, be * sure they are compiled with WANT_SIGFPE_HANDLER defined. * * 3) When python is built and running, import fpectl, and execute * fpectl.turnon_sigfpe(). This sets up the signal handler and enables * generation of SIGFPE whenever an exception occurs. From this point * on, any properly trapped SIGFPE should result in the Python * FloatingPointError exception. * * Step 1 has been done already for the Python kernel code, and should be * done soon for the NumPy array package. Step 2 is usually done once at * python install time. Python's behavior with respect to SIGFPE is not * changed unless you also do step 3. Thus you can control this new * facility at compile time, or run time, or both. * ******************************** * Using the macros in your code: * * static PyObject *foobar(PyObject *self,PyObject *args) * { * .... * PyFPE_START_PROTECT("Error in foobar", return 0) * result = dangerous_op(somearg1, somearg2, ...); * PyFPE_END_PROTECT(result) * .... * } * * If a floating point error occurs in dangerous_op, foobar returns 0 (NULL), * after setting the associated value of the FloatingPointError exception to * "Error in foobar". ``Dangerous_op'' can be a single operation, or a block * of code, function calls, or any combination, so long as no alternate * return is possible before the PyFPE_END_PROTECT macro is reached. * * The macros can only be used in a function context where an error return * can be recognized as signaling a Python exception. (Generally, most * functions that return a PyObject * will qualify.) * * Guido's original design suggestion for PyFPE_START_PROTECT and * PyFPE_END_PROTECT had them open and close a local block, with a locally * defined jmp_buf and jmp_buf pointer. This would allow recursive nesting * of the macros. The Ansi C standard makes it clear that such local * variables need to be declared with the "volatile" type qualifier to keep * setjmp from corrupting their values. Some current implementations seem * to be more restrictive. For example, the HPUX man page for setjmp says * * Upon the return from a setjmp() call caused by a longjmp(), the * values of any non-static local variables belonging to the routine * from which setjmp() was called are undefined. Code which depends on * such values is not guaranteed to be portable. * * I therefore decided on a more limited form of nesting, using a counter * variable (PyFPE_counter) to keep track of any recursion. If an exception * occurs in an ``inner'' pair of macros, the return will apparently * come from the outermost level. * */ #ifdef WANT_SIGFPE_HANDLER #include #include #include extern jmp_buf PyFPE_jbuf; extern int PyFPE_counter; extern double PyFPE_dummy(void *); #define PyFPE_START_PROTECT(err_string, leave_stmt) \ if (!PyFPE_counter++ && setjmp(PyFPE_jbuf)) { \ PyErr_SetString(PyExc_FloatingPointError, err_string); \ PyFPE_counter = 0; \ leave_stmt; \ } /* * This (following) is a heck of a way to decrement a counter. However, * unless the macro argument is provided, code optimizers will sometimes move * this statement so that it gets executed *before* the unsafe expression * which we're trying to protect. That pretty well messes things up, * of course. * * If the expression(s) you're trying to protect don't happen to return a * value, you will need to manufacture a dummy result just to preserve the * correct ordering of statements. Note that the macro passes the address * of its argument (so you need to give it something which is addressable). * If your expression returns multiple results, pass the last such result * to PyFPE_END_PROTECT. * * Note that PyFPE_dummy returns a double, which is cast to int. * This seeming insanity is to tickle the Floating Point Unit (FPU). * If an exception has occurred in a preceding floating point operation, * some architectures (notably Intel 80x86) will not deliver the interrupt * until the *next* floating point operation. This is painful if you've * already decremented PyFPE_counter. */ #define PyFPE_END_PROTECT(v) PyFPE_counter -= (int)PyFPE_dummy(&(v)); #else #define PyFPE_START_PROTECT(err_string, leave_stmt) #define PyFPE_END_PROTECT(v) #endif #ifdef __cplusplus } #endif #endif /* !Py_PYFPE_H */ Python-2.3.7/Include/pymactoolbox.h0000644001241000117560000001716307664755456016564 0ustar loewishpifb6/* ** pymactoolbox.h - globals defined in mactoolboxglue.c */ #ifndef Py_PYMACTOOLBOX_H #define Py_PYMACTOOLBOX_H #ifdef __cplusplus extern "C" { #endif #ifdef WITHOUT_FRAMEWORKS #include #include #include #include #include #include #include #include #include #include #include #include #include #include #else #include #include #endif /* ** Helper routines for error codes and such. */ char *PyMac_getscript(void); /* Get the default encoding for our 8bit character set */ char *PyMac_StrError(int); /* strerror with mac errors */ PyObject *PyErr_Mac(PyObject *, int); /* Exception with a mac error */ PyObject *PyMac_Error(OSErr); /* Uses PyMac_GetOSErrException */ extern OSErr PyMac_GetFullPathname(FSSpec *, char *, int); /* convert fsspec->path */ #ifdef WITH_NEXT_FRAMEWORK extern char *PyMac_GetAppletScriptFile(void); /* Return applet script file or NULL */ #endif /* ** These conversion routines are defined in mactoolboxglue.c itself. */ int PyMac_GetOSType(PyObject *, OSType *); /* argument parser for OSType */ PyObject *PyMac_BuildOSType(OSType); /* Convert OSType to PyObject */ PyObject *PyMac_BuildNumVersion(NumVersion);/* Convert NumVersion to PyObject */ int PyMac_GetStr255(PyObject *, Str255); /* argument parser for Str255 */ PyObject *PyMac_BuildStr255(Str255); /* Convert Str255 to PyObject */ PyObject *PyMac_BuildOptStr255(Str255); /* Convert Str255 to PyObject, NULL to None */ int PyMac_GetRect(PyObject *, Rect *); /* argument parser for Rect */ PyObject *PyMac_BuildRect(Rect *); /* Convert Rect to PyObject */ int PyMac_GetPoint(PyObject *, Point *); /* argument parser for Point */ PyObject *PyMac_BuildPoint(Point); /* Convert Point to PyObject */ int PyMac_GetEventRecord(PyObject *, EventRecord *); /* argument parser for EventRecord */ PyObject *PyMac_BuildEventRecord(EventRecord *); /* Convert EventRecord to PyObject */ int PyMac_GetFixed(PyObject *, Fixed *); /* argument parser for Fixed */ PyObject *PyMac_BuildFixed(Fixed); /* Convert Fixed to PyObject */ int PyMac_Getwide(PyObject *, wide *); /* argument parser for wide */ PyObject *PyMac_Buildwide(wide *); /* Convert wide to PyObject */ /* ** The rest of the routines are implemented by extension modules. If they are ** dynamically loaded mactoolboxglue will contain a stub implementation of the ** routine, which imports the module, whereupon the module's init routine will ** communicate the routine pointer back to the stub. ** If USE_TOOLBOX_OBJECT_GLUE is not defined there is no glue code, and the ** extension modules simply declare the routine. This is the case for static ** builds (and could be the case for MacPython CFM builds, because CFM extension ** modules can reference each other without problems). */ #ifdef USE_TOOLBOX_OBJECT_GLUE /* ** These macros are used in the module init code. If we use toolbox object glue ** it sets the function pointer to point to the real function. */ #define PyMac_INIT_TOOLBOX_OBJECT_NEW(object, rtn) { \ extern PyObject *(*PyMacGluePtr_##rtn)(object); \ PyMacGluePtr_##rtn = _##rtn; \ } #define PyMac_INIT_TOOLBOX_OBJECT_CONVERT(object, rtn) { \ extern int (*PyMacGluePtr_##rtn)(PyObject *, object *); \ PyMacGluePtr_##rtn = _##rtn; \ } #else /* ** If we don't use toolbox object glue the init macros are empty. Moreover, we define ** _xxx_New to be the same as xxx_New, and the code in mactoolboxglue isn't included. */ #define PyMac_INIT_TOOLBOX_OBJECT_NEW(object, rtn) #define PyMac_INIT_TOOLBOX_OBJECT_CONVERT(object, rtn) #endif /* USE_TOOLBOX_OBJECT_GLUE */ /* macfs exports */ int PyMac_GetFSSpec(PyObject *, FSSpec *); /* argument parser for FSSpec */ PyObject *PyMac_BuildFSSpec(FSSpec *); /* Convert FSSpec to PyObject */ int PyMac_GetFSRef(PyObject *, FSRef *); /* argument parser for FSRef */ PyObject *PyMac_BuildFSRef(FSRef *); /* Convert FSRef to PyObject */ /* AE exports */ extern PyObject *AEDesc_New(AppleEvent *); /* XXXX Why passed by address?? */ extern PyObject *AEDesc_NewBorrowed(AppleEvent *); extern int AEDesc_Convert(PyObject *, AppleEvent *); /* Cm exports */ extern PyObject *CmpObj_New(Component); extern int CmpObj_Convert(PyObject *, Component *); extern PyObject *CmpInstObj_New(ComponentInstance); extern int CmpInstObj_Convert(PyObject *, ComponentInstance *); /* Ctl exports */ extern PyObject *CtlObj_New(ControlHandle); extern int CtlObj_Convert(PyObject *, ControlHandle *); /* Dlg exports */ extern PyObject *DlgObj_New(DialogPtr); extern int DlgObj_Convert(PyObject *, DialogPtr *); extern PyObject *DlgObj_WhichDialog(DialogPtr); /* Drag exports */ extern PyObject *DragObj_New(DragReference); extern int DragObj_Convert(PyObject *, DragReference *); /* List exports */ extern PyObject *ListObj_New(ListHandle); extern int ListObj_Convert(PyObject *, ListHandle *); /* Menu exports */ extern PyObject *MenuObj_New(MenuHandle); extern int MenuObj_Convert(PyObject *, MenuHandle *); /* Qd exports */ extern PyObject *GrafObj_New(GrafPtr); extern int GrafObj_Convert(PyObject *, GrafPtr *); extern PyObject *BMObj_New(BitMapPtr); extern int BMObj_Convert(PyObject *, BitMapPtr *); extern PyObject *QdRGB_New(RGBColor *); extern int QdRGB_Convert(PyObject *, RGBColor *); /* Qdoffs exports */ extern PyObject *GWorldObj_New(GWorldPtr); extern int GWorldObj_Convert(PyObject *, GWorldPtr *); /* Qt exports */ extern PyObject *TrackObj_New(Track); extern int TrackObj_Convert(PyObject *, Track *); extern PyObject *MovieObj_New(Movie); extern int MovieObj_Convert(PyObject *, Movie *); extern PyObject *MovieCtlObj_New(MovieController); extern int MovieCtlObj_Convert(PyObject *, MovieController *); extern PyObject *TimeBaseObj_New(TimeBase); extern int TimeBaseObj_Convert(PyObject *, TimeBase *); extern PyObject *UserDataObj_New(UserData); extern int UserDataObj_Convert(PyObject *, UserData *); extern PyObject *MediaObj_New(Media); extern int MediaObj_Convert(PyObject *, Media *); /* Res exports */ extern PyObject *ResObj_New(Handle); extern int ResObj_Convert(PyObject *, Handle *); extern PyObject *OptResObj_New(Handle); extern int OptResObj_Convert(PyObject *, Handle *); /* TE exports */ extern PyObject *TEObj_New(TEHandle); extern int TEObj_Convert(PyObject *, TEHandle *); /* Win exports */ extern PyObject *WinObj_New(WindowPtr); extern int WinObj_Convert(PyObject *, WindowPtr *); extern PyObject *WinObj_WhichWindow(WindowPtr); /* CF exports */ extern PyObject *CFObj_New(CFTypeRef); extern int CFObj_Convert(PyObject *, CFTypeRef *); extern PyObject *CFTypeRefObj_New(CFTypeRef); extern int CFTypeRefObj_Convert(PyObject *, CFTypeRef *); extern PyObject *CFStringRefObj_New(CFStringRef); extern int CFStringRefObj_Convert(PyObject *, CFStringRef *); extern PyObject *CFMutableStringRefObj_New(CFMutableStringRef); extern int CFMutableStringRefObj_Convert(PyObject *, CFMutableStringRef *); extern PyObject *CFArrayRefObj_New(CFArrayRef); extern int CFArrayRefObj_Convert(PyObject *, CFArrayRef *); extern PyObject *CFMutableArrayRefObj_New(CFMutableArrayRef); extern int CFMutableArrayRefObj_Convert(PyObject *, CFMutableArrayRef *); extern PyObject *CFDictionaryRefObj_New(CFDictionaryRef); extern int CFDictionaryRefObj_Convert(PyObject *, CFDictionaryRef *); extern PyObject *CFMutableDictionaryRefObj_New(CFMutableDictionaryRef); extern int CFMutableDictionaryRefObj_Convert(PyObject *, CFMutableDictionaryRef *); extern PyObject *CFURLRefObj_New(CFURLRef); extern int CFURLRefObj_Convert(PyObject *, CFURLRef *); extern int OptionalCFURLRefObj_Convert(PyObject *, CFURLRef *); #ifdef __cplusplus } #endif #endif Python-2.3.7/Include/tupleobject.h0000644001241000117560000000310107525661026016330 0ustar loewishpifb6 /* Tuple object interface */ #ifndef Py_TUPLEOBJECT_H #define Py_TUPLEOBJECT_H #ifdef __cplusplus extern "C" { #endif /* Another generally useful object type is an tuple of object pointers. This is a mutable type: the tuple items can be changed (but not their number). Out-of-range indices or non-tuple objects are ignored. *** WARNING *** PyTuple_SetItem does not increment the new item's reference count, but does decrement the reference count of the item it replaces, if not nil. It does *decrement* the reference count if it is *not* inserted in the tuple. Similarly, PyTuple_GetItem does not increment the returned item's reference count. */ typedef struct { PyObject_VAR_HEAD PyObject *ob_item[1]; } PyTupleObject; PyAPI_DATA(PyTypeObject) PyTuple_Type; #define PyTuple_Check(op) PyObject_TypeCheck(op, &PyTuple_Type) #define PyTuple_CheckExact(op) ((op)->ob_type == &PyTuple_Type) PyAPI_FUNC(PyObject *) PyTuple_New(int size); PyAPI_FUNC(int) PyTuple_Size(PyObject *); PyAPI_FUNC(PyObject *) PyTuple_GetItem(PyObject *, int); PyAPI_FUNC(int) PyTuple_SetItem(PyObject *, int, PyObject *); PyAPI_FUNC(PyObject *) PyTuple_GetSlice(PyObject *, int, int); PyAPI_FUNC(int) _PyTuple_Resize(PyObject **, int); /* Macro, trading safety for speed */ #define PyTuple_GET_ITEM(op, i) (((PyTupleObject *)(op))->ob_item[i]) #define PyTuple_GET_SIZE(op) (((PyTupleObject *)(op))->ob_size) /* Macro, *only* to be used to fill in brand new tuples */ #define PyTuple_SET_ITEM(op, i, v) (((PyTupleObject *)(op))->ob_item[i] = v) #ifdef __cplusplus } #endif #endif /* !Py_TUPLEOBJECT_H */ Python-2.3.7/Include/sliceobject.h0000644001241000117560000000211207525661026016277 0ustar loewishpifb6#ifndef Py_SLICEOBJECT_H #define Py_SLICEOBJECT_H #ifdef __cplusplus extern "C" { #endif /* The unique ellipsis object "..." */ PyAPI_DATA(PyObject) _Py_EllipsisObject; /* Don't use this directly */ #define Py_Ellipsis (&_Py_EllipsisObject) /* Slice object interface */ /* A slice object containing start, stop, and step data members (the names are from range). After much talk with Guido, it was decided to let these be any arbitrary python type. */ typedef struct { PyObject_HEAD PyObject *start, *stop, *step; } PySliceObject; PyAPI_DATA(PyTypeObject) PySlice_Type; #define PySlice_Check(op) ((op)->ob_type == &PySlice_Type) PyAPI_FUNC(PyObject *) PySlice_New(PyObject* start, PyObject* stop, PyObject* step); PyAPI_FUNC(int) PySlice_GetIndices(PySliceObject *r, int length, int *start, int *stop, int *step); PyAPI_FUNC(int) PySlice_GetIndicesEx(PySliceObject *r, int length, int *start, int *stop, int *step, int *slicelength); #ifdef __cplusplus } #endif #endif /* !Py_SLICEOBJECT_H */ Python-2.3.7/Include/cobject.h0000644001241000117560000000313707525661026015432 0ustar loewishpifb6 /* C objects to be exported from one extension module to another. C objects are used for communication between extension modules. They provide a way for an extension module to export a C interface to other extension modules, so that extension modules can use the Python import mechanism to link to one another. */ #ifndef Py_COBJECT_H #define Py_COBJECT_H #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(PyTypeObject) PyCObject_Type; #define PyCObject_Check(op) ((op)->ob_type == &PyCObject_Type) /* Create a PyCObject from a pointer to a C object and an optional destructor function. If the second argument is non-null, then it will be called with the first argument if and when the PyCObject is destroyed. */ PyAPI_FUNC(PyObject *) PyCObject_FromVoidPtr( void *cobj, void (*destruct)(void*)); /* Create a PyCObject from a pointer to a C object, a description object, and an optional destructor function. If the third argument is non-null, then it will be called with the first and second arguments if and when the PyCObject is destroyed. */ PyAPI_FUNC(PyObject *) PyCObject_FromVoidPtrAndDesc( void *cobj, void *desc, void (*destruct)(void*,void*)); /* Retrieve a pointer to a C object from a PyCObject. */ PyAPI_FUNC(void *) PyCObject_AsVoidPtr(PyObject *); /* Retrieve a pointer to a description object from a PyCObject. */ PyAPI_FUNC(void *) PyCObject_GetDesc(PyObject *); /* Import a pointer to a C object from a module using a PyCObject. */ PyAPI_FUNC(void *) PyCObject_Import(char *module_name, char *cobject_name); #ifdef __cplusplus } #endif #endif /* !Py_COBJECT_H */ Python-2.3.7/Include/frameobject.h0000644001241000117560000000502307537661400016275 0ustar loewishpifb6 /* Frame object interface */ #ifndef Py_FRAMEOBJECT_H #define Py_FRAMEOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { int b_type; /* what kind of block this is */ int b_handler; /* where to jump to find handler */ int b_level; /* value stack level to pop to */ } PyTryBlock; typedef struct _frame { PyObject_VAR_HEAD struct _frame *f_back; /* previous frame, or NULL */ PyCodeObject *f_code; /* code segment */ PyObject *f_builtins; /* builtin symbol table (PyDictObject) */ PyObject *f_globals; /* global symbol table (PyDictObject) */ PyObject *f_locals; /* local symbol table (PyDictObject) */ PyObject **f_valuestack; /* points after the last local */ /* Next free slot in f_valuestack. Frame creation sets to f_valuestack. Frame evaluation usually NULLs it, but a frame that yields sets it to the current stack top. */ PyObject **f_stacktop; PyObject *f_trace; /* Trace function */ PyObject *f_exc_type, *f_exc_value, *f_exc_traceback; PyThreadState *f_tstate; int f_lasti; /* Last instruction if called */ /* As of 2.3 f_lineno is only valid when tracing is active (i.e. when f_trace is set) -- at other times use PyCode_Addr2Line instead. */ int f_lineno; /* Current line number */ int f_restricted; /* Flag set if restricted operations in this scope */ int f_iblock; /* index in f_blockstack */ PyTryBlock f_blockstack[CO_MAXBLOCKS]; /* for try and loop blocks */ int f_nlocals; /* number of locals */ int f_ncells; int f_nfreevars; int f_stacksize; /* size of value stack */ PyObject *f_localsplus[1]; /* locals+stack, dynamically sized */ } PyFrameObject; /* Standard object interface */ PyAPI_DATA(PyTypeObject) PyFrame_Type; #define PyFrame_Check(op) ((op)->ob_type == &PyFrame_Type) PyAPI_FUNC(PyFrameObject *) PyFrame_New(PyThreadState *, PyCodeObject *, PyObject *, PyObject *); /* The rest of the interface is specific for frame objects */ /* Block management functions */ PyAPI_FUNC(void) PyFrame_BlockSetup(PyFrameObject *, int, int, int); PyAPI_FUNC(PyTryBlock *) PyFrame_BlockPop(PyFrameObject *); /* Extend the value stack */ PyAPI_FUNC(PyObject **) PyFrame_ExtendStack(PyFrameObject *, int, int); /* Conversions between "fast locals" and locals in dictionary */ PyAPI_FUNC(void) PyFrame_LocalsToFast(PyFrameObject *, int); PyAPI_FUNC(void) PyFrame_FastToLocals(PyFrameObject *); #ifdef __cplusplus } #endif #endif /* !Py_FRAMEOBJECT_H */ Python-2.3.7/Include/pythread.h0000644001241000117560000000237607650267101015640 0ustar loewishpifb6 #ifndef Py_PYTHREAD_H #define Py_PYTHREAD_H #define NO_EXIT_PROG /* don't define PyThread_exit_prog() */ /* (the result is no use of signals on SGI) */ typedef void *PyThread_type_lock; typedef void *PyThread_type_sema; #ifdef __cplusplus extern "C" { #endif PyAPI_FUNC(void) PyThread_init_thread(void); PyAPI_FUNC(long) PyThread_start_new_thread(void (*)(void *), void *); PyAPI_FUNC(void) PyThread_exit_thread(void); PyAPI_FUNC(void) PyThread__PyThread_exit_thread(void); PyAPI_FUNC(long) PyThread_get_thread_ident(void); PyAPI_FUNC(PyThread_type_lock) PyThread_allocate_lock(void); PyAPI_FUNC(void) PyThread_free_lock(PyThread_type_lock); PyAPI_FUNC(int) PyThread_acquire_lock(PyThread_type_lock, int); #define WAIT_LOCK 1 #define NOWAIT_LOCK 0 PyAPI_FUNC(void) PyThread_release_lock(PyThread_type_lock); #ifndef NO_EXIT_PROG PyAPI_FUNC(void) PyThread_exit_prog(int); PyAPI_FUNC(void) PyThread__PyThread_exit_prog(int); #endif /* Thread Local Storage (TLS) API */ PyAPI_FUNC(int) PyThread_create_key(void); PyAPI_FUNC(void) PyThread_delete_key(int); PyAPI_FUNC(int) PyThread_set_key_value(int, void *); PyAPI_FUNC(void *) PyThread_get_key_value(int); PyAPI_FUNC(void) PyThread_delete_key_value(int key); #ifdef __cplusplus } #endif #endif /* !Py_PYTHREAD_H */ Python-2.3.7/Include/listobject.h0000644001241000117560000000340107525661026016155 0ustar loewishpifb6 /* List object interface */ /* Another generally useful object type is an list of object pointers. This is a mutable type: the list items can be changed, and items can be added or removed. Out-of-range indices or non-list objects are ignored. *** WARNING *** PyList_SetItem does not increment the new item's reference count, but does decrement the reference count of the item it replaces, if not nil. It does *decrement* the reference count if it is *not* inserted in the list. Similarly, PyList_GetItem does not increment the returned item's reference count. */ #ifndef Py_LISTOBJECT_H #define Py_LISTOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { PyObject_VAR_HEAD PyObject **ob_item; } PyListObject; PyAPI_DATA(PyTypeObject) PyList_Type; #define PyList_Check(op) PyObject_TypeCheck(op, &PyList_Type) #define PyList_CheckExact(op) ((op)->ob_type == &PyList_Type) PyAPI_FUNC(PyObject *) PyList_New(int size); PyAPI_FUNC(int) PyList_Size(PyObject *); PyAPI_FUNC(PyObject *) PyList_GetItem(PyObject *, int); PyAPI_FUNC(int) PyList_SetItem(PyObject *, int, PyObject *); PyAPI_FUNC(int) PyList_Insert(PyObject *, int, PyObject *); PyAPI_FUNC(int) PyList_Append(PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyList_GetSlice(PyObject *, int, int); PyAPI_FUNC(int) PyList_SetSlice(PyObject *, int, int, PyObject *); PyAPI_FUNC(int) PyList_Sort(PyObject *); PyAPI_FUNC(int) PyList_Reverse(PyObject *); PyAPI_FUNC(PyObject *) PyList_AsTuple(PyObject *); /* Macro, trading safety for speed */ #define PyList_GET_ITEM(op, i) (((PyListObject *)(op))->ob_item[i]) #define PyList_SET_ITEM(op, i, v) (((PyListObject *)(op))->ob_item[i] = (v)) #define PyList_GET_SIZE(op) (((PyListObject *)(op))->ob_size) #ifdef __cplusplus } #endif #endif /* !Py_LISTOBJECT_H */ Python-2.3.7/Include/metagrammar.h0000644001241000117560000000037507154035731016313 0ustar loewishpifb6#ifndef Py_METAGRAMMAR_H #define Py_METAGRAMMAR_H #ifdef __cplusplus extern "C" { #endif #define MSTART 256 #define RULE 257 #define RHS 258 #define ALT 259 #define ITEM 260 #define ATOM 261 #ifdef __cplusplus } #endif #endif /* !Py_METAGRAMMAR_H */ Python-2.3.7/Include/ucnhash.h0000644001241000117560000000125207232006236015435 0ustar loewishpifb6/* Unicode name database interface */ #ifndef Py_UCNHASH_H #define Py_UCNHASH_H #ifdef __cplusplus extern "C" { #endif /* revised ucnhash CAPI interface (exported through a PyCObject) */ typedef struct { /* Size of this struct */ int size; /* Get name for a given character code. Returns non-zero if success, zero if not. Does not set Python exceptions. */ int (*getname)(Py_UCS4 code, char* buffer, int buflen); /* Get character code for a given name. Same error handling as for getname. */ int (*getcode)(const char* name, int namelen, Py_UCS4* code); } _PyUnicode_Name_CAPI; #ifdef __cplusplus } #endif #endif /* !Py_UCNHASH_H */ Python-2.3.7/Include/unicodeobject.h0000644001241000117560000011617607525667576016666 0ustar loewishpifb6#ifndef Py_UNICODEOBJECT_H #define Py_UNICODEOBJECT_H /* Unicode implementation based on original code by Fredrik Lundh, modified by Marc-Andre Lemburg (mal@lemburg.com) according to the Unicode Integration Proposal (see file Misc/unicode.txt). Copyright (c) Corporation for National Research Initiatives. Original header: -------------------------------------------------------------------- * Yet another Unicode string type for Python. This type supports the * 16-bit Basic Multilingual Plane (BMP) only. * * Written by Fredrik Lundh, January 1999. * * Copyright (c) 1999 by Secret Labs AB. * Copyright (c) 1999 by Fredrik Lundh. * * fredrik@pythonware.com * http://www.pythonware.com * * -------------------------------------------------------------------- * This Unicode String Type is * * Copyright (c) 1999 by Secret Labs AB * Copyright (c) 1999 by Fredrik Lundh * * By obtaining, using, and/or copying this software and/or its * associated documentation, you agree that you have read, understood, * and will comply with the following terms and conditions: * * Permission to use, copy, modify, and distribute this software and its * associated documentation for any purpose and without fee is hereby * granted, provided that the above copyright notice appears in all * copies, and that both that copyright notice and this permission notice * appear in supporting documentation, and that the name of Secret Labs * AB or the author not be used in advertising or publicity pertaining to * distribution of the software without specific, written prior * permission. * * SECRET LABS AB AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH REGARD TO * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND * FITNESS. IN NO EVENT SHALL SECRET LABS AB OR THE AUTHOR BE LIABLE FOR * ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. * -------------------------------------------------------------------- */ #include /* === Internal API ======================================================= */ /* --- Internal Unicode Format -------------------------------------------- */ #ifndef Py_USING_UNICODE #define PyUnicode_Check(op) 0 #define PyUnicode_CheckExact(op) 0 #else /* FIXME: MvL's new implementation assumes that Py_UNICODE_SIZE is properly set, but the default rules below doesn't set it. I'll sort this out some other day -- fredrik@pythonware.com */ #ifndef Py_UNICODE_SIZE #error Must define Py_UNICODE_SIZE #endif /* Setting Py_UNICODE_WIDE enables UCS-4 storage. Otherwise, Unicode strings are stored as UCS-2 (with limited support for UTF-16) */ #if Py_UNICODE_SIZE >= 4 #define Py_UNICODE_WIDE #endif /* Set these flags if the platform has "wchar.h", "wctype.h" and the wchar_t type is a 16-bit unsigned type */ /* #define HAVE_WCHAR_H */ /* #define HAVE_USABLE_WCHAR_T */ /* Defaults for various platforms */ #ifndef PY_UNICODE_TYPE /* Windows has a usable wchar_t type (unless we're using UCS-4) */ # if defined(MS_WIN32) && Py_UNICODE_SIZE == 2 # define HAVE_USABLE_WCHAR_T # define PY_UNICODE_TYPE wchar_t # endif # if defined(Py_UNICODE_WIDE) # define PY_UNICODE_TYPE Py_UCS4 # endif #endif /* If the compiler provides a wchar_t type we try to support it through the interface functions PyUnicode_FromWideChar() and PyUnicode_AsWideChar(). */ #ifdef HAVE_USABLE_WCHAR_T # ifndef HAVE_WCHAR_H # define HAVE_WCHAR_H # endif #endif #ifdef HAVE_WCHAR_H /* Work around a cosmetic bug in BSDI 4.x wchar.h; thanks to Thomas Wouters */ # ifdef _HAVE_BSDI # include # endif # include #endif /* * Use this typedef when you need to represent a UTF-16 surrogate pair * as single unsigned integer. */ #if SIZEOF_INT >= 4 typedef unsigned int Py_UCS4; #elif SIZEOF_LONG >= 4 typedef unsigned long Py_UCS4; #endif typedef PY_UNICODE_TYPE Py_UNICODE; /* --- UCS-2/UCS-4 Name Mangling ------------------------------------------ */ /* Unicode API names are mangled to assure that UCS-2 and UCS-4 builds produce different external names and thus cause import errors in case Python interpreters and extensions with mixed compiled in Unicode width assumptions are combined. */ #ifndef Py_UNICODE_WIDE # define PyUnicode_AsASCIIString PyUnicodeUCS2_AsASCIIString # define PyUnicode_AsCharmapString PyUnicodeUCS2_AsCharmapString # define PyUnicode_AsEncodedString PyUnicodeUCS2_AsEncodedString # define PyUnicode_AsLatin1String PyUnicodeUCS2_AsLatin1String # define PyUnicode_AsRawUnicodeEscapeString PyUnicodeUCS2_AsRawUnicodeEscapeString # define PyUnicode_AsUTF16String PyUnicodeUCS2_AsUTF16String # define PyUnicode_AsUTF8String PyUnicodeUCS2_AsUTF8String # define PyUnicode_AsUnicode PyUnicodeUCS2_AsUnicode # define PyUnicode_AsUnicodeEscapeString PyUnicodeUCS2_AsUnicodeEscapeString # define PyUnicode_AsWideChar PyUnicodeUCS2_AsWideChar # define PyUnicode_Compare PyUnicodeUCS2_Compare # define PyUnicode_Concat PyUnicodeUCS2_Concat # define PyUnicode_Contains PyUnicodeUCS2_Contains # define PyUnicode_Count PyUnicodeUCS2_Count # define PyUnicode_Decode PyUnicodeUCS2_Decode # define PyUnicode_DecodeASCII PyUnicodeUCS2_DecodeASCII # define PyUnicode_DecodeCharmap PyUnicodeUCS2_DecodeCharmap # define PyUnicode_DecodeLatin1 PyUnicodeUCS2_DecodeLatin1 # define PyUnicode_DecodeRawUnicodeEscape PyUnicodeUCS2_DecodeRawUnicodeEscape # define PyUnicode_DecodeUTF16 PyUnicodeUCS2_DecodeUTF16 # define PyUnicode_DecodeUTF8 PyUnicodeUCS2_DecodeUTF8 # define PyUnicode_DecodeUnicodeEscape PyUnicodeUCS2_DecodeUnicodeEscape # define PyUnicode_Encode PyUnicodeUCS2_Encode # define PyUnicode_EncodeASCII PyUnicodeUCS2_EncodeASCII # define PyUnicode_EncodeCharmap PyUnicodeUCS2_EncodeCharmap # define PyUnicode_EncodeDecimal PyUnicodeUCS2_EncodeDecimal # define PyUnicode_EncodeLatin1 PyUnicodeUCS2_EncodeLatin1 # define PyUnicode_EncodeRawUnicodeEscape PyUnicodeUCS2_EncodeRawUnicodeEscape # define PyUnicode_EncodeUTF16 PyUnicodeUCS2_EncodeUTF16 # define PyUnicode_EncodeUTF8 PyUnicodeUCS2_EncodeUTF8 # define PyUnicode_EncodeUnicodeEscape PyUnicodeUCS2_EncodeUnicodeEscape # define PyUnicode_Find PyUnicodeUCS2_Find # define PyUnicode_Format PyUnicodeUCS2_Format # define PyUnicode_FromEncodedObject PyUnicodeUCS2_FromEncodedObject # define PyUnicode_FromObject PyUnicodeUCS2_FromObject # define PyUnicode_FromOrdinal PyUnicodeUCS2_FromOrdinal # define PyUnicode_FromUnicode PyUnicodeUCS2_FromUnicode # define PyUnicode_FromWideChar PyUnicodeUCS2_FromWideChar # define PyUnicode_GetDefaultEncoding PyUnicodeUCS2_GetDefaultEncoding # define PyUnicode_GetMax PyUnicodeUCS2_GetMax # define PyUnicode_GetSize PyUnicodeUCS2_GetSize # define PyUnicode_Join PyUnicodeUCS2_Join # define PyUnicode_Replace PyUnicodeUCS2_Replace # define PyUnicode_Resize PyUnicodeUCS2_Resize # define PyUnicode_SetDefaultEncoding PyUnicodeUCS2_SetDefaultEncoding # define PyUnicode_Split PyUnicodeUCS2_Split # define PyUnicode_Splitlines PyUnicodeUCS2_Splitlines # define PyUnicode_Tailmatch PyUnicodeUCS2_Tailmatch # define PyUnicode_Translate PyUnicodeUCS2_Translate # define PyUnicode_TranslateCharmap PyUnicodeUCS2_TranslateCharmap # define _PyUnicode_AsDefaultEncodedString _PyUnicodeUCS2_AsDefaultEncodedString # define _PyUnicode_Fini _PyUnicodeUCS2_Fini # define _PyUnicode_Init _PyUnicodeUCS2_Init # define _PyUnicode_IsAlpha _PyUnicodeUCS2_IsAlpha # define _PyUnicode_IsDecimalDigit _PyUnicodeUCS2_IsDecimalDigit # define _PyUnicode_IsDigit _PyUnicodeUCS2_IsDigit # define _PyUnicode_IsLinebreak _PyUnicodeUCS2_IsLinebreak # define _PyUnicode_IsLowercase _PyUnicodeUCS2_IsLowercase # define _PyUnicode_IsNumeric _PyUnicodeUCS2_IsNumeric # define _PyUnicode_IsTitlecase _PyUnicodeUCS2_IsTitlecase # define _PyUnicode_IsUppercase _PyUnicodeUCS2_IsUppercase # define _PyUnicode_IsWhitespace _PyUnicodeUCS2_IsWhitespace # define _PyUnicode_ToDecimalDigit _PyUnicodeUCS2_ToDecimalDigit # define _PyUnicode_ToDigit _PyUnicodeUCS2_ToDigit # define _PyUnicode_ToLowercase _PyUnicodeUCS2_ToLowercase # define _PyUnicode_ToNumeric _PyUnicodeUCS2_ToNumeric # define _PyUnicode_ToTitlecase _PyUnicodeUCS2_ToTitlecase # define _PyUnicode_ToUppercase _PyUnicodeUCS2_ToUppercase #else # define PyUnicode_AsASCIIString PyUnicodeUCS4_AsASCIIString # define PyUnicode_AsCharmapString PyUnicodeUCS4_AsCharmapString # define PyUnicode_AsEncodedString PyUnicodeUCS4_AsEncodedString # define PyUnicode_AsLatin1String PyUnicodeUCS4_AsLatin1String # define PyUnicode_AsRawUnicodeEscapeString PyUnicodeUCS4_AsRawUnicodeEscapeString # define PyUnicode_AsUTF16String PyUnicodeUCS4_AsUTF16String # define PyUnicode_AsUTF8String PyUnicodeUCS4_AsUTF8String # define PyUnicode_AsUnicode PyUnicodeUCS4_AsUnicode # define PyUnicode_AsUnicodeEscapeString PyUnicodeUCS4_AsUnicodeEscapeString # define PyUnicode_AsWideChar PyUnicodeUCS4_AsWideChar # define PyUnicode_Compare PyUnicodeUCS4_Compare # define PyUnicode_Concat PyUnicodeUCS4_Concat # define PyUnicode_Contains PyUnicodeUCS4_Contains # define PyUnicode_Count PyUnicodeUCS4_Count # define PyUnicode_Decode PyUnicodeUCS4_Decode # define PyUnicode_DecodeASCII PyUnicodeUCS4_DecodeASCII # define PyUnicode_DecodeCharmap PyUnicodeUCS4_DecodeCharmap # define PyUnicode_DecodeLatin1 PyUnicodeUCS4_DecodeLatin1 # define PyUnicode_DecodeRawUnicodeEscape PyUnicodeUCS4_DecodeRawUnicodeEscape # define PyUnicode_DecodeUTF16 PyUnicodeUCS4_DecodeUTF16 # define PyUnicode_DecodeUTF8 PyUnicodeUCS4_DecodeUTF8 # define PyUnicode_DecodeUnicodeEscape PyUnicodeUCS4_DecodeUnicodeEscape # define PyUnicode_Encode PyUnicodeUCS4_Encode # define PyUnicode_EncodeASCII PyUnicodeUCS4_EncodeASCII # define PyUnicode_EncodeCharmap PyUnicodeUCS4_EncodeCharmap # define PyUnicode_EncodeDecimal PyUnicodeUCS4_EncodeDecimal # define PyUnicode_EncodeLatin1 PyUnicodeUCS4_EncodeLatin1 # define PyUnicode_EncodeRawUnicodeEscape PyUnicodeUCS4_EncodeRawUnicodeEscape # define PyUnicode_EncodeUTF16 PyUnicodeUCS4_EncodeUTF16 # define PyUnicode_EncodeUTF8 PyUnicodeUCS4_EncodeUTF8 # define PyUnicode_EncodeUnicodeEscape PyUnicodeUCS4_EncodeUnicodeEscape # define PyUnicode_Find PyUnicodeUCS4_Find # define PyUnicode_Format PyUnicodeUCS4_Format # define PyUnicode_FromEncodedObject PyUnicodeUCS4_FromEncodedObject # define PyUnicode_FromObject PyUnicodeUCS4_FromObject # define PyUnicode_FromOrdinal PyUnicodeUCS4_FromOrdinal # define PyUnicode_FromUnicode PyUnicodeUCS4_FromUnicode # define PyUnicode_FromWideChar PyUnicodeUCS4_FromWideChar # define PyUnicode_GetDefaultEncoding PyUnicodeUCS4_GetDefaultEncoding # define PyUnicode_GetMax PyUnicodeUCS4_GetMax # define PyUnicode_GetSize PyUnicodeUCS4_GetSize # define PyUnicode_Join PyUnicodeUCS4_Join # define PyUnicode_Replace PyUnicodeUCS4_Replace # define PyUnicode_Resize PyUnicodeUCS4_Resize # define PyUnicode_SetDefaultEncoding PyUnicodeUCS4_SetDefaultEncoding # define PyUnicode_Split PyUnicodeUCS4_Split # define PyUnicode_Splitlines PyUnicodeUCS4_Splitlines # define PyUnicode_Tailmatch PyUnicodeUCS4_Tailmatch # define PyUnicode_Translate PyUnicodeUCS4_Translate # define PyUnicode_TranslateCharmap PyUnicodeUCS4_TranslateCharmap # define _PyUnicode_AsDefaultEncodedString _PyUnicodeUCS4_AsDefaultEncodedString # define _PyUnicode_Fini _PyUnicodeUCS4_Fini # define _PyUnicode_Init _PyUnicodeUCS4_Init # define _PyUnicode_IsAlpha _PyUnicodeUCS4_IsAlpha # define _PyUnicode_IsDecimalDigit _PyUnicodeUCS4_IsDecimalDigit # define _PyUnicode_IsDigit _PyUnicodeUCS4_IsDigit # define _PyUnicode_IsLinebreak _PyUnicodeUCS4_IsLinebreak # define _PyUnicode_IsLowercase _PyUnicodeUCS4_IsLowercase # define _PyUnicode_IsNumeric _PyUnicodeUCS4_IsNumeric # define _PyUnicode_IsTitlecase _PyUnicodeUCS4_IsTitlecase # define _PyUnicode_IsUppercase _PyUnicodeUCS4_IsUppercase # define _PyUnicode_IsWhitespace _PyUnicodeUCS4_IsWhitespace # define _PyUnicode_ToDecimalDigit _PyUnicodeUCS4_ToDecimalDigit # define _PyUnicode_ToDigit _PyUnicodeUCS4_ToDigit # define _PyUnicode_ToLowercase _PyUnicodeUCS4_ToLowercase # define _PyUnicode_ToNumeric _PyUnicodeUCS4_ToNumeric # define _PyUnicode_ToTitlecase _PyUnicodeUCS4_ToTitlecase # define _PyUnicode_ToUppercase _PyUnicodeUCS4_ToUppercase #endif /* --- Internal Unicode Operations ---------------------------------------- */ /* If you want Python to use the compiler's wctype.h functions instead of the ones supplied with Python, define WANT_WCTYPE_FUNCTIONS or configure Python using --with-ctype-functions. This reduces the interpreter's code size. */ #if defined(HAVE_USABLE_WCHAR_T) && defined(WANT_WCTYPE_FUNCTIONS) #include #define Py_UNICODE_ISSPACE(ch) iswspace(ch) #define Py_UNICODE_ISLOWER(ch) iswlower(ch) #define Py_UNICODE_ISUPPER(ch) iswupper(ch) #define Py_UNICODE_ISTITLE(ch) _PyUnicode_IsTitlecase(ch) #define Py_UNICODE_ISLINEBREAK(ch) _PyUnicode_IsLinebreak(ch) #define Py_UNICODE_TOLOWER(ch) towlower(ch) #define Py_UNICODE_TOUPPER(ch) towupper(ch) #define Py_UNICODE_TOTITLE(ch) _PyUnicode_ToTitlecase(ch) #define Py_UNICODE_ISDECIMAL(ch) _PyUnicode_IsDecimalDigit(ch) #define Py_UNICODE_ISDIGIT(ch) _PyUnicode_IsDigit(ch) #define Py_UNICODE_ISNUMERIC(ch) _PyUnicode_IsNumeric(ch) #define Py_UNICODE_TODECIMAL(ch) _PyUnicode_ToDecimalDigit(ch) #define Py_UNICODE_TODIGIT(ch) _PyUnicode_ToDigit(ch) #define Py_UNICODE_TONUMERIC(ch) _PyUnicode_ToNumeric(ch) #define Py_UNICODE_ISALPHA(ch) iswalpha(ch) #else #define Py_UNICODE_ISSPACE(ch) _PyUnicode_IsWhitespace(ch) #define Py_UNICODE_ISLOWER(ch) _PyUnicode_IsLowercase(ch) #define Py_UNICODE_ISUPPER(ch) _PyUnicode_IsUppercase(ch) #define Py_UNICODE_ISTITLE(ch) _PyUnicode_IsTitlecase(ch) #define Py_UNICODE_ISLINEBREAK(ch) _PyUnicode_IsLinebreak(ch) #define Py_UNICODE_TOLOWER(ch) _PyUnicode_ToLowercase(ch) #define Py_UNICODE_TOUPPER(ch) _PyUnicode_ToUppercase(ch) #define Py_UNICODE_TOTITLE(ch) _PyUnicode_ToTitlecase(ch) #define Py_UNICODE_ISDECIMAL(ch) _PyUnicode_IsDecimalDigit(ch) #define Py_UNICODE_ISDIGIT(ch) _PyUnicode_IsDigit(ch) #define Py_UNICODE_ISNUMERIC(ch) _PyUnicode_IsNumeric(ch) #define Py_UNICODE_TODECIMAL(ch) _PyUnicode_ToDecimalDigit(ch) #define Py_UNICODE_TODIGIT(ch) _PyUnicode_ToDigit(ch) #define Py_UNICODE_TONUMERIC(ch) _PyUnicode_ToNumeric(ch) #define Py_UNICODE_ISALPHA(ch) _PyUnicode_IsAlpha(ch) #endif #define Py_UNICODE_ISALNUM(ch) \ (Py_UNICODE_ISALPHA(ch) || \ Py_UNICODE_ISDECIMAL(ch) || \ Py_UNICODE_ISDIGIT(ch) || \ Py_UNICODE_ISNUMERIC(ch)) #define Py_UNICODE_COPY(target, source, length)\ (memcpy((target), (source), (length)*sizeof(Py_UNICODE))) #define Py_UNICODE_FILL(target, value, length) do\ {int i; for (i = 0; i < (length); i++) (target)[i] = (value);}\ while (0) #define Py_UNICODE_MATCH(string, offset, substring)\ ((*((string)->str + (offset)) == *((substring)->str)) &&\ !memcmp((string)->str + (offset), (substring)->str,\ (substring)->length*sizeof(Py_UNICODE))) #ifdef __cplusplus extern "C" { #endif /* --- Unicode Type ------------------------------------------------------- */ typedef struct { PyObject_HEAD int length; /* Length of raw Unicode data in buffer */ Py_UNICODE *str; /* Raw Unicode buffer */ long hash; /* Hash value; -1 if not set */ PyObject *defenc; /* (Default) Encoded version as Python string, or NULL; this is used for implementing the buffer protocol */ } PyUnicodeObject; PyAPI_DATA(PyTypeObject) PyUnicode_Type; #define PyUnicode_Check(op) PyObject_TypeCheck(op, &PyUnicode_Type) #define PyUnicode_CheckExact(op) ((op)->ob_type == &PyUnicode_Type) /* Fast access macros */ #define PyUnicode_GET_SIZE(op) \ (((PyUnicodeObject *)(op))->length) #define PyUnicode_GET_DATA_SIZE(op) \ (((PyUnicodeObject *)(op))->length * sizeof(Py_UNICODE)) #define PyUnicode_AS_UNICODE(op) \ (((PyUnicodeObject *)(op))->str) #define PyUnicode_AS_DATA(op) \ ((const char *)((PyUnicodeObject *)(op))->str) /* --- Constants ---------------------------------------------------------- */ /* This Unicode character will be used as replacement character during decoding if the errors argument is set to "replace". Note: the Unicode character U+FFFD is the official REPLACEMENT CHARACTER in Unicode 3.0. */ #define Py_UNICODE_REPLACEMENT_CHARACTER ((Py_UNICODE) 0xFFFD) /* === Public API ========================================================= */ /* --- Plain Py_UNICODE --------------------------------------------------- */ /* Create a Unicode Object from the Py_UNICODE buffer u of the given size. u may be NULL which causes the contents to be undefined. It is the user's responsibility to fill in the needed data afterwards. Note that modifying the Unicode object contents after construction is only allowed if u was set to NULL. The buffer is copied into the new object. */ PyAPI_FUNC(PyObject*) PyUnicode_FromUnicode( const Py_UNICODE *u, /* Unicode buffer */ int size /* size of buffer */ ); /* Return a read-only pointer to the Unicode object's internal Py_UNICODE buffer. */ PyAPI_FUNC(Py_UNICODE *) PyUnicode_AsUnicode( PyObject *unicode /* Unicode object */ ); /* Get the length of the Unicode object. */ PyAPI_FUNC(int) PyUnicode_GetSize( PyObject *unicode /* Unicode object */ ); /* Get the maximum ordinal for a Unicode character. */ PyAPI_FUNC(Py_UNICODE) PyUnicode_GetMax(void); /* Resize an already allocated Unicode object to the new size length. *unicode is modified to point to the new (resized) object and 0 returned on success. This API may only be called by the function which also called the Unicode constructor. The refcount on the object must be 1. Otherwise, an error is returned. Error handling is implemented as follows: an exception is set, -1 is returned and *unicode left untouched. */ PyAPI_FUNC(int) PyUnicode_Resize( PyObject **unicode, /* Pointer to the Unicode object */ int length /* New length */ ); /* Coerce obj to an Unicode object and return a reference with *incremented* refcount. Coercion is done in the following way: 1. String and other char buffer compatible objects are decoded under the assumptions that they contain data using the current default encoding. Decoding is done in "strict" mode. 2. All other objects (including Unicode objects) raise an exception. The API returns NULL in case of an error. The caller is responsible for decref'ing the returned objects. */ PyAPI_FUNC(PyObject*) PyUnicode_FromEncodedObject( register PyObject *obj, /* Object */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Coerce obj to an Unicode object and return a reference with *incremented* refcount. Unicode objects are passed back as-is (subclasses are converted to true Unicode objects), all other objects are delegated to PyUnicode_FromEncodedObject(obj, NULL, "strict") which results in using the default encoding as basis for decoding the object. The API returns NULL in case of an error. The caller is responsible for decref'ing the returned objects. */ PyAPI_FUNC(PyObject*) PyUnicode_FromObject( register PyObject *obj /* Object */ ); /* --- wchar_t support for platforms which support it --------------------- */ #ifdef HAVE_WCHAR_H /* Create a Unicode Object from the whcar_t buffer w of the given size. The buffer is copied into the new object. */ PyAPI_FUNC(PyObject*) PyUnicode_FromWideChar( register const wchar_t *w, /* wchar_t buffer */ int size /* size of buffer */ ); /* Copies the Unicode Object contents into the whcar_t buffer w. At most size wchar_t characters are copied. Returns the number of wchar_t characters copied or -1 in case of an error. */ PyAPI_FUNC(int) PyUnicode_AsWideChar( PyUnicodeObject *unicode, /* Unicode object */ register wchar_t *w, /* wchar_t buffer */ int size /* size of buffer */ ); #endif /* --- Unicode ordinals --------------------------------------------------- */ /* Create a Unicode Object from the given Unicode code point ordinal. The ordinal must be in range(0x10000) on narrow Python builds (UCS2), and range(0x110000) on wide builds (UCS4). A ValueError is raised in case it is not. */ PyAPI_FUNC(PyObject*) PyUnicode_FromOrdinal(int ordinal); /* === Builtin Codecs ===================================================== Many of these APIs take two arguments encoding and errors. These parameters encoding and errors have the same semantics as the ones of the builtin unicode() API. Setting encoding to NULL causes the default encoding to be used. Error handling is set by errors which may also be set to NULL meaning to use the default handling defined for the codec. Default error handling for all builtin codecs is "strict" (ValueErrors are raised). The codecs all use a similar interface. Only deviation from the generic ones are documented. */ /* --- Manage the default encoding ---------------------------------------- */ /* Return a Python string holding the default encoded value of the Unicode object. The resulting string is cached in the Unicode object for subsequent usage by this function. The cached version is needed to implement the character buffer interface and will live (at least) as long as the Unicode object itself. The refcount of the string is *not* incremented. *** Exported for internal use by the interpreter only !!! *** */ PyAPI_FUNC(PyObject *) _PyUnicode_AsDefaultEncodedString( PyObject *, const char *); /* Returns the currently active default encoding. The default encoding is currently implemented as run-time settable process global. This may change in future versions of the interpreter to become a parameter which is managed on a per-thread basis. */ PyAPI_FUNC(const char*) PyUnicode_GetDefaultEncoding(void); /* Sets the currently active default encoding. Returns 0 on success, -1 in case of an error. */ PyAPI_FUNC(int) PyUnicode_SetDefaultEncoding( const char *encoding /* Encoding name in standard form */ ); /* --- Generic Codecs ----------------------------------------------------- */ /* Create a Unicode object by decoding the encoded string s of the given size. */ PyAPI_FUNC(PyObject*) PyUnicode_Decode( const char *s, /* encoded string */ int size, /* size of buffer */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Encodes a Py_UNICODE buffer of the given size and returns a Python string object. */ PyAPI_FUNC(PyObject*) PyUnicode_Encode( const Py_UNICODE *s, /* Unicode char buffer */ int size, /* number of Py_UNICODE chars to encode */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Encodes a Unicode object and returns the result as Python string object. */ PyAPI_FUNC(PyObject*) PyUnicode_AsEncodedString( PyObject *unicode, /* Unicode object */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* --- UTF-7 Codecs ------------------------------------------------------- */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeUTF7( const char *string, /* UTF-7 encoded string */ int length, /* size of string */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeUTF7( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* number of Py_UNICODE chars to encode */ int encodeSetO, /* force the encoder to encode characters in Set O, as described in RFC2152 */ int encodeWhiteSpace, /* force the encoder to encode space, tab, carriage return and linefeed characters */ const char *errors /* error handling */ ); /* --- UTF-8 Codecs ------------------------------------------------------- */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeUTF8( const char *string, /* UTF-8 encoded string */ int length, /* size of string */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_AsUTF8String( PyObject *unicode /* Unicode object */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeUTF8( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* number of Py_UNICODE chars to encode */ const char *errors /* error handling */ ); /* --- UTF-16 Codecs ------------------------------------------------------ */ /* Decodes length bytes from a UTF-16 encoded buffer string and returns the corresponding Unicode object. errors (if non-NULL) defines the error handling. It defaults to "strict". If byteorder is non-NULL, the decoder starts decoding using the given byte order: *byteorder == -1: little endian *byteorder == 0: native order *byteorder == 1: big endian In native mode, the first two bytes of the stream are checked for a BOM mark. If found, the BOM mark is analysed, the byte order adjusted and the BOM skipped. In the other modes, no BOM mark interpretation is done. After completion, *byteorder is set to the current byte order at the end of input data. If byteorder is NULL, the codec starts in native order mode. */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeUTF16( const char *string, /* UTF-16 encoded string */ int length, /* size of string */ const char *errors, /* error handling */ int *byteorder /* pointer to byteorder to use 0=native;-1=LE,1=BE; updated on exit */ ); /* Returns a Python string using the UTF-16 encoding in native byte order. The string always starts with a BOM mark. */ PyAPI_FUNC(PyObject*) PyUnicode_AsUTF16String( PyObject *unicode /* Unicode object */ ); /* Returns a Python string object holding the UTF-16 encoded value of the Unicode data. If byteorder is not 0, output is written according to the following byte order: byteorder == -1: little endian byteorder == 0: native byte order (writes a BOM mark) byteorder == 1: big endian If byteorder is 0, the output string will always start with the Unicode BOM mark (U+FEFF). In the other two modes, no BOM mark is prepended. Note that Py_UNICODE data is being interpreted as UTF-16 reduced to UCS-2. This trick makes it possible to add full UTF-16 capabilities at a later point without compromising the APIs. */ PyAPI_FUNC(PyObject*) PyUnicode_EncodeUTF16( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* number of Py_UNICODE chars to encode */ const char *errors, /* error handling */ int byteorder /* byteorder to use 0=BOM+native;-1=LE,1=BE */ ); /* --- Unicode-Escape Codecs ---------------------------------------------- */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeUnicodeEscape( const char *string, /* Unicode-Escape encoded string */ int length, /* size of string */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_AsUnicodeEscapeString( PyObject *unicode /* Unicode object */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeUnicodeEscape( const Py_UNICODE *data, /* Unicode char buffer */ int length /* Number of Py_UNICODE chars to encode */ ); /* --- Raw-Unicode-Escape Codecs ------------------------------------------ */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeRawUnicodeEscape( const char *string, /* Raw-Unicode-Escape encoded string */ int length, /* size of string */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_AsRawUnicodeEscapeString( PyObject *unicode /* Unicode object */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeRawUnicodeEscape( const Py_UNICODE *data, /* Unicode char buffer */ int length /* Number of Py_UNICODE chars to encode */ ); /* --- Latin-1 Codecs ----------------------------------------------------- Note: Latin-1 corresponds to the first 256 Unicode ordinals. */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeLatin1( const char *string, /* Latin-1 encoded string */ int length, /* size of string */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_AsLatin1String( PyObject *unicode /* Unicode object */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeLatin1( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* Number of Py_UNICODE chars to encode */ const char *errors /* error handling */ ); /* --- ASCII Codecs ------------------------------------------------------- Only 7-bit ASCII data is excepted. All other codes generate errors. */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeASCII( const char *string, /* ASCII encoded string */ int length, /* size of string */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_AsASCIIString( PyObject *unicode /* Unicode object */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeASCII( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* Number of Py_UNICODE chars to encode */ const char *errors /* error handling */ ); /* --- Character Map Codecs ----------------------------------------------- This codec uses mappings to encode and decode characters. Decoding mappings must map single string characters to single Unicode characters, integers (which are then interpreted as Unicode ordinals) or None (meaning "undefined mapping" and causing an error). Encoding mappings must map single Unicode characters to single string characters, integers (which are then interpreted as Latin-1 ordinals) or None (meaning "undefined mapping" and causing an error). If a character lookup fails with a LookupError, the character is copied as-is meaning that its ordinal value will be interpreted as Unicode or Latin-1 ordinal resp. Because of this mappings only need to contain those mappings which map characters to different code points. */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeCharmap( const char *string, /* Encoded string */ int length, /* size of string */ PyObject *mapping, /* character mapping (char ordinal -> unicode ordinal) */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_AsCharmapString( PyObject *unicode, /* Unicode object */ PyObject *mapping /* character mapping (unicode ordinal -> char ordinal) */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeCharmap( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* Number of Py_UNICODE chars to encode */ PyObject *mapping, /* character mapping (unicode ordinal -> char ordinal) */ const char *errors /* error handling */ ); /* Translate a Py_UNICODE buffer of the given length by applying a character mapping table to it and return the resulting Unicode object. The mapping table must map Unicode ordinal integers to Unicode ordinal integers or None (causing deletion of the character). Mapping tables may be dictionaries or sequences. Unmapped character ordinals (ones which cause a LookupError) are left untouched and are copied as-is. */ PyAPI_FUNC(PyObject *) PyUnicode_TranslateCharmap( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* Number of Py_UNICODE chars to encode */ PyObject *table, /* Translate table */ const char *errors /* error handling */ ); #ifdef MS_WIN32 /* --- MBCS codecs for Windows -------------------------------------------- */ PyAPI_FUNC(PyObject*) PyUnicode_DecodeMBCS( const char *string, /* MBCS encoded string */ int length, /* size of string */ const char *errors /* error handling */ ); PyAPI_FUNC(PyObject*) PyUnicode_AsMBCSString( PyObject *unicode /* Unicode object */ ); PyAPI_FUNC(PyObject*) PyUnicode_EncodeMBCS( const Py_UNICODE *data, /* Unicode char buffer */ int length, /* Number of Py_UNICODE chars to encode */ const char *errors /* error handling */ ); #endif /* MS_WIN32 */ /* --- Decimal Encoder ---------------------------------------------------- */ /* Takes a Unicode string holding a decimal value and writes it into an output buffer using standard ASCII digit codes. The output buffer has to provide at least length+1 bytes of storage area. The output string is 0-terminated. The encoder converts whitespace to ' ', decimal characters to their corresponding ASCII digit and all other Latin-1 characters except \0 as-is. Characters outside this range (Unicode ordinals 1-256) are treated as errors. This includes embedded NULL bytes. Error handling is defined by the errors argument: NULL or "strict": raise a ValueError "ignore": ignore the wrong characters (these are not copied to the output buffer) "replace": replaces illegal characters with '?' Returns 0 on success, -1 on failure. */ PyAPI_FUNC(int) PyUnicode_EncodeDecimal( Py_UNICODE *s, /* Unicode buffer */ int length, /* Number of Py_UNICODE chars to encode */ char *output, /* Output buffer; must have size >= length */ const char *errors /* error handling */ ); /* --- Methods & Slots ---------------------------------------------------- These are capable of handling Unicode objects and strings on input (we refer to them as strings in the descriptions) and return Unicode objects or integers as apporpriate. */ /* Concat two strings giving a new Unicode string. */ PyAPI_FUNC(PyObject*) PyUnicode_Concat( PyObject *left, /* Left string */ PyObject *right /* Right string */ ); /* Split a string giving a list of Unicode strings. If sep is NULL, splitting will be done at all whitespace substrings. Otherwise, splits occur at the given separator. At most maxsplit splits will be done. If negative, no limit is set. Separators are not included in the resulting list. */ PyAPI_FUNC(PyObject*) PyUnicode_Split( PyObject *s, /* String to split */ PyObject *sep, /* String separator */ int maxsplit /* Maxsplit count */ ); /* Dito, but split at line breaks. CRLF is considered to be one line break. Line breaks are not included in the resulting list. */ PyAPI_FUNC(PyObject*) PyUnicode_Splitlines( PyObject *s, /* String to split */ int keepends /* If true, line end markers are included */ ); /* Translate a string by applying a character mapping table to it and return the resulting Unicode object. The mapping table must map Unicode ordinal integers to Unicode ordinal integers or None (causing deletion of the character). Mapping tables may be dictionaries or sequences. Unmapped character ordinals (ones which cause a LookupError) are left untouched and are copied as-is. */ PyAPI_FUNC(PyObject *) PyUnicode_Translate( PyObject *str, /* String */ PyObject *table, /* Translate table */ const char *errors /* error handling */ ); /* Join a sequence of strings using the given separator and return the resulting Unicode string. */ PyAPI_FUNC(PyObject*) PyUnicode_Join( PyObject *separator, /* Separator string */ PyObject *seq /* Sequence object */ ); /* Return 1 if substr matches str[start:end] at the given tail end, 0 otherwise. */ PyAPI_FUNC(int) PyUnicode_Tailmatch( PyObject *str, /* String */ PyObject *substr, /* Prefix or Suffix string */ int start, /* Start index */ int end, /* Stop index */ int direction /* Tail end: -1 prefix, +1 suffix */ ); /* Return the first position of substr in str[start:end] using the given search direction or -1 if not found. -2 is returned in case an error occurred and an exception is set. */ PyAPI_FUNC(int) PyUnicode_Find( PyObject *str, /* String */ PyObject *substr, /* Substring to find */ int start, /* Start index */ int end, /* Stop index */ int direction /* Find direction: +1 forward, -1 backward */ ); /* Count the number of occurrences of substr in str[start:end]. */ PyAPI_FUNC(int) PyUnicode_Count( PyObject *str, /* String */ PyObject *substr, /* Substring to count */ int start, /* Start index */ int end /* Stop index */ ); /* Replace at most maxcount occurrences of substr in str with replstr and return the resulting Unicode object. */ PyAPI_FUNC(PyObject *) PyUnicode_Replace( PyObject *str, /* String */ PyObject *substr, /* Substring to find */ PyObject *replstr, /* Substring to replace */ int maxcount /* Max. number of replacements to apply; -1 = all */ ); /* Compare two strings and return -1, 0, 1 for less than, equal, greater than resp. */ PyAPI_FUNC(int) PyUnicode_Compare( PyObject *left, /* Left string */ PyObject *right /* Right string */ ); /* Apply a argument tuple or dictionary to a format string and return the resulting Unicode string. */ PyAPI_FUNC(PyObject *) PyUnicode_Format( PyObject *format, /* Format string */ PyObject *args /* Argument tuple or dictionary */ ); /* Checks whether element is contained in container and return 1/0 accordingly. element has to coerce to an one element Unicode string. -1 is returned in case of an error. */ PyAPI_FUNC(int) PyUnicode_Contains( PyObject *container, /* Container string */ PyObject *element /* Element string */ ); /* Externally visible for str.strip(unicode) */ PyAPI_FUNC(PyObject *) _PyUnicode_XStrip( PyUnicodeObject *self, int striptype, PyObject *sepobj ); /* === Characters Type APIs =============================================== */ /* These should not be used directly. Use the Py_UNICODE_IS* and Py_UNICODE_TO* macros instead. These APIs are implemented in Objects/unicodectype.c. */ PyAPI_FUNC(int) _PyUnicode_IsLowercase( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsUppercase( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsTitlecase( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsWhitespace( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsLinebreak( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(Py_UNICODE) _PyUnicode_ToLowercase( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(Py_UNICODE) _PyUnicode_ToUppercase( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(Py_UNICODE) _PyUnicode_ToTitlecase( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_ToDecimalDigit( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_ToDigit( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(double) _PyUnicode_ToNumeric( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsDecimalDigit( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsDigit( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsNumeric( Py_UNICODE ch /* Unicode character */ ); PyAPI_FUNC(int) _PyUnicode_IsAlpha( Py_UNICODE ch /* Unicode character */ ); #ifdef __cplusplus } #endif #endif /* Py_USING_UNICODE */ #endif /* !Py_UNICODEOBJECT_H */ Python-2.3.7/Include/osdefs.h0000644001241000117560000000177207436667541015320 0ustar loewishpifb6#ifndef Py_OSDEFS_H #define Py_OSDEFS_H #ifdef __cplusplus extern "C" { #endif /* Operating system dependencies */ #ifdef macintosh #define SEP ':' #define MAXPATHLEN 256 /* Mod by Jack: newline is less likely to occur in filenames than space */ #define DELIM '\n' #endif /* Mod by chrish: QNX has WATCOM, but isn't DOS */ #if !defined(__QNX__) #if defined(MS_WINDOWS) || defined(__BORLANDC__) || defined(__WATCOMC__) || defined(__DJGPP__) || defined(PYOS_OS2) #if defined(PYOS_OS2) && defined(PYCC_GCC) #define MAXPATHLEN 260 #define SEP '/' #define ALTSEP '\\' #else #define SEP '\\' #define ALTSEP '/' #define MAXPATHLEN 256 #endif #define DELIM ';' #endif #endif #ifdef RISCOS #define SEP '.' #define MAXPATHLEN 256 #define DELIM ',' #endif /* Filename separator */ #ifndef SEP #define SEP '/' #endif /* Max pathname length */ #ifndef MAXPATHLEN #define MAXPATHLEN 1024 #endif /* Search path entry delimiter */ #ifndef DELIM #define DELIM ':' #endif #ifdef __cplusplus } #endif #endif /* !Py_OSDEFS_H */ Python-2.3.7/Include/symtable.h0000644001241000117560000000704107662734272015645 0ustar loewishpifb6#ifndef Py_SYMTABLE_H #define Py_SYMTABLE_H #ifdef __cplusplus extern "C" { #endif /* A symbol table is constructed each time PyNode_Compile() is called. The table walks the entire parse tree and identifies each use or definition of a variable. The symbol table contains a dictionary for each code block in a module: The symbol dictionary for the block. They keys of these dictionaries are the name of all variables used or defined in the block; the integer values are used to store several flags, e.g. DEF_PARAM indicates that a variable is a parameter to a function. */ struct _symtable_entry; struct symtable { int st_pass; /* pass == 1 or 2 */ const char *st_filename; /* name of file being compiled */ struct _symtable_entry *st_cur; /* current symbol table entry */ PyObject *st_symbols; /* dictionary of symbol table entries */ PyObject *st_stack; /* stack of namespace info */ PyObject *st_global; /* borrowed ref to MODULE in st_symbols */ int st_nscopes; /* number of scopes */ int st_errors; /* number of errors */ char *st_private; /* name of current class or NULL */ PyFutureFeatures *st_future; /* module's future features */ }; typedef struct _symtable_entry { PyObject_HEAD PyObject *ste_id; /* int: key in st_symbols) */ PyObject *ste_symbols; /* dict: name to flags) */ PyObject *ste_name; /* string: name of scope */ PyObject *ste_varnames; /* list of variable names */ PyObject *ste_children; /* list of child ids */ int ste_type; /* module, class, or function */ int ste_lineno; /* first line of scope */ int ste_optimized; /* true if namespace can't be optimized */ int ste_nested; /* true if scope is nested */ int ste_child_free; /* true if a child scope has free variables, including free refs to globals */ int ste_generator; /* true if namespace is a generator */ int ste_opt_lineno; /* lineno of last exec or import * */ int ste_tmpname; /* temporary name counter */ struct symtable *ste_table; } PySymtableEntryObject; PyAPI_DATA(PyTypeObject) PySymtableEntry_Type; #define PySymtableEntry_Check(op) ((op)->ob_type == &PySymtableEntry_Type) PyAPI_FUNC(PyObject *) PySymtableEntry_New(struct symtable *, char *, int, int); PyAPI_FUNC(struct symtable *) PyNode_CompileSymtable(struct _node *, const char *); PyAPI_FUNC(void) PySymtable_Free(struct symtable *); #define TOP "global" /* Flags for def-use information */ #define DEF_GLOBAL 1 /* global stmt */ #define DEF_LOCAL 2 /* assignment in code block */ #define DEF_PARAM 2<<1 /* formal parameter */ #define USE 2<<2 /* name is used */ #define DEF_STAR 2<<3 /* parameter is star arg */ #define DEF_DOUBLESTAR 2<<4 /* parameter is star-star arg */ #define DEF_INTUPLE 2<<5 /* name defined in tuple in parameters */ #define DEF_FREE 2<<6 /* name used but not defined in nested scope */ #define DEF_FREE_GLOBAL 2<<7 /* free variable is actually implicit global */ #define DEF_FREE_CLASS 2<<8 /* free variable from class's method */ #define DEF_IMPORT 2<<9 /* assignment occurred via import */ #define DEF_BOUND (DEF_LOCAL | DEF_PARAM | DEF_IMPORT) #define TYPE_FUNCTION 1 #define TYPE_CLASS 2 #define TYPE_MODULE 3 #define LOCAL 1 #define GLOBAL_EXPLICIT 2 #define GLOBAL_IMPLICIT 3 #define FREE 4 #define CELL 5 #define OPT_IMPORT_STAR 1 #define OPT_EXEC 2 #define OPT_BARE_EXEC 4 #ifdef __cplusplus } #endif #endif /* !Py_SYMTABLE_H */ Python-2.3.7/Include/rangeobject.h0000644001241000117560000000113107525661026016274 0ustar loewishpifb6 /* Range object interface */ #ifndef Py_RANGEOBJECT_H #define Py_RANGEOBJECT_H #ifdef __cplusplus extern "C" { #endif /* A range object represents an integer range. This is an immutable object; a range cannot change its value after creation. Range objects behave like the corresponding tuple objects except that they are represented by a start, stop, and step datamembers. */ PyAPI_DATA(PyTypeObject) PyRange_Type; #define PyRange_Check(op) ((op)->ob_type == &PyRange_Type) PyAPI_FUNC(PyObject *) PyRange_New(long, long, long, int); #ifdef __cplusplus } #endif #endif /* !Py_RANGEOBJECT_H */ Python-2.3.7/Include/pyport.h0000644001241000117560000004346510762607371015366 0ustar loewishpifb6#ifndef Py_PYPORT_H #define Py_PYPORT_H #include "pyconfig.h" /* include for defines */ /************************************************************************** Symbols and macros to supply platform-independent interfaces to basic C language & library operations whose spellings vary across platforms. Please try to make documentation here as clear as possible: by definition, the stuff here is trying to illuminate C's darkest corners. Config #defines referenced here: SIGNED_RIGHT_SHIFT_ZERO_FILLS Meaning: To be defined iff i>>j does not extend the sign bit when i is a signed integral type and i < 0. Used in: Py_ARITHMETIC_RIGHT_SHIFT Py_DEBUG Meaning: Extra checks compiled in for debug mode. Used in: Py_SAFE_DOWNCAST HAVE_UINTPTR_T Meaning: The C9X type uintptr_t is supported by the compiler Used in: Py_uintptr_t HAVE_LONG_LONG Meaning: The compiler supports the C type "long long" Used in: PY_LONG_LONG **************************************************************************/ /* For backward compatibility only. Obsolete, do not use. */ #ifdef HAVE_PROTOTYPES #define Py_PROTO(x) x #else #define Py_PROTO(x) () #endif #ifndef Py_FPROTO #define Py_FPROTO(x) Py_PROTO(x) #endif /* typedefs for some C9X-defined synonyms for integral types. * * The names in Python are exactly the same as the C9X names, except with a * Py_ prefix. Until C9X is universally implemented, this is the only way * to ensure that Python gets reliable names that don't conflict with names * in non-Python code that are playing their own tricks to define the C9X * names. * * NOTE: don't go nuts here! Python has no use for *most* of the C9X * integral synonyms. Only define the ones we actually need. */ #ifdef HAVE_LONG_LONG #ifndef PY_LONG_LONG #define PY_LONG_LONG long long #endif #endif /* HAVE_LONG_LONG */ /* uintptr_t is the C9X name for an unsigned integral type such that a * legitimate void* can be cast to uintptr_t and then back to void* again * without loss of information. Similarly for intptr_t, wrt a signed * integral type. */ #ifdef HAVE_UINTPTR_T typedef uintptr_t Py_uintptr_t; typedef intptr_t Py_intptr_t; #elif SIZEOF_VOID_P <= SIZEOF_INT typedef unsigned int Py_uintptr_t; typedef int Py_intptr_t; #elif SIZEOF_VOID_P <= SIZEOF_LONG typedef unsigned long Py_uintptr_t; typedef long Py_intptr_t; #elif defined(HAVE_LONG_LONG) && (SIZEOF_VOID_P <= SIZEOF_LONG_LONG) typedef unsigned PY_LONG_LONG Py_uintptr_t; typedef PY_LONG_LONG Py_intptr_t; #else # error "Python needs a typedef for Py_uintptr_t in pyport.h." #endif /* HAVE_UINTPTR_T */ #ifdef HAVE_STDLIB_H #include #endif #include /* Moved here from the math section, before extern "C" */ /******************************************** * WRAPPER FOR and/or * ********************************************/ #ifdef TIME_WITH_SYS_TIME #include #include #else /* !TIME_WITH_SYS_TIME */ #ifdef HAVE_SYS_TIME_H #include #else /* !HAVE_SYS_TIME_H */ #include #endif /* !HAVE_SYS_TIME_H */ #endif /* !TIME_WITH_SYS_TIME */ /****************************** * WRAPPER FOR * ******************************/ /* NB caller must include */ #ifdef HAVE_SYS_SELECT_H #include #endif /* !HAVE_SYS_SELECT_H */ /******************************* * stat() and fstat() fiddling * *******************************/ /* We expect that stat and fstat exist on most systems. * It's confirmed on Unix, Mac and Windows. * If you don't have them, add * #define DONT_HAVE_STAT * and/or * #define DONT_HAVE_FSTAT * to your pyconfig.h. Python code beyond this should check HAVE_STAT and * HAVE_FSTAT instead. * Also * #define DONT_HAVE_SYS_STAT_H * if doesn't exist on your platform, and * #define HAVE_STAT_H * if does (don't look at me -- ths mess is inherited). */ #ifndef DONT_HAVE_STAT #define HAVE_STAT #endif #ifndef DONT_HAVE_FSTAT #define HAVE_FSTAT #endif #ifdef RISCOS #include #include "unixstuff.h" #endif #ifndef DONT_HAVE_SYS_STAT_H #if defined(PYOS_OS2) && defined(PYCC_GCC) #include #endif #include #elif defined(HAVE_STAT_H) #include #endif #if defined(PYCC_VACPP) /* VisualAge C/C++ Failed to Define MountType Field in sys/stat.h */ #define S_IFMT (S_IFDIR|S_IFCHR|S_IFREG) #endif #ifndef S_ISREG #define S_ISREG(x) (((x) & S_IFMT) == S_IFREG) #endif #ifndef S_ISDIR #define S_ISDIR(x) (((x) & S_IFMT) == S_IFDIR) #endif #ifdef __cplusplus /* Move this down here since some C++ #include's don't like to be included inside an extern "C" */ extern "C" { #endif /* Py_ARITHMETIC_RIGHT_SHIFT * C doesn't define whether a right-shift of a signed integer sign-extends * or zero-fills. Here a macro to force sign extension: * Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) * Return I >> J, forcing sign extension. * Requirements: * I is of basic signed type TYPE (char, short, int, long, or long long). * TYPE is one of char, short, int, long, or long long, although long long * must not be used except on platforms that support it. * J is an integer >= 0 and strictly less than the number of bits in TYPE * (because C doesn't define what happens for J outside that range either). * Caution: * I may be evaluated more than once. */ #ifdef SIGNED_RIGHT_SHIFT_ZERO_FILLS #define Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) \ ((I) < 0 ? ~((~(unsigned TYPE)(I)) >> (J)) : (I) >> (J)) #else #define Py_ARITHMETIC_RIGHT_SHIFT(TYPE, I, J) ((I) >> (J)) #endif /* Py_FORCE_EXPANSION(X) * "Simply" returns its argument. However, macro expansions within the * argument are evaluated. This unfortunate trickery is needed to get * token-pasting to work as desired in some cases. */ #define Py_FORCE_EXPANSION(X) X /* Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) * Cast VALUE to type NARROW from type WIDE. In Py_DEBUG mode, this * assert-fails if any information is lost. * Caution: * VALUE may be evaluated more than once. */ #ifdef Py_DEBUG #define Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) \ (assert((WIDE)(NARROW)(VALUE) == (VALUE)), (NARROW)(VALUE)) #else #define Py_SAFE_DOWNCAST(VALUE, WIDE, NARROW) (NARROW)(VALUE) #endif /* Py_IS_INFINITY(X) * Return 1 if float or double arg is an infinity, else 0. * Caution: * X is evaluated more than once. * This implementation may set the underflow flag if |X| is very small; * it really can't be implemented correctly (& easily) before C99. */ #define Py_IS_INFINITY(X) ((X) && (X)*0.5 == (X)) /* HUGE_VAL is supposed to expand to a positive double infinity. Python * uses Py_HUGE_VAL instead because some platforms are broken in this * respect. We used to embed code in pyport.h to try to worm around that, * but different platforms are broken in conflicting ways. If you're on * a platform where HUGE_VAL is defined incorrectly, fiddle your Python * config to #define Py_HUGE_VAL to something that works on your platform. */ #ifndef Py_HUGE_VAL #define Py_HUGE_VAL HUGE_VAL #endif /* Py_OVERFLOWED(X) * Return 1 iff a libm function overflowed. Set errno to 0 before calling * a libm function, and invoke this macro after, passing the function * result. * Caution: * This isn't reliable. C99 no longer requires libm to set errno under * any exceptional condition, but does require +- HUGE_VAL return * values on overflow. A 754 box *probably* maps HUGE_VAL to a * double infinity, and we're cool if that's so, unless the input * was an infinity and an infinity is the expected result. A C89 * system sets errno to ERANGE, so we check for that too. We're * out of luck if a C99 754 box doesn't map HUGE_VAL to +Inf, or * if the returned result is a NaN, or if a C89 box returns HUGE_VAL * in non-overflow cases. * X is evaluated more than once. * Some platforms have better way to spell this, so expect some #ifdef'ery. * * OpenBSD uses 'isinf()' because a compiler bug on that platform causes * the longer macro version to be mis-compiled. This isn't optimal, and * should be removed once a newer compiler is available on that platform. * The system that had the failure was running OpenBSD 3.2 on Intel, with * gcc 2.95.3. * * According to Tim's checkin, the FreeBSD systems use isinf() to work * around a FPE bug on that platform. */ #if defined(__FreeBSD__) || defined(__OpenBSD__) #define Py_OVERFLOWED(X) isinf(X) #else #define Py_OVERFLOWED(X) ((X) != 0.0 && (errno == ERANGE || \ (X) == Py_HUGE_VAL || \ (X) == -Py_HUGE_VAL)) #endif /* Py_SET_ERANGE_ON_OVERFLOW(x) * If a libm function did not set errno, but it looks like the result * overflowed, set errno to ERANGE. Set errno to 0 before calling a libm * function, and invoke this macro after, passing the function result. * Caution: * This isn't reliable. See Py_OVERFLOWED comments. * X is evaluated more than once. */ #define Py_SET_ERANGE_IF_OVERFLOW(X) \ do { \ if (errno == 0 && ((X) == Py_HUGE_VAL || \ (X) == -Py_HUGE_VAL)) \ errno = ERANGE; \ } while(0) /* Py_ADJUST_ERANGE1(x) * Py_ADJUST_ERANGE2(x, y) * Set errno to 0 before calling a libm function, and invoke one of these * macros after, passing the function result(s) (Py_ADJUST_ERANGE2 is useful * for functions returning complex results). This makes two kinds of * adjustments to errno: (A) If it looks like the platform libm set * errno=ERANGE due to underflow, clear errno. (B) If it looks like the * platform libm overflowed but didn't set errno, force errno to ERANGE. In * effect, we're trying to force a useful implementation of C89 errno * behavior. * Caution: * This isn't reliable. See Py_OVERFLOWED comments. * X and Y may be evaluated more than once. */ #define Py_ADJUST_ERANGE1(X) \ do { \ if (errno == 0) { \ if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL) \ errno = ERANGE; \ } \ else if (errno == ERANGE && (X) == 0.0) \ errno = 0; \ } while(0) #define Py_ADJUST_ERANGE2(X, Y) \ do { \ if ((X) == Py_HUGE_VAL || (X) == -Py_HUGE_VAL || \ (Y) == Py_HUGE_VAL || (Y) == -Py_HUGE_VAL) { \ if (errno == 0) \ errno = ERANGE; \ } \ else if (errno == ERANGE) \ errno = 0; \ } while(0) /* Py_DEPRECATED(version) * Declare a variable, type, or function deprecated. * Usage: * extern int old_var Py_DEPRECATED(2.3); * typedef int T1 Py_DEPRECATED(2.4); * extern int x() Py_DEPRECATED(2.5); */ #if defined(__GNUC__) && (__GNUC__ == 3) && (__GNUC_MINOR__ >= 1) #define Py_DEPRECATED(VERSION_UNUSED) __attribute__((__deprecated__)) #else #define Py_DEPRECATED(VERSION_UNUSED) #endif /************************************************************************** Prototypes that are missing from the standard include files on some systems (and possibly only some versions of such systems.) Please be conservative with adding new ones, document them and enclose them in platform-specific #ifdefs. **************************************************************************/ #ifdef SOLARIS /* Unchecked */ extern int gethostname(char *, int); #endif #ifdef __BEOS__ /* Unchecked */ /* It's in the libs, but not the headers... - [cjh] */ int shutdown( int, int ); #endif #ifdef HAVE__GETPTY #include /* we need to import mode_t */ extern char * _getpty(int *, int, mode_t, int); #endif #if defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY) #if !defined(HAVE_PTY_H) && !defined(HAVE_LIBUTIL_H) /* BSDI does not supply a prototype for the 'openpty' and 'forkpty' functions, even though they are included in libutil. */ #include extern int openpty(int *, int *, char *, struct termios *, struct winsize *); extern int forkpty(int *, char *, struct termios *, struct winsize *); #endif /* !defined(HAVE_PTY_H) && !defined(HAVE_LIBUTIL_H) */ #endif /* defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY) */ /* These are pulled from various places. It isn't obvious on what platforms they are necessary, nor what the exact prototype should look like (which is likely to vary between platforms!) If you find you need one of these declarations, please move them to a platform-specific block and include proper prototypes. */ #if 0 /* From Modules/resource.c */ extern int getrusage(); extern int getpagesize(); /* From Python/sysmodule.c and Modules/posixmodule.c */ extern int fclose(FILE *); /* From Modules/posixmodule.c */ extern int fdatasync(int); /* XXX These are supposedly for SunOS4.1.3 but "shouldn't hurt elsewhere" */ extern int rename(const char *, const char *); extern int pclose(FILE *); extern int lstat(const char *, struct stat *); extern int symlink(const char *, const char *); extern int fsync(int fd); #endif /* 0 */ /************************ * WRAPPER FOR * ************************/ #ifndef HAVE_HYPOT extern double hypot(double, double); #endif /* Declarations for symbol visibility. PyAPI_FUNC(type): Declares a public Python API function and return type PyAPI_DATA(type): Declares public Python data and its type PyMODINIT_FUNC: A Python module init function. If these functions are inside the Python core, they are private to the core. If in an extension module, it may be declared with external linkage depending on the platform. As a number of platforms support/require "__declspec(dllimport/dllexport)", we support a HAVE_DECLSPEC_DLL macro to save duplication. */ /* All windows ports, except cygwin, are handled in PC/pyconfig.h. BeOS and cygwin are the only other autoconf platform requiring special linkage handling and both of these use __declspec(). */ #if defined(__CYGWIN__) || defined(__BEOS__) # define HAVE_DECLSPEC_DLL #endif #if defined(Py_ENABLE_SHARED) /* only get special linkage if built as shared */ # if defined(HAVE_DECLSPEC_DLL) # ifdef Py_BUILD_CORE # define PyAPI_FUNC(RTYPE) __declspec(dllexport) RTYPE # define PyAPI_DATA(RTYPE) extern __declspec(dllexport) RTYPE /* module init functions inside the core need no external linkage */ # define PyMODINIT_FUNC void # else /* Py_BUILD_CORE */ /* Building an extension module, or an embedded situation */ /* public Python functions and data are imported */ /* Under Cygwin, auto-import functions to prevent compilation */ /* failures similar to http://python.org/doc/FAQ.html#3.24 */ # if !defined(__CYGWIN__) # define PyAPI_FUNC(RTYPE) __declspec(dllimport) RTYPE # endif /* !__CYGWIN__ */ # define PyAPI_DATA(RTYPE) extern __declspec(dllimport) RTYPE /* module init functions outside the core must be exported */ # if defined(__cplusplus) # define PyMODINIT_FUNC extern "C" __declspec(dllexport) void # else /* __cplusplus */ # define PyMODINIT_FUNC __declspec(dllexport) void # endif /* __cplusplus */ # endif /* Py_BUILD_CORE */ # endif /* HAVE_DECLSPEC */ #endif /* Py_ENABLE_SHARED */ /* If no external linkage macros defined by now, create defaults */ #ifndef PyAPI_FUNC # define PyAPI_FUNC(RTYPE) RTYPE #endif #ifndef PyAPI_DATA # define PyAPI_DATA(RTYPE) extern RTYPE #endif #ifndef PyMODINIT_FUNC # if defined(__cplusplus) # define PyMODINIT_FUNC extern "C" void # else /* __cplusplus */ # define PyMODINIT_FUNC void # endif /* __cplusplus */ #endif /* Deprecated DL_IMPORT and DL_EXPORT macros */ #if defined(Py_ENABLE_SHARED) && defined (HAVE_DECLSPEC_DLL) # if defined(Py_BUILD_CORE) # define DL_IMPORT(RTYPE) __declspec(dllexport) RTYPE # define DL_EXPORT(RTYPE) __declspec(dllexport) RTYPE # else # define DL_IMPORT(RTYPE) __declspec(dllimport) RTYPE # define DL_EXPORT(RTYPE) __declspec(dllexport) RTYPE # endif #endif #ifndef DL_EXPORT # define DL_EXPORT(RTYPE) RTYPE #endif #ifndef DL_IMPORT # define DL_IMPORT(RTYPE) RTYPE #endif /* End of deprecated DL_* macros */ /* If the fd manipulation macros aren't defined, here is a set that should do the job */ #if 0 /* disabled and probably obsolete */ #ifndef FD_SETSIZE #define FD_SETSIZE 256 #endif #ifndef FD_SET typedef long fd_mask; #define NFDBITS (sizeof(fd_mask) * NBBY) /* bits per mask */ #ifndef howmany #define howmany(x, y) (((x)+((y)-1))/(y)) #endif /* howmany */ typedef struct fd_set { fd_mask fds_bits[howmany(FD_SETSIZE, NFDBITS)]; } fd_set; #define FD_SET(n, p) ((p)->fds_bits[(n)/NFDBITS] |= (1 << ((n) % NFDBITS))) #define FD_CLR(n, p) ((p)->fds_bits[(n)/NFDBITS] &= ~(1 << ((n) % NFDBITS))) #define FD_ISSET(n, p) ((p)->fds_bits[(n)/NFDBITS] & (1 << ((n) % NFDBITS))) #define FD_ZERO(p) memset((char *)(p), '\0', sizeof(*(p))) #endif /* FD_SET */ #endif /* fd manipulation macros */ /* limits.h constants that may be missing */ #ifndef INT_MAX #define INT_MAX 2147483647 #endif #ifndef LONG_MAX #if SIZEOF_LONG == 4 #define LONG_MAX 0X7FFFFFFFL #elif SIZEOF_LONG == 8 #define LONG_MAX 0X7FFFFFFFFFFFFFFFL #else #error "could not set LONG_MAX in pyport.h" #endif #endif #ifndef LONG_MIN #define LONG_MIN (-LONG_MAX-1) #endif #ifndef LONG_BIT #define LONG_BIT (8 * SIZEOF_LONG) #endif #if LONG_BIT != 8 * SIZEOF_LONG /* 04-Oct-2000 LONG_BIT is apparently (mis)defined as 64 on some recent * 32-bit platforms using gcc. We try to catch that here at compile-time * rather than waiting for integer multiplication to trigger bogus * overflows. */ #error "LONG_BIT definition appears wrong for platform (bad gcc/glibc config?)." #endif /* Largest possible value of size_t. SIZE_MAX is part of C99, so it might be defined on some platforms. If it is not defined, (size_t)-1 is a portable definition for C89, due to the way signed->unsigned conversion is defined. */ #ifdef SIZE_MAX #define PY_SIZE_MAX SIZE_MAX #else #define PY_SIZE_MAX ((size_t)-1) #endif #ifdef __cplusplus } #endif /* * Hide GCC attributes from compilers that don't support them. */ #if (!defined(__GNUC__) || __GNUC__ < 2 || \ (__GNUC__ == 2 && __GNUC_MINOR__ < 7) ) && \ !defined(RISCOS) #define Py_GCC_ATTRIBUTE(x) #else #define Py_GCC_ATTRIBUTE(x) __attribute__(x) #endif #endif /* Py_PYPORT_H */ Python-2.3.7/Include/opcode.h0000644001241000117560000001024107651674763015300 0ustar loewishpifb6#ifndef Py_OPCODE_H #define Py_OPCODE_H #ifdef __cplusplus extern "C" { #endif /* Instruction opcodes for compiled code */ #define STOP_CODE 0 #define POP_TOP 1 #define ROT_TWO 2 #define ROT_THREE 3 #define DUP_TOP 4 #define ROT_FOUR 5 #define UNARY_POSITIVE 10 #define UNARY_NEGATIVE 11 #define UNARY_NOT 12 #define UNARY_CONVERT 13 #define UNARY_INVERT 15 #define BINARY_POWER 19 #define BINARY_MULTIPLY 20 #define BINARY_DIVIDE 21 #define BINARY_MODULO 22 #define BINARY_ADD 23 #define BINARY_SUBTRACT 24 #define BINARY_SUBSCR 25 #define BINARY_FLOOR_DIVIDE 26 #define BINARY_TRUE_DIVIDE 27 #define INPLACE_FLOOR_DIVIDE 28 #define INPLACE_TRUE_DIVIDE 29 #define SLICE 30 /* Also uses 31-33 */ #define STORE_SLICE 40 /* Also uses 41-43 */ #define DELETE_SLICE 50 /* Also uses 51-53 */ #define INPLACE_ADD 55 #define INPLACE_SUBTRACT 56 #define INPLACE_MULTIPLY 57 #define INPLACE_DIVIDE 58 #define INPLACE_MODULO 59 #define STORE_SUBSCR 60 #define DELETE_SUBSCR 61 #define BINARY_LSHIFT 62 #define BINARY_RSHIFT 63 #define BINARY_AND 64 #define BINARY_XOR 65 #define BINARY_OR 66 #define INPLACE_POWER 67 #define GET_ITER 68 #define PRINT_EXPR 70 #define PRINT_ITEM 71 #define PRINT_NEWLINE 72 #define PRINT_ITEM_TO 73 #define PRINT_NEWLINE_TO 74 #define INPLACE_LSHIFT 75 #define INPLACE_RSHIFT 76 #define INPLACE_AND 77 #define INPLACE_XOR 78 #define INPLACE_OR 79 #define BREAK_LOOP 80 #define LOAD_LOCALS 82 #define RETURN_VALUE 83 #define IMPORT_STAR 84 #define EXEC_STMT 85 #define YIELD_VALUE 86 #define POP_BLOCK 87 #define END_FINALLY 88 #define BUILD_CLASS 89 #define HAVE_ARGUMENT 90 /* Opcodes from here have an argument: */ #define STORE_NAME 90 /* Index in name list */ #define DELETE_NAME 91 /* "" */ #define UNPACK_SEQUENCE 92 /* Number of sequence items */ #define FOR_ITER 93 #define STORE_ATTR 95 /* Index in name list */ #define DELETE_ATTR 96 /* "" */ #define STORE_GLOBAL 97 /* "" */ #define DELETE_GLOBAL 98 /* "" */ #define DUP_TOPX 99 /* number of items to duplicate */ #define LOAD_CONST 100 /* Index in const list */ #define LOAD_NAME 101 /* Index in name list */ #define BUILD_TUPLE 102 /* Number of tuple items */ #define BUILD_LIST 103 /* Number of list items */ #define BUILD_MAP 104 /* Always zero for now */ #define LOAD_ATTR 105 /* Index in name list */ #define COMPARE_OP 106 /* Comparison operator */ #define IMPORT_NAME 107 /* Index in name list */ #define IMPORT_FROM 108 /* Index in name list */ #define JUMP_FORWARD 110 /* Number of bytes to skip */ #define JUMP_IF_FALSE 111 /* "" */ #define JUMP_IF_TRUE 112 /* "" */ #define JUMP_ABSOLUTE 113 /* Target byte offset from beginning of code */ #define LOAD_GLOBAL 116 /* Index in name list */ #define CONTINUE_LOOP 119 /* Start of loop (absolute) */ #define SETUP_LOOP 120 /* Target address (absolute) */ #define SETUP_EXCEPT 121 /* "" */ #define SETUP_FINALLY 122 /* "" */ #define LOAD_FAST 124 /* Local variable number */ #define STORE_FAST 125 /* Local variable number */ #define DELETE_FAST 126 /* Local variable number */ #define RAISE_VARARGS 130 /* Number of raise arguments (1, 2 or 3) */ /* CALL_FUNCTION_XXX opcodes defined below depend on this definition */ #define CALL_FUNCTION 131 /* #args + (#kwargs<<8) */ #define MAKE_FUNCTION 132 /* #defaults */ #define BUILD_SLICE 133 /* Number of items */ #define MAKE_CLOSURE 134 /* #free vars */ #define LOAD_CLOSURE 135 /* Load free variable from closure */ #define LOAD_DEREF 136 /* Load and dereference from closure cell */ #define STORE_DEREF 137 /* Store into cell */ /* The next 3 opcodes must be contiguous and satisfy (CALL_FUNCTION_VAR - CALL_FUNCTION) & 3 == 1 */ #define CALL_FUNCTION_VAR 140 /* #args + (#kwargs<<8) */ #define CALL_FUNCTION_KW 141 /* #args + (#kwargs<<8) */ #define CALL_FUNCTION_VAR_KW 142 /* #args + (#kwargs<<8) */ /* Support for opargs more than 16 bits long */ #define EXTENDED_ARG 143 enum cmp_op {PyCmp_LT=Py_LT, PyCmp_LE=Py_LE, PyCmp_EQ=Py_EQ, PyCmp_NE=Py_NE, PyCmp_GT=Py_GT, PyCmp_GE=Py_GE, PyCmp_IN, PyCmp_NOT_IN, PyCmp_IS, PyCmp_IS_NOT, PyCmp_EXC_MATCH, PyCmp_BAD}; #define HAS_ARG(op) ((op) >= HAVE_ARGUMENT) #ifdef __cplusplus } #endif #endif /* !Py_OPCODE_H */ Python-2.3.7/Include/structmember.h0000644001241000117560000000477407525661026016545 0ustar loewishpifb6#ifndef Py_STRUCTMEMBER_H #define Py_STRUCTMEMBER_H #ifdef __cplusplus extern "C" { #endif /* Interface to map C struct members to Python object attributes */ #ifdef HAVE_STDDEF_H #include /* For offsetof */ #endif /* The offsetof() macro calculates the offset of a structure member in its structure. Unfortunately this cannot be written down portably, hence it is provided by a Standard C header file. For pre-Standard C compilers, here is a version that usually works (but watch out!): */ #ifndef offsetof #define offsetof(type, member) ( (int) & ((type*)0) -> member ) #endif /* An array of memberlist structures defines the name, type and offset of selected members of a C structure. These can be read by PyMember_Get() and set by PyMember_Set() (except if their READONLY flag is set). The array must be terminated with an entry whose name pointer is NULL. */ struct memberlist { /* Obsolete version, for binary backwards compatibility */ char *name; int type; int offset; int flags; }; typedef struct PyMemberDef { /* Current version, use this */ char *name; int type; int offset; int flags; char *doc; } PyMemberDef; /* Types */ #define T_SHORT 0 #define T_INT 1 #define T_LONG 2 #define T_FLOAT 3 #define T_DOUBLE 4 #define T_STRING 5 #define T_OBJECT 6 /* XXX the ordering here is weird for binary compatibility */ #define T_CHAR 7 /* 1-character string */ #define T_BYTE 8 /* 8-bit signed int */ /* unsigned variants: */ #define T_UBYTE 9 #define T_USHORT 10 #define T_UINT 11 #define T_ULONG 12 /* Added by Jack: strings contained in the structure */ #define T_STRING_INPLACE 13 #ifdef macintosh #define T_PSTRING 14 /* macintosh pascal-style counted string */ #define T_PSTRING_INPLACE 15 #endif /* macintosh */ #define T_OBJECT_EX 16 /* Like T_OBJECT, but raises AttributeError when the value is NULL, instead of converting to None. */ /* Flags */ #define READONLY 1 #define RO READONLY /* Shorthand */ #define READ_RESTRICTED 2 #define WRITE_RESTRICTED 4 #define RESTRICTED (READ_RESTRICTED | WRITE_RESTRICTED) /* Obsolete API, for binary backwards compatibility */ PyAPI_FUNC(PyObject *) PyMember_Get(char *, struct memberlist *, char *); PyAPI_FUNC(int) PyMember_Set(char *, struct memberlist *, char *, PyObject *); /* Current API, use this */ PyAPI_FUNC(PyObject *) PyMember_GetOne(char *, struct PyMemberDef *); PyAPI_FUNC(int) PyMember_SetOne(char *, struct PyMemberDef *, PyObject *); #ifdef __cplusplus } #endif #endif /* !Py_STRUCTMEMBER_H */ Python-2.3.7/Include/boolobject.h0000644001241000117560000000133507525661026016141 0ustar loewishpifb6/* Boolean object interface */ #ifndef Py_BOOLOBJECT_H #define Py_BOOLOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef PyIntObject PyBoolObject; PyAPI_DATA(PyTypeObject) PyBool_Type; #define PyBool_Check(x) ((x)->ob_type == &PyBool_Type) /* Py_False and Py_True are the only two bools in existence. Don't forget to apply Py_INCREF() when returning either!!! */ /* Don't use these directly */ PyAPI_DATA(PyIntObject) _Py_ZeroStruct, _Py_TrueStruct; /* Use these macros */ #define Py_False ((PyObject *) &_Py_ZeroStruct) #define Py_True ((PyObject *) &_Py_TrueStruct) /* Function to return a bool from a C long */ PyAPI_FUNC(PyObject *) PyBool_FromLong(long); #ifdef __cplusplus } #endif #endif /* !Py_BOOLOBJECT_H */ Python-2.3.7/Include/ceval.h0000644001241000117560000000774207625213565015123 0ustar loewishpifb6#ifndef Py_CEVAL_H #define Py_CEVAL_H #ifdef __cplusplus extern "C" { #endif /* Interface to random parts in ceval.c */ PyAPI_FUNC(PyObject *) PyEval_CallObjectWithKeywords( PyObject *, PyObject *, PyObject *); /* DLL-level Backwards compatibility: */ #undef PyEval_CallObject PyAPI_FUNC(PyObject *) PyEval_CallObject(PyObject *, PyObject *); /* Inline this */ #define PyEval_CallObject(func,arg) \ PyEval_CallObjectWithKeywords(func, arg, (PyObject *)NULL) PyAPI_FUNC(PyObject *) PyEval_CallFunction(PyObject *obj, char *format, ...); PyAPI_FUNC(PyObject *) PyEval_CallMethod(PyObject *obj, char *methodname, char *format, ...); PyAPI_FUNC(void) PyEval_SetProfile(Py_tracefunc, PyObject *); PyAPI_FUNC(void) PyEval_SetTrace(Py_tracefunc, PyObject *); struct _frame; /* Avoid including frameobject.h */ PyAPI_FUNC(PyObject *) PyEval_GetBuiltins(void); PyAPI_FUNC(PyObject *) PyEval_GetGlobals(void); PyAPI_FUNC(PyObject *) PyEval_GetLocals(void); PyAPI_FUNC(struct _frame *) PyEval_GetFrame(void); PyAPI_FUNC(int) PyEval_GetRestricted(void); /* Look at the current frame's (if any) code's co_flags, and turn on the corresponding compiler flags in cf->cf_flags. Return 1 if any flag was set, else return 0. */ PyAPI_FUNC(int) PyEval_MergeCompilerFlags(PyCompilerFlags *cf); PyAPI_FUNC(int) Py_FlushLine(void); PyAPI_FUNC(int) Py_AddPendingCall(int (*func)(void *), void *arg); PyAPI_FUNC(int) Py_MakePendingCalls(void); PyAPI_FUNC(void) Py_SetRecursionLimit(int); PyAPI_FUNC(int) Py_GetRecursionLimit(void); PyAPI_FUNC(char *) PyEval_GetFuncName(PyObject *); PyAPI_FUNC(char *) PyEval_GetFuncDesc(PyObject *); PyAPI_FUNC(PyObject *) PyEval_GetCallStats(PyObject *); /* this used to be handled on a per-thread basis - now just two globals */ PyAPI_DATA(volatile int) _Py_Ticker; PyAPI_DATA(int) _Py_CheckInterval; /* Interface for threads. A module that plans to do a blocking system call (or something else that lasts a long time and doesn't touch Python data) can allow other threads to run as follows: ...preparations here... Py_BEGIN_ALLOW_THREADS ...blocking system call here... Py_END_ALLOW_THREADS ...interpret result here... The Py_BEGIN_ALLOW_THREADS/Py_END_ALLOW_THREADS pair expands to a {}-surrounded block. To leave the block in the middle (e.g., with return), you must insert a line containing Py_BLOCK_THREADS before the return, e.g. if (...premature_exit...) { Py_BLOCK_THREADS PyErr_SetFromErrno(PyExc_IOError); return NULL; } An alternative is: Py_BLOCK_THREADS if (...premature_exit...) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } Py_UNBLOCK_THREADS For convenience, that the value of 'errno' is restored across Py_END_ALLOW_THREADS and Py_BLOCK_THREADS. WARNING: NEVER NEST CALLS TO Py_BEGIN_ALLOW_THREADS AND Py_END_ALLOW_THREADS!!! The function PyEval_InitThreads() should be called only from initthread() in "threadmodule.c". Note that not yet all candidates have been converted to use this mechanism! */ PyAPI_FUNC(PyThreadState *) PyEval_SaveThread(void); PyAPI_FUNC(void) PyEval_RestoreThread(PyThreadState *); #ifdef WITH_THREAD PyAPI_FUNC(void) PyEval_InitThreads(void); PyAPI_FUNC(void) PyEval_AcquireLock(void); PyAPI_FUNC(void) PyEval_ReleaseLock(void); PyAPI_FUNC(void) PyEval_AcquireThread(PyThreadState *tstate); PyAPI_FUNC(void) PyEval_ReleaseThread(PyThreadState *tstate); PyAPI_FUNC(void) PyEval_ReInitThreads(void); #define Py_BEGIN_ALLOW_THREADS { \ PyThreadState *_save; \ _save = PyEval_SaveThread(); #define Py_BLOCK_THREADS PyEval_RestoreThread(_save); #define Py_UNBLOCK_THREADS _save = PyEval_SaveThread(); #define Py_END_ALLOW_THREADS PyEval_RestoreThread(_save); \ } #else /* !WITH_THREAD */ #define Py_BEGIN_ALLOW_THREADS { #define Py_BLOCK_THREADS #define Py_UNBLOCK_THREADS #define Py_END_ALLOW_THREADS } #endif /* !WITH_THREAD */ PyAPI_FUNC(int) _PyEval_SliceIndex(PyObject *, int *); #ifdef __cplusplus } #endif #endif /* !Py_CEVAL_H */ Python-2.3.7/Include/stringobject.h0000644001241000117560000001402007700365731016506 0ustar loewishpifb6 /* String object interface */ #ifndef Py_STRINGOBJECT_H #define Py_STRINGOBJECT_H #ifdef __cplusplus extern "C" { #endif #include /* Type PyStringObject represents a character string. An extra zero byte is reserved at the end to ensure it is zero-terminated, but a size is present so strings with null bytes in them can be represented. This is an immutable object type. There are functions to create new string objects, to test an object for string-ness, and to get the string value. The latter function returns a null pointer if the object is not of the proper type. There is a variant that takes an explicit size as well as a variant that assumes a zero-terminated string. Note that none of the functions should be applied to nil objects. */ /* Caching the hash (ob_shash) saves recalculation of a string's hash value. Interning strings (ob_sstate) tries to ensure that only one string object with a given value exists, so equality tests can be one pointer comparison. This is generally restricted to strings that "look like" Python identifiers, although the intern() builtin can be used to force interning of any string. Together, these sped the interpreter by up to 20%. */ typedef struct { PyObject_VAR_HEAD long ob_shash; int ob_sstate; char ob_sval[1]; } PyStringObject; #define SSTATE_NOT_INTERNED 0 #define SSTATE_INTERNED_MORTAL 1 #define SSTATE_INTERNED_IMMORTAL 2 PyAPI_DATA(PyTypeObject) PyBaseString_Type; PyAPI_DATA(PyTypeObject) PyString_Type; #define PyString_Check(op) PyObject_TypeCheck(op, &PyString_Type) #define PyString_CheckExact(op) ((op)->ob_type == &PyString_Type) PyAPI_FUNC(PyObject *) PyString_FromStringAndSize(const char *, int); PyAPI_FUNC(PyObject *) PyString_FromString(const char *); PyAPI_FUNC(PyObject *) PyString_FromFormatV(const char*, va_list) Py_GCC_ATTRIBUTE((format(printf, 1, 0))); PyAPI_FUNC(PyObject *) PyString_FromFormat(const char*, ...) Py_GCC_ATTRIBUTE((format(printf, 1, 2))); PyAPI_FUNC(int) PyString_Size(PyObject *); PyAPI_FUNC(char *) PyString_AsString(PyObject *); PyAPI_FUNC(PyObject *) PyString_Repr(PyObject *, int); PyAPI_FUNC(void) PyString_Concat(PyObject **, PyObject *); PyAPI_FUNC(void) PyString_ConcatAndDel(PyObject **, PyObject *); PyAPI_FUNC(int) _PyString_Resize(PyObject **, int); PyAPI_FUNC(int) _PyString_Eq(PyObject *, PyObject*); PyAPI_FUNC(PyObject *) PyString_Format(PyObject *, PyObject *); PyAPI_FUNC(PyObject *) _PyString_FormatLong(PyObject*, int, int, int, char**, int*); PyAPI_FUNC(PyObject *) PyString_DecodeEscape(const char *, int, const char *, int, const char *); PyAPI_FUNC(void) PyString_InternInPlace(PyObject **); PyAPI_FUNC(void) PyString_InternImmortal(PyObject **); PyAPI_FUNC(PyObject *) PyString_InternFromString(const char *); PyAPI_FUNC(void) _Py_ReleaseInternedStrings(void); /* Use only if you know it's a string */ #define PyString_CHECK_INTERNED(op) (((PyStringObject *)(op))->ob_sstate) /* Macro, trading safety for speed */ #define PyString_AS_STRING(op) (((PyStringObject *)(op))->ob_sval) #define PyString_GET_SIZE(op) (((PyStringObject *)(op))->ob_size) /* _PyString_Join(sep, x) is like sep.join(x). sep must be PyStringObject*, x must be an iterable object. */ PyAPI_FUNC(PyObject *) _PyString_Join(PyObject *sep, PyObject *x); /* --- Generic Codecs ----------------------------------------------------- */ /* Create an object by decoding the encoded string s of the given size. */ PyAPI_FUNC(PyObject*) PyString_Decode( const char *s, /* encoded string */ int size, /* size of buffer */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Encodes a char buffer of the given size and returns a Python object. */ PyAPI_FUNC(PyObject*) PyString_Encode( const char *s, /* string char buffer */ int size, /* number of chars to encode */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Encodes a string object and returns the result as Python object. */ PyAPI_FUNC(PyObject*) PyString_AsEncodedObject( PyObject *str, /* string object */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Encodes a string object and returns the result as Python string object. If the codec returns an Unicode object, the object is converted back to a string using the default encoding. DEPRECATED - use PyString_AsEncodedObject() instead. */ PyAPI_FUNC(PyObject*) PyString_AsEncodedString( PyObject *str, /* string object */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Decodes a string object and returns the result as Python object. */ PyAPI_FUNC(PyObject*) PyString_AsDecodedObject( PyObject *str, /* string object */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Decodes a string object and returns the result as Python string object. If the codec returns an Unicode object, the object is converted back to a string using the default encoding. DEPRECATED - use PyString_AsDecodedObject() instead. */ PyAPI_FUNC(PyObject*) PyString_AsDecodedString( PyObject *str, /* string object */ const char *encoding, /* encoding */ const char *errors /* error handling */ ); /* Provides access to the internal data buffer and size of a string object or the default encoded version of an Unicode object. Passing NULL as *len parameter will force the string buffer to be 0-terminated (passing a string with embedded NULL characters will cause an exception). */ PyAPI_FUNC(int) PyString_AsStringAndSize( register PyObject *obj, /* string or Unicode object */ register char **s, /* pointer to buffer variable */ register int *len /* pointer to length variable or NULL (only possible for 0-terminated strings) */ ); #ifdef __cplusplus } #endif #endif /* !Py_STRINGOBJECT_H */ Python-2.3.7/Include/pystate.h0000644001241000117560000001216407677407160015517 0ustar loewishpifb6 /* Thread and interpreter state structures and their interfaces */ #ifndef Py_PYSTATE_H #define Py_PYSTATE_H #ifdef __cplusplus extern "C" { #endif /* State shared between threads */ struct _ts; /* Forward */ struct _is; /* Forward */ typedef struct _is { struct _is *next; struct _ts *tstate_head; PyObject *modules; PyObject *sysdict; PyObject *builtins; PyObject *codec_search_path; PyObject *codec_search_cache; PyObject *codec_error_registry; #ifdef HAVE_DLOPEN int dlopenflags; #endif } PyInterpreterState; /* State unique per thread */ struct _frame; /* Avoid including frameobject.h */ /* Py_tracefunc return -1 when raising an exception, or 0 for success. */ typedef int (*Py_tracefunc)(PyObject *, struct _frame *, int, PyObject *); /* The following values are used for 'what' for tracefunc functions: */ #define PyTrace_CALL 0 #define PyTrace_EXCEPTION 1 #define PyTrace_LINE 2 #define PyTrace_RETURN 3 typedef struct _ts { struct _ts *next; PyInterpreterState *interp; struct _frame *frame; int recursion_depth; int tracing; int use_tracing; Py_tracefunc c_profilefunc; Py_tracefunc c_tracefunc; PyObject *c_profileobj; PyObject *c_traceobj; PyObject *curexc_type; PyObject *curexc_value; PyObject *curexc_traceback; PyObject *exc_type; PyObject *exc_value; PyObject *exc_traceback; PyObject *dict; int tick_counter; int gilstate_counter; PyObject *async_exc; /* Asynchronous exception to raise */ long thread_id; /* Thread id where this tstate was created */ /* XXX signal handlers should also be here */ } PyThreadState; PyAPI_FUNC(PyInterpreterState *) PyInterpreterState_New(void); PyAPI_FUNC(void) PyInterpreterState_Clear(PyInterpreterState *); PyAPI_FUNC(void) PyInterpreterState_Delete(PyInterpreterState *); PyAPI_FUNC(PyThreadState *) PyThreadState_New(PyInterpreterState *); PyAPI_FUNC(void) PyThreadState_Clear(PyThreadState *); PyAPI_FUNC(void) PyThreadState_Delete(PyThreadState *); #ifdef WITH_THREAD PyAPI_FUNC(void) PyThreadState_DeleteCurrent(void); #endif PyAPI_FUNC(PyThreadState *) PyThreadState_Get(void); PyAPI_FUNC(PyThreadState *) PyThreadState_Swap(PyThreadState *); PyAPI_FUNC(PyObject *) PyThreadState_GetDict(void); PyAPI_FUNC(int) PyThreadState_SetAsyncExc(long, PyObject *); /* Variable and macro for in-line access to current thread state */ PyAPI_DATA(PyThreadState *) _PyThreadState_Current; #ifdef Py_DEBUG #define PyThreadState_GET() PyThreadState_Get() #else #define PyThreadState_GET() (_PyThreadState_Current) #endif typedef enum {PyGILState_LOCKED, PyGILState_UNLOCKED} PyGILState_STATE; /* Ensure that the current thread is ready to call the Python C API, regardless of the current state of Python, or of its thread lock. This may be called as many times as desired by a thread so long as each call is matched with a call to PyGILState_Release(). In general, other thread-state APIs may be used between _Ensure() and _Release() calls, so long as the thread-state is restored to its previous state before the Release(). For example, normal use of the Py_BEGIN_ALLOW_THREADS/ Py_END_ALLOW_THREADS macros are acceptable. The return value is an opaque "handle" to the thread state when PyGILState_Acquire() was called, and must be passed to PyGILState_Release() to ensure Python is left in the same state. Even though recursive calls are allowed, these handles can *not* be shared - each unique call to PyGILState_Ensure must save the handle for its call to PyGILState_Release. When the function returns, the current thread will hold the GIL. Failure is a fatal error. */ PyAPI_FUNC(PyGILState_STATE) PyGILState_Ensure(void); /* Release any resources previously acquired. After this call, Python's state will be the same as it was prior to the corresponding PyGILState_Acquire call (but generally this state will be unknown to the caller, hence the use of the GILState API.) Every call to PyGILState_Ensure must be matched by a call to PyGILState_Release on the same thread. */ PyAPI_FUNC(void) PyGILState_Release(PyGILState_STATE); /* Helper/diagnostic function - get the current thread state for this thread. May return NULL if no GILState API has been used on the current thread. Note the main thread always has such a thread-state, even if no auto-thread-state call has been made on the main thread. */ PyAPI_FUNC(PyThreadState *) PyGILState_GetThisThreadState(void); /* Routines for advanced debuggers, requested by David Beazley. Don't use unless you know what you are doing! */ PyAPI_FUNC(PyInterpreterState *) PyInterpreterState_Head(void); PyAPI_FUNC(PyInterpreterState *) PyInterpreterState_Next(PyInterpreterState *); PyAPI_FUNC(PyThreadState *) PyInterpreterState_ThreadHead(PyInterpreterState *); PyAPI_FUNC(PyThreadState *) PyThreadState_Next(PyThreadState *); typedef struct _frame *(*PyThreadFrameGetter)(PyThreadState *self_); /* hook for PyEval_GetFrame(), requested for Psyco */ PyAPI_DATA(PyThreadFrameGetter) _PyThreadState_GetFrame; #ifdef __cplusplus } #endif #endif /* !Py_PYSTATE_H */ Python-2.3.7/Include/codecs.h0000644001241000117560000001110007534662070015246 0ustar loewishpifb6#ifndef Py_CODECREGISTRY_H #define Py_CODECREGISTRY_H #ifdef __cplusplus extern "C" { #endif /* ------------------------------------------------------------------------ Python Codec Registry and support functions Written by Marc-Andre Lemburg (mal@lemburg.com). Copyright (c) Corporation for National Research Initiatives. ------------------------------------------------------------------------ */ /* Register a new codec search function. As side effect, this tries to load the encodings package, if not yet done, to make sure that it is always first in the list of search functions. The search_function's refcount is incremented by this function. */ PyAPI_FUNC(int) PyCodec_Register( PyObject *search_function ); /* Codec register lookup API. Looks up the given encoding and returns a tuple (encoder, decoder, stream reader, stream writer) of functions which implement the different aspects of processing the encoding. The encoding string is looked up converted to all lower-case characters. This makes encodings looked up through this mechanism effectively case-insensitive. If no codec is found, a KeyError is set and NULL returned. As side effect, this tries to load the encodings package, if not yet done. This is part of the lazy load strategy for the encodings package. */ PyAPI_FUNC(PyObject *) _PyCodec_Lookup( const char *encoding ); /* Generic codec based encoding API. object is passed through the encoder function found for the given encoding using the error handling method defined by errors. errors may be NULL to use the default method defined for the codec. Raises a LookupError in case no encoder can be found. */ PyAPI_FUNC(PyObject *) PyCodec_Encode( PyObject *object, const char *encoding, const char *errors ); /* Generic codec based decoding API. object is passed through the decoder function found for the given encoding using the error handling method defined by errors. errors may be NULL to use the default method defined for the codec. Raises a LookupError in case no encoder can be found. */ PyAPI_FUNC(PyObject *) PyCodec_Decode( PyObject *object, const char *encoding, const char *errors ); /* --- Codec Lookup APIs -------------------------------------------------- All APIs return a codec object with incremented refcount and are based on _PyCodec_Lookup(). The same comments w/r to the encoding name also apply to these APIs. */ /* Get an encoder function for the given encoding. */ PyAPI_FUNC(PyObject *) PyCodec_Encoder( const char *encoding ); /* Get a decoder function for the given encoding. */ PyAPI_FUNC(PyObject *) PyCodec_Decoder( const char *encoding ); /* Get a StreamReader factory function for the given encoding. */ PyAPI_FUNC(PyObject *) PyCodec_StreamReader( const char *encoding, PyObject *stream, const char *errors ); /* Get a StreamWriter factory function for the given encoding. */ PyAPI_FUNC(PyObject *) PyCodec_StreamWriter( const char *encoding, PyObject *stream, const char *errors ); /* Unicode encoding error handling callback registry API */ /* Register the error handling callback function error under the name name. This function will be called by the codec when it encounters unencodable characters/undecodable bytes and doesn't know the callback name, when name is specified as the error parameter in the call to the encode/decode function. Return 0 on success, -1 on error */ PyAPI_FUNC(int) PyCodec_RegisterError(const char *name, PyObject *error); /* Lookup the error handling callback function registered under the name error. As a special case NULL can be passed, in which case the error handling callback for "strict" will be returned. */ PyAPI_FUNC(PyObject *) PyCodec_LookupError(const char *name); /* raise exc as an exception */ PyAPI_FUNC(PyObject *) PyCodec_StrictErrors(PyObject *exc); /* ignore the unicode error, skipping the faulty input */ PyAPI_FUNC(PyObject *) PyCodec_IgnoreErrors(PyObject *exc); /* replace the unicode error with ? or U+FFFD */ PyAPI_FUNC(PyObject *) PyCodec_ReplaceErrors(PyObject *exc); /* replace the unicode encode error with XML character references */ PyAPI_FUNC(PyObject *) PyCodec_XMLCharRefReplaceErrors(PyObject *exc); /* replace the unicode encode error with backslash escapes (\x, \u and \U) */ PyAPI_FUNC(PyObject *) PyCodec_BackslashReplaceErrors(PyObject *exc); #ifdef __cplusplus } #endif #endif /* !Py_CODECREGISTRY_H */ Python-2.3.7/Include/pythonrun.h0000644001241000117560000001257007623013477016070 0ustar loewishpifb6 /* Interfaces to parse and execute pieces of python code */ #ifndef Py_PYTHONRUN_H #define Py_PYTHONRUN_H #ifdef __cplusplus extern "C" { #endif #define PyCF_MASK (CO_FUTURE_DIVISION) #define PyCF_MASK_OBSOLETE (CO_GENERATOR_ALLOWED | CO_NESTED) #define PyCF_SOURCE_IS_UTF8 0x0100 #define PyCF_DONT_IMPLY_DEDENT 0x0200 typedef struct { int cf_flags; /* bitmask of CO_xxx flags relevant to future */ } PyCompilerFlags; PyAPI_FUNC(void) Py_SetProgramName(char *); PyAPI_FUNC(char *) Py_GetProgramName(void); PyAPI_FUNC(void) Py_SetPythonHome(char *); PyAPI_FUNC(char *) Py_GetPythonHome(void); PyAPI_FUNC(void) Py_Initialize(void); PyAPI_FUNC(void) Py_Finalize(void); PyAPI_FUNC(int) Py_IsInitialized(void); PyAPI_FUNC(PyThreadState *) Py_NewInterpreter(void); PyAPI_FUNC(void) Py_EndInterpreter(PyThreadState *); PyAPI_FUNC(int) PyRun_AnyFile(FILE *, const char *); PyAPI_FUNC(int) PyRun_AnyFileEx(FILE *, const char *, int); PyAPI_FUNC(int) PyRun_AnyFileFlags(FILE *, const char *, PyCompilerFlags *); PyAPI_FUNC(int) PyRun_AnyFileExFlags(FILE *, const char *, int, PyCompilerFlags *); PyAPI_FUNC(int) PyRun_SimpleString(const char *); PyAPI_FUNC(int) PyRun_SimpleStringFlags(const char *, PyCompilerFlags *); PyAPI_FUNC(int) PyRun_SimpleFile(FILE *, const char *); PyAPI_FUNC(int) PyRun_SimpleFileEx(FILE *, const char *, int); PyAPI_FUNC(int) PyRun_SimpleFileExFlags(FILE *, const char *, int, PyCompilerFlags *); PyAPI_FUNC(int) PyRun_InteractiveOne(FILE *, const char *); PyAPI_FUNC(int) PyRun_InteractiveOneFlags(FILE *, const char *, PyCompilerFlags *); PyAPI_FUNC(int) PyRun_InteractiveLoop(FILE *, const char *); PyAPI_FUNC(int) PyRun_InteractiveLoopFlags(FILE *, const char *, PyCompilerFlags *); PyAPI_FUNC(struct _node *) PyParser_SimpleParseString(const char *, int); PyAPI_FUNC(struct _node *) PyParser_SimpleParseFile(FILE *, const char *, int); PyAPI_FUNC(struct _node *) PyParser_SimpleParseStringFlags(const char *, int, int); PyAPI_FUNC(struct _node *) PyParser_SimpleParseStringFlagsFilename(const char *, const char *, int, int); PyAPI_FUNC(struct _node *) PyParser_SimpleParseFileFlags(FILE *, const char *, int, int); PyAPI_FUNC(PyObject *) PyRun_String(const char *, int, PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyRun_File(FILE *, const char *, int, PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyRun_FileEx(FILE *, const char *, int, PyObject *, PyObject *, int); PyAPI_FUNC(PyObject *) PyRun_StringFlags(const char *, int, PyObject *, PyObject *, PyCompilerFlags *); PyAPI_FUNC(PyObject *) PyRun_FileFlags(FILE *, const char *, int, PyObject *, PyObject *, PyCompilerFlags *); PyAPI_FUNC(PyObject *) PyRun_FileExFlags(FILE *, const char *, int, PyObject *, PyObject *, int, PyCompilerFlags *); PyAPI_FUNC(PyObject *) Py_CompileString(const char *, const char *, int); PyAPI_FUNC(PyObject *) Py_CompileStringFlags(const char *, const char *, int, PyCompilerFlags *); PyAPI_FUNC(struct symtable *) Py_SymtableString(const char *, const char *, int); PyAPI_FUNC(void) PyErr_Print(void); PyAPI_FUNC(void) PyErr_PrintEx(int); PyAPI_FUNC(void) PyErr_Display(PyObject *, PyObject *, PyObject *); PyAPI_FUNC(int) Py_AtExit(void (*func)(void)); PyAPI_FUNC(void) Py_Exit(int); PyAPI_FUNC(int) Py_FdIsInteractive(FILE *, const char *); /* Bootstrap */ PyAPI_FUNC(int) Py_Main(int argc, char **argv); /* In getpath.c */ PyAPI_FUNC(char *) Py_GetProgramFullPath(void); PyAPI_FUNC(char *) Py_GetPrefix(void); PyAPI_FUNC(char *) Py_GetExecPrefix(void); PyAPI_FUNC(char *) Py_GetPath(void); /* In their own files */ PyAPI_FUNC(const char *) Py_GetVersion(void); PyAPI_FUNC(const char *) Py_GetPlatform(void); PyAPI_FUNC(const char *) Py_GetCopyright(void); PyAPI_FUNC(const char *) Py_GetCompiler(void); PyAPI_FUNC(const char *) Py_GetBuildInfo(void); /* Internal -- various one-time initializations */ PyAPI_FUNC(PyObject *) _PyBuiltin_Init(void); PyAPI_FUNC(PyObject *) _PySys_Init(void); PyAPI_FUNC(void) _PyImport_Init(void); PyAPI_FUNC(void) _PyExc_Init(void); PyAPI_FUNC(void) _PyImportHooks_Init(void); PyAPI_FUNC(int) _PyFrame_Init(void); PyAPI_FUNC(int) _PyInt_Init(void); /* Various internal finalizers */ PyAPI_FUNC(void) _PyExc_Fini(void); PyAPI_FUNC(void) _PyImport_Fini(void); PyAPI_FUNC(void) PyMethod_Fini(void); PyAPI_FUNC(void) PyFrame_Fini(void); PyAPI_FUNC(void) PyCFunction_Fini(void); PyAPI_FUNC(void) PyTuple_Fini(void); PyAPI_FUNC(void) PyString_Fini(void); PyAPI_FUNC(void) PyInt_Fini(void); PyAPI_FUNC(void) PyFloat_Fini(void); PyAPI_FUNC(void) PyOS_FiniInterrupts(void); /* Stuff with no proper home (yet) */ PyAPI_FUNC(char *) PyOS_Readline(FILE *, FILE *, char *); PyAPI_DATA(int) (*PyOS_InputHook)(void); PyAPI_DATA(char) *(*PyOS_ReadlineFunctionPointer)(FILE *, FILE *, char *); /* Stack size, in "pointers" (so we get extra safety margins on 64-bit platforms). On a 32-bit platform, this translates to a 8k margin. */ #define PYOS_STACK_MARGIN 2048 #if defined(WIN32) && !defined(MS_WIN64) && defined(_MSC_VER) /* Enable stack checking under Microsoft C */ #define USE_STACKCHECK #endif #ifdef USE_STACKCHECK /* Check that we aren't overflowing our stack */ PyAPI_FUNC(int) PyOS_CheckStack(void); #endif /* Signals */ typedef void (*PyOS_sighandler_t)(int); PyAPI_FUNC(PyOS_sighandler_t) PyOS_getsig(int); PyAPI_FUNC(PyOS_sighandler_t) PyOS_setsig(int, PyOS_sighandler_t); #ifdef __cplusplus } #endif #endif /* !Py_PYTHONRUN_H */ Python-2.3.7/Include/object.h0000644001241000117560000006763507751235247015307 0ustar loewishpifb6#ifndef Py_OBJECT_H #define Py_OBJECT_H #ifdef __cplusplus extern "C" { #endif /* Object and type object interface */ /* Objects are structures allocated on the heap. Special rules apply to the use of objects to ensure they are properly garbage-collected. Objects are never allocated statically or on the stack; they must be accessed through special macros and functions only. (Type objects are exceptions to the first rule; the standard types are represented by statically initialized type objects, although work on type/class unification for Python 2.2 made it possible to have heap-allocated type objects too). An object has a 'reference count' that is increased or decreased when a pointer to the object is copied or deleted; when the reference count reaches zero there are no references to the object left and it can be removed from the heap. An object has a 'type' that determines what it represents and what kind of data it contains. An object's type is fixed when it is created. Types themselves are represented as objects; an object contains a pointer to the corresponding type object. The type itself has a type pointer pointing to the object representing the type 'type', which contains a pointer to itself!). Objects do not float around in memory; once allocated an object keeps the same size and address. Objects that must hold variable-size data can contain pointers to variable-size parts of the object. Not all objects of the same type have the same size; but the size cannot change after allocation. (These restrictions are made so a reference to an object can be simply a pointer -- moving an object would require updating all the pointers, and changing an object's size would require moving it if there was another object right next to it.) Objects are always accessed through pointers of the type 'PyObject *'. The type 'PyObject' is a structure that only contains the reference count and the type pointer. The actual memory allocated for an object contains other data that can only be accessed after casting the pointer to a pointer to a longer structure type. This longer type must start with the reference count and type fields; the macro PyObject_HEAD should be used for this (to accommodate for future changes). The implementation of a particular object type can cast the object pointer to the proper type and back. A standard interface exists for objects that contain an array of items whose size is determined when the object is allocated. */ /* Py_DEBUG implies Py_TRACE_REFS. */ #if defined(Py_DEBUG) && !defined(Py_TRACE_REFS) #define Py_TRACE_REFS #endif /* Py_TRACE_REFS implies Py_REF_DEBUG. */ #if defined(Py_TRACE_REFS) && !defined(Py_REF_DEBUG) #define Py_REF_DEBUG #endif #ifdef Py_TRACE_REFS /* Define pointers to support a doubly-linked list of all live heap objects. */ #define _PyObject_HEAD_EXTRA \ struct _object *_ob_next; \ struct _object *_ob_prev; #define _PyObject_EXTRA_INIT 0, 0, #else #define _PyObject_HEAD_EXTRA #define _PyObject_EXTRA_INIT #endif /* PyObject_HEAD defines the initial segment of every PyObject. */ #define PyObject_HEAD \ _PyObject_HEAD_EXTRA \ int ob_refcnt; \ struct _typeobject *ob_type; #define PyObject_HEAD_INIT(type) \ _PyObject_EXTRA_INIT \ 1, type, /* PyObject_VAR_HEAD defines the initial segment of all variable-size * container objects. These end with a declaration of an array with 1 * element, but enough space is malloc'ed so that the array actually * has room for ob_size elements. Note that ob_size is an element count, * not necessarily a byte count. */ #define PyObject_VAR_HEAD \ PyObject_HEAD \ int ob_size; /* Number of items in variable part */ /* Nothing is actually declared to be a PyObject, but every pointer to * a Python object can be cast to a PyObject*. This is inheritance built * by hand. Similarly every pointer to a variable-size Python object can, * in addition, be cast to PyVarObject*. */ typedef struct _object { PyObject_HEAD } PyObject; typedef struct { PyObject_VAR_HEAD } PyVarObject; /* Type objects contain a string containing the type name (to help somewhat in debugging), the allocation parameters (see PyObject_New() and PyObject_NewVar()), and methods for accessing objects of the type. Methods are optional, a nil pointer meaning that particular kind of access is not available for this type. The Py_DECREF() macro uses the tp_dealloc method without checking for a nil pointer; it should always be implemented except if the implementation can guarantee that the reference count will never reach zero (e.g., for statically allocated type objects). NB: the methods for certain type groups are now contained in separate method blocks. */ typedef PyObject * (*unaryfunc)(PyObject *); typedef PyObject * (*binaryfunc)(PyObject *, PyObject *); typedef PyObject * (*ternaryfunc)(PyObject *, PyObject *, PyObject *); typedef int (*inquiry)(PyObject *); typedef int (*coercion)(PyObject **, PyObject **); typedef PyObject *(*intargfunc)(PyObject *, int); typedef PyObject *(*intintargfunc)(PyObject *, int, int); typedef int(*intobjargproc)(PyObject *, int, PyObject *); typedef int(*intintobjargproc)(PyObject *, int, int, PyObject *); typedef int(*objobjargproc)(PyObject *, PyObject *, PyObject *); typedef int (*getreadbufferproc)(PyObject *, int, void **); typedef int (*getwritebufferproc)(PyObject *, int, void **); typedef int (*getsegcountproc)(PyObject *, int *); typedef int (*getcharbufferproc)(PyObject *, int, const char **); typedef int (*objobjproc)(PyObject *, PyObject *); typedef int (*visitproc)(PyObject *, void *); typedef int (*traverseproc)(PyObject *, visitproc, void *); typedef struct { /* For numbers without flag bit Py_TPFLAGS_CHECKTYPES set, all arguments are guaranteed to be of the object's type (modulo coercion hacks -- i.e. if the type's coercion function returns other types, then these are allowed as well). Numbers that have the Py_TPFLAGS_CHECKTYPES flag bit set should check *both* arguments for proper type and implement the necessary conversions in the slot functions themselves. */ binaryfunc nb_add; binaryfunc nb_subtract; binaryfunc nb_multiply; binaryfunc nb_divide; binaryfunc nb_remainder; binaryfunc nb_divmod; ternaryfunc nb_power; unaryfunc nb_negative; unaryfunc nb_positive; unaryfunc nb_absolute; inquiry nb_nonzero; unaryfunc nb_invert; binaryfunc nb_lshift; binaryfunc nb_rshift; binaryfunc nb_and; binaryfunc nb_xor; binaryfunc nb_or; coercion nb_coerce; unaryfunc nb_int; unaryfunc nb_long; unaryfunc nb_float; unaryfunc nb_oct; unaryfunc nb_hex; /* Added in release 2.0 */ binaryfunc nb_inplace_add; binaryfunc nb_inplace_subtract; binaryfunc nb_inplace_multiply; binaryfunc nb_inplace_divide; binaryfunc nb_inplace_remainder; ternaryfunc nb_inplace_power; binaryfunc nb_inplace_lshift; binaryfunc nb_inplace_rshift; binaryfunc nb_inplace_and; binaryfunc nb_inplace_xor; binaryfunc nb_inplace_or; /* Added in release 2.2 */ /* The following require the Py_TPFLAGS_HAVE_CLASS flag */ binaryfunc nb_floor_divide; binaryfunc nb_true_divide; binaryfunc nb_inplace_floor_divide; binaryfunc nb_inplace_true_divide; } PyNumberMethods; typedef struct { inquiry sq_length; binaryfunc sq_concat; intargfunc sq_repeat; intargfunc sq_item; intintargfunc sq_slice; intobjargproc sq_ass_item; intintobjargproc sq_ass_slice; objobjproc sq_contains; /* Added in release 2.0 */ binaryfunc sq_inplace_concat; intargfunc sq_inplace_repeat; } PySequenceMethods; typedef struct { inquiry mp_length; binaryfunc mp_subscript; objobjargproc mp_ass_subscript; } PyMappingMethods; typedef struct { getreadbufferproc bf_getreadbuffer; getwritebufferproc bf_getwritebuffer; getsegcountproc bf_getsegcount; getcharbufferproc bf_getcharbuffer; } PyBufferProcs; typedef void (*freefunc)(void *); typedef void (*destructor)(PyObject *); typedef int (*printfunc)(PyObject *, FILE *, int); typedef PyObject *(*getattrfunc)(PyObject *, char *); typedef PyObject *(*getattrofunc)(PyObject *, PyObject *); typedef int (*setattrfunc)(PyObject *, char *, PyObject *); typedef int (*setattrofunc)(PyObject *, PyObject *, PyObject *); typedef int (*cmpfunc)(PyObject *, PyObject *); typedef PyObject *(*reprfunc)(PyObject *); typedef long (*hashfunc)(PyObject *); typedef PyObject *(*richcmpfunc) (PyObject *, PyObject *, int); typedef PyObject *(*getiterfunc) (PyObject *); typedef PyObject *(*iternextfunc) (PyObject *); typedef PyObject *(*descrgetfunc) (PyObject *, PyObject *, PyObject *); typedef int (*descrsetfunc) (PyObject *, PyObject *, PyObject *); typedef int (*initproc)(PyObject *, PyObject *, PyObject *); typedef PyObject *(*newfunc)(struct _typeobject *, PyObject *, PyObject *); typedef PyObject *(*allocfunc)(struct _typeobject *, int); typedef struct _typeobject { PyObject_VAR_HEAD char *tp_name; /* For printing, in format "." */ int tp_basicsize, tp_itemsize; /* For allocation */ /* Methods to implement standard operations */ destructor tp_dealloc; printfunc tp_print; getattrfunc tp_getattr; setattrfunc tp_setattr; cmpfunc tp_compare; reprfunc tp_repr; /* Method suites for standard classes */ PyNumberMethods *tp_as_number; PySequenceMethods *tp_as_sequence; PyMappingMethods *tp_as_mapping; /* More standard operations (here for binary compatibility) */ hashfunc tp_hash; ternaryfunc tp_call; reprfunc tp_str; getattrofunc tp_getattro; setattrofunc tp_setattro; /* Functions to access object as input/output buffer */ PyBufferProcs *tp_as_buffer; /* Flags to define presence of optional/expanded features */ long tp_flags; char *tp_doc; /* Documentation string */ /* Assigned meaning in release 2.0 */ /* call function for all accessible objects */ traverseproc tp_traverse; /* delete references to contained objects */ inquiry tp_clear; /* Assigned meaning in release 2.1 */ /* rich comparisons */ richcmpfunc tp_richcompare; /* weak reference enabler */ long tp_weaklistoffset; /* Added in release 2.2 */ /* Iterators */ getiterfunc tp_iter; iternextfunc tp_iternext; /* Attribute descriptor and subclassing stuff */ struct PyMethodDef *tp_methods; struct PyMemberDef *tp_members; struct PyGetSetDef *tp_getset; struct _typeobject *tp_base; PyObject *tp_dict; descrgetfunc tp_descr_get; descrsetfunc tp_descr_set; long tp_dictoffset; initproc tp_init; allocfunc tp_alloc; newfunc tp_new; freefunc tp_free; /* Low-level free-memory routine */ inquiry tp_is_gc; /* For PyObject_IS_GC */ PyObject *tp_bases; PyObject *tp_mro; /* method resolution order */ PyObject *tp_cache; PyObject *tp_subclasses; PyObject *tp_weaklist; destructor tp_del; #ifdef COUNT_ALLOCS /* these must be last and never explicitly initialized */ int tp_allocs; int tp_frees; int tp_maxalloc; struct _typeobject *tp_next; #endif } PyTypeObject; /* The *real* layout of a type object when allocated on the heap */ typedef struct _heaptypeobject { /* Note: there's a dependency on the order of these members in slotptr() in typeobject.c . */ PyTypeObject type; PyNumberMethods as_number; PyMappingMethods as_mapping; PySequenceMethods as_sequence; /* as_sequence comes after as_mapping, so that the mapping wins when both the mapping and the sequence define a given operator (e.g. __getitem__). see add_operators() in typeobject.c . */ PyBufferProcs as_buffer; PyObject *name, *slots; /* here are optional user slots, followed by the members. */ } PyHeapTypeObject; /* access macro to the members which are floating "behind" the object */ #define PyHeapType_GET_MEMBERS(etype) \ ((PyMemberDef *)(((char *)etype) + (etype)->type.ob_type->tp_basicsize)) /* Generic type check */ PyAPI_FUNC(int) PyType_IsSubtype(PyTypeObject *, PyTypeObject *); #define PyObject_TypeCheck(ob, tp) \ ((ob)->ob_type == (tp) || PyType_IsSubtype((ob)->ob_type, (tp))) PyAPI_DATA(PyTypeObject) PyType_Type; /* built-in 'type' */ PyAPI_DATA(PyTypeObject) PyBaseObject_Type; /* built-in 'object' */ PyAPI_DATA(PyTypeObject) PySuper_Type; /* built-in 'super' */ #define PyType_Check(op) PyObject_TypeCheck(op, &PyType_Type) #define PyType_CheckExact(op) ((op)->ob_type == &PyType_Type) PyAPI_FUNC(int) PyType_Ready(PyTypeObject *); PyAPI_FUNC(PyObject *) PyType_GenericAlloc(PyTypeObject *, int); PyAPI_FUNC(PyObject *) PyType_GenericNew(PyTypeObject *, PyObject *, PyObject *); PyAPI_FUNC(PyObject *) _PyType_Lookup(PyTypeObject *, PyObject *); /* Generic operations on objects */ PyAPI_FUNC(int) PyObject_Print(PyObject *, FILE *, int); PyAPI_FUNC(void) _PyObject_Dump(PyObject *); PyAPI_FUNC(PyObject *) PyObject_Repr(PyObject *); PyAPI_FUNC(PyObject *) PyObject_Str(PyObject *); #ifdef Py_USING_UNICODE PyAPI_FUNC(PyObject *) PyObject_Unicode(PyObject *); #endif PyAPI_FUNC(int) PyObject_Compare(PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyObject_RichCompare(PyObject *, PyObject *, int); PyAPI_FUNC(int) PyObject_RichCompareBool(PyObject *, PyObject *, int); PyAPI_FUNC(PyObject *) PyObject_GetAttrString(PyObject *, char *); PyAPI_FUNC(int) PyObject_SetAttrString(PyObject *, char *, PyObject *); PyAPI_FUNC(int) PyObject_HasAttrString(PyObject *, char *); PyAPI_FUNC(PyObject *) PyObject_GetAttr(PyObject *, PyObject *); PyAPI_FUNC(int) PyObject_SetAttr(PyObject *, PyObject *, PyObject *); PyAPI_FUNC(int) PyObject_HasAttr(PyObject *, PyObject *); PyAPI_FUNC(PyObject **) _PyObject_GetDictPtr(PyObject *); PyAPI_FUNC(PyObject *) PyObject_SelfIter(PyObject *); PyAPI_FUNC(PyObject *) PyObject_GenericGetAttr(PyObject *, PyObject *); PyAPI_FUNC(int) PyObject_GenericSetAttr(PyObject *, PyObject *, PyObject *); PyAPI_FUNC(long) PyObject_Hash(PyObject *); PyAPI_FUNC(int) PyObject_IsTrue(PyObject *); PyAPI_FUNC(int) PyObject_Not(PyObject *); PyAPI_FUNC(int) PyCallable_Check(PyObject *); PyAPI_FUNC(int) PyNumber_Coerce(PyObject **, PyObject **); PyAPI_FUNC(int) PyNumber_CoerceEx(PyObject **, PyObject **); PyAPI_FUNC(void) PyObject_ClearWeakRefs(PyObject *); /* A slot function whose address we need to compare */ extern int _PyObject_SlotCompare(PyObject *, PyObject *); /* PyObject_Dir(obj) acts like Python __builtin__.dir(obj), returning a list of strings. PyObject_Dir(NULL) is like __builtin__.dir(), returning the names of the current locals. In this case, if there are no current locals, NULL is returned, and PyErr_Occurred() is false. */ PyAPI_FUNC(PyObject *) PyObject_Dir(PyObject *); /* Helpers for printing recursive container types */ PyAPI_FUNC(int) Py_ReprEnter(PyObject *); PyAPI_FUNC(void) Py_ReprLeave(PyObject *); /* Helpers for hash functions */ PyAPI_FUNC(long) _Py_HashDouble(double); PyAPI_FUNC(long) _Py_HashPointer(void*); /* Helper for passing objects to printf and the like */ #define PyObject_REPR(obj) PyString_AS_STRING(PyObject_Repr(obj)) /* Flag bits for printing: */ #define Py_PRINT_RAW 1 /* No string quotes etc. */ /* `Type flags (tp_flags) These flags are used to extend the type structure in a backwards-compatible fashion. Extensions can use the flags to indicate (and test) when a given type structure contains a new feature. The Python core will use these when introducing new functionality between major revisions (to avoid mid-version changes in the PYTHON_API_VERSION). Arbitration of the flag bit positions will need to be coordinated among all extension writers who publically release their extensions (this will be fewer than you might expect!).. Python 1.5.2 introduced the bf_getcharbuffer slot into PyBufferProcs. Type definitions should use Py_TPFLAGS_DEFAULT for their tp_flags value. Code can use PyType_HasFeature(type_ob, flag_value) to test whether the given type object has a specified feature. */ /* PyBufferProcs contains bf_getcharbuffer */ #define Py_TPFLAGS_HAVE_GETCHARBUFFER (1L<<0) /* PySequenceMethods contains sq_contains */ #define Py_TPFLAGS_HAVE_SEQUENCE_IN (1L<<1) /* This is here for backwards compatibility. Extensions that use the old GC * API will still compile but the objects will not be tracked by the GC. */ #define Py_TPFLAGS_GC 0 /* used to be (1L<<2) */ /* PySequenceMethods and PyNumberMethods contain in-place operators */ #define Py_TPFLAGS_HAVE_INPLACEOPS (1L<<3) /* PyNumberMethods do their own coercion */ #define Py_TPFLAGS_CHECKTYPES (1L<<4) /* tp_richcompare is defined */ #define Py_TPFLAGS_HAVE_RICHCOMPARE (1L<<5) /* Objects which are weakly referencable if their tp_weaklistoffset is >0 */ #define Py_TPFLAGS_HAVE_WEAKREFS (1L<<6) /* tp_iter is defined */ #define Py_TPFLAGS_HAVE_ITER (1L<<7) /* New members introduced by Python 2.2 exist */ #define Py_TPFLAGS_HAVE_CLASS (1L<<8) /* Set if the type object is dynamically allocated */ #define Py_TPFLAGS_HEAPTYPE (1L<<9) /* Set if the type allows subclassing */ #define Py_TPFLAGS_BASETYPE (1L<<10) /* Set if the type is 'ready' -- fully initialized */ #define Py_TPFLAGS_READY (1L<<12) /* Set while the type is being 'readied', to prevent recursive ready calls */ #define Py_TPFLAGS_READYING (1L<<13) /* Objects support garbage collection (see objimp.h) */ #define Py_TPFLAGS_HAVE_GC (1L<<14) /* These two bits are preserved for Stackless Python, next after this is 16 */ #ifdef STACKLESS #define Py_TPFLAGS_HAVE_STACKLESS_EXTENSION (3L<<15) #else #define Py_TPFLAGS_HAVE_STACKLESS_EXTENSION 0 #endif #define Py_TPFLAGS_DEFAULT ( \ Py_TPFLAGS_HAVE_GETCHARBUFFER | \ Py_TPFLAGS_HAVE_SEQUENCE_IN | \ Py_TPFLAGS_HAVE_INPLACEOPS | \ Py_TPFLAGS_HAVE_RICHCOMPARE | \ Py_TPFLAGS_HAVE_WEAKREFS | \ Py_TPFLAGS_HAVE_ITER | \ Py_TPFLAGS_HAVE_CLASS | \ Py_TPFLAGS_HAVE_STACKLESS_EXTENSION | \ 0) #define PyType_HasFeature(t,f) (((t)->tp_flags & (f)) != 0) /* The macros Py_INCREF(op) and Py_DECREF(op) are used to increment or decrement reference counts. Py_DECREF calls the object's deallocator function when the refcount falls to 0; for objects that don't contain references to other objects or heap memory this can be the standard function free(). Both macros can be used wherever a void expression is allowed. The argument must not be a NIL pointer. If it may be NIL, use Py_XINCREF/Py_XDECREF instead. The macro _Py_NewReference(op) initialize reference counts to 1, and in special builds (Py_REF_DEBUG, Py_TRACE_REFS) performs additional bookkeeping appropriate to the special build. We assume that the reference count field can never overflow; this can be proven when the size of the field is the same as the pointer size, so we ignore the possibility. Provided a C int is at least 32 bits (which is implicitly assumed in many parts of this code), that's enough for about 2**31 references to an object. XXX The following became out of date in Python 2.2, but I'm not sure XXX what the full truth is now. Certainly, heap-allocated type objects XXX can and should be deallocated. Type objects should never be deallocated; the type pointer in an object is not considered to be a reference to the type object, to save complications in the deallocation function. (This is actually a decision that's up to the implementer of each new type so if you want, you can count such references to the type object.) *** WARNING*** The Py_DECREF macro must have a side-effect-free argument since it may evaluate its argument multiple times. (The alternative would be to mace it a proper function or assign it to a global temporary variable first, both of which are slower; and in a multi-threaded environment the global variable trick is not safe.) */ /* First define a pile of simple helper macros, one set per special * build symbol. These either expand to the obvious things, or to * nothing at all when the special mode isn't in effect. The main * macros can later be defined just once then, yet expand to different * things depending on which special build options are and aren't in effect. * Trust me : while painful, this is 20x easier to understand than, * e.g, defining _Py_NewReference five different times in a maze of nested * #ifdefs (we used to do that -- it was impenetrable). */ #ifdef Py_REF_DEBUG PyAPI_DATA(long) _Py_RefTotal; PyAPI_FUNC(void) _Py_NegativeRefcount(const char *fname, int lineno, PyObject *op); #define _Py_INC_REFTOTAL _Py_RefTotal++ #define _Py_DEC_REFTOTAL _Py_RefTotal-- #define _Py_REF_DEBUG_COMMA , #define _Py_CHECK_REFCNT(OP) \ { if ((OP)->ob_refcnt < 0) \ _Py_NegativeRefcount(__FILE__, __LINE__, \ (PyObject *)(OP)); \ } #else #define _Py_INC_REFTOTAL #define _Py_DEC_REFTOTAL #define _Py_REF_DEBUG_COMMA #define _Py_CHECK_REFCNT(OP) /* a semicolon */; #endif /* Py_REF_DEBUG */ #ifdef COUNT_ALLOCS PyAPI_FUNC(void) inc_count(PyTypeObject *); #define _Py_INC_TPALLOCS(OP) inc_count((OP)->ob_type) #define _Py_INC_TPFREES(OP) (OP)->ob_type->tp_frees++ #define _Py_DEC_TPFREES(OP) (OP)->ob_type->tp_frees-- #define _Py_COUNT_ALLOCS_COMMA , #else #define _Py_INC_TPALLOCS(OP) #define _Py_INC_TPFREES(OP) #define _Py_DEC_TPFREES(OP) #define _Py_COUNT_ALLOCS_COMMA #endif /* COUNT_ALLOCS */ #ifdef Py_TRACE_REFS /* Py_TRACE_REFS is such major surgery that we call external routines. */ PyAPI_FUNC(void) _Py_NewReference(PyObject *); PyAPI_FUNC(void) _Py_ForgetReference(PyObject *); PyAPI_FUNC(void) _Py_Dealloc(PyObject *); PyAPI_FUNC(void) _Py_PrintReferences(FILE *); PyAPI_FUNC(void) _Py_PrintReferenceAddresses(FILE *); PyAPI_FUNC(void) _Py_AddToAllObjects(PyObject *, int force); #else /* Without Py_TRACE_REFS, there's little enough to do that we expand code * inline. */ #define _Py_NewReference(op) ( \ _Py_INC_TPALLOCS(op) _Py_COUNT_ALLOCS_COMMA \ _Py_INC_REFTOTAL _Py_REF_DEBUG_COMMA \ (op)->ob_refcnt = 1) #define _Py_ForgetReference(op) _Py_INC_TPFREES(op) #define _Py_Dealloc(op) ( \ _Py_INC_TPFREES(op) _Py_COUNT_ALLOCS_COMMA \ (*(op)->ob_type->tp_dealloc)((PyObject *)(op))) #endif /* !Py_TRACE_REFS */ #define Py_INCREF(op) ( \ _Py_INC_REFTOTAL _Py_REF_DEBUG_COMMA \ (op)->ob_refcnt++) #define Py_DECREF(op) \ if (_Py_DEC_REFTOTAL _Py_REF_DEBUG_COMMA \ --(op)->ob_refcnt != 0) \ _Py_CHECK_REFCNT(op) \ else \ _Py_Dealloc((PyObject *)(op)) /* Macros to use in case the object pointer may be NULL: */ #define Py_XINCREF(op) if ((op) == NULL) ; else Py_INCREF(op) #define Py_XDECREF(op) if ((op) == NULL) ; else Py_DECREF(op) /* _Py_NoneStruct is an object of undefined type which can be used in contexts where NULL (nil) is not suitable (since NULL often means 'error'). Don't forget to apply Py_INCREF() when returning this value!!! */ PyAPI_DATA(PyObject) _Py_NoneStruct; /* Don't use this directly */ #define Py_None (&_Py_NoneStruct) /* Py_NotImplemented is a singleton used to signal that an operation is not implemented for a given type combination. */ PyAPI_DATA(PyObject) _Py_NotImplementedStruct; /* Don't use this directly */ #define Py_NotImplemented (&_Py_NotImplementedStruct) /* Rich comparison opcodes */ #define Py_LT 0 #define Py_LE 1 #define Py_EQ 2 #define Py_NE 3 #define Py_GT 4 #define Py_GE 5 /* Define staticforward and statichere for source compatibility with old C extensions. The staticforward define was needed to support certain broken C compilers (notably SCO ODT 3.0, perhaps early AIX as well) botched the static keyword when it was used with a forward declaration of a static initialized structure. Standard C allows the forward declaration with static, and we've decided to stop catering to broken C compilers. (In fact, we expect that the compilers are all fixed eight years later.) */ #define staticforward static #define statichere static /* More conventions ================ Argument Checking ----------------- Functions that take objects as arguments normally don't check for nil arguments, but they do check the type of the argument, and return an error if the function doesn't apply to the type. Failure Modes ------------- Functions may fail for a variety of reasons, including running out of memory. This is communicated to the caller in two ways: an error string is set (see errors.h), and the function result differs: functions that normally return a pointer return NULL for failure, functions returning an integer return -1 (which could be a legal return value too!), and other functions return 0 for success and -1 for failure. Callers should always check for errors before using the result. If an error was set, the caller must either explicitly clear it, or pass the error on to its caller. Reference Counts ---------------- It takes a while to get used to the proper usage of reference counts. Functions that create an object set the reference count to 1; such new objects must be stored somewhere or destroyed again with Py_DECREF(). Some functions that 'store' objects, such as PyTuple_SetItem() and PyList_SetItem(), don't increment the reference count of the object, since the most frequent use is to store a fresh object. Functions that 'retrieve' objects, such as PyTuple_GetItem() and PyDict_GetItemString(), also don't increment the reference count, since most frequently the object is only looked at quickly. Thus, to retrieve an object and store it again, the caller must call Py_INCREF() explicitly. NOTE: functions that 'consume' a reference count, like PyList_SetItem(), consume the reference even if the object wasn't successfully stored, to simplify error handling. It seems attractive to make other functions that take an object as argument consume a reference count; however, this may quickly get confusing (even the current practice is already confusing). Consider it carefully, it may save lots of calls to Py_INCREF() and Py_DECREF() at times. */ /* Trashcan mechanism, thanks to Christian Tismer. When deallocating a container object, it's possible to trigger an unbounded chain of deallocations, as each Py_DECREF in turn drops the refcount on "the next" object in the chain to 0. This can easily lead to stack faults, and especially in threads (which typically have less stack space to work with). A container object that participates in cyclic gc can avoid this by bracketing the body of its tp_dealloc function with a pair of macros: static void mytype_dealloc(mytype *p) { ... declarations go here ... PyObject_GC_UnTrack(p); // must untrack first Py_TRASHCAN_SAFE_BEGIN(p) ... The body of the deallocator goes here, including all calls ... ... to Py_DECREF on contained objects. ... Py_TRASHCAN_SAFE_END(p) } CAUTION: Never return from the middle of the body! If the body needs to "get out early", put a label immediately before the Py_TRASHCAN_SAFE_END call, and goto it. Else the call-depth counter (see below) will stay above 0 forever, and the trashcan will never get emptied. How it works: The BEGIN macro increments a call-depth counter. So long as this counter is small, the body of the deallocator is run directly without further ado. But if the counter gets large, it instead adds p to a list of objects to be deallocated later, skips the body of the deallocator, and resumes execution after the END macro. The tp_dealloc routine then returns without deallocating anything (and so unbounded call-stack depth is avoided). When the call stack finishes unwinding again, code generated by the END macro notices this, and calls another routine to deallocate all the objects that may have been added to the list of deferred deallocations. In effect, a chain of N deallocations is broken into N / PyTrash_UNWIND_LEVEL pieces, with the call stack never exceeding a depth of PyTrash_UNWIND_LEVEL. */ PyAPI_FUNC(void) _PyTrash_deposit_object(PyObject*); PyAPI_FUNC(void) _PyTrash_destroy_chain(void); PyAPI_DATA(int) _PyTrash_delete_nesting; PyAPI_DATA(PyObject *) _PyTrash_delete_later; #define PyTrash_UNWIND_LEVEL 50 #define Py_TRASHCAN_SAFE_BEGIN(op) \ if (_PyTrash_delete_nesting < PyTrash_UNWIND_LEVEL) { \ ++_PyTrash_delete_nesting; /* The body of the deallocator is here. */ #define Py_TRASHCAN_SAFE_END(op) \ --_PyTrash_delete_nesting; \ if (_PyTrash_delete_later && _PyTrash_delete_nesting <= 0) \ _PyTrash_destroy_chain(); \ } \ else \ _PyTrash_deposit_object((PyObject*)op); #ifdef __cplusplus } #endif #endif /* !Py_OBJECT_H */ Python-2.3.7/Include/floatobject.h0000644001241000117560000000736707636425114016325 0ustar loewishpifb6 /* Float object interface */ /* PyFloatObject represents a (double precision) floating point number. */ #ifndef Py_FLOATOBJECT_H #define Py_FLOATOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { PyObject_HEAD double ob_fval; } PyFloatObject; PyAPI_DATA(PyTypeObject) PyFloat_Type; #define PyFloat_Check(op) PyObject_TypeCheck(op, &PyFloat_Type) #define PyFloat_CheckExact(op) ((op)->ob_type == &PyFloat_Type) /* Return Python float from string PyObject. Second argument ignored on input, and, if non-NULL, NULL is stored into *junk (this tried to serve a purpose once but can't be made to work as intended). */ PyAPI_FUNC(PyObject *) PyFloat_FromString(PyObject*, char** junk); /* Return Python float from C double. */ PyAPI_FUNC(PyObject *) PyFloat_FromDouble(double); /* Extract C double from Python float. The macro version trades safety for speed. */ PyAPI_FUNC(double) PyFloat_AsDouble(PyObject *); #define PyFloat_AS_DOUBLE(op) (((PyFloatObject *)(op))->ob_fval) /* Write repr(v) into the char buffer argument, followed by null byte. The buffer must be "big enough"; >= 100 is very safe. PyFloat_AsReprString(buf, x) strives to print enough digits so that PyFloat_FromString(buf) then reproduces x exactly. */ PyAPI_FUNC(void) PyFloat_AsReprString(char*, PyFloatObject *v); /* Write str(v) into the char buffer argument, followed by null byte. The buffer must be "big enough"; >= 100 is very safe. Note that it's unusual to be able to get back the float you started with from PyFloat_AsString's result -- use PyFloat_AsReprString() if you want to preserve precision across conversions. */ PyAPI_FUNC(void) PyFloat_AsString(char*, PyFloatObject *v); /* _PyFloat_{Pack,Unpack}{4,8} * * The struct and pickle (at least) modules need an efficient platform- * independent way to store floating-point values as byte strings. * The Pack routines produce a string from a C double, and the Unpack * routines produce a C double from such a string. The suffix (4 or 8) * specifies the number of bytes in the string. * * Excepting NaNs and infinities (which aren't handled correctly), the 4- * byte format is identical to the IEEE-754 single precision format, and * the 8-byte format to the IEEE-754 double precision format. On non- * IEEE platforms with more precision, or larger dynamic range, than * 754 supports, not all values can be packed; on non-IEEE platforms with * less precision, or smaller dynamic range, not all values can be * unpacked. What happens in such cases is partly accidental (alas). */ /* The pack routines write 4 or 8 bytes, starting at p. le is a bool * argument, true if you want the string in little-endian format (exponent * last, at p+3 or p+7), false if you want big-endian format (exponent * first, at p). * Return value: 0 if all is OK, -1 if error (and an exception is * set, most likely OverflowError). * Bug: What this does is undefined if x is a NaN or infinity. * Bug: -0.0 and +0.0 produce the same string. */ PyAPI_FUNC(int) _PyFloat_Pack4(double x, unsigned char *p, int le); PyAPI_FUNC(int) _PyFloat_Pack8(double x, unsigned char *p, int le); /* The unpack routines read 4 or 8 bytes, starting at p. le is a bool * argument, true if the string is in little-endian format (exponent * last, at p+3 or p+7), false if big-endian (exponent first, at p). * Return value: The unpacked double. On error, this is -1.0 and * PyErr_Occurred() is true (and an exception is set, most likely * OverflowError). * Bug: What this does is undefined if the string represents a NaN or * infinity. */ PyAPI_FUNC(double) _PyFloat_Unpack4(const unsigned char *p, int le); PyAPI_FUNC(double) _PyFloat_Unpack8(const unsigned char *p, int le); #ifdef __cplusplus } #endif #endif /* !Py_FLOATOBJECT_H */ Python-2.3.7/Include/node.h0000644001241000117560000000144407541520406014737 0ustar loewishpifb6 /* Parse tree node interface */ #ifndef Py_NODE_H #define Py_NODE_H #ifdef __cplusplus extern "C" { #endif typedef struct _node { short n_type; char *n_str; int n_lineno; int n_nchildren; struct _node *n_child; } node; PyAPI_FUNC(node *) PyNode_New(int type); PyAPI_FUNC(int) PyNode_AddChild(node *n, int type, char *str, int lineno); PyAPI_FUNC(void) PyNode_Free(node *n); /* Node access functions */ #define NCH(n) ((n)->n_nchildren) #define CHILD(n, i) (&(n)->n_child[i]) #define TYPE(n) ((n)->n_type) #define STR(n) ((n)->n_str) /* Assert that the type of a node is what we expect */ #define REQ(n, type) assert(TYPE(n) == (type)) PyAPI_FUNC(void) PyNode_ListTree(node *); #ifdef __cplusplus } #endif #endif /* !Py_NODE_H */ Python-2.3.7/Include/datetime.h0000644001241000117560000001126207607710737015620 0ustar loewishpifb6/* datetime.h */ #ifndef DATETIME_H #define DATETIME_H /* Fields are packed into successive bytes, each viewed as unsigned and * big-endian, unless otherwise noted: * * byte offset * 0 year 2 bytes, 1-9999 * 2 month 1 byte, 1-12 * 3 day 1 byte, 1-31 * 4 hour 1 byte, 0-23 * 5 minute 1 byte, 0-59 * 6 second 1 byte, 0-59 * 7 usecond 3 bytes, 0-999999 * 10 */ /* # of bytes for year, month, and day. */ #define _PyDateTime_DATE_DATASIZE 4 /* # of bytes for hour, minute, second, and usecond. */ #define _PyDateTime_TIME_DATASIZE 6 /* # of bytes for year, month, day, hour, minute, second, and usecond. */ #define _PyDateTime_DATETIME_DATASIZE 10 typedef struct { PyObject_HEAD long hashcode; /* -1 when unknown */ int days; /* -MAX_DELTA_DAYS <= days <= MAX_DELTA_DAYS */ int seconds; /* 0 <= seconds < 24*3600 is invariant */ int microseconds; /* 0 <= microseconds < 1000000 is invariant */ } PyDateTime_Delta; typedef struct { PyObject_HEAD /* a pure abstract base clase */ } PyDateTime_TZInfo; /* The datetime and time types have hashcodes, and an optional tzinfo member, * present if and only if hastzinfo is true. */ #define _PyTZINFO_HEAD \ PyObject_HEAD \ long hashcode; \ char hastzinfo; /* boolean flag */ /* No _PyDateTime_BaseTZInfo is allocated; it's just to have something * convenient to cast to, when getting at the hastzinfo member of objects * starting with _PyTZINFO_HEAD. */ typedef struct { _PyTZINFO_HEAD } _PyDateTime_BaseTZInfo; /* All time objects are of PyDateTime_TimeType, but that can be allocated * in two ways, with or without a tzinfo member. Without is the same as * tzinfo == None, but consumes less memory. _PyDateTime_BaseTime is an * internal struct used to allocate the right amount of space for the * "without" case. */ #define _PyDateTime_TIMEHEAD \ _PyTZINFO_HEAD \ unsigned char data[_PyDateTime_TIME_DATASIZE]; typedef struct { _PyDateTime_TIMEHEAD } _PyDateTime_BaseTime; /* hastzinfo false */ typedef struct { _PyDateTime_TIMEHEAD PyObject *tzinfo; } PyDateTime_Time; /* hastzinfo true */ /* All datetime objects are of PyDateTime_DateTimeType, but that can be * allocated in two ways too, just like for time objects above. In addition, * the plain date type is a base class for datetime, so it must also have * a hastzinfo member (although it's unused there). */ typedef struct { _PyTZINFO_HEAD unsigned char data[_PyDateTime_DATE_DATASIZE]; } PyDateTime_Date; #define _PyDateTime_DATETIMEHEAD \ _PyTZINFO_HEAD \ unsigned char data[_PyDateTime_DATETIME_DATASIZE]; typedef struct { _PyDateTime_DATETIMEHEAD } _PyDateTime_BaseDateTime; /* hastzinfo false */ typedef struct { _PyDateTime_DATETIMEHEAD PyObject *tzinfo; } PyDateTime_DateTime; /* hastzinfo true */ /* Apply for date and datetime instances. */ #define PyDateTime_GET_YEAR(o) ((((PyDateTime_Date*)o)->data[0] << 8) | \ ((PyDateTime_Date*)o)->data[1]) #define PyDateTime_GET_MONTH(o) (((PyDateTime_Date*)o)->data[2]) #define PyDateTime_GET_DAY(o) (((PyDateTime_Date*)o)->data[3]) #define PyDateTime_DATE_GET_HOUR(o) (((PyDateTime_DateTime*)o)->data[4]) #define PyDateTime_DATE_GET_MINUTE(o) (((PyDateTime_DateTime*)o)->data[5]) #define PyDateTime_DATE_GET_SECOND(o) (((PyDateTime_DateTime*)o)->data[6]) #define PyDateTime_DATE_GET_MICROSECOND(o) \ ((((PyDateTime_DateTime*)o)->data[7] << 16) | \ (((PyDateTime_DateTime*)o)->data[8] << 8) | \ ((PyDateTime_DateTime*)o)->data[9]) /* Apply for time instances. */ #define PyDateTime_TIME_GET_HOUR(o) (((PyDateTime_Time*)o)->data[0]) #define PyDateTime_TIME_GET_MINUTE(o) (((PyDateTime_Time*)o)->data[1]) #define PyDateTime_TIME_GET_SECOND(o) (((PyDateTime_Time*)o)->data[2]) #define PyDateTime_TIME_GET_MICROSECOND(o) \ ((((PyDateTime_Time*)o)->data[3] << 16) | \ (((PyDateTime_Time*)o)->data[4] << 8) | \ ((PyDateTime_Time*)o)->data[5]) #define PyDate_Check(op) PyObject_TypeCheck(op, &PyDateTime_DateType) #define PyDate_CheckExact(op) ((op)->ob_type == &PyDateTime_DateType) #define PyDateTime_Check(op) PyObject_TypeCheck(op, &PyDateTime_DateTimeType) #define PyDateTime_CheckExact(op) ((op)->ob_type == &PyDateTime_DateTimeType) #define PyTime_Check(op) PyObject_TypeCheck(op, &PyDateTime_TimeType) #define PyTime_CheckExact(op) ((op)->ob_type == &PyDateTime_TimeType) #define PyDelta_Check(op) PyObject_TypeCheck(op, &PyDateTime_DeltaType) #define PyDelta_CheckExact(op) ((op)->ob_type == &PyDateTime_DeltaType) #define PyTZInfo_Check(op) PyObject_TypeCheck(op, &PyDateTime_TZInfoType) #define PyTZInfo_CheckExact(op) ((op)->ob_type == &PyDateTime_TZInfoType) #endif Python-2.3.7/Include/moduleobject.h0000644001241000117560000000113507525661026016471 0ustar loewishpifb6 /* Module object interface */ #ifndef Py_MODULEOBJECT_H #define Py_MODULEOBJECT_H #ifdef __cplusplus extern "C" { #endif PyAPI_DATA(PyTypeObject) PyModule_Type; #define PyModule_Check(op) PyObject_TypeCheck(op, &PyModule_Type) #define PyModule_CheckExact(op) ((op)->ob_type == &PyModule_Type) PyAPI_FUNC(PyObject *) PyModule_New(char *); PyAPI_FUNC(PyObject *) PyModule_GetDict(PyObject *); PyAPI_FUNC(char *) PyModule_GetName(PyObject *); PyAPI_FUNC(char *) PyModule_GetFilename(PyObject *); PyAPI_FUNC(void) _PyModule_Clear(PyObject *); #ifdef __cplusplus } #endif #endif /* !Py_MODULEOBJECT_H */ Python-2.3.7/Include/eval.h0000644001241000117560000000105507645067455014756 0ustar loewishpifb6 /* Interface to execute compiled code */ #ifndef Py_EVAL_H #define Py_EVAL_H #ifdef __cplusplus extern "C" { #endif PyAPI_FUNC(PyObject *) PyEval_EvalCode(PyCodeObject *, PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyEval_EvalCodeEx(PyCodeObject *co, PyObject *globals, PyObject *locals, PyObject **args, int argc, PyObject **kwds, int kwdc, PyObject **defs, int defc, PyObject *closure); PyAPI_FUNC(PyObject *) _PyEval_CallTracing(PyObject *func, PyObject *args); #ifdef __cplusplus } #endif #endif /* !Py_EVAL_H */ Python-2.3.7/Include/pgen.h0000644001241000117560000000037507647540156014760 0ustar loewishpifb6#ifndef Py_PGEN_H #define Py_PGEN_H #ifdef __cplusplus extern "C" { #endif /* Parser generator interface */ extern grammar *meta_grammar(void); struct _node; extern grammar *pgen(struct _node *); #ifdef __cplusplus } #endif #endif /* !Py_PGEN_H */ Python-2.3.7/Include/intobject.h0000644001241000117560000000362407647574261016014 0ustar loewishpifb6 /* Integer object interface */ /* PyIntObject represents a (long) integer. This is an immutable object; an integer cannot change its value after creation. There are functions to create new integer objects, to test an object for integer-ness, and to get the integer value. The latter functions returns -1 and sets errno to EBADF if the object is not an PyIntObject. None of the functions should be applied to nil objects. The type PyIntObject is (unfortunately) exposed here so we can declare _Py_TrueStruct and _Py_ZeroStruct below; don't use this. */ #ifndef Py_INTOBJECT_H #define Py_INTOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { PyObject_HEAD long ob_ival; } PyIntObject; PyAPI_DATA(PyTypeObject) PyInt_Type; #define PyInt_Check(op) PyObject_TypeCheck(op, &PyInt_Type) #define PyInt_CheckExact(op) ((op)->ob_type == &PyInt_Type) PyAPI_FUNC(PyObject *) PyInt_FromString(char*, char**, int); #ifdef Py_USING_UNICODE PyAPI_FUNC(PyObject *) PyInt_FromUnicode(Py_UNICODE*, int, int); #endif PyAPI_FUNC(PyObject *) PyInt_FromLong(long); PyAPI_FUNC(long) PyInt_AsLong(PyObject *); PyAPI_FUNC(unsigned long) PyInt_AsUnsignedLongMask(PyObject *); #ifdef HAVE_LONG_LONG PyAPI_FUNC(unsigned PY_LONG_LONG) PyInt_AsUnsignedLongLongMask(PyObject *); #endif PyAPI_FUNC(long) PyInt_GetMax(void); /* Macro, trading safety for speed */ #define PyInt_AS_LONG(op) (((PyIntObject *)(op))->ob_ival) /* These aren't really part of the Int object, but they're handy; the protos * are necessary for systems that need the magic of PyAPI_FUNC and that want * to have stropmodule as a dynamically loaded module instead of building it * into the main Python shared library/DLL. Guido thinks I'm weird for * building it this way. :-) [cjh] */ PyAPI_FUNC(unsigned long) PyOS_strtoul(char *, char **, int); PyAPI_FUNC(long) PyOS_strtol(char *, char **, int); #ifdef __cplusplus } #endif #endif /* !Py_INTOBJECT_H */ Python-2.3.7/Include/parsetok.h0000644001241000117560000000243107647540156015652 0ustar loewishpifb6 /* Parser-tokenizer link interface */ #ifndef Py_PARSETOK_H #define Py_PARSETOK_H #ifdef __cplusplus extern "C" { #endif typedef struct { int error; const char *filename; int lineno; int offset; char *text; int token; int expected; } perrdetail; #if 0 #define PyPARSE_YIELD_IS_KEYWORD 0x0001 #endif #define PyPARSE_DONT_IMPLY_DEDENT 0x0002 PyAPI_FUNC(node *) PyParser_ParseString(const char *, grammar *, int, perrdetail *); PyAPI_FUNC(node *) PyParser_ParseFile (FILE *, const char *, grammar *, int, char *, char *, perrdetail *); PyAPI_FUNC(node *) PyParser_ParseStringFlags(const char *, grammar *, int, perrdetail *, int); PyAPI_FUNC(node *) PyParser_ParseFileFlags(FILE *, const char *, grammar *, int, char *, char *, perrdetail *, int); PyAPI_FUNC(node *) PyParser_ParseStringFlagsFilename(const char *, const char *, grammar *, int, perrdetail *, int); /* Note that he following function is defined in pythonrun.c not parsetok.c. */ PyAPI_FUNC(void) PyParser_SetError(perrdetail *); #ifdef __cplusplus } #endif #endif /* !Py_PARSETOK_H */ Python-2.3.7/Include/cStringIO.h0000644001241000117560000000370107612372415015655 0ustar loewishpifb6#ifndef Py_CSTRINGIO_H #define Py_CSTRINGIO_H #ifdef __cplusplus extern "C" { #endif /* This header provides access to cStringIO objects from C. Functions are provided for calling cStringIO objects and macros are provided for testing whether you have cStringIO objects. Before calling any of the functions or macros, you must initialize the routines with: PycString_IMPORT This would typically be done in your init function. */ #define PycString_IMPORT \ PycStringIO = (struct PycStringIO_CAPI*)PyCObject_Import("cStringIO", \ "cStringIO_CAPI") /* Basic functions to manipulate cStringIO objects from C */ static struct PycStringIO_CAPI { /* Read a string from an input object. If the last argument is -1, the remainder will be read. */ int(*cread)(PyObject *, char **, int); /* Read a line from an input object. Returns the length of the read line as an int and a pointer inside the object buffer as char** (so the caller doesn't have to provide its own buffer as destination). */ int(*creadline)(PyObject *, char **); /* Write a string to an output object*/ int(*cwrite)(PyObject *, char *, int); /* Get the output object as a Python string (returns new reference). */ PyObject *(*cgetvalue)(PyObject *); /* Create a new output object */ PyObject *(*NewOutput)(int); /* Create an input object from a Python string (copies the Python string reference). */ PyObject *(*NewInput)(PyObject *); /* The Python types for cStringIO input and output objects. Note that you can do input on an output object. */ PyTypeObject *InputType, *OutputType; } *PycStringIO; /* These can be used to test if you have one */ #define PycStringIO_InputCheck(O) \ ((O)->ob_type==PycStringIO->InputType) #define PycStringIO_OutputCheck(O) \ ((O)->ob_type==PycStringIO->OutputType) #ifdef __cplusplus } #endif #endif /* !Py_CSTRINGIO_H */ Python-2.3.7/Include/funcobject.h0000644001241000117560000000347507616540556016155 0ustar loewishpifb6 /* Function object interface */ #ifndef Py_FUNCOBJECT_H #define Py_FUNCOBJECT_H #ifdef __cplusplus extern "C" { #endif typedef struct { PyObject_HEAD PyObject *func_code; PyObject *func_globals; PyObject *func_defaults; PyObject *func_closure; PyObject *func_doc; PyObject *func_name; PyObject *func_dict; PyObject *func_weakreflist; PyObject *func_module; } PyFunctionObject; PyAPI_DATA(PyTypeObject) PyFunction_Type; #define PyFunction_Check(op) ((op)->ob_type == &PyFunction_Type) PyAPI_FUNC(PyObject *) PyFunction_New(PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyFunction_GetCode(PyObject *); PyAPI_FUNC(PyObject *) PyFunction_GetGlobals(PyObject *); PyAPI_FUNC(PyObject *) PyFunction_GetModule(PyObject *); PyAPI_FUNC(PyObject *) PyFunction_GetDefaults(PyObject *); PyAPI_FUNC(int) PyFunction_SetDefaults(PyObject *, PyObject *); PyAPI_FUNC(PyObject *) PyFunction_GetClosure(PyObject *); PyAPI_FUNC(int) PyFunction_SetClosure(PyObject *, PyObject *); /* Macros for direct access to these values. Type checks are *not* done, so use with care. */ #define PyFunction_GET_CODE(func) \ (((PyFunctionObject *)func) -> func_code) #define PyFunction_GET_GLOBALS(func) \ (((PyFunctionObject *)func) -> func_globals) #define PyFunction_GET_MODULE(func) \ (((PyFunctionObject *)func) -> func_module) #define PyFunction_GET_DEFAULTS(func) \ (((PyFunctionObject *)func) -> func_defaults) #define PyFunction_GET_CLOSURE(func) \ (((PyFunctionObject *)func) -> func_closure) /* The classmethod and staticmethod types lives here, too */ PyAPI_DATA(PyTypeObject) PyClassMethod_Type; PyAPI_DATA(PyTypeObject) PyStaticMethod_Type; PyAPI_FUNC(PyObject *) PyClassMethod_New(PyObject *); PyAPI_FUNC(PyObject *) PyStaticMethod_New(PyObject *); #ifdef __cplusplus } #endif #endif /* !Py_FUNCOBJECT_H */ Python-2.3.7/.cvsignore0000644001241000117560000000015507334456574014272 0ustar loewishpifb6.purify config.log config.cache config.status Makefile buildno python build Makefile.pre platform pyconfig.h Python-2.3.7/PC/0000755001241000117560000000000010765544513012564 5ustar loewishpifb6Python-2.3.7/PC/frozen_dllmain.c0000644001241000117560000000717207167176131015741 0ustar loewishpifb6/* FreezeDLLMain.cpp This is a DLLMain suitable for frozen applications/DLLs on a Windows platform. The general problem is that many Python extension modules may define DLL main functions, but when statically linked together to form a frozen application, this DLLMain symbol exists multiple times. The solution is: * Each module checks for a frozen build, and if so, defines its DLLMain function as "__declspec(dllexport) DllMain%module%" (eg, DllMainpythoncom, or DllMainpywintypes) * The frozen .EXE/.DLL links against this module, which provides the single DllMain. * This DllMain attempts to locate and call the DllMain for each of the extension modules. * This code also has hooks to "simulate" DllMain when used from a frozen .EXE. At this stage, there is a static table of "possibly embedded modules". This should change to something better, but it will work OK for now. Note that this scheme does not handle dependencies in the order of DllMain calls - except it does call pywintypes first :-) As an example of how an extension module with a DllMain should be changed, here is a snippet from the pythoncom extension module. // end of example code from pythoncom's DllMain.cpp #ifndef BUILD_FREEZE #define DLLMAIN DllMain #define DLLMAIN_DECL #else #define DLLMAIN DllMainpythoncom #define DLLMAIN_DECL __declspec(dllexport) #endif extern "C" DLLMAIN_DECL BOOL WINAPI DLLMAIN(HINSTANCE hInstance, DWORD dwReason, LPVOID lpReserved) // end of example code from pythoncom's DllMain.cpp ***************************************************************************/ #include "windows.h" static char *possibleModules[] = { "pywintypes", "pythoncom", "win32ui", NULL, }; BOOL CallModuleDllMain(char *modName, DWORD dwReason); /* Called by a frozen .EXE only, so that built-in extension modules are initialized correctly */ void PyWinFreeze_ExeInit(void) { char **modName; for (modName = possibleModules;*modName;*modName++) { /* printf("Initialising '%s'\n", *modName); */ CallModuleDllMain(*modName, DLL_PROCESS_ATTACH); } } /* Called by a frozen .EXE only, so that built-in extension modules are cleaned up */ void PyWinFreeze_ExeTerm(void) { // Must go backwards char **modName; for (modName = possibleModules+(sizeof(possibleModules) / sizeof(char *))-2; modName >= possibleModules; *modName--) { /* printf("Terminating '%s'\n", *modName);*/ CallModuleDllMain(*modName, DLL_PROCESS_DETACH); } } BOOL WINAPI DllMain(HINSTANCE hInstance, DWORD dwReason, LPVOID lpReserved) { BOOL ret = TRUE; switch (dwReason) { case DLL_PROCESS_ATTACH: { char **modName; for (modName = possibleModules;*modName;*modName++) { BOOL ok = CallModuleDllMain(*modName, dwReason); if (!ok) ret = FALSE; } break; } case DLL_PROCESS_DETACH: { // Must go backwards char **modName; for (modName = possibleModules+(sizeof(possibleModules) / sizeof(char *))-2; modName >= possibleModules; *modName--) CallModuleDllMain(*modName, DLL_PROCESS_DETACH); break; } } return ret; } BOOL CallModuleDllMain(char *modName, DWORD dwReason) { BOOL (WINAPI * pfndllmain)(HINSTANCE, DWORD, LPVOID); char funcName[255]; HMODULE hmod = GetModuleHandle(NULL); strcpy(funcName, "_DllMain"); strcat(funcName, modName); strcat(funcName, "@12"); // stdcall convention. pfndllmain = (BOOL (WINAPI *)(HINSTANCE, DWORD, LPVOID))GetProcAddress(hmod, funcName); if (pfndllmain==NULL) { /* No function by that name exported - then that module does not appear in our frozen program - return OK */ return TRUE; } return (*pfndllmain)(hmod, dwReason, NULL); } Python-2.3.7/PC/.cvsignore0000644001241000117560000000003607745556242014571 0ustar loewishpifb6pythonnt_rc.h pythonnt_rc_d.h Python-2.3.7/PC/python_exe.rc0000644001241000117560000000006106441717714015272 0ustar loewishpifb61 ICON DISCARDABLE "pycon.ico" Python-2.3.7/PC/dllbase_nt.txt0000644001241000117560000000651307636471232015441 0ustar loewishpifb6In Win32, DLL's are "pre-linked" using a specified base address. When the DLL is loaded, an attempt is made to place it at that address. If that address is already in use, a new base address is selected, and the DLL subject to fixups. Apparently, these fixups are very slow, and significant performance gains can be made by selecting a good base address. This document is to allocate base addresses to core Python and Python .PYD files, to give a better change of optimal performance. This base address is passed to the linker using the /BASE command line switch. Python.exe/Pythonw.exe - 1d000000 - 1e000000 (-1) Python.dll - 1e000000 - 1e100000 (-1) Standard Extension Modules 1e100000 - 1e200000 "" - _symtable 1e100000 - 1e110000 - bsddb 1e180000 - 1e188000 "" - _tkinter 1e190000 - 1e1A0000 - parser 1e1A0000 - 1e1B0000 - zlib 1e1B0000 - 1e1C0000 - winreg 1e1C0000 - 1e1D0000 - _socket 1e1D0000 - 1e1E0000 - _sre 1e1E0000 - 1e1F0000 - mmap 1e1F0000 - 1e1FFFFF More standard extensions 1D100000 - 1e000000 - pyexpat 1D100000 - 1D110000 - select 1D110000 - 1D120000 - unicodedata 1D120000 - 1D160000 - winsound 1D160000 - 1D170000 - bZ2 1D170000 - 1D180000 - datetime 1D180000 - 1D190000 - _csv 1D190000 - 1D1A0000 Other extension modules - win32api 1e200000 - 1e220000 - win32ras 1e220000 - 1e230000 - win32lz 1e230000 - 1e240000 - timer 1e240000 - 1e250000 - mmapfile 1e250000 - 1e260000 - win32pipe 1e260000 - 1e270000 - avl 1e270000 - 1e270000 - dbhash 1e280000 - 1e290000 - win32net 1e290000 - 1e2A0000 - win32security 1e2A0000 - 1e2B0000 - win32print 1e2B0000 - 1e2c0000 - 1e2d0000 - 1e2e0000 - win32gui 1e2e0000 - 1e2f0000 - _imaging 1e2f0000 - 1e300000 - multiarray 1e300000 - 1e310000 - win32help 1e310000 - 1e320000 - win32clipboard 1e320000 - 1e330000 - win2kras 1e330000 - 1e340000 - pythoncom 1e340000 - 1e400000 - win32ui 1e400000 - 1e500000 - win32uiole 1e500000 - 1e600000 - pywintypes 1e600000 - 1e700000 - win32process 1e700000 - 1e800000 - odbc 1e710000 - 1e720000 - dbi 1e720000 - 1e730000 - win32file 1e730000 - 1e740000 - win32wnet 1e740000 - 1e750000 - win32com.shell 1e750000 - 1e760000 - win32com.internet 1e760000 - 1e770000 - win32com.exchange 1e770000 - 1e780000 - win32com.exchdapi 1e780000 - 1e790000 - win32com.axscript 1e790000 - 1e7a0000 - win32com.axdebug 1e7b0000 - 1e7c0000 - win32com.adsi 1e7f0000 - 1e800000 - win32event 1e810000 - 1e820000 - win32evtlog 1e820000 - 1e830000 - win32com.axcontrol 1e830000 - 1e840000 Python-2.3.7/PC/python.mk0000644001241000117560000000035206561416116014432 0ustar loewishpifb6project : n:\python\python-1.5.1\pc\wat_os2\pyth_os2.exe n:\python\python-1.& 5.1\pc\wat_dos\pyth_dos.exe .SYMBOLIC !include n:\python\python-1.5.1\pc\wat_os2\pyth_os2.mk1 !include n:\python\python-1.5.1\pc\wat_dos\pyth_dos.mk1 Python-2.3.7/PC/msvcrtmodule.c0000755001241000117560000001166710102003325015442 0ustar loewishpifb6/********************************************************* msvcrtmodule.c A Python interface to the Microsoft Visual C Runtime Library, providing access to those non-portable, but still useful routines. Only ever compiled with an MS compiler, so no attempt has been made to avoid MS language extensions, etc... This may only work on NT or 95... Author: Mark Hammond and Guido van Rossum. Maintenance: Guido van Rossum. ***********************************************************/ #include "Python.h" #include "malloc.h" #include #include #include // Force the malloc heap to clean itself up, and free unused blocks // back to the OS. (According to the docs, only works on NT.) static PyObject * msvcrt_heapmin(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":heapmin")) return NULL; if (_heapmin() != 0) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } // Perform locking operations on a C runtime file descriptor. static PyObject * msvcrt_locking(PyObject *self, PyObject *args) { int fd; int mode; long nbytes; int err; if (!PyArg_ParseTuple(args, "iil:locking", &fd, &mode, &nbytes)) return NULL; Py_BEGIN_ALLOW_THREADS err = _locking(fd, mode, nbytes); Py_END_ALLOW_THREADS if (err != 0) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } // Set the file translation mode for a C runtime file descriptor. static PyObject * msvcrt_setmode(PyObject *self, PyObject *args) { int fd; int flags; if (!PyArg_ParseTuple(args,"ii:setmode", &fd, &flags)) return NULL; flags = _setmode(fd, flags); if (flags == -1) return PyErr_SetFromErrno(PyExc_IOError); return PyInt_FromLong(flags); } // Convert an OS file handle to a C runtime file descriptor. static PyObject * msvcrt_open_osfhandle(PyObject *self, PyObject *args) { long handle; int flags; int fd; if (!PyArg_ParseTuple(args, "li:open_osfhandle", &handle, &flags)) return NULL; fd = _open_osfhandle(handle, flags); if (fd == -1) return PyErr_SetFromErrno(PyExc_IOError); return PyInt_FromLong(fd); } // Convert a C runtime file descriptor to an OS file handle. static PyObject * msvcrt_get_osfhandle(PyObject *self, PyObject *args) { int fd; Py_intptr_t handle; if (!PyArg_ParseTuple(args,"i:get_osfhandle", &fd)) return NULL; handle = _get_osfhandle(fd); if (handle == -1) return PyErr_SetFromErrno(PyExc_IOError); /* technically 'handle' is not a pointer, but a integer as large as a pointer, Python's *VoidPtr interface is the most appropriate here */ return PyLong_FromVoidPtr((void*)handle); } /* Console I/O */ static PyObject * msvcrt_kbhit(PyObject *self, PyObject *args) { int ok; if (!PyArg_ParseTuple(args, ":kbhit")) return NULL; ok = _kbhit(); return PyInt_FromLong(ok); } static PyObject * msvcrt_getch(PyObject *self, PyObject *args) { int ch; char s[1]; if (!PyArg_ParseTuple(args, ":getch")) return NULL; Py_BEGIN_ALLOW_THREADS ch = _getch(); Py_END_ALLOW_THREADS s[0] = ch; return PyString_FromStringAndSize(s, 1); } static PyObject * msvcrt_getche(PyObject *self, PyObject *args) { int ch; char s[1]; if (!PyArg_ParseTuple(args, ":getche")) return NULL; Py_BEGIN_ALLOW_THREADS ch = _getche(); Py_END_ALLOW_THREADS s[0] = ch; return PyString_FromStringAndSize(s, 1); } static PyObject * msvcrt_putch(PyObject *self, PyObject *args) { char ch; if (!PyArg_ParseTuple(args, "c:putch", &ch)) return NULL; _putch(ch); Py_INCREF(Py_None); return Py_None; } static PyObject * msvcrt_ungetch(PyObject *self, PyObject *args) { char ch; if (!PyArg_ParseTuple(args, "c:ungetch", &ch)) return NULL; if (_ungetch(ch) == EOF) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } static void insertint(PyObject *d, char *name, int value) { PyObject *v = PyInt_FromLong((long) value); if (v == NULL) { /* Don't bother reporting this error */ PyErr_Clear(); } else { PyDict_SetItemString(d, name, v); Py_DECREF(v); } } /* List of functions exported by this module */ static struct PyMethodDef msvcrt_functions[] = { {"heapmin", msvcrt_heapmin, METH_VARARGS}, {"locking", msvcrt_locking, METH_VARARGS}, {"setmode", msvcrt_setmode, METH_VARARGS}, {"open_osfhandle", msvcrt_open_osfhandle, METH_VARARGS}, {"get_osfhandle", msvcrt_get_osfhandle, METH_VARARGS}, {"kbhit", msvcrt_kbhit, METH_VARARGS}, {"getch", msvcrt_getch, METH_VARARGS}, {"getche", msvcrt_getche, METH_VARARGS}, {"putch", msvcrt_putch, METH_VARARGS}, {"ungetch", msvcrt_ungetch, METH_VARARGS}, {NULL, NULL} }; PyMODINIT_FUNC initmsvcrt(void) { PyObject *m = Py_InitModule("msvcrt", msvcrt_functions); PyObject *d = PyModule_GetDict(m); /* constants for the locking() function's mode argument */ insertint(d, "LK_LOCK", _LK_LOCK); insertint(d, "LK_NBLCK", _LK_NBLCK); insertint(d, "LK_NBRLCK", _LK_NBRLCK); insertint(d, "LK_RLCK", _LK_RLCK); insertint(d, "LK_UNLCK", _LK_UNLCK); } Python-2.3.7/PC/w9xpopen.c0000644001241000117560000000710207514373673014526 0ustar loewishpifb6/* * w9xpopen.c * * Serves as an intermediate stub Win32 console application to * avoid a hanging pipe when redirecting 16-bit console based * programs (including MS-DOS console based programs and batch * files) on Window 95 and Windows 98. * * This program is to be launched with redirected standard * handles. It will launch the command line specified 16-bit * console based application in the same console, forwarding * it's own redirected standard handles to the 16-bit child. * AKA solution to the problem described in KB: Q150956. */ #define WIN32_LEAN_AND_MEAN #include #include #include /* for malloc and its friends */ const char *usage = "This program is used by Python's os.popen function\n" "to work around a limitation in Windows 95/98. It is\n" "not designed to be used as a stand-alone program."; int main(int argc, char *argv[]) { BOOL bRet; STARTUPINFO si; PROCESS_INFORMATION pi; DWORD exit_code=0; int cmdlen = 0; int i; char *cmdline, *cmdlinefill; if (argc < 2) { if (GetFileType(GetStdHandle(STD_INPUT_HANDLE))==FILE_TYPE_CHAR) /* Attached to a console, and therefore not executed by Python Display a message box for the inquisitive user */ MessageBox(NULL, usage, argv[0], MB_OK); else { /* Eeek - executed by Python, but args are screwed! Write an error message to stdout so there is at least some clue for the end user when it appears in their output. A message box would be hidden and blocks the app. */ fprintf(stdout, "Internal popen error - no args specified\n%s\n", usage); } return 1; } /* Build up the command-line from the args. Args with a space are quoted, existing quotes are escaped. To keep things simple calculating the buffer size, we assume every character is a quote - ie, we allocate double what we need in the worst case. As this is only double the command line passed to us, there is a good chance this is reasonably small, so the total allocation will almost always be < 512 bytes. */ for (i=1;i #include "Python.h" int WINAPI WinMain( HINSTANCE hInstance, /* handle to current instance */ HINSTANCE hPrevInstance, /* handle to previous instance */ LPSTR lpCmdLine, /* pointer to command line */ int nCmdShow /* show state of window */ ) { return Py_Main(__argc, __argv); } Python-2.3.7/PC/config.c0000644001241000117560000000604307647754242014207 0ustar loewishpifb6/* Module configuration */ /* This file contains the table of built-in modules. See init_builtin() in import.c. */ #include "Python.h" extern void initarray(void); #ifndef MS_WIN64 extern void initaudioop(void); #endif extern void initbinascii(void); extern void initcmath(void); extern void initerrno(void); extern void initgc(void); #ifndef MS_WIN64 extern void initimageop(void); #endif extern void initmath(void); extern void initmd5(void); extern void initnt(void); extern void initoperator(void); extern void initregex(void); #ifndef MS_WIN64 extern void initrgbimg(void); #endif extern void initrotor(void); extern void initsignal(void); extern void initsha(void); extern void initstrop(void); extern void initstruct(void); extern void inittime(void); extern void initthread(void); extern void initcStringIO(void); extern void initcPickle(void); extern void initpcre(void); #ifdef WIN32 extern void initmsvcrt(void); extern void init_locale(void); #endif extern void init_codecs(void); extern void initxreadlines(void); extern void init_weakref(void); extern void init_hotshot(void); extern void initxxsubtype(void); extern void initzipimport(void); extern void init_random(void); extern void inititertools(void); /* tools/freeze/makeconfig.py marker for additional "extern" */ /* -- ADDMODULE MARKER 1 -- */ extern void PyMarshal_Init(void); extern void initimp(void); struct _inittab _PyImport_Inittab[] = { {"array", initarray}, #ifdef MS_WINDOWS #ifndef MS_WIN64 {"audioop", initaudioop}, #endif #endif {"binascii", initbinascii}, {"cmath", initcmath}, {"errno", initerrno}, {"gc", initgc}, #ifndef MS_WIN64 {"imageop", initimageop}, #endif {"math", initmath}, {"md5", initmd5}, {"nt", initnt}, /* Use the NT os functions, not posix */ {"operator", initoperator}, {"regex", initregex}, #ifndef MS_WIN64 {"rgbimg", initrgbimg}, #endif {"rotor", initrotor}, {"signal", initsignal}, {"sha", initsha}, {"strop", initstrop}, {"struct", initstruct}, {"time", inittime}, #ifdef WITH_THREAD {"thread", initthread}, #endif {"cStringIO", initcStringIO}, {"cPickle", initcPickle}, {"pcre", initpcre}, #ifdef WIN32 {"msvcrt", initmsvcrt}, {"_locale", init_locale}, #endif {"_codecs", init_codecs}, {"xreadlines", initxreadlines}, {"_weakref", init_weakref}, {"_hotshot", init_hotshot}, {"_random", init_random}, {"itertools", inititertools}, {"xxsubtype", initxxsubtype}, {"zipimport", initzipimport}, /* tools/freeze/makeconfig.py marker for additional "_inittab" entries */ /* -- ADDMODULE MARKER 2 -- */ /* This module "lives in" with marshal.c */ {"marshal", PyMarshal_Init}, /* This lives it with import.c */ {"imp", initimp}, /* These entries are here for sys.builtin_module_names */ {"__main__", NULL}, {"__builtin__", NULL}, {"sys", NULL}, {"exceptions", NULL}, /* Sentinel */ {0, 0} }; Python-2.3.7/PC/example_nt/0000755001241000117560000000000010765544512014717 5ustar loewishpifb6Python-2.3.7/PC/example_nt/.cvsignore0000644001241000117560000000006306435653414016717 0ustar loewishpifb6? example.ncb ? release ? debug ? .c ? example.mdp Python-2.3.7/PC/example_nt/readme.txt0000644001241000117560000001544607406747065016735 0ustar loewishpifb6Example Python extension for Windows NT ======================================= This directory contains everything needed (except for the Python distribution!) to build a Python extension module using Microsoft VC++ ("Developer Studio") version 6. It has been tested with VC++ 6.0 on Python 2.2c1. You can also use earlier versions of VC to build Python extensions, but the sample VC project file (example.dsw in this directory) is in VC 6 format. COPY THIS DIRECTORY! -------------------- This "example_nt" directory is a subdirectory of the PC directory, in order to keep all the PC-specific files under the same directory. However, the example_nt directory can't actually be used from this location. You first need to copy or move it up one level, so that example_nt is a direct sibling of the PC\ and Include\ directories. Do all your work from within this new location -- sorry, but you'll be sorry if you don't. OPEN THE PROJECT ---------------- From VC 6.x, use the File -> Open Workspace... dialog (*not* the "File -> Open..." dialog!). Navigate to and select the file "example.dsw", in the *copy* of the example_nt directory you made above. Click Open. BUILD THE EXAMPLE DLL --------------------- In order to check that everything is set up right, try building: 1. Select a configuration. This step is optional. Do Build -> Select Active Configuration... and select either "example - Win32 Release" or "example - Win32 Debug". If you skip this step, you'll use the Debug configuration by default. 2. Build the DLL. Do Build -> Build example_d.dll in Debug mode, or Build -> Build example.dll in Release mode. This creates all intermediate and result files in a subdirectory which is called either Debug or Release, depending on which configuration you picked in the preceding step. TESTING THE DEBUG-MODE DLL -------------------------- Once the Debug build has succeeded, bring up a DOS box, and cd to example_nt\Debug. You should now be able to repeat the following session ("C>" is the DOS prompt, ">>>" is the Python prompt) (note that various debug output from Python may not match this screen dump exactly): C>..\..\PCbuild\python_d Adding parser accelerators ... Done. Python 2.2c1+ (#28, Dec 14 2001, 18:06:39) [MSC 32 bit (Intel)] on win32 Type "help", "copyright", "credits" or "license" for more information. >>> import example [7052 refs] >>> example.foo() Hello, world [7052 refs] >>> TESTING THE RELEASE-MODE DLL ---------------------------- Once the Release build has succeeded, bring up a DOS box, and cd to example_nt\Release. You should now be able to repeat the following session ("C>" is the DOS prompt, ">>>" is the Python prompt): C>..\..\PCbuild\python Python 2.2c1+ (#28, Dec 14 2001, 18:06:04) [MSC 32 bit (Intel)] on win32 Type "help", "copyright", "credits" or "license" for more information. >>> import example >>> example.foo() Hello, world >>> Congratulations! You've successfully built your first Python extension module. CREATING YOUR OWN PROJECT ------------------------- Choose a name ("spam" is always a winner :-) and create a directory for it. Copy your C sources into it. Note that the module source file name does not necessarily have to match the module name, but the "init" function name should match the module name -- i.e. you can only import a module "spam" if its init function is called "initspam()", and it should call Py_InitModule with the string "spam" as its first argument (use the minimal example.c in this directory as a guide). By convention, it lives in a file called "spam.c" or "spammodule.c". The output file should be called "spam.dll" or "spam.pyd" (the latter is supported to avoid confusion with a system library "spam.dll" to which your module could be a Python interface) in Release mode, or spam_d.dll or spam_d.pyd in Debug mode. Now your options are: 1) Copy example.dsw and example.dsp, rename them to spam.*, and edit them by hand. or 2) Create a brand new project; instructions are below. In either case, copy example_nt\example.def to spam\spam.def, and edit the new spam.def so its second line contains the string "initspam". If you created a new project yourself, add the file spam.def to the project now. (This is an annoying little file with only two lines. An alternative approach is to forget about the .def file, and add the option "/export:initspam" somewhere to the Link settings, by manually editing the "Project Options" box). You are now all set to build your extension, unless it requires other external libraries, include files, etc. See Python's Extending and Embedding manual for instructions on how to write an extension. CREATING A BRAND NEW PROJECT ---------------------------- Use the File -> New... -> Projects dialog to create a new Project Workspace. Select "Win32 Dynamic-Link Library", enter the name ("spam"), and make sure the "Location" is set to the spam directory you have created (which should be a direct subdirectory of the Python build tree, a sibling of Include and PC). Select Win32 as the platform (in my version, this is the only choice). Make sure the "Create new workspace" radio button is selected. Click OK. Now open the Project -> Settings... dialog. (Impressive, isn't it? :-) You only need to change a few settings. Make sure "All Configurations" is selected from the "Settings for:" dropdown list. Select the "C/C++" tab. Choose the "Preprocessor" category in the popup menu at the top. Type the following text in the entry box labeled "Addditional include directories:" ..\Include,..\PC Then, choose the "Input" category in the Link tab, and enter ..\PCbuild in the "Additional library path:" box. Now you need to add some mode-specific settings: Select "Win32 Release" in the "Settings for:" dropdown list. Click the "Link" tab, choose the "Input" Category, and append "python22.lib" to the list in the "Object/library modules:" box. Select "Win32 Debug" in the "Settings for:" dropdown list, and append "python22_d.lib" to the list in the "Object/library modules:" box. Then click on the C/C++ tab, select "Code Generation" from the "Category:" dropdown list, and select "Debug Multithreaded DLL" from the "Use run-time library:" dropdown list. Select "Win32 Release" again from the "Settings for:" dropdown list. Select "Multithreaded DLL" from the "Use run-time library:" dropdown list. That's all . You should now create the file spam.def as instructed in the previous section. Then chose the Insert -> Files into Project... dialog. Set the pattern to *.* and select both spam.c and spam.def and click OK. (Inserting them one by one is fine too.) Python-2.3.7/PC/example_nt/example.dsw0000644001241000117560000000103107127746723017072 0ustar loewishpifb6Microsoft Developer Studio Workspace File, Format Version 6.00 # WARNING: DO NOT EDIT OR DELETE THIS WORKSPACE FILE! ############################################################################### Project: "example"=.\example.dsp - Package Owner=<4> Package=<5> {{{ }}} Package=<4> {{{ }}} ############################################################################### Global: Package=<5> {{{ }}} Package=<3> {{{ }}} ############################################################################### Python-2.3.7/PC/example_nt/example.def0000644001241000117560000000002506214112245017013 0ustar loewishpifb6EXPORTS initexample Python-2.3.7/PC/example_nt/example.dsp0000644001241000117560000001037507406747065017076 0ustar loewishpifb6# Microsoft Developer Studio Project File - Name="example" - Package Owner=<4> # Microsoft Developer Studio Generated Build File, Format Version 6.00 # ** DO NOT EDIT ** # TARGTYPE "Win32 (x86) Dynamic-Link Library" 0x0102 CFG=example - Win32 Release !MESSAGE This is not a valid makefile. To build this project using NMAKE, !MESSAGE use the Export Makefile command and run !MESSAGE !MESSAGE NMAKE /f "example.mak". !MESSAGE !MESSAGE You can specify a configuration when running NMAKE !MESSAGE by defining the macro CFG on the command line. For example: !MESSAGE !MESSAGE NMAKE /f "example.mak" CFG="example - Win32 Release" !MESSAGE !MESSAGE Possible choices for configuration are: !MESSAGE !MESSAGE "example - Win32 Release" (based on "Win32 (x86) Dynamic-Link Library") !MESSAGE "example - Win32 Debug" (based on "Win32 (x86) Dynamic-Link Library") !MESSAGE # Begin Project # PROP AllowPerConfigDependencies 0 # PROP Scc_ProjName "" # PROP Scc_LocalPath "" CPP=cl.exe MTL=midl.exe RSC=rc.exe !IF "$(CFG)" == "example - Win32 Release" # PROP BASE Use_MFC 0 # PROP BASE Use_Debug_Libraries 0 # PROP BASE Output_Dir ".\Release" # PROP BASE Intermediate_Dir ".\Release" # PROP BASE Target_Dir "" # PROP Use_MFC 0 # PROP Use_Debug_Libraries 0 # PROP Output_Dir ".\Release" # PROP Intermediate_Dir ".\Release" # PROP Ignore_Export_Lib 0 # PROP Target_Dir "" # ADD BASE CPP /nologo /MT /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_WINDOWS" /YX /c # ADD CPP /nologo /MD /W3 /GX /O2 /I "..\Include" /I "..\PC" /D "WIN32" /D "NDEBUG" /D "_WINDOWS" /YX /FD /c # ADD BASE MTL /nologo /D "NDEBUG" /win32 # ADD MTL /nologo /D "NDEBUG" /mktyplib203 /win32 # ADD BASE RSC /l 0x409 /d "NDEBUG" # ADD RSC /l 0x409 /d "NDEBUG" BSC32=bscmake.exe # ADD BASE BSC32 /nologo # ADD BSC32 /nologo LINK32=link.exe # ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:windows /dll /machine:I386 # ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib python22.lib /nologo /subsystem:windows /dll /machine:I386 /libpath:"..\PCbuild" /export:initexample # SUBTRACT LINK32 /pdb:none !ELSEIF "$(CFG)" == "example - Win32 Debug" # PROP BASE Use_MFC 0 # PROP BASE Use_Debug_Libraries 1 # PROP BASE Output_Dir ".\Debug" # PROP BASE Intermediate_Dir ".\Debug" # PROP BASE Target_Dir "" # PROP Use_MFC 0 # PROP Use_Debug_Libraries 1 # PROP Output_Dir ".\Debug" # PROP Intermediate_Dir ".\Debug" # PROP Ignore_Export_Lib 0 # PROP Target_Dir "" # ADD BASE CPP /nologo /MTd /W3 /Gm /GX /Zi /Od /D "WIN32" /D "_DEBUG" /D "_WINDOWS" /YX /c # ADD CPP /nologo /MDd /W3 /Gm /GX /ZI /Od /I "..\Include" /I "..\PC" /D "WIN32" /D "_DEBUG" /D "_WINDOWS" /YX /FD /c # ADD BASE MTL /nologo /D "_DEBUG" /win32 # ADD MTL /nologo /D "_DEBUG" /mktyplib203 /win32 # ADD BASE RSC /l 0x409 /d "_DEBUG" # ADD RSC /l 0x409 /d "_DEBUG" BSC32=bscmake.exe # ADD BASE BSC32 /nologo # ADD BSC32 /nologo LINK32=link.exe # ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:windows /dll /debug /machine:I386 # ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib python22_d.lib /nologo /subsystem:windows /dll /debug /machine:I386 /out:".\Debug/example_d.dll" /libpath:"..\PCbuild" /export:initexample # SUBTRACT LINK32 /pdb:none !ENDIF # Begin Target # Name "example - Win32 Release" # Name "example - Win32 Debug" # Begin Group "Source Files" # PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;hpj;bat;for;f90" # Begin Source File SOURCE=.\example.c # End Source File # Begin Source File SOURCE=.\example.def # End Source File # Begin Source File SOURCE=.\readme.txt # End Source File # End Group # Begin Group "Header Files" # PROP Default_Filter "h;hpp;hxx;hm;inl;fi;fd" # End Group # Begin Group "Resource Files" # PROP Default_Filter "ico;cur;bmp;dlg;rc2;rct;bin;cnt;rtf;gif;jpg;jpeg;jpe" # End Group # End Target # End Project Python-2.3.7/PC/example_nt/example.c0000644001241000117560000000047707136372477016535 0ustar loewishpifb6#include "Python.h" static PyObject * ex_foo(PyObject *self, PyObject *args) { printf("Hello, world\n"); Py_INCREF(Py_None); return Py_None; } static PyMethodDef example_methods[] = { {"foo", ex_foo, 1, "foo() doc string"}, {NULL, NULL} }; void initexample(void) { Py_InitModule("example", example_methods); } Python-2.3.7/PC/make_versioninfo.c0000644001241000117560000000201507745556242016272 0ustar loewishpifb6#include #include "patchlevel.h" /* * This program prints out an include file containing fields required to build * the version info resource of pythonxx.dll because the resource compiler * cannot do the arithmetic. */ /* * FIELD3 is the third field of the version number. * This is what we'd like FIELD3 to be: * * #define FIELD3 (PY_MICRO_VERSION*1000 + PY_RELEASE_LEVEL*10 + PY_RELEASE_SERIAL) * * but that neither gives an error nor comes anywhere close to working. * * For 2.4a0, * PY_MICRO_VERSION = 0 * PY_RELEASE_LEVEL = 'alpha' = 0xa * PY_RELEASE_SERIAL = 0 * * gives FIELD3 = 0*1000 + 10*10 + 0 = 100 */ int main(int argc, char **argv) { printf("/* This file created by make_versioninfo.exe */\n"); printf("#define FIELD3 %d\n", PY_MICRO_VERSION*1000 + PY_RELEASE_LEVEL*10 + PY_RELEASE_SERIAL); printf("#define MS_DLL_ID \"%d.%d\"\n", PY_MAJOR_VERSION, PY_MINOR_VERSION); printf("#define PYTHON_DLL_NAME \"python%d%d.dll\"\n", PY_MAJOR_VERSION, PY_MINOR_VERSION); return 0; } Python-2.3.7/PC/pyconfig.h0000644001241000117560000004060307744771210014555 0ustar loewishpifb6#ifndef Py_CONFIG_H #define Py_CONFIG_H /* pyconfig.h. NOT Generated automatically by configure. This is a manually maintained version used for the Watcom, Borland and Microsoft Visual C++ compilers. It is a standard part of the Python distribution. WINDOWS DEFINES: The code specific to Windows should be wrapped around one of the following #defines MS_WIN64 - Code specific to the MS Win64 API MS_WIN32 - Code specific to the MS Win32 (and Win64) API (obsolete, this covers all supported APIs) MS_WINDOWS - Code specific to Windows, but all versions. Py_ENABLE_SHARED - Code if the Python core is built as a DLL. Also note that neither "_M_IX86" or "_MSC_VER" should be used for any purpose other than "Windows Intel x86 specific" and "Microsoft compiler specific". Therefore, these should be very rare. NOTE: The following symbols are deprecated: NT, WIN32, USE_DL_EXPORT, USE_DL_IMPORT, DL_EXPORT, DL_IMPORT MS_CORE_DLL. */ #include #define HAVE_LIMITS_H #define HAVE_SYS_UTIME_H #define HAVE_HYPOT #define HAVE_TEMPNAM #define HAVE_TMPFILE #define HAVE_TMPNAM #define HAVE_CLOCK #define HAVE_STRFTIME #define HAVE_STRERROR #define DONT_HAVE_SIG_ALARM #define DONT_HAVE_SIG_PAUSE #define LONG_BIT 32 #define WORD_BIT 32 #define PREFIX "" #define EXEC_PREFIX "" #define MS_WIN32 /* only support win32 and greater. */ #define MS_WINDOWS #ifndef PYTHONPATH # define PYTHONPATH ".\\DLLs;.\\lib;.\\lib\\plat-win;.\\lib\\lib-tk" #endif #define NT_THREADS #define WITH_THREAD #ifndef NETSCAPE_PI #define USE_SOCKET #endif /* Compiler specific defines */ /* ------------------------------------------------------------------------*/ /* Microsoft C defines _MSC_VER */ #ifdef _MSC_VER /* We want COMPILER to expand to a string containing _MSC_VER's *value*. * This is horridly tricky, because the stringization operator only works * on macro arguments, and doesn't evaluate macros passed *as* arguments. * Attempts simpler than the following appear doomed to produce "_MSC_VER" * literally in the string. */ #define _Py_PASTE_VERSION(SUFFIX) \ ("[MSC v." _Py_STRINGIZE(_MSC_VER) " " SUFFIX "]") /* e.g., this produces, after compile-time string catenation, * ("[MSC v.1200 32 bit (Intel)]") * * _Py_STRINGIZE(_MSC_VER) expands to * _Py_STRINGIZE1((_MSC_VER)) expands to * _Py_STRINGIZE2(_MSC_VER) but as this call is the result of token-pasting * it's scanned again for macros and so further expands to (under MSVC 6) * _Py_STRINGIZE2(1200) which then expands to * "1200" */ #define _Py_STRINGIZE(X) _Py_STRINGIZE1((X)) #define _Py_STRINGIZE1(X) _Py_STRINGIZE2 ## X #define _Py_STRINGIZE2(X) #X /* MSVC defines _WINxx to differentiate the windows platform types Note that for compatibility reasons _WIN32 is defined on Win32 *and* on Win64. For the same reasons, in Python, MS_WIN32 is defined on Win32 *and* Win64. Win32 only code must therefore be guarded as follows: #if defined(MS_WIN32) && !defined(MS_WIN64) */ #ifdef _WIN64 #define MS_WIN64 #endif /* set the COMPILER */ #ifdef MS_WIN64 #ifdef _M_IX86 #define COMPILER _Py_PASTE_VERSION("64 bit (Intel)") #else #define COMPILER _Py_PASTE_VERSION("64 bit (Unknown)") #endif #endif /* MS_WIN64 */ #if defined(MS_WIN32) && !defined(MS_WIN64) #ifdef _M_IX86 #define COMPILER _Py_PASTE_VERSION("32 bit (Intel)") #else #define COMPILER _Py_PASTE_VERSION("32 bit (Unknown)") #endif #endif /* MS_WIN32 && !MS_WIN64 */ typedef int pid_t; #define hypot _hypot #endif /* _MSC_VER */ /* define some ANSI types that are not defined in earlier Win headers */ #if defined(_MSC_VER) && _MSC_VER >= 1200 /* This file only exists in VC 6.0 or higher */ #include #endif /* ------------------------------------------------------------------------*/ /* The Borland compiler defines __BORLANDC__ */ /* XXX These defines are likely incomplete, but should be easy to fix. */ #ifdef __BORLANDC__ #define COMPILER "[Borland]" #ifdef _WIN32 /* tested with BCC 5.5 (__BORLANDC__ >= 0x0550) */ typedef int pid_t; /* BCC55 seems to understand __declspec(dllimport), it is used in its own header files (winnt.h, ...) - so we can do nothing and get the default*/ #undef HAVE_SYS_UTIME_H #define HAVE_UTIME_H #define HAVE_DIRENT_H /* rename a few functions for the Borland compiler */ #include #define _chsize chsize #define _setmode setmode #else /* !_WIN32 */ #error "Only Win32 and later are supported" #endif /* !_WIN32 */ #endif /* BORLANDC */ /* ------------------------------------------------------------------------*/ /* egcs/gnu-win32 defines __GNUC__ and _WIN32 */ #if defined(__GNUC__) && defined(_WIN32) /* XXX These defines are likely incomplete, but should be easy to fix. They should be complete enough to build extension modules. */ /* Suggested by Rene Liebscher to avoid a GCC 2.91.* bug that requires structure imports. More recent versions of the compiler don't exhibit this bug. */ #if (__GNUC__==2) && (__GNUC_MINOR__<=91) #warning "Please use an up-to-date version of gcc! (>2.91 recommended)" #endif #define COMPILER "[gcc]" #define hypot _hypot #define PY_LONG_LONG long long #endif /* GNUC */ /* ------------------------------------------------------------------------*/ /* lcc-win32 defines __LCC__ */ #if defined(__LCC__) /* XXX These defines are likely incomplete, but should be easy to fix. They should be complete enough to build extension modules. */ #define COMPILER "[lcc-win32]" typedef int pid_t; /* __declspec() is supported here too - do nothing to get the defaults */ #endif /* LCC */ /* ------------------------------------------------------------------------*/ /* End of compilers - finish up */ #ifndef NO_STDIO_H # include #endif /* 64 bit ints are usually spelt __int64 unless compiler has overridden */ #define HAVE_LONG_LONG 1 #ifndef PY_LONG_LONG # define PY_LONG_LONG __int64 #endif /* For Windows the Python core is in a DLL by default. Test Py_NO_ENABLE_SHARED to find out. Also support MS_NO_COREDLL for b/w compat */ #if !defined(MS_NO_COREDLL) && !defined(Py_NO_ENABLE_SHARED) # define Py_ENABLE_SHARED 1 /* standard symbol for shared library */ # define MS_COREDLL /* deprecated old symbol */ #endif /* !MS_NO_COREDLL && ... */ /* Deprecated USE_DL_EXPORT macro - please use Py_BUILD_CORE */ #ifdef USE_DL_EXPORT # define Py_BUILD_CORE #endif /* USE_DL_EXPORT */ /* All windows compilers that use this header support __declspec */ #define HAVE_DECLSPEC_DLL /* For an MSVC DLL, we can nominate the .lib files used by extensions */ #ifdef MS_COREDLL # ifndef Py_BUILD_CORE /* not building the core - must be an ext */ # if defined(_MSC_VER) /* So MSVC users need not specify the .lib file in their Makefile (other compilers are generally taken care of by distutils.) */ # ifdef _DEBUG # pragma comment(lib,"python23_d.lib") # else # pragma comment(lib,"python23.lib") # endif /* _DEBUG */ # endif /* _MSC_VER */ # endif /* Py_BUILD_CORE */ #endif /* MS_COREDLL */ #if defined(MS_WIN64) /* maintain "win32" sys.platform for backward compatibility of Python code, the Win64 API should be close enough to the Win32 API to make this preferable */ # define PLATFORM "win32" # define SIZEOF_VOID_P 8 # define SIZEOF_TIME_T 8 # define SIZEOF_OFF_T 4 # define SIZEOF_FPOS_T 8 # define SIZEOF_HKEY 8 /* configure.in defines HAVE_LARGEFILE_SUPPORT iff HAVE_LONG_LONG, sizeof(off_t) > sizeof(long), and sizeof(PY_LONG_LONG) >= sizeof(off_t). On Win64 the second condition is not true, but if fpos_t replaces off_t then this is true. The uses of HAVE_LARGEFILE_SUPPORT imply that Win64 should define this. */ # define HAVE_LARGEFILE_SUPPORT #elif defined(MS_WIN32) # define PLATFORM "win32" # define HAVE_LARGEFILE_SUPPORT # define SIZEOF_VOID_P 4 # define SIZEOF_TIME_T 4 # define SIZEOF_OFF_T 4 # define SIZEOF_FPOS_T 8 # define SIZEOF_HKEY 4 #endif #ifdef _DEBUG # define Py_DEBUG #endif #ifdef MS_WIN32 #define SIZEOF_SHORT 2 #define SIZEOF_INT 4 #define SIZEOF_LONG 4 #define SIZEOF_LONG_LONG 8 #endif /* Fairly standard from here! */ /* Define if on AIX 3. System headers sometimes define this. We just want to avoid a redefinition error message. */ #ifndef _ALL_SOURCE /* #undef _ALL_SOURCE */ #endif /* Define to empty if the keyword does not work. */ /* #define const */ /* Define if you have dirent.h. */ /* #define DIRENT 1 */ /* Define to the type of elements in the array set by `getgroups'. Usually this is either `int' or `gid_t'. */ /* #undef GETGROUPS_T */ /* Define to `int' if doesn't define. */ /* #undef gid_t */ /* Define if your struct tm has tm_zone. */ /* #undef HAVE_TM_ZONE */ /* Define if you don't have tm_zone but do have the external array tzname. */ #define HAVE_TZNAME /* Define if on MINIX. */ /* #undef _MINIX */ /* Define to `int' if doesn't define. */ /* #undef mode_t */ /* Define if you don't have dirent.h, but have ndir.h. */ /* #undef NDIR */ /* Define to `long' if doesn't define. */ /* #undef off_t */ /* Define to `int' if doesn't define. */ /* #undef pid_t */ /* Define if the system does not provide POSIX.1 features except with this defined. */ /* #undef _POSIX_1_SOURCE */ /* Define if you need to in order for stat and other things to work. */ /* #undef _POSIX_SOURCE */ /* Define as the return type of signal handlers (int or void). */ #define RETSIGTYPE void /* Define to `unsigned' if doesn't define. */ /* #undef size_t */ /* Define to `int' if doesn't define. */ #if _MSC_VER + 0 >= 1300 /* VC.NET typedefs socklen_t in ws2tcpip.h. */ #else #define socklen_t int #endif /* Define if you have the ANSI C header files. */ #define STDC_HEADERS 1 /* Define if you don't have dirent.h, but have sys/dir.h. */ /* #undef SYSDIR */ /* Define if you don't have dirent.h, but have sys/ndir.h. */ /* #undef SYSNDIR */ /* Define if you can safely include both and . */ /* #undef TIME_WITH_SYS_TIME */ /* Define if your declares struct tm. */ /* #define TM_IN_SYS_TIME 1 */ /* Define to `int' if doesn't define. */ /* #undef uid_t */ /* Define if the closedir function returns void instead of int. */ /* #undef VOID_CLOSEDIR */ /* Define if your contains bad prototypes for exec*() (as it does on SGI IRIX 4.x) */ /* #undef BAD_EXEC_PROTOTYPES */ /* Define if getpgrp() must be called as getpgrp(0) and (consequently) setpgrp() as setpgrp(0, 0). */ /* #undef GETPGRP_HAVE_ARGS */ /* Define this if your time.h defines altzone */ /* #define HAVE_ALTZONE */ /* Define if you have the putenv function. */ #define HAVE_PUTENV /* Define if your compiler supports function prototypes */ #define HAVE_PROTOTYPES /* Define if you can safely include both and (which you can't on SCO ODT 3.0). */ /* #undef SYS_SELECT_WITH_SYS_TIME */ /* Define if you want to use SGI (IRIX 4) dynamic linking. This requires the "dl" library by Jack Jansen, ftp://ftp.cwi.nl/pub/dynload/dl-1.6.tar.Z. Don't bother on IRIX 5, it already has dynamic linking using SunOS style shared libraries */ /* #undef WITH_SGI_DL */ /* Define if you want to emulate SGI (IRIX 4) dynamic linking. This is rumoured to work on VAX (Ultrix), Sun3 (SunOS 3.4), Sequent Symmetry (Dynix), and Atari ST. This requires the "dl-dld" library, ftp://ftp.cwi.nl/pub/dynload/dl-dld-1.1.tar.Z, as well as the "GNU dld" library, ftp://ftp.cwi.nl/pub/dynload/dld-3.2.3.tar.Z. Don't bother on SunOS 4 or 5, they already have dynamic linking using shared libraries */ /* #undef WITH_DL_DLD */ /* Define if you want documentation strings in extension modules */ #define WITH_DOC_STRINGS 1 /* Define if you want to compile in rudimentary thread support */ /* #undef WITH_THREAD */ /* Define if you want to use the GNU readline library */ /* #define WITH_READLINE 1 */ /* Define if you want to have a Unicode type. */ #define Py_USING_UNICODE /* Define as the integral type used for Unicode representation. */ #define PY_UNICODE_TYPE unsigned short /* Define as the size of the unicode type. */ #define Py_UNICODE_SIZE SIZEOF_SHORT /* Define if you have a useable wchar_t type defined in wchar.h; useable means wchar_t must be 16-bit unsigned type. (see Include/unicodeobject.h). */ #if Py_UNICODE_SIZE == 2 #define HAVE_USABLE_WCHAR_T /* Define to indicate that the Python Unicode representation can be passed as-is to Win32 Wide API. */ #define Py_WIN_WIDE_FILENAMES #endif /* Use Python's own small-block memory-allocator. */ #define WITH_PYMALLOC 1 /* Enable \n, \r, \r\n line ends on import; also the 'U' mode flag for open. */ #define WITH_UNIVERSAL_NEWLINES 1 /* Define if you have clock. */ /* #define HAVE_CLOCK */ /* Define when any dynamic module loading is enabled */ #define HAVE_DYNAMIC_LOADING /* Define if you have ftime. */ #define HAVE_FTIME /* Define if you have getpeername. */ #define HAVE_GETPEERNAME /* Define if you have getpgrp. */ /* #undef HAVE_GETPGRP */ /* Define if you have getpid. */ #define HAVE_GETPID /* Define if you have gettimeofday. */ /* #undef HAVE_GETTIMEOFDAY */ /* Define if you have getwd. */ /* #undef HAVE_GETWD */ /* Define if you have lstat. */ /* #undef HAVE_LSTAT */ /* Define if you have the mktime function. */ #define HAVE_MKTIME /* Define if you have nice. */ /* #undef HAVE_NICE */ /* Define if you have readlink. */ /* #undef HAVE_READLINK */ /* Define if you have select. */ /* #undef HAVE_SELECT */ /* Define if you have setpgid. */ /* #undef HAVE_SETPGID */ /* Define if you have setpgrp. */ /* #undef HAVE_SETPGRP */ /* Define if you have setsid. */ /* #undef HAVE_SETSID */ /* Define if you have setvbuf. */ #define HAVE_SETVBUF /* Define if you have siginterrupt. */ /* #undef HAVE_SIGINTERRUPT */ /* Define if you have symlink. */ /* #undef HAVE_SYMLINK */ /* Define if you have tcgetpgrp. */ /* #undef HAVE_TCGETPGRP */ /* Define if you have tcsetpgrp. */ /* #undef HAVE_TCSETPGRP */ /* Define if you have times. */ /* #undef HAVE_TIMES */ /* Define if you have uname. */ /* #undef HAVE_UNAME */ /* Define if you have waitpid. */ /* #undef HAVE_WAITPID */ /* Define to 1 if you have the `wcscoll' function. */ #define HAVE_WCSCOLL 1 /* Define if you have the header file. */ /* #undef HAVE_DLFCN_H */ /* Define if you have the header file. */ #define HAVE_FCNTL_H 1 /* Define if you have the header file. */ #define HAVE_SIGNAL_H 1 /* Define if you have the header file. */ #define HAVE_STDARG_H 1 /* Define if you have the prototypes. */ #define HAVE_STDARG_PROTOTYPES /* Define if you have the header file. */ #define HAVE_STDDEF_H 1 /* Define if you have the header file. */ #define HAVE_STDLIB_H 1 /* Define if you have the header file. */ /* #undef HAVE_SYS_AUDIOIO_H */ /* Define if you have the header file. */ /* #define HAVE_SYS_PARAM_H 1 */ /* Define if you have the header file. */ /* #define HAVE_SYS_SELECT_H 1 */ /* Define if you have the header file. */ /* #define HAVE_SYS_TIME_H 1 */ /* Define if you have the header file. */ /* #define HAVE_SYS_TIMES_H 1 */ /* Define if you have the header file. */ /* #define HAVE_SYS_UN_H 1 */ /* Define if you have the header file. */ /* #define HAVE_SYS_UTIME_H 1 */ /* Define if you have the header file. */ /* #define HAVE_SYS_UTSNAME_H 1 */ /* Define if you have the header file. */ /* #undef HAVE_THREAD_H */ /* Define if you have the header file. */ /* #define HAVE_UNISTD_H 1 */ /* Define if you have the header file. */ /* #define HAVE_UTIME_H 1 */ /* Define if the compiler provides a wchar.h header file. */ #define HAVE_WCHAR_H 1 /* Define if you have the dl library (-ldl). */ /* #undef HAVE_LIBDL */ /* Define if you have the mpc library (-lmpc). */ /* #undef HAVE_LIBMPC */ /* Define if you have the nsl library (-lnsl). */ #define HAVE_LIBNSL 1 /* Define if you have the seq library (-lseq). */ /* #undef HAVE_LIBSEQ */ /* Define if you have the socket library (-lsocket). */ #define HAVE_LIBSOCKET 1 /* Define if you have the sun library (-lsun). */ /* #undef HAVE_LIBSUN */ /* Define if you have the termcap library (-ltermcap). */ /* #undef HAVE_LIBTERMCAP */ /* Define if you have the termlib library (-ltermlib). */ /* #undef HAVE_LIBTERMLIB */ /* Define if you have the thread library (-lthread). */ /* #undef HAVE_LIBTHREAD */ #endif /* !Py_CONFIG_H */ Python-2.3.7/PC/py.ico0000644001241000117560000000137606436730046013715 0ustar loewishpifb6 è( @€€€€€€€€€€€€€ÀÀÀÿÿÿÿÿÿÿÿÿÿÿÿª£ 3ªª  ªªªª£33£333ªª33333330  3:3333333333ªª3303333330 ª333303003£3300 ª3333ª330 ª£33™ªª:330 š:ª £33™:ª:33 : ª£30£££ :3£30 ªªª : ª£30 £££ª  : 330333£ªª 330033£ªª 3333333£ª 33333333:3033333030030» »¼ ̼ Ì» »3030ÿÿÿþƒÿüÿøgøøøüüÞü_€þ€àÿÀ0ÿÀ ÿÀÿÀÿ€ÿÿÿÿÿÿ€ÿÀÿðÿøÿÿøÿÿøÿÿøÿÿøÿÿüÿÿþGÿÿPython-2.3.7/PC/os2vacpp/0000755001241000117560000000000010765544512014320 5ustar loewishpifb6Python-2.3.7/PC/os2vacpp/_tkinter.def0000644001241000117560000000031706604003600016601 0ustar loewishpifb6LIBRARY _TKINTER INITINSTANCE TERMINSTANCE DESCRIPTION 'Python Extension DLL v1.0 for Access to Tcl/Tk Environment' PROTMODE DATA MULTIPLE NONSHARED EXPORTS init_tkinter Python-2.3.7/PC/os2vacpp/makefile0000644001241000117560000035222610032007577016022 0ustar loewishpifb6###################################################################### # # Top-Level Makefile for Building Python for OS/2 # # This makefile was developed for use with IBM's VisualAge C/C++ # for OS/2 compiler, version 3.0, with Fixpack 8 applied. It uses # version 4.0 of the NMAKE tool that comes with that package. # # The output of the build is a largish Python23.DLL containing the # essential modules of Python and a small Python.exe program to start # the interpreter. When embedding Python within another program, only # Python23.DLL is needed. # # These two binaries can be statically linked with the VisualAge C/C++ # runtime library (producing larger binaries), or dynamically linked # to make smaller ones that require the compiler to be installed on # any system Python is used on. Review the /Gd+ compiler option for # how to do this. # # NOTE: IBM's NMAKE 4.0 is rather dumb, requiring this makefile to # be much more complicated than necessary. I use OpusMAKE # myself for a much more powerful MAKE tool but not everyone # wishes to buy it. However, as a result I didn't hook in # the dependencies on the include files as NMAKE has no easy # way to do this without explicitly spelling it all out. # # History (Most Recent First) # # 26-Sep-98 jrr Retested and adjusted for building w/Python 1.5.2a1 # 20-Nov-97 jrr Cleaned Up for Applying to Distribution # 29-Oct-97 jrr Modified for Use with Python 1.5 Alpha 4 # 03-Aug-96 jrr Original for Use with Python 1.4 Release # ###################################################################### ################### # Places and Things ################### PY_MODULES = ..\..\Modules PY_OBJECTS = ..\..\Objects PY_PARSER = ..\..\Parser PY_PYTHON = ..\..\Python PY_INCLUDE = ..\..\Include PY_INCLUDES = .;$(PY_INCLUDE);$(PY_MODULES);$(PY_OBJECTS);$(PY_PARSER);$(PY_PYTHON) # File to Collect Wordy Compiler Output re Errors ERRS = make.out # Where to Find the IBM TCP/IP Socket Includes and Libraries OS2TCPIP = C:\MPTN # Where to Find the Tcl/Tk Base Directory for Libs/Includes TCLTK = D:\TclTk TCLBASE = D:\Tcl7.6\OS2 TKBASE = D:\Tk4.2\OS2 # Where to Put the .OBJ Files, To Keep Them Out of the Way PATHOBJ = obj # Search Path for Include Files PROJINCLUDE = .;$(TCLBASE);$(TKBASE);$(OS2TCPIP)\Include;$(PY_INCLUDES) # Place to Search for Sources re OpusMAKE Dependency Generator (Commercial) MKMF_SRCS = $(PY_MODULES)\*.c $(PY_OBJECTS)\*.c $(PY_PARSER)\*.c $(PY_PYTHON)\*.c #.HDRPATH.c := $(PROJINCLUDE,;= ) $(.HDRPATH.c) #.PATH.c = .;$(PY_MODULES);$(PY_OBJECTS);$(PY_PARSER);$(PY_PYTHON) OTHERLIBS = so32dll.lib tcp32dll.lib # Tcl76.lib Tk42.lib ################# # Inference Rules ################# {$(PY_MODULES)\}.c{$(PATHOBJ)\}.obj: # Compile C Code into a .OBJ File @ Echo Compiling $< @ $(CC) -c $(CFLAGS) -Fo$@ $< >>$(ERRS) {$(PY_OBJECTS)\}.c{$(PATHOBJ)\}.obj: # Compile C Code into a .OBJ File @ Echo Compiling $< @ $(CC) -c $(CFLAGS) -Fo$@ $< >>$(ERRS) {$(PY_PARSER)\}.c{$(PATHOBJ)\}.obj: # Compile C Code into a .OBJ File @ Echo Compiling $< @ $(CC) -c $(CFLAGS) -Fo$@ $< >>$(ERRS) {$(PY_PYTHON)\}.c{$(PATHOBJ)\}.obj: # Compile C Code into a .OBJ File @ Echo Compiling $< @ $(CC) -c $(CFLAGS) -Fo$@ $< >>$(ERRS) .c{$(PATHOBJ)\}.obj: # Compile C Code into a .OBJ File @ Echo Compiling $< @ $(CC) -c $(CFLAGS) -Fo$@ $< >>$(ERRS) ################### # Python Subsystems ################### # PYTHON is the central core, containing the builtins and interpreter. PYTHON = \ $(PATHOBJ)\BltinModule.obj \ $(PATHOBJ)\CEval.obj \ $(PATHOBJ)\Compile.obj \ $(PATHOBJ)\Errors.obj \ $(PATHOBJ)\Frozen.obj \ $(PATHOBJ)\Getargs.obj \ $(PATHOBJ)\GetCompiler.obj \ $(PATHOBJ)\GetCopyright.obj \ $(PATHOBJ)\GetMTime.obj \ $(PATHOBJ)\GetOpt.obj \ $(PATHOBJ)\GetPlatform.obj \ $(PATHOBJ)\GetVersion.obj \ $(PATHOBJ)\GramInit.obj \ $(PATHOBJ)\Import.obj \ $(PATHOBJ)\ImportDL.obj \ $(PATHOBJ)\Marshal.obj \ $(PATHOBJ)\ModSupport.obj \ $(PATHOBJ)\MyStrtoul.obj \ $(PATHOBJ)\PyState.obj \ $(PATHOBJ)\PythonRun.obj \ $(PATHOBJ)\StructMember.obj \ $(PATHOBJ)\SysModule.obj \ $(PATHOBJ)\Thread.obj \ $(PATHOBJ)\TraceBack.obj \ $(PATHOBJ)\FrozenMain.obj \ $(PATHOBJ)\exceptions.obj \ $(PATHOBJ)\symtable.obj \ $(PATHOBJ)\codecs.obj \ $(PATHOBJ)\future.obj \ $(PATHOBJ)\dynload_os2.obj \ $(PATHOBJ)\mysnprintf.obj \ $(PATHOBJ)\iterobject.obj # Python's Internal Parser PARSER = \ $(PATHOBJ)\Acceler.obj \ $(PATHOBJ)\Grammar1.obj \ $(PATHOBJ)\ListNode.obj \ $(PATHOBJ)\Node.obj \ $(PATHOBJ)\Parser.obj \ $(PATHOBJ)\ParseTok.obj \ $(PATHOBJ)\BitSet.obj \ $(PATHOBJ)\MetaGrammar.obj \ $(PATHOBJ)\Tokenizer.obj \ $(PATHOBJ)\MyReadline.obj # Python Object Types OBJECTS = \ $(PATHOBJ)\Abstract.obj \ $(PATHOBJ)\BoolObject.obj \ $(PATHOBJ)\BufferObject.obj \ $(PATHOBJ)\CellObject.obj \ $(PATHOBJ)\ClassObject.obj \ $(PATHOBJ)\CObject.obj \ $(PATHOBJ)\ComplexObject.obj \ $(PATHOBJ)\DescrObject.obj \ $(PATHOBJ)\DictObject.obj \ $(PATHOBJ)\EnumObject.obj \ $(PATHOBJ)\FileObject.obj \ $(PATHOBJ)\FloatObject.obj \ $(PATHOBJ)\FrameObject.obj \ $(PATHOBJ)\FuncObject.obj \ $(PATHOBJ)\IntObject.obj \ $(PATHOBJ)\IterObject.obj \ $(PATHOBJ)\ListObject.obj \ $(PATHOBJ)\LongObject.obj \ $(PATHOBJ)\MethodObject.obj \ $(PATHOBJ)\ModuleObject.obj \ $(PATHOBJ)\Object.obj \ $(PATHOBJ)\ObMalloc.obj \ $(PATHOBJ)\RangeObject.obj \ $(PATHOBJ)\SliceObject.obj \ $(PATHOBJ)\StringObject.obj \ $(PATHOBJ)\StructSeq.obj \ $(PATHOBJ)\TupleObject.obj \ $(PATHOBJ)\TypeObject.obj \ $(PATHOBJ)\UnicodeObject.obj \ $(PATHOBJ)\UnicodeCType.obj \ $(PATHOBJ)\WeakrefObject.obj # Extension Modules (Built-In or as Separate DLLs) MODULES = \ $(PATHOBJ)\ArrayModule.obj \ $(PATHOBJ)\BinAscii.obj \ $(PATHOBJ)\CMathModule.obj \ $(PATHOBJ)\cPickle.obj \ $(PATHOBJ)\cStringIO.obj \ $(PATHOBJ)\ErrnoModule.obj \ $(PATHOBJ)\GCModule.obj \ $(PATHOBJ)\GetBuildInfo.obj \ $(PATHOBJ)\GetPathP.obj \ $(PATHOBJ)\Main.obj \ $(PATHOBJ)\MathModule.obj \ $(PATHOBJ)\MD5c.obj \ $(PATHOBJ)\MD5Module.obj \ $(PATHOBJ)\Operator.obj \ $(PATHOBJ)\PCREModule.obj \ $(PATHOBJ)\PyPCRE.obj \ $(PATHOBJ)\RotorModule.obj \ $(PATHOBJ)\PosixModule.obj \ $(PATHOBJ)\RegexModule.obj \ $(PATHOBJ)\RegExpr.obj \ $(PATHOBJ)\SelectModule.obj \ $(PATHOBJ)\SignalModule.obj \ $(PATHOBJ)\SocketModule.obj \ $(PATHOBJ)\StropModule.obj \ $(PATHOBJ)\StructModule.obj \ $(PATHOBJ)\TimeModule.obj \ $(PATHOBJ)\ThreadModule.obj \ $(PATHOBJ)\YUVConvert.obj # Standalone Parser Generator Program (Shares Some of Python's Modules) PGEN = \ $(PATHOBJ)\PGen.obj \ $(PATHOBJ)\PGenMain.obj \ $(PATHOBJ)\MySNPrintf.obj \ $(PATHOBJ)\Tokenizer_Pgen.obj \ $(PATHOBJ)\PrintGrammar.obj \ $(PATHOBJ)\Grammar.obj \ $(PATHOBJ)\FirstSets.obj ################## # Macros and Flags ################## _BASE = /Q /W2 /I$(PROJINCLUDE) # /Q = Omit IBM Copyright # /W2 = Show Warnings/Errors Only _GEN = /G4 /Gm /Gd- # /G4 = Generate Code for 486 (Use 386 for Debugger) # /Gm = Use Multithread Runtime # /Gd = Dynamically Load Runtime # /Ms = Use _System Calling Convention (vs _Optlink) # (to allow non-VAC++ code to call into Python23.dll) _OPT = /O /Gl # /O = Enable Speed-Optimizations # /Ol = Pass Code Thru Intermediate Linker # /Gu = Advise Linker All Ext Data is ID'd # /Gl = Have Linker Remove Unused Fns _DBG = /Wpro- /Ti- /DHAVE_CONFIG_H /DUSE_SOCKET # /Wpro= Generate Compiler Warnings re Missing Prototypes # /Ti = Embed Debugger/Analyzer Recs # /Tm = Enable Debug Memory Fns # /Tx = Request Full Dump Upon Exception # /DHAVE_CONFIG_H = Causes Use of CONFIG.H Settings # /DUSE_SOCKET = Enables Building In of Socket API _OUT = # /Fb = Embed Browser Recs # /Gh = Generate Code for Profiler Hooks # /Fl = Output C/C++ Listing Files # /Lf = Provide Full (Detailed) Listing Files # /Fm. = Output Linker Map File # /Ft. = Output C++ Template Resolution Files _MAP = /FmNoise\$(@R).map _DLL = /Ge- _EXE = /Ge # /Ge = Create an EXE, not DLL CFLAGS = $(_BASE) $(_GEN) $(_OPT) $(_DBG) $(_OUT) $(_EXE) /Ss ################### # Primary Target(s) ################### All: obj noise PyCore.lib Python23.lib PGen.exe \ Python.exe PythonPM.exe Python23.dll # _tkinter.dll Modules: $(MODULES) Objects: $(OBJECTS) Parser: $(PARSER) Python: $(PYTHON) # Directory to Keep .OBJ Files Out of the Way obj: @-mkdir obj >>NUL # Directory to Keep .MAP and Such Text Files Out of the Way noise: @-mkdir noise >>NUL ############## # ############## # Python Extension DLL: Tcl/Tk Interface #_tkinter.dll: $(PATHOBJ)\_tkinter.obj Python23.lib _tkinter.def # @ Echo Linking $@ As DLL # @ $(CC) $(CFLAGS) /B"/NOE" $(_DLL) /Fe$@ $(_MAP) $** $(OTHERLIBS) >>$(ERRS) #$(PATHOBJ)\_tkinter.obj: $(PY_MODULES)\_tkinter.c # @ Echo Compiling $** # @ $(CC) -c $(CFLAGS) $(_DLL) -Fo$@ $** >>$(ERRS) # Object Library of All Essential Python Routines PyCore.lib: $(MODULES) $(OBJECTS) $(PARSER) $(PYTHON) $(PATHOBJ)\Config.obj @ Echo Adding Updated Object Files to Link Library $@ @ ! ILIB $@ /NOLOGO /NOBACKUP -+$? ; >>$(ERRS) Python23.dll: $(PATHOBJ)\Compile.obj PyCore.lib Python.def @ Echo Linking $@ As DLL @ $(CC) $(CFLAGS) /B"/NOE" $(_DLL) /Fe$@ $(_MAP) $** $(OTHERLIBS) >>$(ERRS) # @ Echo Compressing $@ with LxLite # @ lxlite $@ # IBM Linker Requires One Explicit .OBJ To Build a .DLL from a .LIB $(PATHOBJ)\Compile.obj: $(PY_PYTHON)\Compile.c @ Echo Compiling $** @ $(CC) -c $(CFLAGS) $(_DLL) -Fo$@ $** >>$(ERRS) # Import Library for Using the Python23.dll Python23.lib: Python.def @ Echo Making $@ @ IMPLIB /NOLOGO /NOIGNORE $@ $** >>$(ERRS) @ ILIB /NOLOGO /CONVFORMAT /NOEXTDICTIONARY /NOBROWSE /NOBACKUP $@; >>$(ERRS) # Small Command-Line Program to Start Interpreter in Python23.dll Python.exe: $(PATHOBJ)\Python.obj Python23.lib @ Echo Linking $@ As EXE @ $(CC) $(CFLAGS) $(_EXE) /B"/PM:VIO /STACK:360000" /Fe$@ $(_MAP) $** $(OTHERLIBS) >>$(ERRS) # Small PM-GUI Program to Start Interpreter in Python23.dll PythonPM.exe: $(PATHOBJ)\Python.obj Python23.lib @ Echo Linking $@ As EXE @ $(CC) $(CFLAGS) $(_EXE) /B"/PM:PM /STACK:360000" /Fe$@ $(_MAP) $** $(OTHERLIBS) >>$(ERRS) PGen.exe: $(PGEN) PyCore.lib @ Echo Linking $@ As EXE @ $(CC) $(CFLAGS) $(_EXE) /B"/STACK:360000" /Fe$@ $(_MAP) $** $(OTHERLIBS) >>$(ERRS) ####################### # Miscellaneous Targets ####################### # Remove Intermediate Targets but Leave Executable Binaries clean: -- Del /Q $(PATHOBJ)\*.obj >NUL 2>&1 -- Del /Q /Y Noise >NUL 2>&1 -- Del /Q $(ERRS) >NUL 2>&1 # Remove All Targets, Including Final Binaries distclean: clean -- Del /Q PyCore.lib Python23.lib >NUL 2>&1 -- Del /Q Python23.dll Python.exe PGen.exe >NUL 2>&1 release: Python.exe Python23.dll Python23.lib -- @Echo Y | copy /U Python.exe D:\EXEs -- @Echo Y | copy /U Python23.dll D:\DLLs -- @Echo Y | copy /U Python23.lib E:\Tau\Lib -- @Echo Y | copy /U _tkinter.dll D:\Python test: python ..\..\lib\test\regrtest.py # Update Dependencies on Targets (Uses OpusMAKE Commercial Product) depend: D:\OpusMake\os2mkmf -c -s ### OPUS MKMF: Do not remove this line! Generated dependencies follow. _tkinter.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h almodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h arraymodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h audioop.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\mymath.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h binascii.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h bsddbmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h cdmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h cgensupport.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_MODULES)\cgensupport.h $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h \ $(PY_INCLUDE)\complexobject.h pyconfig.h $(PY_INCLUDE)\dictobject.h \ $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h \ $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h \ $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h clmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h cmathmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h cpickle.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\cstringio.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h cryptmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h cstringio.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\cstringio.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h cursesmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h dbmmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h dlmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h errno.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h errnomodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h fcntlmodule.obj: $(PY_INCLUDE)\abstract.h $(OS2TCPIP)\Include\sys\ioctl.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h flmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\structmember.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h fmmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h fpectlmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h fpetestmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h gdbmmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h getbuildinfo.obj: pyconfig.h getpath.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\osdefs.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h glmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_MODULES)\cgensupport.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h grpmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(OS2TCPIP)\Include\grp.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h imageop.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h imgfile.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h main.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h mathmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\mymath.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h md5c.obj: pyconfig.h $(PY_MODULES)\md5.h md5module.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_MODULES)\md5.h $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h mpzmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longintrepr.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h nismodule.obj: $(PY_INCLUDE)\abstract.h $(OS2TCPIP)\Include\sys\time.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h operator.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h parsermodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h \ $(PY_INCLUDE)\complexobject.h pyconfig.h $(PY_INCLUDE)\dictobject.h \ $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h \ $(PY_INCLUDE)\graminit.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\token.h \ $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h pcremodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_MODULES)\pcre-internal.h \ $(PY_MODULES)\pcre.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h posix.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\mytime.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h posixmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\mytime.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h puremodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h pwdmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(OS2TCPIP)\Include\pwd.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h pypcre.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\graminit.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_MODULES)\pcre-internal.h $(PY_MODULES)\pcre.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h readline.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h regexmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_MODULES)\regexpr.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h regexpr.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_MODULES)\regexpr.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h resource.obj: $(PY_INCLUDE)\abstract.h $(OS2TCPIP)\Include\sys\time.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h rgbimgmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h rotormodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h selectmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\myselect.h $(PY_INCLUDE)\mytime.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h sgimodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h signalmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h socketmodule.obj: $(PY_INCLUDE)\abstract.h $(OS2TCPIP)\Include\netinet\in.h \ $(OS2TCPIP)\Include\sys\socket.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\mytime.h $(OS2TCPIP)\Include\netdb.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h soundex.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h stdwinmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h stropmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h structmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h sunaudiodev.obj: $(PY_INCLUDE)\abstract.h $(OS2TCPIP)\Include\sys\ioctl.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\structmember.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h svmodule.obj: $(PY_INCLUDE)\abstract.h $(OS2TCPIP)\Include\sys\time.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h \ $(PY_INCLUDE)\complexobject.h pyconfig.h $(PY_INCLUDE)\dictobject.h \ $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h \ $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h \ $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h \ $(PY_MODULES)\yuv.h syslogmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(OS2TCPIP)\Include\syslog.h $(PY_INCLUDE)\sysmodule.h \ $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h termios.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h threadmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\thread.h \ $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h timemodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\mytime.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h timingmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_MODULES)\timing.h \ $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h xxmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h yuvconvert.obj: $(PY_MODULES)\yuv.h zlibmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h abstract.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h classobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\structmember.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h cobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h complexobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h dictobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h fileobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\structmember.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h floatobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h frameobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h \ $(PY_INCLUDE)\complexobject.h pyconfig.h $(PY_INCLUDE)\dictobject.h \ $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\frameobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\opcode.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\structmember.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h funcobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\structmember.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h intobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h listobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h longobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longintrepr.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\mymath.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h methodobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\token.h \ $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h moduleobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h object.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h rangeobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h sliceobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h stringobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h tupleobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h typeobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h xxobject.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h acceler.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\node.h \ $(PY_PARSER)\parser.h $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\token.h bitset.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h firstsets.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\pgenheaders.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\token.h grammar.obj: $(PY_INCLUDE)\bitset.h pyconfig.h \ $(PY_INCLUDE)\grammar.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\token.h grammar1.obj: $(PY_INCLUDE)\bitset.h pyconfig.h \ $(PY_INCLUDE)\grammar.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\token.h intrcheck.obj: pyconfig.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h listnode.obj: pyconfig.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\token.h metagrammar.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\metagrammar.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_PARSER)\pgen.h $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h myreadline.obj: pyconfig.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h node.obj: pyconfig.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\node.h \ $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h parser.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\errcode.h \ $(PY_INCLUDE)\grammar.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_PARSER)\parser.h $(PY_INCLUDE)\pgenheaders.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\token.h parsetok.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\errcode.h \ $(PY_INCLUDE)\grammar.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_PARSER)\parser.h $(PY_INCLUDE)\parsetok.h \ $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\token.h \ $(PY_PARSER)\tokenizer.h pgen.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\metagrammar.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_PARSER)\pgen.h $(PY_INCLUDE)\pgenheaders.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\token.h pgenmain.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\node.h \ $(PY_INCLUDE)\parsetok.h $(PY_PARSER)\pgen.h $(PY_INCLUDE)\pgenheaders.h \ $(PY_INCLUDE)\pydebug.h printgrammar.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\pgenheaders.h \ $(PY_INCLUDE)\pydebug.h tokenizer.obj: pyconfig.h $(PY_INCLUDE)\errcode.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\pgenheaders.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\token.h $(PY_PARSER)\tokenizer.h atof.obj: pyconfig.h bltinmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h \ $(PY_INCLUDE)\complexobject.h pyconfig.h $(PY_INCLUDE)\dictobject.h \ $(PY_INCLUDE)\eval.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\mymath.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\node.h $(PY_INCLUDE)\object.h \ $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h ceval.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\eval.h \ $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\frameobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\opcode.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h compile.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\graminit.h \ $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h \ $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\opcode.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\structmember.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\token.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h errors.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h fmod.obj: pyconfig.h $(PY_INCLUDE)\mymath.h frozen.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h frozenmain.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h getargs.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h getcompiler.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h getcopyright.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h getmtime.obj: pyconfig.h getplatform.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h getversion.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\patchlevel.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h graminit.obj: $(PY_INCLUDE)\bitset.h pyconfig.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\pgenheaders.h \ $(PY_INCLUDE)\pydebug.h hypot.obj: pyconfig.h $(PY_INCLUDE)\mymath.h $(PY_INCLUDE)\myproto.h import.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\errcode.h $(PY_INCLUDE)\eval.h \ $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h \ $(PY_INCLUDE)\import.h $(PY_PYTHON)\importdl.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\marshal.h $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\osdefs.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\token.h \ $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h importdl.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_PYTHON)\importdl.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\osdefs.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h marshal.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longintrepr.h $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\marshal.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h modsupport.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h mystrtoul.obj: pyconfig.h pyfpe.obj: pyconfig.h $(PY_INCLUDE)\pyfpe.h pystate.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h pythonrun.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\bitset.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h \ $(PY_INCLUDE)\complexobject.h pyconfig.h $(PY_INCLUDE)\dictobject.h \ $(PY_INCLUDE)\errcode.h $(PY_INCLUDE)\eval.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\grammar.h \ $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h \ $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\marshal.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\node.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\parsetok.h $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h \ $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h \ $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h sigcheck.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\pydebug.h \ $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h $(PY_INCLUDE)\pystate.h \ $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h $(PY_INCLUDE)\rangeobject.h \ $(PY_INCLUDE)\sliceobject.h $(PY_INCLUDE)\stringobject.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h strdup.obj: pyconfig.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h strtod.obj: pyconfig.h structmember.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h \ $(PY_INCLUDE)\classobject.h $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h \ $(PY_INCLUDE)\intobject.h $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h \ $(PY_INCLUDE)\longobject.h $(PY_INCLUDE)\methodobject.h \ $(PY_INCLUDE)\modsupport.h $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h \ $(PY_INCLUDE)\myproto.h $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\structmember.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h sysmodule.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\complexobject.h pyconfig.h \ $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h $(PY_INCLUDE)\floatobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\osdefs.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h \ $(PY_INCLUDE)\tupleobject.h thread.obj: pyconfig.h $(PY_INCLUDE)\thread.h traceback.obj: $(PY_INCLUDE)\abstract.h $(PY_INCLUDE)\ceval.h $(PY_INCLUDE)\classobject.h \ $(PY_INCLUDE)\cobject.h $(PY_INCLUDE)\compile.h $(PY_INCLUDE)\complexobject.h \ pyconfig.h $(PY_INCLUDE)\dictobject.h $(PY_INCLUDE)\fileobject.h \ $(PY_INCLUDE)\floatobject.h $(PY_INCLUDE)\frameobject.h \ $(PY_INCLUDE)\funcobject.h $(PY_INCLUDE)\import.h $(PY_INCLUDE)\intobject.h \ $(PY_INCLUDE)\intrcheck.h $(PY_INCLUDE)\listobject.h $(PY_INCLUDE)\longobject.h \ $(PY_INCLUDE)\methodobject.h $(PY_INCLUDE)\modsupport.h \ $(PY_INCLUDE)\moduleobject.h $(PY_INCLUDE)\mymalloc.h $(PY_INCLUDE)\myproto.h \ $(PY_INCLUDE)\object.h $(PY_INCLUDE)\objimpl.h $(PY_INCLUDE)\osdefs.h \ $(PY_INCLUDE)\pydebug.h $(PY_INCLUDE)\pyerrors.h $(PY_INCLUDE)\pyfpe.h \ $(PY_INCLUDE)\pystate.h $(PY_INCLUDE)\python.h $(PY_INCLUDE)\pythonrun.h \ $(PY_INCLUDE)\rangeobject.h $(PY_INCLUDE)\sliceobject.h \ $(PY_INCLUDE)\stringobject.h $(PY_INCLUDE)\structmember.h \ $(PY_INCLUDE)\sysmodule.h $(PY_INCLUDE)\traceback.h $(PY_INCLUDE)\tupleobject.h Python-2.3.7/PC/os2vacpp/readme.txt0000644001241000117560000001100207527637616016322 0ustar loewishpifb6IBM VisualAge C/C++ for OS/2 ============================ To build Python for OS/2, change into ./os2vacpp and issue an 'NMAKE' command. This will build a PYTHON15.DLL containing the set of Python modules listed in config.c and a small PYTHON.EXE to start the interpreter. By changing the C compiler flag /Gd- in the makefile to /Gd+, you can reduce the size of these by causing Python to dynamically link to the C runtime DLLs instead of including their bulk in your binaries. However, this means that any system on which you run Python must have the VAC++ compiler installed in order to have those DLLs available. During the build process you may see a couple of harmless warnings: From the C Compiler, "No function prototype given for XXX", which comes from the use of K&R parameters within Python for portability. From the ILIB librarian, "Module Not Found (XXX)", which comes from its attempt to perform the (-+) operation, which removes and then adds a .OBJ to the library. The first time a build is done, it obviously cannot remove what is not yet built. This build includes support for most Python functionality as well as TCP/IP sockets. It omits the Posix ability to 'fork' a process but supports threads using OS/2 native capabilities. I have tried to support everything possible but here are a few usage notes. -- os.popen() Usage Warnings With respect to my implementation of popen() under OS/2: import os fd = os.popen("pkzip.exe -@ junk.zip", 'wb') fd.write("file1.txt\n") fd.write("file2.txt\n") fd.write("file3.txt\n") fd.write("\x1a") # Should Not Be Necessary But Is fd.close() There is a bug, either in the VAC++ compiler or OS/2 itself, where the simple closure of the write-side of a pipe -to- a process does not send an EOF to that process. I find I must explicitly write a control-Z (EOF) before closing the pipe. This is not a problem when using popen() in read mode. One other slight difference with my popen() is that I return None from the close(), instead of the Unix convention of the return code of the spawned program. I could find no easy way to do this under OS/2. -- BEGINLIBPATH/ENDLIBPATH With respect to environment variables, this OS/2 port supports the special-to-OS/2 magic names of 'BEGINLIBPATH' and 'ENDLIBPATH' to control where to load conventional DLLs from. Those names are intercepted and converted to calls on the OS/2 kernel APIs and are inherited by child processes, whether Python-based or not. A few new attributes have been added to the os module: os.meminstalled # Count of Bytes of RAM Installed on Machine os.memkernel # Count of Bytes of RAM Reserved (Non-Swappable) os.memvirtual # Count of Bytes of Virtual RAM Possible os.timeslice # Duration of Scheduler Timeslice, in Milliseconds os.maxpathlen # Maximum Length of a Path Specification, in chars os.maxnamelen # Maximum Length of a Single Dir/File Name, in chars os.version # Version of OS/2 Being Run e.g. "4.00" os.revision # Revision of OS/2 Being Run (usually zero) os.bootdrive # Drive that System Booted From e.g. "C:" # (useful to find the CONFIG.SYS used to boot with) -- Using Python as the Default OS/2 Batch Language Note that OS/2 supports the Unix technique of putting the special comment line at the time of scripts e.g. "#!/usr/bin/python" in a different syntactic form. To do this, put your script into a file with a .CMD extension and added 'extproc' to the top as follows: extproc C:\Python\Python.exe -x import os print "Hello from Python" The '-x' option tells Python to skip the first line of the file while processing the rest as normal Python source. -- Suggested Environment Variable Setup With respect to the environment variables for Python, I use the following setup: Set PYTHONHOME=E:\Tau\Projects\Python;D:\DLLs Set PYTHONPATH=.;E:\Tau\Projects\Python\Lib; \ E:\Tau\Projects\Python\Lib\plat-win The EXEC_PREFIX (optional second pathspec on PYTHONHOME) is where you put any Python extension DLLs you may create/obtain. There are none provided with this release. -- Contact Info Jeff Rush is no longer supporting the VACPP port :-( I don't have the VACPP compiler, so can't reliably maintain this port. Anyone with VACPP who can contribute patches to keep this port buildable should upload them to the Python Patch Manager at Sourceforge and assign them to me for review/checkin. Andrew MacIntyre aimacintyre at users.sourceforge.net August 18, 2002. Python-2.3.7/PC/os2vacpp/config.c0000644001241000117560000000561407502765740015742 0ustar loewishpifb6/* -*- C -*- *********************************************** Copyright (c) 2000, BeOpen.com. Copyright (c) 1995-2000, Corporation for National Research Initiatives. Copyright (c) 1990-1995, Stichting Mathematisch Centrum. All rights reserved. See the file "Misc/COPYRIGHT" for information on usage and redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. ******************************************************************/ /* Module configuration */ /* This file contains the table of built-in modules. See init_builtin() in import.c. */ #include "Python.h" extern void initarray(void); extern void initaudioop(void); extern void initbinascii(void); extern void initcmath(void); extern void initerrno(void); extern void initimageop(void); extern void initmath(void); extern void initmd5(void); extern void initnt(void); extern void initos2(void); extern void initoperator(void); extern void initposix(void); extern void initregex(void); extern void initrgbimg(void); extern void initrotor(void); extern void initsignal(void); extern void initselect(void); extern void init_socket(void); extern void initstrop(void); extern void initstruct(void); extern void inittime(void); extern void initthread(void); extern void initcStringIO(void); extern void initcPickle(void); extern void initpcre(void); #ifdef WIN32 extern void initmsvcrt(void); #endif /* -- ADDMODULE MARKER 1 -- */ extern void PyMarshal_Init(void); extern void initimp(void); struct _inittab _PyImport_Inittab[] = { {"array", initarray}, #ifdef M_I386 {"audioop", initaudioop}, #endif {"binascii", initbinascii}, {"cmath", initcmath}, {"errno", initerrno}, // {"imageop", initimageop}, {"math", initmath}, {"md5", initmd5}, #if defined(MS_WINDOWS) || defined(__BORLANDC__) || defined(__WATCOMC__) {"nt", initnt}, /* Use the NT os functions, not posix */ #else #if defined(PYOS_OS2) {"os2", initos2}, #else {"posix", initposix}, #endif #endif {"operator", initoperator}, {"regex", initregex}, // {"rgbimg", initrgbimg}, // {"rotor", initrotor}, {"signal", initsignal}, #ifdef USE_SOCKET {"_socket", init_socket}, {"select", initselect}, #endif {"strop", initstrop}, {"struct", initstruct}, {"time", inittime}, #ifdef WITH_THREAD {"thread", initthread}, #endif {"cStringIO", initcStringIO}, {"cPickle", initcPickle}, {"pcre", initpcre}, #ifdef WIN32 {"msvcrt", initmsvcrt}, #endif /* -- ADDMODULE MARKER 2 -- */ /* This module "lives in" with marshal.c */ {"marshal", PyMarshal_Init}, /* This lives it with import.c */ {"imp", initimp}, /* These entries are here for sys.builtin_module_names */ {"__main__", NULL}, {"__builtin__", NULL}, {"sys", NULL}, /* Sentinel */ {0, 0} }; Python-2.3.7/PC/os2vacpp/pyconfig.h0000644001241000117560000002360110032007577016301 0ustar loewishpifb6#ifndef Py_CONFIG_H #define Py_CONFIG_H /********************************************************************** * pyconfig.h. NOT Generated automatically by configure. * * This is a manually maintained version used for the IBM VisualAge * C/C++ compiler on the OS/2 platform. It is a standard part of * the Python distribution. * * FILESYSTEM DEFINES: * The code specific to a particular way of naming files and * directory paths should be wrapped around one of the following * #defines: * * DOSFILESYS PCDOS-Style (for PCDOS, Windows and OS/2) * MACFILESYS Macintosh-Style * UNIXFILESYS Unix-Style * AMIGAFILESYS AmigaDOS-Style * * Because of the different compilers and operating systems in * use on the Intel platform, neither the compiler name nor * the operating system name is sufficient. * * OS/2 DEFINES: * The code specific to OS/2's Program API should be wrapped around * * __TOS_OS2__ Target Operating System, OS/2 * * Any code specific to the compiler itself should be wrapped with * * __IBMC__ IBM C Compiler * __IBMCPP__ IBM C++ Compiler * * Note that since the VisualAge C/C++ compiler is also available * for the Windows platform, it may be necessary to use both a * __TOS_OS2__ and a __IBMC__ to select a very specific environment. * **********************************************************************/ /* * Some systems require special declarations for data items imported * or exported from dynamic link libraries. Note that the definition * of DL_IMPORT covers both cases. Define USE_DL_IMPORT for the client * of a DLL. Define USE_DL_EXPORT when making a DLL. */ #include /* Configuration Options for Finding Modules */ #define PREFIX "" #define EXEC_PREFIX "" /* Provide a default library so writers of extension modules * won't have to explicitly specify it anymore */ #pragma library("Python23.lib") /***************************************************/ /* 32-Bit IBM VisualAge C/C++ v3.0 for OS/2 */ /* (Convert Compiler Flags into Useful Switches) */ /***************************************************/ #define PLATFORM "os2" #define COMPILER "[VisualAge C/C++]" #define PYOS_OS2 /* Define Indicator of Operating System */ #define PYCC_VACPP /* Define Indicator of C Compiler */ /* Platform Filesystem */ #define PYTHONPATH ".;.\\lib;.\\lib\\plat-win;.\\lib\\lib-tk" #define DOSFILESYS /* OS/2 Uses the DOS File Naming Conventions */ /* #define IMPORT_8x3_NAMES (let's move up to long filenames) */ /* Platform CPU-Mode Dependencies */ #define WORD_BIT 32 /* OS/2 is a 32-Bit Operating System */ #define LONG_BIT 32 #define SIZEOF_INT 4 /* Count of Bytes in an (int) */ #define SIZEOF_LONG 4 /* Count of Bytes in a (long) */ #define SIZEOF_VOID_P 4 /* Count of Bytes in a (void *) */ /* #define HAVE_LONG_LONG 1 */ /* VAC++ does not support (long long) */ /* #define SIZEOF_LONG_LONG 8 */ /* Count of Bytes in a (long long) */ /* unicode definines */ #define Py_USING_UNICODE #define PY_UNICODE_TYPE wchar_t #define Py_UNICODE_SIZE SIZEOF_SHORT /* dynamic loading */ #define HAVE_DYNAMIC_LOADING 1 /* Define if type char is unsigned and you are not using gcc. */ #ifndef __CHAR_UNSIGNED__ /* #undef __CHAR_UNSIGNED__ */ #endif typedef int mode_t; typedef int uid_t; typedef int gid_t; typedef int pid_t; #if defined(__MULTI__) /* If Compiler /Gt+ Multithread Option Enabled, */ #define WITH_THREAD 1 /* Enable Threading Throughout Python */ #define OS2_THREADS 1 /* And Use the OS/2 Flavor of Threads */ /* #define _REENTRANT 1 */ /* Use thread-safe errno, h_errno, and other fns */ #endif /* Compiler Runtime Library Capabilities */ #include #include /* #undef BAD_STATIC_FORWARD */ /* if compiler botches static fwd decls */ #define STDC_HEADERS 1 /* VAC++ is an ANSI C Compiler */ #define HAVE_LIMITS_H 1 /* #include */ #define HAVE_STDLIB_H 1 /* #include */ #define HAVE_HYPOT 1 /* hypot() */ #define HAVE_PUTENV 1 /* putenv() */ #define HAVE_STDDEF_H 1 /* #include */ /* #define VA_LIST_IS_ARRAY 1 */ /* if va_list is an array of some kind */ /* Variable-Arguments/Prototypes */ #define HAVE_PROTOTYPES 1 /* VAC++ supports C Function Prototypes */ #define HAVE_STDARG_H 1 /* #include */ #define HAVE_STDARG_PROTOTYPES 1 /* Our has prototypes */ /* String/Memory/Locale Operations */ #define HAVE_STRDUP 1 /* strdup() */ #define HAVE_MEMMOVE 1 /* memmove() */ #define HAVE_STRERROR 1 /* strerror() */ #define HAVE_SETLOCALE 1 /* setlocale() */ #define HAVE_LOCALE_H 1 /* #include */ #define MALLOC_ZERO_RETURNS_NULL 1 /* Our malloc(0) returns a NULL ptr */ /* Signal Handling */ #define RETSIGTYPE void /* Return type of handlers (int or void) */ #define HAVE_SIGNAL_H 1 /* #include */ /* #undef WANT_SIGFPE_HANDLER */ /* Handle SIGFPE (see Include/pyfpe.h) */ /* #define HAVE_ALARM 1 */ /* alarm() */ /* #define HAVE_SIGINTERRUPT 1 */ /* siginterrupt() */ /* #define HAVE_SIGRELSE 1 */ /* sigrelse() */ #define DONT_HAVE_SIG_ALARM 1 #define DONT_HAVE_SIG_PAUSE 1 /* Clock/Time Support */ #define HAVE_FTIME 1 /* We have ftime() in */ #define HAVE_CLOCK 1 /* clock() */ #define HAVE_STRFTIME 1 /* strftime() */ #define HAVE_STRPTIME 1 /* strptime() */ #define HAVE_MKTIME 1 /* mktime() */ #define HAVE_TZNAME 1 /* No tm_zone but do have tzname[] */ #define HAVE_TIMES 1 /* #include */ #define HAVE_SYS_UTIME_H 1 /* #include */ /* #define HAVE_UTIME_H 1 */ /* #include */ #define HAVE_SYS_TIME_H 1 /* #include */ /* #define TM_IN_SYS_TIME 1 */ /* declares struct tm */ #define HAVE_GETTIMEOFDAY 1 /* gettimeofday() */ /* #define GETTIMEOFDAY_NO_TZ 1 */ /* gettimeofday() does not have 2nd arg */ /* #define HAVE_TIMEGM 1 */ /* timegm() */ #define TIME_WITH_SYS_TIME 1 /* Mix and */ #define SYS_SELECT_WITH_SYS_TIME 1 /* Mix and */ /* #define HAVE_ALTZONE 1 */ /* if defines altzone */ /* Network/Sockets Support */ #define HAVE_SYS_SELECT_H 1 /* #include */ #define BSD_SELECT 1 /* Use BSD versus OS/2 form of select() */ #define HAVE_SELECT 1 /* select() */ #define HAVE_GETPEERNAME 1 /* getpeername() */ /* #undef HAVE_GETHOSTNAME_R 1 */ /* gethostname_r() */ /* File I/O */ #define HAVE_DUP2 1 /* dup2() */ #define HAVE_EXECV 1 /* execv() */ #define HAVE_SETVBUF 1 /* setvbuf() */ #define HAVE_GETCWD 1 /* getcwd() */ #define HAVE_PIPE 1 /* pipe() [OS/2-specific code added] */ #define HAVE_FCNTL_H 1 /* #include */ /* #define HAVE_FLOCK 1 */ /* flock() */ /* #define HAVE_TRUNCATE 1 */ /* truncate() */ /* #define HAVE_FTRUNCATE 1 */ /* ftruncate() */ /* #define HAVE_LSTAT 1 */ /* lstat() */ /* #define HAVE_DIRENT_H 1 */ /* #include */ /* #define HAVE_OPENDIR 1 */ /* opendir() */ /* Process Operations */ #define HAVE_GETPID 1 /* getpid() */ #define HAVE_SYSTEM 1 /* system() */ #define HAVE_WAIT 1 /* wait() */ #define HAVE_KILL 1 /* kill() [OS/2-specific code added] */ #define HAVE_POPEN 1 /* popen() [OS/2-specific code added] */ /* #define HAVE_GETPPID 1 */ /* getppid() */ /* #define HAVE_WAITPID 1 */ /* waitpid() */ /* #define HAVE_FORK 1 */ /* fork() */ /* User/Group ID Queries */ /* #define HAVE_GETEGID 1 */ /* #define HAVE_GETEUID 1 */ /* #define HAVE_GETGID 1 */ /* #define HAVE_GETUID 1 */ /* Unix-Specific */ /* #define HAVE_SYS_UN_H 1 /* #include */ /* #define HAVE_SYS_UTSNAME_H 1 */ /* #include */ /* #define HAVE_SYS_WAIT_H 1 */ /* #include */ /* #define HAVE_UNISTD_H 1 */ /* #include */ /* #define HAVE_UNAME 1 */ /* uname () */ /* Define if you want documentation strings in extension modules */ #define WITH_DOC_STRINGS 1 #ifdef USE_DL_EXPORT #define DL_IMPORT(RTYPE) RTYPE _System #endif #endif /* !Py_CONFIG_H */ Python-2.3.7/PC/os2vacpp/makefile.omk0000644001241000117560000017455007502452355016617 0ustar loewishpifb6###################################################################### # # Top-Level Makefile for Building Python for OS/2 # # This makefile was developed for use with IBM's VisualAge C/C++ # for OS/2 compiler, version 3.0, with Fixpack 8 applied. It uses # the commercial OpusMAKE tool. # # The output of the build is a largish Python15.DLL containing the # essential modules of Python and a small Python.exe program to start # the interpreter. When embedding Python within another program, only # Python15.DLL is needed. # # These two binaries can be statically linked with the VisualAge C/C++ # runtime library (producing larger binaries), or dynamically linked # to make smaller ones that require the compiler to be installed on # any system Python is used on. # # History (Most Recent First) # # 20-Nov-97 jrr Cleaned Up for Applying to Distribution # 29-Oct-97 jrr Modified for Use with Python 1.5 Alpha 4 # 03-Aug-96 jrr Original for Use with Python 1.4 Release # ###################################################################### ################### # Places and Things ################### PY_MODULES = ..\..\Modules PY_OBJECTS = ..\..\Objects PY_PARSER = ..\..\Parser PY_PYTHON = ..\..\Python PY_INCLUDE = ..\..\Include PY_INCLUDES = .;$(PY_INCLUDE);$(PY_MODULES);$(PY_OBJECTS);$(PY_PARSER);$(PY_PYTHON) # Where to Find the IBM TCP/IP Socket Includes and Libraries OS2TCPIP = C:\MPTN # Where to Put the .OBJ Files, To Keep Them Out of the Way .PATH.obj = obj # Search Path for Include Files PROJINCLUDE = .;$(OS2TCPIP)\Include;$(PY_INCLUDES) # Place to Search for Sources re OpusMAKE Dependency Generator (Commercial) MKMF_SRCS = $(PY_MODULES)\*.c $(PY_OBJECTS)\*.c $(PY_PARSER)\*.c $(PY_PYTHON)\*.c .HDRPATH.c := $(PROJINCLUDE,;= ) $(.HDRPATH.c) .PATH.c = .;$(PY_MODULES);$(PY_OBJECTS);$(PY_PARSER);$(PY_PYTHON) OTHERLIBS = $(OS2TCPIP)\lib\so32dll.lib $(OS2TCPIP)\lib\tcp32dll.lib ################# # Inference Rules ################# ################### # Python Subsystems ################### # PYTHON is the central core, containing the builtins and interpreter. PYTHON = \ BltinModule.obj \ CEval.obj \ Compile.obj \ Errors.obj \ Frozen.obj \ Getargs.obj \ GetCompiler.obj \ GetCopyright.obj \ GetMTime.obj \ GetOpt.obj \ GetPlatform.obj \ GetVersion.obj \ GramInit.obj \ Import.obj \ ImportDL.obj \ Marshal.obj \ ModSupport.obj \ MyStrtoul.obj \ PyState.obj \ PythonRun.obj \ StructMember.obj \ SysModule.obj \ Thread.obj \ TraceBack.obj \ FrozenMain.obj # Omitted Python Elements (and Reason): # atof.c -- Implementation for Platforms w/o This Function # dup2.c -- Implementation for Platforms w/o This Function # fmod.c -- Implementation for Platforms w/o This Function # getcwd.c -- Implementation for Platforms w/o This Function # hypot.c -- Implementation for Platforms w/o This Function # memmove.c -- Implementation for Platforms w/o This Function # strdup.c -- Implementation for Platforms w/o This Function # strerror.c -- Implementation for Platforms w/o This Function # strtod.c -- Implementation for Platforms w/o This Function # sigcheck.c -- Primitive Signal Catcher (SignalModule.c Used Instead) # pyfpe.c -- Primitive FPE Catcher (Not Referenced by Anyone) # frozenmain.c # Python's Internal Parser PARSER = \ Acceler.obj \ Grammar1.obj \ MyReadline.obj \ Node.obj \ Parser.obj \ ParseTok.obj \ Tokenizer.obj # Python Object Types OBJECTS = \ Abstract.obj \ ClassObject.obj \ CObject.obj \ ComplexObject.obj \ DictObject.obj \ FileObject.obj \ FloatObject.obj \ FrameObject.obj \ FuncObject.obj \ IntObject.obj \ ListObject.obj \ LongObject.obj \ MethodObject.obj \ ModuleObject.obj \ Object.obj \ RangeObject.obj \ SliceObject.obj \ StringObject.obj \ TupleObject.obj \ TypeObject.obj # Omitted Objects (and Reason): # xxobject.c -- Template to Create Your Own Object Types # Extension Modules (Built-In or as Separate DLLs) MODULES = \ ArrayModule.obj \ BinAscii.obj \ CMathModule.obj \ cPickle.obj \ cStringIO.obj \ ErrnoModule.obj \ GetBuildInfo.obj \ GetPathP.obj \ Main.obj \ MathModule.obj \ MD5c.obj \ MD5Module.obj \ Operator.obj \ PosixModule.obj \ RegexModule.obj \ RegExpr.obj \ ReopModule.obj \ SelectModule.obj \ SignalModule.obj \ SocketModule.obj \ SoundEx.obj \ StropModule.obj \ StructModule.obj \ TimeModule.obj \ ThreadModule.obj \ YUVConvert.obj # Omitted Modules (and Description/Reason): # # Multimedia: # almodule.c -- Non-OS/2 Audio Channel Facility (?) # cdmodule.c -- Wrapper of Non-OS/2 CD Audio Functions # audioop.c -- Various Compute Operations on Audio Samples # imageop.c -- Various Compute Operations on Video Samples # imgfile.c -- Wrapper of SGI ImageLib API # rgbimgmodule.c -- Non-OS/2 Image Read/Write Capability (Primitive) # sunaudiodev.c -- Wrapper of Sun Audio Device API # clmodule.c -- Wrapper of SGI Image/Audio Compression API # Database: # dbmmodule.c -- Wrapper of DBM Database API (Generic Flavor) # bsddbmodule.c -- Wrapper of DBM Database API (BSD Flavor) # gdbmmodule.c -- Wrapper of DBM Database API (GNU Flavor) # Cryptography: # cryptmodule.c -- Simple Wrapper for crypt() Function # rotormodule.c -- Implementation of Enigma Crypto Based on Rotors # cgensupport.obj \ # fcntlmodule.obj \ # fmmodule.obj \ # fpectlmodule.obj \ # fpetestmodule.obj \ # Unix-Specific getpath.obj \ # glmodule.obj \ # grpmodule.obj \ # mpzmodule.obj \ # nismodule.obj \ # parsermodule.obj \ # pcremodule.obj \ # pwdmodule.obj \ # pypcre.obj \ # readline.obj \ # resource.obj \ # sgimodule.obj \ # svmodule.obj \ # syslogmodule.obj \ # termios.obj \ # timingmodule.obj \ # User Interface: # _tkinter.obj \ # stdwinmodule.obj \ # cursesmodule.obj \ # tclNotify.obj \ # tkappinit.obj \ # flmodule.c -- Wrapper of FORMS Library (Screen Forms) # zlibmodule.c -- Wrapper of ZLib Compression API (GZip Format) # puremodule.c -- Wrapper of Purify Debugging API (Probably Non-OS/2) # dlmodule.c -- Some Wierd Form of Data Processing Module # xxmodule.c -- Template to Create Your Own Module # # Standalone Parser Generator Program (Shares Some of Python's Modules) PGEN = \ PGenMain.obj \ PGen.obj \ PrintGrammar.obj \ ListNode.obj \ Grammar.obj \ BitSet.obj \ FirstSets.obj \ MetaGrammar.obj # Omitted Parser Elements (and Reason): # intrcheck.c -- Not Referenced by Anyone (?) ################## # Macros and Flags ################## _BASE = /Q /W2 /I$(PROJINCLUDE) # /Q = Omit IBM Copyright # /W2 = Show Warnings/Errors Only # /Fi = Create Precompiled Headers # /Si = Utilize Precompiled Headers _GEN = /G4 /Gm /Gd /B"/STACK:360000" # /G4 = Generate Code for 486 (Use 386 for Debugger) # /Gm = Use Multithread Runtime # /Gd = Dynamically Load Runtime # /Gs = Remove Code for Stack Probes # /Gx = Remove C++ Exception-Handling Info # /Tdp = Generate Code for C++ Templates # /Rn = Generate Code without a Runtime # /B"/STACK:n" = Set Stack Size _OPT = /O /Gl # /O = Enable Speed-Optimizations # /Ol = Pass Code Thru Intermediate Linker # /Gu = Advise Linker All Ext Data is ID'd # /Gl = Have Linker Remove Unused Fns _DBG = /DHAVE_CONFIG_H /DUSE_SOCKET # /Ti = Embed Debugger/Analyzer Recs # /Tm = Enable Debug Memory Fns # /Tx = Request Full Dump Upon Exception # /DDEBUG = Enable App-Internal Debugging Code # /DUSE_SOCKET = # /DUSE_DL_EXPORT = _OUT = # /Fb = Embed Browser Recs # /Gh = Generate Code for Profiler Hooks # /Fl = Output C/C++ Listing Files # /Lf = Provide Full (Detailed) Listing Files # /Fm. = Output Linker Map File # /Ft. = Output C++ Template Resolution Files _MAP = /FmNoise\$(.TARGET,B,>.map) _DLL = /Ge- _EXE = /Ge # /Ge = Create an EXE, not DLL CFLAGS = $(_BASE) $(_GEN) $(_OPT) $(_DBG) $(_OUT) $(_EXE) /Ss CPPFLAGS = $(_BASE) $(_GEN) $(_OPT) $(_DBG) $(_OUT) $(_EXE) ################### # Primary Target(s) ################### All: obj noise PyCore.lib Python15.lib Python15.dll Python.exe PGen.exe ############## # ############## # Object Library of All Essential Python Routines PyCore.lib: $(MODULES) $(OBJECTS) $(PARSER) $(PYTHON) Config.obj %do "%.lib" Python15.dll: Compile.obj PyCore.lib Python.def %do "%.dll" CPPFLAGS+=/B"/NOE" CPPFLAGS+=$(_MAP) Compile.obj: Compile.c %do ".c.obj" CFLAGS+=$(_DLL) # Import Library for Using the Python15.dll Python15.lib: Python.def %do ".def.lib" # Small Program to Start Interpreter in Python15.dll Python.exe: Python.obj Python15.lib %do "%.exe" CPPFLAGS+=$(_MAP) #Python.obj: Python.c # %do ".c.obj" CFLAGS+=$(_EXE) PGen.exe: $(PGEN) PyCore.lib %do "%.exe" CPPFLAGS+=$(_MAP) ####################### # Miscellaneous Targets ####################### # Remove Intermediate Targets but Leave Executable Binaries clean: -- Del /Q $(.PATH.obj)\*.obj >NUL 2>&1 -- Del /Q /Y Noise >NUL 2>&1 -- Del /Q $(ERRS) >NUL 2>&1 # Remove All Targets, Including Final Binaries distclean: clean -- Del /Q PyCore.lib Python15.lib >NUL 2>&1 -- Del /Q Python15.dll Python.exe >NUL 2>&1 release: Python.exe Python15.dll Python15.lib -- @Echo Y | copy /U $(.SOURCES,M"*.exe") D:\EXEs -- @Echo Y | copy /U $(.SOURCES,M"*.dll") D:\DLLs -- @Echo Y | copy /U $(.SOURCES,M"*.lib") E:\Tau\Lib test: python ..\..\lib\test\regrtest.py # Update Dependencies on Targets (Uses OpusMAKE Commercial Product) depend: D:\OpusMake\os2mkmf -c -s ### OPUS MKMF: Do not remove this line! Generated dependencies follow. _tkinter.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h almodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h arraymodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h audioop.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h mymath.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h binascii.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h bsddbmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h cdmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h cgensupport.obj: abstract.h ceval.h cgensupport.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h clmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h cmathmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h mymath.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h cpickle.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h cstringio.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ mymath.h myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h cryptmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h cstringio.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h cstringio.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h cursesmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h dbmmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h dlmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h errno.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h errnomodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h fcntlmodule.obj: abstract.h c:\mptn\include\sys\ioctl.h ceval.h \ classobject.h cobject.h complexobject.h pyconfig.h dictobject.h \ fileobject.h floatobject.h funcobject.h import.h intobject.h \ intrcheck.h listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h flmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h \ structmember.h sysmodule.h traceback.h tupleobject.h fmmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h fpectlmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h fpetestmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h gdbmmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h getbuildinfo.obj: pyconfig.h getpath.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h osdefs.h pydebug.h pyerrors.h pyfpe.h pystate.h \ python.h pythonrun.h rangeobject.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h glmodule.obj: abstract.h ceval.h cgensupport.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h grpmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ grp.h import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h imageop.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h imgfile.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h main.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h mathmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h mymath.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h md5c.obj: pyconfig.h md5.h md5module.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h md5.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h mpzmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longintrepr.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h nismodule.obj: abstract.h c:\mptn\include\sys\time.h ceval.h classobject.h \ cobject.h complexobject.h pyconfig.h dictobject.h fileobject.h \ floatobject.h funcobject.h import.h intobject.h intrcheck.h \ listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h operator.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h parsermodule.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h graminit.h import.h intobject.h intrcheck.h \ listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h node.h object.h objimpl.h \ pydebug.h pyerrors.h pyfpe.h pystate.h python.h pythonrun.h \ rangeobject.h sliceobject.h stringobject.h sysmodule.h token.h \ traceback.h tupleobject.h pcremodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pcre-internal.h pcre.h pydebug.h pyerrors.h \ pyfpe.h pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h posix.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ mytime.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h \ python.h pythonrun.h rangeobject.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h posixmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ mytime.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h \ python.h pythonrun.h rangeobject.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h puremodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h pwdmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pwd.h pydebug.h pyerrors.h pyfpe.h pystate.h \ python.h pythonrun.h rangeobject.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h pypcre.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ graminit.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pcre-internal.h pcre.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h readline.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h regexmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h regexpr.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h regexpr.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h regexpr.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h reopmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h regexpr.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h resource.obj: abstract.h c:\mptn\include\sys\time.h ceval.h classobject.h \ cobject.h complexobject.h pyconfig.h dictobject.h fileobject.h \ floatobject.h funcobject.h import.h intobject.h intrcheck.h \ listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h rgbimgmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h rotormodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h mymath.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h selectmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h myselect.h mytime.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h sgimodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h signalmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h socketmodule.obj: abstract.h c:\mptn\include\netinet\in.h \ c:\mptn\include\sys\socket.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h mytime.h netdb.h object.h objimpl.h pydebug.h pyerrors.h \ pyfpe.h pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h soundex.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h stdwinmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h stropmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h structmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ mymath.h myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h sunaudiodev.obj: abstract.h c:\mptn\include\sys\ioctl.h ceval.h \ classobject.h cobject.h complexobject.h pyconfig.h dictobject.h \ fileobject.h floatobject.h funcobject.h import.h intobject.h \ intrcheck.h listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h structmember.h sysmodule.h \ traceback.h tupleobject.h svmodule.obj: abstract.h c:\mptn\include\sys\time.h ceval.h classobject.h \ cobject.h compile.h complexobject.h pyconfig.h dictobject.h \ fileobject.h floatobject.h funcobject.h import.h intobject.h \ intrcheck.h listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h \ yuv.h syslogmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h syslog.h sysmodule.h traceback.h tupleobject.h termios.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h threadmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h thread.h traceback.h tupleobject.h timemodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ mytime.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h \ python.h pythonrun.h rangeobject.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h timingmodule.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h timing.h traceback.h tupleobject.h xxmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h yuvconvert.obj: yuv.h zlibmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h abstract.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h classobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h \ structmember.h sysmodule.h traceback.h tupleobject.h cobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h complexobject.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ mymath.h myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h dictobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h fileobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h \ structmember.h sysmodule.h traceback.h tupleobject.h floatobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h mymath.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h frameobject.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ frameobject.h funcobject.h import.h intobject.h intrcheck.h \ listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h opcode.h \ pydebug.h pyerrors.h pyfpe.h pystate.h python.h pythonrun.h \ rangeobject.h sliceobject.h stringobject.h structmember.h \ sysmodule.h traceback.h tupleobject.h funcobject.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h structmember.h sysmodule.h traceback.h \ tupleobject.h intobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h listobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h longobject.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longintrepr.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h mymath.h myproto.h object.h objimpl.h \ pydebug.h pyerrors.h pyfpe.h pystate.h python.h pythonrun.h \ rangeobject.h sliceobject.h stringobject.h sysmodule.h traceback.h \ tupleobject.h methodobject.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h token.h traceback.h tupleobject.h moduleobject.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h object.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h rangeobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h sliceobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h stringobject.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ mymath.h myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h tupleobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h typeobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h xxobject.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h acceler.obj: bitset.h pyconfig.h grammar.h mymalloc.h myproto.h node.h \ parser.h pgenheaders.h pydebug.h token.h bitset.obj: bitset.h pyconfig.h mymalloc.h myproto.h pgenheaders.h pydebug.h firstsets.obj: bitset.h pyconfig.h grammar.h mymalloc.h myproto.h \ pgenheaders.h pydebug.h token.h grammar.obj: bitset.h pyconfig.h grammar.h mymalloc.h myproto.h \ pgenheaders.h pydebug.h token.h grammar1.obj: bitset.h pyconfig.h grammar.h mymalloc.h myproto.h \ pgenheaders.h pydebug.h token.h intrcheck.obj: pyconfig.h intrcheck.h mymalloc.h myproto.h listnode.obj: pyconfig.h mymalloc.h myproto.h node.h pgenheaders.h pydebug.h \ token.h metagrammar.obj: bitset.h pyconfig.h grammar.h metagrammar.h mymalloc.h \ myproto.h pgen.h pgenheaders.h pydebug.h myreadline.obj: pyconfig.h intrcheck.h mymalloc.h myproto.h node.obj: pyconfig.h mymalloc.h myproto.h node.h pgenheaders.h pydebug.h parser.obj: bitset.h pyconfig.h errcode.h grammar.h mymalloc.h \ myproto.h node.h parser.h pgenheaders.h pydebug.h token.h parsetok.obj: bitset.h pyconfig.h errcode.h grammar.h mymalloc.h myproto.h \ node.h parser.h parsetok.h pgenheaders.h pydebug.h token.h \ tokenizer.h pgen.obj: bitset.h pyconfig.h grammar.h metagrammar.h mymalloc.h \ myproto.h node.h pgen.h pgenheaders.h pydebug.h token.h pgenmain.obj: bitset.h pyconfig.h grammar.h mymalloc.h myproto.h node.h \ parsetok.h pgen.h pgenheaders.h pydebug.h printgrammar.obj: bitset.h pyconfig.h grammar.h mymalloc.h myproto.h \ pgenheaders.h pydebug.h tokenizer.obj: pyconfig.h errcode.h mymalloc.h myproto.h pgenheaders.h \ pydebug.h token.h tokenizer.h atof.obj: pyconfig.h bltinmodule.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h eval.h fileobject.h \ floatobject.h funcobject.h import.h intobject.h intrcheck.h \ listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h mymath.h myproto.h node.h object.h \ objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h ceval.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h eval.h fileobject.h \ floatobject.h frameobject.h funcobject.h import.h intobject.h \ intrcheck.h listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h opcode.h \ pydebug.h pyerrors.h pyfpe.h pystate.h python.h pythonrun.h \ rangeobject.h sliceobject.h stringobject.h sysmodule.h traceback.h \ tupleobject.h compile.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h graminit.h import.h intobject.h intrcheck.h \ listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h node.h object.h objimpl.h \ opcode.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h \ structmember.h sysmodule.h token.h traceback.h tupleobject.h errors.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h fmod.obj: pyconfig.h mymath.h frozen.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h frozenmain.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h getargs.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h getcompiler.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h getcopyright.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h getmtime.obj: pyconfig.h getplatform.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h getversion.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h patchlevel.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h graminit.obj: bitset.h pyconfig.h grammar.h mymalloc.h myproto.h \ pgenheaders.h pydebug.h hypot.obj: pyconfig.h mymath.h myproto.h import.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h errcode.h eval.h \ fileobject.h floatobject.h funcobject.h import.h importdl.h \ intobject.h intrcheck.h listobject.h longobject.h marshal.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ node.h object.h objimpl.h osdefs.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h token.h traceback.h tupleobject.h importdl.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h importdl.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h osdefs.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h marshal.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longintrepr.h longobject.h marshal.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h pydebug.h \ pyerrors.h pyfpe.h pystate.h python.h pythonrun.h rangeobject.h \ sliceobject.h stringobject.h sysmodule.h traceback.h tupleobject.h modsupport.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h mystrtoul.obj: pyconfig.h pyfpe.obj: pyconfig.h pyfpe.h pystate.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h pythonrun.obj: abstract.h bitset.h ceval.h classobject.h cobject.h \ compile.h complexobject.h pyconfig.h dictobject.h errcode.h eval.h \ fileobject.h floatobject.h funcobject.h grammar.h import.h \ intobject.h intrcheck.h listobject.h longobject.h marshal.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ node.h object.h objimpl.h parsetok.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h sysmodule.h traceback.h tupleobject.h sigcheck.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h pydebug.h pyerrors.h pyfpe.h pystate.h python.h \ pythonrun.h rangeobject.h sliceobject.h stringobject.h sysmodule.h \ traceback.h tupleobject.h strdup.obj: pyconfig.h mymalloc.h myproto.h strtod.obj: pyconfig.h structmember.obj: abstract.h ceval.h classobject.h cobject.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ funcobject.h import.h intobject.h intrcheck.h listobject.h \ longobject.h methodobject.h modsupport.h moduleobject.h mymalloc.h \ myproto.h object.h objimpl.h pydebug.h pyerrors.h pyfpe.h \ pystate.h python.h pythonrun.h rangeobject.h sliceobject.h \ stringobject.h structmember.h sysmodule.h traceback.h \ tupleobject.h sysmodule.obj: abstract.h ceval.h classobject.h cobject.h complexobject.h \ pyconfig.h dictobject.h fileobject.h floatobject.h funcobject.h \ import.h intobject.h intrcheck.h listobject.h longobject.h \ methodobject.h modsupport.h moduleobject.h mymalloc.h myproto.h \ object.h objimpl.h osdefs.h pydebug.h pyerrors.h pyfpe.h pystate.h \ python.h pythonrun.h rangeobject.h sliceobject.h stringobject.h \ sysmodule.h traceback.h tupleobject.h thread.obj: pyconfig.h thread.h traceback.obj: abstract.h ceval.h classobject.h cobject.h compile.h \ complexobject.h pyconfig.h dictobject.h fileobject.h floatobject.h \ frameobject.h funcobject.h import.h intobject.h intrcheck.h \ listobject.h longobject.h methodobject.h modsupport.h \ moduleobject.h mymalloc.h myproto.h object.h objimpl.h osdefs.h \ pydebug.h pyerrors.h pyfpe.h pystate.h python.h pythonrun.h \ rangeobject.h sliceobject.h stringobject.h structmember.h \ sysmodule.h traceback.h tupleobject.h Python-2.3.7/PC/os2vacpp/python.def0000644001241000117560000003614310032007577016320 0ustar loewishpifb6LIBRARY PYTHON23 INITINSTANCE TERMINSTANCE DESCRIPTION 'Python 2.3 Core DLL' PROTMODE DATA MULTIPLE NONSHARED EXPORTS ; Data PyCFunction_Type PyCObject_Type PyClass_Type PyCode_Type PyComplex_Type PyDict_Type PyExc_ArithmeticError PyExc_AssertionError PyExc_AttributeError PyExc_EOFError PyExc_EnvironmentError PyExc_Exception PyExc_FloatingPointError PyExc_IOError PyExc_ImportError PyExc_IndexError PyExc_KeyError PyExc_KeyboardInterrupt PyExc_LookupError PyExc_MemoryError PyExc_MemoryErrorInst PyExc_NameError PyExc_OSError PyExc_OverflowError PyExc_RuntimeError PyExc_StandardError PyExc_SyntaxError PyExc_SystemError PyExc_SystemExit PyExc_TypeError PyExc_ValueError PyExc_ZeroDivisionError PyFile_Type PyFloat_Type PyFrame_Type PyFunction_Type PyImport_FrozenModules PyImport_Inittab PyInstance_Type PyInt_Type PyList_Type PyLong_Type PyMethod_Type PyModule_Type PyOS_InputHook PyOS_ReadlineFunctionPointer PyRange_Type PySlice_Type PyString_Type PyTraceBack_Type PyTuple_Type PyType_Type Py_DebugFlag Py_FrozenFlag Py_InteractiveFlag Py_NoSiteFlag Py_OptimizeFlag Py_TabcheckFlag Py_UseClassExceptionsFlag Py_VerboseFlag _PyImport_Filetab _PyImport_Inittab _PyParser_Grammar _PyParser_TokenNames _PyThread_Started _Py_EllipsisObject _Py_NoneStruct _Py_PackageContext _Py_TrueStruct _Py_ZeroStruct _Py_abstract_hack _Py_cobject_hack _Py_re_syntax _Py_re_syntax_table ; Code PyArg_Parse PyArg_ParseTuple PyArg_ParseTupleAndKeywords PyArg_VaParse PyCFunction_Fini PyCFunction_GetFlags PyCFunction_GetFunction PyCFunction_GetSelf PyCFunction_New PyCObject_AsVoidPtr PyCObject_FromVoidPtrAndDesc PyCObject_FromVoidPtr PyCObject_GetDesc PyCObject_Import PyCallable_Check PyClass_IsSubclass PyClass_New PyCode_Addr2Line PyCode_New PyComplex_AsCComplex PyComplex_FromCComplex PyComplex_FromDoubles PyComplex_ImagAsDouble PyComplex_RealAsDouble PyDict_Clear PyDict_DelItem PyDict_DelItemString PyDict_GetItem PyDict_GetItemString PyDict_Items PyDict_Keys PyDict_New PyDict_Next PyDict_SetItem PyDict_SetItemString PyDict_Size PyDict_Values PyErr_BadArgument PyErr_BadInternalCall PyErr_CheckSignals PyErr_Clear PyErr_ExceptionMatches PyErr_Fetch PyErr_Format PyErr_GivenExceptionMatches PyErr_NewException PyErr_NoMemory PyErr_NormalizeException PyErr_Occurred PyErr_Print PyErr_PrintEx PyErr_Restore PyErr_SetFromErrno PyErr_SetFromErrnoWithFilename PyErr_SetInterrupt PyErr_SetNone PyErr_SetObject PyErr_SetString PyEval_AcquireLock PyEval_AcquireThread PyEval_CallFunction PyEval_CallMethod PyEval_CallObject PyEval_CallObjectWithKeywords PyEval_EvalCode PyEval_GetBuiltins PyEval_GetFrame PyEval_GetGlobals PyEval_GetLocals PyEval_GetRestricted PyEval_InitThreads PyEval_ReleaseLock PyEval_ReleaseThread PyEval_RestoreThread PyEval_SaveThread PyFile_AsFile PyFile_FromFile PyFile_FromString PyFile_GetLine PyFile_Name PyFile_SetBufSize PyFile_SoftSpace PyFile_WriteObject PyFile_WriteString PyFloat_AsDouble PyFloat_AsString PyFloat_Fini PyFloat_FromDouble PyFrame_BlockPop PyFrame_BlockSetup PyFrame_FastToLocals PyFrame_Fini PyFrame_LocalsToFast PyFrame_New PyFunction_GetCode PyFunction_GetDefaults PyFunction_GetGlobals PyFunction_New PyFunction_SetDefaults PyGrammar_AddAccelerators PyGrammar_FindDFA PyGrammar_LabelRepr PyGrammar_RemoveAccelerators PyImport_AddModule PyImport_AppendInittab PyImport_Cleanup PyImport_ExecCodeModule PyImport_ExecCodeModuleEx PyImport_ExtendInittab PyImport_GetMagicNumber PyImport_GetModuleDict PyImport_Import PyImport_ImportFrozenModule PyImport_ImportModule PyImport_ImportModuleEx PyImport_ReloadModule PyInstance_DoBinOp PyInstance_New PyInt_AsLong PyInt_Fini PyInt_FromLong PyInt_GetMax PyInterpreterState_Clear PyInterpreterState_Delete PyInterpreterState_New PyList_Append PyList_AsTuple PyList_GetItem PyList_GetSlice PyList_Insert PyList_New PyList_Reverse PyList_SetItem PyList_SetSlice PyList_Size PyList_Sort PyLong_AsDouble PyLong_AsLong ; PyLong_AsLongLong PyLong_AsUnsignedLong ; PyLong_AsUnsignedLongLong PyLong_AsVoidPtr PyLong_FromDouble PyLong_FromLong ; PyLong_FromLongLong PyLong_FromString PyLong_FromUnsignedLong ; PyLong_FromUnsignedLongLong PyLong_FromVoidPtr PyMapping_Check PyMapping_GetItemString PyMapping_HasKey PyMapping_HasKeyString PyMapping_Length PyMapping_SetItemString PyMarshal_Init PyMarshal_ReadLongFromFile PyMarshal_ReadObjectFromFile PyMarshal_ReadObjectFromString PyMarshal_WriteLongToFile PyMarshal_WriteObjectToFile PyMarshal_WriteObjectToString PyMem_Free PyMem_Malloc PyMem_Realloc PyMember_Get PyMember_Set PyMethod_Class PyMethod_Fini PyMethod_Function PyMethod_New PyMethod_Self PyModule_GetDict PyModule_GetName PyModule_New PyNode_AddChild PyNode_Compile PyNode_Free ; PyNode_ListTree PyNode_New PyNumber_Absolute PyNumber_Add PyNumber_And PyNumber_Check PyNumber_Coerce PyNumber_CoerceEx PyNumber_Divide PyNumber_Divmod PyNumber_Float PyNumber_Int PyNumber_Invert PyNumber_Long PyNumber_Lshift PyNumber_Multiply PyNumber_Negative PyNumber_Or PyNumber_Positive PyNumber_Power PyNumber_Remainder PyNumber_Rshift PyNumber_Subtract PyNumber_Xor PyOS_AfterFork PyOS_FiniInterrupts PyOS_GetLastModificationTime PyOS_InitInterrupts PyOS_InterruptOccurred PyOS_Readline PyOS_StdioReadline PyOS_strtol PyOS_strtoul PyObject_CallFunction PyObject_CallMethod PyObject_CallObject PyObject_Cmp PyObject_Compare PyObject_DelItem PyObject_GetAttr PyObject_GetAttrString PyObject_GetItem PyObject_HasAttr PyObject_HasAttrString PyObject_Hash PyObject_IsTrue PyObject_Length PyObject_Not PyObject_Print PyObject_Repr PyObject_SetAttr PyObject_SetAttrString PyObject_SetItem PyObject_Str PyObject_Type PyParser_AddToken PyParser_Delete PyParser_New PyParser_ParseFile PyParser_ParseString PyParser_SimpleParseFile PyParser_SimpleParseString PyRange_New PyRun_AnyFile PyRun_File PyRun_InteractiveLoop PyRun_InteractiveOne PyRun_SimpleFile PyRun_SimpleString PyRun_String PySequence_Check PySequence_Concat PySequence_Contains PySequence_Count PySequence_DelItem PySequence_DelSlice PySequence_GetItem PySequence_GetSlice PySequence_In PySequence_Index PySequence_Length PySequence_List PySequence_Repeat PySequence_SetItem PySequence_SetSlice PySequence_Tuple PySlice_GetIndices PySlice_New PyString_AsString PyString_Concat PyString_ConcatAndDel PyString_Fini PyString_Format PyString_FromString PyString_FromStringAndSize PyString_InternFromString PyString_InternInPlace PyString_Size PySys_GetFile PySys_GetObject PySys_SetArgv PySys_SetObject PySys_SetPath PySys_WriteStderr PySys_WriteStdout PyThreadState_Clear PyThreadState_Delete PyThreadState_Get PyThreadState_GetDict PyThreadState_New PyThreadState_Swap PyThread__exit_thread PyThread_acquire_lock PyThread_allocate_lock PyThread_allocate_sema PyThread_down_sema PyThread_exit_thread PyThread_free_lock PyThread_free_sema PyThread_get_thread_ident PyThread_init_thread PyThread_release_lock PyThread_start_new_thread PyThread_up_sema PyToken_OneChar PyToken_TwoChars PyTokenizer_Free PyTokenizer_FromFile PyTokenizer_FromString PyTokenizer_Get PyTraceBack_Here PyTraceBack_Print PyTuple_Fini PyTuple_GetItem PyTuple_GetSlice PyTuple_New PyTuple_SetItem PyTuple_Size Py_AddPendingCall Py_AtExit Py_BuildValue Py_CompileString Py_EndInterpreter Py_Exit Py_FatalError Py_FdIsInteractive Py_Finalize Py_FindMethod Py_FindMethodInChain Py_FlushLine Py_Free Py_GetArgcArgv Py_GetBuildInfo Py_GetCompiler Py_GetCopyright Py_GetExecPrefix Py_GetPath Py_GetPlatform Py_GetPrefix Py_GetProgramFullPath Py_GetProgramName Py_GetPythonHome Py_GetVersion Py_InitModule4 Py_Initialize Py_IsInitialized Py_Main Py_MakePendingCalls Py_Malloc Py_NewInterpreter Py_Realloc Py_ReprEnter Py_ReprLeave Py_SetProgramName Py_SetPythonHome Py_VaBuildValue _PyBuiltin_Fini_1 _PyBuiltin_Fini_2 _PyBuiltin_Init_1 _PyBuiltin_Init_2 _PyImport_FindExtension _PyImport_Fini _PyImport_FixupExtension _PyImport_Init _PyImport_LoadDynamicModule _PyLong_New _PyModule_Clear _PyObject_New _PyObject_NewVar _PyString_Resize _PySys_Init _PyTuple_Resize _Py_MD5Final _Py_MD5Init _Py_MD5Update ; _Py_addbit _Py_c_diff _Py_c_neg _Py_c_pow _Py_c_prod _Py_c_quot _Py_c_sum ; _Py_delbitset ; _Py_mergebitset ; _Py_meta_grammar ; _Py_newbitset _Py_re_compile_fastmap _Py_re_compile_initialize _Py_re_compile_pattern _Py_re_match _Py_re_search _Py_re_set_syntax ; _Py_samebitset PyBuffer_Type PyBuffer_FromObject PyBuffer_FromMemory PyBuffer_FromReadWriteMemory PyBuffer_New Python-2.3.7/PC/os2vacpp/getpathp.c0000644001241000117560000002620610157001362016270 0ustar loewishpifb6 /* Return the initial module search path. */ /* Used by DOS, OS/2, Windows 3.1. Works on NT too. */ #include "Python.h" #include "osdefs.h" #ifdef MS_WIN32 #include extern BOOL PyWin_IsWin32s(void); #endif #include #include #include #if HAVE_UNISTD_H #include #endif /* HAVE_UNISTD_H */ /* Search in some common locations for the associated Python libraries. * * Two directories must be found, the platform independent directory * (prefix), containing the common .py and .pyc files, and the platform * dependent directory (exec_prefix), containing the shared library * modules. Note that prefix and exec_prefix can be the same directory, * but for some installations, they are different. * * Py_GetPath() tries to return a sensible Python module search path. * * First, we look to see if the executable is in a subdirectory of * the Python build directory. We calculate the full path of the * directory containing the executable as progpath. We work backwards * along progpath and look for $dir/Modules/Setup.in, a distinctive * landmark. If found, we use $dir/Lib as $root. The returned * Python path is the compiled #define PYTHONPATH with all the initial * "./lib" replaced by $root. * * Otherwise, if there is a PYTHONPATH environment variable, we return that. * * Otherwise we try to find $progpath/lib/os.py, and if found, then * root is $progpath/lib, and we return Python path as compiled PYTHONPATH * with all "./lib" replaced by $root (as above). * */ #ifndef LANDMARK #define LANDMARK "lib\\os.py" #endif static char prefix[MAXPATHLEN+1]; static char exec_prefix[MAXPATHLEN+1]; static char progpath[MAXPATHLEN+1]; static char *module_search_path = NULL; static int is_sep(char ch) /* determine if "ch" is a separator character */ { #ifdef ALTSEP return ch == SEP || ch == ALTSEP; #else return ch == SEP; #endif } static void reduce(char *dir) { int i = strlen(dir); while (i > 0 && !is_sep(dir[i])) --i; dir[i] = '\0'; } static int exists(char *filename) { struct stat buf; return stat(filename, &buf) == 0; } /* Add a path component, by appending stuff to buffer. buffer must have at least MAXPATHLEN + 1 bytes allocated, and contain a NUL-terminated string with no more than MAXPATHLEN characters (not counting the trailing NUL). It's a fatal error if it contains a string longer than that (callers must be careful!). If these requirements are met, it's guaranteed that buffer will still be a NUL-terminated string with no more than MAXPATHLEN characters at exit. If stuff is too long, only as much of stuff as fits will be appended. */ static void join(char *buffer, char *stuff) { int n, k; if (is_sep(stuff[0])) n = 0; else { n = strlen(buffer); if (n > 0 && !is_sep(buffer[n-1]) && n < MAXPATHLEN) buffer[n++] = SEP; } if (n > MAXPATHLEN) Py_FatalError("buffer overflow in getpathp.c's joinpath()"); k = strlen(stuff); if (n + k > MAXPATHLEN) k = MAXPATHLEN - n; strncpy(buffer+n, stuff, k); buffer[n+k] = '\0'; } static int search_for_prefix(char *argv0_path, char *landmark) { int n; /* Search from argv0_path, until root is found */ strcpy(prefix, argv0_path); do { n = strlen(prefix); join(prefix, landmark); if (exists(prefix)) { prefix[n] = '\0'; return 1; } prefix[n] = '\0'; reduce(prefix); } while (prefix[0]); return 0; } #ifdef MS_WIN32 #include "malloc.h" // for alloca - see comments below! extern const char *PyWin_DLLVersionString; // a string loaded from the DLL at startup. /* Load a PYTHONPATH value from the registry. Load from either HKEY_LOCAL_MACHINE or HKEY_CURRENT_USER. Returns NULL, or a pointer that should be freed. */ static char * getpythonregpath(HKEY keyBase, BOOL bWin32s) { HKEY newKey = 0; DWORD nameSize = 0; DWORD dataSize = 0; DWORD numEntries = 0; LONG rc; char *retval = NULL; char *dataBuf; const char keyPrefix[] = "Software\\Python\\PythonCore\\"; const char keySuffix[] = "\\PythonPath"; int versionLen; char *keyBuf; // Tried to use sysget("winver") but here is too early :-( versionLen = strlen(PyWin_DLLVersionString); // alloca == no free required, but memory only local to fn. // also no heap fragmentation! Am I being silly? keyBuf = alloca(sizeof(keyPrefix)-1 + versionLen + sizeof(keySuffix)); // chars only, plus 1 NULL. // lots of constants here for the compiler to optimize away :-) memcpy(keyBuf, keyPrefix, sizeof(keyPrefix)-1); memcpy(keyBuf+sizeof(keyPrefix)-1, PyWin_DLLVersionString, versionLen); memcpy(keyBuf+sizeof(keyPrefix)-1+versionLen, keySuffix, sizeof(keySuffix)); // NULL comes with this one! rc=RegOpenKey(keyBase, keyBuf, &newKey); if (rc==ERROR_SUCCESS) { RegQueryInfoKey(newKey, NULL, NULL, NULL, NULL, NULL, NULL, &numEntries, &nameSize, &dataSize, NULL, NULL); } if (bWin32s && numEntries==0 && dataSize==0) { /* must hardcode for Win32s */ numEntries = 1; dataSize = 511; } if (numEntries) { /* Loop over all subkeys. */ /* Win32s doesnt know how many subkeys, so we do it twice */ char keyBuf[MAX_PATH+1]; int index = 0; int off = 0; for(index=0;;index++) { long reqdSize = 0; DWORD rc = RegEnumKey(newKey, index, keyBuf, MAX_PATH+1); if (rc) break; rc = RegQueryValue(newKey, keyBuf, NULL, &reqdSize); if (rc) break; if (bWin32s && reqdSize==0) reqdSize = 512; dataSize += reqdSize + 1; /* 1 for the ";" */ } dataBuf = malloc(dataSize+1); if (dataBuf==NULL) return NULL; /* pretty serious? Raise error? */ /* Now loop over, grabbing the paths. Subkeys before main library */ for(index=0;;index++) { int adjust; long reqdSize = dataSize; DWORD rc = RegEnumKey(newKey, index, keyBuf,MAX_PATH+1); if (rc) break; rc = RegQueryValue(newKey, keyBuf, dataBuf+off, &reqdSize); if (rc) break; if (reqdSize>1) { /* If Nothing, or only '\0' copied. */ adjust = strlen(dataBuf+off); dataSize -= adjust; off += adjust; dataBuf[off++] = ';'; dataBuf[off] = '\0'; dataSize--; } } /* Additionally, win32s doesnt work as expected, so the specific strlen() is required for 3.1. */ rc = RegQueryValue(newKey, "", dataBuf+off, &dataSize); if (rc==ERROR_SUCCESS) { if (strlen(dataBuf)==0) free(dataBuf); else retval = dataBuf; /* caller will free */ } else free(dataBuf); } if (newKey) RegCloseKey(newKey); return retval; } #endif /* MS_WIN32 */ static void get_progpath(void) { extern char *Py_GetProgramName(void); char *path = getenv("PATH"); char *prog = Py_GetProgramName(); #ifdef MS_WIN32 if (GetModuleFileName(NULL, progpath, MAXPATHLEN)) return; #endif if (prog == NULL || *prog == '\0') prog = "python"; /* If there is no slash in the argv0 path, then we have to * assume python is on the user's $PATH, since there's no * other way to find a directory to start the search from. If * $PATH isn't exported, you lose. */ #ifdef ALTSEP if (strchr(prog, SEP) || strchr(prog, ALTSEP)) #else if (strchr(prog, SEP)) #endif strcpy(progpath, prog); else if (path) { while (1) { char *delim = strchr(path, DELIM); if (delim) { int len = delim - path; strncpy(progpath, path, len); *(progpath + len) = '\0'; } else strcpy(progpath, path); join(progpath, prog); if (exists(progpath)) break; if (!delim) { progpath[0] = '\0'; break; } path = delim + 1; } } else progpath[0] = '\0'; } static void calculate_path(void) { char argv0_path[MAXPATHLEN+1]; char *buf; int bufsz; char *pythonhome = Py_GetPythonHome(); char *envpath = Py_GETENV("PYTHONPATH"); #ifdef MS_WIN32 char *machinepath, *userpath; /* Are we running under Windows 3.1(1) Win32s? */ if (PyWin_IsWin32s()) { /* Only CLASSES_ROOT is supported */ machinepath = getpythonregpath(HKEY_CLASSES_ROOT, TRUE); userpath = NULL; } else { machinepath = getpythonregpath(HKEY_LOCAL_MACHINE, FALSE); userpath = getpythonregpath(HKEY_CURRENT_USER, FALSE); } #endif get_progpath(); strcpy(argv0_path, progpath); reduce(argv0_path); if (pythonhome == NULL || *pythonhome == '\0') { if (search_for_prefix(argv0_path, LANDMARK)) pythonhome = prefix; else pythonhome = NULL; } else { char *delim; strcpy(prefix, pythonhome); /* Extract Any Optional Trailing EXEC_PREFIX */ /* e.g. PYTHONHOME=: */ delim = strchr(prefix, DELIM); if (delim) { *delim = '\0'; strcpy(exec_prefix, delim+1); } else strcpy(exec_prefix, EXEC_PREFIX); } if (envpath && *envpath == '\0') envpath = NULL; /* We need to construct a path from the following parts: (1) the PYTHONPATH environment variable, if set; (2) for Win32, the machinepath and userpath, if set; (3) the PYTHONPATH config macro, with the leading "." of each component replaced with pythonhome, if set; (4) the directory containing the executable (argv0_path). The length calculation calculates #3 first. */ /* Calculate size of return buffer */ if (pythonhome != NULL) { char *p; bufsz = 1; for (p = PYTHONPATH; *p; p++) { if (*p == DELIM) bufsz++; /* number of DELIM plus one */ } bufsz *= strlen(pythonhome); } else bufsz = 0; bufsz += strlen(PYTHONPATH) + 1; if (envpath != NULL) bufsz += strlen(envpath) + 1; bufsz += strlen(argv0_path) + 1; #ifdef MS_WIN32 if (machinepath) bufsz += strlen(machinepath) + 1; if (userpath) bufsz += strlen(userpath) + 1; #endif module_search_path = buf = malloc(bufsz); if (buf == NULL) { /* We can't exit, so print a warning and limp along */ fprintf(stderr, "Can't malloc dynamic PYTHONPATH.\n"); if (envpath) { fprintf(stderr, "Using default static $PYTHONPATH.\n"); module_search_path = envpath; } else { fprintf(stderr, "Using environment $PYTHONPATH.\n"); module_search_path = PYTHONPATH; } return; } if (envpath) { strcpy(buf, envpath); buf = strchr(buf, '\0'); *buf++ = DELIM; } #ifdef MS_WIN32 if (machinepath) { strcpy(buf, machinepath); buf = strchr(buf, '\0'); *buf++ = DELIM; } if (userpath) { strcpy(buf, userpath); buf = strchr(buf, '\0'); *buf++ = DELIM; } #endif if (pythonhome == NULL) { strcpy(buf, PYTHONPATH); buf = strchr(buf, '\0'); } else { char *p = PYTHONPATH; char *q; int n; for (;;) { q = strchr(p, DELIM); if (q == NULL) n = strlen(p); else n = q-p; if (p[0] == '.' && is_sep(p[1])) { strcpy(buf, pythonhome); buf = strchr(buf, '\0'); p++; n--; } strncpy(buf, p, n); buf += n; if (q == NULL) break; *buf++ = DELIM; p = q+1; } } if (argv0_path) { *buf++ = DELIM; strcpy(buf, argv0_path); buf = strchr(buf, '\0'); } *buf = '\0'; } /* External interface */ char * Py_GetPath(void) { if (!module_search_path) calculate_path(); return module_search_path; } char * Py_GetPrefix(void) { if (!module_search_path) calculate_path(); return prefix; } char * Py_GetExecPrefix(void) { if (!module_search_path) calculate_path(); return exec_prefix; } char * Py_GetProgramFullPath(void) { if (!module_search_path) calculate_path(); return progpath; } Python-2.3.7/PC/winsound.c0000644001241000117560000001610507663203556014603 0ustar loewishpifb6/* Author: Toby Dickenson * * Copyright (c) 1999 Toby Dickenson * * Permission to use this software in any way is granted without * fee, provided that the copyright notice above appears in all * copies. This software is provided "as is" without any warranty. */ /* Modified by Guido van Rossum */ /* Beep added by Mark Hammond */ /* Win9X Beep and platform identification added by Uncle Timmy */ /* Example: import winsound import time # Play wav file winsound.PlaySound('c:/windows/media/Chord.wav', winsound.SND_FILENAME) # Play sound from control panel settings winsound.PlaySound('SystemQuestion', winsound.SND_ALIAS) # Play wav file from memory data=open('c:/windows/media/Chimes.wav',"rb").read() winsound.PlaySound(data, winsound.SND_MEMORY) # Start playing the first bit of wav file asynchronously winsound.PlaySound('c:/windows/media/Chord.wav', winsound.SND_FILENAME|winsound.SND_ASYNC) # But dont let it go for too long... time.sleep(0.1) # ...Before stopping it winsound.PlaySound(None, 0) */ #include #include #include /* port functions on Win9x */ #include PyDoc_STRVAR(sound_playsound_doc, "PlaySound(sound, flags) - a wrapper around the Windows PlaySound API\n" "\n" "The sound argument can be a filename, data, or None.\n" "For flag values, ored together, see module documentation."); PyDoc_STRVAR(sound_beep_doc, "Beep(frequency, duration) - a wrapper around the Windows Beep API\n" "\n" "The frequency argument specifies frequency, in hertz, of the sound.\n" "This parameter must be in the range 37 through 32,767.\n" "The duration argument specifies the number of milliseconds.\n" "On WinNT and 2000, the platform Beep API is used directly. Else funky\n" "code doing direct port manipulation is used; it's unknown whether that\n" "will work on all systems."); PyDoc_STRVAR(sound_msgbeep_doc, "MessageBeep(x) - call Windows MessageBeep(x). x defaults to MB_OK."); PyDoc_STRVAR(sound_module_doc, "PlaySound(sound, flags) - play a sound\n" "SND_FILENAME - sound is a wav file name\n" "SND_ALIAS - sound is a registry sound association name\n" "SND_LOOP - Play the sound repeatedly; must also specify SND_ASYNC\n" "SND_MEMORY - sound is a memory image of a wav file\n" "SND_PURGE - stop all instances of the specified sound\n" "SND_ASYNC - PlaySound returns immediately\n" "SND_NODEFAULT - Do not play a default beep if the sound can not be found\n" "SND_NOSTOP - Do not interrupt any sounds currently playing\n" // Raising RuntimeError if needed "SND_NOWAIT - Return immediately if the sound driver is busy\n" // Without any errors "\n" "Beep(frequency, duration) - Make a beep through the PC speaker."); static PyObject * sound_playsound(PyObject *s, PyObject *args) { const char *sound; int flags; int length; int ok; if(!PyArg_ParseTuple(args,"z#i:PlaySound",&sound,&length,&flags)) { return NULL; } if(flags&SND_ASYNC && flags &SND_MEMORY) { /* Sidestep reference counting headache; unfortunately this also prevent SND_LOOP from memory. */ PyErr_SetString(PyExc_RuntimeError,"Cannot play asynchronously from memory"); return NULL; } Py_BEGIN_ALLOW_THREADS ok = PlaySound(sound,NULL,flags); Py_END_ALLOW_THREADS if(!ok) { PyErr_SetString(PyExc_RuntimeError,"Failed to play sound"); return NULL; } Py_INCREF(Py_None); return Py_None; } enum OSType {Win9X, WinNT2000}; static enum OSType whichOS; /* set by module init */ static PyObject * sound_beep(PyObject *self, PyObject *args) { int freq; int dur; if (!PyArg_ParseTuple(args, "ii:Beep", &freq, &dur)) return NULL; if (freq < 37 || freq > 32767) { PyErr_SetString(PyExc_ValueError, "frequency must be in 37 thru 32767"); return NULL; } /* On NT and 2000, the SDK Beep() function does the whole job. * But while Beep() exists before NT, it ignores its arguments and * plays the system default sound. Sheesh ... * The Win9X code is mondo bizarre. I (Tim) pieced it together from * crap all over the web. The original IBM PC used some particular * pieces of hardware (Intel 8255 and 8254 chips) hardwired to * particular port addresses and running at particular clock speeds, * and the poor sound card folks have been forced to emulate that in * all particulars ever since. But NT and 2000 don't support port * manipulation. Don't know about WinME; guessing it's like 98. */ if (whichOS == WinNT2000) { BOOL ok; Py_BEGIN_ALLOW_THREADS ok = Beep(freq, dur); Py_END_ALLOW_THREADS if (!ok) { PyErr_SetString(PyExc_RuntimeError,"Failed to beep"); return NULL; } } else if (whichOS == Win9X) { int speaker_state; /* Force timer into oscillator mode via timer control port. */ _outp(0x43, 0xb6); /* Compute ratio of ancient hardcoded timer frequency to * frequency we want. Then feed that ratio (lowest byte * first) into timer data port. */ freq = 1193180 / freq; _outp(0x42, freq & 0xff); _outp(0x42, (freq >> 8) & 0xff); /* Get speaker control state. */ speaker_state = _inp(0x61); /* Turn the speaker on (bit 1) * and drive speaker from timer (bit 0). */ _outp(0x61, speaker_state | 0x3); /* Let it blast in peace for the duration. */ Py_BEGIN_ALLOW_THREADS Sleep(dur); Py_END_ALLOW_THREADS /* Restore speaker control to original state. */ _outp(0x61, speaker_state); } else { assert(!"winsound's whichOS has insane value"); } Py_INCREF(Py_None); return Py_None; } static PyObject * sound_msgbeep(PyObject *self, PyObject *args) { int x = MB_OK; if (!PyArg_ParseTuple(args, "|i:MessageBeep", &x)) return NULL; MessageBeep(x); Py_INCREF(Py_None); return Py_None; } static struct PyMethodDef sound_methods[] = { {"PlaySound", sound_playsound, METH_VARARGS, sound_playsound_doc}, {"Beep", sound_beep, METH_VARARGS, sound_beep_doc}, {"MessageBeep", sound_msgbeep, METH_VARARGS, sound_msgbeep_doc}, {NULL, NULL} }; static void add_define(PyObject *dict, const char *key, long value) { PyObject *k=PyString_FromString(key); PyObject *v=PyLong_FromLong(value); if(v&&k) { PyDict_SetItem(dict,k,v); } Py_XDECREF(k); Py_XDECREF(v); } #define ADD_DEFINE(tok) add_define(dict,#tok,tok) PyMODINIT_FUNC initwinsound(void) { OSVERSIONINFO version; PyObject *module = Py_InitModule3("winsound", sound_methods, sound_module_doc); PyObject *dict = PyModule_GetDict(module); ADD_DEFINE(SND_ASYNC); ADD_DEFINE(SND_NODEFAULT); ADD_DEFINE(SND_NOSTOP); ADD_DEFINE(SND_NOWAIT); ADD_DEFINE(SND_ALIAS); ADD_DEFINE(SND_FILENAME); ADD_DEFINE(SND_MEMORY); ADD_DEFINE(SND_PURGE); ADD_DEFINE(SND_LOOP); ADD_DEFINE(SND_APPLICATION); ADD_DEFINE(MB_OK); ADD_DEFINE(MB_ICONASTERISK); ADD_DEFINE(MB_ICONEXCLAMATION); ADD_DEFINE(MB_ICONHAND); ADD_DEFINE(MB_ICONQUESTION); version.dwOSVersionInfoSize = sizeof(OSVERSIONINFO); GetVersionEx(&version); whichOS = Win9X; if (version.dwPlatformId != VER_PLATFORM_WIN32s && version.dwPlatformId != VER_PLATFORM_WIN32_WINDOWS) whichOS = WinNT2000; } Python-2.3.7/PC/pycon.ico0000644001241000117560000000137606436730046014415 0ustar loewishpifb6 è( @€€€€€€€€€€€€€ÀÀÀÿÿÿÿÿÿÿÿÿÿÿÿwwwwwwwwwwwwpøˆˆˆˆˆˆˆˆˆˆˆˆ‡øÿÿÿÿÿÿÿÿÿÿø‡øp‡øp™ ª330‡øp šª 3£33‡øp™£ª ª33‡øp ª £3‡øp™ª ª3‡øp ::0£ :3‡øpªªªªª ª3‡øpª:::ª£ £3‡øp333::  ª3‡øp033::ªª3‡øp33333::ª3‡øp333333 33‡øp333333‡øp3‡øp °»°0‡øp À¼À0‡øp À¼À0‡øp °»°0‡øp0‡øp33‡ÌÌÌÌÌÌÌÌÌÌÌÌÌÌwÏüÿÏÿÌüÌÌÌÇ|w‡ÌÌÌÌÌÌÌÌÌÌÈ|‡ÿÿÿÿàÀ€€€€‚€‚`‚0‚€€€€€€€‚ƒ€ÁƒÀÁƒÀÁƒÀÁƒÀÁƒÀÁƒàÁ€€€€€ÿÿÿÿPython-2.3.7/PC/bdist_wininst/0000755001241000117560000000000010765544512015443 5ustar loewishpifb6Python-2.3.7/PC/bdist_wininst/.cvsignore0000644001241000117560000000007410075247467017447 0ustar loewishpifb6temp-debug temp-release wininst.ncb wininst.opt wininst.plg Python-2.3.7/PC/bdist_wininst/install.rc0000644001241000117560000001451710075245357017446 0ustar loewishpifb6/* IMPORTANT NOTE: IF THIS FILE IS CHANGED, WININST.EXE MUST BE RECOMPILED WITH THE MSVC6 WININST.DSW WORKSPACE FILE MANUALLY. IF CHANGES TO THIS FILE ARE CHECKED INTO PYTHON CVS, THE RECOMPILED BINARY MUST BE CHECKED IN AS WELL! */ //Microsoft Developer Studio generated resource script. // #include "resource.h" #define APSTUDIO_READONLY_SYMBOLS ///////////////////////////////////////////////////////////////////////////// // // Generated from the TEXTINCLUDE 2 resource. // #include "afxres.h" ///////////////////////////////////////////////////////////////////////////// #undef APSTUDIO_READONLY_SYMBOLS ///////////////////////////////////////////////////////////////////////////// // Neutral resources #if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_NEU) #ifdef _WIN32 LANGUAGE LANG_NEUTRAL, SUBLANG_NEUTRAL #pragma code_page(1252) #endif //_WIN32 ///////////////////////////////////////////////////////////////////////////// // // Bitmap // IDB_BITMAP BITMAP DISCARDABLE "PythonPowered.bmp" #endif // Neutral resources ///////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////// // German (Germany) resources #if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_DEU) #ifdef _WIN32 LANGUAGE LANG_GERMAN, SUBLANG_GERMAN #pragma code_page(1252) #endif //_WIN32 #ifdef APSTUDIO_INVOKED ///////////////////////////////////////////////////////////////////////////// // // TEXTINCLUDE // 1 TEXTINCLUDE DISCARDABLE BEGIN "resource.h\0" END 2 TEXTINCLUDE DISCARDABLE BEGIN "#include ""afxres.h""\r\n" "\0" END 3 TEXTINCLUDE DISCARDABLE BEGIN "\r\n" "\0" END #endif // APSTUDIO_INVOKED #endif // German (Germany) resources ///////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////// // English (U.S.) resources #if !defined(AFX_RESOURCE_DLL) || defined(AFX_TARG_ENU) #ifdef _WIN32 LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US #pragma code_page(1252) #endif //_WIN32 ///////////////////////////////////////////////////////////////////////////// // // Dialog // IDD_INTRO DIALOGEX 0, 0, 379, 178 STYLE WS_CHILD | WS_DISABLED | WS_CAPTION CAPTION "Setup" FONT 8, "MS Sans Serif", 0, 0, 0x1 BEGIN LTEXT "This Wizard will install %s on your computer. Click Next to continue or Cancel to exit the Setup Wizard.", IDC_TITLE,125,10,247,20,NOT WS_GROUP EDITTEXT IDC_INTRO_TEXT,125,31,247,131,ES_MULTILINE | ES_READONLY | WS_VSCROLL | WS_HSCROLL | NOT WS_TABSTOP CONTROL 110,IDC_BITMAP,"Static",SS_BITMAP | SS_CENTERIMAGE,6,8, 104,163,WS_EX_CLIENTEDGE LTEXT "",IDC_BUILD_INFO,125,163,247,8 END IDD_SELECTPYTHON DIALOGEX 0, 0, 379, 178 STYLE WS_CHILD | WS_DISABLED | WS_CAPTION CAPTION "Setup" FONT 8, "MS Sans Serif", 0, 0, 0x1 BEGIN LTEXT "Select python installation to use:",IDC_TITLE,125,10, 247,12,NOT WS_GROUP EDITTEXT IDC_PATH,191,136,181,14,ES_AUTOHSCROLL | ES_READONLY LTEXT "Python Directory:",IDC_STATIC,125,137,55,8 LISTBOX IDC_VERSIONS_LIST,125,24,247,106,LBS_SORT | LBS_NOINTEGRALHEIGHT | WS_VSCROLL | WS_TABSTOP CONTROL 110,IDC_BITMAP,"Static",SS_BITMAP | SS_CENTERIMAGE,6,8, 104,163,WS_EX_CLIENTEDGE EDITTEXT IDC_INSTALL_PATH,191,157,181,14,ES_AUTOHSCROLL | ES_READONLY LTEXT "Installation Directory:",IDC_STATIC,125,158,66,8 PUSHBUTTON "Find other ...",IDC_OTHERPYTHON,322,7,50,14,NOT WS_VISIBLE END IDD_INSTALLFILES DIALOGEX 0, 0, 379, 178 STYLE WS_CHILD | WS_DISABLED | WS_CAPTION CAPTION "Setup" FONT 8, "MS Sans Serif", 0, 0, 0x1 BEGIN LTEXT "Click Next to begin the installation. If you want to review or change any of your installation settings, click Back. Click Cancel to exit the Wizard.", IDC_TITLE,125,10,246,31,NOT WS_GROUP CONTROL "Progress1",IDC_PROGRESS,"msctls_progress32",WS_BORDER, 125,157,246,14 CTEXT "Installation progress:",IDC_INFO,125,137,246,8 CONTROL 110,IDC_BITMAP,"Static",SS_BITMAP | SS_CENTERIMAGE,6,8, 104,163,WS_EX_CLIENTEDGE END IDD_FINISHED DIALOGEX 0, 0, 379, 178 STYLE WS_CHILD | WS_DISABLED | WS_CAPTION CAPTION "Setup" FONT 8, "MS Sans Serif" BEGIN LTEXT "Click the Finish button to exit the Setup wizard.", IDC_TITLE,125,10,247,31,NOT WS_GROUP CONTROL 110,IDC_BITMAP,"Static",SS_BITMAP | SS_CENTERIMAGE,6,8, 104,163,WS_EX_CLIENTEDGE EDITTEXT IDC_INFO,125,40,247,131,ES_MULTILINE | ES_READONLY | WS_VSCROLL | WS_HSCROLL | NOT WS_TABSTOP END ///////////////////////////////////////////////////////////////////////////// // // DESIGNINFO // #ifdef APSTUDIO_INVOKED GUIDELINES DESIGNINFO DISCARDABLE BEGIN IDD_INTRO, DIALOG BEGIN LEFTMARGIN, 7 RIGHTMARGIN, 372 VERTGUIDE, 125 VERTGUIDE, 372 TOPMARGIN, 7 BOTTOMMARGIN, 171 HORZGUIDE, 8 HORZGUIDE, 31 END IDD_SELECTPYTHON, DIALOG BEGIN LEFTMARGIN, 7 RIGHTMARGIN, 372 VERTGUIDE, 125 VERTGUIDE, 372 TOPMARGIN, 7 BOTTOMMARGIN, 171 HORZGUIDE, 8 HORZGUIDE, 41 END IDD_INSTALLFILES, DIALOG BEGIN LEFTMARGIN, 7 RIGHTMARGIN, 372 VERTGUIDE, 125 VERTGUIDE, 371 TOPMARGIN, 7 BOTTOMMARGIN, 171 HORZGUIDE, 8 HORZGUIDE, 41 END IDD_FINISHED, DIALOG BEGIN LEFTMARGIN, 6 RIGHTMARGIN, 372 VERTGUIDE, 125 VERTGUIDE, 372 TOPMARGIN, 7 BOTTOMMARGIN, 171 HORZGUIDE, 8 HORZGUIDE, 41 END END #endif // APSTUDIO_INVOKED #endif // English (U.S.) resources ///////////////////////////////////////////////////////////////////////////// #ifndef APSTUDIO_INVOKED ///////////////////////////////////////////////////////////////////////////// // // Generated from the TEXTINCLUDE 3 resource. // ///////////////////////////////////////////////////////////////////////////// #endif // not APSTUDIO_INVOKED Python-2.3.7/PC/bdist_wininst/wininst.dsw0000644001241000117560000000077407567513005017664 0ustar loewishpifb6Microsoft Developer Studio Workspace File, Format Version 6.00 # WARNING: DO NOT EDIT OR DELETE THIS WORKSPACE FILE! ############################################################################### Project: "wininst"=.\wininst.dsp - Package Owner=<4> Package=<5> {{{ }}} Package=<4> {{{ }}} ############################################################################### Global: Package=<5> {{{ }}} Package=<3> {{{ }}} ############################################################################### Python-2.3.7/PC/bdist_wininst/wininst.dsp0000644001241000117560000001026510054711004017631 0ustar loewishpifb6# Microsoft Developer Studio Project File - Name="wininst" - Package Owner=<4> # Microsoft Developer Studio Generated Build File, Format Version 6.00 # ** DO NOT EDIT ** # TARGTYPE "Win32 (x86) Application" 0x0101 CFG=wininst - Win32 Debug !MESSAGE This is not a valid makefile. To build this project using NMAKE, !MESSAGE use the Export Makefile command and run !MESSAGE !MESSAGE NMAKE /f "wininst.mak". !MESSAGE !MESSAGE You can specify a configuration when running NMAKE !MESSAGE by defining the macro CFG on the command line. For example: !MESSAGE !MESSAGE NMAKE /f "wininst.mak" CFG="wininst - Win32 Debug" !MESSAGE !MESSAGE Possible choices for configuration are: !MESSAGE !MESSAGE "wininst - Win32 Release" (based on "Win32 (x86) Application") !MESSAGE "wininst - Win32 Debug" (based on "Win32 (x86) Application") !MESSAGE # Begin Project # PROP AllowPerConfigDependencies 0 # PROP Scc_ProjName "" # PROP Scc_LocalPath "" CPP=cl.exe MTL=midl.exe RSC=rc.exe !IF "$(CFG)" == "wininst - Win32 Release" # PROP BASE Use_MFC 0 # PROP BASE Use_Debug_Libraries 0 # PROP BASE Output_Dir "Release" # PROP BASE Intermediate_Dir "Release" # PROP BASE Target_Dir "" # PROP Use_MFC 0 # PROP Use_Debug_Libraries 0 # PROP Output_Dir "..\..\lib\distutils\command" # PROP Intermediate_Dir "temp-release" # PROP Ignore_Export_Lib 0 # PROP Target_Dir "" # ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_WINDOWS" /D "_MBCS" /YX /FD /c # ADD CPP /nologo /MD /W3 /O1 /I "..\..\Include" /I "..\..\..\zlib-1.1.4" /D "WIN32" /D "NDEBUG" /D "_WINDOWS" /D "_MBCS" /YX /FD /c # ADD BASE MTL /nologo /D "NDEBUG" /mktyplib203 /win32 # ADD MTL /nologo /D "NDEBUG" /mktyplib203 /win32 # ADD BASE RSC /l 0x407 /d "NDEBUG" # ADD RSC /l 0x407 /d "NDEBUG" BSC32=bscmake.exe # ADD BASE BSC32 /nologo # ADD BSC32 /nologo LINK32=link.exe # ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:windows /machine:I386 # ADD LINK32 ..\..\..\zlib-1.1.4\zlib.lib imagehlp.lib comdlg32.lib ole32.lib comctl32.lib kernel32.lib user32.lib gdi32.lib advapi32.lib shell32.lib /nologo /subsystem:windows /machine:I386 /nodefaultlib:"LIBC" !ELSEIF "$(CFG)" == "wininst - Win32 Debug" # PROP BASE Use_MFC 0 # PROP BASE Use_Debug_Libraries 1 # PROP BASE Output_Dir "Debug" # PROP BASE Intermediate_Dir "Debug" # PROP BASE Target_Dir "" # PROP Use_MFC 0 # PROP Use_Debug_Libraries 1 # PROP Output_Dir "." # PROP Intermediate_Dir "temp-debug" # PROP Ignore_Export_Lib 0 # PROP Target_Dir "" # ADD BASE CPP /nologo /W3 /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_WINDOWS" /D "_MBCS" /YX /FD /GZ /c # ADD CPP /nologo /MD /W3 /Z7 /Od /I "..\..\Include" /I "..\..\..\zlib-1.1.4" /D "WIN32" /D "_DEBUG" /D "_WINDOWS" /D "_MBCS" /FR /YX /FD /c # ADD BASE MTL /nologo /D "_DEBUG" /mktyplib203 /win32 # ADD MTL /nologo /D "_DEBUG" /mktyplib203 /win32 # ADD BASE RSC /l 0x407 /d "_DEBUG" # ADD RSC /l 0x407 /d "_DEBUG" BSC32=bscmake.exe # ADD BASE BSC32 /nologo # ADD BSC32 /nologo LINK32=link.exe # ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:windows /debug /machine:I386 /pdbtype:sept # ADD LINK32 ..\..\..\zlib-1.1.4\zlib.lib imagehlp.lib comdlg32.lib ole32.lib comctl32.lib kernel32.lib user32.lib gdi32.lib advapi32.lib shell32.lib /nologo /subsystem:windows /pdb:none /debug /machine:I386 /nodefaultlib:"LIBC" /out:"./wininst_d.exe" !ENDIF # Begin Target # Name "wininst - Win32 Release" # Name "wininst - Win32 Debug" # Begin Group "Source Files" # PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat" # Begin Source File SOURCE=.\extract.c # End Source File # Begin Source File SOURCE=.\install.c # End Source File # Begin Source File SOURCE=.\install.rc # End Source File # End Group # Begin Group "Header Files" # PROP Default_Filter "h;hpp;hxx;hm;inl" # Begin Source File SOURCE=.\archive.h # End Source File # End Group # Begin Group "Resource Files" # PROP Default_Filter "ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe" # Begin Source File SOURCE=.\PythonPowered.bmp # End Source File # End Group # End Target # End Project Python-2.3.7/PC/bdist_wininst/PythonPowered.bmp0000644001241000117560000000502607567513005020754 0ustar loewishpifb6BM v(n,  ÿÿÿçççÞÞÞÖÖÖ½½½„„„BBB999111)))Þÿ¥cîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîïÿÿîîîîïÿÿÿÿîïÿÿÿÿîïÿÿÿÿÿÿÿîîîîïÿÿÿÿîïÿÿÿÿÿîîîîîîîîîîîîÿÿÿþîîîÿÿÿÿÿþÿÿÿÿÿþÿÿÿÿÿÿÿÿþîîîÿÿÿÿÿþÿÿÿÿÿÿþîîîîîîîîîîïÿÿÿþîîïÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþîîïÿÿÿÿÿÿÿÿÿÿÿÿþîîîîîîîîîîÿ¶¿ÿþîîÿ¶¦¦¿ÿÿ¶¿¶¿ÿÿ¶¦¦¿ÿ¶¿ÿþîîÿ¶¦¦¿ÿÿ¶¦¦¦¿ÿþîîîîîîîîîîûR[ÿÿÿÿúRABZÿúRYRZÿúRAB[ûR[ÿþîïúRAB[ÿúRAAB[ÿþîîîîîîîîîîö &ÿÿÿÿ¥¯¥¯¥&Æ &ÿþîÿ¥&ÿ¥&ÿþîîîîîîîîîîú@JÿÿÿûQ1AA1ZQ1111ZQ1AAZú@JÿÿÿûQ1AAZûQ1AAJÿþîîîîîîîîîîö¦¦¿ö ¦¥eu†¦ÿÿÿö eu†¦ ¦¥ÿþîîîîîîîîîîú@ABZú@Jÿú@G@F@F@G@AABX@Jÿÿÿú@AABX@Jÿù@Jÿþîîîîîîîîîîö¦ÿö¯ÿ¶¦ÿ¥ÿþîîîîîîîîîîú@AA1X@Jÿú@G@HRX@G@AAG@ZúRX@AAG@JúQJÿþîîîîîîîîîîöed%¦¥¦¦ed•%ed•ÿþîîîîîîîîîîú@AA1ZQ1AA1X@Jÿú@HQ1AA1X@1A1ZQ1AA1ZQ1A1Jÿþîîîîîîîîîîö ¯¥¦ &ÿö &¥¦ ¯¥¯¥ÿþîîîîîîîîîîûRAABZÿúRABZûR[ÿûR[úRABZûRYRBZÿúRABZÿúRBW@Jÿþîîîîîîîîîîÿ¶¦¦¦¿þÿ¶¦¦¿ÿ¶¿þÿ¶¿ÿ¶¦¦¿ÿ¶¿¶¦¿ÿÿ¶¦¦¿ÿÿ¶¦¦ÿþîîîîîîîîîîïÿÿüÿÿþïÿÿÿÿÿÿÿîÿüÿÿÿüÿÿÿüÿÿüÿÿÿÿüÿÿÿÿÿÿú@Jÿþîîîîîîîîîîîîÿ¶¿ÿþîîîÿ¶¿ÿþîÿ¶¿ÿÿ¶¿ÿÿ¶¿ÿ¶¦¦¿ÿ¶¿ÿÿ¶¿ÿö &ÿþîîîîîîîîîîîîûR[ÿþîîîûR[ÿþîûR[ÿûR[ÿûR[úRABZûR[ÿûR[ÿûR[ÿîîîîîîîîîîîîîö &ÿþîîîö &ÿþîö &ÿö &ÿö &¥¦ &ÿö &ÿÿ¶¿þîîîîîîîîîîîîîú@Jÿÿÿÿîú@Jÿÿîú@Jÿú@Jÿú@HQ1AA1X@Jÿú@Jÿÿÿÿîîîîîîîîîîîîîîöÿÿÿÿþöÿÿþöÿöÿö¦¥ÿ¥ÿþîîîîîîîîîîîîîîîîú@Jÿÿÿÿÿú@Jÿÿÿú@Jÿú@Jÿú@G@Jÿú@G@JúQJÿþîîîîîîîîîîîîîîîîö¦¦¿ÿÿ¥¯ÿÿöÿö¦¥ÿö¥ÿþîîîîîîîîîîîîîîîîú@ABZÿúQ11Zÿÿú@Jÿú@AAG@Jÿú@G@GQ1Jÿþîîîîîîîîîîîîîîîîö¯¥¯ÿöÿöÿöÿþîîîîîîîîîîîîîîîîú@AA1ZQ1YQ1[ÿú@Jÿú@AAG@Jÿú@G@1W@Jÿþîîîîîîîîîîîîîîîîö¦¥¯¥&ÿöÿö¦¥ÿö¦ÿþîîîîîîîîîîîîîîîîú@Iüù@G@Jÿú@Jÿú@Jÿú@Jÿú@G@Jÿú@G@Zú@Jÿþîîîîîîîîîîîîîîîîö¦¥ÿö¦¥¦¦ÿö¦¥¯öÿþîîîîîîîîîîîîîîîîú@AA1X@Jÿú@HRABX@Jÿú@HQ1AA1X@Jÿú@Jÿþîîîîîîîîîîîîîîîîö ¦ &ÿö  %&ÿö &¥¦ &ÿö &ÿþîîîîîîîîîîîîîîîîûRAABZûR[ÿûRZRAAABZR[ÿûR[úRABZûR[ÿûR[ÿîîîîîîîîîîîîîîîîîÿ¶¦¦¦¿ÿ¶¿þÿ¶¿¶¦¦¦¦¿¶¿þÿ¶¿ÿ¶¦¦¿ÿ¶¿þÿ¶¿þîîîîîîîîîîîîîîîîîïÿÿÿÿÿÿÿÿîïÿÿÿÿÿÿÿÿÿÿîïÿÿÿÿÿÿÿÿÿÿîïÿÿîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîîPython-2.3.7/PC/bdist_wininst/README.txt0000644001241000117560000000015107567513005017135 0ustar loewishpifb6 XXX Write description XXX Dont't forget to mention upx XXX Add pointer to this file into PC/README.txt Python-2.3.7/PC/bdist_wininst/extract.c0000644001241000117560000001701110075245357017260 0ustar loewishpifb6/* IMPORTANT NOTE: IF THIS FILE IS CHANGED, WININST.EXE MUST BE RECOMPILED WITH THE MSVC6 WININST.DSW WORKSPACE FILE MANUALLY. IF CHANGES TO THIS FILE ARE CHECKED INTO PYTHON CVS, THE RECOMPILED BINARY MUST BE CHECKED IN AS WELL! */ #include #include "zlib.h" #include #include #include "archive.h" /* Convert unix-path to dos-path */ static void normpath(char *path) { while (path && *path) { if (*path == '/') *path = '\\'; ++path; } } BOOL ensure_directory(char *pathname, char *new_part, NOTIFYPROC notify) { while (new_part && *new_part && (new_part = strchr(new_part, '\\'))) { DWORD attr; *new_part = '\0'; attr = GetFileAttributes(pathname); if (attr == -1) { /* nothing found */ if (!CreateDirectory(pathname, NULL) && notify) notify(SYSTEM_ERROR, "CreateDirectory (%s)", pathname); else notify(DIR_CREATED, pathname); } if (attr & FILE_ATTRIBUTE_DIRECTORY) { ; } else { SetLastError(183); if (notify) notify(SYSTEM_ERROR, "CreateDirectory (%s)", pathname); } *new_part = '\\'; ++new_part; } return TRUE; } /* XXX Should better explicitely specify * uncomp_size and file_times instead of pfhdr! */ char *map_new_file(DWORD flags, char *filename, char *pathname_part, int size, WORD wFatDate, WORD wFatTime, NOTIFYPROC notify) { HANDLE hFile, hFileMapping; char *dst; FILETIME ft; try_again: if (!flags) flags = CREATE_NEW; hFile = CreateFile(filename, GENERIC_WRITE | GENERIC_READ, 0, NULL, flags, FILE_ATTRIBUTE_NORMAL, NULL); if (hFile == INVALID_HANDLE_VALUE) { DWORD x = GetLastError(); switch (x) { case ERROR_FILE_EXISTS: if (notify && notify(CAN_OVERWRITE, filename)) hFile = CreateFile(filename, GENERIC_WRITE|GENERIC_READ, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL); else { if (notify) notify(FILE_OVERWRITTEN, filename); return NULL; } break; case ERROR_PATH_NOT_FOUND: if (ensure_directory(filename, pathname_part, notify)) goto try_again; else return FALSE; break; default: SetLastError(x); break; } } if (hFile == INVALID_HANDLE_VALUE) { if (notify) notify (SYSTEM_ERROR, "CreateFile (%s)", filename); return NULL; } if (notify) notify(FILE_CREATED, filename); DosDateTimeToFileTime(wFatDate, wFatTime, &ft); SetFileTime(hFile, &ft, &ft, &ft); if (size == 0) { /* We cannot map a zero-length file (Also it makes no sense */ CloseHandle(hFile); return NULL; } hFileMapping = CreateFileMapping(hFile, NULL, PAGE_READWRITE, 0, size, NULL); CloseHandle(hFile); if (hFileMapping == INVALID_HANDLE_VALUE) { if (notify) notify(SYSTEM_ERROR, "CreateFileMapping (%s)", filename); return NULL; } dst = MapViewOfFile(hFileMapping, FILE_MAP_WRITE, 0, 0, 0); CloseHandle(hFileMapping); if (!dst) { if (notify) notify(SYSTEM_ERROR, "MapViewOfFile (%s)", filename); return NULL; } return dst; } BOOL extract_file(char *dst, char *src, int method, int comp_size, int uncomp_size, NOTIFYPROC notify) { z_stream zstream; int result; if (method == Z_DEFLATED) { int x; memset(&zstream, 0, sizeof(zstream)); zstream.next_in = src; zstream.avail_in = comp_size+1; zstream.next_out = dst; zstream.avail_out = uncomp_size; /* Apparently an undocumented feature of zlib: Set windowsize to negative values to supress the gzip header and be compatible with zip! */ result = TRUE; if (Z_OK != (x = inflateInit2(&zstream, -15))) { if (notify) notify(ZLIB_ERROR, "inflateInit2 returns %d", x); result = FALSE; goto cleanup; } if (Z_STREAM_END != (x = inflate(&zstream, Z_FINISH))) { if (notify) notify(ZLIB_ERROR, "inflate returns %d", x); result = FALSE; } cleanup: if (Z_OK != (x = inflateEnd(&zstream))) { if (notify) notify (ZLIB_ERROR, "inflateEnd returns %d", x); result = FALSE; } } else if (method == 0) { memcpy(dst, src, uncomp_size); result = TRUE; } else result = FALSE; UnmapViewOfFile(dst); return result; } /* Open a zip-compatible archive and extract all files * into the specified directory (which is assumed to exist) */ BOOL unzip_archive(SCHEME *scheme, char *dirname, char *data, DWORD size, NOTIFYPROC notify) { int n; char pathname[MAX_PATH]; char *new_part; /* read the end of central directory record */ struct eof_cdir *pe = (struct eof_cdir *)&data[size - sizeof (struct eof_cdir)]; int arc_start = size - sizeof (struct eof_cdir) - pe->nBytesCDir - pe->ofsCDir; /* set position to start of central directory */ int pos = arc_start + pe->ofsCDir; /* make sure this is a zip file */ if (pe->tag != 0x06054b50) return FALSE; /* Loop through the central directory, reading all entries */ for (n = 0; n < pe->nTotalCDir; ++n) { int i; char *fname; char *pcomp; char *dst; struct cdir *pcdir; struct fhdr *pfhdr; pcdir = (struct cdir *)&data[pos]; pfhdr = (struct fhdr *)&data[pcdir->ofs_local_header + arc_start]; if (pcdir->tag != 0x02014b50) return FALSE; if (pfhdr->tag != 0x04034b50) return FALSE; pos += sizeof(struct cdir); fname = (char *)&data[pos]; /* This is not null terminated! */ pos += pcdir->fname_length + pcdir->extra_length + pcdir->comment_length; pcomp = &data[pcdir->ofs_local_header + sizeof(struct fhdr) + arc_start + pfhdr->fname_length + pfhdr->extra_length]; /* dirname is the Python home directory (prefix) */ strcpy(pathname, dirname); if (pathname[strlen(pathname)-1] != '\\') strcat(pathname, "\\"); new_part = &pathname[lstrlen(pathname)]; /* we must now match the first part of the pathname * in the archive to a component in the installation * scheme (PURELIB, PLATLIB, HEADERS, SCRIPTS, or DATA) * and replace this part by the one in the scheme to use */ for (i = 0; scheme[i].name; ++i) { if (0 == strnicmp(scheme[i].name, fname, strlen(scheme[i].name))) { char *rest; int len; /* length of the replaced part */ int namelen = strlen(scheme[i].name); strcat(pathname, scheme[i].prefix); rest = fname + namelen; len = pfhdr->fname_length - namelen; if ((pathname[strlen(pathname)-1] != '\\') && (pathname[strlen(pathname)-1] != '/')) strcat(pathname, "\\"); /* Now that pathname ends with a separator, * we must make sure rest does not start with * an additional one. */ if ((rest[0] == '\\') || (rest[0] == '/')) { ++rest; --len; } strncat(pathname, rest, len); goto Done; } } /* no prefix to replace found, go unchanged */ strncat(pathname, fname, pfhdr->fname_length); Done: normpath(pathname); if (pathname[strlen(pathname)-1] != '\\') { /* * The local file header (pfhdr) does not always * contain the compressed and uncompressed sizes of * the data depending on bit 3 of the flags field. So * it seems better to use the data from the central * directory (pcdir). */ dst = map_new_file(0, pathname, new_part, pcdir->uncomp_size, pcdir->last_mod_file_date, pcdir->last_mod_file_time, notify); if (dst) { if (!extract_file(dst, pcomp, pfhdr->method, pcdir->comp_size, pcdir->uncomp_size, notify)) return FALSE; } /* else ??? */ } if (notify) notify(NUM_FILES, new_part, (int)pe->nTotalCDir, (int)n+1); } return TRUE; } Python-2.3.7/PC/bdist_wininst/resource.h0000644001241000117560000000320310075245357017440 0ustar loewishpifb6/* IMPORTANT NOTE: IF THIS FILE IS CHANGED, WININST.EXE MUST BE RECOMPILED WITH THE MSVC6 WININST.DSW WORKSPACE FILE MANUALLY. IF CHANGES TO THIS FILE ARE CHECKED INTO PYTHON CVS, THE RECOMPILED BINARY MUST BE CHECKED IN AS WELL! */ //{{NO_DEPENDENCIES}} // Microsoft Developer Studio generated include file. // Used by install.rc // #define IDD_DIALOG1 101 #define IDB_BITMAP1 103 #define IDD_INTRO 107 #define IDD_SELECTPYTHON 108 #define IDD_INSTALLFILES 109 #define IDD_FINISHED 110 #define IDB_BITMAP 110 #define IDC_EDIT1 1000 #define IDC_TITLE 1000 #define IDC_START 1001 #define IDC_PROGRESS 1003 #define IDC_INFO 1004 #define IDC_PYTHON15 1006 #define IDC_PATH 1007 #define IDC_PYTHON16 1008 #define IDC_INSTALL_PATH 1008 #define IDC_PYTHON20 1009 #define IDC_BROWSE 1010 #define IDC_INTRO_TEXT 1021 #define IDC_VERSIONS_LIST 1022 #define IDC_BUILD_INFO 1024 #define IDC_BITMAP 1025 #define IDC_OTHERPYTHON 1026 // Next default values for new objects // #ifdef APSTUDIO_INVOKED #ifndef APSTUDIO_READONLY_SYMBOLS #define _APS_NEXT_RESOURCE_VALUE 112 #define _APS_NEXT_COMMAND_VALUE 40001 #define _APS_NEXT_CONTROL_VALUE 1028 #define _APS_NEXT_SYMED_VALUE 101 #endif #endif Python-2.3.7/PC/bdist_wininst/archive.h0000644001241000117560000000402110075245357017231 0ustar loewishpifb6/* IMPORTANT NOTE: IF THIS FILE IS CHANGED, WININST.EXE MUST BE RECOMPILED WITH THE MSVC6 WININST.DSW WORKSPACE FILE MANUALLY. IF CHANGES TO THIS FILE ARE CHECKED INTO PYTHON CVS, THE RECOMPILED BINARY MUST BE CHECKED IN AS WELL! */ #pragma pack(1) /* zip-archive headers * See: http://www.pkware.com/appnote.html */ struct eof_cdir { long tag; /* must be 0x06054b50 */ short disknum; short firstdisk; short nTotalCDirThis; short nTotalCDir; long nBytesCDir; long ofsCDir; short commentlen; }; struct cdir { long tag; /* must be 0x02014b50 */ short version_made; short version_extract; short gp_bitflag; short comp_method; short last_mod_file_time; short last_mod_file_date; long crc32; long comp_size; long uncomp_size; short fname_length; short extra_length; short comment_length; short disknum_start; short int_file_attr; long ext_file_attr; long ofs_local_header; }; struct fhdr { long tag; /* must be 0x04034b50 */ short version_needed; short flags; short method; short last_mod_file_time; short last_mod_file_date; long crc32; long comp_size; long uncomp_size; short fname_length; short extra_length; }; struct meta_data_hdr { int tag; int uncomp_size; int bitmap_size; }; #pragma pack() /* installation scheme */ typedef struct tagSCHEME { char *name; char *prefix; } SCHEME; typedef int (*NOTIFYPROC)(int code, LPSTR text, ...); extern BOOL extract_file(char *dst, char *src, int method, int comp_size, int uncomp_size, NOTIFYPROC notify); extern BOOL unzip_archive(SCHEME *scheme, char *dirname, char *data, DWORD size, NOTIFYPROC notify); extern char * map_new_file(DWORD flags, char *filename, char *pathname_part, int size, WORD wFatDate, WORD wFatTime, NOTIFYPROC callback); extern BOOL ensure_directory (char *pathname, char *new_part, NOTIFYPROC callback); /* codes for NOITIFYPROC */ #define DIR_CREATED 1 #define CAN_OVERWRITE 2 #define FILE_CREATED 3 #define ZLIB_ERROR 4 #define SYSTEM_ERROR 5 #define NUM_FILES 6 #define FILE_OVERWRITTEN 7 Python-2.3.7/PC/bdist_wininst/install.c0000644001241000117560000015717610175530070017263 0ustar loewishpifb6/* IMPORTANT NOTE: IF THIS FILE IS CHANGED, WININST.EXE MUST BE RECOMPILED WITH THE MSVC6 WININST.DSW WORKSPACE FILE MANUALLY. IF CHANGES TO THIS FILE ARE CHECKED INTO PYTHON CVS, THE RECOMPILED BINARY MUST BE CHECKED IN AS WELL! */ /* * Written by Thomas Heller, May 2000 * * $Id: install.c 38380 2005-01-25 20:46:48Z theller $ */ /* * Windows Installer program for distutils. * * (a kind of self-extracting zip-file) * * At runtime, the exefile has appended: * - compressed setup-data in ini-format, containing the following sections: * [metadata] * author=Greg Ward * author_email=gward@python.net * description=Python Distribution Utilities * licence=Python * name=Distutils * url=http://www.python.org/sigs/distutils-sig/ * version=0.9pre * * [Setup] * info= text to be displayed in the edit-box * title= to be displayed by this program * target_version = if present, python version required * pyc_compile = if 0, do not compile py to pyc * pyo_compile = if 0, do not compile py to pyo * * - a struct meta_data_hdr, describing the above * - a zip-file, containing the modules to be installed. * for the format see http://www.pkware.com/appnote.html * * What does this program do? * - the setup-data is uncompressed and written to a temporary file. * - setup-data is queried with GetPrivateProfile... calls * - [metadata] - info is displayed in the dialog box * - The registry is searched for installations of python * - The user can select the python version to use. * - The python-installation directory (sys.prefix) is displayed * - When the start-button is pressed, files from the zip-archive * are extracted to the file system. All .py filenames are stored * in a list. */ /* * Includes now an uninstaller. */ /* * To Do: * * display some explanation when no python version is found * instead showing the user an empty listbox to select something from. * * Finish the code so that we can use other python installations * additionaly to those found in the registry, * and then #define USE_OTHER_PYTHON_VERSIONS * * - install a help-button, which will display something meaningful * to the poor user. * text to the user * - should there be a possibility to display a README file * before starting the installation (if one is present in the archive) * - more comments about what the code does(?) * * - evolve this into a full blown installer (???) */ #include #include #include #include #include #include #include "resource.h" #include #include #include #include #include #include #include #include #include #include #include "archive.h" /* Only for debugging! static int dprintf(char *fmt, ...) { char Buffer[4096]; va_list marker; int result; va_start(marker, fmt); result = wvsprintf(Buffer, fmt, marker); OutputDebugString(Buffer); return result; } */ /* Bah: global variables */ FILE *logfile; char modulename[MAX_PATH]; HWND hwndMain; HWND hDialog; char *ini_file; /* Full pathname of ini-file */ /* From ini-file */ char info[4096]; /* [Setup] info= */ char title[80]; /* [Setup] title=, contains package name including version: "Distutils-1.0.1" */ char target_version[10]; /* [Setup] target_version=, required python version or empty string */ char build_info[80]; /* [Setup] build_info=, distutils version and build date */ char meta_name[80]; /* package name without version like 'Distutils' */ char install_script[MAX_PATH]; int py_major, py_minor; /* Python version selected for installation */ char *arc_data; /* memory mapped archive */ DWORD arc_size; /* number of bytes in archive */ int exe_size; /* number of bytes for exe-file portion */ char python_dir[MAX_PATH]; char pythondll[MAX_PATH]; BOOL pyc_compile, pyo_compile; BOOL success; /* Installation successfull? */ HANDLE hBitmap; char *bitmap_bytes; #define WM_NUMFILES WM_USER+1 /* wParam: 0, lParam: total number of files */ #define WM_NEXTFILE WM_USER+2 /* wParam: number of this file */ /* lParam: points to pathname */ static BOOL notify(int code, char *fmt, ...); /* Note: If scheme.prefix is nonempty, it must end with a '\'! */ /* Note: purelib must be the FIRST entry! */ SCHEME old_scheme[] = { { "PURELIB", "" }, { "PLATLIB", "" }, { "HEADERS", "" }, /* 'Include/dist_name' part already in archive */ { "SCRIPTS", "Scripts\\" }, { "DATA", "" }, { NULL, NULL }, }; SCHEME new_scheme[] = { { "PURELIB", "Lib\\site-packages\\" }, { "PLATLIB", "Lib\\site-packages\\" }, { "HEADERS", "" }, /* 'Include/dist_name' part already in archive */ { "SCRIPTS", "Scripts\\" }, { "DATA", "" }, { NULL, NULL }, }; static void unescape(char *dst, char *src, unsigned size) { char *eon; char ch; while (src && *src && (size > 2)) { if (*src == '\\') { switch (*++src) { case 'n': ++src; *dst++ = '\r'; *dst++ = '\n'; size -= 2; break; case 'r': ++src; *dst++ = '\r'; --size; break; case '0': case '1': case '2': case '3': ch = (char)strtol(src, &eon, 8); if (ch == '\n') { *dst++ = '\r'; --size; } *dst++ = ch; --size; src = eon; } } else { *dst++ = *src++; --size; } } *dst = '\0'; } static struct tagFile { char *path; struct tagFile *next; } *file_list = NULL; static void add_to_filelist(char *path) { struct tagFile *p; p = (struct tagFile *)malloc(sizeof(struct tagFile)); p->path = strdup(path); p->next = file_list; file_list = p; } static int do_compile_files(int (__cdecl * PyRun_SimpleString)(char *), int optimize) { struct tagFile *p; int total, n; char Buffer[MAX_PATH + 64]; int errors = 0; total = 0; p = file_list; while (p) { ++total; p = p->next; } SendDlgItemMessage(hDialog, IDC_PROGRESS, PBM_SETRANGE, 0, MAKELPARAM(0, total)); SendDlgItemMessage(hDialog, IDC_PROGRESS, PBM_SETPOS, 0, 0); n = 0; p = file_list; while (p) { ++n; wsprintf(Buffer, "import py_compile; py_compile.compile (r'%s')", p->path); if (PyRun_SimpleString(Buffer)) { ++errors; } /* We send the notification even if the files could not * be created so that the uninstaller will remove them * in case they are created later. */ wsprintf(Buffer, "%s%c", p->path, optimize ? 'o' : 'c'); notify(FILE_CREATED, Buffer); SendDlgItemMessage(hDialog, IDC_PROGRESS, PBM_SETPOS, n, 0); SetDlgItemText(hDialog, IDC_INFO, p->path); p = p->next; } return errors; } #define DECLPROC(dll, result, name, args)\ typedef result (*__PROC__##name) args;\ result (*name)args = (__PROC__##name)GetProcAddress(dll, #name) #define DECLVAR(dll, type, name)\ type *name = (type*)GetProcAddress(dll, #name) typedef void PyObject; /* * Returns number of files which failed to compile, * -1 if python could not be loaded at all */ static int compile_filelist(HINSTANCE hPython, BOOL optimize_flag) { DECLPROC(hPython, void, Py_Initialize, (void)); DECLPROC(hPython, void, Py_SetProgramName, (char *)); DECLPROC(hPython, void, Py_Finalize, (void)); DECLPROC(hPython, int, PyRun_SimpleString, (char *)); DECLPROC(hPython, PyObject *, PySys_GetObject, (char *)); DECLVAR(hPython, int, Py_OptimizeFlag); int errors = 0; struct tagFile *p = file_list; if (!p) return 0; if (!Py_Initialize || !Py_SetProgramName || !Py_Finalize) return -1; if (!PyRun_SimpleString || !PySys_GetObject || !Py_OptimizeFlag) return -1; *Py_OptimizeFlag = optimize_flag ? 1 : 0; Py_SetProgramName(modulename); Py_Initialize(); errors += do_compile_files(PyRun_SimpleString, optimize_flag); Py_Finalize(); return errors; } typedef PyObject *(*PyCFunction)(PyObject *, PyObject *); struct PyMethodDef { char *ml_name; PyCFunction ml_meth; int ml_flags; char *ml_doc; }; typedef struct PyMethodDef PyMethodDef; void *(*g_Py_BuildValue)(char *, ...); int (*g_PyArg_ParseTuple)(PyObject *, char *, ...); PyObject *g_PyExc_ValueError; PyObject *g_PyExc_OSError; PyObject *(*g_PyErr_Format)(PyObject *, char *, ...); #define DEF_CSIDL(name) { name, #name } struct { int nFolder; char *name; } csidl_names[] = { /* Startup menu for all users. NT only */ DEF_CSIDL(CSIDL_COMMON_STARTMENU), /* Startup menu. */ DEF_CSIDL(CSIDL_STARTMENU), /* DEF_CSIDL(CSIDL_COMMON_APPDATA), */ /* DEF_CSIDL(CSIDL_LOCAL_APPDATA), */ /* Repository for application-specific data. Needs Internet Explorer 4.0 */ DEF_CSIDL(CSIDL_APPDATA), /* The desktop for all users. NT only */ DEF_CSIDL(CSIDL_COMMON_DESKTOPDIRECTORY), /* The desktop. */ DEF_CSIDL(CSIDL_DESKTOPDIRECTORY), /* Startup folder for all users. NT only */ DEF_CSIDL(CSIDL_COMMON_STARTUP), /* Startup folder. */ DEF_CSIDL(CSIDL_STARTUP), /* Programs item in the start menu for all users. NT only */ DEF_CSIDL(CSIDL_COMMON_PROGRAMS), /* Program item in the user's start menu. */ DEF_CSIDL(CSIDL_PROGRAMS), /* DEF_CSIDL(CSIDL_PROGRAM_FILES_COMMON), */ /* DEF_CSIDL(CSIDL_PROGRAM_FILES), */ /* Virtual folder containing fonts. */ DEF_CSIDL(CSIDL_FONTS), }; #define DIM(a) (sizeof(a) / sizeof((a)[0])) static PyObject *FileCreated(PyObject *self, PyObject *args) { char *path; if (!g_PyArg_ParseTuple(args, "s", &path)) return NULL; notify(FILE_CREATED, path); return g_Py_BuildValue(""); } static PyObject *DirectoryCreated(PyObject *self, PyObject *args) { char *path; if (!g_PyArg_ParseTuple(args, "s", &path)) return NULL; notify(DIR_CREATED, path); return g_Py_BuildValue(""); } static PyObject *GetSpecialFolderPath(PyObject *self, PyObject *args) { char *name; char lpszPath[MAX_PATH]; int i; static HRESULT (WINAPI *My_SHGetSpecialFolderPath)(HWND hwnd, LPTSTR lpszPath, int nFolder, BOOL fCreate); if (!My_SHGetSpecialFolderPath) { HINSTANCE hLib = LoadLibrary("shell32.dll"); if (!hLib) { g_PyErr_Format(g_PyExc_OSError, "function not available"); return NULL; } My_SHGetSpecialFolderPath = (BOOL (WINAPI *)(HWND, LPTSTR, int, BOOL)) GetProcAddress(hLib, "SHGetSpecialFolderPathA"); } if (!g_PyArg_ParseTuple(args, "s", &name)) return NULL; if (!My_SHGetSpecialFolderPath) { g_PyErr_Format(g_PyExc_OSError, "function not available"); return NULL; } for (i = 0; i < DIM(csidl_names); ++i) { if (0 == strcmpi(csidl_names[i].name, name)) { int nFolder; nFolder = csidl_names[i].nFolder; if (My_SHGetSpecialFolderPath(NULL, lpszPath, nFolder, 0)) return g_Py_BuildValue("s", lpszPath); else { g_PyErr_Format(g_PyExc_OSError, "no such folder (%s)", name); return NULL; } } }; g_PyErr_Format(g_PyExc_ValueError, "unknown CSIDL (%s)", name); return NULL; } static PyObject *CreateShortcut(PyObject *self, PyObject *args) { char *path; /* path and filename */ char *description; char *filename; char *arguments = NULL; char *iconpath = NULL; int iconindex = 0; char *workdir = NULL; WCHAR wszFilename[MAX_PATH]; IShellLink *ps1 = NULL; IPersistFile *pPf = NULL; HRESULT hr; hr = CoInitialize(NULL); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "CoInitialize failed, error 0x%x", hr); goto error; } if (!g_PyArg_ParseTuple(args, "sss|sssi", &path, &description, &filename, &arguments, &workdir, &iconpath, &iconindex)) return NULL; hr = CoCreateInstance(&CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, &IID_IShellLink, &ps1); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "CoCreateInstance failed, error 0x%x", hr); goto error; } hr = ps1->lpVtbl->QueryInterface(ps1, &IID_IPersistFile, (void **)&pPf); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "QueryInterface(IPersistFile) error 0x%x", hr); goto error; } hr = ps1->lpVtbl->SetPath(ps1, path); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "SetPath() failed, error 0x%x", hr); goto error; } hr = ps1->lpVtbl->SetDescription(ps1, description); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "SetDescription() failed, error 0x%x", hr); goto error; } if (arguments) { hr = ps1->lpVtbl->SetArguments(ps1, arguments); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "SetArguments() error 0x%x", hr); goto error; } } if (iconpath) { hr = ps1->lpVtbl->SetIconLocation(ps1, iconpath, iconindex); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "SetIconLocation() error 0x%x", hr); goto error; } } if (workdir) { hr = ps1->lpVtbl->SetWorkingDirectory(ps1, workdir); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "SetWorkingDirectory() error 0x%x", hr); goto error; } } MultiByteToWideChar(CP_ACP, 0, filename, -1, wszFilename, MAX_PATH); hr = pPf->lpVtbl->Save(pPf, wszFilename, TRUE); if (FAILED(hr)) { g_PyErr_Format(g_PyExc_OSError, "Save() failed, error 0x%x", hr); goto error; } pPf->lpVtbl->Release(pPf); ps1->lpVtbl->Release(ps1); CoUninitialize(); return g_Py_BuildValue(""); error: if (pPf) pPf->lpVtbl->Release(pPf); if (ps1) ps1->lpVtbl->Release(ps1); CoUninitialize(); return NULL; } #define METH_VARARGS 0x0001 PyMethodDef meth[] = { {"create_shortcut", CreateShortcut, METH_VARARGS, NULL}, {"get_special_folder_path", GetSpecialFolderPath, METH_VARARGS, NULL}, {"file_created", FileCreated, METH_VARARGS, NULL}, {"directory_created", DirectoryCreated, METH_VARARGS, NULL}, }; /* * This function returns one of the following error codes: * 1 if the Python-dll does not export the functions we need * 2 if no install-script is specified in pathname * 3 if the install-script file could not be opened * the return value of PyRun_SimpleString() otherwise, * which is 0 if everything is ok, -1 if an exception had occurred * in the install-script. */ static int run_installscript(HINSTANCE hPython, char *pathname, int argc, char **argv) { DECLPROC(hPython, void, Py_Initialize, (void)); DECLPROC(hPython, int, PySys_SetArgv, (int, char **)); DECLPROC(hPython, int, PyRun_SimpleString, (char *)); DECLPROC(hPython, void, Py_Finalize, (void)); DECLPROC(hPython, PyObject *, PyImport_ImportModule, (char *)); DECLPROC(hPython, int, PyObject_SetAttrString, (PyObject *, char *, PyObject *)); DECLPROC(hPython, PyObject *, PyObject_GetAttrString, (PyObject *, char *)); DECLPROC(hPython, PyObject *, Py_BuildValue, (char *, ...)); DECLPROC(hPython, PyObject *, PyCFunction_New, (PyMethodDef *, PyObject *)); DECLPROC(hPython, int, PyArg_ParseTuple, (PyObject *, char *, ...)); DECLPROC(hPython, PyObject *, PyErr_Format, (PyObject *, char *)); PyObject *mod; int result = 0; int fh; if (!Py_Initialize || !PySys_SetArgv || !PyRun_SimpleString || !Py_Finalize) return 1; if (!PyImport_ImportModule || !PyObject_SetAttrString || !Py_BuildValue) return 1; if (!PyCFunction_New || !PyArg_ParseTuple || !PyErr_Format) return 1; if (!PyObject_GetAttrString) return 1; g_Py_BuildValue = Py_BuildValue; g_PyArg_ParseTuple = PyArg_ParseTuple; g_PyErr_Format = PyErr_Format; if (pathname == NULL || pathname[0] == '\0') return 2; fh = open(pathname, _O_RDONLY); if (-1 == fh) { fprintf(stderr, "Could not open postinstall-script %s\n", pathname); return 3; } SetDlgItemText(hDialog, IDC_INFO, "Running Script..."); Py_Initialize(); mod = PyImport_ImportModule("__builtin__"); if (mod) { int i; g_PyExc_ValueError = PyObject_GetAttrString(mod, "ValueError"); g_PyExc_OSError = PyObject_GetAttrString(mod, "OSError"); for (i = 0; i < DIM(meth); ++i) { PyObject_SetAttrString(mod, meth[i].ml_name, PyCFunction_New(&meth[i], NULL)); } } PySys_SetArgv(argc, argv); result = 3; { struct _stat statbuf; if(0 == _fstat(fh, &statbuf)) { char *script = alloca(statbuf.st_size + 5); int n = read(fh, script, statbuf.st_size); if (n > 0) { script[n] = '\n'; script[n+1] = 0; result = PyRun_SimpleString(script); } } } Py_Finalize(); close(fh); return result; } static BOOL SystemError(int error, char *msg) { char Buffer[1024]; int n; if (error) { LPVOID lpMsgBuf; FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM, NULL, error, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPSTR)&lpMsgBuf, 0, NULL ); strncpy(Buffer, lpMsgBuf, sizeof(Buffer)); LocalFree(lpMsgBuf); } else Buffer[0] = '\0'; n = lstrlen(Buffer); _snprintf(Buffer+n, sizeof(Buffer)-n, msg); MessageBox(hwndMain, Buffer, "Runtime Error", MB_OK | MB_ICONSTOP); return FALSE; } static BOOL notify (int code, char *fmt, ...) { char Buffer[1024]; va_list marker; BOOL result = TRUE; int a, b; char *cp; va_start(marker, fmt); _vsnprintf(Buffer, sizeof(Buffer), fmt, marker); switch (code) { /* Questions */ case CAN_OVERWRITE: break; /* Information notification */ case DIR_CREATED: if (logfile) fprintf(logfile, "100 Made Dir: %s\n", fmt); break; case FILE_CREATED: if (logfile) fprintf(logfile, "200 File Copy: %s\n", fmt); goto add_to_filelist_label; break; case FILE_OVERWRITTEN: if (logfile) fprintf(logfile, "200 File Overwrite: %s\n", fmt); add_to_filelist_label: if ((cp = strrchr(fmt, '.')) && (0 == strcmp (cp, ".py"))) add_to_filelist(fmt); break; /* Error Messages */ case ZLIB_ERROR: MessageBox(GetFocus(), Buffer, "Error", MB_OK | MB_ICONWARNING); break; case SYSTEM_ERROR: SystemError(GetLastError(), Buffer); break; case NUM_FILES: a = va_arg(marker, int); b = va_arg(marker, int); SendMessage(hDialog, WM_NUMFILES, 0, MAKELPARAM(0, a)); SendMessage(hDialog, WM_NEXTFILE, b,(LPARAM)fmt); } va_end(marker); return result; } static char *MapExistingFile(char *pathname, DWORD *psize) { HANDLE hFile, hFileMapping; DWORD nSizeLow, nSizeHigh; char *data; hFile = CreateFile(pathname, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); if (hFile == INVALID_HANDLE_VALUE) return NULL; nSizeLow = GetFileSize(hFile, &nSizeHigh); hFileMapping = CreateFileMapping(hFile, NULL, PAGE_READONLY, 0, 0, NULL); CloseHandle(hFile); if (hFileMapping == INVALID_HANDLE_VALUE) return NULL; data = MapViewOfFile(hFileMapping, FILE_MAP_READ, 0, 0, 0); CloseHandle(hFileMapping); *psize = nSizeLow; return data; } static void create_bitmap(HWND hwnd) { BITMAPFILEHEADER *bfh; BITMAPINFO *bi; HDC hdc; if (!bitmap_bytes) return; if (hBitmap) return; hdc = GetDC(hwnd); bfh = (BITMAPFILEHEADER *)bitmap_bytes; bi = (BITMAPINFO *)(bitmap_bytes + sizeof(BITMAPFILEHEADER)); hBitmap = CreateDIBitmap(hdc, &bi->bmiHeader, CBM_INIT, bitmap_bytes + bfh->bfOffBits, bi, DIB_RGB_COLORS); ReleaseDC(hwnd, hdc); } static char *ExtractIniFile(char *data, DWORD size, int *pexe_size) { /* read the end of central directory record */ struct eof_cdir *pe = (struct eof_cdir *)&data[size - sizeof (struct eof_cdir)]; int arc_start = size - sizeof (struct eof_cdir) - pe->nBytesCDir - pe->ofsCDir; int ofs = arc_start - sizeof (struct meta_data_hdr); /* read meta_data info */ struct meta_data_hdr *pmd = (struct meta_data_hdr *)&data[ofs]; char *src, *dst; char *ini_file; char tempdir[MAX_PATH]; if (pe->tag != 0x06054b50) { return NULL; } if (pmd->tag != 0x1234567A || ofs < 0) { return NULL; } if (pmd->bitmap_size) { /* Store pointer to bitmap bytes */ bitmap_bytes = (char *)pmd - pmd->uncomp_size - pmd->bitmap_size; } *pexe_size = ofs - pmd->uncomp_size - pmd->bitmap_size; src = ((char *)pmd) - pmd->uncomp_size; ini_file = malloc(MAX_PATH); /* will be returned, so do not free it */ if (!ini_file) return NULL; if (!GetTempPath(sizeof(tempdir), tempdir) || !GetTempFileName(tempdir, "~du", 0, ini_file)) { SystemError(GetLastError(), "Could not create temporary file"); return NULL; } dst = map_new_file(CREATE_ALWAYS, ini_file, NULL, pmd->uncomp_size, 0, 0, NULL/*notify*/); if (!dst) return NULL; memcpy(dst, src, pmd->uncomp_size); UnmapViewOfFile(dst); return ini_file; } static void PumpMessages(void) { MSG msg; while (PeekMessage(&msg, NULL, 0, 0, PM_REMOVE)) { TranslateMessage(&msg); DispatchMessage(&msg); } } LRESULT CALLBACK WindowProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { HDC hdc; HFONT hFont; int h; PAINTSTRUCT ps; switch (msg) { case WM_PAINT: hdc = BeginPaint(hwnd, &ps); h = GetSystemMetrics(SM_CYSCREEN) / 10; hFont = CreateFont(h, 0, 0, 0, 700, TRUE, 0, 0, 0, 0, 0, 0, 0, "Times Roman"); hFont = SelectObject(hdc, hFont); SetBkMode(hdc, TRANSPARENT); TextOut(hdc, 15, 15, title, strlen(title)); SetTextColor(hdc, RGB(255, 255, 255)); TextOut(hdc, 10, 10, title, strlen(title)); DeleteObject(SelectObject(hdc, hFont)); EndPaint(hwnd, &ps); return 0; } return DefWindowProc(hwnd, msg, wParam, lParam); } static HWND CreateBackground(char *title) { WNDCLASS wc; HWND hwnd; char buffer[4096]; wc.style = CS_VREDRAW | CS_HREDRAW; wc.lpfnWndProc = WindowProc; wc.cbWndExtra = 0; wc.cbClsExtra = 0; wc.hInstance = GetModuleHandle(NULL); wc.hIcon = NULL; wc.hCursor = LoadCursor(NULL, IDC_ARROW); wc.hbrBackground = CreateSolidBrush(RGB(0, 0, 128)); wc.lpszMenuName = NULL; wc.lpszClassName = "SetupWindowClass"; if (!RegisterClass(&wc)) MessageBox(hwndMain, "Could not register window class", "Setup.exe", MB_OK); wsprintf(buffer, "Setup %s", title); hwnd = CreateWindow("SetupWindowClass", buffer, 0, 0, 0, GetSystemMetrics(SM_CXFULLSCREEN), GetSystemMetrics(SM_CYFULLSCREEN), NULL, NULL, GetModuleHandle(NULL), NULL); ShowWindow(hwnd, SW_SHOWMAXIMIZED); UpdateWindow(hwnd); return hwnd; } /* * Center a window on the screen */ static void CenterWindow(HWND hwnd) { RECT rc; int w, h; GetWindowRect(hwnd, &rc); w = GetSystemMetrics(SM_CXSCREEN); h = GetSystemMetrics(SM_CYSCREEN); MoveWindow(hwnd, (w - (rc.right-rc.left))/2, (h - (rc.bottom-rc.top))/2, rc.right-rc.left, rc.bottom-rc.top, FALSE); } #include BOOL CALLBACK IntroDlgProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { LPNMHDR lpnm; char Buffer[4096]; switch (msg) { case WM_INITDIALOG: create_bitmap(hwnd); if(hBitmap) SendDlgItemMessage(hwnd, IDC_BITMAP, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)hBitmap); CenterWindow(GetParent(hwnd)); wsprintf(Buffer, "This Wizard will install %s on your computer. " "Click Next to continue " "or Cancel to exit the Setup Wizard.", meta_name); SetDlgItemText(hwnd, IDC_TITLE, Buffer); SetDlgItemText(hwnd, IDC_INTRO_TEXT, info); SetDlgItemText(hwnd, IDC_BUILD_INFO, build_info); return FALSE; case WM_NOTIFY: lpnm = (LPNMHDR) lParam; switch (lpnm->code) { case PSN_SETACTIVE: PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_NEXT); break; case PSN_WIZNEXT: break; case PSN_RESET: break; default: break; } } return FALSE; } #ifdef USE_OTHER_PYTHON_VERSIONS /* These are really private variables used to communicate * between StatusRoutine and CheckPythonExe */ char bound_image_dll[_MAX_PATH]; int bound_image_major; int bound_image_minor; static BOOL __stdcall StatusRoutine(IMAGEHLP_STATUS_REASON reason, PSTR ImageName, PSTR DllName, ULONG Va, ULONG Parameter) { char fname[_MAX_PATH]; int int_version; switch(reason) { case BindOutOfMemory: case BindRvaToVaFailed: case BindNoRoomInImage: case BindImportProcedureFailed: break; case BindImportProcedure: case BindForwarder: case BindForwarderNOT: case BindImageModified: case BindExpandFileHeaders: case BindImageComplete: case BindSymbolsNotUpdated: case BindMismatchedSymbols: case BindImportModuleFailed: break; case BindImportModule: if (1 == sscanf(DllName, "python%d", &int_version)) { SearchPath(NULL, DllName, NULL, sizeof(fname), fname, NULL); strcpy(bound_image_dll, fname); bound_image_major = int_version / 10; bound_image_minor = int_version % 10; OutputDebugString("BOUND "); OutputDebugString(fname); OutputDebugString("\n"); } break; } return TRUE; } /* */ static LPSTR get_sys_prefix(LPSTR exe, LPSTR dll) { void (__cdecl * Py_Initialize)(void); void (__cdecl * Py_SetProgramName)(char *); void (__cdecl * Py_Finalize)(void); void* (__cdecl * PySys_GetObject)(char *); void (__cdecl * PySys_SetArgv)(int, char **); char* (__cdecl * Py_GetPrefix)(void); char* (__cdecl * Py_GetPath)(void); HINSTANCE hPython; LPSTR prefix = NULL; int (__cdecl * PyRun_SimpleString)(char *); { char Buffer[256]; wsprintf(Buffer, "PYTHONHOME=%s", exe); *strrchr(Buffer, '\\') = '\0'; // MessageBox(GetFocus(), Buffer, "PYTHONHOME", MB_OK); _putenv(Buffer); _putenv("PYTHONPATH="); } hPython = LoadLibrary(dll); if (!hPython) return NULL; Py_Initialize = (void (*)(void))GetProcAddress (hPython,"Py_Initialize"); PySys_SetArgv = (void (*)(int, char **))GetProcAddress (hPython,"PySys_SetArgv"); PyRun_SimpleString = (int (*)(char *))GetProcAddress (hPython,"PyRun_SimpleString"); Py_SetProgramName = (void (*)(char *))GetProcAddress (hPython,"Py_SetProgramName"); PySys_GetObject = (void* (*)(char *))GetProcAddress (hPython,"PySys_GetObject"); Py_GetPrefix = (char * (*)(void))GetProcAddress (hPython,"Py_GetPrefix"); Py_GetPath = (char * (*)(void))GetProcAddress (hPython,"Py_GetPath"); Py_Finalize = (void (*)(void))GetProcAddress(hPython, "Py_Finalize"); Py_SetProgramName(exe); Py_Initialize(); PySys_SetArgv(1, &exe); MessageBox(GetFocus(), Py_GetPrefix(), "PREFIX", MB_OK); MessageBox(GetFocus(), Py_GetPath(), "PATH", MB_OK); Py_Finalize(); FreeLibrary(hPython); return prefix; } static BOOL CheckPythonExe(LPSTR pathname, LPSTR version, int *pmajor, int *pminor) { bound_image_dll[0] = '\0'; if (!BindImageEx(BIND_NO_BOUND_IMPORTS | BIND_NO_UPDATE | BIND_ALL_IMAGES, pathname, NULL, NULL, StatusRoutine)) return SystemError(0, "Could not bind image"); if (bound_image_dll[0] == '\0') return SystemError(0, "Does not seem to be a python executable"); *pmajor = bound_image_major; *pminor = bound_image_minor; if (version && *version) { char core_version[12]; wsprintf(core_version, "%d.%d", bound_image_major, bound_image_minor); if (strcmp(version, core_version)) return SystemError(0, "Wrong Python version"); } get_sys_prefix(pathname, bound_image_dll); return TRUE; } /* * Browse for other python versions. Insert it into the listbox specified * by hwnd. version, if not NULL or empty, is the version required. */ static BOOL GetOtherPythonVersion(HWND hwnd, LPSTR version) { char vers_name[_MAX_PATH + 80]; DWORD itemindex; OPENFILENAME of; char pathname[_MAX_PATH]; DWORD result; strcpy(pathname, "python.exe"); memset(&of, 0, sizeof(of)); of.lStructSize = sizeof(OPENFILENAME); of.hwndOwner = GetParent(hwnd); of.hInstance = NULL; of.lpstrFilter = "python.exe\0python.exe\0"; of.lpstrCustomFilter = NULL; of.nMaxCustFilter = 0; of.nFilterIndex = 1; of.lpstrFile = pathname; of.nMaxFile = sizeof(pathname); of.lpstrFileTitle = NULL; of.nMaxFileTitle = 0; of.lpstrInitialDir = NULL; of.lpstrTitle = "Python executable"; of.Flags = OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST; of.lpstrDefExt = "exe"; result = GetOpenFileName(&of); if (result) { int major, minor; if (!CheckPythonExe(pathname, version, &major, &minor)) { return FALSE; } *strrchr(pathname, '\\') = '\0'; wsprintf(vers_name, "Python Version %d.%d in %s", major, minor, pathname); itemindex = SendMessage(hwnd, LB_INSERTSTRING, -1, (LPARAM)(LPSTR)vers_name); SendMessage(hwnd, LB_SETCURSEL, itemindex, 0); SendMessage(hwnd, LB_SETITEMDATA, itemindex, (LPARAM)(LPSTR)strdup(pathname)); return TRUE; } return FALSE; } #endif /* USE_OTHER_PYTHON_VERSIONS */ /* * Fill the listbox specified by hwnd with all python versions found * in the registry. version, if not NULL or empty, is the version * required. */ static BOOL GetPythonVersions(HWND hwnd, HKEY hkRoot, LPSTR version) { DWORD index = 0; char core_version[80]; HKEY hKey; BOOL result = TRUE; DWORD bufsize; if (ERROR_SUCCESS != RegOpenKeyEx(hkRoot, "Software\\Python\\PythonCore", 0, KEY_READ, &hKey)) return FALSE; bufsize = sizeof(core_version); while (ERROR_SUCCESS == RegEnumKeyEx(hKey, index, core_version, &bufsize, NULL, NULL, NULL, NULL)) { char subkey_name[80], vers_name[80], prefix_buf[MAX_PATH+1]; int itemindex; DWORD value_size; HKEY hk; bufsize = sizeof(core_version); ++index; if (version && *version && strcmp(version, core_version)) continue; wsprintf(vers_name, "Python Version %s (found in registry)", core_version); wsprintf(subkey_name, "Software\\Python\\PythonCore\\%s\\InstallPath", core_version); value_size = sizeof(subkey_name); if (ERROR_SUCCESS == RegOpenKeyEx(hkRoot, subkey_name, 0, KEY_READ, &hk)) { if (ERROR_SUCCESS == RegQueryValueEx(hk, NULL, NULL, NULL, prefix_buf, &value_size)) { itemindex = SendMessage(hwnd, LB_ADDSTRING, 0, (LPARAM)(LPSTR)vers_name); SendMessage(hwnd, LB_SETITEMDATA, itemindex, (LPARAM)(LPSTR)strdup(prefix_buf)); } RegCloseKey(hk); } } RegCloseKey(hKey); return result; } /* Return the installation scheme depending on Python version number */ SCHEME *GetScheme(int major, int minor) { if (major > 2) return new_scheme; else if((major == 2) && (minor >= 2)) return new_scheme; return old_scheme; } BOOL CALLBACK SelectPythonDlgProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { LPNMHDR lpnm; switch (msg) { case WM_INITDIALOG: if (hBitmap) SendDlgItemMessage(hwnd, IDC_BITMAP, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)hBitmap); GetPythonVersions(GetDlgItem(hwnd, IDC_VERSIONS_LIST), HKEY_LOCAL_MACHINE, target_version); GetPythonVersions(GetDlgItem(hwnd, IDC_VERSIONS_LIST), HKEY_CURRENT_USER, target_version); { /* select the last entry which is the highest python version found */ int count; count = SendDlgItemMessage(hwnd, IDC_VERSIONS_LIST, LB_GETCOUNT, 0, 0); if (count && count != LB_ERR) SendDlgItemMessage(hwnd, IDC_VERSIONS_LIST, LB_SETCURSEL, count-1, 0); /* If a specific Python version is required, * display a prominent notice showing this fact. */ if (target_version && target_version[0]) { char buffer[4096]; wsprintf(buffer, "Python %s is required for this package. " "Select installation to use:", target_version); SetDlgItemText(hwnd, IDC_TITLE, buffer); } if (count == 0) { char Buffer[4096]; char *msg; if (target_version && target_version[0]) { wsprintf(Buffer, "Python version %s required, which was not found" " in the registry.", target_version); msg = Buffer; } else msg = "No Python installation found in the registry."; MessageBox(hwnd, msg, "Cannot install", MB_OK | MB_ICONSTOP); } } goto UpdateInstallDir; break; case WM_COMMAND: switch (LOWORD(wParam)) { /* case IDC_OTHERPYTHON: if (GetOtherPythonVersion(GetDlgItem(hwnd, IDC_VERSIONS_LIST), target_version)) goto UpdateInstallDir; break; */ case IDC_VERSIONS_LIST: switch (HIWORD(wParam)) { int id; char *cp; case LBN_SELCHANGE: UpdateInstallDir: PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_BACK | PSWIZB_NEXT); id = SendDlgItemMessage(hwnd, IDC_VERSIONS_LIST, LB_GETCURSEL, 0, 0); if (id == LB_ERR) { PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_BACK); SetDlgItemText(hwnd, IDC_PATH, ""); SetDlgItemText(hwnd, IDC_INSTALL_PATH, ""); strcpy(python_dir, ""); strcpy(pythondll, ""); } else { char *pbuf; int result; PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_BACK | PSWIZB_NEXT); /* Get the python directory */ cp = (LPSTR)SendDlgItemMessage(hwnd, IDC_VERSIONS_LIST, LB_GETITEMDATA, id, 0); strcpy(python_dir, cp); SetDlgItemText(hwnd, IDC_PATH, python_dir); /* retrieve the python version and pythondll to use */ result = SendDlgItemMessage(hwnd, IDC_VERSIONS_LIST, LB_GETTEXTLEN, (WPARAM)id, 0); pbuf = (char *)malloc(result + 1); if (pbuf) { /* guess the name of the python-dll */ SendDlgItemMessage(hwnd, IDC_VERSIONS_LIST, LB_GETTEXT, (WPARAM)id, (LPARAM)pbuf); result = sscanf(pbuf, "Python Version %d.%d", &py_major, &py_minor); if (result == 2) { #ifdef _DEBUG wsprintf(pythondll, "python%d%d_d.dll", py_major, py_minor); #else wsprintf(pythondll, "python%d%d.dll", py_major, py_minor); #endif } free(pbuf); } else strcpy(pythondll, ""); /* retrieve the scheme for this version */ { char install_path[_MAX_PATH]; SCHEME *scheme = GetScheme(py_major, py_minor); strcpy(install_path, python_dir); if (install_path[strlen(install_path)-1] != '\\') strcat(install_path, "\\"); strcat(install_path, scheme[0].prefix); SetDlgItemText(hwnd, IDC_INSTALL_PATH, install_path); } } } break; } return 0; case WM_NOTIFY: lpnm = (LPNMHDR) lParam; switch (lpnm->code) { int id; case PSN_SETACTIVE: id = SendDlgItemMessage(hwnd, IDC_VERSIONS_LIST, LB_GETCURSEL, 0, 0); if (id == LB_ERR) PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_BACK); else PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_BACK | PSWIZB_NEXT); break; case PSN_WIZNEXT: break; case PSN_WIZFINISH: break; case PSN_RESET: break; default: break; } } return 0; } static BOOL OpenLogfile(char *dir) { char buffer[_MAX_PATH+1]; time_t ltime; struct tm *now; long result; HKEY hKey, hSubkey; char subkey_name[256]; static char KeyName[] = "Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall"; DWORD disposition; result = RegOpenKeyEx(HKEY_LOCAL_MACHINE, KeyName, 0, KEY_CREATE_SUB_KEY, &hKey); if (result != ERROR_SUCCESS) { if (result == ERROR_ACCESS_DENIED) { MessageBox(GetFocus(), "You do not seem to have sufficient access rights\n" "on this machine to install this software", NULL, MB_OK | MB_ICONSTOP); return FALSE; } else { MessageBox(GetFocus(), KeyName, "Could not open key", MB_OK); } } sprintf(buffer, "%s\\%s-wininst.log", dir, meta_name); logfile = fopen(buffer, "a"); time(<ime); now = localtime(<ime); strftime(buffer, sizeof(buffer), "*** Installation started %Y/%m/%d %H:%M ***\n", localtime(<ime)); fprintf(logfile, buffer); fprintf(logfile, "Source: %s\n", modulename); sprintf(subkey_name, "%s-py%d.%d", meta_name, py_major, py_minor); result = RegCreateKeyEx(hKey, subkey_name, 0, NULL, 0, KEY_WRITE, NULL, &hSubkey, &disposition); if (result != ERROR_SUCCESS) MessageBox(GetFocus(), subkey_name, "Could not create key", MB_OK); RegCloseKey(hKey); if (disposition == REG_CREATED_NEW_KEY) fprintf(logfile, "020 Reg DB Key: [%s]%s\n", KeyName, subkey_name); sprintf(buffer, "Python %d.%d %s", py_major, py_minor, title); result = RegSetValueEx(hSubkey, "DisplayName", 0, REG_SZ, buffer, strlen(buffer)+1); if (result != ERROR_SUCCESS) MessageBox(GetFocus(), buffer, "Could not set key value", MB_OK); fprintf(logfile, "040 Reg DB Value: [%s\\%s]%s=%s\n", KeyName, subkey_name, "DisplayName", buffer); { FILE *fp; sprintf(buffer, "%s\\Remove%s.exe", dir, meta_name); fp = fopen(buffer, "wb"); fwrite(arc_data, exe_size, 1, fp); fclose(fp); sprintf(buffer, "\"%s\\Remove%s.exe\" -u \"%s\\%s-wininst.log\"", dir, meta_name, dir, meta_name); result = RegSetValueEx(hSubkey, "UninstallString", 0, REG_SZ, buffer, strlen(buffer)+1); if (result != ERROR_SUCCESS) MessageBox(GetFocus(), buffer, "Could not set key value", MB_OK); fprintf(logfile, "040 Reg DB Value: [%s\\%s]%s=%s\n", KeyName, subkey_name, "UninstallString", buffer); } return TRUE; } static void CloseLogfile(void) { char buffer[_MAX_PATH+1]; time_t ltime; struct tm *now; time(<ime); now = localtime(<ime); strftime(buffer, sizeof(buffer), "*** Installation finished %Y/%m/%d %H:%M ***\n", localtime(<ime)); fprintf(logfile, buffer); if (logfile) fclose(logfile); } static HINSTANCE LoadPythonDll(char *fname) { char fullpath[_MAX_PATH]; char subkey_name[80]; char buffer[260 + 12]; LONG size = sizeof(fullpath); HINSTANCE h; /* make sure PYTHONHOME is set, to that sys.path is initialized correctly */ wsprintf(buffer, "PYTHONHOME=%s", python_dir); _putenv(buffer); h = LoadLibrary(fname); if (h) return h; wsprintf(subkey_name, "SOFTWARE\\Python\\PythonCore\\%d.%d\\InstallPath", py_major, py_minor); if (ERROR_SUCCESS != RegQueryValue(HKEY_CURRENT_USER, subkey_name, fullpath, &size)) return NULL; strcat(fullpath, "\\"); strcat(fullpath, fname); return LoadLibrary(fullpath); } BOOL CALLBACK InstallFilesDlgProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { LPNMHDR lpnm; char Buffer[4096]; SCHEME *scheme; switch (msg) { case WM_INITDIALOG: if (hBitmap) SendDlgItemMessage(hwnd, IDC_BITMAP, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)hBitmap); wsprintf(Buffer, "Click Next to begin the installation of %s. " "If you want to review or change any of your " " installation settings, click Back. " "Click Cancel to exit the wizard.", meta_name); SetDlgItemText(hwnd, IDC_TITLE, Buffer); break; case WM_NUMFILES: SendDlgItemMessage(hwnd, IDC_PROGRESS, PBM_SETRANGE, 0, lParam); PumpMessages(); return TRUE; case WM_NEXTFILE: SendDlgItemMessage(hwnd, IDC_PROGRESS, PBM_SETPOS, wParam, 0); SetDlgItemText(hwnd, IDC_INFO, (LPSTR)lParam); PumpMessages(); return TRUE; case WM_NOTIFY: lpnm = (LPNMHDR) lParam; switch (lpnm->code) { case PSN_SETACTIVE: PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_BACK | PSWIZB_NEXT); break; case PSN_WIZFINISH: break; case PSN_WIZNEXT: /* Handle a Next button click here */ hDialog = hwnd; /* Disable the buttons while we work. Sending CANCELTOCLOSE has the effect of disabling the cancel button, which is a) as we do everything synchronously we can't cancel, and b) the next step is 'finished', when it is too late to cancel anyway. The next step being 'Finished' means we also don't need to restore the button state back */ PropSheet_SetWizButtons(GetParent(hwnd), 0); SendMessage(GetParent(hwnd), PSM_CANCELTOCLOSE, 0, 0); /* Make sure the installation directory name ends in a */ /* backslash */ if (python_dir[strlen(python_dir)-1] != '\\') strcat(python_dir, "\\"); /* Strip the trailing backslash again */ python_dir[strlen(python_dir)-1] = '\0'; if (!OpenLogfile(python_dir)) break; /* * The scheme we have to use depends on the Python version... if sys.version < "2.2": WINDOWS_SCHEME = { 'purelib': '$base', 'platlib': '$base', 'headers': '$base/Include/$dist_name', 'scripts': '$base/Scripts', 'data' : '$base', } else: WINDOWS_SCHEME = { 'purelib': '$base/Lib/site-packages', 'platlib': '$base/Lib/site-packages', 'headers': '$base/Include/$dist_name', 'scripts': '$base/Scripts', 'data' : '$base', } */ scheme = GetScheme(py_major, py_minor); /* Extract all files from the archive */ SetDlgItemText(hwnd, IDC_TITLE, "Installing files..."); success = unzip_archive(scheme, python_dir, arc_data, arc_size, notify); /* Compile the py-files */ if (pyc_compile) { int errors; HINSTANCE hPython; SetDlgItemText(hwnd, IDC_TITLE, "Compiling files to .pyc..."); SetDlgItemText(hDialog, IDC_INFO, "Loading python..."); hPython = LoadPythonDll(pythondll); if (hPython) { errors = compile_filelist(hPython, FALSE); FreeLibrary(hPython); } /* Compilation errors are intentionally ignored: * Python2.0 contains a bug which will result * in sys.path containing garbage under certain * circumstances, and an error message will only * confuse the user. */ } if (pyo_compile) { int errors; HINSTANCE hPython; SetDlgItemText(hwnd, IDC_TITLE, "Compiling files to .pyo..."); SetDlgItemText(hDialog, IDC_INFO, "Loading python..."); hPython = LoadPythonDll(pythondll); if (hPython) { errors = compile_filelist(hPython, TRUE); FreeLibrary(hPython); } /* Errors ignored: see above */ } break; case PSN_RESET: break; default: break; } } return 0; } BOOL CALLBACK FinishedDlgProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam) { LPNMHDR lpnm; switch (msg) { case WM_INITDIALOG: if (hBitmap) SendDlgItemMessage(hwnd, IDC_BITMAP, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)hBitmap); if (!success) SetDlgItemText(hwnd, IDC_INFO, "Installation failed."); /* async delay: will show the dialog box completely before the install_script is started */ PostMessage(hwnd, WM_USER, 0, 0L); return TRUE; case WM_USER: if (install_script && install_script[0]) { char fname[MAX_PATH]; char *tempname; FILE *fp; char buffer[4096]; int n; HCURSOR hCursor; HINSTANCE hPython; char *argv[3] = {NULL, "-install", NULL}; SetDlgItemText(hwnd, IDC_TITLE, "Please wait while running postinstall script..."); strcpy(fname, python_dir); strcat(fname, "\\Scripts\\"); strcat(fname, install_script); if (logfile) fprintf(logfile, "300 Run Script: [%s]%s\n", pythondll, fname); tempname = tempnam(NULL, NULL); if (!freopen(tempname, "a", stderr)) MessageBox(GetFocus(), "freopen stderr", NULL, MB_OK); if (!freopen(tempname, "a", stdout)) MessageBox(GetFocus(), "freopen stdout", NULL, MB_OK); /* if (0 != setvbuf(stdout, NULL, _IONBF, 0)) MessageBox(GetFocus(), "setvbuf stdout", NULL, MB_OK); */ hCursor = SetCursor(LoadCursor(NULL, IDC_WAIT)); argv[0] = fname; hPython = LoadPythonDll(pythondll); if (hPython) { int result; result = run_installscript(hPython, fname, 2, argv); if (-1 == result) { fprintf(stderr, "*** run_installscript: internal error 0x%X ***\n", result); } FreeLibrary(hPython); } else { fprintf(stderr, "*** Could not load Python ***"); } fflush(stderr); fclose(stderr); fflush(stdout); fclose(stdout); fp = fopen(tempname, "rb"); n = fread(buffer, 1, sizeof(buffer), fp); fclose(fp); remove(tempname); buffer[n] = '\0'; SetDlgItemText(hwnd, IDC_INFO, buffer); SetDlgItemText(hwnd, IDC_TITLE, "Postinstall script finished.\n" "Click the Finish button to exit the Setup wizard."); SetCursor(hCursor); CloseLogfile(); } return TRUE; case WM_NOTIFY: lpnm = (LPNMHDR) lParam; switch (lpnm->code) { case PSN_SETACTIVE: /* Enable the Finish button */ PropSheet_SetWizButtons(GetParent(hwnd), PSWIZB_FINISH); break; case PSN_WIZNEXT: break; case PSN_WIZFINISH: break; case PSN_RESET: break; default: break; } } return 0; } void RunWizard(HWND hwnd) { PROPSHEETPAGE psp = {0}; HPROPSHEETPAGE ahpsp[4] = {0}; PROPSHEETHEADER psh = {0}; /* Display module information */ psp.dwSize = sizeof(psp); psp.dwFlags = PSP_DEFAULT|PSP_HIDEHEADER; psp.hInstance = GetModuleHandle (NULL); psp.lParam = 0; psp.pfnDlgProc = IntroDlgProc; psp.pszTemplate = MAKEINTRESOURCE(IDD_INTRO); ahpsp[0] = CreatePropertySheetPage(&psp); /* Select python version to use */ psp.dwFlags = PSP_DEFAULT|PSP_HIDEHEADER; psp.pszTemplate = MAKEINTRESOURCE(IDD_SELECTPYTHON); psp.pfnDlgProc = SelectPythonDlgProc; ahpsp[1] = CreatePropertySheetPage(&psp); /* Install the files */ psp.dwFlags = PSP_DEFAULT|PSP_HIDEHEADER; psp.pszTemplate = MAKEINTRESOURCE(IDD_INSTALLFILES); psp.pfnDlgProc = InstallFilesDlgProc; ahpsp[2] = CreatePropertySheetPage(&psp); /* Show success or failure */ psp.dwFlags = PSP_DEFAULT|PSP_HIDEHEADER; psp.pszTemplate = MAKEINTRESOURCE(IDD_FINISHED); psp.pfnDlgProc = FinishedDlgProc; ahpsp[3] = CreatePropertySheetPage(&psp); /* Create the property sheet */ psh.dwSize = sizeof(psh); psh.hInstance = GetModuleHandle(NULL); psh.hwndParent = hwnd; psh.phpage = ahpsp; psh.dwFlags = PSH_WIZARD/*97*//*|PSH_WATERMARK|PSH_HEADER*/; psh.pszbmWatermark = NULL; psh.pszbmHeader = NULL; psh.nStartPage = 0; psh.nPages = 4; PropertySheet(&psh); } int DoInstall(void) { char ini_buffer[4096]; /* Read installation information */ GetPrivateProfileString("Setup", "title", "", ini_buffer, sizeof(ini_buffer), ini_file); unescape(title, ini_buffer, sizeof(title)); GetPrivateProfileString("Setup", "info", "", ini_buffer, sizeof(ini_buffer), ini_file); unescape(info, ini_buffer, sizeof(info)); GetPrivateProfileString("Setup", "build_info", "", build_info, sizeof(build_info), ini_file); pyc_compile = GetPrivateProfileInt("Setup", "target_compile", 1, ini_file); pyo_compile = GetPrivateProfileInt("Setup", "target_optimize", 1, ini_file); GetPrivateProfileString("Setup", "target_version", "", target_version, sizeof(target_version), ini_file); GetPrivateProfileString("metadata", "name", "", meta_name, sizeof(meta_name), ini_file); GetPrivateProfileString("Setup", "install_script", "", install_script, sizeof(install_script), ini_file); hwndMain = CreateBackground(title); RunWizard(hwndMain); /* Clean up */ UnmapViewOfFile(arc_data); if (ini_file) DeleteFile(ini_file); if (hBitmap) DeleteObject(hBitmap); return 0; } /*********************** uninstall section ******************************/ static int compare(const void *p1, const void *p2) { return strcmp(*(char **)p2, *(char **)p1); } /* * Commit suicide (remove the uninstaller itself). * * Create a batch file to first remove the uninstaller * (will succeed after it has finished), then the batch file itself. * * This technique has been demonstrated by Jeff Richter, * MSJ 1/1996 */ void remove_exe(void) { char exename[_MAX_PATH]; char batname[_MAX_PATH]; FILE *fp; STARTUPINFO si; PROCESS_INFORMATION pi; GetModuleFileName(NULL, exename, sizeof(exename)); sprintf(batname, "%s.bat", exename); fp = fopen(batname, "w"); fprintf(fp, ":Repeat\n"); fprintf(fp, "del \"%s\"\n", exename); fprintf(fp, "if exist \"%s\" goto Repeat\n", exename); fprintf(fp, "del \"%s\"\n", batname); fclose(fp); ZeroMemory(&si, sizeof(si)); si.cb = sizeof(si); si.dwFlags = STARTF_USESHOWWINDOW; si.wShowWindow = SW_HIDE; if (CreateProcess(NULL, batname, NULL, NULL, FALSE, CREATE_SUSPENDED | IDLE_PRIORITY_CLASS, NULL, "\\", &si, &pi)) { SetThreadPriority(pi.hThread, THREAD_PRIORITY_IDLE); SetThreadPriority(GetCurrentThread(), THREAD_PRIORITY_TIME_CRITICAL); SetPriorityClass(GetCurrentProcess(), HIGH_PRIORITY_CLASS); CloseHandle(pi.hProcess); ResumeThread(pi.hThread); CloseHandle(pi.hThread); } } void DeleteRegistryKey(char *string) { char *keyname; char *subkeyname; char *delim; HKEY hKey; long result; char *line; line = strdup(string); /* so we can change it */ keyname = strchr(line, '['); if (!keyname) return; ++keyname; subkeyname = strchr(keyname, ']'); if (!subkeyname) return; *subkeyname++='\0'; delim = strchr(subkeyname, '\n'); if (delim) *delim = '\0'; result = RegOpenKeyEx(HKEY_LOCAL_MACHINE, keyname, 0, KEY_WRITE, &hKey); if (result != ERROR_SUCCESS) MessageBox(GetFocus(), string, "Could not open key", MB_OK); else { result = RegDeleteKey(hKey, subkeyname); if (result != ERROR_SUCCESS && result != ERROR_FILE_NOT_FOUND) MessageBox(GetFocus(), string, "Could not delete key", MB_OK); RegCloseKey(hKey); } free(line); } void DeleteRegistryValue(char *string) { char *keyname; char *valuename; char *value; HKEY hKey; long result; char *line; line = strdup(string); /* so we can change it */ /* Format is 'Reg DB Value: [key]name=value' */ keyname = strchr(line, '['); if (!keyname) return; ++keyname; valuename = strchr(keyname, ']'); if (!valuename) return; *valuename++ = '\0'; value = strchr(valuename, '='); if (!value) return; *value++ = '\0'; result = RegOpenKeyEx(HKEY_LOCAL_MACHINE, keyname, 0, KEY_WRITE, &hKey); if (result != ERROR_SUCCESS) MessageBox(GetFocus(), string, "Could not open key", MB_OK); else { result = RegDeleteValue(hKey, valuename); if (result != ERROR_SUCCESS && result != ERROR_FILE_NOT_FOUND) MessageBox(GetFocus(), string, "Could not delete value", MB_OK); RegCloseKey(hKey); } free(line); } BOOL MyDeleteFile(char *line) { char *pathname = strchr(line, ':'); if (!pathname) return FALSE; ++pathname; while (isspace(*pathname)) ++pathname; return DeleteFile(pathname); } BOOL MyRemoveDirectory(char *line) { char *pathname = strchr(line, ':'); if (!pathname) return FALSE; ++pathname; while (isspace(*pathname)) ++pathname; return RemoveDirectory(pathname); } BOOL Run_RemoveScript(char *line) { char *dllname; char *scriptname; static char lastscript[MAX_PATH]; /* Format is 'Run Scripts: [pythondll]scriptname' */ /* XXX Currently, pythondll carries no path!!! */ dllname = strchr(line, '['); if (!dllname) return FALSE; ++dllname; scriptname = strchr(dllname, ']'); if (!scriptname) return FALSE; *scriptname++ = '\0'; /* this function may be called more than one time with the same script, only run it one time */ if (strcmp(lastscript, scriptname)) { HINSTANCE hPython; char *argv[3] = {NULL, "-remove", NULL}; char buffer[4096]; FILE *fp; char *tempname; int n; argv[0] = scriptname; tempname = tempnam(NULL, NULL); if (!freopen(tempname, "a", stderr)) MessageBox(GetFocus(), "freopen stderr", NULL, MB_OK); if (!freopen(tempname, "a", stdout)) MessageBox(GetFocus(), "freopen stdout", NULL, MB_OK); hPython = LoadLibrary(dllname); if (hPython) { if (0x80000000 == run_installscript(hPython, scriptname, 2, argv)) fprintf(stderr, "*** Could not load Python ***"); FreeLibrary(hPython); } fflush(stderr); fclose(stderr); fflush(stdout); fclose(stdout); fp = fopen(tempname, "rb"); n = fread(buffer, 1, sizeof(buffer), fp); fclose(fp); remove(tempname); buffer[n] = '\0'; if (buffer[0]) MessageBox(GetFocus(), buffer, "uninstall-script", MB_OK); strcpy(lastscript, scriptname); } return TRUE; } int DoUninstall(int argc, char **argv) { FILE *logfile; char buffer[4096]; int nLines = 0; int i; char *cp; int nFiles = 0; int nDirs = 0; int nErrors = 0; char **lines; int lines_buffer_size = 10; if (argc != 3) { MessageBox(NULL, "Wrong number of args", NULL, MB_OK); return 1; /* Error */ } if (strcmp(argv[1], "-u")) { MessageBox(NULL, "2. arg is not -u", NULL, MB_OK); return 1; /* Error */ } { DWORD result; HKEY hKey; static char KeyName[] = "Software\\Microsoft\\Windows\\CurrentVersion\\Uninstall"; result = RegOpenKeyEx(HKEY_LOCAL_MACHINE, KeyName, 0, KEY_CREATE_SUB_KEY, &hKey); if (result == ERROR_ACCESS_DENIED) { MessageBox(GetFocus(), "You do not seem to have sufficient access rights\n" "on this machine to uninstall this software", NULL, MB_OK | MB_ICONSTOP); return 1; /* Error */ } RegCloseKey(hKey); } logfile = fopen(argv[2], "r"); if (!logfile) { MessageBox(NULL, "could not open logfile", NULL, MB_OK); return 1; /* Error */ } lines = (char **)malloc(sizeof(char *) * lines_buffer_size); if (!lines) return SystemError(0, "Out of memory"); /* Read the whole logfile, realloacting the buffer */ while (fgets(buffer, sizeof(buffer), logfile)) { int len = strlen(buffer); /* remove trailing white space */ while (isspace(buffer[len-1])) len -= 1; buffer[len] = '\0'; lines[nLines++] = strdup(buffer); if (nLines >= lines_buffer_size) { lines_buffer_size += 10; lines = (char **)realloc(lines, sizeof(char *) * lines_buffer_size); if (!lines) return SystemError(0, "Out of memory"); } } fclose(logfile); /* Sort all the lines, so that highest 3-digit codes are first */ qsort(&lines[0], nLines, sizeof(char *), compare); if (IDYES != MessageBox(NULL, "Are you sure you want to remove\n" "this package from your computer?", "Please confirm", MB_YESNO | MB_ICONQUESTION)) return 0; cp = ""; for (i = 0; i < nLines; ++i) { /* Ignore duplicate lines */ if (strcmp(cp, lines[i])) { int ign; cp = lines[i]; /* Parse the lines */ if (2 == sscanf(cp, "%d Made Dir: %s", &ign, &buffer)) { if (MyRemoveDirectory(cp)) ++nDirs; else { int code = GetLastError(); if (code != 2 && code != 3) { /* file or path not found */ ++nErrors; } } } else if (2 == sscanf(cp, "%d File Copy: %s", &ign, &buffer)) { if (MyDeleteFile(cp)) ++nFiles; else { int code = GetLastError(); if (code != 2 && code != 3) { /* file or path not found */ ++nErrors; } } } else if (2 == sscanf(cp, "%d File Overwrite: %s", &ign, &buffer)) { if (MyDeleteFile(cp)) ++nFiles; else { int code = GetLastError(); if (code != 2 && code != 3) { /* file or path not found */ ++nErrors; } } } else if (2 == sscanf(cp, "%d Reg DB Key: %s", &ign, &buffer)) { DeleteRegistryKey(cp); } else if (2 == sscanf(cp, "%d Reg DB Value: %s", &ign, &buffer)) { DeleteRegistryValue(cp); } else if (2 == sscanf(cp, "%d Run Script: %s", &ign, &buffer)) { Run_RemoveScript(cp); } } } if (DeleteFile(argv[2])) { ++nFiles; } else { ++nErrors; SystemError(GetLastError(), argv[2]); } if (nErrors) wsprintf(buffer, "%d files and %d directories removed\n" "%d files or directories could not be removed", nFiles, nDirs, nErrors); else wsprintf(buffer, "%d files and %d directories removed", nFiles, nDirs); MessageBox(NULL, buffer, "Uninstall Finished!", MB_OK | MB_ICONINFORMATION); remove_exe(); return 0; } int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR lpszCmdLine, INT nCmdShow) { extern int __argc; extern char **__argv; char *basename; GetModuleFileName(NULL, modulename, sizeof(modulename)); /* Map the executable file to memory */ arc_data = MapExistingFile(modulename, &arc_size); if (!arc_data) { SystemError(GetLastError(), "Could not open archive"); return 1; } /* OK. So this program can act as installer (self-extracting * zip-file, or as uninstaller when started with '-u logfile' * command line flags. * * The installer is usually started without command line flags, * and the uninstaller is usually started with the '-u logfile' * flag. What to do if some innocent user double-clicks the * exe-file? * The following implements a defensive strategy... */ /* Try to extract the configuration data into a temporary file */ ini_file = ExtractIniFile(arc_data, arc_size, &exe_size); if (ini_file) return DoInstall(); if (!ini_file && __argc > 1) { return DoUninstall(__argc, __argv); } basename = strrchr(modulename, '\\'); if (basename) ++basename; /* Last guess about the purpose of this program */ if (basename && (0 == strncmp(basename, "Remove", 6))) SystemError(0, "This program is normally started by windows"); else SystemError(0, "Setup program invalid or damaged"); return 1; } Python-2.3.7/PC/python_nt.rc0000644001241000117560000000343610050213477015127 0ustar loewishpifb6// Resource script for Python core DLL. // Currently only holds version information. // #include "winver.h" #define MS_WINDOWS #include "modsupport.h" #include "patchlevel.h" #ifdef _DEBUG # include "pythonnt_rc_d.h" #else # include "pythonnt_rc.h" #endif /* e.g., 2.1a2 * PY_VERSION comes from patchevel.h */ #define PYTHON_VERSION PY_VERSION "\0" /* 64-bit version number as comma-separated list of 4 16-bit ints */ #if PY_MICRO_VERSION > 64 # error "PY_MICRO_VERSION > 64" #endif #if PY_RELEASE_LEVEL > 99 # error "PY_RELEASE_LEVEL > 99" #endif #if PY_RELEASE_SERIAL > 9 # error "PY_RELEASE_SERIAL > 9" #endif #define PYVERSION64 PY_MAJOR_VERSION, PY_MINOR_VERSION, FIELD3, PYTHON_API_VERSION // String Tables STRINGTABLE DISCARDABLE BEGIN 1000, MS_DLL_ID END ///////////////////////////////////////////////////////////////////////////// // // Version // VS_VERSION_INFO VERSIONINFO FILEVERSION PYVERSION64 PRODUCTVERSION PYVERSION64 FILEFLAGSMASK 0x3fL #ifdef _DEBUG FILEFLAGS 0x1L #else FILEFLAGS 0x0L #endif FILEOS 0x40004L FILETYPE 0x1L FILESUBTYPE 0x0L BEGIN BLOCK "StringFileInfo" BEGIN BLOCK "000004b0" BEGIN VALUE "CompanyName", "Python Software Foundation\0" VALUE "FileDescription", "Python Core\0" VALUE "FileVersion", PYTHON_VERSION VALUE "InternalName", "Python DLL\0" VALUE "LegalCopyright", "Copyright © 2001-2004 Python Software Foundation. Copyright © 2000 BeOpen.com. Copyright © 1995-2001 CNRI. Copyright © 1991-1995 SMC.\0" VALUE "OriginalFilename", PYTHON_DLL_NAME "\0" VALUE "ProductName", "Python\0" VALUE "ProductVersion", PYTHON_VERSION END END BLOCK "VarFileInfo" BEGIN VALUE "Translation", 0x0, 1200 END END Python-2.3.7/PC/os2emx/0000755001241000117560000000000010765544513014001 5ustar loewishpifb6Python-2.3.7/PC/os2emx/dllentry.c0000644001241000117560000000132607651132506015777 0ustar loewishpifb6/* * This is the entry point for the Python 2.3 core DLL. */ #define NULL 0 #define REF(s) extern void s(); void *____ref_##s = &s; /* Make references to imported symbols to pull them from static library */ REF(Py_Main); #include extern int _CRT_init(void); extern void _CRT_term(void); extern void __ctordtorInit(void); extern void __ctordtorTerm(void); unsigned long _DLL_InitTerm(unsigned long mod_handle, unsigned long flag) { switch (flag) { case 0: if (_CRT_init()) return 0; __ctordtorInit(); /* Ignore fatal signals */ signal(SIGSEGV, SIG_IGN); signal(SIGFPE, SIG_IGN); return 1; case 1: __ctordtorTerm(); _CRT_term(); return 1; default: return 0; } } Python-2.3.7/PC/os2emx/config.c0000644001241000117560000001157307671041102015405 0ustar loewishpifb6/* -*- C -*- *********************************************** Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, The Netherlands. All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the names of Stichting Mathematisch Centrum or CWI or Corporation for National Research Initiatives or CNRI not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. While CWI is the initial source for this software, a modified version is made available by the Corporation for National Research Initiatives (CNRI) at the Internet address ftp://ftp.python.org. STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ******************************************************************/ /* Module configuration */ /* This file contains the table of built-in modules. See init_builtin() in import.c. */ #include "Python.h" extern void initos2(); extern void initsignal(); #ifdef WITH_THREAD extern void initthread(); #endif extern void init_codecs(); extern void init_csv(); extern void init_locale(); extern void init_random(); extern void init_sre(); extern void init_symtable(); extern void init_weakref(); extern void initarray(); extern void initbinascii(); extern void initcPickle(); extern void initcStringIO(); extern void initcmath(); extern void initdatetime(); extern void initdl(); extern void initerrno(); extern void initfcntl(); extern void initimageop(); extern void inititertools(); extern void initmath(); extern void initmd5(); extern void initoperator(); extern void initpcre(); extern void initregex(); extern void initrgbimg(); extern void initsha(); extern void initstrop(); extern void initstruct(); extern void inittermios(); extern void inittime(); extern void inittiming(); extern void initxreadlines(); extern void initxxsubtype(); extern void initzipimport(); #if !HAVE_DYNAMIC_LOADING extern void init_curses(); extern void init_curses_panel(); extern void init_hotshot(); extern void init_testcapi(); extern void initbsddb185(); extern void initbz2(); extern void initfpectl(); extern void initfpetest(); extern void initparser(); extern void initpwd(); extern void initrotor(); extern void initunicodedata(); extern void initzlib(); #ifdef USE_SOCKET extern void init_socket(); extern void initselect(); #endif #endif /* -- ADDMODULE MARKER 1 -- */ extern void PyMarshal_Init(); extern void initimp(); extern void initgc(); struct _inittab _PyImport_Inittab[] = { {"os2", initos2}, {"signal", initsignal}, #ifdef WITH_THREAD {"thread", initthread}, #endif {"_codecs", init_codecs}, {"_csv", init_csv}, {"_locale", init_locale}, {"_random", init_random}, {"_sre", init_sre}, {"_symtable", init_symtable}, {"_weakref", init_weakref}, {"array", initarray}, {"binascii", initbinascii}, {"cPickle", initcPickle}, {"cStringIO", initcStringIO}, {"cmath", initcmath}, {"datetime", initdatetime}, {"dl", initdl}, {"errno", initerrno}, {"fcntl", initfcntl}, {"imageop", initimageop}, {"itertools", inititertools}, {"math", initmath}, {"md5", initmd5}, {"operator", initoperator}, {"pcre", initpcre}, {"regex", initregex}, {"rgbimg", initrgbimg}, {"sha", initsha}, {"strop", initstrop}, {"struct", initstruct}, {"termios", inittermios}, {"time", inittime}, {"timing", inittiming}, {"xreadlines", initxreadlines}, {"xxsubtype", initxxsubtype}, {"zipimport", initzipimport}, #if !HAVE_DYNAMIC_LOADING {"_curses", init_curses}, {"_curses_panel", init_curses_panel}, {"_hotshot", init_hotshot}, {"_testcapi", init_testcapi}, {"bsddb185", initbsddb185}, {"bz2", initbz2}, {"fpectl", initfpectl}, {"fpetest", initfpetest}, {"parser", initparser}, {"pwd", initpwd}, {"rotor", initrotor}, {"unicodedata", initunicodedata}, {"zlib", initzlib}, #ifdef USE_SOCKET {"_socket", init_socket}, {"select", initselect}, #endif #endif /* -- ADDMODULE MARKER 2 -- */ /* This module "lives in" with marshal.c */ {"marshal", PyMarshal_Init}, /* This lives it with import.c */ {"imp", initimp}, /* These entries are here for sys.builtin_module_names */ {"__main__", NULL}, {"__builtin__", NULL}, {"sys", NULL}, {"exceptions", NULL}, /* This lives in gcmodule.c */ {"gc", initgc}, /* Sentinel */ {0, 0} }; Python-2.3.7/PC/os2emx/Makefile0000644001241000117560000005107510172727016015442 0ustar loewishpifb6#####################==================---------------- # # Top-Level Makefile for Building Python 2.3 for OS/2 using GCC/EMX # Originally written by Andrew Zabolotny, for Python 1.5.2 # Modified by Andrew MacIntyre, for Python 2.3 # # This makefile was developed for use with [P]GCC/EMX compiler any # version and GNU Make. # # The output of the build is a largish Python23.DLL containing the # essential modules of Python and a small Python.exe program to start # the interpreter. When embedding Python within another program, only # Python23.DLL is needed. We also build python_s.a static library (which # can be converted into OMF (.lib) format using emxomf tool) and both # python.a and python.lib import libraries. Then the optional # extension modules, which are OS/2 DLLs renamed with a PYD file extension. # # Recommended build order: # make depend (if you have makedep) # make all # make lx (if you have lxlite) # make test (optional) # #####################==================---------------- # === Compilation mode: debug or release === MODE= optimize #MODE= debug # === Assert() enabled === ASSERTIONS=no #ASSERTIONS=yes # === Hard-wire installation location === FIXED_PYHOME=no #FIXED_PYHOME=yes # === Optional modules === # Do you have the InfoZip compression library installed? HAVE_ZLIB= no # Do you have the Ultra Fast Crypt (UFC) library installed? HAVE_UFC= no # Do you have the Tcl/Tk library installed? HAVE_TCLTK= no # Do you have the GNU multiprecision library installed? HAVE_GMPZ= no # Do you have the GNU readline library installed? # NOTE: I'm using a modified version of Kai Uwe Rommel's port that # - is compiled with multithreading enabled # - is linked statically # I have had no success trying to use a DLL version, even when # compiled with multithreading enabled. HAVE_GREADLINE= no # Do you have the BSD DB library (v1.85) as included in the EMXBSD package? # NOTE: this library needs to be recompiled with a structure member # renamed to avoid problems with the multithreaded errno support # (there is a structure member called errno, used for shadowing the # real errno, which conflicts with the errno redefinition of -Zmt) HAVE_BSDDB= no # Do you have the ncurses library installed? EMX's BSD curses aren't enough! HAVE_NCURSES= no # Do you have the GDBM library installed? HAVE_GDBM= no # Do you have the BZ2 compression library installed? HAVE_BZ2= no # === install locations === # default value of PYTHONHOME LIB_DIR=C:/Python23 # default is to have everything in or under PYTHONHOME EXE_DIR=$(LIB_DIR) DLL_DIR=$(EXE_DIR) # === The Tools === CC= gcc CFLAGS= -Zmt -Wall $(INCLUDE) CFLAGS.LIB= $(CFLAGS) LD= gcc LDFLAGS= -Zmt -Zcrtdll -L. -lgcc LDFLAGS.EXE= $(LDFLAGS) LDFLAGS.DLL= $(LDFLAGS) -Zdll LDFLAGS.A= $(LDFLAGS) $(LIBS) ARFLAGS= crs IMPLIB= emximp EXPLIB= emxexp EXEOPT= emxbind PY_DEF= -DPy_BUILD_CORE # adjust C compiler settings based on build options ifeq ($(MODE),debug) CFLAGS+= -g -O LDFLAGS+= -g else CFLAGS+= -s -O3 -fomit-frame-pointer -mprobe LDFLAGS+= -s endif CFLAGS+= $(PY_DEF) ifeq ($(ASSERTIONS),no) CFLAGS+= -DNDEBUG endif ifeq ($(FIXED_PYHOME),yes) CFLAGS+= -DPREFIX=$(DQUOTE)$(LIB_DIR)$(DQUOTE) endif # We're using the OMF format since EMX's ld has a obscure bug # because of which it sometimes fails to build relocations # in .data segment that point to another .data locations # (except for the final linking if the .EXEs) OMF= yes # if fork() support is required, the main executable must be linked with ld EXEOMF= no # File extensions MODULE.EXT= .pyd MODLIB.EXT= .dll ifeq ($(OMF),yes) O= .obj A= .lib AR= emxomfar CFLAGS+= -Zomf LDFLAGS+= -Zomf ifeq ($(MODE),debug) ARFLAGS= -p64 crs else ARFLAGS= -p32 crs endif else O= .o A= .a AR= ar endif # === Build time resource settings === # EMX's default number of file handles is 40, which is sometimes insufficient # (the tempfile regression test tries to create 100 temporary files) NFILES=250 # The default stack size for child threads is 64k bytes, which is # insufficient for some applications which do a lot of work in threads # (such as Zope, especially in conjunction with Plone). # Note that this setting is distinct from the stack size for the main # thread, which is set via the %.def rule below. # EMX documents that the thread stack size should be at least 32768 bytes; # for Zope/Plone at least 128k bytes is recommended. # Uncomment & adjust the next line to override the default stack size: #CFLAGS+= -DTHREAD_STACK_SIZE=0x20000 # === The environment === # Source file paths SRCPATH=.;../../Python;../../Parser;../../Objects;../../Include;../../Modules # Python contains the central core, containing the builtins and interpreter. # Parser contains Python's Internal Parser and # Standalone Parser Generator Program (Shares Some of Python's Modules) # Objects contains Python Object Types # Modules contains extension Modules (Built-In or as Separate DLLs) # Unix shells tend to use "$" as delimiter for variable names. # Test for this behaviour and set $(BUCK) variable correspondigly ... __TMP__:=$(shell echo $$$$) ifeq ($(__TMP__),$$$$) BUCK= $$ BRO= ( BRC= ) else BUCK= \$$ BRO= \( BRC= \) endif # Compute the "double quote" variable __TMP__:=$(shell echo "") ifeq ($(__TMP__),"") DQUOTE= " else DQUOTE= \" endif # Include paths #INCLUDE= -I$(subst ;, -I, $(SRCPATH)) INCLUDE= -I. -I../../Include # Path to search for .c files vpath %.c .;..;$(SRCPATH) # Top of the package tree TOP= ../../ # Directory for output files OUTBASE= out/ OUT= $(OUTBASE)$(MODE)/ # Additional libraries LIBS= -lsocket # Utility macro: replacement for $^ ^^= $(filter-out %$A,$^) # Use $(L^) to link with all libraries specified as dependencies L^= $(addprefix -l,$(basename $(notdir $(filter %$A,$+)))) # Build rules $(OUT)%$O: %.c $(CC) $(CFLAGS.LIB) -c $< -o $@ %.a: $(LD) $(LDFLAGS.A) -o $@ $(^^) $(L^) %.dll: $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) %.pyd: $(OUT)%module$O $(OUT)%_m.def $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(PYTHON.IMPLIB) $(LIBS) %.exe: $(LD) $(LDFLAGS.EXE) -o $@ $(^^) $(L^) %_m.def: @echo Creating .DEF file: $@ @echo LIBRARY $(notdir $*) INITINSTANCE TERMINSTANCE >$@ ifeq ($(DESCRIPTION.$(notdir $*)$(MODULE.EXT)),) @echo DESCRIPTION $(DQUOTE)Python standard module $(notdir $*)$(DQUOTE) >>$@ else @echo DESCRIPTION $(DQUOTE)$(DESCRIPTION.$(notdir $*)$(MODULE.EXT))$(DQUOTE) >>$@ endif @echo DATA MULTIPLE NONSHARED >>$@ @echo EXPORTS >>$@ @echo init$(notdir $*) >>$@ %.def: @echo Creating .DEF file: $@ @echo NAME $(notdir $*) $(EXETYPE.$(notdir $*).exe) >$@ @echo DESCRIPTION $(DQUOTE)$(DESCRIPTION.$(notdir $*).exe)$(DQUOTE) >>$@ @echo STACKSIZE 2097152 >>$@ # Output file names PYTHON_VER= 2.3 PYTHON_LIB= python23 PYTHON.LIB= $(PYTHON_LIB)_s$A PYTHON.IMPLIB= $(PYTHON_LIB)$A ifeq ($(EXEOMF),yes) PYTHON.EXEIMP= $(PYTHON.IMPLIB) LDMODE.EXE= -Zomf else PYTHON.EXEIMP= $(PYTHON_LIB).a LDMODE.EXE = endif PYTHON.DLL= $(PYTHON_LIB).dll PYTHON.DEF= $(PYTHON_LIB).def PYTHON.EXE= python.exe PYTHONPM.EXE= pythonpm.exe PGEN.EXE= pgen.exe LIBRARY= $(PYTHON.LIB) LD_LIBRARY= $(PYTHON.IMPLIB) # Additional executable parameters EXETYPE.$(PYTHON.EXE)= WINDOWCOMPAT EXETYPE.$(PYTHONPM.EXE)= WINDOWAPI EXETYPE.$(PGEN.EXE)= WINDOWCOMPAT DESCRIPTION.$(PYTHON.EXE)= Python object-oriented programming language interpreter for OS/2 DESCRIPTION.$(PYTHONPM.EXE)= $(DESCRIPTION.$(PYTHON.EXE)) DESCRIPTION.$(PGEN.EXE)= Python object-oriented programming language parser generator for OS/2 # Module descriptions DESCRIPTION.zlib$(MODULE.EXT)= Python Extension DLL for accessing the InfoZip compression library DESCRIPTION.crypt$(MODULE.EXT)= Python Extension DLL implementing the crypt$(BRO)$(BRC) function DESCRIPTION._tkinter$(MODULE.EXT)= Python Extension DLL for access to Tcl/Tk Environment DESCRIPTION.mpz$(MODULE.EXT)= Python Extension DLL for access to GNU multi-precision library DESCRIPTION.readline$(MODULE.EXT)= Python Extension DLL for access to GNU ReadLine library DESCRIPTION.bsddb185$(MODULE.EXT)= Python Extension DLL for access to BSD DB (v1.85) library DESCRIPTION._curses$(MODLIB.EXT)= Python Extension DLL for access to ncurses library DESCRIPTION.pyexpat$(MODULE.EXT)= Python Extension DLL for access to expat library DESCRIPTION.bz2$(MODULE.EXT)= Python Extension DLL for accessing the bz2 compression library # Source files SRC.OS2EMX= config.c dlfcn.c getpathp.c SRC.MAIN= $(addprefix $(TOP), \ Modules/getbuildinfo.c \ Modules/main.c) SRC.MODULES= $(addprefix $(TOP), \ Modules/gcmodule.c \ Modules/signalmodule.c \ Modules/posixmodule.c \ Modules/threadmodule.c \ Modules/arraymodule.c \ Modules/binascii.c \ Modules/cmathmodule.c \ Modules/_codecsmodule.c \ Modules/cPickle.c \ Modules/cStringIO.c \ Modules/_csv.c \ Modules/datetimemodule.c \ Modules/dlmodule.c \ Modules/errnomodule.c \ Modules/fcntlmodule.c \ Modules/imageop.c \ Modules/itertoolsmodule.c \ Modules/_localemodule.c \ Modules/mathmodule.c \ Modules/md5c.c \ Modules/md5module.c \ Modules/operator.c \ Modules/pcremodule.c \ Modules/pypcre.c \ Modules/_randommodule.c \ Modules/regexmodule.c \ Modules/regexpr.c \ Modules/rgbimgmodule.c \ Modules/shamodule.c \ Modules/_sre.c \ Modules/stropmodule.c \ Modules/structmodule.c \ Modules/symtablemodule.c \ Modules/termios.c \ Modules/timemodule.c \ Modules/timingmodule.c \ Modules/_weakref.c \ Modules/xreadlinesmodule.c \ Modules/xxsubtype.c \ Modules/zipimport.c) SRC.PARSE1= $(addprefix $(TOP), \ Parser/acceler.c \ Parser/grammar1.c \ Parser/listnode.c \ Parser/node.c \ Parser/parser.c \ Parser/parsetok.c \ Parser/bitset.c \ Parser/metagrammar.c) SRC.PARSE2= $(addprefix $(TOP), \ Parser/tokenizer.c \ Parser/myreadline.c) SRC.PARSER= $(SRC.PARSE1) \ $(SRC.PARSE2) SRC.PYTHON= $(addprefix $(TOP), \ Python/bltinmodule.c \ Python/exceptions.c \ Python/ceval.c \ Python/compile.c \ Python/codecs.c \ Python/errors.c \ Python/frozen.c \ Python/frozenmain.c \ Python/future.c \ Python/getargs.c \ Python/getcompiler.c \ Python/getcopyright.c \ Python/getmtime.c \ Python/getplatform.c \ Python/getversion.c \ Python/graminit.c \ Python/import.c \ Python/importdl.c \ Python/marshal.c \ Python/modsupport.c \ Python/mysnprintf.c \ Python/mystrtoul.c \ Python/pyfpe.c \ Python/pystate.c \ Python/pythonrun.c \ Python/structmember.c \ Python/symtable.c \ Python/sysmodule.c \ Python/traceback.c \ Python/getopt.c \ Python/dynload_shlib.c \ Python/thread.c) SRC.OBJECT= $(addprefix $(TOP), \ Objects/abstract.c \ Objects/boolobject.c \ Objects/bufferobject.c \ Objects/cellobject.c \ Objects/classobject.c \ Objects/cobject.c \ Objects/complexobject.c \ Objects/descrobject.c \ Objects/dictobject.c \ Objects/enumobject.c \ Objects/fileobject.c \ Objects/floatobject.c \ Objects/frameobject.c \ Objects/funcobject.c \ Objects/intobject.c \ Objects/iterobject.c \ Objects/listobject.c \ Objects/longobject.c \ Objects/methodobject.c \ Objects/moduleobject.c \ Objects/object.c \ Objects/obmalloc.c \ Objects/rangeobject.c \ Objects/sliceobject.c \ Objects/stringobject.c \ Objects/structseq.c \ Objects/tupleobject.c \ Objects/typeobject.c \ Objects/unicodeobject.c \ Objects/unicodectype.c \ Objects/weakrefobject.c) SRC.LIB= $(SRC.OS2EMX) \ $(SRC.MAIN) \ $(SRC.PARSER) \ $(SRC.OBJECT) \ $(SRC.PYTHON) \ $(SRC.MODULES) OBJ.LIB= $(addprefix $(OUT),$(notdir $(SRC.LIB:.c=$O))) SRC.PGEN= $(SRC.PARSE1) \ $(addprefix $(TOP), \ Objects/obmalloc.c) \ $(addprefix $(TOP), \ Python/mysnprintf.c) \ $(addprefix $(TOP), \ Parser/tokenizer_pgen.c \ Parser/pgenmain.c \ Parser/pgen.c \ Parser/printgrammar.c \ Parser/grammar.c \ Parser/firstsets.c) \ OBJ.PGEN= $(addprefix $(OUT),$(notdir $(SRC.PGEN:.c=$O))) SRC.EXE= $(TOP)Modules/python.c SRC.PMEXE= pythonpm.c # Python modules to be dynamically loaded that: # 1) have only single source file and require no extra libs # 2) use the standard module naming convention # (the 'module' in ?????module.c is assumed) # - these can be built with implicit rules EASYEXTMODULES= fpectl \ fpetest \ parser \ pwd \ rotor \ select # Python modules to be dynamically loaded that need explicit build rules # (either multiple source files and/or non-standard module naming) # (NOTE: use shortened names for modules affected by 8 char name limit) HARDEXTMODULES= _hotshot \ _socket \ _testcap \ unicoded # Python modules that are used as libraries and therefore must use # a .DLL extension LIBEXTMODULES= # Python external ($(MODULE.EXT)) modules - can be EASY or HARD ifeq ($(HAVE_ZLIB),yes) HARDEXTMODULES+= zlib endif ifeq ($(HAVE_UFC),yes) HARDEXTMODULES+= crypt endif ifeq ($(HAVE_TCLTK),yes) HARDEXTMODULES+= _tkinter CFLAGS+= -DHAS_DIRENT -I/TclTk80/include TK_LIBS+= -L/TclTk80/lib -ltcl80 -ltk80 endif ifeq ($(HAVE_GMPZ),yes) HARDEXTMODULES+= mpz endif ifeq ($(HAVE_GREADLINE),yes) HARDEXTMODULES+= readline endif ifeq ($(HAVE_BSDDB),yes) HARDEXTMODULES+= bsddb185 endif ifeq ($(HAVE_NCURSES),yes) LIBEXTMODULES+= _curses HARDEXTMODULES+= _curses_ endif ifeq ($(HAVE_GDBM),yes) HARDEXTMODULES+= gdbm dbm endif ifeq ($(HAVE_BZ2),yes) HARDEXTMODULES+= bz2 endif # Expat is now distributed with the Python source HARDEXTMODULES+= pyexpat EXPAT.INC= -I../../Modules/expat EXPAT.DEF= -DHAVE_EXPAT_H -DXML_NS=1 -DXML_DTD=1 -DXML_BYTE_ORDER=12 \ -DXML_CONTENT_BYTES=1024 -DHAVE_MEMMOVE=1 -DHAVE_BCOPY=1 EXPAT.SRC= $(addprefix ../../Modules/expat/, \ xmlparse.c \ xmlrole.c \ xmltok.c) # all the external modules EXTERNDLLS= $(addsuffix $(MODULE.EXT),$(patsubst %module,%,$(EASYEXTMODULES))) EXTERNDLLS+= $(addsuffix $(MODULE.EXT),$(patsubst %module,%,$(HARDEXTMODULES))) EXTERNDLLS+= $(addsuffix $(MODLIB.EXT),$(patsubst %module,%,$(LIBEXTMODULES))) # Targets all: $(OUT) $(PYTHON.LIB) $(PYTHON.DEF) $(PYTHON.IMPLIB) $(PYTHON.DLL) \ python_noncore python_noncore: make PY_DEF= $(PYTHON.EXE) $(PYTHONPM.EXE) $(PGEN.EXE) $(EXTERNDLLS) clean: rm -f $(OUT)* rm -f $(PYTHON.LIB) $(PYTHON.IMPLIB) $(PYTHON.EXEIMP) $(PYTHON.DLL) \ $(PYTHON.EXE) $(PYTHONPM.EXE) $(PGEN.EXE) *$(MODULE.EXT) find ../../Lib -name "*.py[co]" -exec rm {} ";" lx: @echo Packing everything with lxLite... lxlite $(PYTHON.DLL) $(PYTHON.EXE) $(PYTHONPM.EXE) $(PGEN.EXE) depend: $(OUTBASE) makedep -f $(OUTBASE)python.dep -o $(BUCK)O -p $(BUCK)\(OUT\) \ -r -c $(INCLUDE) $(SRC.LIB) $(SRC.PGEN) $(OUT): $(OUTBASE) $(OUT) $(OUTBASE): mkdir.exe $@ $(PYTHON.LIB): $(OBJ.LIB) rm.exe -f $@ $(AR) $(ARFLAGS) $@ $^ # the Python core DLL .def file needs to have a number of non-static # symbols that aren't part of the Python C API removed (commented out) # from the DLL export list. $(PYTHON.DEF): $(PYTHON.LIB) @echo Creating .DEF file: $@ @echo LIBRARY $(PYTHON_LIB) INITINSTANCE TERMINSTANCE >$@ @echo DESCRIPTION $(DQUOTE)Python $(PYTHON_VER) Core DLL$(DQUOTE) >>$@ @echo PROTMODE >>$@ @echo DATA MULTIPLE NONSHARED >>$@ @echo EXPORTS >>$@ $(EXPLIB) -u $(PYTHON.LIB) |\ sed -e "/^ .init.*/s/^ /; /" \ -e "/^ .pcre_.*/s/^ /; /" \ -e "/^ .array_methods/s/^ /; /" \ -e "/^ .fast_save_leave/s/^ /; /" \ -e "/^ .dlopen/s/^ /; /" \ -e "/^ .dlsym/s/^ /; /" \ -e "/^ .dlclose/s/^ /; /" \ -e "/^ .dlerror/s/^ /; /" \ -e "/^ ._Py_re_.*/s/^ /; /" \ -e "/^ ._Py_MD5.*/s/^ /; /" >>$@ $(PYTHON.IMPLIB): $(PYTHON.DEF) $(IMPLIB) -o $@ $^ $(PYTHON.EXEIMP): $(PYTHON.DEF) $(IMPLIB) -o $@ $^ $(PYTHON.DLL): $(OUT)dllentry$O $(PYTHON.LIB) $(PYTHON.DEF) # Explicit make targets for the .EXEs to be able to use LD to link # (so that fork() will work if required) $(PYTHON.EXE): $(SRC.EXE) $(PYTHON.EXEIMP) $(OUT)python.def $(CC) -Zmt $(LDMODE.EXE) -Zcrtdll -Wall $(INCLUDE) -L. -lgcc -o $@ $(SRC.EXE) $(PYTHON.EXEIMP) $(LIBS) $(OUT)python.def $(EXEOPT) -aq $(PYTHON.EXE) -h$(NFILES) $(PYTHONPM.EXE): $(SRC.PMEXE) $(PYTHON.EXEIMP) $(OUT)pythonpm.def $(CC) -Zmt $(LDMODE.EXE) -Zcrtdll -Wall $(INCLUDE) -L. -lgcc -o $@ $(SRC.PMEXE) $(PYTHON.EXEIMP) $(LIBS) $(OUT)pythonpm.def $(EXEOPT) -aq $(PYTHONPM.EXE) -h$(NFILES) $(PGEN.EXE): $(OBJ.PGEN) $(OUT)pgen.def # Explicit building instructions for those external modules that require # awkward handling (due e.g. to non-std naming, or multiple source files) # - standard modules _hotshot$(MODULE.EXT): $(OUT)_hotshot$O $(OUT)_hotshot_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) _socket$(MODULE.EXT): $(OUT)socketmodule$O $(OUT)_socket_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) # _testcapi needs to be renamed to be useful _testcapi$(MODULE.EXT): $(OUT)_testcapimodule$O $(OUT)_testcapi_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) _testcap$(MODULE.EXT): _testcapi$(MODULE.EXT) cp $^ $@ # unicodedata needs to be renamed to be useful unicodedata$(MODULE.EXT): $(OUT)unicodedata$O $(OUT)unicodedata_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) $(MODULE_LIBS) unicoded$(MODULE.EXT): unicodedata$(MODULE.EXT) cp $^ $@ # - optional modules (requiring other software to be installed) bsddb185$(MODULE.EXT): $(OUT)bsddbmodule$O $(OUT)bsddb185_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) -ldb $(LIBS) crypt$(MODULE.EXT): $(OUT)cryptmodule$O $(OUT)crypt_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) -lufc $(LIBS) # The _curses_panel module requires a couple of ncurses library entry # points, which are best exposed as exports from the _curses module DLL $(OUT)_curses_m.def: @echo Creating .DEF file: $@ @echo LIBRARY $(notdir $*) INITINSTANCE TERMINSTANCE >$@ @echo DESCRIPTION $(DQUOTE)$(DESCRIPTION.$(notdir $*)$(MODLIB.EXT))$(DQUOTE) >>$@ @echo DATA MULTIPLE NONSHARED >>$@ @echo EXPORTS >>$@ @echo init_curses >>$@ @echo wnoutrefresh >>$@ @echo _nc_panelhook >>$@ @echo is_linetouched >>$@ @echo mvwin >>$@ @echo stdscr >>$@ @echo wtouchln >>$@ $(OUT)_curses_panel_m.def: @echo Creating .DEF file: $@ @echo LIBRARY $(notdir $*) INITINSTANCE TERMINSTANCE >$@ @echo DESCRIPTION $(DQUOTE)Python standard module $(notdir $*)$(DQUOTE) >>$@ @echo DATA MULTIPLE NONSHARED >>$@ @echo IMPORTS >>$@ @echo _curses.wnoutrefresh >>$@ @echo _curses._nc_panelhook >>$@ @echo _curses.is_linetouched >>$@ @echo _curses.mvwin >>$@ @echo _curses.stdscr >>$@ @echo _curses.wtouchln >>$@ @echo EXPORTS >>$@ @echo init_curses_panel >>$@ _curses$(MODLIB.EXT): $(OUT)_cursesmodule$O $(OUT)_curses_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lncurses # curses_panel needs to be renamed to be useful _curses_panel$(MODULE.EXT): $(OUT)_curses_panel$O $(OUT)_curses_panel_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lpanel _curses_$(MODULE.EXT): _curses_panel$(MODULE.EXT) cp $^ $@ dbm$(MODULE.EXT): $(OUT)dbmmodule$O $(OUT)dbm_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lgdbm gdbm$(MODULE.EXT): $(OUT)gdbmmodule$O $(OUT)gdbm_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lgdbm mpz$(MODULE.EXT): $(OUT)mpzmodule$O $(OUT)mpz_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lgmp # Expat is now distributed with Python, so use the included version $(OUT)pyexpat$O: ../../Modules/pyexpat.c $(CC) $(CFLAGS) $(EXPAT.INC) -c -o $@ $^ $(OUT)xmlparse$O: ../../Modules/expat/xmlparse.c $(CC) $(CFLAGS) $(EXPAT.INC) $(EXPAT.DEF) -c -o $@ $^ $(OUT)xmlrole$O: ../../Modules/expat/xmlrole.c $(CC) $(CFLAGS) $(EXPAT.INC) $(EXPAT.DEF) -c -o $@ $^ $(OUT)xmltok$O: ../../Modules/expat/xmltok.c $(CC) $(CFLAGS) $(EXPAT.INC) $(EXPAT.DEF) -c -o $@ $^ pyexpat$(MODULE.EXT): $(OUT)pyexpat$O $(OUT)xmlparse$O $(OUT)xmlrole$O \ $(OUT)xmltok$O $(OUT)pyexpat_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) readline$(MODULE.EXT): $(OUT)readline$O $(OUT)readline_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lreadline -lncurses #_tkinter$(MODULE.EXT): $(OUT)_tkinter$O $(OUT)tclNotify$O $(OUT)tkappinit$O _tkinter$(MODULE.EXT): $(OUT)_tkinter$O $(OUT)tclNotify$O \ $(OUT)_tkinter_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) $(TK_LIBS) zlib$(MODULE.EXT): $(OUT)zlibmodule$O $(OUT)zlib_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lz bz2$(MODULE.EXT): $(OUT)bz2module$O $(OUT)bz2_m.def $(PYTHON.IMPLIB) $(LD) $(LDFLAGS.DLL) -o $@ $(^^) $(L^) $(LIBS) -lbz2 # the test target test: -find ../../Lib -name "*.py[co]" -exec rm {} ";" -./python -E -tt ../../lib/test/regrtest.py -l -u "network" ./python -E -tt ../../lib/test/regrtest.py -l -u "network" -include $(OUTBASE)python.dep Python-2.3.7/PC/os2emx/dlfcn.c0000644001241000117560000001255407651132506015235 0ustar loewishpifb6/* -*- C -*- *********************************************** Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, The Netherlands. All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the names of Stichting Mathematisch Centrum or CWI or Corporation for National Research Initiatives or CNRI not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. While CWI is the initial source for this software, a modified version is made available by the Corporation for National Research Initiatives (CNRI) at the Internet address ftp://ftp.python.org. STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ******************************************************************/ /* This library implements dlopen() - Unix-like dynamic linking * emulation functions for OS/2 using DosLoadModule() and company. */ #define INCL_DOS #define INCL_DOSERRORS #define INCL_DOSSESMGR #define INCL_WINPROGRAMLIST #define INCL_WINFRAMEMGR #include #include #include #include #include typedef struct _track_rec { char *name; HMODULE handle; void *id; struct _track_rec *next; } tDLLchain, *DLLchain; static DLLchain dlload = NULL; /* A simple chained list of DLL names */ static char dlerr [256]; /* last error text string */ static void *last_id; static DLLchain find_id(void *id) { DLLchain tmp; for (tmp = dlload; tmp; tmp = tmp->next) if (id == tmp->id) return tmp; return NULL; } /* load a dynamic-link library and return handle */ void *dlopen(char *filename, int flags) { HMODULE hm; DLLchain tmp; char err[256]; char *errtxt; int rc = 0, set_chain = 0; for (tmp = dlload; tmp; tmp = tmp->next) if (strnicmp(tmp->name, filename, 999) == 0) break; if (!tmp) { tmp = (DLLchain) malloc(sizeof(tDLLchain)); if (!tmp) goto nomem; tmp->name = strdup(filename); tmp->next = dlload; set_chain = 1; } switch (rc = DosLoadModule((PSZ)&err, sizeof(err), filename, &hm)) { case NO_ERROR: tmp->handle = hm; if (set_chain) { do last_id++; while ((last_id == 0) || (find_id(last_id))); tmp->id = last_id; dlload = tmp; } return tmp->id; case ERROR_FILE_NOT_FOUND: case ERROR_PATH_NOT_FOUND: errtxt = "module `%s' not found"; break; case ERROR_TOO_MANY_OPEN_FILES: case ERROR_NOT_ENOUGH_MEMORY: case ERROR_SHARING_BUFFER_EXCEEDED: nomem: errtxt = "out of system resources"; break; case ERROR_ACCESS_DENIED: errtxt = "access denied"; break; case ERROR_BAD_FORMAT: case ERROR_INVALID_SEGMENT_NUMBER: case ERROR_INVALID_ORDINAL: case ERROR_INVALID_MODULETYPE: case ERROR_INVALID_EXE_SIGNATURE: case ERROR_EXE_MARKED_INVALID: case ERROR_ITERATED_DATA_EXCEEDS_64K: case ERROR_INVALID_MINALLOCSIZE: case ERROR_INVALID_SEGDPL: case ERROR_AUTODATASEG_EXCEEDS_64K: case ERROR_RELOCSRC_CHAIN_EXCEEDS_SEGLIMIT: errtxt = "invalid module format"; break; case ERROR_INVALID_NAME: errtxt = "filename doesn't match module name"; break; case ERROR_SHARING_VIOLATION: case ERROR_LOCK_VIOLATION: errtxt = "sharing violation"; break; case ERROR_INIT_ROUTINE_FAILED: errtxt = "module initialization failed"; break; default: errtxt = "cause `%s', error code = %d"; break; } snprintf(dlerr, sizeof(dlerr), errtxt, &err, rc); if (tmp) { if (tmp->name) free(tmp->name); free(tmp); } return 0; } /* return a pointer to the `symbol' in DLL */ void *dlsym(void *handle, char *symbol) { int rc = 0; PFN addr; char *errtxt; int symord = 0; DLLchain tmp = find_id(handle); if (!tmp) goto inv_handle; if (*symbol == '#') symord = atoi(symbol + 1); switch (rc = DosQueryProcAddr(tmp->handle, symord, symbol, &addr)) { case NO_ERROR: return (void *)addr; case ERROR_INVALID_HANDLE: inv_handle: errtxt = "invalid module handle"; break; case ERROR_PROC_NOT_FOUND: case ERROR_INVALID_NAME: errtxt = "no symbol `%s' in module"; break; default: errtxt = "symbol `%s', error code = %d"; break; } snprintf(dlerr, sizeof(dlerr), errtxt, symbol, rc); return NULL; } /* free dynamicaly-linked library */ int dlclose(void *handle) { int rc; DLLchain tmp = find_id(handle); if (!tmp) goto inv_handle; switch (rc = DosFreeModule(tmp->handle)) { case NO_ERROR: free(tmp->name); dlload = tmp->next; free(tmp); return 0; case ERROR_INVALID_HANDLE: inv_handle: strcpy(dlerr, "invalid module handle"); return -1; case ERROR_INVALID_ACCESS: strcpy(dlerr, "access denied"); return -1; default: return -1; } } /* return a string describing last occured dl error */ char *dlerror() { return dlerr; } Python-2.3.7/PC/os2emx/pyconfig.h0000644001241000117560000001743507705251637016004 0ustar loewishpifb6#ifndef Py_CONFIG_H #define Py_CONFIG_H /* config.h. * At some time in the past, generated automatically by/from configure. * now maintained manually. */ /* build environment */ #define PLATFORM "os2emx" #define COMPILER "[EMX GCC " __VERSION__ "]" #define PYOS_OS2 1 #define PYCC_GCC 1 /* default location(s) */ #ifndef PREFIX #define PREFIX "" #endif #ifndef PYTHONPATH #define PYTHONPATH "./Lib;./Lib/plat-" PLATFORM \ ";./Lib/lib-dynload;./Lib/site-packages" #endif /* Debugging */ #ifndef Py_DEBUG /*#define Py_DEBUG 1*/ #endif /* if building an extension or wrapper executable, * mark Python API symbols "extern" so that symbols * imported from the Python core DLL aren't duplicated. */ #ifdef Py_BUILD_CORE # define PyAPI_FUNC(RTYPE) RTYPE #else # define PyAPI_FUNC(RTYPE) extern RTYPE #endif #define PyAPI_DATA(RTYPE) extern RTYPE #define PyMODINIT_FUNC void /* Use OS/2 flavour of threads */ #define WITH_THREAD 1 #define OS2_THREADS 1 /* We want sockets */ #define TCPIPV4 1 #define USE_SOCKET 1 #define socklen_t int /* enable the Python object allocator */ #define WITH_PYMALLOC 1 /* enable the GC module */ #define WITH_CYCLE_GC 1 /* Define if you want to read files with foreign newlines. */ #define WITH_UNIVERSAL_NEWLINES 1 /* Define if you want documentation strings in extension modules */ #define WITH_DOC_STRINGS 1 /* Unicode related */ #define Py_USING_UNICODE 1 #define PY_UNICODE_TYPE wchar_t #define Py_UNICODE_SIZE SIZEOF_SHORT /* system capabilities */ #define HAVE_TTYNAME 1 #define HAVE_WAIT 1 #define HAVE_GETEGID 1 #define HAVE_GETEUID 1 #define HAVE_GETGID 1 #define HAVE_GETPPID 1 #define HAVE_GETUID 1 #define HAVE_OPENDIR 1 #define HAVE_PIPE 1 #define HAVE_POPEN 1 #define HAVE_SYSTEM 1 #define HAVE_TTYNAME 1 #define HAVE_DYNAMIC_LOADING 1 /* if port of GDBM installed, it includes NDBM emulation */ #define HAVE_NDBM_H 1 /* need this for spawnv code in posixmodule (cloned from WIN32 def'n) */ typedef long intptr_t; /* we don't have tm_zone but do have the external array tzname */ #define HAVE_TZNAME 1 /* Define as the return type of signal handlers (int or void). */ #define RETSIGTYPE void /* Define if you have the ANSI C header files. */ #define STDC_HEADERS 1 /* Define if you can safely include both and . */ #define TIME_WITH_SYS_TIME 1 /* Define this if you have the type long long. */ #define HAVE_LONG_LONG 1 /* Define if your compiler supports function prototypes. */ #define HAVE_PROTOTYPES 1 /* Define if your compiler supports variable length function prototypes * (e.g. void fprintf(FILE *, char *, ...);) *and* . */ #define HAVE_STDARG_PROTOTYPES 1 /* Define if malloc(0) returns a NULL pointer. */ #define MALLOC_ZERO_RETURNS_NULL 1 /* Define to force use of thread-safe errno, h_errno, and other functions. */ #define _REENTRANT 1 /* Define if you can safely include both and * (which you can't on SCO ODT 3.0). */ #define SYS_SELECT_WITH_SYS_TIME 1 /* The number of bytes in an off_t. */ #define SIZEOF_OFF_T 4 /* The number of bytes in an time_t. */ #define SIZEOF_TIME_T 4 /* The number of bytes in a short. */ #define SIZEOF_SHORT 2 /* The number of bytes in a int. */ #define SIZEOF_INT 4 /* The number of bytes in a long. */ #define SIZEOF_LONG 4 /* The number of bytes in a long long. */ #define SIZEOF_LONG_LONG 8 /* The number of bytes in a void *. */ #define SIZEOF_VOID_P 4 /* Define if you have the alarm function. */ #define HAVE_ALARM 1 /* Define if you have the clock function. */ #define HAVE_CLOCK 1 /* Define if you have the dup2 function. */ #define HAVE_DUP2 1 /* Define if you have the execv function. */ #define HAVE_EXECV 1 /* Define if you have the spawnv function. */ #define HAVE_SPAWNV 1 /* Define if you have the flock function. */ #define HAVE_FLOCK 1 /* Define if you have the fork function. */ #define HAVE_FORK 1 /* Define if you have the fsync function. */ #define HAVE_FSYNC 1 /* Define if you have the ftime function. */ #define HAVE_FTIME 1 /* Define if you have the ftruncate function. */ #define HAVE_FTRUNCATE 1 /* Define if you have the getcwd function. */ #define HAVE_GETCWD 1 /* Define if you have the getpeername function. */ #define HAVE_GETPEERNAME 1 /* Define if you have the getpgrp function. */ #define HAVE_GETPGRP 1 /* Define if you have the getpid function. */ #define HAVE_GETPID 1 /* Define if you have the getpwent function. */ #define HAVE_GETPWENT 1 /* Define if you have the gettimeofday function. */ #define HAVE_GETTIMEOFDAY 1 /* Define if you have the getwd function. */ #define HAVE_GETWD 1 /* Define if you have the hypot function. */ #define HAVE_HYPOT 1 /* Define if you have the kill function. */ #define HAVE_KILL 1 /* Define if you have the memmove function. */ #define HAVE_MEMMOVE 1 /* Define if you have the mktime function. */ #define HAVE_MKTIME 1 /* Define if you have the pause function. */ #define HAVE_PAUSE 1 /* Define if you have the putenv function. */ #define HAVE_PUTENV 1 /* Define if you have the select function. */ #define HAVE_SELECT 1 /* Define if you have the setgid function. */ #define HAVE_SETGID 1 /* Define if you have the setlocale function. */ #define HAVE_SETLOCALE 1 /* Define if you have the setpgid function. */ #define HAVE_SETPGID 1 /* Define if you have the setuid function. */ #define HAVE_SETUID 1 /* Define if you have the setvbuf function. */ #define HAVE_SETVBUF 1 /* Define if you have the sigaction function. */ #define HAVE_SIGACTION 1 /* Define if you have the strdup function. */ #define HAVE_STRDUP 1 /* Define if you have the strerror function. */ #define HAVE_STRERROR 1 /* Define if you have the strftime function. */ #define HAVE_STRFTIME 1 /* Define if you have the strptime function. */ #define HAVE_STRPTIME 1 /* Define if you have the tcgetpgrp function. */ #define HAVE_TCGETPGRP 1 /* Define if you have the tcsetpgrp function. */ #define HAVE_TCSETPGRP 1 /* Define if you have the tmpfile function. */ #define HAVE_TMPFILE 1 /* Define if you have the times function. */ #define HAVE_TIMES 1 /* Define if you have the truncate function. */ #define HAVE_TRUNCATE 1 /* Define if you have the uname function. */ #define HAVE_UNAME 1 /* Define if you have the waitpid function. */ #define HAVE_WAITPID 1 /* Define if you have the header file. */ #define HAVE_DIRENT_H 1 /* Define if you have the header file. */ #define HAVE_FCNTL_H 1 /* Define if you have the header file. */ #define HAVE_LIMITS_H 1 /* Define if you have the header file. */ #define HAVE_LOCALE_H 1 /* Define if you have the header file. */ #define HAVE_NCURSES_H 1 /* Define if you have the header file. */ #define HAVE_SIGNAL_H 1 /* Define if you have the header file. */ #define HAVE_STDARG_H 1 /* Define if you have the header file. */ #define HAVE_STDDEF_H 1 /* Define if you have the header file. */ #define HAVE_STDLIB_H 1 /* Define if you have the header file. */ #define HAVE_SYS_FILE_H 1 /* Define if you have the header file. */ #define HAVE_SYS_PARAM_H 1 /* Define if you have the header file. */ #define HAVE_SYS_SELECT_H 1 /* Define if you have the header file. */ #define HAVE_SYS_TIME_H 1 /* Define if you have the header file. */ #define HAVE_SYS_TIMES_H 1 /* Define if you have the header file. */ #define HAVE_SYS_UN_H 1 /* Define if you have the header file. */ #define HAVE_SYS_UTSNAME_H 1 /* Define if you have the header file. */ #define HAVE_SYS_WAIT_H 1 /* Define if you have the header file. */ #define HAVE_UNISTD_H 1 /* Define if you have the header file. */ #define HAVE_UTIME_H 1 /* EMX has an snprintf(). */ #define HAVE_SNPRINTF 1 #endif /* !Py_CONFIG_H */ Python-2.3.7/PC/os2emx/dlfcn.h0000644001241000117560000000373307651132506015241 0ustar loewishpifb6/* -*- C -*- *********************************************** Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, The Netherlands. All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the names of Stichting Mathematisch Centrum or CWI or Corporation for National Research Initiatives or CNRI not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. While CWI is the initial source for this software, a modified version is made available by the Corporation for National Research Initiatives (CNRI) at the Internet address ftp://ftp.python.org. STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ******************************************************************/ /* This library implements dlopen() - Unix-like dynamic linking * emulation functions for OS/2 using DosLoadModule() and company. */ #ifndef _DLFCN_H #define _DLFCN_H /* load a dynamic-link library and return handle */ void *dlopen(char *filename, int flags); /* return a pointer to the `symbol' in DLL */ void *dlsym(void *handle, char *symbol); /* free dynamicaly-linked library */ int dlclose(void *handle); /* return a string describing last occured dl error */ char *dlerror(void); #endif /* !_DLFCN_H */ Python-2.3.7/PC/os2emx/python23.def0000644001241000117560000006142107705251637016155 0ustar loewishpifb6LIBRARY python23 INITINSTANCE TERMINSTANCE DESCRIPTION "Python 2.3 Core DLL" PROTMODE DATA MULTIPLE NONSHARED EXPORTS ; From python23_s.lib(config) "_PyImport_Inittab" ; From python23_s.lib(dlfcn) ; "dlopen" ; "dlsym" ; "dlclose" ; "dlerror" ; From python23_s.lib(getpathp) "Py_GetProgramFullPath" "Py_GetPrefix" "Py_GetExecPrefix" "Py_GetPath" ; From python23_s.lib(getbuildinfo) "Py_GetBuildInfo" ; From python23_s.lib(main) "Py_Main" "Py_GetArgcArgv" ; From python23_s.lib(acceler) "PyGrammar_AddAccelerators" "PyGrammar_RemoveAccelerators" ; From python23_s.lib(grammar1) "PyGrammar_FindDFA" "PyGrammar_LabelRepr" ; From python23_s.lib(listnode) "PyNode_ListTree" ; From python23_s.lib(node) "PyNode_AddChild" "PyNode_New" "PyNode_Free" ; From python23_s.lib(parser) "PyParser_AddToken" "PyParser_New" "PyParser_Delete" ; From python23_s.lib(parsetok) "Py_TabcheckFlag" "PyParser_ParseString" "PyParser_ParseStringFlags" "PyParser_ParseFile" "PyParser_ParseFileFlags" "PyParser_ParseStringFlagsFilename" ; From python23_s.lib(bitset) "_Py_newbitset" "_Py_delbitset" "_Py_addbit" "_Py_samebitset" "_Py_mergebitset" ; From python23_s.lib(metagrammar) "_Py_meta_grammar" "Py_meta_grammar" ; From python23_s.lib(tokenizer) "PyToken_OneChar" "PyToken_TwoChars" "PyToken_ThreeChars" "PyTokenizer_FromString" "PyTokenizer_FromFile" "PyTokenizer_Free" "PyTokenizer_Get" "_PyParser_TokenNames" ; From python23_s.lib(myreadline) "PyOS_ReadlineFunctionPointer" "PyOS_StdioReadline" "PyOS_Readline" "PyOS_InputHook" ; From python23_s.lib(abstract) "PyObject_GetItem" "PySequence_GetItem" "PyObject_SetItem" "PySequence_SetItem" "PyObject_DelItem" "PySequence_DelItem" "PyNumber_Multiply" "PyNumber_InPlaceAdd" "PyNumber_InPlaceMultiply" "PyNumber_Int" "PyNumber_Long" "PyNumber_Float" "PySequence_GetSlice" "PySequence_SetSlice" "PySequence_Tuple" "PyObject_GetIter" "PyIter_Next" "PySequence_List" "_PySequence_IterSearch" "PyObject_CallFunction" "PyObject_CallMethod" "PyObject_CallMethodObjArgs" "PyObject_CallFunctionObjArgs" "PyObject_IsInstance" "PyObject_IsSubclass" "PyObject_Cmp" "PyObject_Call" "PyObject_CallObject" "PyObject_Type" "PyObject_Size" "PyMapping_Size" "PyObject_Length" "PyObject_DelItemString" "PyObject_AsCharBuffer" "PyObject_CheckReadBuffer" "PyObject_AsReadBuffer" "PyObject_AsWriteBuffer" "PyNumber_Check" "PyNumber_Add" "PyNumber_Subtract" "PyNumber_Divide" "PyNumber_FloorDivide" "PyNumber_TrueDivide" "PyNumber_Remainder" "PyNumber_Divmod" "PyNumber_Power" "PyNumber_Negative" "PyNumber_Positive" "PyNumber_Absolute" "PyNumber_Invert" "PyNumber_Lshift" "PyNumber_Rshift" "PyNumber_And" "PyNumber_Xor" "PyNumber_Or" "PyNumber_InPlaceSubtract" "PyNumber_InPlaceDivide" "PyNumber_InPlaceFloorDivide" "PyNumber_InPlaceTrueDivide" "PyNumber_InPlaceRemainder" "PyNumber_InPlacePower" "PyNumber_InPlaceLshift" "PyNumber_InPlaceRshift" "PyNumber_InPlaceAnd" "PyNumber_InPlaceXor" "PyNumber_InPlaceOr" "PySequence_Check" "PySequence_Size" "PySequence_Length" "PySequence_Concat" "PySequence_Repeat" "PySequence_DelSlice" "PySequence_Fast" "PySequence_Count" "PySequence_Contains" "PySequence_In" "PySequence_Index" "PySequence_InPlaceConcat" "PySequence_InPlaceRepeat" "PyMapping_Check" "PyMapping_Length" "PyMapping_HasKeyString" "PyMapping_HasKey" "PyMapping_GetItemString" "PyMapping_SetItemString" ; From python23_s.lib(boolobject) "PyBool_FromLong" "PyBool_Type" "_Py_ZeroStruct" "_Py_TrueStruct" ; From python23_s.lib(bufferobject) "PyBuffer_FromObject" "PyBuffer_FromReadWriteObject" "PyBuffer_FromMemory" "PyBuffer_FromReadWriteMemory" "PyBuffer_New" "PyBuffer_Type" ; From python23_s.lib(cellobject) "PyCell_New" "PyCell_Get" "PyCell_Set" "PyCell_Type" ; From python23_s.lib(classobject) "PyClass_New" "PyClass_IsSubclass" "PyInstance_New" "PyInstance_NewRaw" "PyMethod_New" "PyMethod_Function" "PyMethod_Self" "PyMethod_Class" "_PyInstance_Lookup" "PyMethod_Fini" "PyClass_Type" "PyInstance_Type" "PyMethod_Type" ; From python23_s.lib(cobject) "PyCObject_FromVoidPtr" "PyCObject_FromVoidPtrAndDesc" "PyCObject_AsVoidPtr" "PyCObject_GetDesc" "PyCObject_Import" "PyCObject_Type" ; From python23_s.lib(complexobject) "_Py_c_pow" "_Py_c_sum" "_Py_c_diff" "_Py_c_neg" "_Py_c_prod" "_Py_c_quot" "PyComplex_FromCComplex" "PyComplex_FromDoubles" "PyComplex_RealAsDouble" "PyComplex_ImagAsDouble" "PyComplex_AsCComplex" "PyComplex_Type" ; From python23_s.lib(descrobject) "PyWrapper_New" "PyDescr_NewMethod" "PyDescr_NewClassMethod" "PyDescr_NewMember" "PyDescr_NewGetSet" "PyDescr_NewWrapper" "PyDictProxy_New" "PyWrapperDescr_Type" "PyProperty_Type" ; From python23_s.lib(dictobject) "PyDict_SetItem" "PyDict_DelItem" "PyDict_Clear" "PyDict_MergeFromSeq2" "PyDict_Merge" "PyDict_Copy" "PyDict_Keys" "PyDict_Values" "PyDict_New" "PyDict_GetItem" "PyDict_Next" "PyDict_Items" "PyDict_Size" "PyDict_Update" "PyDict_GetItemString" "PyDict_SetItemString" "PyDict_DelItemString" "PyDict_Type" "PyDictIter_Type" ; From python23_s.lib(enumobject) "PyEnum_Type" ; From python23_s.lib(fileobject) "Py_UniversalNewlineFread" "PyFile_GetLine" "PyFile_SoftSpace" "PyFile_WriteObject" "PyFile_WriteString" "PyObject_AsFileDescriptor" "Py_UniversalNewlineFgets" "PyFile_FromString" "PyFile_SetBufSize" "PyFile_SetEncoding" "PyFile_FromFile" "PyFile_AsFile" "PyFile_Name" "PyFile_Type" ; From python23_s.lib(floatobject) "PyFloat_FromString" "PyFloat_AsDouble" "PyFloat_Fini" "_PyFloat_Pack4" "_PyFloat_Pack8" "PyFloat_FromDouble" "PyFloat_AsReprString" "PyFloat_AsString" "_PyFloat_Unpack4" "_PyFloat_Unpack8" "PyFloat_AsStringEx" "PyFloat_Type" ; From python23_s.lib(frameobject) "PyFrame_New" "PyFrame_FastToLocals" "PyFrame_LocalsToFast" "_PyFrame_Init" "PyFrame_Fini" "PyFrame_BlockSetup" "PyFrame_BlockPop" "PyFrame_Type" ; From python23_s.lib(funcobject) "PyFunction_New" "PyFunction_GetCode" "PyFunction_GetGlobals" "PyFunction_GetModule" "PyFunction_GetDefaults" "PyFunction_SetDefaults" "PyFunction_GetClosure" "PyFunction_SetClosure" "PyClassMethod_New" "PyStaticMethod_New" "PyFunction_Type" "PyClassMethod_Type" "PyStaticMethod_Type" ; From python23_s.lib(intobject) "PyInt_AsLong" "PyInt_AsUnsignedLongMask" "PyInt_AsUnsignedLongLongMask" "PyInt_FromString" "PyInt_Fini" "PyInt_FromUnicode" "PyInt_FromLong" "PyInt_GetMax" "_PyInt_Init" "PyInt_Type" ; From python23_s.lib(iterobject) "PySeqIter_New" "PyCallIter_New" "PySeqIter_Type" "PyCallIter_Type" ; From python23_s.lib(listobject) "PyList_New" "PyList_Insert" "PyList_Append" "PyList_Size" "PyList_GetItem" "PyList_SetItem" "PyList_GetSlice" "PyList_SetSlice" "PyList_Sort" "PyList_Reverse" "PyList_AsTuple" "PyList_Type" "PyListIter_Type" ; From python23_s.lib(longobject) "PyLong_FromDouble" "PyLong_AsLong" "_PyLong_FromByteArray" "_PyLong_AsByteArray" "PyLong_AsDouble" "PyLong_FromString" "PyLong_FromLong" "PyLong_FromUnsignedLong" "PyLong_AsUnsignedLong" "PyLong_AsUnsignedLongMask" "_PyLong_AsScaledDouble" "PyLong_FromVoidPtr" "PyLong_AsVoidPtr" "PyLong_FromLongLong" "PyLong_FromUnsignedLongLong" "PyLong_AsLongLong" "PyLong_AsUnsignedLongLong" "PyLong_AsUnsignedLongLongMask" "PyLong_FromUnicode" "_PyLong_Sign" "_PyLong_NumBits" "_PyLong_New" "_PyLong_Copy" "PyLong_Type" ; From python23_s.lib(methodobject) "PyCFunction_Call" "Py_FindMethodInChain" "PyCFunction_GetFunction" "PyCFunction_GetSelf" "PyCFunction_GetFlags" "Py_FindMethod" "PyCFunction_NewEx" "PyCFunction_Fini" "PyCFunction_New" "PyCFunction_Type" ; From python23_s.lib(moduleobject) "PyModule_New" "_PyModule_Clear" "PyModule_GetDict" "PyModule_GetName" "PyModule_GetFilename" "PyModule_Type" ; From python23_s.lib(object) "Py_DivisionWarningFlag" "PyObject_Str" "PyObject_Repr" "PyObject_Unicode" "PyObject_GetAttr" "PyObject_IsTrue" "PyNumber_CoerceEx" "PyObject_Compare" "PyObject_RichCompare" "_Py_HashDouble" "PyObject_Hash" "PyObject_SetAttr" "PyObject_GenericGetAttr" "PyObject_GenericSetAttr" "PyCallable_Check" "PyObject_Dir" "PyMem_Malloc" "PyMem_Realloc" "PyMem_Free" "PyObject_Print" "_PyObject_Dump" "PyObject_RichCompareBool" "PyObject_GetAttrString" "PyObject_SetAttrString" "PyObject_HasAttrString" "PyObject_HasAttr" "_PyObject_GetDictPtr" "PyObject_SelfIter" "PyObject_Not" "PyNumber_Coerce" "Py_ReprEnter" "Py_ReprLeave" "_Py_HashPointer" "_PyTrash_deposit_object" "_PyTrash_destroy_chain" "PyObject_Init" "PyObject_InitVar" "_PyObject_New" "_PyObject_NewVar" "_PyObject_Del" "_Py_ReadyTypes" "_Py_NotImplementedStruct" "_Py_NoneStruct" "_Py_cobject_hack" "_Py_abstract_hack" "_PyTrash_delete_nesting" "_PyTrash_delete_later" ; From python23_s.lib(obmalloc) "PyObject_Malloc" "PyObject_Realloc" "PyObject_Free" ; From python23_s.lib(rangeobject) "PyRange_New" "PyRange_Type" ; From python23_s.lib(sliceobject) "PySlice_GetIndices" "PySlice_GetIndicesEx" "PySlice_New" "_Py_EllipsisObject" "PySlice_Type" ; From python23_s.lib(stringobject) "PyString_FromStringAndSize" "PyString_InternInPlace" "PyString_FromString" "PyString_FromFormatV" "PyString_AsString" "_PyString_Resize" "PyString_FromFormat" "PyString_AsDecodedString" "PyString_AsEncodedString" "PyString_DecodeEscape" "PyString_Size" "PyString_Repr" "PyString_AsStringAndSize" "_PyString_FormatLong" "PyString_Format" "_Py_ReleaseInternedStrings" "PyString_Concat" "PyString_ConcatAndDel" "_PyString_Eq" "PyString_InternImmortal" "PyString_InternFromString" "_PyString_Join" "PyString_Decode" "PyString_Encode" "PyString_AsEncodedObject" "PyString_AsDecodedObject" "PyString_Fini" "PyString_Type" "PyBaseString_Type" ; From python23_s.lib(structseq) "PyStructSequence_InitType" "PyStructSequence_New" "PyStructSequence_UnnamedField" ; From python23_s.lib(tupleobject) "PyTuple_New" "_PyTuple_Resize" "PyTuple_Size" "PyTuple_GetItem" "PyTuple_SetItem" "PyTuple_GetSlice" "PyTuple_Fini" "PyTuple_Type" "PyTupleIter_Type" ; From python23_s.lib(typeobject) "PyType_IsSubtype" "_PyType_Lookup" "PyType_Ready" "PyType_GenericAlloc" "_PyObject_SlotCompare" "PyType_GenericNew" "PyType_Type" "PyBaseObject_Type" "PySuper_Type" ; From python23_s.lib(unicodeobject) "PyUnicodeUCS2_Resize" "PyUnicodeUCS2_FromOrdinal" "PyUnicodeUCS2_FromObject" "PyUnicodeUCS2_FromEncodedObject" "PyUnicodeUCS2_Decode" "PyUnicodeUCS2_GetDefaultEncoding" "PyUnicodeUCS2_DecodeUTF8" "PyUnicodeUCS2_DecodeLatin1" "PyUnicodeUCS2_DecodeASCII" "PyUnicodeUCS2_AsEncodedString" "PyUnicodeUCS2_AsUTF8String" "PyUnicodeUCS2_AsLatin1String" "PyUnicodeUCS2_AsASCIIString" "PyUnicode_DecodeUTF7" "PyUnicode_EncodeUTF7" "PyUnicodeUCS2_EncodeUTF8" "PyUnicodeUCS2_DecodeUTF16" "PyUnicodeUCS2_AsUTF16String" "PyUnicodeUCS2_DecodeUnicodeEscape" "PyUnicodeUCS2_DecodeRawUnicodeEscape" "PyUnicodeUCS2_EncodeRawUnicodeEscape" "PyUnicodeUCS2_DecodeCharmap" "PyUnicodeUCS2_EncodeCharmap" "PyUnicodeUCS2_TranslateCharmap" "PyUnicodeUCS2_EncodeDecimal" "PyUnicodeUCS2_Count" "PyUnicodeUCS2_Find" "PyUnicodeUCS2_Tailmatch" "PyUnicodeUCS2_Join" "PyUnicodeUCS2_Splitlines" "PyUnicodeUCS2_Compare" "PyUnicodeUCS2_Contains" "PyUnicodeUCS2_Concat" "_PyUnicode_XStrip" "PyUnicodeUCS2_Replace" "PyUnicodeUCS2_Split" "PyUnicodeUCS2_Format" "_PyUnicodeUCS2_Fini" "PyUnicodeUCS2_FromUnicode" "PyUnicodeUCS2_AsUnicode" "PyUnicodeUCS2_GetSize" "PyUnicodeUCS2_GetMax" "_PyUnicodeUCS2_AsDefaultEncodedString" "PyUnicodeUCS2_SetDefaultEncoding" "PyUnicodeUCS2_Encode" "PyUnicodeUCS2_EncodeUTF16" "PyUnicodeUCS2_AsUnicodeEscapeString" "PyUnicodeUCS2_EncodeUnicodeEscape" "PyUnicodeUCS2_AsRawUnicodeEscapeString" "PyUnicodeUCS2_EncodeLatin1" "PyUnicodeUCS2_EncodeASCII" "PyUnicodeUCS2_AsCharmapString" "PyUnicodeUCS2_Translate" "_PyUnicodeUCS2_Init" "PyUnicode_Type" ; From python23_s.lib(unicodectype) "_PyUnicode_TypeRecords" "_PyUnicodeUCS2_ToNumeric" "_PyUnicodeUCS2_IsLowercase" "_PyUnicodeUCS2_IsUppercase" "_PyUnicodeUCS2_IsTitlecase" "_PyUnicodeUCS2_IsWhitespace" "_PyUnicodeUCS2_IsLinebreak" "_PyUnicodeUCS2_ToLowercase" "_PyUnicodeUCS2_ToUppercase" "_PyUnicodeUCS2_ToTitlecase" "_PyUnicodeUCS2_ToDecimalDigit" "_PyUnicodeUCS2_ToDigit" "_PyUnicodeUCS2_IsDecimalDigit" "_PyUnicodeUCS2_IsDigit" "_PyUnicodeUCS2_IsNumeric" "_PyUnicodeUCS2_IsAlpha" ; From python23_s.lib(weakrefobject) "PyWeakref_NewRef" "PyWeakref_NewProxy" "PyObject_ClearWeakRefs" "PyWeakref_GetObject" "_PyWeakref_GetWeakrefCount" "_PyWeakref_RefType" "_PyWeakref_ProxyType" "_PyWeakref_CallableProxyType" ; From python23_s.lib(bltinmodule) "_PyBuiltin_Init" "Py_FileSystemDefaultEncoding" ; From python23_s.lib(exceptions) "PyExc_Exception" "PyExc_TypeError" "PyExc_StopIteration" "PyExc_StandardError" "PyExc_SystemExit" "PyExc_KeyboardInterrupt" "PyExc_ImportError" "PyExc_EnvironmentError" "PyExc_IOError" "PyExc_OSError" "PyExc_EOFError" "PyExc_RuntimeError" "PyExc_NotImplementedError" "PyExc_NameError" "PyExc_UnboundLocalError" "PyExc_AttributeError" "PyExc_SyntaxError" "PyExc_IndentationError" "PyExc_TabError" "PyExc_AssertionError" "PyExc_LookupError" "PyExc_IndexError" "PyExc_KeyError" "PyExc_ArithmeticError" "PyExc_OverflowError" "PyExc_ZeroDivisionError" "PyExc_FloatingPointError" "PyExc_ValueError" "PyExc_UnicodeError" "PyExc_UnicodeEncodeError" "PyExc_UnicodeDecodeError" "PyExc_UnicodeTranslateError" "PyExc_ReferenceError" "PyExc_SystemError" "PyExc_MemoryError" "PyExc_Warning" "PyExc_UserWarning" "PyExc_DeprecationWarning" "PyExc_PendingDeprecationWarning" "PyExc_SyntaxWarning" "PyExc_OverflowWarning" "PyExc_RuntimeWarning" "PyExc_FutureWarning" "PyExc_MemoryErrorInst" "PyUnicodeEncodeError_GetStart" "PyUnicodeDecodeError_GetStart" "PyUnicodeEncodeError_GetEnd" "PyUnicodeDecodeError_GetEnd" "_PyExc_Init" "_PyExc_Fini" "PyUnicodeDecodeError_Create" "PyUnicodeEncodeError_Create" "PyUnicodeTranslateError_Create" "PyUnicodeEncodeError_GetEncoding" "PyUnicodeDecodeError_GetEncoding" "PyUnicodeEncodeError_GetObject" "PyUnicodeDecodeError_GetObject" "PyUnicodeTranslateError_GetObject" "PyUnicodeTranslateError_GetStart" "PyUnicodeEncodeError_SetStart" "PyUnicodeDecodeError_SetStart" "PyUnicodeTranslateError_SetStart" "PyUnicodeTranslateError_GetEnd" "PyUnicodeEncodeError_SetEnd" "PyUnicodeDecodeError_SetEnd" "PyUnicodeTranslateError_SetEnd" "PyUnicodeEncodeError_GetReason" "PyUnicodeDecodeError_GetReason" "PyUnicodeTranslateError_GetReason" "PyUnicodeEncodeError_SetReason" "PyUnicodeDecodeError_SetReason" "PyUnicodeTranslateError_SetReason" ; From python23_s.lib(ceval) "PyEval_CallObjectWithKeywords" "PyEval_EvalCodeEx" "_PyEval_SliceIndex" "PyEval_GetFrame" "PyEval_CallObject" "PyEval_SetProfile" "PyEval_SetTrace" "PyEval_GetBuiltins" "PyEval_GetGlobals" "PyEval_GetLocals" "PyEval_GetRestricted" "PyEval_MergeCompilerFlags" "Py_FlushLine" "Py_AddPendingCall" "Py_MakePendingCalls" "Py_SetRecursionLimit" "Py_GetRecursionLimit" "PyEval_GetFuncName" "PyEval_GetFuncDesc" "PyEval_GetCallStats" "PyEval_SaveThread" "PyEval_RestoreThread" "PyEval_InitThreads" "PyEval_AcquireLock" "PyEval_ReleaseLock" "PyEval_AcquireThread" "PyEval_ReleaseThread" "PyEval_ReInitThreads" "PyEval_EvalCode" "_PyEval_CallTracing" "_Py_CheckInterval" "_Py_Ticker" ; From python23_s.lib(compile) "PyCode_New" "PySymtable_Free" "_Py_Mangle" "PyNode_Compile" "PyNode_CompileFlags" "PyCode_Addr2Line" "PyNode_CompileSymtable" "Py_OptimizeFlag" "PyCode_Type" ; From python23_s.lib(codecs) "_PyCodec_Lookup" "PyCodec_StreamReader" "PyCodec_StreamWriter" "PyCodec_Encode" "PyCodec_Decode" "PyCodec_IgnoreErrors" "PyCodec_ReplaceErrors" "PyCodec_XMLCharRefReplaceErrors" "PyCodec_BackslashReplaceErrors" "PyCodec_Register" "PyCodec_Encoder" "PyCodec_Decoder" "PyCodec_RegisterError" "PyCodec_LookupError" "PyCodec_StrictErrors" ; From python23_s.lib(errors) "PyErr_SetNone" "PyErr_SetString" "PyErr_ExceptionMatches" "PyErr_GivenExceptionMatches" "PyErr_NormalizeException" "PyErr_Fetch" "PyErr_Clear" "PyErr_NoMemory" "PyErr_SetFromErrnoWithFilenameObject" "PyErr_Format" "PyErr_NewException" "PyErr_WriteUnraisable" "PyErr_SyntaxLocation" "PyErr_ProgramText" "PyErr_SetObject" "PyErr_Occurred" "PyErr_Restore" "PyErr_BadArgument" "PyErr_SetFromErrno" "PyErr_SetFromErrnoWithFilename" "PyErr_BadInternalCall" "_PyErr_BadInternalCall" "PyErr_Warn" "PyErr_WarnExplicit" ; From python23_s.lib(frozen) "PyImport_FrozenModules" ; From python23_s.lib(frozenmain) "Py_FrozenMain" ; From python23_s.lib(future) "PyNode_Future" ; From python23_s.lib(getargs) "PyArg_Parse" "PyArg_ParseTuple" "PyArg_ParseTupleAndKeywords" "PyArg_UnpackTuple" "PyArg_VaParse" ; From python23_s.lib(getcompiler) "Py_GetCompiler" ; From python23_s.lib(getcopyright) "Py_GetCopyright" ; From python23_s.lib(getmtime) "PyOS_GetLastModificationTime" ; From python23_s.lib(getplatform) "Py_GetPlatform" ; From python23_s.lib(getversion) "Py_GetVersion" ; From python23_s.lib(graminit) "_PyParser_Grammar" ; From python23_s.lib(import) "_PyImport_Init" "_PyImportHooks_Init" "PyImport_ImportModule" "PyImport_Cleanup" "_PyImport_FixupExtension" "PyImport_AddModule" "PyImport_ExecCodeModuleEx" "PyImport_ImportFrozenModule" "PyImport_ImportModuleEx" "PyImport_ReloadModule" "PyImport_Import" ; "initimp" "_PyImport_Fini" "PyImport_GetMagicNumber" "PyImport_ExecCodeModule" "PyImport_GetModuleDict" "_PyImport_FindExtension" "PyImport_AppendInittab" "PyImport_ExtendInittab" "PyImport_Inittab" "_PyImport_Filetab" ; From python23_s.lib(importdl) "_PyImport_LoadDynamicModule" ; From python23_s.lib(marshal) "PyMarshal_ReadLongFromFile" "PyMarshal_ReadLastObjectFromFile" "PyMarshal_ReadObjectFromString" "PyMarshal_ReadObjectFromFile" "PyMarshal_WriteObjectToString" "PyMarshal_WriteLongToFile" "PyMarshal_WriteObjectToFile" "PyMarshal_ReadShortFromFile" "PyMarshal_Init" ; From python23_s.lib(modsupport) "Py_InitModule4" "Py_BuildValue" "Py_VaBuildValue" "PyEval_CallFunction" "PyEval_CallMethod" "PyModule_AddObject" "PyModule_AddIntConstant" "PyModule_AddStringConstant" "_Py_PackageContext" ; From python23_s.lib(mysnprintf) "PyOS_snprintf" "PyOS_vsnprintf" ; From python23_s.lib(mystrtoul) "PyOS_strtoul" "PyOS_strtol" ; From python23_s.lib(pyfpe) "PyFPE_dummy" ; From python23_s.lib(pystate) "PyInterpreterState_Clear" "PyThreadState_Clear" "PyGILState_Ensure" "PyGILState_Release" "PyInterpreterState_New" "PyInterpreterState_Delete" "PyThreadState_Delete" "PyThreadState_New" "PyThreadState_DeleteCurrent" "PyThreadState_Get" "PyThreadState_Swap" "PyThreadState_GetDict" "PyThreadState_SetAsyncExc" "PyGILState_GetThisThreadState" "PyInterpreterState_Head" "PyInterpreterState_Next" "PyInterpreterState_ThreadHead" "PyThreadState_Next" "_PyGILState_Init" "_PyGILState_Fini" "_PyThreadState_Current" "_PyThreadState_GetFrame" ; From python23_s.lib(pythonrun) "Py_IgnoreEnvironmentFlag" "Py_DebugFlag" "Py_VerboseFlag" "Py_NoSiteFlag" "Py_InteractiveFlag" "Py_FrozenFlag" "Py_Initialize" "Py_FatalError" "Py_NewInterpreter" "PyErr_Print" "PyRun_InteractiveOneFlags" "PyRun_SimpleFileExFlags" "PyRun_FileExFlags" "Py_Exit" "PyErr_PrintEx" "PyErr_Display" "Py_SetProgramName" "Py_GetProgramName" "Py_SetPythonHome" "Py_GetPythonHome" "Py_Finalize" "Py_IsInitialized" "Py_EndInterpreter" "PyRun_AnyFile" "PyRun_AnyFileExFlags" "PyRun_AnyFileEx" "PyRun_AnyFileFlags" "Py_FdIsInteractive" "PyRun_InteractiveLoopFlags" "PyRun_SimpleString" "PyRun_SimpleStringFlags" "PyRun_StringFlags" "PyRun_SimpleFile" "PyRun_SimpleFileEx" "PyRun_InteractiveOne" "PyRun_InteractiveLoop" "PyParser_SimpleParseString" "PyParser_SimpleParseFile" "PyParser_SimpleParseStringFlags" "PyParser_SimpleParseStringFlagsFilename" "PyParser_SimpleParseFileFlags" "PyRun_String" "PyRun_File" "PyRun_FileEx" "PyRun_FileFlags" "Py_CompileString" "Py_CompileStringFlags" "Py_SymtableString" "Py_AtExit" "PyOS_getsig" "PyOS_setsig" "PyParser_SetError" "PyParser_SimpleParseStringFilename" "Py_UseClassExceptionsFlag" "Py_UnicodeFlag" "_Py_QnewFlag" "PyModule_WarningsModule" "_PyThread_Started" ; From python23_s.lib(structmember) "PyMember_Get" "PyMember_GetOne" "PyMember_SetOne" "PyMember_Set" ; From python23_s.lib(symtable) "PySymtableEntry_New" "PySymtableEntry_Type" ; From python23_s.lib(sysmodule) "_PySys_Init" "PySys_SetPath" "PySys_SetArgv" "PySys_WriteStdout" "PySys_WriteStderr" "PySys_GetObject" "PySys_SetObject" "PySys_GetFile" "PySys_ResetWarnOptions" "PySys_AddWarnOption" ; From python23_s.lib(traceback) "PyTraceBack_Here" "PyTraceBack_Print" "PyTraceBack_Type" ; From python23_s.lib(getopt) "_PyOS_GetOpt" "_PyOS_opterr" "_PyOS_optind" "_PyOS_optarg" ; From python23_s.lib(dynload_shlib) "_PyImport_DynLoadFiletab" "_PyImport_GetDynLoadFunc" ; From python23_s.lib(thread) "PyThread_delete_key_value" "PyThread_init_thread" "PyThread_start_new_thread" "PyThread_exit_thread" "PyThread_get_thread_ident" "PyThread_allocate_lock" "PyThread_free_lock" "PyThread_acquire_lock" "PyThread_release_lock" "PyThread_create_key" "PyThread_delete_key" "PyThread_set_key_value" "PyThread_get_key_value" "PyThread__exit_thread" ; From python23_s.lib(gcmodule) ; "initgc" "_PyObject_GC_New" "_PyObject_GC_NewVar" "PyGC_Collect" "_PyObject_GC_Resize" "_PyObject_GC_Malloc" "PyObject_GC_Track" "PyObject_GC_UnTrack" "PyObject_GC_Del" "_PyGC_Dump" "_PyObject_GC_Track" "_PyObject_GC_UnTrack" "_PyObject_GC_Del" "_PyGC_generation0" ; From python23_s.lib(signalmodule) ; "initsignal" "PyErr_CheckSignals" "PyErr_SetInterrupt" "PyOS_FiniInterrupts" "PyOS_InterruptOccurred" "PyOS_InitInterrupts" "PyOS_AfterFork" ; From python23_s.lib(posixmodule) ; "initos2" ; From python23_s.lib(threadmodule) ; "initthread" ; From python23_s.lib(arraymodule) ; "initarray" ; "array_methods" ; From python23_s.lib(binascii) ; "initbinascii" ; From python23_s.lib(cmathmodule) ; "initcmath" ; From python23_s.lib(_codecsmodule) ; "init_codecs" ; From python23_s.lib(cPickle) ; "initcPickle" ; "fast_save_leave" ; From python23_s.lib(cStringIO) ; "initcStringIO" ; From python23_s.lib(_csv) ; "init_csv" ; From python23_s.lib(datetimemodule) ; "initdatetime" ; From python23_s.lib(dlmodule) ; "initdl" ; From python23_s.lib(errnomodule) ; "initerrno" ; From python23_s.lib(fcntlmodule) ; "initfcntl" ; From python23_s.lib(imageop) ; "initimageop" ; From python23_s.lib(itertoolsmodule) ; "inititertools" ; From python23_s.lib(_localemodule) ; "init_locale" ; From python23_s.lib(mathmodule) ; "initmath" ; From python23_s.lib(md5c) ; "_Py_MD5Final" ; "_Py_MD5Init" ; "_Py_MD5Update" ; From python23_s.lib(md5module) ; "initmd5" ; From python23_s.lib(operator) ; "initoperator" ; From python23_s.lib(pcremodule) ; "initpcre" ; From python23_s.lib(pypcre) ; "pcre_study" ; "pcre_compile" ; "pcre_exec" ; "pcre_info" ; "pcre_version" ; "pcre_lcc" ; "pcre_fcc" ; "pcre_cbits" ; "pcre_ctypes" ; "pcre_malloc" ; "pcre_free" ; From python23_s.lib(_randommodule) ; "init_random" ; From python23_s.lib(regexmodule) ; "initregex" ; From python23_s.lib(regexpr) ; "_Py_re_syntax_table" ; "_Py_re_compile_initialize" ; "_Py_re_compile_pattern" ; "_Py_re_match" ; "_Py_re_search" ; "_Py_re_set_syntax" ; "_Py_re_compile_fastmap" ; "_Py_re_syntax" ; From python23_s.lib(rgbimgmodule) ; "initrgbimg" ; From python23_s.lib(shamodule) ; "initsha" ; From python23_s.lib(_sre) ; "init_sre" ; From python23_s.lib(stropmodule) ; "initstrop" ; From python23_s.lib(structmodule) ; "initstruct" ; From python23_s.lib(symtablemodule) ; "init_symtable" ; From python23_s.lib(termios) ; "inittermios" ; From python23_s.lib(timemodule) ; "inittime" ; "inittimezone" ; From python23_s.lib(timingmodule) ; "inittiming" ; From python23_s.lib(_weakref) ; "init_weakref" ; From python23_s.lib(xreadlinesmodule) ; "initxreadlines" ; From python23_s.lib(xxsubtype) ; "initxxsubtype" ; From python23_s.lib(zipimport) ; "initzipimport" Python-2.3.7/PC/os2emx/README.os2emx0000644001241000117560000007375010172734123016077 0ustar loewishpifb6This is a port of Python 2.3.5 to OS/2 using the EMX development tools ========================================================================= What's new since the previous release ------------------------------------- - thread stack size is now a compile-time tunable Licenses and info about Python and EMX -------------------------------------- Please read the file README.Python-2.3.5 included in this package for information about Python 2.3.5. This file is the README file from the Python 2.3.5 source distribution available via http://www.python.org/ and its mirrors. The file LICENCE.Python-2.3.5 is the text of the Licence from the Python 2.3.5 source distribution. Note that the EMX package that this package depends on is released under the GNU General Public Licence. Please refer to the documentation accompanying the EMX Runtime libraries for more information about the implications of this. A copy of version 2 of the GPL is included as the file COPYING.gpl2. Readline and GDBM are covered by the GNU General Public Licence. I think Eberhard Mattes' porting changes to BSD DB v1.85 are also GPL'ed (BSD DB itself is BSD Licenced). ncurses and expat appear to be covered by MIT style licences - please refer to the source distributions for more detail. zlib is distributable under a very free license. GNU MP and GNU UFC are under the GNU LGPL (see file COPYING.lib). My patches to the Python-2.x source distributions, and any other packages used in this port, are placed in the public domain. This software is provided 'as-is', without any express or implied warranty. In no event will the author be held liable for any damages arising from the use of the software. I do hope however that it proves useful to someone. Other ports ----------- There have been ports of previous versions of Python to OS/2. The best known would be that by Jeff Rush, most recently of version 1.5.2. Jeff used IBM's Visual Age C++ (v3) for his ports, and his patches have been included in the Python 2.3.3 source distribution. Andy Zabolotny implemented a port of Python v1.5.2 using the EMX development tools. His patches against the Python v1.5.2 source distribution have become the core of this port, and without his efforts this port wouldn't exist. Andy's port also appears to have been compiled with his port of gcc 2.95.2 to EMX, which I have but have chosen not to use for the binary distribution of this port (see item 16 of the "YOU HAVE BEEN WARNED" section below). It is possible to have these earlier ports still usable after installing this port - see the README.os2emx.multiple_versions file, contributed by Dr David Mertz, for a suggested approach to achieving this. Software requirements --------------------- This package requires the EMX Runtime package, available from the Hobbes (http://hobbes.nmsu.edu/) and LEO (http://archiv.leo.org/) archives of OS/2 software. I have used EMX version 0.9d fix04 in developing this port. My development system is running OS/2 v4 with fixpack 12. 3rd party software which has been linked into dynamically loaded modules: - ncurses (see http://dickey.his.com/ for more info, v5.2) - GNU Readline (Kai Uwe Rommel's port available from Hobbes or LEO, v2.1) - GNU GDBM (Kai Uwe Rommel's port available from Hobbes or LEO, v1.7.3) - zlib (derived from Hung-Chi Chu's port of v1.1.3, v1.1.4) - expat (distributed with Python, v1.95.7) - GNU MP (Peter Meerwald's port available from LEO, v2.0.2) - GNU UFC (Kai Uwe Rommel's port available from LEO, v2.0.4) About this port --------------- I have attempted to make this port as complete and functional as I can, notwithstanding the issues in the "YOU HAVE BEEN WARNED" section below. Core components: Python.exe is linked as an a.out executable, ie using EMX method E1 to compile & link the executable. This is so that fork() works (see "YOU HAVE BEEN WARNED" item 1). Python23.dll is created as a normal OMF DLL, with an OMF import library and module definition file. There is also an a.out (.a) import library to support linking the DLL to a.out executables. The DLL requires the EMX runtime DLLs. This port has been built with complete support for multithreading. Modules: With the exception of modules that have a significant code size, or are not recommended or desired for normal use, the standard modules are now built into the core DLL rather than configured as dynamically loadable modules. This is for both reasons of performance (startup time) and memory use (lots of small DLLs fragment the address space). I haven't yet changed the building of Python's dynamically loadable modules over to using the DistUtils. See "YOU HAVE BEEN WARNED" item 3 for notes about the fcntl module, and "YOU HAVE BEEN WARNED" item 10 for notes about the pwd and grp modules. This port supports case sensitive module import semantics, matching the Windows release. This can be deactivated by setting the PYTHONCASEOK environment variable (the value doesn't matter) - see "YOU HAVE BEEN WARNED" item 12. Optional modules: Where I've been able to locate the required 3rd party packages already ported to OS/2, I've built and included them. These include ncurses (_curses, _curses_panel), BSD DB (bsddb185), GNU GDBM (gdbm, dbm), zlib (zlib), GNU Readline (readline), GNU MP (mpz) and GNU UFC (crypt). Expat is now included in the Python release sourceball, and the pyexpat module is always built. I have built these modules statically linked against the 3rd party libraries. Unfortunately my attempts to use the dll version of GNU readline have been a dismal failure, in that when the dynamically linked readline module is active other modules immediately provoke a core dump when imported. Only the BSD DB package (part of the BSD package distributed with EMX) needs source modifications to be used for this port, pertaining to use of errno with multithreading. The other packages, except for ncurses and zlib, needed Makefile changes for multithreading support but no source changes. The _curses_panel module is a potential problem - see "YOU HAVE BEEN WARNED" item 13. Upstream source patches: No updates to the Python 2.3.5 release have become available. Eberhard Mattes' EMXFIX04 update to his EMX 0.9d tools suite includes bug fixes for the BSD DB library. The bsddb module included in this port incorporates these fixes. Library and other distributed Python code: The Python standard library lives in the Lib directory. All the standard library code included with the Python 2.3.5 source distribution is included in the binary archive, with the exception of the dos-8x3 and tkinter subdirectories which have been omitted to reduce the size of the binary archive - the dos-8x3 components are unnecessary duplicates and Tkinter is not supported by this port (yet). All the plat-* subdirectories in the source distribution have also been omitted, except for the plat-os2emx subdirectory. The Tools and Demo directories contain a collection of Python scripts. To reduce the size of the binary archive, the Demo/sgi, Demo/Tix, Demo/tkinter, Tools/audiopy and Tools/IDLE subdirectories have been omitted as not being supported by this port. The Misc directory has also been omitted. All subdirectories omitted from the binary archive can be reconstituted from the Python 2.3.5 source distribution, if desired. Support for building Python extensions: The Config subdirectory contains the files describing the configuration of the interpreter and the Makefile, import libraries for the Python DLL, and the module definition file used to create the Python DLL. The Include subdirectory contains all the standard Python header files needed for building extensions. As I don't have the Visual Age C++ compiler, I've made no attempt to have this port support extensions built with that compiler. Packaging --------- This port is packaged as follows: - python-2.3.5-os2emx-bin-03????.zip (binaries, library modules) - python-2.3.5-os2emx-src-03???? (patches+makefiles for non-Python code) As all the Python specific patches for the port are now part of the Python release tarball, only the patches and makefiles involved in building external libraries for optional extensions are included in the source archive. Documentation for the Python language, as well as the Python 2.3.5 source distibution, can be obtained from the Python website (http://www.python.org/) or the Python project pages at Sourceforge (http://sf.net/projects/python/). Installation ------------ Obtain and install, as per the included instructions, the EMX runtime package. Unpack this archive, preserving the subdirectories, in the root directory of the drive where you want Python to live. Add the Python directory (eg C:\Python23) to the PATH and LIBPATH variables in CONFIG.SYS. You should then set the PYTHONHOME and PYTHONPATH environment variables in CONFIG.SYS. PYTHONHOME should be set to Python's top level directory. PYTHONPATH should be set to the semicolon separated list of principal Python library directories. I use: SET PYTHONHOME=F:/Python23 SET PYTHONPATH=F:/Python23/Lib;F:/Python23/Lib/plat-os2emx; F:/Python23/Lib/lib-dynload;F:/Python23/Lib/site-packages NOTE!: the PYTHONPATH setting above is linewrapped for this document - it should all be on one line in CONFIG.SYS! If you wish to use the curses module, you should set the TERM and TERMINFO environment variables appropriately. If you don't already have ncurses installed, I have included a copy of the EMX subset of the Terminfo database included with the ncurses-5.2 source distribution. This can be used by setting the TERMINFO environment variable to the path of the Terminfo subdirectory below the Python home directory. On my system this looks like: SET TERMINFO=F:/Python23/Terminfo For the TERM environment variable, I would try one of the following: SET TERM=ansi SET TERM=os2 SET TERM=window You will have to reboot your system for these changes to CONFIG.SYS to take effect. If you wish to compile all the included Python library modules to bytecode, you can change into the Python home directory and run the COMPILEALL.CMD batch file. You can execute the regression tests included with the Python 2.3.5 source distribution by changing to the Python 2.3.5 home directory and executing the REGRTEST.CMD batch file. The following tests are known to fail at this time: - test_mhlib (I don't know of any port of MH to OS/2); - test_strptime (see "YOU HAVE BEEN WARNED" item 22); - test_time (see "YOU HAVE BEEN WARNED" item 22); - test_posixpath (see "YOU HAVE BEEN WARNED" item 23). Note that some of the network related tests expect the loopback interface (interface "lo", with IP address 127.0.0.1) to be enabled, which from my experience is not the default configuration. Additionally, test_popen2 expects the "cat" utility (such as found in ports of the GNU tools) to be installed. Building from source -------------------- With the EMX port now checked into Python's CVS repository, the build infrastructure is part of the Python release sourceball. Prerequisites First and foremost, you need an operational EMX development installation - EMX v0.9d with fix04 (the latest at time of writing) & the gcc 2.8.1 compiler released by Eberhard Mattes is the recommended setup. If you have a different version of gcc installed, see "YOU HAVE BEEN WARNED" item 16. Other items of software required:- - GNU make (I'm using v3.76.1) - rm, cp, mkdir from the GNU file utilities package - GNU find - GNU sed Procedure 0. all changes mentioned apply to files in the PC/os2emx subdirectory of the Python release source tree. make is also executed from this directory, so change into this directory before proceeding. 1. decide if you need to change the location of the Python installation. If you wish to do this, set the value of the Makefile variable LIB_DIR to the directory you wish to use for PYTHONHOME (eg /usr/local/lib/python2.3.5). If you want Python to find its library without the PYTHONHOME environment variable set, set the value of the Makefile variable FIXED_PYHOME to "yes" (uncomment the appropriate line). 2. If you wish the Python executables (python.exe, pythonpm.exe & pgen.exe) to be installed in a directory other than the PYTHONHOME directory, set the value of the Makefile variable EXE_DIR to the appropriate directory. 3. If you wish the Python core DLL (python23.dll) to be installed in a directory other than the directory in which the Python executables are installed (by default, the PYTHONHOME directory), set the value of the Makefile variable DLL_DIR to the appropriate directory. This DLL must be placed in a directory on the system's LIBPATH, or that gets set with BEGINLIBPATH or ENDLIBPATH. 4. If you have installed any of the libraries that can be used to build optional Python modules, set the value of the relevant HAVE_ Makefile variable to "yes". The Makefile currently supports: library Makefile variable ........................................ zlib (1.1.4) HAVE_ZLIB GNU UltraFast Crypt HAVE_UFC Tcl/Tk HAVE_TCLTK (not known to work) GNU MP HAVE_GMPZ GNU Readline HAVE_GREADLINE BSD DB (v1.85) HAVE_BSDDB ncurses HAVE_NCURSES GNU gdbm HAVE_GDBM libbz2 HAVE_BZ2 Please note that you need to check that what you have installed is compatible with Python's build options. In particular, the BSD DB v1.85 library needs to be rebuilt with a source patch for multithread support (doesn't change the library's reentrant status but allows it to be linked to Python which is multithreaded). Widely available binary packages of other librarys & DLLs are not built/linked with multithread support. Beware! Also note that the Makefile currently expects any libraries to be found with the default library search path. You may need to add -L switches to the LDFLAGS Makefile variable if you have installed libraries in directories not in the default search path (which can be controlled by the LIBRARY_PATH environment variable used by EMX). 5. make It is usually a good idea to redirect the stdout and stderr streams of the make process to log files, so that you can review any messages. 6. make test This runs the Python regression tests, and completion is a sign of a usable build. You should check the list of skipped modules to ensure that any optional modules you selected have been built; checking the list of failures against the list of known failures elsewhere in this document is also prudent. 7. make install >>>>>> NOT YET COMPLETE <<<<<< 8. change to a directory outside the Python source tree and start Python. Check the version and build date to confirm satisfactory installation. YOU HAVE BEEN WARNED!! ---------------------- I know about a number of nasties in this port. 1. Eberhard Mattes, author of EMX, writes in his documentation that fork() is very inefficient in the OS/2 environment. It also requires that the executable be linked in a.out format rather than OMF. Use the os.exec and/or the os.spawn family of functions where possible. 2. In the absence of GNU Readline, terminating the interpreter requires a control-Z (^Z) followed by a carriage return. Jeff Rush documented this problem in his Python 1.5.2 port. With Readline, a control-D (^D) works as per the standard Unix environment. 3. EMX only has a partial implementation of fcntl(). The fcntl module in this port supports what EMX supports. If fcntl is important to you, please review the EMX C Library Reference (included in .INF format in the EMXVIEW.ZIP archive as part of the complete EMX development tools suite). Because of other side-effects I have modified the test_fcntl.py test script to deactivate the exercising of the missing functionality. 4. the PyBSDDB3 module has been imported into the Python standard library, with the intent of superceding the BSDDB 1.85 module (bsddb). As I don't yet have a satisfactory port of Sleepcat's more recent DB library (3.3.x/4.0.x/4.1.x), I haven't included a binary of this module. I have left the Python part of the PyBSDDB package in this distribution for completeness. 5. As a consequence of the PyBSDDB3 module being imported, the former BSD DB (bsddb) module, linked against the DB v1.85 library from EMX, has been renamed bsddb185. The bsddb185 module will not be built by default on most platforms, but in the absence of a PyBSDDB3 module I have retained it in the EMX port. Version 1.85 of the DB library is widely known to have bugs, although some patches have become available (and are incorporated into the included bsddb185 module). Unless you have problems with software licenses which would rule out GDBM (and the dbm module because it is linked against the GDBM library) or need it for file format compatibility, you may be better off deleting it and relying on GDBM. Any code you have which uses the v1.85 bsddb module can be modified to use the renamed module by changing import bsddb to import bsddb185 as bsddb 6. The readline module has been linked against ncurses rather than the termcap library supplied with EMX. 7. I have configured this port to use "/" as the preferred path separator character, rather than "\" ('\\'), in line with the convention supported by EMX. Backslashes are still supported of course, and still appear in unexpected places due to outside sources that don't get normalised. 8. While the DistUtils components are now functional, other packaging/binary handling tools and utilities such as those included in the Demo and Tools directories - freeze in particular - are unlikely to work. If you do get them going, I'd like to know about your success. 9. I haven't set out to support the [BEGIN|END]LIBPATH functionality supported by one of the earlier ports (Rush's??). If it works let me know. 10. As a result of the limitations imposed by EMX's library routines, the standard extension module pwd only synthesises a simple passwd database, and the grp module cannot be supported at all. I have written pure Python substitutes for pwd and grp, which can process real passwd and group files for those applications (such as MailMan) that require more than EMX emulates. I have placed pwd.py and grp.py in Lib/plat-os2emx, which is usually before Lib/lib-dynload (which contains pwd.pyd) in the PYTHONPATH. If you have become attached to what pwd.pyd supports, you can put Lib/lib-dynload before Lib/plat-os2emx in PYTHONPATH or delete/rename pwd.py & grp.py. pwd.py & grp.py support locating their data files by looking in the environment for them in the following sequence: pwd.py: $ETC_PASSWD (%ETC_PASSWD%) $ETC/passwd (%ETC%/passwd) $PYTHONHOME/Etc/passwd (%PYTHONHOME%/Etc/passwd) grp.py: $ETC_GROUP (%ETC_GROUP%) $ETC/group (%ETC%/group) $PYTHONHOME/Etc/group (%PYTHONHOME%/Etc/group) The ETC_PASSWD and ETC_GROUP environment variables are intended to allow support for multiple passwd/grp files, where other applications may not support as wide a variety of input variations (drive remappings, separators etc). Both modules support using either the ":" character (Unix standard) or ";" (OS/2, DOS, Windows standard) field separator character, and pwd.py implements the following drive letter conversions for the home_directory and shell fields (for the ":" separator only): $x -> x: x; -> x: Example versions of passwd and group are in the Etc subdirectory. The regression tests (test_pwd and test_grp) will fail if valid password and group files cannot be found, but should pass otherwise. Be aware that Python's pwd & group modules are for reading password and group information only. 11. EMX's termios routines don't support all of the functionality now exposed by the termios module - refer to the EMX documentation to find out what is supported. 12. The case sensitive import semantics introduced in Python 2.1 for other case insensitive but case preserving file/operating systems (Windows etc), have been incorporated into this port, and are active by default. Setting the PYTHONCASEOK environment variable (to any value) reverts to the previous (case insensitive) semantics. This can be an issue with some file management utilities that do not preserve the case of file and directory names. 13. Because I am statically linking ncurses, the _curses_panel module has potential problems arising from separate library data areas. To avoid this, I have configured the _curses_.pyd (imported as "_curses_panel") to import the ncurses symbols it needs from _curses.dll (which is the curses module, but with a .dll extension rather than .pyd so that the dynamic loader can actually import the symbols from it as a DLL). The site module (Lib/site.py) has code added to tweak BEGINLIBPATH so that _curses.dll is found when _curses_panel is imported. If you have problems attempting to use the _curses_panel support please let me know, and I'll have another look at this. 14. sys.platform reports "os2emx" instead of "os2". os.name still reports "os2". This change was to make it easier to distinguish between the VAC++ build (formerly maintained by Michael Muller) and the EMX build (this port), principally for DistUtils. 15. it appears that the %W substitution in the EMX strftime() routine has an off-by-one bug. strftime was listed as passing the regression tests in previous releases, but this fact appears to have been an oversight in the regression test suite. To fix this really requires a portable strftime routine - I'm looking into using one from FreeBSD, but its not ready yet. 16. I have successfully built this port with Andy Zabolotny's ports of pgcc 2.95 and gcc 3.2.1, in addition to EM's gcc 2.8.1. To use the bsddb185 module with the gcc 3.2.1 build, I had to recompile the DB library with gcc 3.2.1 - I don't know why, but trying to import the module built against a DB library compiled with gcc 2.8.1 would result in a SYS3175 error. I have not attempted to compile Python with any version of gcc prior to v2.8.1. This release sees the default optimisation change to "-O3 -fomit-frame-pointer -mprobe". This works fine too for pgcc 2.95 but not for gcc 3.2.1. With gcc 3.2.1, -O3 causes 2 unexpected test failures: test_format and test_unicode. Both these tests pass if -O2 is instead of -O3 with this compiler, and the performance difference is negligible (in contrast to gcc 2.8.1 and pgcc 2.95, where the performance difference between the 2 optimisation settings approaches 10%). 17. os.spawnv() and os.spawnve() expose EMX's library routines rather than use the emulation in os.py. In order to make use of some of the features this makes available in the OS/2 environment, you should peruse the relevant EMX documentation (EMXLIB.INF in the EMXVIEW.ZIP archive accompanying the EMX archives on Hobbes or LEO). Be aware that I have exposed all the "mode" options supported by EMX, but there are combinations that either cannot be practically used by/in Python or have the potential to compromise your system's stability. 18. pythonpm.exe used to be just python.exe with the WINDOWAPI linker option set in the pythonpm.def file. In practice, this turns out to do nothing useful. I have written a replacement which wraps the Python DLL in a genuine Presentation Manager application. This version actually runs the Python interpreter in a separate thread from the PM shell, in order that PythonPM has a functioning message queue as good PM apps should. In its current state, PythonPM's window is hidden. It can be displayed, although it will have no content as nothing is ever written to the window. Only the "hide" button is available. Although the code has support for shutting PythonPM down when the Python interpreter is still busy (via the "control" menu), this is not well tested and given comments I've come across in EMX documentation suggesting that the thread killing operation has problems I would suggest caution in relying on this capability. PythonPM processes commandline parameters normally. The standard input, output and error streams are only useful if redirected, as PythonPM's window is not a console in any form and so cannot accept or display anything. This means that the -i option is ineffective. Because the Python thread doesn't create its own message queue, creating PM Windows and performing most PM operations is not possible from within this thread. How this will affect supporting PM extensions (such as Tkinter using a PM port of Tcl/Tk, or wxPython using the PM port of WxWindows) is still being researched. Note that os.fork() _DOES_NOT_WORK_ in PythonPM - SYS3175s are the result of trying. os.spawnv() _does_ work. PythonPM passes all regression tests that the standard Python interpreter (python.exe) passes, with the exception of test_fork1 and test_socket which both attempt to use os.fork(). I very much want feedback on the performance, behaviour and utility of PythonPM. I would like to add a PM console capability to it, but that will be a non-trivial effort. I may be able to leverage the code in Illya Vaes' Tcl/Tk port, which would make it easier. 19. os.chdir() uses EMX's _chdir2(), which supports changing both drive and directory at once. Similarly, os.getcwd() uses EMX's _getcwd() which returns drive as well as path. 20. pyconfig.h is installed in the Include subdirectory with all other include files. 21. the default build explicitly sets the number of file handles available to a Python process to 250. EMX default is 40, which is insufficient for the tempfile regression test (test_tempfile) which tries to create 100 temporary files. This setting can be overridden via the EMXOPT environment variable: set EMXOPT=-h250 is equivalent to the setting currently used. The emxbind utility (if you have it installed) can also be used to permanently change the setting in python.exe - please refer to the EMX documentation for more information. 22. a pure python strptime module is now part of the Python standard library, superceding a platform specific extension module. This module leverages the strftime module, and as a result test_strptime fails due to the EMX strftime bug in item 20 above. 23. test_posixpath attempts to exercise various Posix path related functionality. Most of the sub-tests pass, but the "ismount" and "samestat" subtests fail: - EMX provides not satisfactory mount point emulation, so "ismount" cannot succeed; - EMX documents that successive stat() calls will produce different results, so "samestat" cannot succeed. test_posixpath should skip these tests on EMX. 24. I have had a report that attempting to use the Bittorrent package (http://bitconjurer.org/BitTorrent/) with this port causes traps not long after starting the download; this using the "headless" download script on eCS v1.1. I have not been able to duplicate this myself, but the indications I have suggest a failure in the 32 bit TCP/IP stack (v4.3.2? on eCS v1.1) - on my v4.0 FP12 system with MPTS fixpack WR8425 applied (16 bit TCP/IP stack v4.02), BitTorrent appears to work normally in testing on a 100Mbit LAN. With the curses.panel fix (see item 13 above), the BitTorrent curses downloader works too. I'd appreciate any success or failure reports with BitTorrent, though I've regretfully recommended that the person who reported the failure take this up with eCS support. Since this report, I have received a followup which suggests that the problem may be due to bugs in the 32bit TCP/IP stack (TCP/IP v4.1 and later, v4.3 in particular). I think it suffices to say that BitTorrent is a fair stress test of a system's networking capability. 25. AF_UNIX sockets, otherwise known as Unix domain sockets, are now supported. Unfortunately, there are some traps arising from the implementation in IBM's TCP/IP stack:- - the path name must start with '\\socket\\' ('/socket/' won't work!), with the length of the full path name less than 108 characters; - unlike Unix, the socket endpoints don't exist in the filesystem; - by default, sockets are in binary mode. 26. Threads have separate stacks from the primary thread, and the thread stack has been hardcoded to 64k bytes. As this is insufficient for some applications, such as Zope/Plone, the thread stack size has been made a compile-time tunable. The Makefile contains a commented out statement that, when uncommented, will set the thread stack size to 128k bytes. The value used should be adjusted to suit the requirements. The EMX documentation indicates that thread stack size should be at least 32768 (32k) bytes, but the default value of 64k bytes should be considered a practical minimum. ... probably other issues that I've not encountered, or don't remember :-( If you encounter other difficulties with this port, which can be characterised as peculiar to this port rather than to the Python release, I would like to hear about them. However I cannot promise to be able to do anything to resolve such problems. See the Contact section below... To do... -------- In no particular order of apparent importance or likelihood... - support Tkinter and/or alternative GUI (wxWindows??) Credits ------- In addition to people identified above, I'd like to thank: - the BDFL, Guido van Rossum, and crew for Python; - Dr David Mertz, for trying out a pre-release of this port; - the Python-list/comp.lang.python community; - John Poltorak, for input about pwd/grp; - Ted Sikora & John Poltorak for persisting in bringing Mailman Zope & Plone to OS/2. Contact ------- Constructive feedback, negative or positive, about this port is welcome and should be addressed to me at the e-mail addresses below. I have a private mailing list for announcements of fixes & updates to this port. If you wish to receive such e-mail announcments, please send me an e-mail requesting that you be added to this list. Andrew MacIntyre E-mail: andymac@bullseye.apana.org.au, or andymac@pcug.org.au Web: http://www.andymac.org/ 17 January, 2005. Python-2.3.7/PC/os2emx/pythonpm.c0000644001241000117560000000563507433637122016031 0ustar loewishpifb6/* OS/2 PM main program - creates a hidden window, and starts Python * interpreter in a separate thread, so that Python scripts can be * run in PM process space without a console Window. The interpreter * is incorporated by linking in the Python DLL. * * As it stands, I don't think this is adequate for supporting Python * GUI modules, as the Python thread doesn't have its own message * queue - which is required of threads that want to create/use * PM windows. * * This code owes a lot to "OS/2 Presentation Manager Programming", by * Charles Petzold. * * Andrew MacIntyre , August 2001. * Released under the terms of the Python 2.1.1 licence - see the LICENCE * file in the Python v2.1.1 (or later) source distribution. * Copyright assigned to the Python Software Foundation, 2001. */ #define INCL_DOS #define INCL_WIN #include #include #include "Python.h" /* use structure to pass command line to Python thread */ typedef struct { int argc; char **argv; HWND Frame; int running; } arglist; /* make this a global to simplify access. * it should only be set from the Python thread, or by the code that * initiates the Python thread when the thread cannot be created. */ int PythonRC; extern DL_EXPORT(int) Py_Main(int, char **); void PythonThread(void *); int main(int argc, char **argv) { ULONG FrameFlags = FCF_TITLEBAR | FCF_SYSMENU | FCF_SIZEBORDER | FCF_HIDEBUTTON | FCF_SHELLPOSITION | FCF_TASKLIST; HAB hab; HMQ hmq; HWND Client; QMSG qmsg; arglist args; int python_tid; /* init PM and create message queue */ hab = WinInitialize(0); hmq = WinCreateMsgQueue(hab, 0); /* create a (hidden) Window to house the window procedure */ args.Frame = WinCreateStdWindow(HWND_DESKTOP, 0, &FrameFlags, NULL, "PythonPM", 0L, 0, 0, &Client); /* run Python interpreter in a thread */ args.argc = argc; args.argv = argv; args.running = 0; if (-1 == (python_tid = _beginthread(PythonThread, NULL, 1024 * 1024, &args))) { /* couldn't start thread */ WinAlarm(HWND_DESKTOP, WA_ERROR); PythonRC = 1; } else { /* process PM messages, until Python exits */ while (WinGetMsg(hab, &qmsg, NULLHANDLE, 0, 0)) WinDispatchMsg(hab, &qmsg); if (args.running > 0) DosKillThread(python_tid); } /* destroy window, shutdown message queue and PM */ WinDestroyWindow(args.Frame); WinDestroyMsgQueue(hmq); WinTerminate(hab); return PythonRC; } void PythonThread(void *argl) { HAB hab; arglist *args; /* PM initialisation */ hab = WinInitialize(0); /* start Python */ args = (arglist *)argl; args->running = 1; PythonRC = Py_Main(args->argc, args->argv); /* enter a critical section and send the termination message */ DosEnterCritSec(); args->running = 0; WinPostMsg(args->Frame, WM_QUIT, NULL, NULL); /* shutdown PM and terminate thread */ WinTerminate(hab); _endthread(); } Python-2.3.7/PC/os2emx/getpathp.c0000644001241000117560000002326010157001362015745 0ustar loewishpifb6 /* Return the initial module search path. */ /* This version used by OS/2+EMX */ /* ---------------------------------------------------------------- PATH RULES FOR OS/2+EMX: This describes how sys.path is formed on OS/2+EMX. It describes the functionality, not the implementation (ie, the order in which these are actually fetched is different) * Python always adds an empty entry at the start, which corresponds to the current directory. * If the PYTHONPATH env. var. exists, it's entries are added next. * We attempt to locate the "Python Home" - if the PYTHONHOME env var is set, we believe it. Otherwise, we use the path of our host .EXE's to try and locate our "landmark" (lib\\os.py) and deduce our home. - If we DO have a Python Home: The relevant sub-directories (Lib, plat-win, lib-tk, etc) are based on the Python Home - If we DO NOT have a Python Home, the core Python Path is loaded from the registry. This is the main PythonPath key, and both HKLM and HKCU are combined to form the path) * Iff - we can not locate the Python Home, and have not had a PYTHONPATH specified (ie, we have _nothing_ we can assume is a good path), a default path with relative entries is used (eg. .\Lib;.\plat-win, etc) The end result of all this is: * When running python.exe, or any other .exe in the main Python directory (either an installed version, or directly from the PCbuild directory), the core path is deduced. * When Python is hosted in another exe (different directory, embedded via COM, etc), the Python Home will not be deduced, so the core path from the registry is used. Other "application paths "in the registry are always read. * If Python can't find its home and there is no registry (eg, frozen exe, some very strange installation setup) you get a path with some default, but relative, paths. ---------------------------------------------------------------- */ #include "Python.h" #include "osdefs.h" #ifndef PYOS_OS2 #error This file only compilable on OS/2 #endif #define INCL_DOS #include #include #include #include #if HAVE_UNISTD_H #include #endif /* HAVE_UNISTD_H */ /* Search in some common locations for the associated Python libraries. * * Py_GetPath() tries to return a sensible Python module search path. * * The approach is an adaptation for Windows of the strategy used in * ../Modules/getpath.c; it uses the Windows Registry as one of its * information sources. */ #ifndef LANDMARK #if defined(PYCC_GCC) #define LANDMARK "lib/os.py" #else #define LANDMARK "lib\\os.py" #endif #endif static char prefix[MAXPATHLEN+1]; static char progpath[MAXPATHLEN+1]; static char *module_search_path = NULL; static int is_sep(char ch) /* determine if "ch" is a separator character */ { #ifdef ALTSEP return ch == SEP || ch == ALTSEP; #else return ch == SEP; #endif } /* assumes 'dir' null terminated in bounds. * Never writes beyond existing terminator. */ static void reduce(char *dir) { size_t i = strlen(dir); while (i > 0 && !is_sep(dir[i])) --i; dir[i] = '\0'; } static int exists(char *filename) { struct stat buf; return stat(filename, &buf) == 0; } /* Is module (check for .pyc/.pyo too) * Assumes 'filename' MAXPATHLEN+1 bytes long - * may extend 'filename' by one character. */ static int ismodule(char *filename) { if (exists(filename)) return 1; /* Check for the compiled version of prefix. */ if (strlen(filename) < MAXPATHLEN) { strcat(filename, Py_OptimizeFlag ? "o" : "c"); if (exists(filename)) return 1; } return 0; } /* Add a path component, by appending stuff to buffer. buffer must have at least MAXPATHLEN + 1 bytes allocated, and contain a NUL-terminated string with no more than MAXPATHLEN characters (not counting the trailing NUL). It's a fatal error if it contains a string longer than that (callers must be careful!). If these requirements are met, it's guaranteed that buffer will still be a NUL-terminated string with no more than MAXPATHLEN characters at exit. If stuff is too long, only as much of stuff as fits will be appended. */ static void join(char *buffer, char *stuff) { size_t n, k; if (is_sep(stuff[0])) n = 0; else { n = strlen(buffer); if (n > 0 && !is_sep(buffer[n-1]) && n < MAXPATHLEN) buffer[n++] = SEP; } if (n > MAXPATHLEN) Py_FatalError("buffer overflow in getpathp.c's joinpath()"); k = strlen(stuff); if (n + k > MAXPATHLEN) k = MAXPATHLEN - n; strncpy(buffer+n, stuff, k); buffer[n+k] = '\0'; } /* gotlandmark only called by search_for_prefix, which ensures * 'prefix' is null terminated in bounds. join() ensures * 'landmark' can not overflow prefix if too long. */ static int gotlandmark(char *landmark) { int n, ok; n = strlen(prefix); join(prefix, landmark); ok = ismodule(prefix); prefix[n] = '\0'; return ok; } /* assumes argv0_path is MAXPATHLEN+1 bytes long, already \0 term'd. * assumption provided by only caller, calculate_path() */ static int search_for_prefix(char *argv0_path, char *landmark) { /* Search from argv0_path, until landmark is found */ strcpy(prefix, argv0_path); do { if (gotlandmark(landmark)) return 1; reduce(prefix); } while (prefix[0]); return 0; } static void get_progpath(void) { extern char *Py_GetProgramName(void); char *path = getenv("PATH"); char *prog = Py_GetProgramName(); PPIB pib; if ((DosGetInfoBlocks(NULL, &pib) == 0) && (DosQueryModuleName(pib->pib_hmte, sizeof(progpath), progpath) == 0)) return; if (prog == NULL || *prog == '\0') prog = "python"; /* If there is no slash in the argv0 path, then we have to * assume python is on the user's $PATH, since there's no * other way to find a directory to start the search from. If * $PATH isn't exported, you lose. */ #ifdef ALTSEP if (strchr(prog, SEP) || strchr(prog, ALTSEP)) #else if (strchr(prog, SEP)) #endif strncpy(progpath, prog, MAXPATHLEN); else if (path) { while (1) { char *delim = strchr(path, DELIM); if (delim) { size_t len = delim - path; /* ensure we can't overwrite buffer */ #if !defined(PYCC_GCC) len = min(MAXPATHLEN,len); #else len = MAXPATHLEN < len ? MAXPATHLEN : len; #endif strncpy(progpath, path, len); *(progpath + len) = '\0'; } else strncpy(progpath, path, MAXPATHLEN); /* join() is safe for MAXPATHLEN+1 size buffer */ join(progpath, prog); if (exists(progpath)) break; if (!delim) { progpath[0] = '\0'; break; } path = delim + 1; } } else progpath[0] = '\0'; } static void calculate_path(void) { char argv0_path[MAXPATHLEN+1]; char *buf; size_t bufsz; char *pythonhome = Py_GetPythonHome(); char *envpath = getenv("PYTHONPATH"); char zip_path[MAXPATHLEN+1]; size_t len; get_progpath(); /* progpath guaranteed \0 terminated in MAXPATH+1 bytes. */ strcpy(argv0_path, progpath); reduce(argv0_path); if (pythonhome == NULL || *pythonhome == '\0') { if (search_for_prefix(argv0_path, LANDMARK)) pythonhome = prefix; else pythonhome = NULL; } else strncpy(prefix, pythonhome, MAXPATHLEN); if (envpath && *envpath == '\0') envpath = NULL; /* Calculate zip archive path */ strncpy(zip_path, progpath, MAXPATHLEN); zip_path[MAXPATHLEN] = '\0'; len = strlen(zip_path); if (len > 4) { zip_path[len-3] = 'z'; /* change ending to "zip" */ zip_path[len-2] = 'i'; zip_path[len-1] = 'p'; } else { zip_path[0] = 0; } /* We need to construct a path from the following parts. * (1) the PYTHONPATH environment variable, if set; * (2) the zip archive file path; * (3) the PYTHONPATH config macro, with the leading "." * of each component replaced with pythonhome, if set; * (4) the directory containing the executable (argv0_path). * The length calculation calculates #3 first. */ /* Calculate size of return buffer */ if (pythonhome != NULL) { char *p; bufsz = 1; for (p = PYTHONPATH; *p; p++) { if (*p == DELIM) bufsz++; /* number of DELIM plus one */ } bufsz *= strlen(pythonhome); } else bufsz = 0; bufsz += strlen(PYTHONPATH) + 1; bufsz += strlen(argv0_path) + 1; bufsz += strlen(zip_path) + 1; if (envpath != NULL) bufsz += strlen(envpath) + 1; module_search_path = buf = malloc(bufsz); if (buf == NULL) { /* We can't exit, so print a warning and limp along */ fprintf(stderr, "Can't malloc dynamic PYTHONPATH.\n"); if (envpath) { fprintf(stderr, "Using environment $PYTHONPATH.\n"); module_search_path = envpath; } else { fprintf(stderr, "Using default static path.\n"); module_search_path = PYTHONPATH; } return; } if (envpath) { strcpy(buf, envpath); buf = strchr(buf, '\0'); *buf++ = DELIM; } if (zip_path[0]) { strcpy(buf, zip_path); buf = strchr(buf, '\0'); *buf++ = DELIM; } if (pythonhome == NULL) { strcpy(buf, PYTHONPATH); buf = strchr(buf, '\0'); } else { char *p = PYTHONPATH; char *q; size_t n; for (;;) { q = strchr(p, DELIM); if (q == NULL) n = strlen(p); else n = q-p; if (p[0] == '.' && is_sep(p[1])) { strcpy(buf, pythonhome); buf = strchr(buf, '\0'); p++; n--; } strncpy(buf, p, n); buf += n; if (q == NULL) break; *buf++ = DELIM; p = q+1; } } if (argv0_path) { *buf++ = DELIM; strcpy(buf, argv0_path); buf = strchr(buf, '\0'); } *buf = '\0'; } /* External interface */ char * Py_GetPath(void) { if (!module_search_path) calculate_path(); return module_search_path; } char * Py_GetPrefix(void) { if (!module_search_path) calculate_path(); return prefix; } char * Py_GetExecPrefix(void) { return Py_GetPrefix(); } char * Py_GetProgramFullPath(void) { if (!module_search_path) calculate_path(); return progpath; } Python-2.3.7/PC/pyc.ico0000644001241000117560000000137607455220722014055 0ustar loewishpifb6 è( @€€€€€€€€€€ÀÀÀ€€€ÿÿÿÿÿÿÿÿÿÿÿÿˆƒ€3ˆˆ€ˆˆˆˆˆˆ€38ˆˆˆ3ˆ3ˆ ˆ™ˆˆ8 ˜8ˆ™8ˆ8 8€ˆƒƒƒ83ˆˆˆ€8€ˆˆ€8ˆˆ€ˆˆ€ˆ€» »¼ ̼ Ì» »ÿÿÿþƒÿüÿøgøøøüüÞü_€þ€àÿÀ0ÿÀ ÿÀÿÀÿ€ÿÿÿÿÿÿ€ÿÀÿðÿøÿÿøÿÿøÿÿøÿÿøÿÿüÿÿþGÿÿPython-2.3.7/PC/import_nt.c0000644001241000117560000000455507401250451014740 0ustar loewishpifb6/******************************************************************** import_nt.c Win32 specific import code. */ #include "Python.h" #include "osdefs.h" #include #include "importdl.h" #include "malloc.h" /* for alloca */ /* a string loaded from the DLL at startup */ extern const char *PyWin_DLLVersionString; FILE *PyWin_FindRegisteredModule(const char *moduleName, struct filedescr **ppFileDesc, char *pathBuf, int pathLen) { char *moduleKey; const char keyPrefix[] = "Software\\Python\\PythonCore\\"; const char keySuffix[] = "\\Modules\\"; #ifdef _DEBUG /* In debugging builds, we _must_ have the debug version * registered. */ const char debugString[] = "\\Debug"; #else const char debugString[] = ""; #endif struct filedescr *fdp = NULL; FILE *fp; HKEY keyBase = HKEY_CURRENT_USER; int modNameSize; long regStat; /* Calculate the size for the sprintf buffer. * Get the size of the chars only, plus 1 NULL. */ size_t bufSize = sizeof(keyPrefix)-1 + strlen(PyWin_DLLVersionString) + sizeof(keySuffix) + strlen(moduleName) + sizeof(debugString) - 1; /* alloca == no free required, but memory only local to fn, * also no heap fragmentation! */ moduleKey = alloca(bufSize); PyOS_snprintf(moduleKey, bufSize, "Software\\Python\\PythonCore\\%s\\Modules\\%s%s", PyWin_DLLVersionString, moduleName, debugString); modNameSize = pathLen; regStat = RegQueryValue(keyBase, moduleKey, pathBuf, &modNameSize); if (regStat != ERROR_SUCCESS) { /* No user setting - lookup in machine settings */ keyBase = HKEY_LOCAL_MACHINE; /* be anal - failure may have reset size param */ modNameSize = pathLen; regStat = RegQueryValue(keyBase, moduleKey, pathBuf, &modNameSize); if (regStat != ERROR_SUCCESS) return NULL; } /* use the file extension to locate the type entry. */ for (fdp = _PyImport_Filetab; fdp->suffix != NULL; fdp++) { size_t extLen = strlen(fdp->suffix); assert(modNameSize >= 0); /* else cast to size_t is wrong */ if ((size_t)modNameSize > extLen && strnicmp(pathBuf + ((size_t)modNameSize-extLen-1), fdp->suffix, extLen) == 0) break; } if (fdp->suffix == NULL) return NULL; fp = fopen(pathBuf, fdp->mode); if (fp != NULL) *ppFileDesc = fdp; return fp; } Python-2.3.7/PC/getpathp.c0000644001241000117560000004276407720211302014541 0ustar loewishpifb6 /* Return the initial module search path. */ /* Used by DOS, OS/2, Windows 3.1, Windows 95/98, Windows NT. */ /* ---------------------------------------------------------------- PATH RULES FOR WINDOWS: This describes how sys.path is formed on Windows. It describes the functionality, not the implementation (ie, the order in which these are actually fetched is different) * Python always adds an empty entry at the start, which corresponds to the current directory. * If the PYTHONPATH env. var. exists, it's entries are added next. * We look in the registry for "application paths" - that is, sub-keys under the main PythonPath registry key. These are added next (the order of sub-key processing is undefined). HKEY_CURRENT_USER is searched and added first. HKEY_LOCAL_MACHINE is searched and added next. (Note that all known installers only use HKLM, so HKCU is typically empty) * We attempt to locate the "Python Home" - if the PYTHONHOME env var is set, we believe it. Otherwise, we use the path of our host .EXE's to try and locate our "landmark" (lib\\os.py) and deduce our home. - If we DO have a Python Home: The relevant sub-directories (Lib, plat-win, lib-tk, etc) are based on the Python Home - If we DO NOT have a Python Home, the core Python Path is loaded from the registry. This is the main PythonPath key, and both HKLM and HKCU are combined to form the path) * Iff - we can not locate the Python Home, have not had a PYTHONPATH specified, and can't locate any Registry entries (ie, we have _nothing_ we can assume is a good path), a default path with relative entries is used (eg. .\Lib;.\plat-win, etc) The end result of all this is: * When running python.exe, or any other .exe in the main Python directory (either an installed version, or directly from the PCbuild directory), the core path is deduced, and the core paths in the registry are ignored. Other "application paths" in the registry are always read. * When Python is hosted in another exe (different directory, embedded via COM, etc), the Python Home will not be deduced, so the core path from the registry is used. Other "application paths" in the registry are always read. * If Python can't find its home and there is no registry (eg, frozen exe, some very strange installation setup) you get a path with some default, but relative, paths. ---------------------------------------------------------------- */ #include "Python.h" #include "osdefs.h" #ifdef MS_WINDOWS #include #include #endif #include #include #include /* Search in some common locations for the associated Python libraries. * * Py_GetPath() tries to return a sensible Python module search path. * * The approach is an adaptation for Windows of the strategy used in * ../Modules/getpath.c; it uses the Windows Registry as one of its * information sources. */ #ifndef LANDMARK #define LANDMARK "lib\\os.py" #endif static char prefix[MAXPATHLEN+1]; static char progpath[MAXPATHLEN+1]; static char dllpath[MAXPATHLEN+1]; static char *module_search_path = NULL; static int is_sep(char ch) /* determine if "ch" is a separator character */ { #ifdef ALTSEP return ch == SEP || ch == ALTSEP; #else return ch == SEP; #endif } /* assumes 'dir' null terminated in bounds. Never writes beyond existing terminator. */ static void reduce(char *dir) { size_t i = strlen(dir); while (i > 0 && !is_sep(dir[i])) --i; dir[i] = '\0'; } static int exists(char *filename) { struct stat buf; return stat(filename, &buf) == 0; } /* Assumes 'filename' MAXPATHLEN+1 bytes long - may extend 'filename' by one character. */ static int ismodule(char *filename) /* Is module -- check for .pyc/.pyo too */ { if (exists(filename)) return 1; /* Check for the compiled version of prefix. */ if (strlen(filename) < MAXPATHLEN) { strcat(filename, Py_OptimizeFlag ? "o" : "c"); if (exists(filename)) return 1; } return 0; } /* guarantees buffer will never overflow MAXPATHLEN+1 bytes */ static void join(char *buffer, char *stuff) { size_t n, k; if (is_sep(stuff[0])) n = 0; else { n = strlen(buffer); if (n > 0 && !is_sep(buffer[n-1]) && n < MAXPATHLEN) buffer[n++] = SEP; } k = strlen(stuff); if (n + k > MAXPATHLEN) k = MAXPATHLEN - n; strncpy(buffer+n, stuff, k); buffer[n+k] = '\0'; } /* gotlandmark only called by search_for_prefix, which ensures 'prefix' is null terminated in bounds. join() ensures 'landmark' can not overflow prefix if too long. */ static int gotlandmark(char *landmark) { int n, ok; n = strlen(prefix); join(prefix, landmark); ok = ismodule(prefix); prefix[n] = '\0'; return ok; } /* assumes argv0_path is MAXPATHLEN+1 bytes long, already \0 term'd. assumption provided by only caller, calculate_path() */ static int search_for_prefix(char *argv0_path, char *landmark) { /* Search from argv0_path, until landmark is found */ strcpy(prefix, argv0_path); do { if (gotlandmark(landmark)) return 1; reduce(prefix); } while (prefix[0]); return 0; } #ifdef MS_WINDOWS /* a string loaded from the DLL at startup.*/ extern const char *PyWin_DLLVersionString; /* Load a PYTHONPATH value from the registry. Load from either HKEY_LOCAL_MACHINE or HKEY_CURRENT_USER. Works in both Unicode and 8bit environments. Only uses the Ex family of functions so it also works with Windows CE. Returns NULL, or a pointer that should be freed. XXX - this code is pretty strange, as it used to also work on Win16, where the buffer sizes werent available in advance. It could be simplied now Win16/Win32s is dead! */ static char * getpythonregpath(HKEY keyBase, int skipcore) { HKEY newKey = 0; DWORD dataSize = 0; DWORD numKeys = 0; LONG rc; char *retval = NULL; TCHAR *dataBuf = NULL; static const TCHAR keyPrefix[] = _T("Software\\Python\\PythonCore\\"); static const TCHAR keySuffix[] = _T("\\PythonPath"); size_t versionLen; DWORD index; TCHAR *keyBuf = NULL; TCHAR *keyBufPtr; TCHAR **ppPaths = NULL; /* Tried to use sysget("winver") but here is too early :-( */ versionLen = _tcslen(PyWin_DLLVersionString); /* Space for all the chars, plus one \0 */ keyBuf = keyBufPtr = malloc(sizeof(keyPrefix) + sizeof(TCHAR)*(versionLen-1) + sizeof(keySuffix)); if (keyBuf==NULL) goto done; memcpy(keyBufPtr, keyPrefix, sizeof(keyPrefix)-sizeof(TCHAR)); keyBufPtr += sizeof(keyPrefix)/sizeof(TCHAR) - 1; memcpy(keyBufPtr, PyWin_DLLVersionString, versionLen * sizeof(TCHAR)); keyBufPtr += versionLen; /* NULL comes with this one! */ memcpy(keyBufPtr, keySuffix, sizeof(keySuffix)); /* Open the root Python key */ rc=RegOpenKeyEx(keyBase, keyBuf, /* subkey */ 0, /* reserved */ KEY_READ, &newKey); if (rc!=ERROR_SUCCESS) goto done; /* Find out how big our core buffer is, and how many subkeys we have */ rc = RegQueryInfoKey(newKey, NULL, NULL, NULL, &numKeys, NULL, NULL, NULL, NULL, &dataSize, NULL, NULL); if (rc!=ERROR_SUCCESS) goto done; if (skipcore) dataSize = 0; /* Only count core ones if we want them! */ /* Allocate a temp array of char buffers, so we only need to loop reading the registry once */ ppPaths = malloc( sizeof(TCHAR *) * numKeys ); if (ppPaths==NULL) goto done; memset(ppPaths, 0, sizeof(TCHAR *) * numKeys); /* Loop over all subkeys, allocating a temp sub-buffer. */ for(index=0;index 0) { *(szCur++) = _T(';'); dataSize--; } if (ppPaths[index]) { int len = _tcslen(ppPaths[index]); _tcsncpy(szCur, ppPaths[index], len); szCur += len; dataSize -= len; } } if (skipcore) *szCur = '\0'; else { /* If we have no values, we dont need a ';' */ if (numKeys) { *(szCur++) = _T(';'); dataSize--; } /* Now append the core path entries - this will include the NULL */ rc = RegQueryValueEx(newKey, NULL, 0, NULL, (LPBYTE)szCur, &dataSize); } /* And set the result - caller must free If MBCS, it is fine as is. If Unicode, allocate new buffer and convert. */ #ifdef UNICODE retval = (char *)malloc(reqdSize+1); if (retval) WideCharToMultiByte(CP_ACP, 0, dataBuf, -1, /* source */ retval, reqdSize+1, /* dest */ NULL, NULL); free(dataBuf); #else retval = dataBuf; #endif } done: /* Loop freeing my temp buffers */ if (ppPaths) { for(index=0;index 4) { zip_path[len-3] = 'z'; /* change ending to "zip" */ zip_path[len-2] = 'i'; zip_path[len-1] = 'p'; } else { zip_path[0] = 0; } skiphome = pythonhome==NULL ? 0 : 1; machinepath = getpythonregpath(HKEY_LOCAL_MACHINE, skiphome); userpath = getpythonregpath(HKEY_CURRENT_USER, skiphome); /* We only use the default relative PYTHONPATH if we havent anything better to use! */ skipdefault = envpath!=NULL || pythonhome!=NULL || \ machinepath!=NULL || userpath!=NULL; #endif /* We need to construct a path from the following parts. (1) the PYTHONPATH environment variable, if set; (2) for Win32, the zip archive file path; (3) for Win32, the machinepath and userpath, if set; (4) the PYTHONPATH config macro, with the leading "." of each component replaced with pythonhome, if set; (5) the directory containing the executable (argv0_path). The length calculation calculates #4 first. Extra rules: - If PYTHONHOME is set (in any way) item (3) is ignored. - If registry values are used, (4) and (5) are ignored. */ /* Calculate size of return buffer */ if (pythonhome != NULL) { char *p; bufsz = 1; for (p = PYTHONPATH; *p; p++) { if (*p == DELIM) bufsz++; /* number of DELIM plus one */ } bufsz *= strlen(pythonhome); } else bufsz = 0; bufsz += strlen(PYTHONPATH) + 1; bufsz += strlen(argv0_path) + 1; #ifdef MS_WINDOWS if (userpath) bufsz += strlen(userpath) + 1; if (machinepath) bufsz += strlen(machinepath) + 1; bufsz += strlen(zip_path) + 1; #endif if (envpath != NULL) bufsz += strlen(envpath) + 1; module_search_path = buf = malloc(bufsz); if (buf == NULL) { /* We can't exit, so print a warning and limp along */ fprintf(stderr, "Can't malloc dynamic PYTHONPATH.\n"); if (envpath) { fprintf(stderr, "Using environment $PYTHONPATH.\n"); module_search_path = envpath; } else { fprintf(stderr, "Using default static path.\n"); module_search_path = PYTHONPATH; } #ifdef MS_WINDOWS if (machinepath) free(machinepath); if (userpath) free(userpath); #endif /* MS_WINDOWS */ return; } if (envpath) { strcpy(buf, envpath); buf = strchr(buf, '\0'); *buf++ = DELIM; } #ifdef MS_WINDOWS if (zip_path[0]) { strcpy(buf, zip_path); buf = strchr(buf, '\0'); *buf++ = DELIM; } if (userpath) { strcpy(buf, userpath); buf = strchr(buf, '\0'); *buf++ = DELIM; free(userpath); } if (machinepath) { strcpy(buf, machinepath); buf = strchr(buf, '\0'); *buf++ = DELIM; free(machinepath); } if (pythonhome == NULL) { if (!skipdefault) { strcpy(buf, PYTHONPATH); buf = strchr(buf, '\0'); } } #else if (pythonhome == NULL) { strcpy(buf, PYTHONPATH); buf = strchr(buf, '\0'); } #endif /* MS_WINDOWS */ else { char *p = PYTHONPATH; char *q; size_t n; for (;;) { q = strchr(p, DELIM); if (q == NULL) n = strlen(p); else n = q-p; if (p[0] == '.' && is_sep(p[1])) { strcpy(buf, pythonhome); buf = strchr(buf, '\0'); p++; n--; } strncpy(buf, p, n); buf += n; if (q == NULL) break; *buf++ = DELIM; p = q+1; } } if (argv0_path) { *buf++ = DELIM; strcpy(buf, argv0_path); buf = strchr(buf, '\0'); } *buf = '\0'; /* Now to pull one last hack/trick. If sys.prefix is empty, then try and find it somewhere on the paths we calculated. We scan backwards, as our general policy is that Python core directories are at the *end* of sys.path. We assume that our "lib" directory is on the path, and that our 'prefix' directory is the parent of that. */ if (*prefix=='\0') { char lookBuf[MAXPATHLEN+1]; char *look = buf - 1; /* 'buf' is at the end of the buffer */ while (1) { int nchars; char *lookEnd = look; /* 'look' will end up one character before the start of the path in question - even if this is one character before the start of the buffer */ while (*look != DELIM && look >= module_search_path) look--; nchars = lookEnd-look; strncpy(lookBuf, look+1, nchars); lookBuf[nchars] = '\0'; /* Up one level to the parent */ reduce(lookBuf); if (search_for_prefix(lookBuf, LANDMARK)) { break; } /* If we are out of paths to search - give up */ if (look < module_search_path) break; look--; } } } /* External interface */ char * Py_GetPath(void) { if (!module_search_path) calculate_path(); return module_search_path; } char * Py_GetPrefix(void) { if (!module_search_path) calculate_path(); return prefix; } char * Py_GetExecPrefix(void) { return Py_GetPrefix(); } char * Py_GetProgramFullPath(void) { if (!module_search_path) calculate_path(); return progpath; } Python-2.3.7/PC/_winreg.c0000644001241000117560000012537707762465046014407 0ustar loewishpifb6/* _winreg.c Windows Registry access module for Python. * Simple registry access written by Mark Hammond in win32api module circa 1995. * Bill Tutt expanded the support significantly not long after. * Numerous other people have submitted patches since then. * Ripped from win32api module 03-Feb-2000 by Mark Hammond, and basic Unicode support added. */ #include "windows.h" #include "Python.h" #include "structmember.h" #include "malloc.h" /* for alloca */ static BOOL PyHKEY_AsHKEY(PyObject *ob, HKEY *pRes, BOOL bNoneOK); static PyObject *PyHKEY_FromHKEY(HKEY h); static BOOL PyHKEY_Close(PyObject *obHandle); static char errNotAHandle[] = "Object is not a handle"; /* The win32api module reports the function name that failed, but this concept is not in the Python core. Hopefully it will one day, and in the meantime I dont want to lose this info... */ #define PyErr_SetFromWindowsErrWithFunction(rc, fnname) \ PyErr_SetFromWindowsErr(rc) /* Forward declares */ /* Doc strings */ PyDoc_STRVAR(module_doc, "This module provides access to the Windows registry API.\n" "\n" "Functions:\n" "\n" "CloseKey() - Closes a registry key.\n" "ConnectRegistry() - Establishes a connection to a predefined registry handle\n" " on another computer.\n" "CreateKey() - Creates the specified key, or opens it if it already exists.\n" "DeleteKey() - Deletes the specified key.\n" "DeleteValue() - Removes a named value from the specified registry key.\n" "EnumKey() - Enumerates subkeys of the specified open registry key.\n" "EnumValue() - Enumerates values of the specified open registry key.\n" "FlushKey() - Writes all the attributes of the specified key to the registry.\n" "LoadKey() - Creates a subkey under HKEY_USER or HKEY_LOCAL_MACHINE and stores\n" " registration information from a specified file into that subkey.\n" "OpenKey() - Alias for \n" "OpenKeyEx() - Opens the specified key.\n" "QueryValue() - Retrieves the value associated with the unnamed value for a\n" " specified key in the registry.\n" "QueryValueEx() - Retrieves the type and data for a specified value name\n" " associated with an open registry key.\n" "QueryInfoKey() - Returns information about the specified key.\n" "SaveKey() - Saves the specified key, and all its subkeys a file.\n" "SetValue() - Associates a value with a specified key.\n" "SetValueEx() - Stores data in the value field of an open registry key.\n" "\n" "Special objects:\n" "\n" "HKEYType -- type object for HKEY objects\n" "error -- exception raised for Win32 errors\n" "\n" "Integer constants:\n" "Many constants are defined - see the documentation for each function\n" "to see what constants are used, and where."); PyDoc_STRVAR(CloseKey_doc, "CloseKey(hkey) - Closes a previously opened registry key.\n" "\n" "The hkey argument specifies a previously opened key.\n" "\n" "Note that if the key is not closed using this method, it will be\n" "closed when the hkey object is destroyed by Python."); PyDoc_STRVAR(ConnectRegistry_doc, "key = ConnectRegistry(computer_name, key) - " "Establishes a connection to a predefined registry handle on another computer.\n" "\n" "computer_name is the name of the remote computer, of the form \\\\computername.\n" " If None, the local computer is used.\n" "key is the predefined handle to connect to.\n" "\n" "The return value is the handle of the opened key.\n" "If the function fails, an EnvironmentError exception is raised."); PyDoc_STRVAR(CreateKey_doc, "key = CreateKey(key, sub_key) - Creates or opens the specified key.\n" "\n" "key is an already open key, or one of the predefined HKEY_* constants\n" "sub_key is a string that names the key this method opens or creates.\n" " If key is one of the predefined keys, sub_key may be None. In that case,\n" " the handle returned is the same key handle passed in to the function.\n" "\n" "If the key already exists, this function opens the existing key\n" "\n" "The return value is the handle of the opened key.\n" "If the function fails, an exception is raised."); PyDoc_STRVAR(DeleteKey_doc, "DeleteKey(key, sub_key) - Deletes the specified key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "sub_key is a string that must be a subkey of the key identified by the key parameter.\n" " This value must not be None, and the key may not have subkeys.\n" "\n" "This method can not delete keys with subkeys.\n" "\n" "If the method succeeds, the entire key, including all of its values,\n" "is removed. If the method fails, an EnvironmentError exception is raised."); PyDoc_STRVAR(DeleteValue_doc, "DeleteValue(key, value) - Removes a named value from a registry key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "value is a string that identifies the value to remove."); PyDoc_STRVAR(EnumKey_doc, "string = EnumKey(key, index) - Enumerates subkeys of an open registry key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "index is an integer that identifies the index of the key to retrieve.\n" "\n" "The function retrieves the name of one subkey each time it is called.\n" "It is typically called repeatedly until an EnvironmentError exception is\n" "raised, indicating no more values are available."); PyDoc_STRVAR(EnumValue_doc, "tuple = EnumValue(key, index) - Enumerates values of an open registry key.\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "index is an integer that identifies the index of the value to retrieve.\n" "\n" "The function retrieves the name of one subkey each time it is called.\n" "It is typically called repeatedly, until an EnvironmentError exception\n" "is raised, indicating no more values.\n" "\n" "The result is a tuple of 3 items:\n" "value_name is a string that identifies the value.\n" "value_data is an object that holds the value data, and whose type depends\n" " on the underlying registry type.\n" "data_type is an integer that identifies the type of the value data."); PyDoc_STRVAR(FlushKey_doc, "FlushKey(key) - Writes all the attributes of a key to the registry.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "\n" "It is not necessary to call RegFlushKey to change a key.\n" "Registry changes are flushed to disk by the registry using its lazy flusher.\n" "Registry changes are also flushed to disk at system shutdown.\n" "Unlike CloseKey(), the FlushKey() method returns only when all the data has\n" "been written to the registry.\n" "An application should only call FlushKey() if it requires absolute certainty that registry changes are on disk.\n" "If you don't know whether a FlushKey() call is required, it probably isn't."); PyDoc_STRVAR(LoadKey_doc, "LoadKey(key, sub_key, file_name) - Creates a subkey under the specified key\n" "and stores registration information from a specified file into that subkey.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "sub_key is a string that identifies the sub_key to load\n" "file_name is the name of the file to load registry data from.\n" " This file must have been created with the SaveKey() function.\n" " Under the file allocation table (FAT) file system, the filename may not\n" "have an extension.\n" "\n" "A call to LoadKey() fails if the calling process does not have the\n" "SE_RESTORE_PRIVILEGE privilege.\n" "\n" "If key is a handle returned by ConnectRegistry(), then the path specified\n" "in fileName is relative to the remote computer.\n" "\n" "The docs imply key must be in the HKEY_USER or HKEY_LOCAL_MACHINE tree"); PyDoc_STRVAR(OpenKey_doc, "key = OpenKey(key, sub_key, res = 0, sam = KEY_READ) - Opens the specified key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "sub_key is a string that identifies the sub_key to open\n" "res is a reserved integer, and must be zero. Default is zero.\n" "sam is an integer that specifies an access mask that describes the desired\n" " security access for the key. Default is KEY_READ\n" "\n" "The result is a new handle to the specified key\n" "If the function fails, an EnvironmentError exception is raised."); PyDoc_STRVAR(OpenKeyEx_doc, "See OpenKey()"); PyDoc_STRVAR(QueryInfoKey_doc, "tuple = QueryInfoKey(key) - Returns information about a key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "\n" "The result is a tuple of 3 items:" "An integer that identifies the number of sub keys this key has.\n" "An integer that identifies the number of values this key has.\n" "A long integer that identifies when the key was last modified (if available)\n" " as 100's of nanoseconds since Jan 1, 1600."); PyDoc_STRVAR(QueryValue_doc, "string = QueryValue(key, sub_key) - retrieves the unnamed value for a key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "sub_key is a string that holds the name of the subkey with which the value\n" " is associated. If this parameter is None or empty, the function retrieves\n" " the value set by the SetValue() method for the key identified by key." "\n" "Values in the registry have name, type, and data components. This method\n" "retrieves the data for a key's first value that has a NULL name.\n" "But the underlying API call doesn't return the type, Lame Lame Lame, DONT USE THIS!!!"); PyDoc_STRVAR(QueryValueEx_doc, "value,type_id = QueryValueEx(key, value_name) - Retrieves the type and data for a specified value name associated with an open registry key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "value_name is a string indicating the value to query"); PyDoc_STRVAR(SaveKey_doc, "SaveKey(key, file_name) - Saves the specified key, and all its subkeys to the specified file.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "file_name is the name of the file to save registry data to.\n" " This file cannot already exist. If this filename includes an extension,\n" " it cannot be used on file allocation table (FAT) file systems by the\n" " LoadKey(), ReplaceKey() or RestoreKey() methods.\n" "\n" "If key represents a key on a remote computer, the path described by\n" "file_name is relative to the remote computer.\n" "The caller of this method must possess the SeBackupPrivilege security privilege.\n" "This function passes NULL for security_attributes to the API."); PyDoc_STRVAR(SetValue_doc, "SetValue(key, sub_key, type, value) - Associates a value with a specified key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "sub_key is a string that names the subkey with which the value is associated.\n" "type is an integer that specifies the type of the data. Currently this\n" " must be REG_SZ, meaning only strings are supported.\n" "value is a string that specifies the new value.\n" "\n" "If the key specified by the sub_key parameter does not exist, the SetValue\n" "function creates it.\n" "\n" "Value lengths are limited by available memory. Long values (more than\n" "2048 bytes) should be stored as files with the filenames stored in \n" "the configuration registry. This helps the registry perform efficiently.\n" "\n" "The key identified by the key parameter must have been opened with\n" "KEY_SET_VALUE access."); PyDoc_STRVAR(SetValueEx_doc, "SetValueEx(key, value_name, reserved, type, value) - Stores data in the value field of an open registry key.\n" "\n" "key is an already open key, or any one of the predefined HKEY_* constants.\n" "value_name is a string containing the name of the value to set, or None\n" "type is an integer that specifies the type of the data. This should be one of:\n" " REG_BINARY -- Binary data in any form.\n" " REG_DWORD -- A 32-bit number.\n" " REG_DWORD_LITTLE_ENDIAN -- A 32-bit number in little-endian format.\n" " REG_DWORD_BIG_ENDIAN -- A 32-bit number in big-endian format.\n" " REG_EXPAND_SZ -- A null-terminated string that contains unexpanded references\n" " to environment variables (for example, %PATH%).\n" " REG_LINK -- A Unicode symbolic link.\n" " REG_MULTI_SZ -- An sequence of null-terminated strings, terminated by\n" " two null characters. Note that Python handles this\n" " termination automatically.\n" " REG_NONE -- No defined value type.\n" " REG_RESOURCE_LIST -- A device-driver resource list.\n" " REG_SZ -- A null-terminated string.\n" "reserved can be anything - zero is always passed to the API.\n" "value is a string that specifies the new value.\n" "\n" "This method can also set additional value and type information for the\n" "specified key. The key identified by the key parameter must have been\n" "opened with KEY_SET_VALUE access.\n" "\n" "To open the key, use the CreateKeyEx() or OpenKeyEx() methods.\n" "\n" "Value lengths are limited by available memory. Long values (more than\n" "2048 bytes) should be stored as files with the filenames stored in \n" "the configuration registry. This helps the registry perform efficiently."); /* PyHKEY docstrings */ PyDoc_STRVAR(PyHKEY_doc, "PyHKEY Object - A Python object, representing a win32 registry key.\n" "\n" "This object wraps a Windows HKEY object, automatically closing it when\n" "the object is destroyed. To guarantee cleanup, you can call either\n" "the Close() method on the PyHKEY, or the CloseKey() method.\n" "\n" "All functions which accept a handle object also accept an integer - \n" "however, use of the handle object is encouraged.\n" "\n" "Functions:\n" "Close() - Closes the underlying handle.\n" "Detach() - Returns the integer Win32 handle, detaching it from the object\n" "\n" "Properties:\n" "handle - The integer Win32 handle.\n" "\n" "Operations:\n" "__nonzero__ - Handles with an open object return true, otherwise false.\n" "__int__ - Converting a handle to an integer returns the Win32 handle.\n" "__cmp__ - Handle objects are compared using the handle value."); PyDoc_STRVAR(PyHKEY_Close_doc, "key.Close() - Closes the underlying Windows handle.\n" "\n" "If the handle is already closed, no error is raised."); PyDoc_STRVAR(PyHKEY_Detach_doc, "int = key.Detach() - Detaches the Windows handle from the handle object.\n" "\n" "The result is the value of the handle before it is detached. If the\n" "handle is already detached, this will return zero.\n" "\n" "After calling this function, the handle is effectively invalidated,\n" "but the handle is not closed. You would call this function when you\n" "need the underlying win32 handle to exist beyond the lifetime of the\n" "handle object.\n" "On 64 bit windows, the result of this function is a long integer"); /************************************************************************ The PyHKEY object definition ************************************************************************/ typedef struct { PyObject_VAR_HEAD HKEY hkey; } PyHKEYObject; #define PyHKEY_Check(op) ((op)->ob_type == &PyHKEY_Type) static char *failMsg = "bad operand type"; static PyObject * PyHKEY_unaryFailureFunc(PyObject *ob) { PyErr_SetString(PyExc_TypeError, failMsg); return NULL; } static PyObject * PyHKEY_binaryFailureFunc(PyObject *ob1, PyObject *ob2) { PyErr_SetString(PyExc_TypeError, failMsg); return NULL; } static PyObject * PyHKEY_ternaryFailureFunc(PyObject *ob1, PyObject *ob2, PyObject *ob3) { PyErr_SetString(PyExc_TypeError, failMsg); return NULL; } static void PyHKEY_deallocFunc(PyObject *ob) { /* Can not call PyHKEY_Close, as the ob->tp_type has already been cleared, thus causing the type check to fail! */ PyHKEYObject *obkey = (PyHKEYObject *)ob; if (obkey->hkey) RegCloseKey((HKEY)obkey->hkey); PyObject_DEL(ob); } static int PyHKEY_nonzeroFunc(PyObject *ob) { return ((PyHKEYObject *)ob)->hkey != 0; } static PyObject * PyHKEY_intFunc(PyObject *ob) { PyHKEYObject *pyhkey = (PyHKEYObject *)ob; return PyLong_FromVoidPtr(pyhkey->hkey); } static int PyHKEY_printFunc(PyObject *ob, FILE *fp, int flags) { PyHKEYObject *pyhkey = (PyHKEYObject *)ob; char resBuf[160]; wsprintf(resBuf, "", ob, pyhkey->hkey); fputs(resBuf, fp); return 0; } static PyObject * PyHKEY_strFunc(PyObject *ob) { PyHKEYObject *pyhkey = (PyHKEYObject *)ob; char resBuf[160]; wsprintf(resBuf, "", pyhkey->hkey); return PyString_FromString(resBuf); } static int PyHKEY_compareFunc(PyObject *ob1, PyObject *ob2) { PyHKEYObject *pyhkey1 = (PyHKEYObject *)ob1; PyHKEYObject *pyhkey2 = (PyHKEYObject *)ob2; return pyhkey1 == pyhkey2 ? 0 : (pyhkey1 < pyhkey2 ? -1 : 1); } static long PyHKEY_hashFunc(PyObject *ob) { /* Just use the address. XXX - should we use the handle value? */ return _Py_HashPointer(ob); } static PyNumberMethods PyHKEY_NumberMethods = { PyHKEY_binaryFailureFunc, /* nb_add */ PyHKEY_binaryFailureFunc, /* nb_subtract */ PyHKEY_binaryFailureFunc, /* nb_multiply */ PyHKEY_binaryFailureFunc, /* nb_divide */ PyHKEY_binaryFailureFunc, /* nb_remainder */ PyHKEY_binaryFailureFunc, /* nb_divmod */ PyHKEY_ternaryFailureFunc, /* nb_power */ PyHKEY_unaryFailureFunc, /* nb_negative */ PyHKEY_unaryFailureFunc, /* nb_positive */ PyHKEY_unaryFailureFunc, /* nb_absolute */ PyHKEY_nonzeroFunc, /* nb_nonzero */ PyHKEY_unaryFailureFunc, /* nb_invert */ PyHKEY_binaryFailureFunc, /* nb_lshift */ PyHKEY_binaryFailureFunc, /* nb_rshift */ PyHKEY_binaryFailureFunc, /* nb_and */ PyHKEY_binaryFailureFunc, /* nb_xor */ PyHKEY_binaryFailureFunc, /* nb_or */ 0, /* nb_coerce (allowed to be zero) */ PyHKEY_intFunc, /* nb_int */ PyHKEY_unaryFailureFunc, /* nb_long */ PyHKEY_unaryFailureFunc, /* nb_float */ PyHKEY_unaryFailureFunc, /* nb_oct */ PyHKEY_unaryFailureFunc, /* nb_hex */ }; /* fwd declare __getattr__ */ static PyObject *PyHKEY_getattr(PyObject *self, char *name); /* The type itself */ PyTypeObject PyHKEY_Type = { PyObject_HEAD_INIT(0) /* fill in type at module init */ 0, "PyHKEY", sizeof(PyHKEYObject), 0, PyHKEY_deallocFunc, /* tp_dealloc */ PyHKEY_printFunc, /* tp_print */ PyHKEY_getattr, /* tp_getattr */ 0, /* tp_setattr */ PyHKEY_compareFunc, /* tp_compare */ 0, /* tp_repr */ &PyHKEY_NumberMethods, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ PyHKEY_hashFunc, /* tp_hash */ 0, /* tp_call */ PyHKEY_strFunc, /* tp_str */ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ 0, /* tp_flags */ PyHKEY_doc, /* tp_doc */ }; #define OFF(e) offsetof(PyHKEYObject, e) static struct memberlist PyHKEY_memberlist[] = { {"handle", T_INT, OFF(hkey)}, {NULL} /* Sentinel */ }; /************************************************************************ The PyHKEY object methods ************************************************************************/ static PyObject * PyHKEY_CloseMethod(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":Close")) return NULL; if (!PyHKEY_Close(self)) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * PyHKEY_DetachMethod(PyObject *self, PyObject *args) { void* ret; PyHKEYObject *pThis = (PyHKEYObject *)self; if (!PyArg_ParseTuple(args, ":Detach")) return NULL; ret = (void*)pThis->hkey; pThis->hkey = 0; return PyLong_FromVoidPtr(ret); } static struct PyMethodDef PyHKEY_methods[] = { {"Close", PyHKEY_CloseMethod, METH_VARARGS, PyHKEY_Close_doc}, {"Detach", PyHKEY_DetachMethod, METH_VARARGS, PyHKEY_Detach_doc}, {NULL} }; /*static*/ PyObject * PyHKEY_getattr(PyObject *self, char *name) { PyObject *res; res = Py_FindMethod(PyHKEY_methods, self, name); if (res != NULL) return res; PyErr_Clear(); if (strcmp(name, "handle") == 0) return PyLong_FromVoidPtr(((PyHKEYObject *)self)->hkey); return PyMember_Get((char *)self, PyHKEY_memberlist, name); } /************************************************************************ The public PyHKEY API (well, not public yet :-) ************************************************************************/ PyObject * PyHKEY_New(HKEY hInit) { PyHKEYObject *key = PyObject_NEW(PyHKEYObject, &PyHKEY_Type); if (key) key->hkey = hInit; return (PyObject *)key; } BOOL PyHKEY_Close(PyObject *ob_handle) { LONG rc; PyHKEYObject *key; if (!PyHKEY_Check(ob_handle)) { PyErr_SetString(PyExc_TypeError, "bad operand type"); return FALSE; } key = (PyHKEYObject *)ob_handle; rc = key->hkey ? RegCloseKey((HKEY)key->hkey) : ERROR_SUCCESS; key->hkey = 0; if (rc != ERROR_SUCCESS) PyErr_SetFromWindowsErrWithFunction(rc, "RegCloseKey"); return rc == ERROR_SUCCESS; } BOOL PyHKEY_AsHKEY(PyObject *ob, HKEY *pHANDLE, BOOL bNoneOK) { if (ob == Py_None) { if (!bNoneOK) { PyErr_SetString( PyExc_TypeError, "None is not a valid HKEY in this context"); return FALSE; } *pHANDLE = (HKEY)0; } else if (PyHKEY_Check(ob)) { PyHKEYObject *pH = (PyHKEYObject *)ob; *pHANDLE = pH->hkey; } else if (PyInt_Check(ob) || PyLong_Check(ob)) { /* We also support integers */ PyErr_Clear(); *pHANDLE = (HKEY)PyLong_AsVoidPtr(ob); if (PyErr_Occurred()) return FALSE; } else { PyErr_SetString( PyExc_TypeError, "The object is not a PyHKEY object"); return FALSE; } return TRUE; } PyObject * PyHKEY_FromHKEY(HKEY h) { PyHKEYObject *op; /* Inline PyObject_New */ op = (PyHKEYObject *) PyObject_MALLOC(sizeof(PyHKEYObject)); if (op == NULL) return PyErr_NoMemory(); PyObject_INIT(op, &PyHKEY_Type); op->hkey = h; return (PyObject *)op; } /************************************************************************ The module methods ************************************************************************/ BOOL PyWinObject_CloseHKEY(PyObject *obHandle) { BOOL ok; if (PyHKEY_Check(obHandle)) { ok = PyHKEY_Close(obHandle); } #if SIZEOF_LONG >= SIZEOF_HKEY else if (PyInt_Check(obHandle)) { long rc = RegCloseKey((HKEY)PyInt_AsLong(obHandle)); ok = (rc == ERROR_SUCCESS); if (!ok) PyErr_SetFromWindowsErrWithFunction(rc, "RegCloseKey"); } #else else if (PyLong_Check(obHandle)) { long rc = RegCloseKey((HKEY)PyLong_AsVoidPtr(obHandle)); ok = (rc == ERROR_SUCCESS); if (!ok) PyErr_SetFromWindowsErrWithFunction(rc, "RegCloseKey"); } #endif else { PyErr_SetString( PyExc_TypeError, "A handle must be a HKEY object or an integer"); return FALSE; } return ok; } /* Private Helper functions for the registry interfaces ** Note that fixupMultiSZ and countString have both had changes ** made to support "incorrect strings". The registry specification ** calls for strings to be terminated with 2 null bytes. It seems ** some commercial packages install strings which dont conform, ** causing this code to fail - however, "regedit" etc still work ** with these strings (ie only we dont!). */ static void fixupMultiSZ(char **str, char *data, int len) { char *P; int i; char *Q; Q = data + len; for (P = data, i = 0; P < Q && *P != '\0'; P++, i++) { str[i] = P; for(; *P != '\0'; P++) ; } } static int countStrings(char *data, int len) { int strings; char *P; char *Q = data + len; for (P = data, strings = 0; P < Q && *P != '\0'; P++, strings++) for (; P < Q && *P != '\0'; P++) ; return strings; } /* Convert PyObject into Registry data. Allocates space as needed. */ static BOOL Py2Reg(PyObject *value, DWORD typ, BYTE **retDataBuf, DWORD *retDataSize) { int i,j; switch (typ) { case REG_DWORD: if (value != Py_None && !PyInt_Check(value)) return FALSE; *retDataBuf = (BYTE *)PyMem_NEW(DWORD, sizeof(DWORD)); if (*retDataBuf==NULL){ PyErr_NoMemory(); return FALSE; } *retDataSize = sizeof(DWORD); if (value == Py_None) { DWORD zero = 0; memcpy(*retDataBuf, &zero, sizeof(DWORD)); } else memcpy(*retDataBuf, &PyInt_AS_LONG((PyIntObject *)value), sizeof(DWORD)); break; case REG_SZ: case REG_EXPAND_SZ: { int need_decref = 0; if (value == Py_None) *retDataSize = 1; else { if (PyUnicode_Check(value)) { value = PyUnicode_AsEncodedString( value, "mbcs", NULL); if (value==NULL) return FALSE; need_decref = 1; } if (!PyString_Check(value)) return FALSE; *retDataSize = 1 + strlen( PyString_AS_STRING( (PyStringObject *)value)); } *retDataBuf = (BYTE *)PyMem_NEW(DWORD, *retDataSize); if (*retDataBuf==NULL){ PyErr_NoMemory(); return FALSE; } if (value == Py_None) strcpy((char *)*retDataBuf, ""); else strcpy((char *)*retDataBuf, PyString_AS_STRING( (PyStringObject *)value)); if (need_decref) Py_DECREF(value); break; } case REG_MULTI_SZ: { DWORD size = 0; char *P; PyObject **obs = NULL; if (value == Py_None) i = 0; else { if (!PyList_Check(value)) return FALSE; i = PyList_Size(value); } obs = malloc(sizeof(PyObject *) * i); memset(obs, 0, sizeof(PyObject *) * i); for (j = 0; j < i; j++) { PyObject *t; t = PyList_GET_ITEM( (PyListObject *)value,j); if (PyString_Check(t)) { obs[j] = t; Py_INCREF(t); } else if (PyUnicode_Check(t)) { obs[j] = PyUnicode_AsEncodedString( t, "mbcs", NULL); if (obs[j]==NULL) goto reg_multi_fail; } else goto reg_multi_fail; size += 1 + strlen( PyString_AS_STRING( (PyStringObject *)obs[j])); } *retDataSize = size + 1; *retDataBuf = (BYTE *)PyMem_NEW(char, *retDataSize); if (*retDataBuf==NULL){ PyErr_NoMemory(); goto reg_multi_fail; } P = (char *)*retDataBuf; for (j = 0; j < i; j++) { PyObject *t; t = obs[j]; strcpy(P, PyString_AS_STRING( (PyStringObject *)t)); P += 1 + strlen( PyString_AS_STRING( (PyStringObject *)t)); Py_DECREF(obs[j]); } /* And doubly-terminate the list... */ *P = '\0'; free(obs); break; reg_multi_fail: if (obs) { for (j = 0; j < i; j++) Py_XDECREF(obs[j]); free(obs); } return FALSE; } case REG_BINARY: /* ALSO handle ALL unknown data types here. Even if we can't support it natively, we should handle the bits. */ default: if (value == Py_None) *retDataSize = 0; else { void *src_buf; PyBufferProcs *pb = value->ob_type->tp_as_buffer; if (pb==NULL) { PyErr_Format(PyExc_TypeError, "Objects of type '%s' can not " "be used as binary registry values", value->ob_type->tp_name); return FALSE; } *retDataSize = (*pb->bf_getreadbuffer)(value, 0, &src_buf); *retDataBuf = (BYTE *)PyMem_NEW(char, *retDataSize); if (*retDataBuf==NULL){ PyErr_NoMemory(); return FALSE; } memcpy(*retDataBuf, src_buf, *retDataSize); } break; } return TRUE; } /* Convert Registry data into PyObject*/ static PyObject * Reg2Py(char *retDataBuf, DWORD retDataSize, DWORD typ) { PyObject *obData; switch (typ) { case REG_DWORD: if (retDataSize == 0) obData = Py_BuildValue("i", 0); else obData = Py_BuildValue("i", *(int *)retDataBuf); break; case REG_SZ: case REG_EXPAND_SZ: /* retDataBuf may or may not have a trailing NULL in the buffer. */ if (retDataSize && retDataBuf[retDataSize-1] == '\0') --retDataSize; if (retDataSize ==0) retDataBuf = ""; obData = PyUnicode_DecodeMBCS(retDataBuf, retDataSize, NULL); break; case REG_MULTI_SZ: if (retDataSize == 0) obData = PyList_New(0); else { int index = 0; int s = countStrings(retDataBuf, retDataSize); char **str = (char **)malloc(sizeof(char *)*s); if (str == NULL) return PyErr_NoMemory(); fixupMultiSZ(str, retDataBuf, retDataSize); obData = PyList_New(s); if (obData == NULL) return NULL; for (index = 0; index < s; index++) { size_t len = _mbstrlen(str[index]); if (len > INT_MAX) { PyErr_SetString(PyExc_OverflowError, "registry string is too long for a Python string"); Py_DECREF(obData); return NULL; } PyList_SetItem(obData, index, PyUnicode_DecodeMBCS( (const char *)str[index], (int)len, NULL) ); } free(str); break; } case REG_BINARY: /* ALSO handle ALL unknown data types here. Even if we can't support it natively, we should handle the bits. */ default: if (retDataSize == 0) { Py_INCREF(Py_None); obData = Py_None; } else obData = Py_BuildValue("s#", (char *)retDataBuf, retDataSize); break; } if (obData == NULL) return NULL; else return obData; } /* The Python methods */ static PyObject * PyCloseKey(PyObject *self, PyObject *args) { PyObject *obKey; if (!PyArg_ParseTuple(args, "O:CloseKey", &obKey)) return NULL; if (!PyHKEY_Close(obKey)) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * PyConnectRegistry(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *szCompName = NULL; HKEY retKey; long rc; if (!PyArg_ParseTuple(args, "zO:ConnectRegistry", &szCompName, &obKey)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; rc = RegConnectRegistry(szCompName, hKey, &retKey); if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "ConnectRegistry"); return PyHKEY_FromHKEY(retKey); } static PyObject * PyCreateKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *subKey; HKEY retKey; long rc; if (!PyArg_ParseTuple(args, "Oz:CreateKey", &obKey, &subKey)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; rc = RegCreateKey(hKey, subKey, &retKey); if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "CreateKey"); return PyHKEY_FromHKEY(retKey); } static PyObject * PyDeleteKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *subKey; long rc; if (!PyArg_ParseTuple(args, "Os:DeleteKey", &obKey, &subKey)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; rc = RegDeleteKey(hKey, subKey ); if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegDeleteKey"); Py_INCREF(Py_None); return Py_None; } static PyObject * PyDeleteValue(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *subKey; long rc; if (!PyArg_ParseTuple(args, "Oz:DeleteValue", &obKey, &subKey)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; Py_BEGIN_ALLOW_THREADS rc = RegDeleteValue(hKey, subKey); Py_END_ALLOW_THREADS if (rc !=ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegDeleteValue"); Py_INCREF(Py_None); return Py_None; } static PyObject * PyEnumKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; int index; long rc; PyObject *retStr; char *retBuf; DWORD len; if (!PyArg_ParseTuple(args, "Oi:EnumKey", &obKey, &index)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; if ((rc = RegQueryInfoKey(hKey, NULL, NULL, NULL, NULL, &len, NULL, NULL, NULL, NULL, NULL, NULL)) != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegQueryInfoKey"); ++len; /* include null terminator */ retStr = PyString_FromStringAndSize(NULL, len); if (retStr == NULL) return NULL; retBuf = PyString_AS_STRING(retStr); if ((rc = RegEnumKey(hKey, index, retBuf, len)) != ERROR_SUCCESS) { Py_DECREF(retStr); return PyErr_SetFromWindowsErrWithFunction(rc, "RegEnumKey"); } _PyString_Resize(&retStr, strlen(retBuf)); return retStr; } static PyObject * PyEnumValue(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; int index; long rc; char *retValueBuf; char *retDataBuf; DWORD retValueSize; DWORD retDataSize; DWORD typ; PyObject *obData; PyObject *retVal; if (!PyArg_ParseTuple(args, "Oi:EnumValue", &obKey, &index)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; if ((rc = RegQueryInfoKey(hKey, NULL, NULL, NULL, NULL, NULL, NULL, NULL, &retValueSize, &retDataSize, NULL, NULL)) != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegQueryInfoKey"); ++retValueSize; /* include null terminators */ ++retDataSize; retValueBuf = (char *)PyMem_Malloc(retValueSize); if (retValueBuf == NULL) return PyErr_NoMemory(); retDataBuf = (char *)PyMem_Malloc(retDataSize); if (retDataBuf == NULL) { PyMem_Free(retValueBuf); return PyErr_NoMemory(); } Py_BEGIN_ALLOW_THREADS rc = RegEnumValue(hKey, index, retValueBuf, &retValueSize, NULL, &typ, (BYTE *)retDataBuf, &retDataSize); Py_END_ALLOW_THREADS if (rc != ERROR_SUCCESS) { retVal = PyErr_SetFromWindowsErrWithFunction(rc, "PyRegEnumValue"); goto fail; } obData = Reg2Py(retDataBuf, retDataSize, typ); if (obData == NULL) { retVal = NULL; goto fail; } retVal = Py_BuildValue("sOi", retValueBuf, obData, typ); Py_DECREF(obData); fail: PyMem_Free(retValueBuf); PyMem_Free(retDataBuf); return retVal; } static PyObject * PyFlushKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; long rc; if (!PyArg_ParseTuple(args, "O:FlushKey", &obKey)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; Py_BEGIN_ALLOW_THREADS rc = RegFlushKey(hKey); Py_END_ALLOW_THREADS if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegFlushKey"); Py_INCREF(Py_None); return Py_None; } static PyObject * PyLoadKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *subKey; char *fileName; long rc; if (!PyArg_ParseTuple(args, "Oss:LoadKey", &obKey, &subKey, &fileName)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; Py_BEGIN_ALLOW_THREADS rc = RegLoadKey(hKey, subKey, fileName ); Py_END_ALLOW_THREADS if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegLoadKey"); Py_INCREF(Py_None); return Py_None; } static PyObject * PyOpenKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *subKey; int res = 0; HKEY retKey; long rc; REGSAM sam = KEY_READ; if (!PyArg_ParseTuple(args, "Oz|ii:OpenKey", &obKey, &subKey, &res, &sam)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; Py_BEGIN_ALLOW_THREADS rc = RegOpenKeyEx(hKey, subKey, res, sam, &retKey); Py_END_ALLOW_THREADS if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegOpenKeyEx"); return PyHKEY_FromHKEY(retKey); } static PyObject * PyQueryInfoKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; long rc; DWORD nSubKeys, nValues; FILETIME ft; LARGE_INTEGER li; PyObject *l; PyObject *ret; if (!PyArg_ParseTuple(args, "O:QueryInfoKey", &obKey)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; if ((rc = RegQueryInfoKey(hKey, NULL, NULL, 0, &nSubKeys, NULL, NULL, &nValues, NULL, NULL, NULL, &ft)) != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegQueryInfoKey"); li.LowPart = ft.dwLowDateTime; li.HighPart = ft.dwHighDateTime; l = PyLong_FromLongLong(li.QuadPart); if (l == NULL) return NULL; ret = Py_BuildValue("iiO", nSubKeys, nValues, l); Py_DECREF(l); return ret; } static PyObject * PyQueryValue(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *subKey; long rc; PyObject *retStr; char *retBuf; long bufSize = 0; if (!PyArg_ParseTuple(args, "Oz:QueryValue", &obKey, &subKey)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; if ((rc = RegQueryValue(hKey, subKey, NULL, &bufSize)) != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegQueryValue"); retStr = PyString_FromStringAndSize(NULL, bufSize); if (retStr == NULL) return NULL; retBuf = PyString_AS_STRING(retStr); if ((rc = RegQueryValue(hKey, subKey, retBuf, &bufSize)) != ERROR_SUCCESS) { Py_DECREF(retStr); return PyErr_SetFromWindowsErrWithFunction(rc, "RegQueryValue"); } _PyString_Resize(&retStr, strlen(retBuf)); return retStr; } static PyObject * PyQueryValueEx(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *valueName; long rc; char *retBuf; DWORD bufSize = 0; DWORD typ; PyObject *obData; PyObject *result; if (!PyArg_ParseTuple(args, "Oz:QueryValueEx", &obKey, &valueName)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; if ((rc = RegQueryValueEx(hKey, valueName, NULL, NULL, NULL, &bufSize)) != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegQueryValueEx"); retBuf = (char *)PyMem_Malloc(bufSize); if (retBuf == NULL) return PyErr_NoMemory(); if ((rc = RegQueryValueEx(hKey, valueName, NULL, &typ, (BYTE *)retBuf, &bufSize)) != ERROR_SUCCESS) { PyMem_Free(retBuf); return PyErr_SetFromWindowsErrWithFunction(rc, "RegQueryValueEx"); } obData = Reg2Py(retBuf, bufSize, typ); PyMem_Free((void *)retBuf); if (obData == NULL) return NULL; result = Py_BuildValue("Oi", obData, typ); Py_DECREF(obData); return result; } static PyObject * PySaveKey(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *fileName; LPSECURITY_ATTRIBUTES pSA = NULL; long rc; if (!PyArg_ParseTuple(args, "Os:SaveKey", &obKey, &fileName)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; /* One day we may get security into the core? if (!PyWinObject_AsSECURITY_ATTRIBUTES(obSA, &pSA, TRUE)) return NULL; */ Py_BEGIN_ALLOW_THREADS rc = RegSaveKey(hKey, fileName, pSA ); Py_END_ALLOW_THREADS if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegSaveKey"); Py_INCREF(Py_None); return Py_None; } static PyObject * PySetValue(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *subKey; char *str; DWORD typ; DWORD len; long rc; PyObject *obStrVal; PyObject *obSubKey; if (!PyArg_ParseTuple(args, "OOiO:SetValue", &obKey, &obSubKey, &typ, &obStrVal)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; if (typ != REG_SZ) { PyErr_SetString(PyExc_TypeError, "Type must be _winreg.REG_SZ"); return NULL; } /* XXX - need Unicode support */ str = PyString_AsString(obStrVal); if (str == NULL) return NULL; len = PyString_Size(obStrVal); if (obSubKey == Py_None) subKey = NULL; else { subKey = PyString_AsString(obSubKey); if (subKey == NULL) return NULL; } Py_BEGIN_ALLOW_THREADS rc = RegSetValue(hKey, subKey, REG_SZ, str, len+1); Py_END_ALLOW_THREADS if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegSetValue"); Py_INCREF(Py_None); return Py_None; } static PyObject * PySetValueEx(PyObject *self, PyObject *args) { HKEY hKey; PyObject *obKey; char *valueName; PyObject *obRes; PyObject *value; BYTE *data; DWORD len; DWORD typ; LONG rc; if (!PyArg_ParseTuple(args, "OzOiO:SetValueEx", &obKey, &valueName, &obRes, &typ, &value)) return NULL; if (!PyHKEY_AsHKEY(obKey, &hKey, FALSE)) return NULL; if (!Py2Reg(value, typ, &data, &len)) { if (!PyErr_Occurred()) PyErr_SetString(PyExc_ValueError, "Could not convert the data to the specified type."); return NULL; } Py_BEGIN_ALLOW_THREADS rc = RegSetValueEx(hKey, valueName, 0, typ, data, len); Py_END_ALLOW_THREADS PyMem_DEL(data); if (rc != ERROR_SUCCESS) return PyErr_SetFromWindowsErrWithFunction(rc, "RegSetValueEx"); Py_INCREF(Py_None); return Py_None; } static struct PyMethodDef winreg_methods[] = { {"CloseKey", PyCloseKey, METH_VARARGS, CloseKey_doc}, {"ConnectRegistry", PyConnectRegistry, METH_VARARGS, ConnectRegistry_doc}, {"CreateKey", PyCreateKey, METH_VARARGS, CreateKey_doc}, {"DeleteKey", PyDeleteKey, METH_VARARGS, DeleteKey_doc}, {"DeleteValue", PyDeleteValue, METH_VARARGS, DeleteValue_doc}, {"EnumKey", PyEnumKey, METH_VARARGS, EnumKey_doc}, {"EnumValue", PyEnumValue, METH_VARARGS, EnumValue_doc}, {"FlushKey", PyFlushKey, METH_VARARGS, FlushKey_doc}, {"LoadKey", PyLoadKey, METH_VARARGS, LoadKey_doc}, {"OpenKey", PyOpenKey, METH_VARARGS, OpenKey_doc}, {"OpenKeyEx", PyOpenKey, METH_VARARGS, OpenKeyEx_doc}, {"QueryValue", PyQueryValue, METH_VARARGS, QueryValue_doc}, {"QueryValueEx", PyQueryValueEx, METH_VARARGS, QueryValueEx_doc}, {"QueryInfoKey", PyQueryInfoKey, METH_VARARGS, QueryInfoKey_doc}, {"SaveKey", PySaveKey, METH_VARARGS, SaveKey_doc}, {"SetValue", PySetValue, METH_VARARGS, SetValue_doc}, {"SetValueEx", PySetValueEx, METH_VARARGS, SetValueEx_doc}, NULL, }; static void insint(PyObject * d, char * name, long value) { PyObject *v = PyInt_FromLong(value); if (!v || PyDict_SetItemString(d, name, v)) PyErr_Clear(); Py_XDECREF(v); } #define ADD_INT(val) insint(d, #val, val) static void inskey(PyObject * d, char * name, HKEY key) { PyObject *v = PyLong_FromVoidPtr(key); if (!v || PyDict_SetItemString(d, name, v)) PyErr_Clear(); Py_XDECREF(v); } #define ADD_KEY(val) inskey(d, #val, val) PyMODINIT_FUNC init_winreg(void) { PyObject *m, *d; m = Py_InitModule3("_winreg", winreg_methods, module_doc); d = PyModule_GetDict(m); PyHKEY_Type.ob_type = &PyType_Type; PyHKEY_Type.tp_doc = PyHKEY_doc; Py_INCREF(&PyHKEY_Type); if (PyDict_SetItemString(d, "HKEYType", (PyObject *)&PyHKEY_Type) != 0) return; Py_INCREF(PyExc_WindowsError); if (PyDict_SetItemString(d, "error", PyExc_WindowsError) != 0) return; /* Add the relevant constants */ ADD_KEY(HKEY_CLASSES_ROOT); ADD_KEY(HKEY_CURRENT_USER); ADD_KEY(HKEY_LOCAL_MACHINE); ADD_KEY(HKEY_USERS); ADD_KEY(HKEY_PERFORMANCE_DATA); #ifdef HKEY_CURRENT_CONFIG ADD_KEY(HKEY_CURRENT_CONFIG); #endif #ifdef HKEY_DYN_DATA ADD_KEY(HKEY_DYN_DATA); #endif ADD_INT(KEY_QUERY_VALUE); ADD_INT(KEY_SET_VALUE); ADD_INT(KEY_CREATE_SUB_KEY); ADD_INT(KEY_ENUMERATE_SUB_KEYS); ADD_INT(KEY_NOTIFY); ADD_INT(KEY_CREATE_LINK); ADD_INT(KEY_READ); ADD_INT(KEY_WRITE); ADD_INT(KEY_EXECUTE); ADD_INT(KEY_ALL_ACCESS); ADD_INT(REG_OPTION_RESERVED); ADD_INT(REG_OPTION_NON_VOLATILE); ADD_INT(REG_OPTION_VOLATILE); ADD_INT(REG_OPTION_CREATE_LINK); ADD_INT(REG_OPTION_BACKUP_RESTORE); ADD_INT(REG_OPTION_OPEN_LINK); ADD_INT(REG_LEGAL_OPTION); ADD_INT(REG_CREATED_NEW_KEY); ADD_INT(REG_OPENED_EXISTING_KEY); ADD_INT(REG_WHOLE_HIVE_VOLATILE); ADD_INT(REG_REFRESH_HIVE); ADD_INT(REG_NO_LAZY_FLUSH); ADD_INT(REG_NOTIFY_CHANGE_NAME); ADD_INT(REG_NOTIFY_CHANGE_ATTRIBUTES); ADD_INT(REG_NOTIFY_CHANGE_LAST_SET); ADD_INT(REG_NOTIFY_CHANGE_SECURITY); ADD_INT(REG_LEGAL_CHANGE_FILTER); ADD_INT(REG_NONE); ADD_INT(REG_SZ); ADD_INT(REG_EXPAND_SZ); ADD_INT(REG_BINARY); ADD_INT(REG_DWORD); ADD_INT(REG_DWORD_LITTLE_ENDIAN); ADD_INT(REG_DWORD_BIG_ENDIAN); ADD_INT(REG_LINK); ADD_INT(REG_MULTI_SZ); ADD_INT(REG_RESOURCE_LIST); ADD_INT(REG_FULL_RESOURCE_DESCRIPTOR); ADD_INT(REG_RESOURCE_REQUIREMENTS_LIST); } Python-2.3.7/Modules/0000755001241000117560000000000010765544545013677 5ustar loewishpifb6Python-2.3.7/Modules/fpetestmodule.c0000644001241000117560000001277407522367001016721 0ustar loewishpifb6/* --------------------------------------------------------------------- / Copyright (c) 1996. \ | The Regents of the University of California. | | All rights reserved. | | | | Permission to use, copy, modify, and distribute this software for | | any purpose without fee is hereby granted, provided that this en- | | tire notice is included in all copies of any software which is or | | includes a copy or modification of this software and in all | | copies of the supporting documentation for such software. | | | | This work was produced at the University of California, Lawrence | | Livermore National Laboratory under contract no. W-7405-ENG-48 | | between the U.S. Department of Energy and The Regents of the | | University of California for the operation of UC LLNL. | | | | DISCLAIMER | | | | This software was prepared as an account of work sponsored by an | | agency of the United States Government. Neither the United States | | Government nor the University of California nor any of their em- | | ployees, makes any warranty, express or implied, or assumes any | | liability or responsibility for the accuracy, completeness, or | | usefulness of any information, apparatus, product, or process | | disclosed, or represents that its use would not infringe | | privately-owned rights. Reference herein to any specific commer- | | cial products, process, or service by trade name, trademark, | | manufacturer, or otherwise, does not necessarily constitute or | | imply its endorsement, recommendation, or favoring by the United | | States Government or the University of California. The views and | | opinions of authors expressed herein do not necessarily state or | | reflect those of the United States Government or the University | | of California, and shall not be used for advertising or product | \ endorsement purposes. / --------------------------------------------------------------------- */ /* Floating point exception test module. */ #include "Python.h" static PyObject *fpe_error; PyMODINIT_FUNC initfpetest(void); static PyObject *test(PyObject *self,PyObject *args); static double db0(double); static double overflow(double); static double nest1(int, double); static double nest2(int, double); static double nest3(double); static void printerr(double); static PyMethodDef fpetest_methods[] = { {"test", (PyCFunction) test, METH_VARARGS}, {0,0} }; static PyObject *test(PyObject *self,PyObject *args) { double r; fprintf(stderr,"overflow"); r = overflow(1.e160); printerr(r); fprintf(stderr,"\ndiv by 0"); r = db0(0.0); printerr(r); fprintf(stderr,"\nnested outer"); r = nest1(0, 0.0); printerr(r); fprintf(stderr,"\nnested inner"); r = nest1(1, 1.0); printerr(r); fprintf(stderr,"\ntrailing outer"); r = nest1(2, 2.0); printerr(r); fprintf(stderr,"\nnested prior"); r = nest2(0, 0.0); printerr(r); fprintf(stderr,"\nnested interior"); r = nest2(1, 1.0); printerr(r); fprintf(stderr,"\nnested trailing"); r = nest2(2, 2.0); printerr(r); Py_INCREF (Py_None); return Py_None; } static void printerr(double r) { if(r == 3.1416){ fprintf(stderr,"\tPASS\n"); PyErr_Print(); }else{ fprintf(stderr,"\tFAIL\n"); } PyErr_Clear(); } static double nest1(int i, double x) { double a = 1.0; PyFPE_START_PROTECT("Division by zero, outer zone", return 3.1416) if(i == 0){ a = 1./x; }else if(i == 1){ /* This (following) message is never seen. */ PyFPE_START_PROTECT("Division by zero, inner zone", return 3.1416) a = 1./(1. - x); PyFPE_END_PROTECT(a) }else if(i == 2){ a = 1./(2. - x); } PyFPE_END_PROTECT(a) return a; } static double nest2(int i, double x) { double a = 1.0; PyFPE_START_PROTECT("Division by zero, prior error", return 3.1416) if(i == 0){ a = 1./x; }else if(i == 1){ a = nest3(x); }else if(i == 2){ a = 1./(2. - x); } PyFPE_END_PROTECT(a) return a; } static double nest3(double x) { double result; /* This (following) message is never seen. */ PyFPE_START_PROTECT("Division by zero, nest3 error", return 3.1416) result = 1./(1. - x); PyFPE_END_PROTECT(result) return result; } static double db0(double x) { double a; PyFPE_START_PROTECT("Division by zero", return 3.1416) a = 1./x; PyFPE_END_PROTECT(a) return a; } static double overflow(double b) { double a; PyFPE_START_PROTECT("Overflow", return 3.1416) a = b*b; PyFPE_END_PROTECT(a) return a; } PyMODINIT_FUNC initfpetest(void) { PyObject *m, *d; m = Py_InitModule("fpetest", fpetest_methods); d = PyModule_GetDict(m); fpe_error = PyErr_NewException("fpetest.error", NULL, NULL); if (fpe_error != NULL) PyDict_SetItemString(d, "error", fpe_error); } Python-2.3.7/Modules/linuxaudiodev.c0000644001241000117560000003340307571242343016716 0ustar loewishpifb6/* Hey Emacs, this is -*-C-*- ****************************************************************************** * linuxaudiodev.c -- Linux audio device for python. * * Author : Peter Bosch * Created On : Thu Mar 2 21:10:33 2000 * Status : Unknown, Use with caution! * * Unless other notices are present in any part of this file * explicitly claiming copyrights for other people and/or * organizations, the contents of this file is fully copyright * (C) 2000 Peter Bosch, all rights reserved. ****************************************************************************** */ #include "Python.h" #include "structmember.h" #ifdef HAVE_FCNTL_H #include #else #define O_RDONLY 00 #define O_WRONLY 01 #endif #include #if defined(linux) #include typedef unsigned long uint32_t; #elif defined(__FreeBSD__) #include #ifndef SNDCTL_DSP_CHANNELS #define SNDCTL_DSP_CHANNELS SOUND_PCM_WRITE_CHANNELS #endif #endif typedef struct { PyObject_HEAD; int x_fd; /* The open file */ int x_mode; /* file mode */ int x_icount; /* Input count */ int x_ocount; /* Output count */ uint32_t x_afmts; /* Audio formats supported by hardware*/ } lad_t; /* XXX several format defined in soundcard.h are not supported, including _NE (native endian) options and S32 options */ static struct { int a_bps; uint32_t a_fmt; char *a_name; } audio_types[] = { { 8, AFMT_MU_LAW, "logarithmic mu-law 8-bit audio" }, { 8, AFMT_A_LAW, "logarithmic A-law 8-bit audio" }, { 8, AFMT_U8, "linear unsigned 8-bit audio" }, { 8, AFMT_S8, "linear signed 8-bit audio" }, { 16, AFMT_U16_BE, "linear unsigned 16-bit big-endian audio" }, { 16, AFMT_U16_LE, "linear unsigned 16-bit little-endian audio" }, { 16, AFMT_S16_BE, "linear signed 16-bit big-endian audio" }, { 16, AFMT_S16_LE, "linear signed 16-bit little-endian audio" }, { 16, AFMT_S16_NE, "linear signed 16-bit native-endian audio" }, }; static int n_audio_types = sizeof(audio_types) / sizeof(audio_types[0]); static PyTypeObject Ladtype; static PyObject *LinuxAudioError; static lad_t * newladobject(PyObject *arg) { lad_t *xp; int fd, afmts, imode; char *basedev = NULL; char *mode = NULL; /* Two ways to call linuxaudiodev.open(): open(device, mode) (for consistency with builtin open()) open(mode) (for backwards compatibility) because the *first* argument is optional, parsing args is a wee bit tricky. */ if (!PyArg_ParseTuple(arg, "s|s:open", &basedev, &mode)) return NULL; if (mode == NULL) { /* only one arg supplied */ mode = basedev; basedev = NULL; } if (strcmp(mode, "r") == 0) imode = O_RDONLY; else if (strcmp(mode, "w") == 0) imode = O_WRONLY; else { PyErr_SetString(LinuxAudioError, "mode should be 'r' or 'w'"); return NULL; } /* Open the correct device. The base device name comes from the * AUDIODEV environment variable first, then /dev/dsp. The * control device tacks "ctl" onto the base device name. * * Note that the only difference between /dev/audio and /dev/dsp * is that the former uses logarithmic mu-law encoding and the * latter uses 8-bit unsigned encoding. */ if (basedev == NULL) { /* called with one arg */ basedev = getenv("AUDIODEV"); if (basedev == NULL) /* $AUDIODEV not set */ basedev = "/dev/dsp"; } if ((fd = open(basedev, imode)) == -1) { PyErr_SetFromErrnoWithFilename(LinuxAudioError, basedev); return NULL; } if (imode == O_WRONLY && ioctl(fd, SNDCTL_DSP_NONBLOCK, NULL) == -1) { PyErr_SetFromErrnoWithFilename(LinuxAudioError, basedev); return NULL; } if (ioctl(fd, SNDCTL_DSP_GETFMTS, &afmts) == -1) { PyErr_SetFromErrnoWithFilename(LinuxAudioError, basedev); return NULL; } /* Create and initialize the object */ if ((xp = PyObject_New(lad_t, &Ladtype)) == NULL) { close(fd); return NULL; } xp->x_fd = fd; xp->x_mode = imode; xp->x_icount = xp->x_ocount = 0; xp->x_afmts = afmts; return xp; } static void lad_dealloc(lad_t *xp) { /* if already closed, don't reclose it */ if (xp->x_fd != -1) close(xp->x_fd); PyObject_Del(xp); } static PyObject * lad_read(lad_t *self, PyObject *args) { int size, count; char *cp; PyObject *rv; if (!PyArg_ParseTuple(args, "i:read", &size)) return NULL; rv = PyString_FromStringAndSize(NULL, size); if (rv == NULL) return NULL; cp = PyString_AS_STRING(rv); if ((count = read(self->x_fd, cp, size)) < 0) { PyErr_SetFromErrno(LinuxAudioError); Py_DECREF(rv); return NULL; } self->x_icount += count; _PyString_Resize(&rv, count); return rv; } static PyObject * lad_write(lad_t *self, PyObject *args) { char *cp; int rv, size; fd_set write_set_fds; struct timeval tv; int select_retval; if (!PyArg_ParseTuple(args, "s#:write", &cp, &size)) return NULL; /* use select to wait for audio device to be available */ FD_ZERO(&write_set_fds); FD_SET(self->x_fd, &write_set_fds); tv.tv_sec = 4; /* timeout values */ tv.tv_usec = 0; while (size > 0) { select_retval = select(self->x_fd+1, NULL, &write_set_fds, NULL, &tv); tv.tv_sec = 1; tv.tv_usec = 0; /* willing to wait this long next time*/ if (select_retval) { if ((rv = write(self->x_fd, cp, size)) == -1) { if (errno != EAGAIN) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } else { errno = 0; /* EAGAIN: buffer is full, try again */ } } else { self->x_ocount += rv; size -= rv; cp += rv; } } else { /* printf("Not able to write to linux audio device within %ld seconds\n", tv.tv_sec); */ PyErr_SetFromErrno(LinuxAudioError); return NULL; } } Py_INCREF(Py_None); return Py_None; } static PyObject * lad_close(lad_t *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":close")) return NULL; if (self->x_fd >= 0) { close(self->x_fd); self->x_fd = -1; } Py_INCREF(Py_None); return Py_None; } static PyObject * lad_fileno(lad_t *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":fileno")) return NULL; return PyInt_FromLong(self->x_fd); } static PyObject * lad_setparameters(lad_t *self, PyObject *args) { int rate, ssize, nchannels, n, fmt, emulate=0; if (!PyArg_ParseTuple(args, "iiii|i:setparameters", &rate, &ssize, &nchannels, &fmt, &emulate)) return NULL; if (rate < 0) { PyErr_Format(PyExc_ValueError, "expected rate >= 0, not %d", rate); return NULL; } if (ssize < 0) { PyErr_Format(PyExc_ValueError, "expected sample size >= 0, not %d", ssize); return NULL; } if (nchannels != 1 && nchannels != 2) { PyErr_Format(PyExc_ValueError, "nchannels must be 1 or 2, not %d", nchannels); return NULL; } for (n = 0; n < n_audio_types; n++) if (fmt == audio_types[n].a_fmt) break; if (n == n_audio_types) { PyErr_Format(PyExc_ValueError, "unknown audio encoding: %d", fmt); return NULL; } if (audio_types[n].a_bps != ssize) { PyErr_Format(PyExc_ValueError, "for %s, expected sample size %d, not %d", audio_types[n].a_name, audio_types[n].a_bps, ssize); return NULL; } if (emulate == 0) { if ((self->x_afmts & audio_types[n].a_fmt) == 0) { PyErr_Format(PyExc_ValueError, "%s format not supported by device", audio_types[n].a_name); return NULL; } } if (ioctl(self->x_fd, SNDCTL_DSP_SETFMT, &audio_types[n].a_fmt) == -1) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } if (ioctl(self->x_fd, SNDCTL_DSP_CHANNELS, &nchannels) == -1) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } if (ioctl(self->x_fd, SNDCTL_DSP_SPEED, &rate) == -1) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } Py_INCREF(Py_None); return Py_None; } static int _ssize(lad_t *self, int *nchannels, int *ssize) { int fmt; fmt = 0; if (ioctl(self->x_fd, SNDCTL_DSP_SETFMT, &fmt) < 0) return -errno; switch (fmt) { case AFMT_MU_LAW: case AFMT_A_LAW: case AFMT_U8: case AFMT_S8: *ssize = sizeof(char); break; case AFMT_S16_LE: case AFMT_S16_BE: case AFMT_U16_LE: case AFMT_U16_BE: *ssize = sizeof(short); break; case AFMT_MPEG: case AFMT_IMA_ADPCM: default: return -EOPNOTSUPP; } *nchannels = 0; if (ioctl(self->x_fd, SNDCTL_DSP_CHANNELS, nchannels) < 0) return -errno; return 0; } /* bufsize returns the size of the hardware audio buffer in number of samples */ static PyObject * lad_bufsize(lad_t *self, PyObject *args) { audio_buf_info ai; int nchannels, ssize; if (!PyArg_ParseTuple(args, ":bufsize")) return NULL; if (_ssize(self, &nchannels, &ssize) < 0) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } if (ioctl(self->x_fd, SNDCTL_DSP_GETOSPACE, &ai) < 0) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } return PyInt_FromLong((ai.fragstotal * ai.fragsize) / (nchannels * ssize)); } /* obufcount returns the number of samples that are available in the hardware for playing */ static PyObject * lad_obufcount(lad_t *self, PyObject *args) { audio_buf_info ai; int nchannels, ssize; if (!PyArg_ParseTuple(args, ":obufcount")) return NULL; if (_ssize(self, &nchannels, &ssize) < 0) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } if (ioctl(self->x_fd, SNDCTL_DSP_GETOSPACE, &ai) < 0) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } return PyInt_FromLong((ai.fragstotal * ai.fragsize - ai.bytes) / (ssize * nchannels)); } /* obufcount returns the number of samples that can be played without blocking */ static PyObject * lad_obuffree(lad_t *self, PyObject *args) { audio_buf_info ai; int nchannels, ssize; if (!PyArg_ParseTuple(args, ":obuffree")) return NULL; if (_ssize(self, &nchannels, &ssize) < 0) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } if (ioctl(self->x_fd, SNDCTL_DSP_GETOSPACE, &ai) < 0) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } return PyInt_FromLong(ai.bytes / (ssize * nchannels)); } /* Flush the device */ static PyObject * lad_flush(lad_t *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":flush")) return NULL; if (ioctl(self->x_fd, SNDCTL_DSP_SYNC, NULL) == -1) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * lad_getptr(lad_t *self, PyObject *args) { count_info info; int req; if (!PyArg_ParseTuple(args, ":getptr")) return NULL; if (self->x_mode == O_RDONLY) req = SNDCTL_DSP_GETIPTR; else req = SNDCTL_DSP_GETOPTR; if (ioctl(self->x_fd, req, &info) == -1) { PyErr_SetFromErrno(LinuxAudioError); return NULL; } return Py_BuildValue("iii", info.bytes, info.blocks, info.ptr); } static PyMethodDef lad_methods[] = { { "read", (PyCFunction)lad_read, METH_VARARGS }, { "write", (PyCFunction)lad_write, METH_VARARGS }, { "setparameters", (PyCFunction)lad_setparameters, METH_VARARGS }, { "bufsize", (PyCFunction)lad_bufsize, METH_VARARGS }, { "obufcount", (PyCFunction)lad_obufcount, METH_VARARGS }, { "obuffree", (PyCFunction)lad_obuffree, METH_VARARGS }, { "flush", (PyCFunction)lad_flush, METH_VARARGS }, { "close", (PyCFunction)lad_close, METH_VARARGS }, { "fileno", (PyCFunction)lad_fileno, METH_VARARGS }, { "getptr", (PyCFunction)lad_getptr, METH_VARARGS }, { NULL, NULL} /* sentinel */ }; static PyObject * lad_getattr(lad_t *xp, char *name) { return Py_FindMethod(lad_methods, (PyObject *)xp, name); } static PyTypeObject Ladtype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "linuxaudiodev.linux_audio_device", /*tp_name*/ sizeof(lad_t), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)lad_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)lad_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyObject * ladopen(PyObject *self, PyObject *args) { return (PyObject *)newladobject(args); } static PyMethodDef linuxaudiodev_methods[] = { { "open", ladopen, METH_VARARGS }, { 0, 0 }, }; void initlinuxaudiodev(void) { PyObject *m; m = Py_InitModule("linuxaudiodev", linuxaudiodev_methods); LinuxAudioError = PyErr_NewException("linuxaudiodev.error", NULL, NULL); if (LinuxAudioError) PyModule_AddObject(m, "error", LinuxAudioError); if (PyModule_AddIntConstant(m, "AFMT_MU_LAW", (long)AFMT_MU_LAW) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_A_LAW", (long)AFMT_A_LAW) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_U8", (long)AFMT_U8) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_S8", (long)AFMT_S8) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_U16_BE", (long)AFMT_U16_BE) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_U16_LE", (long)AFMT_U16_LE) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_S16_BE", (long)AFMT_S16_BE) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_S16_LE", (long)AFMT_S16_LE) == -1) return; if (PyModule_AddIntConstant(m, "AFMT_S16_NE", (long)AFMT_S16_NE) == -1) return; return; } Python-2.3.7/Modules/clmodule.c0000644001241000117560000020357007462570620015647 0ustar loewishpifb6 /* Cl objects */ #define CLDEBUG #include #include #if defined(CL_JPEG_SOFTWARE) && !defined(CL_JPEG_COSMO) #include #endif #include "Python.h" typedef struct { PyObject_HEAD int ob_isCompressor; /* Compressor or Decompressor */ CL_Handle ob_compressorHdl; int *ob_paramtypes; int ob_nparams; } clobject; static PyObject *ClError; /* exception cl.error */ static int error_handler_called = 0; /* * We want to use the function prototypes that are available in the C * compiler on the SGI. Because of that, we need to declare the first * argument of the compressor and decompressor methods as "object *", * even though they are really "clobject *". Therefore we cast the * argument to the proper type using this macro. */ #define SELF ((clobject *) self) /******************************************************************** Utility routines. ********************************************************************/ static void cl_ErrorHandler(CL_Handle handle, int code, const char *fmt, ...) { va_list ap; char errbuf[BUFSIZ]; /* hopefully big enough */ char *p; if (PyErr_Occurred()) /* don't change existing error */ return; error_handler_called = 1; va_start(ap, fmt); vsprintf(errbuf, fmt, ap); va_end(ap); p = &errbuf[strlen(errbuf) - 1]; /* swat the line feed */ if (*p == '\n') *p = 0; PyErr_SetString(ClError, errbuf); } /* * This assumes that params are always in the range 0 to some maximum. */ static int param_type_is_float(clobject *self, int param) { int bufferlength; if (self->ob_paramtypes == NULL) { error_handler_called = 0; bufferlength = clQueryParams(self->ob_compressorHdl, 0, 0); if (error_handler_called) return -1; self->ob_paramtypes = PyMem_NEW(int, bufferlength); if (self->ob_paramtypes == NULL) return -1; self->ob_nparams = bufferlength / 2; (void) clQueryParams(self->ob_compressorHdl, self->ob_paramtypes, bufferlength); if (error_handler_called) { PyMem_DEL(self->ob_paramtypes); self->ob_paramtypes = NULL; return -1; } } if (param < 0 || param >= self->ob_nparams) return -1; if (self->ob_paramtypes[param*2 + 1] == CL_FLOATING_ENUM_VALUE || self->ob_paramtypes[param*2 + 1] == CL_FLOATING_RANGE_VALUE) return 1; else return 0; } /******************************************************************** Single image compression/decompression. ********************************************************************/ static PyObject * cl_CompressImage(PyObject *self, PyObject *args) { int compressionScheme, width, height, originalFormat; float compressionRatio; int frameBufferSize, compressedBufferSize; char *frameBuffer; PyObject *compressedBuffer; if (!PyArg_ParseTuple(args, "iiiifs#", &compressionScheme, &width, &height, &originalFormat, &compressionRatio, &frameBuffer, &frameBufferSize)) return NULL; retry: compressedBuffer = PyString_FromStringAndSize(NULL, frameBufferSize); if (compressedBuffer == NULL) return NULL; compressedBufferSize = frameBufferSize; error_handler_called = 0; if (clCompressImage(compressionScheme, width, height, originalFormat, compressionRatio, (void *) frameBuffer, &compressedBufferSize, (void *) PyString_AsString(compressedBuffer)) == FAILURE || error_handler_called) { Py_DECREF(compressedBuffer); if (!error_handler_called) PyErr_SetString(ClError, "clCompressImage failed"); return NULL; } if (compressedBufferSize > frameBufferSize) { frameBufferSize = compressedBufferSize; Py_DECREF(compressedBuffer); goto retry; } if (compressedBufferSize < frameBufferSize) _PyString_Resize(&compressedBuffer, compressedBufferSize); return compressedBuffer; } static PyObject * cl_DecompressImage(PyObject *self, PyObject *args) { int compressionScheme, width, height, originalFormat; char *compressedBuffer; int compressedBufferSize, frameBufferSize; PyObject *frameBuffer; if (!PyArg_ParseTuple(args, "iiiis#", &compressionScheme, &width, &height, &originalFormat, &compressedBuffer, &compressedBufferSize)) return NULL; frameBufferSize = width * height * CL_BytesPerPixel(originalFormat); frameBuffer = PyString_FromStringAndSize(NULL, frameBufferSize); if (frameBuffer == NULL) return NULL; error_handler_called = 0; if (clDecompressImage(compressionScheme, width, height, originalFormat, compressedBufferSize, compressedBuffer, (void *) PyString_AsString(frameBuffer)) == FAILURE || error_handler_called) { Py_DECREF(frameBuffer); if (!error_handler_called) PyErr_SetString(ClError, "clDecompressImage failed"); return NULL; } return frameBuffer; } /******************************************************************** Sequential compression/decompression. ********************************************************************/ #define CheckCompressor(self) if ((self)->ob_compressorHdl == NULL) { \ PyErr_SetString(PyExc_RuntimeError, "(de)compressor not active"); \ return NULL; \ } static PyObject * doClose(clobject *self, int (*close_func)(CL_Handle)) { CheckCompressor(self); error_handler_called = 0; if ((*close_func)(self->ob_compressorHdl) == FAILURE || error_handler_called) { if (!error_handler_called) PyErr_SetString(ClError, "close failed"); return NULL; } self->ob_compressorHdl = NULL; if (self->ob_paramtypes) PyMem_DEL(self->ob_paramtypes); self->ob_paramtypes = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * clm_CloseCompressor(PyObject *self) { return doClose(SELF, clCloseCompressor); } static PyObject * clm_CloseDecompressor(PyObject *self) { return doClose(SELF, clCloseDecompressor); } static PyObject * clm_Compress(PyObject *self, PyObject *args) { int numberOfFrames; int frameBufferSize, compressedBufferSize, size; char *frameBuffer; PyObject *data; CheckCompressor(SELF); if (!PyArg_Parse(args, "(is#)", &numberOfFrames, &frameBuffer, &frameBufferSize)) return NULL; error_handler_called = 0; size = clGetParam(SELF->ob_compressorHdl, CL_COMPRESSED_BUFFER_SIZE); compressedBufferSize = size; if (error_handler_called) return NULL; data = PyString_FromStringAndSize(NULL, size); if (data == NULL) return NULL; error_handler_called = 0; if (clCompress(SELF->ob_compressorHdl, numberOfFrames, (void *) frameBuffer, &compressedBufferSize, (void *) PyString_AsString(data)) == FAILURE || error_handler_called) { Py_DECREF(data); if (!error_handler_called) PyErr_SetString(ClError, "compress failed"); return NULL; } if (compressedBufferSize < size) if (_PyString_Resize(&data, compressedBufferSize)) return NULL; if (compressedBufferSize > size) { /* we didn't get all "compressed" data */ Py_DECREF(data); PyErr_SetString(ClError, "compressed data is more than fitted"); return NULL; } return data; } static PyObject * clm_Decompress(PyObject *self, PyObject *args) { PyObject *data; int numberOfFrames; char *compressedData; int compressedDataSize, dataSize; CheckCompressor(SELF); if (!PyArg_Parse(args, "(is#)", &numberOfFrames, &compressedData, &compressedDataSize)) return NULL; error_handler_called = 0; dataSize = clGetParam(SELF->ob_compressorHdl, CL_FRAME_BUFFER_SIZE); if (error_handler_called) return NULL; data = PyString_FromStringAndSize(NULL, dataSize); if (data == NULL) return NULL; error_handler_called = 0; if (clDecompress(SELF->ob_compressorHdl, numberOfFrames, compressedDataSize, (void *) compressedData, (void *) PyString_AsString(data)) == FAILURE || error_handler_called) { Py_DECREF(data); if (!error_handler_called) PyErr_SetString(ClError, "decompress failed"); return NULL; } return data; } static PyObject * doParams(clobject *self, PyObject *args, int (*func)(CL_Handle, int *, int), int modified) { PyObject *list, *v; int *PVbuffer; int length; int i; float number; CheckCompressor(self); if (!PyArg_Parse(args, "O", &list)) return NULL; if (!PyList_Check(list)) { PyErr_BadArgument(); return NULL; } length = PyList_Size(list); PVbuffer = PyMem_NEW(int, length); if (PVbuffer == NULL) return PyErr_NoMemory(); for (i = 0; i < length; i++) { v = PyList_GetItem(list, i); if (PyFloat_Check(v)) { number = PyFloat_AsDouble(v); PVbuffer[i] = CL_TypeIsInt(number); } else if (PyInt_Check(v)) { PVbuffer[i] = PyInt_AsLong(v); if ((i & 1) && param_type_is_float(self, PVbuffer[i-1]) > 0) { number = PVbuffer[i]; PVbuffer[i] = CL_TypeIsInt(number); } } else { PyMem_DEL(PVbuffer); PyErr_BadArgument(); return NULL; } } error_handler_called = 0; (*func)(self->ob_compressorHdl, PVbuffer, length); if (error_handler_called) { PyMem_DEL(PVbuffer); return NULL; } if (modified) { for (i = 0; i < length; i++) { if ((i & 1) && param_type_is_float(self, PVbuffer[i-1]) > 0) { number = CL_TypeIsFloat(PVbuffer[i]); v = PyFloat_FromDouble(number); } else v = PyInt_FromLong(PVbuffer[i]); PyList_SetItem(list, i, v); } } PyMem_DEL(PVbuffer); Py_INCREF(Py_None); return Py_None; } static PyObject * clm_GetParams(PyObject *self, PyObject *args) { return doParams(SELF, args, clGetParams, 1); } static PyObject * clm_SetParams(PyObject *self, PyObject *args) { return doParams(SELF, args, clSetParams, 0); } static PyObject * do_get(clobject *self, PyObject *args, int (*func)(CL_Handle, int)) { int paramID, value; float fvalue; CheckCompressor(self); if (!PyArg_Parse(args, "i", ¶mID)) return NULL; error_handler_called = 0; value = (*func)(self->ob_compressorHdl, paramID); if (error_handler_called) return NULL; if (param_type_is_float(self, paramID) > 0) { fvalue = CL_TypeIsFloat(value); return PyFloat_FromDouble(fvalue); } return PyInt_FromLong(value); } static PyObject * clm_GetParam(PyObject *self, PyObject *args) { return do_get(SELF, args, clGetParam); } static PyObject * clm_GetDefault(PyObject *self, PyObject *args) { return do_get(SELF, args, clGetDefault); } static PyObject * clm_SetParam(PyObject *self, PyObject *args) { int paramID, value; float fvalue; CheckCompressor(SELF); if (!PyArg_Parse(args, "(ii)", ¶mID, &value)) { PyErr_Clear(); if (!PyArg_Parse(args, "(if)", ¶mID, &fvalue)) { PyErr_Clear(); PyErr_SetString(PyExc_TypeError, "bad argument list (format '(ii)' or '(if)')"); return NULL; } value = CL_TypeIsInt(fvalue); } else { if (param_type_is_float(SELF, paramID) > 0) { fvalue = value; value = CL_TypeIsInt(fvalue); } } error_handler_called = 0; value = clSetParam(SELF->ob_compressorHdl, paramID, value); if (error_handler_called) return NULL; if (param_type_is_float(SELF, paramID) > 0) return PyFloat_FromDouble(CL_TypeIsFloat(value)); else return PyInt_FromLong(value); } static PyObject * clm_GetParamID(PyObject *self, PyObject *args) { char *name; int value; CheckCompressor(SELF); if (!PyArg_Parse(args, "s", &name)) return NULL; error_handler_called = 0; value = clGetParamID(SELF->ob_compressorHdl, name); if (value == FAILURE || error_handler_called) { if (!error_handler_called) PyErr_SetString(ClError, "getparamid failed"); return NULL; } return PyInt_FromLong(value); } static PyObject * clm_QueryParams(PyObject *self) { int bufferlength; int *PVbuffer; PyObject *list; int i; CheckCompressor(SELF); error_handler_called = 0; bufferlength = clQueryParams(SELF->ob_compressorHdl, 0, 0); if (error_handler_called) return NULL; PVbuffer = PyMem_NEW(int, bufferlength); if (PVbuffer == NULL) return PyErr_NoMemory(); bufferlength = clQueryParams(SELF->ob_compressorHdl, PVbuffer, bufferlength); if (error_handler_called) { PyMem_DEL(PVbuffer); return NULL; } list = PyList_New(bufferlength); if (list == NULL) { PyMem_DEL(PVbuffer); return NULL; } for (i = 0; i < bufferlength; i++) { if (i & 1) PyList_SetItem(list, i, PyInt_FromLong(PVbuffer[i])); else if (PVbuffer[i] == 0) { Py_INCREF(Py_None); PyList_SetItem(list, i, Py_None); } else PyList_SetItem(list, i, PyString_FromString((char *) PVbuffer[i])); } PyMem_DEL(PVbuffer); return list; } static PyObject * clm_GetMinMax(PyObject *self, PyObject *args) { int param, min, max; float fmin, fmax; CheckCompressor(SELF); if (!PyArg_Parse(args, "i", ¶m)) return NULL; clGetMinMax(SELF->ob_compressorHdl, param, &min, &max); if (param_type_is_float(SELF, param) > 0) { fmin = CL_TypeIsFloat(min); fmax = CL_TypeIsFloat(max); return Py_BuildValue("(ff)", fmin, fmax); } return Py_BuildValue("(ii)", min, max); } static PyObject * clm_GetName(PyObject *self, PyObject *args) { int param; char *name; CheckCompressor(SELF); if (!PyArg_Parse(args, "i", ¶m)) return NULL; error_handler_called = 0; name = clGetName(SELF->ob_compressorHdl, param); if (name == NULL || error_handler_called) { if (!error_handler_called) PyErr_SetString(ClError, "getname failed"); return NULL; } return PyString_FromString(name); } static PyObject * clm_QuerySchemeFromHandle(PyObject *self) { CheckCompressor(SELF); return PyInt_FromLong(clQuerySchemeFromHandle(SELF->ob_compressorHdl)); } static PyObject * clm_ReadHeader(PyObject *self, PyObject *args) { char *header; int headerSize; CheckCompressor(SELF); if (!PyArg_Parse(args, "s#", &header, &headerSize)) return NULL; return PyInt_FromLong(clReadHeader(SELF->ob_compressorHdl, headerSize, header)); } static PyMethodDef compressor_methods[] = { {"close", clm_CloseCompressor, METH_NOARGS}, /* alias */ {"CloseCompressor", clm_CloseCompressor, METH_NOARGS}, {"Compress", clm_Compress, METH_OLDARGS}, {"GetDefault", clm_GetDefault, METH_OLDARGS}, {"GetMinMax", clm_GetMinMax, METH_OLDARGS}, {"GetName", clm_GetName, METH_OLDARGS}, {"GetParam", clm_GetParam, METH_OLDARGS}, {"GetParamID", clm_GetParamID, METH_OLDARGS}, {"GetParams", clm_GetParams, METH_OLDARGS}, {"QueryParams", clm_QueryParams, METH_NOARGS}, {"QuerySchemeFromHandle",clm_QuerySchemeFromHandle, METH_NOARGS}, {"SetParam", clm_SetParam, METH_OLDARGS}, {"SetParams", clm_SetParams, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static PyMethodDef decompressor_methods[] = { {"close", clm_CloseDecompressor, METH_NOARGS}, /* alias */ {"CloseDecompressor", clm_CloseDecompressor, METH_NOARGS}, {"Decompress", clm_Decompress, METH_OLDARGS}, {"GetDefault", clm_GetDefault, METH_OLDARGS}, {"GetMinMax", clm_GetMinMax, METH_OLDARGS}, {"GetName", clm_GetName, METH_OLDARGS}, {"GetParam", clm_GetParam, METH_OLDARGS}, {"GetParamID", clm_GetParamID, METH_OLDARGS}, {"GetParams", clm_GetParams, METH_OLDARGS}, {"ReadHeader", clm_ReadHeader, METH_OLDARGS}, {"QueryParams", clm_QueryParams, METH_NOARGS}, {"QuerySchemeFromHandle",clm_QuerySchemeFromHandle, METH_NOARGS}, {"SetParam", clm_SetParam, METH_OLDARGS}, {"SetParams", clm_SetParams, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static void cl_dealloc(PyObject *self) { if (SELF->ob_compressorHdl) { if (SELF->ob_isCompressor) clCloseCompressor(SELF->ob_compressorHdl); else clCloseDecompressor(SELF->ob_compressorHdl); } PyObject_Del(self); } static PyObject * cl_getattr(PyObject *self, char *name) { if (SELF->ob_isCompressor) return Py_FindMethod(compressor_methods, self, name); else return Py_FindMethod(decompressor_methods, self, name); } static PyTypeObject Cltype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "cl.cl", /*tp_name*/ sizeof(clobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)cl_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)cl_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ }; static PyObject * doOpen(PyObject *self, PyObject *args, int (*open_func)(int, CL_Handle *), int iscompressor) { int scheme; clobject *new; if (!PyArg_ParseTuple(args, "i", &scheme)) return NULL; new = PyObject_New(clobject, &Cltype); if (new == NULL) return NULL; new->ob_compressorHdl = NULL; new->ob_isCompressor = iscompressor; new->ob_paramtypes = NULL; error_handler_called = 0; if ((*open_func)(scheme, &new->ob_compressorHdl) == FAILURE || error_handler_called) { Py_DECREF(new); if (!error_handler_called) PyErr_SetString(ClError, "Open(De)Compressor failed"); return NULL; } return (PyObject *)new; } static PyObject * cl_OpenCompressor(PyObject *self, PyObject *args) { return doOpen(self, args, clOpenCompressor, 1); } static PyObject * cl_OpenDecompressor(PyObject *self, PyObject *args) { return doOpen(self, args, clOpenDecompressor, 0); } static PyObject * cl_QueryScheme(PyObject *self, PyObject *args) { char *header; int headerlen; int scheme; if (!PyArg_ParseTuple(args, "s#", &header, &headerlen)) return NULL; scheme = clQueryScheme(header); if (scheme < 0) { PyErr_SetString(ClError, "unknown compression scheme"); return NULL; } return PyInt_FromLong(scheme); } static PyObject * cl_QueryMaxHeaderSize(PyObject *self, PyObject *args) { int scheme; if (!PyArg_ParseTuple(args, "i", &scheme)) return NULL; return PyInt_FromLong(clQueryMaxHeaderSize(scheme)); } static PyObject * cl_QueryAlgorithms(PyObject *self, PyObject *args) { int algorithmMediaType; int bufferlength; int *PVbuffer; PyObject *list; int i; if (!PyArg_ParseTuple(args, "i", &algorithmMediaType)) return NULL; error_handler_called = 0; bufferlength = clQueryAlgorithms(algorithmMediaType, 0, 0); if (error_handler_called) return NULL; PVbuffer = PyMem_NEW(int, bufferlength); if (PVbuffer == NULL) return PyErr_NoMemory(); bufferlength = clQueryAlgorithms(algorithmMediaType, PVbuffer, bufferlength); if (error_handler_called) { PyMem_DEL(PVbuffer); return NULL; } list = PyList_New(bufferlength); if (list == NULL) { PyMem_DEL(PVbuffer); return NULL; } for (i = 0; i < bufferlength; i++) { if (i & 1) PyList_SetItem(list, i, PyInt_FromLong(PVbuffer[i])); else if (PVbuffer[i] == 0) { Py_INCREF(Py_None); PyList_SetItem(list, i, Py_None); } else PyList_SetItem(list, i, PyString_FromString((char *) PVbuffer[i])); } PyMem_DEL(PVbuffer); return list; } static PyObject * cl_QuerySchemeFromName(PyObject *self, PyObject *args) { int algorithmMediaType; char *name; int scheme; if (!PyArg_ParseTuple(args, "is", &algorithmMediaType, &name)) return NULL; error_handler_called = 0; scheme = clQuerySchemeFromName(algorithmMediaType, name); if (error_handler_called) { PyErr_SetString(ClError, "unknown compression scheme"); return NULL; } return PyInt_FromLong(scheme); } static PyObject * cl_GetAlgorithmName(PyObject *self, PyObject *args) { int scheme; char *name; if (!PyArg_ParseTuple(args, "i", &scheme)) return NULL; name = clGetAlgorithmName(scheme); if (name == 0) { PyErr_SetString(ClError, "unknown compression scheme"); return NULL; } return PyString_FromString(name); } static PyObject * do_set(PyObject *self, PyObject *args, int (*func)(int, int, int)) { int scheme, paramID, value; float fvalue; int is_float = 0; if (!PyArg_ParseTuple(args, "iii", &scheme, ¶mID, &value)) { PyErr_Clear(); if (!PyArg_ParseTuple(args, "iif", &scheme, ¶mID, &fvalue)) { PyErr_Clear(); PyErr_SetString(PyExc_TypeError, "bad argument list (format '(iii)' or '(iif)')"); return NULL; } value = CL_TypeIsInt(fvalue); is_float = 1; } else { /* check some parameters which we know to be floats */ switch (scheme) { case CL_COMPRESSION_RATIO: case CL_SPEED: fvalue = value; value = CL_TypeIsInt(fvalue); is_float = 1; break; } } error_handler_called = 0; value = (*func)(scheme, paramID, value); if (error_handler_called) return NULL; if (is_float) return PyFloat_FromDouble(CL_TypeIsFloat(value)); else return PyInt_FromLong(value); } static PyObject * cl_SetDefault(PyObject *self, PyObject *args) { return do_set(self, args, clSetDefault); } static PyObject * cl_SetMin(PyObject *self, PyObject *args) { return do_set(self, args, clSetMin); } static PyObject * cl_SetMax(PyObject *self, PyObject *args) { return do_set(self, args, clSetMax); } #define func(name, handler) \ static PyObject *cl_##name(PyObject *self, PyObject *args) \ { \ int x; \ if (!PyArg_ParseTuple(args, "i", &x)) return NULL; \ return Py##handler(CL_##name(x)); \ } #define func2(name, handler) \ static PyObject *cl_##name(PyObject *self, PyObject *args) \ { \ int a1, a2; \ if (!PyArg_ParseTuple(args, "ii", &a1, &a2)) return NULL; \ return Py##handler(CL_##name(a1, a2)); \ } func(BytesPerSample, Int_FromLong) func(BytesPerPixel, Int_FromLong) func(AudioFormatName, String_FromString) func(VideoFormatName, String_FromString) func(AlgorithmNumber, Int_FromLong) func(AlgorithmType, Int_FromLong) func2(Algorithm, Int_FromLong) func(ParamNumber, Int_FromLong) func(ParamType, Int_FromLong) func2(ParamID, Int_FromLong) #ifdef CLDEBUG static PyObject * cvt_type(PyObject *self, PyObject *args) { int number; float fnumber; if (PyArg_Parse(args, "i", &number)) return PyFloat_FromDouble(CL_TypeIsFloat(number)); else { PyErr_Clear(); if (PyArg_Parse(args, "f", &fnumber)) return PyInt_FromLong(CL_TypeIsInt(fnumber)); return NULL; } } #endif static PyMethodDef cl_methods[] = { {"CompressImage", cl_CompressImage, METH_VARARGS}, {"DecompressImage", cl_DecompressImage, METH_VARARGS}, {"GetAlgorithmName", cl_GetAlgorithmName, METH_VARARGS}, {"OpenCompressor", cl_OpenCompressor, METH_VARARGS}, {"OpenDecompressor", cl_OpenDecompressor, METH_VARARGS}, {"QueryAlgorithms", cl_QueryAlgorithms, METH_VARARGS}, {"QueryMaxHeaderSize", cl_QueryMaxHeaderSize, METH_VARARGS}, {"QueryScheme", cl_QueryScheme, METH_VARARGS}, {"QuerySchemeFromName", cl_QuerySchemeFromName, METH_VARARGS}, {"SetDefault", cl_SetDefault, METH_VARARGS}, {"SetMax", cl_SetMax, METH_VARARGS}, {"SetMin", cl_SetMin, METH_VARARGS}, {"BytesPerSample", cl_BytesPerSample, METH_VARARGS}, {"BytesPerPixel", cl_BytesPerPixel, METH_VARARGS}, {"AudioFormatName", cl_AudioFormatName, METH_VARARGS}, {"VideoFormatName", cl_VideoFormatName, METH_VARARGS}, {"AlgorithmNumber", cl_AlgorithmNumber, METH_VARARGS}, {"AlgorithmType", cl_AlgorithmType, METH_VARARGS}, {"Algorithm", cl_Algorithm, METH_VARARGS}, {"ParamNumber", cl_ParamNumber, METH_VARARGS}, {"ParamType", cl_ParamType, METH_VARARGS}, {"ParamID", cl_ParamID, METH_VARARGS}, #ifdef CLDEBUG {"cvt_type", cvt_type, METH_VARARGS}, #endif {NULL, NULL} /* Sentinel */ }; #ifdef CL_JPEG_SOFTWARE #define IRIX_5_3_LIBRARY #endif void initcl(void) { PyObject *m, *d, *x; m = Py_InitModule("cl", cl_methods); d = PyModule_GetDict(m); ClError = PyErr_NewException("cl.error", NULL, NULL); (void) PyDict_SetItemString(d, "error", ClError); #ifdef CL_ADDED_ALGORITHM_ERROR x = PyInt_FromLong(CL_ADDED_ALGORITHM_ERROR); if (x == NULL || PyDict_SetItemString(d, "ADDED_ALGORITHM_ERROR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ALAW x = PyInt_FromLong(CL_ALAW); if (x == NULL || PyDict_SetItemString(d, "ALAW", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ALGORITHM_ID x = PyInt_FromLong(CL_ALGORITHM_ID); if (x == NULL || PyDict_SetItemString(d, "ALGORITHM_ID", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ALGORITHM_TABLE_FULL x = PyInt_FromLong(CL_ALGORITHM_TABLE_FULL); if (x == NULL || PyDict_SetItemString(d, "ALGORITHM_TABLE_FULL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ALGORITHM_VERSION x = PyInt_FromLong(CL_ALGORITHM_VERSION); if (x == NULL || PyDict_SetItemString(d, "ALGORITHM_VERSION", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ALG_AUDIO x = PyInt_FromLong(CL_ALG_AUDIO); if (x == NULL || PyDict_SetItemString(d, "ALG_AUDIO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ALG_VIDEO x = PyInt_FromLong(CL_ALG_VIDEO); if (x == NULL || PyDict_SetItemString(d, "ALG_VIDEO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AUDIO x = PyInt_FromLong(CL_AUDIO); if (x == NULL || PyDict_SetItemString(d, "AUDIO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_BITRATE_POLICY x = PyInt_FromLong(CL_AWARE_BITRATE_POLICY); if (x == NULL || PyDict_SetItemString(d, "AWARE_BITRATE_POLICY", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_BITRATE_TARGET x = PyInt_FromLong(CL_AWARE_BITRATE_TARGET); if (x == NULL || PyDict_SetItemString(d, "AWARE_BITRATE_TARGET", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_CHANNEL_POLICY x = PyInt_FromLong(CL_AWARE_CHANNEL_POLICY); if (x == NULL || PyDict_SetItemString(d, "AWARE_CHANNEL_POLICY", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_CONST_QUAL x = PyInt_FromLong(CL_AWARE_CONST_QUAL); if (x == NULL || PyDict_SetItemString(d, "AWARE_CONST_QUAL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_ERROR x = PyInt_FromLong(CL_AWARE_ERROR); if (x == NULL || PyDict_SetItemString(d, "AWARE_ERROR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_FIXED_RATE x = PyInt_FromLong(CL_AWARE_FIXED_RATE); if (x == NULL || PyDict_SetItemString(d, "AWARE_FIXED_RATE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_INDEPENDENT x = PyInt_FromLong(CL_AWARE_INDEPENDENT); if (x == NULL || PyDict_SetItemString(d, "AWARE_INDEPENDENT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_JOINT_STEREO x = PyInt_FromLong(CL_AWARE_JOINT_STEREO); if (x == NULL || PyDict_SetItemString(d, "AWARE_JOINT_STEREO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_LAYER x = PyInt_FromLong(CL_AWARE_LAYER); if (x == NULL || PyDict_SetItemString(d, "AWARE_LAYER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_LOSSLESS x = PyInt_FromLong(CL_AWARE_LOSSLESS); if (x == NULL || PyDict_SetItemString(d, "AWARE_LOSSLESS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_MPEG_AUDIO x = PyInt_FromLong(CL_AWARE_MPEG_AUDIO); if (x == NULL || PyDict_SetItemString(d, "AWARE_MPEG_AUDIO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_MPEG_LAYER_I x = PyInt_FromLong(CL_AWARE_MPEG_LAYER_I); if (x == NULL || PyDict_SetItemString(d, "AWARE_MPEG_LAYER_I", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_MPEG_LAYER_II x = PyInt_FromLong(CL_AWARE_MPEG_LAYER_II); if (x == NULL || PyDict_SetItemString(d, "AWARE_MPEG_LAYER_II", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_MULTIRATE x = PyInt_FromLong(CL_AWARE_MULTIRATE); if (x == NULL || PyDict_SetItemString(d, "AWARE_MULTIRATE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_NOISE_MARGIN x = PyInt_FromLong(CL_AWARE_NOISE_MARGIN); if (x == NULL || PyDict_SetItemString(d, "AWARE_NOISE_MARGIN", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_AWARE_STEREO x = PyInt_FromLong(CL_AWARE_STEREO); if (x == NULL || PyDict_SetItemString(d, "AWARE_STEREO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_ALGORITHM_NAME x = PyInt_FromLong(CL_BAD_ALGORITHM_NAME); if (x == NULL || PyDict_SetItemString(d, "BAD_ALGORITHM_NAME", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_ALGORITHM_TYPE x = PyInt_FromLong(CL_BAD_ALGORITHM_TYPE); if (x == NULL || PyDict_SetItemString(d, "BAD_ALGORITHM_TYPE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BLOCK_SIZE x = PyInt_FromLong(CL_BAD_BLOCK_SIZE); if (x == NULL || PyDict_SetItemString(d, "BAD_BLOCK_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BOARD x = PyInt_FromLong(CL_BAD_BOARD); if (x == NULL || PyDict_SetItemString(d, "BAD_BOARD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFERING x = PyInt_FromLong(CL_BAD_BUFFERING); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFERING", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFERLENGTH_NEG x = PyInt_FromLong(CL_BAD_BUFFERLENGTH_NEG); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFERLENGTH_NEG", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFERLENGTH_ODD x = PyInt_FromLong(CL_BAD_BUFFERLENGTH_ODD); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFERLENGTH_ODD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFER_EXISTS x = PyInt_FromLong(CL_BAD_BUFFER_EXISTS); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_EXISTS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFER_HANDLE x = PyInt_FromLong(CL_BAD_BUFFER_HANDLE); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_HANDLE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFER_POINTER x = PyInt_FromLong(CL_BAD_BUFFER_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFER_QUERY_SIZE x = PyInt_FromLong(CL_BAD_BUFFER_QUERY_SIZE); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_QUERY_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFER_SIZE x = PyInt_FromLong(CL_BAD_BUFFER_SIZE); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFER_SIZE_POINTER x = PyInt_FromLong(CL_BAD_BUFFER_SIZE_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_SIZE_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_BUFFER_TYPE x = PyInt_FromLong(CL_BAD_BUFFER_TYPE); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_TYPE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_COMPRESSION_SCHEME x = PyInt_FromLong(CL_BAD_COMPRESSION_SCHEME); if (x == NULL || PyDict_SetItemString(d, "BAD_COMPRESSION_SCHEME", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_COMPRESSOR_HANDLE x = PyInt_FromLong(CL_BAD_COMPRESSOR_HANDLE); if (x == NULL || PyDict_SetItemString(d, "BAD_COMPRESSOR_HANDLE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_COMPRESSOR_HANDLE_POINTER x = PyInt_FromLong(CL_BAD_COMPRESSOR_HANDLE_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_COMPRESSOR_HANDLE_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_FRAME_SIZE x = PyInt_FromLong(CL_BAD_FRAME_SIZE); if (x == NULL || PyDict_SetItemString(d, "BAD_FRAME_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_FUNCTIONALITY x = PyInt_FromLong(CL_BAD_FUNCTIONALITY); if (x == NULL || PyDict_SetItemString(d, "BAD_FUNCTIONALITY", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_FUNCTION_POINTER x = PyInt_FromLong(CL_BAD_FUNCTION_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_FUNCTION_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_HEADER_SIZE x = PyInt_FromLong(CL_BAD_HEADER_SIZE); if (x == NULL || PyDict_SetItemString(d, "BAD_HEADER_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_INITIAL_VALUE x = PyInt_FromLong(CL_BAD_INITIAL_VALUE); if (x == NULL || PyDict_SetItemString(d, "BAD_INITIAL_VALUE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_INTERNAL_FORMAT x = PyInt_FromLong(CL_BAD_INTERNAL_FORMAT); if (x == NULL || PyDict_SetItemString(d, "BAD_INTERNAL_FORMAT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_LICENSE x = PyInt_FromLong(CL_BAD_LICENSE); if (x == NULL || PyDict_SetItemString(d, "BAD_LICENSE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_MIN_GT_MAX x = PyInt_FromLong(CL_BAD_MIN_GT_MAX); if (x == NULL || PyDict_SetItemString(d, "BAD_MIN_GT_MAX", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_NO_BUFFERSPACE x = PyInt_FromLong(CL_BAD_NO_BUFFERSPACE); if (x == NULL || PyDict_SetItemString(d, "BAD_NO_BUFFERSPACE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_NUMBER_OF_BLOCKS x = PyInt_FromLong(CL_BAD_NUMBER_OF_BLOCKS); if (x == NULL || PyDict_SetItemString(d, "BAD_NUMBER_OF_BLOCKS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_PARAM x = PyInt_FromLong(CL_BAD_PARAM); if (x == NULL || PyDict_SetItemString(d, "BAD_PARAM", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_PARAM_ID_POINTER x = PyInt_FromLong(CL_BAD_PARAM_ID_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_PARAM_ID_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_PARAM_TYPE x = PyInt_FromLong(CL_BAD_PARAM_TYPE); if (x == NULL || PyDict_SetItemString(d, "BAD_PARAM_TYPE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_POINTER x = PyInt_FromLong(CL_BAD_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_PVBUFFER x = PyInt_FromLong(CL_BAD_PVBUFFER); if (x == NULL || PyDict_SetItemString(d, "BAD_PVBUFFER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_SCHEME_POINTER x = PyInt_FromLong(CL_BAD_SCHEME_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_SCHEME_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_STREAM_HEADER x = PyInt_FromLong(CL_BAD_STREAM_HEADER); if (x == NULL || PyDict_SetItemString(d, "BAD_STREAM_HEADER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_STRING_POINTER x = PyInt_FromLong(CL_BAD_STRING_POINTER); if (x == NULL || PyDict_SetItemString(d, "BAD_STRING_POINTER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BAD_TEXT_STRING_PTR x = PyInt_FromLong(CL_BAD_TEXT_STRING_PTR); if (x == NULL || PyDict_SetItemString(d, "BAD_TEXT_STRING_PTR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BEST_FIT x = PyInt_FromLong(CL_BEST_FIT); if (x == NULL || PyDict_SetItemString(d, "BEST_FIT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BIDIRECTIONAL x = PyInt_FromLong(CL_BIDIRECTIONAL); if (x == NULL || PyDict_SetItemString(d, "BIDIRECTIONAL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BITRATE x = PyInt_FromLong(CL_BITRATE); if (x == NULL || PyDict_SetItemString(d, "BITRATE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BITRATE_POLICY x = PyInt_FromLong(CL_BITRATE_POLICY); if (x == NULL || PyDict_SetItemString(d, "BITRATE_POLICY", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BITRATE_TARGET x = PyInt_FromLong(CL_BITRATE_TARGET); if (x == NULL || PyDict_SetItemString(d, "BITRATE_TARGET", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BITS_PER_COMPONENT x = PyInt_FromLong(CL_BITS_PER_COMPONENT); if (x == NULL || PyDict_SetItemString(d, "BITS_PER_COMPONENT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BLENDING x = PyInt_FromLong(CL_BLENDING); if (x == NULL || PyDict_SetItemString(d, "BLENDING", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BLOCK_SIZE x = PyInt_FromLong(CL_BLOCK_SIZE); if (x == NULL || PyDict_SetItemString(d, "BLOCK_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BOTTOM_UP x = PyInt_FromLong(CL_BOTTOM_UP); if (x == NULL || PyDict_SetItemString(d, "BOTTOM_UP", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BUFFER_NOT_CREATED x = PyInt_FromLong(CL_BUFFER_NOT_CREATED); if (x == NULL || PyDict_SetItemString(d, "BUFFER_NOT_CREATED", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BUF_COMPRESSED x = PyInt_FromLong(CL_BUF_COMPRESSED); if (x == NULL || PyDict_SetItemString(d, "BUF_COMPRESSED", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BUF_DATA x = PyInt_FromLong(CL_BUF_DATA); if (x == NULL || PyDict_SetItemString(d, "BUF_DATA", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_BUF_FRAME x = PyInt_FromLong(CL_BUF_FRAME); if (x == NULL || PyDict_SetItemString(d, "BUF_FRAME", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_CHANNEL_POLICY x = PyInt_FromLong(CL_CHANNEL_POLICY); if (x == NULL || PyDict_SetItemString(d, "CHANNEL_POLICY", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_CHROMA_THRESHOLD x = PyInt_FromLong(CL_CHROMA_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "CHROMA_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_CODEC x = PyInt_FromLong(CL_CODEC); if (x == NULL || PyDict_SetItemString(d, "CODEC", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COMPONENTS x = PyInt_FromLong(CL_COMPONENTS); if (x == NULL || PyDict_SetItemString(d, "COMPONENTS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COMPRESSED_BUFFER_SIZE x = PyInt_FromLong(CL_COMPRESSED_BUFFER_SIZE); if (x == NULL || PyDict_SetItemString(d, "COMPRESSED_BUFFER_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COMPRESSION_RATIO x = PyInt_FromLong(CL_COMPRESSION_RATIO); if (x == NULL || PyDict_SetItemString(d, "COMPRESSION_RATIO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COMPRESSOR x = PyInt_FromLong(CL_COMPRESSOR); if (x == NULL || PyDict_SetItemString(d, "COMPRESSOR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_CONTINUOUS_BLOCK x = PyInt_FromLong(CL_CONTINUOUS_BLOCK); if (x == NULL || PyDict_SetItemString(d, "CONTINUOUS_BLOCK", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_CONTINUOUS_NONBLOCK x = PyInt_FromLong(CL_CONTINUOUS_NONBLOCK); if (x == NULL || PyDict_SetItemString(d, "CONTINUOUS_NONBLOCK", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COSMO_CODEC_CONTROL x = PyInt_FromLong(CL_COSMO_CODEC_CONTROL); if (x == NULL || PyDict_SetItemString(d, "COSMO_CODEC_CONTROL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COSMO_NUM_PARAMS x = PyInt_FromLong(CL_COSMO_NUM_PARAMS); if (x == NULL || PyDict_SetItemString(d, "COSMO_NUM_PARAMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COSMO_VALUE_BASE x = PyInt_FromLong(CL_COSMO_VALUE_BASE); if (x == NULL || PyDict_SetItemString(d, "COSMO_VALUE_BASE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COSMO_VIDEO_MANUAL_CONTROL x = PyInt_FromLong(CL_COSMO_VIDEO_MANUAL_CONTROL); if (x == NULL || PyDict_SetItemString(d, "COSMO_VIDEO_MANUAL_CONTROL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_COSMO_VIDEO_TRANSFER_MODE x = PyInt_FromLong(CL_COSMO_VIDEO_TRANSFER_MODE); if (x == NULL || PyDict_SetItemString(d, "COSMO_VIDEO_TRANSFER_MODE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_DATA x = PyInt_FromLong(CL_DATA); if (x == NULL || PyDict_SetItemString(d, "DATA", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_DECOMPRESSOR x = PyInt_FromLong(CL_DECOMPRESSOR); if (x == NULL || PyDict_SetItemString(d, "DECOMPRESSOR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_DSO_ERROR x = PyInt_FromLong(CL_DSO_ERROR); if (x == NULL || PyDict_SetItemString(d, "DSO_ERROR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_EDGE_THRESHOLD x = PyInt_FromLong(CL_EDGE_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "EDGE_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ENABLE_IMAGEINFO x = PyInt_FromLong(CL_ENABLE_IMAGEINFO); if (x == NULL || PyDict_SetItemString(d, "ENABLE_IMAGEINFO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_END_OF_SEQUENCE x = PyInt_FromLong(CL_END_OF_SEQUENCE); if (x == NULL || PyDict_SetItemString(d, "END_OF_SEQUENCE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ENUM_VALUE x = PyInt_FromLong(CL_ENUM_VALUE); if (x == NULL || PyDict_SetItemString(d, "ENUM_VALUE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_EXACT_COMPRESSION_RATIO x = PyInt_FromLong(CL_EXACT_COMPRESSION_RATIO); if (x == NULL || PyDict_SetItemString(d, "EXACT_COMPRESSION_RATIO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_EXTERNAL_DEVICE x = PyInt_FromLong((long) CL_EXTERNAL_DEVICE); if (x == NULL || PyDict_SetItemString(d, "EXTERNAL_DEVICE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FLOATING_ENUM_VALUE x = PyInt_FromLong(CL_FLOATING_ENUM_VALUE); if (x == NULL || PyDict_SetItemString(d, "FLOATING_ENUM_VALUE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FLOATING_RANGE_VALUE x = PyInt_FromLong(CL_FLOATING_RANGE_VALUE); if (x == NULL || PyDict_SetItemString(d, "FLOATING_RANGE_VALUE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT x = PyInt_FromLong(CL_FORMAT); if (x == NULL || PyDict_SetItemString(d, "FORMAT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_ABGR x = PyInt_FromLong(CL_FORMAT_ABGR); if (x == NULL || PyDict_SetItemString(d, "FORMAT_ABGR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_BGR x = PyInt_FromLong(CL_FORMAT_BGR); if (x == NULL || PyDict_SetItemString(d, "FORMAT_BGR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_BGR233 x = PyInt_FromLong(CL_FORMAT_BGR233); if (x == NULL || PyDict_SetItemString(d, "FORMAT_BGR233", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_GRAYSCALE x = PyInt_FromLong(CL_FORMAT_GRAYSCALE); if (x == NULL || PyDict_SetItemString(d, "FORMAT_GRAYSCALE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_MONO x = PyInt_FromLong(CL_FORMAT_MONO); if (x == NULL || PyDict_SetItemString(d, "FORMAT_MONO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_RBG323 x = PyInt_FromLong(CL_FORMAT_RBG323); if (x == NULL || PyDict_SetItemString(d, "FORMAT_RBG323", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_STEREO_INTERLEAVED x = PyInt_FromLong(CL_FORMAT_STEREO_INTERLEAVED); if (x == NULL || PyDict_SetItemString(d, "FORMAT_STEREO_INTERLEAVED", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_XBGR x = PyInt_FromLong(CL_FORMAT_XBGR); if (x == NULL || PyDict_SetItemString(d, "FORMAT_XBGR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_YCbCr x = PyInt_FromLong(CL_FORMAT_YCbCr); if (x == NULL || PyDict_SetItemString(d, "FORMAT_YCbCr", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_YCbCr422 x = PyInt_FromLong(CL_FORMAT_YCbCr422); if (x == NULL || PyDict_SetItemString(d, "FORMAT_YCbCr422", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FORMAT_YCbCr422DC x = PyInt_FromLong(CL_FORMAT_YCbCr422DC); if (x == NULL || PyDict_SetItemString(d, "FORMAT_YCbCr422DC", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAME x = PyInt_FromLong(CL_FRAME); if (x == NULL || PyDict_SetItemString(d, "FRAME", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAMES_PER_CHUNK x = PyInt_FromLong(CL_FRAMES_PER_CHUNK); if (x == NULL || PyDict_SetItemString(d, "FRAMES_PER_CHUNK", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAME_BUFFER_SIZE x = PyInt_FromLong(CL_FRAME_BUFFER_SIZE); if (x == NULL || PyDict_SetItemString(d, "FRAME_BUFFER_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAME_BUFFER_SIZE_ZERO x = PyInt_FromLong(CL_FRAME_BUFFER_SIZE_ZERO); if (x == NULL || PyDict_SetItemString(d, "FRAME_BUFFER_SIZE_ZERO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAME_INDEX x = PyInt_FromLong(CL_FRAME_INDEX); if (x == NULL || PyDict_SetItemString(d, "FRAME_INDEX", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAME_RATE x = PyInt_FromLong(CL_FRAME_RATE); if (x == NULL || PyDict_SetItemString(d, "FRAME_RATE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAME_SIZE x = PyInt_FromLong(CL_FRAME_SIZE); if (x == NULL || PyDict_SetItemString(d, "FRAME_SIZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_FRAME_TYPE x = PyInt_FromLong(CL_FRAME_TYPE); if (x == NULL || PyDict_SetItemString(d, "FRAME_TYPE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_G711_ALAW x = PyInt_FromLong(CL_G711_ALAW); if (x == NULL || PyDict_SetItemString(d, "G711_ALAW", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_G711_ALAW_SOFTWARE x = PyInt_FromLong(CL_G711_ALAW_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "G711_ALAW_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_G711_ULAW x = PyInt_FromLong(CL_G711_ULAW); if (x == NULL || PyDict_SetItemString(d, "G711_ULAW", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_G711_ULAW_SOFTWARE x = PyInt_FromLong(CL_G711_ULAW_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "G711_ULAW_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_GRAYSCALE x = PyInt_FromLong(CL_GRAYSCALE); if (x == NULL || PyDict_SetItemString(d, "GRAYSCALE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_HDCC x = PyInt_FromLong(CL_HDCC); if (x == NULL || PyDict_SetItemString(d, "HDCC", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_HDCC_SAMPLES_PER_TILE x = PyInt_FromLong(CL_HDCC_SAMPLES_PER_TILE); if (x == NULL || PyDict_SetItemString(d, "HDCC_SAMPLES_PER_TILE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_HDCC_SOFTWARE x = PyInt_FromLong(CL_HDCC_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "HDCC_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_HDCC_TILE_THRESHOLD x = PyInt_FromLong(CL_HDCC_TILE_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "HDCC_TILE_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_HEADER_START_CODE x = PyInt_FromLong(CL_HEADER_START_CODE); if (x == NULL || PyDict_SetItemString(d, "HEADER_START_CODE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMAGEINFO_FIELDMASK x = PyInt_FromLong(CL_IMAGEINFO_FIELDMASK); if (x == NULL || PyDict_SetItemString(d, "IMAGEINFO_FIELDMASK", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMAGE_CROP_BOTTOM x = PyInt_FromLong(CL_IMAGE_CROP_BOTTOM); if (x == NULL || PyDict_SetItemString(d, "IMAGE_CROP_BOTTOM", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMAGE_CROP_LEFT x = PyInt_FromLong(CL_IMAGE_CROP_LEFT); if (x == NULL || PyDict_SetItemString(d, "IMAGE_CROP_LEFT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMAGE_CROP_RIGHT x = PyInt_FromLong(CL_IMAGE_CROP_RIGHT); if (x == NULL || PyDict_SetItemString(d, "IMAGE_CROP_RIGHT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMAGE_CROP_TOP x = PyInt_FromLong(CL_IMAGE_CROP_TOP); if (x == NULL || PyDict_SetItemString(d, "IMAGE_CROP_TOP", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMAGE_HEIGHT x = PyInt_FromLong(CL_IMAGE_HEIGHT); if (x == NULL || PyDict_SetItemString(d, "IMAGE_HEIGHT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMAGE_WIDTH x = PyInt_FromLong(CL_IMAGE_WIDTH); if (x == NULL || PyDict_SetItemString(d, "IMAGE_WIDTH", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMPACT_CODEC_CONTROL x = PyInt_FromLong(CL_IMPACT_CODEC_CONTROL); if (x == NULL || PyDict_SetItemString(d, "IMPACT_CODEC_CONTROL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMPACT_FRAME_INTERLEAVE x = PyInt_FromLong(CL_IMPACT_FRAME_INTERLEAVE); if (x == NULL || PyDict_SetItemString(d, "IMPACT_FRAME_INTERLEAVE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_IMPACT_NUM_PARAMS x = PyInt_FromLong(CL_IMPACT_NUM_PARAMS); if (x == NULL || PyDict_SetItemString(d, "IMPACT_NUM_PARAMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_INTERNAL_FORMAT x = PyInt_FromLong(CL_INTERNAL_FORMAT); if (x == NULL || PyDict_SetItemString(d, "INTERNAL_FORMAT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_INTERNAL_IMAGE_HEIGHT x = PyInt_FromLong(CL_INTERNAL_IMAGE_HEIGHT); if (x == NULL || PyDict_SetItemString(d, "INTERNAL_IMAGE_HEIGHT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_INTERNAL_IMAGE_WIDTH x = PyInt_FromLong(CL_INTERNAL_IMAGE_WIDTH); if (x == NULL || PyDict_SetItemString(d, "INTERNAL_IMAGE_WIDTH", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_INTRA x = PyInt_FromLong(CL_INTRA); if (x == NULL || PyDict_SetItemString(d, "INTRA", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG x = PyInt_FromLong(CL_JPEG); if (x == NULL || PyDict_SetItemString(d, "JPEG", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_COSMO x = PyInt_FromLong(CL_JPEG_COSMO); if (x == NULL || PyDict_SetItemString(d, "JPEG_COSMO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_ERROR x = PyInt_FromLong(CL_JPEG_ERROR); if (x == NULL || PyDict_SetItemString(d, "JPEG_ERROR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_IMPACT x = PyInt_FromLong(CL_JPEG_IMPACT); if (x == NULL || PyDict_SetItemString(d, "JPEG_IMPACT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_NUM_PARAMS x = PyInt_FromLong(CL_JPEG_NUM_PARAMS); if (x == NULL || PyDict_SetItemString(d, "JPEG_NUM_PARAMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_QUALITY_FACTOR x = PyInt_FromLong(CL_JPEG_QUALITY_FACTOR); if (x == NULL || PyDict_SetItemString(d, "JPEG_QUALITY_FACTOR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_QUANTIZATION_TABLES x = PyInt_FromLong(CL_JPEG_QUANTIZATION_TABLES); if (x == NULL || PyDict_SetItemString(d, "JPEG_QUANTIZATION_TABLES", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_SOFTWARE x = PyInt_FromLong(CL_JPEG_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "JPEG_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_JPEG_STREAM_HEADERS x = PyInt_FromLong(CL_JPEG_STREAM_HEADERS); if (x == NULL || PyDict_SetItemString(d, "JPEG_STREAM_HEADERS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_KEYFRAME x = PyInt_FromLong(CL_KEYFRAME); if (x == NULL || PyDict_SetItemString(d, "KEYFRAME", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_KEYFRAME_DISTANCE x = PyInt_FromLong(CL_KEYFRAME_DISTANCE); if (x == NULL || PyDict_SetItemString(d, "KEYFRAME_DISTANCE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_LAST_FRAME_INDEX x = PyInt_FromLong(CL_LAST_FRAME_INDEX); if (x == NULL || PyDict_SetItemString(d, "LAST_FRAME_INDEX", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_LAYER x = PyInt_FromLong(CL_LAYER); if (x == NULL || PyDict_SetItemString(d, "LAYER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_LUMA_THRESHOLD x = PyInt_FromLong(CL_LUMA_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "LUMA_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MAX_NUMBER_OF_AUDIO_ALGORITHMS x = PyInt_FromLong(CL_MAX_NUMBER_OF_AUDIO_ALGORITHMS); if (x == NULL || PyDict_SetItemString(d, "MAX_NUMBER_OF_AUDIO_ALGORITHMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MAX_NUMBER_OF_FORMATS x = PyInt_FromLong(CL_MAX_NUMBER_OF_FORMATS); if (x == NULL || PyDict_SetItemString(d, "MAX_NUMBER_OF_FORMATS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MAX_NUMBER_OF_ORIGINAL_FORMATS x = PyInt_FromLong(CL_MAX_NUMBER_OF_ORIGINAL_FORMATS); if (x == NULL || PyDict_SetItemString(d, "MAX_NUMBER_OF_ORIGINAL_FORMATS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MAX_NUMBER_OF_PARAMS x = PyInt_FromLong(CL_MAX_NUMBER_OF_PARAMS); if (x == NULL || PyDict_SetItemString(d, "MAX_NUMBER_OF_PARAMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MAX_NUMBER_OF_VIDEO_ALGORITHMS x = PyInt_FromLong(CL_MAX_NUMBER_OF_VIDEO_ALGORITHMS); if (x == NULL || PyDict_SetItemString(d, "MAX_NUMBER_OF_VIDEO_ALGORITHMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MONO x = PyInt_FromLong(CL_MONO); if (x == NULL || PyDict_SetItemString(d, "MONO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_AWARE x = PyInt_FromLong(CL_MPEG1_AUDIO_AWARE); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_AWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_LAYER x = PyInt_FromLong(CL_MPEG1_AUDIO_LAYER); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_LAYER", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_LAYER_I x = PyInt_FromLong(CL_MPEG1_AUDIO_LAYER_I); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_LAYER_I", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_LAYER_II x = PyInt_FromLong(CL_MPEG1_AUDIO_LAYER_II); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_LAYER_II", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_MODE x = PyInt_FromLong(CL_MPEG1_AUDIO_MODE); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_MODE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_MODE_DUAL x = PyInt_FromLong(CL_MPEG1_AUDIO_MODE_DUAL); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_MODE_DUAL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_MODE_JOINT x = PyInt_FromLong(CL_MPEG1_AUDIO_MODE_JOINT); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_MODE_JOINT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_MODE_SINGLE x = PyInt_FromLong(CL_MPEG1_AUDIO_MODE_SINGLE); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_MODE_SINGLE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_MODE_STEREO x = PyInt_FromLong(CL_MPEG1_AUDIO_MODE_STEREO); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_MODE_STEREO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_AUDIO_SOFTWARE x = PyInt_FromLong(CL_MPEG1_AUDIO_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "MPEG1_AUDIO_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_END_OF_STREAM x = PyInt_FromLong(CL_MPEG1_END_OF_STREAM); if (x == NULL || PyDict_SetItemString(d, "MPEG1_END_OF_STREAM", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_ERROR x = PyInt_FromLong(CL_MPEG1_ERROR); if (x == NULL || PyDict_SetItemString(d, "MPEG1_ERROR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_NUM_PARAMS x = PyInt_FromLong(CL_MPEG1_NUM_PARAMS); if (x == NULL || PyDict_SetItemString(d, "MPEG1_NUM_PARAMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_M x = PyInt_FromLong(CL_MPEG1_VIDEO_M); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_M", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_B_X x = PyInt_FromLong(CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_B_X); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_B_X", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_B_Y x = PyInt_FromLong(CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_B_Y); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_B_Y", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_P_X x = PyInt_FromLong(CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_P_X); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_P_X", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_P_Y x = PyInt_FromLong(CL_MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_P_Y); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_MAX_MOTION_VECTOR_LENGTH_P_Y", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_N x = PyInt_FromLong(CL_MPEG1_VIDEO_N); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_N", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_SOFTNESS x = PyInt_FromLong(CL_MPEG1_VIDEO_SOFTNESS); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_SOFTNESS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_SOFTNESS_MAXIMUM x = PyInt_FromLong(CL_MPEG1_VIDEO_SOFTNESS_MAXIMUM); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_SOFTNESS_MAXIMUM", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_SOFTNESS_MEDIUM x = PyInt_FromLong(CL_MPEG1_VIDEO_SOFTNESS_MEDIUM); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_SOFTNESS_MEDIUM", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_SOFTNESS_NONE x = PyInt_FromLong(CL_MPEG1_VIDEO_SOFTNESS_NONE); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_SOFTNESS_NONE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG1_VIDEO_SOFTWARE x = PyInt_FromLong(CL_MPEG1_VIDEO_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "MPEG1_VIDEO_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MPEG_VIDEO x = PyInt_FromLong(CL_MPEG_VIDEO); if (x == NULL || PyDict_SetItemString(d, "MPEG_VIDEO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MULTIRATE_AWARE x = PyInt_FromLong(CL_MULTIRATE_AWARE); if (x == NULL || PyDict_SetItemString(d, "MULTIRATE_AWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC1 x = PyInt_FromLong(CL_MVC1); if (x == NULL || PyDict_SetItemString(d, "MVC1", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC1_SOFTWARE x = PyInt_FromLong(CL_MVC1_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "MVC1_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2 x = PyInt_FromLong(CL_MVC2); if (x == NULL || PyDict_SetItemString(d, "MVC2", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_BLENDING x = PyInt_FromLong(CL_MVC2_BLENDING); if (x == NULL || PyDict_SetItemString(d, "MVC2_BLENDING", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_BLENDING_OFF x = PyInt_FromLong(CL_MVC2_BLENDING_OFF); if (x == NULL || PyDict_SetItemString(d, "MVC2_BLENDING_OFF", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_BLENDING_ON x = PyInt_FromLong(CL_MVC2_BLENDING_ON); if (x == NULL || PyDict_SetItemString(d, "MVC2_BLENDING_ON", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_CHROMA_THRESHOLD x = PyInt_FromLong(CL_MVC2_CHROMA_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "MVC2_CHROMA_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_EDGE_THRESHOLD x = PyInt_FromLong(CL_MVC2_EDGE_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "MVC2_EDGE_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_ERROR x = PyInt_FromLong(CL_MVC2_ERROR); if (x == NULL || PyDict_SetItemString(d, "MVC2_ERROR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_LUMA_THRESHOLD x = PyInt_FromLong(CL_MVC2_LUMA_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "MVC2_LUMA_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC2_SOFTWARE x = PyInt_FromLong(CL_MVC2_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "MVC2_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC3_QUALITY_LEVEL x = PyInt_FromLong(CL_MVC3_QUALITY_LEVEL); if (x == NULL || PyDict_SetItemString(d, "MVC3_QUALITY_LEVEL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_MVC3_SOFTWARE x = PyInt_FromLong(CL_MVC3_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "MVC3_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NEXT_NOT_AVAILABLE x = PyInt_FromLong(CL_NEXT_NOT_AVAILABLE); if (x == NULL || PyDict_SetItemString(d, "NEXT_NOT_AVAILABLE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NOISE_MARGIN x = PyInt_FromLong(CL_NOISE_MARGIN); if (x == NULL || PyDict_SetItemString(d, "NOISE_MARGIN", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NONE x = PyInt_FromLong(CL_NONE); if (x == NULL || PyDict_SetItemString(d, "NONE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NUMBER_OF_FORMATS x = PyInt_FromLong(CL_NUMBER_OF_FORMATS); if (x == NULL || PyDict_SetItemString(d, "NUMBER_OF_FORMATS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NUMBER_OF_FRAMES x = PyInt_FromLong(CL_NUMBER_OF_FRAMES); if (x == NULL || PyDict_SetItemString(d, "NUMBER_OF_FRAMES", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NUMBER_OF_PARAMS x = PyInt_FromLong(CL_NUMBER_OF_PARAMS); if (x == NULL || PyDict_SetItemString(d, "NUMBER_OF_PARAMS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NUMBER_OF_PARAMS_FREEZE x = PyInt_FromLong(CL_NUMBER_OF_PARAMS_FREEZE); if (x == NULL || PyDict_SetItemString(d, "NUMBER_OF_PARAMS_FREEZE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_NUMBER_OF_VIDEO_FORMATS x = PyInt_FromLong(CL_NUMBER_OF_VIDEO_FORMATS); if (x == NULL || PyDict_SetItemString(d, "NUMBER_OF_VIDEO_FORMATS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ORIENTATION x = PyInt_FromLong(CL_ORIENTATION); if (x == NULL || PyDict_SetItemString(d, "ORIENTATION", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ORIGINAL_FORMAT x = PyInt_FromLong(CL_ORIGINAL_FORMAT); if (x == NULL || PyDict_SetItemString(d, "ORIGINAL_FORMAT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_PARAM_OUT_OF_RANGE x = PyInt_FromLong(CL_PARAM_OUT_OF_RANGE); if (x == NULL || PyDict_SetItemString(d, "PARAM_OUT_OF_RANGE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_PIXEL_ASPECT x = PyInt_FromLong(CL_PIXEL_ASPECT); if (x == NULL || PyDict_SetItemString(d, "PIXEL_ASPECT", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_PREDICTED x = PyInt_FromLong(CL_PREDICTED); if (x == NULL || PyDict_SetItemString(d, "PREDICTED", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_PREROLL x = PyInt_FromLong(CL_PREROLL); if (x == NULL || PyDict_SetItemString(d, "PREROLL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_QUALITY_FACTOR x = PyInt_FromLong(CL_QUALITY_FACTOR); if (x == NULL || PyDict_SetItemString(d, "QUALITY_FACTOR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_QUALITY_LEVEL x = PyInt_FromLong(CL_QUALITY_LEVEL); if (x == NULL || PyDict_SetItemString(d, "QUALITY_LEVEL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_QUALITY_SPATIAL x = PyInt_FromLong(CL_QUALITY_SPATIAL); if (x == NULL || PyDict_SetItemString(d, "QUALITY_SPATIAL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_QUALITY_TEMPORAL x = PyInt_FromLong(CL_QUALITY_TEMPORAL); if (x == NULL || PyDict_SetItemString(d, "QUALITY_TEMPORAL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_QUANTIZATION_TABLES x = PyInt_FromLong(CL_QUANTIZATION_TABLES); if (x == NULL || PyDict_SetItemString(d, "QUANTIZATION_TABLES", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RANGE_VALUE x = PyInt_FromLong(CL_RANGE_VALUE); if (x == NULL || PyDict_SetItemString(d, "RANGE_VALUE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RGB x = PyInt_FromLong(CL_RGB); if (x == NULL || PyDict_SetItemString(d, "RGB", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RGB332 x = PyInt_FromLong(CL_RGB332); if (x == NULL || PyDict_SetItemString(d, "RGB332", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RGB8 x = PyInt_FromLong(CL_RGB8); if (x == NULL || PyDict_SetItemString(d, "RGB8", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RGBA x = PyInt_FromLong(CL_RGBA); if (x == NULL || PyDict_SetItemString(d, "RGBA", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RGBX x = PyInt_FromLong(CL_RGBX); if (x == NULL || PyDict_SetItemString(d, "RGBX", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RLE x = PyInt_FromLong(CL_RLE); if (x == NULL || PyDict_SetItemString(d, "RLE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RLE24 x = PyInt_FromLong(CL_RLE24); if (x == NULL || PyDict_SetItemString(d, "RLE24", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RLE24_SOFTWARE x = PyInt_FromLong(CL_RLE24_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "RLE24_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RLE_SOFTWARE x = PyInt_FromLong(CL_RLE_SOFTWARE); if (x == NULL || PyDict_SetItemString(d, "RLE_SOFTWARE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RTR x = PyInt_FromLong(CL_RTR); if (x == NULL || PyDict_SetItemString(d, "RTR", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RTR1 x = PyInt_FromLong(CL_RTR1); if (x == NULL || PyDict_SetItemString(d, "RTR1", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_RTR_QUALITY_LEVEL x = PyInt_FromLong(CL_RTR_QUALITY_LEVEL); if (x == NULL || PyDict_SetItemString(d, "RTR_QUALITY_LEVEL", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_SAMPLES_PER_TILE x = PyInt_FromLong(CL_SAMPLES_PER_TILE); if (x == NULL || PyDict_SetItemString(d, "SAMPLES_PER_TILE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_SCHEME_BUSY x = PyInt_FromLong(CL_SCHEME_BUSY); if (x == NULL || PyDict_SetItemString(d, "SCHEME_BUSY", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_SCHEME_NOT_AVAILABLE x = PyInt_FromLong(CL_SCHEME_NOT_AVAILABLE); if (x == NULL || PyDict_SetItemString(d, "SCHEME_NOT_AVAILABLE", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_SPEED x = PyInt_FromLong(CL_SPEED); if (x == NULL || PyDict_SetItemString(d, "SPEED", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_STEREO_INTERLEAVED x = PyInt_FromLong(CL_STEREO_INTERLEAVED); if (x == NULL || PyDict_SetItemString(d, "STEREO_INTERLEAVED", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_STREAM_HEADERS x = PyInt_FromLong(CL_STREAM_HEADERS); if (x == NULL || PyDict_SetItemString(d, "STREAM_HEADERS", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_TILE_THRESHOLD x = PyInt_FromLong(CL_TILE_THRESHOLD); if (x == NULL || PyDict_SetItemString(d, "TILE_THRESHOLD", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_TOP_DOWN x = PyInt_FromLong(CL_TOP_DOWN); if (x == NULL || PyDict_SetItemString(d, "TOP_DOWN", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_ULAW x = PyInt_FromLong(CL_ULAW); if (x == NULL || PyDict_SetItemString(d, "ULAW", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_UNCOMPRESSED x = PyInt_FromLong(CL_UNCOMPRESSED); if (x == NULL || PyDict_SetItemString(d, "UNCOMPRESSED", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_UNCOMPRESSED_AUDIO x = PyInt_FromLong(CL_UNCOMPRESSED_AUDIO); if (x == NULL || PyDict_SetItemString(d, "UNCOMPRESSED_AUDIO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_UNCOMPRESSED_VIDEO x = PyInt_FromLong(CL_UNCOMPRESSED_VIDEO); if (x == NULL || PyDict_SetItemString(d, "UNCOMPRESSED_VIDEO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_UNKNOWN_SCHEME x = PyInt_FromLong(CL_UNKNOWN_SCHEME); if (x == NULL || PyDict_SetItemString(d, "UNKNOWN_SCHEME", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_VIDEO x = PyInt_FromLong(CL_VIDEO); if (x == NULL || PyDict_SetItemString(d, "VIDEO", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_Y x = PyInt_FromLong(CL_Y); if (x == NULL || PyDict_SetItemString(d, "Y", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YCbCr x = PyInt_FromLong(CL_YCbCr); if (x == NULL || PyDict_SetItemString(d, "YCbCr", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YCbCr422 x = PyInt_FromLong(CL_YCbCr422); if (x == NULL || PyDict_SetItemString(d, "YCbCr422", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YCbCr422DC x = PyInt_FromLong(CL_YCbCr422DC); if (x == NULL || PyDict_SetItemString(d, "YCbCr422DC", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YCbCr422HC x = PyInt_FromLong(CL_YCbCr422HC); if (x == NULL || PyDict_SetItemString(d, "YCbCr422HC", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YUV x = PyInt_FromLong(CL_YUV); if (x == NULL || PyDict_SetItemString(d, "YUV", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YUV422 x = PyInt_FromLong(CL_YUV422); if (x == NULL || PyDict_SetItemString(d, "YUV422", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YUV422DC x = PyInt_FromLong(CL_YUV422DC); if (x == NULL || PyDict_SetItemString(d, "YUV422DC", x) < 0) return; Py_DECREF(x); #endif #ifdef CL_YUV422HC x = PyInt_FromLong(CL_YUV422HC); if (x == NULL || PyDict_SetItemString(d, "YUV422HC", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_STEREO x = PyInt_FromLong(AWCMP_STEREO); if (x == NULL || PyDict_SetItemString(d, "AWCMP_STEREO", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_JOINT_STEREO x = PyInt_FromLong(AWCMP_JOINT_STEREO); if (x == NULL || PyDict_SetItemString(d, "AWCMP_JOINT_STEREO", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_INDEPENDENT x = PyInt_FromLong(AWCMP_INDEPENDENT); if (x == NULL || PyDict_SetItemString(d, "AWCMP_INDEPENDENT", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_FIXED_RATE x = PyInt_FromLong(AWCMP_FIXED_RATE); if (x == NULL || PyDict_SetItemString(d, "AWCMP_FIXED_RATE", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_CONST_QUAL x = PyInt_FromLong(AWCMP_CONST_QUAL); if (x == NULL || PyDict_SetItemString(d, "AWCMP_CONST_QUAL", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_LOSSLESS x = PyInt_FromLong(AWCMP_LOSSLESS); if (x == NULL || PyDict_SetItemString(d, "AWCMP_LOSSLESS", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_MPEG_LAYER_I x = PyInt_FromLong(AWCMP_MPEG_LAYER_I); if (x == NULL || PyDict_SetItemString(d, "AWCMP_MPEG_LAYER_I", x) < 0) return; Py_DECREF(x); #endif #ifdef AWCMP_MPEG_LAYER_II x = PyInt_FromLong(AWCMP_MPEG_LAYER_II); if (x == NULL || PyDict_SetItemString(d, "AWCMP_MPEG_LAYER_II", x) < 0) return; Py_DECREF(x); #endif (void) clSetErrorHandler(cl_ErrorHandler); } Python-2.3.7/Modules/itertoolsmodule.c0000644001241000117560000012147610047235207017271 0ustar loewishpifb6 #include "Python.h" /* Itertools module written and maintained by Raymond D. Hettinger Copyright (c) 2003 Python Software Foundation. All rights reserved. */ /* cycle object **********************************************************/ typedef struct { PyObject_HEAD PyObject *it; PyObject *saved; int firstpass; } cycleobject; static PyTypeObject cycle_type; static PyObject * cycle_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *it; PyObject *iterable; PyObject *saved; cycleobject *lz; if (!PyArg_UnpackTuple(args, "cycle", 1, 1, &iterable)) return NULL; /* Get iterator. */ it = PyObject_GetIter(iterable); if (it == NULL) return NULL; saved = PyList_New(0); if (saved == NULL) { Py_DECREF(it); return NULL; } /* create cycleobject structure */ lz = (cycleobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(it); Py_DECREF(saved); return NULL; } lz->it = it; lz->saved = saved; lz->firstpass = 0; return (PyObject *)lz; } static void cycle_dealloc(cycleobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->saved); Py_XDECREF(lz->it); lz->ob_type->tp_free(lz); } static int cycle_traverse(cycleobject *lz, visitproc visit, void *arg) { int err; if (lz->it) { err = visit(lz->it, arg); if (err) return err; } if (lz->saved) { err = visit(lz->saved, arg); if (err) return err; } return 0; } static PyObject * cycle_next(cycleobject *lz) { PyObject *item; PyObject *it; while (1) { item = PyIter_Next(lz->it); if (item != NULL) { if (!lz->firstpass) PyList_Append(lz->saved, item); return item; } if (PyErr_Occurred()) { if (PyErr_ExceptionMatches(PyExc_StopIteration)) PyErr_Clear(); else return NULL; } if (PyList_Size(lz->saved) == 0) return NULL; it = PyObject_GetIter(lz->saved); if (it == NULL) return NULL; Py_DECREF(lz->it); lz->it = it; lz->firstpass = 1; } } PyDoc_STRVAR(cycle_doc, "cycle(iterable) --> cycle object\n\ \n\ Return elements from the iterable until it is exhausted.\n\ Then repeat the sequence indefinitely."); static PyTypeObject cycle_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.cycle", /* tp_name */ sizeof(cycleobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)cycle_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ cycle_doc, /* tp_doc */ (traverseproc)cycle_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)cycle_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ cycle_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* dropwhile object **********************************************************/ typedef struct { PyObject_HEAD PyObject *func; PyObject *it; long start; } dropwhileobject; static PyTypeObject dropwhile_type; static PyObject * dropwhile_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *func, *seq; PyObject *it; dropwhileobject *lz; if (!PyArg_UnpackTuple(args, "dropwhile", 2, 2, &func, &seq)) return NULL; /* Get iterator. */ it = PyObject_GetIter(seq); if (it == NULL) return NULL; /* create dropwhileobject structure */ lz = (dropwhileobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(it); return NULL; } Py_INCREF(func); lz->func = func; lz->it = it; lz->start = 0; return (PyObject *)lz; } static void dropwhile_dealloc(dropwhileobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->func); Py_XDECREF(lz->it); lz->ob_type->tp_free(lz); } static int dropwhile_traverse(dropwhileobject *lz, visitproc visit, void *arg) { int err; if (lz->it) { err = visit(lz->it, arg); if (err) return err; } if (lz->func) { err = visit(lz->func, arg); if (err) return err; } return 0; } static PyObject * dropwhile_next(dropwhileobject *lz) { PyObject *item, *good; PyObject *it = lz->it; long ok; for (;;) { assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) return NULL; if (lz->start == 1) return item; good = PyObject_CallFunctionObjArgs(lz->func, item, NULL); if (good == NULL) { Py_DECREF(item); return NULL; } ok = PyObject_IsTrue(good); Py_DECREF(good); if (!ok) { lz->start = 1; return item; } Py_DECREF(item); } } PyDoc_STRVAR(dropwhile_doc, "dropwhile(predicate, iterable) --> dropwhile object\n\ \n\ Drop items from the iterable while predicate(item) is true.\n\ Afterwards, return every element until the iterable is exhausted."); static PyTypeObject dropwhile_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.dropwhile", /* tp_name */ sizeof(dropwhileobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)dropwhile_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ dropwhile_doc, /* tp_doc */ (traverseproc)dropwhile_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)dropwhile_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ dropwhile_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* takewhile object **********************************************************/ typedef struct { PyObject_HEAD PyObject *func; PyObject *it; long stop; } takewhileobject; static PyTypeObject takewhile_type; static PyObject * takewhile_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *func, *seq; PyObject *it; takewhileobject *lz; if (!PyArg_UnpackTuple(args, "takewhile", 2, 2, &func, &seq)) return NULL; /* Get iterator. */ it = PyObject_GetIter(seq); if (it == NULL) return NULL; /* create takewhileobject structure */ lz = (takewhileobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(it); return NULL; } Py_INCREF(func); lz->func = func; lz->it = it; lz->stop = 0; return (PyObject *)lz; } static void takewhile_dealloc(takewhileobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->func); Py_XDECREF(lz->it); lz->ob_type->tp_free(lz); } static int takewhile_traverse(takewhileobject *lz, visitproc visit, void *arg) { int err; if (lz->it) { err = visit(lz->it, arg); if (err) return err; } if (lz->func) { err = visit(lz->func, arg); if (err) return err; } return 0; } static PyObject * takewhile_next(takewhileobject *lz) { PyObject *item, *good; PyObject *it = lz->it; long ok; if (lz->stop == 1) return NULL; assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) return NULL; good = PyObject_CallFunctionObjArgs(lz->func, item, NULL); if (good == NULL) { Py_DECREF(item); return NULL; } ok = PyObject_IsTrue(good); Py_DECREF(good); if (ok) return item; Py_DECREF(item); lz->stop = 1; return NULL; } PyDoc_STRVAR(takewhile_doc, "takewhile(predicate, iterable) --> takewhile object\n\ \n\ Return successive entries from an iterable as long as the \n\ predicate evaluates to true for each entry."); static PyTypeObject takewhile_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.takewhile", /* tp_name */ sizeof(takewhileobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)takewhile_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ takewhile_doc, /* tp_doc */ (traverseproc)takewhile_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)takewhile_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ takewhile_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* islice object ************************************************************/ typedef struct { PyObject_HEAD PyObject *it; long next; long stop; long step; long cnt; } isliceobject; static PyTypeObject islice_type; static PyObject * islice_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *seq; long start=0, stop=-1, step=1; PyObject *it, *a1=NULL, *a2=NULL; int numargs; isliceobject *lz; numargs = PyTuple_Size(args); if (!PyArg_ParseTuple(args, "OO|Ol:islice", &seq, &a1, &a2, &step)) return NULL; if (numargs == 2) { if (a1 != Py_None) { stop = PyInt_AsLong(a1); if (stop == -1) { if (PyErr_Occurred()) PyErr_Clear(); PyErr_SetString(PyExc_ValueError, "Stop argument must be an integer or None."); return NULL; } } } else { start = PyInt_AsLong(a1); if (start == -1 && PyErr_Occurred()) { PyErr_Clear(); PyErr_SetString(PyExc_ValueError, "Start argument must be an integer."); return NULL; } if (a2 != Py_None) { stop = PyInt_AsLong(a2); if (stop == -1) { if (PyErr_Occurred()) PyErr_Clear(); PyErr_SetString(PyExc_ValueError, "Stop argument must be an integer or None."); return NULL; } } } if (start<0 || stop<-1) { PyErr_SetString(PyExc_ValueError, "Indices for islice() must be positive."); return NULL; } if (step<1) { PyErr_SetString(PyExc_ValueError, "Step must be one or larger for islice()."); return NULL; } /* Get iterator. */ it = PyObject_GetIter(seq); if (it == NULL) return NULL; /* create isliceobject structure */ lz = (isliceobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(it); return NULL; } lz->it = it; lz->next = start; lz->stop = stop; lz->step = step; lz->cnt = 0L; return (PyObject *)lz; } static void islice_dealloc(isliceobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->it); lz->ob_type->tp_free(lz); } static int islice_traverse(isliceobject *lz, visitproc visit, void *arg) { if (lz->it) return visit(lz->it, arg); return 0; } static PyObject * islice_next(isliceobject *lz) { PyObject *item; PyObject *it = lz->it; long oldnext; while (lz->cnt < lz->next) { assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) return NULL; Py_DECREF(item); lz->cnt++; } if (lz->stop != -1 && lz->cnt >= lz->stop) return NULL; assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) return NULL; lz->cnt++; oldnext = lz->next; lz->next += lz->step; if (lz->next < oldnext) /* Check for overflow */ lz->next = lz->stop; return item; } PyDoc_STRVAR(islice_doc, "islice(iterable, [start,] stop [, step]) --> islice object\n\ \n\ Return an iterator whose next() method returns selected values from an\n\ iterable. If start is specified, will skip all preceding elements;\n\ otherwise, start defaults to zero. Step defaults to one. If\n\ specified as another value, step determines how many values are \n\ skipped between successive calls. Works like a slice() on a list\n\ but returns an iterator."); static PyTypeObject islice_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.islice", /* tp_name */ sizeof(isliceobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)islice_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ islice_doc, /* tp_doc */ (traverseproc)islice_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)islice_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ islice_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* starmap object ************************************************************/ typedef struct { PyObject_HEAD PyObject *func; PyObject *it; } starmapobject; static PyTypeObject starmap_type; static PyObject * starmap_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *func, *seq; PyObject *it; starmapobject *lz; if (!PyArg_UnpackTuple(args, "starmap", 2, 2, &func, &seq)) return NULL; /* Get iterator. */ it = PyObject_GetIter(seq); if (it == NULL) return NULL; /* create starmapobject structure */ lz = (starmapobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(it); return NULL; } Py_INCREF(func); lz->func = func; lz->it = it; return (PyObject *)lz; } static void starmap_dealloc(starmapobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->func); Py_XDECREF(lz->it); lz->ob_type->tp_free(lz); } static int starmap_traverse(starmapobject *lz, visitproc visit, void *arg) { int err; if (lz->it) { err = visit(lz->it, arg); if (err) return err; } if (lz->func) { err = visit(lz->func, arg); if (err) return err; } return 0; } static PyObject * starmap_next(starmapobject *lz) { PyObject *args; PyObject *result; PyObject *it = lz->it; assert(PyIter_Check(it)); args = (*it->ob_type->tp_iternext)(it); if (args == NULL) return NULL; if (!PyTuple_CheckExact(args)) { Py_DECREF(args); PyErr_SetString(PyExc_TypeError, "iterator must return a tuple"); return NULL; } result = PyObject_Call(lz->func, args, NULL); Py_DECREF(args); return result; } PyDoc_STRVAR(starmap_doc, "starmap(function, sequence) --> starmap object\n\ \n\ Return an iterator whose values are returned from the function evaluated\n\ with a argument tuple taken from the given sequence."); static PyTypeObject starmap_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.starmap", /* tp_name */ sizeof(starmapobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)starmap_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ starmap_doc, /* tp_doc */ (traverseproc)starmap_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)starmap_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ starmap_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* imap object ************************************************************/ typedef struct { PyObject_HEAD PyObject *iters; PyObject *func; } imapobject; static PyTypeObject imap_type; static PyObject * imap_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *it, *iters, *func; imapobject *lz; int numargs, i; numargs = PyTuple_Size(args); if (numargs < 2) { PyErr_SetString(PyExc_TypeError, "imap() must have at least two arguments."); return NULL; } iters = PyTuple_New(numargs-1); if (iters == NULL) return NULL; for (i=1 ; itp_alloc(type, 0); if (lz == NULL) { Py_DECREF(iters); return NULL; } lz->iters = iters; func = PyTuple_GET_ITEM(args, 0); Py_INCREF(func); lz->func = func; return (PyObject *)lz; } static void imap_dealloc(imapobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->iters); Py_XDECREF(lz->func); lz->ob_type->tp_free(lz); } static int imap_traverse(imapobject *lz, visitproc visit, void *arg) { int err; if (lz->iters) { err = visit(lz->iters, arg); if (err) return err; } if (lz->func) { err = visit(lz->func, arg); if (err) return err; } return 0; } /* imap() is an iterator version of __builtins__.map() except that it does not have the None fill-in feature. That was intentionally left out for the following reasons: 1) Itertools are designed to be easily combined and chained together. Having all tools stop with the shortest input is a unifying principle that makes it easier to combine finite iterators (supplying data) with infinite iterators like count() and repeat() (for supplying sequential or constant arguments to a function). 2) In typical use cases for combining itertools, having one finite data supplier run out before another is likely to be an error condition which should not pass silently by automatically supplying None. 3) The use cases for automatic None fill-in are rare -- not many functions do something useful when a parameter suddenly switches type and becomes None. 4) If a need does arise, it can be met by __builtins__.map() or by writing: chain(iterable, repeat(None)). 5) Similar toolsets in Haskell and SML do not have automatic None fill-in. */ static PyObject * imap_next(imapobject *lz) { PyObject *val; PyObject *argtuple; PyObject *result; int numargs, i; numargs = PyTuple_Size(lz->iters); argtuple = PyTuple_New(numargs); if (argtuple == NULL) return NULL; for (i=0 ; iiters, i)); if (val == NULL) { Py_DECREF(argtuple); return NULL; } PyTuple_SET_ITEM(argtuple, i, val); } if (lz->func == Py_None) return argtuple; result = PyObject_Call(lz->func, argtuple, NULL); Py_DECREF(argtuple); return result; } PyDoc_STRVAR(imap_doc, "imap(func, *iterables) --> imap object\n\ \n\ Make an iterator that computes the function using arguments from\n\ each of the iterables. Like map() except that it returns\n\ an iterator instead of a list and that it stops when the shortest\n\ iterable is exhausted instead of filling in None for shorter\n\ iterables."); static PyTypeObject imap_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.imap", /* tp_name */ sizeof(imapobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)imap_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ imap_doc, /* tp_doc */ (traverseproc)imap_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)imap_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ imap_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* chain object ************************************************************/ typedef struct { PyObject_HEAD long tuplesize; long iternum; /* which iterator is active */ PyObject *ittuple; /* tuple of iterators */ } chainobject; static PyTypeObject chain_type; static PyObject * chain_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { chainobject *lz; int tuplesize = PySequence_Length(args); int i; PyObject *ittuple; /* obtain iterators */ assert(PyTuple_Check(args)); ittuple = PyTuple_New(tuplesize); if(ittuple == NULL) return NULL; for (i=0; i < tuplesize; ++i) { PyObject *item = PyTuple_GET_ITEM(args, i); PyObject *it = PyObject_GetIter(item); if (it == NULL) { if (PyErr_ExceptionMatches(PyExc_TypeError)) PyErr_Format(PyExc_TypeError, "chain argument #%d must support iteration", i+1); Py_DECREF(ittuple); return NULL; } PyTuple_SET_ITEM(ittuple, i, it); } /* create chainobject structure */ lz = (chainobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(ittuple); return NULL; } lz->ittuple = ittuple; lz->iternum = 0; lz->tuplesize = tuplesize; return (PyObject *)lz; } static void chain_dealloc(chainobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->ittuple); lz->ob_type->tp_free(lz); } static int chain_traverse(chainobject *lz, visitproc visit, void *arg) { if (lz->ittuple) return visit(lz->ittuple, arg); return 0; } static PyObject * chain_next(chainobject *lz) { PyObject *it; PyObject *item; while (lz->iternum < lz->tuplesize) { it = PyTuple_GET_ITEM(lz->ittuple, lz->iternum); item = PyIter_Next(it); if (item != NULL) return item; if (PyErr_Occurred()) { if (PyErr_ExceptionMatches(PyExc_StopIteration)) PyErr_Clear(); else return NULL; } lz->iternum++; } return NULL; } PyDoc_STRVAR(chain_doc, "chain(*iterables) --> chain object\n\ \n\ Return a chain object whose .next() method returns elements from the\n\ first iterable until it is exhausted, then elements from the next\n\ iterable, until all of the iterables are exhausted."); static PyTypeObject chain_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.chain", /* tp_name */ sizeof(chainobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)chain_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ chain_doc, /* tp_doc */ (traverseproc)chain_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)chain_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ chain_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* ifilter object ************************************************************/ typedef struct { PyObject_HEAD PyObject *func; PyObject *it; } ifilterobject; static PyTypeObject ifilter_type; static PyObject * ifilter_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *func, *seq; PyObject *it; ifilterobject *lz; if (!PyArg_UnpackTuple(args, "ifilter", 2, 2, &func, &seq)) return NULL; /* Get iterator. */ it = PyObject_GetIter(seq); if (it == NULL) return NULL; /* create ifilterobject structure */ lz = (ifilterobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(it); return NULL; } Py_INCREF(func); lz->func = func; lz->it = it; return (PyObject *)lz; } static void ifilter_dealloc(ifilterobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->func); Py_XDECREF(lz->it); lz->ob_type->tp_free(lz); } static int ifilter_traverse(ifilterobject *lz, visitproc visit, void *arg) { int err; if (lz->it) { err = visit(lz->it, arg); if (err) return err; } if (lz->func) { err = visit(lz->func, arg); if (err) return err; } return 0; } static PyObject * ifilter_next(ifilterobject *lz) { PyObject *item; PyObject *it = lz->it; long ok; for (;;) { assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) return NULL; if (lz->func == Py_None) { ok = PyObject_IsTrue(item); } else { PyObject *good; good = PyObject_CallFunctionObjArgs(lz->func, item, NULL); if (good == NULL) { Py_DECREF(item); return NULL; } ok = PyObject_IsTrue(good); Py_DECREF(good); } if (ok) return item; Py_DECREF(item); } } PyDoc_STRVAR(ifilter_doc, "ifilter(function or None, sequence) --> ifilter object\n\ \n\ Return those items of sequence for which function(item) is true.\n\ If function is None, return the items that are true."); static PyTypeObject ifilter_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.ifilter", /* tp_name */ sizeof(ifilterobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)ifilter_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ ifilter_doc, /* tp_doc */ (traverseproc)ifilter_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)ifilter_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ ifilter_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* ifilterfalse object ************************************************************/ typedef struct { PyObject_HEAD PyObject *func; PyObject *it; } ifilterfalseobject; static PyTypeObject ifilterfalse_type; static PyObject * ifilterfalse_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *func, *seq; PyObject *it; ifilterfalseobject *lz; if (!PyArg_UnpackTuple(args, "ifilterfalse", 2, 2, &func, &seq)) return NULL; /* Get iterator. */ it = PyObject_GetIter(seq); if (it == NULL) return NULL; /* create ifilterfalseobject structure */ lz = (ifilterfalseobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(it); return NULL; } Py_INCREF(func); lz->func = func; lz->it = it; return (PyObject *)lz; } static void ifilterfalse_dealloc(ifilterfalseobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->func); Py_XDECREF(lz->it); lz->ob_type->tp_free(lz); } static int ifilterfalse_traverse(ifilterfalseobject *lz, visitproc visit, void *arg) { int err; if (lz->it) { err = visit(lz->it, arg); if (err) return err; } if (lz->func) { err = visit(lz->func, arg); if (err) return err; } return 0; } static PyObject * ifilterfalse_next(ifilterfalseobject *lz) { PyObject *item; PyObject *it = lz->it; long ok; for (;;) { assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) return NULL; if (lz->func == Py_None) { ok = PyObject_IsTrue(item); } else { PyObject *good; good = PyObject_CallFunctionObjArgs(lz->func, item, NULL); if (good == NULL) { Py_DECREF(item); return NULL; } ok = PyObject_IsTrue(good); Py_DECREF(good); } if (!ok) return item; Py_DECREF(item); } } PyDoc_STRVAR(ifilterfalse_doc, "ifilterfalse(function or None, sequence) --> ifilterfalse object\n\ \n\ Return those items of sequence for which function(item) is false.\n\ If function is None, return the items that are false."); static PyTypeObject ifilterfalse_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.ifilterfalse", /* tp_name */ sizeof(ifilterfalseobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)ifilterfalse_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ ifilterfalse_doc, /* tp_doc */ (traverseproc)ifilterfalse_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)ifilterfalse_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ ifilterfalse_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* count object ************************************************************/ typedef struct { PyObject_HEAD long cnt; } countobject; static PyTypeObject count_type; static PyObject * count_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { countobject *lz; long cnt = 0; if (!PyArg_ParseTuple(args, "|l:count", &cnt)) return NULL; /* create countobject structure */ lz = (countobject *)PyObject_New(countobject, &count_type); if (lz == NULL) return NULL; lz->cnt = cnt; return (PyObject *)lz; } static PyObject * count_next(countobject *lz) { return PyInt_FromLong(lz->cnt++); } PyDoc_STRVAR(count_doc, "count([firstval]) --> count object\n\ \n\ Return a count object whose .next() method returns consecutive\n\ integers starting from zero or, if specified, from firstval."); static PyTypeObject count_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.count", /* tp_name */ sizeof(countobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)PyObject_Del, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT, /* tp_flags */ count_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)count_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ count_new, /* tp_new */ }; /* izip object ************************************************************/ #include "Python.h" typedef struct { PyObject_HEAD long tuplesize; PyObject *ittuple; /* tuple of iterators */ PyObject *result; } izipobject; static PyTypeObject izip_type; static PyObject * izip_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { izipobject *lz; int i; PyObject *ittuple; /* tuple of iterators */ PyObject *result; int tuplesize = PySequence_Length(args); /* args must be a tuple */ assert(PyTuple_Check(args)); /* obtain iterators */ ittuple = PyTuple_New(tuplesize); if(ittuple == NULL) return NULL; for (i=0; i < tuplesize; ++i) { PyObject *item = PyTuple_GET_ITEM(args, i); PyObject *it = PyObject_GetIter(item); if (it == NULL) { if (PyErr_ExceptionMatches(PyExc_TypeError)) PyErr_Format(PyExc_TypeError, "izip argument #%d must support iteration", i+1); Py_DECREF(ittuple); return NULL; } PyTuple_SET_ITEM(ittuple, i, it); } /* create a result holder */ result = PyTuple_New(tuplesize); if (result == NULL) { Py_DECREF(ittuple); return NULL; } for (i=0 ; i < tuplesize ; i++) { Py_INCREF(Py_None); PyTuple_SET_ITEM(result, i, Py_None); } /* create izipobject structure */ lz = (izipobject *)type->tp_alloc(type, 0); if (lz == NULL) { Py_DECREF(ittuple); Py_DECREF(result); return NULL; } lz->ittuple = ittuple; lz->tuplesize = tuplesize; lz->result = result; return (PyObject *)lz; } static void izip_dealloc(izipobject *lz) { PyObject_GC_UnTrack(lz); Py_XDECREF(lz->ittuple); Py_XDECREF(lz->result); lz->ob_type->tp_free(lz); } static int izip_traverse(izipobject *lz, visitproc visit, void *arg) { int err; if (lz->ittuple) { err = visit(lz->ittuple, arg); if (err) return err; } if (lz->result) { err = visit(lz->result, arg); if (err) return err; } return 0; } static PyObject * izip_next(izipobject *lz) { int i; long tuplesize = lz->tuplesize; PyObject *result = lz->result; PyObject *it; PyObject *item; PyObject *olditem; if (tuplesize == 0) return NULL; if (result->ob_refcnt == 1) { Py_INCREF(result); for (i=0 ; i < tuplesize ; i++) { it = PyTuple_GET_ITEM(lz->ittuple, i); assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) { Py_DECREF(result); return NULL; } olditem = PyTuple_GET_ITEM(result, i); PyTuple_SET_ITEM(result, i, item); Py_DECREF(olditem); } } else { result = PyTuple_New(tuplesize); if (result == NULL) return NULL; for (i=0 ; i < tuplesize ; i++) { it = PyTuple_GET_ITEM(lz->ittuple, i); assert(PyIter_Check(it)); item = (*it->ob_type->tp_iternext)(it); if (item == NULL) { Py_DECREF(result); return NULL; } PyTuple_SET_ITEM(result, i, item); } } return result; } PyDoc_STRVAR(izip_doc, "izip(iter1 [,iter2 [...]]) --> izip object\n\ \n\ Return a izip object whose .next() method returns a tuple where\n\ the i-th element comes from the i-th iterable argument. The .next()\n\ method continues until the shortest iterable in the argument sequence\n\ is exhausted and then it raises StopIteration. Works like the zip()\n\ function but consumes less memory by returning an iterator instead of\n\ a list."); static PyTypeObject izip_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.izip", /* tp_name */ sizeof(izipobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)izip_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ izip_doc, /* tp_doc */ (traverseproc)izip_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)izip_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ izip_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* repeat object ************************************************************/ typedef struct { PyObject_HEAD PyObject *element; long cnt; } repeatobject; static PyTypeObject repeat_type; static PyObject * repeat_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { repeatobject *ro; PyObject *element; long cnt = -1; if (!PyArg_ParseTuple(args, "O|l:repeat", &element, &cnt)) return NULL; if (PyTuple_Size(args) == 2 && cnt < 0) cnt = 0; ro = (repeatobject *)type->tp_alloc(type, 0); if (ro == NULL) return NULL; Py_INCREF(element); ro->element = element; ro->cnt = cnt; return (PyObject *)ro; } static void repeat_dealloc(repeatobject *ro) { PyObject_GC_UnTrack(ro); Py_XDECREF(ro->element); ro->ob_type->tp_free(ro); } static int repeat_traverse(repeatobject *ro, visitproc visit, void *arg) { if (ro->element) return visit(ro->element, arg); return 0; } static PyObject * repeat_next(repeatobject *ro) { if (ro->cnt == 0) return NULL; if (ro->cnt > 0) ro->cnt--; Py_INCREF(ro->element); return ro->element; } PyDoc_STRVAR(repeat_doc, "repeat(element [,times]) -> create an iterator which returns the element\n\ for the specified number of times. If not specified, returns the element\n\ endlessly."); static PyTypeObject repeat_type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "itertools.repeat", /* tp_name */ sizeof(repeatobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)repeat_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC | Py_TPFLAGS_BASETYPE, /* tp_flags */ repeat_doc, /* tp_doc */ (traverseproc)repeat_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)repeat_next, /* tp_iternext */ 0, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ repeat_new, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* module level code ********************************************************/ PyDoc_STRVAR(module_doc, "Functional tools for creating and using iterators.\n\ \n\ Infinite iterators:\n\ count([n]) --> n, n+1, n+2, ...\n\ cycle(p) --> p0, p1, ... plast, p0, p1, ...\n\ repeat(elem [,n]) --> elem, elem, elem, ... endlessly or up to n times\n\ \n\ Iterators terminating on the shortest input sequence:\n\ izip(p, q, ...) --> (p[0], q[0]), (p[1], q[1]), ... \n\ ifilter(pred, seq) --> elements of seq where pred(elem) is True\n\ ifilterfalse(pred, seq) --> elements of seq where pred(elem) is False\n\ islice(seq, [start,] stop [, step]) --> elements from\n\ seq[start:stop:step]\n\ imap(fun, p, q, ...) --> fun(p0, q0), fun(p1, q1), ...\n\ starmap(fun, seq) --> fun(*seq[0]), fun(*seq[1]), ...\n\ chain(p, q, ...) --> p0, p1, ... plast, q0, q1, ... \n\ takewhile(pred, seq) --> seq[0], seq[1], until pred fails\n\ dropwhile(pred, seq) --> seq[n], seq[n+1], starting when pred fails\n\ "); PyMODINIT_FUNC inititertools(void) { int i; PyObject *m; char *name; PyTypeObject *typelist[] = { &cycle_type, &dropwhile_type, &takewhile_type, &islice_type, &starmap_type, &imap_type, &chain_type, &ifilter_type, &ifilterfalse_type, &count_type, &izip_type, &repeat_type, NULL }; m = Py_InitModule3("itertools", NULL, module_doc); for (i=0 ; typelist[i] != NULL ; i++) { if (PyType_Ready(typelist[i]) < 0) return; name = strchr(typelist[i]->tp_name, '.'); assert (name != NULL); Py_INCREF(typelist[i]); PyModule_AddObject(m, name+1, (PyObject *)typelist[i]); } } Python-2.3.7/Modules/dbmmodule.c0000644001241000117560000002142107567536733016021 0ustar loewishpifb6 /* DBM module using dictionary interface */ #include "Python.h" #include #include #include /* Some Linux systems install gdbm/ndbm.h, but not ndbm.h. This supports * whichever configure was able to locate. */ #if defined(HAVE_NDBM_H) #include #if defined(PYOS_OS2) && !defined(PYCC_GCC) static char *which_dbm = "ndbm"; #else static char *which_dbm = "GNU gdbm"; /* EMX port of GDBM */ #endif #elif defined(HAVE_GDBM_NDBM_H) #include static char *which_dbm = "GNU gdbm"; #elif defined(HAVE_BERKDB_H) #include static char *which_dbm = "Berkeley DB"; #else #error "No ndbm.h available!" #endif typedef struct { PyObject_HEAD int di_size; /* -1 means recompute */ DBM *di_dbm; } dbmobject; static PyTypeObject Dbmtype; #define is_dbmobject(v) ((v)->ob_type == &Dbmtype) #define check_dbmobject_open(v) if ((v)->di_dbm == NULL) \ { PyErr_SetString(DbmError, "DBM object has already been closed"); \ return NULL; } static PyObject *DbmError; static PyObject * newdbmobject(char *file, int flags, int mode) { dbmobject *dp; dp = PyObject_New(dbmobject, &Dbmtype); if (dp == NULL) return NULL; dp->di_size = -1; if ( (dp->di_dbm = dbm_open(file, flags, mode)) == 0 ) { PyErr_SetFromErrno(DbmError); Py_DECREF(dp); return NULL; } return (PyObject *)dp; } /* Methods */ static void dbm_dealloc(register dbmobject *dp) { if ( dp->di_dbm ) dbm_close(dp->di_dbm); PyObject_Del(dp); } static int dbm_length(dbmobject *dp) { if (dp->di_dbm == NULL) { PyErr_SetString(DbmError, "DBM object has already been closed"); return -1; } if ( dp->di_size < 0 ) { datum key; int size; size = 0; for ( key=dbm_firstkey(dp->di_dbm); key.dptr; key = dbm_nextkey(dp->di_dbm)) size++; dp->di_size = size; } return dp->di_size; } static PyObject * dbm_subscript(dbmobject *dp, register PyObject *key) { datum drec, krec; int tmp_size; if (!PyArg_Parse(key, "s#", &krec.dptr, &tmp_size) ) return NULL; krec.dsize = tmp_size; check_dbmobject_open(dp); drec = dbm_fetch(dp->di_dbm, krec); if ( drec.dptr == 0 ) { PyErr_SetString(PyExc_KeyError, PyString_AS_STRING((PyStringObject *)key)); return NULL; } if ( dbm_error(dp->di_dbm) ) { dbm_clearerr(dp->di_dbm); PyErr_SetString(DbmError, ""); return NULL; } return PyString_FromStringAndSize(drec.dptr, drec.dsize); } static int dbm_ass_sub(dbmobject *dp, PyObject *v, PyObject *w) { datum krec, drec; int tmp_size; if ( !PyArg_Parse(v, "s#", &krec.dptr, &tmp_size) ) { PyErr_SetString(PyExc_TypeError, "dbm mappings have string indices only"); return -1; } krec.dsize = tmp_size; if (dp->di_dbm == NULL) { PyErr_SetString(DbmError, "DBM object has already been closed"); return -1; } dp->di_size = -1; if (w == NULL) { if ( dbm_delete(dp->di_dbm, krec) < 0 ) { dbm_clearerr(dp->di_dbm); PyErr_SetString(PyExc_KeyError, PyString_AS_STRING((PyStringObject *)v)); return -1; } } else { if ( !PyArg_Parse(w, "s#", &drec.dptr, &tmp_size) ) { PyErr_SetString(PyExc_TypeError, "dbm mappings have string elements only"); return -1; } drec.dsize = tmp_size; if ( dbm_store(dp->di_dbm, krec, drec, DBM_REPLACE) < 0 ) { dbm_clearerr(dp->di_dbm); PyErr_SetString(DbmError, "cannot add item to database"); return -1; } } if ( dbm_error(dp->di_dbm) ) { dbm_clearerr(dp->di_dbm); PyErr_SetString(DbmError, ""); return -1; } return 0; } static PyMappingMethods dbm_as_mapping = { (inquiry)dbm_length, /*mp_length*/ (binaryfunc)dbm_subscript, /*mp_subscript*/ (objobjargproc)dbm_ass_sub, /*mp_ass_subscript*/ }; static PyObject * dbm__close(register dbmobject *dp, PyObject *args) { if (!PyArg_ParseTuple(args, ":close")) return NULL; if (dp->di_dbm) dbm_close(dp->di_dbm); dp->di_dbm = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * dbm_keys(register dbmobject *dp, PyObject *args) { register PyObject *v, *item; datum key; int err; if (!PyArg_ParseTuple(args, ":keys")) return NULL; check_dbmobject_open(dp); v = PyList_New(0); if (v == NULL) return NULL; for (key = dbm_firstkey(dp->di_dbm); key.dptr; key = dbm_nextkey(dp->di_dbm)) { item = PyString_FromStringAndSize(key.dptr, key.dsize); if (item == NULL) { Py_DECREF(v); return NULL; } err = PyList_Append(v, item); Py_DECREF(item); if (err != 0) { Py_DECREF(v); return NULL; } } return v; } static PyObject * dbm_has_key(register dbmobject *dp, PyObject *args) { datum key, val; int tmp_size; if (!PyArg_ParseTuple(args, "s#:has_key", &key.dptr, &tmp_size)) return NULL; key.dsize = tmp_size; check_dbmobject_open(dp); val = dbm_fetch(dp->di_dbm, key); return PyInt_FromLong(val.dptr != NULL); } static PyObject * dbm_get(register dbmobject *dp, PyObject *args) { datum key, val; PyObject *defvalue = Py_None; int tmp_size; if (!PyArg_ParseTuple(args, "s#|O:get", &key.dptr, &tmp_size, &defvalue)) return NULL; key.dsize = tmp_size; check_dbmobject_open(dp); val = dbm_fetch(dp->di_dbm, key); if (val.dptr != NULL) return PyString_FromStringAndSize(val.dptr, val.dsize); else { Py_INCREF(defvalue); return defvalue; } } static PyObject * dbm_setdefault(register dbmobject *dp, PyObject *args) { datum key, val; PyObject *defvalue = NULL; int tmp_size; if (!PyArg_ParseTuple(args, "s#|S:setdefault", &key.dptr, &tmp_size, &defvalue)) return NULL; key.dsize = tmp_size; check_dbmobject_open(dp); val = dbm_fetch(dp->di_dbm, key); if (val.dptr != NULL) return PyString_FromStringAndSize(val.dptr, val.dsize); if (defvalue == NULL) { defvalue = PyString_FromStringAndSize(NULL, 0); if (defvalue == NULL) return NULL; } else Py_INCREF(defvalue); val.dptr = PyString_AS_STRING(defvalue); val.dsize = PyString_GET_SIZE(defvalue); if (dbm_store(dp->di_dbm, key, val, DBM_INSERT) < 0) { dbm_clearerr(dp->di_dbm); PyErr_SetString(DbmError, "cannot add item to database"); return NULL; } return defvalue; } static PyMethodDef dbm_methods[] = { {"close", (PyCFunction)dbm__close, METH_VARARGS, "close()\nClose the database."}, {"keys", (PyCFunction)dbm_keys, METH_VARARGS, "keys() -> list\nReturn a list of all keys in the database."}, {"has_key", (PyCFunction)dbm_has_key, METH_VARARGS, "has_key(key} -> boolean\nReturn true iff key is in the database."}, {"get", (PyCFunction)dbm_get, METH_VARARGS, "get(key[, default]) -> value\n" "Return the value for key if present, otherwise default."}, {"setdefault", (PyCFunction)dbm_setdefault, METH_VARARGS, "setdefault(key[, default]) -> value\n" "Return the value for key if present, otherwise default. If key\n" "is not in the database, it is inserted with default as the value."}, {NULL, NULL} /* sentinel */ }; static PyObject * dbm_getattr(dbmobject *dp, char *name) { return Py_FindMethod(dbm_methods, (PyObject *)dp, name); } static PyTypeObject Dbmtype = { PyObject_HEAD_INIT(NULL) 0, "dbm.dbm", sizeof(dbmobject), 0, (destructor)dbm_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)dbm_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ &dbm_as_mapping, /*tp_as_mapping*/ }; /* ----------------------------------------------------------------- */ static PyObject * dbmopen(PyObject *self, PyObject *args) { char *name; char *flags = "r"; int iflags; int mode = 0666; if ( !PyArg_ParseTuple(args, "s|si:open", &name, &flags, &mode) ) return NULL; if ( strcmp(flags, "r") == 0 ) iflags = O_RDONLY; else if ( strcmp(flags, "w") == 0 ) iflags = O_RDWR; else if ( strcmp(flags, "rw") == 0 ) /* B/W compat */ iflags = O_RDWR|O_CREAT; else if ( strcmp(flags, "c") == 0 ) iflags = O_RDWR|O_CREAT; else if ( strcmp(flags, "n") == 0 ) iflags = O_RDWR|O_CREAT|O_TRUNC; else { PyErr_SetString(DbmError, "arg 2 to open should be 'r', 'w', 'c', or 'n'"); return NULL; } return newdbmobject(name, iflags, mode); } static PyMethodDef dbmmodule_methods[] = { { "open", (PyCFunction)dbmopen, METH_VARARGS, "open(path[, flag[, mode]]) -> mapping\n" "Return a database object."}, { 0, 0 }, }; PyMODINIT_FUNC initdbm(void) { PyObject *m, *d, *s; Dbmtype.ob_type = &PyType_Type; m = Py_InitModule("dbm", dbmmodule_methods); d = PyModule_GetDict(m); if (DbmError == NULL) DbmError = PyErr_NewException("dbm.error", NULL, NULL); s = PyString_FromString(which_dbm); if (s != NULL) { PyDict_SetItemString(d, "library", s); Py_DECREF(s); } if (DbmError != NULL) PyDict_SetItemString(d, "error", DbmError); } Python-2.3.7/Modules/_curses_panel.c0000644001241000117560000003017007522367001016651 0ustar loewishpifb6/* * Interface to the ncurses panel library * * Original version by Thomas Gellekum */ /* Release Number */ static char *PyCursesVersion = "2.1"; /* Includes */ #include "Python.h" #include "py_curses.h" #include static PyObject *PyCursesError; /* Utility Functions */ /* * Check the return code from a curses function and return None * or raise an exception as appropriate. */ static PyObject * PyCursesCheckERR(int code, char *fname) { if (code != ERR) { Py_INCREF(Py_None); return Py_None; } else { if (fname == NULL) { PyErr_SetString(PyCursesError, catchall_ERR); } else { PyErr_Format(PyCursesError, "%s() returned ERR", fname); } return NULL; } } /***************************************************************************** The Panel Object ******************************************************************************/ /* Definition of the panel object and panel type */ typedef struct { PyObject_HEAD PANEL *pan; PyCursesWindowObject *wo; /* for reference counts */ } PyCursesPanelObject; PyTypeObject PyCursesPanel_Type; #define PyCursesPanel_Check(v) ((v)->ob_type == &PyCursesPanel_Type) /* Some helper functions. The problem is that there's always a window associated with a panel. To ensure that Python's GC doesn't pull this window from under our feet we need to keep track of references to the corresponding window object within Python. We can't use dupwin(oldwin) to keep a copy of the curses WINDOW because the contents of oldwin is copied only once; code like win = newwin(...) pan = win.panel() win.addstr(some_string) pan.window().addstr(other_string) will fail. */ /* We keep a linked list of PyCursesPanelObjects, lop. A list should suffice, I don't expect more than a handful or at most a few dozens of panel objects within a typical program. */ typedef struct _list_of_panels { PyCursesPanelObject *po; struct _list_of_panels *next; } list_of_panels; /* list anchor */ static list_of_panels *lop; /* Insert a new panel object into lop */ static int insert_lop(PyCursesPanelObject *po) { list_of_panels *new; if ((new = (list_of_panels *)malloc(sizeof(list_of_panels))) == NULL) { PyErr_NoMemory(); return -1; } new->po = po; new->next = lop; lop = new; return 0; } /* Remove the panel object from lop */ static void remove_lop(PyCursesPanelObject *po) { list_of_panels *temp, *n; temp = lop; if (temp->po == po) { lop = temp->next; free(temp); return; } while (temp->next->po != po) { if (temp->next == NULL) PyErr_SetString(PyExc_RuntimeError, "remove_lop: can't find Panel Object"); temp = temp->next; } n = temp->next->next; free(temp->next); temp->next = n; return; } /* Return the panel object that corresponds to pan */ static PyCursesPanelObject * find_po(PANEL *pan) { list_of_panels *temp; for (temp = lop; temp->po->pan != pan; temp = temp->next) if (temp->next == NULL) return NULL; /* not found!? */ return temp->po; } /* Function Prototype Macros - They are ugly but very, very useful. ;-) X - function name TYPE - parameter Type ERGSTR - format string for construction of the return value PARSESTR - format string for argument parsing */ #define Panel_NoArgNoReturnFunction(X) \ static PyObject *PyCursesPanel_##X(PyCursesPanelObject *self) \ { return PyCursesCheckERR(X(self->pan), # X); } #define Panel_NoArgTrueFalseFunction(X) \ static PyObject *PyCursesPanel_##X(PyCursesPanelObject *self) \ { \ if (X (self->pan) == FALSE) { Py_INCREF(Py_False); return Py_False; } \ else { Py_INCREF(Py_True); return Py_True; } } #define Panel_TwoArgNoReturnFunction(X, TYPE, PARSESTR) \ static PyObject *PyCursesPanel_##X(PyCursesPanelObject *self, PyObject *args) \ { \ TYPE arg1, arg2; \ if (!PyArg_ParseTuple(args, PARSESTR, &arg1, &arg2)) return NULL; \ return PyCursesCheckERR(X(self->pan, arg1, arg2), # X); } /* ------------- PANEL routines --------------- */ Panel_NoArgNoReturnFunction(bottom_panel) Panel_NoArgNoReturnFunction(hide_panel) Panel_NoArgNoReturnFunction(show_panel) Panel_NoArgNoReturnFunction(top_panel) Panel_NoArgTrueFalseFunction(panel_hidden) Panel_TwoArgNoReturnFunction(move_panel, int, "ii;y,x") /* Allocation and deallocation of Panel Objects */ static PyObject * PyCursesPanel_New(PANEL *pan, PyCursesWindowObject *wo) { PyCursesPanelObject *po; po = PyObject_NEW(PyCursesPanelObject, &PyCursesPanel_Type); if (po == NULL) return NULL; po->pan = pan; po->wo = wo; Py_INCREF(wo); if (insert_lop(po) < 0) { PyObject_DEL(po); return NULL; } return (PyObject *)po; } static void PyCursesPanel_Dealloc(PyCursesPanelObject *po) { (void)del_panel(po->pan); Py_DECREF(po->wo); remove_lop(po); PyObject_DEL(po); } /* panel_above(NULL) returns the bottom panel in the stack. To get this behaviour we use curses.panel.bottom_panel(). */ static PyObject * PyCursesPanel_above(PyCursesPanelObject *self) { PANEL *pan; PyCursesPanelObject *po; pan = panel_above(self->pan); if (pan == NULL) { /* valid output, it means the calling panel is on top of the stack */ Py_INCREF(Py_None); return Py_None; } po = find_po(pan); if (po == NULL) { PyErr_SetString(PyExc_RuntimeError, "panel_above: can't find Panel Object"); return NULL; } Py_INCREF(po); return (PyObject *)po; } /* panel_below(NULL) returns the top panel in the stack. To get this behaviour we use curses.panel.top_panel(). */ static PyObject * PyCursesPanel_below(PyCursesPanelObject *self) { PANEL *pan; PyCursesPanelObject *po; pan = panel_below(self->pan); if (pan == NULL) { /* valid output, it means the calling panel is on the bottom of the stack */ Py_INCREF(Py_None); return Py_None; } po = find_po(pan); if (po == NULL) { PyErr_SetString(PyExc_RuntimeError, "panel_below: can't find Panel Object"); return NULL; } Py_INCREF(po); return (PyObject *)po; } static PyObject * PyCursesPanel_window(PyCursesPanelObject *self) { Py_INCREF(self->wo); return (PyObject *)self->wo; } static PyObject * PyCursesPanel_replace_panel(PyCursesPanelObject *self, PyObject *args) { PyCursesPanelObject *po; PyCursesWindowObject *temp; int rtn; if (PyTuple_Size(args) != 1) { PyErr_SetString(PyExc_TypeError, "replace requires one argument"); return NULL; } if (!PyArg_ParseTuple(args, "O!;window object", &PyCursesWindow_Type, &temp)) return NULL; po = find_po(self->pan); if (po == NULL) { PyErr_SetString(PyExc_RuntimeError, "replace_panel: can't find Panel Object"); return NULL; } rtn = replace_panel(self->pan, temp->win); if (rtn == ERR) { PyErr_SetString(PyCursesError, "replace_panel() returned ERR"); return NULL; } Py_DECREF(po->wo); po->wo = temp; Py_INCREF(po->wo); Py_INCREF(Py_None); return Py_None; } static PyObject * PyCursesPanel_set_panel_userptr(PyCursesPanelObject *self, PyObject *obj) { Py_INCREF(obj); return PyCursesCheckERR(set_panel_userptr(self->pan, (void*)obj), "set_panel_userptr"); } static PyObject * PyCursesPanel_userptr(PyCursesPanelObject *self) { PyObject *obj; PyCursesInitialised; obj = (PyObject *) panel_userptr(self->pan); Py_INCREF(obj); return obj; } /* Module interface */ static PyMethodDef PyCursesPanel_Methods[] = { {"above", (PyCFunction)PyCursesPanel_above, METH_NOARGS}, {"below", (PyCFunction)PyCursesPanel_below, METH_NOARGS}, {"bottom", (PyCFunction)PyCursesPanel_bottom_panel, METH_NOARGS}, {"hidden", (PyCFunction)PyCursesPanel_panel_hidden, METH_NOARGS}, {"hide", (PyCFunction)PyCursesPanel_hide_panel, METH_NOARGS}, {"move", (PyCFunction)PyCursesPanel_move_panel, METH_VARARGS}, {"replace", (PyCFunction)PyCursesPanel_replace_panel, METH_VARARGS}, {"set_userptr", (PyCFunction)PyCursesPanel_set_panel_userptr, METH_O}, {"show", (PyCFunction)PyCursesPanel_show_panel, METH_NOARGS}, {"top", (PyCFunction)PyCursesPanel_top_panel, METH_NOARGS}, {"userptr", (PyCFunction)PyCursesPanel_userptr, METH_NOARGS}, {"window", (PyCFunction)PyCursesPanel_window, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * PyCursesPanel_GetAttr(PyCursesPanelObject *self, char *name) { return Py_FindMethod(PyCursesPanel_Methods, (PyObject *)self, name); } /* -------------------------------------------------------*/ PyTypeObject PyCursesPanel_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "_curses_panel.curses panel", /*tp_name*/ sizeof(PyCursesPanelObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)PyCursesPanel_Dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)PyCursesPanel_GetAttr, /*tp_getattr*/ (setattrfunc)0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; /* Wrapper for panel_above(NULL). This function returns the bottom panel of the stack, so it's renamed to bottom_panel(). panel.above() *requires* a panel object in the first place which may be undesirable. */ static PyObject * PyCurses_bottom_panel(PyObject *self) { PANEL *pan; PyCursesPanelObject *po; PyCursesInitialised; pan = panel_above(NULL); if (pan == NULL) { /* valid output, it means there's no panel at all */ Py_INCREF(Py_None); return Py_None; } po = find_po(pan); if (po == NULL) { PyErr_SetString(PyExc_RuntimeError, "panel_above: can't find Panel Object"); return NULL; } Py_INCREF(po); return (PyObject *)po; } static PyObject * PyCurses_new_panel(PyObject *self, PyObject *args) { PyCursesWindowObject *win; PANEL *pan; if (!PyArg_ParseTuple(args, "O!", &PyCursesWindow_Type, &win)) return NULL; pan = new_panel(win->win); if (pan == NULL) { PyErr_SetString(PyCursesError, catchall_NULL); return NULL; } return (PyObject *)PyCursesPanel_New(pan, win); } /* Wrapper for panel_below(NULL). This function returns the top panel of the stack, so it's renamed to top_panel(). panel.below() *requires* a panel object in the first place which may be undesirable. */ static PyObject * PyCurses_top_panel(PyObject *self) { PANEL *pan; PyCursesPanelObject *po; PyCursesInitialised; pan = panel_below(NULL); if (pan == NULL) { /* valid output, it means there's no panel at all */ Py_INCREF(Py_None); return Py_None; } po = find_po(pan); if (po == NULL) { PyErr_SetString(PyExc_RuntimeError, "panel_below: can't find Panel Object"); return NULL; } Py_INCREF(po); return (PyObject *)po; } static PyObject *PyCurses_update_panels(PyObject *self) { PyCursesInitialised; update_panels(); Py_INCREF(Py_None); return Py_None; } /* List of functions defined in the module */ static PyMethodDef PyCurses_methods[] = { {"bottom_panel", (PyCFunction)PyCurses_bottom_panel, METH_NOARGS}, {"new_panel", (PyCFunction)PyCurses_new_panel, METH_VARARGS}, {"top_panel", (PyCFunction)PyCurses_top_panel, METH_NOARGS}, {"update_panels", (PyCFunction)PyCurses_update_panels, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; /* Initialization function for the module */ PyMODINIT_FUNC init_curses_panel(void) { PyObject *m, *d, *v; /* Initialize object type */ PyCursesPanel_Type.ob_type = &PyType_Type; import_curses(); /* Create the module and add the functions */ m = Py_InitModule("_curses_panel", PyCurses_methods); d = PyModule_GetDict(m); /* For exception _curses_panel.error */ PyCursesError = PyErr_NewException("_curses_panel.error", NULL, NULL); PyDict_SetItemString(d, "error", PyCursesError); /* Make the version available */ v = PyString_FromString(PyCursesVersion); PyDict_SetItemString(d, "version", v); PyDict_SetItemString(d, "__version__", v); Py_DECREF(v); } Python-2.3.7/Modules/posixmodule.c0000644001241000117560000060253410160776152016413 0ustar loewishpifb6 /* POSIX module implementation */ /* This file is also used for Windows NT/MS-Win and OS/2. In that case the module actually calls itself 'nt' or 'os2', not 'posix', and a few functions are either unimplemented or implemented differently. The source assumes that for Windows NT, the macro 'MS_WINDOWS' is defined independent of the compiler used. Different compilers define their own feature test macro, e.g. '__BORLANDC__' or '_MSC_VER'. For OS/2, the compiler independent macro PYOS_OS2 should be defined. On OS/2 the default compiler is assumed to be IBM's VisualAge C++ (VACPP). PYCC_GCC is used as the compiler specific macro for the EMX port of gcc to OS/2. */ /* See also ../Dos/dosmodule.c */ #include "Python.h" #include "structseq.h" #if defined(__VMS) # include #endif /* defined(__VMS) */ PyDoc_STRVAR(posix__doc__, "This module provides access to operating system functionality that is\n\ standardized by the C Standard and the POSIX standard (a thinly\n\ disguised Unix interface). Refer to the library manual and\n\ corresponding Unix manual entries for more information on calls."); #ifndef Py_USING_UNICODE /* This is used in signatures of functions. */ #define Py_UNICODE void #endif #if defined(PYOS_OS2) #define INCL_DOS #define INCL_DOSERRORS #define INCL_DOSPROCESS #define INCL_NOPMAPI #include #if defined(PYCC_GCC) #include #include #include #include #endif #include "osdefs.h" #endif #include #include #ifdef HAVE_SYS_WAIT_H #include /* For WNOHANG */ #endif #ifdef HAVE_SIGNAL_H #include #endif #ifdef HAVE_FCNTL_H #include #endif /* HAVE_FCNTL_H */ #ifdef HAVE_GRP_H #include #endif #ifdef HAVE_SYSEXITS_H #include #endif /* HAVE_SYSEXITS_H */ /* Various compilers have only certain posix functions */ /* XXX Gosh I wish these were all moved into pyconfig.h */ #if defined(PYCC_VACPP) && defined(PYOS_OS2) #include #else #if defined(__WATCOMC__) && !defined(__QNX__) /* Watcom compiler */ #define HAVE_GETCWD 1 #define HAVE_OPENDIR 1 #define HAVE_SYSTEM 1 #if defined(__OS2__) #define HAVE_EXECV 1 #define HAVE_WAIT 1 #endif #include #else #ifdef __BORLANDC__ /* Borland compiler */ #define HAVE_EXECV 1 #define HAVE_GETCWD 1 #define HAVE_OPENDIR 1 #define HAVE_PIPE 1 #define HAVE_POPEN 1 #define HAVE_SYSTEM 1 #define HAVE_WAIT 1 #else #ifdef _MSC_VER /* Microsoft compiler */ #define HAVE_GETCWD 1 #define HAVE_SPAWNV 1 #define HAVE_EXECV 1 #define HAVE_PIPE 1 #define HAVE_POPEN 1 #define HAVE_SYSTEM 1 #define HAVE_CWAIT 1 #define HAVE_FSYNC 1 #define fsync _commit #else #if defined(PYOS_OS2) && defined(PYCC_GCC) || defined(__VMS) /* Everything needed is defined in PC/os2emx/pyconfig.h or vms/pyconfig.h */ #else /* all other compilers */ /* Unix functions that the configure script doesn't check for */ #define HAVE_EXECV 1 #define HAVE_FORK 1 #if defined(__USLC__) && defined(__SCO_VERSION__) /* SCO UDK Compiler */ #define HAVE_FORK1 1 #endif #define HAVE_GETCWD 1 #define HAVE_GETEGID 1 #define HAVE_GETEUID 1 #define HAVE_GETGID 1 #define HAVE_GETPPID 1 #define HAVE_GETUID 1 #define HAVE_KILL 1 #define HAVE_OPENDIR 1 #define HAVE_PIPE 1 #define HAVE_POPEN 1 #define HAVE_SYSTEM 1 #define HAVE_WAIT 1 #define HAVE_TTYNAME 1 #endif /* PYOS_OS2 && PYCC_GCC && __VMS */ #endif /* _MSC_VER */ #endif /* __BORLANDC__ */ #endif /* ! __WATCOMC__ || __QNX__ */ #endif /* ! __IBMC__ */ #ifndef _MSC_VER #if defined(sun) && !defined(__SVR4) /* SunOS 4.1.4 doesn't have prototypes for these: */ extern int rename(const char *, const char *); extern int pclose(FILE *); extern int fclose(FILE *); extern int fsync(int); extern int lstat(const char *, struct stat *); extern int symlink(const char *, const char *); #endif #if defined(__sgi)&&_COMPILER_VERSION>=700 /* declare ctermid_r if compiling with MIPSPro 7.x in ANSI C mode (default) */ extern char *ctermid_r(char *); #endif #ifndef HAVE_UNISTD_H #if defined(PYCC_VACPP) extern int mkdir(char *); #else #if ( defined(__WATCOMC__) || defined(_MSC_VER) ) && !defined(__QNX__) extern int mkdir(const char *); #else extern int mkdir(const char *, mode_t); #endif #endif #if defined(__IBMC__) || defined(__IBMCPP__) extern int chdir(char *); extern int rmdir(char *); #else extern int chdir(const char *); extern int rmdir(const char *); #endif #ifdef __BORLANDC__ extern int chmod(const char *, int); #else extern int chmod(const char *, mode_t); #endif extern int chown(const char *, uid_t, gid_t); extern char *getcwd(char *, int); extern char *strerror(int); extern int link(const char *, const char *); extern int rename(const char *, const char *); extern int stat(const char *, struct stat *); extern int unlink(const char *); extern int pclose(FILE *); #ifdef HAVE_SYMLINK extern int symlink(const char *, const char *); #endif /* HAVE_SYMLINK */ #ifdef HAVE_LSTAT extern int lstat(const char *, struct stat *); #endif /* HAVE_LSTAT */ #endif /* !HAVE_UNISTD_H */ #endif /* !_MSC_VER */ #ifdef HAVE_UTIME_H #include #endif /* HAVE_UTIME_H */ #ifdef HAVE_SYS_UTIME_H #include #define HAVE_UTIME_H /* pretend we do for the rest of this file */ #endif /* HAVE_SYS_UTIME_H */ #ifdef HAVE_SYS_TIMES_H #include #endif /* HAVE_SYS_TIMES_H */ #ifdef HAVE_SYS_PARAM_H #include #endif /* HAVE_SYS_PARAM_H */ #ifdef HAVE_SYS_UTSNAME_H #include #endif /* HAVE_SYS_UTSNAME_H */ #ifdef HAVE_DIRENT_H #include #define NAMLEN(dirent) strlen((dirent)->d_name) #else #if defined(__WATCOMC__) && !defined(__QNX__) #include #define NAMLEN(dirent) strlen((dirent)->d_name) #else #define dirent direct #define NAMLEN(dirent) (dirent)->d_namlen #endif #ifdef HAVE_SYS_NDIR_H #include #endif #ifdef HAVE_SYS_DIR_H #include #endif #ifdef HAVE_NDIR_H #include #endif #endif #ifdef _MSC_VER #include #include #include #include "osdefs.h" #define WIN32_LEAN_AND_MEAN #include #include /* for ShellExecute() */ #define popen _popen #define pclose _pclose #endif /* _MSC_VER */ #if defined(PYCC_VACPP) && defined(PYOS_OS2) #include #endif /* OS2 */ #ifndef MAXPATHLEN #define MAXPATHLEN 1024 #endif /* MAXPATHLEN */ #ifdef UNION_WAIT /* Emulate some macros on systems that have a union instead of macros */ #ifndef WIFEXITED #define WIFEXITED(u_wait) (!(u_wait).w_termsig && !(u_wait).w_coredump) #endif #ifndef WEXITSTATUS #define WEXITSTATUS(u_wait) (WIFEXITED(u_wait)?((u_wait).w_retcode):-1) #endif #ifndef WTERMSIG #define WTERMSIG(u_wait) ((u_wait).w_termsig) #endif #endif /* UNION_WAIT */ /* Don't use the "_r" form if we don't need it (also, won't have a prototype for it, at least on Solaris -- maybe others as well?). */ #if defined(HAVE_CTERMID_R) && defined(WITH_THREAD) #define USE_CTERMID_R #endif #if defined(HAVE_TMPNAM_R) && defined(WITH_THREAD) #define USE_TMPNAM_R #endif /* choose the appropriate stat and fstat functions and return structs */ #undef STAT #if defined(MS_WIN64) || defined(MS_WINDOWS) # define STAT _stati64 # define FSTAT _fstati64 # define STRUCT_STAT struct _stati64 #else # define STAT stat # define FSTAT fstat # define STRUCT_STAT struct stat #endif #if defined(MAJOR_IN_MKDEV) #include #else #if defined(MAJOR_IN_SYSMACROS) #include #endif #if defined(HAVE_MKNOD) && defined(HAVE_SYS_MKDEV_H) #include #endif #endif /* Return a dictionary corresponding to the POSIX environment table */ #ifdef WITH_NEXT_FRAMEWORK /* On Darwin/MacOSX a shared library or framework has no access to ** environ directly, we must obtain it with _NSGetEnviron(). */ #include static char **environ; #elif !defined(_MSC_VER) && ( !defined(__WATCOMC__) || defined(__QNX__) ) extern char **environ; #endif /* !_MSC_VER */ static PyObject * convertenviron(void) { PyObject *d; char **e; d = PyDict_New(); if (d == NULL) return NULL; #ifdef WITH_NEXT_FRAMEWORK if (environ == NULL) environ = *_NSGetEnviron(); #endif if (environ == NULL) return d; /* This part ignores errors */ for (e = environ; *e != NULL; e++) { PyObject *k; PyObject *v; char *p = strchr(*e, '='); if (p == NULL) continue; k = PyString_FromStringAndSize(*e, (int)(p-*e)); if (k == NULL) { PyErr_Clear(); continue; } v = PyString_FromString(p+1); if (v == NULL) { PyErr_Clear(); Py_DECREF(k); continue; } if (PyDict_GetItem(d, k) == NULL) { if (PyDict_SetItem(d, k, v) != 0) PyErr_Clear(); } Py_DECREF(k); Py_DECREF(v); } #if defined(PYOS_OS2) { APIRET rc; char buffer[1024]; /* OS/2 Provides a Documented Max of 1024 Chars */ rc = DosQueryExtLIBPATH(buffer, BEGIN_LIBPATH); if (rc == NO_ERROR) { /* (not a type, envname is NOT 'BEGIN_LIBPATH') */ PyObject *v = PyString_FromString(buffer); PyDict_SetItemString(d, "BEGINLIBPATH", v); Py_DECREF(v); } rc = DosQueryExtLIBPATH(buffer, END_LIBPATH); if (rc == NO_ERROR) { /* (not a typo, envname is NOT 'END_LIBPATH') */ PyObject *v = PyString_FromString(buffer); PyDict_SetItemString(d, "ENDLIBPATH", v); Py_DECREF(v); } } #endif return d; } /* Set a POSIX-specific error from errno, and return NULL */ static PyObject * posix_error(void) { return PyErr_SetFromErrno(PyExc_OSError); } static PyObject * posix_error_with_filename(char* name) { return PyErr_SetFromErrnoWithFilename(PyExc_OSError, name); } #ifdef Py_WIN_WIDE_FILENAMES static PyObject * posix_error_with_unicode_filename(Py_UNICODE* name) { return PyErr_SetFromErrnoWithUnicodeFilename(PyExc_OSError, name); } #endif /* Py_WIN_WIDE_FILENAMES */ static PyObject * posix_error_with_allocated_filename(char* name) { PyObject *rc = PyErr_SetFromErrnoWithFilename(PyExc_OSError, name); PyMem_Free(name); return rc; } #ifdef MS_WINDOWS static PyObject * win32_error(char* function, char* filename) { /* XXX We should pass the function name along in the future. (_winreg.c also wants to pass the function name.) This would however require an additional param to the Windows error object, which is non-trivial. */ errno = GetLastError(); if (filename) return PyErr_SetFromWindowsErrWithFilename(errno, filename); else return PyErr_SetFromWindowsErr(errno); } #ifdef Py_WIN_WIDE_FILENAMES static PyObject * win32_error_unicode(char* function, Py_UNICODE* filename) { /* XXX - see win32_error for comments on 'function' */ errno = GetLastError(); if (filename) return PyErr_SetFromWindowsErrWithUnicodeFilename(errno, filename); else return PyErr_SetFromWindowsErr(errno); } static PyObject *_PyUnicode_FromFileSystemEncodedObject(register PyObject *obj) { /* XXX Perhaps we should make this API an alias of PyObject_Unicode() instead ?! */ if (PyUnicode_CheckExact(obj)) { Py_INCREF(obj); return obj; } if (PyUnicode_Check(obj)) { /* For a Unicode subtype that's not a Unicode object, return a true Unicode object with the same data. */ return PyUnicode_FromUnicode(PyUnicode_AS_UNICODE(obj), PyUnicode_GET_SIZE(obj)); } return PyUnicode_FromEncodedObject(obj, Py_FileSystemDefaultEncoding, "strict"); } #endif /* Py_WIN_WIDE_FILENAMES */ #endif #if defined(PYOS_OS2) /********************************************************************** * Helper Function to Trim and Format OS/2 Messages **********************************************************************/ static void os2_formatmsg(char *msgbuf, int msglen, char *reason) { msgbuf[msglen] = '\0'; /* OS/2 Doesn't Guarantee a Terminator */ if (strlen(msgbuf) > 0) { /* If Non-Empty Msg, Trim CRLF */ char *lastc = &msgbuf[ strlen(msgbuf)-1 ]; while (lastc > msgbuf && isspace(*lastc)) *lastc-- = '\0'; /* Trim Trailing Whitespace (CRLF) */ } /* Add Optional Reason Text */ if (reason) { strcat(msgbuf, " : "); strcat(msgbuf, reason); } } /********************************************************************** * Decode an OS/2 Operating System Error Code * * A convenience function to lookup an OS/2 error code and return a * text message we can use to raise a Python exception. * * Notes: * The messages for errors returned from the OS/2 kernel reside in * the file OSO001.MSG in the \OS2 directory hierarchy. * **********************************************************************/ static char * os2_strerror(char *msgbuf, int msgbuflen, int errorcode, char *reason) { APIRET rc; ULONG msglen; /* Retrieve Kernel-Related Error Message from OSO001.MSG File */ Py_BEGIN_ALLOW_THREADS rc = DosGetMessage(NULL, 0, msgbuf, msgbuflen, errorcode, "oso001.msg", &msglen); Py_END_ALLOW_THREADS if (rc == NO_ERROR) os2_formatmsg(msgbuf, msglen, reason); else PyOS_snprintf(msgbuf, msgbuflen, "unknown OS error #%d", errorcode); return msgbuf; } /* Set an OS/2-specific error and return NULL. OS/2 kernel errors are not in a global variable e.g. 'errno' nor are they congruent with posix error numbers. */ static PyObject * os2_error(int code) { char text[1024]; PyObject *v; os2_strerror(text, sizeof(text), code, ""); v = Py_BuildValue("(is)", code, text); if (v != NULL) { PyErr_SetObject(PyExc_OSError, v); Py_DECREF(v); } return NULL; /* Signal to Python that an Exception is Pending */ } #endif /* OS2 */ /* POSIX generic methods */ static PyObject * posix_fildes(PyObject *fdobj, int (*func)(int)) { int fd; int res; fd = PyObject_AsFileDescriptor(fdobj); if (fd < 0) return NULL; Py_BEGIN_ALLOW_THREADS res = (*func)(fd); Py_END_ALLOW_THREADS if (res < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #ifdef Py_WIN_WIDE_FILENAMES static int unicode_file_names(void) { static int canusewide = -1; if (canusewide == -1) { /* As per doc for ::GetVersion(), this is the correct test for the Windows NT family. */ canusewide = (GetVersion() < 0x80000000) ? 1 : 0; } return canusewide; } #endif static PyObject * posix_1str(PyObject *args, char *format, int (*func)(const char*), char *wformat, int (*wfunc)(const Py_UNICODE*)) { char *path1 = NULL; int res; #ifdef Py_WIN_WIDE_FILENAMES if (unicode_file_names()) { PyUnicodeObject *po; if (PyArg_ParseTuple(args, wformat, &po)) { Py_BEGIN_ALLOW_THREADS /* PyUnicode_AS_UNICODE OK without thread lock as it is a simple dereference. */ res = (*wfunc)(PyUnicode_AS_UNICODE(po)); Py_END_ALLOW_THREADS if (res < 0) return posix_error_with_unicode_filename(PyUnicode_AS_UNICODE(po)); Py_INCREF(Py_None); return Py_None; } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #else /* Platforms that don't support Unicode filenames shouldn't be passing these extra params */ assert(wformat==NULL && wfunc == NULL); #endif if (!PyArg_ParseTuple(args, format, Py_FileSystemDefaultEncoding, &path1)) return NULL; Py_BEGIN_ALLOW_THREADS res = (*func)(path1); Py_END_ALLOW_THREADS if (res < 0) return posix_error_with_allocated_filename(path1); PyMem_Free(path1); Py_INCREF(Py_None); return Py_None; } static PyObject * posix_2str(PyObject *args, char *format, int (*func)(const char *, const char *), char *wformat, int (*wfunc)(const Py_UNICODE *, const Py_UNICODE *)) { char *path1 = NULL, *path2 = NULL; int res; #ifdef Py_WIN_WIDE_FILENAMES if (unicode_file_names()) { PyObject *po1; PyObject *po2; if (PyArg_ParseTuple(args, wformat, &po1, &po2)) { if (PyUnicode_Check(po1) || PyUnicode_Check(po2)) { PyObject *wpath1; PyObject *wpath2; wpath1 = _PyUnicode_FromFileSystemEncodedObject(po1); wpath2 = _PyUnicode_FromFileSystemEncodedObject(po2); if (!wpath1 || !wpath2) { Py_XDECREF(wpath1); Py_XDECREF(wpath2); return NULL; } Py_BEGIN_ALLOW_THREADS /* PyUnicode_AS_UNICODE OK without thread lock as it is a simple dereference. */ res = (*wfunc)(PyUnicode_AS_UNICODE(wpath1), PyUnicode_AS_UNICODE(wpath2)); Py_END_ALLOW_THREADS Py_XDECREF(wpath1); Py_XDECREF(wpath2); if (res != 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } /* Else flow through as neither is Unicode. */ } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #else /* Platforms that don't support Unicode filenames shouldn't be passing these extra params */ assert(wformat==NULL && wfunc == NULL); #endif if (!PyArg_ParseTuple(args, format, Py_FileSystemDefaultEncoding, &path1, Py_FileSystemDefaultEncoding, &path2)) return NULL; Py_BEGIN_ALLOW_THREADS res = (*func)(path1, path2); Py_END_ALLOW_THREADS PyMem_Free(path1); PyMem_Free(path2); if (res != 0) /* XXX how to report both path1 and path2??? */ return posix_error(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(stat_result__doc__, "stat_result: Result from stat or lstat.\n\n\ This object may be accessed either as a tuple of\n\ (mode, ino, dev, nlink, uid, gid, size, atime, mtime, ctime)\n\ or via the attributes st_mode, st_ino, st_dev, st_nlink, st_uid, and so on.\n\ \n\ Posix/windows: If your platform supports st_blksize, st_blocks, or st_rdev,\n\ they are available as attributes only.\n\ \n\ See os.stat for more information."); static PyStructSequence_Field stat_result_fields[] = { {"st_mode", "protection bits"}, {"st_ino", "inode"}, {"st_dev", "device"}, {"st_nlink", "number of hard links"}, {"st_uid", "user ID of owner"}, {"st_gid", "group ID of owner"}, {"st_size", "total size, in bytes"}, /* The NULL is replaced with PyStructSequence_UnnamedField later. */ {NULL, "integer time of last access"}, {NULL, "integer time of last modification"}, {NULL, "integer time of last change"}, {"st_atime", "time of last access"}, {"st_mtime", "time of last modification"}, {"st_ctime", "time of last change"}, #ifdef HAVE_STRUCT_STAT_ST_BLKSIZE {"st_blksize", "blocksize for filesystem I/O"}, #endif #ifdef HAVE_STRUCT_STAT_ST_BLOCKS {"st_blocks", "number of blocks allocated"}, #endif #ifdef HAVE_STRUCT_STAT_ST_RDEV {"st_rdev", "device type (if inode device)"}, #endif {0} }; #ifdef HAVE_STRUCT_STAT_ST_BLKSIZE #define ST_BLKSIZE_IDX 13 #else #define ST_BLKSIZE_IDX 12 #endif #ifdef HAVE_STRUCT_STAT_ST_BLOCKS #define ST_BLOCKS_IDX (ST_BLKSIZE_IDX+1) #else #define ST_BLOCKS_IDX ST_BLKSIZE_IDX #endif #ifdef HAVE_STRUCT_STAT_ST_RDEV #define ST_RDEV_IDX (ST_BLOCKS_IDX+1) #else #define ST_RDEV_IDX ST_BLOCKS_IDX #endif static PyStructSequence_Desc stat_result_desc = { "stat_result", /* name */ stat_result__doc__, /* doc */ stat_result_fields, 10 }; PyDoc_STRVAR(statvfs_result__doc__, "statvfs_result: Result from statvfs or fstatvfs.\n\n\ This object may be accessed either as a tuple of\n\ (bsize, frsize, blocks, bfree, bavail, files, ffree, favail, flag, namemax),\n\ or via the attributes f_bsize, f_frsize, f_blocks, f_bfree, and so on.\n\ \n\ See os.statvfs for more information."); static PyStructSequence_Field statvfs_result_fields[] = { {"f_bsize", }, {"f_frsize", }, {"f_blocks", }, {"f_bfree", }, {"f_bavail", }, {"f_files", }, {"f_ffree", }, {"f_favail", }, {"f_flag", }, {"f_namemax",}, {0} }; static PyStructSequence_Desc statvfs_result_desc = { "statvfs_result", /* name */ statvfs_result__doc__, /* doc */ statvfs_result_fields, 10 }; static PyTypeObject StatResultType; static PyTypeObject StatVFSResultType; static newfunc structseq_new; static PyObject * statresult_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyStructSequence *result; int i; result = (PyStructSequence*)structseq_new(type, args, kwds); if (!result) return NULL; /* If we have been initialized from a tuple, st_?time might be set to None. Initialize it from the int slots. */ for (i = 7; i <= 9; i++) { if (result->ob_item[i+3] == Py_None) { Py_DECREF(Py_None); Py_INCREF(result->ob_item[i]); result->ob_item[i+3] = result->ob_item[i]; } } return (PyObject*)result; } /* If true, st_?time is float. */ static int _stat_float_times = 0; PyDoc_STRVAR(stat_float_times__doc__, "stat_float_times([newval]) -> oldval\n\n\ Determine whether os.[lf]stat represents time stamps as float objects.\n\ If newval is True, future calls to stat() return floats, if it is False,\n\ future calls return ints. \n\ If newval is omitted, return the current setting.\n"); static PyObject* stat_float_times(PyObject* self, PyObject *args) { int newval = -1; if (!PyArg_ParseTuple(args, "|i:stat_float_times", &newval)) return NULL; if (newval == -1) /* Return old value */ return PyBool_FromLong(_stat_float_times); _stat_float_times = newval; Py_INCREF(Py_None); return Py_None; } static void fill_time(PyObject *v, int index, time_t sec, unsigned long nsec) { PyObject *fval,*ival; #if SIZEOF_TIME_T > SIZEOF_LONG ival = PyLong_FromLongLong((PY_LONG_LONG)sec); #else ival = PyInt_FromLong((long)sec); #endif if (_stat_float_times) { fval = PyFloat_FromDouble(sec + 1e-9*nsec); } else { fval = ival; Py_INCREF(fval); } PyStructSequence_SET_ITEM(v, index, ival); PyStructSequence_SET_ITEM(v, index+3, fval); } /* pack a system stat C structure into the Python stat tuple (used by posix_stat() and posix_fstat()) */ static PyObject* _pystat_fromstructstat(STRUCT_STAT st) { unsigned long ansec, mnsec, cnsec; PyObject *v = PyStructSequence_New(&StatResultType); if (v == NULL) return NULL; PyStructSequence_SET_ITEM(v, 0, PyInt_FromLong((long)st.st_mode)); #ifdef HAVE_LARGEFILE_SUPPORT PyStructSequence_SET_ITEM(v, 1, PyLong_FromLongLong((PY_LONG_LONG)st.st_ino)); #else PyStructSequence_SET_ITEM(v, 1, PyInt_FromLong((long)st.st_ino)); #endif #if defined(HAVE_LONG_LONG) && !defined(MS_WINDOWS) PyStructSequence_SET_ITEM(v, 2, PyLong_FromLongLong((PY_LONG_LONG)st.st_dev)); #else PyStructSequence_SET_ITEM(v, 2, PyInt_FromLong((long)st.st_dev)); #endif PyStructSequence_SET_ITEM(v, 3, PyInt_FromLong((long)st.st_nlink)); PyStructSequence_SET_ITEM(v, 4, PyInt_FromLong((long)st.st_uid)); PyStructSequence_SET_ITEM(v, 5, PyInt_FromLong((long)st.st_gid)); #ifdef HAVE_LARGEFILE_SUPPORT PyStructSequence_SET_ITEM(v, 6, PyLong_FromLongLong((PY_LONG_LONG)st.st_size)); #else PyStructSequence_SET_ITEM(v, 6, PyInt_FromLong(st.st_size)); #endif #ifdef HAVE_STAT_TV_NSEC ansec = st.st_atim.tv_nsec; mnsec = st.st_mtim.tv_nsec; cnsec = st.st_ctim.tv_nsec; #else ansec = mnsec = cnsec = 0; #endif fill_time(v, 7, st.st_atime, ansec); fill_time(v, 8, st.st_mtime, mnsec); fill_time(v, 9, st.st_ctime, cnsec); #ifdef HAVE_STRUCT_STAT_ST_BLKSIZE PyStructSequence_SET_ITEM(v, ST_BLKSIZE_IDX, PyInt_FromLong((long)st.st_blksize)); #endif #ifdef HAVE_STRUCT_STAT_ST_BLOCKS PyStructSequence_SET_ITEM(v, ST_BLOCKS_IDX, PyInt_FromLong((long)st.st_blocks)); #endif #ifdef HAVE_STRUCT_STAT_ST_RDEV PyStructSequence_SET_ITEM(v, ST_RDEV_IDX, PyInt_FromLong((long)st.st_rdev)); #endif if (PyErr_Occurred()) { Py_DECREF(v); return NULL; } return v; } #ifdef MS_WINDOWS /* IsUNCRoot -- test whether the supplied path is of the form \\SERVER\SHARE\, where / can be used in place of \ and the trailing slash is optional. Both SERVER and SHARE must have at least one character. */ #define ISSLASHA(c) ((c) == '\\' || (c) == '/') #define ISSLASHW(c) ((c) == L'\\' || (c) == L'/') #define ARRAYSIZE(a) (sizeof(a) / sizeof(a[0])) static BOOL IsUNCRootA(char *path, int pathlen) { #define ISSLASH ISSLASHA int i, share; if (pathlen < 5 || !ISSLASH(path[0]) || !ISSLASH(path[1])) /* minimum UNCRoot is \\x\y */ return FALSE; for (i = 2; i < pathlen ; i++) if (ISSLASH(path[i])) break; if (i == 2 || i == pathlen) /* do not allow \\\SHARE or \\SERVER */ return FALSE; share = i+1; for (i = share; i < pathlen; i++) if (ISSLASH(path[i])) break; return (i != share && (i == pathlen || i == pathlen-1)); #undef ISSLASH } #ifdef Py_WIN_WIDE_FILENAMES static BOOL IsUNCRootW(Py_UNICODE *path, int pathlen) { #define ISSLASH ISSLASHW int i, share; if (pathlen < 5 || !ISSLASH(path[0]) || !ISSLASH(path[1])) /* minimum UNCRoot is \\x\y */ return FALSE; for (i = 2; i < pathlen ; i++) if (ISSLASH(path[i])) break; if (i == 2 || i == pathlen) /* do not allow \\\SHARE or \\SERVER */ return FALSE; share = i+1; for (i = share; i < pathlen; i++) if (ISSLASH(path[i])) break; return (i != share && (i == pathlen || i == pathlen-1)); #undef ISSLASH } #endif /* Py_WIN_WIDE_FILENAMES */ #endif /* MS_WINDOWS */ static PyObject * posix_do_stat(PyObject *self, PyObject *args, char *format, #ifdef __VMS int (*statfunc)(const char *, STRUCT_STAT *, ...), #else int (*statfunc)(const char *, STRUCT_STAT *), #endif char *wformat, int (*wstatfunc)(const Py_UNICODE *, STRUCT_STAT *)) { STRUCT_STAT st; char *path = NULL; /* pass this to stat; do not free() it */ char *pathfree = NULL; /* this memory must be free'd */ int res; #ifdef MS_WINDOWS int pathlen; char pathcopy[MAX_PATH]; #endif /* MS_WINDOWS */ #ifdef Py_WIN_WIDE_FILENAMES /* If on wide-character-capable OS see if argument is Unicode and if so use wide API. */ if (unicode_file_names()) { PyUnicodeObject *po; if (PyArg_ParseTuple(args, wformat, &po)) { Py_UNICODE wpath[MAX_PATH+1]; pathlen = wcslen(PyUnicode_AS_UNICODE(po)); /* the library call can blow up if the file name is too long! */ if (pathlen > MAX_PATH) { errno = ENAMETOOLONG; return posix_error(); } wcscpy(wpath, PyUnicode_AS_UNICODE(po)); /* Remove trailing slash or backslash, unless it's the current drive root (/ or \) or a specific drive's root (like c:\ or c:/). */ if (pathlen > 0) { if (ISSLASHW(wpath[pathlen-1])) { /* It does end with a slash -- exempt the root drive cases. */ if (pathlen == 1 || (pathlen == 3 && wpath[1] == L':') || IsUNCRootW(wpath, pathlen)) /* leave it alone */; else { /* nuke the trailing backslash */ wpath[pathlen-1] = L'\0'; } } else if (ISSLASHW(wpath[1]) && pathlen < ARRAYSIZE(wpath)-1 && IsUNCRootW(wpath, pathlen)) { /* UNC root w/o trailing slash: add one when there's room */ wpath[pathlen++] = L'\\'; wpath[pathlen] = L'\0'; } } Py_BEGIN_ALLOW_THREADS /* PyUnicode_AS_UNICODE result OK without thread lock as it is a simple dereference. */ res = wstatfunc(wpath, &st); Py_END_ALLOW_THREADS if (res != 0) return posix_error_with_unicode_filename(wpath); return _pystat_fromstructstat(st); } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #endif if (!PyArg_ParseTuple(args, format, Py_FileSystemDefaultEncoding, &path)) return NULL; pathfree = path; #ifdef MS_WINDOWS pathlen = strlen(path); /* the library call can blow up if the file name is too long! */ if (pathlen > MAX_PATH) { PyMem_Free(pathfree); errno = ENAMETOOLONG; return posix_error(); } /* Remove trailing slash or backslash, unless it's the current drive root (/ or \) or a specific drive's root (like c:\ or c:/). */ if (pathlen > 0) { if (ISSLASHA(path[pathlen-1])) { /* It does end with a slash -- exempt the root drive cases. */ if (pathlen == 1 || (pathlen == 3 && path[1] == ':') || IsUNCRootA(path, pathlen)) /* leave it alone */; else { /* nuke the trailing backslash */ strncpy(pathcopy, path, pathlen); pathcopy[pathlen-1] = '\0'; path = pathcopy; } } else if (ISSLASHA(path[1]) && pathlen < ARRAYSIZE(pathcopy)-1 && IsUNCRootA(path, pathlen)) { /* UNC root w/o trailing slash: add one when there's room */ strncpy(pathcopy, path, pathlen); pathcopy[pathlen++] = '\\'; pathcopy[pathlen] = '\0'; path = pathcopy; } } #endif /* MS_WINDOWS */ Py_BEGIN_ALLOW_THREADS res = (*statfunc)(path, &st); Py_END_ALLOW_THREADS if (res != 0) return posix_error_with_allocated_filename(pathfree); PyMem_Free(pathfree); return _pystat_fromstructstat(st); } /* POSIX methods */ PyDoc_STRVAR(posix_access__doc__, "access(path, mode) -> 1 if granted, 0 otherwise\n\n\ Use the real uid/gid to test for access to a path. Note that most\n\ operations will use the effective uid/gid, therefore this routine can\n\ be used in a suid/sgid environment to test if the invoking user has the\n\ specified access to the path. The mode argument can be F_OK to test\n\ existence, or the inclusive-OR of R_OK, W_OK, and X_OK."); static PyObject * posix_access(PyObject *self, PyObject *args) { char *path; int mode; int res; if (!PyArg_ParseTuple(args, "si:access", &path, &mode)) return NULL; Py_BEGIN_ALLOW_THREADS res = access(path, mode); Py_END_ALLOW_THREADS return(PyBool_FromLong(res == 0)); } #ifndef F_OK #define F_OK 0 #endif #ifndef R_OK #define R_OK 4 #endif #ifndef W_OK #define W_OK 2 #endif #ifndef X_OK #define X_OK 1 #endif #ifdef HAVE_TTYNAME PyDoc_STRVAR(posix_ttyname__doc__, "ttyname(fd) -> string\n\n\ Return the name of the terminal device connected to 'fd'."); static PyObject * posix_ttyname(PyObject *self, PyObject *args) { int id; char *ret; if (!PyArg_ParseTuple(args, "i:ttyname", &id)) return NULL; #if defined(__VMS) /* file descriptor 0 only, the default input device (stdin) */ if (id == 0) { ret = ttyname(); } else { ret = NULL; } #else ret = ttyname(id); #endif if (ret == NULL) return(posix_error()); return(PyString_FromString(ret)); } #endif #ifdef HAVE_CTERMID PyDoc_STRVAR(posix_ctermid__doc__, "ctermid() -> string\n\n\ Return the name of the controlling terminal for this process."); static PyObject * posix_ctermid(PyObject *self, PyObject *noargs) { char *ret; char buffer[L_ctermid]; #ifdef USE_CTERMID_R ret = ctermid_r(buffer); #else ret = ctermid(buffer); #endif if (ret == NULL) return(posix_error()); return(PyString_FromString(buffer)); } #endif PyDoc_STRVAR(posix_chdir__doc__, "chdir(path)\n\n\ Change the current working directory to the specified path."); static PyObject * posix_chdir(PyObject *self, PyObject *args) { #ifdef MS_WINDOWS return posix_1str(args, "et:chdir", chdir, "U:chdir", _wchdir); #elif defined(PYOS_OS2) && defined(PYCC_GCC) return posix_1str(args, "et:chdir", _chdir2, NULL, NULL); #elif defined(__VMS) return posix_1str(args, "et:chdir", (int (*)(const char *))chdir, NULL, NULL); #else return posix_1str(args, "et:chdir", chdir, NULL, NULL); #endif } #ifdef HAVE_FCHDIR PyDoc_STRVAR(posix_fchdir__doc__, "fchdir(fildes)\n\n\ Change to the directory of the given file descriptor. fildes must be\n\ opened on a directory, not a file."); static PyObject * posix_fchdir(PyObject *self, PyObject *fdobj) { return posix_fildes(fdobj, fchdir); } #endif /* HAVE_FCHDIR */ PyDoc_STRVAR(posix_chmod__doc__, "chmod(path, mode)\n\n\ Change the access permissions of a file."); static PyObject * posix_chmod(PyObject *self, PyObject *args) { char *path = NULL; int i; int res; #ifdef Py_WIN_WIDE_FILENAMES if (unicode_file_names()) { PyUnicodeObject *po; if (PyArg_ParseTuple(args, "Ui|:chmod", &po, &i)) { Py_BEGIN_ALLOW_THREADS res = _wchmod(PyUnicode_AS_UNICODE(po), i); Py_END_ALLOW_THREADS if (res < 0) return posix_error_with_unicode_filename( PyUnicode_AS_UNICODE(po)); Py_INCREF(Py_None); return Py_None; } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #endif /* Py_WIN_WIDE_FILENAMES */ if (!PyArg_ParseTuple(args, "eti:chmod", Py_FileSystemDefaultEncoding, &path, &i)) return NULL; Py_BEGIN_ALLOW_THREADS res = chmod(path, i); Py_END_ALLOW_THREADS if (res < 0) return posix_error_with_allocated_filename(path); PyMem_Free(path); Py_INCREF(Py_None); return Py_None; } #ifdef HAVE_CHROOT PyDoc_STRVAR(posix_chroot__doc__, "chroot(path)\n\n\ Change root directory to path."); static PyObject * posix_chroot(PyObject *self, PyObject *args) { return posix_1str(args, "et:chroot", chroot, NULL, NULL); } #endif #ifdef HAVE_FSYNC PyDoc_STRVAR(posix_fsync__doc__, "fsync(fildes)\n\n\ force write of file with filedescriptor to disk."); static PyObject * posix_fsync(PyObject *self, PyObject *fdobj) { return posix_fildes(fdobj, fsync); } #endif /* HAVE_FSYNC */ #ifdef HAVE_FDATASYNC #ifdef __hpux extern int fdatasync(int); /* On HP-UX, in libc but not in unistd.h */ #endif PyDoc_STRVAR(posix_fdatasync__doc__, "fdatasync(fildes)\n\n\ force write of file with filedescriptor to disk.\n\ does not force update of metadata."); static PyObject * posix_fdatasync(PyObject *self, PyObject *fdobj) { return posix_fildes(fdobj, fdatasync); } #endif /* HAVE_FDATASYNC */ #ifdef HAVE_CHOWN PyDoc_STRVAR(posix_chown__doc__, "chown(path, uid, gid)\n\n\ Change the owner and group id of path to the numeric uid and gid."); static PyObject * posix_chown(PyObject *self, PyObject *args) { char *path = NULL; int uid, gid; int res; if (!PyArg_ParseTuple(args, "etii:chown", Py_FileSystemDefaultEncoding, &path, &uid, &gid)) return NULL; Py_BEGIN_ALLOW_THREADS res = chown(path, (uid_t) uid, (gid_t) gid); Py_END_ALLOW_THREADS if (res < 0) return posix_error_with_allocated_filename(path); PyMem_Free(path); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_CHOWN */ #ifdef HAVE_LCHOWN PyDoc_STRVAR(posix_lchown__doc__, "lchown(path, uid, gid)\n\n\ Change the owner and group id of path to the numeric uid and gid.\n\ This function will not follow symbolic links."); static PyObject * posix_lchown(PyObject *self, PyObject *args) { char *path = NULL; int uid, gid; int res; if (!PyArg_ParseTuple(args, "etii:lchown", Py_FileSystemDefaultEncoding, &path, &uid, &gid)) return NULL; Py_BEGIN_ALLOW_THREADS res = lchown(path, (uid_t) uid, (gid_t) gid); Py_END_ALLOW_THREADS if (res < 0) return posix_error_with_allocated_filename(path); PyMem_Free(path); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_LCHOWN */ #ifdef HAVE_GETCWD PyDoc_STRVAR(posix_getcwd__doc__, "getcwd() -> path\n\n\ Return a string representing the current working directory."); static PyObject * posix_getcwd(PyObject *self, PyObject *noargs) { char buf[1026]; char *res; Py_BEGIN_ALLOW_THREADS #if defined(PYOS_OS2) && defined(PYCC_GCC) res = _getcwd2(buf, sizeof buf); #else res = getcwd(buf, sizeof buf); #endif Py_END_ALLOW_THREADS if (res == NULL) return posix_error(); return PyString_FromString(buf); } #ifdef Py_USING_UNICODE PyDoc_STRVAR(posix_getcwdu__doc__, "getcwdu() -> path\n\n\ Return a unicode string representing the current working directory."); static PyObject * posix_getcwdu(PyObject *self, PyObject *noargs) { char buf[1026]; char *res; #ifdef Py_WIN_WIDE_FILENAMES if (unicode_file_names()) { wchar_t *wres; wchar_t wbuf[1026]; Py_BEGIN_ALLOW_THREADS wres = _wgetcwd(wbuf, sizeof wbuf/ sizeof wbuf[0]); Py_END_ALLOW_THREADS if (wres == NULL) return posix_error(); return PyUnicode_FromWideChar(wbuf, wcslen(wbuf)); } #endif Py_BEGIN_ALLOW_THREADS #if defined(PYOS_OS2) && defined(PYCC_GCC) res = _getcwd2(buf, sizeof buf); #else res = getcwd(buf, sizeof buf); #endif Py_END_ALLOW_THREADS if (res == NULL) return posix_error(); return PyUnicode_Decode(buf, strlen(buf), Py_FileSystemDefaultEncoding,"strict"); } #endif #endif #ifdef HAVE_LINK PyDoc_STRVAR(posix_link__doc__, "link(src, dst)\n\n\ Create a hard link to a file."); static PyObject * posix_link(PyObject *self, PyObject *args) { return posix_2str(args, "etet:link", link, NULL, NULL); } #endif /* HAVE_LINK */ PyDoc_STRVAR(posix_listdir__doc__, "listdir(path) -> list_of_strings\n\n\ Return a list containing the names of the entries in the directory.\n\ \n\ path: path of directory to list\n\ \n\ The list is in arbitrary order. It does not include the special\n\ entries '.' and '..' even if they are present in the directory."); static PyObject * posix_listdir(PyObject *self, PyObject *args) { /* XXX Should redo this putting the (now four) versions of opendir in separate files instead of having them all here... */ #if defined(MS_WINDOWS) && !defined(HAVE_OPENDIR) PyObject *d, *v; HANDLE hFindFile; WIN32_FIND_DATA FileData; /* MAX_PATH characters could mean a bigger encoded string */ char namebuf[MAX_PATH*2+5]; char *bufptr = namebuf; int len = sizeof(namebuf)/sizeof(namebuf[0]); #ifdef Py_WIN_WIDE_FILENAMES /* If on wide-character-capable OS see if argument is Unicode and if so use wide API. */ if (unicode_file_names()) { PyUnicodeObject *po; if (PyArg_ParseTuple(args, "U:listdir", &po)) { WIN32_FIND_DATAW wFileData; Py_UNICODE wnamebuf[MAX_PATH*2+5]; Py_UNICODE wch; wcsncpy(wnamebuf, PyUnicode_AS_UNICODE(po), MAX_PATH); wnamebuf[MAX_PATH] = L'\0'; len = wcslen(wnamebuf); wch = (len > 0) ? wnamebuf[len-1] : L'\0'; if (wch != L'/' && wch != L'\\' && wch != L':') wnamebuf[len++] = L'/'; wcscpy(wnamebuf + len, L"*.*"); if ((d = PyList_New(0)) == NULL) return NULL; hFindFile = FindFirstFileW(wnamebuf, &wFileData); if (hFindFile == INVALID_HANDLE_VALUE) { errno = GetLastError(); if (errno == ERROR_FILE_NOT_FOUND) { return d; } Py_DECREF(d); return win32_error_unicode("FindFirstFileW", wnamebuf); } do { if (wFileData.cFileName[0] == L'.' && (wFileData.cFileName[1] == L'\0' || wFileData.cFileName[1] == L'.' && wFileData.cFileName[2] == L'\0')) continue; v = PyUnicode_FromUnicode(wFileData.cFileName, wcslen(wFileData.cFileName)); if (v == NULL) { Py_DECREF(d); d = NULL; break; } if (PyList_Append(d, v) != 0) { Py_DECREF(v); Py_DECREF(d); d = NULL; break; } Py_DECREF(v); } while (FindNextFileW(hFindFile, &wFileData) == TRUE); if (FindClose(hFindFile) == FALSE) { Py_DECREF(d); return win32_error_unicode("FindClose", wnamebuf); } return d; } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #endif if (!PyArg_ParseTuple(args, "et#:listdir", Py_FileSystemDefaultEncoding, &bufptr, &len)) return NULL; if (len > 0) { char ch = namebuf[len-1]; if (ch != SEP && ch != ALTSEP && ch != ':') namebuf[len++] = '/'; } strcpy(namebuf + len, "*.*"); if ((d = PyList_New(0)) == NULL) return NULL; hFindFile = FindFirstFile(namebuf, &FileData); if (hFindFile == INVALID_HANDLE_VALUE) { errno = GetLastError(); if (errno == ERROR_FILE_NOT_FOUND) return d; Py_DECREF(d); return win32_error("FindFirstFile", namebuf); } do { if (FileData.cFileName[0] == '.' && (FileData.cFileName[1] == '\0' || FileData.cFileName[1] == '.' && FileData.cFileName[2] == '\0')) continue; v = PyString_FromString(FileData.cFileName); if (v == NULL) { Py_DECREF(d); d = NULL; break; } if (PyList_Append(d, v) != 0) { Py_DECREF(v); Py_DECREF(d); d = NULL; break; } Py_DECREF(v); } while (FindNextFile(hFindFile, &FileData) == TRUE); if (FindClose(hFindFile) == FALSE) { Py_DECREF(d); return win32_error("FindClose", namebuf); } return d; #elif defined(PYOS_OS2) #ifndef MAX_PATH #define MAX_PATH CCHMAXPATH #endif char *name, *pt; int len; PyObject *d, *v; char namebuf[MAX_PATH+5]; HDIR hdir = 1; ULONG srchcnt = 1; FILEFINDBUF3 ep; APIRET rc; if (!PyArg_ParseTuple(args, "t#:listdir", &name, &len)) return NULL; if (len >= MAX_PATH) { PyErr_SetString(PyExc_ValueError, "path too long"); return NULL; } strcpy(namebuf, name); for (pt = namebuf; *pt; pt++) if (*pt == ALTSEP) *pt = SEP; if (namebuf[len-1] != SEP) namebuf[len++] = SEP; strcpy(namebuf + len, "*.*"); if ((d = PyList_New(0)) == NULL) return NULL; rc = DosFindFirst(namebuf, /* Wildcard Pattern to Match */ &hdir, /* Handle to Use While Search Directory */ FILE_READONLY | FILE_HIDDEN | FILE_SYSTEM | FILE_DIRECTORY, &ep, sizeof(ep), /* Structure to Receive Directory Entry */ &srchcnt, /* Max and Actual Count of Entries Per Iteration */ FIL_STANDARD); /* Format of Entry (EAs or Not) */ if (rc != NO_ERROR) { errno = ENOENT; return posix_error_with_filename(name); } if (srchcnt > 0) { /* If Directory is NOT Totally Empty, */ do { if (ep.achName[0] == '.' && (ep.achName[1] == '\0' || (ep.achName[1] == '.' && ep.achName[2] == '\0'))) continue; /* Skip Over "." and ".." Names */ strcpy(namebuf, ep.achName); /* Leave Case of Name Alone -- In Native Form */ /* (Removed Forced Lowercasing Code) */ v = PyString_FromString(namebuf); if (v == NULL) { Py_DECREF(d); d = NULL; break; } if (PyList_Append(d, v) != 0) { Py_DECREF(v); Py_DECREF(d); d = NULL; break; } Py_DECREF(v); } while (DosFindNext(hdir, &ep, sizeof(ep), &srchcnt) == NO_ERROR && srchcnt > 0); } return d; #else char *name = NULL; PyObject *d, *v; DIR *dirp; struct dirent *ep; int arg_is_unicode = 1; if (!PyArg_ParseTuple(args, "U:listdir", &v)) { arg_is_unicode = 0; PyErr_Clear(); } if (!PyArg_ParseTuple(args, "et:listdir", Py_FileSystemDefaultEncoding, &name)) return NULL; if ((dirp = opendir(name)) == NULL) { return posix_error_with_allocated_filename(name); } if ((d = PyList_New(0)) == NULL) { closedir(dirp); PyMem_Free(name); return NULL; } while ((ep = readdir(dirp)) != NULL) { if (ep->d_name[0] == '.' && (NAMLEN(ep) == 1 || (ep->d_name[1] == '.' && NAMLEN(ep) == 2))) continue; v = PyString_FromStringAndSize(ep->d_name, NAMLEN(ep)); if (v == NULL) { Py_DECREF(d); d = NULL; break; } #ifdef Py_USING_UNICODE if (arg_is_unicode) { PyObject *w; w = PyUnicode_FromEncodedObject(v, Py_FileSystemDefaultEncoding, "strict"); if (w != NULL) { Py_DECREF(v); v = w; } else { /* fall back to the original byte string, as discussed in patch #683592 */ PyErr_Clear(); } } #endif if (PyList_Append(d, v) != 0) { Py_DECREF(v); Py_DECREF(d); d = NULL; break; } Py_DECREF(v); } closedir(dirp); PyMem_Free(name); return d; #endif /* which OS */ } /* end of posix_listdir */ #ifdef MS_WINDOWS /* A helper function for abspath on win32 */ static PyObject * posix__getfullpathname(PyObject *self, PyObject *args) { /* assume encoded strings wont more than double no of chars */ char inbuf[MAX_PATH*2]; char *inbufp = inbuf; int insize = sizeof(inbuf)/sizeof(inbuf[0]); char outbuf[MAX_PATH*2]; char *temp; #ifdef Py_WIN_WIDE_FILENAMES if (unicode_file_names()) { PyUnicodeObject *po; if (PyArg_ParseTuple(args, "U|:_getfullpathname", &po)) { Py_UNICODE woutbuf[MAX_PATH*2]; Py_UNICODE *wtemp; if (!GetFullPathNameW(PyUnicode_AS_UNICODE(po), sizeof(woutbuf)/sizeof(woutbuf[0]), woutbuf, &wtemp)) return win32_error("GetFullPathName", ""); return PyUnicode_FromUnicode(woutbuf, wcslen(woutbuf)); } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #endif if (!PyArg_ParseTuple (args, "et#:_getfullpathname", Py_FileSystemDefaultEncoding, &inbufp, &insize)) return NULL; if (!GetFullPathName(inbuf, sizeof(outbuf)/sizeof(outbuf[0]), outbuf, &temp)) return win32_error("GetFullPathName", inbuf); return PyString_FromString(outbuf); } /* end of posix__getfullpathname */ #endif /* MS_WINDOWS */ PyDoc_STRVAR(posix_mkdir__doc__, "mkdir(path [, mode=0777])\n\n\ Create a directory."); static PyObject * posix_mkdir(PyObject *self, PyObject *args) { int res; char *path = NULL; int mode = 0777; #ifdef Py_WIN_WIDE_FILENAMES if (unicode_file_names()) { PyUnicodeObject *po; if (PyArg_ParseTuple(args, "U|i:mkdir", &po, &mode)) { Py_BEGIN_ALLOW_THREADS /* PyUnicode_AS_UNICODE OK without thread lock as it is a simple dereference. */ res = _wmkdir(PyUnicode_AS_UNICODE(po)); Py_END_ALLOW_THREADS if (res < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #endif if (!PyArg_ParseTuple(args, "et|i:mkdir", Py_FileSystemDefaultEncoding, &path, &mode)) return NULL; Py_BEGIN_ALLOW_THREADS #if ( defined(__WATCOMC__) || defined(_MSC_VER) || defined(PYCC_VACPP) ) && !defined(__QNX__) res = mkdir(path); #else res = mkdir(path, mode); #endif Py_END_ALLOW_THREADS if (res < 0) return posix_error_with_allocated_filename(path); PyMem_Free(path); Py_INCREF(Py_None); return Py_None; } #ifdef HAVE_NICE #if defined(HAVE_BROKEN_NICE) && defined(HAVE_SYS_RESOURCE_H) #if defined(HAVE_GETPRIORITY) && !defined(PRIO_PROCESS) #include #endif #endif PyDoc_STRVAR(posix_nice__doc__, "nice(inc) -> new_priority\n\n\ Decrease the priority of process by inc and return the new priority."); static PyObject * posix_nice(PyObject *self, PyObject *args) { int increment, value; if (!PyArg_ParseTuple(args, "i:nice", &increment)) return NULL; /* There are two flavours of 'nice': one that returns the new priority (as required by almost all standards out there) and the Linux/FreeBSD/BSDI one, which returns '0' on success and advices the use of getpriority() to get the new priority. If we are of the nice family that returns the new priority, we need to clear errno before the call, and check if errno is filled before calling posix_error() on a returnvalue of -1, because the -1 may be the actual new priority! */ errno = 0; value = nice(increment); #if defined(HAVE_BROKEN_NICE) && defined(HAVE_GETPRIORITY) if (value == 0) value = getpriority(PRIO_PROCESS, 0); #endif if (value == -1 && errno != 0) /* either nice() or getpriority() returned an error */ return posix_error(); return PyInt_FromLong((long) value); } #endif /* HAVE_NICE */ PyDoc_STRVAR(posix_rename__doc__, "rename(old, new)\n\n\ Rename a file or directory."); static PyObject * posix_rename(PyObject *self, PyObject *args) { #ifdef MS_WINDOWS return posix_2str(args, "etet:rename", rename, "OO:rename", _wrename); #else return posix_2str(args, "etet:rename", rename, NULL, NULL); #endif } PyDoc_STRVAR(posix_rmdir__doc__, "rmdir(path)\n\n\ Remove a directory."); static PyObject * posix_rmdir(PyObject *self, PyObject *args) { #ifdef MS_WINDOWS return posix_1str(args, "et:rmdir", rmdir, "U:rmdir", _wrmdir); #else return posix_1str(args, "et:rmdir", rmdir, NULL, NULL); #endif } PyDoc_STRVAR(posix_stat__doc__, "stat(path) -> stat result\n\n\ Perform a stat system call on the given path."); static PyObject * posix_stat(PyObject *self, PyObject *args) { #ifdef MS_WINDOWS return posix_do_stat(self, args, "et:stat", STAT, "U:stat", _wstati64); #else return posix_do_stat(self, args, "et:stat", STAT, NULL, NULL); #endif } #ifdef HAVE_SYSTEM PyDoc_STRVAR(posix_system__doc__, "system(command) -> exit_status\n\n\ Execute the command (a string) in a subshell."); static PyObject * posix_system(PyObject *self, PyObject *args) { char *command; long sts; if (!PyArg_ParseTuple(args, "s:system", &command)) return NULL; Py_BEGIN_ALLOW_THREADS sts = system(command); Py_END_ALLOW_THREADS return PyInt_FromLong(sts); } #endif PyDoc_STRVAR(posix_umask__doc__, "umask(new_mask) -> old_mask\n\n\ Set the current numeric umask and return the previous umask."); static PyObject * posix_umask(PyObject *self, PyObject *args) { int i; if (!PyArg_ParseTuple(args, "i:umask", &i)) return NULL; i = (int)umask(i); if (i < 0) return posix_error(); return PyInt_FromLong((long)i); } PyDoc_STRVAR(posix_unlink__doc__, "unlink(path)\n\n\ Remove a file (same as remove(path))."); PyDoc_STRVAR(posix_remove__doc__, "remove(path)\n\n\ Remove a file (same as unlink(path))."); static PyObject * posix_unlink(PyObject *self, PyObject *args) { #ifdef MS_WINDOWS return posix_1str(args, "et:remove", unlink, "U:remove", _wunlink); #else return posix_1str(args, "et:remove", unlink, NULL, NULL); #endif } #ifdef HAVE_UNAME PyDoc_STRVAR(posix_uname__doc__, "uname() -> (sysname, nodename, release, version, machine)\n\n\ Return a tuple identifying the current operating system."); static PyObject * posix_uname(PyObject *self, PyObject *noargs) { struct utsname u; int res; Py_BEGIN_ALLOW_THREADS res = uname(&u); Py_END_ALLOW_THREADS if (res < 0) return posix_error(); return Py_BuildValue("(sssss)", u.sysname, u.nodename, u.release, u.version, u.machine); } #endif /* HAVE_UNAME */ static int extract_time(PyObject *t, long* sec, long* usec) { long intval; if (PyFloat_Check(t)) { double tval = PyFloat_AsDouble(t); PyObject *intobj = t->ob_type->tp_as_number->nb_int(t); if (!intobj) return -1; intval = PyInt_AsLong(intobj); Py_DECREF(intobj); *sec = intval; *usec = (long)((tval - intval) * 1e6); /* can't exceed 1000000 */ if (*usec < 0) /* If rounding gave us a negative number, truncate. */ *usec = 0; return 0; } intval = PyInt_AsLong(t); if (intval == -1 && PyErr_Occurred()) return -1; *sec = intval; *usec = 0; return 0; } PyDoc_STRVAR(posix_utime__doc__, "utime(path, (atime, utime))\n\ utime(path, None)\n\n\ Set the access and modified time of the file to the given values. If the\n\ second form is used, set the access and modified times to the current time."); static PyObject * posix_utime(PyObject *self, PyObject *args) { char *path; long atime, mtime, ausec, musec; int res; PyObject* arg; #if defined(HAVE_UTIMES) struct timeval buf[2]; #define ATIME buf[0].tv_sec #define MTIME buf[1].tv_sec #elif defined(HAVE_UTIME_H) /* XXX should define struct utimbuf instead, above */ struct utimbuf buf; #define ATIME buf.actime #define MTIME buf.modtime #define UTIME_ARG &buf #else /* HAVE_UTIMES */ time_t buf[2]; #define ATIME buf[0] #define MTIME buf[1] #define UTIME_ARG buf #endif /* HAVE_UTIMES */ int have_unicode_filename = 0; #ifdef Py_WIN_WIDE_FILENAMES PyUnicodeObject *obwpath; wchar_t *wpath; if (unicode_file_names()) { if (PyArg_ParseTuple(args, "UO|:utime", &obwpath, &arg)) { wpath = PyUnicode_AS_UNICODE(obwpath); have_unicode_filename = 1; } else /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #endif /* Py_WIN_WIDE_FILENAMES */ if (!have_unicode_filename && \ !PyArg_ParseTuple(args, "sO:utime", &path, &arg)) return NULL; if (arg == Py_None) { /* optional time values not given */ Py_BEGIN_ALLOW_THREADS #ifdef Py_WIN_WIDE_FILENAMES if (have_unicode_filename) res = _wutime(wpath, NULL); else #endif /* Py_WIN_WIDE_FILENAMES */ res = utime(path, NULL); Py_END_ALLOW_THREADS } else if (!PyTuple_Check(arg) || PyTuple_Size(arg) != 2) { PyErr_SetString(PyExc_TypeError, "utime() arg 2 must be a tuple (atime, mtime)"); return NULL; } else { if (extract_time(PyTuple_GET_ITEM(arg, 0), &atime, &ausec) == -1) return NULL; if (extract_time(PyTuple_GET_ITEM(arg, 1), &mtime, &musec) == -1) return NULL; ATIME = atime; MTIME = mtime; #ifdef HAVE_UTIMES buf[0].tv_usec = ausec; buf[1].tv_usec = musec; Py_BEGIN_ALLOW_THREADS res = utimes(path, buf); Py_END_ALLOW_THREADS #else Py_BEGIN_ALLOW_THREADS #ifdef Py_WIN_WIDE_FILENAMES if (have_unicode_filename) /* utime is OK with utimbuf, but _wutime insists on _utimbuf (the msvc headers assert the underscore version is ansi) */ res = _wutime(wpath, (struct _utimbuf *)UTIME_ARG); else #endif /* Py_WIN_WIDE_FILENAMES */ res = utime(path, UTIME_ARG); Py_END_ALLOW_THREADS #endif /* HAVE_UTIMES */ } if (res < 0) { #ifdef Py_WIN_WIDE_FILENAMES if (have_unicode_filename) return posix_error_with_unicode_filename(wpath); #endif /* Py_WIN_WIDE_FILENAMES */ return posix_error_with_filename(path); } Py_INCREF(Py_None); return Py_None; #undef UTIME_ARG #undef ATIME #undef MTIME } /* Process operations */ PyDoc_STRVAR(posix__exit__doc__, "_exit(status)\n\n\ Exit to the system with specified status, without normal exit processing."); static PyObject * posix__exit(PyObject *self, PyObject *args) { int sts; if (!PyArg_ParseTuple(args, "i:_exit", &sts)) return NULL; _exit(sts); return NULL; /* Make gcc -Wall happy */ } #if defined(HAVE_EXECV) || defined(HAVE_SPAWNV) static void free_string_array(char **array, int count) { int i; for (i = 0; i < count; i++) PyMem_Free(array[i]); PyMem_DEL(array); } #endif #ifdef HAVE_EXECV PyDoc_STRVAR(posix_execv__doc__, "execv(path, args)\n\n\ Execute an executable path with arguments, replacing current process.\n\ \n\ path: path of executable file\n\ args: tuple or list of strings"); static PyObject * posix_execv(PyObject *self, PyObject *args) { char *path; PyObject *argv; char **argvlist; int i, argc; PyObject *(*getitem)(PyObject *, int); /* execv has two arguments: (path, argv), where argv is a list or tuple of strings. */ if (!PyArg_ParseTuple(args, "etO:execv", Py_FileSystemDefaultEncoding, &path, &argv)) return NULL; if (PyList_Check(argv)) { argc = PyList_Size(argv); getitem = PyList_GetItem; } else if (PyTuple_Check(argv)) { argc = PyTuple_Size(argv); getitem = PyTuple_GetItem; } else { PyErr_SetString(PyExc_TypeError, "execv() arg 2 must be a tuple or list"); PyMem_Free(path); return NULL; } if (argc == 0) { PyErr_SetString(PyExc_ValueError, "execv() arg 2 must not be empty"); PyMem_Free(path); return NULL; } argvlist = PyMem_NEW(char *, argc+1); if (argvlist == NULL) { PyMem_Free(path); return PyErr_NoMemory(); } for (i = 0; i < argc; i++) { if (!PyArg_Parse((*getitem)(argv, i), "et", Py_FileSystemDefaultEncoding, &argvlist[i])) { free_string_array(argvlist, i); PyErr_SetString(PyExc_TypeError, "execv() arg 2 must contain only strings"); PyMem_Free(path); return NULL; } } argvlist[argc] = NULL; #ifdef BAD_EXEC_PROTOTYPES execv(path, (const char **) argvlist); #else /* BAD_EXEC_PROTOTYPES */ execv(path, argvlist); #endif /* BAD_EXEC_PROTOTYPES */ /* If we get here it's definitely an error */ free_string_array(argvlist, argc); PyMem_Free(path); return posix_error(); } PyDoc_STRVAR(posix_execve__doc__, "execve(path, args, env)\n\n\ Execute a path with arguments and environment, replacing current process.\n\ \n\ path: path of executable file\n\ args: tuple or list of arguments\n\ env: dictionary of strings mapping to strings"); static PyObject * posix_execve(PyObject *self, PyObject *args) { char *path; PyObject *argv, *env; char **argvlist; char **envlist; PyObject *key, *val, *keys=NULL, *vals=NULL; int i, pos, argc, envc; PyObject *(*getitem)(PyObject *, int); int lastarg = 0; /* execve has three arguments: (path, argv, env), where argv is a list or tuple of strings and env is a dictionary like posix.environ. */ if (!PyArg_ParseTuple(args, "etOO:execve", Py_FileSystemDefaultEncoding, &path, &argv, &env)) return NULL; if (PyList_Check(argv)) { argc = PyList_Size(argv); getitem = PyList_GetItem; } else if (PyTuple_Check(argv)) { argc = PyTuple_Size(argv); getitem = PyTuple_GetItem; } else { PyErr_SetString(PyExc_TypeError, "execve() arg 2 must be a tuple or list"); goto fail_0; } if (!PyMapping_Check(env)) { PyErr_SetString(PyExc_TypeError, "execve() arg 3 must be a mapping object"); goto fail_0; } if (argc == 0) { PyErr_SetString(PyExc_ValueError, "execve() arg 2 must not be empty"); goto fail_0; } argvlist = PyMem_NEW(char *, argc+1); if (argvlist == NULL) { PyErr_NoMemory(); goto fail_0; } for (i = 0; i < argc; i++) { if (!PyArg_Parse((*getitem)(argv, i), "et;execve() arg 2 must contain only strings", Py_FileSystemDefaultEncoding, &argvlist[i])) { lastarg = i; goto fail_1; } } lastarg = argc; argvlist[argc] = NULL; i = PyMapping_Size(env); if (i < 0) goto fail_1; envlist = PyMem_NEW(char *, i + 1); if (envlist == NULL) { PyErr_NoMemory(); goto fail_1; } envc = 0; keys = PyMapping_Keys(env); vals = PyMapping_Values(env); if (!keys || !vals) goto fail_2; if (!PyList_Check(keys) || !PyList_Check(vals)) { PyErr_SetString(PyExc_TypeError, "execve(): env.keys() or env.values() is not a list"); goto fail_2; } for (pos = 0; pos < i; pos++) { char *p, *k, *v; size_t len; key = PyList_GetItem(keys, pos); val = PyList_GetItem(vals, pos); if (!key || !val) goto fail_2; if (!PyArg_Parse( key, "s;execve() arg 3 contains a non-string key", &k) || !PyArg_Parse( val, "s;execve() arg 3 contains a non-string value", &v)) { goto fail_2; } #if defined(PYOS_OS2) /* Omit Pseudo-Env Vars that Would Confuse Programs if Passed On */ if (stricmp(k, "BEGINLIBPATH") != 0 && stricmp(k, "ENDLIBPATH") != 0) { #endif len = PyString_Size(key) + PyString_Size(val) + 2; p = PyMem_NEW(char, len); if (p == NULL) { PyErr_NoMemory(); goto fail_2; } PyOS_snprintf(p, len, "%s=%s", k, v); envlist[envc++] = p; #if defined(PYOS_OS2) } #endif } envlist[envc] = 0; #ifdef BAD_EXEC_PROTOTYPES execve(path, (const char **)argvlist, envlist); #else /* BAD_EXEC_PROTOTYPES */ execve(path, argvlist, envlist); #endif /* BAD_EXEC_PROTOTYPES */ /* If we get here it's definitely an error */ (void) posix_error(); fail_2: while (--envc >= 0) PyMem_DEL(envlist[envc]); PyMem_DEL(envlist); fail_1: free_string_array(argvlist, lastarg); Py_XDECREF(vals); Py_XDECREF(keys); fail_0: PyMem_Free(path); return NULL; } #endif /* HAVE_EXECV */ #ifdef HAVE_SPAWNV PyDoc_STRVAR(posix_spawnv__doc__, "spawnv(mode, path, args)\n\n\ Execute the program 'path' in a new process.\n\ \n\ mode: mode of process creation\n\ path: path of executable file\n\ args: tuple or list of strings"); static PyObject * posix_spawnv(PyObject *self, PyObject *args) { char *path; PyObject *argv; char **argvlist; int mode, i, argc; Py_intptr_t spawnval; PyObject *(*getitem)(PyObject *, int); /* spawnv has three arguments: (mode, path, argv), where argv is a list or tuple of strings. */ if (!PyArg_ParseTuple(args, "ietO:spawnv", &mode, Py_FileSystemDefaultEncoding, &path, &argv)) return NULL; if (PyList_Check(argv)) { argc = PyList_Size(argv); getitem = PyList_GetItem; } else if (PyTuple_Check(argv)) { argc = PyTuple_Size(argv); getitem = PyTuple_GetItem; } else { PyErr_SetString(PyExc_TypeError, "spawnv() arg 2 must be a tuple or list"); PyMem_Free(path); return NULL; } argvlist = PyMem_NEW(char *, argc+1); if (argvlist == NULL) { PyMem_Free(path); return PyErr_NoMemory(); } for (i = 0; i < argc; i++) { if (!PyArg_Parse((*getitem)(argv, i), "et", Py_FileSystemDefaultEncoding, &argvlist[i])) { free_string_array(argvlist, i); PyErr_SetString( PyExc_TypeError, "spawnv() arg 2 must contain only strings"); PyMem_Free(path); return NULL; } } argvlist[argc] = NULL; #if defined(PYOS_OS2) && defined(PYCC_GCC) Py_BEGIN_ALLOW_THREADS spawnval = spawnv(mode, path, argvlist); Py_END_ALLOW_THREADS #else if (mode == _OLD_P_OVERLAY) mode = _P_OVERLAY; Py_BEGIN_ALLOW_THREADS spawnval = _spawnv(mode, path, argvlist); Py_END_ALLOW_THREADS #endif free_string_array(argvlist, argc); PyMem_Free(path); if (spawnval == -1) return posix_error(); else #if SIZEOF_LONG == SIZEOF_VOID_P return Py_BuildValue("l", (long) spawnval); #else return Py_BuildValue("L", (PY_LONG_LONG) spawnval); #endif } PyDoc_STRVAR(posix_spawnve__doc__, "spawnve(mode, path, args, env)\n\n\ Execute the program 'path' in a new process.\n\ \n\ mode: mode of process creation\n\ path: path of executable file\n\ args: tuple or list of arguments\n\ env: dictionary of strings mapping to strings"); static PyObject * posix_spawnve(PyObject *self, PyObject *args) { char *path; PyObject *argv, *env; char **argvlist; char **envlist; PyObject *key, *val, *keys=NULL, *vals=NULL, *res=NULL; int mode, i, pos, argc, envc; Py_intptr_t spawnval; PyObject *(*getitem)(PyObject *, int); int lastarg = 0; /* spawnve has four arguments: (mode, path, argv, env), where argv is a list or tuple of strings and env is a dictionary like posix.environ. */ if (!PyArg_ParseTuple(args, "ietOO:spawnve", &mode, Py_FileSystemDefaultEncoding, &path, &argv, &env)) return NULL; if (PyList_Check(argv)) { argc = PyList_Size(argv); getitem = PyList_GetItem; } else if (PyTuple_Check(argv)) { argc = PyTuple_Size(argv); getitem = PyTuple_GetItem; } else { PyErr_SetString(PyExc_TypeError, "spawnve() arg 2 must be a tuple or list"); goto fail_0; } if (!PyMapping_Check(env)) { PyErr_SetString(PyExc_TypeError, "spawnve() arg 3 must be a mapping object"); goto fail_0; } argvlist = PyMem_NEW(char *, argc+1); if (argvlist == NULL) { PyErr_NoMemory(); goto fail_0; } for (i = 0; i < argc; i++) { if (!PyArg_Parse((*getitem)(argv, i), "et;spawnve() arg 2 must contain only strings", Py_FileSystemDefaultEncoding, &argvlist[i])) { lastarg = i; goto fail_1; } } lastarg = argc; argvlist[argc] = NULL; i = PyMapping_Size(env); if (i < 0) goto fail_1; envlist = PyMem_NEW(char *, i + 1); if (envlist == NULL) { PyErr_NoMemory(); goto fail_1; } envc = 0; keys = PyMapping_Keys(env); vals = PyMapping_Values(env); if (!keys || !vals) goto fail_2; if (!PyList_Check(keys) || !PyList_Check(vals)) { PyErr_SetString(PyExc_TypeError, "spawnve(): env.keys() or env.values() is not a list"); goto fail_2; } for (pos = 0; pos < i; pos++) { char *p, *k, *v; size_t len; key = PyList_GetItem(keys, pos); val = PyList_GetItem(vals, pos); if (!key || !val) goto fail_2; if (!PyArg_Parse( key, "s;spawnve() arg 3 contains a non-string key", &k) || !PyArg_Parse( val, "s;spawnve() arg 3 contains a non-string value", &v)) { goto fail_2; } len = PyString_Size(key) + PyString_Size(val) + 2; p = PyMem_NEW(char, len); if (p == NULL) { PyErr_NoMemory(); goto fail_2; } PyOS_snprintf(p, len, "%s=%s", k, v); envlist[envc++] = p; } envlist[envc] = 0; #if defined(PYOS_OS2) && defined(PYCC_GCC) Py_BEGIN_ALLOW_THREADS spawnval = spawnve(mode, path, argvlist, envlist); Py_END_ALLOW_THREADS #else if (mode == _OLD_P_OVERLAY) mode = _P_OVERLAY; Py_BEGIN_ALLOW_THREADS spawnval = _spawnve(mode, path, argvlist, envlist); Py_END_ALLOW_THREADS #endif if (spawnval == -1) (void) posix_error(); else #if SIZEOF_LONG == SIZEOF_VOID_P res = Py_BuildValue("l", (long) spawnval); #else res = Py_BuildValue("L", (PY_LONG_LONG) spawnval); #endif fail_2: while (--envc >= 0) PyMem_DEL(envlist[envc]); PyMem_DEL(envlist); fail_1: free_string_array(argvlist, lastarg); Py_XDECREF(vals); Py_XDECREF(keys); fail_0: PyMem_Free(path); return res; } /* OS/2 supports spawnvp & spawnvpe natively */ #if defined(PYOS_OS2) PyDoc_STRVAR(posix_spawnvp__doc__, "spawnvp(mode, file, args)\n\n\ Execute the program 'file' in a new process, using the environment\n\ search path to find the file.\n\ \n\ mode: mode of process creation\n\ file: executable file name\n\ args: tuple or list of strings"); static PyObject * posix_spawnvp(PyObject *self, PyObject *args) { char *path; PyObject *argv; char **argvlist; int mode, i, argc; Py_intptr_t spawnval; PyObject *(*getitem)(PyObject *, int); /* spawnvp has three arguments: (mode, path, argv), where argv is a list or tuple of strings. */ if (!PyArg_ParseTuple(args, "ietO:spawnvp", &mode, Py_FileSystemDefaultEncoding, &path, &argv)) return NULL; if (PyList_Check(argv)) { argc = PyList_Size(argv); getitem = PyList_GetItem; } else if (PyTuple_Check(argv)) { argc = PyTuple_Size(argv); getitem = PyTuple_GetItem; } else { PyErr_SetString(PyExc_TypeError, "spawnvp() arg 2 must be a tuple or list"); PyMem_Free(path); return NULL; } argvlist = PyMem_NEW(char *, argc+1); if (argvlist == NULL) { PyMem_Free(path); return PyErr_NoMemory(); } for (i = 0; i < argc; i++) { if (!PyArg_Parse((*getitem)(argv, i), "et", Py_FileSystemDefaultEncoding, &argvlist[i])) { free_string_array(argvlist, i); PyErr_SetString( PyExc_TypeError, "spawnvp() arg 2 must contain only strings"); PyMem_Free(path); return NULL; } } argvlist[argc] = NULL; Py_BEGIN_ALLOW_THREADS #if defined(PYCC_GCC) spawnval = spawnvp(mode, path, argvlist); #else spawnval = _spawnvp(mode, path, argvlist); #endif Py_END_ALLOW_THREADS free_string_array(argvlist, argc); PyMem_Free(path); if (spawnval == -1) return posix_error(); else return Py_BuildValue("l", (long) spawnval); } PyDoc_STRVAR(posix_spawnvpe__doc__, "spawnvpe(mode, file, args, env)\n\n\ Execute the program 'file' in a new process, using the environment\n\ search path to find the file.\n\ \n\ mode: mode of process creation\n\ file: executable file name\n\ args: tuple or list of arguments\n\ env: dictionary of strings mapping to strings"); static PyObject * posix_spawnvpe(PyObject *self, PyObject *args) { char *path; PyObject *argv, *env; char **argvlist; char **envlist; PyObject *key, *val, *keys=NULL, *vals=NULL, *res=NULL; int mode, i, pos, argc, envc; Py_intptr_t spawnval; PyObject *(*getitem)(PyObject *, int); int lastarg = 0; /* spawnvpe has four arguments: (mode, path, argv, env), where argv is a list or tuple of strings and env is a dictionary like posix.environ. */ if (!PyArg_ParseTuple(args, "ietOO:spawnvpe", &mode, Py_FileSystemDefaultEncoding, &path, &argv, &env)) return NULL; if (PyList_Check(argv)) { argc = PyList_Size(argv); getitem = PyList_GetItem; } else if (PyTuple_Check(argv)) { argc = PyTuple_Size(argv); getitem = PyTuple_GetItem; } else { PyErr_SetString(PyExc_TypeError, "spawnvpe() arg 2 must be a tuple or list"); goto fail_0; } if (!PyMapping_Check(env)) { PyErr_SetString(PyExc_TypeError, "spawnvpe() arg 3 must be a mapping object"); goto fail_0; } argvlist = PyMem_NEW(char *, argc+1); if (argvlist == NULL) { PyErr_NoMemory(); goto fail_0; } for (i = 0; i < argc; i++) { if (!PyArg_Parse((*getitem)(argv, i), "et;spawnvpe() arg 2 must contain only strings", Py_FileSystemDefaultEncoding, &argvlist[i])) { lastarg = i; goto fail_1; } } lastarg = argc; argvlist[argc] = NULL; i = PyMapping_Size(env); if (i < 0) goto fail_1; envlist = PyMem_NEW(char *, i + 1); if (envlist == NULL) { PyErr_NoMemory(); goto fail_1; } envc = 0; keys = PyMapping_Keys(env); vals = PyMapping_Values(env); if (!keys || !vals) goto fail_2; if (!PyList_Check(keys) || !PyList_Check(vals)) { PyErr_SetString(PyExc_TypeError, "spawnvpe(): env.keys() or env.values() is not a list"); goto fail_2; } for (pos = 0; pos < i; pos++) { char *p, *k, *v; size_t len; key = PyList_GetItem(keys, pos); val = PyList_GetItem(vals, pos); if (!key || !val) goto fail_2; if (!PyArg_Parse( key, "s;spawnvpe() arg 3 contains a non-string key", &k) || !PyArg_Parse( val, "s;spawnvpe() arg 3 contains a non-string value", &v)) { goto fail_2; } len = PyString_Size(key) + PyString_Size(val) + 2; p = PyMem_NEW(char, len); if (p == NULL) { PyErr_NoMemory(); goto fail_2; } PyOS_snprintf(p, len, "%s=%s", k, v); envlist[envc++] = p; } envlist[envc] = 0; Py_BEGIN_ALLOW_THREADS #if defined(PYCC_GCC) spawnval = spawnve(mode, path, argvlist, envlist); #else spawnval = _spawnve(mode, path, argvlist, envlist); #endif Py_END_ALLOW_THREADS if (spawnval == -1) (void) posix_error(); else res = Py_BuildValue("l", (long) spawnval); fail_2: while (--envc >= 0) PyMem_DEL(envlist[envc]); PyMem_DEL(envlist); fail_1: free_string_array(argvlist, lastarg); Py_XDECREF(vals); Py_XDECREF(keys); fail_0: PyMem_Free(path); return res; } #endif /* PYOS_OS2 */ #endif /* HAVE_SPAWNV */ #ifdef HAVE_FORK1 PyDoc_STRVAR(posix_fork1__doc__, "fork1() -> pid\n\n\ Fork a child process with a single multiplexed (i.e., not bound) thread.\n\ \n\ Return 0 to child process and PID of child to parent process."); static PyObject * posix_fork1(PyObject *self, PyObject *noargs) { int pid = fork1(); if (pid == -1) return posix_error(); PyOS_AfterFork(); return PyInt_FromLong((long)pid); } #endif #ifdef HAVE_FORK PyDoc_STRVAR(posix_fork__doc__, "fork() -> pid\n\n\ Fork a child process.\n\ Return 0 to child process and PID of child to parent process."); static PyObject * posix_fork(PyObject *self, PyObject *noargs) { int pid = fork(); if (pid == -1) return posix_error(); if (pid == 0) PyOS_AfterFork(); return PyInt_FromLong((long)pid); } #endif /* AIX uses /dev/ptc but is otherwise the same as /dev/ptmx */ /* IRIX has both /dev/ptc and /dev/ptmx, use ptmx */ #if defined(HAVE_DEV_PTC) && !defined(HAVE_DEV_PTMX) #define DEV_PTY_FILE "/dev/ptc" #define HAVE_DEV_PTMX #else #define DEV_PTY_FILE "/dev/ptmx" #endif #if defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY) || defined(HAVE_DEV_PTMX) #ifdef HAVE_PTY_H #include #else #ifdef HAVE_LIBUTIL_H #include #endif /* HAVE_LIBUTIL_H */ #endif /* HAVE_PTY_H */ #ifdef HAVE_STROPTS_H #include #endif #endif /* defined(HAVE_OPENPTY) || defined(HAVE_FORKPTY) || defined(HAVE_DEV_PTMX */ #if defined(HAVE_OPENPTY) || defined(HAVE__GETPTY) || defined(HAVE_DEV_PTMX) PyDoc_STRVAR(posix_openpty__doc__, "openpty() -> (master_fd, slave_fd)\n\n\ Open a pseudo-terminal, returning open fd's for both master and slave end.\n"); static PyObject * posix_openpty(PyObject *self, PyObject *noargs) { int master_fd, slave_fd; #ifndef HAVE_OPENPTY char * slave_name; #endif #if defined(HAVE_DEV_PTMX) && !defined(HAVE_OPENPTY) && !defined(HAVE__GETPTY) PyOS_sighandler_t sig_saved; #ifdef sun extern char *ptsname(); #endif #endif #ifdef HAVE_OPENPTY if (openpty(&master_fd, &slave_fd, NULL, NULL, NULL) != 0) return posix_error(); #elif defined(HAVE__GETPTY) slave_name = _getpty(&master_fd, O_RDWR, 0666, 0); if (slave_name == NULL) return posix_error(); slave_fd = open(slave_name, O_RDWR); if (slave_fd < 0) return posix_error(); #else master_fd = open(DEV_PTY_FILE, O_RDWR | O_NOCTTY); /* open master */ if (master_fd < 0) return posix_error(); sig_saved = signal(SIGCHLD, SIG_DFL); /* change permission of slave */ if (grantpt(master_fd) < 0) { signal(SIGCHLD, sig_saved); return posix_error(); } /* unlock slave */ if (unlockpt(master_fd) < 0) { signal(SIGCHLD, sig_saved); return posix_error(); } signal(SIGCHLD, sig_saved); slave_name = ptsname(master_fd); /* get name of slave */ if (slave_name == NULL) return posix_error(); slave_fd = open(slave_name, O_RDWR | O_NOCTTY); /* open slave */ if (slave_fd < 0) return posix_error(); #if !defined(__CYGWIN__) && !defined(HAVE_DEV_PTC) ioctl(slave_fd, I_PUSH, "ptem"); /* push ptem */ ioctl(slave_fd, I_PUSH, "ldterm"); /* push ldterm */ #ifndef __hpux ioctl(slave_fd, I_PUSH, "ttcompat"); /* push ttcompat */ #endif /* __hpux */ #endif /* HAVE_CYGWIN */ #endif /* HAVE_OPENPTY */ return Py_BuildValue("(ii)", master_fd, slave_fd); } #endif /* defined(HAVE_OPENPTY) || defined(HAVE__GETPTY) || defined(HAVE_DEV_PTMX) */ #ifdef HAVE_FORKPTY PyDoc_STRVAR(posix_forkpty__doc__, "forkpty() -> (pid, master_fd)\n\n\ Fork a new process with a new pseudo-terminal as controlling tty.\n\n\ Like fork(), return 0 as pid to child process, and PID of child to parent.\n\ To both, return fd of newly opened pseudo-terminal.\n"); static PyObject * posix_forkpty(PyObject *self, PyObject *noargs) { int master_fd, pid; pid = forkpty(&master_fd, NULL, NULL, NULL); if (pid == -1) return posix_error(); if (pid == 0) PyOS_AfterFork(); return Py_BuildValue("(ii)", pid, master_fd); } #endif #ifdef HAVE_GETEGID PyDoc_STRVAR(posix_getegid__doc__, "getegid() -> egid\n\n\ Return the current process's effective group id."); static PyObject * posix_getegid(PyObject *self, PyObject *noargs) { return PyInt_FromLong((long)getegid()); } #endif #ifdef HAVE_GETEUID PyDoc_STRVAR(posix_geteuid__doc__, "geteuid() -> euid\n\n\ Return the current process's effective user id."); static PyObject * posix_geteuid(PyObject *self, PyObject *noargs) { return PyInt_FromLong((long)geteuid()); } #endif #ifdef HAVE_GETGID PyDoc_STRVAR(posix_getgid__doc__, "getgid() -> gid\n\n\ Return the current process's group id."); static PyObject * posix_getgid(PyObject *self, PyObject *noargs) { return PyInt_FromLong((long)getgid()); } #endif PyDoc_STRVAR(posix_getpid__doc__, "getpid() -> pid\n\n\ Return the current process id"); static PyObject * posix_getpid(PyObject *self, PyObject *noargs) { return PyInt_FromLong((long)getpid()); } #ifdef HAVE_GETGROUPS PyDoc_STRVAR(posix_getgroups__doc__, "getgroups() -> list of group IDs\n\n\ Return list of supplemental group IDs for the process."); static PyObject * posix_getgroups(PyObject *self, PyObject *noargs) { PyObject *result = NULL; #ifdef NGROUPS_MAX #define MAX_GROUPS NGROUPS_MAX #else /* defined to be 16 on Solaris7, so this should be a small number */ #define MAX_GROUPS 64 #endif gid_t grouplist[MAX_GROUPS]; int n; n = getgroups(MAX_GROUPS, grouplist); if (n < 0) posix_error(); else { result = PyList_New(n); if (result != NULL) { int i; for (i = 0; i < n; ++i) { PyObject *o = PyInt_FromLong((long)grouplist[i]); if (o == NULL) { Py_DECREF(result); result = NULL; break; } PyList_SET_ITEM(result, i, o); } } } return result; } #endif #ifdef HAVE_GETPGID PyDoc_STRVAR(posix_getpgid__doc__, "getpgid(pid) -> pgid\n\n\ Call the system call getpgid()."); static PyObject * posix_getpgid(PyObject *self, PyObject *args) { int pid, pgid; if (!PyArg_ParseTuple(args, "i:getpgid", &pid)) return NULL; pgid = getpgid(pid); if (pgid < 0) return posix_error(); return PyInt_FromLong((long)pgid); } #endif /* HAVE_GETPGID */ #ifdef HAVE_GETPGRP PyDoc_STRVAR(posix_getpgrp__doc__, "getpgrp() -> pgrp\n\n\ Return the current process group id."); static PyObject * posix_getpgrp(PyObject *self, PyObject *noargs) { #ifdef GETPGRP_HAVE_ARG return PyInt_FromLong((long)getpgrp(0)); #else /* GETPGRP_HAVE_ARG */ return PyInt_FromLong((long)getpgrp()); #endif /* GETPGRP_HAVE_ARG */ } #endif /* HAVE_GETPGRP */ #ifdef HAVE_SETPGRP PyDoc_STRVAR(posix_setpgrp__doc__, "setpgrp()\n\n\ Make this process a session leader."); static PyObject * posix_setpgrp(PyObject *self, PyObject *noargs) { #ifdef SETPGRP_HAVE_ARG if (setpgrp(0, 0) < 0) #else /* SETPGRP_HAVE_ARG */ if (setpgrp() < 0) #endif /* SETPGRP_HAVE_ARG */ return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_SETPGRP */ #ifdef HAVE_GETPPID PyDoc_STRVAR(posix_getppid__doc__, "getppid() -> ppid\n\n\ Return the parent's process id."); static PyObject * posix_getppid(PyObject *self, PyObject *noargs) { return PyInt_FromLong((long)getppid()); } #endif #ifdef HAVE_GETLOGIN PyDoc_STRVAR(posix_getlogin__doc__, "getlogin() -> string\n\n\ Return the actual login name."); static PyObject * posix_getlogin(PyObject *self, PyObject *noargs) { PyObject *result = NULL; char *name; int old_errno = errno; errno = 0; name = getlogin(); if (name == NULL) { if (errno) posix_error(); else PyErr_SetString(PyExc_OSError, "unable to determine login name"); } else result = PyString_FromString(name); errno = old_errno; return result; } #endif #ifdef HAVE_GETUID PyDoc_STRVAR(posix_getuid__doc__, "getuid() -> uid\n\n\ Return the current process's user id."); static PyObject * posix_getuid(PyObject *self, PyObject *noargs) { return PyInt_FromLong((long)getuid()); } #endif #ifdef HAVE_KILL PyDoc_STRVAR(posix_kill__doc__, "kill(pid, sig)\n\n\ Kill a process with a signal."); static PyObject * posix_kill(PyObject *self, PyObject *args) { int pid, sig; if (!PyArg_ParseTuple(args, "ii:kill", &pid, &sig)) return NULL; #if defined(PYOS_OS2) && !defined(PYCC_GCC) if (sig == XCPT_SIGNAL_INTR || sig == XCPT_SIGNAL_BREAK) { APIRET rc; if ((rc = DosSendSignalException(pid, sig)) != NO_ERROR) return os2_error(rc); } else if (sig == XCPT_SIGNAL_KILLPROC) { APIRET rc; if ((rc = DosKillProcess(DKP_PROCESS, pid)) != NO_ERROR) return os2_error(rc); } else return NULL; /* Unrecognized Signal Requested */ #else if (kill(pid, sig) == -1) return posix_error(); #endif Py_INCREF(Py_None); return Py_None; } #endif #ifdef HAVE_KILLPG PyDoc_STRVAR(posix_killpg__doc__, "killpg(pgid, sig)\n\n\ Kill a process group with a signal."); static PyObject * posix_killpg(PyObject *self, PyObject *args) { int pgid, sig; if (!PyArg_ParseTuple(args, "ii:killpg", &pgid, &sig)) return NULL; if (killpg(pgid, sig) == -1) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif #ifdef HAVE_PLOCK #ifdef HAVE_SYS_LOCK_H #include #endif PyDoc_STRVAR(posix_plock__doc__, "plock(op)\n\n\ Lock program segments into memory."); static PyObject * posix_plock(PyObject *self, PyObject *args) { int op; if (!PyArg_ParseTuple(args, "i:plock", &op)) return NULL; if (plock(op) == -1) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif #ifdef HAVE_POPEN PyDoc_STRVAR(posix_popen__doc__, "popen(command [, mode='r' [, bufsize]]) -> pipe\n\n\ Open a pipe to/from a command returning a file object."); #if defined(PYOS_OS2) #if defined(PYCC_VACPP) static int async_system(const char *command) { char errormsg[256], args[1024]; RESULTCODES rcodes; APIRET rc; char *shell = getenv("COMSPEC"); if (!shell) shell = "cmd"; /* avoid overflowing the argument buffer */ if (strlen(shell) + 3 + strlen(command) >= 1024) return ERROR_NOT_ENOUGH_MEMORY args[0] = '\0'; strcat(args, shell); strcat(args, "/c "); strcat(args, command); /* execute asynchronously, inheriting the environment */ rc = DosExecPgm(errormsg, sizeof(errormsg), EXEC_ASYNC, args, NULL, &rcodes, shell); return rc; } static FILE * popen(const char *command, const char *mode, int pipesize, int *err) { int oldfd, tgtfd; HFILE pipeh[2]; APIRET rc; /* mode determines which of stdin or stdout is reconnected to * the pipe to the child */ if (strchr(mode, 'r') != NULL) { tgt_fd = 1; /* stdout */ } else if (strchr(mode, 'w')) { tgt_fd = 0; /* stdin */ } else { *err = ERROR_INVALID_ACCESS; return NULL; } /* setup the pipe */ if ((rc = DosCreatePipe(&pipeh[0], &pipeh[1], pipesize)) != NO_ERROR) { *err = rc; return NULL; } /* prevent other threads accessing stdio */ DosEnterCritSec(); /* reconnect stdio and execute child */ oldfd = dup(tgtfd); close(tgtfd); if (dup2(pipeh[tgtfd], tgtfd) == 0) { DosClose(pipeh[tgtfd]); rc = async_system(command); } /* restore stdio */ dup2(oldfd, tgtfd); close(oldfd); /* allow other threads access to stdio */ DosExitCritSec(); /* if execution of child was successful return file stream */ if (rc == NO_ERROR) return fdopen(pipeh[1 - tgtfd], mode); else { DosClose(pipeh[1 - tgtfd]); *err = rc; return NULL; } } static PyObject * posix_popen(PyObject *self, PyObject *args) { char *name; char *mode = "r"; int err, bufsize = -1; FILE *fp; PyObject *f; if (!PyArg_ParseTuple(args, "s|si:popen", &name, &mode, &bufsize)) return NULL; Py_BEGIN_ALLOW_THREADS fp = popen(name, mode, (bufsize > 0) ? bufsize : 4096, &err); Py_END_ALLOW_THREADS if (fp == NULL) return os2_error(err); f = PyFile_FromFile(fp, name, mode, fclose); if (f != NULL) PyFile_SetBufSize(f, bufsize); return f; } #elif defined(PYCC_GCC) /* standard posix version of popen() support */ static PyObject * posix_popen(PyObject *self, PyObject *args) { char *name; char *mode = "r"; int bufsize = -1; FILE *fp; PyObject *f; if (!PyArg_ParseTuple(args, "s|si:popen", &name, &mode, &bufsize)) return NULL; Py_BEGIN_ALLOW_THREADS fp = popen(name, mode); Py_END_ALLOW_THREADS if (fp == NULL) return posix_error(); f = PyFile_FromFile(fp, name, mode, pclose); if (f != NULL) PyFile_SetBufSize(f, bufsize); return f; } /* fork() under OS/2 has lots'o'warts * EMX supports pipe() and spawn*() so we can synthesize popen[234]() * most of this code is a ripoff of the win32 code, but using the * capabilities of EMX's C library routines */ /* These tell _PyPopen() whether to return 1, 2, or 3 file objects. */ #define POPEN_1 1 #define POPEN_2 2 #define POPEN_3 3 #define POPEN_4 4 static PyObject *_PyPopen(char *, int, int, int); static int _PyPclose(FILE *file); /* * Internal dictionary mapping popen* file pointers to process handles, * for use when retrieving the process exit code. See _PyPclose() below * for more information on this dictionary's use. */ static PyObject *_PyPopenProcs = NULL; /* os2emx version of popen2() * * The result of this function is a pipe (file) connected to the * process's stdin, and a pipe connected to the process's stdout. */ static PyObject * os2emx_popen2(PyObject *self, PyObject *args) { PyObject *f; int tm=0; char *cmdstring; char *mode = "t"; int bufsize = -1; if (!PyArg_ParseTuple(args, "s|si:popen2", &cmdstring, &mode, &bufsize)) return NULL; if (*mode == 't') tm = O_TEXT; else if (*mode != 'b') { PyErr_SetString(PyExc_ValueError, "mode must be 't' or 'b'"); return NULL; } else tm = O_BINARY; f = _PyPopen(cmdstring, tm, POPEN_2, bufsize); return f; } /* * Variation on os2emx.popen2 * * The result of this function is 3 pipes - the process's stdin, * stdout and stderr */ static PyObject * os2emx_popen3(PyObject *self, PyObject *args) { PyObject *f; int tm = 0; char *cmdstring; char *mode = "t"; int bufsize = -1; if (!PyArg_ParseTuple(args, "s|si:popen3", &cmdstring, &mode, &bufsize)) return NULL; if (*mode == 't') tm = O_TEXT; else if (*mode != 'b') { PyErr_SetString(PyExc_ValueError, "mode must be 't' or 'b'"); return NULL; } else tm = O_BINARY; f = _PyPopen(cmdstring, tm, POPEN_3, bufsize); return f; } /* * Variation on os2emx.popen2 * * The result of this function is 2 pipes - the processes stdin, * and stdout+stderr combined as a single pipe. */ static PyObject * os2emx_popen4(PyObject *self, PyObject *args) { PyObject *f; int tm = 0; char *cmdstring; char *mode = "t"; int bufsize = -1; if (!PyArg_ParseTuple(args, "s|si:popen4", &cmdstring, &mode, &bufsize)) return NULL; if (*mode == 't') tm = O_TEXT; else if (*mode != 'b') { PyErr_SetString(PyExc_ValueError, "mode must be 't' or 'b'"); return NULL; } else tm = O_BINARY; f = _PyPopen(cmdstring, tm, POPEN_4, bufsize); return f; } /* a couple of structures for convenient handling of multiple * file handles and pipes */ struct file_ref { int handle; int flags; }; struct pipe_ref { int rd; int wr; }; /* The following code is derived from the win32 code */ static PyObject * _PyPopen(char *cmdstring, int mode, int n, int bufsize) { struct file_ref stdio[3]; struct pipe_ref p_fd[3]; FILE *p_s[3]; int file_count, i, pipe_err, pipe_pid; char *shell, *sh_name, *opt, *rd_mode, *wr_mode; PyObject *f, *p_f[3]; /* file modes for subsequent fdopen's on pipe handles */ if (mode == O_TEXT) { rd_mode = "rt"; wr_mode = "wt"; } else { rd_mode = "rb"; wr_mode = "wb"; } /* prepare shell references */ if ((shell = getenv("EMXSHELL")) == NULL) if ((shell = getenv("COMSPEC")) == NULL) { errno = ENOENT; return posix_error(); } sh_name = _getname(shell); if (stricmp(sh_name, "cmd.exe") == 0 || stricmp(sh_name, "4os2.exe") == 0) opt = "/c"; else opt = "-c"; /* save current stdio fds + their flags, and set not inheritable */ i = pipe_err = 0; while (pipe_err >= 0 && i < 3) { pipe_err = stdio[i].handle = dup(i); stdio[i].flags = fcntl(i, F_GETFD, 0); fcntl(stdio[i].handle, F_SETFD, stdio[i].flags | FD_CLOEXEC); i++; } if (pipe_err < 0) { /* didn't get them all saved - clean up and bail out */ int saved_err = errno; while (i-- > 0) { close(stdio[i].handle); } errno = saved_err; return posix_error(); } /* create pipe ends */ file_count = 2; if (n == POPEN_3) file_count = 3; i = pipe_err = 0; while ((pipe_err == 0) && (i < file_count)) pipe_err = pipe((int *)&p_fd[i++]); if (pipe_err < 0) { /* didn't get them all made - clean up and bail out */ while (i-- > 0) { close(p_fd[i].wr); close(p_fd[i].rd); } errno = EPIPE; return posix_error(); } /* change the actual standard IO streams over temporarily, * making the retained pipe ends non-inheritable */ pipe_err = 0; /* - stdin */ if (dup2(p_fd[0].rd, 0) == 0) { close(p_fd[0].rd); i = fcntl(p_fd[0].wr, F_GETFD, 0); fcntl(p_fd[0].wr, F_SETFD, i | FD_CLOEXEC); if ((p_s[0] = fdopen(p_fd[0].wr, wr_mode)) == NULL) { close(p_fd[0].wr); pipe_err = -1; } } else { pipe_err = -1; } /* - stdout */ if (pipe_err == 0) { if (dup2(p_fd[1].wr, 1) == 1) { close(p_fd[1].wr); i = fcntl(p_fd[1].rd, F_GETFD, 0); fcntl(p_fd[1].rd, F_SETFD, i | FD_CLOEXEC); if ((p_s[1] = fdopen(p_fd[1].rd, rd_mode)) == NULL) { close(p_fd[1].rd); pipe_err = -1; } } else { pipe_err = -1; } } /* - stderr, as required */ if (pipe_err == 0) switch (n) { case POPEN_3: { if (dup2(p_fd[2].wr, 2) == 2) { close(p_fd[2].wr); i = fcntl(p_fd[2].rd, F_GETFD, 0); fcntl(p_fd[2].rd, F_SETFD, i | FD_CLOEXEC); if ((p_s[2] = fdopen(p_fd[2].rd, rd_mode)) == NULL) { close(p_fd[2].rd); pipe_err = -1; } } else { pipe_err = -1; } break; } case POPEN_4: { if (dup2(1, 2) != 2) { pipe_err = -1; } break; } } /* spawn the child process */ if (pipe_err == 0) { pipe_pid = spawnlp(P_NOWAIT, shell, shell, opt, cmdstring, (char *)0); if (pipe_pid == -1) { pipe_err = -1; } else { /* save the PID into the FILE structure * NOTE: this implementation doesn't actually * take advantage of this, but do it for * completeness - AIM Apr01 */ for (i = 0; i < file_count; i++) p_s[i]->_pid = pipe_pid; } } /* reset standard IO to normal */ for (i = 0; i < 3; i++) { dup2(stdio[i].handle, i); fcntl(i, F_SETFD, stdio[i].flags); close(stdio[i].handle); } /* if any remnant problems, clean up and bail out */ if (pipe_err < 0) { for (i = 0; i < 3; i++) { close(p_fd[i].rd); close(p_fd[i].wr); } errno = EPIPE; return posix_error_with_filename(cmdstring); } /* build tuple of file objects to return */ if ((p_f[0] = PyFile_FromFile(p_s[0], cmdstring, wr_mode, _PyPclose)) != NULL) PyFile_SetBufSize(p_f[0], bufsize); if ((p_f[1] = PyFile_FromFile(p_s[1], cmdstring, rd_mode, _PyPclose)) != NULL) PyFile_SetBufSize(p_f[1], bufsize); if (n == POPEN_3) { if ((p_f[2] = PyFile_FromFile(p_s[2], cmdstring, rd_mode, _PyPclose)) != NULL) PyFile_SetBufSize(p_f[0], bufsize); f = Py_BuildValue("OOO", p_f[0], p_f[1], p_f[2]); } else f = Py_BuildValue("OO", p_f[0], p_f[1]); /* * Insert the files we've created into the process dictionary * all referencing the list with the process handle and the * initial number of files (see description below in _PyPclose). * Since if _PyPclose later tried to wait on a process when all * handles weren't closed, it could create a deadlock with the * child, we spend some energy here to try to ensure that we * either insert all file handles into the dictionary or none * at all. It's a little clumsy with the various popen modes * and variable number of files involved. */ if (!_PyPopenProcs) { _PyPopenProcs = PyDict_New(); } if (_PyPopenProcs) { PyObject *procObj, *pidObj, *intObj, *fileObj[3]; int ins_rc[3]; fileObj[0] = fileObj[1] = fileObj[2] = NULL; ins_rc[0] = ins_rc[1] = ins_rc[2] = 0; procObj = PyList_New(2); pidObj = PyInt_FromLong((long) pipe_pid); intObj = PyInt_FromLong((long) file_count); if (procObj && pidObj && intObj) { PyList_SetItem(procObj, 0, pidObj); PyList_SetItem(procObj, 1, intObj); fileObj[0] = PyLong_FromVoidPtr(p_s[0]); if (fileObj[0]) { ins_rc[0] = PyDict_SetItem(_PyPopenProcs, fileObj[0], procObj); } fileObj[1] = PyLong_FromVoidPtr(p_s[1]); if (fileObj[1]) { ins_rc[1] = PyDict_SetItem(_PyPopenProcs, fileObj[1], procObj); } if (file_count >= 3) { fileObj[2] = PyLong_FromVoidPtr(p_s[2]); if (fileObj[2]) { ins_rc[2] = PyDict_SetItem(_PyPopenProcs, fileObj[2], procObj); } } if (ins_rc[0] < 0 || !fileObj[0] || ins_rc[1] < 0 || (file_count > 1 && !fileObj[1]) || ins_rc[2] < 0 || (file_count > 2 && !fileObj[2])) { /* Something failed - remove any dictionary * entries that did make it. */ if (!ins_rc[0] && fileObj[0]) { PyDict_DelItem(_PyPopenProcs, fileObj[0]); } if (!ins_rc[1] && fileObj[1]) { PyDict_DelItem(_PyPopenProcs, fileObj[1]); } if (!ins_rc[2] && fileObj[2]) { PyDict_DelItem(_PyPopenProcs, fileObj[2]); } } } /* * Clean up our localized references for the dictionary keys * and value since PyDict_SetItem will Py_INCREF any copies * that got placed in the dictionary. */ Py_XDECREF(procObj); Py_XDECREF(fileObj[0]); Py_XDECREF(fileObj[1]); Py_XDECREF(fileObj[2]); } /* Child is launched. */ return f; } /* * Wrapper for fclose() to use for popen* files, so we can retrieve the * exit code for the child process and return as a result of the close. * * This function uses the _PyPopenProcs dictionary in order to map the * input file pointer to information about the process that was * originally created by the popen* call that created the file pointer. * The dictionary uses the file pointer as a key (with one entry * inserted for each file returned by the original popen* call) and a * single list object as the value for all files from a single call. * The list object contains the Win32 process handle at [0], and a file * count at [1], which is initialized to the total number of file * handles using that list. * * This function closes whichever handle it is passed, and decrements * the file count in the dictionary for the process handle pointed to * by this file. On the last close (when the file count reaches zero), * this function will wait for the child process and then return its * exit code as the result of the close() operation. This permits the * files to be closed in any order - it is always the close() of the * final handle that will return the exit code. * * NOTE: This function is currently called with the GIL released. * hence we use the GILState API to manage our state. */ static int _PyPclose(FILE *file) { int result; int exit_code; int pipe_pid; PyObject *procObj, *pidObj, *intObj, *fileObj; int file_count; #ifdef WITH_THREAD PyGILState_STATE state; #endif /* Close the file handle first, to ensure it can't block the * child from exiting if it's the last handle. */ result = fclose(file); #ifdef WITH_THREAD state = PyGILState_Ensure(); #endif if (_PyPopenProcs) { if ((fileObj = PyLong_FromVoidPtr(file)) != NULL && (procObj = PyDict_GetItem(_PyPopenProcs, fileObj)) != NULL && (pidObj = PyList_GetItem(procObj,0)) != NULL && (intObj = PyList_GetItem(procObj,1)) != NULL) { pipe_pid = (int) PyInt_AsLong(pidObj); file_count = (int) PyInt_AsLong(intObj); if (file_count > 1) { /* Still other files referencing process */ file_count--; PyList_SetItem(procObj,1, PyInt_FromLong((long) file_count)); } else { /* Last file for this process */ if (result != EOF && waitpid(pipe_pid, &exit_code, 0) == pipe_pid) { /* extract exit status */ if (WIFEXITED(exit_code)) { result = WEXITSTATUS(exit_code); } else { errno = EPIPE; result = -1; } } else { /* Indicate failure - this will cause the file object * to raise an I/O error and translate the last * error code from errno. We do have a problem with * last errors that overlap the normal errno table, * but that's a consistent problem with the file object. */ result = -1; } } /* Remove this file pointer from dictionary */ PyDict_DelItem(_PyPopenProcs, fileObj); if (PyDict_Size(_PyPopenProcs) == 0) { Py_DECREF(_PyPopenProcs); _PyPopenProcs = NULL; } } /* if object retrieval ok */ Py_XDECREF(fileObj); } /* if _PyPopenProcs */ #ifdef WITH_THREAD PyGILState_Release(state); #endif return result; } #endif /* PYCC_??? */ #elif defined(MS_WINDOWS) /* * Portable 'popen' replacement for Win32. * * Written by Bill Tutt . Minor tweaks * and 2.0 integration by Fredrik Lundh * Return code handling by David Bolen . */ #include #include #include /* These tell _PyPopen() wether to return 1, 2, or 3 file objects. */ #define POPEN_1 1 #define POPEN_2 2 #define POPEN_3 3 #define POPEN_4 4 static PyObject *_PyPopen(char *, int, int); static int _PyPclose(FILE *file); /* * Internal dictionary mapping popen* file pointers to process handles, * for use when retrieving the process exit code. See _PyPclose() below * for more information on this dictionary's use. */ static PyObject *_PyPopenProcs = NULL; /* popen that works from a GUI. * * The result of this function is a pipe (file) connected to the * processes stdin or stdout, depending on the requested mode. */ static PyObject * posix_popen(PyObject *self, PyObject *args) { PyObject *f; int tm = 0; char *cmdstring; char *mode = "r"; int bufsize = -1; if (!PyArg_ParseTuple(args, "s|si:popen", &cmdstring, &mode, &bufsize)) return NULL; if (*mode == 'r') tm = _O_RDONLY; else if (*mode != 'w') { PyErr_SetString(PyExc_ValueError, "popen() arg 2 must be 'r' or 'w'"); return NULL; } else tm = _O_WRONLY; if (bufsize != -1) { PyErr_SetString(PyExc_ValueError, "popen() arg 3 must be -1"); return NULL; } if (*(mode+1) == 't') f = _PyPopen(cmdstring, tm | _O_TEXT, POPEN_1); else if (*(mode+1) == 'b') f = _PyPopen(cmdstring, tm | _O_BINARY, POPEN_1); else f = _PyPopen(cmdstring, tm | _O_TEXT, POPEN_1); return f; } /* Variation on win32pipe.popen * * The result of this function is a pipe (file) connected to the * process's stdin, and a pipe connected to the process's stdout. */ static PyObject * win32_popen2(PyObject *self, PyObject *args) { PyObject *f; int tm=0; char *cmdstring; char *mode = "t"; int bufsize = -1; if (!PyArg_ParseTuple(args, "s|si:popen2", &cmdstring, &mode, &bufsize)) return NULL; if (*mode == 't') tm = _O_TEXT; else if (*mode != 'b') { PyErr_SetString(PyExc_ValueError, "popen2() arg 2 must be 't' or 'b'"); return NULL; } else tm = _O_BINARY; if (bufsize != -1) { PyErr_SetString(PyExc_ValueError, "popen2() arg 3 must be -1"); return NULL; } f = _PyPopen(cmdstring, tm, POPEN_2); return f; } /* * Variation on * * The result of this function is 3 pipes - the process's stdin, * stdout and stderr */ static PyObject * win32_popen3(PyObject *self, PyObject *args) { PyObject *f; int tm = 0; char *cmdstring; char *mode = "t"; int bufsize = -1; if (!PyArg_ParseTuple(args, "s|si:popen3", &cmdstring, &mode, &bufsize)) return NULL; if (*mode == 't') tm = _O_TEXT; else if (*mode != 'b') { PyErr_SetString(PyExc_ValueError, "popen3() arg 2 must be 't' or 'b'"); return NULL; } else tm = _O_BINARY; if (bufsize != -1) { PyErr_SetString(PyExc_ValueError, "popen3() arg 3 must be -1"); return NULL; } f = _PyPopen(cmdstring, tm, POPEN_3); return f; } /* * Variation on win32pipe.popen * * The result of this function is 2 pipes - the processes stdin, * and stdout+stderr combined as a single pipe. */ static PyObject * win32_popen4(PyObject *self, PyObject *args) { PyObject *f; int tm = 0; char *cmdstring; char *mode = "t"; int bufsize = -1; if (!PyArg_ParseTuple(args, "s|si:popen4", &cmdstring, &mode, &bufsize)) return NULL; if (*mode == 't') tm = _O_TEXT; else if (*mode != 'b') { PyErr_SetString(PyExc_ValueError, "popen4() arg 2 must be 't' or 'b'"); return NULL; } else tm = _O_BINARY; if (bufsize != -1) { PyErr_SetString(PyExc_ValueError, "popen4() arg 3 must be -1"); return NULL; } f = _PyPopen(cmdstring, tm, POPEN_4); return f; } static BOOL _PyPopenCreateProcess(char *cmdstring, HANDLE hStdin, HANDLE hStdout, HANDLE hStderr, HANDLE *hProcess) { PROCESS_INFORMATION piProcInfo; STARTUPINFO siStartInfo; DWORD dwProcessFlags = 0; /* no NEW_CONSOLE by default for Ctrl+C handling */ char *s1,*s2, *s3 = " /c "; const char *szConsoleSpawn = "w9xpopen.exe"; int i; int x; if (i = GetEnvironmentVariable("COMSPEC",NULL,0)) { char *comshell; s1 = (char *)alloca(i); if (!(x = GetEnvironmentVariable("COMSPEC", s1, i))) return x; /* Explicitly check if we are using COMMAND.COM. If we are * then use the w9xpopen hack. */ comshell = s1 + x; while (comshell >= s1 && *comshell != '\\') --comshell; ++comshell; if (GetVersion() < 0x80000000 && _stricmp(comshell, "command.com") != 0) { /* NT/2000 and not using command.com. */ x = i + strlen(s3) + strlen(cmdstring) + 1; s2 = (char *)alloca(x); ZeroMemory(s2, x); PyOS_snprintf(s2, x, "%s%s%s", s1, s3, cmdstring); } else { /* * Oh gag, we're on Win9x or using COMMAND.COM. Use * the workaround listed in KB: Q150956 */ char modulepath[_MAX_PATH]; struct stat statinfo; GetModuleFileName(NULL, modulepath, sizeof(modulepath)); for (i = x = 0; modulepath[i]; i++) if (modulepath[i] == SEP) x = i+1; modulepath[x] = '\0'; /* Create the full-name to w9xpopen, so we can test it exists */ strncat(modulepath, szConsoleSpawn, (sizeof(modulepath)/sizeof(modulepath[0])) -strlen(modulepath)); if (stat(modulepath, &statinfo) != 0) { /* Eeek - file-not-found - possibly an embedding situation - see if we can locate it in sys.prefix */ strncpy(modulepath, Py_GetExecPrefix(), sizeof(modulepath)/sizeof(modulepath[0])); if (modulepath[strlen(modulepath)-1] != '\\') strcat(modulepath, "\\"); strncat(modulepath, szConsoleSpawn, (sizeof(modulepath)/sizeof(modulepath[0])) -strlen(modulepath)); /* No where else to look - raise an easily identifiable error, rather than leaving Windows to report "file not found" - as the user is probably blissfully unaware this shim EXE is used, and it will confuse them. (well, it confused me for a while ;-) */ if (stat(modulepath, &statinfo) != 0) { PyErr_Format(PyExc_RuntimeError, "Can not locate '%s' which is needed " "for popen to work with your shell " "or platform.", szConsoleSpawn); return FALSE; } } x = i + strlen(s3) + strlen(cmdstring) + 1 + strlen(modulepath) + strlen(szConsoleSpawn) + 1; s2 = (char *)alloca(x); ZeroMemory(s2, x); /* To maintain correct argument passing semantics, we pass the command-line as it stands, and allow quoting to be applied. w9xpopen.exe will then use its argv vector, and re-quote the necessary args for the ultimate child process. */ PyOS_snprintf( s2, x, "\"%s\" %s%s%s", modulepath, s1, s3, cmdstring); /* Not passing CREATE_NEW_CONSOLE has been known to cause random failures on win9x. Specifically a dialog: "Your program accessed mem currently in use at xxx" and a hopeful warning about the stability of your system. Cost is Ctrl+C wont kill children, but anyone who cares can have a go! */ dwProcessFlags |= CREATE_NEW_CONSOLE; } } /* Could be an else here to try cmd.exe / command.com in the path Now we'll just error out.. */ else { PyErr_SetString(PyExc_RuntimeError, "Cannot locate a COMSPEC environment variable to " "use as the shell"); return FALSE; } ZeroMemory(&siStartInfo, sizeof(STARTUPINFO)); siStartInfo.cb = sizeof(STARTUPINFO); siStartInfo.dwFlags = STARTF_USESTDHANDLES | STARTF_USESHOWWINDOW; siStartInfo.hStdInput = hStdin; siStartInfo.hStdOutput = hStdout; siStartInfo.hStdError = hStderr; siStartInfo.wShowWindow = SW_HIDE; if (CreateProcess(NULL, s2, NULL, NULL, TRUE, dwProcessFlags, NULL, NULL, &siStartInfo, &piProcInfo) ) { /* Close the handles now so anyone waiting is woken. */ CloseHandle(piProcInfo.hThread); /* Return process handle */ *hProcess = piProcInfo.hProcess; return TRUE; } win32_error("CreateProcess", s2); return FALSE; } /* The following code is based off of KB: Q190351 */ static PyObject * _PyPopen(char *cmdstring, int mode, int n) { HANDLE hChildStdinRd, hChildStdinWr, hChildStdoutRd, hChildStdoutWr, hChildStderrRd, hChildStderrWr, hChildStdinWrDup, hChildStdoutRdDup, hChildStderrRdDup, hProcess; /* hChildStdoutWrDup; */ SECURITY_ATTRIBUTES saAttr; BOOL fSuccess; int fd1, fd2, fd3; FILE *f1, *f2, *f3; long file_count; PyObject *f; saAttr.nLength = sizeof(SECURITY_ATTRIBUTES); saAttr.bInheritHandle = TRUE; saAttr.lpSecurityDescriptor = NULL; if (!CreatePipe(&hChildStdinRd, &hChildStdinWr, &saAttr, 0)) return win32_error("CreatePipe", NULL); /* Create new output read handle and the input write handle. Set * the inheritance properties to FALSE. Otherwise, the child inherits * these handles; resulting in non-closeable handles to the pipes * being created. */ fSuccess = DuplicateHandle(GetCurrentProcess(), hChildStdinWr, GetCurrentProcess(), &hChildStdinWrDup, 0, FALSE, DUPLICATE_SAME_ACCESS); if (!fSuccess) return win32_error("DuplicateHandle", NULL); /* Close the inheritable version of ChildStdin that we're using. */ CloseHandle(hChildStdinWr); if (!CreatePipe(&hChildStdoutRd, &hChildStdoutWr, &saAttr, 0)) return win32_error("CreatePipe", NULL); fSuccess = DuplicateHandle(GetCurrentProcess(), hChildStdoutRd, GetCurrentProcess(), &hChildStdoutRdDup, 0, FALSE, DUPLICATE_SAME_ACCESS); if (!fSuccess) return win32_error("DuplicateHandle", NULL); /* Close the inheritable version of ChildStdout that we're using. */ CloseHandle(hChildStdoutRd); if (n != POPEN_4) { if (!CreatePipe(&hChildStderrRd, &hChildStderrWr, &saAttr, 0)) return win32_error("CreatePipe", NULL); fSuccess = DuplicateHandle(GetCurrentProcess(), hChildStderrRd, GetCurrentProcess(), &hChildStderrRdDup, 0, FALSE, DUPLICATE_SAME_ACCESS); if (!fSuccess) return win32_error("DuplicateHandle", NULL); /* Close the inheritable version of ChildStdErr that we're using. */ CloseHandle(hChildStderrRd); } switch (n) { case POPEN_1: switch (mode & (_O_RDONLY | _O_TEXT | _O_BINARY | _O_WRONLY)) { case _O_WRONLY | _O_TEXT: /* Case for writing to child Stdin in text mode. */ fd1 = _open_osfhandle((long)hChildStdinWrDup, mode); f1 = _fdopen(fd1, "w"); f = PyFile_FromFile(f1, cmdstring, "w", _PyPclose); PyFile_SetBufSize(f, 0); /* We don't care about these pipes anymore, so close them. */ CloseHandle(hChildStdoutRdDup); CloseHandle(hChildStderrRdDup); break; case _O_RDONLY | _O_TEXT: /* Case for reading from child Stdout in text mode. */ fd1 = _open_osfhandle((long)hChildStdoutRdDup, mode); f1 = _fdopen(fd1, "r"); f = PyFile_FromFile(f1, cmdstring, "r", _PyPclose); PyFile_SetBufSize(f, 0); /* We don't care about these pipes anymore, so close them. */ CloseHandle(hChildStdinWrDup); CloseHandle(hChildStderrRdDup); break; case _O_RDONLY | _O_BINARY: /* Case for readinig from child Stdout in binary mode. */ fd1 = _open_osfhandle((long)hChildStdoutRdDup, mode); f1 = _fdopen(fd1, "rb"); f = PyFile_FromFile(f1, cmdstring, "rb", _PyPclose); PyFile_SetBufSize(f, 0); /* We don't care about these pipes anymore, so close them. */ CloseHandle(hChildStdinWrDup); CloseHandle(hChildStderrRdDup); break; case _O_WRONLY | _O_BINARY: /* Case for writing to child Stdin in binary mode. */ fd1 = _open_osfhandle((long)hChildStdinWrDup, mode); f1 = _fdopen(fd1, "wb"); f = PyFile_FromFile(f1, cmdstring, "wb", _PyPclose); PyFile_SetBufSize(f, 0); /* We don't care about these pipes anymore, so close them. */ CloseHandle(hChildStdoutRdDup); CloseHandle(hChildStderrRdDup); break; } file_count = 1; break; case POPEN_2: case POPEN_4: { char *m1, *m2; PyObject *p1, *p2; if (mode & _O_TEXT) { m1 = "r"; m2 = "w"; } else { m1 = "rb"; m2 = "wb"; } fd1 = _open_osfhandle((long)hChildStdinWrDup, mode); f1 = _fdopen(fd1, m2); fd2 = _open_osfhandle((long)hChildStdoutRdDup, mode); f2 = _fdopen(fd2, m1); p1 = PyFile_FromFile(f1, cmdstring, m2, _PyPclose); PyFile_SetBufSize(p1, 0); p2 = PyFile_FromFile(f2, cmdstring, m1, _PyPclose); PyFile_SetBufSize(p2, 0); if (n != 4) CloseHandle(hChildStderrRdDup); f = Py_BuildValue("OO",p1,p2); Py_XDECREF(p1); Py_XDECREF(p2); file_count = 2; break; } case POPEN_3: { char *m1, *m2; PyObject *p1, *p2, *p3; if (mode & _O_TEXT) { m1 = "r"; m2 = "w"; } else { m1 = "rb"; m2 = "wb"; } fd1 = _open_osfhandle((long)hChildStdinWrDup, mode); f1 = _fdopen(fd1, m2); fd2 = _open_osfhandle((long)hChildStdoutRdDup, mode); f2 = _fdopen(fd2, m1); fd3 = _open_osfhandle((long)hChildStderrRdDup, mode); f3 = _fdopen(fd3, m1); p1 = PyFile_FromFile(f1, cmdstring, m2, _PyPclose); p2 = PyFile_FromFile(f2, cmdstring, m1, _PyPclose); p3 = PyFile_FromFile(f3, cmdstring, m1, _PyPclose); PyFile_SetBufSize(p1, 0); PyFile_SetBufSize(p2, 0); PyFile_SetBufSize(p3, 0); f = Py_BuildValue("OOO",p1,p2,p3); Py_XDECREF(p1); Py_XDECREF(p2); Py_XDECREF(p3); file_count = 3; break; } } if (n == POPEN_4) { if (!_PyPopenCreateProcess(cmdstring, hChildStdinRd, hChildStdoutWr, hChildStdoutWr, &hProcess)) return NULL; } else { if (!_PyPopenCreateProcess(cmdstring, hChildStdinRd, hChildStdoutWr, hChildStderrWr, &hProcess)) return NULL; } /* * Insert the files we've created into the process dictionary * all referencing the list with the process handle and the * initial number of files (see description below in _PyPclose). * Since if _PyPclose later tried to wait on a process when all * handles weren't closed, it could create a deadlock with the * child, we spend some energy here to try to ensure that we * either insert all file handles into the dictionary or none * at all. It's a little clumsy with the various popen modes * and variable number of files involved. */ if (!_PyPopenProcs) { _PyPopenProcs = PyDict_New(); } if (_PyPopenProcs) { PyObject *procObj, *hProcessObj, *intObj, *fileObj[3]; int ins_rc[3]; fileObj[0] = fileObj[1] = fileObj[2] = NULL; ins_rc[0] = ins_rc[1] = ins_rc[2] = 0; procObj = PyList_New(2); hProcessObj = PyLong_FromVoidPtr(hProcess); intObj = PyInt_FromLong(file_count); if (procObj && hProcessObj && intObj) { PyList_SetItem(procObj,0,hProcessObj); PyList_SetItem(procObj,1,intObj); fileObj[0] = PyLong_FromVoidPtr(f1); if (fileObj[0]) { ins_rc[0] = PyDict_SetItem(_PyPopenProcs, fileObj[0], procObj); } if (file_count >= 2) { fileObj[1] = PyLong_FromVoidPtr(f2); if (fileObj[1]) { ins_rc[1] = PyDict_SetItem(_PyPopenProcs, fileObj[1], procObj); } } if (file_count >= 3) { fileObj[2] = PyLong_FromVoidPtr(f3); if (fileObj[2]) { ins_rc[2] = PyDict_SetItem(_PyPopenProcs, fileObj[2], procObj); } } if (ins_rc[0] < 0 || !fileObj[0] || ins_rc[1] < 0 || (file_count > 1 && !fileObj[1]) || ins_rc[2] < 0 || (file_count > 2 && !fileObj[2])) { /* Something failed - remove any dictionary * entries that did make it. */ if (!ins_rc[0] && fileObj[0]) { PyDict_DelItem(_PyPopenProcs, fileObj[0]); } if (!ins_rc[1] && fileObj[1]) { PyDict_DelItem(_PyPopenProcs, fileObj[1]); } if (!ins_rc[2] && fileObj[2]) { PyDict_DelItem(_PyPopenProcs, fileObj[2]); } } } /* * Clean up our localized references for the dictionary keys * and value since PyDict_SetItem will Py_INCREF any copies * that got placed in the dictionary. */ Py_XDECREF(procObj); Py_XDECREF(fileObj[0]); Py_XDECREF(fileObj[1]); Py_XDECREF(fileObj[2]); } /* Child is launched. Close the parents copy of those pipe * handles that only the child should have open. You need to * make sure that no handles to the write end of the output pipe * are maintained in this process or else the pipe will not close * when the child process exits and the ReadFile will hang. */ if (!CloseHandle(hChildStdinRd)) return win32_error("CloseHandle", NULL); if (!CloseHandle(hChildStdoutWr)) return win32_error("CloseHandle", NULL); if ((n != 4) && (!CloseHandle(hChildStderrWr))) return win32_error("CloseHandle", NULL); return f; } /* * Wrapper for fclose() to use for popen* files, so we can retrieve the * exit code for the child process and return as a result of the close. * * This function uses the _PyPopenProcs dictionary in order to map the * input file pointer to information about the process that was * originally created by the popen* call that created the file pointer. * The dictionary uses the file pointer as a key (with one entry * inserted for each file returned by the original popen* call) and a * single list object as the value for all files from a single call. * The list object contains the Win32 process handle at [0], and a file * count at [1], which is initialized to the total number of file * handles using that list. * * This function closes whichever handle it is passed, and decrements * the file count in the dictionary for the process handle pointed to * by this file. On the last close (when the file count reaches zero), * this function will wait for the child process and then return its * exit code as the result of the close() operation. This permits the * files to be closed in any order - it is always the close() of the * final handle that will return the exit code. * * NOTE: This function is currently called with the GIL released. * hence we use the GILState API to manage our state. */ static int _PyPclose(FILE *file) { int result; DWORD exit_code; HANDLE hProcess; PyObject *procObj, *hProcessObj, *intObj, *fileObj; long file_count; #ifdef WITH_THREAD PyGILState_STATE state; #endif /* Close the file handle first, to ensure it can't block the * child from exiting if it's the last handle. */ result = fclose(file); #ifdef WITH_THREAD state = PyGILState_Ensure(); #endif if (_PyPopenProcs) { if ((fileObj = PyLong_FromVoidPtr(file)) != NULL && (procObj = PyDict_GetItem(_PyPopenProcs, fileObj)) != NULL && (hProcessObj = PyList_GetItem(procObj,0)) != NULL && (intObj = PyList_GetItem(procObj,1)) != NULL) { hProcess = PyLong_AsVoidPtr(hProcessObj); file_count = PyInt_AsLong(intObj); if (file_count > 1) { /* Still other files referencing process */ file_count--; PyList_SetItem(procObj,1, PyInt_FromLong(file_count)); } else { /* Last file for this process */ if (result != EOF && WaitForSingleObject(hProcess, INFINITE) != WAIT_FAILED && GetExitCodeProcess(hProcess, &exit_code)) { /* Possible truncation here in 16-bit environments, but * real exit codes are just the lower byte in any event. */ result = exit_code; } else { /* Indicate failure - this will cause the file object * to raise an I/O error and translate the last Win32 * error code from errno. We do have a problem with * last errors that overlap the normal errno table, * but that's a consistent problem with the file object. */ if (result != EOF) { /* If the error wasn't from the fclose(), then * set errno for the file object error handling. */ errno = GetLastError(); } result = -1; } /* Free up the native handle at this point */ CloseHandle(hProcess); } /* Remove this file pointer from dictionary */ PyDict_DelItem(_PyPopenProcs, fileObj); if (PyDict_Size(_PyPopenProcs) == 0) { Py_DECREF(_PyPopenProcs); _PyPopenProcs = NULL; } } /* if object retrieval ok */ Py_XDECREF(fileObj); } /* if _PyPopenProcs */ #ifdef WITH_THREAD PyGILState_Release(state); #endif return result; } #else /* which OS? */ static PyObject * posix_popen(PyObject *self, PyObject *args) { char *name; char *mode = "r"; int bufsize = -1; FILE *fp; PyObject *f; if (!PyArg_ParseTuple(args, "s|si:popen", &name, &mode, &bufsize)) return NULL; /* Strip mode of binary or text modifiers */ if (strcmp(mode, "rb") == 0 || strcmp(mode, "rt") == 0) mode = "r"; else if (strcmp(mode, "wb") == 0 || strcmp(mode, "wt") == 0) mode = "w"; Py_BEGIN_ALLOW_THREADS fp = popen(name, mode); Py_END_ALLOW_THREADS if (fp == NULL) return posix_error(); f = PyFile_FromFile(fp, name, mode, pclose); if (f != NULL) PyFile_SetBufSize(f, bufsize); return f; } #endif /* PYOS_??? */ #endif /* HAVE_POPEN */ #ifdef HAVE_SETUID PyDoc_STRVAR(posix_setuid__doc__, "setuid(uid)\n\n\ Set the current process's user id."); static PyObject * posix_setuid(PyObject *self, PyObject *args) { int uid; if (!PyArg_ParseTuple(args, "i:setuid", &uid)) return NULL; if (setuid(uid) < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_SETUID */ #ifdef HAVE_SETEUID PyDoc_STRVAR(posix_seteuid__doc__, "seteuid(uid)\n\n\ Set the current process's effective user id."); static PyObject * posix_seteuid (PyObject *self, PyObject *args) { int euid; if (!PyArg_ParseTuple(args, "i", &euid)) { return NULL; } else if (seteuid(euid) < 0) { return posix_error(); } else { Py_INCREF(Py_None); return Py_None; } } #endif /* HAVE_SETEUID */ #ifdef HAVE_SETEGID PyDoc_STRVAR(posix_setegid__doc__, "setegid(gid)\n\n\ Set the current process's effective group id."); static PyObject * posix_setegid (PyObject *self, PyObject *args) { int egid; if (!PyArg_ParseTuple(args, "i", &egid)) { return NULL; } else if (setegid(egid) < 0) { return posix_error(); } else { Py_INCREF(Py_None); return Py_None; } } #endif /* HAVE_SETEGID */ #ifdef HAVE_SETREUID PyDoc_STRVAR(posix_setreuid__doc__, "setreuid(ruid, euid)\n\n\ Set the current process's real and effective user ids."); static PyObject * posix_setreuid (PyObject *self, PyObject *args) { int ruid, euid; if (!PyArg_ParseTuple(args, "ii", &ruid, &euid)) { return NULL; } else if (setreuid(ruid, euid) < 0) { return posix_error(); } else { Py_INCREF(Py_None); return Py_None; } } #endif /* HAVE_SETREUID */ #ifdef HAVE_SETREGID PyDoc_STRVAR(posix_setregid__doc__, "setregid(rgid, egid)\n\n\ Set the current process's real and effective group ids."); static PyObject * posix_setregid (PyObject *self, PyObject *args) { int rgid, egid; if (!PyArg_ParseTuple(args, "ii", &rgid, &egid)) { return NULL; } else if (setregid(rgid, egid) < 0) { return posix_error(); } else { Py_INCREF(Py_None); return Py_None; } } #endif /* HAVE_SETREGID */ #ifdef HAVE_SETGID PyDoc_STRVAR(posix_setgid__doc__, "setgid(gid)\n\n\ Set the current process's group id."); static PyObject * posix_setgid(PyObject *self, PyObject *args) { int gid; if (!PyArg_ParseTuple(args, "i:setgid", &gid)) return NULL; if (setgid(gid) < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_SETGID */ #ifdef HAVE_SETGROUPS PyDoc_STRVAR(posix_setgroups__doc__, "setgroups(list)\n\n\ Set the groups of the current process to list."); static PyObject * posix_setgroups(PyObject *self, PyObject *args) { PyObject *groups; int i, len; gid_t grouplist[MAX_GROUPS]; if (!PyArg_ParseTuple(args, "O:setgid", &groups)) return NULL; if (!PySequence_Check(groups)) { PyErr_SetString(PyExc_TypeError, "setgroups argument must be a sequence"); return NULL; } len = PySequence_Size(groups); if (len > MAX_GROUPS) { PyErr_SetString(PyExc_ValueError, "too many groups"); return NULL; } for(i = 0; i < len; i++) { PyObject *elem; elem = PySequence_GetItem(groups, i); if (!elem) return NULL; if (!PyInt_Check(elem)) { PyErr_SetString(PyExc_TypeError, "groups must be integers"); Py_DECREF(elem); return NULL; } /* XXX: check that value fits into gid_t. */ grouplist[i] = PyInt_AsLong(elem); Py_DECREF(elem); } if (setgroups(len, grouplist) < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_SETGROUPS */ #ifdef HAVE_WAITPID PyDoc_STRVAR(posix_waitpid__doc__, "waitpid(pid, options) -> (pid, status)\n\n\ Wait for completion of a given child process."); static PyObject * posix_waitpid(PyObject *self, PyObject *args) { int pid, options; #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "ii:waitpid", &pid, &options)) return NULL; Py_BEGIN_ALLOW_THREADS pid = waitpid(pid, &status, options); Py_END_ALLOW_THREADS if (pid == -1) return posix_error(); else return Py_BuildValue("ii", pid, status_i); } #elif defined(HAVE_CWAIT) /* MS C has a variant of waitpid() that's usable for most purposes. */ PyDoc_STRVAR(posix_waitpid__doc__, "waitpid(pid, options) -> (pid, status << 8)\n\n" "Wait for completion of a given process. options is ignored on Windows."); static PyObject * posix_waitpid(PyObject *self, PyObject *args) { int pid, options; int status; if (!PyArg_ParseTuple(args, "ii:waitpid", &pid, &options)) return NULL; Py_BEGIN_ALLOW_THREADS pid = _cwait(&status, pid, options); Py_END_ALLOW_THREADS if (pid == -1) return posix_error(); else /* shift the status left a byte so this is more like the POSIX waitpid */ return Py_BuildValue("ii", pid, status << 8); } #endif /* HAVE_WAITPID || HAVE_CWAIT */ #ifdef HAVE_WAIT PyDoc_STRVAR(posix_wait__doc__, "wait() -> (pid, status)\n\n\ Wait for completion of a child process."); static PyObject * posix_wait(PyObject *self, PyObject *noargs) { int pid; #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; Py_BEGIN_ALLOW_THREADS pid = wait(&status); Py_END_ALLOW_THREADS if (pid == -1) return posix_error(); else return Py_BuildValue("ii", pid, status_i); #undef status_i } #endif PyDoc_STRVAR(posix_lstat__doc__, "lstat(path) -> stat result\n\n\ Like stat(path), but do not follow symbolic links."); static PyObject * posix_lstat(PyObject *self, PyObject *args) { #ifdef HAVE_LSTAT return posix_do_stat(self, args, "et:lstat", lstat, NULL, NULL); #else /* !HAVE_LSTAT */ #ifdef MS_WINDOWS return posix_do_stat(self, args, "et:lstat", STAT, "U:lstat", _wstati64); #else return posix_do_stat(self, args, "et:lstat", STAT, NULL, NULL); #endif #endif /* !HAVE_LSTAT */ } #ifdef HAVE_READLINK PyDoc_STRVAR(posix_readlink__doc__, "readlink(path) -> path\n\n\ Return a string representing the path to which the symbolic link points."); static PyObject * posix_readlink(PyObject *self, PyObject *args) { char buf[MAXPATHLEN]; char *path; int n; if (!PyArg_ParseTuple(args, "s:readlink", &path)) return NULL; Py_BEGIN_ALLOW_THREADS n = readlink(path, buf, (int) sizeof buf); Py_END_ALLOW_THREADS if (n < 0) return posix_error_with_filename(path); return PyString_FromStringAndSize(buf, n); } #endif /* HAVE_READLINK */ #ifdef HAVE_SYMLINK PyDoc_STRVAR(posix_symlink__doc__, "symlink(src, dst)\n\n\ Create a symbolic link pointing to src named dst."); static PyObject * posix_symlink(PyObject *self, PyObject *args) { return posix_2str(args, "etet:symlink", symlink, NULL, NULL); } #endif /* HAVE_SYMLINK */ #ifdef HAVE_TIMES #ifndef HZ #define HZ 60 /* Universal constant :-) */ #endif /* HZ */ #if defined(PYCC_VACPP) && defined(PYOS_OS2) static long system_uptime(void) { ULONG value = 0; Py_BEGIN_ALLOW_THREADS DosQuerySysInfo(QSV_MS_COUNT, QSV_MS_COUNT, &value, sizeof(value)); Py_END_ALLOW_THREADS return value; } static PyObject * posix_times(PyObject *self, PyObject *noargs) { /* Currently Only Uptime is Provided -- Others Later */ return Py_BuildValue("ddddd", (double)0 /* t.tms_utime / HZ */, (double)0 /* t.tms_stime / HZ */, (double)0 /* t.tms_cutime / HZ */, (double)0 /* t.tms_cstime / HZ */, (double)system_uptime() / 1000); } #else /* not OS2 */ static PyObject * posix_times(PyObject *self, PyObject *noargs) { struct tms t; clock_t c; errno = 0; c = times(&t); if (c == (clock_t) -1) return posix_error(); return Py_BuildValue("ddddd", (double)t.tms_utime / HZ, (double)t.tms_stime / HZ, (double)t.tms_cutime / HZ, (double)t.tms_cstime / HZ, (double)c / HZ); } #endif /* not OS2 */ #endif /* HAVE_TIMES */ #ifdef MS_WINDOWS #define HAVE_TIMES /* so the method table will pick it up */ static PyObject * posix_times(PyObject *self, PyObject *noargs) { FILETIME create, exit, kernel, user; HANDLE hProc; hProc = GetCurrentProcess(); GetProcessTimes(hProc, &create, &exit, &kernel, &user); /* The fields of a FILETIME structure are the hi and lo part of a 64-bit value expressed in 100 nanosecond units. 1e7 is one second in such units; 1e-7 the inverse. 429.4967296 is 2**32 / 1e7 or 2**32 * 1e-7. */ return Py_BuildValue( "ddddd", (double)(kernel.dwHighDateTime*429.4967296 + kernel.dwLowDateTime*1e-7), (double)(user.dwHighDateTime*429.4967296 + user.dwLowDateTime*1e-7), (double)0, (double)0, (double)0); } #endif /* MS_WINDOWS */ #ifdef HAVE_TIMES PyDoc_STRVAR(posix_times__doc__, "times() -> (utime, stime, cutime, cstime, elapsed_time)\n\n\ Return a tuple of floating point numbers indicating process times."); #endif #ifdef HAVE_SETSID PyDoc_STRVAR(posix_setsid__doc__, "setsid()\n\n\ Call the system call setsid()."); static PyObject * posix_setsid(PyObject *self, PyObject *noargs) { if (setsid() < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_SETSID */ #ifdef HAVE_SETPGID PyDoc_STRVAR(posix_setpgid__doc__, "setpgid(pid, pgrp)\n\n\ Call the system call setpgid()."); static PyObject * posix_setpgid(PyObject *self, PyObject *args) { int pid, pgrp; if (!PyArg_ParseTuple(args, "ii:setpgid", &pid, &pgrp)) return NULL; if (setpgid(pid, pgrp) < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_SETPGID */ #ifdef HAVE_TCGETPGRP PyDoc_STRVAR(posix_tcgetpgrp__doc__, "tcgetpgrp(fd) -> pgid\n\n\ Return the process group associated with the terminal given by a fd."); static PyObject * posix_tcgetpgrp(PyObject *self, PyObject *args) { int fd, pgid; if (!PyArg_ParseTuple(args, "i:tcgetpgrp", &fd)) return NULL; pgid = tcgetpgrp(fd); if (pgid < 0) return posix_error(); return PyInt_FromLong((long)pgid); } #endif /* HAVE_TCGETPGRP */ #ifdef HAVE_TCSETPGRP PyDoc_STRVAR(posix_tcsetpgrp__doc__, "tcsetpgrp(fd, pgid)\n\n\ Set the process group associated with the terminal given by a fd."); static PyObject * posix_tcsetpgrp(PyObject *self, PyObject *args) { int fd, pgid; if (!PyArg_ParseTuple(args, "ii:tcsetpgrp", &fd, &pgid)) return NULL; if (tcsetpgrp(fd, pgid) < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_TCSETPGRP */ /* Functions acting on file descriptors */ PyDoc_STRVAR(posix_open__doc__, "open(filename, flag [, mode=0777]) -> fd\n\n\ Open a file (for low level IO)."); static PyObject * posix_open(PyObject *self, PyObject *args) { char *file = NULL; int flag; int mode = 0777; int fd; #ifdef MS_WINDOWS if (unicode_file_names()) { PyUnicodeObject *po; if (PyArg_ParseTuple(args, "Ui|i:mkdir", &po, &flag, &mode)) { Py_BEGIN_ALLOW_THREADS /* PyUnicode_AS_UNICODE OK without thread lock as it is a simple dereference. */ fd = _wopen(PyUnicode_AS_UNICODE(po), flag, mode); Py_END_ALLOW_THREADS if (fd < 0) return posix_error(); return PyInt_FromLong((long)fd); } /* Drop the argument parsing error as narrow strings are also valid. */ PyErr_Clear(); } #endif if (!PyArg_ParseTuple(args, "eti|i", Py_FileSystemDefaultEncoding, &file, &flag, &mode)) return NULL; Py_BEGIN_ALLOW_THREADS fd = open(file, flag, mode); Py_END_ALLOW_THREADS if (fd < 0) return posix_error_with_allocated_filename(file); PyMem_Free(file); return PyInt_FromLong((long)fd); } PyDoc_STRVAR(posix_close__doc__, "close(fd)\n\n\ Close a file descriptor (for low level IO)."); static PyObject * posix_close(PyObject *self, PyObject *args) { int fd, res; if (!PyArg_ParseTuple(args, "i:close", &fd)) return NULL; Py_BEGIN_ALLOW_THREADS res = close(fd); Py_END_ALLOW_THREADS if (res < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(posix_dup__doc__, "dup(fd) -> fd2\n\n\ Return a duplicate of a file descriptor."); static PyObject * posix_dup(PyObject *self, PyObject *args) { int fd; if (!PyArg_ParseTuple(args, "i:dup", &fd)) return NULL; Py_BEGIN_ALLOW_THREADS fd = dup(fd); Py_END_ALLOW_THREADS if (fd < 0) return posix_error(); return PyInt_FromLong((long)fd); } PyDoc_STRVAR(posix_dup2__doc__, "dup2(fd, fd2)\n\n\ Duplicate file descriptor."); static PyObject * posix_dup2(PyObject *self, PyObject *args) { int fd, fd2, res; if (!PyArg_ParseTuple(args, "ii:dup2", &fd, &fd2)) return NULL; Py_BEGIN_ALLOW_THREADS res = dup2(fd, fd2); Py_END_ALLOW_THREADS if (res < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(posix_lseek__doc__, "lseek(fd, pos, how) -> newpos\n\n\ Set the current position of a file descriptor."); static PyObject * posix_lseek(PyObject *self, PyObject *args) { int fd, how; #if defined(MS_WIN64) || defined(MS_WINDOWS) PY_LONG_LONG pos, res; #else off_t pos, res; #endif PyObject *posobj; if (!PyArg_ParseTuple(args, "iOi:lseek", &fd, &posobj, &how)) return NULL; #ifdef SEEK_SET /* Turn 0, 1, 2 into SEEK_{SET,CUR,END} */ switch (how) { case 0: how = SEEK_SET; break; case 1: how = SEEK_CUR; break; case 2: how = SEEK_END; break; } #endif /* SEEK_END */ #if !defined(HAVE_LARGEFILE_SUPPORT) pos = PyInt_AsLong(posobj); #else pos = PyLong_Check(posobj) ? PyLong_AsLongLong(posobj) : PyInt_AsLong(posobj); #endif if (PyErr_Occurred()) return NULL; Py_BEGIN_ALLOW_THREADS #if defined(MS_WIN64) || defined(MS_WINDOWS) res = _lseeki64(fd, pos, how); #else res = lseek(fd, pos, how); #endif Py_END_ALLOW_THREADS if (res < 0) return posix_error(); #if !defined(HAVE_LARGEFILE_SUPPORT) return PyInt_FromLong(res); #else return PyLong_FromLongLong(res); #endif } PyDoc_STRVAR(posix_read__doc__, "read(fd, buffersize) -> string\n\n\ Read a file descriptor."); static PyObject * posix_read(PyObject *self, PyObject *args) { int fd, size, n; PyObject *buffer; if (!PyArg_ParseTuple(args, "ii:read", &fd, &size)) return NULL; buffer = PyString_FromStringAndSize((char *)NULL, size); if (buffer == NULL) return NULL; Py_BEGIN_ALLOW_THREADS n = read(fd, PyString_AsString(buffer), size); Py_END_ALLOW_THREADS if (n < 0) { Py_DECREF(buffer); return posix_error(); } if (n != size) _PyString_Resize(&buffer, n); return buffer; } PyDoc_STRVAR(posix_write__doc__, "write(fd, string) -> byteswritten\n\n\ Write a string to a file descriptor."); static PyObject * posix_write(PyObject *self, PyObject *args) { int fd, size; char *buffer; if (!PyArg_ParseTuple(args, "is#:write", &fd, &buffer, &size)) return NULL; Py_BEGIN_ALLOW_THREADS size = write(fd, buffer, size); Py_END_ALLOW_THREADS if (size < 0) return posix_error(); return PyInt_FromLong((long)size); } PyDoc_STRVAR(posix_fstat__doc__, "fstat(fd) -> stat result\n\n\ Like stat(), but for an open file descriptor."); static PyObject * posix_fstat(PyObject *self, PyObject *args) { int fd; STRUCT_STAT st; int res; if (!PyArg_ParseTuple(args, "i:fstat", &fd)) return NULL; #ifdef __VMS /* on OpenVMS we must ensure that all bytes are written to the file */ fsync(fd); #endif Py_BEGIN_ALLOW_THREADS res = FSTAT(fd, &st); Py_END_ALLOW_THREADS if (res != 0) return posix_error(); return _pystat_fromstructstat(st); } PyDoc_STRVAR(posix_fdopen__doc__, "fdopen(fd [, mode='r' [, bufsize]]) -> file_object\n\n\ Return an open file object connected to a file descriptor."); static PyObject * posix_fdopen(PyObject *self, PyObject *args) { int fd; char *mode = "r"; int bufsize = -1; FILE *fp; PyObject *f; if (!PyArg_ParseTuple(args, "i|si", &fd, &mode, &bufsize)) return NULL; if (mode[0] != 'r' && mode[0] != 'w' && mode[0] != 'a') { PyErr_Format(PyExc_ValueError, "invalid file mode '%s'", mode); return NULL; } Py_BEGIN_ALLOW_THREADS fp = fdopen(fd, mode); Py_END_ALLOW_THREADS if (fp == NULL) return posix_error(); f = PyFile_FromFile(fp, "", mode, fclose); if (f != NULL) PyFile_SetBufSize(f, bufsize); return f; } PyDoc_STRVAR(posix_isatty__doc__, "isatty(fd) -> bool\n\n\ Return True if the file descriptor 'fd' is an open file descriptor\n\ connected to the slave end of a terminal."); static PyObject * posix_isatty(PyObject *self, PyObject *args) { int fd; if (!PyArg_ParseTuple(args, "i:isatty", &fd)) return NULL; return PyBool_FromLong(isatty(fd)); } #ifdef HAVE_PIPE PyDoc_STRVAR(posix_pipe__doc__, "pipe() -> (read_end, write_end)\n\n\ Create a pipe."); static PyObject * posix_pipe(PyObject *self, PyObject *noargs) { #if defined(PYOS_OS2) HFILE read, write; APIRET rc; Py_BEGIN_ALLOW_THREADS rc = DosCreatePipe( &read, &write, 4096); Py_END_ALLOW_THREADS if (rc != NO_ERROR) return os2_error(rc); return Py_BuildValue("(ii)", read, write); #else #if !defined(MS_WINDOWS) int fds[2]; int res; Py_BEGIN_ALLOW_THREADS res = pipe(fds); Py_END_ALLOW_THREADS if (res != 0) return posix_error(); return Py_BuildValue("(ii)", fds[0], fds[1]); #else /* MS_WINDOWS */ HANDLE read, write; int read_fd, write_fd; BOOL ok; Py_BEGIN_ALLOW_THREADS ok = CreatePipe(&read, &write, NULL, 0); Py_END_ALLOW_THREADS if (!ok) return win32_error("CreatePipe", NULL); read_fd = _open_osfhandle((Py_intptr_t)read, 0); write_fd = _open_osfhandle((Py_intptr_t)write, 1); return Py_BuildValue("(ii)", read_fd, write_fd); #endif /* MS_WINDOWS */ #endif } #endif /* HAVE_PIPE */ #ifdef HAVE_MKFIFO PyDoc_STRVAR(posix_mkfifo__doc__, "mkfifo(filename [, mode=0666])\n\n\ Create a FIFO (a POSIX named pipe)."); static PyObject * posix_mkfifo(PyObject *self, PyObject *args) { char *filename; int mode = 0666; int res; if (!PyArg_ParseTuple(args, "s|i:mkfifo", &filename, &mode)) return NULL; Py_BEGIN_ALLOW_THREADS res = mkfifo(filename, mode); Py_END_ALLOW_THREADS if (res < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif #if defined(HAVE_MKNOD) && defined(HAVE_MAKEDEV) PyDoc_STRVAR(posix_mknod__doc__, "mknod(filename [, mode=0600, device])\n\n\ Create a filesystem node (file, device special file or named pipe)\n\ named filename. mode specifies both the permissions to use and the\n\ type of node to be created, being combined (bitwise OR) with one of\n\ S_IFREG, S_IFCHR, S_IFBLK, and S_IFIFO. For S_IFCHR and S_IFBLK,\n\ device defines the newly created device special file (probably using\n\ os.makedev()), otherwise it is ignored."); static PyObject * posix_mknod(PyObject *self, PyObject *args) { char *filename; int mode = 0600; int device = 0; int res; if (!PyArg_ParseTuple(args, "s|ii:mknod", &filename, &mode, &device)) return NULL; Py_BEGIN_ALLOW_THREADS res = mknod(filename, mode, device); Py_END_ALLOW_THREADS if (res < 0) return posix_error(); Py_INCREF(Py_None); return Py_None; } #endif #ifdef HAVE_DEVICE_MACROS PyDoc_STRVAR(posix_major__doc__, "major(device) -> major number\n\ Extracts a device major number from a raw device number."); static PyObject * posix_major(PyObject *self, PyObject *args) { int device; if (!PyArg_ParseTuple(args, "i:major", &device)) return NULL; return PyInt_FromLong((long)major(device)); } PyDoc_STRVAR(posix_minor__doc__, "minor(device) -> minor number\n\ Extracts a device minor number from a raw device number."); static PyObject * posix_minor(PyObject *self, PyObject *args) { int device; if (!PyArg_ParseTuple(args, "i:minor", &device)) return NULL; return PyInt_FromLong((long)minor(device)); } PyDoc_STRVAR(posix_makedev__doc__, "makedev(major, minor) -> device number\n\ Composes a raw device number from the major and minor device numbers."); static PyObject * posix_makedev(PyObject *self, PyObject *args) { int major, minor; if (!PyArg_ParseTuple(args, "ii:makedev", &major, &minor)) return NULL; return PyInt_FromLong((long)makedev(major, minor)); } #endif /* device macros */ #ifdef HAVE_FTRUNCATE PyDoc_STRVAR(posix_ftruncate__doc__, "ftruncate(fd, length)\n\n\ Truncate a file to a specified length."); static PyObject * posix_ftruncate(PyObject *self, PyObject *args) { int fd; off_t length; int res; PyObject *lenobj; if (!PyArg_ParseTuple(args, "iO:ftruncate", &fd, &lenobj)) return NULL; #if !defined(HAVE_LARGEFILE_SUPPORT) length = PyInt_AsLong(lenobj); #else length = PyLong_Check(lenobj) ? PyLong_AsLongLong(lenobj) : PyInt_AsLong(lenobj); #endif if (PyErr_Occurred()) return NULL; Py_BEGIN_ALLOW_THREADS res = ftruncate(fd, length); Py_END_ALLOW_THREADS if (res < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } Py_INCREF(Py_None); return Py_None; } #endif #ifdef HAVE_PUTENV PyDoc_STRVAR(posix_putenv__doc__, "putenv(key, value)\n\n\ Change or add an environment variable."); /* Save putenv() parameters as values here, so we can collect them when they * get re-set with another call for the same key. */ static PyObject *posix_putenv_garbage; static PyObject * posix_putenv(PyObject *self, PyObject *args) { char *s1, *s2; char *new; PyObject *newstr; size_t len; if (!PyArg_ParseTuple(args, "ss:putenv", &s1, &s2)) return NULL; #if defined(PYOS_OS2) if (stricmp(s1, "BEGINLIBPATH") == 0) { APIRET rc; rc = DosSetExtLIBPATH(s2, BEGIN_LIBPATH); if (rc != NO_ERROR) return os2_error(rc); } else if (stricmp(s1, "ENDLIBPATH") == 0) { APIRET rc; rc = DosSetExtLIBPATH(s2, END_LIBPATH); if (rc != NO_ERROR) return os2_error(rc); } else { #endif /* XXX This can leak memory -- not easy to fix :-( */ len = strlen(s1) + strlen(s2) + 2; /* len includes space for a trailing \0; the size arg to PyString_FromStringAndSize does not count that */ newstr = PyString_FromStringAndSize(NULL, (int)len - 1); if (newstr == NULL) return PyErr_NoMemory(); new = PyString_AS_STRING(newstr); PyOS_snprintf(new, len, "%s=%s", s1, s2); if (putenv(new)) { Py_DECREF(newstr); posix_error(); return NULL; } /* Install the first arg and newstr in posix_putenv_garbage; * this will cause previous value to be collected. This has to * happen after the real putenv() call because the old value * was still accessible until then. */ if (PyDict_SetItem(posix_putenv_garbage, PyTuple_GET_ITEM(args, 0), newstr)) { /* really not much we can do; just leak */ PyErr_Clear(); } else { Py_DECREF(newstr); } #if defined(PYOS_OS2) } #endif Py_INCREF(Py_None); return Py_None; } #endif /* putenv */ #ifdef HAVE_UNSETENV PyDoc_STRVAR(posix_unsetenv__doc__, "unsetenv(key)\n\n\ Delete an environment variable."); static PyObject * posix_unsetenv(PyObject *self, PyObject *args) { char *s1; if (!PyArg_ParseTuple(args, "s:unsetenv", &s1)) return NULL; unsetenv(s1); /* Remove the key from posix_putenv_garbage; * this will cause it to be collected. This has to * happen after the real unsetenv() call because the * old value was still accessible until then. */ if (PyDict_DelItem(posix_putenv_garbage, PyTuple_GET_ITEM(args, 0))) { /* really not much we can do; just leak */ PyErr_Clear(); } Py_INCREF(Py_None); return Py_None; } #endif /* unsetenv */ #ifdef HAVE_STRERROR PyDoc_STRVAR(posix_strerror__doc__, "strerror(code) -> string\n\n\ Translate an error code to a message string."); static PyObject * posix_strerror(PyObject *self, PyObject *args) { int code; char *message; if (!PyArg_ParseTuple(args, "i:strerror", &code)) return NULL; message = strerror(code); if (message == NULL) { PyErr_SetString(PyExc_ValueError, "strerror() argument out of range"); return NULL; } return PyString_FromString(message); } #endif /* strerror */ #ifdef HAVE_SYS_WAIT_H #ifdef WCOREDUMP PyDoc_STRVAR(posix_WCOREDUMP__doc__, "WCOREDUMP(status) -> bool\n\n\ Return True if the process returning 'status' was dumped to a core file."); static PyObject * posix_WCOREDUMP(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WCOREDUMP", &status_i)) { return NULL; } return PyBool_FromLong(WCOREDUMP(status)); #undef status_i } #endif /* WCOREDUMP */ #ifdef WIFCONTINUED PyDoc_STRVAR(posix_WIFCONTINUED__doc__, "WIFCONTINUED(status) -> bool\n\n\ Return True if the process returning 'status' was continued from a\n\ job control stop."); static PyObject * posix_WIFCONTINUED(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WCONTINUED", &status_i)) { return NULL; } return PyBool_FromLong(WIFCONTINUED(status)); #undef status_i } #endif /* WIFCONTINUED */ #ifdef WIFSTOPPED PyDoc_STRVAR(posix_WIFSTOPPED__doc__, "WIFSTOPPED(status) -> bool\n\n\ Return True if the process returning 'status' was stopped."); static PyObject * posix_WIFSTOPPED(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WIFSTOPPED", &status_i)) { return NULL; } return PyBool_FromLong(WIFSTOPPED(status)); #undef status_i } #endif /* WIFSTOPPED */ #ifdef WIFSIGNALED PyDoc_STRVAR(posix_WIFSIGNALED__doc__, "WIFSIGNALED(status) -> bool\n\n\ Return True if the process returning 'status' was terminated by a signal."); static PyObject * posix_WIFSIGNALED(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WIFSIGNALED", &status_i)) { return NULL; } return PyBool_FromLong(WIFSIGNALED(status)); #undef status_i } #endif /* WIFSIGNALED */ #ifdef WIFEXITED PyDoc_STRVAR(posix_WIFEXITED__doc__, "WIFEXITED(status) -> bool\n\n\ Return true if the process returning 'status' exited using the exit()\n\ system call."); static PyObject * posix_WIFEXITED(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WIFEXITED", &status_i)) { return NULL; } return PyBool_FromLong(WIFEXITED(status)); #undef status_i } #endif /* WIFEXITED */ #ifdef WEXITSTATUS PyDoc_STRVAR(posix_WEXITSTATUS__doc__, "WEXITSTATUS(status) -> integer\n\n\ Return the process return code from 'status'."); static PyObject * posix_WEXITSTATUS(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WEXITSTATUS", &status_i)) { return NULL; } return Py_BuildValue("i", WEXITSTATUS(status)); #undef status_i } #endif /* WEXITSTATUS */ #ifdef WTERMSIG PyDoc_STRVAR(posix_WTERMSIG__doc__, "WTERMSIG(status) -> integer\n\n\ Return the signal that terminated the process that provided the 'status'\n\ value."); static PyObject * posix_WTERMSIG(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WTERMSIG", &status_i)) { return NULL; } return Py_BuildValue("i", WTERMSIG(status)); #undef status_i } #endif /* WTERMSIG */ #ifdef WSTOPSIG PyDoc_STRVAR(posix_WSTOPSIG__doc__, "WSTOPSIG(status) -> integer\n\n\ Return the signal that stopped the process that provided\n\ the 'status' value."); static PyObject * posix_WSTOPSIG(PyObject *self, PyObject *args) { #ifdef UNION_WAIT union wait status; #define status_i (status.w_status) #else int status; #define status_i status #endif status_i = 0; if (!PyArg_ParseTuple(args, "i:WSTOPSIG", &status_i)) { return NULL; } return Py_BuildValue("i", WSTOPSIG(status)); #undef status_i } #endif /* WSTOPSIG */ #endif /* HAVE_SYS_WAIT_H */ #if defined(HAVE_FSTATVFS) #ifdef _SCO_DS /* SCO OpenServer 5.0 and later requires _SVID3 before it reveals the needed definitions in sys/statvfs.h */ #define _SVID3 #endif #include static PyObject* _pystatvfs_fromstructstatvfs(struct statvfs st) { PyObject *v = PyStructSequence_New(&StatVFSResultType); if (v == NULL) return NULL; #if !defined(HAVE_LARGEFILE_SUPPORT) PyStructSequence_SET_ITEM(v, 0, PyInt_FromLong((long) st.f_bsize)); PyStructSequence_SET_ITEM(v, 1, PyInt_FromLong((long) st.f_frsize)); PyStructSequence_SET_ITEM(v, 2, PyInt_FromLong((long) st.f_blocks)); PyStructSequence_SET_ITEM(v, 3, PyInt_FromLong((long) st.f_bfree)); PyStructSequence_SET_ITEM(v, 4, PyInt_FromLong((long) st.f_bavail)); PyStructSequence_SET_ITEM(v, 5, PyInt_FromLong((long) st.f_files)); PyStructSequence_SET_ITEM(v, 6, PyInt_FromLong((long) st.f_ffree)); PyStructSequence_SET_ITEM(v, 7, PyInt_FromLong((long) st.f_favail)); PyStructSequence_SET_ITEM(v, 8, PyInt_FromLong((long) st.f_flag)); PyStructSequence_SET_ITEM(v, 9, PyInt_FromLong((long) st.f_namemax)); #else PyStructSequence_SET_ITEM(v, 0, PyInt_FromLong((long) st.f_bsize)); PyStructSequence_SET_ITEM(v, 1, PyInt_FromLong((long) st.f_frsize)); PyStructSequence_SET_ITEM(v, 2, PyLong_FromLongLong((PY_LONG_LONG) st.f_blocks)); PyStructSequence_SET_ITEM(v, 3, PyLong_FromLongLong((PY_LONG_LONG) st.f_bfree)); PyStructSequence_SET_ITEM(v, 4, PyLong_FromLongLong((PY_LONG_LONG) st.f_bavail)); PyStructSequence_SET_ITEM(v, 5, PyLong_FromLongLong((PY_LONG_LONG) st.f_files)); PyStructSequence_SET_ITEM(v, 6, PyLong_FromLongLong((PY_LONG_LONG) st.f_ffree)); PyStructSequence_SET_ITEM(v, 7, PyLong_FromLongLong((PY_LONG_LONG) st.f_favail)); PyStructSequence_SET_ITEM(v, 8, PyInt_FromLong((long) st.f_flag)); PyStructSequence_SET_ITEM(v, 9, PyInt_FromLong((long) st.f_namemax)); #endif return v; } PyDoc_STRVAR(posix_fstatvfs__doc__, "fstatvfs(fd) -> statvfs result\n\n\ Perform an fstatvfs system call on the given fd."); static PyObject * posix_fstatvfs(PyObject *self, PyObject *args) { int fd, res; struct statvfs st; if (!PyArg_ParseTuple(args, "i:fstatvfs", &fd)) return NULL; Py_BEGIN_ALLOW_THREADS res = fstatvfs(fd, &st); Py_END_ALLOW_THREADS if (res != 0) return posix_error(); return _pystatvfs_fromstructstatvfs(st); } #endif /* HAVE_FSTATVFS */ #if defined(HAVE_STATVFS) #include PyDoc_STRVAR(posix_statvfs__doc__, "statvfs(path) -> statvfs result\n\n\ Perform a statvfs system call on the given path."); static PyObject * posix_statvfs(PyObject *self, PyObject *args) { char *path; int res; struct statvfs st; if (!PyArg_ParseTuple(args, "s:statvfs", &path)) return NULL; Py_BEGIN_ALLOW_THREADS res = statvfs(path, &st); Py_END_ALLOW_THREADS if (res != 0) return posix_error_with_filename(path); return _pystatvfs_fromstructstatvfs(st); } #endif /* HAVE_STATVFS */ #ifdef HAVE_TEMPNAM PyDoc_STRVAR(posix_tempnam__doc__, "tempnam([dir[, prefix]]) -> string\n\n\ Return a unique name for a temporary file.\n\ The directory and a prefix may be specified as strings; they may be omitted\n\ or None if not needed."); static PyObject * posix_tempnam(PyObject *self, PyObject *args) { PyObject *result = NULL; char *dir = NULL; char *pfx = NULL; char *name; if (!PyArg_ParseTuple(args, "|zz:tempnam", &dir, &pfx)) return NULL; if (PyErr_Warn(PyExc_RuntimeWarning, "tempnam is a potential security risk to your program") < 0) return NULL; #ifdef MS_WINDOWS name = _tempnam(dir, pfx); #else name = tempnam(dir, pfx); #endif if (name == NULL) return PyErr_NoMemory(); result = PyString_FromString(name); free(name); return result; } #endif #ifdef HAVE_TMPFILE PyDoc_STRVAR(posix_tmpfile__doc__, "tmpfile() -> file object\n\n\ Create a temporary file with no directory entries."); static PyObject * posix_tmpfile(PyObject *self, PyObject *noargs) { FILE *fp; fp = tmpfile(); if (fp == NULL) return posix_error(); return PyFile_FromFile(fp, "", "w+b", fclose); } #endif #ifdef HAVE_TMPNAM PyDoc_STRVAR(posix_tmpnam__doc__, "tmpnam() -> string\n\n\ Return a unique name for a temporary file."); static PyObject * posix_tmpnam(PyObject *self, PyObject *noargs) { char buffer[L_tmpnam]; char *name; if (PyErr_Warn(PyExc_RuntimeWarning, "tmpnam is a potential security risk to your program") < 0) return NULL; #ifdef USE_TMPNAM_R name = tmpnam_r(buffer); #else name = tmpnam(buffer); #endif if (name == NULL) { PyErr_SetObject(PyExc_OSError, Py_BuildValue("is", 0, #ifdef USE_TMPNAM_R "unexpected NULL from tmpnam_r" #else "unexpected NULL from tmpnam" #endif )); return NULL; } return PyString_FromString(buffer); } #endif /* This is used for fpathconf(), pathconf(), confstr() and sysconf(). * It maps strings representing configuration variable names to * integer values, allowing those functions to be called with the * magic names instead of polluting the module's namespace with tons of * rarely-used constants. There are three separate tables that use * these definitions. * * This code is always included, even if none of the interfaces that * need it are included. The #if hackery needed to avoid it would be * sufficiently pervasive that it's not worth the loss of readability. */ struct constdef { char *name; long value; }; static int conv_confname(PyObject *arg, int *valuep, struct constdef *table, size_t tablesize) { if (PyInt_Check(arg)) { *valuep = PyInt_AS_LONG(arg); return 1; } if (PyString_Check(arg)) { /* look up the value in the table using a binary search */ size_t lo = 0; size_t mid; size_t hi = tablesize; int cmp; char *confname = PyString_AS_STRING(arg); while (lo < hi) { mid = (lo + hi) / 2; cmp = strcmp(confname, table[mid].name); if (cmp < 0) hi = mid; else if (cmp > 0) lo = mid + 1; else { *valuep = table[mid].value; return 1; } } PyErr_SetString(PyExc_ValueError, "unrecognized configuration name"); } else PyErr_SetString(PyExc_TypeError, "configuration names must be strings or integers"); return 0; } #if defined(HAVE_FPATHCONF) || defined(HAVE_PATHCONF) static struct constdef posix_constants_pathconf[] = { #ifdef _PC_ABI_AIO_XFER_MAX {"PC_ABI_AIO_XFER_MAX", _PC_ABI_AIO_XFER_MAX}, #endif #ifdef _PC_ABI_ASYNC_IO {"PC_ABI_ASYNC_IO", _PC_ABI_ASYNC_IO}, #endif #ifdef _PC_ASYNC_IO {"PC_ASYNC_IO", _PC_ASYNC_IO}, #endif #ifdef _PC_CHOWN_RESTRICTED {"PC_CHOWN_RESTRICTED", _PC_CHOWN_RESTRICTED}, #endif #ifdef _PC_FILESIZEBITS {"PC_FILESIZEBITS", _PC_FILESIZEBITS}, #endif #ifdef _PC_LAST {"PC_LAST", _PC_LAST}, #endif #ifdef _PC_LINK_MAX {"PC_LINK_MAX", _PC_LINK_MAX}, #endif #ifdef _PC_MAX_CANON {"PC_MAX_CANON", _PC_MAX_CANON}, #endif #ifdef _PC_MAX_INPUT {"PC_MAX_INPUT", _PC_MAX_INPUT}, #endif #ifdef _PC_NAME_MAX {"PC_NAME_MAX", _PC_NAME_MAX}, #endif #ifdef _PC_NO_TRUNC {"PC_NO_TRUNC", _PC_NO_TRUNC}, #endif #ifdef _PC_PATH_MAX {"PC_PATH_MAX", _PC_PATH_MAX}, #endif #ifdef _PC_PIPE_BUF {"PC_PIPE_BUF", _PC_PIPE_BUF}, #endif #ifdef _PC_PRIO_IO {"PC_PRIO_IO", _PC_PRIO_IO}, #endif #ifdef _PC_SOCK_MAXBUF {"PC_SOCK_MAXBUF", _PC_SOCK_MAXBUF}, #endif #ifdef _PC_SYNC_IO {"PC_SYNC_IO", _PC_SYNC_IO}, #endif #ifdef _PC_VDISABLE {"PC_VDISABLE", _PC_VDISABLE}, #endif }; static int conv_path_confname(PyObject *arg, int *valuep) { return conv_confname(arg, valuep, posix_constants_pathconf, sizeof(posix_constants_pathconf) / sizeof(struct constdef)); } #endif #ifdef HAVE_FPATHCONF PyDoc_STRVAR(posix_fpathconf__doc__, "fpathconf(fd, name) -> integer\n\n\ Return the configuration limit name for the file descriptor fd.\n\ If there is no limit, return -1."); static PyObject * posix_fpathconf(PyObject *self, PyObject *args) { PyObject *result = NULL; int name, fd; if (PyArg_ParseTuple(args, "iO&:fpathconf", &fd, conv_path_confname, &name)) { long limit; errno = 0; limit = fpathconf(fd, name); if (limit == -1 && errno != 0) posix_error(); else result = PyInt_FromLong(limit); } return result; } #endif #ifdef HAVE_PATHCONF PyDoc_STRVAR(posix_pathconf__doc__, "pathconf(path, name) -> integer\n\n\ Return the configuration limit name for the file or directory path.\n\ If there is no limit, return -1."); static PyObject * posix_pathconf(PyObject *self, PyObject *args) { PyObject *result = NULL; int name; char *path; if (PyArg_ParseTuple(args, "sO&:pathconf", &path, conv_path_confname, &name)) { long limit; errno = 0; limit = pathconf(path, name); if (limit == -1 && errno != 0) { if (errno == EINVAL) /* could be a path or name problem */ posix_error(); else posix_error_with_filename(path); } else result = PyInt_FromLong(limit); } return result; } #endif #ifdef HAVE_CONFSTR static struct constdef posix_constants_confstr[] = { #ifdef _CS_ARCHITECTURE {"CS_ARCHITECTURE", _CS_ARCHITECTURE}, #endif #ifdef _CS_HOSTNAME {"CS_HOSTNAME", _CS_HOSTNAME}, #endif #ifdef _CS_HW_PROVIDER {"CS_HW_PROVIDER", _CS_HW_PROVIDER}, #endif #ifdef _CS_HW_SERIAL {"CS_HW_SERIAL", _CS_HW_SERIAL}, #endif #ifdef _CS_INITTAB_NAME {"CS_INITTAB_NAME", _CS_INITTAB_NAME}, #endif #ifdef _CS_LFS64_CFLAGS {"CS_LFS64_CFLAGS", _CS_LFS64_CFLAGS}, #endif #ifdef _CS_LFS64_LDFLAGS {"CS_LFS64_LDFLAGS", _CS_LFS64_LDFLAGS}, #endif #ifdef _CS_LFS64_LIBS {"CS_LFS64_LIBS", _CS_LFS64_LIBS}, #endif #ifdef _CS_LFS64_LINTFLAGS {"CS_LFS64_LINTFLAGS", _CS_LFS64_LINTFLAGS}, #endif #ifdef _CS_LFS_CFLAGS {"CS_LFS_CFLAGS", _CS_LFS_CFLAGS}, #endif #ifdef _CS_LFS_LDFLAGS {"CS_LFS_LDFLAGS", _CS_LFS_LDFLAGS}, #endif #ifdef _CS_LFS_LIBS {"CS_LFS_LIBS", _CS_LFS_LIBS}, #endif #ifdef _CS_LFS_LINTFLAGS {"CS_LFS_LINTFLAGS", _CS_LFS_LINTFLAGS}, #endif #ifdef _CS_MACHINE {"CS_MACHINE", _CS_MACHINE}, #endif #ifdef _CS_PATH {"CS_PATH", _CS_PATH}, #endif #ifdef _CS_RELEASE {"CS_RELEASE", _CS_RELEASE}, #endif #ifdef _CS_SRPC_DOMAIN {"CS_SRPC_DOMAIN", _CS_SRPC_DOMAIN}, #endif #ifdef _CS_SYSNAME {"CS_SYSNAME", _CS_SYSNAME}, #endif #ifdef _CS_VERSION {"CS_VERSION", _CS_VERSION}, #endif #ifdef _CS_XBS5_ILP32_OFF32_CFLAGS {"CS_XBS5_ILP32_OFF32_CFLAGS", _CS_XBS5_ILP32_OFF32_CFLAGS}, #endif #ifdef _CS_XBS5_ILP32_OFF32_LDFLAGS {"CS_XBS5_ILP32_OFF32_LDFLAGS", _CS_XBS5_ILP32_OFF32_LDFLAGS}, #endif #ifdef _CS_XBS5_ILP32_OFF32_LIBS {"CS_XBS5_ILP32_OFF32_LIBS", _CS_XBS5_ILP32_OFF32_LIBS}, #endif #ifdef _CS_XBS5_ILP32_OFF32_LINTFLAGS {"CS_XBS5_ILP32_OFF32_LINTFLAGS", _CS_XBS5_ILP32_OFF32_LINTFLAGS}, #endif #ifdef _CS_XBS5_ILP32_OFFBIG_CFLAGS {"CS_XBS5_ILP32_OFFBIG_CFLAGS", _CS_XBS5_ILP32_OFFBIG_CFLAGS}, #endif #ifdef _CS_XBS5_ILP32_OFFBIG_LDFLAGS {"CS_XBS5_ILP32_OFFBIG_LDFLAGS", _CS_XBS5_ILP32_OFFBIG_LDFLAGS}, #endif #ifdef _CS_XBS5_ILP32_OFFBIG_LIBS {"CS_XBS5_ILP32_OFFBIG_LIBS", _CS_XBS5_ILP32_OFFBIG_LIBS}, #endif #ifdef _CS_XBS5_ILP32_OFFBIG_LINTFLAGS {"CS_XBS5_ILP32_OFFBIG_LINTFLAGS", _CS_XBS5_ILP32_OFFBIG_LINTFLAGS}, #endif #ifdef _CS_XBS5_LP64_OFF64_CFLAGS {"CS_XBS5_LP64_OFF64_CFLAGS", _CS_XBS5_LP64_OFF64_CFLAGS}, #endif #ifdef _CS_XBS5_LP64_OFF64_LDFLAGS {"CS_XBS5_LP64_OFF64_LDFLAGS", _CS_XBS5_LP64_OFF64_LDFLAGS}, #endif #ifdef _CS_XBS5_LP64_OFF64_LIBS {"CS_XBS5_LP64_OFF64_LIBS", _CS_XBS5_LP64_OFF64_LIBS}, #endif #ifdef _CS_XBS5_LP64_OFF64_LINTFLAGS {"CS_XBS5_LP64_OFF64_LINTFLAGS", _CS_XBS5_LP64_OFF64_LINTFLAGS}, #endif #ifdef _CS_XBS5_LPBIG_OFFBIG_CFLAGS {"CS_XBS5_LPBIG_OFFBIG_CFLAGS", _CS_XBS5_LPBIG_OFFBIG_CFLAGS}, #endif #ifdef _CS_XBS5_LPBIG_OFFBIG_LDFLAGS {"CS_XBS5_LPBIG_OFFBIG_LDFLAGS", _CS_XBS5_LPBIG_OFFBIG_LDFLAGS}, #endif #ifdef _CS_XBS5_LPBIG_OFFBIG_LIBS {"CS_XBS5_LPBIG_OFFBIG_LIBS", _CS_XBS5_LPBIG_OFFBIG_LIBS}, #endif #ifdef _CS_XBS5_LPBIG_OFFBIG_LINTFLAGS {"CS_XBS5_LPBIG_OFFBIG_LINTFLAGS", _CS_XBS5_LPBIG_OFFBIG_LINTFLAGS}, #endif #ifdef _MIPS_CS_AVAIL_PROCESSORS {"MIPS_CS_AVAIL_PROCESSORS", _MIPS_CS_AVAIL_PROCESSORS}, #endif #ifdef _MIPS_CS_BASE {"MIPS_CS_BASE", _MIPS_CS_BASE}, #endif #ifdef _MIPS_CS_HOSTID {"MIPS_CS_HOSTID", _MIPS_CS_HOSTID}, #endif #ifdef _MIPS_CS_HW_NAME {"MIPS_CS_HW_NAME", _MIPS_CS_HW_NAME}, #endif #ifdef _MIPS_CS_NUM_PROCESSORS {"MIPS_CS_NUM_PROCESSORS", _MIPS_CS_NUM_PROCESSORS}, #endif #ifdef _MIPS_CS_OSREL_MAJ {"MIPS_CS_OSREL_MAJ", _MIPS_CS_OSREL_MAJ}, #endif #ifdef _MIPS_CS_OSREL_MIN {"MIPS_CS_OSREL_MIN", _MIPS_CS_OSREL_MIN}, #endif #ifdef _MIPS_CS_OSREL_PATCH {"MIPS_CS_OSREL_PATCH", _MIPS_CS_OSREL_PATCH}, #endif #ifdef _MIPS_CS_OS_NAME {"MIPS_CS_OS_NAME", _MIPS_CS_OS_NAME}, #endif #ifdef _MIPS_CS_OS_PROVIDER {"MIPS_CS_OS_PROVIDER", _MIPS_CS_OS_PROVIDER}, #endif #ifdef _MIPS_CS_PROCESSORS {"MIPS_CS_PROCESSORS", _MIPS_CS_PROCESSORS}, #endif #ifdef _MIPS_CS_SERIAL {"MIPS_CS_SERIAL", _MIPS_CS_SERIAL}, #endif #ifdef _MIPS_CS_VENDOR {"MIPS_CS_VENDOR", _MIPS_CS_VENDOR}, #endif }; static int conv_confstr_confname(PyObject *arg, int *valuep) { return conv_confname(arg, valuep, posix_constants_confstr, sizeof(posix_constants_confstr) / sizeof(struct constdef)); } PyDoc_STRVAR(posix_confstr__doc__, "confstr(name) -> string\n\n\ Return a string-valued system configuration variable."); static PyObject * posix_confstr(PyObject *self, PyObject *args) { PyObject *result = NULL; int name; char buffer[64]; if (PyArg_ParseTuple(args, "O&:confstr", conv_confstr_confname, &name)) { int len = confstr(name, buffer, sizeof(buffer)); errno = 0; if (len == 0) { if (errno != 0) posix_error(); else result = PyString_FromString(""); } else { if (len >= sizeof(buffer)) { result = PyString_FromStringAndSize(NULL, len); if (result != NULL) confstr(name, PyString_AS_STRING(result), len+1); } else result = PyString_FromString(buffer); } } return result; } #endif #ifdef HAVE_SYSCONF static struct constdef posix_constants_sysconf[] = { #ifdef _SC_2_CHAR_TERM {"SC_2_CHAR_TERM", _SC_2_CHAR_TERM}, #endif #ifdef _SC_2_C_BIND {"SC_2_C_BIND", _SC_2_C_BIND}, #endif #ifdef _SC_2_C_DEV {"SC_2_C_DEV", _SC_2_C_DEV}, #endif #ifdef _SC_2_C_VERSION {"SC_2_C_VERSION", _SC_2_C_VERSION}, #endif #ifdef _SC_2_FORT_DEV {"SC_2_FORT_DEV", _SC_2_FORT_DEV}, #endif #ifdef _SC_2_FORT_RUN {"SC_2_FORT_RUN", _SC_2_FORT_RUN}, #endif #ifdef _SC_2_LOCALEDEF {"SC_2_LOCALEDEF", _SC_2_LOCALEDEF}, #endif #ifdef _SC_2_SW_DEV {"SC_2_SW_DEV", _SC_2_SW_DEV}, #endif #ifdef _SC_2_UPE {"SC_2_UPE", _SC_2_UPE}, #endif #ifdef _SC_2_VERSION {"SC_2_VERSION", _SC_2_VERSION}, #endif #ifdef _SC_ABI_ASYNCHRONOUS_IO {"SC_ABI_ASYNCHRONOUS_IO", _SC_ABI_ASYNCHRONOUS_IO}, #endif #ifdef _SC_ACL {"SC_ACL", _SC_ACL}, #endif #ifdef _SC_AIO_LISTIO_MAX {"SC_AIO_LISTIO_MAX", _SC_AIO_LISTIO_MAX}, #endif #ifdef _SC_AIO_MAX {"SC_AIO_MAX", _SC_AIO_MAX}, #endif #ifdef _SC_AIO_PRIO_DELTA_MAX {"SC_AIO_PRIO_DELTA_MAX", _SC_AIO_PRIO_DELTA_MAX}, #endif #ifdef _SC_ARG_MAX {"SC_ARG_MAX", _SC_ARG_MAX}, #endif #ifdef _SC_ASYNCHRONOUS_IO {"SC_ASYNCHRONOUS_IO", _SC_ASYNCHRONOUS_IO}, #endif #ifdef _SC_ATEXIT_MAX {"SC_ATEXIT_MAX", _SC_ATEXIT_MAX}, #endif #ifdef _SC_AUDIT {"SC_AUDIT", _SC_AUDIT}, #endif #ifdef _SC_AVPHYS_PAGES {"SC_AVPHYS_PAGES", _SC_AVPHYS_PAGES}, #endif #ifdef _SC_BC_BASE_MAX {"SC_BC_BASE_MAX", _SC_BC_BASE_MAX}, #endif #ifdef _SC_BC_DIM_MAX {"SC_BC_DIM_MAX", _SC_BC_DIM_MAX}, #endif #ifdef _SC_BC_SCALE_MAX {"SC_BC_SCALE_MAX", _SC_BC_SCALE_MAX}, #endif #ifdef _SC_BC_STRING_MAX {"SC_BC_STRING_MAX", _SC_BC_STRING_MAX}, #endif #ifdef _SC_CAP {"SC_CAP", _SC_CAP}, #endif #ifdef _SC_CHARCLASS_NAME_MAX {"SC_CHARCLASS_NAME_MAX", _SC_CHARCLASS_NAME_MAX}, #endif #ifdef _SC_CHAR_BIT {"SC_CHAR_BIT", _SC_CHAR_BIT}, #endif #ifdef _SC_CHAR_MAX {"SC_CHAR_MAX", _SC_CHAR_MAX}, #endif #ifdef _SC_CHAR_MIN {"SC_CHAR_MIN", _SC_CHAR_MIN}, #endif #ifdef _SC_CHILD_MAX {"SC_CHILD_MAX", _SC_CHILD_MAX}, #endif #ifdef _SC_CLK_TCK {"SC_CLK_TCK", _SC_CLK_TCK}, #endif #ifdef _SC_COHER_BLKSZ {"SC_COHER_BLKSZ", _SC_COHER_BLKSZ}, #endif #ifdef _SC_COLL_WEIGHTS_MAX {"SC_COLL_WEIGHTS_MAX", _SC_COLL_WEIGHTS_MAX}, #endif #ifdef _SC_DCACHE_ASSOC {"SC_DCACHE_ASSOC", _SC_DCACHE_ASSOC}, #endif #ifdef _SC_DCACHE_BLKSZ {"SC_DCACHE_BLKSZ", _SC_DCACHE_BLKSZ}, #endif #ifdef _SC_DCACHE_LINESZ {"SC_DCACHE_LINESZ", _SC_DCACHE_LINESZ}, #endif #ifdef _SC_DCACHE_SZ {"SC_DCACHE_SZ", _SC_DCACHE_SZ}, #endif #ifdef _SC_DCACHE_TBLKSZ {"SC_DCACHE_TBLKSZ", _SC_DCACHE_TBLKSZ}, #endif #ifdef _SC_DELAYTIMER_MAX {"SC_DELAYTIMER_MAX", _SC_DELAYTIMER_MAX}, #endif #ifdef _SC_EQUIV_CLASS_MAX {"SC_EQUIV_CLASS_MAX", _SC_EQUIV_CLASS_MAX}, #endif #ifdef _SC_EXPR_NEST_MAX {"SC_EXPR_NEST_MAX", _SC_EXPR_NEST_MAX}, #endif #ifdef _SC_FSYNC {"SC_FSYNC", _SC_FSYNC}, #endif #ifdef _SC_GETGR_R_SIZE_MAX {"SC_GETGR_R_SIZE_MAX", _SC_GETGR_R_SIZE_MAX}, #endif #ifdef _SC_GETPW_R_SIZE_MAX {"SC_GETPW_R_SIZE_MAX", _SC_GETPW_R_SIZE_MAX}, #endif #ifdef _SC_ICACHE_ASSOC {"SC_ICACHE_ASSOC", _SC_ICACHE_ASSOC}, #endif #ifdef _SC_ICACHE_BLKSZ {"SC_ICACHE_BLKSZ", _SC_ICACHE_BLKSZ}, #endif #ifdef _SC_ICACHE_LINESZ {"SC_ICACHE_LINESZ", _SC_ICACHE_LINESZ}, #endif #ifdef _SC_ICACHE_SZ {"SC_ICACHE_SZ", _SC_ICACHE_SZ}, #endif #ifdef _SC_INF {"SC_INF", _SC_INF}, #endif #ifdef _SC_INT_MAX {"SC_INT_MAX", _SC_INT_MAX}, #endif #ifdef _SC_INT_MIN {"SC_INT_MIN", _SC_INT_MIN}, #endif #ifdef _SC_IOV_MAX {"SC_IOV_MAX", _SC_IOV_MAX}, #endif #ifdef _SC_IP_SECOPTS {"SC_IP_SECOPTS", _SC_IP_SECOPTS}, #endif #ifdef _SC_JOB_CONTROL {"SC_JOB_CONTROL", _SC_JOB_CONTROL}, #endif #ifdef _SC_KERN_POINTERS {"SC_KERN_POINTERS", _SC_KERN_POINTERS}, #endif #ifdef _SC_KERN_SIM {"SC_KERN_SIM", _SC_KERN_SIM}, #endif #ifdef _SC_LINE_MAX {"SC_LINE_MAX", _SC_LINE_MAX}, #endif #ifdef _SC_LOGIN_NAME_MAX {"SC_LOGIN_NAME_MAX", _SC_LOGIN_NAME_MAX}, #endif #ifdef _SC_LOGNAME_MAX {"SC_LOGNAME_MAX", _SC_LOGNAME_MAX}, #endif #ifdef _SC_LONG_BIT {"SC_LONG_BIT", _SC_LONG_BIT}, #endif #ifdef _SC_MAC {"SC_MAC", _SC_MAC}, #endif #ifdef _SC_MAPPED_FILES {"SC_MAPPED_FILES", _SC_MAPPED_FILES}, #endif #ifdef _SC_MAXPID {"SC_MAXPID", _SC_MAXPID}, #endif #ifdef _SC_MB_LEN_MAX {"SC_MB_LEN_MAX", _SC_MB_LEN_MAX}, #endif #ifdef _SC_MEMLOCK {"SC_MEMLOCK", _SC_MEMLOCK}, #endif #ifdef _SC_MEMLOCK_RANGE {"SC_MEMLOCK_RANGE", _SC_MEMLOCK_RANGE}, #endif #ifdef _SC_MEMORY_PROTECTION {"SC_MEMORY_PROTECTION", _SC_MEMORY_PROTECTION}, #endif #ifdef _SC_MESSAGE_PASSING {"SC_MESSAGE_PASSING", _SC_MESSAGE_PASSING}, #endif #ifdef _SC_MMAP_FIXED_ALIGNMENT {"SC_MMAP_FIXED_ALIGNMENT", _SC_MMAP_FIXED_ALIGNMENT}, #endif #ifdef _SC_MQ_OPEN_MAX {"SC_MQ_OPEN_MAX", _SC_MQ_OPEN_MAX}, #endif #ifdef _SC_MQ_PRIO_MAX {"SC_MQ_PRIO_MAX", _SC_MQ_PRIO_MAX}, #endif #ifdef _SC_NACLS_MAX {"SC_NACLS_MAX", _SC_NACLS_MAX}, #endif #ifdef _SC_NGROUPS_MAX {"SC_NGROUPS_MAX", _SC_NGROUPS_MAX}, #endif #ifdef _SC_NL_ARGMAX {"SC_NL_ARGMAX", _SC_NL_ARGMAX}, #endif #ifdef _SC_NL_LANGMAX {"SC_NL_LANGMAX", _SC_NL_LANGMAX}, #endif #ifdef _SC_NL_MSGMAX {"SC_NL_MSGMAX", _SC_NL_MSGMAX}, #endif #ifdef _SC_NL_NMAX {"SC_NL_NMAX", _SC_NL_NMAX}, #endif #ifdef _SC_NL_SETMAX {"SC_NL_SETMAX", _SC_NL_SETMAX}, #endif #ifdef _SC_NL_TEXTMAX {"SC_NL_TEXTMAX", _SC_NL_TEXTMAX}, #endif #ifdef _SC_NPROCESSORS_CONF {"SC_NPROCESSORS_CONF", _SC_NPROCESSORS_CONF}, #endif #ifdef _SC_NPROCESSORS_ONLN {"SC_NPROCESSORS_ONLN", _SC_NPROCESSORS_ONLN}, #endif #ifdef _SC_NPROC_CONF {"SC_NPROC_CONF", _SC_NPROC_CONF}, #endif #ifdef _SC_NPROC_ONLN {"SC_NPROC_ONLN", _SC_NPROC_ONLN}, #endif #ifdef _SC_NZERO {"SC_NZERO", _SC_NZERO}, #endif #ifdef _SC_OPEN_MAX {"SC_OPEN_MAX", _SC_OPEN_MAX}, #endif #ifdef _SC_PAGESIZE {"SC_PAGESIZE", _SC_PAGESIZE}, #endif #ifdef _SC_PAGE_SIZE {"SC_PAGE_SIZE", _SC_PAGE_SIZE}, #endif #ifdef _SC_PASS_MAX {"SC_PASS_MAX", _SC_PASS_MAX}, #endif #ifdef _SC_PHYS_PAGES {"SC_PHYS_PAGES", _SC_PHYS_PAGES}, #endif #ifdef _SC_PII {"SC_PII", _SC_PII}, #endif #ifdef _SC_PII_INTERNET {"SC_PII_INTERNET", _SC_PII_INTERNET}, #endif #ifdef _SC_PII_INTERNET_DGRAM {"SC_PII_INTERNET_DGRAM", _SC_PII_INTERNET_DGRAM}, #endif #ifdef _SC_PII_INTERNET_STREAM {"SC_PII_INTERNET_STREAM", _SC_PII_INTERNET_STREAM}, #endif #ifdef _SC_PII_OSI {"SC_PII_OSI", _SC_PII_OSI}, #endif #ifdef _SC_PII_OSI_CLTS {"SC_PII_OSI_CLTS", _SC_PII_OSI_CLTS}, #endif #ifdef _SC_PII_OSI_COTS {"SC_PII_OSI_COTS", _SC_PII_OSI_COTS}, #endif #ifdef _SC_PII_OSI_M {"SC_PII_OSI_M", _SC_PII_OSI_M}, #endif #ifdef _SC_PII_SOCKET {"SC_PII_SOCKET", _SC_PII_SOCKET}, #endif #ifdef _SC_PII_XTI {"SC_PII_XTI", _SC_PII_XTI}, #endif #ifdef _SC_POLL {"SC_POLL", _SC_POLL}, #endif #ifdef _SC_PRIORITIZED_IO {"SC_PRIORITIZED_IO", _SC_PRIORITIZED_IO}, #endif #ifdef _SC_PRIORITY_SCHEDULING {"SC_PRIORITY_SCHEDULING", _SC_PRIORITY_SCHEDULING}, #endif #ifdef _SC_REALTIME_SIGNALS {"SC_REALTIME_SIGNALS", _SC_REALTIME_SIGNALS}, #endif #ifdef _SC_RE_DUP_MAX {"SC_RE_DUP_MAX", _SC_RE_DUP_MAX}, #endif #ifdef _SC_RTSIG_MAX {"SC_RTSIG_MAX", _SC_RTSIG_MAX}, #endif #ifdef _SC_SAVED_IDS {"SC_SAVED_IDS", _SC_SAVED_IDS}, #endif #ifdef _SC_SCHAR_MAX {"SC_SCHAR_MAX", _SC_SCHAR_MAX}, #endif #ifdef _SC_SCHAR_MIN {"SC_SCHAR_MIN", _SC_SCHAR_MIN}, #endif #ifdef _SC_SELECT {"SC_SELECT", _SC_SELECT}, #endif #ifdef _SC_SEMAPHORES {"SC_SEMAPHORES", _SC_SEMAPHORES}, #endif #ifdef _SC_SEM_NSEMS_MAX {"SC_SEM_NSEMS_MAX", _SC_SEM_NSEMS_MAX}, #endif #ifdef _SC_SEM_VALUE_MAX {"SC_SEM_VALUE_MAX", _SC_SEM_VALUE_MAX}, #endif #ifdef _SC_SHARED_MEMORY_OBJECTS {"SC_SHARED_MEMORY_OBJECTS", _SC_SHARED_MEMORY_OBJECTS}, #endif #ifdef _SC_SHRT_MAX {"SC_SHRT_MAX", _SC_SHRT_MAX}, #endif #ifdef _SC_SHRT_MIN {"SC_SHRT_MIN", _SC_SHRT_MIN}, #endif #ifdef _SC_SIGQUEUE_MAX {"SC_SIGQUEUE_MAX", _SC_SIGQUEUE_MAX}, #endif #ifdef _SC_SIGRT_MAX {"SC_SIGRT_MAX", _SC_SIGRT_MAX}, #endif #ifdef _SC_SIGRT_MIN {"SC_SIGRT_MIN", _SC_SIGRT_MIN}, #endif #ifdef _SC_SOFTPOWER {"SC_SOFTPOWER", _SC_SOFTPOWER}, #endif #ifdef _SC_SPLIT_CACHE {"SC_SPLIT_CACHE", _SC_SPLIT_CACHE}, #endif #ifdef _SC_SSIZE_MAX {"SC_SSIZE_MAX", _SC_SSIZE_MAX}, #endif #ifdef _SC_STACK_PROT {"SC_STACK_PROT", _SC_STACK_PROT}, #endif #ifdef _SC_STREAM_MAX {"SC_STREAM_MAX", _SC_STREAM_MAX}, #endif #ifdef _SC_SYNCHRONIZED_IO {"SC_SYNCHRONIZED_IO", _SC_SYNCHRONIZED_IO}, #endif #ifdef _SC_THREADS {"SC_THREADS", _SC_THREADS}, #endif #ifdef _SC_THREAD_ATTR_STACKADDR {"SC_THREAD_ATTR_STACKADDR", _SC_THREAD_ATTR_STACKADDR}, #endif #ifdef _SC_THREAD_ATTR_STACKSIZE {"SC_THREAD_ATTR_STACKSIZE", _SC_THREAD_ATTR_STACKSIZE}, #endif #ifdef _SC_THREAD_DESTRUCTOR_ITERATIONS {"SC_THREAD_DESTRUCTOR_ITERATIONS", _SC_THREAD_DESTRUCTOR_ITERATIONS}, #endif #ifdef _SC_THREAD_KEYS_MAX {"SC_THREAD_KEYS_MAX", _SC_THREAD_KEYS_MAX}, #endif #ifdef _SC_THREAD_PRIORITY_SCHEDULING {"SC_THREAD_PRIORITY_SCHEDULING", _SC_THREAD_PRIORITY_SCHEDULING}, #endif #ifdef _SC_THREAD_PRIO_INHERIT {"SC_THREAD_PRIO_INHERIT", _SC_THREAD_PRIO_INHERIT}, #endif #ifdef _SC_THREAD_PRIO_PROTECT {"SC_THREAD_PRIO_PROTECT", _SC_THREAD_PRIO_PROTECT}, #endif #ifdef _SC_THREAD_PROCESS_SHARED {"SC_THREAD_PROCESS_SHARED", _SC_THREAD_PROCESS_SHARED}, #endif #ifdef _SC_THREAD_SAFE_FUNCTIONS {"SC_THREAD_SAFE_FUNCTIONS", _SC_THREAD_SAFE_FUNCTIONS}, #endif #ifdef _SC_THREAD_STACK_MIN {"SC_THREAD_STACK_MIN", _SC_THREAD_STACK_MIN}, #endif #ifdef _SC_THREAD_THREADS_MAX {"SC_THREAD_THREADS_MAX", _SC_THREAD_THREADS_MAX}, #endif #ifdef _SC_TIMERS {"SC_TIMERS", _SC_TIMERS}, #endif #ifdef _SC_TIMER_MAX {"SC_TIMER_MAX", _SC_TIMER_MAX}, #endif #ifdef _SC_TTY_NAME_MAX {"SC_TTY_NAME_MAX", _SC_TTY_NAME_MAX}, #endif #ifdef _SC_TZNAME_MAX {"SC_TZNAME_MAX", _SC_TZNAME_MAX}, #endif #ifdef _SC_T_IOV_MAX {"SC_T_IOV_MAX", _SC_T_IOV_MAX}, #endif #ifdef _SC_UCHAR_MAX {"SC_UCHAR_MAX", _SC_UCHAR_MAX}, #endif #ifdef _SC_UINT_MAX {"SC_UINT_MAX", _SC_UINT_MAX}, #endif #ifdef _SC_UIO_MAXIOV {"SC_UIO_MAXIOV", _SC_UIO_MAXIOV}, #endif #ifdef _SC_ULONG_MAX {"SC_ULONG_MAX", _SC_ULONG_MAX}, #endif #ifdef _SC_USHRT_MAX {"SC_USHRT_MAX", _SC_USHRT_MAX}, #endif #ifdef _SC_VERSION {"SC_VERSION", _SC_VERSION}, #endif #ifdef _SC_WORD_BIT {"SC_WORD_BIT", _SC_WORD_BIT}, #endif #ifdef _SC_XBS5_ILP32_OFF32 {"SC_XBS5_ILP32_OFF32", _SC_XBS5_ILP32_OFF32}, #endif #ifdef _SC_XBS5_ILP32_OFFBIG {"SC_XBS5_ILP32_OFFBIG", _SC_XBS5_ILP32_OFFBIG}, #endif #ifdef _SC_XBS5_LP64_OFF64 {"SC_XBS5_LP64_OFF64", _SC_XBS5_LP64_OFF64}, #endif #ifdef _SC_XBS5_LPBIG_OFFBIG {"SC_XBS5_LPBIG_OFFBIG", _SC_XBS5_LPBIG_OFFBIG}, #endif #ifdef _SC_XOPEN_CRYPT {"SC_XOPEN_CRYPT", _SC_XOPEN_CRYPT}, #endif #ifdef _SC_XOPEN_ENH_I18N {"SC_XOPEN_ENH_I18N", _SC_XOPEN_ENH_I18N}, #endif #ifdef _SC_XOPEN_LEGACY {"SC_XOPEN_LEGACY", _SC_XOPEN_LEGACY}, #endif #ifdef _SC_XOPEN_REALTIME {"SC_XOPEN_REALTIME", _SC_XOPEN_REALTIME}, #endif #ifdef _SC_XOPEN_REALTIME_THREADS {"SC_XOPEN_REALTIME_THREADS", _SC_XOPEN_REALTIME_THREADS}, #endif #ifdef _SC_XOPEN_SHM {"SC_XOPEN_SHM", _SC_XOPEN_SHM}, #endif #ifdef _SC_XOPEN_UNIX {"SC_XOPEN_UNIX", _SC_XOPEN_UNIX}, #endif #ifdef _SC_XOPEN_VERSION {"SC_XOPEN_VERSION", _SC_XOPEN_VERSION}, #endif #ifdef _SC_XOPEN_XCU_VERSION {"SC_XOPEN_XCU_VERSION", _SC_XOPEN_XCU_VERSION}, #endif #ifdef _SC_XOPEN_XPG2 {"SC_XOPEN_XPG2", _SC_XOPEN_XPG2}, #endif #ifdef _SC_XOPEN_XPG3 {"SC_XOPEN_XPG3", _SC_XOPEN_XPG3}, #endif #ifdef _SC_XOPEN_XPG4 {"SC_XOPEN_XPG4", _SC_XOPEN_XPG4}, #endif }; static int conv_sysconf_confname(PyObject *arg, int *valuep) { return conv_confname(arg, valuep, posix_constants_sysconf, sizeof(posix_constants_sysconf) / sizeof(struct constdef)); } PyDoc_STRVAR(posix_sysconf__doc__, "sysconf(name) -> integer\n\n\ Return an integer-valued system configuration variable."); static PyObject * posix_sysconf(PyObject *self, PyObject *args) { PyObject *result = NULL; int name; if (PyArg_ParseTuple(args, "O&:sysconf", conv_sysconf_confname, &name)) { int value; errno = 0; value = sysconf(name); if (value == -1 && errno != 0) posix_error(); else result = PyInt_FromLong(value); } return result; } #endif /* This code is used to ensure that the tables of configuration value names * are in sorted order as required by conv_confname(), and also to build the * the exported dictionaries that are used to publish information about the * names available on the host platform. * * Sorting the table at runtime ensures that the table is properly ordered * when used, even for platforms we're not able to test on. It also makes * it easier to add additional entries to the tables. */ static int cmp_constdefs(const void *v1, const void *v2) { const struct constdef *c1 = (const struct constdef *) v1; const struct constdef *c2 = (const struct constdef *) v2; return strcmp(c1->name, c2->name); } static int setup_confname_table(struct constdef *table, size_t tablesize, char *tablename, PyObject *module) { PyObject *d = NULL; size_t i; qsort(table, tablesize, sizeof(struct constdef), cmp_constdefs); d = PyDict_New(); if (d == NULL) return -1; for (i=0; i < tablesize; ++i) { PyObject *o = PyInt_FromLong(table[i].value); if (o == NULL || PyDict_SetItemString(d, table[i].name, o) == -1) { Py_XDECREF(o); Py_DECREF(d); return -1; } Py_DECREF(o); } return PyModule_AddObject(module, tablename, d); } /* Return -1 on failure, 0 on success. */ static int setup_confname_tables(PyObject *module) { #if defined(HAVE_FPATHCONF) || defined(HAVE_PATHCONF) if (setup_confname_table(posix_constants_pathconf, sizeof(posix_constants_pathconf) / sizeof(struct constdef), "pathconf_names", module)) return -1; #endif #ifdef HAVE_CONFSTR if (setup_confname_table(posix_constants_confstr, sizeof(posix_constants_confstr) / sizeof(struct constdef), "confstr_names", module)) return -1; #endif #ifdef HAVE_SYSCONF if (setup_confname_table(posix_constants_sysconf, sizeof(posix_constants_sysconf) / sizeof(struct constdef), "sysconf_names", module)) return -1; #endif return 0; } PyDoc_STRVAR(posix_abort__doc__, "abort() -> does not return!\n\n\ Abort the interpreter immediately. This 'dumps core' or otherwise fails\n\ in the hardest way possible on the hosting operating system."); static PyObject * posix_abort(PyObject *self, PyObject *noargs) { abort(); /*NOTREACHED*/ Py_FatalError("abort() called from Python code didn't abort!"); return NULL; } #ifdef MS_WINDOWS PyDoc_STRVAR(win32_startfile__doc__, "startfile(filepath) - Start a file with its associated application.\n\ \n\ This acts like double-clicking the file in Explorer, or giving the file\n\ name as an argument to the DOS \"start\" command: the file is opened\n\ with whatever application (if any) its extension is associated.\n\ \n\ startfile returns as soon as the associated application is launched.\n\ There is no option to wait for the application to close, and no way\n\ to retrieve the application's exit status.\n\ \n\ The filepath is relative to the current directory. If you want to use\n\ an absolute path, make sure the first character is not a slash (\"/\");\n\ the underlying Win32 ShellExecute function doesn't work if it is."); static PyObject * win32_startfile(PyObject *self, PyObject *args) { char *filepath; HINSTANCE rc; if (!PyArg_ParseTuple(args, "s:startfile", &filepath)) return NULL; Py_BEGIN_ALLOW_THREADS rc = ShellExecute((HWND)0, NULL, filepath, NULL, NULL, SW_SHOWNORMAL); Py_END_ALLOW_THREADS if (rc <= (HINSTANCE)32) return win32_error("startfile", filepath); Py_INCREF(Py_None); return Py_None; } #endif #ifdef HAVE_GETLOADAVG PyDoc_STRVAR(posix_getloadavg__doc__, "getloadavg() -> (float, float, float)\n\n\ Return the number of processes in the system run queue averaged over\n\ the last 1, 5, and 15 minutes or raises OSError if the load average\n\ was unobtainable"); static PyObject * posix_getloadavg(PyObject *self, PyObject *noargs) { double loadavg[3]; if (getloadavg(loadavg, 3)!=3) { PyErr_SetString(PyExc_OSError, "Load averages are unobtainable"); return NULL; } else return Py_BuildValue("ddd", loadavg[0], loadavg[1], loadavg[2]); } #endif static PyMethodDef posix_methods[] = { {"access", posix_access, METH_VARARGS, posix_access__doc__}, #ifdef HAVE_TTYNAME {"ttyname", posix_ttyname, METH_VARARGS, posix_ttyname__doc__}, #endif {"chdir", posix_chdir, METH_VARARGS, posix_chdir__doc__}, {"chmod", posix_chmod, METH_VARARGS, posix_chmod__doc__}, #ifdef HAVE_CHOWN {"chown", posix_chown, METH_VARARGS, posix_chown__doc__}, #endif /* HAVE_CHOWN */ #ifdef HAVE_LCHOWN {"lchown", posix_lchown, METH_VARARGS, posix_lchown__doc__}, #endif /* HAVE_LCHOWN */ #ifdef HAVE_CHROOT {"chroot", posix_chroot, METH_VARARGS, posix_chroot__doc__}, #endif #ifdef HAVE_CTERMID {"ctermid", posix_ctermid, METH_NOARGS, posix_ctermid__doc__}, #endif #ifdef HAVE_GETCWD {"getcwd", posix_getcwd, METH_NOARGS, posix_getcwd__doc__}, #ifdef Py_USING_UNICODE {"getcwdu", posix_getcwdu, METH_NOARGS, posix_getcwdu__doc__}, #endif #endif #ifdef HAVE_LINK {"link", posix_link, METH_VARARGS, posix_link__doc__}, #endif /* HAVE_LINK */ {"listdir", posix_listdir, METH_VARARGS, posix_listdir__doc__}, {"lstat", posix_lstat, METH_VARARGS, posix_lstat__doc__}, {"mkdir", posix_mkdir, METH_VARARGS, posix_mkdir__doc__}, #ifdef HAVE_NICE {"nice", posix_nice, METH_VARARGS, posix_nice__doc__}, #endif /* HAVE_NICE */ #ifdef HAVE_READLINK {"readlink", posix_readlink, METH_VARARGS, posix_readlink__doc__}, #endif /* HAVE_READLINK */ {"rename", posix_rename, METH_VARARGS, posix_rename__doc__}, {"rmdir", posix_rmdir, METH_VARARGS, posix_rmdir__doc__}, {"stat", posix_stat, METH_VARARGS, posix_stat__doc__}, {"stat_float_times", stat_float_times, METH_VARARGS, stat_float_times__doc__}, #ifdef HAVE_SYMLINK {"symlink", posix_symlink, METH_VARARGS, posix_symlink__doc__}, #endif /* HAVE_SYMLINK */ #ifdef HAVE_SYSTEM {"system", posix_system, METH_VARARGS, posix_system__doc__}, #endif {"umask", posix_umask, METH_VARARGS, posix_umask__doc__}, #ifdef HAVE_UNAME {"uname", posix_uname, METH_NOARGS, posix_uname__doc__}, #endif /* HAVE_UNAME */ {"unlink", posix_unlink, METH_VARARGS, posix_unlink__doc__}, {"remove", posix_unlink, METH_VARARGS, posix_remove__doc__}, {"utime", posix_utime, METH_VARARGS, posix_utime__doc__}, #ifdef HAVE_TIMES {"times", posix_times, METH_NOARGS, posix_times__doc__}, #endif /* HAVE_TIMES */ {"_exit", posix__exit, METH_VARARGS, posix__exit__doc__}, #ifdef HAVE_EXECV {"execv", posix_execv, METH_VARARGS, posix_execv__doc__}, {"execve", posix_execve, METH_VARARGS, posix_execve__doc__}, #endif /* HAVE_EXECV */ #ifdef HAVE_SPAWNV {"spawnv", posix_spawnv, METH_VARARGS, posix_spawnv__doc__}, {"spawnve", posix_spawnve, METH_VARARGS, posix_spawnve__doc__}, #if defined(PYOS_OS2) {"spawnvp", posix_spawnvp, METH_VARARGS, posix_spawnvp__doc__}, {"spawnvpe", posix_spawnvpe, METH_VARARGS, posix_spawnvpe__doc__}, #endif /* PYOS_OS2 */ #endif /* HAVE_SPAWNV */ #ifdef HAVE_FORK1 {"fork1", posix_fork1, METH_NOARGS, posix_fork1__doc__}, #endif /* HAVE_FORK1 */ #ifdef HAVE_FORK {"fork", posix_fork, METH_NOARGS, posix_fork__doc__}, #endif /* HAVE_FORK */ #if defined(HAVE_OPENPTY) || defined(HAVE__GETPTY) || defined(HAVE_DEV_PTMX) {"openpty", posix_openpty, METH_NOARGS, posix_openpty__doc__}, #endif /* HAVE_OPENPTY || HAVE__GETPTY || HAVE_DEV_PTMX */ #ifdef HAVE_FORKPTY {"forkpty", posix_forkpty, METH_NOARGS, posix_forkpty__doc__}, #endif /* HAVE_FORKPTY */ #ifdef HAVE_GETEGID {"getegid", posix_getegid, METH_NOARGS, posix_getegid__doc__}, #endif /* HAVE_GETEGID */ #ifdef HAVE_GETEUID {"geteuid", posix_geteuid, METH_NOARGS, posix_geteuid__doc__}, #endif /* HAVE_GETEUID */ #ifdef HAVE_GETGID {"getgid", posix_getgid, METH_NOARGS, posix_getgid__doc__}, #endif /* HAVE_GETGID */ #ifdef HAVE_GETGROUPS {"getgroups", posix_getgroups, METH_NOARGS, posix_getgroups__doc__}, #endif {"getpid", posix_getpid, METH_NOARGS, posix_getpid__doc__}, #ifdef HAVE_GETPGRP {"getpgrp", posix_getpgrp, METH_NOARGS, posix_getpgrp__doc__}, #endif /* HAVE_GETPGRP */ #ifdef HAVE_GETPPID {"getppid", posix_getppid, METH_NOARGS, posix_getppid__doc__}, #endif /* HAVE_GETPPID */ #ifdef HAVE_GETUID {"getuid", posix_getuid, METH_NOARGS, posix_getuid__doc__}, #endif /* HAVE_GETUID */ #ifdef HAVE_GETLOGIN {"getlogin", posix_getlogin, METH_NOARGS, posix_getlogin__doc__}, #endif #ifdef HAVE_KILL {"kill", posix_kill, METH_VARARGS, posix_kill__doc__}, #endif /* HAVE_KILL */ #ifdef HAVE_KILLPG {"killpg", posix_killpg, METH_VARARGS, posix_killpg__doc__}, #endif /* HAVE_KILLPG */ #ifdef HAVE_PLOCK {"plock", posix_plock, METH_VARARGS, posix_plock__doc__}, #endif /* HAVE_PLOCK */ #ifdef HAVE_POPEN {"popen", posix_popen, METH_VARARGS, posix_popen__doc__}, #ifdef MS_WINDOWS {"popen2", win32_popen2, METH_VARARGS}, {"popen3", win32_popen3, METH_VARARGS}, {"popen4", win32_popen4, METH_VARARGS}, {"startfile", win32_startfile, METH_VARARGS, win32_startfile__doc__}, #else #if defined(PYOS_OS2) && defined(PYCC_GCC) {"popen2", os2emx_popen2, METH_VARARGS}, {"popen3", os2emx_popen3, METH_VARARGS}, {"popen4", os2emx_popen4, METH_VARARGS}, #endif #endif #endif /* HAVE_POPEN */ #ifdef HAVE_SETUID {"setuid", posix_setuid, METH_VARARGS, posix_setuid__doc__}, #endif /* HAVE_SETUID */ #ifdef HAVE_SETEUID {"seteuid", posix_seteuid, METH_VARARGS, posix_seteuid__doc__}, #endif /* HAVE_SETEUID */ #ifdef HAVE_SETEGID {"setegid", posix_setegid, METH_VARARGS, posix_setegid__doc__}, #endif /* HAVE_SETEGID */ #ifdef HAVE_SETREUID {"setreuid", posix_setreuid, METH_VARARGS, posix_setreuid__doc__}, #endif /* HAVE_SETREUID */ #ifdef HAVE_SETREGID {"setregid", posix_setregid, METH_VARARGS, posix_setregid__doc__}, #endif /* HAVE_SETREGID */ #ifdef HAVE_SETGID {"setgid", posix_setgid, METH_VARARGS, posix_setgid__doc__}, #endif /* HAVE_SETGID */ #ifdef HAVE_SETGROUPS {"setgroups", posix_setgroups, METH_VARARGS, posix_setgroups__doc__}, #endif /* HAVE_SETGROUPS */ #ifdef HAVE_GETPGID {"getpgid", posix_getpgid, METH_VARARGS, posix_getpgid__doc__}, #endif /* HAVE_GETPGID */ #ifdef HAVE_SETPGRP {"setpgrp", posix_setpgrp, METH_NOARGS, posix_setpgrp__doc__}, #endif /* HAVE_SETPGRP */ #ifdef HAVE_WAIT {"wait", posix_wait, METH_NOARGS, posix_wait__doc__}, #endif /* HAVE_WAIT */ #if defined(HAVE_WAITPID) || defined(HAVE_CWAIT) {"waitpid", posix_waitpid, METH_VARARGS, posix_waitpid__doc__}, #endif /* HAVE_WAITPID */ #ifdef HAVE_SETSID {"setsid", posix_setsid, METH_NOARGS, posix_setsid__doc__}, #endif /* HAVE_SETSID */ #ifdef HAVE_SETPGID {"setpgid", posix_setpgid, METH_VARARGS, posix_setpgid__doc__}, #endif /* HAVE_SETPGID */ #ifdef HAVE_TCGETPGRP {"tcgetpgrp", posix_tcgetpgrp, METH_VARARGS, posix_tcgetpgrp__doc__}, #endif /* HAVE_TCGETPGRP */ #ifdef HAVE_TCSETPGRP {"tcsetpgrp", posix_tcsetpgrp, METH_VARARGS, posix_tcsetpgrp__doc__}, #endif /* HAVE_TCSETPGRP */ {"open", posix_open, METH_VARARGS, posix_open__doc__}, {"close", posix_close, METH_VARARGS, posix_close__doc__}, {"dup", posix_dup, METH_VARARGS, posix_dup__doc__}, {"dup2", posix_dup2, METH_VARARGS, posix_dup2__doc__}, {"lseek", posix_lseek, METH_VARARGS, posix_lseek__doc__}, {"read", posix_read, METH_VARARGS, posix_read__doc__}, {"write", posix_write, METH_VARARGS, posix_write__doc__}, {"fstat", posix_fstat, METH_VARARGS, posix_fstat__doc__}, {"fdopen", posix_fdopen, METH_VARARGS, posix_fdopen__doc__}, {"isatty", posix_isatty, METH_VARARGS, posix_isatty__doc__}, #ifdef HAVE_PIPE {"pipe", posix_pipe, METH_NOARGS, posix_pipe__doc__}, #endif #ifdef HAVE_MKFIFO {"mkfifo", posix_mkfifo, METH_VARARGS, posix_mkfifo__doc__}, #endif #if defined(HAVE_MKNOD) && defined(HAVE_MAKEDEV) {"mknod", posix_mknod, METH_VARARGS, posix_mknod__doc__}, #endif #ifdef HAVE_DEVICE_MACROS {"major", posix_major, METH_VARARGS, posix_major__doc__}, {"minor", posix_minor, METH_VARARGS, posix_minor__doc__}, {"makedev", posix_makedev, METH_VARARGS, posix_makedev__doc__}, #endif #ifdef HAVE_FTRUNCATE {"ftruncate", posix_ftruncate, METH_VARARGS, posix_ftruncate__doc__}, #endif #ifdef HAVE_PUTENV {"putenv", posix_putenv, METH_VARARGS, posix_putenv__doc__}, #endif #ifdef HAVE_UNSETENV {"unsetenv", posix_unsetenv, METH_VARARGS, posix_unsetenv__doc__}, #endif #ifdef HAVE_STRERROR {"strerror", posix_strerror, METH_VARARGS, posix_strerror__doc__}, #endif #ifdef HAVE_FCHDIR {"fchdir", posix_fchdir, METH_O, posix_fchdir__doc__}, #endif #ifdef HAVE_FSYNC {"fsync", posix_fsync, METH_O, posix_fsync__doc__}, #endif #ifdef HAVE_FDATASYNC {"fdatasync", posix_fdatasync, METH_O, posix_fdatasync__doc__}, #endif #ifdef HAVE_SYS_WAIT_H #ifdef WCOREDUMP {"WCOREDUMP", posix_WCOREDUMP, METH_VARARGS, posix_WCOREDUMP__doc__}, #endif /* WCOREDUMP */ #ifdef WIFCONTINUED {"WIFCONTINUED",posix_WIFCONTINUED, METH_VARARGS, posix_WIFCONTINUED__doc__}, #endif /* WIFCONTINUED */ #ifdef WIFSTOPPED {"WIFSTOPPED", posix_WIFSTOPPED, METH_VARARGS, posix_WIFSTOPPED__doc__}, #endif /* WIFSTOPPED */ #ifdef WIFSIGNALED {"WIFSIGNALED", posix_WIFSIGNALED, METH_VARARGS, posix_WIFSIGNALED__doc__}, #endif /* WIFSIGNALED */ #ifdef WIFEXITED {"WIFEXITED", posix_WIFEXITED, METH_VARARGS, posix_WIFEXITED__doc__}, #endif /* WIFEXITED */ #ifdef WEXITSTATUS {"WEXITSTATUS", posix_WEXITSTATUS, METH_VARARGS, posix_WEXITSTATUS__doc__}, #endif /* WEXITSTATUS */ #ifdef WTERMSIG {"WTERMSIG", posix_WTERMSIG, METH_VARARGS, posix_WTERMSIG__doc__}, #endif /* WTERMSIG */ #ifdef WSTOPSIG {"WSTOPSIG", posix_WSTOPSIG, METH_VARARGS, posix_WSTOPSIG__doc__}, #endif /* WSTOPSIG */ #endif /* HAVE_SYS_WAIT_H */ #ifdef HAVE_FSTATVFS {"fstatvfs", posix_fstatvfs, METH_VARARGS, posix_fstatvfs__doc__}, #endif #ifdef HAVE_STATVFS {"statvfs", posix_statvfs, METH_VARARGS, posix_statvfs__doc__}, #endif #ifdef HAVE_TMPFILE {"tmpfile", posix_tmpfile, METH_NOARGS, posix_tmpfile__doc__}, #endif #ifdef HAVE_TEMPNAM {"tempnam", posix_tempnam, METH_VARARGS, posix_tempnam__doc__}, #endif #ifdef HAVE_TMPNAM {"tmpnam", posix_tmpnam, METH_NOARGS, posix_tmpnam__doc__}, #endif #ifdef HAVE_CONFSTR {"confstr", posix_confstr, METH_VARARGS, posix_confstr__doc__}, #endif #ifdef HAVE_SYSCONF {"sysconf", posix_sysconf, METH_VARARGS, posix_sysconf__doc__}, #endif #ifdef HAVE_FPATHCONF {"fpathconf", posix_fpathconf, METH_VARARGS, posix_fpathconf__doc__}, #endif #ifdef HAVE_PATHCONF {"pathconf", posix_pathconf, METH_VARARGS, posix_pathconf__doc__}, #endif {"abort", posix_abort, METH_NOARGS, posix_abort__doc__}, #ifdef MS_WINDOWS {"_getfullpathname", posix__getfullpathname, METH_VARARGS, NULL}, #endif #ifdef HAVE_GETLOADAVG {"getloadavg", posix_getloadavg, METH_NOARGS, posix_getloadavg__doc__}, #endif {NULL, NULL} /* Sentinel */ }; static int ins(PyObject *module, char *symbol, long value) { return PyModule_AddIntConstant(module, symbol, value); } #if defined(PYOS_OS2) /* Insert Platform-Specific Constant Values (Strings & Numbers) of Common Use */ static int insertvalues(PyObject *module) { APIRET rc; ULONG values[QSV_MAX+1]; PyObject *v; char *ver, tmp[50]; Py_BEGIN_ALLOW_THREADS rc = DosQuerySysInfo(1L, QSV_MAX, &values[1], sizeof(ULONG) * QSV_MAX); Py_END_ALLOW_THREADS if (rc != NO_ERROR) { os2_error(rc); return -1; } if (ins(module, "meminstalled", values[QSV_TOTPHYSMEM])) return -1; if (ins(module, "memkernel", values[QSV_TOTRESMEM])) return -1; if (ins(module, "memvirtual", values[QSV_TOTAVAILMEM])) return -1; if (ins(module, "maxpathlen", values[QSV_MAX_PATH_LENGTH])) return -1; if (ins(module, "maxnamelen", values[QSV_MAX_COMP_LENGTH])) return -1; if (ins(module, "revision", values[QSV_VERSION_REVISION])) return -1; if (ins(module, "timeslice", values[QSV_MIN_SLICE])) return -1; switch (values[QSV_VERSION_MINOR]) { case 0: ver = "2.00"; break; case 10: ver = "2.10"; break; case 11: ver = "2.11"; break; case 30: ver = "3.00"; break; case 40: ver = "4.00"; break; case 50: ver = "5.00"; break; default: PyOS_snprintf(tmp, sizeof(tmp), "%d-%d", values[QSV_VERSION_MAJOR], values[QSV_VERSION_MINOR]); ver = &tmp[0]; } /* Add Indicator of the Version of the Operating System */ if (PyModule_AddStringConstant(module, "version", tmp) < 0) return -1; /* Add Indicator of Which Drive was Used to Boot the System */ tmp[0] = 'A' + values[QSV_BOOT_DRIVE] - 1; tmp[1] = ':'; tmp[2] = '\0'; return PyModule_AddStringConstant(module, "bootdrive", tmp); } #endif static int all_ins(PyObject *d) { #ifdef F_OK if (ins(d, "F_OK", (long)F_OK)) return -1; #endif #ifdef R_OK if (ins(d, "R_OK", (long)R_OK)) return -1; #endif #ifdef W_OK if (ins(d, "W_OK", (long)W_OK)) return -1; #endif #ifdef X_OK if (ins(d, "X_OK", (long)X_OK)) return -1; #endif #ifdef NGROUPS_MAX if (ins(d, "NGROUPS_MAX", (long)NGROUPS_MAX)) return -1; #endif #ifdef TMP_MAX if (ins(d, "TMP_MAX", (long)TMP_MAX)) return -1; #endif #ifdef WCONTINUED if (ins(d, "WCONTINUED", (long)WCONTINUED)) return -1; #endif #ifdef WNOHANG if (ins(d, "WNOHANG", (long)WNOHANG)) return -1; #endif #ifdef WUNTRACED if (ins(d, "WUNTRACED", (long)WUNTRACED)) return -1; #endif #ifdef O_RDONLY if (ins(d, "O_RDONLY", (long)O_RDONLY)) return -1; #endif #ifdef O_WRONLY if (ins(d, "O_WRONLY", (long)O_WRONLY)) return -1; #endif #ifdef O_RDWR if (ins(d, "O_RDWR", (long)O_RDWR)) return -1; #endif #ifdef O_NDELAY if (ins(d, "O_NDELAY", (long)O_NDELAY)) return -1; #endif #ifdef O_NONBLOCK if (ins(d, "O_NONBLOCK", (long)O_NONBLOCK)) return -1; #endif #ifdef O_APPEND if (ins(d, "O_APPEND", (long)O_APPEND)) return -1; #endif #ifdef O_DSYNC if (ins(d, "O_DSYNC", (long)O_DSYNC)) return -1; #endif #ifdef O_RSYNC if (ins(d, "O_RSYNC", (long)O_RSYNC)) return -1; #endif #ifdef O_SYNC if (ins(d, "O_SYNC", (long)O_SYNC)) return -1; #endif #ifdef O_NOCTTY if (ins(d, "O_NOCTTY", (long)O_NOCTTY)) return -1; #endif #ifdef O_CREAT if (ins(d, "O_CREAT", (long)O_CREAT)) return -1; #endif #ifdef O_EXCL if (ins(d, "O_EXCL", (long)O_EXCL)) return -1; #endif #ifdef O_TRUNC if (ins(d, "O_TRUNC", (long)O_TRUNC)) return -1; #endif #ifdef O_BINARY if (ins(d, "O_BINARY", (long)O_BINARY)) return -1; #endif #ifdef O_TEXT if (ins(d, "O_TEXT", (long)O_TEXT)) return -1; #endif #ifdef O_LARGEFILE if (ins(d, "O_LARGEFILE", (long)O_LARGEFILE)) return -1; #endif /* MS Windows */ #ifdef O_NOINHERIT /* Don't inherit in child processes. */ if (ins(d, "O_NOINHERIT", (long)O_NOINHERIT)) return -1; #endif #ifdef _O_SHORT_LIVED /* Optimize for short life (keep in memory). */ /* MS forgot to define this one with a non-underscore form too. */ if (ins(d, "O_SHORT_LIVED", (long)_O_SHORT_LIVED)) return -1; #endif #ifdef O_TEMPORARY /* Automatically delete when last handle is closed. */ if (ins(d, "O_TEMPORARY", (long)O_TEMPORARY)) return -1; #endif #ifdef O_RANDOM /* Optimize for random access. */ if (ins(d, "O_RANDOM", (long)O_RANDOM)) return -1; #endif #ifdef O_SEQUENTIAL /* Optimize for sequential access. */ if (ins(d, "O_SEQUENTIAL", (long)O_SEQUENTIAL)) return -1; #endif /* GNU extensions. */ #ifdef O_DIRECT /* Direct disk access. */ if (ins(d, "O_DIRECT", (long)O_DIRECT)) return -1; #endif #ifdef O_DIRECTORY /* Must be a directory. */ if (ins(d, "O_DIRECTORY", (long)O_DIRECTORY)) return -1; #endif #ifdef O_NOFOLLOW /* Do not follow links. */ if (ins(d, "O_NOFOLLOW", (long)O_NOFOLLOW)) return -1; #endif /* These come from sysexits.h */ #ifdef EX_OK if (ins(d, "EX_OK", (long)EX_OK)) return -1; #endif /* EX_OK */ #ifdef EX_USAGE if (ins(d, "EX_USAGE", (long)EX_USAGE)) return -1; #endif /* EX_USAGE */ #ifdef EX_DATAERR if (ins(d, "EX_DATAERR", (long)EX_DATAERR)) return -1; #endif /* EX_DATAERR */ #ifdef EX_NOINPUT if (ins(d, "EX_NOINPUT", (long)EX_NOINPUT)) return -1; #endif /* EX_NOINPUT */ #ifdef EX_NOUSER if (ins(d, "EX_NOUSER", (long)EX_NOUSER)) return -1; #endif /* EX_NOUSER */ #ifdef EX_NOHOST if (ins(d, "EX_NOHOST", (long)EX_NOHOST)) return -1; #endif /* EX_NOHOST */ #ifdef EX_UNAVAILABLE if (ins(d, "EX_UNAVAILABLE", (long)EX_UNAVAILABLE)) return -1; #endif /* EX_UNAVAILABLE */ #ifdef EX_SOFTWARE if (ins(d, "EX_SOFTWARE", (long)EX_SOFTWARE)) return -1; #endif /* EX_SOFTWARE */ #ifdef EX_OSERR if (ins(d, "EX_OSERR", (long)EX_OSERR)) return -1; #endif /* EX_OSERR */ #ifdef EX_OSFILE if (ins(d, "EX_OSFILE", (long)EX_OSFILE)) return -1; #endif /* EX_OSFILE */ #ifdef EX_CANTCREAT if (ins(d, "EX_CANTCREAT", (long)EX_CANTCREAT)) return -1; #endif /* EX_CANTCREAT */ #ifdef EX_IOERR if (ins(d, "EX_IOERR", (long)EX_IOERR)) return -1; #endif /* EX_IOERR */ #ifdef EX_TEMPFAIL if (ins(d, "EX_TEMPFAIL", (long)EX_TEMPFAIL)) return -1; #endif /* EX_TEMPFAIL */ #ifdef EX_PROTOCOL if (ins(d, "EX_PROTOCOL", (long)EX_PROTOCOL)) return -1; #endif /* EX_PROTOCOL */ #ifdef EX_NOPERM if (ins(d, "EX_NOPERM", (long)EX_NOPERM)) return -1; #endif /* EX_NOPERM */ #ifdef EX_CONFIG if (ins(d, "EX_CONFIG", (long)EX_CONFIG)) return -1; #endif /* EX_CONFIG */ #ifdef EX_NOTFOUND if (ins(d, "EX_NOTFOUND", (long)EX_NOTFOUND)) return -1; #endif /* EX_NOTFOUND */ #ifdef HAVE_SPAWNV #if defined(PYOS_OS2) && defined(PYCC_GCC) if (ins(d, "P_WAIT", (long)P_WAIT)) return -1; if (ins(d, "P_NOWAIT", (long)P_NOWAIT)) return -1; if (ins(d, "P_OVERLAY", (long)P_OVERLAY)) return -1; if (ins(d, "P_DEBUG", (long)P_DEBUG)) return -1; if (ins(d, "P_SESSION", (long)P_SESSION)) return -1; if (ins(d, "P_DETACH", (long)P_DETACH)) return -1; if (ins(d, "P_PM", (long)P_PM)) return -1; if (ins(d, "P_DEFAULT", (long)P_DEFAULT)) return -1; if (ins(d, "P_MINIMIZE", (long)P_MINIMIZE)) return -1; if (ins(d, "P_MAXIMIZE", (long)P_MAXIMIZE)) return -1; if (ins(d, "P_FULLSCREEN", (long)P_FULLSCREEN)) return -1; if (ins(d, "P_WINDOWED", (long)P_WINDOWED)) return -1; if (ins(d, "P_FOREGROUND", (long)P_FOREGROUND)) return -1; if (ins(d, "P_BACKGROUND", (long)P_BACKGROUND)) return -1; if (ins(d, "P_NOCLOSE", (long)P_NOCLOSE)) return -1; if (ins(d, "P_NOSESSION", (long)P_NOSESSION)) return -1; if (ins(d, "P_QUOTE", (long)P_QUOTE)) return -1; if (ins(d, "P_TILDE", (long)P_TILDE)) return -1; if (ins(d, "P_UNRELATED", (long)P_UNRELATED)) return -1; if (ins(d, "P_DEBUGDESC", (long)P_DEBUGDESC)) return -1; #else if (ins(d, "P_WAIT", (long)_P_WAIT)) return -1; if (ins(d, "P_NOWAIT", (long)_P_NOWAIT)) return -1; if (ins(d, "P_OVERLAY", (long)_OLD_P_OVERLAY)) return -1; if (ins(d, "P_NOWAITO", (long)_P_NOWAITO)) return -1; if (ins(d, "P_DETACH", (long)_P_DETACH)) return -1; #endif #endif #if defined(PYOS_OS2) if (insertvalues(d)) return -1; #endif return 0; } #if (defined(_MSC_VER) || defined(__WATCOMC__) || defined(__BORLANDC__)) && !defined(__QNX__) #define INITFUNC initnt #define MODNAME "nt" #elif defined(PYOS_OS2) #define INITFUNC initos2 #define MODNAME "os2" #else #define INITFUNC initposix #define MODNAME "posix" #endif PyMODINIT_FUNC INITFUNC(void) { PyObject *m, *v; m = Py_InitModule3(MODNAME, posix_methods, posix__doc__); /* Initialize environ dictionary */ v = convertenviron(); Py_XINCREF(v); if (v == NULL || PyModule_AddObject(m, "environ", v) != 0) return; Py_DECREF(v); if (all_ins(m)) return; if (setup_confname_tables(m)) return; Py_INCREF(PyExc_OSError); PyModule_AddObject(m, "error", PyExc_OSError); #ifdef HAVE_PUTENV if (posix_putenv_garbage == NULL) posix_putenv_garbage = PyDict_New(); #endif stat_result_desc.name = MODNAME ".stat_result"; stat_result_desc.fields[7].name = PyStructSequence_UnnamedField; stat_result_desc.fields[8].name = PyStructSequence_UnnamedField; stat_result_desc.fields[9].name = PyStructSequence_UnnamedField; PyStructSequence_InitType(&StatResultType, &stat_result_desc); structseq_new = StatResultType.tp_new; StatResultType.tp_new = statresult_new; Py_INCREF((PyObject*) &StatResultType); PyModule_AddObject(m, "stat_result", (PyObject*) &StatResultType); statvfs_result_desc.name = MODNAME ".statvfs_result"; PyStructSequence_InitType(&StatVFSResultType, &statvfs_result_desc); Py_INCREF((PyObject*) &StatVFSResultType); PyModule_AddObject(m, "statvfs_result", (PyObject*) &StatVFSResultType); } Python-2.3.7/Modules/.cvsignore0000644001241000117560000000013507127143035015661 0ustar loewishpifb6Setup Makefile.pre Setup.thread Setup.config Setup.local hassignal config.c Makefile add2lib Python-2.3.7/Modules/_cursesmodule.c0000644001241000117560000021771207567165417016731 0ustar loewishpifb6/* * This is a curses module for Python. * * Based on prior work by Lance Ellinghaus and Oliver Andrich * Version 1.2 of this module: Copyright 1994 by Lance Ellinghouse, * Cathedral City, California Republic, United States of America. * * Version 1.5b1, heavily extended for ncurses by Oliver Andrich: * Copyright 1996,1997 by Oliver Andrich, Koblenz, Germany. * * Tidied for Python 1.6, and currently maintained by . * * Permission is hereby granted, free of charge, to any person obtaining * a copy of this source file to use, copy, modify, merge, or publish it * subject to the following conditions: * * The above copyright notice and this permission notice shall be included * in all copies or in any new file that contains a substantial portion of * this file. * * THE AUTHOR MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF * THE SOFTWARE FOR ANY PURPOSE. IT IS PROVIDED "AS IS" WITHOUT * EXPRESS OR IMPLIED WARRANTY. THE AUTHOR DISCLAIMS ALL WARRANTIES * WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND * NON-INFRINGEMENT OF THIRD PARTY RIGHTS. IN NO EVENT SHALL THE * AUTHOR BE LIABLE TO YOU OR ANY OTHER PARTY FOR ANY SPECIAL, * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE, STRICT LIABILITY OR * ANY OTHER ACTION ARISING OUT OF OR IN CONNECTION WITH THE USE OR * PERFORMANCE OF THIS SOFTWARE. */ /* CVS: $Id: _cursesmodule.c 29790 2002-11-21 14:17:51Z mwh $ */ /* A number of SysV or ncurses functions don't have wrappers yet; if you need a given function, add it and send a patch. Here's a list of currently unsupported functions: addchnstr addchstr chgat color_set define_key del_curterm delscreen dupwin inchnstr inchstr innstr keyok mcprint mvaddchnstr mvaddchstr mvchgat mvcur mvinchnstr mvinchstr mvinnstr mmvwaddchnstr mvwaddchstr mvwchgat mvwgetnstr mvwinchnstr mvwinchstr mvwinnstr newterm resizeterm restartterm ripoffline scr_dump scr_init scr_restore scr_set scrl set_curterm set_term setterm tgetent tgetflag tgetnum tgetstr tgoto timeout tputs use_default_colors vidattr vidputs waddchnstr waddchstr wchgat wcolor_set winchnstr winchstr winnstr wmouse_trafo wscrl Low-priority: slk_attr slk_attr_off slk_attr_on slk_attr_set slk_attroff slk_attron slk_attrset slk_clear slk_color slk_init slk_label slk_noutrefresh slk_refresh slk_restore slk_set slk_touch Menu extension (ncurses and probably SYSV): current_item free_item free_menu item_count item_description item_index item_init item_name item_opts item_opts_off item_opts_on item_term item_userptr item_value item_visible menu_back menu_driver menu_fore menu_format menu_grey menu_init menu_items menu_mark menu_opts menu_opts_off menu_opts_on menu_pad menu_pattern menu_request_by_name menu_request_name menu_spacing menu_sub menu_term menu_userptr menu_win new_item new_menu pos_menu_cursor post_menu scale_menu set_current_item set_item_init set_item_opts set_item_term set_item_userptr set_item_value set_menu_back set_menu_fore set_menu_format set_menu_grey set_menu_init set_menu_items set_menu_mark set_menu_opts set_menu_pad set_menu_pattern set_menu_spacing set_menu_sub set_menu_term set_menu_userptr set_menu_win set_top_row top_row unpost_menu Form extension (ncurses and probably SYSV): current_field data_ahead data_behind dup_field dynamic_fieldinfo field_arg field_back field_buffer field_count field_fore field_index field_info field_init field_just field_opts field_opts_off field_opts_on field_pad field_status field_term field_type field_userptr form_driver form_fields form_init form_opts form_opts_off form_opts_on form_page form_request_by_name form_request_name form_sub form_term form_userptr form_win free_field free_form link_field link_fieldtype move_field new_field new_form new_page pos_form_cursor post_form scale_form set_current_field set_field_back set_field_buffer set_field_fore set_field_init set_field_just set_field_opts set_field_pad set_field_status set_field_term set_field_type set_field_userptr set_fieldtype_arg set_fieldtype_choice set_form_fields set_form_init set_form_opts set_form_page set_form_sub set_form_term set_form_userptr set_form_win set_max_field set_new_page unpost_form */ /* Release Number */ char *PyCursesVersion = "2.2"; /* Includes */ #include "Python.h" #ifdef __osf__ #define STRICT_SYSV_CURSES /* Don't use ncurses extensions */ #endif #ifdef __hpux #define STRICT_SYSV_CURSES #endif #define CURSES_MODULE #include "py_curses.h" /* These prototypes are in , but including this header #defines many common symbols (such as "lines") which breaks the curses module in other ways. So the code will just specify explicit prototypes here. */ extern int setupterm(char *,int,int *); #ifdef __sgi #include #endif #if !defined(HAVE_NCURSES_H) && (defined(sgi) || defined(__sun) || defined(SCO5)) #define STRICT_SYSV_CURSES /* Don't use ncurses extensions */ typedef chtype attr_t; /* No attr_t type is available */ #endif #if defined(_AIX) #define STRICT_SYSV_CURSES #endif /* Definition of exception curses.error */ static PyObject *PyCursesError; /* Tells whether setupterm() has been called to initialise terminfo. */ static int initialised_setupterm = FALSE; /* Tells whether initscr() has been called to initialise curses. */ static int initialised = FALSE; /* Tells whether start_color() has been called to initialise color usage. */ static int initialisedcolors = FALSE; /* Utility Macros */ #define PyCursesSetupTermCalled \ if (initialised_setupterm != TRUE) { \ PyErr_SetString(PyCursesError, \ "must call (at least) setupterm() first"); \ return 0; } #define PyCursesInitialised \ if (initialised != TRUE) { \ PyErr_SetString(PyCursesError, \ "must call initscr() first"); \ return 0; } #define PyCursesInitialisedColor \ if (initialisedcolors != TRUE) { \ PyErr_SetString(PyCursesError, \ "must call start_color() first"); \ return 0; } /* Utility Functions */ /* * Check the return code from a curses function and return None * or raise an exception as appropriate. These are exported using the * CObject API. */ static PyObject * PyCursesCheckERR(int code, char *fname) { if (code != ERR) { Py_INCREF(Py_None); return Py_None; } else { if (fname == NULL) { PyErr_SetString(PyCursesError, catchall_ERR); } else { PyErr_Format(PyCursesError, "%s() returned ERR", fname); } return NULL; } } static int PyCurses_ConvertToChtype(PyObject *obj, chtype *ch) { if (PyInt_Check(obj)) { *ch = (chtype) PyInt_AsLong(obj); } else if(PyString_Check(obj) && (PyString_Size(obj) == 1)) { *ch = (chtype) *PyString_AsString(obj); } else { return 0; } return 1; } /* Function versions of the 3 functions for tested whether curses has been initialised or not. */ static int func_PyCursesSetupTermCalled(void) { PyCursesSetupTermCalled; return 1; } static int func_PyCursesInitialised(void) { PyCursesInitialised; return 1; } static int func_PyCursesInitialisedColor(void) { PyCursesInitialisedColor; return 1; } /***************************************************************************** The Window Object ******************************************************************************/ /* Definition of the window type */ PyTypeObject PyCursesWindow_Type; /* Function prototype macros for Window object X - function name TYPE - parameter Type ERGSTR - format string for construction of the return value PARSESTR - format string for argument parsing */ #define Window_NoArgNoReturnFunction(X) \ static PyObject *PyCursesWindow_ ## X (PyCursesWindowObject *self, PyObject *args) \ { return PyCursesCheckERR(X(self->win), # X); } #define Window_NoArgTrueFalseFunction(X) \ static PyObject * PyCursesWindow_ ## X (PyCursesWindowObject *self) \ { \ if (X (self->win) == FALSE) { Py_INCREF(Py_False); return Py_False; } \ else { Py_INCREF(Py_True); return Py_True; } } #define Window_NoArgNoReturnVoidFunction(X) \ static PyObject * PyCursesWindow_ ## X (PyCursesWindowObject *self) \ { \ X(self->win); Py_INCREF(Py_None); return Py_None; } #define Window_NoArg2TupleReturnFunction(X, TYPE, ERGSTR) \ static PyObject * PyCursesWindow_ ## X (PyCursesWindowObject *self) \ { \ TYPE arg1, arg2; \ X(self->win,arg1,arg2); return Py_BuildValue(ERGSTR, arg1, arg2); } #define Window_OneArgNoReturnVoidFunction(X, TYPE, PARSESTR) \ static PyObject * PyCursesWindow_ ## X (PyCursesWindowObject *self, PyObject *args) \ { \ TYPE arg1; \ if (!PyArg_ParseTuple(args, PARSESTR, &arg1)) return NULL; \ X(self->win,arg1); Py_INCREF(Py_None); return Py_None; } #define Window_OneArgNoReturnFunction(X, TYPE, PARSESTR) \ static PyObject * PyCursesWindow_ ## X (PyCursesWindowObject *self, PyObject *args) \ { \ TYPE arg1; \ if (!PyArg_ParseTuple(args,PARSESTR, &arg1)) return NULL; \ return PyCursesCheckERR(X(self->win, arg1), # X); } #define Window_TwoArgNoReturnFunction(X, TYPE, PARSESTR) \ static PyObject * PyCursesWindow_ ## X (PyCursesWindowObject *self, PyObject *args) \ { \ TYPE arg1, arg2; \ if (!PyArg_ParseTuple(args,PARSESTR, &arg1, &arg2)) return NULL; \ return PyCursesCheckERR(X(self->win, arg1, arg2), # X); } /* ------------- WINDOW routines --------------- */ Window_NoArgNoReturnFunction(untouchwin) Window_NoArgNoReturnFunction(touchwin) Window_NoArgNoReturnFunction(redrawwin) Window_NoArgNoReturnFunction(winsertln) Window_NoArgNoReturnFunction(werase) Window_NoArgNoReturnFunction(wdeleteln) Window_NoArgTrueFalseFunction(is_wintouched) Window_NoArgNoReturnVoidFunction(wsyncup) Window_NoArgNoReturnVoidFunction(wsyncdown) Window_NoArgNoReturnVoidFunction(wstandend) Window_NoArgNoReturnVoidFunction(wstandout) Window_NoArgNoReturnVoidFunction(wcursyncup) Window_NoArgNoReturnVoidFunction(wclrtoeol) Window_NoArgNoReturnVoidFunction(wclrtobot) Window_NoArgNoReturnVoidFunction(wclear) Window_OneArgNoReturnVoidFunction(idcok, int, "i;True(1) or False(0)") Window_OneArgNoReturnVoidFunction(immedok, int, "i;True(1) or False(0)") Window_OneArgNoReturnVoidFunction(wtimeout, int, "i;delay") Window_NoArg2TupleReturnFunction(getyx, int, "ii") Window_NoArg2TupleReturnFunction(getbegyx, int, "ii") Window_NoArg2TupleReturnFunction(getmaxyx, int, "ii") Window_NoArg2TupleReturnFunction(getparyx, int, "ii") Window_OneArgNoReturnFunction(wattron, attr_t, "l;attr") Window_OneArgNoReturnFunction(wattroff, attr_t, "l;attr") Window_OneArgNoReturnFunction(wattrset, attr_t, "l;attr") Window_OneArgNoReturnFunction(clearok, int, "i;True(1) or False(0)") Window_OneArgNoReturnFunction(idlok, int, "i;True(1) or False(0)") #if defined(__NetBSD__) Window_OneArgNoReturnVoidFunction(keypad, int, "i;True(1) or False(0)") #else Window_OneArgNoReturnFunction(keypad, int, "i;True(1) or False(0)") #endif Window_OneArgNoReturnFunction(leaveok, int, "i;True(1) or False(0)") #if defined(__NetBSD__) Window_OneArgNoReturnVoidFunction(nodelay, int, "i;True(1) or False(0)") #else Window_OneArgNoReturnFunction(nodelay, int, "i;True(1) or False(0)") #endif Window_OneArgNoReturnFunction(notimeout, int, "i;True(1) or False(0)") Window_OneArgNoReturnFunction(scrollok, int, "i;True(1) or False(0)") Window_OneArgNoReturnFunction(winsdelln, int, "i;nlines") Window_OneArgNoReturnFunction(syncok, int, "i;True(1) or False(0)") Window_TwoArgNoReturnFunction(mvwin, int, "ii;y,x") Window_TwoArgNoReturnFunction(mvderwin, int, "ii;y,x") Window_TwoArgNoReturnFunction(wmove, int, "ii;y,x") #ifndef STRICT_SYSV_CURSES Window_TwoArgNoReturnFunction(wresize, int, "ii;lines,columns") #endif /* Allocation and deallocation of Window Objects */ static PyObject * PyCursesWindow_New(WINDOW *win) { PyCursesWindowObject *wo; wo = PyObject_NEW(PyCursesWindowObject, &PyCursesWindow_Type); if (wo == NULL) return NULL; wo->win = win; return (PyObject *)wo; } static void PyCursesWindow_Dealloc(PyCursesWindowObject *wo) { if (wo->win != stdscr) delwin(wo->win); PyObject_DEL(wo); } /* Addch, Addstr, Addnstr */ static PyObject * PyCursesWindow_AddCh(PyCursesWindowObject *self, PyObject *args) { int rtn, x, y, use_xy = FALSE; PyObject *temp; chtype ch = 0; attr_t attr = A_NORMAL; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "O;ch or int", &temp)) return NULL; break; case 2: if (!PyArg_ParseTuple(args, "Ol;ch or int,attr", &temp, &attr)) return NULL; break; case 3: if (!PyArg_ParseTuple(args,"iiO;y,x,ch or int", &y, &x, &temp)) return NULL; use_xy = TRUE; break; case 4: if (!PyArg_ParseTuple(args,"iiOl;y,x,ch or int, attr", &y, &x, &temp, &attr)) return NULL; use_xy = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "addch requires 1 to 4 arguments"); return NULL; } if (!PyCurses_ConvertToChtype(temp, &ch)) { PyErr_SetString(PyExc_TypeError, "argument 1 or 3 must be a ch or an int"); return NULL; } if (use_xy == TRUE) rtn = mvwaddch(self->win,y,x, ch | attr); else { rtn = waddch(self->win, ch | attr); } return PyCursesCheckERR(rtn, "addch"); } static PyObject * PyCursesWindow_AddStr(PyCursesWindowObject *self, PyObject *args) { int rtn; int x, y; char *str; attr_t attr = A_NORMAL , attr_old = A_NORMAL; int use_xy = FALSE, use_attr = FALSE; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args,"s;str", &str)) return NULL; break; case 2: if (!PyArg_ParseTuple(args,"sl;str,attr", &str, &attr)) return NULL; use_attr = TRUE; break; case 3: if (!PyArg_ParseTuple(args,"iis;int,int,str", &y, &x, &str)) return NULL; use_xy = TRUE; break; case 4: if (!PyArg_ParseTuple(args,"iisl;int,int,str,attr", &y, &x, &str, &attr)) return NULL; use_xy = use_attr = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "addstr requires 1 to 4 arguments"); return NULL; } if (use_attr == TRUE) { attr_old = getattrs(self->win); wattrset(self->win,attr); } if (use_xy == TRUE) rtn = mvwaddstr(self->win,y,x,str); else rtn = waddstr(self->win,str); if (use_attr == TRUE) wattrset(self->win,attr_old); return PyCursesCheckERR(rtn, "addstr"); } static PyObject * PyCursesWindow_AddNStr(PyCursesWindowObject *self, PyObject *args) { int rtn, x, y, n; char *str; attr_t attr = A_NORMAL , attr_old = A_NORMAL; int use_xy = FALSE, use_attr = FALSE; switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args,"si;str,n", &str, &n)) return NULL; break; case 3: if (!PyArg_ParseTuple(args,"sil;str,n,attr", &str, &n, &attr)) return NULL; use_attr = TRUE; break; case 4: if (!PyArg_ParseTuple(args,"iisi;y,x,str,n", &y, &x, &str, &n)) return NULL; use_xy = TRUE; break; case 5: if (!PyArg_ParseTuple(args,"iisil;y,x,str,n,attr", &y, &x, &str, &n, &attr)) return NULL; use_xy = use_attr = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "addnstr requires 2 to 5 arguments"); return NULL; } if (use_attr == TRUE) { attr_old = getattrs(self->win); wattrset(self->win,attr); } if (use_xy == TRUE) rtn = mvwaddnstr(self->win,y,x,str,n); else rtn = waddnstr(self->win,str,n); if (use_attr == TRUE) wattrset(self->win,attr_old); return PyCursesCheckERR(rtn, "addnstr"); } static PyObject * PyCursesWindow_Bkgd(PyCursesWindowObject *self, PyObject *args) { PyObject *temp; chtype bkgd; attr_t attr = A_NORMAL; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "O;ch or int", &temp)) return NULL; break; case 2: if (!PyArg_ParseTuple(args,"Ol;ch or int,attr", &temp, &attr)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "bkgd requires 1 or 2 arguments"); return NULL; } if (!PyCurses_ConvertToChtype(temp, &bkgd)) { PyErr_SetString(PyExc_TypeError, "argument 1 or 3 must be a ch or an int"); return NULL; } return PyCursesCheckERR(wbkgd(self->win, bkgd | attr), "bkgd"); } static PyObject * PyCursesWindow_BkgdSet(PyCursesWindowObject *self, PyObject *args) { PyObject *temp; chtype bkgd; attr_t attr = A_NORMAL; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "O;ch or int", &temp)) return NULL; break; case 2: if (!PyArg_ParseTuple(args,"Ol;ch or int,attr", &temp, &attr)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "bkgdset requires 1 or 2 arguments"); return NULL; } if (!PyCurses_ConvertToChtype(temp, &bkgd)) { PyErr_SetString(PyExc_TypeError, "argument 1 must be a ch or an int"); return NULL; } wbkgdset(self->win, bkgd | attr); return PyCursesCheckERR(0, "bkgdset"); } static PyObject * PyCursesWindow_Border(PyCursesWindowObject *self, PyObject *args) { PyObject *temp[8]; chtype ch[8]; int i; /* Clear the array of parameters */ for(i=0; i<8; i++) { temp[i] = NULL; ch[i] = 0; } if (!PyArg_ParseTuple(args,"|OOOOOOOO;ls,rs,ts,bs,tl,tr,bl,br", &temp[0], &temp[1], &temp[2], &temp[3], &temp[4], &temp[5], &temp[6], &temp[7])) return NULL; for(i=0; i<8; i++) { if (temp[i] != NULL && !PyCurses_ConvertToChtype(temp[i], &ch[i])) { PyErr_Format(PyExc_TypeError, "argument %i must be a ch or an int", i+1); return NULL; } } wborder(self->win, ch[0], ch[1], ch[2], ch[3], ch[4], ch[5], ch[6], ch[7]); Py_INCREF(Py_None); return Py_None; } static PyObject * PyCursesWindow_Box(PyCursesWindowObject *self, PyObject *args) { chtype ch1=0,ch2=0; switch(PyTuple_Size(args)){ case 0: break; default: if (!PyArg_ParseTuple(args,"ll;vertint,horint", &ch1, &ch2)) return NULL; } box(self->win,ch1,ch2); Py_INCREF(Py_None); return Py_None; } #if defined(HAVE_NCURSES_H) || defined(MVWDELCH_IS_EXPRESSION) #define py_mvwdelch mvwdelch #else int py_mvwdelch(WINDOW *w, int y, int x) { mvwdelch(w,y,x); /* On HP/UX, mvwdelch already returns. On other systems, we may well run into this return statement. */ return 0; } #endif static PyObject * PyCursesWindow_DelCh(PyCursesWindowObject *self, PyObject *args) { int rtn; int x, y; switch (PyTuple_Size(args)) { case 0: rtn = wdelch(self->win); break; case 2: if (!PyArg_ParseTuple(args,"ii;y,x", &y, &x)) return NULL; rtn = py_mvwdelch(self->win,y,x); break; default: PyErr_SetString(PyExc_TypeError, "delch requires 0 or 2 arguments"); return NULL; } return PyCursesCheckERR(rtn, "[mv]wdelch"); } static PyObject * PyCursesWindow_DerWin(PyCursesWindowObject *self, PyObject *args) { WINDOW *win; int nlines, ncols, begin_y, begin_x; nlines = 0; ncols = 0; switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args,"ii;begin_y,begin_x",&begin_y,&begin_x)) return NULL; break; case 4: if (!PyArg_ParseTuple(args, "iiii;nlines,ncols,begin_y,begin_x", &nlines,&ncols,&begin_y,&begin_x)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "derwin requires 2 or 4 arguments"); return NULL; } win = derwin(self->win,nlines,ncols,begin_y,begin_x); if (win == NULL) { PyErr_SetString(PyCursesError, catchall_NULL); return NULL; } return (PyObject *)PyCursesWindow_New(win); } static PyObject * PyCursesWindow_EchoChar(PyCursesWindowObject *self, PyObject *args) { PyObject *temp; chtype ch; attr_t attr = A_NORMAL; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args,"O;ch or int", &temp)) return NULL; break; case 2: if (!PyArg_ParseTuple(args,"Ol;ch or int,attr", &temp, &attr)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "echochar requires 1 or 2 arguments"); return NULL; } if (!PyCurses_ConvertToChtype(temp, &ch)) { PyErr_SetString(PyExc_TypeError, "argument 1 must be a ch or an int"); return NULL; } #ifdef WINDOW_HAS_FLAGS if (self->win->_flags & _ISPAD) return PyCursesCheckERR(pechochar(self->win, ch | attr), "echochar"); else #endif return PyCursesCheckERR(wechochar(self->win, ch | attr), "echochar"); } #ifdef NCURSES_MOUSE_VERSION static PyObject * PyCursesWindow_Enclose(PyCursesWindowObject *self, PyObject *args) { int x, y; if (!PyArg_ParseTuple(args,"ii;y,x", &y, &x)) return NULL; return PyInt_FromLong( wenclose(self->win,y,x) ); } #endif static PyObject * PyCursesWindow_GetBkgd(PyCursesWindowObject *self) { return PyInt_FromLong((long) getbkgd(self->win)); } static PyObject * PyCursesWindow_GetCh(PyCursesWindowObject *self, PyObject *args) { int x, y; int rtn; switch (PyTuple_Size(args)) { case 0: Py_BEGIN_ALLOW_THREADS rtn = wgetch(self->win); Py_END_ALLOW_THREADS break; case 2: if (!PyArg_ParseTuple(args,"ii;y,x",&y,&x)) return NULL; Py_BEGIN_ALLOW_THREADS rtn = mvwgetch(self->win,y,x); Py_END_ALLOW_THREADS break; default: PyErr_SetString(PyExc_TypeError, "getch requires 0 or 2 arguments"); return NULL; } return PyInt_FromLong((long)rtn); } static PyObject * PyCursesWindow_GetKey(PyCursesWindowObject *self, PyObject *args) { int x, y; int rtn; switch (PyTuple_Size(args)) { case 0: Py_BEGIN_ALLOW_THREADS rtn = wgetch(self->win); Py_END_ALLOW_THREADS break; case 2: if (!PyArg_ParseTuple(args,"ii;y,x",&y,&x)) return NULL; Py_BEGIN_ALLOW_THREADS rtn = mvwgetch(self->win,y,x); Py_END_ALLOW_THREADS break; default: PyErr_SetString(PyExc_TypeError, "getkey requires 0 or 2 arguments"); return NULL; } if (rtn == ERR) { /* getch() returns ERR in nodelay mode */ PyErr_SetString(PyCursesError, "no input"); return NULL; } else if (rtn<=255) return Py_BuildValue("c", rtn); else #if defined(__NetBSD__) return PyString_FromString(unctrl(rtn)); #else return PyString_FromString((char *)keyname(rtn)); #endif } static PyObject * PyCursesWindow_GetStr(PyCursesWindowObject *self, PyObject *args) { int x, y, n; char rtn[1024]; /* This should be big enough.. I hope */ int rtn2; switch (PyTuple_Size(args)) { case 0: Py_BEGIN_ALLOW_THREADS rtn2 = wgetstr(self->win,rtn); Py_END_ALLOW_THREADS break; case 1: if (!PyArg_ParseTuple(args,"i;n", &n)) return NULL; Py_BEGIN_ALLOW_THREADS rtn2 = wgetnstr(self->win,rtn,n); Py_END_ALLOW_THREADS break; case 2: if (!PyArg_ParseTuple(args,"ii;y,x",&y,&x)) return NULL; Py_BEGIN_ALLOW_THREADS rtn2 = mvwgetstr(self->win,y,x,rtn); Py_END_ALLOW_THREADS break; case 3: if (!PyArg_ParseTuple(args,"iii;y,x,n", &y, &x, &n)) return NULL; #ifdef STRICT_SYSV_CURSES /* Untested */ Py_BEGIN_ALLOW_THREADS rtn2 = wmove(self->win,y,x)==ERR ? ERR : wgetnstr(self->win, rtn, n); Py_END_ALLOW_THREADS #else Py_BEGIN_ALLOW_THREADS rtn2 = mvwgetnstr(self->win, y, x, rtn, n); Py_END_ALLOW_THREADS #endif break; default: PyErr_SetString(PyExc_TypeError, "getstr requires 0 to 2 arguments"); return NULL; } if (rtn2 == ERR) rtn[0] = 0; return PyString_FromString(rtn); } static PyObject * PyCursesWindow_Hline(PyCursesWindowObject *self, PyObject *args) { PyObject *temp; chtype ch; int n, x, y, code = OK; attr_t attr = A_NORMAL; switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args, "Oi;ch or int,n", &temp, &n)) return NULL; break; case 3: if (!PyArg_ParseTuple(args, "Oil;ch or int,n,attr", &temp, &n, &attr)) return NULL; break; case 4: if (!PyArg_ParseTuple(args, "iiOi;y,x,ch or int,n", &y, &x, &temp, &n)) return NULL; code = wmove(self->win, y, x); break; case 5: if (!PyArg_ParseTuple(args, "iiOil; y,x,ch or int,n,attr", &y, &x, &temp, &n, &attr)) return NULL; code = wmove(self->win, y, x); break; default: PyErr_SetString(PyExc_TypeError, "hline requires 2 to 5 arguments"); return NULL; } if (code != ERR) { if (!PyCurses_ConvertToChtype(temp, &ch)) { PyErr_SetString(PyExc_TypeError, "argument 1 or 3 must be a ch or an int"); return NULL; } return PyCursesCheckERR(whline(self->win, ch | attr, n), "hline"); } else return PyCursesCheckERR(code, "wmove"); } static PyObject * PyCursesWindow_InsCh(PyCursesWindowObject *self, PyObject *args) { int rtn, x, y, use_xy = FALSE; PyObject *temp; chtype ch = 0; attr_t attr = A_NORMAL; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "O;ch or int", &temp)) return NULL; break; case 2: if (!PyArg_ParseTuple(args, "Ol;ch or int,attr", &temp, &attr)) return NULL; break; case 3: if (!PyArg_ParseTuple(args,"iiO;y,x,ch or int", &y, &x, &temp)) return NULL; use_xy = TRUE; break; case 4: if (!PyArg_ParseTuple(args,"iiOl;y,x,ch or int, attr", &y, &x, &temp, &attr)) return NULL; use_xy = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "insch requires 1 or 4 arguments"); return NULL; } if (!PyCurses_ConvertToChtype(temp, &ch)) { PyErr_SetString(PyExc_TypeError, "argument 1 or 3 must be a ch or an int"); return NULL; } if (use_xy == TRUE) rtn = mvwinsch(self->win,y,x, ch | attr); else { rtn = winsch(self->win, ch | attr); } return PyCursesCheckERR(rtn, "insch"); } static PyObject * PyCursesWindow_InCh(PyCursesWindowObject *self, PyObject *args) { int x, y, rtn; switch (PyTuple_Size(args)) { case 0: rtn = winch(self->win); break; case 2: if (!PyArg_ParseTuple(args,"ii;y,x",&y,&x)) return NULL; rtn = mvwinch(self->win,y,x); break; default: PyErr_SetString(PyExc_TypeError, "inch requires 0 or 2 arguments"); return NULL; } return PyInt_FromLong((long) rtn); } static PyObject * PyCursesWindow_InStr(PyCursesWindowObject *self, PyObject *args) { int x, y, n; char rtn[1024]; /* This should be big enough.. I hope */ int rtn2; switch (PyTuple_Size(args)) { case 0: rtn2 = winstr(self->win,rtn); break; case 1: if (!PyArg_ParseTuple(args,"i;n", &n)) return NULL; rtn2 = winnstr(self->win,rtn,n); break; case 2: if (!PyArg_ParseTuple(args,"ii;y,x",&y,&x)) return NULL; rtn2 = mvwinstr(self->win,y,x,rtn); break; case 3: if (!PyArg_ParseTuple(args, "iii;y,x,n", &y, &x, &n)) return NULL; rtn2 = mvwinnstr(self->win, y, x, rtn, n); break; default: PyErr_SetString(PyExc_TypeError, "instr requires 0 or 3 arguments"); return NULL; } if (rtn2 == ERR) rtn[0] = 0; return PyString_FromString(rtn); } static PyObject * PyCursesWindow_InsStr(PyCursesWindowObject *self, PyObject *args) { int rtn; int x, y; char *str; attr_t attr = A_NORMAL , attr_old = A_NORMAL; int use_xy = FALSE, use_attr = FALSE; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args,"s;str", &str)) return NULL; break; case 2: if (!PyArg_ParseTuple(args,"sl;str,attr", &str, &attr)) return NULL; use_attr = TRUE; break; case 3: if (!PyArg_ParseTuple(args,"iis;y,x,str", &y, &x, &str)) return NULL; use_xy = TRUE; break; case 4: if (!PyArg_ParseTuple(args,"iisl;y,x,str,attr", &y, &x, &str, &attr)) return NULL; use_xy = use_attr = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "insstr requires 1 to 4 arguments"); return NULL; } if (use_attr == TRUE) { attr_old = getattrs(self->win); wattrset(self->win,attr); } if (use_xy == TRUE) rtn = mvwinsstr(self->win,y,x,str); else rtn = winsstr(self->win,str); if (use_attr == TRUE) wattrset(self->win,attr_old); return PyCursesCheckERR(rtn, "insstr"); } static PyObject * PyCursesWindow_InsNStr(PyCursesWindowObject *self, PyObject *args) { int rtn, x, y, n; char *str; attr_t attr = A_NORMAL , attr_old = A_NORMAL; int use_xy = FALSE, use_attr = FALSE; switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args,"si;str,n", &str, &n)) return NULL; break; case 3: if (!PyArg_ParseTuple(args,"sil;str,n,attr", &str, &n, &attr)) return NULL; use_attr = TRUE; break; case 4: if (!PyArg_ParseTuple(args,"iisi;y,x,str,n", &y, &x, &str, &n)) return NULL; use_xy = TRUE; break; case 5: if (!PyArg_ParseTuple(args,"iisil;y,x,str,n,attr", &y, &x, &str, &n, &attr)) return NULL; use_xy = use_attr = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "insnstr requires 2 to 5 arguments"); return NULL; } if (use_attr == TRUE) { attr_old = getattrs(self->win); wattrset(self->win,attr); } if (use_xy == TRUE) rtn = mvwinsnstr(self->win,y,x,str,n); else rtn = winsnstr(self->win,str,n); if (use_attr == TRUE) wattrset(self->win,attr_old); return PyCursesCheckERR(rtn, "insnstr"); } static PyObject * PyCursesWindow_Is_LineTouched(PyCursesWindowObject *self, PyObject *args) { int line, erg; if (!PyArg_ParseTuple(args,"i;line", &line)) return NULL; erg = is_linetouched(self->win, line); if (erg == ERR) { PyErr_SetString(PyExc_TypeError, "is_linetouched: line number outside of boundaries"); return NULL; } else if (erg == FALSE) { Py_INCREF(Py_False); return Py_False; } else { Py_INCREF(Py_True); return Py_True; } } static PyObject * PyCursesWindow_NoOutRefresh(PyCursesWindowObject *self, PyObject *args) { int pminrow,pmincol,sminrow,smincol,smaxrow,smaxcol; int rtn; #ifndef WINDOW_HAS_FLAGS if (0) { #else if (self->win->_flags & _ISPAD) { #endif switch(PyTuple_Size(args)) { case 6: if (!PyArg_ParseTuple(args, "iiiiii;" \ "pminrow,pmincol,sminrow,smincol,smaxrow,smaxcol", &pminrow, &pmincol, &sminrow, &smincol, &smaxrow, &smaxcol)) return NULL; Py_BEGIN_ALLOW_THREADS rtn = pnoutrefresh(self->win, pminrow, pmincol, sminrow, smincol, smaxrow, smaxcol); Py_END_ALLOW_THREADS return PyCursesCheckERR(rtn, "pnoutrefresh"); default: PyErr_SetString(PyCursesError, "noutrefresh() called for a pad " "requires 6 arguments"); return NULL; } } else { if (!PyArg_ParseTuple(args, ":noutrefresh")) return NULL; Py_BEGIN_ALLOW_THREADS rtn = wnoutrefresh(self->win); Py_END_ALLOW_THREADS return PyCursesCheckERR(rtn, "wnoutrefresh"); } } static PyObject * PyCursesWindow_Overlay(PyCursesWindowObject *self, PyObject *args) { PyCursesWindowObject *temp; int use_copywin = FALSE; int sminrow, smincol, dminrow, dmincol, dmaxrow, dmaxcol; int rtn; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "O!;window object", &PyCursesWindow_Type, &temp)) return NULL; break; case 7: if (!PyArg_ParseTuple(args, "(O!iiiiii);window object, int, int, int, int, int, int", &PyCursesWindow_Type, &temp, &sminrow, &smincol, &dminrow, &dmincol, &dmaxrow, &dmaxcol)) return NULL; use_copywin = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "overlay requires one or seven arguments"); return NULL; } if (use_copywin == TRUE) { rtn = copywin(self->win, temp->win, sminrow, smincol, dminrow, dmincol, dmaxrow, dmaxcol, TRUE); return PyCursesCheckERR(rtn, "copywin"); } else { rtn = overlay(self->win, temp->win); return PyCursesCheckERR(rtn, "overlay"); } } static PyObject * PyCursesWindow_Overwrite(PyCursesWindowObject *self, PyObject *args) { PyCursesWindowObject *temp; int use_copywin = FALSE; int sminrow, smincol, dminrow, dmincol, dmaxrow, dmaxcol; int rtn; switch (PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "O!;window object", &PyCursesWindow_Type, &temp)) return NULL; break; case 7: if (!PyArg_ParseTuple(args, "(O!iiiiii);window object, int, int, int, int, int, int", &PyCursesWindow_Type, &temp, &sminrow, &smincol, &dminrow, &dmincol, &dmaxrow, &dmaxcol)) return NULL; use_copywin = TRUE; break; default: PyErr_SetString(PyExc_TypeError, "overwrite requires one or seven arguments"); return NULL; } if (use_copywin == TRUE) { rtn = copywin(self->win, temp->win, sminrow, smincol, dminrow, dmincol, dmaxrow, dmaxcol, FALSE); return PyCursesCheckERR(rtn, "copywin"); } else { rtn = overwrite(self->win, temp->win); return PyCursesCheckERR(rtn, "overwrite"); } } static PyObject * PyCursesWindow_PutWin(PyCursesWindowObject *self, PyObject *args) { PyObject *temp; if (!PyArg_ParseTuple(args, "O;fileobj", &temp)) return NULL; if (!PyFile_Check(temp)) { PyErr_SetString(PyExc_TypeError, "argument must be a file object"); return NULL; } return PyCursesCheckERR(putwin(self->win, PyFile_AsFile(temp)), "putwin"); } static PyObject * PyCursesWindow_RedrawLine(PyCursesWindowObject *self, PyObject *args) { int beg, num; if (!PyArg_ParseTuple(args,"ii;beg,num", &beg, &num)) return NULL; return PyCursesCheckERR(wredrawln(self->win,beg,num), "redrawln"); } static PyObject * PyCursesWindow_Refresh(PyCursesWindowObject *self, PyObject *args) { int pminrow,pmincol,sminrow,smincol,smaxrow,smaxcol; int rtn; #ifndef WINDOW_HAS_FLAGS if (0) { #else if (self->win->_flags & _ISPAD) { #endif switch(PyTuple_Size(args)) { case 6: if (!PyArg_ParseTuple(args, "iiiiii;" \ "pminrow,pmincol,sminrow,smincol,smaxrow,smaxcol", &pminrow, &pmincol, &sminrow, &smincol, &smaxrow, &smaxcol)) return NULL; Py_BEGIN_ALLOW_THREADS rtn = prefresh(self->win, pminrow, pmincol, sminrow, smincol, smaxrow, smaxcol); Py_END_ALLOW_THREADS return PyCursesCheckERR(rtn, "prefresh"); default: PyErr_SetString(PyCursesError, "refresh() for a pad requires 6 arguments"); return NULL; } } else { if (!PyArg_ParseTuple(args, ":refresh")) return NULL; Py_BEGIN_ALLOW_THREADS rtn = wrefresh(self->win); Py_END_ALLOW_THREADS return PyCursesCheckERR(rtn, "prefresh"); } } static PyObject * PyCursesWindow_SetScrollRegion(PyCursesWindowObject *self, PyObject *args) { int x, y; if (!PyArg_ParseTuple(args,"ii;top, bottom",&y,&x)) return NULL; return PyCursesCheckERR(wsetscrreg(self->win,y,x), "wsetscrreg"); } static PyObject * PyCursesWindow_SubWin(PyCursesWindowObject *self, PyObject *args) { WINDOW *win; int nlines, ncols, begin_y, begin_x; nlines = 0; ncols = 0; switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args,"ii;begin_y,begin_x",&begin_y,&begin_x)) return NULL; break; case 4: if (!PyArg_ParseTuple(args, "iiii;nlines,ncols,begin_y,begin_x", &nlines,&ncols,&begin_y,&begin_x)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "subwin requires 2 or 4 arguments"); return NULL; } /* printf("Subwin: %i %i %i %i \n", nlines, ncols, begin_y, begin_x); */ #ifdef WINDOW_HAS_FLAGS if (self->win->_flags & _ISPAD) win = subpad(self->win, nlines, ncols, begin_y, begin_x); else #endif win = subwin(self->win, nlines, ncols, begin_y, begin_x); if (win == NULL) { PyErr_SetString(PyCursesError, catchall_NULL); return NULL; } return (PyObject *)PyCursesWindow_New(win); } static PyObject * PyCursesWindow_Scroll(PyCursesWindowObject *self, PyObject *args) { int nlines; switch(PyTuple_Size(args)) { case 0: return PyCursesCheckERR(scroll(self->win), "scroll"); case 1: if (!PyArg_ParseTuple(args, "i;nlines", &nlines)) return NULL; return PyCursesCheckERR(wscrl(self->win, nlines), "scroll"); default: PyErr_SetString(PyExc_TypeError, "scroll requires 0 or 1 arguments"); return NULL; } } static PyObject * PyCursesWindow_TouchLine(PyCursesWindowObject *self, PyObject *args) { int st, cnt, val; switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args,"ii;start,count",&st,&cnt)) return NULL; return PyCursesCheckERR(touchline(self->win,st,cnt), "touchline"); case 3: if (!PyArg_ParseTuple(args, "iii;start,count,val", &st, &cnt, &val)) return NULL; return PyCursesCheckERR(wtouchln(self->win, st, cnt, val), "touchline"); default: PyErr_SetString(PyExc_TypeError, "touchline requires 2 or 3 arguments"); return NULL; } } static PyObject * PyCursesWindow_Vline(PyCursesWindowObject *self, PyObject *args) { PyObject *temp; chtype ch; int n, x, y, code = OK; attr_t attr = A_NORMAL; switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args, "Oi;ch or int,n", &temp, &n)) return NULL; break; case 3: if (!PyArg_ParseTuple(args, "Oil;ch or int,n,attr", &temp, &n, &attr)) return NULL; break; case 4: if (!PyArg_ParseTuple(args, "iiOi;y,x,ch or int,n", &y, &x, &temp, &n)) return NULL; code = wmove(self->win, y, x); break; case 5: if (!PyArg_ParseTuple(args, "iiOil; y,x,ch or int,n,attr", &y, &x, &temp, &n, &attr)) return NULL; code = wmove(self->win, y, x); break; default: PyErr_SetString(PyExc_TypeError, "vline requires 2 to 5 arguments"); return NULL; } if (code != ERR) { if (!PyCurses_ConvertToChtype(temp, &ch)) { PyErr_SetString(PyExc_TypeError, "argument 1 or 3 must be a ch or an int"); return NULL; } return PyCursesCheckERR(wvline(self->win, ch | attr, n), "vline"); } else return PyCursesCheckERR(code, "wmove"); } static PyMethodDef PyCursesWindow_Methods[] = { {"addch", (PyCFunction)PyCursesWindow_AddCh, METH_VARARGS}, {"addnstr", (PyCFunction)PyCursesWindow_AddNStr, METH_VARARGS}, {"addstr", (PyCFunction)PyCursesWindow_AddStr, METH_VARARGS}, {"attroff", (PyCFunction)PyCursesWindow_wattroff, METH_VARARGS}, {"attron", (PyCFunction)PyCursesWindow_wattron, METH_VARARGS}, {"attrset", (PyCFunction)PyCursesWindow_wattrset, METH_VARARGS}, {"bkgd", (PyCFunction)PyCursesWindow_Bkgd, METH_VARARGS}, {"bkgdset", (PyCFunction)PyCursesWindow_BkgdSet, METH_VARARGS}, {"border", (PyCFunction)PyCursesWindow_Border, METH_VARARGS}, {"box", (PyCFunction)PyCursesWindow_Box, METH_VARARGS}, {"clear", (PyCFunction)PyCursesWindow_wclear, METH_NOARGS}, {"clearok", (PyCFunction)PyCursesWindow_clearok, METH_VARARGS}, {"clrtobot", (PyCFunction)PyCursesWindow_wclrtobot, METH_NOARGS}, {"clrtoeol", (PyCFunction)PyCursesWindow_wclrtoeol, METH_NOARGS}, {"cursyncup", (PyCFunction)PyCursesWindow_wcursyncup, METH_NOARGS}, {"delch", (PyCFunction)PyCursesWindow_DelCh, METH_VARARGS}, {"deleteln", (PyCFunction)PyCursesWindow_wdeleteln, METH_NOARGS}, {"derwin", (PyCFunction)PyCursesWindow_DerWin, METH_VARARGS}, {"echochar", (PyCFunction)PyCursesWindow_EchoChar, METH_VARARGS}, #ifdef NCURSES_MOUSE_VERSION {"enclose", (PyCFunction)PyCursesWindow_Enclose, METH_VARARGS}, #endif {"erase", (PyCFunction)PyCursesWindow_werase, METH_NOARGS}, {"getbegyx", (PyCFunction)PyCursesWindow_getbegyx, METH_NOARGS}, {"getbkgd", (PyCFunction)PyCursesWindow_GetBkgd, METH_NOARGS}, {"getch", (PyCFunction)PyCursesWindow_GetCh, METH_VARARGS}, {"getkey", (PyCFunction)PyCursesWindow_GetKey, METH_VARARGS}, {"getmaxyx", (PyCFunction)PyCursesWindow_getmaxyx, METH_NOARGS}, {"getparyx", (PyCFunction)PyCursesWindow_getparyx, METH_NOARGS}, {"getstr", (PyCFunction)PyCursesWindow_GetStr, METH_VARARGS}, {"getyx", (PyCFunction)PyCursesWindow_getyx, METH_NOARGS}, {"hline", (PyCFunction)PyCursesWindow_Hline, METH_VARARGS}, {"idcok", (PyCFunction)PyCursesWindow_idcok, METH_VARARGS}, {"idlok", (PyCFunction)PyCursesWindow_idlok, METH_VARARGS}, {"immedok", (PyCFunction)PyCursesWindow_immedok, METH_VARARGS}, {"inch", (PyCFunction)PyCursesWindow_InCh, METH_VARARGS}, {"insch", (PyCFunction)PyCursesWindow_InsCh, METH_VARARGS}, {"insdelln", (PyCFunction)PyCursesWindow_winsdelln, METH_VARARGS}, {"insertln", (PyCFunction)PyCursesWindow_winsertln, METH_NOARGS}, {"insnstr", (PyCFunction)PyCursesWindow_InsNStr, METH_VARARGS}, {"insstr", (PyCFunction)PyCursesWindow_InsStr, METH_VARARGS}, {"instr", (PyCFunction)PyCursesWindow_InStr, METH_VARARGS}, {"is_linetouched", (PyCFunction)PyCursesWindow_Is_LineTouched, METH_VARARGS}, {"is_wintouched", (PyCFunction)PyCursesWindow_is_wintouched, METH_NOARGS}, {"keypad", (PyCFunction)PyCursesWindow_keypad, METH_VARARGS}, {"leaveok", (PyCFunction)PyCursesWindow_leaveok, METH_VARARGS}, {"move", (PyCFunction)PyCursesWindow_wmove, METH_VARARGS}, {"mvderwin", (PyCFunction)PyCursesWindow_mvderwin, METH_VARARGS}, {"mvwin", (PyCFunction)PyCursesWindow_mvwin, METH_VARARGS}, {"nodelay", (PyCFunction)PyCursesWindow_nodelay, METH_VARARGS}, {"notimeout", (PyCFunction)PyCursesWindow_notimeout, METH_VARARGS}, {"noutrefresh", (PyCFunction)PyCursesWindow_NoOutRefresh, METH_VARARGS}, /* Backward compatibility alias -- remove in Python 2.3 */ {"nooutrefresh", (PyCFunction)PyCursesWindow_NoOutRefresh, METH_VARARGS}, {"overlay", (PyCFunction)PyCursesWindow_Overlay, METH_VARARGS}, {"overwrite", (PyCFunction)PyCursesWindow_Overwrite, METH_VARARGS}, {"putwin", (PyCFunction)PyCursesWindow_PutWin, METH_VARARGS}, {"redrawln", (PyCFunction)PyCursesWindow_RedrawLine}, {"redrawwin", (PyCFunction)PyCursesWindow_redrawwin, METH_NOARGS}, {"refresh", (PyCFunction)PyCursesWindow_Refresh, METH_VARARGS}, #ifndef STRICT_SYSV_CURSES {"resize", (PyCFunction)PyCursesWindow_wresize, METH_VARARGS}, #endif {"scroll", (PyCFunction)PyCursesWindow_Scroll, METH_VARARGS}, {"scrollok", (PyCFunction)PyCursesWindow_scrollok, METH_VARARGS}, {"setscrreg", (PyCFunction)PyCursesWindow_SetScrollRegion, METH_VARARGS}, {"standend", (PyCFunction)PyCursesWindow_wstandend, METH_NOARGS}, {"standout", (PyCFunction)PyCursesWindow_wstandout, METH_NOARGS}, {"subpad", (PyCFunction)PyCursesWindow_SubWin, METH_VARARGS}, {"subwin", (PyCFunction)PyCursesWindow_SubWin, METH_VARARGS}, {"syncdown", (PyCFunction)PyCursesWindow_wsyncdown, METH_NOARGS}, {"syncok", (PyCFunction)PyCursesWindow_syncok, METH_VARARGS}, {"syncup", (PyCFunction)PyCursesWindow_wsyncup, METH_NOARGS}, {"timeout", (PyCFunction)PyCursesWindow_wtimeout, METH_VARARGS}, {"touchline", (PyCFunction)PyCursesWindow_TouchLine, METH_VARARGS}, {"touchwin", (PyCFunction)PyCursesWindow_touchwin, METH_NOARGS}, {"untouchwin", (PyCFunction)PyCursesWindow_untouchwin, METH_NOARGS}, {"vline", (PyCFunction)PyCursesWindow_Vline, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * PyCursesWindow_GetAttr(PyCursesWindowObject *self, char *name) { return Py_FindMethod(PyCursesWindow_Methods, (PyObject *)self, name); } /* -------------------------------------------------------*/ PyTypeObject PyCursesWindow_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "_curses.curses window", /*tp_name*/ sizeof(PyCursesWindowObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)PyCursesWindow_Dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)PyCursesWindow_GetAttr, /*tp_getattr*/ (setattrfunc)0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; /********************************************************************* Global Functions **********************************************************************/ NoArgNoReturnFunction(beep) NoArgNoReturnFunction(def_prog_mode) NoArgNoReturnFunction(def_shell_mode) NoArgNoReturnFunction(doupdate) NoArgNoReturnFunction(endwin) NoArgNoReturnFunction(flash) NoArgNoReturnFunction(nocbreak) NoArgNoReturnFunction(noecho) NoArgNoReturnFunction(nonl) NoArgNoReturnFunction(noraw) NoArgNoReturnFunction(reset_prog_mode) NoArgNoReturnFunction(reset_shell_mode) NoArgNoReturnFunction(resetty) NoArgNoReturnFunction(savetty) NoArgOrFlagNoReturnFunction(cbreak) NoArgOrFlagNoReturnFunction(echo) NoArgOrFlagNoReturnFunction(nl) NoArgOrFlagNoReturnFunction(raw) NoArgReturnIntFunction(baudrate) NoArgReturnIntFunction(termattrs) NoArgReturnStringFunction(termname) NoArgReturnStringFunction(longname) NoArgTrueFalseFunction(can_change_color) NoArgTrueFalseFunction(has_colors) NoArgTrueFalseFunction(has_ic) NoArgTrueFalseFunction(has_il) NoArgTrueFalseFunction(isendwin) NoArgNoReturnVoidFunction(filter) NoArgNoReturnVoidFunction(flushinp) NoArgNoReturnVoidFunction(noqiflush) static PyObject * PyCurses_Color_Content(PyObject *self, PyObject *args) { short color,r,g,b; PyCursesInitialised PyCursesInitialisedColor if (!PyArg_ParseTuple(args, "h:color_content", &color)) return NULL; if (color_content(color, &r, &g, &b) != ERR) return Py_BuildValue("(iii)", r, g, b); else { PyErr_SetString(PyCursesError, "Argument 1 was out of range. Check value of COLORS."); return NULL; } } static PyObject * PyCurses_color_pair(PyObject *self, PyObject *args) { int n; PyCursesInitialised PyCursesInitialisedColor if (!PyArg_ParseTuple(args, "i:color_pair", &n)) return NULL; return PyInt_FromLong((long) (n << 8)); } static PyObject * PyCurses_Curs_Set(PyObject *self, PyObject *args) { int vis,erg; PyCursesInitialised if (!PyArg_ParseTuple(args, "i:curs_set", &vis)) return NULL; erg = curs_set(vis); if (erg == ERR) return PyCursesCheckERR(erg, "curs_set"); return PyInt_FromLong((long) erg); } static PyObject * PyCurses_Delay_Output(PyObject *self, PyObject *args) { int ms; PyCursesInitialised if (!PyArg_ParseTuple(args, "i:delay_output", &ms)) return NULL; return PyCursesCheckERR(delay_output(ms), "delay_output"); } static PyObject * PyCurses_EraseChar(PyObject *self) { char ch; PyCursesInitialised ch = erasechar(); return PyString_FromStringAndSize(&ch, 1); } static PyObject * PyCurses_getsyx(PyObject *self) { int x,y; PyCursesInitialised getsyx(y, x); return Py_BuildValue("(ii)", y, x); } #ifdef NCURSES_MOUSE_VERSION static PyObject * PyCurses_GetMouse(PyObject *self) { int rtn; MEVENT event; PyCursesInitialised rtn = getmouse( &event ); if (rtn == ERR) { PyErr_SetString(PyCursesError, "getmouse() returned ERR"); return NULL; } return Py_BuildValue("(hiiil)", (short)event.id, event.x, event.y, event.z, (long) event.bstate); } static PyObject * PyCurses_UngetMouse(PyObject *self, PyObject *args) { MEVENT event; PyCursesInitialised if (!PyArg_ParseTuple(args, "(hiiil)", &event.id, &event.x, &event.y, &event.z, (int *) &event.bstate)) return NULL; return PyCursesCheckERR(ungetmouse(&event), "ungetmouse"); } #endif static PyObject * PyCurses_GetWin(PyCursesWindowObject *self, PyObject *temp) { WINDOW *win; PyCursesInitialised if (!PyFile_Check(temp)) { PyErr_SetString(PyExc_TypeError, "argument must be a file object"); return NULL; } win = getwin(PyFile_AsFile(temp)); if (win == NULL) { PyErr_SetString(PyCursesError, catchall_NULL); return NULL; } return PyCursesWindow_New(win); } static PyObject * PyCurses_HalfDelay(PyObject *self, PyObject *args) { unsigned char tenths; PyCursesInitialised if (!PyArg_ParseTuple(args, "b:halfdelay", &tenths)) return NULL; return PyCursesCheckERR(halfdelay(tenths), "halfdelay"); } #ifndef STRICT_SYSV_CURSES /* No has_key! */ static PyObject * PyCurses_has_key(PyObject *self, PyObject *args) { int ch; PyCursesInitialised if (!PyArg_ParseTuple(args,"i",&ch)) return NULL; if (has_key(ch) == FALSE) { Py_INCREF(Py_False); return Py_False; } Py_INCREF(Py_True); return Py_True; } #endif /* STRICT_SYSV_CURSES */ static PyObject * PyCurses_Init_Color(PyObject *self, PyObject *args) { short color, r, g, b; PyCursesInitialised PyCursesInitialisedColor switch(PyTuple_Size(args)) { case 4: if (!PyArg_ParseTuple(args, "hhhh;color,r,g,b", &color, &r, &g, &b)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "init_color requires 4 arguments"); return NULL; } return PyCursesCheckERR(init_color(color, r, g, b), "init_color"); } static PyObject * PyCurses_Init_Pair(PyObject *self, PyObject *args) { short pair, f, b; PyCursesInitialised PyCursesInitialisedColor if (PyTuple_Size(args) != 3) { PyErr_SetString(PyExc_TypeError, "init_pair requires 3 arguments"); return NULL; } if (!PyArg_ParseTuple(args, "hhh;pair, f, b", &pair, &f, &b)) return NULL; return PyCursesCheckERR(init_pair(pair, f, b), "init_pair"); } static PyObject *ModDict; static PyObject * PyCurses_InitScr(PyObject *self) { WINDOW *win; PyObject *nlines, *cols; if (initialised == TRUE) { wrefresh(stdscr); return (PyObject *)PyCursesWindow_New(stdscr); } win = initscr(); if (win == NULL) { PyErr_SetString(PyCursesError, catchall_NULL); return NULL; } initialised = initialised_setupterm = TRUE; /* This was moved from initcurses() because it core dumped on SGI, where they're not defined until you've called initscr() */ #define SetDictInt(string,ch) \ PyDict_SetItemString(ModDict,string,PyInt_FromLong((long) (ch))); /* Here are some graphic symbols you can use */ SetDictInt("ACS_ULCORNER", (ACS_ULCORNER)); SetDictInt("ACS_LLCORNER", (ACS_LLCORNER)); SetDictInt("ACS_URCORNER", (ACS_URCORNER)); SetDictInt("ACS_LRCORNER", (ACS_LRCORNER)); SetDictInt("ACS_LTEE", (ACS_LTEE)); SetDictInt("ACS_RTEE", (ACS_RTEE)); SetDictInt("ACS_BTEE", (ACS_BTEE)); SetDictInt("ACS_TTEE", (ACS_TTEE)); SetDictInt("ACS_HLINE", (ACS_HLINE)); SetDictInt("ACS_VLINE", (ACS_VLINE)); SetDictInt("ACS_PLUS", (ACS_PLUS)); #if !defined(__hpux) || defined(HAVE_NCURSES_H) /* On HP/UX 11, these are of type cchar_t, which is not an integral type. If this is a problem on more platforms, a configure test should be added to determine whether ACS_S1 is of integral type. */ SetDictInt("ACS_S1", (ACS_S1)); SetDictInt("ACS_S9", (ACS_S9)); SetDictInt("ACS_DIAMOND", (ACS_DIAMOND)); SetDictInt("ACS_CKBOARD", (ACS_CKBOARD)); SetDictInt("ACS_DEGREE", (ACS_DEGREE)); SetDictInt("ACS_PLMINUS", (ACS_PLMINUS)); SetDictInt("ACS_BULLET", (ACS_BULLET)); SetDictInt("ACS_LARROW", (ACS_LARROW)); SetDictInt("ACS_RARROW", (ACS_RARROW)); SetDictInt("ACS_DARROW", (ACS_DARROW)); SetDictInt("ACS_UARROW", (ACS_UARROW)); SetDictInt("ACS_BOARD", (ACS_BOARD)); SetDictInt("ACS_LANTERN", (ACS_LANTERN)); SetDictInt("ACS_BLOCK", (ACS_BLOCK)); #endif SetDictInt("ACS_BSSB", (ACS_ULCORNER)); SetDictInt("ACS_SSBB", (ACS_LLCORNER)); SetDictInt("ACS_BBSS", (ACS_URCORNER)); SetDictInt("ACS_SBBS", (ACS_LRCORNER)); SetDictInt("ACS_SBSS", (ACS_RTEE)); SetDictInt("ACS_SSSB", (ACS_LTEE)); SetDictInt("ACS_SSBS", (ACS_BTEE)); SetDictInt("ACS_BSSS", (ACS_TTEE)); SetDictInt("ACS_BSBS", (ACS_HLINE)); SetDictInt("ACS_SBSB", (ACS_VLINE)); SetDictInt("ACS_SSSS", (ACS_PLUS)); /* The following are never available with strict SYSV curses */ #ifdef ACS_S3 SetDictInt("ACS_S3", (ACS_S3)); #endif #ifdef ACS_S7 SetDictInt("ACS_S7", (ACS_S7)); #endif #ifdef ACS_LEQUAL SetDictInt("ACS_LEQUAL", (ACS_LEQUAL)); #endif #ifdef ACS_GEQUAL SetDictInt("ACS_GEQUAL", (ACS_GEQUAL)); #endif #ifdef ACS_PI SetDictInt("ACS_PI", (ACS_PI)); #endif #ifdef ACS_NEQUAL SetDictInt("ACS_NEQUAL", (ACS_NEQUAL)); #endif #ifdef ACS_STERLING SetDictInt("ACS_STERLING", (ACS_STERLING)); #endif nlines = PyInt_FromLong((long) LINES); PyDict_SetItemString(ModDict, "LINES", nlines); Py_DECREF(nlines); cols = PyInt_FromLong((long) COLS); PyDict_SetItemString(ModDict, "COLS", cols); Py_DECREF(cols); return (PyObject *)PyCursesWindow_New(win); } static PyObject * PyCurses_setupterm(PyObject* self, PyObject *args, PyObject* keywds) { int fd = -1; int err; char* termstr = NULL; static char *kwlist[] = {"term", "fd", NULL}; if (!PyArg_ParseTupleAndKeywords( args,keywds,"|zi:setupterm",kwlist,&termstr,&fd)) { return NULL; } if (fd == -1) { PyObject* sys_stdout; sys_stdout = PySys_GetObject("stdout"); if (sys_stdout == NULL) { PyErr_SetString( PyCursesError, "lost sys.stdout"); return NULL; } fd = PyObject_AsFileDescriptor(sys_stdout); if (fd == -1) { return NULL; } } if (setupterm(termstr,fd,&err) == ERR) { char* s = "setupterm: unknown error"; if (err == 0) { s = "setupterm: could not find terminal"; } else if (err == -1) { s = "setupterm: could not find terminfo database"; } PyErr_SetString(PyCursesError,s); return NULL; } initialised_setupterm = TRUE; Py_INCREF(Py_None); return Py_None; } static PyObject * PyCurses_IntrFlush(PyObject *self, PyObject *args) { int ch; PyCursesInitialised switch(PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args,"i;True(1), False(0)",&ch)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "intrflush requires 1 argument"); return NULL; } return PyCursesCheckERR(intrflush(NULL,ch), "intrflush"); } #if !defined(__NetBSD__) static PyObject * PyCurses_KeyName(PyObject *self, PyObject *args) { const char *knp; int ch; PyCursesInitialised if (!PyArg_ParseTuple(args,"i",&ch)) return NULL; if (ch < 0) { PyErr_SetString(PyExc_ValueError, "invalid key number"); return NULL; } knp = keyname(ch); return PyString_FromString((knp == NULL) ? "" : (char *)knp); } #endif static PyObject * PyCurses_KillChar(PyObject *self) { char ch; ch = killchar(); return PyString_FromStringAndSize(&ch, 1); } static PyObject * PyCurses_Meta(PyObject *self, PyObject *args) { int ch; PyCursesInitialised switch(PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args,"i;True(1), False(0)",&ch)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "meta requires 1 argument"); return NULL; } return PyCursesCheckERR(meta(stdscr, ch), "meta"); } #ifdef NCURSES_MOUSE_VERSION static PyObject * PyCurses_MouseInterval(PyObject *self, PyObject *args) { int interval; PyCursesInitialised if (!PyArg_ParseTuple(args,"i;interval",&interval)) return NULL; return PyCursesCheckERR(mouseinterval(interval), "mouseinterval"); } static PyObject * PyCurses_MouseMask(PyObject *self, PyObject *args) { int newmask; mmask_t oldmask, availmask; PyCursesInitialised if (!PyArg_ParseTuple(args,"i;mousemask",&newmask)) return NULL; availmask = mousemask(newmask, &oldmask); return Py_BuildValue("(ll)", (long)availmask, (long)oldmask); } #endif static PyObject * PyCurses_Napms(PyObject *self, PyObject *args) { int ms; PyCursesInitialised if (!PyArg_ParseTuple(args, "i;ms", &ms)) return NULL; return Py_BuildValue("i", napms(ms)); } static PyObject * PyCurses_NewPad(PyObject *self, PyObject *args) { WINDOW *win; int nlines, ncols; PyCursesInitialised if (!PyArg_ParseTuple(args,"ii;nlines,ncols",&nlines,&ncols)) return NULL; win = newpad(nlines, ncols); if (win == NULL) { PyErr_SetString(PyCursesError, catchall_NULL); return NULL; } return (PyObject *)PyCursesWindow_New(win); } static PyObject * PyCurses_NewWindow(PyObject *self, PyObject *args) { WINDOW *win; int nlines, ncols, begin_y=0, begin_x=0; PyCursesInitialised switch (PyTuple_Size(args)) { case 2: if (!PyArg_ParseTuple(args,"ii;nlines,ncols",&nlines,&ncols)) return NULL; break; case 4: if (!PyArg_ParseTuple(args, "iiii;nlines,ncols,begin_y,begin_x", &nlines,&ncols,&begin_y,&begin_x)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "newwin requires 2 or 4 arguments"); return NULL; } win = newwin(nlines,ncols,begin_y,begin_x); if (win == NULL) { PyErr_SetString(PyCursesError, catchall_NULL); return NULL; } return (PyObject *)PyCursesWindow_New(win); } static PyObject * PyCurses_Pair_Content(PyObject *self, PyObject *args) { short pair,f,b; PyCursesInitialised PyCursesInitialisedColor switch(PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "h;pair", &pair)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "pair_content requires 1 argument"); return NULL; } if (!pair_content(pair, &f, &b)) { PyErr_SetString(PyCursesError, "Argument 1 was out of range. (1..COLOR_PAIRS-1)"); return NULL; } return Py_BuildValue("(ii)", f, b); } static PyObject * PyCurses_pair_number(PyObject *self, PyObject *args) { int n; PyCursesInitialised PyCursesInitialisedColor switch(PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args, "i;pairvalue", &n)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "pair_number requires 1 argument"); return NULL; } return PyInt_FromLong((long) ((n & A_COLOR) >> 8)); } static PyObject * PyCurses_Putp(PyObject *self, PyObject *args) { char *str; if (!PyArg_ParseTuple(args,"s;str", &str)) return NULL; return PyCursesCheckERR(putp(str), "putp"); } static PyObject * PyCurses_QiFlush(PyObject *self, PyObject *args) { int flag = 0; PyCursesInitialised switch(PyTuple_Size(args)) { case 0: qiflush(); Py_INCREF(Py_None); return Py_None; case 1: if (!PyArg_ParseTuple(args, "i;True(1) or False(0)", &flag)) return NULL; if (flag) qiflush(); else noqiflush(); Py_INCREF(Py_None); return Py_None; default: PyErr_SetString(PyExc_TypeError, "qiflush requires 0 or 1 arguments"); return NULL; } } static PyObject * PyCurses_setsyx(PyObject *self, PyObject *args) { int y,x; PyCursesInitialised if (PyTuple_Size(args)!=2) { PyErr_SetString(PyExc_TypeError, "setsyx requires 2 arguments"); return NULL; } if (!PyArg_ParseTuple(args, "ii;y, x", &y, &x)) return NULL; setsyx(y,x); Py_INCREF(Py_None); return Py_None; } static PyObject * PyCurses_Start_Color(PyObject *self) { int code; PyObject *c, *cp; PyCursesInitialised code = start_color(); if (code != ERR) { initialisedcolors = TRUE; c = PyInt_FromLong((long) COLORS); PyDict_SetItemString(ModDict, "COLORS", c); Py_DECREF(c); cp = PyInt_FromLong((long) COLOR_PAIRS); PyDict_SetItemString(ModDict, "COLOR_PAIRS", cp); Py_DECREF(cp); Py_INCREF(Py_None); return Py_None; } else { PyErr_SetString(PyCursesError, "start_color() returned ERR"); return NULL; } } static PyObject * PyCurses_tigetflag(PyObject *self, PyObject *args) { char *capname; PyCursesSetupTermCalled; if (!PyArg_ParseTuple(args, "z", &capname)) return NULL; return PyInt_FromLong( (long) tigetflag( capname ) ); } static PyObject * PyCurses_tigetnum(PyObject *self, PyObject *args) { char *capname; PyCursesSetupTermCalled; if (!PyArg_ParseTuple(args, "z", &capname)) return NULL; return PyInt_FromLong( (long) tigetnum( capname ) ); } static PyObject * PyCurses_tigetstr(PyObject *self, PyObject *args) { char *capname; PyCursesSetupTermCalled; if (!PyArg_ParseTuple(args, "z", &capname)) return NULL; capname = tigetstr( capname ); if (capname == 0 || capname == (char*) -1) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString( capname ); } static PyObject * PyCurses_tparm(PyObject *self, PyObject *args) { char* fmt; char* result = NULL; int i1=0,i2=0,i3=0,i4=0,i5=0,i6=0,i7=0,i8=0,i9=0; PyCursesSetupTermCalled; if (!PyArg_ParseTuple(args, "s|iiiiiiiii:tparm", &fmt, &i1, &i2, &i3, &i4, &i5, &i6, &i7, &i8, &i9)) { return NULL; } result = tparm(fmt,i1,i2,i3,i4,i5,i6,i7,i8,i9); return PyString_FromString(result); } static PyObject * PyCurses_TypeAhead(PyObject *self, PyObject *args) { int fd; PyCursesInitialised if (!PyArg_ParseTuple(args,"i;fd",&fd)) return NULL; PyCursesCheckERR(typeahead( fd ), "typeahead"); Py_INCREF(Py_None); return Py_None; } static PyObject * PyCurses_UnCtrl(PyObject *self, PyObject *args) { PyObject *temp; chtype ch; PyCursesInitialised if (!PyArg_ParseTuple(args,"O;ch or int",&temp)) return NULL; if (PyInt_Check(temp)) ch = (chtype) PyInt_AsLong(temp); else if (PyString_Check(temp)) ch = (chtype) *PyString_AsString(temp); else { PyErr_SetString(PyExc_TypeError, "argument must be a ch or an int"); return NULL; } return PyString_FromString(unctrl(ch)); } static PyObject * PyCurses_UngetCh(PyObject *self, PyObject *args) { PyObject *temp; int ch; PyCursesInitialised if (!PyArg_ParseTuple(args,"O;ch or int",&temp)) return NULL; if (PyInt_Check(temp)) ch = (int) PyInt_AsLong(temp); else if (PyString_Check(temp)) ch = (int) *PyString_AsString(temp); else { PyErr_SetString(PyExc_TypeError, "argument must be a ch or an int"); return NULL; } return PyCursesCheckERR(ungetch(ch), "ungetch"); } static PyObject * PyCurses_Use_Env(PyObject *self, PyObject *args) { int flag; PyCursesInitialised switch(PyTuple_Size(args)) { case 1: if (!PyArg_ParseTuple(args,"i;True(1), False(0)",&flag)) return NULL; break; default: PyErr_SetString(PyExc_TypeError, "use_env requires 1 argument"); return NULL; } use_env(flag); Py_INCREF(Py_None); return Py_None; } /* List of functions defined in the module */ static PyMethodDef PyCurses_methods[] = { {"baudrate", (PyCFunction)PyCurses_baudrate, METH_NOARGS}, {"beep", (PyCFunction)PyCurses_beep, METH_NOARGS}, {"can_change_color", (PyCFunction)PyCurses_can_change_color, METH_NOARGS}, {"cbreak", (PyCFunction)PyCurses_cbreak, METH_VARARGS}, {"color_content", (PyCFunction)PyCurses_Color_Content, METH_VARARGS}, {"color_pair", (PyCFunction)PyCurses_color_pair, METH_VARARGS}, {"curs_set", (PyCFunction)PyCurses_Curs_Set, METH_VARARGS}, {"def_prog_mode", (PyCFunction)PyCurses_def_prog_mode, METH_NOARGS}, {"def_shell_mode", (PyCFunction)PyCurses_def_shell_mode, METH_NOARGS}, {"delay_output", (PyCFunction)PyCurses_Delay_Output, METH_VARARGS}, {"doupdate", (PyCFunction)PyCurses_doupdate, METH_NOARGS}, {"echo", (PyCFunction)PyCurses_echo, METH_VARARGS}, {"endwin", (PyCFunction)PyCurses_endwin, METH_NOARGS}, {"erasechar", (PyCFunction)PyCurses_EraseChar, METH_NOARGS}, {"filter", (PyCFunction)PyCurses_filter, METH_NOARGS}, {"flash", (PyCFunction)PyCurses_flash, METH_NOARGS}, {"flushinp", (PyCFunction)PyCurses_flushinp, METH_NOARGS}, #ifdef NCURSES_MOUSE_VERSION {"getmouse", (PyCFunction)PyCurses_GetMouse, METH_NOARGS}, {"ungetmouse", (PyCFunction)PyCurses_UngetMouse, METH_VARARGS}, #endif {"getsyx", (PyCFunction)PyCurses_getsyx, METH_NOARGS}, {"getwin", (PyCFunction)PyCurses_GetWin, METH_O}, {"has_colors", (PyCFunction)PyCurses_has_colors, METH_NOARGS}, {"has_ic", (PyCFunction)PyCurses_has_ic, METH_NOARGS}, {"has_il", (PyCFunction)PyCurses_has_il, METH_NOARGS}, #ifndef STRICT_SYSV_CURSES {"has_key", (PyCFunction)PyCurses_has_key, METH_VARARGS}, #endif {"halfdelay", (PyCFunction)PyCurses_HalfDelay, METH_VARARGS}, {"init_color", (PyCFunction)PyCurses_Init_Color, METH_VARARGS}, {"init_pair", (PyCFunction)PyCurses_Init_Pair, METH_VARARGS}, {"initscr", (PyCFunction)PyCurses_InitScr, METH_NOARGS}, {"intrflush", (PyCFunction)PyCurses_IntrFlush, METH_VARARGS}, {"isendwin", (PyCFunction)PyCurses_isendwin, METH_NOARGS}, #if !defined(__NetBSD__) {"keyname", (PyCFunction)PyCurses_KeyName, METH_VARARGS}, #endif {"killchar", (PyCFunction)PyCurses_KillChar, METH_NOARGS}, {"longname", (PyCFunction)PyCurses_longname, METH_NOARGS}, {"meta", (PyCFunction)PyCurses_Meta, METH_VARARGS}, #ifdef NCURSES_MOUSE_VERSION {"mouseinterval", (PyCFunction)PyCurses_MouseInterval, METH_VARARGS}, {"mousemask", (PyCFunction)PyCurses_MouseMask, METH_VARARGS}, #endif {"napms", (PyCFunction)PyCurses_Napms, METH_VARARGS}, {"newpad", (PyCFunction)PyCurses_NewPad, METH_VARARGS}, {"newwin", (PyCFunction)PyCurses_NewWindow, METH_VARARGS}, {"nl", (PyCFunction)PyCurses_nl, METH_VARARGS}, {"nocbreak", (PyCFunction)PyCurses_nocbreak, METH_NOARGS}, {"noecho", (PyCFunction)PyCurses_noecho, METH_NOARGS}, {"nonl", (PyCFunction)PyCurses_nonl, METH_NOARGS}, {"noqiflush", (PyCFunction)PyCurses_noqiflush, METH_NOARGS}, {"noraw", (PyCFunction)PyCurses_noraw, METH_NOARGS}, {"pair_content", (PyCFunction)PyCurses_Pair_Content, METH_VARARGS}, {"pair_number", (PyCFunction)PyCurses_pair_number, METH_VARARGS}, {"putp", (PyCFunction)PyCurses_Putp, METH_VARARGS}, {"qiflush", (PyCFunction)PyCurses_QiFlush, METH_VARARGS}, {"raw", (PyCFunction)PyCurses_raw, METH_VARARGS}, {"reset_prog_mode", (PyCFunction)PyCurses_reset_prog_mode, METH_NOARGS}, {"reset_shell_mode", (PyCFunction)PyCurses_reset_shell_mode, METH_NOARGS}, {"resetty", (PyCFunction)PyCurses_resetty, METH_NOARGS}, {"savetty", (PyCFunction)PyCurses_savetty, METH_NOARGS}, {"setsyx", (PyCFunction)PyCurses_setsyx, METH_VARARGS}, {"setupterm", (PyCFunction)PyCurses_setupterm, METH_VARARGS|METH_KEYWORDS}, {"start_color", (PyCFunction)PyCurses_Start_Color, METH_NOARGS}, {"termattrs", (PyCFunction)PyCurses_termattrs, METH_NOARGS}, {"termname", (PyCFunction)PyCurses_termname, METH_NOARGS}, {"tigetflag", (PyCFunction)PyCurses_tigetflag, METH_VARARGS}, {"tigetnum", (PyCFunction)PyCurses_tigetnum, METH_VARARGS}, {"tigetstr", (PyCFunction)PyCurses_tigetstr, METH_VARARGS}, {"tparm", (PyCFunction)PyCurses_tparm, METH_VARARGS}, {"typeahead", (PyCFunction)PyCurses_TypeAhead, METH_VARARGS}, {"unctrl", (PyCFunction)PyCurses_UnCtrl, METH_VARARGS}, {"ungetch", (PyCFunction)PyCurses_UngetCh, METH_VARARGS}, {"use_env", (PyCFunction)PyCurses_Use_Env, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; /* Initialization function for the module */ PyMODINIT_FUNC init_curses(void) { PyObject *m, *d, *v, *c_api_object; static void *PyCurses_API[PyCurses_API_pointers]; /* Initialize object type */ PyCursesWindow_Type.ob_type = &PyType_Type; /* Initialize the C API pointer array */ PyCurses_API[0] = (void *)&PyCursesWindow_Type; PyCurses_API[1] = (void *)func_PyCursesSetupTermCalled; PyCurses_API[2] = (void *)func_PyCursesInitialised; PyCurses_API[3] = (void *)func_PyCursesInitialisedColor; /* Create the module and add the functions */ m = Py_InitModule("_curses", PyCurses_methods); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); ModDict = d; /* For PyCurses_InitScr to use later */ /* Add a CObject for the C API */ c_api_object = PyCObject_FromVoidPtr((void *)PyCurses_API, NULL); PyDict_SetItemString(d, "_C_API", c_api_object); Py_DECREF(c_api_object); /* For exception curses.error */ PyCursesError = PyErr_NewException("_curses.error", NULL, NULL); PyDict_SetItemString(d, "error", PyCursesError); /* Make the version available */ v = PyString_FromString(PyCursesVersion); PyDict_SetItemString(d, "version", v); PyDict_SetItemString(d, "__version__", v); Py_DECREF(v); SetDictInt("ERR", ERR); SetDictInt("OK", OK); /* Here are some attributes you can add to chars to print */ SetDictInt("A_ATTRIBUTES", A_ATTRIBUTES); SetDictInt("A_NORMAL", A_NORMAL); SetDictInt("A_STANDOUT", A_STANDOUT); SetDictInt("A_UNDERLINE", A_UNDERLINE); SetDictInt("A_REVERSE", A_REVERSE); SetDictInt("A_BLINK", A_BLINK); SetDictInt("A_DIM", A_DIM); SetDictInt("A_BOLD", A_BOLD); SetDictInt("A_ALTCHARSET", A_ALTCHARSET); #if !defined(__NetBSD__) SetDictInt("A_INVIS", A_INVIS); #endif SetDictInt("A_PROTECT", A_PROTECT); SetDictInt("A_CHARTEXT", A_CHARTEXT); SetDictInt("A_COLOR", A_COLOR); /* The following are never available with strict SYSV curses */ #ifdef A_HORIZONTAL SetDictInt("A_HORIZONTAL", A_HORIZONTAL); #endif #ifdef A_LEFT SetDictInt("A_LEFT", A_LEFT); #endif #ifdef A_LOW SetDictInt("A_LOW", A_LOW); #endif #ifdef A_RIGHT SetDictInt("A_RIGHT", A_RIGHT); #endif #ifdef A_TOP SetDictInt("A_TOP", A_TOP); #endif #ifdef A_VERTICAL SetDictInt("A_VERTICAL", A_VERTICAL); #endif SetDictInt("COLOR_BLACK", COLOR_BLACK); SetDictInt("COLOR_RED", COLOR_RED); SetDictInt("COLOR_GREEN", COLOR_GREEN); SetDictInt("COLOR_YELLOW", COLOR_YELLOW); SetDictInt("COLOR_BLUE", COLOR_BLUE); SetDictInt("COLOR_MAGENTA", COLOR_MAGENTA); SetDictInt("COLOR_CYAN", COLOR_CYAN); SetDictInt("COLOR_WHITE", COLOR_WHITE); #ifdef NCURSES_MOUSE_VERSION /* Mouse-related constants */ SetDictInt("BUTTON1_PRESSED", BUTTON1_PRESSED); SetDictInt("BUTTON1_RELEASED", BUTTON1_RELEASED); SetDictInt("BUTTON1_CLICKED", BUTTON1_CLICKED); SetDictInt("BUTTON1_DOUBLE_CLICKED", BUTTON1_DOUBLE_CLICKED); SetDictInt("BUTTON1_TRIPLE_CLICKED", BUTTON1_TRIPLE_CLICKED); SetDictInt("BUTTON2_PRESSED", BUTTON2_PRESSED); SetDictInt("BUTTON2_RELEASED", BUTTON2_RELEASED); SetDictInt("BUTTON2_CLICKED", BUTTON2_CLICKED); SetDictInt("BUTTON2_DOUBLE_CLICKED", BUTTON2_DOUBLE_CLICKED); SetDictInt("BUTTON2_TRIPLE_CLICKED", BUTTON2_TRIPLE_CLICKED); SetDictInt("BUTTON3_PRESSED", BUTTON3_PRESSED); SetDictInt("BUTTON3_RELEASED", BUTTON3_RELEASED); SetDictInt("BUTTON3_CLICKED", BUTTON3_CLICKED); SetDictInt("BUTTON3_DOUBLE_CLICKED", BUTTON3_DOUBLE_CLICKED); SetDictInt("BUTTON3_TRIPLE_CLICKED", BUTTON3_TRIPLE_CLICKED); SetDictInt("BUTTON4_PRESSED", BUTTON4_PRESSED); SetDictInt("BUTTON4_RELEASED", BUTTON4_RELEASED); SetDictInt("BUTTON4_CLICKED", BUTTON4_CLICKED); SetDictInt("BUTTON4_DOUBLE_CLICKED", BUTTON4_DOUBLE_CLICKED); SetDictInt("BUTTON4_TRIPLE_CLICKED", BUTTON4_TRIPLE_CLICKED); SetDictInt("BUTTON_SHIFT", BUTTON_SHIFT); SetDictInt("BUTTON_CTRL", BUTTON_CTRL); SetDictInt("BUTTON_ALT", BUTTON_ALT); SetDictInt("ALL_MOUSE_EVENTS", ALL_MOUSE_EVENTS); SetDictInt("REPORT_MOUSE_POSITION", REPORT_MOUSE_POSITION); #endif /* Now set everything up for KEY_ variables */ { int key; char *key_n; char *key_n2; #if !defined(__NetBSD__) for (key=KEY_MIN;key < KEY_MAX; key++) { key_n = (char *)keyname(key); if (key_n == NULL || strcmp(key_n,"UNKNOWN KEY")==0) continue; if (strncmp(key_n,"KEY_F(",6)==0) { char *p1, *p2; key_n2 = malloc(strlen(key_n)+1); p1 = key_n; p2 = key_n2; while (*p1) { if (*p1 != '(' && *p1 != ')') { *p2 = *p1; p2++; } p1++; } *p2 = (char)0; } else key_n2 = key_n; PyDict_SetItemString(d,key_n2,PyInt_FromLong((long) key)); if (key_n2 != key_n) free(key_n2); } #endif SetDictInt("KEY_MIN", KEY_MIN); SetDictInt("KEY_MAX", KEY_MAX); } } Python-2.3.7/Modules/imageop.c0000644001241000117560000003503307522367001015453 0ustar loewishpifb6 /* imageopmodule - Various operations on pictures */ #ifdef sun #define signed #endif #include "Python.h" #if SIZEOF_INT == 4 typedef int Py_Int32; typedef unsigned int Py_UInt32; #else #if SIZEOF_LONG == 4 typedef long Py_Int32; typedef unsigned long Py_UInt32; #else #error "No 4-byte integral type" #endif #endif #define CHARP(cp, xmax, x, y) ((char *)(cp+y*xmax+x)) #define SHORTP(cp, xmax, x, y) ((short *)(cp+2*(y*xmax+x))) #define LONGP(cp, xmax, x, y) ((Py_Int32 *)(cp+4*(y*xmax+x))) static PyObject *ImageopError; static PyObject * imageop_crop(PyObject *self, PyObject *args) { char *cp, *ncp; short *nsp; Py_Int32 *nlp; int len, size, x, y, newx1, newx2, newy1, newy2; int ix, iy, xstep, ystep; PyObject *rv; if ( !PyArg_ParseTuple(args, "s#iiiiiii", &cp, &len, &size, &x, &y, &newx1, &newy1, &newx2, &newy2) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(ImageopError, "Size should be 1, 2 or 4"); return 0; } if ( len != size*x*y ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } xstep = (newx1 < newx2)? 1 : -1; ystep = (newy1 < newy2)? 1 : -1; rv = PyString_FromStringAndSize(NULL, (abs(newx2-newx1)+1)*(abs(newy2-newy1)+1)*size); if ( rv == 0 ) return 0; ncp = (char *)PyString_AsString(rv); nsp = (short *)ncp; nlp = (Py_Int32 *)ncp; newy2 += ystep; newx2 += xstep; for( iy = newy1; iy != newy2; iy+=ystep ) { for ( ix = newx1; ix != newx2; ix+=xstep ) { if ( iy < 0 || iy >= y || ix < 0 || ix >= x ) { if ( size == 1 ) *ncp++ = 0; else *nlp++ = 0; } else { if ( size == 1 ) *ncp++ = *CHARP(cp, x, ix, iy); else if ( size == 2 ) *nsp++ = *SHORTP(cp, x, ix, iy); else *nlp++ = *LONGP(cp, x, ix, iy); } } } return rv; } static PyObject * imageop_scale(PyObject *self, PyObject *args) { char *cp, *ncp; short *nsp; Py_Int32 *nlp; int len, size, x, y, newx, newy; int ix, iy; int oix, oiy; PyObject *rv; if ( !PyArg_ParseTuple(args, "s#iiiii", &cp, &len, &size, &x, &y, &newx, &newy) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(ImageopError, "Size should be 1, 2 or 4"); return 0; } if ( len != size*x*y ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, newx*newy*size); if ( rv == 0 ) return 0; ncp = (char *)PyString_AsString(rv); nsp = (short *)ncp; nlp = (Py_Int32 *)ncp; for( iy = 0; iy < newy; iy++ ) { for ( ix = 0; ix < newx; ix++ ) { oix = ix * x / newx; oiy = iy * y / newy; if ( size == 1 ) *ncp++ = *CHARP(cp, x, oix, oiy); else if ( size == 2 ) *nsp++ = *SHORTP(cp, x, oix, oiy); else *nlp++ = *LONGP(cp, x, oix, oiy); } } return rv; } /* Note: this routine can use a bit of optimizing */ static PyObject * imageop_tovideo(PyObject *self, PyObject *args) { int maxx, maxy, x, y, len; int i; unsigned char *cp, *ncp; int width; PyObject *rv; if ( !PyArg_ParseTuple(args, "s#iii", &cp, &len, &width, &maxx, &maxy) ) return 0; if ( width != 1 && width != 4 ) { PyErr_SetString(ImageopError, "Size should be 1 or 4"); return 0; } if ( maxx*maxy*width != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, len); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); if ( width == 1 ) { memcpy(ncp, cp, maxx); /* Copy first line */ ncp += maxx; for (y=1; y> 1; } } } else { memcpy(ncp, cp, maxx*4); /* Copy first line */ ncp += maxx*4; for (y=1; y> 1; i++; *ncp++ = ((int)cp[i] + (int)cp[i-4*maxx]) >> 1; i++; *ncp++ = ((int)cp[i] + (int)cp[i-4*maxx]) >> 1; } } } return rv; } static PyObject * imageop_grey2mono(PyObject *self, PyObject *args) { int tres, x, y, len; unsigned char *cp, *ncp; unsigned char ovalue; PyObject *rv; int i, bit; if ( !PyArg_ParseTuple(args, "s#iii", &cp, &len, &x, &y, &tres) ) return 0; if ( x*y != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, (len+7)/8); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); bit = 0x80; ovalue = 0; for ( i=0; i < len; i++ ) { if ( (int)cp[i] > tres ) ovalue |= bit; bit >>= 1; if ( bit == 0 ) { *ncp++ = ovalue; bit = 0x80; ovalue = 0; } } if ( bit != 0x80 ) *ncp++ = ovalue; return rv; } static PyObject * imageop_grey2grey4(PyObject *self, PyObject *args) { int x, y, len; unsigned char *cp, *ncp; unsigned char ovalue; PyObject *rv; int i; int pos; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; if ( x*y != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, (len+1)/2); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); pos = 0; ovalue = 0; for ( i=0; i < len; i++ ) { ovalue |= ((int)cp[i] & 0xf0) >> pos; pos += 4; if ( pos == 8 ) { *ncp++ = ovalue; ovalue = 0; pos = 0; } } if ( pos != 0 ) *ncp++ = ovalue; return rv; } static PyObject * imageop_grey2grey2(PyObject *self, PyObject *args) { int x, y, len; unsigned char *cp, *ncp; unsigned char ovalue; PyObject *rv; int i; int pos; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; if ( x*y != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, (len+3)/4); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); pos = 0; ovalue = 0; for ( i=0; i < len; i++ ) { ovalue |= ((int)cp[i] & 0xc0) >> pos; pos += 2; if ( pos == 8 ) { *ncp++ = ovalue; ovalue = 0; pos = 0; } } if ( pos != 0 ) *ncp++ = ovalue; return rv; } static PyObject * imageop_dither2mono(PyObject *self, PyObject *args) { int sum, x, y, len; unsigned char *cp, *ncp; unsigned char ovalue; PyObject *rv; int i, bit; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; if ( x*y != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, (len+7)/8); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); bit = 0x80; ovalue = 0; sum = 0; for ( i=0; i < len; i++ ) { sum += cp[i]; if ( sum >= 256 ) { sum -= 256; ovalue |= bit; } bit >>= 1; if ( bit == 0 ) { *ncp++ = ovalue; bit = 0x80; ovalue = 0; } } if ( bit != 0x80 ) *ncp++ = ovalue; return rv; } static PyObject * imageop_dither2grey2(PyObject *self, PyObject *args) { int x, y, len; unsigned char *cp, *ncp; unsigned char ovalue; PyObject *rv; int i; int pos; int sum = 0, nvalue; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; if ( x*y != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, (len+3)/4); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); pos = 1; ovalue = 0; for ( i=0; i < len; i++ ) { sum += cp[i]; nvalue = sum & 0x180; sum -= nvalue; ovalue |= nvalue >> pos; pos += 2; if ( pos == 9 ) { *ncp++ = ovalue; ovalue = 0; pos = 1; } } if ( pos != 0 ) *ncp++ = ovalue; return rv; } static PyObject * imageop_mono2grey(PyObject *self, PyObject *args) { int v0, v1, x, y, len, nlen; unsigned char *cp, *ncp; PyObject *rv; int i, bit; if ( !PyArg_ParseTuple(args, "s#iiii", &cp, &len, &x, &y, &v0, &v1) ) return 0; nlen = x*y; if ( (nlen+7)/8 != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, nlen); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); bit = 0x80; for ( i=0; i < nlen; i++ ) { if ( *cp & bit ) *ncp++ = v1; else *ncp++ = v0; bit >>= 1; if ( bit == 0 ) { bit = 0x80; cp++; } } return rv; } static PyObject * imageop_grey22grey(PyObject *self, PyObject *args) { int x, y, len, nlen; unsigned char *cp, *ncp; PyObject *rv; int i, pos, value = 0, nvalue; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; nlen = x*y; if ( (nlen+3)/4 != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, nlen); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); pos = 0; for ( i=0; i < nlen; i++ ) { if ( pos == 0 ) { value = *cp++; pos = 8; } pos -= 2; nvalue = (value >> pos) & 0x03; *ncp++ = nvalue | (nvalue << 2) | (nvalue << 4) | (nvalue << 6); } return rv; } static PyObject * imageop_grey42grey(PyObject *self, PyObject *args) { int x, y, len, nlen; unsigned char *cp, *ncp; PyObject *rv; int i, pos, value = 0, nvalue; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; nlen = x*y; if ( (nlen+1)/2 != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, nlen); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); pos = 0; for ( i=0; i < nlen; i++ ) { if ( pos == 0 ) { value = *cp++; pos = 8; } pos -= 4; nvalue = (value >> pos) & 0x0f; *ncp++ = nvalue | (nvalue << 4); } return rv; } static PyObject * imageop_rgb2rgb8(PyObject *self, PyObject *args) { int x, y, len, nlen; Py_UInt32 *cp; unsigned char *ncp; PyObject *rv; int i, r, g, b; Py_UInt32 value, nvalue; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; nlen = x*y; if ( nlen*4 != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, nlen); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); for ( i=0; i < nlen; i++ ) { /* Bits in source: aaaaaaaa BBbbbbbb GGGggggg RRRrrrrr */ value = *cp++; #if 0 r = (value >> 5) & 7; g = (value >> 13) & 7; b = (value >> 22) & 3; #else r = (int) ((value & 0xff) / 255. * 7. + .5); g = (int) (((value >> 8) & 0xff) / 255. * 7. + .5); b = (int) (((value >> 16) & 0xff) / 255. * 3. + .5); #endif nvalue = (r<<5) | (b<<3) | g; *ncp++ = (unsigned char)nvalue; } return rv; } static PyObject * imageop_rgb82rgb(PyObject *self, PyObject *args) { int x, y, len, nlen; unsigned char *cp; Py_UInt32 *ncp; PyObject *rv; int i, r, g, b; Py_UInt32 value, nvalue; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; nlen = x*y; if ( nlen != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, nlen*4); if ( rv == 0 ) return 0; ncp = (Py_UInt32 *)PyString_AsString(rv); for ( i=0; i < nlen; i++ ) { /* Bits in source: RRRBBGGG ** Red and Green are multiplied by 36.5, Blue by 85 */ value = *cp++; r = (value >> 5) & 7; g = (value ) & 7; b = (value >> 3) & 3; r = (r<<5) | (r<<3) | (r>>1); g = (g<<5) | (g<<3) | (g>>1); b = (b<<6) | (b<<4) | (b<<2) | b; nvalue = r | (g<<8) | (b<<16); *ncp++ = nvalue; } return rv; } static PyObject * imageop_rgb2grey(PyObject *self, PyObject *args) { int x, y, len, nlen; Py_UInt32 *cp; unsigned char *ncp; PyObject *rv; int i, r, g, b; Py_UInt32 value, nvalue; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; nlen = x*y; if ( nlen*4 != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, nlen); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); for ( i=0; i < nlen; i++ ) { value = *cp++; r = (value ) & 0xff; g = (value >> 8) & 0xff; b = (value >> 16) & 0xff; nvalue = (int)(0.30*r + 0.59*g + 0.11*b); if ( nvalue > 255 ) nvalue = 255; *ncp++ = (unsigned char)nvalue; } return rv; } static PyObject * imageop_grey2rgb(PyObject *self, PyObject *args) { int x, y, len, nlen; unsigned char *cp; Py_UInt32 *ncp; PyObject *rv; int i; Py_UInt32 value; if ( !PyArg_ParseTuple(args, "s#ii", &cp, &len, &x, &y) ) return 0; nlen = x*y; if ( nlen != len ) { PyErr_SetString(ImageopError, "String has incorrect length"); return 0; } rv = PyString_FromStringAndSize(NULL, nlen*4); if ( rv == 0 ) return 0; ncp = (Py_UInt32 *)PyString_AsString(rv); for ( i=0; i < nlen; i++ ) { value = *cp++; *ncp++ = value | (value << 8 ) | (value << 16); } return rv; } /* static object * imageop_mul(object *self, object *args) { char *cp, *ncp; int len, size, x, y; object *rv; int i; if ( !getargs(args, "(s#iii)", &cp, &len, &size, &x, &y) ) return 0; if ( size != 1 && size != 4 ) { err_setstr(ImageopError, "Size should be 1 or 4"); return 0; } if ( len != size*x*y ) { err_setstr(ImageopError, "String has incorrect length"); return 0; } rv = newsizedstringobject(NULL, XXXX); if ( rv == 0 ) return 0; ncp = (char *)getstringvalue(rv); for ( i=0; i < len; i += size ) { } return rv; } */ static PyMethodDef imageop_methods[] = { { "crop", imageop_crop, METH_VARARGS }, { "scale", imageop_scale, METH_VARARGS }, { "grey2mono", imageop_grey2mono, METH_VARARGS }, { "grey2grey2", imageop_grey2grey2, METH_VARARGS }, { "grey2grey4", imageop_grey2grey4, METH_VARARGS }, { "dither2mono", imageop_dither2mono, METH_VARARGS }, { "dither2grey2", imageop_dither2grey2, METH_VARARGS }, { "mono2grey", imageop_mono2grey, METH_VARARGS }, { "grey22grey", imageop_grey22grey, METH_VARARGS }, { "grey42grey", imageop_grey42grey, METH_VARARGS }, { "tovideo", imageop_tovideo, METH_VARARGS }, { "rgb2rgb8", imageop_rgb2rgb8, METH_VARARGS }, { "rgb82rgb", imageop_rgb82rgb, METH_VARARGS }, { "rgb2grey", imageop_rgb2grey, METH_VARARGS }, { "grey2rgb", imageop_grey2rgb, METH_VARARGS }, { 0, 0 } }; PyMODINIT_FUNC initimageop(void) { PyObject *m, *d; m = Py_InitModule("imageop", imageop_methods); d = PyModule_GetDict(m); ImageopError = PyErr_NewException("imageop.error", NULL, NULL); if (ImageopError != NULL) PyDict_SetItemString(d, "error", ImageopError); } Python-2.3.7/Modules/mmapmodule.c0000644001241000117560000006400710057076740016201 0ustar loewishpifb6/* / Author: Sam Rushing / Hacked for Unix by AMK / $Id: mmapmodule.c 35995 2004-06-01 13:00:16Z akuchling $ / mmapmodule.cpp -- map a view of a file into memory / / todo: need permission flags, perhaps a 'chsize' analog / not all functions check range yet!!! / / / Note: This module currently only deals with 32-bit file / sizes. / / This version of mmapmodule.c has been changed significantly / from the original mmapfile.c on which it was based. / The original version of mmapfile is maintained by Sam at / ftp://squirl.nightmare.com/pub/python/python-ext. */ #include #ifndef MS_WINDOWS #define UNIX #endif #ifdef MS_WINDOWS #include static int my_getpagesize(void) { SYSTEM_INFO si; GetSystemInfo(&si); return si.dwPageSize; } #endif #ifdef UNIX #include #include #ifndef MS_SYNC /* This is missing e.g. on SunOS 4.1.4 */ #define MS_SYNC 0 #endif #if defined(HAVE_SYSCONF) && defined(_SC_PAGESIZE) static int my_getpagesize(void) { return sysconf(_SC_PAGESIZE); } #else #define my_getpagesize getpagesize #endif #endif /* UNIX */ #include #include static PyObject *mmap_module_error; typedef enum { ACCESS_DEFAULT, ACCESS_READ, ACCESS_WRITE, ACCESS_COPY } access_mode; typedef struct { PyObject_HEAD char * data; size_t size; size_t pos; #ifdef MS_WINDOWS HANDLE map_handle; HANDLE file_handle; char * tagname; #endif #ifdef UNIX int fd; #endif access_mode access; } mmap_object; static void mmap_object_dealloc(mmap_object *m_obj) { #ifdef MS_WINDOWS if (m_obj->data != NULL) UnmapViewOfFile (m_obj->data); if (m_obj->map_handle != INVALID_HANDLE_VALUE) CloseHandle (m_obj->map_handle); if (m_obj->file_handle != INVALID_HANDLE_VALUE) CloseHandle (m_obj->file_handle); if (m_obj->tagname) PyMem_Free(m_obj->tagname); #endif /* MS_WINDOWS */ #ifdef UNIX if (m_obj->data!=NULL) { msync(m_obj->data, m_obj->size, MS_SYNC); munmap(m_obj->data, m_obj->size); } #endif /* UNIX */ PyObject_Del(m_obj); } static PyObject * mmap_close_method(mmap_object *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":close")) return NULL; #ifdef MS_WINDOWS /* For each resource we maintain, we need to check the value is valid, and if so, free the resource and set the member value to an invalid value so the dealloc does not attempt to resource clearing again. TODO - should we check for errors in the close operations??? */ if (self->data != NULL) { UnmapViewOfFile (self->data); self->data = NULL; } if (self->map_handle != INVALID_HANDLE_VALUE) { CloseHandle (self->map_handle); self->map_handle = INVALID_HANDLE_VALUE; } if (self->file_handle != INVALID_HANDLE_VALUE) { CloseHandle (self->file_handle); self->file_handle = INVALID_HANDLE_VALUE; } #endif /* MS_WINDOWS */ #ifdef UNIX if (self->data != NULL) { munmap(self->data, self->size); self->data = NULL; } #endif Py_INCREF (Py_None); return (Py_None); } #ifdef MS_WINDOWS #define CHECK_VALID(err) \ do { \ if (self->map_handle == INVALID_HANDLE_VALUE) { \ PyErr_SetString (PyExc_ValueError, "mmap closed or invalid"); \ return err; \ } \ } while (0) #endif /* MS_WINDOWS */ #ifdef UNIX #define CHECK_VALID(err) \ do { \ if (self->data == NULL) { \ PyErr_SetString (PyExc_ValueError, "mmap closed or invalid"); \ return err; \ } \ } while (0) #endif /* UNIX */ static PyObject * mmap_read_byte_method(mmap_object *self, PyObject *args) { CHECK_VALID(NULL); if (!PyArg_ParseTuple(args, ":read_byte")) return NULL; if (self->pos < self->size) { char value = self->data[self->pos]; self->pos += 1; return Py_BuildValue("c", value); } else { PyErr_SetString (PyExc_ValueError, "read byte out of range"); return NULL; } } static PyObject * mmap_read_line_method(mmap_object *self, PyObject *args) { char *start = self->data+self->pos; char *eof = self->data+self->size; char *eol; PyObject *result; CHECK_VALID(NULL); if (!PyArg_ParseTuple(args, ":readline")) return NULL; eol = memchr(start, '\n', self->size - self->pos); if (!eol) eol = eof; else ++eol; /* we're interested in the position after the newline. */ result = PyString_FromStringAndSize(start, (eol - start)); self->pos += (eol - start); return (result); } static PyObject * mmap_read_method(mmap_object *self, PyObject *args) { long num_bytes; PyObject *result; CHECK_VALID(NULL); if (!PyArg_ParseTuple(args, "l:read", &num_bytes)) return(NULL); /* silently 'adjust' out-of-range requests */ if ((self->pos + num_bytes) > self->size) { num_bytes -= (self->pos+num_bytes) - self->size; } result = Py_BuildValue("s#", self->data+self->pos, num_bytes); self->pos += num_bytes; return (result); } static PyObject * mmap_find_method(mmap_object *self, PyObject *args) { long start = self->pos; char *needle; int len; CHECK_VALID(NULL); if (!PyArg_ParseTuple (args, "s#|l:find", &needle, &len, &start)) { return NULL; } else { char *p; char *e = self->data + self->size; if (start < 0) start += self->size; if (start < 0) start = 0; else if ((size_t)start > self->size) start = self->size; for (p = self->data + start; p + len <= e; ++p) { int i; for (i = 0; i < len && needle[i] == p[i]; ++i) /* nothing */; if (i == len) { return Py_BuildValue ( "l", (long) (p - self->data)); } } return Py_BuildValue ("l", (long) -1); } } static int is_writeable(mmap_object *self) { if (self->access != ACCESS_READ) return 1; PyErr_Format(PyExc_TypeError, "mmap can't modify a readonly memory map."); return 0; } static int is_resizeable(mmap_object *self) { if ((self->access == ACCESS_WRITE) || (self->access == ACCESS_DEFAULT)) return 1; PyErr_Format(PyExc_TypeError, "mmap can't resize a readonly or copy-on-write memory map."); return 0; } static PyObject * mmap_write_method(mmap_object *self, PyObject *args) { int length; char *data; CHECK_VALID(NULL); if (!PyArg_ParseTuple (args, "s#:write", &data, &length)) return(NULL); if (!is_writeable(self)) return NULL; if ((self->pos + length) > self->size) { PyErr_SetString (PyExc_ValueError, "data out of range"); return NULL; } memcpy (self->data+self->pos, data, length); self->pos = self->pos+length; Py_INCREF (Py_None); return (Py_None); } static PyObject * mmap_write_byte_method(mmap_object *self, PyObject *args) { char value; CHECK_VALID(NULL); if (!PyArg_ParseTuple (args, "c:write_byte", &value)) return(NULL); if (!is_writeable(self)) return NULL; *(self->data+self->pos) = value; self->pos += 1; Py_INCREF (Py_None); return (Py_None); } static PyObject * mmap_size_method(mmap_object *self, PyObject *args) { CHECK_VALID(NULL); if (!PyArg_ParseTuple(args, ":size")) return NULL; #ifdef MS_WINDOWS if (self->file_handle != INVALID_HANDLE_VALUE) { return (Py_BuildValue ( "l", (long) GetFileSize (self->file_handle, NULL))); } else { return (Py_BuildValue ("l", (long) self->size) ); } #endif /* MS_WINDOWS */ #ifdef UNIX { struct stat buf; if (-1 == fstat(self->fd, &buf)) { PyErr_SetFromErrno(mmap_module_error); return NULL; } return (Py_BuildValue ("l", (long) buf.st_size) ); } #endif /* UNIX */ } /* This assumes that you want the entire file mapped, / and when recreating the map will make the new file / have the new size / / Is this really necessary? This could easily be done / from python by just closing and re-opening with the / new size? */ static PyObject * mmap_resize_method(mmap_object *self, PyObject *args) { unsigned long new_size; CHECK_VALID(NULL); if (!PyArg_ParseTuple (args, "l:resize", &new_size) || !is_resizeable(self)) { return NULL; #ifdef MS_WINDOWS } else { DWORD dwErrCode = 0; /* First, unmap the file view */ UnmapViewOfFile (self->data); /* Close the mapping object */ CloseHandle (self->map_handle); /* Move to the desired EOF position */ SetFilePointer (self->file_handle, new_size, NULL, FILE_BEGIN); /* Change the size of the file */ SetEndOfFile (self->file_handle); /* Create another mapping object and remap the file view */ self->map_handle = CreateFileMapping ( self->file_handle, NULL, PAGE_READWRITE, 0, new_size, self->tagname); if (self->map_handle != NULL) { self->data = (char *) MapViewOfFile (self->map_handle, FILE_MAP_WRITE, 0, 0, 0); if (self->data != NULL) { self->size = new_size; Py_INCREF (Py_None); return Py_None; } else { dwErrCode = GetLastError(); } } else { dwErrCode = GetLastError(); } PyErr_SetFromWindowsErr(dwErrCode); return (NULL); #endif /* MS_WINDOWS */ #ifdef UNIX #ifndef HAVE_MREMAP } else { PyErr_SetString(PyExc_SystemError, "mmap: resizing not available--no mremap()"); return NULL; #else } else { void *newmap; #ifdef MREMAP_MAYMOVE newmap = mremap(self->data, self->size, new_size, MREMAP_MAYMOVE); #else newmap = mremap(self->data, self->size, new_size, 0); #endif if (newmap == (void *)-1) { PyErr_SetFromErrno(mmap_module_error); return NULL; } self->data = newmap; self->size = new_size; Py_INCREF(Py_None); return Py_None; #endif /* HAVE_MREMAP */ #endif /* UNIX */ } } static PyObject * mmap_tell_method(mmap_object *self, PyObject *args) { CHECK_VALID(NULL); if (!PyArg_ParseTuple(args, ":tell")) return NULL; return (Py_BuildValue ("l", (long) self->pos) ); } static PyObject * mmap_flush_method(mmap_object *self, PyObject *args) { size_t offset = 0; size_t size = self->size; CHECK_VALID(NULL); if (!PyArg_ParseTuple (args, "|ll:flush", &offset, &size)) { return NULL; } else if ((offset + size) > self->size) { PyErr_SetString (PyExc_ValueError, "flush values out of range"); return NULL; } else { #ifdef MS_WINDOWS return (Py_BuildValue("l", (long) FlushViewOfFile(self->data+offset, size))); #endif /* MS_WINDOWS */ #ifdef UNIX /* XXX semantics of return value? */ /* XXX flags for msync? */ if (-1 == msync(self->data + offset, size, MS_SYNC)) { PyErr_SetFromErrno(mmap_module_error); return NULL; } return Py_BuildValue ("l", (long) 0); #endif /* UNIX */ } } static PyObject * mmap_seek_method(mmap_object *self, PyObject *args) { int dist; int how=0; CHECK_VALID(NULL); if (!PyArg_ParseTuple (args, "i|i:seek", &dist, &how)) { return(NULL); } else { size_t where; switch (how) { case 0: /* relative to start */ if (dist < 0) goto onoutofrange; where = dist; break; case 1: /* relative to current position */ if ((int)self->pos + dist < 0) goto onoutofrange; where = self->pos + dist; break; case 2: /* relative to end */ if ((int)self->size + dist < 0) goto onoutofrange; where = self->size + dist; break; default: PyErr_SetString (PyExc_ValueError, "unknown seek type"); return NULL; } if (where > self->size) goto onoutofrange; self->pos = where; Py_INCREF (Py_None); return (Py_None); } onoutofrange: PyErr_SetString (PyExc_ValueError, "seek out of range"); return NULL; } static PyObject * mmap_move_method(mmap_object *self, PyObject *args) { unsigned long dest, src, count; CHECK_VALID(NULL); if (!PyArg_ParseTuple (args, "iii:move", &dest, &src, &count) || !is_writeable(self)) { return NULL; } else { /* bounds check the values */ if (/* end of source after end of data?? */ ((src+count) > self->size) /* dest will fit? */ || (dest+count > self->size)) { PyErr_SetString (PyExc_ValueError, "source or destination out of range"); return NULL; } else { memmove (self->data+dest, self->data+src, count); Py_INCREF (Py_None); return Py_None; } } } static struct PyMethodDef mmap_object_methods[] = { {"close", (PyCFunction) mmap_close_method, METH_VARARGS}, {"find", (PyCFunction) mmap_find_method, METH_VARARGS}, {"flush", (PyCFunction) mmap_flush_method, METH_VARARGS}, {"move", (PyCFunction) mmap_move_method, METH_VARARGS}, {"read", (PyCFunction) mmap_read_method, METH_VARARGS}, {"read_byte", (PyCFunction) mmap_read_byte_method, METH_VARARGS}, {"readline", (PyCFunction) mmap_read_line_method, METH_VARARGS}, {"resize", (PyCFunction) mmap_resize_method, METH_VARARGS}, {"seek", (PyCFunction) mmap_seek_method, METH_VARARGS}, {"size", (PyCFunction) mmap_size_method, METH_VARARGS}, {"tell", (PyCFunction) mmap_tell_method, METH_VARARGS}, {"write", (PyCFunction) mmap_write_method, METH_VARARGS}, {"write_byte", (PyCFunction) mmap_write_byte_method, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; /* Functions for treating an mmap'ed file as a buffer */ static int mmap_buffer_getreadbuf(mmap_object *self, int index, const void **ptr) { CHECK_VALID(-1); if ( index != 0 ) { PyErr_SetString(PyExc_SystemError, "Accessing non-existent mmap segment"); return -1; } *ptr = self->data; return self->size; } static int mmap_buffer_getwritebuf(mmap_object *self, int index, const void **ptr) { CHECK_VALID(-1); if ( index != 0 ) { PyErr_SetString(PyExc_SystemError, "Accessing non-existent mmap segment"); return -1; } if (!is_writeable(self)) return -1; *ptr = self->data; return self->size; } static int mmap_buffer_getsegcount(mmap_object *self, int *lenp) { CHECK_VALID(-1); if (lenp) *lenp = self->size; return 1; } static int mmap_buffer_getcharbuffer(mmap_object *self, int index, const void **ptr) { if ( index != 0 ) { PyErr_SetString(PyExc_SystemError, "accessing non-existent buffer segment"); return -1; } *ptr = (const char *)self->data; return self->size; } static PyObject * mmap_object_getattr(mmap_object *self, char *name) { return Py_FindMethod (mmap_object_methods, (PyObject *)self, name); } static int mmap_length(mmap_object *self) { CHECK_VALID(-1); return self->size; } static PyObject * mmap_item(mmap_object *self, int i) { CHECK_VALID(NULL); if (i < 0 || (size_t)i >= self->size) { PyErr_SetString(PyExc_IndexError, "mmap index out of range"); return NULL; } return PyString_FromStringAndSize(self->data + i, 1); } static PyObject * mmap_slice(mmap_object *self, int ilow, int ihigh) { CHECK_VALID(NULL); if (ilow < 0) ilow = 0; else if ((size_t)ilow > self->size) ilow = self->size; if (ihigh < 0) ihigh = 0; if (ihigh < ilow) ihigh = ilow; else if ((size_t)ihigh > self->size) ihigh = self->size; return PyString_FromStringAndSize(self->data + ilow, ihigh-ilow); } static PyObject * mmap_concat(mmap_object *self, PyObject *bb) { CHECK_VALID(NULL); PyErr_SetString(PyExc_SystemError, "mmaps don't support concatenation"); return NULL; } static PyObject * mmap_repeat(mmap_object *self, int n) { CHECK_VALID(NULL); PyErr_SetString(PyExc_SystemError, "mmaps don't support repeat operation"); return NULL; } static int mmap_ass_slice(mmap_object *self, int ilow, int ihigh, PyObject *v) { const char *buf; CHECK_VALID(-1); if (ilow < 0) ilow = 0; else if ((size_t)ilow > self->size) ilow = self->size; if (ihigh < 0) ihigh = 0; if (ihigh < ilow) ihigh = ilow; else if ((size_t)ihigh > self->size) ihigh = self->size; if (v == NULL) { PyErr_SetString(PyExc_TypeError, "mmap object doesn't support slice deletion"); return -1; } if (! (PyString_Check(v)) ) { PyErr_SetString(PyExc_IndexError, "mmap slice assignment must be a string"); return -1; } if ( PyString_Size(v) != (ihigh - ilow) ) { PyErr_SetString(PyExc_IndexError, "mmap slice assignment is wrong size"); return -1; } if (!is_writeable(self)) return -1; buf = PyString_AsString(v); memcpy(self->data + ilow, buf, ihigh-ilow); return 0; } static int mmap_ass_item(mmap_object *self, int i, PyObject *v) { const char *buf; CHECK_VALID(-1); if (i < 0 || (size_t)i >= self->size) { PyErr_SetString(PyExc_IndexError, "mmap index out of range"); return -1; } if (v == NULL) { PyErr_SetString(PyExc_TypeError, "mmap object doesn't support item deletion"); return -1; } if (! (PyString_Check(v) && PyString_Size(v)==1) ) { PyErr_SetString(PyExc_IndexError, "mmap assignment must be single-character string"); return -1; } if (!is_writeable(self)) return -1; buf = PyString_AsString(v); self->data[i] = buf[0]; return 0; } static PySequenceMethods mmap_as_sequence = { (inquiry)mmap_length, /*sq_length*/ (binaryfunc)mmap_concat, /*sq_concat*/ (intargfunc)mmap_repeat, /*sq_repeat*/ (intargfunc)mmap_item, /*sq_item*/ (intintargfunc)mmap_slice, /*sq_slice*/ (intobjargproc)mmap_ass_item, /*sq_ass_item*/ (intintobjargproc)mmap_ass_slice, /*sq_ass_slice*/ }; static PyBufferProcs mmap_as_buffer = { (getreadbufferproc)mmap_buffer_getreadbuf, (getwritebufferproc)mmap_buffer_getwritebuf, (getsegcountproc)mmap_buffer_getsegcount, (getcharbufferproc)mmap_buffer_getcharbuffer, }; static PyTypeObject mmap_object_type = { PyObject_HEAD_INIT(0) /* patched in module init */ 0, /* ob_size */ "mmap.mmap", /* tp_name */ sizeof(mmap_object), /* tp_size */ 0, /* tp_itemsize */ /* methods */ (destructor) mmap_object_dealloc, /* tp_dealloc */ 0, /* tp_print */ (getattrfunc) mmap_object_getattr, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ &mmap_as_sequence, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ &mmap_as_buffer, /*tp_as_buffer*/ Py_TPFLAGS_HAVE_GETCHARBUFFER, /*tp_flags*/ 0, /*tp_doc*/ }; /* extract the map size from the given PyObject The map size is restricted to [0, INT_MAX] because this is the current Python limitation on object sizes. Although the mmap object *could* handle a larger map size, there is no point because all the useful operations (len(), slicing(), sequence indexing) are limited by a C int. Returns -1 on error, with an appropriate Python exception raised. On success, the map size is returned. */ static int _GetMapSize(PyObject *o) { if (PyInt_Check(o)) { long i = PyInt_AsLong(o); if (PyErr_Occurred()) return -1; if (i < 0) goto onnegoverflow; if (i > INT_MAX) goto onposoverflow; return (int)i; } else if (PyLong_Check(o)) { long i = PyLong_AsLong(o); if (PyErr_Occurred()) { /* yes negative overflow is mistaken for positive overflow but not worth the trouble to check sign of 'i' */ if (PyErr_ExceptionMatches(PyExc_OverflowError)) goto onposoverflow; else return -1; } if (i < 0) goto onnegoverflow; if (i > INT_MAX) goto onposoverflow; return (int)i; } else { PyErr_SetString(PyExc_TypeError, "map size must be an integral value"); return -1; } onnegoverflow: PyErr_SetString(PyExc_OverflowError, "memory mapped size must be positive"); return -1; onposoverflow: PyErr_SetString(PyExc_OverflowError, "memory mapped size is too large (limited by C int)"); return -1; } #ifdef UNIX static PyObject * new_mmap_object(PyObject *self, PyObject *args, PyObject *kwdict) { #ifdef HAVE_FSTAT struct stat st; #endif mmap_object *m_obj; PyObject *map_size_obj = NULL; int map_size; int fd, flags = MAP_SHARED, prot = PROT_WRITE | PROT_READ; access_mode access = ACCESS_DEFAULT; char *keywords[] = {"fileno", "length", "flags", "prot", "access", NULL}; if (!PyArg_ParseTupleAndKeywords(args, kwdict, "iO|iii", keywords, &fd, &map_size_obj, &flags, &prot, &access)) return NULL; map_size = _GetMapSize(map_size_obj); if (map_size < 0) return NULL; if ((access != ACCESS_DEFAULT) && ((flags != MAP_SHARED) || ( prot != (PROT_WRITE | PROT_READ)))) return PyErr_Format(PyExc_ValueError, "mmap can't specify both access and flags, prot."); switch(access) { case ACCESS_READ: flags = MAP_SHARED; prot = PROT_READ; break; case ACCESS_WRITE: flags = MAP_SHARED; prot = PROT_READ | PROT_WRITE; break; case ACCESS_COPY: flags = MAP_PRIVATE; prot = PROT_READ | PROT_WRITE; break; case ACCESS_DEFAULT: /* use the specified or default values of flags and prot */ break; default: return PyErr_Format(PyExc_ValueError, "mmap invalid access parameter."); } #ifdef HAVE_FSTAT # ifdef __VMS /* on OpenVMS we must ensure that all bytes are written to the file */ fsync(fd); # endif if (fstat(fd, &st) == 0 && S_ISREG(st.st_mode) && (size_t)map_size > st.st_size) { PyErr_SetString(PyExc_ValueError, "mmap length is greater than file size"); return NULL; } #endif m_obj = PyObject_New (mmap_object, &mmap_object_type); if (m_obj == NULL) {return NULL;} m_obj->size = (size_t) map_size; m_obj->pos = (size_t) 0; m_obj->fd = fd; m_obj->data = mmap(NULL, map_size, prot, flags, fd, 0); if (m_obj->data == (char *)-1) { m_obj->data = NULL; Py_DECREF(m_obj); PyErr_SetFromErrno(mmap_module_error); return NULL; } m_obj->access = access; return (PyObject *)m_obj; } #endif /* UNIX */ #ifdef MS_WINDOWS static PyObject * new_mmap_object(PyObject *self, PyObject *args, PyObject *kwdict) { mmap_object *m_obj; PyObject *map_size_obj = NULL; int map_size; char *tagname = ""; DWORD dwErr = 0; int fileno; HANDLE fh = 0; access_mode access = ACCESS_DEFAULT; DWORD flProtect, dwDesiredAccess; char *keywords[] = { "fileno", "length", "tagname", "access", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwdict, "iO|zi", keywords, &fileno, &map_size_obj, &tagname, &access)) { return NULL; } switch(access) { case ACCESS_READ: flProtect = PAGE_READONLY; dwDesiredAccess = FILE_MAP_READ; break; case ACCESS_DEFAULT: case ACCESS_WRITE: flProtect = PAGE_READWRITE; dwDesiredAccess = FILE_MAP_WRITE; break; case ACCESS_COPY: flProtect = PAGE_WRITECOPY; dwDesiredAccess = FILE_MAP_COPY; break; default: return PyErr_Format(PyExc_ValueError, "mmap invalid access parameter."); } map_size = _GetMapSize(map_size_obj); if (map_size < 0) return NULL; /* if an actual filename has been specified */ if (fileno != 0) { fh = (HANDLE)_get_osfhandle(fileno); if (fh==(HANDLE)-1) { PyErr_SetFromErrno(mmap_module_error); return NULL; } /* Win9x appears to need us seeked to zero */ lseek(fileno, 0, SEEK_SET); } m_obj = PyObject_New (mmap_object, &mmap_object_type); if (m_obj==NULL) return NULL; /* Set every field to an invalid marker, so we can safely destruct the object in the face of failure */ m_obj->data = NULL; m_obj->file_handle = INVALID_HANDLE_VALUE; m_obj->map_handle = INVALID_HANDLE_VALUE; m_obj->tagname = NULL; if (fh) { /* It is necessary to duplicate the handle, so the Python code can close it on us */ if (!DuplicateHandle( GetCurrentProcess(), /* source process handle */ fh, /* handle to be duplicated */ GetCurrentProcess(), /* target proc handle */ (LPHANDLE)&m_obj->file_handle, /* result */ 0, /* access - ignored due to options value */ FALSE, /* inherited by child processes? */ DUPLICATE_SAME_ACCESS)) { /* options */ dwErr = GetLastError(); Py_DECREF(m_obj); PyErr_SetFromWindowsErr(dwErr); return NULL; } if (!map_size) { m_obj->size = GetFileSize (fh, NULL); } else { m_obj->size = map_size; } } else { m_obj->size = map_size; } /* set the initial position */ m_obj->pos = (size_t) 0; /* set the tag name */ if (tagname != NULL && *tagname != '\0') { m_obj->tagname = PyMem_Malloc(strlen(tagname)+1); if (m_obj->tagname == NULL) { PyErr_NoMemory(); Py_DECREF(m_obj); return NULL; } strcpy(m_obj->tagname, tagname); } else m_obj->tagname = NULL; m_obj->access = access; m_obj->map_handle = CreateFileMapping (m_obj->file_handle, NULL, flProtect, 0, m_obj->size, m_obj->tagname); if (m_obj->map_handle != NULL) { m_obj->data = (char *) MapViewOfFile (m_obj->map_handle, dwDesiredAccess, 0, 0, 0); if (m_obj->data != NULL) { return ((PyObject *) m_obj); } else { dwErr = GetLastError(); } } else { dwErr = GetLastError(); } Py_DECREF(m_obj); PyErr_SetFromWindowsErr(dwErr); return (NULL); } #endif /* MS_WINDOWS */ /* List of functions exported by this module */ static struct PyMethodDef mmap_functions[] = { {"mmap", (PyCFunction) new_mmap_object, METH_VARARGS|METH_KEYWORDS}, {NULL, NULL} /* Sentinel */ }; PyMODINIT_FUNC initmmap(void) { PyObject *dict, *module; /* Patch the object type */ mmap_object_type.ob_type = &PyType_Type; module = Py_InitModule ("mmap", mmap_functions); dict = PyModule_GetDict (module); mmap_module_error = PyExc_EnvironmentError; Py_INCREF(mmap_module_error); PyDict_SetItemString (dict, "error", mmap_module_error); #ifdef PROT_EXEC PyDict_SetItemString (dict, "PROT_EXEC", PyInt_FromLong(PROT_EXEC) ); #endif #ifdef PROT_READ PyDict_SetItemString (dict, "PROT_READ", PyInt_FromLong(PROT_READ) ); #endif #ifdef PROT_WRITE PyDict_SetItemString (dict, "PROT_WRITE", PyInt_FromLong(PROT_WRITE) ); #endif #ifdef MAP_SHARED PyDict_SetItemString (dict, "MAP_SHARED", PyInt_FromLong(MAP_SHARED) ); #endif #ifdef MAP_PRIVATE PyDict_SetItemString (dict, "MAP_PRIVATE", PyInt_FromLong(MAP_PRIVATE) ); #endif #ifdef MAP_DENYWRITE PyDict_SetItemString (dict, "MAP_DENYWRITE", PyInt_FromLong(MAP_DENYWRITE) ); #endif #ifdef MAP_EXECUTABLE PyDict_SetItemString (dict, "MAP_EXECUTABLE", PyInt_FromLong(MAP_EXECUTABLE) ); #endif #ifdef MAP_ANON PyDict_SetItemString (dict, "MAP_ANON", PyInt_FromLong(MAP_ANON) ); PyDict_SetItemString (dict, "MAP_ANONYMOUS", PyInt_FromLong(MAP_ANON) ); #endif PyDict_SetItemString (dict, "PAGESIZE", PyInt_FromLong( (long)my_getpagesize() ) ); PyDict_SetItemString (dict, "ACCESS_READ", PyInt_FromLong(ACCESS_READ)); PyDict_SetItemString (dict, "ACCESS_WRITE", PyInt_FromLong(ACCESS_WRITE)); PyDict_SetItemString (dict, "ACCESS_COPY", PyInt_FromLong(ACCESS_COPY)); } Python-2.3.7/Modules/yuvconvert.c0000644001241000117560000000573607154035731016270 0ustar loewishpifb6 #include "yuv.h" void yuv_sv411_to_cl422dc(int invert, void *data, void *yuv, int width, int height) { struct yuv411 *in = data; struct yuv422 *out_even = yuv; struct yuv422 *out_odd = out_even + width / 2; int i, j; /* counters */ for (i = height / 2; i--; ) { for (j = width / 4; j--; ) { YUV422_Y0(*out_even) = YUV411_Y00(*in); YUV422_U0(*out_even) = YUV411_U00(*in); YUV422_V0(*out_even) = YUV411_V00(*in); YUV422_Y1(*out_even) = YUV411_Y01(*in); out_even++; YUV422_Y0(*out_even) = YUV411_Y02(*in); YUV422_U0(*out_even) = YUV411_U02(*in); YUV422_V0(*out_even) = YUV411_V02(*in); YUV422_Y1(*out_even) = YUV411_Y03(*in); out_even++; YUV422_Y0(*out_odd) = YUV411_Y10(*in); YUV422_U0(*out_odd) = YUV411_U10(*in); YUV422_V0(*out_odd) = YUV411_V10(*in); YUV422_Y1(*out_odd) = YUV411_Y11(*in); out_odd++; YUV422_Y0(*out_odd) = YUV411_Y12(*in); YUV422_U0(*out_odd) = YUV411_U12(*in); YUV422_V0(*out_odd) = YUV411_V12(*in); YUV422_Y1(*out_odd) = YUV411_Y13(*in); out_odd++; in++; } out_even += width / 2; out_odd += width / 2; } } void yuv_sv411_to_cl422dc_quartersize(int invert, void *data, void *yuv, int width, int height) { int w4 = width / 4; /* quarter of width is used often */ struct yuv411 *in_even = data; struct yuv411 *in_odd = in_even + w4; struct yuv422 *out_even = yuv; struct yuv422 *out_odd = out_even + w4; int i, j; /* counters */ int u, v; /* U and V values */ for (i = height / 4; i--; ) { for (j = w4; j--; ) { u = YUV411_U00(*in_even); v = YUV411_V00(*in_even); YUV422_Y0(*out_even) = YUV411_Y00(*in_even); YUV422_U0(*out_even) = u; YUV422_V0(*out_even) = v; YUV422_Y1(*out_even) = YUV411_Y02(*in_even); YUV422_Y0(*out_odd) = YUV411_Y10(*in_odd); YUV422_U0(*out_odd) = u; YUV422_V0(*out_odd) = v; YUV422_Y1(*out_odd) = YUV411_Y12(*in_odd); in_even++; in_odd++; out_even++; out_odd++; } in_even += w4; in_odd += w4; out_even += w4; out_odd += w4; } } void yuv_sv411_to_cl422dc_sixteenthsize(int invert, void *data, void *yuv, int width, int height) { int w4_3 = 3 * width / 4; /* three quarters of width is used often */ int w8 = width / 8; /* and so is one eighth */ struct yuv411 *in_even = data; struct yuv411 *in_odd = in_even + width / 2; struct yuv422 *out_even = yuv; struct yuv422 *out_odd = out_even + w8; int i, j; /* counters */ int u, v; /* U and V values */ for (i = height / 8; i--; ) { for (j = w8; j--; ) { u = YUV411_U00(in_even[0]); v = YUV411_V00(in_even[0]); YUV422_Y0(*out_even) = YUV411_Y00(in_even[0]); YUV422_U0(*out_even) = u; YUV422_V0(*out_even) = v; YUV422_Y1(*out_even) = YUV411_Y00(in_even[1]); YUV422_Y0(*out_odd) = YUV411_Y00(in_odd[0]); YUV422_U0(*out_odd) = u; YUV422_V0(*out_odd) = v; YUV422_Y1(*out_odd) = YUV411_Y00(in_even[1]); in_even += 2; in_odd += 2; out_even++; out_odd++; } in_even += w4_3; in_odd += w4_3; out_even += w8; out_odd += w8; } } Python-2.3.7/Modules/ossaudiodev.c0000644001241000117560000007632010050026520016347 0ustar loewishpifb6/* * ossaudiodev -- Python interface to the OSS (Open Sound System) API. * This is the standard audio API for Linux and some * flavours of BSD [XXX which ones?]; it is also available * for a wide range of commercial Unices. * * Originally written by Peter Bosch, March 2000, as linuxaudiodev. * * Renamed to ossaudiodev and rearranged/revised/hacked up * by Greg Ward , November 2002. * Mixer interface by Nicholas FitzRoy-Dale , Dec 2002. * * (c) 2000 Peter Bosch. All Rights Reserved. * (c) 2002 Gregory P. Ward. All Rights Reserved. * (c) 2002 Python Software Foundation. All Rights Reserved. * * XXX need a license statement * * $Id: ossaudiodev.c 35862 2004-05-11 01:33:04Z gward $ */ #include "Python.h" #include "structmember.h" #ifdef HAVE_FCNTL_H #include #else #define O_RDONLY 00 #define O_WRONLY 01 #endif #include #include #if defined(linux) typedef unsigned long uint32_t; #elif defined(__FreeBSD__) # ifndef SNDCTL_DSP_CHANNELS # define SNDCTL_DSP_CHANNELS SOUND_PCM_WRITE_CHANNELS # endif #endif typedef struct { PyObject_HEAD; int fd; /* The open file */ int mode; /* file mode */ int icount; /* Input count */ int ocount; /* Output count */ uint32_t afmts; /* Audio formats supported by hardware */ } oss_audio_t; typedef struct { PyObject_HEAD; int fd; /* The open mixer device */ } oss_mixer_t; static PyTypeObject OSSAudioType; static PyTypeObject OSSMixerType; static PyObject *OSSAudioError; /* ---------------------------------------------------------------------- * DSP object initialization/deallocation */ static oss_audio_t * newossobject(PyObject *arg) { oss_audio_t *self; int fd, afmts, imode; char *basedev = NULL; char *mode = NULL; /* Two ways to call open(): open(device, mode) (for consistency with builtin open()) open(mode) (for backwards compatibility) because the *first* argument is optional, parsing args is a wee bit tricky. */ if (!PyArg_ParseTuple(arg, "s|s:open", &basedev, &mode)) return NULL; if (mode == NULL) { /* only one arg supplied */ mode = basedev; basedev = NULL; } if (strcmp(mode, "r") == 0) imode = O_RDONLY; else if (strcmp(mode, "w") == 0) imode = O_WRONLY; else if (strcmp(mode, "rw") == 0) imode = O_RDWR; else { PyErr_SetString(OSSAudioError, "mode must be 'r', 'w', or 'rw'"); return NULL; } /* Open the correct device: either the 'device' argument, or the AUDIODEV environment variable, or "/dev/dsp". */ if (basedev == NULL) { /* called with one arg */ basedev = getenv("AUDIODEV"); if (basedev == NULL) /* $AUDIODEV not set */ basedev = "/dev/dsp"; } /* Open with O_NONBLOCK to avoid hanging on devices that only allow one open at a time. This does *not* affect later I/O; OSS provides a special ioctl() for non-blocking read/write, which is exposed via oss_nonblock() below. */ if ((fd = open(basedev, imode|O_NONBLOCK)) == -1) { PyErr_SetFromErrnoWithFilename(PyExc_IOError, basedev); return NULL; } /* And (try to) put it back in blocking mode so we get the expected write() semantics. */ if (fcntl(fd, F_SETFL, 0) == -1) { close(fd); PyErr_SetFromErrnoWithFilename(PyExc_IOError, basedev); return NULL; } if (ioctl(fd, SNDCTL_DSP_GETFMTS, &afmts) == -1) { PyErr_SetFromErrnoWithFilename(PyExc_IOError, basedev); return NULL; } /* Create and initialize the object */ if ((self = PyObject_New(oss_audio_t, &OSSAudioType)) == NULL) { close(fd); return NULL; } self->fd = fd; self->mode = imode; self->icount = self->ocount = 0; self->afmts = afmts; return self; } static void oss_dealloc(oss_audio_t *self) { /* if already closed, don't reclose it */ if (self->fd != -1) close(self->fd); PyObject_Del(self); } /* ---------------------------------------------------------------------- * Mixer object initialization/deallocation */ static oss_mixer_t * newossmixerobject(PyObject *arg) { char *basedev = NULL; int fd; oss_mixer_t *self; if (!PyArg_ParseTuple(arg, "|s", &basedev)) { return NULL; } if (basedev == NULL) { basedev = getenv("MIXERDEV"); if (basedev == NULL) /* MIXERDEV not set */ basedev = "/dev/mixer"; } if ((fd = open(basedev, O_RDWR)) == -1) { PyErr_SetFromErrnoWithFilename(PyExc_IOError, basedev); return NULL; } if ((self = PyObject_New(oss_mixer_t, &OSSMixerType)) == NULL) { close(fd); return NULL; } self->fd = fd; return self; } static void oss_mixer_dealloc(oss_mixer_t *self) { /* if already closed, don't reclose it */ if (self->fd != -1) close(self->fd); PyObject_Del(self); } /* Methods to wrap the OSS ioctls. The calling convention is pretty simple: nonblock() -> ioctl(fd, SNDCTL_DSP_NONBLOCK) fmt = setfmt(fmt) -> ioctl(fd, SNDCTL_DSP_SETFMT, &fmt) etc. */ /* ---------------------------------------------------------------------- * Helper functions */ /* _do_ioctl_1() is a private helper function used for the OSS ioctls -- SNDCTL_DSP_{SETFMT,CHANNELS,SPEED} -- that that are called from C like this: ioctl(fd, SNDCTL_DSP_cmd, &arg) where arg is the value to set, and on return the driver sets arg to the value that was actually set. Mapping this to Python is obvious: arg = dsp.xxx(arg) */ static PyObject * _do_ioctl_1(int fd, PyObject *args, char *fname, int cmd) { char argfmt[33] = "i:"; int arg; assert(strlen(fname) <= 30); strcat(argfmt, fname); if (!PyArg_ParseTuple(args, argfmt, &arg)) return NULL; if (ioctl(fd, cmd, &arg) == -1) return PyErr_SetFromErrno(PyExc_IOError); return PyInt_FromLong(arg); } /* _do_ioctl_1_internal() is a wrapper for ioctls that take no inputs but return an output -- ie. we need to pass a pointer to a local C variable so the driver can write its output there, but from Python all we see is the return value. For example, SOUND_MIXER_READ_DEVMASK returns a bitmask of available mixer devices, but does not use the value of the parameter passed-in in any way. */ static PyObject * _do_ioctl_1_internal(int fd, PyObject *args, char *fname, int cmd) { char argfmt[32] = ":"; int arg = 0; assert(strlen(fname) <= 30); strcat(argfmt, fname); if (!PyArg_ParseTuple(args, argfmt, &arg)) return NULL; if (ioctl(fd, cmd, &arg) == -1) return PyErr_SetFromErrno(PyExc_IOError); return PyInt_FromLong(arg); } /* _do_ioctl_0() is a private helper for the no-argument ioctls: SNDCTL_DSP_{SYNC,RESET,POST}. */ static PyObject * _do_ioctl_0(int fd, PyObject *args, char *fname, int cmd) { char argfmt[32] = ":"; int rv; assert(strlen(fname) <= 30); strcat(argfmt, fname); if (!PyArg_ParseTuple(args, argfmt)) return NULL; /* According to hannu@opensound.com, all three of the ioctls that use this function can block, so release the GIL. This is especially important for SYNC, which can block for several seconds. */ Py_BEGIN_ALLOW_THREADS rv = ioctl(fd, cmd, 0); Py_END_ALLOW_THREADS if (rv == -1) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } /* ---------------------------------------------------------------------- * Methods of DSP objects (OSSAudioType) */ static PyObject * oss_nonblock(oss_audio_t *self, PyObject *args) { /* Hmmm: it doesn't appear to be possible to return to blocking mode once we're in non-blocking mode! */ if (!PyArg_ParseTuple(args, ":nonblock")) return NULL; if (ioctl(self->fd, SNDCTL_DSP_NONBLOCK, NULL) == -1) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } static PyObject * oss_setfmt(oss_audio_t *self, PyObject *args) { return _do_ioctl_1(self->fd, args, "setfmt", SNDCTL_DSP_SETFMT); } static PyObject * oss_getfmts(oss_audio_t *self, PyObject *args) { int mask; if (!PyArg_ParseTuple(args, ":getfmts")) return NULL; if (ioctl(self->fd, SNDCTL_DSP_GETFMTS, &mask) == -1) return PyErr_SetFromErrno(PyExc_IOError); return PyInt_FromLong(mask); } static PyObject * oss_channels(oss_audio_t *self, PyObject *args) { return _do_ioctl_1(self->fd, args, "channels", SNDCTL_DSP_CHANNELS); } static PyObject * oss_speed(oss_audio_t *self, PyObject *args) { return _do_ioctl_1(self->fd, args, "speed", SNDCTL_DSP_SPEED); } static PyObject * oss_sync(oss_audio_t *self, PyObject *args) { return _do_ioctl_0(self->fd, args, "sync", SNDCTL_DSP_SYNC); } static PyObject * oss_reset(oss_audio_t *self, PyObject *args) { return _do_ioctl_0(self->fd, args, "reset", SNDCTL_DSP_RESET); } static PyObject * oss_post(oss_audio_t *self, PyObject *args) { return _do_ioctl_0(self->fd, args, "post", SNDCTL_DSP_POST); } /* Regular file methods: read(), write(), close(), etc. as well as one convenience method, writeall(). */ static PyObject * oss_read(oss_audio_t *self, PyObject *args) { int size, count; char *cp; PyObject *rv; if (!PyArg_ParseTuple(args, "i:read", &size)) return NULL; rv = PyString_FromStringAndSize(NULL, size); if (rv == NULL) return NULL; cp = PyString_AS_STRING(rv); Py_BEGIN_ALLOW_THREADS count = read(self->fd, cp, size); Py_END_ALLOW_THREADS if (count < 0) { PyErr_SetFromErrno(PyExc_IOError); Py_DECREF(rv); return NULL; } self->icount += count; _PyString_Resize(&rv, count); return rv; } static PyObject * oss_write(oss_audio_t *self, PyObject *args) { char *cp; int rv, size; if (!PyArg_ParseTuple(args, "s#:write", &cp, &size)) { return NULL; } Py_BEGIN_ALLOW_THREADS rv = write(self->fd, cp, size); Py_END_ALLOW_THREADS if (rv == -1) { return PyErr_SetFromErrno(PyExc_IOError); } else { self->ocount += rv; } return PyInt_FromLong(rv); } static PyObject * oss_writeall(oss_audio_t *self, PyObject *args) { char *cp; int rv, size; fd_set write_set_fds; int select_rv; /* NB. writeall() is only useful in non-blocking mode: according to Guenter Geiger on the linux-audio-dev list (http://eca.cx/lad/2002/11/0380.html), OSS guarantees that write() in blocking mode consumes the whole buffer. In blocking mode, the behaviour of write() and writeall() from Python is indistinguishable. */ if (!PyArg_ParseTuple(args, "s#:write", &cp, &size)) return NULL; /* use select to wait for audio device to be available */ FD_ZERO(&write_set_fds); FD_SET(self->fd, &write_set_fds); while (size > 0) { Py_BEGIN_ALLOW_THREADS select_rv = select(self->fd+1, NULL, &write_set_fds, NULL, NULL); Py_END_ALLOW_THREADS assert(select_rv != 0); /* no timeout, can't expire */ if (select_rv == -1) return PyErr_SetFromErrno(PyExc_IOError); Py_BEGIN_ALLOW_THREADS rv = write(self->fd, cp, size); Py_END_ALLOW_THREADS if (rv == -1) { if (errno == EAGAIN) { /* buffer is full, try again */ errno = 0; continue; } else /* it's a real error */ return PyErr_SetFromErrno(PyExc_IOError); } else { /* wrote rv bytes */ self->ocount += rv; size -= rv; cp += rv; } } Py_INCREF(Py_None); return Py_None; } static PyObject * oss_close(oss_audio_t *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":close")) return NULL; if (self->fd >= 0) { Py_BEGIN_ALLOW_THREADS close(self->fd); Py_END_ALLOW_THREADS self->fd = -1; } Py_INCREF(Py_None); return Py_None; } static PyObject * oss_fileno(oss_audio_t *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":fileno")) return NULL; return PyInt_FromLong(self->fd); } /* Convenience methods: these generally wrap a couple of ioctls into one common task. */ static PyObject * oss_setparameters(oss_audio_t *self, PyObject *args) { int wanted_fmt, wanted_channels, wanted_rate, strict=0; int fmt, channels, rate; PyObject * rv; /* return tuple (fmt, channels, rate) */ if (!PyArg_ParseTuple(args, "iii|i:setparameters", &wanted_fmt, &wanted_channels, &wanted_rate, &strict)) return NULL; fmt = wanted_fmt; if (ioctl(self->fd, SNDCTL_DSP_SETFMT, &fmt) == -1) { return PyErr_SetFromErrno(PyExc_IOError); } if (strict && fmt != wanted_fmt) { return PyErr_Format (OSSAudioError, "unable to set requested format (wanted %d, got %d)", wanted_fmt, fmt); } channels = wanted_channels; if (ioctl(self->fd, SNDCTL_DSP_CHANNELS, &channels) == -1) { return PyErr_SetFromErrno(PyExc_IOError); } if (strict && channels != wanted_channels) { return PyErr_Format (OSSAudioError, "unable to set requested channels (wanted %d, got %d)", wanted_channels, channels); } rate = wanted_rate; if (ioctl(self->fd, SNDCTL_DSP_SPEED, &rate) == -1) { return PyErr_SetFromErrno(PyExc_IOError); } if (strict && rate != wanted_rate) { return PyErr_Format (OSSAudioError, "unable to set requested rate (wanted %d, got %d)", wanted_rate, rate); } /* Construct the return value: a (fmt, channels, rate) tuple that tells what the audio hardware was actually set to. */ rv = PyTuple_New(3); if (rv == NULL) return NULL; PyTuple_SET_ITEM(rv, 0, PyInt_FromLong(fmt)); PyTuple_SET_ITEM(rv, 1, PyInt_FromLong(channels)); PyTuple_SET_ITEM(rv, 2, PyInt_FromLong(rate)); return rv; } static int _ssize(oss_audio_t *self, int *nchannels, int *ssize) { int fmt; fmt = 0; if (ioctl(self->fd, SNDCTL_DSP_SETFMT, &fmt) < 0) return -errno; switch (fmt) { case AFMT_MU_LAW: case AFMT_A_LAW: case AFMT_U8: case AFMT_S8: *ssize = 1; /* 8 bit formats: 1 byte */ break; case AFMT_S16_LE: case AFMT_S16_BE: case AFMT_U16_LE: case AFMT_U16_BE: *ssize = 2; /* 16 bit formats: 2 byte */ break; case AFMT_MPEG: case AFMT_IMA_ADPCM: default: return -EOPNOTSUPP; } *nchannels = 0; if (ioctl(self->fd, SNDCTL_DSP_CHANNELS, nchannels) < 0) return -errno; return 0; } /* bufsize returns the size of the hardware audio buffer in number of samples */ static PyObject * oss_bufsize(oss_audio_t *self, PyObject *args) { audio_buf_info ai; int nchannels, ssize; if (!PyArg_ParseTuple(args, ":bufsize")) return NULL; if (_ssize(self, &nchannels, &ssize) < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } if (ioctl(self->fd, SNDCTL_DSP_GETOSPACE, &ai) < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyInt_FromLong((ai.fragstotal * ai.fragsize) / (nchannels * ssize)); } /* obufcount returns the number of samples that are available in the hardware for playing */ static PyObject * oss_obufcount(oss_audio_t *self, PyObject *args) { audio_buf_info ai; int nchannels, ssize; if (!PyArg_ParseTuple(args, ":obufcount")) return NULL; if (_ssize(self, &nchannels, &ssize) < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } if (ioctl(self->fd, SNDCTL_DSP_GETOSPACE, &ai) < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyInt_FromLong((ai.fragstotal * ai.fragsize - ai.bytes) / (ssize * nchannels)); } /* obufcount returns the number of samples that can be played without blocking */ static PyObject * oss_obuffree(oss_audio_t *self, PyObject *args) { audio_buf_info ai; int nchannels, ssize; if (!PyArg_ParseTuple(args, ":obuffree")) return NULL; if (_ssize(self, &nchannels, &ssize) < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } if (ioctl(self->fd, SNDCTL_DSP_GETOSPACE, &ai) < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyInt_FromLong(ai.bytes / (ssize * nchannels)); } static PyObject * oss_getptr(oss_audio_t *self, PyObject *args) { count_info info; int req; if (!PyArg_ParseTuple(args, ":getptr")) return NULL; if (self->mode == O_RDONLY) req = SNDCTL_DSP_GETIPTR; else req = SNDCTL_DSP_GETOPTR; if (ioctl(self->fd, req, &info) == -1) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return Py_BuildValue("iii", info.bytes, info.blocks, info.ptr); } /* ---------------------------------------------------------------------- * Methods of mixer objects (OSSMixerType) */ static PyObject * oss_mixer_close(oss_mixer_t *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":close")) return NULL; if (self->fd >= 0) { close(self->fd); self->fd = -1; } Py_INCREF(Py_None); return Py_None; } static PyObject * oss_mixer_fileno(oss_mixer_t *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":fileno")) return NULL; return PyInt_FromLong(self->fd); } /* Simple mixer interface methods */ static PyObject * oss_mixer_controls(oss_mixer_t *self, PyObject *args) { return _do_ioctl_1_internal(self->fd, args, "controls", SOUND_MIXER_READ_DEVMASK); } static PyObject * oss_mixer_stereocontrols(oss_mixer_t *self, PyObject *args) { return _do_ioctl_1_internal(self->fd, args, "stereocontrols", SOUND_MIXER_READ_STEREODEVS); } static PyObject * oss_mixer_reccontrols(oss_mixer_t *self, PyObject *args) { return _do_ioctl_1_internal(self->fd, args, "reccontrols", SOUND_MIXER_READ_RECMASK); } static PyObject * oss_mixer_get(oss_mixer_t *self, PyObject *args) { int channel, volume; /* Can't use _do_ioctl_1 because of encoded arg thingy. */ if (!PyArg_ParseTuple(args, "i:get", &channel)) return NULL; if (channel < 0 || channel > SOUND_MIXER_NRDEVICES) { PyErr_SetString(OSSAudioError, "Invalid mixer channel specified."); return NULL; } if (ioctl(self->fd, MIXER_READ(channel), &volume) == -1) return PyErr_SetFromErrno(PyExc_IOError); return Py_BuildValue("(ii)", volume & 0xff, (volume & 0xff00) >> 8); } static PyObject * oss_mixer_set(oss_mixer_t *self, PyObject *args) { int channel, volume, leftVol, rightVol; /* Can't use _do_ioctl_1 because of encoded arg thingy. */ if (!PyArg_ParseTuple(args, "i(ii):set", &channel, &leftVol, &rightVol)) return NULL; if (channel < 0 || channel > SOUND_MIXER_NRDEVICES) { PyErr_SetString(OSSAudioError, "Invalid mixer channel specified."); return NULL; } if (leftVol < 0 || rightVol < 0 || leftVol > 100 || rightVol > 100) { PyErr_SetString(OSSAudioError, "Volumes must be between 0 and 100."); return NULL; } volume = (rightVol << 8) | leftVol; if (ioctl(self->fd, MIXER_WRITE(channel), &volume) == -1) return PyErr_SetFromErrno(PyExc_IOError); return Py_BuildValue("(ii)", volume & 0xff, (volume & 0xff00) >> 8); } static PyObject * oss_mixer_get_recsrc(oss_mixer_t *self, PyObject *args) { return _do_ioctl_1_internal(self->fd, args, "get_recsrc", SOUND_MIXER_READ_RECSRC); } static PyObject * oss_mixer_set_recsrc(oss_mixer_t *self, PyObject *args) { return _do_ioctl_1(self->fd, args, "set_recsrc", SOUND_MIXER_WRITE_RECSRC); } /* ---------------------------------------------------------------------- * Method tables and other bureaucracy */ static PyMethodDef oss_methods[] = { /* Regular file methods */ { "read", (PyCFunction)oss_read, METH_VARARGS }, { "write", (PyCFunction)oss_write, METH_VARARGS }, { "writeall", (PyCFunction)oss_writeall, METH_VARARGS }, { "close", (PyCFunction)oss_close, METH_VARARGS }, { "fileno", (PyCFunction)oss_fileno, METH_VARARGS }, /* Simple ioctl wrappers */ { "nonblock", (PyCFunction)oss_nonblock, METH_VARARGS }, { "setfmt", (PyCFunction)oss_setfmt, METH_VARARGS }, { "getfmts", (PyCFunction)oss_getfmts, METH_VARARGS }, { "channels", (PyCFunction)oss_channels, METH_VARARGS }, { "speed", (PyCFunction)oss_speed, METH_VARARGS }, { "sync", (PyCFunction)oss_sync, METH_VARARGS }, { "reset", (PyCFunction)oss_reset, METH_VARARGS }, { "post", (PyCFunction)oss_post, METH_VARARGS }, /* Convenience methods -- wrap a couple of ioctls together */ { "setparameters", (PyCFunction)oss_setparameters, METH_VARARGS }, { "bufsize", (PyCFunction)oss_bufsize, METH_VARARGS }, { "obufcount", (PyCFunction)oss_obufcount, METH_VARARGS }, { "obuffree", (PyCFunction)oss_obuffree, METH_VARARGS }, { "getptr", (PyCFunction)oss_getptr, METH_VARARGS }, /* Aliases for backwards compatibility */ { "flush", (PyCFunction)oss_sync, METH_VARARGS }, { NULL, NULL} /* sentinel */ }; static PyMethodDef oss_mixer_methods[] = { /* Regular file method - OSS mixers are ioctl-only interface */ { "close", (PyCFunction)oss_mixer_close, METH_VARARGS }, { "fileno", (PyCFunction)oss_mixer_fileno, METH_VARARGS }, /* Simple ioctl wrappers */ { "controls", (PyCFunction)oss_mixer_controls, METH_VARARGS }, { "stereocontrols", (PyCFunction)oss_mixer_stereocontrols, METH_VARARGS}, { "reccontrols", (PyCFunction)oss_mixer_reccontrols, METH_VARARGS}, { "get", (PyCFunction)oss_mixer_get, METH_VARARGS }, { "set", (PyCFunction)oss_mixer_set, METH_VARARGS }, { "get_recsrc", (PyCFunction)oss_mixer_get_recsrc, METH_VARARGS }, { "set_recsrc", (PyCFunction)oss_mixer_set_recsrc, METH_VARARGS }, { NULL, NULL} }; static PyObject * oss_getattr(oss_audio_t *self, char *name) { return Py_FindMethod(oss_methods, (PyObject *)self, name); } static PyObject * oss_mixer_getattr(oss_mixer_t *self, char *name) { return Py_FindMethod(oss_mixer_methods, (PyObject *)self, name); } static PyTypeObject OSSAudioType = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "ossaudiodev.oss_audio_device", /*tp_name*/ sizeof(oss_audio_t), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)oss_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)oss_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyTypeObject OSSMixerType = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "ossaudiodev.oss_mixer_device", /*tp_name*/ sizeof(oss_mixer_t), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)oss_mixer_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)oss_mixer_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyObject * ossopen(PyObject *self, PyObject *args) { return (PyObject *)newossobject(args); } static PyObject * ossopenmixer(PyObject *self, PyObject *args) { return (PyObject *)newossmixerobject(args); } static PyMethodDef ossaudiodev_methods[] = { { "open", ossopen, METH_VARARGS }, { "openmixer", ossopenmixer, METH_VARARGS }, { 0, 0 }, }; #define _EXPORT_INT(mod, name) \ if (PyModule_AddIntConstant(mod, #name, (long) (name)) == -1) return; static char *control_labels[] = SOUND_DEVICE_LABELS; static char *control_names[] = SOUND_DEVICE_NAMES; static int build_namelists (PyObject *module) { PyObject *labels; PyObject *names; PyObject *s; int num_controls; int i; num_controls = sizeof(control_labels) / sizeof(control_labels[0]); assert(num_controls == sizeof(control_names) / sizeof(control_names[0])); labels = PyList_New(num_controls); names = PyList_New(num_controls); for (i = 0; i < num_controls; i++) { s = PyString_FromString(control_labels[i]); if (s == NULL) return -1; PyList_SET_ITEM(labels, i, s); s = PyString_FromString(control_names[i]); if (s == NULL) return -1; PyList_SET_ITEM(names, i, s); } if (PyModule_AddObject(module, "control_labels", labels) == -1) return -1; if (PyModule_AddObject(module, "control_names", names) == -1) return -1; return 0; } void initossaudiodev(void) { PyObject *m; m = Py_InitModule("ossaudiodev", ossaudiodev_methods); OSSAudioError = PyErr_NewException("ossaudiodev.OSSAudioError", NULL, NULL); if (OSSAudioError) { /* Each call to PyModule_AddObject decrefs it; compensate: */ Py_INCREF(OSSAudioError); Py_INCREF(OSSAudioError); PyModule_AddObject(m, "error", OSSAudioError); PyModule_AddObject(m, "OSSAudioError", OSSAudioError); } /* Build 'control_labels' and 'control_names' lists and add them to the module. */ if (build_namelists(m) == -1) /* XXX what to do here? */ return; /* Expose the audio format numbers -- essential! */ _EXPORT_INT(m, AFMT_QUERY); _EXPORT_INT(m, AFMT_MU_LAW); _EXPORT_INT(m, AFMT_A_LAW); _EXPORT_INT(m, AFMT_IMA_ADPCM); _EXPORT_INT(m, AFMT_U8); _EXPORT_INT(m, AFMT_S16_LE); _EXPORT_INT(m, AFMT_S16_BE); _EXPORT_INT(m, AFMT_S8); _EXPORT_INT(m, AFMT_U16_LE); _EXPORT_INT(m, AFMT_U16_BE); _EXPORT_INT(m, AFMT_MPEG); #ifdef AFMT_AC3 _EXPORT_INT(m, AFMT_AC3); #endif #ifdef AFMT_S16_NE _EXPORT_INT(m, AFMT_S16_NE); #endif /* Expose the sound mixer device numbers. */ _EXPORT_INT(m, SOUND_MIXER_NRDEVICES); _EXPORT_INT(m, SOUND_MIXER_VOLUME); _EXPORT_INT(m, SOUND_MIXER_BASS); _EXPORT_INT(m, SOUND_MIXER_TREBLE); _EXPORT_INT(m, SOUND_MIXER_SYNTH); _EXPORT_INT(m, SOUND_MIXER_PCM); _EXPORT_INT(m, SOUND_MIXER_SPEAKER); _EXPORT_INT(m, SOUND_MIXER_LINE); _EXPORT_INT(m, SOUND_MIXER_MIC); _EXPORT_INT(m, SOUND_MIXER_CD); _EXPORT_INT(m, SOUND_MIXER_IMIX); _EXPORT_INT(m, SOUND_MIXER_ALTPCM); _EXPORT_INT(m, SOUND_MIXER_RECLEV); _EXPORT_INT(m, SOUND_MIXER_IGAIN); _EXPORT_INT(m, SOUND_MIXER_OGAIN); _EXPORT_INT(m, SOUND_MIXER_LINE1); _EXPORT_INT(m, SOUND_MIXER_LINE2); _EXPORT_INT(m, SOUND_MIXER_LINE3); #ifdef SOUND_MIXER_DIGITAL1 _EXPORT_INT(m, SOUND_MIXER_DIGITAL1); #endif #ifdef SOUND_MIXER_DIGITAL2 _EXPORT_INT(m, SOUND_MIXER_DIGITAL2); #endif #ifdef SOUND_MIXER_DIGITAL3 _EXPORT_INT(m, SOUND_MIXER_DIGITAL3); #endif #ifdef SOUND_MIXER_PHONEIN _EXPORT_INT(m, SOUND_MIXER_PHONEIN); #endif #ifdef SOUND_MIXER_PHONEOUT _EXPORT_INT(m, SOUND_MIXER_PHONEOUT); #endif #ifdef SOUND_MIXER_VIDEO _EXPORT_INT(m, SOUND_MIXER_VIDEO); #endif #ifdef SOUND_MIXER_RADIO _EXPORT_INT(m, SOUND_MIXER_RADIO); #endif #ifdef SOUND_MIXER_MONITOR _EXPORT_INT(m, SOUND_MIXER_MONITOR); #endif /* Expose all the ioctl numbers for masochists who like to do this stuff directly. */ _EXPORT_INT(m, SNDCTL_COPR_HALT); _EXPORT_INT(m, SNDCTL_COPR_LOAD); _EXPORT_INT(m, SNDCTL_COPR_RCODE); _EXPORT_INT(m, SNDCTL_COPR_RCVMSG); _EXPORT_INT(m, SNDCTL_COPR_RDATA); _EXPORT_INT(m, SNDCTL_COPR_RESET); _EXPORT_INT(m, SNDCTL_COPR_RUN); _EXPORT_INT(m, SNDCTL_COPR_SENDMSG); _EXPORT_INT(m, SNDCTL_COPR_WCODE); _EXPORT_INT(m, SNDCTL_COPR_WDATA); #ifdef SNDCTL_DSP_BIND_CHANNEL _EXPORT_INT(m, SNDCTL_DSP_BIND_CHANNEL); #endif _EXPORT_INT(m, SNDCTL_DSP_CHANNELS); _EXPORT_INT(m, SNDCTL_DSP_GETBLKSIZE); _EXPORT_INT(m, SNDCTL_DSP_GETCAPS); #ifdef SNDCTL_DSP_GETCHANNELMASK _EXPORT_INT(m, SNDCTL_DSP_GETCHANNELMASK); #endif _EXPORT_INT(m, SNDCTL_DSP_GETFMTS); _EXPORT_INT(m, SNDCTL_DSP_GETIPTR); _EXPORT_INT(m, SNDCTL_DSP_GETISPACE); #ifdef SNDCTL_DSP_GETODELAY _EXPORT_INT(m, SNDCTL_DSP_GETODELAY); #endif _EXPORT_INT(m, SNDCTL_DSP_GETOPTR); _EXPORT_INT(m, SNDCTL_DSP_GETOSPACE); #ifdef SNDCTL_DSP_GETSPDIF _EXPORT_INT(m, SNDCTL_DSP_GETSPDIF); #endif _EXPORT_INT(m, SNDCTL_DSP_GETTRIGGER); _EXPORT_INT(m, SNDCTL_DSP_MAPINBUF); _EXPORT_INT(m, SNDCTL_DSP_MAPOUTBUF); _EXPORT_INT(m, SNDCTL_DSP_NONBLOCK); _EXPORT_INT(m, SNDCTL_DSP_POST); #ifdef SNDCTL_DSP_PROFILE _EXPORT_INT(m, SNDCTL_DSP_PROFILE); #endif _EXPORT_INT(m, SNDCTL_DSP_RESET); _EXPORT_INT(m, SNDCTL_DSP_SAMPLESIZE); _EXPORT_INT(m, SNDCTL_DSP_SETDUPLEX); _EXPORT_INT(m, SNDCTL_DSP_SETFMT); _EXPORT_INT(m, SNDCTL_DSP_SETFRAGMENT); #ifdef SNDCTL_DSP_SETSPDIF _EXPORT_INT(m, SNDCTL_DSP_SETSPDIF); #endif _EXPORT_INT(m, SNDCTL_DSP_SETSYNCRO); _EXPORT_INT(m, SNDCTL_DSP_SETTRIGGER); _EXPORT_INT(m, SNDCTL_DSP_SPEED); _EXPORT_INT(m, SNDCTL_DSP_STEREO); _EXPORT_INT(m, SNDCTL_DSP_SUBDIVIDE); _EXPORT_INT(m, SNDCTL_DSP_SYNC); _EXPORT_INT(m, SNDCTL_FM_4OP_ENABLE); _EXPORT_INT(m, SNDCTL_FM_LOAD_INSTR); _EXPORT_INT(m, SNDCTL_MIDI_INFO); _EXPORT_INT(m, SNDCTL_MIDI_MPUCMD); _EXPORT_INT(m, SNDCTL_MIDI_MPUMODE); _EXPORT_INT(m, SNDCTL_MIDI_PRETIME); _EXPORT_INT(m, SNDCTL_SEQ_CTRLRATE); _EXPORT_INT(m, SNDCTL_SEQ_GETINCOUNT); _EXPORT_INT(m, SNDCTL_SEQ_GETOUTCOUNT); #ifdef SNDCTL_SEQ_GETTIME _EXPORT_INT(m, SNDCTL_SEQ_GETTIME); #endif _EXPORT_INT(m, SNDCTL_SEQ_NRMIDIS); _EXPORT_INT(m, SNDCTL_SEQ_NRSYNTHS); _EXPORT_INT(m, SNDCTL_SEQ_OUTOFBAND); _EXPORT_INT(m, SNDCTL_SEQ_PANIC); _EXPORT_INT(m, SNDCTL_SEQ_PERCMODE); _EXPORT_INT(m, SNDCTL_SEQ_RESET); _EXPORT_INT(m, SNDCTL_SEQ_RESETSAMPLES); _EXPORT_INT(m, SNDCTL_SEQ_SYNC); _EXPORT_INT(m, SNDCTL_SEQ_TESTMIDI); _EXPORT_INT(m, SNDCTL_SEQ_THRESHOLD); #ifdef SNDCTL_SYNTH_CONTROL _EXPORT_INT(m, SNDCTL_SYNTH_CONTROL); #endif #ifdef SNDCTL_SYNTH_ID _EXPORT_INT(m, SNDCTL_SYNTH_ID); #endif _EXPORT_INT(m, SNDCTL_SYNTH_INFO); _EXPORT_INT(m, SNDCTL_SYNTH_MEMAVL); #ifdef SNDCTL_SYNTH_REMOVESAMPLE _EXPORT_INT(m, SNDCTL_SYNTH_REMOVESAMPLE); #endif _EXPORT_INT(m, SNDCTL_TMR_CONTINUE); _EXPORT_INT(m, SNDCTL_TMR_METRONOME); _EXPORT_INT(m, SNDCTL_TMR_SELECT); _EXPORT_INT(m, SNDCTL_TMR_SOURCE); _EXPORT_INT(m, SNDCTL_TMR_START); _EXPORT_INT(m, SNDCTL_TMR_STOP); _EXPORT_INT(m, SNDCTL_TMR_TEMPO); _EXPORT_INT(m, SNDCTL_TMR_TIMEBASE); } Python-2.3.7/Modules/_codecsmodule.c0000644001241000117560000004711107620012747016642 0ustar loewishpifb6/* ------------------------------------------------------------------------ _codecs -- Provides access to the codec registry and the builtin codecs. This module should never be imported directly. The standard library module "codecs" wraps this builtin module for use within Python. The codec registry is accessible via: register(search_function) -> None lookup(encoding) -> (encoder, decoder, stream_reader, stream_writer) The builtin Unicode codecs use the following interface: _encode(Unicode_object[,errors='strict']) -> (string object, bytes consumed) _decode(char_buffer_obj[,errors='strict']) -> (Unicode object, bytes consumed) _encode() interfaces also accept non-Unicode object as input. The objects are then converted to Unicode using PyUnicode_FromObject() prior to applying the conversion. These s are available: utf_8, unicode_escape, raw_unicode_escape, unicode_internal, latin_1, ascii (7-bit), mbcs (on win32). Written by Marc-Andre Lemburg (mal@lemburg.com). Copyright (c) Corporation for National Research Initiatives. ------------------------------------------------------------------------ */ #include "Python.h" /* --- Registry ----------------------------------------------------------- */ PyDoc_STRVAR(register__doc__, "register(search_function)\n\ \n\ Register a codec search function. Search functions are expected to take\n\ one argument, the encoding name in all lower case letters, and return\n\ a tuple of functions (encoder, decoder, stream_reader, stream_writer)."); static PyObject *codecregister(PyObject *self, PyObject *args) { PyObject *search_function; if (!PyArg_ParseTuple(args, "O:register", &search_function)) goto onError; if (PyCodec_Register(search_function)) goto onError; Py_INCREF(Py_None); return Py_None; onError: return NULL; } PyDoc_STRVAR(lookup__doc__, "lookup(encoding) -> (encoder, decoder, stream_reader, stream_writer)\n\ \n\ Looks up a codec tuple in the Python codec registry and returns\n\ a tuple of functions."); static PyObject *codeclookup(PyObject *self, PyObject *args) { char *encoding; if (!PyArg_ParseTuple(args, "s:lookup", &encoding)) goto onError; return _PyCodec_Lookup(encoding); onError: return NULL; } /* --- Helpers ------------------------------------------------------------ */ static PyObject *codec_tuple(PyObject *unicode, int len) { PyObject *v,*w; if (unicode == NULL) return NULL; v = PyTuple_New(2); if (v == NULL) { Py_DECREF(unicode); return NULL; } PyTuple_SET_ITEM(v,0,unicode); w = PyInt_FromLong(len); if (w == NULL) { Py_DECREF(v); return NULL; } PyTuple_SET_ITEM(v,1,w); return v; } /* --- String codecs ------------------------------------------------------ */ static PyObject * escape_decode(PyObject *self, PyObject *args) { const char *errors = NULL; const char *data; int size; if (!PyArg_ParseTuple(args, "s#|z:escape_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyString_DecodeEscape(data, size, errors, 0, NULL), size); } static PyObject * escape_encode(PyObject *self, PyObject *args) { PyObject *str; const char *errors = NULL; char *buf; int len; if (!PyArg_ParseTuple(args, "O!|z:escape_encode", &PyString_Type, &str, &errors)) return NULL; str = PyString_Repr(str, 0); if (!str) return NULL; /* The string will be quoted. Unquote, similar to unicode-escape. */ buf = PyString_AS_STRING (str); len = PyString_GET_SIZE (str); memmove(buf, buf+1, len-2); _PyString_Resize(&str, len-2); return codec_tuple(str, PyString_Size(str)); } #ifdef Py_USING_UNICODE /* --- Decoder ------------------------------------------------------------ */ static PyObject * unicode_internal_decode(PyObject *self, PyObject *args) { PyObject *obj; const char *errors = NULL; const char *data; int size; if (!PyArg_ParseTuple(args, "O|z:unicode_internal_decode", &obj, &errors)) return NULL; if (PyUnicode_Check(obj)) { Py_INCREF(obj); return codec_tuple(obj, PyUnicode_GET_SIZE(obj)); } else { if (PyObject_AsReadBuffer(obj, (const void **)&data, &size)) return NULL; return codec_tuple(PyUnicode_FromUnicode((Py_UNICODE *)data, size / sizeof(Py_UNICODE)), size); } } static PyObject * utf_7_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:utf_7_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeUTF7(data, size, errors), size); } static PyObject * utf_8_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:utf_8_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeUTF8(data, size, errors), size); } static PyObject * utf_16_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; int byteorder = 0; if (!PyArg_ParseTuple(args, "t#|z:utf_16_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeUTF16(data, size, errors, &byteorder), size); } static PyObject * utf_16_le_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; int byteorder = -1; if (!PyArg_ParseTuple(args, "t#|z:utf_16_le_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeUTF16(data, size, errors, &byteorder), size); } static PyObject * utf_16_be_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; int byteorder = 1; if (!PyArg_ParseTuple(args, "t#|z:utf_16_be_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeUTF16(data, size, errors, &byteorder), size); } /* This non-standard version also provides access to the byteorder parameter of the builtin UTF-16 codec. It returns a tuple (unicode, bytesread, byteorder) with byteorder being the value in effect at the end of data. */ static PyObject * utf_16_ex_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; int byteorder = 0; PyObject *unicode, *tuple; if (!PyArg_ParseTuple(args, "t#|zi:utf_16_ex_decode", &data, &size, &errors, &byteorder)) return NULL; unicode = PyUnicode_DecodeUTF16(data, size, errors, &byteorder); if (unicode == NULL) return NULL; tuple = Py_BuildValue("Oii", unicode, size, byteorder); Py_DECREF(unicode); return tuple; } static PyObject * unicode_escape_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:unicode_escape_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeUnicodeEscape(data, size, errors), size); } static PyObject * raw_unicode_escape_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:raw_unicode_escape_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeRawUnicodeEscape(data, size, errors), size); } static PyObject * latin_1_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:latin_1_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeLatin1(data, size, errors), size); } static PyObject * ascii_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:ascii_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeASCII(data, size, errors), size); } static PyObject * charmap_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; PyObject *mapping = NULL; if (!PyArg_ParseTuple(args, "t#|zO:charmap_decode", &data, &size, &errors, &mapping)) return NULL; if (mapping == Py_None) mapping = NULL; return codec_tuple(PyUnicode_DecodeCharmap(data, size, mapping, errors), size); } #if defined(MS_WINDOWS) && defined(HAVE_USABLE_WCHAR_T) static PyObject * mbcs_decode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:mbcs_decode", &data, &size, &errors)) return NULL; return codec_tuple(PyUnicode_DecodeMBCS(data, size, errors), size); } #endif /* MS_WINDOWS */ /* --- Encoder ------------------------------------------------------------ */ static PyObject * readbuffer_encode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "s#|z:readbuffer_encode", &data, &size, &errors)) return NULL; return codec_tuple(PyString_FromStringAndSize(data, size), size); } static PyObject * charbuffer_encode(PyObject *self, PyObject *args) { const char *data; int size; const char *errors = NULL; if (!PyArg_ParseTuple(args, "t#|z:charbuffer_encode", &data, &size, &errors)) return NULL; return codec_tuple(PyString_FromStringAndSize(data, size), size); } static PyObject * unicode_internal_encode(PyObject *self, PyObject *args) { PyObject *obj; const char *errors = NULL; const char *data; int size; if (!PyArg_ParseTuple(args, "O|z:unicode_internal_encode", &obj, &errors)) return NULL; if (PyUnicode_Check(obj)) { data = PyUnicode_AS_DATA(obj); size = PyUnicode_GET_DATA_SIZE(obj); return codec_tuple(PyString_FromStringAndSize(data, size), size); } else { if (PyObject_AsReadBuffer(obj, (const void **)&data, &size)) return NULL; return codec_tuple(PyString_FromStringAndSize(data, size), size); } } static PyObject * utf_7_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:utf_7_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeUTF7(PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), 0, 0, errors), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * utf_8_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:utf_8_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeUTF8(PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), errors), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } /* This version provides access to the byteorder parameter of the builtin UTF-16 codecs as optional third argument. It defaults to 0 which means: use the native byte order and prepend the data with a BOM mark. */ static PyObject * utf_16_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; int byteorder = 0; if (!PyArg_ParseTuple(args, "O|zi:utf_16_encode", &str, &errors, &byteorder)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeUTF16(PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), errors, byteorder), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * utf_16_le_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:utf_16_le_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeUTF16(PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), errors, -1), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * utf_16_be_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:utf_16_be_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeUTF16(PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), errors, +1), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * unicode_escape_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:unicode_escape_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeUnicodeEscape(PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str)), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * raw_unicode_escape_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:raw_unicode_escape_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeRawUnicodeEscape( PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str)), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * latin_1_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:latin_1_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeLatin1( PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), errors), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * ascii_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:ascii_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeASCII( PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), errors), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } static PyObject * charmap_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; PyObject *mapping = NULL; if (!PyArg_ParseTuple(args, "O|zO:charmap_encode", &str, &errors, &mapping)) return NULL; if (mapping == Py_None) mapping = NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeCharmap( PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), mapping, errors), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } #if defined(MS_WINDOWS) && defined(HAVE_USABLE_WCHAR_T) static PyObject * mbcs_encode(PyObject *self, PyObject *args) { PyObject *str, *v; const char *errors = NULL; if (!PyArg_ParseTuple(args, "O|z:mbcs_encode", &str, &errors)) return NULL; str = PyUnicode_FromObject(str); if (str == NULL) return NULL; v = codec_tuple(PyUnicode_EncodeMBCS( PyUnicode_AS_UNICODE(str), PyUnicode_GET_SIZE(str), errors), PyUnicode_GET_SIZE(str)); Py_DECREF(str); return v; } #endif /* MS_WINDOWS */ #endif /* Py_USING_UNICODE */ /* --- Error handler registry --------------------------------------------- */ PyDoc_STRVAR(register_error__doc__, "register_error(errors, handler)\n\ \n\ Register the specified error handler under the name\n\ errors. handler must be a callable object, that\n\ will be called with an exception instance containing\n\ information about the location of the encoding/decoding\n\ error and must return a (replacement, new position) tuple."); static PyObject *register_error(PyObject *self, PyObject *args) { const char *name; PyObject *handler; if (!PyArg_ParseTuple(args, "sO:register_error", &name, &handler)) return NULL; if (PyCodec_RegisterError(name, handler)) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(lookup_error__doc__, "lookup_error(errors) -> handler\n\ \n\ Return the error handler for the specified error handling name\n\ or raise a LookupError, if no handler exists under this name."); static PyObject *lookup_error(PyObject *self, PyObject *args) { const char *name; if (!PyArg_ParseTuple(args, "s:lookup_error", &name)) return NULL; return PyCodec_LookupError(name); } /* --- Module API --------------------------------------------------------- */ static PyMethodDef _codecs_functions[] = { {"register", codecregister, METH_VARARGS, register__doc__}, {"lookup", codeclookup, METH_VARARGS, lookup__doc__}, {"escape_encode", escape_encode, METH_VARARGS}, {"escape_decode", escape_decode, METH_VARARGS}, #ifdef Py_USING_UNICODE {"utf_8_encode", utf_8_encode, METH_VARARGS}, {"utf_8_decode", utf_8_decode, METH_VARARGS}, {"utf_7_encode", utf_7_encode, METH_VARARGS}, {"utf_7_decode", utf_7_decode, METH_VARARGS}, {"utf_16_encode", utf_16_encode, METH_VARARGS}, {"utf_16_le_encode", utf_16_le_encode, METH_VARARGS}, {"utf_16_be_encode", utf_16_be_encode, METH_VARARGS}, {"utf_16_decode", utf_16_decode, METH_VARARGS}, {"utf_16_le_decode", utf_16_le_decode, METH_VARARGS}, {"utf_16_be_decode", utf_16_be_decode, METH_VARARGS}, {"utf_16_ex_decode", utf_16_ex_decode, METH_VARARGS}, {"unicode_escape_encode", unicode_escape_encode, METH_VARARGS}, {"unicode_escape_decode", unicode_escape_decode, METH_VARARGS}, {"unicode_internal_encode", unicode_internal_encode, METH_VARARGS}, {"unicode_internal_decode", unicode_internal_decode, METH_VARARGS}, {"raw_unicode_escape_encode", raw_unicode_escape_encode, METH_VARARGS}, {"raw_unicode_escape_decode", raw_unicode_escape_decode, METH_VARARGS}, {"latin_1_encode", latin_1_encode, METH_VARARGS}, {"latin_1_decode", latin_1_decode, METH_VARARGS}, {"ascii_encode", ascii_encode, METH_VARARGS}, {"ascii_decode", ascii_decode, METH_VARARGS}, {"charmap_encode", charmap_encode, METH_VARARGS}, {"charmap_decode", charmap_decode, METH_VARARGS}, {"readbuffer_encode", readbuffer_encode, METH_VARARGS}, {"charbuffer_encode", charbuffer_encode, METH_VARARGS}, #if defined(MS_WINDOWS) && defined(HAVE_USABLE_WCHAR_T) {"mbcs_encode", mbcs_encode, METH_VARARGS}, {"mbcs_decode", mbcs_decode, METH_VARARGS}, #endif #endif /* Py_USING_UNICODE */ {"register_error", register_error, METH_VARARGS, register_error__doc__}, {"lookup_error", lookup_error, METH_VARARGS, lookup_error__doc__}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC init_codecs(void) { Py_InitModule("_codecs", _codecs_functions); } Python-2.3.7/Modules/fpectlmodule.c0000644001241000117560000002422607654704216016530 0ustar loewishpifb6/* --------------------------------------------------------------------- / Copyright (c) 1996. \ | The Regents of the University of California. | | All rights reserved. | | | | Permission to use, copy, modify, and distribute this software for | | any purpose without fee is hereby granted, provided that this en- | | tire notice is included in all copies of any software which is or | | includes a copy or modification of this software and in all | | copies of the supporting documentation for such software. | | | | This work was produced at the University of California, Lawrence | | Livermore National Laboratory under contract no. W-7405-ENG-48 | | between the U.S. Department of Energy and The Regents of the | | University of California for the operation of UC LLNL. | | | | DISCLAIMER | | | | This software was prepared as an account of work sponsored by an | | agency of the United States Government. Neither the United States | | Government nor the University of California nor any of their em- | | ployees, makes any warranty, express or implied, or assumes any | | liability or responsibility for the accuracy, completeness, or | | usefulness of any information, apparatus, product, or process | | disclosed, or represents that its use would not infringe | | privately-owned rights. Reference herein to any specific commer- | | cial products, process, or service by trade name, trademark, | | manufacturer, or otherwise, does not necessarily constitute or | | imply its endorsement, recommendation, or favoring by the United | | States Government or the University of California. The views and | | opinions of authors expressed herein do not necessarily state or | | reflect those of the United States Government or the University | | of California, and shall not be used for advertising or product | \ endorsement purposes. / --------------------------------------------------------------------- */ /* Floating point exception control module. This Python module provides bare-bones control over floating point units from several hardware manufacturers. Specifically, it allows the user to turn on the generation of SIGFPE whenever any of the three serious IEEE 754 exceptions (Division by Zero, Overflow, Invalid Operation) occurs. We currently ignore Underflow and Inexact Result exceptions, although those could certainly be added if desired. The module also establishes a signal handler for SIGFPE during initialization. This builds on code found in the Python distribution at Include/pyfpe.h and Python/pyfpe.c. If those files are not in your Python distribution, find them in a patch at ftp://icf.llnl.gov/pub/python/busby/patches.961108.tgz. This module is only useful to you if it happens to include code specific for your hardware and software environment. If you can contribute OS-specific code for new platforms, or corrections for the code provided, it will be greatly appreciated. ** Version 1.0: September 20, 1996. Lee Busby, LLNL. */ #ifdef __cplusplus extern "C" { #endif #include "Python.h" #include #if defined(__FreeBSD__) # include #endif #ifndef WANT_SIGFPE_HANDLER /* Define locally if they are not defined in Python. This gives only * the limited control to induce a core dump in case of an exception. */ #include static jmp_buf PyFPE_jbuf; static int PyFPE_counter = 0; #endif typedef void Sigfunc(int); static Sigfunc sigfpe_handler; static void fpe_reset(Sigfunc *); static PyObject *fpe_error; PyMODINIT_FUNC initfpectl(void); static PyObject *turnon_sigfpe (PyObject *self,PyObject *args); static PyObject *turnoff_sigfpe (PyObject *self,PyObject *args); static PyMethodDef fpectl_methods[] = { {"turnon_sigfpe", (PyCFunction) turnon_sigfpe, METH_VARARGS}, {"turnoff_sigfpe", (PyCFunction) turnoff_sigfpe, METH_VARARGS}, {0,0} }; static PyObject *turnon_sigfpe(PyObject *self,PyObject *args) { /* Do any architecture-specific one-time only initialization here. */ fpe_reset(sigfpe_handler); Py_INCREF (Py_None); return Py_None; } static void fpe_reset(Sigfunc *handler) { /* Reset the exception handling machinery, and reset the signal * handler for SIGFPE to the given handler. */ /*-- IRIX -----------------------------------------------------------------*/ #if defined(sgi) /* See man page on handle_sigfpes -- must link with -lfpe * My usage doesn't follow the man page exactly. Maybe somebody * else can explain handle_sigfpes to me.... * cc -c -I/usr/local/python/include fpectlmodule.c * ld -shared -o fpectlmodule.so fpectlmodule.o -lfpe */ #include typedef void user_routine (unsigned[5], int[2]); typedef void abort_routine (unsigned long); handle_sigfpes(_OFF, 0, (user_routine *)0, _TURN_OFF_HANDLER_ON_ERROR, NULL); handle_sigfpes(_ON, _EN_OVERFL | _EN_DIVZERO | _EN_INVALID, (user_routine *)0, _ABORT_ON_ERROR, NULL); PyOS_setsig(SIGFPE, handler); /*-- SunOS and Solaris ----------------------------------------------------*/ #elif defined(sun) /* References: ieee_handler, ieee_sun, ieee_functions, and ieee_flags man pages (SunOS or Solaris) cc -c -I/usr/local/python/include fpectlmodule.c ld -G -o fpectlmodule.so -L/opt/SUNWspro/lib fpectlmodule.o -lsunmath -lm */ #include #ifndef _SUNMATH_H extern void nonstandard_arithmetic(void); extern int ieee_flags(const char*, const char*, const char*, char **); extern long ieee_handler(const char*, const char*, sigfpe_handler_type); #endif char *mode="exception", *in="all", *out; (void) nonstandard_arithmetic(); (void) ieee_flags("clearall",mode,in,&out); (void) ieee_handler("set","common",(sigfpe_handler_type)handler); PyOS_setsig(SIGFPE, handler); /*-- HPUX -----------------------------------------------------------------*/ #elif defined(__hppa) || defined(hppa) /* References: fpsetmask man page */ /* cc -Aa +z -c -I/usr/local/python/include fpectlmodule.c */ /* ld -b -o fpectlmodule.sl fpectlmodule.o -lm */ #include fpsetdefaults(); PyOS_setsig(SIGFPE, handler); /*-- IBM AIX --------------------------------------------------------------*/ #elif defined(__AIX) || defined(_AIX) /* References: fp_trap, fp_enable man pages */ #include fp_trap(FP_TRAP_SYNC); fp_enable(TRP_INVALID | TRP_DIV_BY_ZERO | TRP_OVERFLOW); PyOS_setsig(SIGFPE, handler); /*-- DEC ALPHA OSF --------------------------------------------------------*/ #elif defined(__alpha) && defined(__osf__) /* References: exception_intro, ieee man pages */ /* cc -c -I/usr/local/python/include fpectlmodule.c */ /* ld -shared -o fpectlmodule.so fpectlmodule.o */ #include unsigned long fp_control = IEEE_TRAP_ENABLE_INV | IEEE_TRAP_ENABLE_DZE | IEEE_TRAP_ENABLE_OVF; ieee_set_fp_control(fp_control); PyOS_setsig(SIGFPE, handler); /*-- DEC ALPHA LINUX ------------------------------------------------------*/ #elif defined(__alpha) && defined(linux) #include unsigned long fp_control = IEEE_TRAP_ENABLE_INV | IEEE_TRAP_ENABLE_DZE | IEEE_TRAP_ENABLE_OVF; ieee_set_fp_control(fp_control); PyOS_setsig(SIGFPE, handler); /*-- DEC ALPHA VMS --------------------------------------------------------*/ #elif defined(__ALPHA) && defined(__VMS) PyOS_setsig(SIGFPE, handler); /*-- Cray Unicos ----------------------------------------------------------*/ #elif defined(cray) /* UNICOS delivers SIGFPE by default, but no matherr */ #ifdef HAS_LIBMSET libmset(-1); #endif PyOS_setsig(SIGFPE, handler); /*-- FreeBSD ----------------------------------------------------------------*/ #elif defined(__FreeBSD__) fpresetsticky(fpgetsticky()); fpsetmask(FP_X_INV | FP_X_DZ | FP_X_OFL); PyOS_setsig(SIGFPE, handler); /*-- Linux ----------------------------------------------------------------*/ #elif defined(linux) #ifdef __GLIBC__ #include #else #include #endif #ifdef _FPU_SETCW { fpu_control_t cw = 0x1372; _FPU_SETCW(cw); } #else __setfpucw(0x1372); #endif PyOS_setsig(SIGFPE, handler); /*-- Microsoft Windows, NT ------------------------------------------------*/ #elif defined(_MSC_VER) /* Reference: Visual C++ Books Online 4.2, Run-Time Library Reference, _control87, _controlfp */ #include unsigned int cw = _EM_INVALID | _EM_ZERODIVIDE | _EM_OVERFLOW; (void)_controlfp(0, cw); PyOS_setsig(SIGFPE, handler); /*-- Give Up --------------------------------------------------------------*/ #else fputs("Operation not implemented\n", stderr); #endif } static PyObject *turnoff_sigfpe(PyObject *self,PyObject *args) { #ifdef __FreeBSD__ fpresetsticky(fpgetsticky()); fpsetmask(0); #else fputs("Operation not implemented\n", stderr); #endif Py_INCREF(Py_None); return Py_None; } static void sigfpe_handler(int signo) { fpe_reset(sigfpe_handler); if(PyFPE_counter) { longjmp(PyFPE_jbuf, 1); } else { Py_FatalError("Unprotected floating point exception"); } } PyMODINIT_FUNC initfpectl(void) { PyObject *m, *d; m = Py_InitModule("fpectl", fpectl_methods); d = PyModule_GetDict(m); fpe_error = PyErr_NewException("fpectl.error", NULL, NULL); if (fpe_error != NULL) PyDict_SetItemString(d, "error", fpe_error); } #ifdef __cplusplus } #endif Python-2.3.7/Modules/sre_constants.h0000644001241000117560000000463507650243550016734 0ustar loewishpifb6/* * Secret Labs' Regular Expression Engine * * regular expression matching engine * * NOTE: This file is generated by sre_constants.py. If you need * to change anything in here, edit sre_constants.py and run it. * * Copyright (c) 1997-2001 by Secret Labs AB. All rights reserved. * * See the _sre.c file for information on usage and redistribution. */ #define SRE_MAGIC 20030419 #define SRE_OP_FAILURE 0 #define SRE_OP_SUCCESS 1 #define SRE_OP_ANY 2 #define SRE_OP_ANY_ALL 3 #define SRE_OP_ASSERT 4 #define SRE_OP_ASSERT_NOT 5 #define SRE_OP_AT 6 #define SRE_OP_BRANCH 7 #define SRE_OP_CALL 8 #define SRE_OP_CATEGORY 9 #define SRE_OP_CHARSET 10 #define SRE_OP_BIGCHARSET 11 #define SRE_OP_GROUPREF 12 #define SRE_OP_GROUPREF_IGNORE 13 #define SRE_OP_IN 14 #define SRE_OP_IN_IGNORE 15 #define SRE_OP_INFO 16 #define SRE_OP_JUMP 17 #define SRE_OP_LITERAL 18 #define SRE_OP_LITERAL_IGNORE 19 #define SRE_OP_MARK 20 #define SRE_OP_MAX_UNTIL 21 #define SRE_OP_MIN_UNTIL 22 #define SRE_OP_NOT_LITERAL 23 #define SRE_OP_NOT_LITERAL_IGNORE 24 #define SRE_OP_NEGATE 25 #define SRE_OP_RANGE 26 #define SRE_OP_REPEAT 27 #define SRE_OP_REPEAT_ONE 28 #define SRE_OP_SUBPATTERN 29 #define SRE_OP_MIN_REPEAT_ONE 30 #define SRE_AT_BEGINNING 0 #define SRE_AT_BEGINNING_LINE 1 #define SRE_AT_BEGINNING_STRING 2 #define SRE_AT_BOUNDARY 3 #define SRE_AT_NON_BOUNDARY 4 #define SRE_AT_END 5 #define SRE_AT_END_LINE 6 #define SRE_AT_END_STRING 7 #define SRE_AT_LOC_BOUNDARY 8 #define SRE_AT_LOC_NON_BOUNDARY 9 #define SRE_AT_UNI_BOUNDARY 10 #define SRE_AT_UNI_NON_BOUNDARY 11 #define SRE_CATEGORY_DIGIT 0 #define SRE_CATEGORY_NOT_DIGIT 1 #define SRE_CATEGORY_SPACE 2 #define SRE_CATEGORY_NOT_SPACE 3 #define SRE_CATEGORY_WORD 4 #define SRE_CATEGORY_NOT_WORD 5 #define SRE_CATEGORY_LINEBREAK 6 #define SRE_CATEGORY_NOT_LINEBREAK 7 #define SRE_CATEGORY_LOC_WORD 8 #define SRE_CATEGORY_LOC_NOT_WORD 9 #define SRE_CATEGORY_UNI_DIGIT 10 #define SRE_CATEGORY_UNI_NOT_DIGIT 11 #define SRE_CATEGORY_UNI_SPACE 12 #define SRE_CATEGORY_UNI_NOT_SPACE 13 #define SRE_CATEGORY_UNI_WORD 14 #define SRE_CATEGORY_UNI_NOT_WORD 15 #define SRE_CATEGORY_UNI_LINEBREAK 16 #define SRE_CATEGORY_UNI_NOT_LINEBREAK 17 #define SRE_FLAG_TEMPLATE 1 #define SRE_FLAG_IGNORECASE 2 #define SRE_FLAG_LOCALE 4 #define SRE_FLAG_MULTILINE 8 #define SRE_FLAG_DOTALL 16 #define SRE_FLAG_UNICODE 32 #define SRE_FLAG_VERBOSE 64 #define SRE_INFO_PREFIX 1 #define SRE_INFO_LITERAL 2 #define SRE_INFO_CHARSET 4 Python-2.3.7/Modules/getpath.c0000644001241000117560000004666310067173446015507 0ustar loewishpifb6/* Return the initial module search path. */ #include "Python.h" #include "osdefs.h" #include #include #ifdef __APPLE__ #include #endif /* Search in some common locations for the associated Python libraries. * * Two directories must be found, the platform independent directory * (prefix), containing the common .py and .pyc files, and the platform * dependent directory (exec_prefix), containing the shared library * modules. Note that prefix and exec_prefix can be the same directory, * but for some installations, they are different. * * Py_GetPath() carries out separate searches for prefix and exec_prefix. * Each search tries a number of different locations until a ``landmark'' * file or directory is found. If no prefix or exec_prefix is found, a * warning message is issued and the preprocessor defined PREFIX and * EXEC_PREFIX are used (even though they will not work); python carries on * as best as is possible, but most imports will fail. * * Before any searches are done, the location of the executable is * determined. If argv[0] has one or more slashs in it, it is used * unchanged. Otherwise, it must have been invoked from the shell's path, * so we search $PATH for the named executable and use that. If the * executable was not found on $PATH (or there was no $PATH environment * variable), the original argv[0] string is used. * * Next, the executable location is examined to see if it is a symbolic * link. If so, the link is chased (correctly interpreting a relative * pathname if one is found) and the directory of the link target is used. * * Finally, argv0_path is set to the directory containing the executable * (i.e. the last component is stripped). * * With argv0_path in hand, we perform a number of steps. The same steps * are performed for prefix and for exec_prefix, but with a different * landmark. * * Step 1. Are we running python out of the build directory? This is * checked by looking for a different kind of landmark relative to * argv0_path. For prefix, the landmark's path is derived from the VPATH * preprocessor variable (taking into account that its value is almost, but * not quite, what we need). For exec_prefix, the landmark is * Modules/Setup. If the landmark is found, we're done. * * For the remaining steps, the prefix landmark will always be * lib/python$VERSION/os.py and the exec_prefix will always be * lib/python$VERSION/lib-dynload, where $VERSION is Python's version * number as supplied by the Makefile. Note that this means that no more * build directory checking is performed; if the first step did not find * the landmarks, the assumption is that python is running from an * installed setup. * * Step 2. See if the $PYTHONHOME environment variable points to the * installed location of the Python libraries. If $PYTHONHOME is set, then * it points to prefix and exec_prefix. $PYTHONHOME can be a single * directory, which is used for both, or the prefix and exec_prefix * directories separated by a colon. * * Step 3. Try to find prefix and exec_prefix relative to argv0_path, * backtracking up the path until it is exhausted. This is the most common * step to succeed. Note that if prefix and exec_prefix are different, * exec_prefix is more likely to be found; however if exec_prefix is a * subdirectory of prefix, both will be found. * * Step 4. Search the directories pointed to by the preprocessor variables * PREFIX and EXEC_PREFIX. These are supplied by the Makefile but can be * passed in as options to the configure script. * * That's it! * * Well, almost. Once we have determined prefix and exec_prefix, the * preprocessor variable PYTHONPATH is used to construct a path. Each * relative path on PYTHONPATH is prefixed with prefix. Then the directory * containing the shared library modules is appended. The environment * variable $PYTHONPATH is inserted in front of it all. Finally, the * prefix and exec_prefix globals are tweaked so they reflect the values * expected by other code, by stripping the "lib/python$VERSION/..." stuff * off. If either points to the build directory, the globals are reset to * the corresponding preprocessor variables (so sys.prefix will reflect the * installation location, even though sys.path points into the build * directory). This seems to make more sense given that currently the only * known use of sys.prefix and sys.exec_prefix is for the ILU installation * process to find the installed Python tree. */ #ifndef VERSION #if defined(__VMS) #define VERSION "2_1" #else #define VERSION "2.1" #endif #endif #ifndef VPATH #define VPATH "." #endif #ifndef PREFIX #define PREFIX "/usr/local" #endif #ifndef EXEC_PREFIX #define EXEC_PREFIX PREFIX #endif #ifndef PYTHONPATH #define PYTHONPATH PREFIX "/lib/python" VERSION ":" \ EXEC_PREFIX "/lib/python" VERSION "/lib-dynload" #endif #ifndef LANDMARK #define LANDMARK "os.py" #endif static char prefix[MAXPATHLEN+1]; static char exec_prefix[MAXPATHLEN+1]; static char progpath[MAXPATHLEN+1]; static char *module_search_path = NULL; static char lib_python[] = "lib/python" VERSION; static void reduce(char *dir) { size_t i = strlen(dir); while (i > 0 && dir[i] != SEP) --i; dir[i] = '\0'; } static int isfile(char *filename) /* Is file, not directory */ { struct stat buf; if (stat(filename, &buf) != 0) return 0; if (!S_ISREG(buf.st_mode)) return 0; return 1; } static int ismodule(char *filename) /* Is module -- check for .pyc/.pyo too */ { if (isfile(filename)) return 1; /* Check for the compiled version of prefix. */ if (strlen(filename) < MAXPATHLEN) { strcat(filename, Py_OptimizeFlag ? "o" : "c"); if (isfile(filename)) return 1; } return 0; } static int isxfile(char *filename) /* Is executable file */ { struct stat buf; if (stat(filename, &buf) != 0) return 0; if (!S_ISREG(buf.st_mode)) return 0; if ((buf.st_mode & 0111) == 0) return 0; return 1; } static int isdir(char *filename) /* Is directory */ { struct stat buf; if (stat(filename, &buf) != 0) return 0; if (!S_ISDIR(buf.st_mode)) return 0; return 1; } /* joinpath requires that any buffer argument passed to it has at least MAXPATHLEN + 1 bytes allocated. If this requirement is met, it guarantees that it will never overflow the buffer. If stuff is too long, buffer will contain a truncated copy of stuff. */ static void joinpath(char *buffer, char *stuff) { size_t n, k; if (stuff[0] == SEP) n = 0; else { n = strlen(buffer); if (n > 0 && buffer[n-1] != SEP && n < MAXPATHLEN) buffer[n++] = SEP; } k = strlen(stuff); if (n + k > MAXPATHLEN) k = MAXPATHLEN - n; strncpy(buffer+n, stuff, k); buffer[n+k] = '\0'; } /* copy_absolute requires that path be allocated at least MAXPATHLEN + 1 bytes and that p be no more than MAXPATHLEN bytes. */ static void copy_absolute(char *path, char *p) { if (p[0] == SEP) strcpy(path, p); else { getcwd(path, MAXPATHLEN); if (p[0] == '.' && p[1] == SEP) p += 2; joinpath(path, p); } } /* absolutize() requires that path be allocated at least MAXPATHLEN+1 bytes. */ static void absolutize(char *path) { char buffer[MAXPATHLEN + 1]; if (path[0] == SEP) return; copy_absolute(buffer, path); strcpy(path, buffer); } /* search_for_prefix requires that argv0_path be no more than MAXPATHLEN bytes long. */ static int search_for_prefix(char *argv0_path, char *home) { size_t n; char *vpath; /* If PYTHONHOME is set, we believe it unconditionally */ if (home) { char *delim; strncpy(prefix, home, MAXPATHLEN); delim = strchr(prefix, DELIM); if (delim) *delim = '\0'; joinpath(prefix, lib_python); joinpath(prefix, LANDMARK); return 1; } /* Check to see if argv[0] is in the build directory */ strcpy(prefix, argv0_path); joinpath(prefix, "Modules/Setup"); if (isfile(prefix)) { /* Check VPATH to see if argv0_path is in the build directory. */ vpath = VPATH; strcpy(prefix, argv0_path); joinpath(prefix, vpath); joinpath(prefix, "Lib"); joinpath(prefix, LANDMARK); if (ismodule(prefix)) return -1; } /* Search from argv0_path, until root is found */ copy_absolute(prefix, argv0_path); do { n = strlen(prefix); joinpath(prefix, lib_python); joinpath(prefix, LANDMARK); if (ismodule(prefix)) return 1; prefix[n] = '\0'; reduce(prefix); } while (prefix[0]); /* Look at configure's PREFIX */ strncpy(prefix, PREFIX, MAXPATHLEN); joinpath(prefix, lib_python); joinpath(prefix, LANDMARK); if (ismodule(prefix)) return 1; /* Fail */ return 0; } /* search_for_exec_prefix requires that argv0_path be no more than MAXPATHLEN bytes long. */ static int search_for_exec_prefix(char *argv0_path, char *home) { size_t n; /* If PYTHONHOME is set, we believe it unconditionally */ if (home) { char *delim; delim = strchr(home, DELIM); if (delim) strncpy(exec_prefix, delim+1, MAXPATHLEN); else strncpy(exec_prefix, home, MAXPATHLEN); joinpath(exec_prefix, lib_python); joinpath(exec_prefix, "lib-dynload"); return 1; } /* Check to see if argv[0] is in the build directory */ strcpy(exec_prefix, argv0_path); joinpath(exec_prefix, "Modules/Setup"); if (isfile(exec_prefix)) { reduce(exec_prefix); return -1; } /* Search from argv0_path, until root is found */ copy_absolute(exec_prefix, argv0_path); do { n = strlen(exec_prefix); joinpath(exec_prefix, lib_python); joinpath(exec_prefix, "lib-dynload"); if (isdir(exec_prefix)) return 1; exec_prefix[n] = '\0'; reduce(exec_prefix); } while (exec_prefix[0]); /* Look at configure's EXEC_PREFIX */ strncpy(exec_prefix, EXEC_PREFIX, MAXPATHLEN); joinpath(exec_prefix, lib_python); joinpath(exec_prefix, "lib-dynload"); if (isdir(exec_prefix)) return 1; /* Fail */ return 0; } static void calculate_path(void) { extern char *Py_GetProgramName(void); static char delimiter[2] = {DELIM, '\0'}; static char separator[2] = {SEP, '\0'}; char *pythonpath = PYTHONPATH; char *rtpypath = Py_GETENV("PYTHONPATH"); char *home = Py_GetPythonHome(); char *path = getenv("PATH"); char *prog = Py_GetProgramName(); char argv0_path[MAXPATHLEN+1]; char zip_path[MAXPATHLEN+1]; int pfound, efound; /* 1 if found; -1 if found build directory */ char *buf; size_t bufsz; size_t prefixsz; char *defpath = pythonpath; #ifdef WITH_NEXT_FRAMEWORK NSModule pythonModule; #endif #ifdef __APPLE__ unsigned long nsexeclength = MAXPATHLEN; #endif /* If there is no slash in the argv0 path, then we have to * assume python is on the user's $PATH, since there's no * other way to find a directory to start the search from. If * $PATH isn't exported, you lose. */ if (strchr(prog, SEP)) strncpy(progpath, prog, MAXPATHLEN); #ifdef __APPLE__ /* On Mac OS X, if a script uses an interpreter of the form * "#!/opt/python2.3/bin/python", the kernel only passes "python" * as argv[0], which falls through to the $PATH search below. * If /opt/python2.3/bin isn't in your path, or is near the end, * this algorithm may incorrectly find /usr/bin/python. To work * around this, we can use _NSGetExecutablePath to get a better * hint of what the intended interpreter was, although this * will fail if a relative path was used. but in that case, * absolutize() should help us out below */ else if(0 == _NSGetExecutablePath(progpath, &nsexeclength) && progpath[0] == SEP) ; #endif // __APPLE__ else if (path) { while (1) { char *delim = strchr(path, DELIM); if (delim) { size_t len = delim - path; if (len > MAXPATHLEN) len = MAXPATHLEN; strncpy(progpath, path, len); *(progpath + len) = '\0'; } else strncpy(progpath, path, MAXPATHLEN); joinpath(progpath, prog); if (isxfile(progpath)) break; if (!delim) { progpath[0] = '\0'; break; } path = delim + 1; } } else progpath[0] = '\0'; if (progpath[0] != SEP) absolutize(progpath); strncpy(argv0_path, progpath, MAXPATHLEN); argv0_path[MAXPATHLEN] = '\0'; #ifdef WITH_NEXT_FRAMEWORK /* On Mac OS X we have a special case if we're running from a framework. ** This is because the python home should be set relative to the library, ** which is in the framework, not relative to the executable, which may ** be outside of the framework. Except when we're in the build directory... */ pythonModule = NSModuleForSymbol(NSLookupAndBindSymbol("_Py_Initialize")); /* Use dylib functions to find out where the framework was loaded from */ buf = (char *)NSLibraryNameForModule(pythonModule); if (buf != NULL) { /* We're in a framework. */ /* See if we might be in the build directory. The framework in the ** build directory is incomplete, it only has the .dylib and a few ** needed symlinks, it doesn't have the Lib directories and such. ** If we're running with the framework from the build directory we must ** be running the interpreter in the build directory, so we use the ** build-directory-specific logic to find Lib and such. */ strncpy(argv0_path, buf, MAXPATHLEN); reduce(argv0_path); joinpath(argv0_path, lib_python); joinpath(argv0_path, LANDMARK); if (!ismodule(argv0_path)) { /* We are in the build directory so use the name of the executable - we know that the absolute path is passed */ strncpy(argv0_path, prog, MAXPATHLEN); } else { /* Use the location of the library as the progpath */ strncpy(argv0_path, buf, MAXPATHLEN); } } #endif #if HAVE_READLINK { char tmpbuffer[MAXPATHLEN+1]; int linklen = readlink(progpath, tmpbuffer, MAXPATHLEN); while (linklen != -1) { /* It's not null terminated! */ tmpbuffer[linklen] = '\0'; if (tmpbuffer[0] == SEP) /* tmpbuffer should never be longer than MAXPATHLEN, but extra check does not hurt */ strncpy(argv0_path, tmpbuffer, MAXPATHLEN); else { /* Interpret relative to progpath */ reduce(argv0_path); joinpath(argv0_path, tmpbuffer); } linklen = readlink(argv0_path, tmpbuffer, MAXPATHLEN); } } #endif /* HAVE_READLINK */ reduce(argv0_path); /* At this point, argv0_path is guaranteed to be less than MAXPATHLEN bytes long. */ if (!(pfound = search_for_prefix(argv0_path, home))) { if (!Py_FrozenFlag) fprintf(stderr, "Could not find platform independent libraries \n"); strncpy(prefix, PREFIX, MAXPATHLEN); joinpath(prefix, lib_python); } else reduce(prefix); strncpy(zip_path, prefix, MAXPATHLEN); zip_path[MAXPATHLEN] = '\0'; if (pfound > 0) { /* Use the reduced prefix returned by Py_GetPrefix() */ reduce(zip_path); reduce(zip_path); } else strncpy(zip_path, PREFIX, MAXPATHLEN); joinpath(zip_path, "lib/python00.zip"); bufsz = strlen(zip_path); /* Replace "00" with version */ zip_path[bufsz - 6] = VERSION[0]; zip_path[bufsz - 5] = VERSION[2]; if (!(efound = search_for_exec_prefix(argv0_path, home))) { if (!Py_FrozenFlag) fprintf(stderr, "Could not find platform dependent libraries \n"); strncpy(exec_prefix, EXEC_PREFIX, MAXPATHLEN); joinpath(exec_prefix, "lib/lib-dynload"); } /* If we found EXEC_PREFIX do *not* reduce it! (Yet.) */ if ((!pfound || !efound) && !Py_FrozenFlag) fprintf(stderr, "Consider setting $PYTHONHOME to [:]\n"); /* Calculate size of return buffer. */ bufsz = 0; if (rtpypath) bufsz += strlen(rtpypath) + 1; prefixsz = strlen(prefix) + 1; while (1) { char *delim = strchr(defpath, DELIM); if (defpath[0] != SEP) /* Paths are relative to prefix */ bufsz += prefixsz; if (delim) bufsz += delim - defpath + 1; else { bufsz += strlen(defpath) + 1; break; } defpath = delim + 1; } bufsz += strlen(zip_path) + 1; bufsz += strlen(exec_prefix) + 1; /* This is the only malloc call in this file */ buf = PyMem_Malloc(bufsz); if (buf == NULL) { /* We can't exit, so print a warning and limp along */ fprintf(stderr, "Not enough memory for dynamic PYTHONPATH.\n"); fprintf(stderr, "Using default static PYTHONPATH.\n"); module_search_path = PYTHONPATH; } else { /* Run-time value of $PYTHONPATH goes first */ if (rtpypath) { strcpy(buf, rtpypath); strcat(buf, delimiter); } else buf[0] = '\0'; /* Next is the default zip path */ strcat(buf, zip_path); strcat(buf, delimiter); /* Next goes merge of compile-time $PYTHONPATH with * dynamically located prefix. */ defpath = pythonpath; while (1) { char *delim = strchr(defpath, DELIM); if (defpath[0] != SEP) { strcat(buf, prefix); strcat(buf, separator); } if (delim) { size_t len = delim - defpath + 1; size_t end = strlen(buf) + len; strncat(buf, defpath, len); *(buf + end) = '\0'; } else { strcat(buf, defpath); break; } defpath = delim + 1; } strcat(buf, delimiter); /* Finally, on goes the directory for dynamic-load modules */ strcat(buf, exec_prefix); /* And publish the results */ module_search_path = buf; } /* Reduce prefix and exec_prefix to their essence, * e.g. /usr/local/lib/python1.5 is reduced to /usr/local. * If we're loading relative to the build directory, * return the compiled-in defaults instead. */ if (pfound > 0) { reduce(prefix); reduce(prefix); } else strncpy(prefix, PREFIX, MAXPATHLEN); if (efound > 0) { reduce(exec_prefix); reduce(exec_prefix); reduce(exec_prefix); } else strncpy(exec_prefix, EXEC_PREFIX, MAXPATHLEN); } /* External interface */ char * Py_GetPath(void) { if (!module_search_path) calculate_path(); return module_search_path; } char * Py_GetPrefix(void) { if (!module_search_path) calculate_path(); return prefix; } char * Py_GetExecPrefix(void) { if (!module_search_path) calculate_path(); return exec_prefix; } char * Py_GetProgramFullPath(void) { if (!module_search_path) calculate_path(); return progpath; } Python-2.3.7/Modules/readline.c0000644001241000117560000004360010132021447015604 0ustar loewishpifb6/* This module makes GNU readline available to Python. It has ideas * contributed by Lee Busby, LLNL, and William Magro, Cornell Theory * Center. The completer interface was inspired by Lele Gaifax. * * More recently, it was largely rewritten by Guido van Rossum who is * now maintaining it. */ /* Standard definitions */ #include "Python.h" #include #include #include #if defined(HAVE_LOCALE_H) && defined(HAVE_SETLOCALE) /* GNU readline() mistakenly sets the LC_CTYPE locale. * This is evil. Only the user or the app's main() should do this! * We must save and restore the locale around the rl_initialize() call. */ #define SAVE_LOCALE #include #endif /* GNU readline definitions */ #undef HAVE_CONFIG_H /* Else readline/chardefs.h includes strings.h */ #include #include #ifdef HAVE_RL_COMPLETION_MATCHES #define completion_matches(x, y) \ rl_completion_matches((x), ((rl_compentry_func_t *)(y))) #endif /* Exported function to send one line to readline's init file parser */ static PyObject * parse_and_bind(PyObject *self, PyObject *args) { char *s, *copy; if (!PyArg_ParseTuple(args, "s:parse_and_bind", &s)) return NULL; /* Make a copy -- rl_parse_and_bind() modifies its argument */ /* Bernard Herzog */ copy = malloc(1 + strlen(s)); if (copy == NULL) return PyErr_NoMemory(); strcpy(copy, s); rl_parse_and_bind(copy); free(copy); /* Free the copy */ Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_parse_and_bind, "parse_and_bind(string) -> None\n\ Parse and execute single line of a readline init file."); /* Exported function to parse a readline init file */ static PyObject * read_init_file(PyObject *self, PyObject *args) { char *s = NULL; if (!PyArg_ParseTuple(args, "|z:read_init_file", &s)) return NULL; errno = rl_read_init_file(s); if (errno) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_read_init_file, "read_init_file([filename]) -> None\n\ Parse a readline initialization file.\n\ The default filename is the last filename used."); /* Exported function to load a readline history file */ static PyObject * read_history_file(PyObject *self, PyObject *args) { char *s = NULL; if (!PyArg_ParseTuple(args, "|z:read_history_file", &s)) return NULL; errno = read_history(s); if (errno) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } static int history_length = -1; /* do not truncate history by default */ PyDoc_STRVAR(doc_read_history_file, "read_history_file([filename]) -> None\n\ Load a readline history file.\n\ The default filename is ~/.history."); /* Exported function to save a readline history file */ static PyObject * write_history_file(PyObject *self, PyObject *args) { char *s = NULL; if (!PyArg_ParseTuple(args, "|z:write_history_file", &s)) return NULL; errno = write_history(s); if (!errno && history_length >= 0) history_truncate_file(s, history_length); if (errno) return PyErr_SetFromErrno(PyExc_IOError); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_write_history_file, "write_history_file([filename]) -> None\n\ Save a readline history file.\n\ The default filename is ~/.history."); /* Set history length */ static PyObject* set_history_length(PyObject *self, PyObject *args) { int length = history_length; if (!PyArg_ParseTuple(args, "i:set_history_length", &length)) return NULL; history_length = length; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(set_history_length_doc, "set_history_length(length) -> None\n\ set the maximal number of items which will be written to\n\ the history file. A negative length is used to inhibit\n\ history truncation."); /* Get history length */ static PyObject* get_history_length(PyObject *self, PyObject *noarg) { return PyInt_FromLong(history_length); } PyDoc_STRVAR(get_history_length_doc, "get_history_length() -> int\n\ return the maximum number of items that will be written to\n\ the history file."); /* Generic hook function setter */ static PyObject * set_hook(const char *funcname, PyObject **hook_var, PyThreadState **tstate, PyObject *args) { PyObject *function = Py_None; char buf[80]; PyOS_snprintf(buf, sizeof(buf), "|O:set_%.50s", funcname); if (!PyArg_ParseTuple(args, buf, &function)) return NULL; if (function == Py_None) { Py_XDECREF(*hook_var); *hook_var = NULL; *tstate = NULL; } else if (PyCallable_Check(function)) { PyObject *tmp = *hook_var; Py_INCREF(function); *hook_var = function; Py_XDECREF(tmp); *tstate = PyThreadState_Get(); } else { PyOS_snprintf(buf, sizeof(buf), "set_%.50s(func): argument not callable", funcname); PyErr_SetString(PyExc_TypeError, buf); return NULL; } Py_INCREF(Py_None); return Py_None; } /* Exported functions to specify hook functions in Python */ static PyObject *startup_hook = NULL; static PyThreadState *startup_hook_tstate = NULL; #ifdef HAVE_RL_PRE_INPUT_HOOK static PyObject *pre_input_hook = NULL; static PyThreadState *pre_input_hook_tstate = NULL; #endif static PyObject * set_startup_hook(PyObject *self, PyObject *args) { return set_hook("startup_hook", &startup_hook, &startup_hook_tstate, args); } PyDoc_STRVAR(doc_set_startup_hook, "set_startup_hook([function]) -> None\n\ Set or remove the startup_hook function.\n\ The function is called with no arguments just\n\ before readline prints the first prompt."); #ifdef HAVE_RL_PRE_INPUT_HOOK /* Set pre-input hook */ static PyObject * set_pre_input_hook(PyObject *self, PyObject *args) { return set_hook("pre_input_hook", &pre_input_hook, &pre_input_hook_tstate, args); } PyDoc_STRVAR(doc_set_pre_input_hook, "set_pre_input_hook([function]) -> None\n\ Set or remove the pre_input_hook function.\n\ The function is called with no arguments after the first prompt\n\ has been printed and just before readline starts reading input\n\ characters."); #endif /* Exported function to specify a word completer in Python */ static PyObject *completer = NULL; static PyThreadState *completer_tstate = NULL; static PyObject *begidx = NULL; static PyObject *endidx = NULL; /* Get the beginning index for the scope of the tab-completion */ static PyObject * get_begidx(PyObject *self, PyObject *noarg) { Py_INCREF(begidx); return begidx; } PyDoc_STRVAR(doc_get_begidx, "get_begidx() -> int\n\ get the beginning index of the readline tab-completion scope"); /* Get the ending index for the scope of the tab-completion */ static PyObject * get_endidx(PyObject *self, PyObject *noarg) { Py_INCREF(endidx); return endidx; } PyDoc_STRVAR(doc_get_endidx, "get_endidx() -> int\n\ get the ending index of the readline tab-completion scope"); /* Set the tab-completion word-delimiters that readline uses */ static PyObject * set_completer_delims(PyObject *self, PyObject *args) { char *break_chars; if(!PyArg_ParseTuple(args, "s:set_completer_delims", &break_chars)) { return NULL; } free((void*)rl_completer_word_break_characters); rl_completer_word_break_characters = strdup(break_chars); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_set_completer_delims, "set_completer_delims(string) -> None\n\ set the readline word delimiters for tab-completion"); /* Add a line to the history buffer */ static PyObject * py_add_history(PyObject *self, PyObject *args) { char *line; if(!PyArg_ParseTuple(args, "s:add_history", &line)) { return NULL; } add_history(line); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_add_history, "add_history(string) -> None\n\ add a line to the history buffer"); /* Get the tab-completion word-delimiters that readline uses */ static PyObject * get_completer_delims(PyObject *self, PyObject *noarg) { return PyString_FromString(rl_completer_word_break_characters); } PyDoc_STRVAR(doc_get_completer_delims, "get_completer_delims() -> string\n\ get the readline word delimiters for tab-completion"); /* Set the completer function */ static PyObject * set_completer(PyObject *self, PyObject *args) { return set_hook("completer", &completer, &completer_tstate, args); } PyDoc_STRVAR(doc_set_completer, "set_completer([function]) -> None\n\ Set or remove the completer function.\n\ The function is called as function(text, state),\n\ for state in 0, 1, 2, ..., until it returns a non-string.\n\ It should return the next possible completion starting with 'text'."); static PyObject * get_completer(PyObject *self, PyObject *noargs) { if (completer == NULL) { Py_INCREF(Py_None); return Py_None; } Py_INCREF(completer); return completer; } PyDoc_STRVAR(doc_get_completer, "get_completer() -> function\n\ \n\ Returns current completer function."); /* Exported function to get any element of history */ static PyObject * get_history_item(PyObject *self, PyObject *args) { int idx = 0; HIST_ENTRY *hist_ent; if (!PyArg_ParseTuple(args, "i:index", &idx)) return NULL; if ((hist_ent = history_get(idx))) return PyString_FromString(hist_ent->line); else { Py_INCREF(Py_None); return Py_None; } } PyDoc_STRVAR(doc_get_history_item, "get_history_item() -> string\n\ return the current contents of history item at index."); /* Exported function to get current length of history */ static PyObject * get_current_history_length(PyObject *self, PyObject *noarg) { HISTORY_STATE *hist_st; hist_st = history_get_history_state(); return PyInt_FromLong(hist_st ? (long) hist_st->length : (long) 0); } PyDoc_STRVAR(doc_get_current_history_length, "get_current_history_length() -> integer\n\ return the current (not the maximum) length of history."); /* Exported function to read the current line buffer */ static PyObject * get_line_buffer(PyObject *self, PyObject *noarg) { return PyString_FromString(rl_line_buffer); } PyDoc_STRVAR(doc_get_line_buffer, "get_line_buffer() -> string\n\ return the current contents of the line buffer."); /* Exported function to insert text into the line buffer */ static PyObject * insert_text(PyObject *self, PyObject *args) { char *s; if (!PyArg_ParseTuple(args, "s:insert_text", &s)) return NULL; rl_insert_text(s); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_insert_text, "insert_text(string) -> None\n\ Insert text into the command line."); /* Redisplay the line buffer */ static PyObject * redisplay(PyObject *self, PyObject *noarg) { rl_redisplay(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_redisplay, "redisplay() -> None\n\ Change what's displayed on the screen to reflect the current\n\ contents of the line buffer."); /* Table of functions exported by the module */ static struct PyMethodDef readline_methods[] = { {"parse_and_bind", parse_and_bind, METH_VARARGS, doc_parse_and_bind}, {"get_line_buffer", get_line_buffer, METH_NOARGS, doc_get_line_buffer}, {"insert_text", insert_text, METH_VARARGS, doc_insert_text}, {"redisplay", redisplay, METH_NOARGS, doc_redisplay}, {"read_init_file", read_init_file, METH_VARARGS, doc_read_init_file}, {"read_history_file", read_history_file, METH_VARARGS, doc_read_history_file}, {"write_history_file", write_history_file, METH_VARARGS, doc_write_history_file}, {"get_history_item", get_history_item, METH_VARARGS, doc_get_history_item}, {"get_current_history_length", (PyCFunction)get_current_history_length, METH_NOARGS, doc_get_current_history_length}, {"set_history_length", set_history_length, METH_VARARGS, set_history_length_doc}, {"get_history_length", get_history_length, METH_NOARGS, get_history_length_doc}, {"set_completer", set_completer, METH_VARARGS, doc_set_completer}, {"get_completer", get_completer, METH_NOARGS, doc_get_completer}, {"get_begidx", get_begidx, METH_NOARGS, doc_get_begidx}, {"get_endidx", get_endidx, METH_NOARGS, doc_get_endidx}, {"set_completer_delims", set_completer_delims, METH_VARARGS, doc_set_completer_delims}, {"add_history", py_add_history, METH_VARARGS, doc_add_history}, {"get_completer_delims", get_completer_delims, METH_NOARGS, doc_get_completer_delims}, {"set_startup_hook", set_startup_hook, METH_VARARGS, doc_set_startup_hook}, #ifdef HAVE_RL_PRE_INPUT_HOOK {"set_pre_input_hook", set_pre_input_hook, METH_VARARGS, doc_set_pre_input_hook}, #endif {0, 0} }; /* C function to call the Python hooks. */ static int on_hook(PyObject *func, PyThreadState **tstate) { int result = 0; if (func != NULL) { PyObject *r; /* Note that readline is called with the interpreter lock released! */ PyEval_RestoreThread(*tstate); r = PyObject_CallFunction(func, NULL); if (r == NULL) goto error; if (r == Py_None) result = 0; else result = PyInt_AsLong(r); Py_DECREF(r); goto done; error: PyErr_Clear(); Py_XDECREF(r); done: *tstate = PyEval_SaveThread(); } return result; } static int on_startup_hook(void) { return on_hook(startup_hook, &startup_hook_tstate); } #ifdef HAVE_RL_PRE_INPUT_HOOK static int on_pre_input_hook(void) { return on_hook(pre_input_hook, &pre_input_hook_tstate); } #endif /* C function to call the Python completer. */ static char * on_completion(char *text, int state) { char *result = NULL; if (completer != NULL) { PyObject *r; /* Note that readline is called with the interpreter lock released! */ PyEval_RestoreThread(completer_tstate); /* Don't use the default filename completion if we * have a custom completion function... */ rl_attempted_completion_over = 1; r = PyObject_CallFunction(completer, "si", text, state); if (r == NULL) goto error; if (r == Py_None) { result = NULL; } else { char *s = PyString_AsString(r); if (s == NULL) goto error; result = strdup(s); } Py_DECREF(r); goto done; error: PyErr_Clear(); Py_XDECREF(r); done: completer_tstate = PyEval_SaveThread(); } return result; } /* A more flexible constructor that saves the "begidx" and "endidx" * before calling the normal completer */ static char ** flex_complete(char *text, int start, int end) { Py_XDECREF(begidx); Py_XDECREF(endidx); begidx = PyInt_FromLong((long) start); endidx = PyInt_FromLong((long) end); return completion_matches(text, *on_completion); } /* Helper to initialize GNU readline properly. */ static void setup_readline(void) { #ifdef SAVE_LOCALE char *saved_locale = strdup(setlocale(LC_CTYPE, NULL)); if (!saved_locale) Py_FatalError("not enough memory to save locale"); #endif using_history(); rl_readline_name = "python"; #if defined(PYOS_OS2) && defined(PYCC_GCC) /* Allow $if term= in .inputrc to work */ rl_terminal_name = getenv("TERM"); #endif /* Force rebind of TAB to insert-tab */ rl_bind_key('\t', rl_insert); /* Bind both ESC-TAB and ESC-ESC to the completion function */ rl_bind_key_in_map ('\t', rl_complete, emacs_meta_keymap); rl_bind_key_in_map ('\033', rl_complete, emacs_meta_keymap); /* Set our hook functions */ rl_startup_hook = (Function *)on_startup_hook; #ifdef HAVE_RL_PRE_INPUT_HOOK rl_pre_input_hook = (Function *)on_pre_input_hook; #endif /* Set our completion function */ rl_attempted_completion_function = (CPPFunction *)flex_complete; /* Set Python word break characters */ rl_completer_word_break_characters = strdup(" \t\n`~!@#$%^&*()-=+[{]}\\|;:'\",<>/?"); /* All nonalphanums except '.' */ #ifdef HAVE_RL_COMPLETION_APPEND_CHARACTER rl_completion_append_character ='\0'; #endif begidx = PyInt_FromLong(0L); endidx = PyInt_FromLong(0L); /* Initialize (allows .inputrc to override) * * XXX: A bug in the readline-2.2 library causes a memory leak * inside this function. Nothing we can do about it. */ rl_initialize(); #ifdef SAVE_LOCALE setlocale(LC_CTYPE, saved_locale); /* Restore locale */ free(saved_locale); #endif } /* Interrupt handler */ static jmp_buf jbuf; /* ARGSUSED */ static void onintr(int sig) { longjmp(jbuf, 1); } /* Wrapper around GNU readline that handles signals differently. */ static char * call_readline(FILE *sys_stdin, FILE *sys_stdout, char *prompt) { size_t n; char *p, *q; PyOS_sighandler_t old_inthandler; #ifdef SAVE_LOCALE char *saved_locale = strdup(setlocale(LC_CTYPE, NULL)); if (!saved_locale) Py_FatalError("not enough memory to save locale"); setlocale(LC_CTYPE, ""); #endif old_inthandler = PyOS_setsig(SIGINT, onintr); if (setjmp(jbuf)) { #ifdef HAVE_SIGRELSE /* This seems necessary on SunOS 4.1 (Rasmus Hahn) */ sigrelse(SIGINT); #endif PyOS_setsig(SIGINT, old_inthandler); return NULL; } rl_event_hook = PyOS_InputHook; if (sys_stdin != rl_instream || sys_stdout != rl_outstream) { rl_instream = sys_stdin; rl_outstream = sys_stdout; #ifdef HAVE_RL_COMPLETION_APPEND_CHARACTER rl_prep_terminal (1); #endif } p = readline(prompt); PyOS_setsig(SIGINT, old_inthandler); /* We must return a buffer allocated with PyMem_Malloc. */ if (p == NULL) { p = PyMem_Malloc(1); if (p != NULL) *p = '\0'; return p; } n = strlen(p); if (n > 0) { char *line; HISTORY_STATE *state = history_get_history_state(); if (state->length > 0) line = history_get(state->length)->line; else line = ""; if (strcmp(p, line)) add_history(p); /* the history docs don't say so, but the address of state changes each time history_get_history_state is called which makes me think it's freshly malloc'd memory... on the other hand, the address of the last line stays the same as long as history isn't extended, so it appears to be malloc'd but managed by the history package... */ free(state); } /* Copy the malloc'ed buffer into a PyMem_Malloc'ed one and release the original. */ q = p; p = PyMem_Malloc(n+2); if (p != NULL) { strncpy(p, q, n); p[n] = '\n'; p[n+1] = '\0'; } free(q); #ifdef SAVE_LOCALE setlocale(LC_CTYPE, saved_locale); /* Restore locale */ free(saved_locale); #endif return p; } /* Initialize the module */ PyDoc_STRVAR(doc_module, "Importing this module enables command line editing using GNU readline."); PyMODINIT_FUNC initreadline(void) { PyObject *m; m = Py_InitModule4("readline", readline_methods, doc_module, (PyObject *)NULL, PYTHON_API_VERSION); PyOS_ReadlineFunctionPointer = call_readline; setup_readline(); } Python-2.3.7/Modules/makexp_aix0000755001241000117560000000603506513240632015741 0ustar loewishpifb6#!/bin/sh # # =========================================================================== # FILE: makexp_aix # TYPE: standalone executable # SYSTEM: AIX 3.2.5 and AIX 4 # # DESCRIPTION: This script creates an export list of ALL global symbols # from a list of object or archive files. # # USAGE: makexp_aix "" ... # # where: # is the target export list filename. # is the path/file string to be appended # after the "#!" symbols in the first line of the # export file. Passing "" means deferred resolution. # is an object (.o) or an archive file (.a). # # HISTORY: # 3-Apr-1998 -- remove C++ entries of the form Class::method # Vladimir Marangozov # # 1-Jul-1996 -- added header information # Vladimir Marangozov # # 28-Jun-1996 -- initial code # Vladimir Marangozov (Vladimir.Marangozov@imag.fr) # ========================================================================== # Variables expFileName=$1 toAppendStr=$2 shift; shift; inputFiles=$* automsg="Generated automatically by makexp_aix" notemsg="NOTE: lists _all_ global symbols defined in the above file(s)." curwdir=`pwd` # Create the export file and setup the header info echo "#!"$toAppendStr > $expFileName echo "*" >> $expFileName echo "* $automsg (`date -u`)" >> $expFileName echo "*" >> $expFileName echo "* Base Directory: $curwdir" >> $expFileName echo "* Input File(s) : $inputFiles" >> $expFileName echo "*" >> $expFileName echo "* $notemsg" >> $expFileName echo "*" >> $expFileName # Extract the symbol list using 'nm' which produces quite # different output under AIX 4 than under AIX 3.2.5. # The following handles both versions by using a common flagset. # Here are some hidden tricks: # 1. Use /usr/ccs/bin/nm. Relevant to AIX 3.2.5 which has # another version under /usr/ucb/bin/nm. # 2. Use the -B flag to have a standard BSD representation # of the symbol list on both AIX 3.2.5 and AIX 4. The "-B" # flag is missing in the AIX 3.2.5 online usage help of 'nm'. # 3. Use the -x flag to have a hex representation of the symbol # values. This fills the leading whitespaces on AIX 4, # thus simplifying the sed statement. # 4. Eliminate all entries except those with either "B", "D" # or "T" key letters. We are interested only in the global # (extern) BSS, DATA and TEXT symbols. With the same statement # we eliminate object member lines relevant to AIX 4. # 5. Eliminate entries containing a dot. We can have a dot only # as a symbol prefix, but such symbols are undefined externs. # 6. Eliminate everything including the key letter, so that we're # left with just the symbol name. # 7. Eliminate all entries containing two colons, like Class::method # /usr/ccs/bin/nm -Bex $inputFiles \ | sed -e '/ [^BDT] /d' -e '/\./d' -e 's/.* [BDT] //' -e '/::/d' \ | sort | uniq >> $expFileName Python-2.3.7/Modules/main.c0000644001241000117560000002705107744771210014766 0ustar loewishpifb6/* Python interpreter main program */ #include "Python.h" #include "osdefs.h" #include "compile.h" /* For CO_FUTURE_DIVISION */ #ifdef __VMS #include #endif #if defined(MS_WINDOWS) || defined(__CYGWIN__) #include #endif #if (defined(PYOS_OS2) && !defined(PYCC_GCC)) || defined(MS_WINDOWS) #define PYTHONHOMEHELP "\\lib" #else #if defined(PYOS_OS2) && defined(PYCC_GCC) #define PYTHONHOMEHELP "/Lib" #else #define PYTHONHOMEHELP "/pythonX.X" #endif #endif #include "pygetopt.h" #define COPYRIGHT \ "Type \"help\", \"copyright\", \"credits\" or \"license\" " \ "for more information." /* For Py_GetArgcArgv(); set by main() */ static char **orig_argv; static int orig_argc; /* command line options */ #define BASE_OPTS "c:dEhiOQ:StuUvVW:xX" #ifndef RISCOS #define PROGRAM_OPTS BASE_OPTS #else /*RISCOS*/ /* extra option saying that we are running under a special task window frontend; especially my_readline will behave different */ #define PROGRAM_OPTS BASE_OPTS "w" /* corresponding flag */ extern int Py_RISCOSWimpFlag; #endif /*RISCOS*/ /* Short usage message (with %s for argv0) */ static char *usage_line = "usage: %s [option] ... [-c cmd | file | -] [arg] ...\n"; /* Long usage message, split into parts < 512 bytes */ static char *usage_1 = "\ Options and arguments (and corresponding environment variables):\n\ -c cmd : program passed in as string (terminates option list)\n\ -d : debug output from parser (also PYTHONDEBUG=x)\n\ -E : ignore environment variables (such as PYTHONPATH)\n\ -h : print this help message and exit\n\ -i : inspect interactively after running script, (also PYTHONINSPECT=x)\n\ and force prompts, even if stdin does not appear to be a terminal\n\ "; static char *usage_2 = "\ -O : optimize generated bytecode (a tad; also PYTHONOPTIMIZE=x)\n\ -OO : remove doc-strings in addition to the -O optimizations\n\ -Q arg : division options: -Qold (default), -Qwarn, -Qwarnall, -Qnew\n\ -S : don't imply 'import site' on initialization\n\ -t : issue warnings about inconsistent tab usage (-tt: issue errors)\n\ -u : unbuffered binary stdout and stderr (also PYTHONUNBUFFERED=x)\n\ see man page for details on internal buffering relating to '-u'\n\ "; static char *usage_3 = "\ -v : verbose (trace import statements) (also PYTHONVERBOSE=x)\n\ -V : print the Python version number and exit\n\ -W arg : warning control (arg is action:message:category:module:lineno)\n\ -x : skip first line of source, allowing use of non-Unix forms of #!cmd\n\ file : program read from script file\n\ - : program read from stdin (default; interactive mode if a tty)\n\ "; static char *usage_4 = "\ arg ...: arguments passed to program in sys.argv[1:]\n\ Other environment variables:\n\ PYTHONSTARTUP: file executed on interactive startup (no default)\n\ PYTHONPATH : '%c'-separated list of directories prefixed to the\n\ default module search path. The result is sys.path.\n\ PYTHONHOME : alternate directory (or %c).\n\ The default module search path uses %s.\n\ PYTHONCASEOK : ignore case in 'import' statements (Windows).\n\ "; static int usage(int exitcode, char* program) { FILE *f = exitcode ? stderr : stdout; fprintf(f, usage_line, program); if (exitcode) fprintf(f, "Try `python -h' for more information.\n"); else { fprintf(f, usage_1); fprintf(f, usage_2); fprintf(f, usage_3); fprintf(f, usage_4, DELIM, DELIM, PYTHONHOMEHELP); } #if defined(__VMS) if (exitcode == 0) { /* suppress 'error' message */ return 1; } else { /* STS$M_INHIB_MSG + SS$_ABORT */ return 0x1000002c; } #else return exitcode; #endif /*NOTREACHED*/ } /* Main program */ int Py_Main(int argc, char **argv) { int c; int sts; char *command = NULL; char *filename = NULL; FILE *fp = stdin; char *p; int inspect = 0; int unbuffered = 0; int skipfirstline = 0; int stdin_is_interactive = 0; int help = 0; int version = 0; int saw_inspect_flag = 0; int saw_unbuffered_flag = 0; PyCompilerFlags cf; cf.cf_flags = 0; orig_argc = argc; /* For Py_GetArgcArgv() */ orig_argv = argv; #ifdef RISCOS Py_RISCOSWimpFlag = 0; #endif PySys_ResetWarnOptions(); while ((c = _PyOS_GetOpt(argc, argv, PROGRAM_OPTS)) != EOF) { if (c == 'c') { /* -c is the last option; following arguments that look like options are left for the command to interpret. */ command = malloc(strlen(_PyOS_optarg) + 2); if (command == NULL) Py_FatalError( "not enough memory to copy -c argument"); strcpy(command, _PyOS_optarg); strcat(command, "\n"); break; } switch (c) { case 'd': Py_DebugFlag++; break; case 'Q': if (strcmp(_PyOS_optarg, "old") == 0) { Py_DivisionWarningFlag = 0; break; } if (strcmp(_PyOS_optarg, "warn") == 0) { Py_DivisionWarningFlag = 1; break; } if (strcmp(_PyOS_optarg, "warnall") == 0) { Py_DivisionWarningFlag = 2; break; } if (strcmp(_PyOS_optarg, "new") == 0) { /* This only affects __main__ */ cf.cf_flags |= CO_FUTURE_DIVISION; /* And this tells the eval loop to treat BINARY_DIVIDE as BINARY_TRUE_DIVIDE */ _Py_QnewFlag = 1; break; } fprintf(stderr, "-Q option should be `-Qold', " "`-Qwarn', `-Qwarnall', or `-Qnew' only\n"); return usage(2, argv[0]); /* NOTREACHED */ case 'i': inspect++; saw_inspect_flag = 1; Py_InteractiveFlag++; break; case 'O': Py_OptimizeFlag++; break; case 'S': Py_NoSiteFlag++; break; case 'E': Py_IgnoreEnvironmentFlag++; break; case 't': Py_TabcheckFlag++; break; case 'u': unbuffered++; saw_unbuffered_flag = 1; break; case 'v': Py_VerboseFlag++; break; #ifdef RISCOS case 'w': Py_RISCOSWimpFlag = 1; break; #endif case 'x': skipfirstline = 1; break; case 'U': Py_UnicodeFlag++; break; case 'h': help++; break; case 'V': version++; break; case 'W': PySys_AddWarnOption(_PyOS_optarg); break; /* This space reserved for other options */ default: return usage(2, argv[0]); /*NOTREACHED*/ } } if (help) return usage(0, argv[0]); if (version) { fprintf(stderr, "Python %s\n", PY_VERSION); return 0; } if (!saw_inspect_flag && (p = Py_GETENV("PYTHONINSPECT")) && *p != '\0') inspect = 1; if (!saw_unbuffered_flag && (p = Py_GETENV("PYTHONUNBUFFERED")) && *p != '\0') unbuffered = 1; if (command == NULL && _PyOS_optind < argc && strcmp(argv[_PyOS_optind], "-") != 0) { #ifdef __VMS filename = decc$translate_vms(argv[_PyOS_optind]); if (filename == (char *)0 || filename == (char *)-1) filename = argv[_PyOS_optind]; #else filename = argv[_PyOS_optind]; #endif if (filename != NULL) { if ((fp = fopen(filename, "r")) == NULL) { fprintf(stderr, "%s: can't open file '%s'\n", argv[0], filename); return 2; } else if (skipfirstline) { int ch; /* Push back first newline so line numbers remain the same */ while ((ch = getc(fp)) != EOF) { if (ch == '\n') { (void)ungetc(ch, fp); break; } } } } } stdin_is_interactive = Py_FdIsInteractive(stdin, (char *)0); if (unbuffered) { #if defined(MS_WINDOWS) || defined(__CYGWIN__) _setmode(fileno(stdin), O_BINARY); _setmode(fileno(stdout), O_BINARY); #endif #ifndef MPW #ifdef HAVE_SETVBUF setvbuf(stdin, (char *)NULL, _IONBF, BUFSIZ); setvbuf(stdout, (char *)NULL, _IONBF, BUFSIZ); setvbuf(stderr, (char *)NULL, _IONBF, BUFSIZ); #else /* !HAVE_SETVBUF */ setbuf(stdin, (char *)NULL); setbuf(stdout, (char *)NULL); setbuf(stderr, (char *)NULL); #endif /* !HAVE_SETVBUF */ #else /* MPW */ /* On MPW (3.2) unbuffered seems to hang */ setvbuf(stdin, (char *)NULL, _IOLBF, BUFSIZ); setvbuf(stdout, (char *)NULL, _IOLBF, BUFSIZ); setvbuf(stderr, (char *)NULL, _IOLBF, BUFSIZ); #endif /* MPW */ } else if (Py_InteractiveFlag) { #ifdef MS_WINDOWS /* Doesn't have to have line-buffered -- use unbuffered */ /* Any set[v]buf(stdin, ...) screws up Tkinter :-( */ setvbuf(stdout, (char *)NULL, _IONBF, BUFSIZ); #else /* !MS_WINDOWS */ #ifdef HAVE_SETVBUF setvbuf(stdin, (char *)NULL, _IOLBF, BUFSIZ); setvbuf(stdout, (char *)NULL, _IOLBF, BUFSIZ); #endif /* HAVE_SETVBUF */ #endif /* !MS_WINDOWS */ /* Leave stderr alone - it should be unbuffered anyway. */ } #ifdef __VMS else { setvbuf (stdout, (char *)NULL, _IOLBF, BUFSIZ); } #endif /* __VMS */ #ifdef __APPLE__ /* On MacOS X, when the Python interpreter is embedded in an application bundle, it gets executed by a bootstrapping script that does os.execve() with an argv[0] that's different from the actual Python executable. This is needed to keep the Finder happy, or rather, to work around Apple's overly strict requirements of the process name. However, we still need a usable sys.executable, so the actual executable path is passed in an environment variable. See Lib/plat-mac/bundlebuiler.py for details about the bootstrap script. */ if ((p = Py_GETENV("PYTHONEXECUTABLE")) && *p != '\0') Py_SetProgramName(p); else Py_SetProgramName(argv[0]); #else Py_SetProgramName(argv[0]); #endif Py_Initialize(); if (Py_VerboseFlag || (command == NULL && filename == NULL && stdin_is_interactive)) { fprintf(stderr, "Python %s on %s\n", Py_GetVersion(), Py_GetPlatform()); if (!Py_NoSiteFlag) fprintf(stderr, "%s\n", COPYRIGHT); } if (command != NULL) { /* Backup _PyOS_optind and force sys.argv[0] = '-c' */ _PyOS_optind--; argv[_PyOS_optind] = "-c"; } PySys_SetArgv(argc-_PyOS_optind, argv+_PyOS_optind); if ((inspect || (command == NULL && filename == NULL)) && isatty(fileno(stdin))) { PyObject *v; v = PyImport_ImportModule("readline"); if (v == NULL) PyErr_Clear(); else Py_DECREF(v); } if (command) { sts = PyRun_SimpleStringFlags(command, &cf) != 0; free(command); } else { if (filename == NULL && stdin_is_interactive) { char *startup = Py_GETENV("PYTHONSTARTUP"); if (startup != NULL && startup[0] != '\0') { FILE *fp = fopen(startup, "r"); if (fp != NULL) { (void) PyRun_SimpleFile(fp, startup); PyErr_Clear(); fclose(fp); } } } /* XXX */ sts = PyRun_AnyFileExFlags( fp, filename == NULL ? "" : filename, filename != NULL, &cf) != 0; } /* Check this environment variable at the end, to give programs the * opportunity to set it from Python. */ if (!saw_inspect_flag && (p = Py_GETENV("PYTHONINSPECT")) && *p != '\0') { inspect = 1; } if (inspect && stdin_is_interactive && (filename != NULL || command != NULL)) /* XXX */ sts = PyRun_AnyFileFlags(stdin, "", &cf) != 0; Py_Finalize(); #ifdef RISCOS if (Py_RISCOSWimpFlag) fprintf(stderr, "\x0cq\x0c"); /* make frontend quit */ #endif #ifdef __INSURE__ /* Insure++ is a memory analysis tool that aids in discovering * memory leaks and other memory problems. On Python exit, the * interned string dictionary is flagged as being in use at exit * (which it is). Under normal circumstances, this is fine because * the memory will be automatically reclaimed by the system. Under * memory debugging, it's a huge source of useless noise, so we * trade off slower shutdown for less distraction in the memory * reports. -baw */ _Py_ReleaseInternedStrings(); #endif /* __INSURE__ */ return sts; } /* Make the *original* argc/argv available to other modules. This is rare, but it is needed by the secureware extension. */ void Py_GetArgcArgv(int *argc, char ***argv) { *argc = orig_argc; *argv = orig_argv; } Python-2.3.7/Modules/pwdmodule.c0000644001241000117560000001102410003316142016010 0ustar loewishpifb6 /* UNIX password file access module */ #include "Python.h" #include "structseq.h" #include #include static PyStructSequence_Field struct_pwd_type_fields[] = { {"pw_name", "user name"}, {"pw_passwd", "password"}, {"pw_uid", "user id"}, {"pw_gid", "group id"}, {"pw_gecos", "real name"}, {"pw_dir", "home directory"}, {"pw_shell", "shell program"}, {0} }; PyDoc_STRVAR(struct_passwd__doc__, "pwd.struct_passwd: Results from getpw*() routines.\n\n\ This object may be accessed either as a tuple of\n\ (pw_name,pw_passwd,pw_uid,pw_gid,pw_gecos,pw_dir,pw_shell)\n\ or via the object attributes as named in the above tuple."); static PyStructSequence_Desc struct_pwd_type_desc = { "pwd.struct_passwd", struct_passwd__doc__, struct_pwd_type_fields, 7, }; PyDoc_STRVAR(pwd__doc__, "This module provides access to the Unix password database.\n\ It is available on all Unix versions.\n\ \n\ Password database entries are reported as 7-tuples containing the following\n\ items from the password database (see `'), in order:\n\ pw_name, pw_passwd, pw_uid, pw_gid, pw_gecos, pw_dir, pw_shell.\n\ The uid and gid items are integers, all others are strings. An\n\ exception is raised if the entry asked for cannot be found."); static PyTypeObject StructPwdType; static void sets(PyObject *v, int i, char* val) { if (val) PyStructSequence_SET_ITEM(v, i, PyString_FromString(val)); else { PyStructSequence_SET_ITEM(v, i, Py_None); Py_INCREF(Py_None); } } static PyObject * mkpwent(struct passwd *p) { int setIndex = 0; PyObject *v = PyStructSequence_New(&StructPwdType); if (v == NULL) return NULL; #define SETI(i,val) PyStructSequence_SET_ITEM(v, i, PyInt_FromLong((long) val)) #define SETS(i,val) sets(v, i, val) SETS(setIndex++, p->pw_name); #ifdef __VMS SETS(setIndex++, ""); #else SETS(setIndex++, p->pw_passwd); #endif SETI(setIndex++, p->pw_uid); SETI(setIndex++, p->pw_gid); #ifdef __VMS SETS(setIndex++, ""); #else SETS(setIndex++, p->pw_gecos); #endif SETS(setIndex++, p->pw_dir); SETS(setIndex++, p->pw_shell); #undef SETS #undef SETI if (PyErr_Occurred()) { Py_XDECREF(v); return NULL; } return v; } PyDoc_STRVAR(pwd_getpwuid__doc__, "getpwuid(uid) -> (pw_name,pw_passwd,pw_uid,\n\ pw_gid,pw_gecos,pw_dir,pw_shell)\n\ Return the password database entry for the given numeric user ID.\n\ See pwd.__doc__ for more on password database entries."); static PyObject * pwd_getpwuid(PyObject *self, PyObject *args) { int uid; struct passwd *p; if (!PyArg_ParseTuple(args, "i:getpwuid", &uid)) return NULL; if ((p = getpwuid(uid)) == NULL) { PyErr_Format(PyExc_KeyError, "getpwuid(): uid not found: %d", uid); return NULL; } return mkpwent(p); } PyDoc_STRVAR(pwd_getpwnam__doc__, "getpwnam(name) -> (pw_name,pw_passwd,pw_uid,\n\ pw_gid,pw_gecos,pw_dir,pw_shell)\n\ Return the password database entry for the given user name.\n\ See pwd.__doc__ for more on password database entries."); static PyObject * pwd_getpwnam(PyObject *self, PyObject *args) { char *name; struct passwd *p; if (!PyArg_ParseTuple(args, "s:getpwnam", &name)) return NULL; if ((p = getpwnam(name)) == NULL) { PyErr_Format(PyExc_KeyError, "getpwnam(): name not found: %s", name); return NULL; } return mkpwent(p); } #ifdef HAVE_GETPWENT PyDoc_STRVAR(pwd_getpwall__doc__, "getpwall() -> list_of_entries\n\ Return a list of all available password database entries, \ in arbitrary order.\n\ See pwd.__doc__ for more on password database entries."); static PyObject * pwd_getpwall(PyObject *self) { PyObject *d; struct passwd *p; if ((d = PyList_New(0)) == NULL) return NULL; #if defined(PYOS_OS2) && defined(PYCC_GCC) if ((p = getpwuid(0)) != NULL) { #else setpwent(); while ((p = getpwent()) != NULL) { #endif PyObject *v = mkpwent(p); if (v == NULL || PyList_Append(d, v) != 0) { Py_XDECREF(v); Py_DECREF(d); return NULL; } Py_DECREF(v); } endpwent(); return d; } #endif static PyMethodDef pwd_methods[] = { {"getpwuid", pwd_getpwuid, METH_VARARGS, pwd_getpwuid__doc__}, {"getpwnam", pwd_getpwnam, METH_VARARGS, pwd_getpwnam__doc__}, #ifdef HAVE_GETPWENT {"getpwall", (PyCFunction)pwd_getpwall, METH_NOARGS, pwd_getpwall__doc__}, #endif {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initpwd(void) { PyObject *m; m = Py_InitModule3("pwd", pwd_methods, pwd__doc__); PyStructSequence_InitType(&StructPwdType, &struct_pwd_type_desc); Py_INCREF((PyObject *) &StructPwdType); PyModule_AddObject(m, "struct_pwent", (PyObject *) &StructPwdType); } Python-2.3.7/Modules/gdbmmodule.c0000644001241000117560000003527010073003224016141 0ustar loewishpifb6 /* DBM module using dictionary interface */ /* Author: Anthony Baxter, after dbmmodule.c */ /* Doc strings: Mitch Chapman */ #include "Python.h" #include #include #include #include "gdbm.h" #if defined(WIN32) && !defined(__CYGWIN__) #include "gdbmerrno.h" extern const char * gdbm_strerror(gdbm_error); #endif PyDoc_STRVAR(gdbmmodule__doc__, "This module provides an interface to the GNU DBM (GDBM) library.\n\ \n\ This module is quite similar to the dbm module, but uses GDBM instead to\n\ provide some additional functionality. Please note that the file formats\n\ created by GDBM and dbm are incompatible. \n\ \n\ GDBM objects behave like mappings (dictionaries), except that keys and\n\ values are always strings. Printing a GDBM object doesn't print the\n\ keys and values, and the items() and values() methods are not\n\ supported."); typedef struct { PyObject_HEAD int di_size; /* -1 means recompute */ GDBM_FILE di_dbm; } dbmobject; static PyTypeObject Dbmtype; #define is_dbmobject(v) ((v)->ob_type == &Dbmtype) #define check_dbmobject_open(v) if ((v)->di_dbm == NULL) \ { PyErr_SetString(DbmError, "GDBM object has already been closed"); \ return NULL; } static PyObject *DbmError; PyDoc_STRVAR(gdbm_object__doc__, "This object represents a GDBM database.\n\ GDBM objects behave like mappings (dictionaries), except that keys and\n\ values are always strings. Printing a GDBM object doesn't print the\n\ keys and values, and the items() and values() methods are not\n\ supported.\n\ \n\ GDBM objects also support additional operations such as firstkey,\n\ nextkey, reorganize, and sync."); static PyObject * newdbmobject(char *file, int flags, int mode) { dbmobject *dp; dp = PyObject_New(dbmobject, &Dbmtype); if (dp == NULL) return NULL; dp->di_size = -1; errno = 0; if ((dp->di_dbm = gdbm_open(file, 0, flags, mode, NULL)) == 0) { if (errno != 0) PyErr_SetFromErrno(DbmError); else PyErr_SetString(DbmError, gdbm_strerror(gdbm_errno)); Py_DECREF(dp); return NULL; } return (PyObject *)dp; } /* Methods */ static void dbm_dealloc(register dbmobject *dp) { if (dp->di_dbm) gdbm_close(dp->di_dbm); PyObject_Del(dp); } static int dbm_length(dbmobject *dp) { if (dp->di_dbm == NULL) { PyErr_SetString(DbmError, "GDBM object has already been closed"); return -1; } if (dp->di_size < 0) { datum key,okey; int size; okey.dsize=0; size = 0; for (key=gdbm_firstkey(dp->di_dbm); key.dptr; key = gdbm_nextkey(dp->di_dbm,okey)) { size++; if(okey.dsize) free(okey.dptr); okey=key; } dp->di_size = size; } return dp->di_size; } static PyObject * dbm_subscript(dbmobject *dp, register PyObject *key) { PyObject *v; datum drec, krec; if (!PyArg_Parse(key, "s#", &krec.dptr, &krec.dsize) ) return NULL; if (dp->di_dbm == NULL) { PyErr_SetString(DbmError, "GDBM object has already been closed"); return NULL; } drec = gdbm_fetch(dp->di_dbm, krec); if (drec.dptr == 0) { PyErr_SetString(PyExc_KeyError, PyString_AS_STRING((PyStringObject *)key)); return NULL; } v = PyString_FromStringAndSize(drec.dptr, drec.dsize); free(drec.dptr); return v; } static int dbm_ass_sub(dbmobject *dp, PyObject *v, PyObject *w) { datum krec, drec; if (!PyArg_Parse(v, "s#", &krec.dptr, &krec.dsize) ) { PyErr_SetString(PyExc_TypeError, "gdbm mappings have string indices only"); return -1; } if (dp->di_dbm == NULL) { PyErr_SetString(DbmError, "GDBM object has already been closed"); return -1; } dp->di_size = -1; if (w == NULL) { if (gdbm_delete(dp->di_dbm, krec) < 0) { PyErr_SetString(PyExc_KeyError, PyString_AS_STRING((PyStringObject *)v)); return -1; } } else { if (!PyArg_Parse(w, "s#", &drec.dptr, &drec.dsize)) { PyErr_SetString(PyExc_TypeError, "gdbm mappings have string elements only"); return -1; } errno = 0; if (gdbm_store(dp->di_dbm, krec, drec, GDBM_REPLACE) < 0) { if (errno != 0) PyErr_SetFromErrno(DbmError); else PyErr_SetString(DbmError, gdbm_strerror(gdbm_errno)); return -1; } } return 0; } static PyMappingMethods dbm_as_mapping = { (inquiry)dbm_length, /*mp_length*/ (binaryfunc)dbm_subscript, /*mp_subscript*/ (objobjargproc)dbm_ass_sub, /*mp_ass_subscript*/ }; PyDoc_STRVAR(dbm_close__doc__, "close() -> None\n\ Closes the database."); static PyObject * dbm_close(register dbmobject *dp, PyObject *args) { if (!PyArg_ParseTuple(args, ":close")) return NULL; if (dp->di_dbm) gdbm_close(dp->di_dbm); dp->di_dbm = NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(dbm_keys__doc__, "keys() -> list_of_keys\n\ Get a list of all keys in the database."); static PyObject * dbm_keys(register dbmobject *dp, PyObject *args) { register PyObject *v, *item; datum key, nextkey; int err; if (dp == NULL || !is_dbmobject(dp)) { PyErr_BadInternalCall(); return NULL; } if (!PyArg_ParseTuple(args, ":keys")) return NULL; check_dbmobject_open(dp); v = PyList_New(0); if (v == NULL) return NULL; key = gdbm_firstkey(dp->di_dbm); while (key.dptr) { item = PyString_FromStringAndSize(key.dptr, key.dsize); if (item == NULL) { free(key.dptr); Py_DECREF(v); return NULL; } err = PyList_Append(v, item); Py_DECREF(item); if (err != 0) { free(key.dptr); Py_DECREF(v); return NULL; } nextkey = gdbm_nextkey(dp->di_dbm, key); free(key.dptr); key = nextkey; } return v; } PyDoc_STRVAR(dbm_has_key__doc__, "has_key(key) -> boolean\n\ Find out whether or not the database contains a given key."); static PyObject * dbm_has_key(register dbmobject *dp, PyObject *args) { datum key; if (!PyArg_ParseTuple(args, "s#:has_key", &key.dptr, &key.dsize)) return NULL; check_dbmobject_open(dp); return PyInt_FromLong((long) gdbm_exists(dp->di_dbm, key)); } PyDoc_STRVAR(dbm_firstkey__doc__, "firstkey() -> key\n\ It's possible to loop over every key in the database using this method\n\ and the nextkey() method. The traversal is ordered by GDBM's internal\n\ hash values, and won't be sorted by the key values. This method\n\ returns the starting key."); static PyObject * dbm_firstkey(register dbmobject *dp, PyObject *args) { register PyObject *v; datum key; if (!PyArg_ParseTuple(args, ":firstkey")) return NULL; check_dbmobject_open(dp); key = gdbm_firstkey(dp->di_dbm); if (key.dptr) { v = PyString_FromStringAndSize(key.dptr, key.dsize); free(key.dptr); return v; } else { Py_INCREF(Py_None); return Py_None; } } PyDoc_STRVAR(dbm_nextkey__doc__, "nextkey(key) -> next_key\n\ Returns the key that follows key in the traversal.\n\ The following code prints every key in the database db, without having\n\ to create a list in memory that contains them all:\n\ \n\ k = db.firstkey()\n\ while k != None:\n\ print k\n\ k = db.nextkey(k)"); static PyObject * dbm_nextkey(register dbmobject *dp, PyObject *args) { register PyObject *v; datum key, nextkey; if (!PyArg_ParseTuple(args, "s#:nextkey", &key.dptr, &key.dsize)) return NULL; check_dbmobject_open(dp); nextkey = gdbm_nextkey(dp->di_dbm, key); if (nextkey.dptr) { v = PyString_FromStringAndSize(nextkey.dptr, nextkey.dsize); free(nextkey.dptr); return v; } else { Py_INCREF(Py_None); return Py_None; } } PyDoc_STRVAR(dbm_reorganize__doc__, "reorganize() -> None\n\ If you have carried out a lot of deletions and would like to shrink\n\ the space used by the GDBM file, this routine will reorganize the\n\ database. GDBM will not shorten the length of a database file except\n\ by using this reorganization; otherwise, deleted file space will be\n\ kept and reused as new (key,value) pairs are added."); static PyObject * dbm_reorganize(register dbmobject *dp, PyObject *args) { if (!PyArg_ParseTuple(args, ":reorganize")) return NULL; check_dbmobject_open(dp); errno = 0; if (gdbm_reorganize(dp->di_dbm) < 0) { if (errno != 0) PyErr_SetFromErrno(DbmError); else PyErr_SetString(DbmError, gdbm_strerror(gdbm_errno)); return NULL; } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(dbm_sync__doc__, "sync() -> None\n\ When the database has been opened in fast mode, this method forces\n\ any unwritten data to be written to the disk."); static PyObject * dbm_sync(register dbmobject *dp, PyObject *args) { if (!PyArg_ParseTuple(args, ":sync")) return NULL; check_dbmobject_open(dp); gdbm_sync(dp->di_dbm); Py_INCREF(Py_None); return Py_None; } static PyMethodDef dbm_methods[] = { {"close", (PyCFunction)dbm_close, METH_VARARGS, dbm_close__doc__}, {"keys", (PyCFunction)dbm_keys, METH_VARARGS, dbm_keys__doc__}, {"has_key", (PyCFunction)dbm_has_key, METH_VARARGS, dbm_has_key__doc__}, {"firstkey", (PyCFunction)dbm_firstkey,METH_VARARGS, dbm_firstkey__doc__}, {"nextkey", (PyCFunction)dbm_nextkey, METH_VARARGS, dbm_nextkey__doc__}, {"reorganize",(PyCFunction)dbm_reorganize,METH_VARARGS, dbm_reorganize__doc__}, {"sync", (PyCFunction)dbm_sync, METH_VARARGS, dbm_sync__doc__}, {NULL, NULL} /* sentinel */ }; static PyObject * dbm_getattr(dbmobject *dp, char *name) { return Py_FindMethod(dbm_methods, (PyObject *)dp, name); } static PyTypeObject Dbmtype = { PyObject_HEAD_INIT(0) 0, "gdbm.gdbm", sizeof(dbmobject), 0, (destructor)dbm_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)dbm_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ &dbm_as_mapping, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ 0, /*tp_xxx4*/ gdbm_object__doc__, /*tp_doc*/ }; /* ----------------------------------------------------------------- */ PyDoc_STRVAR(dbmopen__doc__, "open(filename, [flags, [mode]]) -> dbm_object\n\ Open a dbm database and return a dbm object. The filename argument is\n\ the name of the database file.\n\ \n\ The optional flags argument can be 'r' (to open an existing database\n\ for reading only -- default), 'w' (to open an existing database for\n\ reading and writing), 'c' (which creates the database if it doesn't\n\ exist), or 'n' (which always creates a new empty database).\n\ \n\ Some versions of gdbm support additional flags which must be\n\ appended to one of the flags described above. The module constant\n\ 'open_flags' is a string of valid additional flags. The 'f' flag\n\ opens the database in fast mode; altered data will not automatically\n\ be written to the disk after every change. This results in faster\n\ writes to the database, but may result in an inconsistent database\n\ if the program crashes while the database is still open. Use the\n\ sync() method to force any unwritten data to be written to the disk.\n\ The 's' flag causes all database operations to be synchronized to\n\ disk. The 'u' flag disables locking of the database file.\n\ \n\ The optional mode argument is the Unix mode of the file, used only\n\ when the database has to be created. It defaults to octal 0666. "); static PyObject * dbmopen(PyObject *self, PyObject *args) { char *name; char *flags = "r"; int iflags; int mode = 0666; if (!PyArg_ParseTuple(args, "s|si:open", &name, &flags, &mode)) return NULL; switch (flags[0]) { case 'r': iflags = GDBM_READER; break; case 'w': iflags = GDBM_WRITER; break; case 'c': iflags = GDBM_WRCREAT; break; case 'n': iflags = GDBM_NEWDB; break; default: PyErr_SetString(DbmError, "First flag must be one of 'r', 'w', 'c' or 'n'"); return NULL; } for (flags++; *flags != '\0'; flags++) { char buf[40]; switch (*flags) { #ifdef GDBM_FAST case 'f': iflags |= GDBM_FAST; break; #endif #ifdef GDBM_SYNC case 's': iflags |= GDBM_SYNC; break; #endif #ifdef GDBM_NOLOCK case 'u': iflags |= GDBM_NOLOCK; break; #endif default: PyOS_snprintf(buf, sizeof(buf), "Flag '%c' is not supported.", *flags); PyErr_SetString(DbmError, buf); return NULL; } } return newdbmobject(name, iflags, mode); } static char dbmmodule_open_flags[] = "rwcn" #ifdef GDBM_FAST "f" #endif #ifdef GDBM_SYNC "s" #endif #ifdef GDBM_NOLOCK "u" #endif ; static PyMethodDef dbmmodule_methods[] = { { "open", (PyCFunction)dbmopen, METH_VARARGS, dbmopen__doc__}, { 0, 0 }, }; PyMODINIT_FUNC initgdbm(void) { PyObject *m, *d, *s; Dbmtype.ob_type = &PyType_Type; m = Py_InitModule4("gdbm", dbmmodule_methods, gdbmmodule__doc__, (PyObject *)NULL, PYTHON_API_VERSION); d = PyModule_GetDict(m); DbmError = PyErr_NewException("gdbm.error", NULL, NULL); if (DbmError != NULL) { PyDict_SetItemString(d, "error", DbmError); s = PyString_FromString(dbmmodule_open_flags); PyDict_SetItemString(d, "open_flags", s); Py_DECREF(s); } } Python-2.3.7/Modules/timing.h0000644001241000117560000000510106102241476015317 0ustar loewishpifb6/* * Copyright (c) 1993 George V. Neville-Neil * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by George V. Neville-Neil * 4. The name, George Neville-Neil may not be used to endorse or promote * products derived from this software without specific prior * written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #ifndef _TIMING_H_ #define _TIMING_H_ #ifdef TIME_WITH_SYS_TIME #include #include #else /* !TIME_WITH_SYS_TIME */ #ifdef HAVE_SYS_TIME_H #include #else /* !HAVE_SYS_TIME_H */ #include #endif /* !HAVE_SYS_TIME_H */ #endif /* !TIME_WITH_SYS_TIME */ static struct timeval aftertp, beforetp; #define BEGINTIMING gettimeofday(&beforetp, NULL) #define ENDTIMING gettimeofday(&aftertp, NULL); \ if(beforetp.tv_usec > aftertp.tv_usec) \ { \ aftertp.tv_usec += 1000000; \ aftertp.tv_sec--; \ } #define TIMINGUS (((aftertp.tv_sec - beforetp.tv_sec) * 1000000) + \ (aftertp.tv_usec - beforetp.tv_usec)) #define TIMINGMS (((aftertp.tv_sec - beforetp.tv_sec) * 1000) + \ ((aftertp.tv_usec - beforetp.tv_usec) / 1000)) #define TIMINGS ((aftertp.tv_sec - beforetp.tv_sec) + \ (aftertp.tv_usec - beforetp.tv_usec) / 1000000) #endif /* _TIMING_H_ */ Python-2.3.7/Modules/ccpython.cc0000644001241000117560000000033407026223310016011 0ustar loewishpifb6/* Minimal main program -- everything is loaded from the library */ #include "Python.h" extern "C" DL_EXPORT(int) Py_Main( int argc, char *argv[] ); int main( int argc, char *argv[] ) { return Py_Main(argc, argv); } Python-2.3.7/Modules/expat/0000755001241000117560000000000010765544544015017 5ustar loewishpifb6Python-2.3.7/Modules/expat/utf8tab.h0000644001241000117560000000334307745310333016537 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ /* 0x80 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0x84 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0x88 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0x8C */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0x90 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0x94 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0x98 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0x9C */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xA0 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xA4 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xA8 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xAC */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xB0 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xB4 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xB8 */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xBC */ BT_TRAIL, BT_TRAIL, BT_TRAIL, BT_TRAIL, /* 0xC0 */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xC4 */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xC8 */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xCC */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xD0 */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xD4 */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xD8 */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xDC */ BT_LEAD2, BT_LEAD2, BT_LEAD2, BT_LEAD2, /* 0xE0 */ BT_LEAD3, BT_LEAD3, BT_LEAD3, BT_LEAD3, /* 0xE4 */ BT_LEAD3, BT_LEAD3, BT_LEAD3, BT_LEAD3, /* 0xE8 */ BT_LEAD3, BT_LEAD3, BT_LEAD3, BT_LEAD3, /* 0xEC */ BT_LEAD3, BT_LEAD3, BT_LEAD3, BT_LEAD3, /* 0xF0 */ BT_LEAD4, BT_LEAD4, BT_LEAD4, BT_LEAD4, /* 0xF4 */ BT_LEAD4, BT_NONXML, BT_NONXML, BT_NONXML, /* 0xF8 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0xFC */ BT_NONXML, BT_NONXML, BT_MALFORM, BT_MALFORM, Python-2.3.7/Modules/expat/Makefile.in0000644001241000117560000001010207713561412017046 0ustar loewishpifb6################################################################ # Process this file with top-level configure script to produce Makefile # # Copyright 2000 Clark Cooper # # This file is part of EXPAT. # # EXPAT is free software; you can redistribute it and/or modify it # under the terms of the License (based on the MIT/X license) contained # in the file COPYING that comes with this distribution. # # EXPAT IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, # EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF # MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. # IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY # CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, # TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE # SOFTWARE OR THE USE OR OTHER DEALINGS IN EXPAT. # SHELL = @SHELL@ srcdir = @srcdir@ top_srcdir = @top_srcdir@ VPATH = @srcdir@ prefix = @prefix@ exec_prefix = @exec_prefix@ bindir = @bindir@ sbindir = @sbindir@ libexecdir = @libexecdir@ datadir = @datadir@ sysconfdir = @sysconfdir@ sharedstatedir = @sharedstatedir@ localstatedir = @localstatedir@ libdir = @libdir@ infodir = @infodir@ mandir = @mandir@ includedir = @includedir@ oldincludedir = /usr/include subdir = lib top_builddir = .. INSTALL = @INSTALL@ INSTALL_PROGRAM = @INSTALL_PROGRAM@ INSTALL_SCRIPT = @INSTALL_SCRIPT@ INSTALL_DATA = @INSTALL_DATA@ host_alias = @host_alias@ host_triplet = @host@ AS = @AS@ CC = @CC@ DLLTOOL = @DLLTOOL@ LIBTOOL = @LIBTOOL@ LN_S = @LN_S@ OBJDUMP = @OBJDUMP@ PACKAGE = @PACKAGE@ RANLIB = @RANLIB@ VERSION = @VERSION@ LIBRARY = libexpat.la SOURCES = xmlparse.c xmltok.c xmlrole.c OBJECTS = $(SOURCES:.c=.o) LTOBJECTS = $(SOURCES:.c=.lo) TEMPLATES = xmltok_impl.c xmltok_ns.c APIHEADER = expat.h HEADERS = ascii.h iasciitab.h utf8tab.h xmltok.h asciitab.h latin1tab.h \ nametab.h xmldef.h xmlrole.h xmltok_impl.h mkinstalldirs = $(SHELL) $(top_srcdir)/conftools/mkinstalldirs CONFIG_HEADER = ../config.h CONFIG_CLEAN_FILES = INCLUDES = -I$(srcdir) -I. -I.. DEFS = @DEFS@ -DPACKAGE='"$(PACKAGE)"' -DVERSION='"$(PACKAGE)_$(VERSION)"' CPPFLAGS = @CPPFLAGS@ LDFLAGS = @LDFLAGS@ LIBS = @LIBS@ CFLAGS = @CFLAGS@ LIBREVISION = @LIBREVISION@ LIBCURRENT = @LIBCURRENT@ LIBAGE = @LIBAGE@ COMPILE = $(CC) $(DEFS) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) LTCOMPILE = $(LIBTOOL) --mode=compile $(CC) $(DEFS) $(INCLUDES) $(CPPFLAGS) $(CFLAGS) CCLD = $(CC) LINK = $(LIBTOOL) --mode=link $(CCLD) -version-info $(LIBCURRENT):$(LIBREVISION):$(LIBAGE) $(CFLAGS) $(LDFLAGS) -o $@ DIST_COMMON = Makefile.in DISTFILES = $(DIST_COMMON) $(SOURCES) $(TEMPLATES) $(APIHEADER) $(HEADERS) TAR = gtar GZIP_ENV = --best all: $(LIBRARY) .SUFFIXES: .c .lo .o .PHONY: all clean distclean maintainer-clean .c.o: $(COMPILE) -c $< .c.lo: $(LTCOMPILE) -c $< Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status cd $(top_builddir) \ && CONFIG_FILES=$(subdir)/$@ CONFIG_HEADERS= $(SHELL) ./config.status $(top_builddir)/config.status: $(top_builddir)/configure cd $(top_builddir) && $(MAKE) config.status $(top_builddir)/config.h: $(top_builddir)/config.h.in cd $(top_builddir) && $(MAKE) config.h clean: rm -f $(LIBRARY) *.o *.lo *~ rm -rf .libs _libs distclean: clean rm -f Makefile maintainer-clean: distclean check: $(SUBDIRS) @echo @echo This package does not yet have a regression test. @echo install: $(LIBRARY) $(APIHEADER) $(mkinstalldirs) $(libdir) $(includedir) $(LIBTOOL) --mode=install $(INSTALL) $(LIBRARY) $(libdir)/$(LIBRARY) $(INSTALL_DATA) $(APIHEADER) $(includedir) uninstall: $(LIBTOOL) --mode=uninstall rm -f $(libdir)/$(LIBRARY); rm -f $(libdir)/$(APIHEADER) $(LIBRARY): $(LTOBJECTS) $(LINK) -rpath $(libdir) $(LDFLAGS) $(LTOBJECTS) xmlparse.o \ xmlparse.lo: xmlparse.c expat.h xmlrole.h xmltok.h $(top_builddir)/config.h xmlrole.o \ xmlrole.lo: xmlrole.c ascii.h xmlrole.h $(top_builddir)/config.h xmltok.o \ xmltok.lo: xmltok.c xmltok_impl.c xmltok_ns.c \ ascii.h asciitab.h iasciitab.h latin1tab.h nametab.h utf8tab.h \ xmltok.h xmltok_impl.h $(top_builddir)/config.h Python-2.3.7/Modules/expat/xmlrole.h0000644001241000117560000000571707614611231016647 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #ifndef XmlRole_INCLUDED #define XmlRole_INCLUDED 1 #ifdef __VMS /* 0 1 2 3 0 1 2 3 1234567890123456789012345678901 1234567890123456789012345678901 */ #define XmlPrologStateInitExternalEntity XmlPrologStateInitExternalEnt #endif #include "xmltok.h" #ifdef __cplusplus extern "C" { #endif enum { XML_ROLE_ERROR = -1, XML_ROLE_NONE = 0, XML_ROLE_XML_DECL, XML_ROLE_INSTANCE_START, XML_ROLE_DOCTYPE_NONE, XML_ROLE_DOCTYPE_NAME, XML_ROLE_DOCTYPE_SYSTEM_ID, XML_ROLE_DOCTYPE_PUBLIC_ID, XML_ROLE_DOCTYPE_INTERNAL_SUBSET, XML_ROLE_DOCTYPE_CLOSE, XML_ROLE_GENERAL_ENTITY_NAME, XML_ROLE_PARAM_ENTITY_NAME, XML_ROLE_ENTITY_NONE, XML_ROLE_ENTITY_VALUE, XML_ROLE_ENTITY_SYSTEM_ID, XML_ROLE_ENTITY_PUBLIC_ID, XML_ROLE_ENTITY_COMPLETE, XML_ROLE_ENTITY_NOTATION_NAME, XML_ROLE_NOTATION_NONE, XML_ROLE_NOTATION_NAME, XML_ROLE_NOTATION_SYSTEM_ID, XML_ROLE_NOTATION_NO_SYSTEM_ID, XML_ROLE_NOTATION_PUBLIC_ID, XML_ROLE_ATTRIBUTE_NAME, XML_ROLE_ATTRIBUTE_TYPE_CDATA, XML_ROLE_ATTRIBUTE_TYPE_ID, XML_ROLE_ATTRIBUTE_TYPE_IDREF, XML_ROLE_ATTRIBUTE_TYPE_IDREFS, XML_ROLE_ATTRIBUTE_TYPE_ENTITY, XML_ROLE_ATTRIBUTE_TYPE_ENTITIES, XML_ROLE_ATTRIBUTE_TYPE_NMTOKEN, XML_ROLE_ATTRIBUTE_TYPE_NMTOKENS, XML_ROLE_ATTRIBUTE_ENUM_VALUE, XML_ROLE_ATTRIBUTE_NOTATION_VALUE, XML_ROLE_ATTLIST_NONE, XML_ROLE_ATTLIST_ELEMENT_NAME, XML_ROLE_IMPLIED_ATTRIBUTE_VALUE, XML_ROLE_REQUIRED_ATTRIBUTE_VALUE, XML_ROLE_DEFAULT_ATTRIBUTE_VALUE, XML_ROLE_FIXED_ATTRIBUTE_VALUE, XML_ROLE_ELEMENT_NONE, XML_ROLE_ELEMENT_NAME, XML_ROLE_CONTENT_ANY, XML_ROLE_CONTENT_EMPTY, XML_ROLE_CONTENT_PCDATA, XML_ROLE_GROUP_OPEN, XML_ROLE_GROUP_CLOSE, XML_ROLE_GROUP_CLOSE_REP, XML_ROLE_GROUP_CLOSE_OPT, XML_ROLE_GROUP_CLOSE_PLUS, XML_ROLE_GROUP_CHOICE, XML_ROLE_GROUP_SEQUENCE, XML_ROLE_CONTENT_ELEMENT, XML_ROLE_CONTENT_ELEMENT_REP, XML_ROLE_CONTENT_ELEMENT_OPT, XML_ROLE_CONTENT_ELEMENT_PLUS, XML_ROLE_PI, XML_ROLE_COMMENT, #ifdef XML_DTD XML_ROLE_TEXT_DECL, XML_ROLE_IGNORE_SECT, XML_ROLE_INNER_PARAM_ENTITY_REF, #endif /* XML_DTD */ XML_ROLE_PARAM_ENTITY_REF }; typedef struct prolog_state { int (PTRCALL *handler) (struct prolog_state *state, int tok, const char *ptr, const char *end, const ENCODING *enc); unsigned level; int role_none; #ifdef XML_DTD unsigned includeLevel; int documentEntity; int inEntityValue; #endif /* XML_DTD */ } PROLOG_STATE; void XmlPrologStateInit(PROLOG_STATE *); #ifdef XML_DTD void XmlPrologStateInitExternalEntity(PROLOG_STATE *); #endif /* XML_DTD */ #define XmlTokenRole(state, tok, ptr, end, enc) \ (((state)->handler)(state, tok, ptr, end, enc)) #ifdef __cplusplus } #endif #endif /* not XmlRole_INCLUDED */ Python-2.3.7/Modules/expat/nametab.h0000644001241000117560000001561207713561412016574 0ustar loewishpifb6static const unsigned namingBitmap[] = { 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0x00000000, 0x04000000, 0x87FFFFFE, 0x07FFFFFE, 0x00000000, 0x00000000, 0xFF7FFFFF, 0xFF7FFFFF, 0xFFFFFFFF, 0x7FF3FFFF, 0xFFFFFDFE, 0x7FFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFE00F, 0xFC31FFFF, 0x00FFFFFF, 0x00000000, 0xFFFF0000, 0xFFFFFFFF, 0xFFFFFFFF, 0xF80001FF, 0x00000003, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xFFFFD740, 0xFFFFFFFB, 0x547F7FFF, 0x000FFFFD, 0xFFFFDFFE, 0xFFFFFFFF, 0xDFFEFFFF, 0xFFFFFFFF, 0xFFFF0003, 0xFFFFFFFF, 0xFFFF199F, 0x033FCFFF, 0x00000000, 0xFFFE0000, 0x027FFFFF, 0xFFFFFFFE, 0x0000007F, 0x00000000, 0xFFFF0000, 0x000707FF, 0x00000000, 0x07FFFFFE, 0x000007FE, 0xFFFE0000, 0xFFFFFFFF, 0x7CFFFFFF, 0x002F7FFF, 0x00000060, 0xFFFFFFE0, 0x23FFFFFF, 0xFF000000, 0x00000003, 0xFFF99FE0, 0x03C5FDFF, 0xB0000000, 0x00030003, 0xFFF987E0, 0x036DFDFF, 0x5E000000, 0x001C0000, 0xFFFBAFE0, 0x23EDFDFF, 0x00000000, 0x00000001, 0xFFF99FE0, 0x23CDFDFF, 0xB0000000, 0x00000003, 0xD63DC7E0, 0x03BFC718, 0x00000000, 0x00000000, 0xFFFDDFE0, 0x03EFFDFF, 0x00000000, 0x00000003, 0xFFFDDFE0, 0x03EFFDFF, 0x40000000, 0x00000003, 0xFFFDDFE0, 0x03FFFDFF, 0x00000000, 0x00000003, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xFFFFFFFE, 0x000D7FFF, 0x0000003F, 0x00000000, 0xFEF02596, 0x200D6CAE, 0x0000001F, 0x00000000, 0x00000000, 0x00000000, 0xFFFFFEFF, 0x000003FF, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xFFFFFFFF, 0xFFFF003F, 0x007FFFFF, 0x0007DAED, 0x50000000, 0x82315001, 0x002C62AB, 0x40000000, 0xF580C900, 0x00000007, 0x02010800, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0x0FFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0x03FFFFFF, 0x3F3FFFFF, 0xFFFFFFFF, 0xAAFF3F3F, 0x3FFFFFFF, 0xFFFFFFFF, 0x5FDFFFFF, 0x0FCF1FDC, 0x1FDC1FFF, 0x00000000, 0x00004C40, 0x00000000, 0x00000000, 0x00000007, 0x00000000, 0x00000000, 0x00000000, 0x00000080, 0x000003FE, 0xFFFFFFFE, 0xFFFFFFFF, 0x001FFFFF, 0xFFFFFFFE, 0xFFFFFFFF, 0x07FFFFFF, 0xFFFFFFE0, 0x00001FFF, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0x0000003F, 0x00000000, 0x00000000, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0xFFFFFFFF, 0x0000000F, 0x00000000, 0x00000000, 0x00000000, 0x07FF6000, 0x87FFFFFE, 0x07FFFFFE, 0x00000000, 0x00800000, 0xFF7FFFFF, 0xFF7FFFFF, 0x00FFFFFF, 0x00000000, 0xFFFF0000, 0xFFFFFFFF, 0xFFFFFFFF, 0xF80001FF, 0x00030003, 0x00000000, 0xFFFFFFFF, 0xFFFFFFFF, 0x0000003F, 0x00000003, 0xFFFFD7C0, 0xFFFFFFFB, 0x547F7FFF, 0x000FFFFD, 0xFFFFDFFE, 0xFFFFFFFF, 0xDFFEFFFF, 0xFFFFFFFF, 0xFFFF007B, 0xFFFFFFFF, 0xFFFF199F, 0x033FCFFF, 0x00000000, 0xFFFE0000, 0x027FFFFF, 0xFFFFFFFE, 0xFFFE007F, 0xBBFFFFFB, 0xFFFF0016, 0x000707FF, 0x00000000, 0x07FFFFFE, 0x0007FFFF, 0xFFFF03FF, 0xFFFFFFFF, 0x7CFFFFFF, 0xFFEF7FFF, 0x03FF3DFF, 0xFFFFFFEE, 0xF3FFFFFF, 0xFF1E3FFF, 0x0000FFCF, 0xFFF99FEE, 0xD3C5FDFF, 0xB080399F, 0x0003FFCF, 0xFFF987E4, 0xD36DFDFF, 0x5E003987, 0x001FFFC0, 0xFFFBAFEE, 0xF3EDFDFF, 0x00003BBF, 0x0000FFC1, 0xFFF99FEE, 0xF3CDFDFF, 0xB0C0398F, 0x0000FFC3, 0xD63DC7EC, 0xC3BFC718, 0x00803DC7, 0x0000FF80, 0xFFFDDFEE, 0xC3EFFDFF, 0x00603DDF, 0x0000FFC3, 0xFFFDDFEC, 0xC3EFFDFF, 0x40603DDF, 0x0000FFC3, 0xFFFDDFEC, 0xC3FFFDFF, 0x00803DCF, 0x0000FFC3, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xFFFFFFFE, 0x07FF7FFF, 0x03FF7FFF, 0x00000000, 0xFEF02596, 0x3BFF6CAE, 0x03FF3F5F, 0x00000000, 0x03000000, 0xC2A003FF, 0xFFFFFEFF, 0xFFFE03FF, 0xFEBF0FDF, 0x02FE3FFF, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x1FFF0000, 0x00000002, 0x000000A0, 0x003EFFFE, 0xFFFFFFFE, 0xFFFFFFFF, 0x661FFFFF, 0xFFFFFFFE, 0xFFFFFFFF, 0x77FFFFFF, }; static const unsigned char nmstrtPages[] = { 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x00, 0x00, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F, 0x10, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, 0x13, 0x00, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x15, 0x16, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x17, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x18, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, }; static const unsigned char namePages[] = { 0x19, 0x03, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x00, 0x00, 0x1F, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x10, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12, 0x13, 0x26, 0x14, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x27, 0x16, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x17, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x18, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, }; Python-2.3.7/Modules/expat/macconfig.h0000644001241000117560000000522207745310333017106 0ustar loewishpifb6/*================================================================ ** Copyright 2000, Clark Cooper ** All rights reserved. ** ** This is free software. You are permitted to copy, distribute, or modify ** it under the terms of the MIT/X license (contained in the COPYING file ** with this distribution.) ** */ #ifndef MACCONFIG_H #define MACCONFIG_H /* 1234 = LIL_ENDIAN, 4321 = BIGENDIAN */ #define BYTEORDER 4321 /* Define to 1 if you have the `bcopy' function. */ #undef HAVE_BCOPY /* Define to 1 if you have the header file. */ #undef HAVE_DLFCN_H /* Define to 1 if you have the header file. */ #undef HAVE_FCNTL_H /* Define to 1 if you have the `getpagesize' function. */ #undef HAVE_GETPAGESIZE /* Define to 1 if you have the header file. */ #undef HAVE_INTTYPES_H /* Define to 1 if you have the `memmove' function. */ #define HAVE_MEMMOVE /* Define to 1 if you have the header file. */ #undef HAVE_MEMORY_H /* Define to 1 if you have a working `mmap' system call. */ #undef HAVE_MMAP /* Define to 1 if you have the header file. */ #undef HAVE_STDINT_H /* Define to 1 if you have the header file. */ #define HAVE_STDLIB_H /* Define to 1 if you have the header file. */ #undef HAVE_STRINGS_H /* Define to 1 if you have the header file. */ #define HAVE_STRING_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_STAT_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_TYPES_H /* Define to 1 if you have the header file. */ #undef HAVE_UNISTD_H /* Define to the address where bug reports for this package should be sent. */ #undef PACKAGE_BUGREPORT /* Define to the full name of this package. */ #undef PACKAGE_NAME /* Define to the full name and version of this package. */ #undef PACKAGE_STRING /* Define to the one symbol short name of this package. */ #undef PACKAGE_TARNAME /* Define to the version of this package. */ #undef PACKAGE_VERSION /* Define to 1 if you have the ANSI C header files. */ #define STDC_HEADERS /* whether byteorder is bigendian */ #define WORDS_BIGENDIAN /* Define to specify how much context to retain around the current parse point. */ #undef XML_CONTEXT_BYTES /* Define to make parameter entity parsing functionality available. */ #define XML_DTD /* Define to make XML Namespaces functionality available. */ #define XML_NS /* Define to empty if `const' does not conform to ANSI C. */ #undef const /* Define to `long' if does not define. */ #define off_t long /* Define to `unsigned' if does not define. */ #undef size_t #endif /* ifndef MACCONFIG_H */ Python-2.3.7/Modules/expat/xmlrole.c0000644001241000117560000007673707745310333016660 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #ifdef COMPILED_FROM_DSP #include "winconfig.h" #elif defined(MACOS_CLASSIC) #include "macconfig.h" #else #ifdef HAVE_EXPAT_CONFIG_H #include #endif #endif /* ndef COMPILED_FROM_DSP */ #include "internal.h" #include "xmlrole.h" #include "ascii.h" /* Doesn't check: that ,| are not mixed in a model group content of literals */ static const char KW_ANY[] = { ASCII_A, ASCII_N, ASCII_Y, '\0' }; static const char KW_ATTLIST[] = { ASCII_A, ASCII_T, ASCII_T, ASCII_L, ASCII_I, ASCII_S, ASCII_T, '\0' }; static const char KW_CDATA[] = { ASCII_C, ASCII_D, ASCII_A, ASCII_T, ASCII_A, '\0' }; static const char KW_DOCTYPE[] = { ASCII_D, ASCII_O, ASCII_C, ASCII_T, ASCII_Y, ASCII_P, ASCII_E, '\0' }; static const char KW_ELEMENT[] = { ASCII_E, ASCII_L, ASCII_E, ASCII_M, ASCII_E, ASCII_N, ASCII_T, '\0' }; static const char KW_EMPTY[] = { ASCII_E, ASCII_M, ASCII_P, ASCII_T, ASCII_Y, '\0' }; static const char KW_ENTITIES[] = { ASCII_E, ASCII_N, ASCII_T, ASCII_I, ASCII_T, ASCII_I, ASCII_E, ASCII_S, '\0' }; static const char KW_ENTITY[] = { ASCII_E, ASCII_N, ASCII_T, ASCII_I, ASCII_T, ASCII_Y, '\0' }; static const char KW_FIXED[] = { ASCII_F, ASCII_I, ASCII_X, ASCII_E, ASCII_D, '\0' }; static const char KW_ID[] = { ASCII_I, ASCII_D, '\0' }; static const char KW_IDREF[] = { ASCII_I, ASCII_D, ASCII_R, ASCII_E, ASCII_F, '\0' }; static const char KW_IDREFS[] = { ASCII_I, ASCII_D, ASCII_R, ASCII_E, ASCII_F, ASCII_S, '\0' }; static const char KW_IGNORE[] = { ASCII_I, ASCII_G, ASCII_N, ASCII_O, ASCII_R, ASCII_E, '\0' }; static const char KW_IMPLIED[] = { ASCII_I, ASCII_M, ASCII_P, ASCII_L, ASCII_I, ASCII_E, ASCII_D, '\0' }; static const char KW_INCLUDE[] = { ASCII_I, ASCII_N, ASCII_C, ASCII_L, ASCII_U, ASCII_D, ASCII_E, '\0' }; static const char KW_NDATA[] = { ASCII_N, ASCII_D, ASCII_A, ASCII_T, ASCII_A, '\0' }; static const char KW_NMTOKEN[] = { ASCII_N, ASCII_M, ASCII_T, ASCII_O, ASCII_K, ASCII_E, ASCII_N, '\0' }; static const char KW_NMTOKENS[] = { ASCII_N, ASCII_M, ASCII_T, ASCII_O, ASCII_K, ASCII_E, ASCII_N, ASCII_S, '\0' }; static const char KW_NOTATION[] = { ASCII_N, ASCII_O, ASCII_T, ASCII_A, ASCII_T, ASCII_I, ASCII_O, ASCII_N, '\0' }; static const char KW_PCDATA[] = { ASCII_P, ASCII_C, ASCII_D, ASCII_A, ASCII_T, ASCII_A, '\0' }; static const char KW_PUBLIC[] = { ASCII_P, ASCII_U, ASCII_B, ASCII_L, ASCII_I, ASCII_C, '\0' }; static const char KW_REQUIRED[] = { ASCII_R, ASCII_E, ASCII_Q, ASCII_U, ASCII_I, ASCII_R, ASCII_E, ASCII_D, '\0' }; static const char KW_SYSTEM[] = { ASCII_S, ASCII_Y, ASCII_S, ASCII_T, ASCII_E, ASCII_M, '\0' }; #ifndef MIN_BYTES_PER_CHAR #define MIN_BYTES_PER_CHAR(enc) ((enc)->minBytesPerChar) #endif #ifdef XML_DTD #define setTopLevel(state) \ ((state)->handler = ((state)->documentEntity \ ? internalSubset \ : externalSubset1)) #else /* not XML_DTD */ #define setTopLevel(state) ((state)->handler = internalSubset) #endif /* not XML_DTD */ typedef int PTRCALL PROLOG_HANDLER(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc); static PROLOG_HANDLER prolog0, prolog1, prolog2, doctype0, doctype1, doctype2, doctype3, doctype4, doctype5, internalSubset, entity0, entity1, entity2, entity3, entity4, entity5, entity6, entity7, entity8, entity9, entity10, notation0, notation1, notation2, notation3, notation4, attlist0, attlist1, attlist2, attlist3, attlist4, attlist5, attlist6, attlist7, attlist8, attlist9, element0, element1, element2, element3, element4, element5, element6, element7, #ifdef XML_DTD externalSubset0, externalSubset1, condSect0, condSect1, condSect2, #endif /* XML_DTD */ declClose, error; static int FASTCALL common(PROLOG_STATE *state, int tok); static int PTRCALL prolog0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: state->handler = prolog1; return XML_ROLE_NONE; case XML_TOK_XML_DECL: state->handler = prolog1; return XML_ROLE_XML_DECL; case XML_TOK_PI: state->handler = prolog1; return XML_ROLE_PI; case XML_TOK_COMMENT: state->handler = prolog1; return XML_ROLE_COMMENT; case XML_TOK_BOM: return XML_ROLE_NONE; case XML_TOK_DECL_OPEN: if (!XmlNameMatchesAscii(enc, ptr + 2 * MIN_BYTES_PER_CHAR(enc), end, KW_DOCTYPE)) break; state->handler = doctype0; return XML_ROLE_DOCTYPE_NONE; case XML_TOK_INSTANCE_START: state->handler = error; return XML_ROLE_INSTANCE_START; } return common(state, tok); } static int PTRCALL prolog1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NONE; case XML_TOK_PI: return XML_ROLE_PI; case XML_TOK_COMMENT: return XML_ROLE_COMMENT; case XML_TOK_BOM: return XML_ROLE_NONE; case XML_TOK_DECL_OPEN: if (!XmlNameMatchesAscii(enc, ptr + 2 * MIN_BYTES_PER_CHAR(enc), end, KW_DOCTYPE)) break; state->handler = doctype0; return XML_ROLE_DOCTYPE_NONE; case XML_TOK_INSTANCE_START: state->handler = error; return XML_ROLE_INSTANCE_START; } return common(state, tok); } static int PTRCALL prolog2(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NONE; case XML_TOK_PI: return XML_ROLE_PI; case XML_TOK_COMMENT: return XML_ROLE_COMMENT; case XML_TOK_INSTANCE_START: state->handler = error; return XML_ROLE_INSTANCE_START; } return common(state, tok); } static int PTRCALL doctype0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_DOCTYPE_NONE; case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = doctype1; return XML_ROLE_DOCTYPE_NAME; } return common(state, tok); } static int PTRCALL doctype1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_DOCTYPE_NONE; case XML_TOK_OPEN_BRACKET: state->handler = internalSubset; return XML_ROLE_DOCTYPE_INTERNAL_SUBSET; case XML_TOK_DECL_CLOSE: state->handler = prolog2; return XML_ROLE_DOCTYPE_CLOSE; case XML_TOK_NAME: if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) { state->handler = doctype3; return XML_ROLE_DOCTYPE_NONE; } if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) { state->handler = doctype2; return XML_ROLE_DOCTYPE_NONE; } break; } return common(state, tok); } static int PTRCALL doctype2(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_DOCTYPE_NONE; case XML_TOK_LITERAL: state->handler = doctype3; return XML_ROLE_DOCTYPE_PUBLIC_ID; } return common(state, tok); } static int PTRCALL doctype3(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_DOCTYPE_NONE; case XML_TOK_LITERAL: state->handler = doctype4; return XML_ROLE_DOCTYPE_SYSTEM_ID; } return common(state, tok); } static int PTRCALL doctype4(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_DOCTYPE_NONE; case XML_TOK_OPEN_BRACKET: state->handler = internalSubset; return XML_ROLE_DOCTYPE_INTERNAL_SUBSET; case XML_TOK_DECL_CLOSE: state->handler = prolog2; return XML_ROLE_DOCTYPE_CLOSE; } return common(state, tok); } static int PTRCALL doctype5(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_DOCTYPE_NONE; case XML_TOK_DECL_CLOSE: state->handler = prolog2; return XML_ROLE_DOCTYPE_CLOSE; } return common(state, tok); } static int PTRCALL internalSubset(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NONE; case XML_TOK_DECL_OPEN: if (XmlNameMatchesAscii(enc, ptr + 2 * MIN_BYTES_PER_CHAR(enc), end, KW_ENTITY)) { state->handler = entity0; return XML_ROLE_ENTITY_NONE; } if (XmlNameMatchesAscii(enc, ptr + 2 * MIN_BYTES_PER_CHAR(enc), end, KW_ATTLIST)) { state->handler = attlist0; return XML_ROLE_ATTLIST_NONE; } if (XmlNameMatchesAscii(enc, ptr + 2 * MIN_BYTES_PER_CHAR(enc), end, KW_ELEMENT)) { state->handler = element0; return XML_ROLE_ELEMENT_NONE; } if (XmlNameMatchesAscii(enc, ptr + 2 * MIN_BYTES_PER_CHAR(enc), end, KW_NOTATION)) { state->handler = notation0; return XML_ROLE_NOTATION_NONE; } break; case XML_TOK_PI: return XML_ROLE_PI; case XML_TOK_COMMENT: return XML_ROLE_COMMENT; case XML_TOK_PARAM_ENTITY_REF: return XML_ROLE_PARAM_ENTITY_REF; case XML_TOK_CLOSE_BRACKET: state->handler = doctype5; return XML_ROLE_DOCTYPE_NONE; } return common(state, tok); } #ifdef XML_DTD static int PTRCALL externalSubset0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { state->handler = externalSubset1; if (tok == XML_TOK_XML_DECL) return XML_ROLE_TEXT_DECL; return externalSubset1(state, tok, ptr, end, enc); } static int PTRCALL externalSubset1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_COND_SECT_OPEN: state->handler = condSect0; return XML_ROLE_NONE; case XML_TOK_COND_SECT_CLOSE: if (state->includeLevel == 0) break; state->includeLevel -= 1; return XML_ROLE_NONE; case XML_TOK_PROLOG_S: return XML_ROLE_NONE; case XML_TOK_CLOSE_BRACKET: break; case XML_TOK_NONE: if (state->includeLevel) break; return XML_ROLE_NONE; default: return internalSubset(state, tok, ptr, end, enc); } return common(state, tok); } #endif /* XML_DTD */ static int PTRCALL entity0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_PERCENT: state->handler = entity1; return XML_ROLE_ENTITY_NONE; case XML_TOK_NAME: state->handler = entity2; return XML_ROLE_GENERAL_ENTITY_NAME; } return common(state, tok); } static int PTRCALL entity1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_NAME: state->handler = entity7; return XML_ROLE_PARAM_ENTITY_NAME; } return common(state, tok); } static int PTRCALL entity2(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_NAME: if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) { state->handler = entity4; return XML_ROLE_ENTITY_NONE; } if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) { state->handler = entity3; return XML_ROLE_ENTITY_NONE; } break; case XML_TOK_LITERAL: state->handler = declClose; state->role_none = XML_ROLE_ENTITY_NONE; return XML_ROLE_ENTITY_VALUE; } return common(state, tok); } static int PTRCALL entity3(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_LITERAL: state->handler = entity4; return XML_ROLE_ENTITY_PUBLIC_ID; } return common(state, tok); } static int PTRCALL entity4(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_LITERAL: state->handler = entity5; return XML_ROLE_ENTITY_SYSTEM_ID; } return common(state, tok); } static int PTRCALL entity5(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_DECL_CLOSE: setTopLevel(state); return XML_ROLE_ENTITY_COMPLETE; case XML_TOK_NAME: if (XmlNameMatchesAscii(enc, ptr, end, KW_NDATA)) { state->handler = entity6; return XML_ROLE_ENTITY_NONE; } break; } return common(state, tok); } static int PTRCALL entity6(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_NAME: state->handler = declClose; state->role_none = XML_ROLE_ENTITY_NONE; return XML_ROLE_ENTITY_NOTATION_NAME; } return common(state, tok); } static int PTRCALL entity7(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_NAME: if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) { state->handler = entity9; return XML_ROLE_ENTITY_NONE; } if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) { state->handler = entity8; return XML_ROLE_ENTITY_NONE; } break; case XML_TOK_LITERAL: state->handler = declClose; state->role_none = XML_ROLE_ENTITY_NONE; return XML_ROLE_ENTITY_VALUE; } return common(state, tok); } static int PTRCALL entity8(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_LITERAL: state->handler = entity9; return XML_ROLE_ENTITY_PUBLIC_ID; } return common(state, tok); } static int PTRCALL entity9(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_LITERAL: state->handler = entity10; return XML_ROLE_ENTITY_SYSTEM_ID; } return common(state, tok); } static int PTRCALL entity10(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ENTITY_NONE; case XML_TOK_DECL_CLOSE: setTopLevel(state); return XML_ROLE_ENTITY_COMPLETE; } return common(state, tok); } static int PTRCALL notation0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NOTATION_NONE; case XML_TOK_NAME: state->handler = notation1; return XML_ROLE_NOTATION_NAME; } return common(state, tok); } static int PTRCALL notation1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NOTATION_NONE; case XML_TOK_NAME: if (XmlNameMatchesAscii(enc, ptr, end, KW_SYSTEM)) { state->handler = notation3; return XML_ROLE_NOTATION_NONE; } if (XmlNameMatchesAscii(enc, ptr, end, KW_PUBLIC)) { state->handler = notation2; return XML_ROLE_NOTATION_NONE; } break; } return common(state, tok); } static int PTRCALL notation2(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NOTATION_NONE; case XML_TOK_LITERAL: state->handler = notation4; return XML_ROLE_NOTATION_PUBLIC_ID; } return common(state, tok); } static int PTRCALL notation3(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NOTATION_NONE; case XML_TOK_LITERAL: state->handler = declClose; state->role_none = XML_ROLE_NOTATION_NONE; return XML_ROLE_NOTATION_SYSTEM_ID; } return common(state, tok); } static int PTRCALL notation4(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NOTATION_NONE; case XML_TOK_LITERAL: state->handler = declClose; state->role_none = XML_ROLE_NOTATION_NONE; return XML_ROLE_NOTATION_SYSTEM_ID; case XML_TOK_DECL_CLOSE: setTopLevel(state); return XML_ROLE_NOTATION_NO_SYSTEM_ID; } return common(state, tok); } static int PTRCALL attlist0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = attlist1; return XML_ROLE_ATTLIST_ELEMENT_NAME; } return common(state, tok); } static int PTRCALL attlist1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_DECL_CLOSE: setTopLevel(state); return XML_ROLE_ATTLIST_NONE; case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = attlist2; return XML_ROLE_ATTRIBUTE_NAME; } return common(state, tok); } static int PTRCALL attlist2(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_NAME: { static const char *types[] = { KW_CDATA, KW_ID, KW_IDREF, KW_IDREFS, KW_ENTITY, KW_ENTITIES, KW_NMTOKEN, KW_NMTOKENS, }; int i; for (i = 0; i < (int)(sizeof(types)/sizeof(types[0])); i++) if (XmlNameMatchesAscii(enc, ptr, end, types[i])) { state->handler = attlist8; return XML_ROLE_ATTRIBUTE_TYPE_CDATA + i; } } if (XmlNameMatchesAscii(enc, ptr, end, KW_NOTATION)) { state->handler = attlist5; return XML_ROLE_ATTLIST_NONE; } break; case XML_TOK_OPEN_PAREN: state->handler = attlist3; return XML_ROLE_ATTLIST_NONE; } return common(state, tok); } static int PTRCALL attlist3(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_NMTOKEN: case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = attlist4; return XML_ROLE_ATTRIBUTE_ENUM_VALUE; } return common(state, tok); } static int PTRCALL attlist4(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_CLOSE_PAREN: state->handler = attlist8; return XML_ROLE_ATTLIST_NONE; case XML_TOK_OR: state->handler = attlist3; return XML_ROLE_ATTLIST_NONE; } return common(state, tok); } static int PTRCALL attlist5(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_OPEN_PAREN: state->handler = attlist6; return XML_ROLE_ATTLIST_NONE; } return common(state, tok); } static int PTRCALL attlist6(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_NAME: state->handler = attlist7; return XML_ROLE_ATTRIBUTE_NOTATION_VALUE; } return common(state, tok); } static int PTRCALL attlist7(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_CLOSE_PAREN: state->handler = attlist8; return XML_ROLE_ATTLIST_NONE; case XML_TOK_OR: state->handler = attlist6; return XML_ROLE_ATTLIST_NONE; } return common(state, tok); } /* default value */ static int PTRCALL attlist8(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_POUND_NAME: if (XmlNameMatchesAscii(enc, ptr + MIN_BYTES_PER_CHAR(enc), end, KW_IMPLIED)) { state->handler = attlist1; return XML_ROLE_IMPLIED_ATTRIBUTE_VALUE; } if (XmlNameMatchesAscii(enc, ptr + MIN_BYTES_PER_CHAR(enc), end, KW_REQUIRED)) { state->handler = attlist1; return XML_ROLE_REQUIRED_ATTRIBUTE_VALUE; } if (XmlNameMatchesAscii(enc, ptr + MIN_BYTES_PER_CHAR(enc), end, KW_FIXED)) { state->handler = attlist9; return XML_ROLE_ATTLIST_NONE; } break; case XML_TOK_LITERAL: state->handler = attlist1; return XML_ROLE_DEFAULT_ATTRIBUTE_VALUE; } return common(state, tok); } static int PTRCALL attlist9(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ATTLIST_NONE; case XML_TOK_LITERAL: state->handler = attlist1; return XML_ROLE_FIXED_ATTRIBUTE_VALUE; } return common(state, tok); } static int PTRCALL element0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = element1; return XML_ROLE_ELEMENT_NAME; } return common(state, tok); } static int PTRCALL element1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_NAME: if (XmlNameMatchesAscii(enc, ptr, end, KW_EMPTY)) { state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; return XML_ROLE_CONTENT_EMPTY; } if (XmlNameMatchesAscii(enc, ptr, end, KW_ANY)) { state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; return XML_ROLE_CONTENT_ANY; } break; case XML_TOK_OPEN_PAREN: state->handler = element2; state->level = 1; return XML_ROLE_GROUP_OPEN; } return common(state, tok); } static int PTRCALL element2(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_POUND_NAME: if (XmlNameMatchesAscii(enc, ptr + MIN_BYTES_PER_CHAR(enc), end, KW_PCDATA)) { state->handler = element3; return XML_ROLE_CONTENT_PCDATA; } break; case XML_TOK_OPEN_PAREN: state->level = 2; state->handler = element6; return XML_ROLE_GROUP_OPEN; case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT; case XML_TOK_NAME_QUESTION: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT_OPT; case XML_TOK_NAME_ASTERISK: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT_REP; case XML_TOK_NAME_PLUS: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT_PLUS; } return common(state, tok); } static int PTRCALL element3(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_CLOSE_PAREN: state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; return XML_ROLE_GROUP_CLOSE; case XML_TOK_CLOSE_PAREN_ASTERISK: state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; return XML_ROLE_GROUP_CLOSE_REP; case XML_TOK_OR: state->handler = element4; return XML_ROLE_ELEMENT_NONE; } return common(state, tok); } static int PTRCALL element4(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = element5; return XML_ROLE_CONTENT_ELEMENT; } return common(state, tok); } static int PTRCALL element5(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_CLOSE_PAREN_ASTERISK: state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; return XML_ROLE_GROUP_CLOSE_REP; case XML_TOK_OR: state->handler = element4; return XML_ROLE_ELEMENT_NONE; } return common(state, tok); } static int PTRCALL element6(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_OPEN_PAREN: state->level += 1; return XML_ROLE_GROUP_OPEN; case XML_TOK_NAME: case XML_TOK_PREFIXED_NAME: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT; case XML_TOK_NAME_QUESTION: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT_OPT; case XML_TOK_NAME_ASTERISK: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT_REP; case XML_TOK_NAME_PLUS: state->handler = element7; return XML_ROLE_CONTENT_ELEMENT_PLUS; } return common(state, tok); } static int PTRCALL element7(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_ELEMENT_NONE; case XML_TOK_CLOSE_PAREN: state->level -= 1; if (state->level == 0) { state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; } return XML_ROLE_GROUP_CLOSE; case XML_TOK_CLOSE_PAREN_ASTERISK: state->level -= 1; if (state->level == 0) { state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; } return XML_ROLE_GROUP_CLOSE_REP; case XML_TOK_CLOSE_PAREN_QUESTION: state->level -= 1; if (state->level == 0) { state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; } return XML_ROLE_GROUP_CLOSE_OPT; case XML_TOK_CLOSE_PAREN_PLUS: state->level -= 1; if (state->level == 0) { state->handler = declClose; state->role_none = XML_ROLE_ELEMENT_NONE; } return XML_ROLE_GROUP_CLOSE_PLUS; case XML_TOK_COMMA: state->handler = element6; return XML_ROLE_GROUP_SEQUENCE; case XML_TOK_OR: state->handler = element6; return XML_ROLE_GROUP_CHOICE; } return common(state, tok); } #ifdef XML_DTD static int PTRCALL condSect0(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NONE; case XML_TOK_NAME: if (XmlNameMatchesAscii(enc, ptr, end, KW_INCLUDE)) { state->handler = condSect1; return XML_ROLE_NONE; } if (XmlNameMatchesAscii(enc, ptr, end, KW_IGNORE)) { state->handler = condSect2; return XML_ROLE_NONE; } break; } return common(state, tok); } static int PTRCALL condSect1(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NONE; case XML_TOK_OPEN_BRACKET: state->handler = externalSubset1; state->includeLevel += 1; return XML_ROLE_NONE; } return common(state, tok); } static int PTRCALL condSect2(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return XML_ROLE_NONE; case XML_TOK_OPEN_BRACKET: state->handler = externalSubset1; return XML_ROLE_IGNORE_SECT; } return common(state, tok); } #endif /* XML_DTD */ static int PTRCALL declClose(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { switch (tok) { case XML_TOK_PROLOG_S: return state->role_none; case XML_TOK_DECL_CLOSE: setTopLevel(state); return state->role_none; } return common(state, tok); } static int PTRCALL error(PROLOG_STATE *state, int tok, const char *ptr, const char *end, const ENCODING *enc) { return XML_ROLE_NONE; } static int FASTCALL common(PROLOG_STATE *state, int tok) { #ifdef XML_DTD if (!state->documentEntity && tok == XML_TOK_PARAM_ENTITY_REF) return XML_ROLE_INNER_PARAM_ENTITY_REF; #endif state->handler = error; return XML_ROLE_ERROR; } void XmlPrologStateInit(PROLOG_STATE *state) { state->handler = prolog0; #ifdef XML_DTD state->documentEntity = 1; state->includeLevel = 0; state->inEntityValue = 0; #endif /* XML_DTD */ } #ifdef XML_DTD void XmlPrologStateInitExternalEntity(PROLOG_STATE *state) { state->handler = externalSubset0; state->documentEntity = 0; state->includeLevel = 0; } #endif /* XML_DTD */ Python-2.3.7/Modules/expat/latin1tab.h0000644001241000117560000000342507745310333017042 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ /* 0x80 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0x84 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0x88 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0x8C */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0x90 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0x94 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0x98 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0x9C */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0xA0 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0xA4 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0xA8 */ BT_OTHER, BT_OTHER, BT_NMSTRT, BT_OTHER, /* 0xAC */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0xB0 */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0xB4 */ BT_OTHER, BT_NMSTRT, BT_OTHER, BT_NAME, /* 0xB8 */ BT_OTHER, BT_OTHER, BT_NMSTRT, BT_OTHER, /* 0xBC */ BT_OTHER, BT_OTHER, BT_OTHER, BT_OTHER, /* 0xC0 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xC4 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xC8 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xCC */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xD0 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xD4 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_OTHER, /* 0xD8 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xDC */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xE0 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xE4 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xE8 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xEC */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xF0 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xF4 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_OTHER, /* 0xF8 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0xFC */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, Python-2.3.7/Modules/expat/xmltok.h0000644001241000117560000002566007614611231016502 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #ifndef XmlTok_INCLUDED #define XmlTok_INCLUDED 1 #ifdef __cplusplus extern "C" { #endif /* The following token may be returned by XmlContentTok */ #define XML_TOK_TRAILING_RSQB -5 /* ] or ]] at the end of the scan; might be start of illegal ]]> sequence */ /* The following tokens may be returned by both XmlPrologTok and XmlContentTok. */ #define XML_TOK_NONE -4 /* The string to be scanned is empty */ #define XML_TOK_TRAILING_CR -3 /* A CR at the end of the scan; might be part of CRLF sequence */ #define XML_TOK_PARTIAL_CHAR -2 /* only part of a multibyte sequence */ #define XML_TOK_PARTIAL -1 /* only part of a token */ #define XML_TOK_INVALID 0 /* The following tokens are returned by XmlContentTok; some are also returned by XmlAttributeValueTok, XmlEntityTok, XmlCdataSectionTok. */ #define XML_TOK_START_TAG_WITH_ATTS 1 #define XML_TOK_START_TAG_NO_ATTS 2 #define XML_TOK_EMPTY_ELEMENT_WITH_ATTS 3 /* empty element tag */ #define XML_TOK_EMPTY_ELEMENT_NO_ATTS 4 #define XML_TOK_END_TAG 5 #define XML_TOK_DATA_CHARS 6 #define XML_TOK_DATA_NEWLINE 7 #define XML_TOK_CDATA_SECT_OPEN 8 #define XML_TOK_ENTITY_REF 9 #define XML_TOK_CHAR_REF 10 /* numeric character reference */ /* The following tokens may be returned by both XmlPrologTok and XmlContentTok. */ #define XML_TOK_PI 11 /* processing instruction */ #define XML_TOK_XML_DECL 12 /* XML decl or text decl */ #define XML_TOK_COMMENT 13 #define XML_TOK_BOM 14 /* Byte order mark */ /* The following tokens are returned only by XmlPrologTok */ #define XML_TOK_PROLOG_S 15 #define XML_TOK_DECL_OPEN 16 /* */ #define XML_TOK_NAME 18 #define XML_TOK_NMTOKEN 19 #define XML_TOK_POUND_NAME 20 /* #name */ #define XML_TOK_OR 21 /* | */ #define XML_TOK_PERCENT 22 #define XML_TOK_OPEN_PAREN 23 #define XML_TOK_CLOSE_PAREN 24 #define XML_TOK_OPEN_BRACKET 25 #define XML_TOK_CLOSE_BRACKET 26 #define XML_TOK_LITERAL 27 #define XML_TOK_PARAM_ENTITY_REF 28 #define XML_TOK_INSTANCE_START 29 /* The following occur only in element type declarations */ #define XML_TOK_NAME_QUESTION 30 /* name? */ #define XML_TOK_NAME_ASTERISK 31 /* name* */ #define XML_TOK_NAME_PLUS 32 /* name+ */ #define XML_TOK_COND_SECT_OPEN 33 /* */ #define XML_TOK_CLOSE_PAREN_QUESTION 35 /* )? */ #define XML_TOK_CLOSE_PAREN_ASTERISK 36 /* )* */ #define XML_TOK_CLOSE_PAREN_PLUS 37 /* )+ */ #define XML_TOK_COMMA 38 /* The following token is returned only by XmlAttributeValueTok */ #define XML_TOK_ATTRIBUTE_VALUE_S 39 /* The following token is returned only by XmlCdataSectionTok */ #define XML_TOK_CDATA_SECT_CLOSE 40 /* With namespace processing this is returned by XmlPrologTok for a name with a colon. */ #define XML_TOK_PREFIXED_NAME 41 #ifdef XML_DTD #define XML_TOK_IGNORE_SECT 42 #endif /* XML_DTD */ #ifdef XML_DTD #define XML_N_STATES 4 #else /* not XML_DTD */ #define XML_N_STATES 3 #endif /* not XML_DTD */ #define XML_PROLOG_STATE 0 #define XML_CONTENT_STATE 1 #define XML_CDATA_SECTION_STATE 2 #ifdef XML_DTD #define XML_IGNORE_SECTION_STATE 3 #endif /* XML_DTD */ #define XML_N_LITERAL_TYPES 2 #define XML_ATTRIBUTE_VALUE_LITERAL 0 #define XML_ENTITY_VALUE_LITERAL 1 /* The size of the buffer passed to XmlUtf8Encode must be at least this. */ #define XML_UTF8_ENCODE_MAX 4 /* The size of the buffer passed to XmlUtf16Encode must be at least this. */ #define XML_UTF16_ENCODE_MAX 2 typedef struct position { /* first line and first column are 0 not 1 */ unsigned long lineNumber; unsigned long columnNumber; } POSITION; typedef struct { const char *name; const char *valuePtr; const char *valueEnd; char normalized; } ATTRIBUTE; struct encoding; typedef struct encoding ENCODING; typedef int (PTRCALL *SCANNER)(const ENCODING *, const char *, const char *, const char **); struct encoding { SCANNER scanners[XML_N_STATES]; SCANNER literalScanners[XML_N_LITERAL_TYPES]; int (PTRCALL *sameName)(const ENCODING *, const char *, const char *); int (PTRCALL *nameMatchesAscii)(const ENCODING *, const char *, const char *, const char *); int (PTRFASTCALL *nameLength)(const ENCODING *, const char *); const char *(PTRFASTCALL *skipS)(const ENCODING *, const char *); int (PTRCALL *getAtts)(const ENCODING *enc, const char *ptr, int attsMax, ATTRIBUTE *atts); int (PTRFASTCALL *charRefNumber)(const ENCODING *enc, const char *ptr); int (PTRCALL *predefinedEntityName)(const ENCODING *, const char *, const char *); void (PTRCALL *updatePosition)(const ENCODING *, const char *ptr, const char *end, POSITION *); int (PTRCALL *isPublicId)(const ENCODING *enc, const char *ptr, const char *end, const char **badPtr); void (PTRCALL *utf8Convert)(const ENCODING *enc, const char **fromP, const char *fromLim, char **toP, const char *toLim); void (PTRCALL *utf16Convert)(const ENCODING *enc, const char **fromP, const char *fromLim, unsigned short **toP, const unsigned short *toLim); int minBytesPerChar; char isUtf8; char isUtf16; }; /* Scan the string starting at ptr until the end of the next complete token, but do not scan past eptr. Return an integer giving the type of token. Return XML_TOK_NONE when ptr == eptr; nextTokPtr will not be set. Return XML_TOK_PARTIAL when the string does not contain a complete token; nextTokPtr will not be set. Return XML_TOK_INVALID when the string does not start a valid token; nextTokPtr will be set to point to the character which made the token invalid. Otherwise the string starts with a valid token; nextTokPtr will be set to point to the character following the end of that token. Each data character counts as a single token, but adjacent data characters may be returned together. Similarly for characters in the prolog outside literals, comments and processing instructions. */ #define XmlTok(enc, state, ptr, end, nextTokPtr) \ (((enc)->scanners[state])(enc, ptr, end, nextTokPtr)) #define XmlPrologTok(enc, ptr, end, nextTokPtr) \ XmlTok(enc, XML_PROLOG_STATE, ptr, end, nextTokPtr) #define XmlContentTok(enc, ptr, end, nextTokPtr) \ XmlTok(enc, XML_CONTENT_STATE, ptr, end, nextTokPtr) #define XmlCdataSectionTok(enc, ptr, end, nextTokPtr) \ XmlTok(enc, XML_CDATA_SECTION_STATE, ptr, end, nextTokPtr) #ifdef XML_DTD #define XmlIgnoreSectionTok(enc, ptr, end, nextTokPtr) \ XmlTok(enc, XML_IGNORE_SECTION_STATE, ptr, end, nextTokPtr) #endif /* XML_DTD */ /* This is used for performing a 2nd-level tokenization on the content of a literal that has already been returned by XmlTok. */ #define XmlLiteralTok(enc, literalType, ptr, end, nextTokPtr) \ (((enc)->literalScanners[literalType])(enc, ptr, end, nextTokPtr)) #define XmlAttributeValueTok(enc, ptr, end, nextTokPtr) \ XmlLiteralTok(enc, XML_ATTRIBUTE_VALUE_LITERAL, ptr, end, nextTokPtr) #define XmlEntityValueTok(enc, ptr, end, nextTokPtr) \ XmlLiteralTok(enc, XML_ENTITY_VALUE_LITERAL, ptr, end, nextTokPtr) #define XmlSameName(enc, ptr1, ptr2) (((enc)->sameName)(enc, ptr1, ptr2)) #define XmlNameMatchesAscii(enc, ptr1, end1, ptr2) \ (((enc)->nameMatchesAscii)(enc, ptr1, end1, ptr2)) #define XmlNameLength(enc, ptr) \ (((enc)->nameLength)(enc, ptr)) #define XmlSkipS(enc, ptr) \ (((enc)->skipS)(enc, ptr)) #define XmlGetAttributes(enc, ptr, attsMax, atts) \ (((enc)->getAtts)(enc, ptr, attsMax, atts)) #define XmlCharRefNumber(enc, ptr) \ (((enc)->charRefNumber)(enc, ptr)) #define XmlPredefinedEntityName(enc, ptr, end) \ (((enc)->predefinedEntityName)(enc, ptr, end)) #define XmlUpdatePosition(enc, ptr, end, pos) \ (((enc)->updatePosition)(enc, ptr, end, pos)) #define XmlIsPublicId(enc, ptr, end, badPtr) \ (((enc)->isPublicId)(enc, ptr, end, badPtr)) #define XmlUtf8Convert(enc, fromP, fromLim, toP, toLim) \ (((enc)->utf8Convert)(enc, fromP, fromLim, toP, toLim)) #define XmlUtf16Convert(enc, fromP, fromLim, toP, toLim) \ (((enc)->utf16Convert)(enc, fromP, fromLim, toP, toLim)) typedef struct { ENCODING initEnc; const ENCODING **encPtr; } INIT_ENCODING; int XmlParseXmlDecl(int isGeneralTextEntity, const ENCODING *enc, const char *ptr, const char *end, const char **badPtr, const char **versionPtr, const char **versionEndPtr, const char **encodingNamePtr, const ENCODING **namedEncodingPtr, int *standalonePtr); int XmlInitEncoding(INIT_ENCODING *, const ENCODING **, const char *name); const ENCODING *XmlGetUtf8InternalEncoding(void); const ENCODING *XmlGetUtf16InternalEncoding(void); int FASTCALL XmlUtf8Encode(int charNumber, char *buf); int FASTCALL XmlUtf16Encode(int charNumber, unsigned short *buf); int XmlSizeOfUnknownEncoding(void); typedef int (*CONVERTER)(void *userData, const char *p); ENCODING * XmlInitUnknownEncoding(void *mem, int *table, CONVERTER convert, void *userData); int XmlParseXmlDeclNS(int isGeneralTextEntity, const ENCODING *enc, const char *ptr, const char *end, const char **badPtr, const char **versionPtr, const char **versionEndPtr, const char **encodingNamePtr, const ENCODING **namedEncodingPtr, int *standalonePtr); int XmlInitEncodingNS(INIT_ENCODING *, const ENCODING **, const char *name); const ENCODING *XmlGetUtf8InternalEncodingNS(void); const ENCODING *XmlGetUtf16InternalEncodingNS(void); ENCODING * XmlInitUnknownEncodingNS(void *mem, int *table, CONVERTER convert, void *userData); #ifdef __cplusplus } #endif #endif /* not XmlTok_INCLUDED */ Python-2.3.7/Modules/expat/asciitab.h0000644001241000117560000000334007745310333016736 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ /* 0x00 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x04 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x08 */ BT_NONXML, BT_S, BT_LF, BT_NONXML, /* 0x0C */ BT_NONXML, BT_CR, BT_NONXML, BT_NONXML, /* 0x10 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x14 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x18 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x1C */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x20 */ BT_S, BT_EXCL, BT_QUOT, BT_NUM, /* 0x24 */ BT_OTHER, BT_PERCNT, BT_AMP, BT_APOS, /* 0x28 */ BT_LPAR, BT_RPAR, BT_AST, BT_PLUS, /* 0x2C */ BT_COMMA, BT_MINUS, BT_NAME, BT_SOL, /* 0x30 */ BT_DIGIT, BT_DIGIT, BT_DIGIT, BT_DIGIT, /* 0x34 */ BT_DIGIT, BT_DIGIT, BT_DIGIT, BT_DIGIT, /* 0x38 */ BT_DIGIT, BT_DIGIT, BT_COLON, BT_SEMI, /* 0x3C */ BT_LT, BT_EQUALS, BT_GT, BT_QUEST, /* 0x40 */ BT_OTHER, BT_HEX, BT_HEX, BT_HEX, /* 0x44 */ BT_HEX, BT_HEX, BT_HEX, BT_NMSTRT, /* 0x48 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x4C */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x50 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x54 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x58 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_LSQB, /* 0x5C */ BT_OTHER, BT_RSQB, BT_OTHER, BT_NMSTRT, /* 0x60 */ BT_OTHER, BT_HEX, BT_HEX, BT_HEX, /* 0x64 */ BT_HEX, BT_HEX, BT_HEX, BT_NMSTRT, /* 0x68 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x6C */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x70 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x74 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x78 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_OTHER, /* 0x7C */ BT_VERBAR, BT_OTHER, BT_OTHER, BT_OTHER, Python-2.3.7/Modules/expat/xmltok.c0000644001241000117560000012013207745310333016467 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #ifdef COMPILED_FROM_DSP #include "winconfig.h" #elif defined(MACOS_CLASSIC) #include "macconfig.h" #else #ifdef HAVE_EXPAT_CONFIG_H #include #endif #endif /* ndef COMPILED_FROM_DSP */ #include "internal.h" #include "xmltok.h" #include "nametab.h" #ifdef XML_DTD #define IGNORE_SECTION_TOK_VTABLE , PREFIX(ignoreSectionTok) #else #define IGNORE_SECTION_TOK_VTABLE /* as nothing */ #endif #define VTABLE1 \ { PREFIX(prologTok), PREFIX(contentTok), \ PREFIX(cdataSectionTok) IGNORE_SECTION_TOK_VTABLE }, \ { PREFIX(attributeValueTok), PREFIX(entityValueTok) }, \ PREFIX(sameName), \ PREFIX(nameMatchesAscii), \ PREFIX(nameLength), \ PREFIX(skipS), \ PREFIX(getAtts), \ PREFIX(charRefNumber), \ PREFIX(predefinedEntityName), \ PREFIX(updatePosition), \ PREFIX(isPublicId) #define VTABLE VTABLE1, PREFIX(toUtf8), PREFIX(toUtf16) #define UCS2_GET_NAMING(pages, hi, lo) \ (namingBitmap[(pages[hi] << 3) + ((lo) >> 5)] & (1 << ((lo) & 0x1F))) /* A 2 byte UTF-8 representation splits the characters 11 bits between the bottom 5 and 6 bits of the bytes. We need 8 bits to index into pages, 3 bits to add to that index and 5 bits to generate the mask. */ #define UTF8_GET_NAMING2(pages, byte) \ (namingBitmap[((pages)[(((byte)[0]) >> 2) & 7] << 3) \ + ((((byte)[0]) & 3) << 1) \ + ((((byte)[1]) >> 5) & 1)] \ & (1 << (((byte)[1]) & 0x1F))) /* A 3 byte UTF-8 representation splits the characters 16 bits between the bottom 4, 6 and 6 bits of the bytes. We need 8 bits to index into pages, 3 bits to add to that index and 5 bits to generate the mask. */ #define UTF8_GET_NAMING3(pages, byte) \ (namingBitmap[((pages)[((((byte)[0]) & 0xF) << 4) \ + ((((byte)[1]) >> 2) & 0xF)] \ << 3) \ + ((((byte)[1]) & 3) << 1) \ + ((((byte)[2]) >> 5) & 1)] \ & (1 << (((byte)[2]) & 0x1F))) #define UTF8_GET_NAMING(pages, p, n) \ ((n) == 2 \ ? UTF8_GET_NAMING2(pages, (const unsigned char *)(p)) \ : ((n) == 3 \ ? UTF8_GET_NAMING3(pages, (const unsigned char *)(p)) \ : 0)) /* Detection of invalid UTF-8 sequences is based on Table 3.1B of Unicode 3.2: http://www.unicode.org/unicode/reports/tr28/ with the additional restriction of not allowing the Unicode code points 0xFFFF and 0xFFFE (sequences EF,BF,BF and EF,BF,BE). Implementation details: (A & 0x80) == 0 means A < 0x80 and (A & 0xC0) == 0xC0 means A > 0xBF */ #define UTF8_INVALID2(p) \ ((*p) < 0xC2 || ((p)[1] & 0x80) == 0 || ((p)[1] & 0xC0) == 0xC0) #define UTF8_INVALID3(p) \ (((p)[2] & 0x80) == 0 \ || \ ((*p) == 0xEF && (p)[1] == 0xBF \ ? \ (p)[2] > 0xBD \ : \ ((p)[2] & 0xC0) == 0xC0) \ || \ ((*p) == 0xE0 \ ? \ (p)[1] < 0xA0 || ((p)[1] & 0xC0) == 0xC0 \ : \ ((p)[1] & 0x80) == 0 \ || \ ((*p) == 0xED ? (p)[1] > 0x9F : ((p)[1] & 0xC0) == 0xC0))) #define UTF8_INVALID4(p) \ (((p)[3] & 0x80) == 0 || ((p)[3] & 0xC0) == 0xC0 \ || \ ((p)[2] & 0x80) == 0 || ((p)[2] & 0xC0) == 0xC0 \ || \ ((*p) == 0xF0 \ ? \ (p)[1] < 0x90 || ((p)[1] & 0xC0) == 0xC0 \ : \ ((p)[1] & 0x80) == 0 \ || \ ((*p) == 0xF4 ? (p)[1] > 0x8F : ((p)[1] & 0xC0) == 0xC0))) static int PTRFASTCALL isNever(const ENCODING *enc, const char *p) { return 0; } static int PTRFASTCALL utf8_isName2(const ENCODING *enc, const char *p) { return UTF8_GET_NAMING2(namePages, (const unsigned char *)p); } static int PTRFASTCALL utf8_isName3(const ENCODING *enc, const char *p) { return UTF8_GET_NAMING3(namePages, (const unsigned char *)p); } #define utf8_isName4 isNever static int PTRFASTCALL utf8_isNmstrt2(const ENCODING *enc, const char *p) { return UTF8_GET_NAMING2(nmstrtPages, (const unsigned char *)p); } static int PTRFASTCALL utf8_isNmstrt3(const ENCODING *enc, const char *p) { return UTF8_GET_NAMING3(nmstrtPages, (const unsigned char *)p); } #define utf8_isNmstrt4 isNever static int PTRFASTCALL utf8_isInvalid2(const ENCODING *enc, const char *p) { return UTF8_INVALID2((const unsigned char *)p); } static int PTRFASTCALL utf8_isInvalid3(const ENCODING *enc, const char *p) { return UTF8_INVALID3((const unsigned char *)p); } static int PTRFASTCALL utf8_isInvalid4(const ENCODING *enc, const char *p) { return UTF8_INVALID4((const unsigned char *)p); } struct normal_encoding { ENCODING enc; unsigned char type[256]; #ifdef XML_MIN_SIZE int (PTRFASTCALL *byteType)(const ENCODING *, const char *); int (PTRFASTCALL *isNameMin)(const ENCODING *, const char *); int (PTRFASTCALL *isNmstrtMin)(const ENCODING *, const char *); int (PTRFASTCALL *byteToAscii)(const ENCODING *, const char *); int (PTRCALL *charMatches)(const ENCODING *, const char *, int); #endif /* XML_MIN_SIZE */ int (PTRFASTCALL *isName2)(const ENCODING *, const char *); int (PTRFASTCALL *isName3)(const ENCODING *, const char *); int (PTRFASTCALL *isName4)(const ENCODING *, const char *); int (PTRFASTCALL *isNmstrt2)(const ENCODING *, const char *); int (PTRFASTCALL *isNmstrt3)(const ENCODING *, const char *); int (PTRFASTCALL *isNmstrt4)(const ENCODING *, const char *); int (PTRFASTCALL *isInvalid2)(const ENCODING *, const char *); int (PTRFASTCALL *isInvalid3)(const ENCODING *, const char *); int (PTRFASTCALL *isInvalid4)(const ENCODING *, const char *); }; #define AS_NORMAL_ENCODING(enc) ((const struct normal_encoding *) (enc)) #ifdef XML_MIN_SIZE #define STANDARD_VTABLE(E) \ E ## byteType, \ E ## isNameMin, \ E ## isNmstrtMin, \ E ## byteToAscii, \ E ## charMatches, #else #define STANDARD_VTABLE(E) /* as nothing */ #endif #define NORMAL_VTABLE(E) \ E ## isName2, \ E ## isName3, \ E ## isName4, \ E ## isNmstrt2, \ E ## isNmstrt3, \ E ## isNmstrt4, \ E ## isInvalid2, \ E ## isInvalid3, \ E ## isInvalid4 static int FASTCALL checkCharRefNumber(int); #include "xmltok_impl.h" #include "ascii.h" #ifdef XML_MIN_SIZE #define sb_isNameMin isNever #define sb_isNmstrtMin isNever #endif #ifdef XML_MIN_SIZE #define MINBPC(enc) ((enc)->minBytesPerChar) #else /* minimum bytes per character */ #define MINBPC(enc) 1 #endif #define SB_BYTE_TYPE(enc, p) \ (((struct normal_encoding *)(enc))->type[(unsigned char)*(p)]) #ifdef XML_MIN_SIZE static int PTRFASTCALL sb_byteType(const ENCODING *enc, const char *p) { return SB_BYTE_TYPE(enc, p); } #define BYTE_TYPE(enc, p) \ (AS_NORMAL_ENCODING(enc)->byteType(enc, p)) #else #define BYTE_TYPE(enc, p) SB_BYTE_TYPE(enc, p) #endif #ifdef XML_MIN_SIZE #define BYTE_TO_ASCII(enc, p) \ (AS_NORMAL_ENCODING(enc)->byteToAscii(enc, p)) static int PTRFASTCALL sb_byteToAscii(const ENCODING *enc, const char *p) { return *p; } #else #define BYTE_TO_ASCII(enc, p) (*(p)) #endif #define IS_NAME_CHAR(enc, p, n) \ (AS_NORMAL_ENCODING(enc)->isName ## n(enc, p)) #define IS_NMSTRT_CHAR(enc, p, n) \ (AS_NORMAL_ENCODING(enc)->isNmstrt ## n(enc, p)) #define IS_INVALID_CHAR(enc, p, n) \ (AS_NORMAL_ENCODING(enc)->isInvalid ## n(enc, p)) #ifdef XML_MIN_SIZE #define IS_NAME_CHAR_MINBPC(enc, p) \ (AS_NORMAL_ENCODING(enc)->isNameMin(enc, p)) #define IS_NMSTRT_CHAR_MINBPC(enc, p) \ (AS_NORMAL_ENCODING(enc)->isNmstrtMin(enc, p)) #else #define IS_NAME_CHAR_MINBPC(enc, p) (0) #define IS_NMSTRT_CHAR_MINBPC(enc, p) (0) #endif #ifdef XML_MIN_SIZE #define CHAR_MATCHES(enc, p, c) \ (AS_NORMAL_ENCODING(enc)->charMatches(enc, p, c)) static int PTRCALL sb_charMatches(const ENCODING *enc, const char *p, int c) { return *p == c; } #else /* c is an ASCII character */ #define CHAR_MATCHES(enc, p, c) (*(p) == c) #endif #define PREFIX(ident) normal_ ## ident #include "xmltok_impl.c" #undef MINBPC #undef BYTE_TYPE #undef BYTE_TO_ASCII #undef CHAR_MATCHES #undef IS_NAME_CHAR #undef IS_NAME_CHAR_MINBPC #undef IS_NMSTRT_CHAR #undef IS_NMSTRT_CHAR_MINBPC #undef IS_INVALID_CHAR enum { /* UTF8_cvalN is value of masked first byte of N byte sequence */ UTF8_cval1 = 0x00, UTF8_cval2 = 0xc0, UTF8_cval3 = 0xe0, UTF8_cval4 = 0xf0 }; static void PTRCALL utf8_toUtf8(const ENCODING *enc, const char **fromP, const char *fromLim, char **toP, const char *toLim) { char *to; const char *from; if (fromLim - *fromP > toLim - *toP) { /* Avoid copying partial characters. */ for (fromLim = *fromP + (toLim - *toP); fromLim > *fromP; fromLim--) if (((unsigned char)fromLim[-1] & 0xc0) != 0x80) break; } for (to = *toP, from = *fromP; from != fromLim; from++, to++) *to = *from; *fromP = from; *toP = to; } static void PTRCALL utf8_toUtf16(const ENCODING *enc, const char **fromP, const char *fromLim, unsigned short **toP, const unsigned short *toLim) { unsigned short *to = *toP; const char *from = *fromP; while (from != fromLim && to != toLim) { switch (((struct normal_encoding *)enc)->type[(unsigned char)*from]) { case BT_LEAD2: *to++ = (unsigned short)(((from[0] & 0x1f) << 6) | (from[1] & 0x3f)); from += 2; break; case BT_LEAD3: *to++ = (unsigned short)(((from[0] & 0xf) << 12) | ((from[1] & 0x3f) << 6) | (from[2] & 0x3f)); from += 3; break; case BT_LEAD4: { unsigned long n; if (to + 1 == toLim) goto after; n = ((from[0] & 0x7) << 18) | ((from[1] & 0x3f) << 12) | ((from[2] & 0x3f) << 6) | (from[3] & 0x3f); n -= 0x10000; to[0] = (unsigned short)((n >> 10) | 0xD800); to[1] = (unsigned short)((n & 0x3FF) | 0xDC00); to += 2; from += 4; } break; default: *to++ = *from++; break; } } after: *fromP = from; *toP = to; } #ifdef XML_NS static const struct normal_encoding utf8_encoding_ns = { { VTABLE1, utf8_toUtf8, utf8_toUtf16, 1, 1, 0 }, { #include "asciitab.h" #include "utf8tab.h" }, STANDARD_VTABLE(sb_) NORMAL_VTABLE(utf8_) }; #endif static const struct normal_encoding utf8_encoding = { { VTABLE1, utf8_toUtf8, utf8_toUtf16, 1, 1, 0 }, { #define BT_COLON BT_NMSTRT #include "asciitab.h" #undef BT_COLON #include "utf8tab.h" }, STANDARD_VTABLE(sb_) NORMAL_VTABLE(utf8_) }; #ifdef XML_NS static const struct normal_encoding internal_utf8_encoding_ns = { { VTABLE1, utf8_toUtf8, utf8_toUtf16, 1, 1, 0 }, { #include "iasciitab.h" #include "utf8tab.h" }, STANDARD_VTABLE(sb_) NORMAL_VTABLE(utf8_) }; #endif static const struct normal_encoding internal_utf8_encoding = { { VTABLE1, utf8_toUtf8, utf8_toUtf16, 1, 1, 0 }, { #define BT_COLON BT_NMSTRT #include "iasciitab.h" #undef BT_COLON #include "utf8tab.h" }, STANDARD_VTABLE(sb_) NORMAL_VTABLE(utf8_) }; static void PTRCALL latin1_toUtf8(const ENCODING *enc, const char **fromP, const char *fromLim, char **toP, const char *toLim) { for (;;) { unsigned char c; if (*fromP == fromLim) break; c = (unsigned char)**fromP; if (c & 0x80) { if (toLim - *toP < 2) break; *(*toP)++ = (char)((c >> 6) | UTF8_cval2); *(*toP)++ = (char)((c & 0x3f) | 0x80); (*fromP)++; } else { if (*toP == toLim) break; *(*toP)++ = *(*fromP)++; } } } static void PTRCALL latin1_toUtf16(const ENCODING *enc, const char **fromP, const char *fromLim, unsigned short **toP, const unsigned short *toLim) { while (*fromP != fromLim && *toP != toLim) *(*toP)++ = (unsigned char)*(*fromP)++; } #ifdef XML_NS static const struct normal_encoding latin1_encoding_ns = { { VTABLE1, latin1_toUtf8, latin1_toUtf16, 1, 0, 0 }, { #include "asciitab.h" #include "latin1tab.h" }, STANDARD_VTABLE(sb_) }; #endif static const struct normal_encoding latin1_encoding = { { VTABLE1, latin1_toUtf8, latin1_toUtf16, 1, 0, 0 }, { #define BT_COLON BT_NMSTRT #include "asciitab.h" #undef BT_COLON #include "latin1tab.h" }, STANDARD_VTABLE(sb_) }; static void PTRCALL ascii_toUtf8(const ENCODING *enc, const char **fromP, const char *fromLim, char **toP, const char *toLim) { while (*fromP != fromLim && *toP != toLim) *(*toP)++ = *(*fromP)++; } #ifdef XML_NS static const struct normal_encoding ascii_encoding_ns = { { VTABLE1, ascii_toUtf8, latin1_toUtf16, 1, 1, 0 }, { #include "asciitab.h" /* BT_NONXML == 0 */ }, STANDARD_VTABLE(sb_) }; #endif static const struct normal_encoding ascii_encoding = { { VTABLE1, ascii_toUtf8, latin1_toUtf16, 1, 1, 0 }, { #define BT_COLON BT_NMSTRT #include "asciitab.h" #undef BT_COLON /* BT_NONXML == 0 */ }, STANDARD_VTABLE(sb_) }; static int PTRFASTCALL unicode_byte_type(char hi, char lo) { switch ((unsigned char)hi) { case 0xD8: case 0xD9: case 0xDA: case 0xDB: return BT_LEAD4; case 0xDC: case 0xDD: case 0xDE: case 0xDF: return BT_TRAIL; case 0xFF: switch ((unsigned char)lo) { case 0xFF: case 0xFE: return BT_NONXML; } break; } return BT_NONASCII; } #define DEFINE_UTF16_TO_UTF8(E) \ static void PTRCALL \ E ## toUtf8(const ENCODING *enc, \ const char **fromP, const char *fromLim, \ char **toP, const char *toLim) \ { \ const char *from; \ for (from = *fromP; from != fromLim; from += 2) { \ int plane; \ unsigned char lo2; \ unsigned char lo = GET_LO(from); \ unsigned char hi = GET_HI(from); \ switch (hi) { \ case 0: \ if (lo < 0x80) { \ if (*toP == toLim) { \ *fromP = from; \ return; \ } \ *(*toP)++ = lo; \ break; \ } \ /* fall through */ \ case 0x1: case 0x2: case 0x3: \ case 0x4: case 0x5: case 0x6: case 0x7: \ if (toLim - *toP < 2) { \ *fromP = from; \ return; \ } \ *(*toP)++ = ((lo >> 6) | (hi << 2) | UTF8_cval2); \ *(*toP)++ = ((lo & 0x3f) | 0x80); \ break; \ default: \ if (toLim - *toP < 3) { \ *fromP = from; \ return; \ } \ /* 16 bits divided 4, 6, 6 amongst 3 bytes */ \ *(*toP)++ = ((hi >> 4) | UTF8_cval3); \ *(*toP)++ = (((hi & 0xf) << 2) | (lo >> 6) | 0x80); \ *(*toP)++ = ((lo & 0x3f) | 0x80); \ break; \ case 0xD8: case 0xD9: case 0xDA: case 0xDB: \ if (toLim - *toP < 4) { \ *fromP = from; \ return; \ } \ plane = (((hi & 0x3) << 2) | ((lo >> 6) & 0x3)) + 1; \ *(*toP)++ = ((plane >> 2) | UTF8_cval4); \ *(*toP)++ = (((lo >> 2) & 0xF) | ((plane & 0x3) << 4) | 0x80); \ from += 2; \ lo2 = GET_LO(from); \ *(*toP)++ = (((lo & 0x3) << 4) \ | ((GET_HI(from) & 0x3) << 2) \ | (lo2 >> 6) \ | 0x80); \ *(*toP)++ = ((lo2 & 0x3f) | 0x80); \ break; \ } \ } \ *fromP = from; \ } #define DEFINE_UTF16_TO_UTF16(E) \ static void PTRCALL \ E ## toUtf16(const ENCODING *enc, \ const char **fromP, const char *fromLim, \ unsigned short **toP, const unsigned short *toLim) \ { \ /* Avoid copying first half only of surrogate */ \ if (fromLim - *fromP > ((toLim - *toP) << 1) \ && (GET_HI(fromLim - 2) & 0xF8) == 0xD8) \ fromLim -= 2; \ for (; *fromP != fromLim && *toP != toLim; *fromP += 2) \ *(*toP)++ = (GET_HI(*fromP) << 8) | GET_LO(*fromP); \ } #define SET2(ptr, ch) \ (((ptr)[0] = ((ch) & 0xff)), ((ptr)[1] = ((ch) >> 8))) #define GET_LO(ptr) ((unsigned char)(ptr)[0]) #define GET_HI(ptr) ((unsigned char)(ptr)[1]) DEFINE_UTF16_TO_UTF8(little2_) DEFINE_UTF16_TO_UTF16(little2_) #undef SET2 #undef GET_LO #undef GET_HI #define SET2(ptr, ch) \ (((ptr)[0] = ((ch) >> 8)), ((ptr)[1] = ((ch) & 0xFF))) #define GET_LO(ptr) ((unsigned char)(ptr)[1]) #define GET_HI(ptr) ((unsigned char)(ptr)[0]) DEFINE_UTF16_TO_UTF8(big2_) DEFINE_UTF16_TO_UTF16(big2_) #undef SET2 #undef GET_LO #undef GET_HI #define LITTLE2_BYTE_TYPE(enc, p) \ ((p)[1] == 0 \ ? ((struct normal_encoding *)(enc))->type[(unsigned char)*(p)] \ : unicode_byte_type((p)[1], (p)[0])) #define LITTLE2_BYTE_TO_ASCII(enc, p) ((p)[1] == 0 ? (p)[0] : -1) #define LITTLE2_CHAR_MATCHES(enc, p, c) ((p)[1] == 0 && (p)[0] == c) #define LITTLE2_IS_NAME_CHAR_MINBPC(enc, p) \ UCS2_GET_NAMING(namePages, (unsigned char)p[1], (unsigned char)p[0]) #define LITTLE2_IS_NMSTRT_CHAR_MINBPC(enc, p) \ UCS2_GET_NAMING(nmstrtPages, (unsigned char)p[1], (unsigned char)p[0]) #ifdef XML_MIN_SIZE static int PTRFASTCALL little2_byteType(const ENCODING *enc, const char *p) { return LITTLE2_BYTE_TYPE(enc, p); } static int PTRFASTCALL little2_byteToAscii(const ENCODING *enc, const char *p) { return LITTLE2_BYTE_TO_ASCII(enc, p); } static int PTRCALL little2_charMatches(const ENCODING *enc, const char *p, int c) { return LITTLE2_CHAR_MATCHES(enc, p, c); } static int PTRFASTCALL little2_isNameMin(const ENCODING *enc, const char *p) { return LITTLE2_IS_NAME_CHAR_MINBPC(enc, p); } static int PTRFASTCALL little2_isNmstrtMin(const ENCODING *enc, const char *p) { return LITTLE2_IS_NMSTRT_CHAR_MINBPC(enc, p); } #undef VTABLE #define VTABLE VTABLE1, little2_toUtf8, little2_toUtf16 #else /* not XML_MIN_SIZE */ #undef PREFIX #define PREFIX(ident) little2_ ## ident #define MINBPC(enc) 2 /* CHAR_MATCHES is guaranteed to have MINBPC bytes available. */ #define BYTE_TYPE(enc, p) LITTLE2_BYTE_TYPE(enc, p) #define BYTE_TO_ASCII(enc, p) LITTLE2_BYTE_TO_ASCII(enc, p) #define CHAR_MATCHES(enc, p, c) LITTLE2_CHAR_MATCHES(enc, p, c) #define IS_NAME_CHAR(enc, p, n) 0 #define IS_NAME_CHAR_MINBPC(enc, p) LITTLE2_IS_NAME_CHAR_MINBPC(enc, p) #define IS_NMSTRT_CHAR(enc, p, n) (0) #define IS_NMSTRT_CHAR_MINBPC(enc, p) LITTLE2_IS_NMSTRT_CHAR_MINBPC(enc, p) #include "xmltok_impl.c" #undef MINBPC #undef BYTE_TYPE #undef BYTE_TO_ASCII #undef CHAR_MATCHES #undef IS_NAME_CHAR #undef IS_NAME_CHAR_MINBPC #undef IS_NMSTRT_CHAR #undef IS_NMSTRT_CHAR_MINBPC #undef IS_INVALID_CHAR #endif /* not XML_MIN_SIZE */ #ifdef XML_NS static const struct normal_encoding little2_encoding_ns = { { VTABLE, 2, 0, #if BYTEORDER == 1234 1 #else 0 #endif }, { #include "asciitab.h" #include "latin1tab.h" }, STANDARD_VTABLE(little2_) }; #endif static const struct normal_encoding little2_encoding = { { VTABLE, 2, 0, #if BYTEORDER == 1234 1 #else 0 #endif }, { #define BT_COLON BT_NMSTRT #include "asciitab.h" #undef BT_COLON #include "latin1tab.h" }, STANDARD_VTABLE(little2_) }; #if BYTEORDER != 4321 #ifdef XML_NS static const struct normal_encoding internal_little2_encoding_ns = { { VTABLE, 2, 0, 1 }, { #include "iasciitab.h" #include "latin1tab.h" }, STANDARD_VTABLE(little2_) }; #endif static const struct normal_encoding internal_little2_encoding = { { VTABLE, 2, 0, 1 }, { #define BT_COLON BT_NMSTRT #include "iasciitab.h" #undef BT_COLON #include "latin1tab.h" }, STANDARD_VTABLE(little2_) }; #endif #define BIG2_BYTE_TYPE(enc, p) \ ((p)[0] == 0 \ ? ((struct normal_encoding *)(enc))->type[(unsigned char)(p)[1]] \ : unicode_byte_type((p)[0], (p)[1])) #define BIG2_BYTE_TO_ASCII(enc, p) ((p)[0] == 0 ? (p)[1] : -1) #define BIG2_CHAR_MATCHES(enc, p, c) ((p)[0] == 0 && (p)[1] == c) #define BIG2_IS_NAME_CHAR_MINBPC(enc, p) \ UCS2_GET_NAMING(namePages, (unsigned char)p[0], (unsigned char)p[1]) #define BIG2_IS_NMSTRT_CHAR_MINBPC(enc, p) \ UCS2_GET_NAMING(nmstrtPages, (unsigned char)p[0], (unsigned char)p[1]) #ifdef XML_MIN_SIZE static int PTRFASTCALL big2_byteType(const ENCODING *enc, const char *p) { return BIG2_BYTE_TYPE(enc, p); } static int PTRFASTCALL big2_byteToAscii(const ENCODING *enc, const char *p) { return BIG2_BYTE_TO_ASCII(enc, p); } static int PTRCALL big2_charMatches(const ENCODING *enc, const char *p, int c) { return BIG2_CHAR_MATCHES(enc, p, c); } static int PTRFASTCALL big2_isNameMin(const ENCODING *enc, const char *p) { return BIG2_IS_NAME_CHAR_MINBPC(enc, p); } static int PTRFASTCALL big2_isNmstrtMin(const ENCODING *enc, const char *p) { return BIG2_IS_NMSTRT_CHAR_MINBPC(enc, p); } #undef VTABLE #define VTABLE VTABLE1, big2_toUtf8, big2_toUtf16 #else /* not XML_MIN_SIZE */ #undef PREFIX #define PREFIX(ident) big2_ ## ident #define MINBPC(enc) 2 /* CHAR_MATCHES is guaranteed to have MINBPC bytes available. */ #define BYTE_TYPE(enc, p) BIG2_BYTE_TYPE(enc, p) #define BYTE_TO_ASCII(enc, p) BIG2_BYTE_TO_ASCII(enc, p) #define CHAR_MATCHES(enc, p, c) BIG2_CHAR_MATCHES(enc, p, c) #define IS_NAME_CHAR(enc, p, n) 0 #define IS_NAME_CHAR_MINBPC(enc, p) BIG2_IS_NAME_CHAR_MINBPC(enc, p) #define IS_NMSTRT_CHAR(enc, p, n) (0) #define IS_NMSTRT_CHAR_MINBPC(enc, p) BIG2_IS_NMSTRT_CHAR_MINBPC(enc, p) #include "xmltok_impl.c" #undef MINBPC #undef BYTE_TYPE #undef BYTE_TO_ASCII #undef CHAR_MATCHES #undef IS_NAME_CHAR #undef IS_NAME_CHAR_MINBPC #undef IS_NMSTRT_CHAR #undef IS_NMSTRT_CHAR_MINBPC #undef IS_INVALID_CHAR #endif /* not XML_MIN_SIZE */ #ifdef XML_NS static const struct normal_encoding big2_encoding_ns = { { VTABLE, 2, 0, #if BYTEORDER == 4321 1 #else 0 #endif }, { #include "asciitab.h" #include "latin1tab.h" }, STANDARD_VTABLE(big2_) }; #endif static const struct normal_encoding big2_encoding = { { VTABLE, 2, 0, #if BYTEORDER == 4321 1 #else 0 #endif }, { #define BT_COLON BT_NMSTRT #include "asciitab.h" #undef BT_COLON #include "latin1tab.h" }, STANDARD_VTABLE(big2_) }; #if BYTEORDER != 1234 #ifdef XML_NS static const struct normal_encoding internal_big2_encoding_ns = { { VTABLE, 2, 0, 1 }, { #include "iasciitab.h" #include "latin1tab.h" }, STANDARD_VTABLE(big2_) }; #endif static const struct normal_encoding internal_big2_encoding = { { VTABLE, 2, 0, 1 }, { #define BT_COLON BT_NMSTRT #include "iasciitab.h" #undef BT_COLON #include "latin1tab.h" }, STANDARD_VTABLE(big2_) }; #endif #undef PREFIX static int FASTCALL streqci(const char *s1, const char *s2) { for (;;) { char c1 = *s1++; char c2 = *s2++; if (ASCII_a <= c1 && c1 <= ASCII_z) c1 += ASCII_A - ASCII_a; if (ASCII_a <= c2 && c2 <= ASCII_z) c2 += ASCII_A - ASCII_a; if (c1 != c2) return 0; if (!c1) break; } return 1; } static void PTRCALL initUpdatePosition(const ENCODING *enc, const char *ptr, const char *end, POSITION *pos) { normal_updatePosition(&utf8_encoding.enc, ptr, end, pos); } static int toAscii(const ENCODING *enc, const char *ptr, const char *end) { char buf[1]; char *p = buf; XmlUtf8Convert(enc, &ptr, end, &p, p + 1); if (p == buf) return -1; else return buf[0]; } static int FASTCALL isSpace(int c) { switch (c) { case 0x20: case 0xD: case 0xA: case 0x9: return 1; } return 0; } /* Return 1 if there's just optional white space or there's an S followed by name=val. */ static int parsePseudoAttribute(const ENCODING *enc, const char *ptr, const char *end, const char **namePtr, const char **nameEndPtr, const char **valPtr, const char **nextTokPtr) { int c; char open; if (ptr == end) { *namePtr = NULL; return 1; } if (!isSpace(toAscii(enc, ptr, end))) { *nextTokPtr = ptr; return 0; } do { ptr += enc->minBytesPerChar; } while (isSpace(toAscii(enc, ptr, end))); if (ptr == end) { *namePtr = NULL; return 1; } *namePtr = ptr; for (;;) { c = toAscii(enc, ptr, end); if (c == -1) { *nextTokPtr = ptr; return 0; } if (c == ASCII_EQUALS) { *nameEndPtr = ptr; break; } if (isSpace(c)) { *nameEndPtr = ptr; do { ptr += enc->minBytesPerChar; } while (isSpace(c = toAscii(enc, ptr, end))); if (c != ASCII_EQUALS) { *nextTokPtr = ptr; return 0; } break; } ptr += enc->minBytesPerChar; } if (ptr == *namePtr) { *nextTokPtr = ptr; return 0; } ptr += enc->minBytesPerChar; c = toAscii(enc, ptr, end); while (isSpace(c)) { ptr += enc->minBytesPerChar; c = toAscii(enc, ptr, end); } if (c != ASCII_QUOT && c != ASCII_APOS) { *nextTokPtr = ptr; return 0; } open = (char)c; ptr += enc->minBytesPerChar; *valPtr = ptr; for (;; ptr += enc->minBytesPerChar) { c = toAscii(enc, ptr, end); if (c == open) break; if (!(ASCII_a <= c && c <= ASCII_z) && !(ASCII_A <= c && c <= ASCII_Z) && !(ASCII_0 <= c && c <= ASCII_9) && c != ASCII_PERIOD && c != ASCII_MINUS && c != ASCII_UNDERSCORE) { *nextTokPtr = ptr; return 0; } } *nextTokPtr = ptr + enc->minBytesPerChar; return 1; } static const char KW_version[] = { ASCII_v, ASCII_e, ASCII_r, ASCII_s, ASCII_i, ASCII_o, ASCII_n, '\0' }; static const char KW_encoding[] = { ASCII_e, ASCII_n, ASCII_c, ASCII_o, ASCII_d, ASCII_i, ASCII_n, ASCII_g, '\0' }; static const char KW_standalone[] = { ASCII_s, ASCII_t, ASCII_a, ASCII_n, ASCII_d, ASCII_a, ASCII_l, ASCII_o, ASCII_n, ASCII_e, '\0' }; static const char KW_yes[] = { ASCII_y, ASCII_e, ASCII_s, '\0' }; static const char KW_no[] = { ASCII_n, ASCII_o, '\0' }; static int doParseXmlDecl(const ENCODING *(*encodingFinder)(const ENCODING *, const char *, const char *), int isGeneralTextEntity, const ENCODING *enc, const char *ptr, const char *end, const char **badPtr, const char **versionPtr, const char **versionEndPtr, const char **encodingName, const ENCODING **encoding, int *standalone) { const char *val = NULL; const char *name = NULL; const char *nameEnd = NULL; ptr += 5 * enc->minBytesPerChar; end -= 2 * enc->minBytesPerChar; if (!parsePseudoAttribute(enc, ptr, end, &name, &nameEnd, &val, &ptr) || !name) { *badPtr = ptr; return 0; } if (!XmlNameMatchesAscii(enc, name, nameEnd, KW_version)) { if (!isGeneralTextEntity) { *badPtr = name; return 0; } } else { if (versionPtr) *versionPtr = val; if (versionEndPtr) *versionEndPtr = ptr; if (!parsePseudoAttribute(enc, ptr, end, &name, &nameEnd, &val, &ptr)) { *badPtr = ptr; return 0; } if (!name) { if (isGeneralTextEntity) { /* a TextDecl must have an EncodingDecl */ *badPtr = ptr; return 0; } return 1; } } if (XmlNameMatchesAscii(enc, name, nameEnd, KW_encoding)) { int c = toAscii(enc, val, end); if (!(ASCII_a <= c && c <= ASCII_z) && !(ASCII_A <= c && c <= ASCII_Z)) { *badPtr = val; return 0; } if (encodingName) *encodingName = val; if (encoding) *encoding = encodingFinder(enc, val, ptr - enc->minBytesPerChar); if (!parsePseudoAttribute(enc, ptr, end, &name, &nameEnd, &val, &ptr)) { *badPtr = ptr; return 0; } if (!name) return 1; } if (!XmlNameMatchesAscii(enc, name, nameEnd, KW_standalone) || isGeneralTextEntity) { *badPtr = name; return 0; } if (XmlNameMatchesAscii(enc, val, ptr - enc->minBytesPerChar, KW_yes)) { if (standalone) *standalone = 1; } else if (XmlNameMatchesAscii(enc, val, ptr - enc->minBytesPerChar, KW_no)) { if (standalone) *standalone = 0; } else { *badPtr = val; return 0; } while (isSpace(toAscii(enc, ptr, end))) ptr += enc->minBytesPerChar; if (ptr != end) { *badPtr = ptr; return 0; } return 1; } static int FASTCALL checkCharRefNumber(int result) { switch (result >> 8) { case 0xD8: case 0xD9: case 0xDA: case 0xDB: case 0xDC: case 0xDD: case 0xDE: case 0xDF: return -1; case 0: if (latin1_encoding.type[result] == BT_NONXML) return -1; break; case 0xFF: if (result == 0xFFFE || result == 0xFFFF) return -1; break; } return result; } int FASTCALL XmlUtf8Encode(int c, char *buf) { enum { /* minN is minimum legal resulting value for N byte sequence */ min2 = 0x80, min3 = 0x800, min4 = 0x10000 }; if (c < 0) return 0; if (c < min2) { buf[0] = (char)(c | UTF8_cval1); return 1; } if (c < min3) { buf[0] = (char)((c >> 6) | UTF8_cval2); buf[1] = (char)((c & 0x3f) | 0x80); return 2; } if (c < min4) { buf[0] = (char)((c >> 12) | UTF8_cval3); buf[1] = (char)(((c >> 6) & 0x3f) | 0x80); buf[2] = (char)((c & 0x3f) | 0x80); return 3; } if (c < 0x110000) { buf[0] = (char)((c >> 18) | UTF8_cval4); buf[1] = (char)(((c >> 12) & 0x3f) | 0x80); buf[2] = (char)(((c >> 6) & 0x3f) | 0x80); buf[3] = (char)((c & 0x3f) | 0x80); return 4; } return 0; } int FASTCALL XmlUtf16Encode(int charNum, unsigned short *buf) { if (charNum < 0) return 0; if (charNum < 0x10000) { buf[0] = (unsigned short)charNum; return 1; } if (charNum < 0x110000) { charNum -= 0x10000; buf[0] = (unsigned short)((charNum >> 10) + 0xD800); buf[1] = (unsigned short)((charNum & 0x3FF) + 0xDC00); return 2; } return 0; } struct unknown_encoding { struct normal_encoding normal; int (*convert)(void *userData, const char *p); void *userData; unsigned short utf16[256]; char utf8[256][4]; }; #define AS_UNKNOWN_ENCODING(enc) ((const struct unknown_encoding *) (enc)) int XmlSizeOfUnknownEncoding(void) { return sizeof(struct unknown_encoding); } static int PTRFASTCALL unknown_isName(const ENCODING *enc, const char *p) { const struct unknown_encoding *uenc = AS_UNKNOWN_ENCODING(enc); int c = uenc->convert(uenc->userData, p); if (c & ~0xFFFF) return 0; return UCS2_GET_NAMING(namePages, c >> 8, c & 0xFF); } static int PTRFASTCALL unknown_isNmstrt(const ENCODING *enc, const char *p) { const struct unknown_encoding *uenc = AS_UNKNOWN_ENCODING(enc); int c = uenc->convert(uenc->userData, p); if (c & ~0xFFFF) return 0; return UCS2_GET_NAMING(nmstrtPages, c >> 8, c & 0xFF); } static int PTRFASTCALL unknown_isInvalid(const ENCODING *enc, const char *p) { const struct unknown_encoding *uenc = AS_UNKNOWN_ENCODING(enc); int c = uenc->convert(uenc->userData, p); return (c & ~0xFFFF) || checkCharRefNumber(c) < 0; } static void PTRCALL unknown_toUtf8(const ENCODING *enc, const char **fromP, const char *fromLim, char **toP, const char *toLim) { const struct unknown_encoding *uenc = AS_UNKNOWN_ENCODING(enc); char buf[XML_UTF8_ENCODE_MAX]; for (;;) { const char *utf8; int n; if (*fromP == fromLim) break; utf8 = uenc->utf8[(unsigned char)**fromP]; n = *utf8++; if (n == 0) { int c = uenc->convert(uenc->userData, *fromP); n = XmlUtf8Encode(c, buf); if (n > toLim - *toP) break; utf8 = buf; *fromP += (AS_NORMAL_ENCODING(enc)->type[(unsigned char)**fromP] - (BT_LEAD2 - 2)); } else { if (n > toLim - *toP) break; (*fromP)++; } do { *(*toP)++ = *utf8++; } while (--n != 0); } } static void PTRCALL unknown_toUtf16(const ENCODING *enc, const char **fromP, const char *fromLim, unsigned short **toP, const unsigned short *toLim) { const struct unknown_encoding *uenc = AS_UNKNOWN_ENCODING(enc); while (*fromP != fromLim && *toP != toLim) { unsigned short c = uenc->utf16[(unsigned char)**fromP]; if (c == 0) { c = (unsigned short) uenc->convert(uenc->userData, *fromP); *fromP += (AS_NORMAL_ENCODING(enc)->type[(unsigned char)**fromP] - (BT_LEAD2 - 2)); } else (*fromP)++; *(*toP)++ = c; } } ENCODING * XmlInitUnknownEncoding(void *mem, int *table, CONVERTER convert, void *userData) { int i; struct unknown_encoding *e = (struct unknown_encoding *)mem; for (i = 0; i < (int)sizeof(struct normal_encoding); i++) ((char *)mem)[i] = ((char *)&latin1_encoding)[i]; for (i = 0; i < 128; i++) if (latin1_encoding.type[i] != BT_OTHER && latin1_encoding.type[i] != BT_NONXML && table[i] != i) return 0; for (i = 0; i < 256; i++) { int c = table[i]; if (c == -1) { e->normal.type[i] = BT_MALFORM; /* This shouldn't really get used. */ e->utf16[i] = 0xFFFF; e->utf8[i][0] = 1; e->utf8[i][1] = 0; } else if (c < 0) { if (c < -4) return 0; e->normal.type[i] = (unsigned char)(BT_LEAD2 - (c + 2)); e->utf8[i][0] = 0; e->utf16[i] = 0; } else if (c < 0x80) { if (latin1_encoding.type[c] != BT_OTHER && latin1_encoding.type[c] != BT_NONXML && c != i) return 0; e->normal.type[i] = latin1_encoding.type[c]; e->utf8[i][0] = 1; e->utf8[i][1] = (char)c; e->utf16[i] = (unsigned short)(c == 0 ? 0xFFFF : c); } else if (checkCharRefNumber(c) < 0) { e->normal.type[i] = BT_NONXML; /* This shouldn't really get used. */ e->utf16[i] = 0xFFFF; e->utf8[i][0] = 1; e->utf8[i][1] = 0; } else { if (c > 0xFFFF) return 0; if (UCS2_GET_NAMING(nmstrtPages, c >> 8, c & 0xff)) e->normal.type[i] = BT_NMSTRT; else if (UCS2_GET_NAMING(namePages, c >> 8, c & 0xff)) e->normal.type[i] = BT_NAME; else e->normal.type[i] = BT_OTHER; e->utf8[i][0] = (char)XmlUtf8Encode(c, e->utf8[i] + 1); e->utf16[i] = (unsigned short)c; } } e->userData = userData; e->convert = convert; if (convert) { e->normal.isName2 = unknown_isName; e->normal.isName3 = unknown_isName; e->normal.isName4 = unknown_isName; e->normal.isNmstrt2 = unknown_isNmstrt; e->normal.isNmstrt3 = unknown_isNmstrt; e->normal.isNmstrt4 = unknown_isNmstrt; e->normal.isInvalid2 = unknown_isInvalid; e->normal.isInvalid3 = unknown_isInvalid; e->normal.isInvalid4 = unknown_isInvalid; } e->normal.enc.utf8Convert = unknown_toUtf8; e->normal.enc.utf16Convert = unknown_toUtf16; return &(e->normal.enc); } /* If this enumeration is changed, getEncodingIndex and encodings must also be changed. */ enum { UNKNOWN_ENC = -1, ISO_8859_1_ENC = 0, US_ASCII_ENC, UTF_8_ENC, UTF_16_ENC, UTF_16BE_ENC, UTF_16LE_ENC, /* must match encodingNames up to here */ NO_ENC }; static const char KW_ISO_8859_1[] = { ASCII_I, ASCII_S, ASCII_O, ASCII_MINUS, ASCII_8, ASCII_8, ASCII_5, ASCII_9, ASCII_MINUS, ASCII_1, '\0' }; static const char KW_US_ASCII[] = { ASCII_U, ASCII_S, ASCII_MINUS, ASCII_A, ASCII_S, ASCII_C, ASCII_I, ASCII_I, '\0' }; static const char KW_UTF_8[] = { ASCII_U, ASCII_T, ASCII_F, ASCII_MINUS, ASCII_8, '\0' }; static const char KW_UTF_16[] = { ASCII_U, ASCII_T, ASCII_F, ASCII_MINUS, ASCII_1, ASCII_6, '\0' }; static const char KW_UTF_16BE[] = { ASCII_U, ASCII_T, ASCII_F, ASCII_MINUS, ASCII_1, ASCII_6, ASCII_B, ASCII_E, '\0' }; static const char KW_UTF_16LE[] = { ASCII_U, ASCII_T, ASCII_F, ASCII_MINUS, ASCII_1, ASCII_6, ASCII_L, ASCII_E, '\0' }; static int FASTCALL getEncodingIndex(const char *name) { static const char *encodingNames[] = { KW_ISO_8859_1, KW_US_ASCII, KW_UTF_8, KW_UTF_16, KW_UTF_16BE, KW_UTF_16LE, }; int i; if (name == NULL) return NO_ENC; for (i = 0; i < (int)(sizeof(encodingNames)/sizeof(encodingNames[0])); i++) if (streqci(name, encodingNames[i])) return i; return UNKNOWN_ENC; } /* For binary compatibility, we store the index of the encoding specified at initialization in the isUtf16 member. */ #define INIT_ENC_INDEX(enc) ((int)(enc)->initEnc.isUtf16) #define SET_INIT_ENC_INDEX(enc, i) ((enc)->initEnc.isUtf16 = (char)i) /* This is what detects the encoding. encodingTable maps from encoding indices to encodings; INIT_ENC_INDEX(enc) is the index of the external (protocol) specified encoding; state is XML_CONTENT_STATE if we're parsing an external text entity, and XML_PROLOG_STATE otherwise. */ static int initScan(const ENCODING **encodingTable, const INIT_ENCODING *enc, int state, const char *ptr, const char *end, const char **nextTokPtr) { const ENCODING **encPtr; if (ptr == end) return XML_TOK_NONE; encPtr = enc->encPtr; if (ptr + 1 == end) { /* only a single byte available for auto-detection */ #ifndef XML_DTD /* FIXME */ /* a well-formed document entity must have more than one byte */ if (state != XML_CONTENT_STATE) return XML_TOK_PARTIAL; #endif /* so we're parsing an external text entity... */ /* if UTF-16 was externally specified, then we need at least 2 bytes */ switch (INIT_ENC_INDEX(enc)) { case UTF_16_ENC: case UTF_16LE_ENC: case UTF_16BE_ENC: return XML_TOK_PARTIAL; } switch ((unsigned char)*ptr) { case 0xFE: case 0xFF: case 0xEF: /* possibly first byte of UTF-8 BOM */ if (INIT_ENC_INDEX(enc) == ISO_8859_1_ENC && state == XML_CONTENT_STATE) break; /* fall through */ case 0x00: case 0x3C: return XML_TOK_PARTIAL; } } else { switch (((unsigned char)ptr[0] << 8) | (unsigned char)ptr[1]) { case 0xFEFF: if (INIT_ENC_INDEX(enc) == ISO_8859_1_ENC && state == XML_CONTENT_STATE) break; *nextTokPtr = ptr + 2; *encPtr = encodingTable[UTF_16BE_ENC]; return XML_TOK_BOM; /* 00 3C is handled in the default case */ case 0x3C00: if ((INIT_ENC_INDEX(enc) == UTF_16BE_ENC || INIT_ENC_INDEX(enc) == UTF_16_ENC) && state == XML_CONTENT_STATE) break; *encPtr = encodingTable[UTF_16LE_ENC]; return XmlTok(*encPtr, state, ptr, end, nextTokPtr); case 0xFFFE: if (INIT_ENC_INDEX(enc) == ISO_8859_1_ENC && state == XML_CONTENT_STATE) break; *nextTokPtr = ptr + 2; *encPtr = encodingTable[UTF_16LE_ENC]; return XML_TOK_BOM; case 0xEFBB: /* Maybe a UTF-8 BOM (EF BB BF) */ /* If there's an explicitly specified (external) encoding of ISO-8859-1 or some flavour of UTF-16 and this is an external text entity, don't look for the BOM, because it might be a legal data. */ if (state == XML_CONTENT_STATE) { int e = INIT_ENC_INDEX(enc); if (e == ISO_8859_1_ENC || e == UTF_16BE_ENC || e == UTF_16LE_ENC || e == UTF_16_ENC) break; } if (ptr + 2 == end) return XML_TOK_PARTIAL; if ((unsigned char)ptr[2] == 0xBF) { *nextTokPtr = ptr + 3; *encPtr = encodingTable[UTF_8_ENC]; return XML_TOK_BOM; } break; default: if (ptr[0] == '\0') { /* 0 isn't a legal data character. Furthermore a document entity can only start with ASCII characters. So the only way this can fail to be big-endian UTF-16 if it it's an external parsed general entity that's labelled as UTF-16LE. */ if (state == XML_CONTENT_STATE && INIT_ENC_INDEX(enc) == UTF_16LE_ENC) break; *encPtr = encodingTable[UTF_16BE_ENC]; return XmlTok(*encPtr, state, ptr, end, nextTokPtr); } else if (ptr[1] == '\0') { /* We could recover here in the case: - parsing an external entity - second byte is 0 - no externally specified encoding - no encoding declaration by assuming UTF-16LE. But we don't, because this would mean when presented just with a single byte, we couldn't reliably determine whether we needed further bytes. */ if (state == XML_CONTENT_STATE) break; *encPtr = encodingTable[UTF_16LE_ENC]; return XmlTok(*encPtr, state, ptr, end, nextTokPtr); } break; } } *encPtr = encodingTable[INIT_ENC_INDEX(enc)]; return XmlTok(*encPtr, state, ptr, end, nextTokPtr); } #define NS(x) x #define ns(x) x #include "xmltok_ns.c" #undef NS #undef ns #ifdef XML_NS #define NS(x) x ## NS #define ns(x) x ## _ns #include "xmltok_ns.c" #undef NS #undef ns ENCODING * XmlInitUnknownEncodingNS(void *mem, int *table, CONVERTER convert, void *userData) { ENCODING *enc = XmlInitUnknownEncoding(mem, table, convert, userData); if (enc) ((struct normal_encoding *)enc)->type[ASCII_COLON] = BT_COLON; return enc; } #endif /* XML_NS */ Python-2.3.7/Modules/expat/xmltok_impl.h0000644001241000117560000000122507713561412017517 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ enum { BT_NONXML, BT_MALFORM, BT_LT, BT_AMP, BT_RSQB, BT_LEAD2, BT_LEAD3, BT_LEAD4, BT_TRAIL, BT_CR, BT_LF, BT_GT, BT_QUOT, BT_APOS, BT_EQUALS, BT_QUEST, BT_EXCL, BT_SOL, BT_SEMI, BT_NUM, BT_LSQB, BT_S, BT_NMSTRT, BT_COLON, BT_HEX, BT_DIGIT, BT_NAME, BT_MINUS, BT_OTHER, /* known not to be a name or name start character */ BT_NONASCII, /* might be a name or name start character */ BT_PERCNT, BT_LPAR, BT_RPAR, BT_AST, BT_PLUS, BT_COMMA, BT_VERBAR }; #include Python-2.3.7/Modules/expat/iasciitab.h0000644001241000117560000000344607745310333017116 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ /* Like asciitab.h, except that 0xD has code BT_S rather than BT_CR */ /* 0x00 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x04 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x08 */ BT_NONXML, BT_S, BT_LF, BT_NONXML, /* 0x0C */ BT_NONXML, BT_S, BT_NONXML, BT_NONXML, /* 0x10 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x14 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x18 */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x1C */ BT_NONXML, BT_NONXML, BT_NONXML, BT_NONXML, /* 0x20 */ BT_S, BT_EXCL, BT_QUOT, BT_NUM, /* 0x24 */ BT_OTHER, BT_PERCNT, BT_AMP, BT_APOS, /* 0x28 */ BT_LPAR, BT_RPAR, BT_AST, BT_PLUS, /* 0x2C */ BT_COMMA, BT_MINUS, BT_NAME, BT_SOL, /* 0x30 */ BT_DIGIT, BT_DIGIT, BT_DIGIT, BT_DIGIT, /* 0x34 */ BT_DIGIT, BT_DIGIT, BT_DIGIT, BT_DIGIT, /* 0x38 */ BT_DIGIT, BT_DIGIT, BT_COLON, BT_SEMI, /* 0x3C */ BT_LT, BT_EQUALS, BT_GT, BT_QUEST, /* 0x40 */ BT_OTHER, BT_HEX, BT_HEX, BT_HEX, /* 0x44 */ BT_HEX, BT_HEX, BT_HEX, BT_NMSTRT, /* 0x48 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x4C */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x50 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x54 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x58 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_LSQB, /* 0x5C */ BT_OTHER, BT_RSQB, BT_OTHER, BT_NMSTRT, /* 0x60 */ BT_OTHER, BT_HEX, BT_HEX, BT_HEX, /* 0x64 */ BT_HEX, BT_HEX, BT_HEX, BT_NMSTRT, /* 0x68 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x6C */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x70 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x74 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, /* 0x78 */ BT_NMSTRT, BT_NMSTRT, BT_NMSTRT, BT_OTHER, /* 0x7C */ BT_VERBAR, BT_OTHER, BT_OTHER, BT_OTHER, Python-2.3.7/Modules/expat/internal.h0000644001241000117560000000372307745310333017000 0ustar loewishpifb6/* internal.h Internal definitions used by Expat. This is not needed to compile client code. The following calling convention macros are defined for frequently called functions: FASTCALL - Used for those internal functions that have a simple body and a low number of arguments and local variables. PTRCALL - Used for functions called though function pointers. PTRFASTCALL - Like PTRCALL, but for low number of arguments. inline - Used for selected internal functions for which inlining may improve performance on some platforms. Note: Use of these macros is based on judgement, not hard rules, and therefore subject to change. */ #if defined(__GNUC__) && defined(__i386__) /* We'll use this version by default only where we know it helps. regparm() generates warnings on Solaris boxes. See SF bug #692878. Instability reported with egcs on a RedHat Linux 7.3. Let's comment out: #define FASTCALL __attribute__((stdcall, regparm(3))) and let's try this: */ #define FASTCALL __attribute__((regparm(3))) #define PTRFASTCALL __attribute__((regparm(3))) #endif /* Using __fastcall seems to have an unexpected negative effect under MS VC++, especially for function pointers, so we won't use it for now on that platform. It may be reconsidered for a future release if it can be made more effective. Likely reason: __fastcall on Windows is like stdcall, therefore the compiler cannot perform stack optimizations for call clusters. */ /* Make sure all of these are defined if they aren't already. */ #ifndef FASTCALL #define FASTCALL #endif #ifndef PTRCALL #define PTRCALL #endif #ifndef PTRFASTCALL #define PTRFASTCALL #endif #ifndef XML_MIN_SIZE #if !defined(__cplusplus) && !defined(inline) #ifdef __GNUC__ #define inline __inline #endif /* __GNUC__ */ #endif #endif /* XML_MIN_SIZE */ #ifdef __cplusplus #define inline inline #else #ifndef inline #define inline #endif #endif Python-2.3.7/Modules/expat/winconfig.h0000644001241000117560000000130507745310333017141 0ustar loewishpifb6/*================================================================ ** Copyright 2000, Clark Cooper ** All rights reserved. ** ** This is free software. You are permitted to copy, distribute, or modify ** it under the terms of the MIT/X license (contained in the COPYING file ** with this distribution.) */ #ifndef WINCONFIG_H #define WINCONFIG_H #define WIN32_LEAN_AND_MEAN #include #undef WIN32_LEAN_AND_MEAN #include #include #define XML_NS 1 #define XML_DTD 1 #define XML_CONTEXT_BYTES 1024 /* we will assume all Windows platforms are little endian */ #define BYTEORDER 1234 /* Windows has memmove() available. */ #define HAVE_MEMMOVE #endif /* ndef WINCONFIG_H */ Python-2.3.7/Modules/expat/xmltok_impl.c0000644001241000117560000012666507745310333017531 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #ifndef IS_INVALID_CHAR #define IS_INVALID_CHAR(enc, ptr, n) (0) #endif #define INVALID_LEAD_CASE(n, ptr, nextTokPtr) \ case BT_LEAD ## n: \ if (end - ptr < n) \ return XML_TOK_PARTIAL_CHAR; \ if (IS_INVALID_CHAR(enc, ptr, n)) { \ *(nextTokPtr) = (ptr); \ return XML_TOK_INVALID; \ } \ ptr += n; \ break; #define INVALID_CASES(ptr, nextTokPtr) \ INVALID_LEAD_CASE(2, ptr, nextTokPtr) \ INVALID_LEAD_CASE(3, ptr, nextTokPtr) \ INVALID_LEAD_CASE(4, ptr, nextTokPtr) \ case BT_NONXML: \ case BT_MALFORM: \ case BT_TRAIL: \ *(nextTokPtr) = (ptr); \ return XML_TOK_INVALID; #define CHECK_NAME_CASE(n, enc, ptr, end, nextTokPtr) \ case BT_LEAD ## n: \ if (end - ptr < n) \ return XML_TOK_PARTIAL_CHAR; \ if (!IS_NAME_CHAR(enc, ptr, n)) { \ *nextTokPtr = ptr; \ return XML_TOK_INVALID; \ } \ ptr += n; \ break; #define CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) \ case BT_NONASCII: \ if (!IS_NAME_CHAR_MINBPC(enc, ptr)) { \ *nextTokPtr = ptr; \ return XML_TOK_INVALID; \ } \ case BT_NMSTRT: \ case BT_HEX: \ case BT_DIGIT: \ case BT_NAME: \ case BT_MINUS: \ ptr += MINBPC(enc); \ break; \ CHECK_NAME_CASE(2, enc, ptr, end, nextTokPtr) \ CHECK_NAME_CASE(3, enc, ptr, end, nextTokPtr) \ CHECK_NAME_CASE(4, enc, ptr, end, nextTokPtr) #define CHECK_NMSTRT_CASE(n, enc, ptr, end, nextTokPtr) \ case BT_LEAD ## n: \ if (end - ptr < n) \ return XML_TOK_PARTIAL_CHAR; \ if (!IS_NMSTRT_CHAR(enc, ptr, n)) { \ *nextTokPtr = ptr; \ return XML_TOK_INVALID; \ } \ ptr += n; \ break; #define CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) \ case BT_NONASCII: \ if (!IS_NMSTRT_CHAR_MINBPC(enc, ptr)) { \ *nextTokPtr = ptr; \ return XML_TOK_INVALID; \ } \ case BT_NMSTRT: \ case BT_HEX: \ ptr += MINBPC(enc); \ break; \ CHECK_NMSTRT_CASE(2, enc, ptr, end, nextTokPtr) \ CHECK_NMSTRT_CASE(3, enc, ptr, end, nextTokPtr) \ CHECK_NMSTRT_CASE(4, enc, ptr, end, nextTokPtr) #ifndef PREFIX #define PREFIX(ident) ident #endif /* ptr points to character following " */ switch (BYTE_TYPE(enc, ptr + MINBPC(enc))) { case BT_S: case BT_CR: case BT_LF: case BT_PERCNT: *nextTokPtr = ptr; return XML_TOK_INVALID; } /* fall through */ case BT_S: case BT_CR: case BT_LF: *nextTokPtr = ptr; return XML_TOK_DECL_OPEN; case BT_NMSTRT: case BT_HEX: ptr += MINBPC(enc); break; default: *nextTokPtr = ptr; return XML_TOK_INVALID; } } return XML_TOK_PARTIAL; } static int PTRCALL PREFIX(checkPiTarget)(const ENCODING *enc, const char *ptr, const char *end, int *tokPtr) { int upper = 0; *tokPtr = XML_TOK_PI; if (end - ptr != MINBPC(enc)*3) return 1; switch (BYTE_TO_ASCII(enc, ptr)) { case ASCII_x: break; case ASCII_X: upper = 1; break; default: return 1; } ptr += MINBPC(enc); switch (BYTE_TO_ASCII(enc, ptr)) { case ASCII_m: break; case ASCII_M: upper = 1; break; default: return 1; } ptr += MINBPC(enc); switch (BYTE_TO_ASCII(enc, ptr)) { case ASCII_l: break; case ASCII_L: upper = 1; break; default: return 1; } if (upper) return 0; *tokPtr = XML_TOK_XML_DECL; return 1; } /* ptr points to character following " 1) { size_t n = end - ptr; if (n & (MINBPC(enc) - 1)) { n &= ~(MINBPC(enc) - 1); if (n == 0) return XML_TOK_PARTIAL; end = ptr + n; } } switch (BYTE_TYPE(enc, ptr)) { case BT_RSQB: ptr += MINBPC(enc); if (ptr == end) return XML_TOK_PARTIAL; if (!CHAR_MATCHES(enc, ptr, ASCII_RSQB)) break; ptr += MINBPC(enc); if (ptr == end) return XML_TOK_PARTIAL; if (!CHAR_MATCHES(enc, ptr, ASCII_GT)) { ptr -= MINBPC(enc); break; } *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_CDATA_SECT_CLOSE; case BT_CR: ptr += MINBPC(enc); if (ptr == end) return XML_TOK_PARTIAL; if (BYTE_TYPE(enc, ptr) == BT_LF) ptr += MINBPC(enc); *nextTokPtr = ptr; return XML_TOK_DATA_NEWLINE; case BT_LF: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_DATA_NEWLINE; INVALID_CASES(ptr, nextTokPtr) default: ptr += MINBPC(enc); break; } while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { #define LEAD_CASE(n) \ case BT_LEAD ## n: \ if (end - ptr < n || IS_INVALID_CHAR(enc, ptr, n)) { \ *nextTokPtr = ptr; \ return XML_TOK_DATA_CHARS; \ } \ ptr += n; \ break; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_NONXML: case BT_MALFORM: case BT_TRAIL: case BT_CR: case BT_LF: case BT_RSQB: *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; default: ptr += MINBPC(enc); break; } } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; } /* ptr points to character following " 1) { size_t n = end - ptr; if (n & (MINBPC(enc) - 1)) { n &= ~(MINBPC(enc) - 1); if (n == 0) return XML_TOK_PARTIAL; end = ptr + n; } } switch (BYTE_TYPE(enc, ptr)) { case BT_LT: return PREFIX(scanLt)(enc, ptr + MINBPC(enc), end, nextTokPtr); case BT_AMP: return PREFIX(scanRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); case BT_CR: ptr += MINBPC(enc); if (ptr == end) return XML_TOK_TRAILING_CR; if (BYTE_TYPE(enc, ptr) == BT_LF) ptr += MINBPC(enc); *nextTokPtr = ptr; return XML_TOK_DATA_NEWLINE; case BT_LF: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_DATA_NEWLINE; case BT_RSQB: ptr += MINBPC(enc); if (ptr == end) return XML_TOK_TRAILING_RSQB; if (!CHAR_MATCHES(enc, ptr, ASCII_RSQB)) break; ptr += MINBPC(enc); if (ptr == end) return XML_TOK_TRAILING_RSQB; if (!CHAR_MATCHES(enc, ptr, ASCII_GT)) { ptr -= MINBPC(enc); break; } *nextTokPtr = ptr; return XML_TOK_INVALID; INVALID_CASES(ptr, nextTokPtr) default: ptr += MINBPC(enc); break; } while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { #define LEAD_CASE(n) \ case BT_LEAD ## n: \ if (end - ptr < n || IS_INVALID_CHAR(enc, ptr, n)) { \ *nextTokPtr = ptr; \ return XML_TOK_DATA_CHARS; \ } \ ptr += n; \ break; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_RSQB: if (ptr + MINBPC(enc) != end) { if (!CHAR_MATCHES(enc, ptr + MINBPC(enc), ASCII_RSQB)) { ptr += MINBPC(enc); break; } if (ptr + 2*MINBPC(enc) != end) { if (!CHAR_MATCHES(enc, ptr + 2*MINBPC(enc), ASCII_GT)) { ptr += MINBPC(enc); break; } *nextTokPtr = ptr + 2*MINBPC(enc); return XML_TOK_INVALID; } } /* fall through */ case BT_AMP: case BT_LT: case BT_NONXML: case BT_MALFORM: case BT_TRAIL: case BT_CR: case BT_LF: *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; default: ptr += MINBPC(enc); break; } } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; } /* ptr points to character following "%" */ static int PTRCALL PREFIX(scanPercent)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { if (ptr == end) return -XML_TOK_PERCENT; switch (BYTE_TYPE(enc, ptr)) { CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) case BT_S: case BT_LF: case BT_CR: case BT_PERCNT: *nextTokPtr = ptr; return XML_TOK_PERCENT; default: *nextTokPtr = ptr; return XML_TOK_INVALID; } while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) case BT_SEMI: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_PARAM_ENTITY_REF; default: *nextTokPtr = ptr; return XML_TOK_INVALID; } } return XML_TOK_PARTIAL; } static int PTRCALL PREFIX(scanPoundName)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { if (ptr == end) return XML_TOK_PARTIAL; switch (BYTE_TYPE(enc, ptr)) { CHECK_NMSTRT_CASES(enc, ptr, end, nextTokPtr) default: *nextTokPtr = ptr; return XML_TOK_INVALID; } while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) case BT_CR: case BT_LF: case BT_S: case BT_RPAR: case BT_GT: case BT_PERCNT: case BT_VERBAR: *nextTokPtr = ptr; return XML_TOK_POUND_NAME; default: *nextTokPtr = ptr; return XML_TOK_INVALID; } } return -XML_TOK_POUND_NAME; } static int PTRCALL PREFIX(scanLit)(int open, const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { while (ptr != end) { int t = BYTE_TYPE(enc, ptr); switch (t) { INVALID_CASES(ptr, nextTokPtr) case BT_QUOT: case BT_APOS: ptr += MINBPC(enc); if (t != open) break; if (ptr == end) return -XML_TOK_LITERAL; *nextTokPtr = ptr; switch (BYTE_TYPE(enc, ptr)) { case BT_S: case BT_CR: case BT_LF: case BT_GT: case BT_PERCNT: case BT_LSQB: return XML_TOK_LITERAL; default: return XML_TOK_INVALID; } default: ptr += MINBPC(enc); break; } } return XML_TOK_PARTIAL; } static int PTRCALL PREFIX(prologTok)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { int tok; if (ptr == end) return XML_TOK_NONE; if (MINBPC(enc) > 1) { size_t n = end - ptr; if (n & (MINBPC(enc) - 1)) { n &= ~(MINBPC(enc) - 1); if (n == 0) return XML_TOK_PARTIAL; end = ptr + n; } } switch (BYTE_TYPE(enc, ptr)) { case BT_QUOT: return PREFIX(scanLit)(BT_QUOT, enc, ptr + MINBPC(enc), end, nextTokPtr); case BT_APOS: return PREFIX(scanLit)(BT_APOS, enc, ptr + MINBPC(enc), end, nextTokPtr); case BT_LT: { ptr += MINBPC(enc); if (ptr == end) return XML_TOK_PARTIAL; switch (BYTE_TYPE(enc, ptr)) { case BT_EXCL: return PREFIX(scanDecl)(enc, ptr + MINBPC(enc), end, nextTokPtr); case BT_QUEST: return PREFIX(scanPi)(enc, ptr + MINBPC(enc), end, nextTokPtr); case BT_NMSTRT: case BT_HEX: case BT_NONASCII: case BT_LEAD2: case BT_LEAD3: case BT_LEAD4: *nextTokPtr = ptr - MINBPC(enc); return XML_TOK_INSTANCE_START; } *nextTokPtr = ptr; return XML_TOK_INVALID; } case BT_CR: if (ptr + MINBPC(enc) == end) { *nextTokPtr = end; /* indicate that this might be part of a CR/LF pair */ return -XML_TOK_PROLOG_S; } /* fall through */ case BT_S: case BT_LF: for (;;) { ptr += MINBPC(enc); if (ptr == end) break; switch (BYTE_TYPE(enc, ptr)) { case BT_S: case BT_LF: break; case BT_CR: /* don't split CR/LF pair */ if (ptr + MINBPC(enc) != end) break; /* fall through */ default: *nextTokPtr = ptr; return XML_TOK_PROLOG_S; } } *nextTokPtr = ptr; return XML_TOK_PROLOG_S; case BT_PERCNT: return PREFIX(scanPercent)(enc, ptr + MINBPC(enc), end, nextTokPtr); case BT_COMMA: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_COMMA; case BT_LSQB: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_OPEN_BRACKET; case BT_RSQB: ptr += MINBPC(enc); if (ptr == end) return -XML_TOK_CLOSE_BRACKET; if (CHAR_MATCHES(enc, ptr, ASCII_RSQB)) { if (ptr + MINBPC(enc) == end) return XML_TOK_PARTIAL; if (CHAR_MATCHES(enc, ptr + MINBPC(enc), ASCII_GT)) { *nextTokPtr = ptr + 2*MINBPC(enc); return XML_TOK_COND_SECT_CLOSE; } } *nextTokPtr = ptr; return XML_TOK_CLOSE_BRACKET; case BT_LPAR: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_OPEN_PAREN; case BT_RPAR: ptr += MINBPC(enc); if (ptr == end) return -XML_TOK_CLOSE_PAREN; switch (BYTE_TYPE(enc, ptr)) { case BT_AST: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_CLOSE_PAREN_ASTERISK; case BT_QUEST: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_CLOSE_PAREN_QUESTION; case BT_PLUS: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_CLOSE_PAREN_PLUS; case BT_CR: case BT_LF: case BT_S: case BT_GT: case BT_COMMA: case BT_VERBAR: case BT_RPAR: *nextTokPtr = ptr; return XML_TOK_CLOSE_PAREN; } *nextTokPtr = ptr; return XML_TOK_INVALID; case BT_VERBAR: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_OR; case BT_GT: *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_DECL_CLOSE; case BT_NUM: return PREFIX(scanPoundName)(enc, ptr + MINBPC(enc), end, nextTokPtr); #define LEAD_CASE(n) \ case BT_LEAD ## n: \ if (end - ptr < n) \ return XML_TOK_PARTIAL_CHAR; \ if (IS_NMSTRT_CHAR(enc, ptr, n)) { \ ptr += n; \ tok = XML_TOK_NAME; \ break; \ } \ if (IS_NAME_CHAR(enc, ptr, n)) { \ ptr += n; \ tok = XML_TOK_NMTOKEN; \ break; \ } \ *nextTokPtr = ptr; \ return XML_TOK_INVALID; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_NMSTRT: case BT_HEX: tok = XML_TOK_NAME; ptr += MINBPC(enc); break; case BT_DIGIT: case BT_NAME: case BT_MINUS: #ifdef XML_NS case BT_COLON: #endif tok = XML_TOK_NMTOKEN; ptr += MINBPC(enc); break; case BT_NONASCII: if (IS_NMSTRT_CHAR_MINBPC(enc, ptr)) { ptr += MINBPC(enc); tok = XML_TOK_NAME; break; } if (IS_NAME_CHAR_MINBPC(enc, ptr)) { ptr += MINBPC(enc); tok = XML_TOK_NMTOKEN; break; } /* fall through */ default: *nextTokPtr = ptr; return XML_TOK_INVALID; } while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) case BT_GT: case BT_RPAR: case BT_COMMA: case BT_VERBAR: case BT_LSQB: case BT_PERCNT: case BT_S: case BT_CR: case BT_LF: *nextTokPtr = ptr; return tok; #ifdef XML_NS case BT_COLON: ptr += MINBPC(enc); switch (tok) { case XML_TOK_NAME: if (ptr == end) return XML_TOK_PARTIAL; tok = XML_TOK_PREFIXED_NAME; switch (BYTE_TYPE(enc, ptr)) { CHECK_NAME_CASES(enc, ptr, end, nextTokPtr) default: tok = XML_TOK_NMTOKEN; break; } break; case XML_TOK_PREFIXED_NAME: tok = XML_TOK_NMTOKEN; break; } break; #endif case BT_PLUS: if (tok == XML_TOK_NMTOKEN) { *nextTokPtr = ptr; return XML_TOK_INVALID; } *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_NAME_PLUS; case BT_AST: if (tok == XML_TOK_NMTOKEN) { *nextTokPtr = ptr; return XML_TOK_INVALID; } *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_NAME_ASTERISK; case BT_QUEST: if (tok == XML_TOK_NMTOKEN) { *nextTokPtr = ptr; return XML_TOK_INVALID; } *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_NAME_QUESTION; default: *nextTokPtr = ptr; return XML_TOK_INVALID; } } return -tok; } static int PTRCALL PREFIX(attributeValueTok)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { const char *start; if (ptr == end) return XML_TOK_NONE; start = ptr; while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { #define LEAD_CASE(n) \ case BT_LEAD ## n: ptr += n; break; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_AMP: if (ptr == start) return PREFIX(scanRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; case BT_LT: /* this is for inside entity references */ *nextTokPtr = ptr; return XML_TOK_INVALID; case BT_LF: if (ptr == start) { *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_DATA_NEWLINE; } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; case BT_CR: if (ptr == start) { ptr += MINBPC(enc); if (ptr == end) return XML_TOK_TRAILING_CR; if (BYTE_TYPE(enc, ptr) == BT_LF) ptr += MINBPC(enc); *nextTokPtr = ptr; return XML_TOK_DATA_NEWLINE; } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; case BT_S: if (ptr == start) { *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_ATTRIBUTE_VALUE_S; } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; default: ptr += MINBPC(enc); break; } } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; } static int PTRCALL PREFIX(entityValueTok)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { const char *start; if (ptr == end) return XML_TOK_NONE; start = ptr; while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { #define LEAD_CASE(n) \ case BT_LEAD ## n: ptr += n; break; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_AMP: if (ptr == start) return PREFIX(scanRef)(enc, ptr + MINBPC(enc), end, nextTokPtr); *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; case BT_PERCNT: if (ptr == start) { int tok = PREFIX(scanPercent)(enc, ptr + MINBPC(enc), end, nextTokPtr); return (tok == XML_TOK_PERCENT) ? XML_TOK_INVALID : tok; } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; case BT_LF: if (ptr == start) { *nextTokPtr = ptr + MINBPC(enc); return XML_TOK_DATA_NEWLINE; } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; case BT_CR: if (ptr == start) { ptr += MINBPC(enc); if (ptr == end) return XML_TOK_TRAILING_CR; if (BYTE_TYPE(enc, ptr) == BT_LF) ptr += MINBPC(enc); *nextTokPtr = ptr; return XML_TOK_DATA_NEWLINE; } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; default: ptr += MINBPC(enc); break; } } *nextTokPtr = ptr; return XML_TOK_DATA_CHARS; } #ifdef XML_DTD static int PTRCALL PREFIX(ignoreSectionTok)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { int level = 0; if (MINBPC(enc) > 1) { size_t n = end - ptr; if (n & (MINBPC(enc) - 1)) { n &= ~(MINBPC(enc) - 1); end = ptr + n; } } while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { INVALID_CASES(ptr, nextTokPtr) case BT_LT: if ((ptr += MINBPC(enc)) == end) return XML_TOK_PARTIAL; if (CHAR_MATCHES(enc, ptr, ASCII_EXCL)) { if ((ptr += MINBPC(enc)) == end) return XML_TOK_PARTIAL; if (CHAR_MATCHES(enc, ptr, ASCII_LSQB)) { ++level; ptr += MINBPC(enc); } } break; case BT_RSQB: if ((ptr += MINBPC(enc)) == end) return XML_TOK_PARTIAL; if (CHAR_MATCHES(enc, ptr, ASCII_RSQB)) { if ((ptr += MINBPC(enc)) == end) return XML_TOK_PARTIAL; if (CHAR_MATCHES(enc, ptr, ASCII_GT)) { ptr += MINBPC(enc); if (level == 0) { *nextTokPtr = ptr; return XML_TOK_IGNORE_SECT; } --level; } } break; default: ptr += MINBPC(enc); break; } } return XML_TOK_PARTIAL; } #endif /* XML_DTD */ static int PTRCALL PREFIX(isPublicId)(const ENCODING *enc, const char *ptr, const char *end, const char **badPtr) { ptr += MINBPC(enc); end -= MINBPC(enc); for (; ptr != end; ptr += MINBPC(enc)) { switch (BYTE_TYPE(enc, ptr)) { case BT_DIGIT: case BT_HEX: case BT_MINUS: case BT_APOS: case BT_LPAR: case BT_RPAR: case BT_PLUS: case BT_COMMA: case BT_SOL: case BT_EQUALS: case BT_QUEST: case BT_CR: case BT_LF: case BT_SEMI: case BT_EXCL: case BT_AST: case BT_PERCNT: case BT_NUM: #ifdef XML_NS case BT_COLON: #endif break; case BT_S: if (CHAR_MATCHES(enc, ptr, ASCII_TAB)) { *badPtr = ptr; return 0; } break; case BT_NAME: case BT_NMSTRT: if (!(BYTE_TO_ASCII(enc, ptr) & ~0x7f)) break; default: switch (BYTE_TO_ASCII(enc, ptr)) { case 0x24: /* $ */ case 0x40: /* @ */ break; default: *badPtr = ptr; return 0; } break; } } return 1; } /* This must only be called for a well-formed start-tag or empty element tag. Returns the number of attributes. Pointers to the first attsMax attributes are stored in atts. */ static int PTRCALL PREFIX(getAtts)(const ENCODING *enc, const char *ptr, int attsMax, ATTRIBUTE *atts) { enum { other, inName, inValue } state = inName; int nAtts = 0; int open = 0; /* defined when state == inValue; initialization just to shut up compilers */ for (ptr += MINBPC(enc);; ptr += MINBPC(enc)) { switch (BYTE_TYPE(enc, ptr)) { #define START_NAME \ if (state == other) { \ if (nAtts < attsMax) { \ atts[nAtts].name = ptr; \ atts[nAtts].normalized = 1; \ } \ state = inName; \ } #define LEAD_CASE(n) \ case BT_LEAD ## n: START_NAME ptr += (n - MINBPC(enc)); break; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_NONASCII: case BT_NMSTRT: case BT_HEX: START_NAME break; #undef START_NAME case BT_QUOT: if (state != inValue) { if (nAtts < attsMax) atts[nAtts].valuePtr = ptr + MINBPC(enc); state = inValue; open = BT_QUOT; } else if (open == BT_QUOT) { state = other; if (nAtts < attsMax) atts[nAtts].valueEnd = ptr; nAtts++; } break; case BT_APOS: if (state != inValue) { if (nAtts < attsMax) atts[nAtts].valuePtr = ptr + MINBPC(enc); state = inValue; open = BT_APOS; } else if (open == BT_APOS) { state = other; if (nAtts < attsMax) atts[nAtts].valueEnd = ptr; nAtts++; } break; case BT_AMP: if (nAtts < attsMax) atts[nAtts].normalized = 0; break; case BT_S: if (state == inName) state = other; else if (state == inValue && nAtts < attsMax && atts[nAtts].normalized && (ptr == atts[nAtts].valuePtr || BYTE_TO_ASCII(enc, ptr) != ASCII_SPACE || BYTE_TO_ASCII(enc, ptr + MINBPC(enc)) == ASCII_SPACE || BYTE_TYPE(enc, ptr + MINBPC(enc)) == open)) atts[nAtts].normalized = 0; break; case BT_CR: case BT_LF: /* This case ensures that the first attribute name is counted Apart from that we could just change state on the quote. */ if (state == inName) state = other; else if (state == inValue && nAtts < attsMax) atts[nAtts].normalized = 0; break; case BT_GT: case BT_SOL: if (state != inValue) return nAtts; break; default: break; } } /* not reached */ } static int PTRFASTCALL PREFIX(charRefNumber)(const ENCODING *enc, const char *ptr) { int result = 0; /* skip &# */ ptr += 2*MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_x)) { for (ptr += MINBPC(enc); !CHAR_MATCHES(enc, ptr, ASCII_SEMI); ptr += MINBPC(enc)) { int c = BYTE_TO_ASCII(enc, ptr); switch (c) { case ASCII_0: case ASCII_1: case ASCII_2: case ASCII_3: case ASCII_4: case ASCII_5: case ASCII_6: case ASCII_7: case ASCII_8: case ASCII_9: result <<= 4; result |= (c - ASCII_0); break; case ASCII_A: case ASCII_B: case ASCII_C: case ASCII_D: case ASCII_E: case ASCII_F: result <<= 4; result += 10 + (c - ASCII_A); break; case ASCII_a: case ASCII_b: case ASCII_c: case ASCII_d: case ASCII_e: case ASCII_f: result <<= 4; result += 10 + (c - ASCII_a); break; } if (result >= 0x110000) return -1; } } else { for (; !CHAR_MATCHES(enc, ptr, ASCII_SEMI); ptr += MINBPC(enc)) { int c = BYTE_TO_ASCII(enc, ptr); result *= 10; result += (c - ASCII_0); if (result >= 0x110000) return -1; } } return checkCharRefNumber(result); } static int PTRCALL PREFIX(predefinedEntityName)(const ENCODING *enc, const char *ptr, const char *end) { switch ((end - ptr)/MINBPC(enc)) { case 2: if (CHAR_MATCHES(enc, ptr + MINBPC(enc), ASCII_t)) { switch (BYTE_TO_ASCII(enc, ptr)) { case ASCII_l: return ASCII_LT; case ASCII_g: return ASCII_GT; } } break; case 3: if (CHAR_MATCHES(enc, ptr, ASCII_a)) { ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_m)) { ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_p)) return ASCII_AMP; } } break; case 4: switch (BYTE_TO_ASCII(enc, ptr)) { case ASCII_q: ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_u)) { ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_o)) { ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_t)) return ASCII_QUOT; } } break; case ASCII_a: ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_p)) { ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_o)) { ptr += MINBPC(enc); if (CHAR_MATCHES(enc, ptr, ASCII_s)) return ASCII_APOS; } } break; } } return 0; } static int PTRCALL PREFIX(sameName)(const ENCODING *enc, const char *ptr1, const char *ptr2) { for (;;) { switch (BYTE_TYPE(enc, ptr1)) { #define LEAD_CASE(n) \ case BT_LEAD ## n: \ if (*ptr1++ != *ptr2++) \ return 0; LEAD_CASE(4) LEAD_CASE(3) LEAD_CASE(2) #undef LEAD_CASE /* fall through */ if (*ptr1++ != *ptr2++) return 0; break; case BT_NONASCII: case BT_NMSTRT: #ifdef XML_NS case BT_COLON: #endif case BT_HEX: case BT_DIGIT: case BT_NAME: case BT_MINUS: if (*ptr2++ != *ptr1++) return 0; if (MINBPC(enc) > 1) { if (*ptr2++ != *ptr1++) return 0; if (MINBPC(enc) > 2) { if (*ptr2++ != *ptr1++) return 0; if (MINBPC(enc) > 3) { if (*ptr2++ != *ptr1++) return 0; } } } break; default: if (MINBPC(enc) == 1 && *ptr1 == *ptr2) return 1; switch (BYTE_TYPE(enc, ptr2)) { case BT_LEAD2: case BT_LEAD3: case BT_LEAD4: case BT_NONASCII: case BT_NMSTRT: #ifdef XML_NS case BT_COLON: #endif case BT_HEX: case BT_DIGIT: case BT_NAME: case BT_MINUS: return 0; default: return 1; } } } /* not reached */ } static int PTRCALL PREFIX(nameMatchesAscii)(const ENCODING *enc, const char *ptr1, const char *end1, const char *ptr2) { for (; *ptr2; ptr1 += MINBPC(enc), ptr2++) { if (ptr1 == end1) return 0; if (!CHAR_MATCHES(enc, ptr1, *ptr2)) return 0; } return ptr1 == end1; } static int PTRFASTCALL PREFIX(nameLength)(const ENCODING *enc, const char *ptr) { const char *start = ptr; for (;;) { switch (BYTE_TYPE(enc, ptr)) { #define LEAD_CASE(n) \ case BT_LEAD ## n: ptr += n; break; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_NONASCII: case BT_NMSTRT: #ifdef XML_NS case BT_COLON: #endif case BT_HEX: case BT_DIGIT: case BT_NAME: case BT_MINUS: ptr += MINBPC(enc); break; default: return ptr - start; } } } static const char * PTRFASTCALL PREFIX(skipS)(const ENCODING *enc, const char *ptr) { for (;;) { switch (BYTE_TYPE(enc, ptr)) { case BT_LF: case BT_CR: case BT_S: ptr += MINBPC(enc); break; default: return ptr; } } } static void PTRCALL PREFIX(updatePosition)(const ENCODING *enc, const char *ptr, const char *end, POSITION *pos) { while (ptr != end) { switch (BYTE_TYPE(enc, ptr)) { #define LEAD_CASE(n) \ case BT_LEAD ## n: \ ptr += n; \ break; LEAD_CASE(2) LEAD_CASE(3) LEAD_CASE(4) #undef LEAD_CASE case BT_LF: pos->columnNumber = (unsigned)-1; pos->lineNumber++; ptr += MINBPC(enc); break; case BT_CR: pos->lineNumber++; ptr += MINBPC(enc); if (ptr != end && BYTE_TYPE(enc, ptr) == BT_LF) ptr += MINBPC(enc); pos->columnNumber = (unsigned)-1; break; default: ptr += MINBPC(enc); break; } pos->columnNumber++; } } #undef DO_LEAD_CASE #undef MULTIBYTE_CASES #undef INVALID_CASES #undef CHECK_NAME_CASE #undef CHECK_NAME_CASES #undef CHECK_NMSTRT_CASE #undef CHECK_NMSTRT_CASES Python-2.3.7/Modules/expat/xmltok_ns.c0000644001241000117560000000557707614611231017202 0ustar loewishpifb6const ENCODING * NS(XmlGetUtf8InternalEncoding)(void) { return &ns(internal_utf8_encoding).enc; } const ENCODING * NS(XmlGetUtf16InternalEncoding)(void) { #if BYTEORDER == 1234 return &ns(internal_little2_encoding).enc; #elif BYTEORDER == 4321 return &ns(internal_big2_encoding).enc; #else const short n = 1; return (*(const char *)&n ? &ns(internal_little2_encoding).enc : &ns(internal_big2_encoding).enc); #endif } static const ENCODING *NS(encodings)[] = { &ns(latin1_encoding).enc, &ns(ascii_encoding).enc, &ns(utf8_encoding).enc, &ns(big2_encoding).enc, &ns(big2_encoding).enc, &ns(little2_encoding).enc, &ns(utf8_encoding).enc /* NO_ENC */ }; static int PTRCALL NS(initScanProlog)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { return initScan(NS(encodings), (const INIT_ENCODING *)enc, XML_PROLOG_STATE, ptr, end, nextTokPtr); } static int PTRCALL NS(initScanContent)(const ENCODING *enc, const char *ptr, const char *end, const char **nextTokPtr) { return initScan(NS(encodings), (const INIT_ENCODING *)enc, XML_CONTENT_STATE, ptr, end, nextTokPtr); } int NS(XmlInitEncoding)(INIT_ENCODING *p, const ENCODING **encPtr, const char *name) { int i = getEncodingIndex(name); if (i == UNKNOWN_ENC) return 0; SET_INIT_ENC_INDEX(p, i); p->initEnc.scanners[XML_PROLOG_STATE] = NS(initScanProlog); p->initEnc.scanners[XML_CONTENT_STATE] = NS(initScanContent); p->initEnc.updatePosition = initUpdatePosition; p->encPtr = encPtr; *encPtr = &(p->initEnc); return 1; } static const ENCODING * NS(findEncoding)(const ENCODING *enc, const char *ptr, const char *end) { #define ENCODING_MAX 128 char buf[ENCODING_MAX]; char *p = buf; int i; XmlUtf8Convert(enc, &ptr, end, &p, p + ENCODING_MAX - 1); if (ptr != end) return 0; *p = 0; if (streqci(buf, KW_UTF_16) && enc->minBytesPerChar == 2) return enc; i = getEncodingIndex(buf); if (i == UNKNOWN_ENC) return 0; return NS(encodings)[i]; } int NS(XmlParseXmlDecl)(int isGeneralTextEntity, const ENCODING *enc, const char *ptr, const char *end, const char **badPtr, const char **versionPtr, const char **versionEndPtr, const char **encodingName, const ENCODING **encoding, int *standalone) { return doParseXmlDecl(NS(findEncoding), isGeneralTextEntity, enc, ptr, end, badPtr, versionPtr, versionEndPtr, encodingName, encoding, standalone); } Python-2.3.7/Modules/expat/expat.h0000644001241000117560000011435107745310333016305 0ustar loewishpifb6/* Copyright (c) 1998, 1999, 2000 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #ifndef XmlParse_INCLUDED #define XmlParse_INCLUDED 1 #ifdef __VMS /* 0 1 2 3 0 1 2 3 1234567890123456789012345678901 1234567890123456789012345678901 */ #define XML_SetProcessingInstructionHandler XML_SetProcessingInstrHandler #define XML_SetUnparsedEntityDeclHandler XML_SetUnparsedEntDeclHandler #define XML_SetStartNamespaceDeclHandler XML_SetStartNamespcDeclHandler #define XML_SetExternalEntityRefHandlerArg XML_SetExternalEntRefHandlerArg #endif #include #if defined(_MSC_EXTENSIONS) && !defined(__BEOS__) && !defined(__CYGWIN__) #define XML_USE_MSC_EXTENSIONS 1 #endif /* Expat tries very hard to make the API boundary very specifically defined. There are two macros defined to control this boundary; each of these can be defined before including this header to achieve some different behavior, but doing so it not recommended or tested frequently. XMLCALL - The calling convention to use for all calls across the "library boundary." This will default to cdecl, and try really hard to tell the compiler that's what we want. XMLIMPORT - Whatever magic is needed to note that a function is to be imported from a dynamically loaded library (.dll, .so, or .sl, depending on your platform). The XMLCALL macro was added in Expat 1.95.7. The only one which is expected to be directly useful in client code is XMLCALL. Note that on at least some Unix versions, the Expat library must be compiled with the cdecl calling convention as the default since system headers may assume the cdecl convention. */ #ifndef XMLCALL #if defined(XML_USE_MSC_EXTENSIONS) #define XMLCALL __cdecl #elif defined(__GNUC__) #define XMLCALL __attribute__((cdecl)) #else /* For any platform which uses this definition and supports more than one calling convention, we need to extend this definition to declare the convention used on that platform, if it's possible to do so. If this is the case for your platform, please file a bug report with information on how to identify your platform via the C pre-processor and how to specify the same calling convention as the platform's malloc() implementation. */ #define XMLCALL #endif #endif /* not defined XMLCALL */ #if !defined(XML_STATIC) && !defined(XMLIMPORT) #ifndef XML_BUILDING_EXPAT /* using Expat from an application */ #ifdef XML_USE_MSC_EXTENSIONS #define XMLIMPORT __declspec(dllimport) #endif #endif #endif /* not defined XML_STATIC */ /* If we didn't define it above, define it away: */ #ifndef XMLIMPORT #define XMLIMPORT #endif #define XMLPARSEAPI(type) XMLIMPORT type XMLCALL #ifdef __cplusplus extern "C" { #endif #ifdef XML_UNICODE_WCHAR_T #define XML_UNICODE #endif struct XML_ParserStruct; typedef struct XML_ParserStruct *XML_Parser; #ifdef XML_UNICODE /* Information is UTF-16 encoded. */ #ifdef XML_UNICODE_WCHAR_T typedef wchar_t XML_Char; typedef wchar_t XML_LChar; #else typedef unsigned short XML_Char; typedef char XML_LChar; #endif /* XML_UNICODE_WCHAR_T */ #else /* Information is UTF-8 encoded. */ typedef char XML_Char; typedef char XML_LChar; #endif /* XML_UNICODE */ /* Should this be defined using stdbool.h when C99 is available? */ typedef unsigned char XML_Bool; #define XML_TRUE ((XML_Bool) 1) #define XML_FALSE ((XML_Bool) 0) /* The XML_Status enum gives the possible return values for several API functions. The preprocessor #defines are included so this stanza can be added to code that still needs to support older versions of Expat 1.95.x: #ifndef XML_STATUS_OK #define XML_STATUS_OK 1 #define XML_STATUS_ERROR 0 #endif Otherwise, the #define hackery is quite ugly and would have been dropped. */ enum XML_Status { XML_STATUS_ERROR = 0, #define XML_STATUS_ERROR XML_STATUS_ERROR XML_STATUS_OK = 1 #define XML_STATUS_OK XML_STATUS_OK }; enum XML_Error { XML_ERROR_NONE, XML_ERROR_NO_MEMORY, XML_ERROR_SYNTAX, XML_ERROR_NO_ELEMENTS, XML_ERROR_INVALID_TOKEN, XML_ERROR_UNCLOSED_TOKEN, XML_ERROR_PARTIAL_CHAR, XML_ERROR_TAG_MISMATCH, XML_ERROR_DUPLICATE_ATTRIBUTE, XML_ERROR_JUNK_AFTER_DOC_ELEMENT, XML_ERROR_PARAM_ENTITY_REF, XML_ERROR_UNDEFINED_ENTITY, XML_ERROR_RECURSIVE_ENTITY_REF, XML_ERROR_ASYNC_ENTITY, XML_ERROR_BAD_CHAR_REF, XML_ERROR_BINARY_ENTITY_REF, XML_ERROR_ATTRIBUTE_EXTERNAL_ENTITY_REF, XML_ERROR_MISPLACED_XML_PI, XML_ERROR_UNKNOWN_ENCODING, XML_ERROR_INCORRECT_ENCODING, XML_ERROR_UNCLOSED_CDATA_SECTION, XML_ERROR_EXTERNAL_ENTITY_HANDLING, XML_ERROR_NOT_STANDALONE, XML_ERROR_UNEXPECTED_STATE, XML_ERROR_ENTITY_DECLARED_IN_PE, XML_ERROR_FEATURE_REQUIRES_XML_DTD, XML_ERROR_CANT_CHANGE_FEATURE_ONCE_PARSING, XML_ERROR_UNBOUND_PREFIX }; enum XML_Content_Type { XML_CTYPE_EMPTY = 1, XML_CTYPE_ANY, XML_CTYPE_MIXED, XML_CTYPE_NAME, XML_CTYPE_CHOICE, XML_CTYPE_SEQ }; enum XML_Content_Quant { XML_CQUANT_NONE, XML_CQUANT_OPT, XML_CQUANT_REP, XML_CQUANT_PLUS }; /* If type == XML_CTYPE_EMPTY or XML_CTYPE_ANY, then quant will be XML_CQUANT_NONE, and the other fields will be zero or NULL. If type == XML_CTYPE_MIXED, then quant will be NONE or REP and numchildren will contain number of elements that may be mixed in and children point to an array of XML_Content cells that will be all of XML_CTYPE_NAME type with no quantification. If type == XML_CTYPE_NAME, then the name points to the name, and the numchildren field will be zero and children will be NULL. The quant fields indicates any quantifiers placed on the name. CHOICE and SEQ will have name NULL, the number of children in numchildren and children will point, recursively, to an array of XML_Content cells. The EMPTY, ANY, and MIXED types will only occur at top level. */ typedef struct XML_cp XML_Content; struct XML_cp { enum XML_Content_Type type; enum XML_Content_Quant quant; XML_Char * name; unsigned int numchildren; XML_Content * children; }; /* This is called for an element declaration. See above for description of the model argument. It's the caller's responsibility to free model when finished with it. */ typedef void (XMLCALL *XML_ElementDeclHandler) (void *userData, const XML_Char *name, XML_Content *model); XMLPARSEAPI(void) XML_SetElementDeclHandler(XML_Parser parser, XML_ElementDeclHandler eldecl); /* The Attlist declaration handler is called for *each* attribute. So a single Attlist declaration with multiple attributes declared will generate multiple calls to this handler. The "default" parameter may be NULL in the case of the "#IMPLIED" or "#REQUIRED" keyword. The "isrequired" parameter will be true and the default value will be NULL in the case of "#REQUIRED". If "isrequired" is true and default is non-NULL, then this is a "#FIXED" default. */ typedef void (XMLCALL *XML_AttlistDeclHandler) ( void *userData, const XML_Char *elname, const XML_Char *attname, const XML_Char *att_type, const XML_Char *dflt, int isrequired); XMLPARSEAPI(void) XML_SetAttlistDeclHandler(XML_Parser parser, XML_AttlistDeclHandler attdecl); /* The XML declaration handler is called for *both* XML declarations and text declarations. The way to distinguish is that the version parameter will be NULL for text declarations. The encoding parameter may be NULL for XML declarations. The standalone parameter will be -1, 0, or 1 indicating respectively that there was no standalone parameter in the declaration, that it was given as no, or that it was given as yes. */ typedef void (XMLCALL *XML_XmlDeclHandler) (void *userData, const XML_Char *version, const XML_Char *encoding, int standalone); XMLPARSEAPI(void) XML_SetXmlDeclHandler(XML_Parser parser, XML_XmlDeclHandler xmldecl); typedef struct { void *(XMLCALL *malloc_fcn)(size_t size); void *(XMLCALL *realloc_fcn)(void *ptr, size_t size); void (XMLCALL *free_fcn)(void *ptr); } XML_Memory_Handling_Suite; /* Constructs a new parser; encoding is the encoding specified by the external protocol or NULL if there is none specified. */ XMLPARSEAPI(XML_Parser) XML_ParserCreate(const XML_Char *encoding); /* Constructs a new parser and namespace processor. Element type names and attribute names that belong to a namespace will be expanded; unprefixed attribute names are never expanded; unprefixed element type names are expanded only if there is a default namespace. The expanded name is the concatenation of the namespace URI, the namespace separator character, and the local part of the name. If the namespace separator is '\0' then the namespace URI and the local part will be concatenated without any separator. When a namespace is not declared, the name and prefix will be passed through without expansion. */ XMLPARSEAPI(XML_Parser) XML_ParserCreateNS(const XML_Char *encoding, XML_Char namespaceSeparator); /* Constructs a new parser using the memory management suite referred to by memsuite. If memsuite is NULL, then use the standard library memory suite. If namespaceSeparator is non-NULL it creates a parser with namespace processing as described above. The character pointed at will serve as the namespace separator. All further memory operations used for the created parser will come from the given suite. */ XMLPARSEAPI(XML_Parser) XML_ParserCreate_MM(const XML_Char *encoding, const XML_Memory_Handling_Suite *memsuite, const XML_Char *namespaceSeparator); /* Prepare a parser object to be re-used. This is particularly valuable when memory allocation overhead is disproportionatly high, such as when a large number of small documnents need to be parsed. All handlers are cleared from the parser, except for the unknownEncodingHandler. The parser's external state is re-initialized except for the values of ns and ns_triplets. Added in Expat 1.95.3. */ XMLPARSEAPI(XML_Bool) XML_ParserReset(XML_Parser parser, const XML_Char *encoding); /* atts is array of name/value pairs, terminated by 0; names and values are 0 terminated. */ typedef void (XMLCALL *XML_StartElementHandler) (void *userData, const XML_Char *name, const XML_Char **atts); typedef void (XMLCALL *XML_EndElementHandler) (void *userData, const XML_Char *name); /* s is not 0 terminated. */ typedef void (XMLCALL *XML_CharacterDataHandler) (void *userData, const XML_Char *s, int len); /* target and data are 0 terminated */ typedef void (XMLCALL *XML_ProcessingInstructionHandler) ( void *userData, const XML_Char *target, const XML_Char *data); /* data is 0 terminated */ typedef void (XMLCALL *XML_CommentHandler) (void *userData, const XML_Char *data); typedef void (XMLCALL *XML_StartCdataSectionHandler) (void *userData); typedef void (XMLCALL *XML_EndCdataSectionHandler) (void *userData); /* This is called for any characters in the XML document for which there is no applicable handler. This includes both characters that are part of markup which is of a kind that is not reported (comments, markup declarations), or characters that are part of a construct which could be reported but for which no handler has been supplied. The characters are passed exactly as they were in the XML document except that they will be encoded in UTF-8 or UTF-16. Line boundaries are not normalized. Note that a byte order mark character is not passed to the default handler. There are no guarantees about how characters are divided between calls to the default handler: for example, a comment might be split between multiple calls. */ typedef void (XMLCALL *XML_DefaultHandler) (void *userData, const XML_Char *s, int len); /* This is called for the start of the DOCTYPE declaration, before any DTD or internal subset is parsed. */ typedef void (XMLCALL *XML_StartDoctypeDeclHandler) ( void *userData, const XML_Char *doctypeName, const XML_Char *sysid, const XML_Char *pubid, int has_internal_subset); /* This is called for the start of the DOCTYPE declaration when the closing > is encountered, but after processing any external subset. */ typedef void (XMLCALL *XML_EndDoctypeDeclHandler)(void *userData); /* This is called for entity declarations. The is_parameter_entity argument will be non-zero if the entity is a parameter entity, zero otherwise. For internal entities (), value will be non-NULL and systemId, publicID, and notationName will be NULL. The value string is NOT nul-terminated; the length is provided in the value_length argument. Since it is legal to have zero-length values, do not use this argument to test for internal entities. For external entities, value will be NULL and systemId will be non-NULL. The publicId argument will be NULL unless a public identifier was provided. The notationName argument will have a non-NULL value only for unparsed entity declarations. Note that is_parameter_entity can't be changed to XML_Bool, since that would break binary compatibility. */ typedef void (XMLCALL *XML_EntityDeclHandler) ( void *userData, const XML_Char *entityName, int is_parameter_entity, const XML_Char *value, int value_length, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId, const XML_Char *notationName); XMLPARSEAPI(void) XML_SetEntityDeclHandler(XML_Parser parser, XML_EntityDeclHandler handler); /* OBSOLETE -- OBSOLETE -- OBSOLETE This handler has been superceded by the EntityDeclHandler above. It is provided here for backward compatibility. This is called for a declaration of an unparsed (NDATA) entity. The base argument is whatever was set by XML_SetBase. The entityName, systemId and notationName arguments will never be NULL. The other arguments may be. */ typedef void (XMLCALL *XML_UnparsedEntityDeclHandler) ( void *userData, const XML_Char *entityName, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId, const XML_Char *notationName); /* This is called for a declaration of notation. The base argument is whatever was set by XML_SetBase. The notationName will never be NULL. The other arguments can be. */ typedef void (XMLCALL *XML_NotationDeclHandler) ( void *userData, const XML_Char *notationName, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId); /* When namespace processing is enabled, these are called once for each namespace declaration. The call to the start and end element handlers occur between the calls to the start and end namespace declaration handlers. For an xmlns attribute, prefix will be NULL. For an xmlns="" attribute, uri will be NULL. */ typedef void (XMLCALL *XML_StartNamespaceDeclHandler) ( void *userData, const XML_Char *prefix, const XML_Char *uri); typedef void (XMLCALL *XML_EndNamespaceDeclHandler) ( void *userData, const XML_Char *prefix); /* This is called if the document is not standalone, that is, it has an external subset or a reference to a parameter entity, but does not have standalone="yes". If this handler returns XML_STATUS_ERROR, then processing will not continue, and the parser will return a XML_ERROR_NOT_STANDALONE error. If parameter entity parsing is enabled, then in addition to the conditions above this handler will only be called if the referenced entity was actually read. */ typedef int (XMLCALL *XML_NotStandaloneHandler) (void *userData); /* This is called for a reference to an external parsed general entity. The referenced entity is not automatically parsed. The application can parse it immediately or later using XML_ExternalEntityParserCreate. The parser argument is the parser parsing the entity containing the reference; it can be passed as the parser argument to XML_ExternalEntityParserCreate. The systemId argument is the system identifier as specified in the entity declaration; it will not be NULL. The base argument is the system identifier that should be used as the base for resolving systemId if systemId was relative; this is set by XML_SetBase; it may be NULL. The publicId argument is the public identifier as specified in the entity declaration, or NULL if none was specified; the whitespace in the public identifier will have been normalized as required by the XML spec. The context argument specifies the parsing context in the format expected by the context argument to XML_ExternalEntityParserCreate; context is valid only until the handler returns, so if the referenced entity is to be parsed later, it must be copied. context is NULL only when the entity is a parameter entity. The handler should return XML_STATUS_ERROR if processing should not continue because of a fatal error in the handling of the external entity. In this case the calling parser will return an XML_ERROR_EXTERNAL_ENTITY_HANDLING error. Note that unlike other handlers the first argument is the parser, not userData. */ typedef int (XMLCALL *XML_ExternalEntityRefHandler) ( XML_Parser parser, const XML_Char *context, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId); /* This is called in two situations: 1) An entity reference is encountered for which no declaration has been read *and* this is not an error. 2) An internal entity reference is read, but not expanded, because XML_SetDefaultHandler has been called. Note: skipped parameter entities in declarations and skipped general entities in attribute values cannot be reported, because the event would be out of sync with the reporting of the declarations or attribute values */ typedef void (XMLCALL *XML_SkippedEntityHandler) ( void *userData, const XML_Char *entityName, int is_parameter_entity); /* This structure is filled in by the XML_UnknownEncodingHandler to provide information to the parser about encodings that are unknown to the parser. The map[b] member gives information about byte sequences whose first byte is b. If map[b] is c where c is >= 0, then b by itself encodes the Unicode scalar value c. If map[b] is -1, then the byte sequence is malformed. If map[b] is -n, where n >= 2, then b is the first byte of an n-byte sequence that encodes a single Unicode scalar value. The data member will be passed as the first argument to the convert function. The convert function is used to convert multibyte sequences; s will point to a n-byte sequence where map[(unsigned char)*s] == -n. The convert function must return the Unicode scalar value represented by this byte sequence or -1 if the byte sequence is malformed. The convert function may be NULL if the encoding is a single-byte encoding, that is if map[b] >= -1 for all bytes b. When the parser is finished with the encoding, then if release is not NULL, it will call release passing it the data member; once release has been called, the convert function will not be called again. Expat places certain restrictions on the encodings that are supported using this mechanism. 1. Every ASCII character that can appear in a well-formed XML document, other than the characters $@\^`{}~ must be represented by a single byte, and that byte must be the same byte that represents that character in ASCII. 2. No character may require more than 4 bytes to encode. 3. All characters encoded must have Unicode scalar values <= 0xFFFF, (i.e., characters that would be encoded by surrogates in UTF-16 are not allowed). Note that this restriction doesn't apply to the built-in support for UTF-8 and UTF-16. 4. No Unicode character may be encoded by more than one distinct sequence of bytes. */ typedef struct { int map[256]; void *data; int (XMLCALL *convert)(void *data, const char *s); void (XMLCALL *release)(void *data); } XML_Encoding; /* This is called for an encoding that is unknown to the parser. The encodingHandlerData argument is that which was passed as the second argument to XML_SetUnknownEncodingHandler. The name argument gives the name of the encoding as specified in the encoding declaration. If the callback can provide information about the encoding, it must fill in the XML_Encoding structure, and return XML_STATUS_OK. Otherwise it must return XML_STATUS_ERROR. If info does not describe a suitable encoding, then the parser will return an XML_UNKNOWN_ENCODING error. */ typedef int (XMLCALL *XML_UnknownEncodingHandler) ( void *encodingHandlerData, const XML_Char *name, XML_Encoding *info); XMLPARSEAPI(void) XML_SetElementHandler(XML_Parser parser, XML_StartElementHandler start, XML_EndElementHandler end); XMLPARSEAPI(void) XML_SetStartElementHandler(XML_Parser, XML_StartElementHandler); XMLPARSEAPI(void) XML_SetEndElementHandler(XML_Parser, XML_EndElementHandler); XMLPARSEAPI(void) XML_SetCharacterDataHandler(XML_Parser parser, XML_CharacterDataHandler handler); XMLPARSEAPI(void) XML_SetProcessingInstructionHandler(XML_Parser parser, XML_ProcessingInstructionHandler handler); XMLPARSEAPI(void) XML_SetCommentHandler(XML_Parser parser, XML_CommentHandler handler); XMLPARSEAPI(void) XML_SetCdataSectionHandler(XML_Parser parser, XML_StartCdataSectionHandler start, XML_EndCdataSectionHandler end); XMLPARSEAPI(void) XML_SetStartCdataSectionHandler(XML_Parser parser, XML_StartCdataSectionHandler start); XMLPARSEAPI(void) XML_SetEndCdataSectionHandler(XML_Parser parser, XML_EndCdataSectionHandler end); /* This sets the default handler and also inhibits expansion of internal entities. These entity references will be passed to the default handler, or to the skipped entity handler, if one is set. */ XMLPARSEAPI(void) XML_SetDefaultHandler(XML_Parser parser, XML_DefaultHandler handler); /* This sets the default handler but does not inhibit expansion of internal entities. The entity reference will not be passed to the default handler. */ XMLPARSEAPI(void) XML_SetDefaultHandlerExpand(XML_Parser parser, XML_DefaultHandler handler); XMLPARSEAPI(void) XML_SetDoctypeDeclHandler(XML_Parser parser, XML_StartDoctypeDeclHandler start, XML_EndDoctypeDeclHandler end); XMLPARSEAPI(void) XML_SetStartDoctypeDeclHandler(XML_Parser parser, XML_StartDoctypeDeclHandler start); XMLPARSEAPI(void) XML_SetEndDoctypeDeclHandler(XML_Parser parser, XML_EndDoctypeDeclHandler end); XMLPARSEAPI(void) XML_SetUnparsedEntityDeclHandler(XML_Parser parser, XML_UnparsedEntityDeclHandler handler); XMLPARSEAPI(void) XML_SetNotationDeclHandler(XML_Parser parser, XML_NotationDeclHandler handler); XMLPARSEAPI(void) XML_SetNamespaceDeclHandler(XML_Parser parser, XML_StartNamespaceDeclHandler start, XML_EndNamespaceDeclHandler end); XMLPARSEAPI(void) XML_SetStartNamespaceDeclHandler(XML_Parser parser, XML_StartNamespaceDeclHandler start); XMLPARSEAPI(void) XML_SetEndNamespaceDeclHandler(XML_Parser parser, XML_EndNamespaceDeclHandler end); XMLPARSEAPI(void) XML_SetNotStandaloneHandler(XML_Parser parser, XML_NotStandaloneHandler handler); XMLPARSEAPI(void) XML_SetExternalEntityRefHandler(XML_Parser parser, XML_ExternalEntityRefHandler handler); /* If a non-NULL value for arg is specified here, then it will be passed as the first argument to the external entity ref handler instead of the parser object. */ XMLPARSEAPI(void) XML_SetExternalEntityRefHandlerArg(XML_Parser, void *arg); XMLPARSEAPI(void) XML_SetSkippedEntityHandler(XML_Parser parser, XML_SkippedEntityHandler handler); XMLPARSEAPI(void) XML_SetUnknownEncodingHandler(XML_Parser parser, XML_UnknownEncodingHandler handler, void *encodingHandlerData); /* This can be called within a handler for a start element, end element, processing instruction or character data. It causes the corresponding markup to be passed to the default handler. */ XMLPARSEAPI(void) XML_DefaultCurrent(XML_Parser parser); /* If do_nst is non-zero, and namespace processing is in effect, and a name has a prefix (i.e. an explicit namespace qualifier) then that name is returned as a triplet in a single string separated by the separator character specified when the parser was created: URI + sep + local_name + sep + prefix. If do_nst is zero, then namespace information is returned in the default manner (URI + sep + local_name) whether or not the name has a prefix. Note: Calling XML_SetReturnNSTriplet after XML_Parse or XML_ParseBuffer has no effect. */ XMLPARSEAPI(void) XML_SetReturnNSTriplet(XML_Parser parser, int do_nst); /* This value is passed as the userData argument to callbacks. */ XMLPARSEAPI(void) XML_SetUserData(XML_Parser parser, void *userData); /* Returns the last value set by XML_SetUserData or NULL. */ #define XML_GetUserData(parser) (*(void **)(parser)) /* This is equivalent to supplying an encoding argument to XML_ParserCreate. On success XML_SetEncoding returns non-zero, zero otherwise. Note: Calling XML_SetEncoding after XML_Parse or XML_ParseBuffer has no effect and returns XML_STATUS_ERROR. */ XMLPARSEAPI(enum XML_Status) XML_SetEncoding(XML_Parser parser, const XML_Char *encoding); /* If this function is called, then the parser will be passed as the first argument to callbacks instead of userData. The userData will still be accessible using XML_GetUserData. */ XMLPARSEAPI(void) XML_UseParserAsHandlerArg(XML_Parser parser); /* If useDTD == XML_TRUE is passed to this function, then the parser will assume that there is an external subset, even if none is specified in the document. In such a case the parser will call the externalEntityRefHandler with a value of NULL for the systemId argument (the publicId and context arguments will be NULL as well). Note: If this function is called, then this must be done before the first call to XML_Parse or XML_ParseBuffer, since it will have no effect after that. Returns XML_ERROR_CANT_CHANGE_FEATURE_ONCE_PARSING. Note: If the document does not have a DOCTYPE declaration at all, then startDoctypeDeclHandler and endDoctypeDeclHandler will not be called, despite an external subset being parsed. Note: If XML_DTD is not defined when Expat is compiled, returns XML_ERROR_FEATURE_REQUIRES_XML_DTD. */ XMLPARSEAPI(enum XML_Error) XML_UseForeignDTD(XML_Parser parser, XML_Bool useDTD); /* Sets the base to be used for resolving relative URIs in system identifiers in declarations. Resolving relative identifiers is left to the application: this value will be passed through as the base argument to the XML_ExternalEntityRefHandler, XML_NotationDeclHandler and XML_UnparsedEntityDeclHandler. The base argument will be copied. Returns XML_STATUS_ERROR if out of memory, XML_STATUS_OK otherwise. */ XMLPARSEAPI(enum XML_Status) XML_SetBase(XML_Parser parser, const XML_Char *base); XMLPARSEAPI(const XML_Char *) XML_GetBase(XML_Parser parser); /* Returns the number of the attribute/value pairs passed in last call to the XML_StartElementHandler that were specified in the start-tag rather than defaulted. Each attribute/value pair counts as 2; thus this correspondds to an index into the atts array passed to the XML_StartElementHandler. */ XMLPARSEAPI(int) XML_GetSpecifiedAttributeCount(XML_Parser parser); /* Returns the index of the ID attribute passed in the last call to XML_StartElementHandler, or -1 if there is no ID attribute. Each attribute/value pair counts as 2; thus this correspondds to an index into the atts array passed to the XML_StartElementHandler. */ XMLPARSEAPI(int) XML_GetIdAttributeIndex(XML_Parser parser); /* Parses some input. Returns XML_STATUS_ERROR if a fatal error is detected. The last call to XML_Parse must have isFinal true; len may be zero for this call (or any other). Though the return values for these functions has always been described as a Boolean value, the implementation, at least for the 1.95.x series, has always returned exactly one of the XML_Status values. */ XMLPARSEAPI(enum XML_Status) XML_Parse(XML_Parser parser, const char *s, int len, int isFinal); XMLPARSEAPI(void *) XML_GetBuffer(XML_Parser parser, int len); XMLPARSEAPI(enum XML_Status) XML_ParseBuffer(XML_Parser parser, int len, int isFinal); /* Creates an XML_Parser object that can parse an external general entity; context is a '\0'-terminated string specifying the parse context; encoding is a '\0'-terminated string giving the name of the externally specified encoding, or NULL if there is no externally specified encoding. The context string consists of a sequence of tokens separated by formfeeds (\f); a token consisting of a name specifies that the general entity of the name is open; a token of the form prefix=uri specifies the namespace for a particular prefix; a token of the form =uri specifies the default namespace. This can be called at any point after the first call to an ExternalEntityRefHandler so longer as the parser has not yet been freed. The new parser is completely independent and may safely be used in a separate thread. The handlers and userData are initialized from the parser argument. Returns NULL if out of memory. Otherwise returns a new XML_Parser object. */ XMLPARSEAPI(XML_Parser) XML_ExternalEntityParserCreate(XML_Parser parser, const XML_Char *context, const XML_Char *encoding); enum XML_ParamEntityParsing { XML_PARAM_ENTITY_PARSING_NEVER, XML_PARAM_ENTITY_PARSING_UNLESS_STANDALONE, XML_PARAM_ENTITY_PARSING_ALWAYS }; /* Controls parsing of parameter entities (including the external DTD subset). If parsing of parameter entities is enabled, then references to external parameter entities (including the external DTD subset) will be passed to the handler set with XML_SetExternalEntityRefHandler. The context passed will be 0. Unlike external general entities, external parameter entities can only be parsed synchronously. If the external parameter entity is to be parsed, it must be parsed during the call to the external entity ref handler: the complete sequence of XML_ExternalEntityParserCreate, XML_Parse/XML_ParseBuffer and XML_ParserFree calls must be made during this call. After XML_ExternalEntityParserCreate has been called to create the parser for the external parameter entity (context must be 0 for this call), it is illegal to make any calls on the old parser until XML_ParserFree has been called on the newly created parser. If the library has been compiled without support for parameter entity parsing (ie without XML_DTD being defined), then XML_SetParamEntityParsing will return 0 if parsing of parameter entities is requested; otherwise it will return non-zero. Note: If XML_SetParamEntityParsing is called after XML_Parse or XML_ParseBuffer, then it has no effect and will always return 0. */ XMLPARSEAPI(int) XML_SetParamEntityParsing(XML_Parser parser, enum XML_ParamEntityParsing parsing); /* If XML_Parse or XML_ParseBuffer have returned XML_STATUS_ERROR, then XML_GetErrorCode returns information about the error. */ XMLPARSEAPI(enum XML_Error) XML_GetErrorCode(XML_Parser parser); /* These functions return information about the current parse location. They may be called from any callback called to report some parse event; in this case the location is the location of the first of the sequence of characters that generated the event. When called from callbacks generated by declarations in the document prologue, the location identified isn't as neatly defined, but will be within the relevant markup. When called outside of the callback functions, the position indicated will be just past the last parse event (regardless of whether there was an associated callback). They may also be called after returning from a call to XML_Parse or XML_ParseBuffer. If the return value is XML_STATUS_ERROR then the location is the location of the character at which the error was detected; otherwise the location is the location of the last parse event, as described above. */ XMLPARSEAPI(int) XML_GetCurrentLineNumber(XML_Parser parser); XMLPARSEAPI(int) XML_GetCurrentColumnNumber(XML_Parser parser); XMLPARSEAPI(long) XML_GetCurrentByteIndex(XML_Parser parser); /* Return the number of bytes in the current event. Returns 0 if the event is in an internal entity. */ XMLPARSEAPI(int) XML_GetCurrentByteCount(XML_Parser parser); /* If XML_CONTEXT_BYTES is defined, returns the input buffer, sets the integer pointed to by offset to the offset within this buffer of the current parse position, and sets the integer pointed to by size to the size of this buffer (the number of input bytes). Otherwise returns a NULL pointer. Also returns a NULL pointer if a parse isn't active. NOTE: The character pointer returned should not be used outside the handler that makes the call. */ XMLPARSEAPI(const char *) XML_GetInputContext(XML_Parser parser, int *offset, int *size); /* For backwards compatibility with previous versions. */ #define XML_GetErrorLineNumber XML_GetCurrentLineNumber #define XML_GetErrorColumnNumber XML_GetCurrentColumnNumber #define XML_GetErrorByteIndex XML_GetCurrentByteIndex /* Frees the content model passed to the element declaration handler */ XMLPARSEAPI(void) XML_FreeContentModel(XML_Parser parser, XML_Content *model); /* Exposing the memory handling functions used in Expat */ XMLPARSEAPI(void *) XML_MemMalloc(XML_Parser parser, size_t size); XMLPARSEAPI(void *) XML_MemRealloc(XML_Parser parser, void *ptr, size_t size); XMLPARSEAPI(void) XML_MemFree(XML_Parser parser, void *ptr); /* Frees memory used by the parser. */ XMLPARSEAPI(void) XML_ParserFree(XML_Parser parser); /* Returns a string describing the error. */ XMLPARSEAPI(const XML_LChar *) XML_ErrorString(enum XML_Error code); /* Return a string containing the version number of this expat */ XMLPARSEAPI(const XML_LChar *) XML_ExpatVersion(void); typedef struct { int major; int minor; int micro; } XML_Expat_Version; /* Return an XML_Expat_Version structure containing numeric version number information for this version of expat. */ XMLPARSEAPI(XML_Expat_Version) XML_ExpatVersionInfo(void); /* Added in Expat 1.95.5. */ enum XML_FeatureEnum { XML_FEATURE_END = 0, XML_FEATURE_UNICODE, XML_FEATURE_UNICODE_WCHAR_T, XML_FEATURE_DTD, XML_FEATURE_CONTEXT_BYTES, XML_FEATURE_MIN_SIZE, XML_FEATURE_SIZEOF_XML_CHAR, XML_FEATURE_SIZEOF_XML_LCHAR /* Additional features must be added to the end of this enum. */ }; typedef struct { enum XML_FeatureEnum feature; const XML_LChar *name; long int value; } XML_Feature; XMLPARSEAPI(const XML_Feature *) XML_GetFeatureList(void); /* Expat follows the GNU/Linux convention of odd number minor version for beta/development releases and even number minor version for stable releases. Micro is bumped with each release, and set to 0 with each change to major or minor version. */ #define XML_MAJOR_VERSION 1 #define XML_MINOR_VERSION 95 #define XML_MICRO_VERSION 7 #ifdef __cplusplus } #endif #endif /* not XmlParse_INCLUDED */ Python-2.3.7/Modules/expat/xmlparse.c0000644001241000117560000053476407745310333017030 0ustar loewishpifb6/* Copyright (c) 1998, 1999, 2000 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #include #include /* memset(), memcpy() */ #define XML_BUILDING_EXPAT 1 #ifdef COMPILED_FROM_DSP #include "winconfig.h" #elif defined(MACOS_CLASSIC) #include "macconfig.h" #else #ifdef HAVE_EXPAT_CONFIG_H #include #endif #endif /* ndef COMPILED_FROM_DSP */ #include "expat.h" #ifdef XML_UNICODE #define XML_ENCODE_MAX XML_UTF16_ENCODE_MAX #define XmlConvert XmlUtf16Convert #define XmlGetInternalEncoding XmlGetUtf16InternalEncoding #define XmlGetInternalEncodingNS XmlGetUtf16InternalEncodingNS #define XmlEncode XmlUtf16Encode #define MUST_CONVERT(enc, s) (!(enc)->isUtf16 || (((unsigned long)s) & 1)) typedef unsigned short ICHAR; #else #define XML_ENCODE_MAX XML_UTF8_ENCODE_MAX #define XmlConvert XmlUtf8Convert #define XmlGetInternalEncoding XmlGetUtf8InternalEncoding #define XmlGetInternalEncodingNS XmlGetUtf8InternalEncodingNS #define XmlEncode XmlUtf8Encode #define MUST_CONVERT(enc, s) (!(enc)->isUtf8) typedef char ICHAR; #endif #ifndef XML_NS #define XmlInitEncodingNS XmlInitEncoding #define XmlInitUnknownEncodingNS XmlInitUnknownEncoding #undef XmlGetInternalEncodingNS #define XmlGetInternalEncodingNS XmlGetInternalEncoding #define XmlParseXmlDeclNS XmlParseXmlDecl #endif #ifdef XML_UNICODE #ifdef XML_UNICODE_WCHAR_T #define XML_T(x) (const wchar_t)x #define XML_L(x) L ## x #else #define XML_T(x) (const unsigned short)x #define XML_L(x) x #endif #else #define XML_T(x) x #define XML_L(x) x #endif /* Round up n to be a multiple of sz, where sz is a power of 2. */ #define ROUND_UP(n, sz) (((n) + ((sz) - 1)) & ~((sz) - 1)) /* Handle the case where memmove() doesn't exist. */ #ifndef HAVE_MEMMOVE #ifdef HAVE_BCOPY #define memmove(d,s,l) bcopy((s),(d),(l)) #else #error memmove does not exist on this platform, nor is a substitute available #endif /* HAVE_BCOPY */ #endif /* HAVE_MEMMOVE */ #include "internal.h" #include "xmltok.h" #include "xmlrole.h" typedef const XML_Char *KEY; typedef struct { KEY name; } NAMED; typedef struct { NAMED **v; unsigned char power; size_t size; size_t used; const XML_Memory_Handling_Suite *mem; } HASH_TABLE; /* Basic character hash algorithm, taken from Python's string hash: h = h * 1000003 ^ character, the constant being a prime number. */ #ifdef XML_UNICODE #define CHAR_HASH(h, c) \ (((h) * 0xF4243) ^ (unsigned short)(c)) #else #define CHAR_HASH(h, c) \ (((h) * 0xF4243) ^ (unsigned char)(c)) #endif /* For probing (after a collision) we need a step size relative prime to the hash table size, which is a power of 2. We use double-hashing, since we can calculate a second hash value cheaply by taking those bits of the first hash value that were discarded (masked out) when the table index was calculated: index = hash & mask, where mask = table->size - 1. We limit the maximum step size to table->size / 4 (mask >> 2) and make it odd, since odd numbers are always relative prime to a power of 2. */ #define SECOND_HASH(hash, mask, power) \ ((((hash) & ~(mask)) >> ((power) - 1)) & ((mask) >> 2)) #define PROBE_STEP(hash, mask, power) \ ((unsigned char)((SECOND_HASH(hash, mask, power)) | 1)) typedef struct { NAMED **p; NAMED **end; } HASH_TABLE_ITER; #define INIT_TAG_BUF_SIZE 32 /* must be a multiple of sizeof(XML_Char) */ #define INIT_DATA_BUF_SIZE 1024 #define INIT_ATTS_SIZE 16 #define INIT_ATTS_VERSION 0xFFFFFFFF #define INIT_BLOCK_SIZE 1024 #define INIT_BUFFER_SIZE 1024 #define EXPAND_SPARE 24 typedef struct binding { struct prefix *prefix; struct binding *nextTagBinding; struct binding *prevPrefixBinding; const struct attribute_id *attId; XML_Char *uri; int uriLen; int uriAlloc; } BINDING; typedef struct prefix { const XML_Char *name; BINDING *binding; } PREFIX; typedef struct { const XML_Char *str; const XML_Char *localPart; const XML_Char *prefix; int strLen; int uriLen; int prefixLen; } TAG_NAME; /* TAG represents an open element. The name of the element is stored in both the document and API encodings. The memory buffer 'buf' is a separately-allocated memory area which stores the name. During the XML_Parse()/ XMLParseBuffer() when the element is open, the memory for the 'raw' version of the name (in the document encoding) is shared with the document buffer. If the element is open across calls to XML_Parse()/XML_ParseBuffer(), the buffer is re-allocated to contain the 'raw' name as well. A parser re-uses these structures, maintaining a list of allocated TAG objects in a free list. */ typedef struct tag { struct tag *parent; /* parent of this element */ const char *rawName; /* tagName in the original encoding */ int rawNameLength; TAG_NAME name; /* tagName in the API encoding */ char *buf; /* buffer for name components */ char *bufEnd; /* end of the buffer */ BINDING *bindings; } TAG; typedef struct { const XML_Char *name; const XML_Char *textPtr; int textLen; const XML_Char *systemId; const XML_Char *base; const XML_Char *publicId; const XML_Char *notation; XML_Bool open; XML_Bool is_param; XML_Bool is_internal; /* true if declared in internal subset outside PE */ } ENTITY; typedef struct { enum XML_Content_Type type; enum XML_Content_Quant quant; const XML_Char * name; int firstchild; int lastchild; int childcnt; int nextsib; } CONTENT_SCAFFOLD; #define INIT_SCAFFOLD_ELEMENTS 32 typedef struct block { struct block *next; int size; XML_Char s[1]; } BLOCK; typedef struct { BLOCK *blocks; BLOCK *freeBlocks; const XML_Char *end; XML_Char *ptr; XML_Char *start; const XML_Memory_Handling_Suite *mem; } STRING_POOL; /* The XML_Char before the name is used to determine whether an attribute has been specified. */ typedef struct attribute_id { XML_Char *name; PREFIX *prefix; XML_Bool maybeTokenized; XML_Bool xmlns; } ATTRIBUTE_ID; typedef struct { const ATTRIBUTE_ID *id; XML_Bool isCdata; const XML_Char *value; } DEFAULT_ATTRIBUTE; typedef struct { unsigned long version; unsigned long hash; const XML_Char *uriName; } NS_ATT; typedef struct { const XML_Char *name; PREFIX *prefix; const ATTRIBUTE_ID *idAtt; int nDefaultAtts; int allocDefaultAtts; DEFAULT_ATTRIBUTE *defaultAtts; } ELEMENT_TYPE; typedef struct { HASH_TABLE generalEntities; HASH_TABLE elementTypes; HASH_TABLE attributeIds; HASH_TABLE prefixes; STRING_POOL pool; STRING_POOL entityValuePool; /* false once a parameter entity reference has been skipped */ XML_Bool keepProcessing; /* true once an internal or external PE reference has been encountered; this includes the reference to an external subset */ XML_Bool hasParamEntityRefs; XML_Bool standalone; #ifdef XML_DTD /* indicates if external PE has been read */ XML_Bool paramEntityRead; HASH_TABLE paramEntities; #endif /* XML_DTD */ PREFIX defaultPrefix; /* === scaffolding for building content model === */ XML_Bool in_eldecl; CONTENT_SCAFFOLD *scaffold; unsigned contentStringLen; unsigned scaffSize; unsigned scaffCount; int scaffLevel; int *scaffIndex; } DTD; typedef struct open_internal_entity { const char *internalEventPtr; const char *internalEventEndPtr; struct open_internal_entity *next; ENTITY *entity; } OPEN_INTERNAL_ENTITY; typedef enum XML_Error PTRCALL Processor(XML_Parser parser, const char *start, const char *end, const char **endPtr); static Processor prologProcessor; static Processor prologInitProcessor; static Processor contentProcessor; static Processor cdataSectionProcessor; #ifdef XML_DTD static Processor ignoreSectionProcessor; static Processor externalParEntProcessor; static Processor externalParEntInitProcessor; static Processor entityValueProcessor; static Processor entityValueInitProcessor; #endif /* XML_DTD */ static Processor epilogProcessor; static Processor errorProcessor; static Processor externalEntityInitProcessor; static Processor externalEntityInitProcessor2; static Processor externalEntityInitProcessor3; static Processor externalEntityContentProcessor; static enum XML_Error handleUnknownEncoding(XML_Parser parser, const XML_Char *encodingName); static enum XML_Error processXmlDecl(XML_Parser parser, int isGeneralTextEntity, const char *, const char *); static enum XML_Error initializeEncoding(XML_Parser parser); static enum XML_Error doProlog(XML_Parser parser, const ENCODING *enc, const char *s, const char *end, int tok, const char *next, const char **nextPtr); static enum XML_Error processInternalParamEntity(XML_Parser parser, ENTITY *entity); static enum XML_Error doContent(XML_Parser parser, int startTagLevel, const ENCODING *enc, const char *start, const char *end, const char **endPtr); static enum XML_Error doCdataSection(XML_Parser parser, const ENCODING *, const char **startPtr, const char *end, const char **nextPtr); #ifdef XML_DTD static enum XML_Error doIgnoreSection(XML_Parser parser, const ENCODING *, const char **startPtr, const char *end, const char **nextPtr); #endif /* XML_DTD */ static enum XML_Error storeAtts(XML_Parser parser, const ENCODING *, const char *s, TAG_NAME *tagNamePtr, BINDING **bindingsPtr); static enum XML_Error addBinding(XML_Parser parser, PREFIX *prefix, const ATTRIBUTE_ID *attId, const XML_Char *uri, BINDING **bindingsPtr); static int defineAttribute(ELEMENT_TYPE *type, ATTRIBUTE_ID *, XML_Bool isCdata, XML_Bool isId, const XML_Char *dfltValue, XML_Parser parser); static enum XML_Error storeAttributeValue(XML_Parser parser, const ENCODING *, XML_Bool isCdata, const char *, const char *, STRING_POOL *); static enum XML_Error appendAttributeValue(XML_Parser parser, const ENCODING *, XML_Bool isCdata, const char *, const char *, STRING_POOL *); static ATTRIBUTE_ID * getAttributeId(XML_Parser parser, const ENCODING *enc, const char *start, const char *end); static int setElementTypePrefix(XML_Parser parser, ELEMENT_TYPE *); static enum XML_Error storeEntityValue(XML_Parser parser, const ENCODING *enc, const char *start, const char *end); static int reportProcessingInstruction(XML_Parser parser, const ENCODING *enc, const char *start, const char *end); static int reportComment(XML_Parser parser, const ENCODING *enc, const char *start, const char *end); static void reportDefault(XML_Parser parser, const ENCODING *enc, const char *start, const char *end); static const XML_Char * getContext(XML_Parser parser); static XML_Bool setContext(XML_Parser parser, const XML_Char *context); static void FASTCALL normalizePublicId(XML_Char *s); static DTD * dtdCreate(const XML_Memory_Handling_Suite *ms); /* do not call if parentParser != NULL */ static void dtdReset(DTD *p, const XML_Memory_Handling_Suite *ms); static void dtdDestroy(DTD *p, XML_Bool isDocEntity, const XML_Memory_Handling_Suite *ms); static int dtdCopy(DTD *newDtd, const DTD *oldDtd, const XML_Memory_Handling_Suite *ms); static int copyEntityTable(HASH_TABLE *, STRING_POOL *, const HASH_TABLE *); static NAMED * lookup(HASH_TABLE *table, KEY name, size_t createSize); static void FASTCALL hashTableInit(HASH_TABLE *, const XML_Memory_Handling_Suite *ms); static void FASTCALL hashTableClear(HASH_TABLE *); static void FASTCALL hashTableDestroy(HASH_TABLE *); static void FASTCALL hashTableIterInit(HASH_TABLE_ITER *, const HASH_TABLE *); static NAMED * FASTCALL hashTableIterNext(HASH_TABLE_ITER *); static void FASTCALL poolInit(STRING_POOL *, const XML_Memory_Handling_Suite *ms); static void FASTCALL poolClear(STRING_POOL *); static void FASTCALL poolDestroy(STRING_POOL *); static XML_Char * poolAppend(STRING_POOL *pool, const ENCODING *enc, const char *ptr, const char *end); static XML_Char * poolStoreString(STRING_POOL *pool, const ENCODING *enc, const char *ptr, const char *end); static XML_Bool FASTCALL poolGrow(STRING_POOL *pool); static const XML_Char * FASTCALL poolCopyString(STRING_POOL *pool, const XML_Char *s); static const XML_Char * poolCopyStringN(STRING_POOL *pool, const XML_Char *s, int n); static const XML_Char * FASTCALL poolAppendString(STRING_POOL *pool, const XML_Char *s); static int FASTCALL nextScaffoldPart(XML_Parser parser); static XML_Content * build_model(XML_Parser parser); static ELEMENT_TYPE * getElementType(XML_Parser parser, const ENCODING *enc, const char *ptr, const char *end); static XML_Parser parserCreate(const XML_Char *encodingName, const XML_Memory_Handling_Suite *memsuite, const XML_Char *nameSep, DTD *dtd); static void parserInit(XML_Parser parser, const XML_Char *encodingName); #define poolStart(pool) ((pool)->start) #define poolEnd(pool) ((pool)->ptr) #define poolLength(pool) ((pool)->ptr - (pool)->start) #define poolChop(pool) ((void)--(pool->ptr)) #define poolLastChar(pool) (((pool)->ptr)[-1]) #define poolDiscard(pool) ((pool)->ptr = (pool)->start) #define poolFinish(pool) ((pool)->start = (pool)->ptr) #define poolAppendChar(pool, c) \ (((pool)->ptr == (pool)->end && !poolGrow(pool)) \ ? 0 \ : ((*((pool)->ptr)++ = c), 1)) struct XML_ParserStruct { /* The first member must be userData so that the XML_GetUserData macro works. */ void *m_userData; void *m_handlerArg; char *m_buffer; const XML_Memory_Handling_Suite m_mem; /* first character to be parsed */ const char *m_bufferPtr; /* past last character to be parsed */ char *m_bufferEnd; /* allocated end of buffer */ const char *m_bufferLim; long m_parseEndByteIndex; const char *m_parseEndPtr; XML_Char *m_dataBuf; XML_Char *m_dataBufEnd; XML_StartElementHandler m_startElementHandler; XML_EndElementHandler m_endElementHandler; XML_CharacterDataHandler m_characterDataHandler; XML_ProcessingInstructionHandler m_processingInstructionHandler; XML_CommentHandler m_commentHandler; XML_StartCdataSectionHandler m_startCdataSectionHandler; XML_EndCdataSectionHandler m_endCdataSectionHandler; XML_DefaultHandler m_defaultHandler; XML_StartDoctypeDeclHandler m_startDoctypeDeclHandler; XML_EndDoctypeDeclHandler m_endDoctypeDeclHandler; XML_UnparsedEntityDeclHandler m_unparsedEntityDeclHandler; XML_NotationDeclHandler m_notationDeclHandler; XML_StartNamespaceDeclHandler m_startNamespaceDeclHandler; XML_EndNamespaceDeclHandler m_endNamespaceDeclHandler; XML_NotStandaloneHandler m_notStandaloneHandler; XML_ExternalEntityRefHandler m_externalEntityRefHandler; XML_Parser m_externalEntityRefHandlerArg; XML_SkippedEntityHandler m_skippedEntityHandler; XML_UnknownEncodingHandler m_unknownEncodingHandler; XML_ElementDeclHandler m_elementDeclHandler; XML_AttlistDeclHandler m_attlistDeclHandler; XML_EntityDeclHandler m_entityDeclHandler; XML_XmlDeclHandler m_xmlDeclHandler; const ENCODING *m_encoding; INIT_ENCODING m_initEncoding; const ENCODING *m_internalEncoding; const XML_Char *m_protocolEncodingName; XML_Bool m_ns; XML_Bool m_ns_triplets; void *m_unknownEncodingMem; void *m_unknownEncodingData; void *m_unknownEncodingHandlerData; void (*m_unknownEncodingRelease)(void *); PROLOG_STATE m_prologState; Processor *m_processor; enum XML_Error m_errorCode; const char *m_eventPtr; const char *m_eventEndPtr; const char *m_positionPtr; OPEN_INTERNAL_ENTITY *m_openInternalEntities; XML_Bool m_defaultExpandInternalEntities; int m_tagLevel; ENTITY *m_declEntity; const XML_Char *m_doctypeName; const XML_Char *m_doctypeSysid; const XML_Char *m_doctypePubid; const XML_Char *m_declAttributeType; const XML_Char *m_declNotationName; const XML_Char *m_declNotationPublicId; ELEMENT_TYPE *m_declElementType; ATTRIBUTE_ID *m_declAttributeId; XML_Bool m_declAttributeIsCdata; XML_Bool m_declAttributeIsId; DTD *m_dtd; const XML_Char *m_curBase; TAG *m_tagStack; TAG *m_freeTagList; BINDING *m_inheritedBindings; BINDING *m_freeBindingList; int m_attsSize; int m_nSpecifiedAtts; int m_idAttIndex; ATTRIBUTE *m_atts; NS_ATT *m_nsAtts; unsigned long m_nsAttsVersion; unsigned char m_nsAttsPower; POSITION m_position; STRING_POOL m_tempPool; STRING_POOL m_temp2Pool; char *m_groupConnector; unsigned int m_groupSize; XML_Char m_namespaceSeparator; XML_Parser m_parentParser; #ifdef XML_DTD XML_Bool m_isParamEntity; XML_Bool m_useForeignDTD; enum XML_ParamEntityParsing m_paramEntityParsing; #endif }; #define MALLOC(s) (parser->m_mem.malloc_fcn((s))) #define REALLOC(p,s) (parser->m_mem.realloc_fcn((p),(s))) #define FREE(p) (parser->m_mem.free_fcn((p))) #define userData (parser->m_userData) #define handlerArg (parser->m_handlerArg) #define startElementHandler (parser->m_startElementHandler) #define endElementHandler (parser->m_endElementHandler) #define characterDataHandler (parser->m_characterDataHandler) #define processingInstructionHandler \ (parser->m_processingInstructionHandler) #define commentHandler (parser->m_commentHandler) #define startCdataSectionHandler \ (parser->m_startCdataSectionHandler) #define endCdataSectionHandler (parser->m_endCdataSectionHandler) #define defaultHandler (parser->m_defaultHandler) #define startDoctypeDeclHandler (parser->m_startDoctypeDeclHandler) #define endDoctypeDeclHandler (parser->m_endDoctypeDeclHandler) #define unparsedEntityDeclHandler \ (parser->m_unparsedEntityDeclHandler) #define notationDeclHandler (parser->m_notationDeclHandler) #define startNamespaceDeclHandler \ (parser->m_startNamespaceDeclHandler) #define endNamespaceDeclHandler (parser->m_endNamespaceDeclHandler) #define notStandaloneHandler (parser->m_notStandaloneHandler) #define externalEntityRefHandler \ (parser->m_externalEntityRefHandler) #define externalEntityRefHandlerArg \ (parser->m_externalEntityRefHandlerArg) #define internalEntityRefHandler \ (parser->m_internalEntityRefHandler) #define skippedEntityHandler (parser->m_skippedEntityHandler) #define unknownEncodingHandler (parser->m_unknownEncodingHandler) #define elementDeclHandler (parser->m_elementDeclHandler) #define attlistDeclHandler (parser->m_attlistDeclHandler) #define entityDeclHandler (parser->m_entityDeclHandler) #define xmlDeclHandler (parser->m_xmlDeclHandler) #define encoding (parser->m_encoding) #define initEncoding (parser->m_initEncoding) #define internalEncoding (parser->m_internalEncoding) #define unknownEncodingMem (parser->m_unknownEncodingMem) #define unknownEncodingData (parser->m_unknownEncodingData) #define unknownEncodingHandlerData \ (parser->m_unknownEncodingHandlerData) #define unknownEncodingRelease (parser->m_unknownEncodingRelease) #define protocolEncodingName (parser->m_protocolEncodingName) #define ns (parser->m_ns) #define ns_triplets (parser->m_ns_triplets) #define prologState (parser->m_prologState) #define processor (parser->m_processor) #define errorCode (parser->m_errorCode) #define eventPtr (parser->m_eventPtr) #define eventEndPtr (parser->m_eventEndPtr) #define positionPtr (parser->m_positionPtr) #define position (parser->m_position) #define openInternalEntities (parser->m_openInternalEntities) #define defaultExpandInternalEntities \ (parser->m_defaultExpandInternalEntities) #define tagLevel (parser->m_tagLevel) #define buffer (parser->m_buffer) #define bufferPtr (parser->m_bufferPtr) #define bufferEnd (parser->m_bufferEnd) #define parseEndByteIndex (parser->m_parseEndByteIndex) #define parseEndPtr (parser->m_parseEndPtr) #define bufferLim (parser->m_bufferLim) #define dataBuf (parser->m_dataBuf) #define dataBufEnd (parser->m_dataBufEnd) #define _dtd (parser->m_dtd) #define curBase (parser->m_curBase) #define declEntity (parser->m_declEntity) #define doctypeName (parser->m_doctypeName) #define doctypeSysid (parser->m_doctypeSysid) #define doctypePubid (parser->m_doctypePubid) #define declAttributeType (parser->m_declAttributeType) #define declNotationName (parser->m_declNotationName) #define declNotationPublicId (parser->m_declNotationPublicId) #define declElementType (parser->m_declElementType) #define declAttributeId (parser->m_declAttributeId) #define declAttributeIsCdata (parser->m_declAttributeIsCdata) #define declAttributeIsId (parser->m_declAttributeIsId) #define freeTagList (parser->m_freeTagList) #define freeBindingList (parser->m_freeBindingList) #define inheritedBindings (parser->m_inheritedBindings) #define tagStack (parser->m_tagStack) #define atts (parser->m_atts) #define attsSize (parser->m_attsSize) #define nSpecifiedAtts (parser->m_nSpecifiedAtts) #define idAttIndex (parser->m_idAttIndex) #define nsAtts (parser->m_nsAtts) #define nsAttsVersion (parser->m_nsAttsVersion) #define nsAttsPower (parser->m_nsAttsPower) #define tempPool (parser->m_tempPool) #define temp2Pool (parser->m_temp2Pool) #define groupConnector (parser->m_groupConnector) #define groupSize (parser->m_groupSize) #define namespaceSeparator (parser->m_namespaceSeparator) #define parentParser (parser->m_parentParser) #ifdef XML_DTD #define isParamEntity (parser->m_isParamEntity) #define useForeignDTD (parser->m_useForeignDTD) #define paramEntityParsing (parser->m_paramEntityParsing) #endif /* XML_DTD */ #ifdef XML_DTD #define parsing \ (parentParser \ ? \ (isParamEntity \ ? \ (processor != externalParEntInitProcessor) \ : \ (processor != externalEntityInitProcessor)) \ : \ (processor != prologInitProcessor)) #else #define parsing \ (parentParser \ ? \ (processor != externalEntityInitProcessor) \ : \ (processor != prologInitProcessor)) #endif /* XML_DTD */ XML_Parser XMLCALL XML_ParserCreate(const XML_Char *encodingName) { return XML_ParserCreate_MM(encodingName, NULL, NULL); } XML_Parser XMLCALL XML_ParserCreateNS(const XML_Char *encodingName, XML_Char nsSep) { XML_Char tmp[2]; *tmp = nsSep; return XML_ParserCreate_MM(encodingName, NULL, tmp); } static const XML_Char implicitContext[] = { 'x', 'm', 'l', '=', 'h', 't', 't', 'p', ':', '/', '/', 'w', 'w', 'w', '.', 'w', '3', '.', 'o', 'r', 'g', '/', 'X', 'M', 'L', '/', '1', '9', '9', '8', '/', 'n', 'a', 'm', 'e', 's', 'p', 'a', 'c', 'e', '\0' }; XML_Parser XMLCALL XML_ParserCreate_MM(const XML_Char *encodingName, const XML_Memory_Handling_Suite *memsuite, const XML_Char *nameSep) { XML_Parser parser = parserCreate(encodingName, memsuite, nameSep, NULL); if (parser != NULL && ns) { /* implicit context only set for root parser, since child parsers (i.e. external entity parsers) will inherit it */ if (!setContext(parser, implicitContext)) { XML_ParserFree(parser); return NULL; } } return parser; } static XML_Parser parserCreate(const XML_Char *encodingName, const XML_Memory_Handling_Suite *memsuite, const XML_Char *nameSep, DTD *dtd) { XML_Parser parser; if (memsuite) { XML_Memory_Handling_Suite *mtemp; parser = (XML_Parser) memsuite->malloc_fcn(sizeof(struct XML_ParserStruct)); if (parser != NULL) { mtemp = (XML_Memory_Handling_Suite *)&(parser->m_mem); mtemp->malloc_fcn = memsuite->malloc_fcn; mtemp->realloc_fcn = memsuite->realloc_fcn; mtemp->free_fcn = memsuite->free_fcn; } } else { XML_Memory_Handling_Suite *mtemp; parser = (XML_Parser)malloc(sizeof(struct XML_ParserStruct)); if (parser != NULL) { mtemp = (XML_Memory_Handling_Suite *)&(parser->m_mem); mtemp->malloc_fcn = malloc; mtemp->realloc_fcn = realloc; mtemp->free_fcn = free; } } if (!parser) return parser; buffer = NULL; bufferLim = NULL; attsSize = INIT_ATTS_SIZE; atts = (ATTRIBUTE *)MALLOC(attsSize * sizeof(ATTRIBUTE)); if (atts == NULL) { FREE(parser); return NULL; } dataBuf = (XML_Char *)MALLOC(INIT_DATA_BUF_SIZE * sizeof(XML_Char)); if (dataBuf == NULL) { FREE(atts); FREE(parser); return NULL; } dataBufEnd = dataBuf + INIT_DATA_BUF_SIZE; if (dtd) _dtd = dtd; else { _dtd = dtdCreate(&parser->m_mem); if (_dtd == NULL) { FREE(dataBuf); FREE(atts); FREE(parser); return NULL; } } freeBindingList = NULL; freeTagList = NULL; groupSize = 0; groupConnector = NULL; unknownEncodingHandler = NULL; unknownEncodingHandlerData = NULL; namespaceSeparator = '!'; ns = XML_FALSE; ns_triplets = XML_FALSE; nsAtts = NULL; nsAttsVersion = 0; nsAttsPower = 0; poolInit(&tempPool, &(parser->m_mem)); poolInit(&temp2Pool, &(parser->m_mem)); parserInit(parser, encodingName); if (encodingName && !protocolEncodingName) { XML_ParserFree(parser); return NULL; } if (nameSep) { ns = XML_TRUE; internalEncoding = XmlGetInternalEncodingNS(); namespaceSeparator = *nameSep; } else { internalEncoding = XmlGetInternalEncoding(); } return parser; } static void parserInit(XML_Parser parser, const XML_Char *encodingName) { processor = prologInitProcessor; XmlPrologStateInit(&prologState); protocolEncodingName = (encodingName != NULL ? poolCopyString(&tempPool, encodingName) : NULL); curBase = NULL; XmlInitEncoding(&initEncoding, &encoding, 0); userData = NULL; handlerArg = NULL; startElementHandler = NULL; endElementHandler = NULL; characterDataHandler = NULL; processingInstructionHandler = NULL; commentHandler = NULL; startCdataSectionHandler = NULL; endCdataSectionHandler = NULL; defaultHandler = NULL; startDoctypeDeclHandler = NULL; endDoctypeDeclHandler = NULL; unparsedEntityDeclHandler = NULL; notationDeclHandler = NULL; startNamespaceDeclHandler = NULL; endNamespaceDeclHandler = NULL; notStandaloneHandler = NULL; externalEntityRefHandler = NULL; externalEntityRefHandlerArg = parser; skippedEntityHandler = NULL; elementDeclHandler = NULL; attlistDeclHandler = NULL; entityDeclHandler = NULL; xmlDeclHandler = NULL; bufferPtr = buffer; bufferEnd = buffer; parseEndByteIndex = 0; parseEndPtr = NULL; declElementType = NULL; declAttributeId = NULL; declEntity = NULL; doctypeName = NULL; doctypeSysid = NULL; doctypePubid = NULL; declAttributeType = NULL; declNotationName = NULL; declNotationPublicId = NULL; declAttributeIsCdata = XML_FALSE; declAttributeIsId = XML_FALSE; memset(&position, 0, sizeof(POSITION)); errorCode = XML_ERROR_NONE; eventPtr = NULL; eventEndPtr = NULL; positionPtr = NULL; openInternalEntities = 0; defaultExpandInternalEntities = XML_TRUE; tagLevel = 0; tagStack = NULL; inheritedBindings = NULL; nSpecifiedAtts = 0; unknownEncodingMem = NULL; unknownEncodingRelease = NULL; unknownEncodingData = NULL; parentParser = NULL; #ifdef XML_DTD isParamEntity = XML_FALSE; useForeignDTD = XML_FALSE; paramEntityParsing = XML_PARAM_ENTITY_PARSING_NEVER; #endif } /* moves list of bindings to freeBindingList */ static void FASTCALL moveToFreeBindingList(XML_Parser parser, BINDING *bindings) { while (bindings) { BINDING *b = bindings; bindings = bindings->nextTagBinding; b->nextTagBinding = freeBindingList; freeBindingList = b; } } XML_Bool XMLCALL XML_ParserReset(XML_Parser parser, const XML_Char *encodingName) { TAG *tStk; if (parentParser) return XML_FALSE; /* move tagStack to freeTagList */ tStk = tagStack; while (tStk) { TAG *tag = tStk; tStk = tStk->parent; tag->parent = freeTagList; moveToFreeBindingList(parser, tag->bindings); tag->bindings = NULL; freeTagList = tag; } moveToFreeBindingList(parser, inheritedBindings); FREE(unknownEncodingMem); if (unknownEncodingRelease) unknownEncodingRelease(unknownEncodingData); poolClear(&tempPool); poolClear(&temp2Pool); parserInit(parser, encodingName); dtdReset(_dtd, &parser->m_mem); return setContext(parser, implicitContext); } enum XML_Status XMLCALL XML_SetEncoding(XML_Parser parser, const XML_Char *encodingName) { /* Block after XML_Parse()/XML_ParseBuffer() has been called. XXX There's no way for the caller to determine which of the XXX possible error cases caused the XML_STATUS_ERROR return. */ if (parsing) return XML_STATUS_ERROR; if (encodingName == NULL) protocolEncodingName = NULL; else { protocolEncodingName = poolCopyString(&tempPool, encodingName); if (!protocolEncodingName) return XML_STATUS_ERROR; } return XML_STATUS_OK; } XML_Parser XMLCALL XML_ExternalEntityParserCreate(XML_Parser oldParser, const XML_Char *context, const XML_Char *encodingName) { XML_Parser parser = oldParser; DTD *newDtd = NULL; DTD *oldDtd = _dtd; XML_StartElementHandler oldStartElementHandler = startElementHandler; XML_EndElementHandler oldEndElementHandler = endElementHandler; XML_CharacterDataHandler oldCharacterDataHandler = characterDataHandler; XML_ProcessingInstructionHandler oldProcessingInstructionHandler = processingInstructionHandler; XML_CommentHandler oldCommentHandler = commentHandler; XML_StartCdataSectionHandler oldStartCdataSectionHandler = startCdataSectionHandler; XML_EndCdataSectionHandler oldEndCdataSectionHandler = endCdataSectionHandler; XML_DefaultHandler oldDefaultHandler = defaultHandler; XML_UnparsedEntityDeclHandler oldUnparsedEntityDeclHandler = unparsedEntityDeclHandler; XML_NotationDeclHandler oldNotationDeclHandler = notationDeclHandler; XML_StartNamespaceDeclHandler oldStartNamespaceDeclHandler = startNamespaceDeclHandler; XML_EndNamespaceDeclHandler oldEndNamespaceDeclHandler = endNamespaceDeclHandler; XML_NotStandaloneHandler oldNotStandaloneHandler = notStandaloneHandler; XML_ExternalEntityRefHandler oldExternalEntityRefHandler = externalEntityRefHandler; XML_SkippedEntityHandler oldSkippedEntityHandler = skippedEntityHandler; XML_UnknownEncodingHandler oldUnknownEncodingHandler = unknownEncodingHandler; XML_ElementDeclHandler oldElementDeclHandler = elementDeclHandler; XML_AttlistDeclHandler oldAttlistDeclHandler = attlistDeclHandler; XML_EntityDeclHandler oldEntityDeclHandler = entityDeclHandler; XML_XmlDeclHandler oldXmlDeclHandler = xmlDeclHandler; ELEMENT_TYPE * oldDeclElementType = declElementType; void *oldUserData = userData; void *oldHandlerArg = handlerArg; XML_Bool oldDefaultExpandInternalEntities = defaultExpandInternalEntities; XML_Parser oldExternalEntityRefHandlerArg = externalEntityRefHandlerArg; #ifdef XML_DTD enum XML_ParamEntityParsing oldParamEntityParsing = paramEntityParsing; int oldInEntityValue = prologState.inEntityValue; #endif XML_Bool oldns_triplets = ns_triplets; #ifdef XML_DTD if (!context) newDtd = oldDtd; #endif /* XML_DTD */ /* Note that the magical uses of the pre-processor to make field access look more like C++ require that `parser' be overwritten here. This makes this function more painful to follow than it would be otherwise. */ if (ns) { XML_Char tmp[2]; *tmp = namespaceSeparator; parser = parserCreate(encodingName, &parser->m_mem, tmp, newDtd); } else { parser = parserCreate(encodingName, &parser->m_mem, NULL, newDtd); } if (!parser) return NULL; startElementHandler = oldStartElementHandler; endElementHandler = oldEndElementHandler; characterDataHandler = oldCharacterDataHandler; processingInstructionHandler = oldProcessingInstructionHandler; commentHandler = oldCommentHandler; startCdataSectionHandler = oldStartCdataSectionHandler; endCdataSectionHandler = oldEndCdataSectionHandler; defaultHandler = oldDefaultHandler; unparsedEntityDeclHandler = oldUnparsedEntityDeclHandler; notationDeclHandler = oldNotationDeclHandler; startNamespaceDeclHandler = oldStartNamespaceDeclHandler; endNamespaceDeclHandler = oldEndNamespaceDeclHandler; notStandaloneHandler = oldNotStandaloneHandler; externalEntityRefHandler = oldExternalEntityRefHandler; skippedEntityHandler = oldSkippedEntityHandler; unknownEncodingHandler = oldUnknownEncodingHandler; elementDeclHandler = oldElementDeclHandler; attlistDeclHandler = oldAttlistDeclHandler; entityDeclHandler = oldEntityDeclHandler; xmlDeclHandler = oldXmlDeclHandler; declElementType = oldDeclElementType; userData = oldUserData; if (oldUserData == oldHandlerArg) handlerArg = userData; else handlerArg = parser; if (oldExternalEntityRefHandlerArg != oldParser) externalEntityRefHandlerArg = oldExternalEntityRefHandlerArg; defaultExpandInternalEntities = oldDefaultExpandInternalEntities; ns_triplets = oldns_triplets; parentParser = oldParser; #ifdef XML_DTD paramEntityParsing = oldParamEntityParsing; prologState.inEntityValue = oldInEntityValue; if (context) { #endif /* XML_DTD */ if (!dtdCopy(_dtd, oldDtd, &parser->m_mem) || !setContext(parser, context)) { XML_ParserFree(parser); return NULL; } processor = externalEntityInitProcessor; #ifdef XML_DTD } else { /* The DTD instance referenced by _dtd is shared between the document's root parser and external PE parsers, therefore one does not need to call setContext. In addition, one also *must* not call setContext, because this would overwrite existing prefix->binding pointers in _dtd with ones that get destroyed with the external PE parser. This would leave those prefixes with dangling pointers. */ isParamEntity = XML_TRUE; XmlPrologStateInitExternalEntity(&prologState); processor = externalParEntInitProcessor; } #endif /* XML_DTD */ return parser; } static void FASTCALL destroyBindings(BINDING *bindings, XML_Parser parser) { for (;;) { BINDING *b = bindings; if (!b) break; bindings = b->nextTagBinding; FREE(b->uri); FREE(b); } } void XMLCALL XML_ParserFree(XML_Parser parser) { for (;;) { TAG *p; if (tagStack == NULL) { if (freeTagList == NULL) break; tagStack = freeTagList; freeTagList = NULL; } p = tagStack; tagStack = tagStack->parent; FREE(p->buf); destroyBindings(p->bindings, parser); FREE(p); } destroyBindings(freeBindingList, parser); destroyBindings(inheritedBindings, parser); poolDestroy(&tempPool); poolDestroy(&temp2Pool); #ifdef XML_DTD /* external parameter entity parsers share the DTD structure parser->m_dtd with the root parser, so we must not destroy it */ if (!isParamEntity && _dtd) #else if (_dtd) #endif /* XML_DTD */ dtdDestroy(_dtd, (XML_Bool)!parentParser, &parser->m_mem); FREE((void *)atts); FREE(groupConnector); FREE(buffer); FREE(dataBuf); FREE(nsAtts); FREE(unknownEncodingMem); if (unknownEncodingRelease) unknownEncodingRelease(unknownEncodingData); FREE(parser); } void XMLCALL XML_UseParserAsHandlerArg(XML_Parser parser) { handlerArg = parser; } enum XML_Error XMLCALL XML_UseForeignDTD(XML_Parser parser, XML_Bool useDTD) { #ifdef XML_DTD /* block after XML_Parse()/XML_ParseBuffer() has been called */ if (parsing) return XML_ERROR_CANT_CHANGE_FEATURE_ONCE_PARSING; useForeignDTD = useDTD; return XML_ERROR_NONE; #else return XML_ERROR_FEATURE_REQUIRES_XML_DTD; #endif } void XMLCALL XML_SetReturnNSTriplet(XML_Parser parser, int do_nst) { /* block after XML_Parse()/XML_ParseBuffer() has been called */ if (parsing) return; ns_triplets = do_nst ? XML_TRUE : XML_FALSE; } void XMLCALL XML_SetUserData(XML_Parser parser, void *p) { if (handlerArg == userData) handlerArg = userData = p; else userData = p; } enum XML_Status XMLCALL XML_SetBase(XML_Parser parser, const XML_Char *p) { if (p) { p = poolCopyString(&_dtd->pool, p); if (!p) return XML_STATUS_ERROR; curBase = p; } else curBase = NULL; return XML_STATUS_OK; } const XML_Char * XMLCALL XML_GetBase(XML_Parser parser) { return curBase; } int XMLCALL XML_GetSpecifiedAttributeCount(XML_Parser parser) { return nSpecifiedAtts; } int XMLCALL XML_GetIdAttributeIndex(XML_Parser parser) { return idAttIndex; } void XMLCALL XML_SetElementHandler(XML_Parser parser, XML_StartElementHandler start, XML_EndElementHandler end) { startElementHandler = start; endElementHandler = end; } void XMLCALL XML_SetStartElementHandler(XML_Parser parser, XML_StartElementHandler start) { startElementHandler = start; } void XMLCALL XML_SetEndElementHandler(XML_Parser parser, XML_EndElementHandler end) { endElementHandler = end; } void XMLCALL XML_SetCharacterDataHandler(XML_Parser parser, XML_CharacterDataHandler handler) { characterDataHandler = handler; } void XMLCALL XML_SetProcessingInstructionHandler(XML_Parser parser, XML_ProcessingInstructionHandler handler) { processingInstructionHandler = handler; } void XMLCALL XML_SetCommentHandler(XML_Parser parser, XML_CommentHandler handler) { commentHandler = handler; } void XMLCALL XML_SetCdataSectionHandler(XML_Parser parser, XML_StartCdataSectionHandler start, XML_EndCdataSectionHandler end) { startCdataSectionHandler = start; endCdataSectionHandler = end; } void XMLCALL XML_SetStartCdataSectionHandler(XML_Parser parser, XML_StartCdataSectionHandler start) { startCdataSectionHandler = start; } void XMLCALL XML_SetEndCdataSectionHandler(XML_Parser parser, XML_EndCdataSectionHandler end) { endCdataSectionHandler = end; } void XMLCALL XML_SetDefaultHandler(XML_Parser parser, XML_DefaultHandler handler) { defaultHandler = handler; defaultExpandInternalEntities = XML_FALSE; } void XMLCALL XML_SetDefaultHandlerExpand(XML_Parser parser, XML_DefaultHandler handler) { defaultHandler = handler; defaultExpandInternalEntities = XML_TRUE; } void XMLCALL XML_SetDoctypeDeclHandler(XML_Parser parser, XML_StartDoctypeDeclHandler start, XML_EndDoctypeDeclHandler end) { startDoctypeDeclHandler = start; endDoctypeDeclHandler = end; } void XMLCALL XML_SetStartDoctypeDeclHandler(XML_Parser parser, XML_StartDoctypeDeclHandler start) { startDoctypeDeclHandler = start; } void XMLCALL XML_SetEndDoctypeDeclHandler(XML_Parser parser, XML_EndDoctypeDeclHandler end) { endDoctypeDeclHandler = end; } void XMLCALL XML_SetUnparsedEntityDeclHandler(XML_Parser parser, XML_UnparsedEntityDeclHandler handler) { unparsedEntityDeclHandler = handler; } void XMLCALL XML_SetNotationDeclHandler(XML_Parser parser, XML_NotationDeclHandler handler) { notationDeclHandler = handler; } void XMLCALL XML_SetNamespaceDeclHandler(XML_Parser parser, XML_StartNamespaceDeclHandler start, XML_EndNamespaceDeclHandler end) { startNamespaceDeclHandler = start; endNamespaceDeclHandler = end; } void XMLCALL XML_SetStartNamespaceDeclHandler(XML_Parser parser, XML_StartNamespaceDeclHandler start) { startNamespaceDeclHandler = start; } void XMLCALL XML_SetEndNamespaceDeclHandler(XML_Parser parser, XML_EndNamespaceDeclHandler end) { endNamespaceDeclHandler = end; } void XMLCALL XML_SetNotStandaloneHandler(XML_Parser parser, XML_NotStandaloneHandler handler) { notStandaloneHandler = handler; } void XMLCALL XML_SetExternalEntityRefHandler(XML_Parser parser, XML_ExternalEntityRefHandler handler) { externalEntityRefHandler = handler; } void XMLCALL XML_SetExternalEntityRefHandlerArg(XML_Parser parser, void *arg) { if (arg) externalEntityRefHandlerArg = (XML_Parser)arg; else externalEntityRefHandlerArg = parser; } void XMLCALL XML_SetSkippedEntityHandler(XML_Parser parser, XML_SkippedEntityHandler handler) { skippedEntityHandler = handler; } void XMLCALL XML_SetUnknownEncodingHandler(XML_Parser parser, XML_UnknownEncodingHandler handler, void *data) { unknownEncodingHandler = handler; unknownEncodingHandlerData = data; } void XMLCALL XML_SetElementDeclHandler(XML_Parser parser, XML_ElementDeclHandler eldecl) { elementDeclHandler = eldecl; } void XMLCALL XML_SetAttlistDeclHandler(XML_Parser parser, XML_AttlistDeclHandler attdecl) { attlistDeclHandler = attdecl; } void XMLCALL XML_SetEntityDeclHandler(XML_Parser parser, XML_EntityDeclHandler handler) { entityDeclHandler = handler; } void XMLCALL XML_SetXmlDeclHandler(XML_Parser parser, XML_XmlDeclHandler handler) { xmlDeclHandler = handler; } int XMLCALL XML_SetParamEntityParsing(XML_Parser parser, enum XML_ParamEntityParsing peParsing) { /* block after XML_Parse()/XML_ParseBuffer() has been called */ if (parsing) return 0; #ifdef XML_DTD paramEntityParsing = peParsing; return 1; #else return peParsing == XML_PARAM_ENTITY_PARSING_NEVER; #endif } enum XML_Status XMLCALL XML_Parse(XML_Parser parser, const char *s, int len, int isFinal) { if (len == 0) { if (!isFinal) return XML_STATUS_OK; positionPtr = bufferPtr; errorCode = processor(parser, bufferPtr, parseEndPtr = bufferEnd, 0); if (errorCode == XML_ERROR_NONE) return XML_STATUS_OK; eventEndPtr = eventPtr; processor = errorProcessor; return XML_STATUS_ERROR; } #ifndef XML_CONTEXT_BYTES else if (bufferPtr == bufferEnd) { const char *end; int nLeftOver; parseEndByteIndex += len; positionPtr = s; if (isFinal) { errorCode = processor(parser, s, parseEndPtr = s + len, 0); if (errorCode == XML_ERROR_NONE) return XML_STATUS_OK; eventEndPtr = eventPtr; processor = errorProcessor; return XML_STATUS_ERROR; } errorCode = processor(parser, s, parseEndPtr = s + len, &end); if (errorCode != XML_ERROR_NONE) { eventEndPtr = eventPtr; processor = errorProcessor; return XML_STATUS_ERROR; } XmlUpdatePosition(encoding, positionPtr, end, &position); positionPtr = end; nLeftOver = s + len - end; if (nLeftOver) { if (buffer == NULL || nLeftOver > bufferLim - buffer) { /* FIXME avoid integer overflow */ char *temp; temp = (buffer == NULL ? (char *)MALLOC(len * 2) : (char *)REALLOC(buffer, len * 2)); if (temp == NULL) { errorCode = XML_ERROR_NO_MEMORY; return XML_STATUS_ERROR; } buffer = temp; if (!buffer) { errorCode = XML_ERROR_NO_MEMORY; eventPtr = eventEndPtr = NULL; processor = errorProcessor; return XML_STATUS_ERROR; } bufferLim = buffer + len * 2; } memcpy(buffer, end, nLeftOver); bufferPtr = buffer; bufferEnd = buffer + nLeftOver; } return XML_STATUS_OK; } #endif /* not defined XML_CONTEXT_BYTES */ else { void *buff = XML_GetBuffer(parser, len); if (buff == NULL) return XML_STATUS_ERROR; else { memcpy(buff, s, len); return XML_ParseBuffer(parser, len, isFinal); } } } enum XML_Status XMLCALL XML_ParseBuffer(XML_Parser parser, int len, int isFinal) { const char *start = bufferPtr; positionPtr = start; bufferEnd += len; parseEndByteIndex += len; errorCode = processor(parser, start, parseEndPtr = bufferEnd, isFinal ? (const char **)NULL : &bufferPtr); if (errorCode == XML_ERROR_NONE) { if (!isFinal) { XmlUpdatePosition(encoding, positionPtr, bufferPtr, &position); positionPtr = bufferPtr; } return XML_STATUS_OK; } else { eventEndPtr = eventPtr; processor = errorProcessor; return XML_STATUS_ERROR; } } void * XMLCALL XML_GetBuffer(XML_Parser parser, int len) { if (len > bufferLim - bufferEnd) { /* FIXME avoid integer overflow */ int neededSize = len + (bufferEnd - bufferPtr); #ifdef XML_CONTEXT_BYTES int keep = bufferPtr - buffer; if (keep > XML_CONTEXT_BYTES) keep = XML_CONTEXT_BYTES; neededSize += keep; #endif /* defined XML_CONTEXT_BYTES */ if (neededSize <= bufferLim - buffer) { #ifdef XML_CONTEXT_BYTES if (keep < bufferPtr - buffer) { int offset = (bufferPtr - buffer) - keep; memmove(buffer, &buffer[offset], bufferEnd - bufferPtr + keep); bufferEnd -= offset; bufferPtr -= offset; } #else memmove(buffer, bufferPtr, bufferEnd - bufferPtr); bufferEnd = buffer + (bufferEnd - bufferPtr); bufferPtr = buffer; #endif /* not defined XML_CONTEXT_BYTES */ } else { char *newBuf; int bufferSize = bufferLim - bufferPtr; if (bufferSize == 0) bufferSize = INIT_BUFFER_SIZE; do { bufferSize *= 2; } while (bufferSize < neededSize); newBuf = (char *)MALLOC(bufferSize); if (newBuf == 0) { errorCode = XML_ERROR_NO_MEMORY; return NULL; } bufferLim = newBuf + bufferSize; #ifdef XML_CONTEXT_BYTES if (bufferPtr) { int keep = bufferPtr - buffer; if (keep > XML_CONTEXT_BYTES) keep = XML_CONTEXT_BYTES; memcpy(newBuf, &bufferPtr[-keep], bufferEnd - bufferPtr + keep); FREE(buffer); buffer = newBuf; bufferEnd = buffer + (bufferEnd - bufferPtr) + keep; bufferPtr = buffer + keep; } else { bufferEnd = newBuf + (bufferEnd - bufferPtr); bufferPtr = buffer = newBuf; } #else if (bufferPtr) { memcpy(newBuf, bufferPtr, bufferEnd - bufferPtr); FREE(buffer); } bufferEnd = newBuf + (bufferEnd - bufferPtr); bufferPtr = buffer = newBuf; #endif /* not defined XML_CONTEXT_BYTES */ } } return bufferEnd; } enum XML_Error XMLCALL XML_GetErrorCode(XML_Parser parser) { return errorCode; } long XMLCALL XML_GetCurrentByteIndex(XML_Parser parser) { if (eventPtr) return parseEndByteIndex - (parseEndPtr - eventPtr); return -1; } int XMLCALL XML_GetCurrentByteCount(XML_Parser parser) { if (eventEndPtr && eventPtr) return eventEndPtr - eventPtr; return 0; } const char * XMLCALL XML_GetInputContext(XML_Parser parser, int *offset, int *size) { #ifdef XML_CONTEXT_BYTES if (eventPtr && buffer) { *offset = eventPtr - buffer; *size = bufferEnd - buffer; return buffer; } #endif /* defined XML_CONTEXT_BYTES */ return (char *) 0; } int XMLCALL XML_GetCurrentLineNumber(XML_Parser parser) { if (eventPtr) { XmlUpdatePosition(encoding, positionPtr, eventPtr, &position); positionPtr = eventPtr; } return position.lineNumber + 1; } int XMLCALL XML_GetCurrentColumnNumber(XML_Parser parser) { if (eventPtr) { XmlUpdatePosition(encoding, positionPtr, eventPtr, &position); positionPtr = eventPtr; } return position.columnNumber; } void XMLCALL XML_FreeContentModel(XML_Parser parser, XML_Content *model) { FREE(model); } void * XMLCALL XML_MemMalloc(XML_Parser parser, size_t size) { return MALLOC(size); } void * XMLCALL XML_MemRealloc(XML_Parser parser, void *ptr, size_t size) { return REALLOC(ptr, size); } void XMLCALL XML_MemFree(XML_Parser parser, void *ptr) { FREE(ptr); } void XMLCALL XML_DefaultCurrent(XML_Parser parser) { if (defaultHandler) { if (openInternalEntities) reportDefault(parser, internalEncoding, openInternalEntities->internalEventPtr, openInternalEntities->internalEventEndPtr); else reportDefault(parser, encoding, eventPtr, eventEndPtr); } } const XML_LChar * XMLCALL XML_ErrorString(enum XML_Error code) { static const XML_LChar *message[] = { 0, XML_L("out of memory"), XML_L("syntax error"), XML_L("no element found"), XML_L("not well-formed (invalid token)"), XML_L("unclosed token"), XML_L("partial character"), XML_L("mismatched tag"), XML_L("duplicate attribute"), XML_L("junk after document element"), XML_L("illegal parameter entity reference"), XML_L("undefined entity"), XML_L("recursive entity reference"), XML_L("asynchronous entity"), XML_L("reference to invalid character number"), XML_L("reference to binary entity"), XML_L("reference to external entity in attribute"), XML_L("xml declaration not at start of external entity"), XML_L("unknown encoding"), XML_L("encoding specified in XML declaration is incorrect"), XML_L("unclosed CDATA section"), XML_L("error in processing external entity reference"), XML_L("document is not standalone"), XML_L("unexpected parser state - please send a bug report"), XML_L("entity declared in parameter entity"), XML_L("requested feature requires XML_DTD support in Expat"), XML_L("cannot change setting once parsing has begun"), XML_L("unbound prefix") }; if (code > 0 && code < sizeof(message)/sizeof(message[0])) return message[code]; return NULL; } const XML_LChar * XMLCALL XML_ExpatVersion(void) { /* V1 is used to string-ize the version number. However, it would string-ize the actual version macro *names* unless we get them substituted before being passed to V1. CPP is defined to expand a macro, then rescan for more expansions. Thus, we use V2 to expand the version macros, then CPP will expand the resulting V1() macro with the correct numerals. */ /* ### I'm assuming cpp is portable in this respect... */ #define V1(a,b,c) XML_L(#a)XML_L(".")XML_L(#b)XML_L(".")XML_L(#c) #define V2(a,b,c) XML_L("expat_")V1(a,b,c) return V2(XML_MAJOR_VERSION, XML_MINOR_VERSION, XML_MICRO_VERSION); #undef V1 #undef V2 } XML_Expat_Version XMLCALL XML_ExpatVersionInfo(void) { XML_Expat_Version version; version.major = XML_MAJOR_VERSION; version.minor = XML_MINOR_VERSION; version.micro = XML_MICRO_VERSION; return version; } const XML_Feature * XMLCALL XML_GetFeatureList(void) { static XML_Feature features[] = { {XML_FEATURE_SIZEOF_XML_CHAR, XML_L("sizeof(XML_Char)"), 0}, {XML_FEATURE_SIZEOF_XML_LCHAR, XML_L("sizeof(XML_LChar)"), 0}, #ifdef XML_UNICODE {XML_FEATURE_UNICODE, XML_L("XML_UNICODE"), 0}, #endif #ifdef XML_UNICODE_WCHAR_T {XML_FEATURE_UNICODE_WCHAR_T, XML_L("XML_UNICODE_WCHAR_T"), 0}, #endif #ifdef XML_DTD {XML_FEATURE_DTD, XML_L("XML_DTD"), 0}, #endif #ifdef XML_CONTEXT_BYTES {XML_FEATURE_CONTEXT_BYTES, XML_L("XML_CONTEXT_BYTES"), XML_CONTEXT_BYTES}, #endif #ifdef XML_MIN_SIZE {XML_FEATURE_MIN_SIZE, XML_L("XML_MIN_SIZE"), 0}, #endif {XML_FEATURE_END, NULL, 0} }; features[0].value = sizeof(XML_Char); features[1].value = sizeof(XML_LChar); return features; } /* Initially tag->rawName always points into the parse buffer; for those TAG instances opened while the current parse buffer was processed, and not yet closed, we need to store tag->rawName in a more permanent location, since the parse buffer is about to be discarded. */ static XML_Bool storeRawNames(XML_Parser parser) { TAG *tag = tagStack; while (tag) { int bufSize; int nameLen = sizeof(XML_Char) * (tag->name.strLen + 1); char *rawNameBuf = tag->buf + nameLen; /* Stop if already stored. Since tagStack is a stack, we can stop at the first entry that has already been copied; everything below it in the stack is already been accounted for in a previous call to this function. */ if (tag->rawName == rawNameBuf) break; /* For re-use purposes we need to ensure that the size of tag->buf is a multiple of sizeof(XML_Char). */ bufSize = nameLen + ROUND_UP(tag->rawNameLength, sizeof(XML_Char)); if (bufSize > tag->bufEnd - tag->buf) { char *temp = (char *)REALLOC(tag->buf, bufSize); if (temp == NULL) return XML_FALSE; /* if tag->name.str points to tag->buf (only when namespace processing is off) then we have to update it */ if (tag->name.str == (XML_Char *)tag->buf) tag->name.str = (XML_Char *)temp; /* if tag->name.localPart is set (when namespace processing is on) then update it as well, since it will always point into tag->buf */ if (tag->name.localPart) tag->name.localPart = (XML_Char *)temp + (tag->name.localPart - (XML_Char *)tag->buf); tag->buf = temp; tag->bufEnd = temp + bufSize; rawNameBuf = temp + nameLen; } memcpy(rawNameBuf, tag->rawName, tag->rawNameLength); tag->rawName = rawNameBuf; tag = tag->parent; } return XML_TRUE; } static enum XML_Error PTRCALL contentProcessor(XML_Parser parser, const char *start, const char *end, const char **endPtr) { enum XML_Error result = doContent(parser, 0, encoding, start, end, endPtr); if (result != XML_ERROR_NONE) return result; if (!storeRawNames(parser)) return XML_ERROR_NO_MEMORY; return result; } static enum XML_Error PTRCALL externalEntityInitProcessor(XML_Parser parser, const char *start, const char *end, const char **endPtr) { enum XML_Error result = initializeEncoding(parser); if (result != XML_ERROR_NONE) return result; processor = externalEntityInitProcessor2; return externalEntityInitProcessor2(parser, start, end, endPtr); } static enum XML_Error PTRCALL externalEntityInitProcessor2(XML_Parser parser, const char *start, const char *end, const char **endPtr) { const char *next = start; /* XmlContentTok doesn't always set the last arg */ int tok = XmlContentTok(encoding, start, end, &next); switch (tok) { case XML_TOK_BOM: /* If we are at the end of the buffer, this would cause the next stage, i.e. externalEntityInitProcessor3, to pass control directly to doContent (by detecting XML_TOK_NONE) without processing any xml text declaration - causing the error XML_ERROR_MISPLACED_XML_PI in doContent. */ if (next == end && endPtr) { *endPtr = next; return XML_ERROR_NONE; } start = next; break; case XML_TOK_PARTIAL: if (endPtr) { *endPtr = start; return XML_ERROR_NONE; } eventPtr = start; return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: if (endPtr) { *endPtr = start; return XML_ERROR_NONE; } eventPtr = start; return XML_ERROR_PARTIAL_CHAR; } processor = externalEntityInitProcessor3; return externalEntityInitProcessor3(parser, start, end, endPtr); } static enum XML_Error PTRCALL externalEntityInitProcessor3(XML_Parser parser, const char *start, const char *end, const char **endPtr) { const char *next = start; /* XmlContentTok doesn't always set the last arg */ int tok = XmlContentTok(encoding, start, end, &next); switch (tok) { case XML_TOK_XML_DECL: { enum XML_Error result = processXmlDecl(parser, 1, start, next); if (result != XML_ERROR_NONE) return result; start = next; } break; case XML_TOK_PARTIAL: if (endPtr) { *endPtr = start; return XML_ERROR_NONE; } eventPtr = start; return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: if (endPtr) { *endPtr = start; return XML_ERROR_NONE; } eventPtr = start; return XML_ERROR_PARTIAL_CHAR; } processor = externalEntityContentProcessor; tagLevel = 1; return externalEntityContentProcessor(parser, start, end, endPtr); } static enum XML_Error PTRCALL externalEntityContentProcessor(XML_Parser parser, const char *start, const char *end, const char **endPtr) { enum XML_Error result = doContent(parser, 1, encoding, start, end, endPtr); if (result != XML_ERROR_NONE) return result; if (!storeRawNames(parser)) return XML_ERROR_NO_MEMORY; return result; } static enum XML_Error doContent(XML_Parser parser, int startTagLevel, const ENCODING *enc, const char *s, const char *end, const char **nextPtr) { DTD * const dtd = _dtd; /* save one level of indirection */ const char **eventPP; const char **eventEndPP; if (enc == encoding) { eventPP = &eventPtr; eventEndPP = &eventEndPtr; } else { eventPP = &(openInternalEntities->internalEventPtr); eventEndPP = &(openInternalEntities->internalEventEndPtr); } *eventPP = s; for (;;) { const char *next = s; /* XmlContentTok doesn't always set the last arg */ int tok = XmlContentTok(enc, s, end, &next); *eventEndPP = next; switch (tok) { case XML_TOK_TRAILING_CR: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } *eventEndPP = end; if (characterDataHandler) { XML_Char c = 0xA; characterDataHandler(handlerArg, &c, 1); } else if (defaultHandler) reportDefault(parser, enc, s, end); if (startTagLevel == 0) return XML_ERROR_NO_ELEMENTS; if (tagLevel != startTagLevel) return XML_ERROR_ASYNC_ENTITY; return XML_ERROR_NONE; case XML_TOK_NONE: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } if (startTagLevel > 0) { if (tagLevel != startTagLevel) return XML_ERROR_ASYNC_ENTITY; return XML_ERROR_NONE; } return XML_ERROR_NO_ELEMENTS; case XML_TOK_INVALID: *eventPP = next; return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_PARTIAL_CHAR; case XML_TOK_ENTITY_REF: { const XML_Char *name; ENTITY *entity; XML_Char ch = (XML_Char) XmlPredefinedEntityName(enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (ch) { if (characterDataHandler) characterDataHandler(handlerArg, &ch, 1); else if (defaultHandler) reportDefault(parser, enc, s, next); break; } name = poolStoreString(&dtd->pool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!name) return XML_ERROR_NO_MEMORY; entity = (ENTITY *)lookup(&dtd->generalEntities, name, 0); poolDiscard(&dtd->pool); /* First, determine if a check for an existing declaration is needed; if yes, check that the entity exists, and that it is internal, otherwise call the skipped entity or default handler. */ if (!dtd->hasParamEntityRefs || dtd->standalone) { if (!entity) return XML_ERROR_UNDEFINED_ENTITY; else if (!entity->is_internal) return XML_ERROR_ENTITY_DECLARED_IN_PE; } else if (!entity) { if (skippedEntityHandler) skippedEntityHandler(handlerArg, name, 0); else if (defaultHandler) reportDefault(parser, enc, s, next); break; } if (entity->open) return XML_ERROR_RECURSIVE_ENTITY_REF; if (entity->notation) return XML_ERROR_BINARY_ENTITY_REF; if (entity->textPtr) { enum XML_Error result; OPEN_INTERNAL_ENTITY openEntity; if (!defaultExpandInternalEntities) { if (skippedEntityHandler) skippedEntityHandler(handlerArg, entity->name, 0); else if (defaultHandler) reportDefault(parser, enc, s, next); break; } entity->open = XML_TRUE; openEntity.next = openInternalEntities; openInternalEntities = &openEntity; openEntity.entity = entity; openEntity.internalEventPtr = NULL; openEntity.internalEventEndPtr = NULL; result = doContent(parser, tagLevel, internalEncoding, (char *)entity->textPtr, (char *)(entity->textPtr + entity->textLen), 0); entity->open = XML_FALSE; openInternalEntities = openEntity.next; if (result) return result; } else if (externalEntityRefHandler) { const XML_Char *context; entity->open = XML_TRUE; context = getContext(parser); entity->open = XML_FALSE; if (!context) return XML_ERROR_NO_MEMORY; if (!externalEntityRefHandler((XML_Parser)externalEntityRefHandlerArg, context, entity->base, entity->systemId, entity->publicId)) return XML_ERROR_EXTERNAL_ENTITY_HANDLING; poolDiscard(&tempPool); } else if (defaultHandler) reportDefault(parser, enc, s, next); break; } case XML_TOK_START_TAG_NO_ATTS: /* fall through */ case XML_TOK_START_TAG_WITH_ATTS: { TAG *tag; enum XML_Error result; XML_Char *toPtr; if (freeTagList) { tag = freeTagList; freeTagList = freeTagList->parent; } else { tag = (TAG *)MALLOC(sizeof(TAG)); if (!tag) return XML_ERROR_NO_MEMORY; tag->buf = (char *)MALLOC(INIT_TAG_BUF_SIZE); if (!tag->buf) { FREE(tag); return XML_ERROR_NO_MEMORY; } tag->bufEnd = tag->buf + INIT_TAG_BUF_SIZE; } tag->bindings = NULL; tag->parent = tagStack; tagStack = tag; tag->name.localPart = NULL; tag->name.prefix = NULL; tag->rawName = s + enc->minBytesPerChar; tag->rawNameLength = XmlNameLength(enc, tag->rawName); ++tagLevel; { const char *rawNameEnd = tag->rawName + tag->rawNameLength; const char *fromPtr = tag->rawName; toPtr = (XML_Char *)tag->buf; for (;;) { int bufSize; int convLen; XmlConvert(enc, &fromPtr, rawNameEnd, (ICHAR **)&toPtr, (ICHAR *)tag->bufEnd - 1); convLen = toPtr - (XML_Char *)tag->buf; if (fromPtr == rawNameEnd) { tag->name.strLen = convLen; break; } bufSize = (tag->bufEnd - tag->buf) << 1; { char *temp = (char *)REALLOC(tag->buf, bufSize); if (temp == NULL) return XML_ERROR_NO_MEMORY; tag->buf = temp; tag->bufEnd = temp + bufSize; toPtr = (XML_Char *)temp + convLen; } } } tag->name.str = (XML_Char *)tag->buf; *toPtr = XML_T('\0'); result = storeAtts(parser, enc, s, &(tag->name), &(tag->bindings)); if (result) return result; if (startElementHandler) startElementHandler(handlerArg, tag->name.str, (const XML_Char **)atts); else if (defaultHandler) reportDefault(parser, enc, s, next); poolClear(&tempPool); break; } case XML_TOK_EMPTY_ELEMENT_NO_ATTS: /* fall through */ case XML_TOK_EMPTY_ELEMENT_WITH_ATTS: { const char *rawName = s + enc->minBytesPerChar; enum XML_Error result; BINDING *bindings = NULL; XML_Bool noElmHandlers = XML_TRUE; TAG_NAME name; name.str = poolStoreString(&tempPool, enc, rawName, rawName + XmlNameLength(enc, rawName)); if (!name.str) return XML_ERROR_NO_MEMORY; poolFinish(&tempPool); result = storeAtts(parser, enc, s, &name, &bindings); if (result) return result; poolFinish(&tempPool); if (startElementHandler) { startElementHandler(handlerArg, name.str, (const XML_Char **)atts); noElmHandlers = XML_FALSE; } if (endElementHandler) { if (startElementHandler) *eventPP = *eventEndPP; endElementHandler(handlerArg, name.str); noElmHandlers = XML_FALSE; } if (noElmHandlers && defaultHandler) reportDefault(parser, enc, s, next); poolClear(&tempPool); while (bindings) { BINDING *b = bindings; if (endNamespaceDeclHandler) endNamespaceDeclHandler(handlerArg, b->prefix->name); bindings = bindings->nextTagBinding; b->nextTagBinding = freeBindingList; freeBindingList = b; b->prefix->binding = b->prevPrefixBinding; } } if (tagLevel == 0) return epilogProcessor(parser, next, end, nextPtr); break; case XML_TOK_END_TAG: if (tagLevel == startTagLevel) return XML_ERROR_ASYNC_ENTITY; else { int len; const char *rawName; TAG *tag = tagStack; tagStack = tag->parent; tag->parent = freeTagList; freeTagList = tag; rawName = s + enc->minBytesPerChar*2; len = XmlNameLength(enc, rawName); if (len != tag->rawNameLength || memcmp(tag->rawName, rawName, len) != 0) { *eventPP = rawName; return XML_ERROR_TAG_MISMATCH; } --tagLevel; if (endElementHandler) { const XML_Char *localPart; const XML_Char *prefix; XML_Char *uri; localPart = tag->name.localPart; if (ns && localPart) { /* localPart and prefix may have been overwritten in tag->name.str, since this points to the binding->uri buffer which gets re-used; so we have to add them again */ uri = (XML_Char *)tag->name.str + tag->name.uriLen; /* don't need to check for space - already done in storeAtts() */ while (*localPart) *uri++ = *localPart++; prefix = (XML_Char *)tag->name.prefix; if (ns_triplets && prefix) { *uri++ = namespaceSeparator; while (*prefix) *uri++ = *prefix++; } *uri = XML_T('\0'); } endElementHandler(handlerArg, tag->name.str); } else if (defaultHandler) reportDefault(parser, enc, s, next); while (tag->bindings) { BINDING *b = tag->bindings; if (endNamespaceDeclHandler) endNamespaceDeclHandler(handlerArg, b->prefix->name); tag->bindings = tag->bindings->nextTagBinding; b->nextTagBinding = freeBindingList; freeBindingList = b; b->prefix->binding = b->prevPrefixBinding; } if (tagLevel == 0) return epilogProcessor(parser, next, end, nextPtr); } break; case XML_TOK_CHAR_REF: { int n = XmlCharRefNumber(enc, s); if (n < 0) return XML_ERROR_BAD_CHAR_REF; if (characterDataHandler) { XML_Char buf[XML_ENCODE_MAX]; characterDataHandler(handlerArg, buf, XmlEncode(n, (ICHAR *)buf)); } else if (defaultHandler) reportDefault(parser, enc, s, next); } break; case XML_TOK_XML_DECL: return XML_ERROR_MISPLACED_XML_PI; case XML_TOK_DATA_NEWLINE: if (characterDataHandler) { XML_Char c = 0xA; characterDataHandler(handlerArg, &c, 1); } else if (defaultHandler) reportDefault(parser, enc, s, next); break; case XML_TOK_CDATA_SECT_OPEN: { enum XML_Error result; if (startCdataSectionHandler) startCdataSectionHandler(handlerArg); #if 0 /* Suppose you doing a transformation on a document that involves changing only the character data. You set up a defaultHandler and a characterDataHandler. The defaultHandler simply copies characters through. The characterDataHandler does the transformation and writes the characters out escaping them as necessary. This case will fail to work if we leave out the following two lines (because & and < inside CDATA sections will be incorrectly escaped). However, now we have a start/endCdataSectionHandler, so it seems easier to let the user deal with this. */ else if (characterDataHandler) characterDataHandler(handlerArg, dataBuf, 0); #endif else if (defaultHandler) reportDefault(parser, enc, s, next); result = doCdataSection(parser, enc, &next, end, nextPtr); if (!next) { processor = cdataSectionProcessor; return result; } } break; case XML_TOK_TRAILING_RSQB: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } if (characterDataHandler) { if (MUST_CONVERT(enc, s)) { ICHAR *dataPtr = (ICHAR *)dataBuf; XmlConvert(enc, &s, end, &dataPtr, (ICHAR *)dataBufEnd); characterDataHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf); } else characterDataHandler(handlerArg, (XML_Char *)s, (XML_Char *)end - (XML_Char *)s); } else if (defaultHandler) reportDefault(parser, enc, s, end); if (startTagLevel == 0) { *eventPP = end; return XML_ERROR_NO_ELEMENTS; } if (tagLevel != startTagLevel) { *eventPP = end; return XML_ERROR_ASYNC_ENTITY; } return XML_ERROR_NONE; case XML_TOK_DATA_CHARS: if (characterDataHandler) { if (MUST_CONVERT(enc, s)) { for (;;) { ICHAR *dataPtr = (ICHAR *)dataBuf; XmlConvert(enc, &s, next, &dataPtr, (ICHAR *)dataBufEnd); *eventEndPP = s; characterDataHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf); if (s == next) break; *eventPP = s; } } else characterDataHandler(handlerArg, (XML_Char *)s, (XML_Char *)next - (XML_Char *)s); } else if (defaultHandler) reportDefault(parser, enc, s, next); break; case XML_TOK_PI: if (!reportProcessingInstruction(parser, enc, s, next)) return XML_ERROR_NO_MEMORY; break; case XML_TOK_COMMENT: if (!reportComment(parser, enc, s, next)) return XML_ERROR_NO_MEMORY; break; default: if (defaultHandler) reportDefault(parser, enc, s, next); break; } *eventPP = s = next; } /* not reached */ } /* Precondition: all arguments must be non-NULL; Purpose: - normalize attributes - check attributes for well-formedness - generate namespace aware attribute names (URI, prefix) - build list of attributes for startElementHandler - default attributes - process namespace declarations (check and report them) - generate namespace aware element name (URI, prefix) */ static enum XML_Error storeAtts(XML_Parser parser, const ENCODING *enc, const char *attStr, TAG_NAME *tagNamePtr, BINDING **bindingsPtr) { DTD * const dtd = _dtd; /* save one level of indirection */ ELEMENT_TYPE *elementType; int nDefaultAtts; const XML_Char **appAtts; /* the attribute list for the application */ int attIndex = 0; int prefixLen; int i; int n; XML_Char *uri; int nPrefixes = 0; BINDING *binding; const XML_Char *localPart; /* lookup the element type name */ elementType = (ELEMENT_TYPE *)lookup(&dtd->elementTypes, tagNamePtr->str,0); if (!elementType) { const XML_Char *name = poolCopyString(&dtd->pool, tagNamePtr->str); if (!name) return XML_ERROR_NO_MEMORY; elementType = (ELEMENT_TYPE *)lookup(&dtd->elementTypes, name, sizeof(ELEMENT_TYPE)); if (!elementType) return XML_ERROR_NO_MEMORY; if (ns && !setElementTypePrefix(parser, elementType)) return XML_ERROR_NO_MEMORY; } nDefaultAtts = elementType->nDefaultAtts; /* get the attributes from the tokenizer */ n = XmlGetAttributes(enc, attStr, attsSize, atts); if (n + nDefaultAtts > attsSize) { int oldAttsSize = attsSize; ATTRIBUTE *temp; attsSize = n + nDefaultAtts + INIT_ATTS_SIZE; temp = (ATTRIBUTE *)REALLOC((void *)atts, attsSize * sizeof(ATTRIBUTE)); if (temp == NULL) return XML_ERROR_NO_MEMORY; atts = temp; if (n > oldAttsSize) XmlGetAttributes(enc, attStr, n, atts); } appAtts = (const XML_Char **)atts; for (i = 0; i < n; i++) { /* add the name and value to the attribute list */ ATTRIBUTE_ID *attId = getAttributeId(parser, enc, atts[i].name, atts[i].name + XmlNameLength(enc, atts[i].name)); if (!attId) return XML_ERROR_NO_MEMORY; /* Detect duplicate attributes by their QNames. This does not work when namespace processing is turned on and different prefixes for the same namespace are used. For this case we have a check further down. */ if ((attId->name)[-1]) { if (enc == encoding) eventPtr = atts[i].name; return XML_ERROR_DUPLICATE_ATTRIBUTE; } (attId->name)[-1] = 1; appAtts[attIndex++] = attId->name; if (!atts[i].normalized) { enum XML_Error result; XML_Bool isCdata = XML_TRUE; /* figure out whether declared as other than CDATA */ if (attId->maybeTokenized) { int j; for (j = 0; j < nDefaultAtts; j++) { if (attId == elementType->defaultAtts[j].id) { isCdata = elementType->defaultAtts[j].isCdata; break; } } } /* normalize the attribute value */ result = storeAttributeValue(parser, enc, isCdata, atts[i].valuePtr, atts[i].valueEnd, &tempPool); if (result) return result; appAtts[attIndex] = poolStart(&tempPool); poolFinish(&tempPool); } else { /* the value did not need normalizing */ appAtts[attIndex] = poolStoreString(&tempPool, enc, atts[i].valuePtr, atts[i].valueEnd); if (appAtts[attIndex] == 0) return XML_ERROR_NO_MEMORY; poolFinish(&tempPool); } /* handle prefixed attribute names */ if (attId->prefix) { if (attId->xmlns) { /* deal with namespace declarations here */ enum XML_Error result = addBinding(parser, attId->prefix, attId, appAtts[attIndex], bindingsPtr); if (result) return result; --attIndex; } else { /* deal with other prefixed names later */ attIndex++; nPrefixes++; (attId->name)[-1] = 2; } } else attIndex++; } /* set-up for XML_GetSpecifiedAttributeCount and XML_GetIdAttributeIndex */ nSpecifiedAtts = attIndex; if (elementType->idAtt && (elementType->idAtt->name)[-1]) { for (i = 0; i < attIndex; i += 2) if (appAtts[i] == elementType->idAtt->name) { idAttIndex = i; break; } } else idAttIndex = -1; /* do attribute defaulting */ for (i = 0; i < nDefaultAtts; i++) { const DEFAULT_ATTRIBUTE *da = elementType->defaultAtts + i; if (!(da->id->name)[-1] && da->value) { if (da->id->prefix) { if (da->id->xmlns) { enum XML_Error result = addBinding(parser, da->id->prefix, da->id, da->value, bindingsPtr); if (result) return result; } else { (da->id->name)[-1] = 2; nPrefixes++; appAtts[attIndex++] = da->id->name; appAtts[attIndex++] = da->value; } } else { (da->id->name)[-1] = 1; appAtts[attIndex++] = da->id->name; appAtts[attIndex++] = da->value; } } } appAtts[attIndex] = 0; /* expand prefixed attribute names, check for duplicates, and clear flags that say whether attributes were specified */ i = 0; if (nPrefixes) { int j; /* hash table index */ unsigned long version = nsAttsVersion; int nsAttsSize = (int)1 << nsAttsPower; /* size of hash table must be at least 2 * (# of prefixed attributes) */ if ((nPrefixes << 1) >> nsAttsPower) { /* true for nsAttsPower = 0 */ NS_ATT *temp; /* hash table size must also be a power of 2 and >= 8 */ while (nPrefixes >> nsAttsPower++); if (nsAttsPower < 3) nsAttsPower = 3; nsAttsSize = (int)1 << nsAttsPower; temp = (NS_ATT *)REALLOC(nsAtts, nsAttsSize * sizeof(NS_ATT)); if (!temp) return XML_ERROR_NO_MEMORY; nsAtts = temp; version = 0; /* force re-initialization of nsAtts hash table */ } /* using a version flag saves us from initializing nsAtts every time */ if (!version) { /* initialize version flags when version wraps around */ version = INIT_ATTS_VERSION; for (j = nsAttsSize; j != 0; ) nsAtts[--j].version = version; } nsAttsVersion = --version; /* expand prefixed names and check for duplicates */ for (; i < attIndex; i += 2) { const XML_Char *s = appAtts[i]; if (s[-1] == 2) { /* prefixed */ ATTRIBUTE_ID *id; const BINDING *b; unsigned long uriHash = 0; ((XML_Char *)s)[-1] = 0; /* clear flag */ id = (ATTRIBUTE_ID *)lookup(&dtd->attributeIds, s, 0); b = id->prefix->binding; if (!b) return XML_ERROR_UNBOUND_PREFIX; /* as we expand the name we also calculate its hash value */ for (j = 0; j < b->uriLen; j++) { const XML_Char c = b->uri[j]; if (!poolAppendChar(&tempPool, c)) return XML_ERROR_NO_MEMORY; uriHash = CHAR_HASH(uriHash, c); } while (*s++ != XML_T(':')) ; do { /* copies null terminator */ const XML_Char c = *s; if (!poolAppendChar(&tempPool, *s)) return XML_ERROR_NO_MEMORY; uriHash = CHAR_HASH(uriHash, c); } while (*s++); { /* Check hash table for duplicate of expanded name (uriName). Derived from code in lookup(HASH_TABLE *table, ...). */ unsigned char step = 0; unsigned long mask = nsAttsSize - 1; j = uriHash & mask; /* index into hash table */ while (nsAtts[j].version == version) { /* for speed we compare stored hash values first */ if (uriHash == nsAtts[j].hash) { const XML_Char *s1 = poolStart(&tempPool); const XML_Char *s2 = nsAtts[j].uriName; /* s1 is null terminated, but not s2 */ for (; *s1 == *s2 && *s1 != 0; s1++, s2++); if (*s1 == 0) return XML_ERROR_DUPLICATE_ATTRIBUTE; } if (!step) step = PROBE_STEP(uriHash, mask, nsAttsPower); j < step ? ( j += nsAttsSize - step) : (j -= step); } } if (ns_triplets) { /* append namespace separator and prefix */ tempPool.ptr[-1] = namespaceSeparator; s = b->prefix->name; do { if (!poolAppendChar(&tempPool, *s)) return XML_ERROR_NO_MEMORY; } while (*s++); } /* store expanded name in attribute list */ s = poolStart(&tempPool); poolFinish(&tempPool); appAtts[i] = s; /* fill empty slot with new version, uriName and hash value */ nsAtts[j].version = version; nsAtts[j].hash = uriHash; nsAtts[j].uriName = s; if (!--nPrefixes) break; } else /* not prefixed */ ((XML_Char *)s)[-1] = 0; /* clear flag */ } } /* clear flags for the remaining attributes */ for (; i < attIndex; i += 2) ((XML_Char *)(appAtts[i]))[-1] = 0; for (binding = *bindingsPtr; binding; binding = binding->nextTagBinding) binding->attId->name[-1] = 0; if (!ns) return XML_ERROR_NONE; /* expand the element type name */ if (elementType->prefix) { binding = elementType->prefix->binding; if (!binding) return XML_ERROR_UNBOUND_PREFIX; localPart = tagNamePtr->str; while (*localPart++ != XML_T(':')) ; } else if (dtd->defaultPrefix.binding) { binding = dtd->defaultPrefix.binding; localPart = tagNamePtr->str; } else return XML_ERROR_NONE; prefixLen = 0; if (ns_triplets && binding->prefix->name) { for (; binding->prefix->name[prefixLen++];) ; } tagNamePtr->localPart = localPart; tagNamePtr->uriLen = binding->uriLen; tagNamePtr->prefix = binding->prefix->name; tagNamePtr->prefixLen = prefixLen; for (i = 0; localPart[i++];) ; n = i + binding->uriLen + prefixLen; if (n > binding->uriAlloc) { TAG *p; uri = (XML_Char *)MALLOC((n + EXPAND_SPARE) * sizeof(XML_Char)); if (!uri) return XML_ERROR_NO_MEMORY; binding->uriAlloc = n + EXPAND_SPARE; memcpy(uri, binding->uri, binding->uriLen * sizeof(XML_Char)); for (p = tagStack; p; p = p->parent) if (p->name.str == binding->uri) p->name.str = uri; FREE(binding->uri); binding->uri = uri; } uri = binding->uri + binding->uriLen; memcpy(uri, localPart, i * sizeof(XML_Char)); if (prefixLen) { uri = uri + (i - 1); if (namespaceSeparator) *uri = namespaceSeparator; memcpy(uri + 1, binding->prefix->name, prefixLen * sizeof(XML_Char)); } tagNamePtr->str = binding->uri; return XML_ERROR_NONE; } /* addBinding() overwrites the value of prefix->binding without checking. Therefore one must keep track of the old value outside of addBinding(). */ static enum XML_Error addBinding(XML_Parser parser, PREFIX *prefix, const ATTRIBUTE_ID *attId, const XML_Char *uri, BINDING **bindingsPtr) { BINDING *b; int len; /* empty string is only valid when there is no prefix per XML NS 1.0 */ if (*uri == XML_T('\0') && prefix->name) return XML_ERROR_SYNTAX; for (len = 0; uri[len]; len++) ; if (namespaceSeparator) len++; if (freeBindingList) { b = freeBindingList; if (len > b->uriAlloc) { XML_Char *temp = (XML_Char *)REALLOC(b->uri, sizeof(XML_Char) * (len + EXPAND_SPARE)); if (temp == NULL) return XML_ERROR_NO_MEMORY; b->uri = temp; b->uriAlloc = len + EXPAND_SPARE; } freeBindingList = b->nextTagBinding; } else { b = (BINDING *)MALLOC(sizeof(BINDING)); if (!b) return XML_ERROR_NO_MEMORY; b->uri = (XML_Char *)MALLOC(sizeof(XML_Char) * (len + EXPAND_SPARE)); if (!b->uri) { FREE(b); return XML_ERROR_NO_MEMORY; } b->uriAlloc = len + EXPAND_SPARE; } b->uriLen = len; memcpy(b->uri, uri, len * sizeof(XML_Char)); if (namespaceSeparator) b->uri[len - 1] = namespaceSeparator; b->prefix = prefix; b->attId = attId; b->prevPrefixBinding = prefix->binding; /* NULL binding when default namespace undeclared */ if (*uri == XML_T('\0') && prefix == &_dtd->defaultPrefix) prefix->binding = NULL; else prefix->binding = b; b->nextTagBinding = *bindingsPtr; *bindingsPtr = b; if (startNamespaceDeclHandler) startNamespaceDeclHandler(handlerArg, prefix->name, prefix->binding ? uri : 0); return XML_ERROR_NONE; } /* The idea here is to avoid using stack for each CDATA section when the whole file is parsed with one call. */ static enum XML_Error PTRCALL cdataSectionProcessor(XML_Parser parser, const char *start, const char *end, const char **endPtr) { enum XML_Error result = doCdataSection(parser, encoding, &start, end, endPtr); if (start) { if (parentParser) { /* we are parsing an external entity */ processor = externalEntityContentProcessor; return externalEntityContentProcessor(parser, start, end, endPtr); } else { processor = contentProcessor; return contentProcessor(parser, start, end, endPtr); } } return result; } /* startPtr gets set to non-null is the section is closed, and to null if the section is not yet closed. */ static enum XML_Error doCdataSection(XML_Parser parser, const ENCODING *enc, const char **startPtr, const char *end, const char **nextPtr) { const char *s = *startPtr; const char **eventPP; const char **eventEndPP; if (enc == encoding) { eventPP = &eventPtr; *eventPP = s; eventEndPP = &eventEndPtr; } else { eventPP = &(openInternalEntities->internalEventPtr); eventEndPP = &(openInternalEntities->internalEventEndPtr); } *eventPP = s; *startPtr = NULL; for (;;) { const char *next; int tok = XmlCdataSectionTok(enc, s, end, &next); *eventEndPP = next; switch (tok) { case XML_TOK_CDATA_SECT_CLOSE: if (endCdataSectionHandler) endCdataSectionHandler(handlerArg); #if 0 /* see comment under XML_TOK_CDATA_SECT_OPEN */ else if (characterDataHandler) characterDataHandler(handlerArg, dataBuf, 0); #endif else if (defaultHandler) reportDefault(parser, enc, s, next); *startPtr = next; return XML_ERROR_NONE; case XML_TOK_DATA_NEWLINE: if (characterDataHandler) { XML_Char c = 0xA; characterDataHandler(handlerArg, &c, 1); } else if (defaultHandler) reportDefault(parser, enc, s, next); break; case XML_TOK_DATA_CHARS: if (characterDataHandler) { if (MUST_CONVERT(enc, s)) { for (;;) { ICHAR *dataPtr = (ICHAR *)dataBuf; XmlConvert(enc, &s, next, &dataPtr, (ICHAR *)dataBufEnd); *eventEndPP = next; characterDataHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf); if (s == next) break; *eventPP = s; } } else characterDataHandler(handlerArg, (XML_Char *)s, (XML_Char *)next - (XML_Char *)s); } else if (defaultHandler) reportDefault(parser, enc, s, next); break; case XML_TOK_INVALID: *eventPP = next; return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL_CHAR: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_PARTIAL_CHAR; case XML_TOK_PARTIAL: case XML_TOK_NONE: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_UNCLOSED_CDATA_SECTION; default: *eventPP = next; return XML_ERROR_UNEXPECTED_STATE; } *eventPP = s = next; } /* not reached */ } #ifdef XML_DTD /* The idea here is to avoid using stack for each IGNORE section when the whole file is parsed with one call. */ static enum XML_Error PTRCALL ignoreSectionProcessor(XML_Parser parser, const char *start, const char *end, const char **endPtr) { enum XML_Error result = doIgnoreSection(parser, encoding, &start, end, endPtr); if (start) { processor = prologProcessor; return prologProcessor(parser, start, end, endPtr); } return result; } /* startPtr gets set to non-null is the section is closed, and to null if the section is not yet closed. */ static enum XML_Error doIgnoreSection(XML_Parser parser, const ENCODING *enc, const char **startPtr, const char *end, const char **nextPtr) { const char *next; int tok; const char *s = *startPtr; const char **eventPP; const char **eventEndPP; if (enc == encoding) { eventPP = &eventPtr; *eventPP = s; eventEndPP = &eventEndPtr; } else { eventPP = &(openInternalEntities->internalEventPtr); eventEndPP = &(openInternalEntities->internalEventEndPtr); } *eventPP = s; *startPtr = NULL; tok = XmlIgnoreSectionTok(enc, s, end, &next); *eventEndPP = next; switch (tok) { case XML_TOK_IGNORE_SECT: if (defaultHandler) reportDefault(parser, enc, s, next); *startPtr = next; return XML_ERROR_NONE; case XML_TOK_INVALID: *eventPP = next; return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL_CHAR: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_PARTIAL_CHAR; case XML_TOK_PARTIAL: case XML_TOK_NONE: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_SYNTAX; /* XML_ERROR_UNCLOSED_IGNORE_SECTION */ default: *eventPP = next; return XML_ERROR_UNEXPECTED_STATE; } /* not reached */ } #endif /* XML_DTD */ static enum XML_Error initializeEncoding(XML_Parser parser) { const char *s; #ifdef XML_UNICODE char encodingBuf[128]; if (!protocolEncodingName) s = NULL; else { int i; for (i = 0; protocolEncodingName[i]; i++) { if (i == sizeof(encodingBuf) - 1 || (protocolEncodingName[i] & ~0x7f) != 0) { encodingBuf[0] = '\0'; break; } encodingBuf[i] = (char)protocolEncodingName[i]; } encodingBuf[i] = '\0'; s = encodingBuf; } #else s = protocolEncodingName; #endif if ((ns ? XmlInitEncodingNS : XmlInitEncoding)(&initEncoding, &encoding, s)) return XML_ERROR_NONE; return handleUnknownEncoding(parser, protocolEncodingName); } static enum XML_Error processXmlDecl(XML_Parser parser, int isGeneralTextEntity, const char *s, const char *next) { const char *encodingName = NULL; const XML_Char *storedEncName = NULL; const ENCODING *newEncoding = NULL; const char *version = NULL; const char *versionend; const XML_Char *storedversion = NULL; int standalone = -1; if (!(ns ? XmlParseXmlDeclNS : XmlParseXmlDecl)(isGeneralTextEntity, encoding, s, next, &eventPtr, &version, &versionend, &encodingName, &newEncoding, &standalone)) return XML_ERROR_SYNTAX; if (!isGeneralTextEntity && standalone == 1) { _dtd->standalone = XML_TRUE; #ifdef XML_DTD if (paramEntityParsing == XML_PARAM_ENTITY_PARSING_UNLESS_STANDALONE) paramEntityParsing = XML_PARAM_ENTITY_PARSING_NEVER; #endif /* XML_DTD */ } if (xmlDeclHandler) { if (encodingName != NULL) { storedEncName = poolStoreString(&temp2Pool, encoding, encodingName, encodingName + XmlNameLength(encoding, encodingName)); if (!storedEncName) return XML_ERROR_NO_MEMORY; poolFinish(&temp2Pool); } if (version) { storedversion = poolStoreString(&temp2Pool, encoding, version, versionend - encoding->minBytesPerChar); if (!storedversion) return XML_ERROR_NO_MEMORY; } xmlDeclHandler(handlerArg, storedversion, storedEncName, standalone); } else if (defaultHandler) reportDefault(parser, encoding, s, next); if (protocolEncodingName == NULL) { if (newEncoding) { if (newEncoding->minBytesPerChar != encoding->minBytesPerChar) { eventPtr = encodingName; return XML_ERROR_INCORRECT_ENCODING; } encoding = newEncoding; } else if (encodingName) { enum XML_Error result; if (!storedEncName) { storedEncName = poolStoreString( &temp2Pool, encoding, encodingName, encodingName + XmlNameLength(encoding, encodingName)); if (!storedEncName) return XML_ERROR_NO_MEMORY; } result = handleUnknownEncoding(parser, storedEncName); poolClear(&temp2Pool); if (result == XML_ERROR_UNKNOWN_ENCODING) eventPtr = encodingName; return result; } } if (storedEncName || storedversion) poolClear(&temp2Pool); return XML_ERROR_NONE; } static enum XML_Error handleUnknownEncoding(XML_Parser parser, const XML_Char *encodingName) { if (unknownEncodingHandler) { XML_Encoding info; int i; for (i = 0; i < 256; i++) info.map[i] = -1; info.convert = NULL; info.data = NULL; info.release = NULL; if (unknownEncodingHandler(unknownEncodingHandlerData, encodingName, &info)) { ENCODING *enc; unknownEncodingMem = MALLOC(XmlSizeOfUnknownEncoding()); if (!unknownEncodingMem) { if (info.release) info.release(info.data); return XML_ERROR_NO_MEMORY; } enc = (ns ? XmlInitUnknownEncodingNS : XmlInitUnknownEncoding)(unknownEncodingMem, info.map, info.convert, info.data); if (enc) { unknownEncodingData = info.data; unknownEncodingRelease = info.release; encoding = enc; return XML_ERROR_NONE; } } if (info.release != NULL) info.release(info.data); } return XML_ERROR_UNKNOWN_ENCODING; } static enum XML_Error PTRCALL prologInitProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { enum XML_Error result = initializeEncoding(parser); if (result != XML_ERROR_NONE) return result; processor = prologProcessor; return prologProcessor(parser, s, end, nextPtr); } #ifdef XML_DTD static enum XML_Error PTRCALL externalParEntInitProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { enum XML_Error result = initializeEncoding(parser); if (result != XML_ERROR_NONE) return result; /* we know now that XML_Parse(Buffer) has been called, so we consider the external parameter entity read */ _dtd->paramEntityRead = XML_TRUE; if (prologState.inEntityValue) { processor = entityValueInitProcessor; return entityValueInitProcessor(parser, s, end, nextPtr); } else { processor = externalParEntProcessor; return externalParEntProcessor(parser, s, end, nextPtr); } } static enum XML_Error PTRCALL entityValueInitProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { const char *start = s; const char *next = s; int tok; for (;;) { tok = XmlPrologTok(encoding, start, end, &next); if (tok <= 0) { if (nextPtr != 0 && tok != XML_TOK_INVALID) { *nextPtr = s; return XML_ERROR_NONE; } switch (tok) { case XML_TOK_INVALID: return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL: return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: return XML_ERROR_PARTIAL_CHAR; case XML_TOK_NONE: /* start == end */ default: break; } return storeEntityValue(parser, encoding, s, end); } else if (tok == XML_TOK_XML_DECL) { enum XML_Error result = processXmlDecl(parser, 0, start, next); if (result != XML_ERROR_NONE) return result; if (nextPtr) *nextPtr = next; /* stop scanning for text declaration - we found one */ processor = entityValueProcessor; return entityValueProcessor(parser, next, end, nextPtr); } /* If we are at the end of the buffer, this would cause XmlPrologTok to return XML_TOK_NONE on the next call, which would then cause the function to exit with *nextPtr set to s - that is what we want for other tokens, but not for the BOM - we would rather like to skip it; then, when this routine is entered the next time, XmlPrologTok will return XML_TOK_INVALID, since the BOM is still in the buffer */ else if (tok == XML_TOK_BOM && next == end && nextPtr) { *nextPtr = next; return XML_ERROR_NONE; } start = next; } } static enum XML_Error PTRCALL externalParEntProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { const char *start = s; const char *next = s; int tok; tok = XmlPrologTok(encoding, start, end, &next); if (tok <= 0) { if (nextPtr != 0 && tok != XML_TOK_INVALID) { *nextPtr = s; return XML_ERROR_NONE; } switch (tok) { case XML_TOK_INVALID: return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL: return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: return XML_ERROR_PARTIAL_CHAR; case XML_TOK_NONE: /* start == end */ default: break; } } /* This would cause the next stage, i.e. doProlog to be passed XML_TOK_BOM. However, when parsing an external subset, doProlog will not accept a BOM as valid, and report a syntax error, so we have to skip the BOM */ else if (tok == XML_TOK_BOM) { s = next; tok = XmlPrologTok(encoding, s, end, &next); } processor = prologProcessor; return doProlog(parser, encoding, s, end, tok, next, nextPtr); } static enum XML_Error PTRCALL entityValueProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { const char *start = s; const char *next = s; const ENCODING *enc = encoding; int tok; for (;;) { tok = XmlPrologTok(enc, start, end, &next); if (tok <= 0) { if (nextPtr != 0 && tok != XML_TOK_INVALID) { *nextPtr = s; return XML_ERROR_NONE; } switch (tok) { case XML_TOK_INVALID: return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL: return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: return XML_ERROR_PARTIAL_CHAR; case XML_TOK_NONE: /* start == end */ default: break; } return storeEntityValue(parser, enc, s, end); } start = next; } } #endif /* XML_DTD */ static enum XML_Error PTRCALL prologProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { const char *next = s; int tok = XmlPrologTok(encoding, s, end, &next); return doProlog(parser, encoding, s, end, tok, next, nextPtr); } static enum XML_Error doProlog(XML_Parser parser, const ENCODING *enc, const char *s, const char *end, int tok, const char *next, const char **nextPtr) { #ifdef XML_DTD static const XML_Char externalSubsetName[] = { '#' , '\0' }; #endif /* XML_DTD */ static const XML_Char atypeCDATA[] = { 'C', 'D', 'A', 'T', 'A', '\0' }; static const XML_Char atypeID[] = { 'I', 'D', '\0' }; static const XML_Char atypeIDREF[] = { 'I', 'D', 'R', 'E', 'F', '\0' }; static const XML_Char atypeIDREFS[] = { 'I', 'D', 'R', 'E', 'F', 'S', '\0' }; static const XML_Char atypeENTITY[] = { 'E', 'N', 'T', 'I', 'T', 'Y', '\0' }; static const XML_Char atypeENTITIES[] = { 'E', 'N', 'T', 'I', 'T', 'I', 'E', 'S', '\0' }; static const XML_Char atypeNMTOKEN[] = { 'N', 'M', 'T', 'O', 'K', 'E', 'N', '\0' }; static const XML_Char atypeNMTOKENS[] = { 'N', 'M', 'T', 'O', 'K', 'E', 'N', 'S', '\0' }; static const XML_Char notationPrefix[] = { 'N', 'O', 'T', 'A', 'T', 'I', 'O', 'N', '(', '\0' }; static const XML_Char enumValueSep[] = { '|', '\0' }; static const XML_Char enumValueStart[] = { '(', '\0' }; DTD * const dtd = _dtd; /* save one level of indirection */ const char **eventPP; const char **eventEndPP; enum XML_Content_Quant quant; if (enc == encoding) { eventPP = &eventPtr; eventEndPP = &eventEndPtr; } else { eventPP = &(openInternalEntities->internalEventPtr); eventEndPP = &(openInternalEntities->internalEventEndPtr); } for (;;) { int role; XML_Bool handleDefault = XML_TRUE; *eventPP = s; *eventEndPP = next; if (tok <= 0) { if (nextPtr != 0 && tok != XML_TOK_INVALID) { *nextPtr = s; return XML_ERROR_NONE; } switch (tok) { case XML_TOK_INVALID: *eventPP = next; return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL: return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: return XML_ERROR_PARTIAL_CHAR; case XML_TOK_NONE: #ifdef XML_DTD if (enc != encoding) return XML_ERROR_NONE; if (isParamEntity) { if (XmlTokenRole(&prologState, XML_TOK_NONE, end, end, enc) == XML_ROLE_ERROR) return XML_ERROR_SYNTAX; return XML_ERROR_NONE; } #endif /* XML_DTD */ return XML_ERROR_NO_ELEMENTS; default: tok = -tok; next = end; break; } } role = XmlTokenRole(&prologState, tok, s, next, enc); switch (role) { case XML_ROLE_XML_DECL: { enum XML_Error result = processXmlDecl(parser, 0, s, next); if (result != XML_ERROR_NONE) return result; enc = encoding; handleDefault = XML_FALSE; } break; case XML_ROLE_DOCTYPE_NAME: if (startDoctypeDeclHandler) { doctypeName = poolStoreString(&tempPool, enc, s, next); if (!doctypeName) return XML_ERROR_NO_MEMORY; poolFinish(&tempPool); doctypePubid = NULL; handleDefault = XML_FALSE; } doctypeSysid = NULL; /* always initialize to NULL */ break; case XML_ROLE_DOCTYPE_INTERNAL_SUBSET: if (startDoctypeDeclHandler) { startDoctypeDeclHandler(handlerArg, doctypeName, doctypeSysid, doctypePubid, 1); doctypeName = NULL; poolClear(&tempPool); handleDefault = XML_FALSE; } break; #ifdef XML_DTD case XML_ROLE_TEXT_DECL: { enum XML_Error result = processXmlDecl(parser, 1, s, next); if (result != XML_ERROR_NONE) return result; enc = encoding; handleDefault = XML_FALSE; } break; #endif /* XML_DTD */ case XML_ROLE_DOCTYPE_PUBLIC_ID: #ifdef XML_DTD useForeignDTD = XML_FALSE; #endif /* XML_DTD */ dtd->hasParamEntityRefs = XML_TRUE; if (startDoctypeDeclHandler) { doctypePubid = poolStoreString(&tempPool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!doctypePubid) return XML_ERROR_NO_MEMORY; poolFinish(&tempPool); handleDefault = XML_FALSE; } #ifdef XML_DTD declEntity = (ENTITY *)lookup(&dtd->paramEntities, externalSubsetName, sizeof(ENTITY)); if (!declEntity) return XML_ERROR_NO_MEMORY; #endif /* XML_DTD */ /* fall through */ case XML_ROLE_ENTITY_PUBLIC_ID: if (!XmlIsPublicId(enc, s, next, eventPP)) return XML_ERROR_SYNTAX; if (dtd->keepProcessing && declEntity) { XML_Char *tem = poolStoreString(&dtd->pool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!tem) return XML_ERROR_NO_MEMORY; normalizePublicId(tem); declEntity->publicId = tem; poolFinish(&dtd->pool); if (entityDeclHandler) handleDefault = XML_FALSE; } break; case XML_ROLE_DOCTYPE_CLOSE: if (doctypeName) { startDoctypeDeclHandler(handlerArg, doctypeName, doctypeSysid, doctypePubid, 0); poolClear(&tempPool); handleDefault = XML_FALSE; } /* doctypeSysid will be non-NULL in the case of a previous XML_ROLE_DOCTYPE_SYSTEM_ID, even if startDoctypeDeclHandler was not set, indicating an external subset */ #ifdef XML_DTD if (doctypeSysid || useForeignDTD) { dtd->hasParamEntityRefs = XML_TRUE; /* when docTypeSysid == NULL */ if (paramEntityParsing && externalEntityRefHandler) { ENTITY *entity = (ENTITY *)lookup(&dtd->paramEntities, externalSubsetName, sizeof(ENTITY)); if (!entity) return XML_ERROR_NO_MEMORY; if (useForeignDTD) entity->base = curBase; dtd->paramEntityRead = XML_FALSE; if (!externalEntityRefHandler(externalEntityRefHandlerArg, 0, entity->base, entity->systemId, entity->publicId)) return XML_ERROR_EXTERNAL_ENTITY_HANDLING; if (dtd->paramEntityRead && !dtd->standalone && notStandaloneHandler && !notStandaloneHandler(handlerArg)) return XML_ERROR_NOT_STANDALONE; /* end of DTD - no need to update dtd->keepProcessing */ } useForeignDTD = XML_FALSE; } #endif /* XML_DTD */ if (endDoctypeDeclHandler) { endDoctypeDeclHandler(handlerArg); handleDefault = XML_FALSE; } break; case XML_ROLE_INSTANCE_START: #ifdef XML_DTD /* if there is no DOCTYPE declaration then now is the last chance to read the foreign DTD */ if (useForeignDTD) { dtd->hasParamEntityRefs = XML_TRUE; if (paramEntityParsing && externalEntityRefHandler) { ENTITY *entity = (ENTITY *)lookup(&dtd->paramEntities, externalSubsetName, sizeof(ENTITY)); if (!entity) return XML_ERROR_NO_MEMORY; entity->base = curBase; dtd->paramEntityRead = XML_FALSE; if (!externalEntityRefHandler(externalEntityRefHandlerArg, 0, entity->base, entity->systemId, entity->publicId)) return XML_ERROR_EXTERNAL_ENTITY_HANDLING; if (dtd->paramEntityRead && !dtd->standalone && notStandaloneHandler && !notStandaloneHandler(handlerArg)) return XML_ERROR_NOT_STANDALONE; /* end of DTD - no need to update dtd->keepProcessing */ } } #endif /* XML_DTD */ processor = contentProcessor; return contentProcessor(parser, s, end, nextPtr); case XML_ROLE_ATTLIST_ELEMENT_NAME: declElementType = getElementType(parser, enc, s, next); if (!declElementType) return XML_ERROR_NO_MEMORY; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_NAME: declAttributeId = getAttributeId(parser, enc, s, next); if (!declAttributeId) return XML_ERROR_NO_MEMORY; declAttributeIsCdata = XML_FALSE; declAttributeType = NULL; declAttributeIsId = XML_FALSE; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_CDATA: declAttributeIsCdata = XML_TRUE; declAttributeType = atypeCDATA; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_ID: declAttributeIsId = XML_TRUE; declAttributeType = atypeID; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_IDREF: declAttributeType = atypeIDREF; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_IDREFS: declAttributeType = atypeIDREFS; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_ENTITY: declAttributeType = atypeENTITY; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_ENTITIES: declAttributeType = atypeENTITIES; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_NMTOKEN: declAttributeType = atypeNMTOKEN; goto checkAttListDeclHandler; case XML_ROLE_ATTRIBUTE_TYPE_NMTOKENS: declAttributeType = atypeNMTOKENS; checkAttListDeclHandler: if (dtd->keepProcessing && attlistDeclHandler) handleDefault = XML_FALSE; break; case XML_ROLE_ATTRIBUTE_ENUM_VALUE: case XML_ROLE_ATTRIBUTE_NOTATION_VALUE: if (dtd->keepProcessing && attlistDeclHandler) { const XML_Char *prefix; if (declAttributeType) { prefix = enumValueSep; } else { prefix = (role == XML_ROLE_ATTRIBUTE_NOTATION_VALUE ? notationPrefix : enumValueStart); } if (!poolAppendString(&tempPool, prefix)) return XML_ERROR_NO_MEMORY; if (!poolAppend(&tempPool, enc, s, next)) return XML_ERROR_NO_MEMORY; declAttributeType = tempPool.start; handleDefault = XML_FALSE; } break; case XML_ROLE_IMPLIED_ATTRIBUTE_VALUE: case XML_ROLE_REQUIRED_ATTRIBUTE_VALUE: if (dtd->keepProcessing) { if (!defineAttribute(declElementType, declAttributeId, declAttributeIsCdata, declAttributeIsId, 0, parser)) return XML_ERROR_NO_MEMORY; if (attlistDeclHandler && declAttributeType) { if (*declAttributeType == XML_T('(') || (*declAttributeType == XML_T('N') && declAttributeType[1] == XML_T('O'))) { /* Enumerated or Notation type */ if (!poolAppendChar(&tempPool, XML_T(')')) || !poolAppendChar(&tempPool, XML_T('\0'))) return XML_ERROR_NO_MEMORY; declAttributeType = tempPool.start; poolFinish(&tempPool); } *eventEndPP = s; attlistDeclHandler(handlerArg, declElementType->name, declAttributeId->name, declAttributeType, 0, role == XML_ROLE_REQUIRED_ATTRIBUTE_VALUE); poolClear(&tempPool); handleDefault = XML_FALSE; } } break; case XML_ROLE_DEFAULT_ATTRIBUTE_VALUE: case XML_ROLE_FIXED_ATTRIBUTE_VALUE: if (dtd->keepProcessing) { const XML_Char *attVal; enum XML_Error result = storeAttributeValue(parser, enc, declAttributeIsCdata, s + enc->minBytesPerChar, next - enc->minBytesPerChar, &dtd->pool); if (result) return result; attVal = poolStart(&dtd->pool); poolFinish(&dtd->pool); /* ID attributes aren't allowed to have a default */ if (!defineAttribute(declElementType, declAttributeId, declAttributeIsCdata, XML_FALSE, attVal, parser)) return XML_ERROR_NO_MEMORY; if (attlistDeclHandler && declAttributeType) { if (*declAttributeType == XML_T('(') || (*declAttributeType == XML_T('N') && declAttributeType[1] == XML_T('O'))) { /* Enumerated or Notation type */ if (!poolAppendChar(&tempPool, XML_T(')')) || !poolAppendChar(&tempPool, XML_T('\0'))) return XML_ERROR_NO_MEMORY; declAttributeType = tempPool.start; poolFinish(&tempPool); } *eventEndPP = s; attlistDeclHandler(handlerArg, declElementType->name, declAttributeId->name, declAttributeType, attVal, role == XML_ROLE_FIXED_ATTRIBUTE_VALUE); poolClear(&tempPool); handleDefault = XML_FALSE; } } break; case XML_ROLE_ENTITY_VALUE: if (dtd->keepProcessing) { enum XML_Error result = storeEntityValue(parser, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (declEntity) { declEntity->textPtr = poolStart(&dtd->entityValuePool); declEntity->textLen = poolLength(&dtd->entityValuePool); poolFinish(&dtd->entityValuePool); if (entityDeclHandler) { *eventEndPP = s; entityDeclHandler(handlerArg, declEntity->name, declEntity->is_param, declEntity->textPtr, declEntity->textLen, curBase, 0, 0, 0); handleDefault = XML_FALSE; } } else poolDiscard(&dtd->entityValuePool); if (result != XML_ERROR_NONE) return result; } break; case XML_ROLE_DOCTYPE_SYSTEM_ID: #ifdef XML_DTD useForeignDTD = XML_FALSE; #endif /* XML_DTD */ dtd->hasParamEntityRefs = XML_TRUE; if (startDoctypeDeclHandler) { doctypeSysid = poolStoreString(&tempPool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (doctypeSysid == NULL) return XML_ERROR_NO_MEMORY; poolFinish(&tempPool); handleDefault = XML_FALSE; } #ifdef XML_DTD else /* use externalSubsetName to make doctypeSysid non-NULL for the case where no startDoctypeDeclHandler is set */ doctypeSysid = externalSubsetName; #endif /* XML_DTD */ if (!dtd->standalone #ifdef XML_DTD && !paramEntityParsing #endif /* XML_DTD */ && notStandaloneHandler && !notStandaloneHandler(handlerArg)) return XML_ERROR_NOT_STANDALONE; #ifndef XML_DTD break; #else /* XML_DTD */ if (!declEntity) { declEntity = (ENTITY *)lookup(&dtd->paramEntities, externalSubsetName, sizeof(ENTITY)); if (!declEntity) return XML_ERROR_NO_MEMORY; declEntity->publicId = NULL; } /* fall through */ #endif /* XML_DTD */ case XML_ROLE_ENTITY_SYSTEM_ID: if (dtd->keepProcessing && declEntity) { declEntity->systemId = poolStoreString(&dtd->pool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!declEntity->systemId) return XML_ERROR_NO_MEMORY; declEntity->base = curBase; poolFinish(&dtd->pool); if (entityDeclHandler) handleDefault = XML_FALSE; } break; case XML_ROLE_ENTITY_COMPLETE: if (dtd->keepProcessing && declEntity && entityDeclHandler) { *eventEndPP = s; entityDeclHandler(handlerArg, declEntity->name, declEntity->is_param, 0,0, declEntity->base, declEntity->systemId, declEntity->publicId, 0); handleDefault = XML_FALSE; } break; case XML_ROLE_ENTITY_NOTATION_NAME: if (dtd->keepProcessing && declEntity) { declEntity->notation = poolStoreString(&dtd->pool, enc, s, next); if (!declEntity->notation) return XML_ERROR_NO_MEMORY; poolFinish(&dtd->pool); if (unparsedEntityDeclHandler) { *eventEndPP = s; unparsedEntityDeclHandler(handlerArg, declEntity->name, declEntity->base, declEntity->systemId, declEntity->publicId, declEntity->notation); handleDefault = XML_FALSE; } else if (entityDeclHandler) { *eventEndPP = s; entityDeclHandler(handlerArg, declEntity->name, 0,0,0, declEntity->base, declEntity->systemId, declEntity->publicId, declEntity->notation); handleDefault = XML_FALSE; } } break; case XML_ROLE_GENERAL_ENTITY_NAME: { if (XmlPredefinedEntityName(enc, s, next)) { declEntity = NULL; break; } if (dtd->keepProcessing) { const XML_Char *name = poolStoreString(&dtd->pool, enc, s, next); if (!name) return XML_ERROR_NO_MEMORY; declEntity = (ENTITY *)lookup(&dtd->generalEntities, name, sizeof(ENTITY)); if (!declEntity) return XML_ERROR_NO_MEMORY; if (declEntity->name != name) { poolDiscard(&dtd->pool); declEntity = NULL; } else { poolFinish(&dtd->pool); declEntity->publicId = NULL; declEntity->is_param = XML_FALSE; /* if we have a parent parser or are reading an internal parameter entity, then the entity declaration is not considered "internal" */ declEntity->is_internal = !(parentParser || openInternalEntities); if (entityDeclHandler) handleDefault = XML_FALSE; } } else { poolDiscard(&dtd->pool); declEntity = NULL; } } break; case XML_ROLE_PARAM_ENTITY_NAME: #ifdef XML_DTD if (dtd->keepProcessing) { const XML_Char *name = poolStoreString(&dtd->pool, enc, s, next); if (!name) return XML_ERROR_NO_MEMORY; declEntity = (ENTITY *)lookup(&dtd->paramEntities, name, sizeof(ENTITY)); if (!declEntity) return XML_ERROR_NO_MEMORY; if (declEntity->name != name) { poolDiscard(&dtd->pool); declEntity = NULL; } else { poolFinish(&dtd->pool); declEntity->publicId = NULL; declEntity->is_param = XML_TRUE; /* if we have a parent parser or are reading an internal parameter entity, then the entity declaration is not considered "internal" */ declEntity->is_internal = !(parentParser || openInternalEntities); if (entityDeclHandler) handleDefault = XML_FALSE; } } else { poolDiscard(&dtd->pool); declEntity = NULL; } #else /* not XML_DTD */ declEntity = NULL; #endif /* XML_DTD */ break; case XML_ROLE_NOTATION_NAME: declNotationPublicId = NULL; declNotationName = NULL; if (notationDeclHandler) { declNotationName = poolStoreString(&tempPool, enc, s, next); if (!declNotationName) return XML_ERROR_NO_MEMORY; poolFinish(&tempPool); handleDefault = XML_FALSE; } break; case XML_ROLE_NOTATION_PUBLIC_ID: if (!XmlIsPublicId(enc, s, next, eventPP)) return XML_ERROR_SYNTAX; if (declNotationName) { /* means notationDeclHandler != NULL */ XML_Char *tem = poolStoreString(&tempPool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!tem) return XML_ERROR_NO_MEMORY; normalizePublicId(tem); declNotationPublicId = tem; poolFinish(&tempPool); handleDefault = XML_FALSE; } break; case XML_ROLE_NOTATION_SYSTEM_ID: if (declNotationName && notationDeclHandler) { const XML_Char *systemId = poolStoreString(&tempPool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!systemId) return XML_ERROR_NO_MEMORY; *eventEndPP = s; notationDeclHandler(handlerArg, declNotationName, curBase, systemId, declNotationPublicId); handleDefault = XML_FALSE; } poolClear(&tempPool); break; case XML_ROLE_NOTATION_NO_SYSTEM_ID: if (declNotationPublicId && notationDeclHandler) { *eventEndPP = s; notationDeclHandler(handlerArg, declNotationName, curBase, 0, declNotationPublicId); handleDefault = XML_FALSE; } poolClear(&tempPool); break; case XML_ROLE_ERROR: switch (tok) { case XML_TOK_PARAM_ENTITY_REF: return XML_ERROR_PARAM_ENTITY_REF; case XML_TOK_XML_DECL: return XML_ERROR_MISPLACED_XML_PI; default: return XML_ERROR_SYNTAX; } #ifdef XML_DTD case XML_ROLE_IGNORE_SECT: { enum XML_Error result; if (defaultHandler) reportDefault(parser, enc, s, next); handleDefault = XML_FALSE; result = doIgnoreSection(parser, enc, &next, end, nextPtr); if (!next) { processor = ignoreSectionProcessor; return result; } } break; #endif /* XML_DTD */ case XML_ROLE_GROUP_OPEN: if (prologState.level >= groupSize) { if (groupSize) { char *temp = (char *)REALLOC(groupConnector, groupSize *= 2); if (temp == NULL) return XML_ERROR_NO_MEMORY; groupConnector = temp; if (dtd->scaffIndex) { int *temp = (int *)REALLOC(dtd->scaffIndex, groupSize * sizeof(int)); if (temp == NULL) return XML_ERROR_NO_MEMORY; dtd->scaffIndex = temp; } } else { groupConnector = (char *)MALLOC(groupSize = 32); if (!groupConnector) return XML_ERROR_NO_MEMORY; } } groupConnector[prologState.level] = 0; if (dtd->in_eldecl) { int myindex = nextScaffoldPart(parser); if (myindex < 0) return XML_ERROR_NO_MEMORY; dtd->scaffIndex[dtd->scaffLevel] = myindex; dtd->scaffLevel++; dtd->scaffold[myindex].type = XML_CTYPE_SEQ; if (elementDeclHandler) handleDefault = XML_FALSE; } break; case XML_ROLE_GROUP_SEQUENCE: if (groupConnector[prologState.level] == '|') return XML_ERROR_SYNTAX; groupConnector[prologState.level] = ','; if (dtd->in_eldecl && elementDeclHandler) handleDefault = XML_FALSE; break; case XML_ROLE_GROUP_CHOICE: if (groupConnector[prologState.level] == ',') return XML_ERROR_SYNTAX; if (dtd->in_eldecl && !groupConnector[prologState.level] && (dtd->scaffold[dtd->scaffIndex[dtd->scaffLevel - 1]].type != XML_CTYPE_MIXED) ) { dtd->scaffold[dtd->scaffIndex[dtd->scaffLevel - 1]].type = XML_CTYPE_CHOICE; if (elementDeclHandler) handleDefault = XML_FALSE; } groupConnector[prologState.level] = '|'; break; case XML_ROLE_PARAM_ENTITY_REF: #ifdef XML_DTD case XML_ROLE_INNER_PARAM_ENTITY_REF: /* PE references in internal subset are not allowed within declarations */ if (prologState.documentEntity && role == XML_ROLE_INNER_PARAM_ENTITY_REF) return XML_ERROR_PARAM_ENTITY_REF; dtd->hasParamEntityRefs = XML_TRUE; if (!paramEntityParsing) dtd->keepProcessing = dtd->standalone; else { const XML_Char *name; ENTITY *entity; name = poolStoreString(&dtd->pool, enc, s + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!name) return XML_ERROR_NO_MEMORY; entity = (ENTITY *)lookup(&dtd->paramEntities, name, 0); poolDiscard(&dtd->pool); /* first, determine if a check for an existing declaration is needed; if yes, check that the entity exists, and that it is internal, otherwise call the skipped entity handler */ if (prologState.documentEntity && (dtd->standalone ? !openInternalEntities : !dtd->hasParamEntityRefs)) { if (!entity) return XML_ERROR_UNDEFINED_ENTITY; else if (!entity->is_internal) return XML_ERROR_ENTITY_DECLARED_IN_PE; } else if (!entity) { dtd->keepProcessing = dtd->standalone; /* cannot report skipped entities in declarations */ if ((role == XML_ROLE_PARAM_ENTITY_REF) && skippedEntityHandler) { skippedEntityHandler(handlerArg, name, 1); handleDefault = XML_FALSE; } break; } if (entity->open) return XML_ERROR_RECURSIVE_ENTITY_REF; if (entity->textPtr) { enum XML_Error result; result = processInternalParamEntity(parser, entity); if (result != XML_ERROR_NONE) return result; handleDefault = XML_FALSE; break; } if (externalEntityRefHandler) { dtd->paramEntityRead = XML_FALSE; entity->open = XML_TRUE; if (!externalEntityRefHandler(externalEntityRefHandlerArg, 0, entity->base, entity->systemId, entity->publicId)) { entity->open = XML_FALSE; return XML_ERROR_EXTERNAL_ENTITY_HANDLING; } entity->open = XML_FALSE; handleDefault = XML_FALSE; if (!dtd->paramEntityRead) { dtd->keepProcessing = dtd->standalone; break; } } else { dtd->keepProcessing = dtd->standalone; break; } } #endif /* XML_DTD */ if (!dtd->standalone && notStandaloneHandler && !notStandaloneHandler(handlerArg)) return XML_ERROR_NOT_STANDALONE; break; /* Element declaration stuff */ case XML_ROLE_ELEMENT_NAME: if (elementDeclHandler) { declElementType = getElementType(parser, enc, s, next); if (!declElementType) return XML_ERROR_NO_MEMORY; dtd->scaffLevel = 0; dtd->scaffCount = 0; dtd->in_eldecl = XML_TRUE; handleDefault = XML_FALSE; } break; case XML_ROLE_CONTENT_ANY: case XML_ROLE_CONTENT_EMPTY: if (dtd->in_eldecl) { if (elementDeclHandler) { XML_Content * content = (XML_Content *) MALLOC(sizeof(XML_Content)); if (!content) return XML_ERROR_NO_MEMORY; content->quant = XML_CQUANT_NONE; content->name = NULL; content->numchildren = 0; content->children = NULL; content->type = ((role == XML_ROLE_CONTENT_ANY) ? XML_CTYPE_ANY : XML_CTYPE_EMPTY); *eventEndPP = s; elementDeclHandler(handlerArg, declElementType->name, content); handleDefault = XML_FALSE; } dtd->in_eldecl = XML_FALSE; } break; case XML_ROLE_CONTENT_PCDATA: if (dtd->in_eldecl) { dtd->scaffold[dtd->scaffIndex[dtd->scaffLevel - 1]].type = XML_CTYPE_MIXED; if (elementDeclHandler) handleDefault = XML_FALSE; } break; case XML_ROLE_CONTENT_ELEMENT: quant = XML_CQUANT_NONE; goto elementContent; case XML_ROLE_CONTENT_ELEMENT_OPT: quant = XML_CQUANT_OPT; goto elementContent; case XML_ROLE_CONTENT_ELEMENT_REP: quant = XML_CQUANT_REP; goto elementContent; case XML_ROLE_CONTENT_ELEMENT_PLUS: quant = XML_CQUANT_PLUS; elementContent: if (dtd->in_eldecl) { ELEMENT_TYPE *el; const XML_Char *name; int nameLen; const char *nxt = (quant == XML_CQUANT_NONE ? next : next - enc->minBytesPerChar); int myindex = nextScaffoldPart(parser); if (myindex < 0) return XML_ERROR_NO_MEMORY; dtd->scaffold[myindex].type = XML_CTYPE_NAME; dtd->scaffold[myindex].quant = quant; el = getElementType(parser, enc, s, nxt); if (!el) return XML_ERROR_NO_MEMORY; name = el->name; dtd->scaffold[myindex].name = name; nameLen = 0; for (; name[nameLen++]; ); dtd->contentStringLen += nameLen; if (elementDeclHandler) handleDefault = XML_FALSE; } break; case XML_ROLE_GROUP_CLOSE: quant = XML_CQUANT_NONE; goto closeGroup; case XML_ROLE_GROUP_CLOSE_OPT: quant = XML_CQUANT_OPT; goto closeGroup; case XML_ROLE_GROUP_CLOSE_REP: quant = XML_CQUANT_REP; goto closeGroup; case XML_ROLE_GROUP_CLOSE_PLUS: quant = XML_CQUANT_PLUS; closeGroup: if (dtd->in_eldecl) { if (elementDeclHandler) handleDefault = XML_FALSE; dtd->scaffLevel--; dtd->scaffold[dtd->scaffIndex[dtd->scaffLevel]].quant = quant; if (dtd->scaffLevel == 0) { if (!handleDefault) { XML_Content *model = build_model(parser); if (!model) return XML_ERROR_NO_MEMORY; *eventEndPP = s; elementDeclHandler(handlerArg, declElementType->name, model); } dtd->in_eldecl = XML_FALSE; dtd->contentStringLen = 0; } } break; /* End element declaration stuff */ case XML_ROLE_PI: if (!reportProcessingInstruction(parser, enc, s, next)) return XML_ERROR_NO_MEMORY; handleDefault = XML_FALSE; break; case XML_ROLE_COMMENT: if (!reportComment(parser, enc, s, next)) return XML_ERROR_NO_MEMORY; handleDefault = XML_FALSE; break; case XML_ROLE_NONE: switch (tok) { case XML_TOK_BOM: handleDefault = XML_FALSE; break; } break; case XML_ROLE_DOCTYPE_NONE: if (startDoctypeDeclHandler) handleDefault = XML_FALSE; break; case XML_ROLE_ENTITY_NONE: if (dtd->keepProcessing && entityDeclHandler) handleDefault = XML_FALSE; break; case XML_ROLE_NOTATION_NONE: if (notationDeclHandler) handleDefault = XML_FALSE; break; case XML_ROLE_ATTLIST_NONE: if (dtd->keepProcessing && attlistDeclHandler) handleDefault = XML_FALSE; break; case XML_ROLE_ELEMENT_NONE: if (elementDeclHandler) handleDefault = XML_FALSE; break; } /* end of big switch */ if (handleDefault && defaultHandler) reportDefault(parser, enc, s, next); s = next; tok = XmlPrologTok(enc, s, end, &next); } /* not reached */ } static enum XML_Error PTRCALL epilogProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { processor = epilogProcessor; eventPtr = s; for (;;) { const char *next = NULL; int tok = XmlPrologTok(encoding, s, end, &next); eventEndPtr = next; switch (tok) { /* report partial linebreak - it might be the last token */ case -XML_TOK_PROLOG_S: if (defaultHandler) { eventEndPtr = next; reportDefault(parser, encoding, s, next); } if (nextPtr) *nextPtr = next; return XML_ERROR_NONE; case XML_TOK_NONE: if (nextPtr) *nextPtr = s; return XML_ERROR_NONE; case XML_TOK_PROLOG_S: if (defaultHandler) reportDefault(parser, encoding, s, next); break; case XML_TOK_PI: if (!reportProcessingInstruction(parser, encoding, s, next)) return XML_ERROR_NO_MEMORY; break; case XML_TOK_COMMENT: if (!reportComment(parser, encoding, s, next)) return XML_ERROR_NO_MEMORY; break; case XML_TOK_INVALID: eventPtr = next; return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_UNCLOSED_TOKEN; case XML_TOK_PARTIAL_CHAR: if (nextPtr) { *nextPtr = s; return XML_ERROR_NONE; } return XML_ERROR_PARTIAL_CHAR; default: return XML_ERROR_JUNK_AFTER_DOC_ELEMENT; } eventPtr = s = next; } } #ifdef XML_DTD static enum XML_Error processInternalParamEntity(XML_Parser parser, ENTITY *entity) { const char *s, *end, *next; int tok; enum XML_Error result; OPEN_INTERNAL_ENTITY openEntity; entity->open = XML_TRUE; openEntity.next = openInternalEntities; openInternalEntities = &openEntity; openEntity.entity = entity; openEntity.internalEventPtr = NULL; openEntity.internalEventEndPtr = NULL; s = (char *)entity->textPtr; end = (char *)(entity->textPtr + entity->textLen); tok = XmlPrologTok(internalEncoding, s, end, &next); result = doProlog(parser, internalEncoding, s, end, tok, next, 0); entity->open = XML_FALSE; openInternalEntities = openEntity.next; return result; } #endif /* XML_DTD */ static enum XML_Error PTRCALL errorProcessor(XML_Parser parser, const char *s, const char *end, const char **nextPtr) { return errorCode; } static enum XML_Error storeAttributeValue(XML_Parser parser, const ENCODING *enc, XML_Bool isCdata, const char *ptr, const char *end, STRING_POOL *pool) { enum XML_Error result = appendAttributeValue(parser, enc, isCdata, ptr, end, pool); if (result) return result; if (!isCdata && poolLength(pool) && poolLastChar(pool) == 0x20) poolChop(pool); if (!poolAppendChar(pool, XML_T('\0'))) return XML_ERROR_NO_MEMORY; return XML_ERROR_NONE; } static enum XML_Error appendAttributeValue(XML_Parser parser, const ENCODING *enc, XML_Bool isCdata, const char *ptr, const char *end, STRING_POOL *pool) { DTD * const dtd = _dtd; /* save one level of indirection */ for (;;) { const char *next; int tok = XmlAttributeValueTok(enc, ptr, end, &next); switch (tok) { case XML_TOK_NONE: return XML_ERROR_NONE; case XML_TOK_INVALID: if (enc == encoding) eventPtr = next; return XML_ERROR_INVALID_TOKEN; case XML_TOK_PARTIAL: if (enc == encoding) eventPtr = ptr; return XML_ERROR_INVALID_TOKEN; case XML_TOK_CHAR_REF: { XML_Char buf[XML_ENCODE_MAX]; int i; int n = XmlCharRefNumber(enc, ptr); if (n < 0) { if (enc == encoding) eventPtr = ptr; return XML_ERROR_BAD_CHAR_REF; } if (!isCdata && n == 0x20 /* space */ && (poolLength(pool) == 0 || poolLastChar(pool) == 0x20)) break; n = XmlEncode(n, (ICHAR *)buf); if (!n) { if (enc == encoding) eventPtr = ptr; return XML_ERROR_BAD_CHAR_REF; } for (i = 0; i < n; i++) { if (!poolAppendChar(pool, buf[i])) return XML_ERROR_NO_MEMORY; } } break; case XML_TOK_DATA_CHARS: if (!poolAppend(pool, enc, ptr, next)) return XML_ERROR_NO_MEMORY; break; case XML_TOK_TRAILING_CR: next = ptr + enc->minBytesPerChar; /* fall through */ case XML_TOK_ATTRIBUTE_VALUE_S: case XML_TOK_DATA_NEWLINE: if (!isCdata && (poolLength(pool) == 0 || poolLastChar(pool) == 0x20)) break; if (!poolAppendChar(pool, 0x20)) return XML_ERROR_NO_MEMORY; break; case XML_TOK_ENTITY_REF: { const XML_Char *name; ENTITY *entity; char checkEntityDecl; XML_Char ch = (XML_Char) XmlPredefinedEntityName(enc, ptr + enc->minBytesPerChar, next - enc->minBytesPerChar); if (ch) { if (!poolAppendChar(pool, ch)) return XML_ERROR_NO_MEMORY; break; } name = poolStoreString(&temp2Pool, enc, ptr + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!name) return XML_ERROR_NO_MEMORY; entity = (ENTITY *)lookup(&dtd->generalEntities, name, 0); poolDiscard(&temp2Pool); /* first, determine if a check for an existing declaration is needed; if yes, check that the entity exists, and that it is internal, otherwise call the default handler (if called from content) */ if (pool == &dtd->pool) /* are we called from prolog? */ checkEntityDecl = #ifdef XML_DTD prologState.documentEntity && #endif /* XML_DTD */ (dtd->standalone ? !openInternalEntities : !dtd->hasParamEntityRefs); else /* if (pool == &tempPool): we are called from content */ checkEntityDecl = !dtd->hasParamEntityRefs || dtd->standalone; if (checkEntityDecl) { if (!entity) return XML_ERROR_UNDEFINED_ENTITY; else if (!entity->is_internal) return XML_ERROR_ENTITY_DECLARED_IN_PE; } else if (!entity) { /* cannot report skipped entity here - see comments on skippedEntityHandler if (skippedEntityHandler) skippedEntityHandler(handlerArg, name, 0); */ if ((pool == &tempPool) && defaultHandler) reportDefault(parser, enc, ptr, next); break; } if (entity->open) { if (enc == encoding) eventPtr = ptr; return XML_ERROR_RECURSIVE_ENTITY_REF; } if (entity->notation) { if (enc == encoding) eventPtr = ptr; return XML_ERROR_BINARY_ENTITY_REF; } if (!entity->textPtr) { if (enc == encoding) eventPtr = ptr; return XML_ERROR_ATTRIBUTE_EXTERNAL_ENTITY_REF; } else { enum XML_Error result; const XML_Char *textEnd = entity->textPtr + entity->textLen; entity->open = XML_TRUE; result = appendAttributeValue(parser, internalEncoding, isCdata, (char *)entity->textPtr, (char *)textEnd, pool); entity->open = XML_FALSE; if (result) return result; } } break; default: if (enc == encoding) eventPtr = ptr; return XML_ERROR_UNEXPECTED_STATE; } ptr = next; } /* not reached */ } static enum XML_Error storeEntityValue(XML_Parser parser, const ENCODING *enc, const char *entityTextPtr, const char *entityTextEnd) { DTD * const dtd = _dtd; /* save one level of indirection */ STRING_POOL *pool = &(dtd->entityValuePool); enum XML_Error result = XML_ERROR_NONE; #ifdef XML_DTD int oldInEntityValue = prologState.inEntityValue; prologState.inEntityValue = 1; #endif /* XML_DTD */ /* never return Null for the value argument in EntityDeclHandler, since this would indicate an external entity; therefore we have to make sure that entityValuePool.start is not null */ if (!pool->blocks) { if (!poolGrow(pool)) return XML_ERROR_NO_MEMORY; } for (;;) { const char *next; int tok = XmlEntityValueTok(enc, entityTextPtr, entityTextEnd, &next); switch (tok) { case XML_TOK_PARAM_ENTITY_REF: #ifdef XML_DTD if (isParamEntity || enc != encoding) { const XML_Char *name; ENTITY *entity; name = poolStoreString(&tempPool, enc, entityTextPtr + enc->minBytesPerChar, next - enc->minBytesPerChar); if (!name) { result = XML_ERROR_NO_MEMORY; goto endEntityValue; } entity = (ENTITY *)lookup(&dtd->paramEntities, name, 0); poolDiscard(&tempPool); if (!entity) { /* not a well-formedness error - see XML 1.0: WFC Entity Declared */ /* cannot report skipped entity here - see comments on skippedEntityHandler if (skippedEntityHandler) skippedEntityHandler(handlerArg, name, 0); */ dtd->keepProcessing = dtd->standalone; goto endEntityValue; } if (entity->open) { if (enc == encoding) eventPtr = entityTextPtr; result = XML_ERROR_RECURSIVE_ENTITY_REF; goto endEntityValue; } if (entity->systemId) { if (externalEntityRefHandler) { dtd->paramEntityRead = XML_FALSE; entity->open = XML_TRUE; if (!externalEntityRefHandler(externalEntityRefHandlerArg, 0, entity->base, entity->systemId, entity->publicId)) { entity->open = XML_FALSE; result = XML_ERROR_EXTERNAL_ENTITY_HANDLING; goto endEntityValue; } entity->open = XML_FALSE; if (!dtd->paramEntityRead) dtd->keepProcessing = dtd->standalone; } else dtd->keepProcessing = dtd->standalone; } else { entity->open = XML_TRUE; result = storeEntityValue(parser, internalEncoding, (char *)entity->textPtr, (char *)(entity->textPtr + entity->textLen)); entity->open = XML_FALSE; if (result) goto endEntityValue; } break; } #endif /* XML_DTD */ /* in the internal subset, PE references are not legal within markup declarations, e.g entity values in this case */ eventPtr = entityTextPtr; result = XML_ERROR_PARAM_ENTITY_REF; goto endEntityValue; case XML_TOK_NONE: result = XML_ERROR_NONE; goto endEntityValue; case XML_TOK_ENTITY_REF: case XML_TOK_DATA_CHARS: if (!poolAppend(pool, enc, entityTextPtr, next)) { result = XML_ERROR_NO_MEMORY; goto endEntityValue; } break; case XML_TOK_TRAILING_CR: next = entityTextPtr + enc->minBytesPerChar; /* fall through */ case XML_TOK_DATA_NEWLINE: if (pool->end == pool->ptr && !poolGrow(pool)) { result = XML_ERROR_NO_MEMORY; goto endEntityValue; } *(pool->ptr)++ = 0xA; break; case XML_TOK_CHAR_REF: { XML_Char buf[XML_ENCODE_MAX]; int i; int n = XmlCharRefNumber(enc, entityTextPtr); if (n < 0) { if (enc == encoding) eventPtr = entityTextPtr; result = XML_ERROR_BAD_CHAR_REF; goto endEntityValue; } n = XmlEncode(n, (ICHAR *)buf); if (!n) { if (enc == encoding) eventPtr = entityTextPtr; result = XML_ERROR_BAD_CHAR_REF; goto endEntityValue; } for (i = 0; i < n; i++) { if (pool->end == pool->ptr && !poolGrow(pool)) { result = XML_ERROR_NO_MEMORY; goto endEntityValue; } *(pool->ptr)++ = buf[i]; } } break; case XML_TOK_PARTIAL: if (enc == encoding) eventPtr = entityTextPtr; result = XML_ERROR_INVALID_TOKEN; goto endEntityValue; case XML_TOK_INVALID: if (enc == encoding) eventPtr = next; result = XML_ERROR_INVALID_TOKEN; goto endEntityValue; default: if (enc == encoding) eventPtr = entityTextPtr; result = XML_ERROR_UNEXPECTED_STATE; goto endEntityValue; } entityTextPtr = next; } endEntityValue: #ifdef XML_DTD prologState.inEntityValue = oldInEntityValue; #endif /* XML_DTD */ return result; } static void FASTCALL normalizeLines(XML_Char *s) { XML_Char *p; for (;; s++) { if (*s == XML_T('\0')) return; if (*s == 0xD) break; } p = s; do { if (*s == 0xD) { *p++ = 0xA; if (*++s == 0xA) s++; } else *p++ = *s++; } while (*s); *p = XML_T('\0'); } static int reportProcessingInstruction(XML_Parser parser, const ENCODING *enc, const char *start, const char *end) { const XML_Char *target; XML_Char *data; const char *tem; if (!processingInstructionHandler) { if (defaultHandler) reportDefault(parser, enc, start, end); return 1; } start += enc->minBytesPerChar * 2; tem = start + XmlNameLength(enc, start); target = poolStoreString(&tempPool, enc, start, tem); if (!target) return 0; poolFinish(&tempPool); data = poolStoreString(&tempPool, enc, XmlSkipS(enc, tem), end - enc->minBytesPerChar*2); if (!data) return 0; normalizeLines(data); processingInstructionHandler(handlerArg, target, data); poolClear(&tempPool); return 1; } static int reportComment(XML_Parser parser, const ENCODING *enc, const char *start, const char *end) { XML_Char *data; if (!commentHandler) { if (defaultHandler) reportDefault(parser, enc, start, end); return 1; } data = poolStoreString(&tempPool, enc, start + enc->minBytesPerChar * 4, end - enc->minBytesPerChar * 3); if (!data) return 0; normalizeLines(data); commentHandler(handlerArg, data); poolClear(&tempPool); return 1; } static void reportDefault(XML_Parser parser, const ENCODING *enc, const char *s, const char *end) { if (MUST_CONVERT(enc, s)) { const char **eventPP; const char **eventEndPP; if (enc == encoding) { eventPP = &eventPtr; eventEndPP = &eventEndPtr; } else { eventPP = &(openInternalEntities->internalEventPtr); eventEndPP = &(openInternalEntities->internalEventEndPtr); } do { ICHAR *dataPtr = (ICHAR *)dataBuf; XmlConvert(enc, &s, end, &dataPtr, (ICHAR *)dataBufEnd); *eventEndPP = s; defaultHandler(handlerArg, dataBuf, dataPtr - (ICHAR *)dataBuf); *eventPP = s; } while (s != end); } else defaultHandler(handlerArg, (XML_Char *)s, (XML_Char *)end - (XML_Char *)s); } static int defineAttribute(ELEMENT_TYPE *type, ATTRIBUTE_ID *attId, XML_Bool isCdata, XML_Bool isId, const XML_Char *value, XML_Parser parser) { DEFAULT_ATTRIBUTE *att; if (value || isId) { /* The handling of default attributes gets messed up if we have a default which duplicates a non-default. */ int i; for (i = 0; i < type->nDefaultAtts; i++) if (attId == type->defaultAtts[i].id) return 1; if (isId && !type->idAtt && !attId->xmlns) type->idAtt = attId; } if (type->nDefaultAtts == type->allocDefaultAtts) { if (type->allocDefaultAtts == 0) { type->allocDefaultAtts = 8; type->defaultAtts = (DEFAULT_ATTRIBUTE *)MALLOC(type->allocDefaultAtts * sizeof(DEFAULT_ATTRIBUTE)); if (!type->defaultAtts) return 0; } else { DEFAULT_ATTRIBUTE *temp; int count = type->allocDefaultAtts * 2; temp = (DEFAULT_ATTRIBUTE *) REALLOC(type->defaultAtts, (count * sizeof(DEFAULT_ATTRIBUTE))); if (temp == NULL) return 0; type->allocDefaultAtts = count; type->defaultAtts = temp; } } att = type->defaultAtts + type->nDefaultAtts; att->id = attId; att->value = value; att->isCdata = isCdata; if (!isCdata) attId->maybeTokenized = XML_TRUE; type->nDefaultAtts += 1; return 1; } static int setElementTypePrefix(XML_Parser parser, ELEMENT_TYPE *elementType) { DTD * const dtd = _dtd; /* save one level of indirection */ const XML_Char *name; for (name = elementType->name; *name; name++) { if (*name == XML_T(':')) { PREFIX *prefix; const XML_Char *s; for (s = elementType->name; s != name; s++) { if (!poolAppendChar(&dtd->pool, *s)) return 0; } if (!poolAppendChar(&dtd->pool, XML_T('\0'))) return 0; prefix = (PREFIX *)lookup(&dtd->prefixes, poolStart(&dtd->pool), sizeof(PREFIX)); if (!prefix) return 0; if (prefix->name == poolStart(&dtd->pool)) poolFinish(&dtd->pool); else poolDiscard(&dtd->pool); elementType->prefix = prefix; } } return 1; } static ATTRIBUTE_ID * getAttributeId(XML_Parser parser, const ENCODING *enc, const char *start, const char *end) { DTD * const dtd = _dtd; /* save one level of indirection */ ATTRIBUTE_ID *id; const XML_Char *name; if (!poolAppendChar(&dtd->pool, XML_T('\0'))) return NULL; name = poolStoreString(&dtd->pool, enc, start, end); if (!name) return NULL; /* skip quotation mark - its storage will be re-used (like in name[-1]) */ ++name; id = (ATTRIBUTE_ID *)lookup(&dtd->attributeIds, name, sizeof(ATTRIBUTE_ID)); if (!id) return NULL; if (id->name != name) poolDiscard(&dtd->pool); else { poolFinish(&dtd->pool); if (!ns) ; else if (name[0] == XML_T('x') && name[1] == XML_T('m') && name[2] == XML_T('l') && name[3] == XML_T('n') && name[4] == XML_T('s') && (name[5] == XML_T('\0') || name[5] == XML_T(':'))) { if (name[5] == XML_T('\0')) id->prefix = &dtd->defaultPrefix; else id->prefix = (PREFIX *)lookup(&dtd->prefixes, name + 6, sizeof(PREFIX)); id->xmlns = XML_TRUE; } else { int i; for (i = 0; name[i]; i++) { /* attributes without prefix are *not* in the default namespace */ if (name[i] == XML_T(':')) { int j; for (j = 0; j < i; j++) { if (!poolAppendChar(&dtd->pool, name[j])) return NULL; } if (!poolAppendChar(&dtd->pool, XML_T('\0'))) return NULL; id->prefix = (PREFIX *)lookup(&dtd->prefixes, poolStart(&dtd->pool), sizeof(PREFIX)); if (id->prefix->name == poolStart(&dtd->pool)) poolFinish(&dtd->pool); else poolDiscard(&dtd->pool); break; } } } } return id; } #define CONTEXT_SEP XML_T('\f') static const XML_Char * getContext(XML_Parser parser) { DTD * const dtd = _dtd; /* save one level of indirection */ HASH_TABLE_ITER iter; XML_Bool needSep = XML_FALSE; if (dtd->defaultPrefix.binding) { int i; int len; if (!poolAppendChar(&tempPool, XML_T('='))) return NULL; len = dtd->defaultPrefix.binding->uriLen; if (namespaceSeparator != XML_T('\0')) len--; for (i = 0; i < len; i++) if (!poolAppendChar(&tempPool, dtd->defaultPrefix.binding->uri[i])) return NULL; needSep = XML_TRUE; } hashTableIterInit(&iter, &(dtd->prefixes)); for (;;) { int i; int len; const XML_Char *s; PREFIX *prefix = (PREFIX *)hashTableIterNext(&iter); if (!prefix) break; if (!prefix->binding) continue; if (needSep && !poolAppendChar(&tempPool, CONTEXT_SEP)) return NULL; for (s = prefix->name; *s; s++) if (!poolAppendChar(&tempPool, *s)) return NULL; if (!poolAppendChar(&tempPool, XML_T('='))) return NULL; len = prefix->binding->uriLen; if (namespaceSeparator != XML_T('\0')) len--; for (i = 0; i < len; i++) if (!poolAppendChar(&tempPool, prefix->binding->uri[i])) return NULL; needSep = XML_TRUE; } hashTableIterInit(&iter, &(dtd->generalEntities)); for (;;) { const XML_Char *s; ENTITY *e = (ENTITY *)hashTableIterNext(&iter); if (!e) break; if (!e->open) continue; if (needSep && !poolAppendChar(&tempPool, CONTEXT_SEP)) return NULL; for (s = e->name; *s; s++) if (!poolAppendChar(&tempPool, *s)) return 0; needSep = XML_TRUE; } if (!poolAppendChar(&tempPool, XML_T('\0'))) return NULL; return tempPool.start; } static XML_Bool setContext(XML_Parser parser, const XML_Char *context) { DTD * const dtd = _dtd; /* save one level of indirection */ const XML_Char *s = context; while (*context != XML_T('\0')) { if (*s == CONTEXT_SEP || *s == XML_T('\0')) { ENTITY *e; if (!poolAppendChar(&tempPool, XML_T('\0'))) return XML_FALSE; e = (ENTITY *)lookup(&dtd->generalEntities, poolStart(&tempPool), 0); if (e) e->open = XML_TRUE; if (*s != XML_T('\0')) s++; context = s; poolDiscard(&tempPool); } else if (*s == XML_T('=')) { PREFIX *prefix; if (poolLength(&tempPool) == 0) prefix = &dtd->defaultPrefix; else { if (!poolAppendChar(&tempPool, XML_T('\0'))) return XML_FALSE; prefix = (PREFIX *)lookup(&dtd->prefixes, poolStart(&tempPool), sizeof(PREFIX)); if (!prefix) return XML_FALSE; if (prefix->name == poolStart(&tempPool)) { prefix->name = poolCopyString(&dtd->pool, prefix->name); if (!prefix->name) return XML_FALSE; } poolDiscard(&tempPool); } for (context = s + 1; *context != CONTEXT_SEP && *context != XML_T('\0'); context++) if (!poolAppendChar(&tempPool, *context)) return XML_FALSE; if (!poolAppendChar(&tempPool, XML_T('\0'))) return XML_FALSE; if (addBinding(parser, prefix, 0, poolStart(&tempPool), &inheritedBindings) != XML_ERROR_NONE) return XML_FALSE; poolDiscard(&tempPool); if (*context != XML_T('\0')) ++context; s = context; } else { if (!poolAppendChar(&tempPool, *s)) return XML_FALSE; s++; } } return XML_TRUE; } static void FASTCALL normalizePublicId(XML_Char *publicId) { XML_Char *p = publicId; XML_Char *s; for (s = publicId; *s; s++) { switch (*s) { case 0x20: case 0xD: case 0xA: if (p != publicId && p[-1] != 0x20) *p++ = 0x20; break; default: *p++ = *s; } } if (p != publicId && p[-1] == 0x20) --p; *p = XML_T('\0'); } static DTD * dtdCreate(const XML_Memory_Handling_Suite *ms) { DTD *p = (DTD *)ms->malloc_fcn(sizeof(DTD)); if (p == NULL) return p; poolInit(&(p->pool), ms); #ifdef XML_DTD poolInit(&(p->entityValuePool), ms); #endif /* XML_DTD */ hashTableInit(&(p->generalEntities), ms); hashTableInit(&(p->elementTypes), ms); hashTableInit(&(p->attributeIds), ms); hashTableInit(&(p->prefixes), ms); #ifdef XML_DTD p->paramEntityRead = XML_FALSE; hashTableInit(&(p->paramEntities), ms); #endif /* XML_DTD */ p->defaultPrefix.name = NULL; p->defaultPrefix.binding = NULL; p->in_eldecl = XML_FALSE; p->scaffIndex = NULL; p->scaffold = NULL; p->scaffLevel = 0; p->scaffSize = 0; p->scaffCount = 0; p->contentStringLen = 0; p->keepProcessing = XML_TRUE; p->hasParamEntityRefs = XML_FALSE; p->standalone = XML_FALSE; return p; } static void dtdReset(DTD *p, const XML_Memory_Handling_Suite *ms) { HASH_TABLE_ITER iter; hashTableIterInit(&iter, &(p->elementTypes)); for (;;) { ELEMENT_TYPE *e = (ELEMENT_TYPE *)hashTableIterNext(&iter); if (!e) break; if (e->allocDefaultAtts != 0) ms->free_fcn(e->defaultAtts); } hashTableClear(&(p->generalEntities)); #ifdef XML_DTD p->paramEntityRead = XML_FALSE; hashTableClear(&(p->paramEntities)); #endif /* XML_DTD */ hashTableClear(&(p->elementTypes)); hashTableClear(&(p->attributeIds)); hashTableClear(&(p->prefixes)); poolClear(&(p->pool)); #ifdef XML_DTD poolClear(&(p->entityValuePool)); #endif /* XML_DTD */ p->defaultPrefix.name = NULL; p->defaultPrefix.binding = NULL; p->in_eldecl = XML_FALSE; ms->free_fcn(p->scaffIndex); p->scaffIndex = NULL; ms->free_fcn(p->scaffold); p->scaffold = NULL; p->scaffLevel = 0; p->scaffSize = 0; p->scaffCount = 0; p->contentStringLen = 0; p->keepProcessing = XML_TRUE; p->hasParamEntityRefs = XML_FALSE; p->standalone = XML_FALSE; } static void dtdDestroy(DTD *p, XML_Bool isDocEntity, const XML_Memory_Handling_Suite *ms) { HASH_TABLE_ITER iter; hashTableIterInit(&iter, &(p->elementTypes)); for (;;) { ELEMENT_TYPE *e = (ELEMENT_TYPE *)hashTableIterNext(&iter); if (!e) break; if (e->allocDefaultAtts != 0) ms->free_fcn(e->defaultAtts); } hashTableDestroy(&(p->generalEntities)); #ifdef XML_DTD hashTableDestroy(&(p->paramEntities)); #endif /* XML_DTD */ hashTableDestroy(&(p->elementTypes)); hashTableDestroy(&(p->attributeIds)); hashTableDestroy(&(p->prefixes)); poolDestroy(&(p->pool)); #ifdef XML_DTD poolDestroy(&(p->entityValuePool)); #endif /* XML_DTD */ if (isDocEntity) { ms->free_fcn(p->scaffIndex); ms->free_fcn(p->scaffold); } ms->free_fcn(p); } /* Do a deep copy of the DTD. Return 0 for out of memory, non-zero otherwise. The new DTD has already been initialized. */ static int dtdCopy(DTD *newDtd, const DTD *oldDtd, const XML_Memory_Handling_Suite *ms) { HASH_TABLE_ITER iter; /* Copy the prefix table. */ hashTableIterInit(&iter, &(oldDtd->prefixes)); for (;;) { const XML_Char *name; const PREFIX *oldP = (PREFIX *)hashTableIterNext(&iter); if (!oldP) break; name = poolCopyString(&(newDtd->pool), oldP->name); if (!name) return 0; if (!lookup(&(newDtd->prefixes), name, sizeof(PREFIX))) return 0; } hashTableIterInit(&iter, &(oldDtd->attributeIds)); /* Copy the attribute id table. */ for (;;) { ATTRIBUTE_ID *newA; const XML_Char *name; const ATTRIBUTE_ID *oldA = (ATTRIBUTE_ID *)hashTableIterNext(&iter); if (!oldA) break; /* Remember to allocate the scratch byte before the name. */ if (!poolAppendChar(&(newDtd->pool), XML_T('\0'))) return 0; name = poolCopyString(&(newDtd->pool), oldA->name); if (!name) return 0; ++name; newA = (ATTRIBUTE_ID *)lookup(&(newDtd->attributeIds), name, sizeof(ATTRIBUTE_ID)); if (!newA) return 0; newA->maybeTokenized = oldA->maybeTokenized; if (oldA->prefix) { newA->xmlns = oldA->xmlns; if (oldA->prefix == &oldDtd->defaultPrefix) newA->prefix = &newDtd->defaultPrefix; else newA->prefix = (PREFIX *)lookup(&(newDtd->prefixes), oldA->prefix->name, 0); } } /* Copy the element type table. */ hashTableIterInit(&iter, &(oldDtd->elementTypes)); for (;;) { int i; ELEMENT_TYPE *newE; const XML_Char *name; const ELEMENT_TYPE *oldE = (ELEMENT_TYPE *)hashTableIterNext(&iter); if (!oldE) break; name = poolCopyString(&(newDtd->pool), oldE->name); if (!name) return 0; newE = (ELEMENT_TYPE *)lookup(&(newDtd->elementTypes), name, sizeof(ELEMENT_TYPE)); if (!newE) return 0; if (oldE->nDefaultAtts) { newE->defaultAtts = (DEFAULT_ATTRIBUTE *) ms->malloc_fcn(oldE->nDefaultAtts * sizeof(DEFAULT_ATTRIBUTE)); if (!newE->defaultAtts) { ms->free_fcn(newE); return 0; } } if (oldE->idAtt) newE->idAtt = (ATTRIBUTE_ID *) lookup(&(newDtd->attributeIds), oldE->idAtt->name, 0); newE->allocDefaultAtts = newE->nDefaultAtts = oldE->nDefaultAtts; if (oldE->prefix) newE->prefix = (PREFIX *)lookup(&(newDtd->prefixes), oldE->prefix->name, 0); for (i = 0; i < newE->nDefaultAtts; i++) { newE->defaultAtts[i].id = (ATTRIBUTE_ID *) lookup(&(newDtd->attributeIds), oldE->defaultAtts[i].id->name, 0); newE->defaultAtts[i].isCdata = oldE->defaultAtts[i].isCdata; if (oldE->defaultAtts[i].value) { newE->defaultAtts[i].value = poolCopyString(&(newDtd->pool), oldE->defaultAtts[i].value); if (!newE->defaultAtts[i].value) return 0; } else newE->defaultAtts[i].value = NULL; } } /* Copy the entity tables. */ if (!copyEntityTable(&(newDtd->generalEntities), &(newDtd->pool), &(oldDtd->generalEntities))) return 0; #ifdef XML_DTD if (!copyEntityTable(&(newDtd->paramEntities), &(newDtd->pool), &(oldDtd->paramEntities))) return 0; newDtd->paramEntityRead = oldDtd->paramEntityRead; #endif /* XML_DTD */ newDtd->keepProcessing = oldDtd->keepProcessing; newDtd->hasParamEntityRefs = oldDtd->hasParamEntityRefs; newDtd->standalone = oldDtd->standalone; /* Don't want deep copying for scaffolding */ newDtd->in_eldecl = oldDtd->in_eldecl; newDtd->scaffold = oldDtd->scaffold; newDtd->contentStringLen = oldDtd->contentStringLen; newDtd->scaffSize = oldDtd->scaffSize; newDtd->scaffLevel = oldDtd->scaffLevel; newDtd->scaffIndex = oldDtd->scaffIndex; return 1; } /* End dtdCopy */ static int copyEntityTable(HASH_TABLE *newTable, STRING_POOL *newPool, const HASH_TABLE *oldTable) { HASH_TABLE_ITER iter; const XML_Char *cachedOldBase = NULL; const XML_Char *cachedNewBase = NULL; hashTableIterInit(&iter, oldTable); for (;;) { ENTITY *newE; const XML_Char *name; const ENTITY *oldE = (ENTITY *)hashTableIterNext(&iter); if (!oldE) break; name = poolCopyString(newPool, oldE->name); if (!name) return 0; newE = (ENTITY *)lookup(newTable, name, sizeof(ENTITY)); if (!newE) return 0; if (oldE->systemId) { const XML_Char *tem = poolCopyString(newPool, oldE->systemId); if (!tem) return 0; newE->systemId = tem; if (oldE->base) { if (oldE->base == cachedOldBase) newE->base = cachedNewBase; else { cachedOldBase = oldE->base; tem = poolCopyString(newPool, cachedOldBase); if (!tem) return 0; cachedNewBase = newE->base = tem; } } if (oldE->publicId) { tem = poolCopyString(newPool, oldE->publicId); if (!tem) return 0; newE->publicId = tem; } } else { const XML_Char *tem = poolCopyStringN(newPool, oldE->textPtr, oldE->textLen); if (!tem) return 0; newE->textPtr = tem; newE->textLen = oldE->textLen; } if (oldE->notation) { const XML_Char *tem = poolCopyString(newPool, oldE->notation); if (!tem) return 0; newE->notation = tem; } newE->is_param = oldE->is_param; newE->is_internal = oldE->is_internal; } return 1; } #define INIT_POWER 6 static XML_Bool FASTCALL keyeq(KEY s1, KEY s2) { for (; *s1 == *s2; s1++, s2++) if (*s1 == 0) return XML_TRUE; return XML_FALSE; } static unsigned long FASTCALL hash(KEY s) { unsigned long h = 0; while (*s) h = CHAR_HASH(h, *s++); return h; } static NAMED * lookup(HASH_TABLE *table, KEY name, size_t createSize) { size_t i; if (table->size == 0) { size_t tsize; if (!createSize) return NULL; table->power = INIT_POWER; /* table->size is a power of 2 */ table->size = (size_t)1 << INIT_POWER; tsize = table->size * sizeof(NAMED *); table->v = (NAMED **)table->mem->malloc_fcn(tsize); if (!table->v) return NULL; memset(table->v, 0, tsize); i = hash(name) & ((unsigned long)table->size - 1); } else { unsigned long h = hash(name); unsigned long mask = (unsigned long)table->size - 1; unsigned char step = 0; i = h & mask; while (table->v[i]) { if (keyeq(name, table->v[i]->name)) return table->v[i]; if (!step) step = PROBE_STEP(h, mask, table->power); i < step ? (i += table->size - step) : (i -= step); } if (!createSize) return NULL; /* check for overflow (table is half full) */ if (table->used >> (table->power - 1)) { unsigned char newPower = table->power + 1; size_t newSize = (size_t)1 << newPower; unsigned long newMask = (unsigned long)newSize - 1; size_t tsize = newSize * sizeof(NAMED *); NAMED **newV = (NAMED **)table->mem->malloc_fcn(tsize); if (!newV) return NULL; memset(newV, 0, tsize); for (i = 0; i < table->size; i++) if (table->v[i]) { unsigned long newHash = hash(table->v[i]->name); size_t j = newHash & newMask; step = 0; while (newV[j]) { if (!step) step = PROBE_STEP(newHash, newMask, newPower); j < step ? (j += newSize - step) : (j -= step); } newV[j] = table->v[i]; } table->mem->free_fcn(table->v); table->v = newV; table->power = newPower; table->size = newSize; i = h & newMask; step = 0; while (table->v[i]) { if (!step) step = PROBE_STEP(h, newMask, newPower); i < step ? (i += newSize - step) : (i -= step); } } } table->v[i] = (NAMED *)table->mem->malloc_fcn(createSize); if (!table->v[i]) return NULL; memset(table->v[i], 0, createSize); table->v[i]->name = name; (table->used)++; return table->v[i]; } static void FASTCALL hashTableClear(HASH_TABLE *table) { size_t i; for (i = 0; i < table->size; i++) { table->mem->free_fcn(table->v[i]); table->v[i] = NULL; } table->used = 0; } static void FASTCALL hashTableDestroy(HASH_TABLE *table) { size_t i; for (i = 0; i < table->size; i++) table->mem->free_fcn(table->v[i]); table->mem->free_fcn(table->v); } static void FASTCALL hashTableInit(HASH_TABLE *p, const XML_Memory_Handling_Suite *ms) { p->power = 0; p->size = 0; p->used = 0; p->v = NULL; p->mem = ms; } static void FASTCALL hashTableIterInit(HASH_TABLE_ITER *iter, const HASH_TABLE *table) { iter->p = table->v; iter->end = iter->p + table->size; } static NAMED * FASTCALL hashTableIterNext(HASH_TABLE_ITER *iter) { while (iter->p != iter->end) { NAMED *tem = *(iter->p)++; if (tem) return tem; } return NULL; } static void FASTCALL poolInit(STRING_POOL *pool, const XML_Memory_Handling_Suite *ms) { pool->blocks = NULL; pool->freeBlocks = NULL; pool->start = NULL; pool->ptr = NULL; pool->end = NULL; pool->mem = ms; } static void FASTCALL poolClear(STRING_POOL *pool) { if (!pool->freeBlocks) pool->freeBlocks = pool->blocks; else { BLOCK *p = pool->blocks; while (p) { BLOCK *tem = p->next; p->next = pool->freeBlocks; pool->freeBlocks = p; p = tem; } } pool->blocks = NULL; pool->start = NULL; pool->ptr = NULL; pool->end = NULL; } static void FASTCALL poolDestroy(STRING_POOL *pool) { BLOCK *p = pool->blocks; while (p) { BLOCK *tem = p->next; pool->mem->free_fcn(p); p = tem; } p = pool->freeBlocks; while (p) { BLOCK *tem = p->next; pool->mem->free_fcn(p); p = tem; } } static XML_Char * poolAppend(STRING_POOL *pool, const ENCODING *enc, const char *ptr, const char *end) { if (!pool->ptr && !poolGrow(pool)) return NULL; for (;;) { XmlConvert(enc, &ptr, end, (ICHAR **)&(pool->ptr), (ICHAR *)pool->end); if (ptr == end) break; if (!poolGrow(pool)) return NULL; } return pool->start; } static const XML_Char * FASTCALL poolCopyString(STRING_POOL *pool, const XML_Char *s) { do { if (!poolAppendChar(pool, *s)) return NULL; } while (*s++); s = pool->start; poolFinish(pool); return s; } static const XML_Char * poolCopyStringN(STRING_POOL *pool, const XML_Char *s, int n) { if (!pool->ptr && !poolGrow(pool)) return NULL; for (; n > 0; --n, s++) { if (!poolAppendChar(pool, *s)) return NULL; } s = pool->start; poolFinish(pool); return s; } static const XML_Char * FASTCALL poolAppendString(STRING_POOL *pool, const XML_Char *s) { while (*s) { if (!poolAppendChar(pool, *s)) return NULL; s++; } return pool->start; } static XML_Char * poolStoreString(STRING_POOL *pool, const ENCODING *enc, const char *ptr, const char *end) { if (!poolAppend(pool, enc, ptr, end)) return NULL; if (pool->ptr == pool->end && !poolGrow(pool)) return NULL; *(pool->ptr)++ = 0; return pool->start; } static XML_Bool FASTCALL poolGrow(STRING_POOL *pool) { if (pool->freeBlocks) { if (pool->start == 0) { pool->blocks = pool->freeBlocks; pool->freeBlocks = pool->freeBlocks->next; pool->blocks->next = NULL; pool->start = pool->blocks->s; pool->end = pool->start + pool->blocks->size; pool->ptr = pool->start; return XML_TRUE; } if (pool->end - pool->start < pool->freeBlocks->size) { BLOCK *tem = pool->freeBlocks->next; pool->freeBlocks->next = pool->blocks; pool->blocks = pool->freeBlocks; pool->freeBlocks = tem; memcpy(pool->blocks->s, pool->start, (pool->end - pool->start) * sizeof(XML_Char)); pool->ptr = pool->blocks->s + (pool->ptr - pool->start); pool->start = pool->blocks->s; pool->end = pool->start + pool->blocks->size; return XML_TRUE; } } if (pool->blocks && pool->start == pool->blocks->s) { int blockSize = (pool->end - pool->start)*2; pool->blocks = (BLOCK *) pool->mem->realloc_fcn(pool->blocks, (offsetof(BLOCK, s) + blockSize * sizeof(XML_Char))); if (pool->blocks == NULL) return XML_FALSE; pool->blocks->size = blockSize; pool->ptr = pool->blocks->s + (pool->ptr - pool->start); pool->start = pool->blocks->s; pool->end = pool->start + blockSize; } else { BLOCK *tem; int blockSize = pool->end - pool->start; if (blockSize < INIT_BLOCK_SIZE) blockSize = INIT_BLOCK_SIZE; else blockSize *= 2; tem = (BLOCK *)pool->mem->malloc_fcn(offsetof(BLOCK, s) + blockSize * sizeof(XML_Char)); if (!tem) return XML_FALSE; tem->size = blockSize; tem->next = pool->blocks; pool->blocks = tem; if (pool->ptr != pool->start) memcpy(tem->s, pool->start, (pool->ptr - pool->start) * sizeof(XML_Char)); pool->ptr = tem->s + (pool->ptr - pool->start); pool->start = tem->s; pool->end = tem->s + blockSize; } return XML_TRUE; } static int FASTCALL nextScaffoldPart(XML_Parser parser) { DTD * const dtd = _dtd; /* save one level of indirection */ CONTENT_SCAFFOLD * me; int next; if (!dtd->scaffIndex) { dtd->scaffIndex = (int *)MALLOC(groupSize * sizeof(int)); if (!dtd->scaffIndex) return -1; dtd->scaffIndex[0] = 0; } if (dtd->scaffCount >= dtd->scaffSize) { CONTENT_SCAFFOLD *temp; if (dtd->scaffold) { temp = (CONTENT_SCAFFOLD *) REALLOC(dtd->scaffold, dtd->scaffSize * 2 * sizeof(CONTENT_SCAFFOLD)); if (temp == NULL) return -1; dtd->scaffSize *= 2; } else { temp = (CONTENT_SCAFFOLD *)MALLOC(INIT_SCAFFOLD_ELEMENTS * sizeof(CONTENT_SCAFFOLD)); if (temp == NULL) return -1; dtd->scaffSize = INIT_SCAFFOLD_ELEMENTS; } dtd->scaffold = temp; } next = dtd->scaffCount++; me = &dtd->scaffold[next]; if (dtd->scaffLevel) { CONTENT_SCAFFOLD *parent = &dtd->scaffold[dtd->scaffIndex[dtd->scaffLevel-1]]; if (parent->lastchild) { dtd->scaffold[parent->lastchild].nextsib = next; } if (!parent->childcnt) parent->firstchild = next; parent->lastchild = next; parent->childcnt++; } me->firstchild = me->lastchild = me->childcnt = me->nextsib = 0; return next; } static void build_node(XML_Parser parser, int src_node, XML_Content *dest, XML_Content **contpos, XML_Char **strpos) { DTD * const dtd = _dtd; /* save one level of indirection */ dest->type = dtd->scaffold[src_node].type; dest->quant = dtd->scaffold[src_node].quant; if (dest->type == XML_CTYPE_NAME) { const XML_Char *src; dest->name = *strpos; src = dtd->scaffold[src_node].name; for (;;) { *(*strpos)++ = *src; if (!*src) break; src++; } dest->numchildren = 0; dest->children = NULL; } else { unsigned int i; int cn; dest->numchildren = dtd->scaffold[src_node].childcnt; dest->children = *contpos; *contpos += dest->numchildren; for (i = 0, cn = dtd->scaffold[src_node].firstchild; i < dest->numchildren; i++, cn = dtd->scaffold[cn].nextsib) { build_node(parser, cn, &(dest->children[i]), contpos, strpos); } dest->name = NULL; } } static XML_Content * build_model (XML_Parser parser) { DTD * const dtd = _dtd; /* save one level of indirection */ XML_Content *ret; XML_Content *cpos; XML_Char * str; int allocsize = (dtd->scaffCount * sizeof(XML_Content) + (dtd->contentStringLen * sizeof(XML_Char))); ret = (XML_Content *)MALLOC(allocsize); if (!ret) return NULL; str = (XML_Char *) (&ret[dtd->scaffCount]); cpos = &ret[1]; build_node(parser, 0, ret, &cpos, &str); return ret; } static ELEMENT_TYPE * getElementType(XML_Parser parser, const ENCODING *enc, const char *ptr, const char *end) { DTD * const dtd = _dtd; /* save one level of indirection */ const XML_Char *name = poolStoreString(&dtd->pool, enc, ptr, end); ELEMENT_TYPE *ret; if (!name) return NULL; ret = (ELEMENT_TYPE *) lookup(&dtd->elementTypes, name, sizeof(ELEMENT_TYPE)); if (!ret) return NULL; if (ret->name != name) poolDiscard(&dtd->pool); else { poolFinish(&dtd->pool); if (!setElementTypePrefix(parser, ret)) return NULL; } return ret; } Python-2.3.7/Modules/expat/ascii.h0000644001241000117560000000342507614611231016247 0ustar loewishpifb6/* Copyright (c) 1998, 1999 Thai Open Source Software Center Ltd See the file COPYING for copying permission. */ #define ASCII_A 0x41 #define ASCII_B 0x42 #define ASCII_C 0x43 #define ASCII_D 0x44 #define ASCII_E 0x45 #define ASCII_F 0x46 #define ASCII_G 0x47 #define ASCII_H 0x48 #define ASCII_I 0x49 #define ASCII_J 0x4A #define ASCII_K 0x4B #define ASCII_L 0x4C #define ASCII_M 0x4D #define ASCII_N 0x4E #define ASCII_O 0x4F #define ASCII_P 0x50 #define ASCII_Q 0x51 #define ASCII_R 0x52 #define ASCII_S 0x53 #define ASCII_T 0x54 #define ASCII_U 0x55 #define ASCII_V 0x56 #define ASCII_W 0x57 #define ASCII_X 0x58 #define ASCII_Y 0x59 #define ASCII_Z 0x5A #define ASCII_a 0x61 #define ASCII_b 0x62 #define ASCII_c 0x63 #define ASCII_d 0x64 #define ASCII_e 0x65 #define ASCII_f 0x66 #define ASCII_g 0x67 #define ASCII_h 0x68 #define ASCII_i 0x69 #define ASCII_j 0x6A #define ASCII_k 0x6B #define ASCII_l 0x6C #define ASCII_m 0x6D #define ASCII_n 0x6E #define ASCII_o 0x6F #define ASCII_p 0x70 #define ASCII_q 0x71 #define ASCII_r 0x72 #define ASCII_s 0x73 #define ASCII_t 0x74 #define ASCII_u 0x75 #define ASCII_v 0x76 #define ASCII_w 0x77 #define ASCII_x 0x78 #define ASCII_y 0x79 #define ASCII_z 0x7A #define ASCII_0 0x30 #define ASCII_1 0x31 #define ASCII_2 0x32 #define ASCII_3 0x33 #define ASCII_4 0x34 #define ASCII_5 0x35 #define ASCII_6 0x36 #define ASCII_7 0x37 #define ASCII_8 0x38 #define ASCII_9 0x39 #define ASCII_TAB 0x09 #define ASCII_SPACE 0x20 #define ASCII_EXCL 0x21 #define ASCII_QUOT 0x22 #define ASCII_AMP 0x26 #define ASCII_APOS 0x27 #define ASCII_MINUS 0x2D #define ASCII_PERIOD 0x2E #define ASCII_COLON 0x3A #define ASCII_SEMI 0x3B #define ASCII_LT 0x3C #define ASCII_EQUALS 0x3D #define ASCII_GT 0x3E #define ASCII_LSQB 0x5B #define ASCII_RSQB 0x5D #define ASCII_UNDERSCORE 0x5F Python-2.3.7/Modules/sunaudiodev.c0000644001241000117560000002460307515315657016375 0ustar loewishpifb6 /* Sad objects */ #include "Python.h" #include "structmember.h" #ifdef HAVE_SYS_AUDIOIO_H #define SOLARIS #endif #ifdef HAVE_FCNTL_H #include #endif #include #include #ifdef SOLARIS #include #else #include #endif /* #define offsetof(str,mem) ((int)(((str *)0)->mem)) */ typedef struct { PyObject_HEAD int x_fd; /* The open file */ int x_icount; /* # samples read */ int x_ocount; /* # samples written */ int x_isctl; /* True if control device */ } sadobject; typedef struct { PyObject_HEAD audio_info_t ai; } sadstatusobject; static PyTypeObject Sadtype; static PyTypeObject Sadstatustype; static sadstatusobject *sads_alloc(void); /* Forward */ static PyObject *SunAudioError; #define is_sadobject(v) ((v)->ob_type == &Sadtype) #define is_sadstatusobject(v) ((v)->ob_type == &Sadstatustype) static sadobject * newsadobject(PyObject *args) { sadobject *xp; int fd; char *mode; int imode; char* basedev; char* ctldev; char* opendev; /* Check arg for r/w/rw */ if (!PyArg_ParseTuple(args, "s", &mode)) return NULL; if (strcmp(mode, "r") == 0) imode = 0; else if (strcmp(mode, "w") == 0) imode = 1; else if (strcmp(mode, "rw") == 0) imode = 2; else if (strcmp(mode, "control") == 0) imode = -1; else { PyErr_SetString(SunAudioError, "Mode should be one of 'r', 'w', 'rw' or 'control'"); return NULL; } /* Open the correct device. The base device name comes from the * AUDIODEV environment variable first, then /dev/audio. The * control device tacks "ctl" onto the base device name. */ basedev = getenv("AUDIODEV"); if (!basedev) basedev = "/dev/audio"; ctldev = PyMem_NEW(char, strlen(basedev) + 4); if (!ctldev) { PyErr_NoMemory(); return NULL; } strcpy(ctldev, basedev); strcat(ctldev, "ctl"); if (imode < 0) { opendev = ctldev; fd = open(ctldev, 2); } else { opendev = basedev; fd = open(basedev, imode); } if (fd < 0) { PyErr_SetFromErrnoWithFilename(SunAudioError, opendev); PyMem_DEL(ctldev); return NULL; } PyMem_DEL(ctldev); /* Create and initialize the object */ xp = PyObject_New(sadobject, &Sadtype); if (xp == NULL) { close(fd); return NULL; } xp->x_fd = fd; xp->x_icount = xp->x_ocount = 0; xp->x_isctl = (imode < 0); return xp; } /* Sad methods */ static void sad_dealloc(sadobject *xp) { close(xp->x_fd); PyObject_Del(xp); } static PyObject * sad_read(sadobject *self, PyObject *args) { int size, count; char *cp; PyObject *rv; if (!PyArg_ParseTuple(args, "i:read", &size)) return NULL; rv = PyString_FromStringAndSize(NULL, size); if (rv == NULL) return NULL; if (!(cp = PyString_AsString(rv))) goto finally; count = read(self->x_fd, cp, size); if (count < 0) { PyErr_SetFromErrno(SunAudioError); goto finally; } #if 0 /* TBD: why print this message if you can handle the condition? * assume it's debugging info which we can just as well get rid * of. in any case this message should *not* be using printf! */ if (count != size) printf("sunaudio: funny read rv %d wtd %d\n", count, size); #endif self->x_icount += count; return rv; finally: Py_DECREF(rv); return NULL; } static PyObject * sad_write(sadobject *self, PyObject *args) { char *cp; int count, size; if (!PyArg_ParseTuple(args, "s#:write", &cp, &size)) return NULL; count = write(self->x_fd, cp, size); if (count < 0) { PyErr_SetFromErrno(SunAudioError); return NULL; } #if 0 if (count != size) printf("sunaudio: funny write rv %d wanted %d\n", count, size); #endif self->x_ocount += count; Py_INCREF(Py_None); return Py_None; } static PyObject * sad_getinfo(sadobject *self) { sadstatusobject *rv; if (!(rv = sads_alloc())) return NULL; if (ioctl(self->x_fd, AUDIO_GETINFO, &rv->ai) < 0) { PyErr_SetFromErrno(SunAudioError); Py_DECREF(rv); return NULL; } return (PyObject *)rv; } static PyObject * sad_setinfo(sadobject *self, sadstatusobject *arg) { if (!is_sadstatusobject(arg)) { PyErr_SetString(PyExc_TypeError, "Must be sun audio status object"); return NULL; } if (ioctl(self->x_fd, AUDIO_SETINFO, &arg->ai) < 0) { PyErr_SetFromErrno(SunAudioError); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * sad_ibufcount(sadobject *self) { audio_info_t ai; if (ioctl(self->x_fd, AUDIO_GETINFO, &ai) < 0) { PyErr_SetFromErrno(SunAudioError); return NULL; } return PyInt_FromLong(ai.record.samples - self->x_icount); } static PyObject * sad_obufcount(sadobject *self) { audio_info_t ai; if (ioctl(self->x_fd, AUDIO_GETINFO, &ai) < 0) { PyErr_SetFromErrno(SunAudioError); return NULL; } /* x_ocount is in bytes, whereas play.samples is in frames */ /* we want frames */ return PyInt_FromLong(self->x_ocount / (ai.play.channels * ai.play.precision / 8) - ai.play.samples); } static PyObject * sad_drain(sadobject *self) { if (ioctl(self->x_fd, AUDIO_DRAIN, 0) < 0) { PyErr_SetFromErrno(SunAudioError); return NULL; } Py_INCREF(Py_None); return Py_None; } #ifdef SOLARIS static PyObject * sad_getdev(sadobject *self) { struct audio_device ad; if (ioctl(self->x_fd, AUDIO_GETDEV, &ad) < 0) { PyErr_SetFromErrno(SunAudioError); return NULL; } return Py_BuildValue("(sss)", ad.name, ad.version, ad.config); } #endif static PyObject * sad_flush(sadobject *self) { if (ioctl(self->x_fd, I_FLUSH, FLUSHW) < 0) { PyErr_SetFromErrno(SunAudioError); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * sad_close(sadobject *self) { if (self->x_fd >= 0) { close(self->x_fd); self->x_fd = -1; } Py_INCREF(Py_None); return Py_None; } static PyObject * sad_fileno(sadobject *self) { return PyInt_FromLong(self->x_fd); } static PyMethodDef sad_methods[] = { { "read", (PyCFunction)sad_read, METH_VARARGS }, { "write", (PyCFunction)sad_write, METH_VARARGS }, { "ibufcount", (PyCFunction)sad_ibufcount, METH_NOARGS }, { "obufcount", (PyCFunction)sad_obufcount, METH_NOARGS }, #define CTL_METHODS 4 { "getinfo", (PyCFunction)sad_getinfo, METH_NOARGS }, { "setinfo", (PyCFunction)sad_setinfo, METH_O}, { "drain", (PyCFunction)sad_drain, METH_NOARGS }, { "flush", (PyCFunction)sad_flush, METH_NOARGS }, #ifdef SOLARIS { "getdev", (PyCFunction)sad_getdev, METH_NOARGS }, #endif { "close", (PyCFunction)sad_close, METH_NOARGS }, { "fileno", (PyCFunction)sad_fileno, METH_NOARGS }, {NULL, NULL} /* sentinel */ }; static PyObject * sad_getattr(sadobject *xp, char *name) { if (xp->x_isctl) return Py_FindMethod(sad_methods+CTL_METHODS, (PyObject *)xp, name); else return Py_FindMethod(sad_methods, (PyObject *)xp, name); } /* ----------------------------------------------------------------- */ static sadstatusobject * sads_alloc(void) { return PyObject_New(sadstatusobject, &Sadstatustype); } static void sads_dealloc(sadstatusobject *xp) { PyMem_DEL(xp); } #define OFF(x) offsetof(audio_info_t,x) static struct memberlist sads_ml[] = { { "i_sample_rate", T_UINT, OFF(record.sample_rate) }, { "i_channels", T_UINT, OFF(record.channels) }, { "i_precision", T_UINT, OFF(record.precision) }, { "i_encoding", T_UINT, OFF(record.encoding) }, { "i_gain", T_UINT, OFF(record.gain) }, { "i_port", T_UINT, OFF(record.port) }, { "i_samples", T_UINT, OFF(record.samples) }, { "i_eof", T_UINT, OFF(record.eof) }, { "i_pause", T_UBYTE, OFF(record.pause) }, { "i_error", T_UBYTE, OFF(record.error) }, { "i_waiting", T_UBYTE, OFF(record.waiting) }, { "i_open", T_UBYTE, OFF(record.open) , RO}, { "i_active", T_UBYTE, OFF(record.active) , RO}, #ifdef SOLARIS { "i_buffer_size", T_UINT, OFF(record.buffer_size) }, { "i_balance", T_UBYTE, OFF(record.balance) }, { "i_avail_ports", T_UINT, OFF(record.avail_ports) }, #endif { "o_sample_rate", T_UINT, OFF(play.sample_rate) }, { "o_channels", T_UINT, OFF(play.channels) }, { "o_precision", T_UINT, OFF(play.precision) }, { "o_encoding", T_UINT, OFF(play.encoding) }, { "o_gain", T_UINT, OFF(play.gain) }, { "o_port", T_UINT, OFF(play.port) }, { "o_samples", T_UINT, OFF(play.samples) }, { "o_eof", T_UINT, OFF(play.eof) }, { "o_pause", T_UBYTE, OFF(play.pause) }, { "o_error", T_UBYTE, OFF(play.error) }, { "o_waiting", T_UBYTE, OFF(play.waiting) }, { "o_open", T_UBYTE, OFF(play.open) , RO}, { "o_active", T_UBYTE, OFF(play.active) , RO}, #ifdef SOLARIS { "o_buffer_size", T_UINT, OFF(play.buffer_size) }, { "o_balance", T_UBYTE, OFF(play.balance) }, { "o_avail_ports", T_UINT, OFF(play.avail_ports) }, #endif { "monitor_gain", T_UINT, OFF(monitor_gain) }, { NULL, 0, 0}, }; static PyObject * sads_getattr(sadstatusobject *xp, char *name) { return PyMember_Get((char *)&xp->ai, sads_ml, name); } static int sads_setattr(sadstatusobject *xp, char *name, PyObject *v) { if (v == NULL) { PyErr_SetString(PyExc_TypeError, "can't delete sun audio status attributes"); return -1; } return PyMember_Set((char *)&xp->ai, sads_ml, name, v); } /* ------------------------------------------------------------------- */ static PyTypeObject Sadtype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "sunaudiodev.sun_audio_device", /*tp_name*/ sizeof(sadobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)sad_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)sad_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyTypeObject Sadstatustype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "sunaudiodev.sun_audio_device_status", /*tp_name*/ sizeof(sadstatusobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)sads_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)sads_getattr, /*tp_getattr*/ (setattrfunc)sads_setattr, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; /* ------------------------------------------------------------------- */ static PyObject * sadopen(PyObject *self, PyObject *args) { return (PyObject *)newsadobject(args); } static PyMethodDef sunaudiodev_methods[] = { { "open", sadopen, METH_VARARGS }, { 0, 0 }, }; void initsunaudiodev(void) { PyObject *m, *d; m = Py_InitModule("sunaudiodev", sunaudiodev_methods); d = PyModule_GetDict(m); SunAudioError = PyErr_NewException("sunaudiodev.error", NULL, NULL); if (SunAudioError) PyDict_SetItemString(d, "error", SunAudioError); } Python-2.3.7/Modules/regexmodule.c0000644001241000117560000003605707522367001016361 0ustar loewishpifb6/* XXX support range parameter on search XXX support mstop parameter on search */ /* Regular expression objects */ /* This uses Tatu Ylonen's copyleft-free reimplementation of GNU regular expressions */ #include "Python.h" #include #include "regexpr.h" static PyObject *RegexError; /* Exception */ typedef struct { PyObject_HEAD struct re_pattern_buffer re_patbuf; /* The compiled expression */ struct re_registers re_regs; /* The registers from the last match */ char re_fastmap[256]; /* Storage for fastmap */ PyObject *re_translate; /* String object for translate table */ PyObject *re_lastok; /* String object last matched/searched */ PyObject *re_groupindex; /* Group name to index dictionary */ PyObject *re_givenpat; /* Pattern with symbolic groups */ PyObject *re_realpat; /* Pattern without symbolic groups */ } regexobject; /* Regex object methods */ static void reg_dealloc(regexobject *re) { if (re->re_patbuf.buffer) free(re->re_patbuf.buffer); Py_XDECREF(re->re_translate); Py_XDECREF(re->re_lastok); Py_XDECREF(re->re_groupindex); Py_XDECREF(re->re_givenpat); Py_XDECREF(re->re_realpat); PyObject_Del(re); } static PyObject * makeresult(struct re_registers *regs) { PyObject *v; int i; static PyObject *filler = NULL; if (filler == NULL) { filler = Py_BuildValue("(ii)", -1, -1); if (filler == NULL) return NULL; } v = PyTuple_New(RE_NREGS); if (v == NULL) return NULL; for (i = 0; i < RE_NREGS; i++) { int lo = regs->start[i]; int hi = regs->end[i]; PyObject *w; if (lo == -1 && hi == -1) { w = filler; Py_INCREF(w); } else w = Py_BuildValue("(ii)", lo, hi); if (w == NULL || PyTuple_SetItem(v, i, w) < 0) { Py_DECREF(v); return NULL; } } return v; } static PyObject * regobj_match(regexobject *re, PyObject *args) { PyObject *argstring; char *buffer; int size; int offset = 0; int result; if (!PyArg_ParseTuple(args, "O|i:match", &argstring, &offset)) return NULL; if (!PyArg_Parse(argstring, "t#", &buffer, &size)) return NULL; if (offset < 0 || offset > size) { PyErr_SetString(RegexError, "match offset out of range"); return NULL; } Py_XDECREF(re->re_lastok); re->re_lastok = NULL; result = _Py_re_match(&re->re_patbuf, (unsigned char *)buffer, size, offset, &re->re_regs); if (result < -1) { /* Serious failure of some sort; if re_match didn't set an exception, raise a generic error */ if (!PyErr_Occurred()) PyErr_SetString(RegexError, "match failure"); return NULL; } if (result >= 0) { Py_INCREF(argstring); re->re_lastok = argstring; } return PyInt_FromLong((long)result); /* Length of the match or -1 */ } static PyObject * regobj_search(regexobject *re, PyObject *args) { PyObject *argstring; char *buffer; int size; int offset = 0; int range; int result; if (!PyArg_ParseTuple(args, "O|i:search", &argstring, &offset)) return NULL; if (!PyArg_Parse(argstring, "t#:search", &buffer, &size)) return NULL; if (offset < 0 || offset > size) { PyErr_SetString(RegexError, "search offset out of range"); return NULL; } /* NB: In Emacs 18.57, the documentation for re_search[_2] and the implementation don't match: the documentation states that |range| positions are tried, while the code tries |range|+1 positions. It seems more productive to believe the code! */ range = size - offset; Py_XDECREF(re->re_lastok); re->re_lastok = NULL; result = _Py_re_search(&re->re_patbuf, (unsigned char *)buffer, size, offset, range, &re->re_regs); if (result < -1) { /* Serious failure of some sort; if re_match didn't set an exception, raise a generic error */ if (!PyErr_Occurred()) PyErr_SetString(RegexError, "match failure"); return NULL; } if (result >= 0) { Py_INCREF(argstring); re->re_lastok = argstring; } return PyInt_FromLong((long)result); /* Position of the match or -1 */ } /* get the group from the regex where index can be a string (group name) or an integer index [0 .. 99] */ static PyObject* group_from_index(regexobject *re, PyObject *index) { int i, a, b; char *v; if (PyString_Check(index)) if (re->re_groupindex == NULL || !(index = PyDict_GetItem(re->re_groupindex, index))) { PyErr_SetString(RegexError, "group() group name doesn't exist"); return NULL; } i = PyInt_AsLong(index); if (i == -1 && PyErr_Occurred()) return NULL; if (i < 0 || i >= RE_NREGS) { PyErr_SetString(RegexError, "group() index out of range"); return NULL; } if (re->re_lastok == NULL) { PyErr_SetString(RegexError, "group() only valid after successful match/search"); return NULL; } a = re->re_regs.start[i]; b = re->re_regs.end[i]; if (a < 0 || b < 0) { Py_INCREF(Py_None); return Py_None; } if (!(v = PyString_AsString(re->re_lastok))) return NULL; return PyString_FromStringAndSize(v+a, b-a); } static PyObject * regobj_group(regexobject *re, PyObject *args) { int n = PyTuple_Size(args); int i; PyObject *res = NULL; if (n < 0) return NULL; if (n == 0) { PyErr_SetString(PyExc_TypeError, "not enough arguments"); return NULL; } if (n == 1) { /* return value is a single string */ PyObject *index = PyTuple_GetItem(args, 0); if (!index) return NULL; return group_from_index(re, index); } /* return value is a tuple */ if (!(res = PyTuple_New(n))) return NULL; for (i = 0; i < n; i++) { PyObject *index = PyTuple_GetItem(args, i); PyObject *group = NULL; if (!index) goto finally; if (!(group = group_from_index(re, index))) goto finally; if (PyTuple_SetItem(res, i, group) < 0) goto finally; } return res; finally: Py_DECREF(res); return NULL; } static struct PyMethodDef reg_methods[] = { {"match", (PyCFunction)regobj_match, METH_VARARGS}, {"search", (PyCFunction)regobj_search, METH_VARARGS}, {"group", (PyCFunction)regobj_group, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static char* members[] = { "last", "regs", "translate", "groupindex", "realpat", "givenpat", NULL }; static PyObject * regobj_getattr(regexobject *re, char *name) { if (strcmp(name, "regs") == 0) { if (re->re_lastok == NULL) { Py_INCREF(Py_None); return Py_None; } return makeresult(&re->re_regs); } if (strcmp(name, "last") == 0) { if (re->re_lastok == NULL) { Py_INCREF(Py_None); return Py_None; } Py_INCREF(re->re_lastok); return re->re_lastok; } if (strcmp(name, "translate") == 0) { if (re->re_translate == NULL) { Py_INCREF(Py_None); return Py_None; } Py_INCREF(re->re_translate); return re->re_translate; } if (strcmp(name, "groupindex") == 0) { if (re->re_groupindex == NULL) { Py_INCREF(Py_None); return Py_None; } Py_INCREF(re->re_groupindex); return re->re_groupindex; } if (strcmp(name, "realpat") == 0) { if (re->re_realpat == NULL) { Py_INCREF(Py_None); return Py_None; } Py_INCREF(re->re_realpat); return re->re_realpat; } if (strcmp(name, "givenpat") == 0) { if (re->re_givenpat == NULL) { Py_INCREF(Py_None); return Py_None; } Py_INCREF(re->re_givenpat); return re->re_givenpat; } if (strcmp(name, "__members__") == 0) { int i = 0; PyObject *list = NULL; /* okay, so it's unlikely this list will change that often. still, it's easier to change it in just one place. */ while (members[i]) i++; if (!(list = PyList_New(i))) return NULL; i = 0; while (members[i]) { PyObject* v = PyString_FromString(members[i]); if (!v || PyList_SetItem(list, i, v) < 0) { Py_DECREF(list); return NULL; } i++; } return list; } return Py_FindMethod(reg_methods, (PyObject *)re, name); } static PyTypeObject Regextype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "regex.regex", /*tp_name*/ sizeof(regexobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)reg_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)regobj_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; /* reference counting invariants: pattern: borrowed translate: borrowed givenpat: borrowed groupindex: transferred */ static PyObject * newregexobject(PyObject *pattern, PyObject *translate, PyObject *givenpat, PyObject *groupindex) { regexobject *re; char *pat; int size; if (!PyArg_Parse(pattern, "t#", &pat, &size)) return NULL; if (translate != NULL && PyString_Size(translate) != 256) { PyErr_SetString(RegexError, "translation table must be 256 bytes"); return NULL; } re = PyObject_New(regexobject, &Regextype); if (re != NULL) { char *error; re->re_patbuf.buffer = NULL; re->re_patbuf.allocated = 0; re->re_patbuf.fastmap = (unsigned char *)re->re_fastmap; if (translate) { re->re_patbuf.translate = (unsigned char *)PyString_AsString(translate); if (!re->re_patbuf.translate) goto finally; Py_INCREF(translate); } else re->re_patbuf.translate = NULL; re->re_translate = translate; re->re_lastok = NULL; re->re_groupindex = groupindex; Py_INCREF(pattern); re->re_realpat = pattern; Py_INCREF(givenpat); re->re_givenpat = givenpat; error = _Py_re_compile_pattern((unsigned char *)pat, size, &re->re_patbuf); if (error != NULL) { PyErr_SetString(RegexError, error); goto finally; } } return (PyObject *)re; finally: Py_DECREF(re); return NULL; } static PyObject * regex_compile(PyObject *self, PyObject *args) { PyObject *pat = NULL; PyObject *tran = NULL; if (!PyArg_ParseTuple(args, "S|S:compile", &pat, &tran)) return NULL; return newregexobject(pat, tran, pat, NULL); } static PyObject * symcomp(PyObject *pattern, PyObject *gdict) { char *opat, *oend, *o, *n, *g, *v; int group_count = 0; int sz; int escaped = 0; char name_buf[128]; PyObject *npattern; int require_escape = re_syntax & RE_NO_BK_PARENS ? 0 : 1; if (!(opat = PyString_AsString(pattern))) return NULL; if ((sz = PyString_Size(pattern)) < 0) return NULL; oend = opat + sz; o = opat; if (oend == opat) { Py_INCREF(pattern); return pattern; } if (!(npattern = PyString_FromStringAndSize((char*)NULL, sz)) || !(n = PyString_AsString(npattern))) return NULL; while (o < oend) { if (*o == '(' && escaped == require_escape) { char *backtrack; escaped = 0; ++group_count; *n++ = *o; if (++o >= oend || *o != '<') continue; /* *o == '<' */ if (o+1 < oend && *(o+1) == '>') continue; backtrack = o; g = name_buf; for (++o; o < oend;) { if (*o == '>') { PyObject *group_name = NULL; PyObject *group_index = NULL; *g++ = '\0'; group_name = PyString_FromString(name_buf); group_index = PyInt_FromLong(group_count); if (group_name == NULL || group_index == NULL || PyDict_SetItem(gdict, group_name, group_index) != 0) { Py_XDECREF(group_name); Py_XDECREF(group_index); Py_XDECREF(npattern); return NULL; } Py_DECREF(group_name); Py_DECREF(group_index); ++o; /* eat the '>' */ break; } if (!isalnum(Py_CHARMASK(*o)) && *o != '_') { o = backtrack; break; } *g++ = *o++; } } else if (*o == '[' && !escaped) { *n++ = *o; ++o; /* eat the char following '[' */ *n++ = *o; while (o < oend && *o != ']') { ++o; *n++ = *o; } if (o < oend) ++o; } else if (*o == '\\') { escaped = 1; *n++ = *o; ++o; } else { escaped = 0; *n++ = *o; ++o; } } if (!(v = PyString_AsString(npattern))) { Py_DECREF(npattern); return NULL; } /* _PyString_Resize() decrements npattern on failure */ _PyString_Resize(&npattern, n - v); return npattern; } static PyObject * regex_symcomp(PyObject *self, PyObject *args) { PyObject *pattern; PyObject *tran = NULL; PyObject *gdict = NULL; PyObject *npattern; PyObject *retval = NULL; if (!PyArg_ParseTuple(args, "S|S:symcomp", &pattern, &tran)) return NULL; gdict = PyDict_New(); if (gdict == NULL || (npattern = symcomp(pattern, gdict)) == NULL) { Py_DECREF(gdict); Py_DECREF(pattern); return NULL; } retval = newregexobject(npattern, tran, pattern, gdict); Py_DECREF(npattern); return retval; } static PyObject *cache_pat; static PyObject *cache_prog; static int update_cache(PyObject *pat) { PyObject *tuple = Py_BuildValue("(O)", pat); int status = 0; if (!tuple) return -1; if (pat != cache_pat) { Py_XDECREF(cache_pat); cache_pat = NULL; Py_XDECREF(cache_prog); cache_prog = regex_compile((PyObject *)NULL, tuple); if (cache_prog == NULL) { status = -1; goto finally; } cache_pat = pat; Py_INCREF(cache_pat); } finally: Py_DECREF(tuple); return status; } static PyObject * regex_match(PyObject *self, PyObject *args) { PyObject *pat, *string; PyObject *tuple, *v; if (!PyArg_ParseTuple(args, "SS:match", &pat, &string)) return NULL; if (update_cache(pat) < 0) return NULL; if (!(tuple = Py_BuildValue("(S)", string))) return NULL; v = regobj_match((regexobject *)cache_prog, tuple); Py_DECREF(tuple); return v; } static PyObject * regex_search(PyObject *self, PyObject *args) { PyObject *pat, *string; PyObject *tuple, *v; if (!PyArg_ParseTuple(args, "SS:search", &pat, &string)) return NULL; if (update_cache(pat) < 0) return NULL; if (!(tuple = Py_BuildValue("(S)", string))) return NULL; v = regobj_search((regexobject *)cache_prog, tuple); Py_DECREF(tuple); return v; } static PyObject * regex_set_syntax(PyObject *self, PyObject *args) { int syntax; if (!PyArg_ParseTuple(args, "i:set_syntax", &syntax)) return NULL; syntax = re_set_syntax(syntax); /* wipe the global pattern cache */ Py_XDECREF(cache_pat); cache_pat = NULL; Py_XDECREF(cache_prog); cache_prog = NULL; return PyInt_FromLong((long)syntax); } static PyObject * regex_get_syntax(PyObject *self) { return PyInt_FromLong((long)re_syntax); } static struct PyMethodDef regex_global_methods[] = { {"compile", regex_compile, METH_VARARGS}, {"symcomp", regex_symcomp, METH_VARARGS}, {"match", regex_match, METH_VARARGS}, {"search", regex_search, METH_VARARGS}, {"set_syntax", regex_set_syntax, METH_VARARGS}, {"get_syntax", (PyCFunction)regex_get_syntax, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initregex(void) { PyObject *m, *d, *v; int i; char *s; /* Initialize object type */ Regextype.ob_type = &PyType_Type; m = Py_InitModule("regex", regex_global_methods); d = PyModule_GetDict(m); if (PyErr_Warn(PyExc_DeprecationWarning, "the regex module is deprecated; " "please use the re module") < 0) return; /* Initialize regex.error exception */ v = RegexError = PyErr_NewException("regex.error", NULL, NULL); if (v == NULL || PyDict_SetItemString(d, "error", v) != 0) goto finally; /* Initialize regex.casefold constant */ if (!(v = PyString_FromStringAndSize((char *)NULL, 256))) goto finally; if (!(s = PyString_AsString(v))) goto finally; for (i = 0; i < 256; i++) { if (isupper(i)) s[i] = tolower(i); else s[i] = i; } if (PyDict_SetItemString(d, "casefold", v) < 0) goto finally; Py_DECREF(v); if (!PyErr_Occurred()) return; finally: /* Nothing */ ; } Python-2.3.7/Modules/cstubs0000644001241000117560000010056007154035731015115 0ustar loewishpifb6 /* Input used to generate the Python module "glmodule.c". The stub generator is a Python script called "cgen.py". Each definition must be contained on one line: can be: void, short, long (XXX maybe others?) can be: char, string, short, float, long, or double string indicates a null terminated string; if is char and begins with a *, the * is stripped and is changed into string has the form or [] where can be s: arg is sent r: arg is received (arg is a pointer) and can be (N and I are numbers): N argI retval N*argI N*I N*retval In the case where the subscript consists of two parts separated by *, the first part is the width of the matrix, and the second part is the length of the matrix. This order is opposite from the order used in C to declare a two-dimensional matrix. */ /* * An attempt has been made to make this module switch threads on qread * calls. It is far from safe, though. */ #include #include #ifdef __sgi extern int devport(); extern int textwritemask(); extern int pagewritemask(); extern int gewrite(); extern int gettp(); #endif #include "Python.h" #include "cgensupport.h" /* Some stubs are too complicated for the stub generator. We can include manually written versions of them here. A line starting with '%' gives the name of the function so the stub generator can include it in the table of functions. */ % qread static PyObject * gl_qread(self, args) PyObject *self; PyObject *args; { long retval; short arg1 ; Py_BEGIN_ALLOW_THREADS retval = qread( & arg1 ); Py_END_ALLOW_THREADS { PyObject *v = PyTuple_New( 2 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewlongobject(retval)); PyTuple_SetItem(v, 1, mknewshortobject(arg1)); return v; } } /* varray -- an array of v.. calls. The argument is an array (maybe list or tuple) of points. Each point must be a tuple or list of coordinates (x, y, z). The points may be 2- or 3-dimensional but must all have the same dimension. Float and int values may be mixed however. The points are always converted to 3D double precision points by assuming z=0.0 if necessary (as indicated in the man page), and for each point v3d() is called. */ % varray static PyObject * gl_varray(self, args) PyObject *self; PyObject *args; { PyObject *v, *w=NULL; int i, n, width; double vec[3]; PyObject * (*getitem)(PyObject *, int); if (!PyArg_GetObject(args, 1, 0, &v)) return NULL; if (PyList_Check(v)) { n = PyList_Size(v); getitem = PyList_GetItem; } else if (PyTuple_Check(v)) { n = PyTuple_Size(v); getitem = PyTuple_GetItem; } else { PyErr_BadArgument(); return NULL; } if (n == 0) { Py_INCREF(Py_None); return Py_None; } if (n > 0) w = (*getitem)(v, 0); width = 0; if (w == NULL) { } else if (PyList_Check(w)) { width = PyList_Size(w); } else if (PyTuple_Check(w)) { width = PyTuple_Size(w); } switch (width) { case 2: vec[2] = 0.0; /* Fall through */ case 3: break; default: PyErr_BadArgument(); return NULL; } for (i = 0; i < n; i++) { w = (*getitem)(v, i); if (!PyArg_GetDoubleArray(w, 1, 0, width, vec)) return NULL; v3d(vec); } Py_INCREF(Py_None); return Py_None; } /* vnarray, nvarray -- an array of n3f and v3f calls. The argument is an array (list or tuple) of pairs of points and normals. Each pair is a tuple (NOT a list) of a point and a normal for that point. Each point or normal must be a tuple (NOT a list) of coordinates (x, y, z). Three coordinates must be given. Float and int values may be mixed. For each pair, n3f() is called for the normal, and then v3f() is called for the vector. vnarray and nvarray differ only in the order of the vector and normal in the pair: vnarray expects (v, n) while nvarray expects (n, v). */ static PyObject *gen_nvarray(); /* Forward */ % nvarray static PyObject * gl_nvarray(self, args) PyObject *self; PyObject *args; { return gen_nvarray(args, 0); } % vnarray static PyObject * gl_vnarray(self, args) PyObject *self; PyObject *args; { return gen_nvarray(args, 1); } /* Generic, internal version of {nv,nv}array: inorm indicates the argument order, 0: normal first, 1: vector first. */ static PyObject * gen_nvarray(args, inorm) PyObject *args; int inorm; { PyObject *v, *w, *wnorm, *wvec; int i, n; float norm[3], vec[3]; PyObject * (*getitem)(PyObject *, int); if (!PyArg_GetObject(args, 1, 0, &v)) return NULL; if (PyList_Check(v)) { n = PyList_Size(v); getitem = PyList_GetItem; } else if (PyTuple_Check(v)) { n = PyTuple_Size(v); getitem = PyTuple_GetItem; } else { PyErr_BadArgument(); return NULL; } for (i = 0; i < n; i++) { w = (*getitem)(v, i); if (!PyTuple_Check(w) || PyTuple_Size(w) != 2) { PyErr_BadArgument(); return NULL; } wnorm = PyTuple_GetItem(w, inorm); wvec = PyTuple_GetItem(w, 1 - inorm); if (!PyArg_GetFloatArray(wnorm, 1, 0, 3, norm) || !PyArg_GetFloatArray(wvec, 1, 0, 3, vec)) return NULL; n3f(norm); v3f(vec); } Py_INCREF(Py_None); return Py_None; } /* nurbssurface(s_knots[], t_knots[], ctl[][], s_order, t_order, type). The dimensions of ctl[] are computed as follows: [len(s_knots) - s_order], [len(t_knots) - t_order] */ % nurbssurface static PyObject * gl_nurbssurface(self, args) PyObject *self; PyObject *args; { long arg1 ; double * arg2 ; long arg3 ; double * arg4 ; double *arg5 ; long arg6 ; long arg7 ; long arg8 ; long ncoords; long s_byte_stride, t_byte_stride; long s_nctl, t_nctl; long s, t; PyObject *v, *w, *pt; double *pnext; if (!PyArg_GetLongArraySize(args, 6, 0, &arg1)) return NULL; if ((arg2 = PyMem_NEW(double, arg1 )) == NULL) { return PyErr_NoMemory(); } if (!PyArg_GetDoubleArray(args, 6, 0, arg1 , arg2)) return NULL; if (!PyArg_GetLongArraySize(args, 6, 1, &arg3)) return NULL; if ((arg4 = PyMem_NEW(double, arg3 )) == NULL) { return PyErr_NoMemory(); } if (!PyArg_GetDoubleArray(args, 6, 1, arg3 , arg4)) return NULL; if (!PyArg_GetLong(args, 6, 3, &arg6)) return NULL; if (!PyArg_GetLong(args, 6, 4, &arg7)) return NULL; if (!PyArg_GetLong(args, 6, 5, &arg8)) return NULL; if (arg8 == N_XYZ) ncoords = 3; else if (arg8 == N_XYZW) ncoords = 4; else { PyErr_BadArgument(); return NULL; } s_nctl = arg1 - arg6; t_nctl = arg3 - arg7; if (!PyArg_GetObject(args, 6, 2, &v)) return NULL; if (!PyList_Check(v) || PyList_Size(v) != s_nctl) { PyErr_BadArgument(); return NULL; } if ((arg5 = PyMem_NEW(double, s_nctl*t_nctl*ncoords )) == NULL) { return PyErr_NoMemory(); } pnext = arg5; for (s = 0; s < s_nctl; s++) { w = PyList_GetItem(v, s); if (w == NULL || !PyList_Check(w) || PyList_Size(w) != t_nctl) { PyErr_BadArgument(); return NULL; } for (t = 0; t < t_nctl; t++) { pt = PyList_GetItem(w, t); if (!PyArg_GetDoubleArray(pt, 1, 0, ncoords, pnext)) return NULL; pnext += ncoords; } } s_byte_stride = sizeof(double) * ncoords; t_byte_stride = s_byte_stride * s_nctl; nurbssurface( arg1 , arg2 , arg3 , arg4 , s_byte_stride , t_byte_stride , arg5 , arg6 , arg7 , arg8 ); PyMem_DEL(arg2); PyMem_DEL(arg4); PyMem_DEL(arg5); Py_INCREF(Py_None); return Py_None; } /* nurbscurve(knots, ctlpoints, order, type). The length of ctlpoints is len(knots)-order. */ %nurbscurve static PyObject * gl_nurbscurve(self, args) PyObject *self; PyObject *args; { long arg1 ; double * arg2 ; long arg3 ; double * arg4 ; long arg5 ; long arg6 ; int ncoords, npoints; int i; PyObject *v; double *pnext; if (!PyArg_GetLongArraySize(args, 4, 0, &arg1)) return NULL; if ((arg2 = PyMem_NEW(double, arg1 )) == NULL) { return PyErr_NoMemory(); } if (!PyArg_GetDoubleArray(args, 4, 0, arg1 , arg2)) return NULL; if (!PyArg_GetLong(args, 4, 2, &arg5)) return NULL; if (!PyArg_GetLong(args, 4, 3, &arg6)) return NULL; if (arg6 == N_ST) ncoords = 2; else if (arg6 == N_STW) ncoords = 3; else { PyErr_BadArgument(); return NULL; } npoints = arg1 - arg5; if (!PyArg_GetObject(args, 4, 1, &v)) return NULL; if (!PyList_Check(v) || PyList_Size(v) != npoints) { PyErr_BadArgument(); return NULL; } if ((arg4 = PyMem_NEW(double, npoints*ncoords )) == NULL) { return PyErr_NoMemory(); } pnext = arg4; for (i = 0; i < npoints; i++) { if (!PyArg_GetDoubleArray(PyList_GetItem(v, i), 1, 0, ncoords, pnext)) return NULL; pnext += ncoords; } arg3 = (sizeof(double)) * ncoords; nurbscurve( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); PyMem_DEL(arg2); PyMem_DEL(arg4); Py_INCREF(Py_None); return Py_None; } /* pwlcurve(points, type). Points is a list of points. Type must be N_ST. */ %pwlcurve static PyObject * gl_pwlcurve(self, args) PyObject *self; PyObject *args; { PyObject *v; long type; double *data, *pnext; long npoints, ncoords; int i; if (!PyArg_GetObject(args, 2, 0, &v)) return NULL; if (!PyArg_GetLong(args, 2, 1, &type)) return NULL; if (!PyList_Check(v)) { PyErr_BadArgument(); return NULL; } npoints = PyList_Size(v); if (type == N_ST) ncoords = 2; else { PyErr_BadArgument(); return NULL; } if ((data = PyMem_NEW(double, npoints*ncoords)) == NULL) { return PyErr_NoMemory(); } pnext = data; for (i = 0; i < npoints; i++) { if (!PyArg_GetDoubleArray(PyList_GetItem(v, i), 1, 0, ncoords, pnext)) return NULL; pnext += ncoords; } pwlcurve(npoints, data, sizeof(double)*ncoords, type); PyMem_DEL(data); Py_INCREF(Py_None); return Py_None; } /* Picking and Selecting */ static short *pickbuffer = NULL; static long pickbuffersize; static PyObject * pick_select(args, func) PyObject *args; void (*func)(); { if (!PyArg_GetLong(args, 1, 0, &pickbuffersize)) return NULL; if (pickbuffer != NULL) { PyErr_SetString(PyExc_RuntimeError, "pick/gselect: already picking/selecting"); return NULL; } if ((pickbuffer = PyMem_NEW(short, pickbuffersize)) == NULL) { return PyErr_NoMemory(); } (*func)(pickbuffer, pickbuffersize); Py_INCREF(Py_None); return Py_None; } static PyObject * endpick_select(args, func) PyObject *args; long (*func)(); { PyObject *v, *w; int i, nhits, n; if (!PyArg_NoArgs(args)) return NULL; if (pickbuffer == NULL) { PyErr_SetString(PyExc_RuntimeError, "endpick/endselect: not in pick/select mode"); return NULL; } nhits = (*func)(pickbuffer); if (nhits < 0) { nhits = -nhits; /* How to report buffer overflow otherwise? */ } /* Scan the buffer to see how many integers */ n = 0; for (; nhits > 0; nhits--) { n += 1 + pickbuffer[n]; } v = PyList_New(n); if (v == NULL) return NULL; /* XXX Could do it nicer and interpret the data structure here, returning a list of lists. But this can be done in Python... */ for (i = 0; i < n; i++) { w = PyInt_FromLong((long)pickbuffer[i]); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(v, i, w); } PyMem_DEL(pickbuffer); pickbuffer = NULL; return v; } extern void pick(), gselect(); extern long endpick(), endselect(); %pick static PyObject *gl_pick(self, args) PyObject *self, *args; { return pick_select(args, pick); } %endpick static PyObject *gl_endpick(self, args) PyObject *self, *args; { return endpick_select(args, endpick); } %gselect static PyObject *gl_gselect(self, args) PyObject *self, *args; { return pick_select(args, gselect); } %endselect static PyObject *gl_endselect(self, args) PyObject *self, *args; { return endpick_select(args, endselect); } /* XXX The generator botches this one. Here's a quick hack to fix it. */ /* XXX The generator botches this one. Here's a quick hack to fix it. */ % getmatrix float r[16] static PyObject * gl_getmatrix(self, args) PyObject *self; PyObject *args; { Matrix arg1; PyObject *v, *w; int i, j; getmatrix( arg1 ); v = PyList_New(16); if (v == NULL) { return PyErr_NoMemory(); } for (i = 0; i < 4; i++) for (j = 0; j < 4; j++) { w = mknewfloatobject(arg1[i][j]); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(v, i*4+j, w); } return v; } /* Here's an alternate version that returns a 4x4 matrix instead of a vector. Unfortunately it is incompatible with loadmatrix and multmatrix... */ % altgetmatrix float r[4][4] static PyObject * gl_altgetmatrix(self, args) PyObject *self; PyObject *args; { Matrix arg1; PyObject *v, *w; int i, j; getmatrix( arg1 ); v = PyList_New(4); if (v == NULL) { return NULL; } for (i = 0; i < 4; i++) { w = PyList_New(4); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(v, i, w); } for (i = 0; i < 4; i++) { for (j = 0; j < 4; j++) { w = mknewfloatobject(arg1[i][j]); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(PyList_GetItem(v, i), j, w); } } return v; } % lrectwrite static PyObject * gl_lrectwrite(self, args) PyObject *self; PyObject *args; { short x1 ; short y1 ; short x2 ; short y2 ; string parray ; PyObject *s; #if 0 int pixcount; #endif if (!PyArg_GetShort(args, 5, 0, &x1)) return NULL; if (!PyArg_GetShort(args, 5, 1, &y1)) return NULL; if (!PyArg_GetShort(args, 5, 2, &x2)) return NULL; if (!PyArg_GetShort(args, 5, 3, &y2)) return NULL; if (!PyArg_GetString(args, 5, 4, &parray)) return NULL; if (!PyArg_GetObject(args, 5, 4, &s)) return NULL; #if 0 /* Don't check this, it breaks experiments with pixmode(PM_SIZE, ...) */ pixcount = (long)(x2+1-x1) * (long)(y2+1-y1); if (!PyString_Check(s) || PyString_Size(s) != pixcount*sizeof(long)) { PyErr_SetString(PyExc_RuntimeError, "string arg to lrectwrite has wrong size"); return NULL; } #endif lrectwrite( x1 , y1 , x2 , y2 , (unsigned long *) parray ); Py_INCREF(Py_None); return Py_None; } % lrectread static PyObject * gl_lrectread(self, args) PyObject *self; PyObject *args; { short x1 ; short y1 ; short x2 ; short y2 ; PyObject *parray; int pixcount; if (!PyArg_GetShort(args, 4, 0, &x1)) return NULL; if (!PyArg_GetShort(args, 4, 1, &y1)) return NULL; if (!PyArg_GetShort(args, 4, 2, &x2)) return NULL; if (!PyArg_GetShort(args, 4, 3, &y2)) return NULL; pixcount = (long)(x2+1-x1) * (long)(y2+1-y1); parray = PyString_FromStringAndSize((char *)NULL, pixcount*sizeof(long)); if (parray == NULL) return NULL; /* No memory */ lrectread(x1, y1, x2, y2, (unsigned long *) PyString_AsString(parray)); return parray; } % readdisplay static PyObject * gl_readdisplay(self, args) PyObject *self; PyObject *args; { short x1, y1, x2, y2; unsigned long *parray, hints; long size, size_ret; PyObject *rv; if ( !PyArg_Parse(args, "hhhhl", &x1, &y1, &x2, &y2, &hints) ) return 0; size = (long)(x2+1-x1) * (long)(y2+1-y1); rv = PyString_FromStringAndSize((char *)NULL, size*sizeof(long)); if ( rv == NULL ) return NULL; parray = (unsigned long *)PyString_AsString(rv); size_ret = readdisplay(x1, y1, x2, y2, parray, hints); if ( size_ret != size ) { printf("gl_readdisplay: got %ld pixels, expected %ld\n", size_ret, size); PyErr_SetString(PyExc_RuntimeError, "readdisplay returned unexpected length"); return NULL; } return rv; } /* Desperately needed, here are tools to compress and decompress the data manipulated by lrectread/lrectwrite. gl.packrect(width, height, packfactor, bigdata) --> smalldata makes 'bigdata' 4*(packfactor**2) times smaller by: - turning it into B/W (a factor 4) - replacing squares of size pacfactor by one representative gl.unpackrect(width, height, packfactor, smalldata) --> bigdata is the inverse; the numeric arguments must be *the same*. Both work best if width and height are multiples of packfactor (in fact unpackrect will leave garbage bytes). */ % packrect static PyObject * gl_packrect(self, args) PyObject *self; PyObject *args; { long width, height, packfactor; char *s; PyObject *unpacked, *packed; int pixcount, packedcount, x, y, r, g, b; unsigned long pixel; unsigned char *p; unsigned long *parray; if (!PyArg_GetLong(args, 4, 0, &width)) return NULL; if (!PyArg_GetLong(args, 4, 1, &height)) return NULL; if (!PyArg_GetLong(args, 4, 2, &packfactor)) return NULL; if (!PyArg_GetString(args, 4, 3, &s)) /* For type checking only */ return NULL; if (!PyArg_GetObject(args, 4, 3, &unpacked)) return NULL; if (width <= 0 || height <= 0 || packfactor <= 0) { PyErr_SetString(PyExc_RuntimeError, "packrect args must be > 0"); return NULL; } pixcount = width*height; packedcount = ((width+packfactor-1)/packfactor) * ((height+packfactor-1)/packfactor); if (PyString_Size(unpacked) != pixcount*sizeof(long)) { PyErr_SetString(PyExc_RuntimeError, "string arg to packrect has wrong size"); return NULL; } packed = PyString_FromStringAndSize((char *)NULL, packedcount); if (packed == NULL) return NULL; parray = (unsigned long *) PyString_AsString(unpacked); p = (unsigned char *) PyString_AsString(packed); for (y = 0; y < height; y += packfactor, parray += packfactor*width) { for (x = 0; x < width; x += packfactor) { pixel = parray[x]; r = pixel & 0xff; g = (pixel >> 8) & 0xff; b = (pixel >> 16) & 0xff; *p++ = (30*r+59*g+11*b) / 100; } } return packed; } % unpackrect static unsigned long unpacktab[256]; static int unpacktab_inited = 0; static PyObject * gl_unpackrect(self, args) PyObject *self; PyObject *args; { long width, height, packfactor; char *s; PyObject *unpacked, *packed; int pixcount, packedcount; register unsigned char *p; register unsigned long *parray; if (!unpacktab_inited) { register int white; for (white = 256; --white >= 0; ) unpacktab[white] = white * 0x010101L; unpacktab_inited++; } if (!PyArg_GetLong(args, 4, 0, &width)) return NULL; if (!PyArg_GetLong(args, 4, 1, &height)) return NULL; if (!PyArg_GetLong(args, 4, 2, &packfactor)) return NULL; if (!PyArg_GetString(args, 4, 3, &s)) /* For type checking only */ return NULL; if (!PyArg_GetObject(args, 4, 3, &packed)) return NULL; if (width <= 0 || height <= 0 || packfactor <= 0) { PyErr_SetString(PyExc_RuntimeError, "packrect args must be > 0"); return NULL; } pixcount = width*height; packedcount = ((width+packfactor-1)/packfactor) * ((height+packfactor-1)/packfactor); if (PyString_Size(packed) != packedcount) { PyErr_SetString(PyExc_RuntimeError, "string arg to unpackrect has wrong size"); return NULL; } unpacked = PyString_FromStringAndSize((char *)NULL, pixcount*sizeof(long)); if (unpacked == NULL) return NULL; parray = (unsigned long *) PyString_AsString(unpacked); p = (unsigned char *) PyString_AsString(packed); if (packfactor == 1 && width*height > 0) { /* Just expand bytes to longs */ register int x = width * height; do { *parray++ = unpacktab[*p++]; } while (--x >= 0); } else { register int y; for (y = 0; y < height-packfactor+1; y += packfactor, parray += packfactor*width) { register int x; for (x = 0; x < width-packfactor+1; x += packfactor) { register unsigned long pixel = unpacktab[*p++]; register int i; for (i = packfactor*width; (i-=width) >= 0;) { register int j; for (j = packfactor; --j >= 0; ) parray[i+x+j] = pixel; } } } } return unpacked; } % gversion static PyObject * gl_gversion(self, args) PyObject *self; PyObject *args; { char buf[20]; gversion(buf); return PyString_FromString(buf); } /* void clear - Manual because of clash with termcap */ %clear static PyObject * gl_clear(self, args) PyObject *self; PyObject *args; { __GLclear( ); Py_INCREF(Py_None); return Py_None; } /* End of manually written stubs */ %% long getshade if !solaris void devport short s long s void rdr2i long s long s void rectfs short s short s short s short s void rects short s short s short s short s void rmv2i long s long s void noport void popviewport void clearhitcode void closeobj void cursoff void curson void doublebuffer void finish void gconfig void ginit void greset void multimap void onemap void popattributes void popmatrix void pushattributes void pushmatrix void pushviewport void qreset void RGBmode void singlebuffer void swapbuffers void gsync void gflush void tpon void tpoff void clkon void clkoff void ringbell #void callfunc void gbegin void textinit void initnames void pclos void popname if !solaris void spclos void zclear void screenspace void reshapeviewport void winpush void winpop void foreground void endfullscrn if !solaris void endpupmode void fullscrn if !solaris void pupmode void winconstraints void pagecolor short s void textcolor short s void color short s void curveit short s void font short s void linewidth short s void setlinestyle short s void setmap short s void swapinterval short s void writemask short s if !solaris void textwritemask short s void qdevice short s void unqdevice short s void curvebasis short s void curveprecision short s void loadname short s void passthrough short s void pushname short s void setmonitor short s if !solaris void setshade short s void setpattern short s if !solaris void pagewritemask short s # void callobj long s void delobj long s void editobj long s void makeobj long s void maketag long s void chunksize long s void compactify long s void deltag long s void lsrepeat long s void objinsert long s void objreplace long s void winclose long s void blanktime long s void freepup long s # This is not in the library!? ###void pupcolor long s # void backbuffer long s void frontbuffer long s if !solaris void lsbackup long s void resetls long s void lampon long s void lampoff long s void setbell long s void blankscreen long s void depthcue long s void zbuffer long s void backface long s # void cmov2i long s long s void draw2i long s long s void move2i long s long s void pnt2i long s long s void patchbasis long s long s void patchprecision long s long s void pdr2i long s long s void pmv2i long s long s void rpdr2i long s long s void rpmv2i long s long s void xfpt2i long s long s void objdelete long s long s void patchcurves long s long s void minsize long s long s void maxsize long s long s void keepaspect long s long s void prefsize long s long s void stepunit long s long s void fudge long s long s void winmove long s long s # void attachcursor short s short s void deflinestyle short s short s void noise short s short s void picksize short s short s void qenter short s short s void setdepth short s short s void cmov2s short s short s void draw2s short s short s void move2s short s short s void pdr2s short s short s void pmv2s short s short s void pnt2s short s short s void rdr2s short s short s void rmv2s short s short s void rpdr2s short s short s void rpmv2s short s short s void xfpt2s short s short s # void cmov2 float s float s void draw2 float s float s void move2 float s float s void pnt2 float s float s void pdr2 float s float s void pmv2 float s float s void rdr2 float s float s void rmv2 float s float s void rpdr2 float s float s void rpmv2 float s float s void xfpt2 float s float s # void loadmatrix float s[4*4] # Really [4][4] void multmatrix float s[4*4] # Really [4][4] void crv float s[3*4] # Really [4][3] void rcrv float s[4*4] # Really [4][4] # # Methods that have strings. # void addtopup long s char *s long s void charstr char *s void getport char *s long strwidth char *s long winopen char *s void wintitle char *s # # Methods that have 1 long (# of elements) and an array # void polf long s float s[3*arg1] void polf2 long s float s[2*arg1] void poly long s float s[3*arg1] void poly2 long s float s[2*arg1] void crvn long s float s[3*arg1] void rcrvn long s float s[4*arg1] # void polf2i long s long s[2*arg1] void polfi long s long s[3*arg1] void poly2i long s long s[2*arg1] void polyi long s long s[3*arg1] # void polf2s long s short s[2*arg1] void polfs long s short s[3*arg1] void polys long s short s[3*arg1] void poly2s long s short s[2*arg1] # void defcursor short s u_short s[128] # Is this useful? void writepixels short s u_short s[arg1] # Should be unsigned short... void defbasis long s float s[4*4] if !solaris void gewrite short s short s[arg1] # void rotate short s char s # This is not in the library!? ###void setbutton short s char s void rot float s char s # void circfi long s long s long s void circi long s long s long s void cmovi long s long s long s void drawi long s long s long s void movei long s long s long s void pnti long s long s long s void newtag long s long s long s void pdri long s long s long s void pmvi long s long s long s void rdri long s long s long s void rmvi long s long s long s void rpdri long s long s long s void rpmvi long s long s long s void xfpti long s long s long s # void circ float s float s float s void circf float s float s float s void cmov float s float s float s void draw float s float s float s void move float s float s float s void pnt float s float s float s void scale float s float s float s void translate float s float s float s void pdr float s float s float s void pmv float s float s float s void rdr float s float s float s void rmv float s float s float s void rpdr float s float s float s void rpmv float s float s float s void xfpt float s float s float s # void RGBcolor short s short s short s void RGBwritemask short s short s short s void setcursor short s short s short s void tie short s short s short s void circfs short s short s short s void circs short s short s short s void cmovs short s short s short s void draws short s short s short s void moves short s short s short s void pdrs short s short s short s void pmvs short s short s short s void pnts short s short s short s void rdrs short s short s short s void rmvs short s short s short s void rpdrs short s short s short s void rpmvs short s short s short s void xfpts short s short s short s void curorigin short s short s short s void cyclemap short s short s short s # void patch float s[4*4] float s[4*4] float s[4*4] void splf long s float s[3*arg1] u_short s[arg1] void splf2 long s float s[2*arg1] u_short s[arg1] void splfi long s long s[3*arg1] u_short s[arg1] void splf2i long s long s[2*arg1] u_short s[arg1] void splfs long s short s[3*arg1] u_short s[arg1] void splf2s long s short s[2*arg1] u_short s[arg1] ###void defpattern short s short s u_short s[arg2*arg2/16] # void rpatch float s[4*4] float s[4*4] float s[4*4] float s[4*4] # # routines that send 4 floats # void ortho2 float s float s float s float s void rect float s float s float s float s void rectf float s float s float s float s void xfpt4 float s float s float s float s # void textport short s short s short s short s void mapcolor short s short s short s short s void scrmask short s short s short s short s void setvaluator short s short s short s short s void viewport short s short s short s short s void shaderange short s short s short s short s void xfpt4s short s short s short s short s void rectfi long s long s long s long s void recti long s long s long s long s void xfpt4i long s long s long s long s void prefposition long s long s long s long s # void arc float s float s float s short s short s void arcf float s float s float s short s short s void arcfi long s long s long s short s short s void arci long s long s long s short s short s # void bbox2 short s short s float s float s float s float s void bbox2i short s short s long s long s long s long s void bbox2s short s short s short s short s short s short s void blink short s short s short s short s short s void ortho float s float s float s float s float s float s void window float s float s float s float s float s float s void lookat float s float s float s float s float s float s short s # void perspective short s float s float s float s void polarview float s short s short s short s # XXX getichararray not supported #void writeRGB short s char s[arg1] char s[arg1] char s[arg1] # void arcfs short s short s short s short s short s void arcs short s short s short s short s short s void rectcopy short s short s short s short s short s short s if !solaris void RGBcursor short s short s short s short s short s short s short s # long getbutton short s long getcmmode long getlsbackup long getresetls long getdcm long getzbuffer long ismex long isobj long s long isqueued short s long istag long s # long genobj long gentag long getbuffer long getcolor long getdisplaymode long getfont long getheight long gethitcode long getlstyle long getlwidth long getmap long getplanes long getwritemask long qtest long getlsrepeat long getmonitor long getopenobj long getpattern long winget long winattach long getothermonitor long newpup # long getvaluator short s void winset long s long dopup long s void getdepth short r short r void getcpos short r short r void getsize long r long r void getorigin long r long r void getviewport short r short r short r short r if !solaris void gettp short r short r short r short r void getgpos float r float r float r float r void winposition long s long s long s long s void gRGBcolor short r short r short r void gRGBmask short r short r short r void getscrmask short r short r short r short r ###void gRGBcursor short r short r short r short r short r short r short r short r void getmcolor short s short r short r short r void mapw long s short s short s float r float r float r float r float r float r void mapw2 long s short s short s float r float r ###void defrasterfont short s short s short s Fontchar s[arg3] short s short s[4*arg5] ###long qread short r void getcursor short r u_short r u_short r long r # # For these we receive arrays of stuff # ###void getdev long s short s[arg1] short r[arg1] #XXX not generated correctly yet #void getmatrix float r[16] ###long readpixels short s short r[retval] ###long readRGB short s char r[retval] char r[retval] char r[retval] ###long blkqread short s short r[arg1] # # New 4D routines # void cmode void concave long s void curstype long s void drawmode long s void gammaramp short s[256] short s[256] short s[256] long getbackface long getdescender long getdrawmode long getmmode long getsm long getvideo long s void imakebackground void lmbind short s short s void lmdef long s long s long s float s[arg3] void mmode long s void normal float s[3] void overlay long s void RGBrange short s short s short s short s short s short s short s short s if !solaris void setvideo long s long s void shademodel long s void underlay long s # # New Personal Iris/GT Routines # void bgnclosedline void bgnline void bgnpoint void bgnpolygon void bgnsurface void bgntmesh void bgntrim void endclosedline void endline void endpoint void endpolygon void endsurface void endtmesh void endtrim void blendfunction long s long s void c3f float s[3] void c3i long s[3] void c3s short s[3] void c4f float s[4] void c4i long s[4] void c4s short s[4] void colorf float s void cpack long s void czclear long s long s void dglclose long s long dglopen char *s long s long getgdesc long s void getnurbsproperty long s float r void glcompat long s long s void iconsize long s long s void icontitle char *s void lRGBrange short s short s short s short s short s short s long s long s void linesmooth long s void lmcolor long s void logicop long s ###long lrectread short s short s short s short s long r[retval] ###void lrectwrite short s short s short s short s long s[(arg2-arg1+1)*(arg4-arg3+1)] ### Now manual, with string last arg ###long rectread short s short s short s short s short r[retval] ###void rectwrite short s short s short s short s short s[(arg2-arg1+1)*(arg4-arg3+1)] void lsetdepth long s long s void lshaderange short s short s long s long s void n3f float s[3] void noborder void pntsmooth long s void readsource long s void rectzoom float s float s void sbox float s float s float s float s void sboxi long s long s long s long s void sboxs short s short s short s short s void sboxf float s float s float s float s void sboxfi long s long s long s long s void sboxfs short s short s short s short s void setnurbsproperty long s float s void setpup long s long s long s void smoothline long s void subpixel long s void swaptmesh long swinopen long s void v2f float s[2] void v2i long s[2] void v2s short s[2] void v3f float s[3] void v3i long s[3] void v3s short s[3] void v4f float s[4] void v4i long s[4] void v4s short s[4] void videocmd long s long windepth long s void wmpack long s void zdraw long s void zfunction long s void zsource long s void zwritemask long s # # uses doubles # void v2d double s[2] void v3d double s[3] void v4d double s[4] # # Why isn't this here? # void pixmode long s long s # # New in IRIX 4.0 # long qgetfd void dither long s Python-2.3.7/Modules/fcntlmodule.c0000644001241000117560000003560707677714074016376 0ustar loewishpifb6 /* fcntl module */ #include "Python.h" #ifdef HAVE_SYS_FILE_H #include #endif #include #include #ifdef HAVE_STROPTS_H #include #endif static int conv_descriptor(PyObject *object, int *target) { int fd = PyObject_AsFileDescriptor(object); if (fd < 0) return 0; *target = fd; return 1; } /* fcntl(fd, opt, [arg]) */ static PyObject * fcntl_fcntl(PyObject *self, PyObject *args) { int fd; int code; int arg; int ret; char *str; int len; char buf[1024]; if (PyArg_ParseTuple(args, "O&is#:fcntl", conv_descriptor, &fd, &code, &str, &len)) { if (len > sizeof buf) { PyErr_SetString(PyExc_ValueError, "fcntl string arg too long"); return NULL; } memcpy(buf, str, len); Py_BEGIN_ALLOW_THREADS ret = fcntl(fd, code, buf); Py_END_ALLOW_THREADS if (ret < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyString_FromStringAndSize(buf, len); } PyErr_Clear(); arg = 0; if (!PyArg_ParseTuple(args, "O&i|i;fcntl requires a file or file descriptor," " an integer and optionally a third integer or a string", conv_descriptor, &fd, &code, &arg)) { return NULL; } Py_BEGIN_ALLOW_THREADS ret = fcntl(fd, code, arg); Py_END_ALLOW_THREADS if (ret < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyInt_FromLong((long)ret); } PyDoc_STRVAR(fcntl_doc, "fcntl(fd, opt, [arg])\n\ \n\ Perform the requested operation on file descriptor fd. The operation\n\ is defined by op and is operating system dependent. These constants are\n\ available from the fcntl module. The argument arg is optional, and\n\ defaults to 0; it may be an int or a string. If arg is given as a string,\n\ the return value of fcntl is a string of that length, containing the\n\ resulting value put in the arg buffer by the operating system.The length\n\ of the arg string is not allowed to exceed 1024 bytes. If the arg given\n\ is an integer or if none is specified, the result value is an integer\n\ corresponding to the return value of the fcntl call in the C code."); /* ioctl(fd, opt, [arg]) */ static PyObject * fcntl_ioctl(PyObject *self, PyObject *args) { int fd; int code; int arg; int ret; char *str; int len; int mutate_arg = 0; char buf[1024]; if (PyArg_ParseTuple(args, "O&iw#|i:ioctl", conv_descriptor, &fd, &code, &str, &len, &mutate_arg)) { char *arg; if (PyTuple_Size(args) == 3) { /* warning goes here in 2.4 */ mutate_arg = 0; } if (mutate_arg) { if (len <= sizeof buf) { memcpy(buf, str, len); arg = buf; } else { arg = str; } } else { if (len > sizeof buf) { PyErr_SetString(PyExc_ValueError, "ioctl string arg too long"); return NULL; } else { memcpy(buf, str, len); arg = buf; } } if (buf == arg) { Py_BEGIN_ALLOW_THREADS /* think array.resize() */ ret = ioctl(fd, code, arg); Py_END_ALLOW_THREADS } else { ret = ioctl(fd, code, arg); } if (mutate_arg && (len < sizeof buf)) { memcpy(str, buf, len); } if (ret < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } if (mutate_arg) { return PyInt_FromLong(ret); } else { return PyString_FromStringAndSize(buf, len); } } PyErr_Clear(); if (PyArg_ParseTuple(args, "O&is#:ioctl", conv_descriptor, &fd, &code, &str, &len)) { if (len > sizeof buf) { PyErr_SetString(PyExc_ValueError, "ioctl string arg too long"); return NULL; } memcpy(buf, str, len); Py_BEGIN_ALLOW_THREADS ret = ioctl(fd, code, buf); Py_END_ALLOW_THREADS if (ret < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyString_FromStringAndSize(buf, len); } PyErr_Clear(); arg = 0; if (!PyArg_ParseTuple(args, "O&i|i;ioctl requires a file or file descriptor," " an integer and optionally a integer or buffer argument", conv_descriptor, &fd, &code, &arg)) { return NULL; } Py_BEGIN_ALLOW_THREADS #ifdef __VMS ret = ioctl(fd, code, (void *)arg); #else ret = ioctl(fd, code, arg); #endif Py_END_ALLOW_THREADS if (ret < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyInt_FromLong((long)ret); } PyDoc_STRVAR(ioctl_doc, "ioctl(fd, opt[, arg[, mutate_flag]])\n\ \n\ Perform the requested operation on file descriptor fd. The operation is\n\ defined by opt and is operating system dependent. Typically these codes are\n\ retrieved from the fcntl or termios library modules.\n\ \n\ The argument arg is optional, and defaults to 0; it may be an int or a\n\ buffer containing character data (most likely a string or an array). \n\ \n\ If the argument is a mutable buffer (such as an array) and if the\n\ mutate_flag argument (which is only allowed in this case) is true then the\n\ buffer is (in effect) passed to the operating system and changes made by\n\ the OS will be reflected in the contents of the buffer after the call has\n\ returned. The return value is the integer returned by the ioctl system\n\ call.\n\ \n\ If the argument is a mutable buffer and the mutable_flag argument is not\n\ passed or is false, the behavior is as if a string had been passed. This\n\ behavior will change in future releases of Python.\n\ \n\ If the argument is an immutable buffer (most likely a string) then a copy\n\ of the buffer is passed to the operating system and the return value is a\n\ string of the same length containing whatever the operating system put in\n\ the buffer. The length of the arg buffer in this case is not allowed to\n\ exceed 1024 bytes.\n\ \n\ If the arg given is an integer or if none is specified, the result value is\n\ an integer corresponding to the return value of the ioctl call in the C\n\ code."); /* flock(fd, operation) */ static PyObject * fcntl_flock(PyObject *self, PyObject *args) { int fd; int code; int ret; if (!PyArg_ParseTuple(args, "O&i:flock", conv_descriptor, &fd, &code)) return NULL; #ifdef HAVE_FLOCK Py_BEGIN_ALLOW_THREADS ret = flock(fd, code); Py_END_ALLOW_THREADS #else #ifndef LOCK_SH #define LOCK_SH 1 /* shared lock */ #define LOCK_EX 2 /* exclusive lock */ #define LOCK_NB 4 /* don't block when locking */ #define LOCK_UN 8 /* unlock */ #endif { struct flock l; if (code == LOCK_UN) l.l_type = F_UNLCK; else if (code & LOCK_SH) l.l_type = F_RDLCK; else if (code & LOCK_EX) l.l_type = F_WRLCK; else { PyErr_SetString(PyExc_ValueError, "unrecognized flock argument"); return NULL; } l.l_whence = l.l_start = l.l_len = 0; Py_BEGIN_ALLOW_THREADS ret = fcntl(fd, (code & LOCK_NB) ? F_SETLK : F_SETLKW, &l); Py_END_ALLOW_THREADS } #endif /* HAVE_FLOCK */ if (ret < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(flock_doc, "flock(fd, operation)\n\ \n\ Perform the lock operation op on file descriptor fd. See the Unix \n\ manual flock(3) for details. (On some systems, this function is\n\ emulated using fcntl().)"); /* lockf(fd, operation) */ static PyObject * fcntl_lockf(PyObject *self, PyObject *args) { int fd, code, ret, whence = 0; PyObject *lenobj = NULL, *startobj = NULL; if (!PyArg_ParseTuple(args, "O&i|OOi:lockf", conv_descriptor, &fd, &code, &lenobj, &startobj, &whence)) return NULL; #if defined(PYOS_OS2) && defined(PYCC_GCC) PyErr_SetString(PyExc_NotImplementedError, "lockf not supported on OS/2 (EMX)"); return NULL; #else #ifndef LOCK_SH #define LOCK_SH 1 /* shared lock */ #define LOCK_EX 2 /* exclusive lock */ #define LOCK_NB 4 /* don't block when locking */ #define LOCK_UN 8 /* unlock */ #endif /* LOCK_SH */ { struct flock l; if (code == LOCK_UN) l.l_type = F_UNLCK; else if (code & LOCK_SH) l.l_type = F_RDLCK; else if (code & LOCK_EX) l.l_type = F_WRLCK; else { PyErr_SetString(PyExc_ValueError, "unrecognized flock argument"); return NULL; } l.l_start = l.l_len = 0; if (startobj != NULL) { #if !defined(HAVE_LARGEFILE_SUPPORT) l.l_start = PyInt_AsLong(startobj); #else l.l_start = PyLong_Check(startobj) ? PyLong_AsLongLong(startobj) : PyInt_AsLong(startobj); #endif if (PyErr_Occurred()) return NULL; } if (lenobj != NULL) { #if !defined(HAVE_LARGEFILE_SUPPORT) l.l_len = PyInt_AsLong(lenobj); #else l.l_len = PyLong_Check(lenobj) ? PyLong_AsLongLong(lenobj) : PyInt_AsLong(lenobj); #endif if (PyErr_Occurred()) return NULL; } l.l_whence = whence; Py_BEGIN_ALLOW_THREADS ret = fcntl(fd, (code & LOCK_NB) ? F_SETLK : F_SETLKW, &l); Py_END_ALLOW_THREADS } if (ret < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } Py_INCREF(Py_None); return Py_None; #endif /* defined(PYOS_OS2) && defined(PYCC_GCC) */ } PyDoc_STRVAR(lockf_doc, "lockf (fd, operation, length=0, start=0, whence=0)\n\ \n\ This is essentially a wrapper around the fcntl() locking calls. fd is the\n\ file descriptor of the file to lock or unlock, and operation is one of the\n\ following values:\n\ \n\ LOCK_UN - unlock\n\ LOCK_SH - acquire a shared lock\n\ LOCK_EX - acquire an exclusive lock\n\ \n\ When operation is LOCK_SH or LOCK_EX, it can also be bit-wise OR'd with\n\ LOCK_NB to avoid blocking on lock acquisition. If LOCK_NB is used and the\n\ lock cannot be acquired, an IOError will be raised and the exception will\n\ have an errno attribute set to EACCES or EAGAIN (depending on the operating\n\ system -- for portability, check for either value).\n\ \n\ length is the number of bytes to lock, with the default meaning to lock to\n\ EOF. start is the byte offset, relative to whence, to that the lock\n\ starts. whence is as with fileobj.seek(), specifically:\n\ \n\ 0 - relative to the start of the file (SEEK_SET)\n\ 1 - relative to the current buffer position (SEEK_CUR)\n\ 2 - relative to the end of the file (SEEK_END)"); /* List of functions */ static PyMethodDef fcntl_methods[] = { {"fcntl", fcntl_fcntl, METH_VARARGS, fcntl_doc}, {"ioctl", fcntl_ioctl, METH_VARARGS, ioctl_doc}, {"flock", fcntl_flock, METH_VARARGS, flock_doc}, {"lockf", fcntl_lockf, METH_VARARGS, lockf_doc}, {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(module_doc, "This module performs file control and I/O control on file \n\ descriptors. It is an interface to the fcntl() and ioctl() Unix\n\ routines. File descriptors can be obtained with the fileno() method of\n\ a file or socket object."); /* Module initialisation */ static int ins(PyObject* d, char* symbol, long value) { PyObject* v = PyInt_FromLong(value); if (!v || PyDict_SetItemString(d, symbol, v) < 0) return -1; Py_DECREF(v); return 0; } #define INS(x) if (ins(d, #x, (long)x)) return -1 static int all_ins(PyObject* d) { if (ins(d, "LOCK_SH", (long)LOCK_SH)) return -1; if (ins(d, "LOCK_EX", (long)LOCK_EX)) return -1; if (ins(d, "LOCK_NB", (long)LOCK_NB)) return -1; if (ins(d, "LOCK_UN", (long)LOCK_UN)) return -1; /* GNU extensions, as of glibc 2.2.4 */ #ifdef LOCK_MAND if (ins(d, "LOCK_MAND", (long)LOCK_MAND)) return -1; #endif #ifdef LOCK_READ if (ins(d, "LOCK_READ", (long)LOCK_READ)) return -1; #endif #ifdef LOCK_WRITE if (ins(d, "LOCK_WRITE", (long)LOCK_WRITE)) return -1; #endif #ifdef LOCK_RW if (ins(d, "LOCK_RW", (long)LOCK_RW)) return -1; #endif #ifdef F_DUPFD if (ins(d, "F_DUPFD", (long)F_DUPFD)) return -1; #endif #ifdef F_GETFD if (ins(d, "F_GETFD", (long)F_GETFD)) return -1; #endif #ifdef F_SETFD if (ins(d, "F_SETFD", (long)F_SETFD)) return -1; #endif #ifdef F_GETFL if (ins(d, "F_GETFL", (long)F_GETFL)) return -1; #endif #ifdef F_SETFL if (ins(d, "F_SETFL", (long)F_SETFL)) return -1; #endif #ifdef F_GETLK if (ins(d, "F_GETLK", (long)F_GETLK)) return -1; #endif #ifdef F_SETLK if (ins(d, "F_SETLK", (long)F_SETLK)) return -1; #endif #ifdef F_SETLKW if (ins(d, "F_SETLKW", (long)F_SETLKW)) return -1; #endif #ifdef F_GETOWN if (ins(d, "F_GETOWN", (long)F_GETOWN)) return -1; #endif #ifdef F_SETOWN if (ins(d, "F_SETOWN", (long)F_SETOWN)) return -1; #endif #ifdef F_GETSIG if (ins(d, "F_GETSIG", (long)F_GETSIG)) return -1; #endif #ifdef F_SETSIG if (ins(d, "F_SETSIG", (long)F_SETSIG)) return -1; #endif #ifdef F_RDLCK if (ins(d, "F_RDLCK", (long)F_RDLCK)) return -1; #endif #ifdef F_WRLCK if (ins(d, "F_WRLCK", (long)F_WRLCK)) return -1; #endif #ifdef F_UNLCK if (ins(d, "F_UNLCK", (long)F_UNLCK)) return -1; #endif /* LFS constants */ #ifdef F_GETLK64 if (ins(d, "F_GETLK64", (long)F_GETLK64)) return -1; #endif #ifdef F_SETLK64 if (ins(d, "F_SETLK64", (long)F_SETLK64)) return -1; #endif #ifdef F_SETLKW64 if (ins(d, "F_SETLKW64", (long)F_SETLKW64)) return -1; #endif /* GNU extensions, as of glibc 2.2.4. */ #ifdef F_SETLEASE if (ins(d, "F_SETLEASE", (long)F_SETLEASE)) return -1; #endif #ifdef F_GETLEASE if (ins(d, "F_GETLEASE", (long)F_GETLEASE)) return -1; #endif #ifdef F_NOTIFY if (ins(d, "F_NOTIFY", (long)F_NOTIFY)) return -1; #endif /* Old BSD flock(). */ #ifdef F_EXLCK if (ins(d, "F_EXLCK", (long)F_EXLCK)) return -1; #endif #ifdef F_SHLCK if (ins(d, "F_SHLCK", (long)F_SHLCK)) return -1; #endif /* For F_{GET|SET}FL */ #ifdef FD_CLOEXEC if (ins(d, "FD_CLOEXEC", (long)FD_CLOEXEC)) return -1; #endif /* For F_NOTIFY */ #ifdef DN_ACCESS if (ins(d, "DN_ACCESS", (long)DN_ACCESS)) return -1; #endif #ifdef DN_MODIFY if (ins(d, "DN_MODIFY", (long)DN_MODIFY)) return -1; #endif #ifdef DN_CREATE if (ins(d, "DN_CREATE", (long)DN_CREATE)) return -1; #endif #ifdef DN_DELETE if (ins(d, "DN_DELETE", (long)DN_DELETE)) return -1; #endif #ifdef DN_RENAME if (ins(d, "DN_RENAME", (long)DN_RENAME)) return -1; #endif #ifdef DN_ATTRIB if (ins(d, "DN_ATTRIB", (long)DN_ATTRIB)) return -1; #endif #ifdef DN_MULTISHOT if (ins(d, "DN_MULTISHOT", (long)DN_MULTISHOT)) return -1; #endif #ifdef HAVE_STROPTS_H /* Unix 98 guarantees that these are in stropts.h. */ INS(I_PUSH); INS(I_POP); INS(I_LOOK); INS(I_FLUSH); INS(I_FLUSHBAND); INS(I_SETSIG); INS(I_GETSIG); INS(I_FIND); INS(I_PEEK); INS(I_SRDOPT); INS(I_GRDOPT); INS(I_NREAD); INS(I_FDINSERT); INS(I_STR); INS(I_SWROPT); #ifdef I_GWROPT /* despite the comment above, old-ish glibcs miss a couple... */ INS(I_GWROPT); #endif INS(I_SENDFD); INS(I_RECVFD); INS(I_LIST); INS(I_ATMARK); INS(I_CKBAND); INS(I_GETBAND); INS(I_CANPUT); INS(I_SETCLTIME); #ifdef I_GETCLTIME INS(I_GETCLTIME); #endif INS(I_LINK); INS(I_UNLINK); INS(I_PLINK); INS(I_PUNLINK); #endif return 0; } PyMODINIT_FUNC initfcntl(void) { PyObject *m, *d; /* Create the module and add the functions and documentation */ m = Py_InitModule3("fcntl", fcntl_methods, module_doc); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); all_ins(d); } Python-2.3.7/Modules/getnameinfo.c0000644001241000117560000001306107402377511016327 0ustar loewishpifb6/* * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of the project nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ /* * Issues to be discussed: * - Thread safe-ness must be checked * - Return values. There seems to be no standard for return value (RFC2133) * but INRIA implementation returns EAI_xxx defined for getaddrinfo(). */ #if 0 #include #include #include #include #include #include #include #include #include #include "addrinfo.h" #endif #define SUCCESS 0 #define YES 1 #define NO 0 static struct gni_afd { int a_af; int a_addrlen; int a_socklen; int a_off; } gni_afdl [] = { #ifdef ENABLE_IPV6 {PF_INET6, sizeof(struct in6_addr), sizeof(struct sockaddr_in6), offsetof(struct sockaddr_in6, sin6_addr)}, #endif {PF_INET, sizeof(struct in_addr), sizeof(struct sockaddr_in), offsetof(struct sockaddr_in, sin_addr)}, {0, 0, 0}, }; struct gni_sockinet { u_char si_len; u_char si_family; u_short si_port; }; #define ENI_NOSOCKET 0 #define ENI_NOSERVNAME 1 #define ENI_NOHOSTNAME 2 #define ENI_MEMORY 3 #define ENI_SYSTEM 4 #define ENI_FAMILY 5 #define ENI_SALEN 6 /* forward declaration to make gcc happy */ int getnameinfo Py_PROTO((const struct sockaddr *, size_t, char *, size_t, char *, size_t, int)); int getnameinfo(sa, salen, host, hostlen, serv, servlen, flags) const struct sockaddr *sa; size_t salen; char *host; size_t hostlen; char *serv; size_t servlen; int flags; { struct gni_afd *gni_afd; struct servent *sp; struct hostent *hp; u_short port; int family, len, i; char *addr, *p; u_long v4a; #ifdef ENABLE_IPV6 u_char pfx; #endif int h_error; char numserv[512]; char numaddr[512]; if (sa == NULL) return ENI_NOSOCKET; #ifdef HAVE_SOCKADDR_SA_LEN len = sa->sa_len; if (len != salen) return ENI_SALEN; #else len = salen; #endif family = sa->sa_family; for (i = 0; gni_afdl[i].a_af; i++) if (gni_afdl[i].a_af == family) { gni_afd = &gni_afdl[i]; goto found; } return ENI_FAMILY; found: if (len != gni_afd->a_socklen) return ENI_SALEN; port = ((struct gni_sockinet *)sa)->si_port; /* network byte order */ addr = (char *)sa + gni_afd->a_off; if (serv == NULL || servlen == 0) { /* what we should do? */ } else if (flags & NI_NUMERICSERV) { sprintf(numserv, "%d", ntohs(port)); if (strlen(numserv) > servlen) return ENI_MEMORY; strcpy(serv, numserv); } else { sp = getservbyport(port, (flags & NI_DGRAM) ? "udp" : "tcp"); if (sp) { if (strlen(sp->s_name) > servlen) return ENI_MEMORY; strcpy(serv, sp->s_name); } else return ENI_NOSERVNAME; } switch (sa->sa_family) { case AF_INET: v4a = ((struct sockaddr_in *)sa)->sin_addr.s_addr; if (IN_MULTICAST(v4a) || IN_EXPERIMENTAL(v4a)) flags |= NI_NUMERICHOST; v4a >>= IN_CLASSA_NSHIFT; if (v4a == 0 || v4a == IN_LOOPBACKNET) flags |= NI_NUMERICHOST; break; #ifdef ENABLE_IPV6 case AF_INET6: pfx = ((struct sockaddr_in6 *)sa)->sin6_addr.s6_addr8[0]; if (pfx == 0 || pfx == 0xfe || pfx == 0xff) flags |= NI_NUMERICHOST; break; #endif } if (host == NULL || hostlen == 0) { /* what should we do? */ } else if (flags & NI_NUMERICHOST) { if (inet_ntop(gni_afd->a_af, addr, numaddr, sizeof(numaddr)) == NULL) return ENI_SYSTEM; if (strlen(numaddr) > hostlen) return ENI_MEMORY; strcpy(host, numaddr); } else { #ifdef ENABLE_IPV6 hp = getipnodebyaddr(addr, gni_afd->a_addrlen, gni_afd->a_af, &h_error); #else hp = gethostbyaddr(addr, gni_afd->a_addrlen, gni_afd->a_af); h_error = h_errno; #endif if (hp) { if (flags & NI_NOFQDN) { p = strchr(hp->h_name, '.'); if (p) *p = '\0'; } if (strlen(hp->h_name) > hostlen) { #ifdef ENABLE_IPV6 freehostent(hp); #endif return ENI_MEMORY; } strcpy(host, hp->h_name); #ifdef ENABLE_IPV6 freehostent(hp); #endif } else { if (flags & NI_NAMEREQD) return ENI_NOHOSTNAME; if (inet_ntop(gni_afd->a_af, addr, numaddr, sizeof(numaddr)) == NULL) return ENI_NOHOSTNAME; if (strlen(numaddr) > hostlen) return ENI_MEMORY; strcpy(host, numaddr); } } return SUCCESS; } Python-2.3.7/Modules/_sre.c0000644001241000117560000025147207757556026015012 0ustar loewishpifb6/* * Secret Labs' Regular Expression Engine * * regular expression matching engine * * partial history: * 1999-10-24 fl created (based on existing template matcher code) * 2000-03-06 fl first alpha, sort of * 2000-08-01 fl fixes for 1.6b1 * 2000-08-07 fl use PyOS_CheckStack() if available * 2000-09-20 fl added expand method * 2001-03-20 fl lots of fixes for 2.1b2 * 2001-04-15 fl export copyright as Python attribute, not global * 2001-04-28 fl added __copy__ methods (work in progress) * 2001-05-14 fl fixes for 1.5.2 compatibility * 2001-07-01 fl added BIGCHARSET support (from Martin von Loewis) * 2001-10-18 fl fixed group reset issue (from Matthew Mueller) * 2001-10-20 fl added split primitive; reenable unicode for 1.6/2.0/2.1 * 2001-10-21 fl added sub/subn primitive * 2001-10-24 fl added finditer primitive (for 2.2 only) * 2001-12-07 fl fixed memory leak in sub/subn (Guido van Rossum) * 2002-11-09 fl fixed empty sub/subn return type * 2003-04-18 mvl fully support 4-byte codes * * Copyright (c) 1997-2001 by Secret Labs AB. All rights reserved. * * This version of the SRE library can be redistributed under CNRI's * Python 1.6 license. For any other use, please contact Secret Labs * AB (info@pythonware.com). * * Portions of this engine have been developed in cooperation with * CNRI. Hewlett-Packard provided funding for 1.6 integration and * other compatibility work. */ #ifndef SRE_RECURSIVE static char copyright[] = " SRE 2.2.2 Copyright (c) 1997-2002 by Secret Labs AB "; #include "Python.h" #include "structmember.h" /* offsetof */ #include "sre.h" #include /* name of this module, minus the leading underscore */ #if !defined(SRE_MODULE) #define SRE_MODULE "sre" #endif /* defining this one enables tracing */ #undef VERBOSE #if PY_VERSION_HEX >= 0x01060000 #if PY_VERSION_HEX < 0x02020000 || defined(Py_USING_UNICODE) /* defining this enables unicode support (default under 1.6a1 and later) */ #define HAVE_UNICODE #endif #endif /* -------------------------------------------------------------------- */ /* optional features */ /* prevent run-away recursion (bad patterns on long strings) */ #ifndef USE_STACKCHECK #if defined(MS_WIN64) || defined(__LP64__) || defined(_LP64) /* require smaller recursion limit for a number of 64-bit platforms: * Win64 (MS_WIN64), Linux64 (__LP64__), Monterey (64-bit AIX) (_LP64) */ /* FIXME: maybe the limit should be 40000 / sizeof(void*) ? */ #define USE_RECURSION_LIMIT 7500 #elif defined(__FreeBSD__) /* FreeBSD/amd64 and /sparc64 require even smaller limits */ #if defined(__amd64__) #define USE_RECURSION_LIMIT 6000 #elif defined(__sparc64__) #define USE_RECURSION_LIMIT 3000 #elif defined(__GNUC__) && defined(WITH_THREAD) /* the pthreads library on FreeBSD has a fixed 1MB stack size for * the initial (or "primary") thread, which is insufficient for * the default recursion limit. gcc 3.x at the default * optimisation level (-O3) uses stack space more aggressively * than gcc 2.95. */ #if (__GNUC__ > 2) #define USE_RECURSION_LIMIT 6500 #else #define USE_RECURSION_LIMIT 7500 #endif #endif #endif /* special cases for USE_RECURSION_LIMIT */ #ifndef USE_RECURSION_LIMIT /* default if not overriden above */ #define USE_RECURSION_LIMIT 10000 #endif #endif /* !USE_STACKCHECK */ /* enables fast searching */ #define USE_FAST_SEARCH /* enables aggressive inlining (always on for Visual C) */ #undef USE_INLINE /* enables copy/deepcopy handling (work in progress) */ #undef USE_BUILTIN_COPY #if PY_VERSION_HEX < 0x01060000 #define PyObject_DEL(op) PyMem_DEL((op)) #endif /* -------------------------------------------------------------------- */ #if defined(_MSC_VER) #pragma optimize("agtw", on) /* doesn't seem to make much difference... */ #pragma warning(disable: 4710) /* who cares if functions are not inlined ;-) */ /* fastest possible local call under MSVC */ #define LOCAL(type) static __inline type __fastcall #elif defined(USE_INLINE) #define LOCAL(type) static inline type #else #define LOCAL(type) static type #endif /* error codes */ #define SRE_ERROR_ILLEGAL -1 /* illegal opcode */ #define SRE_ERROR_STATE -2 /* illegal state */ #define SRE_ERROR_RECURSION_LIMIT -3 /* runaway recursion */ #define SRE_ERROR_MEMORY -9 /* out of memory */ #if defined(VERBOSE) #define TRACE(v) printf v #else #define TRACE(v) #endif /* -------------------------------------------------------------------- */ /* search engine state */ /* default character predicates (run sre_chars.py to regenerate tables) */ #define SRE_DIGIT_MASK 1 #define SRE_SPACE_MASK 2 #define SRE_LINEBREAK_MASK 4 #define SRE_ALNUM_MASK 8 #define SRE_WORD_MASK 16 /* FIXME: this assumes ASCII. create tables in init_sre() instead */ static char sre_char_info[128] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 6, 2, 2, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 0, 0, 0, 0, 0, 0, 0, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 0, 0, 0, 0, 16, 0, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 0, 0, 0, 0, 0 }; static char sre_char_lower[128] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127 }; #define SRE_IS_DIGIT(ch)\ ((ch) < 128 ? (sre_char_info[(ch)] & SRE_DIGIT_MASK) : 0) #define SRE_IS_SPACE(ch)\ ((ch) < 128 ? (sre_char_info[(ch)] & SRE_SPACE_MASK) : 0) #define SRE_IS_LINEBREAK(ch)\ ((ch) < 128 ? (sre_char_info[(ch)] & SRE_LINEBREAK_MASK) : 0) #define SRE_IS_ALNUM(ch)\ ((ch) < 128 ? (sre_char_info[(ch)] & SRE_ALNUM_MASK) : 0) #define SRE_IS_WORD(ch)\ ((ch) < 128 ? (sre_char_info[(ch)] & SRE_WORD_MASK) : 0) static unsigned int sre_lower(unsigned int ch) { return ((ch) < 128 ? sre_char_lower[ch] : ch); } /* locale-specific character predicates */ #define SRE_LOC_IS_DIGIT(ch) ((ch) < 256 ? isdigit((ch)) : 0) #define SRE_LOC_IS_SPACE(ch) ((ch) < 256 ? isspace((ch)) : 0) #define SRE_LOC_IS_LINEBREAK(ch) ((ch) == '\n') #define SRE_LOC_IS_ALNUM(ch) ((ch) < 256 ? isalnum((ch)) : 0) #define SRE_LOC_IS_WORD(ch) (SRE_LOC_IS_ALNUM((ch)) || (ch) == '_') static unsigned int sre_lower_locale(unsigned int ch) { return ((ch) < 256 ? tolower((ch)) : ch); } /* unicode-specific character predicates */ #if defined(HAVE_UNICODE) #define SRE_UNI_IS_DIGIT(ch) Py_UNICODE_ISDIGIT((Py_UNICODE)(ch)) #define SRE_UNI_IS_SPACE(ch) Py_UNICODE_ISSPACE((Py_UNICODE)(ch)) #define SRE_UNI_IS_LINEBREAK(ch) Py_UNICODE_ISLINEBREAK((Py_UNICODE)(ch)) #define SRE_UNI_IS_ALNUM(ch) Py_UNICODE_ISALNUM((Py_UNICODE)(ch)) #define SRE_UNI_IS_WORD(ch) (SRE_UNI_IS_ALNUM((ch)) || (ch) == '_') static unsigned int sre_lower_unicode(unsigned int ch) { return (unsigned int) Py_UNICODE_TOLOWER((Py_UNICODE)(ch)); } #endif /* HAVE_UNICODE */ LOCAL(int) sre_category(SRE_CODE category, unsigned int ch) { switch (category) { case SRE_CATEGORY_DIGIT: return SRE_IS_DIGIT(ch); case SRE_CATEGORY_NOT_DIGIT: return !SRE_IS_DIGIT(ch); case SRE_CATEGORY_SPACE: return SRE_IS_SPACE(ch); case SRE_CATEGORY_NOT_SPACE: return !SRE_IS_SPACE(ch); case SRE_CATEGORY_WORD: return SRE_IS_WORD(ch); case SRE_CATEGORY_NOT_WORD: return !SRE_IS_WORD(ch); case SRE_CATEGORY_LINEBREAK: return SRE_IS_LINEBREAK(ch); case SRE_CATEGORY_NOT_LINEBREAK: return !SRE_IS_LINEBREAK(ch); case SRE_CATEGORY_LOC_WORD: return SRE_LOC_IS_WORD(ch); case SRE_CATEGORY_LOC_NOT_WORD: return !SRE_LOC_IS_WORD(ch); #if defined(HAVE_UNICODE) case SRE_CATEGORY_UNI_DIGIT: return SRE_UNI_IS_DIGIT(ch); case SRE_CATEGORY_UNI_NOT_DIGIT: return !SRE_UNI_IS_DIGIT(ch); case SRE_CATEGORY_UNI_SPACE: return SRE_UNI_IS_SPACE(ch); case SRE_CATEGORY_UNI_NOT_SPACE: return !SRE_UNI_IS_SPACE(ch); case SRE_CATEGORY_UNI_WORD: return SRE_UNI_IS_WORD(ch); case SRE_CATEGORY_UNI_NOT_WORD: return !SRE_UNI_IS_WORD(ch); case SRE_CATEGORY_UNI_LINEBREAK: return SRE_UNI_IS_LINEBREAK(ch); case SRE_CATEGORY_UNI_NOT_LINEBREAK: return !SRE_UNI_IS_LINEBREAK(ch); #else case SRE_CATEGORY_UNI_DIGIT: return SRE_IS_DIGIT(ch); case SRE_CATEGORY_UNI_NOT_DIGIT: return !SRE_IS_DIGIT(ch); case SRE_CATEGORY_UNI_SPACE: return SRE_IS_SPACE(ch); case SRE_CATEGORY_UNI_NOT_SPACE: return !SRE_IS_SPACE(ch); case SRE_CATEGORY_UNI_WORD: return SRE_LOC_IS_WORD(ch); case SRE_CATEGORY_UNI_NOT_WORD: return !SRE_LOC_IS_WORD(ch); case SRE_CATEGORY_UNI_LINEBREAK: return SRE_IS_LINEBREAK(ch); case SRE_CATEGORY_UNI_NOT_LINEBREAK: return !SRE_IS_LINEBREAK(ch); #endif } return 0; } /* helpers */ static void mark_fini(SRE_STATE* state) { if (state->mark_stack) { free(state->mark_stack); state->mark_stack = NULL; } state->mark_stack_size = state->mark_stack_base = 0; } static int mark_save(SRE_STATE* state, int lo, int hi, int *mark_stack_base) { void* stack; int size; int minsize, newsize; if (hi <= lo) return 0; size = (hi - lo) + 1; newsize = state->mark_stack_size; minsize = state->mark_stack_base + size; if (newsize < minsize) { /* create new stack */ if (!newsize) { newsize = 512; if (newsize < minsize) newsize = minsize; TRACE(("allocate stack %d\n", newsize)); stack = malloc(sizeof(void*) * newsize); } else { /* grow the stack */ while (newsize < minsize) newsize += newsize; TRACE(("grow stack to %d\n", newsize)); stack = realloc(state->mark_stack, sizeof(void*) * newsize); } if (!stack) { mark_fini(state); return SRE_ERROR_MEMORY; } state->mark_stack = stack; state->mark_stack_size = newsize; } TRACE(("copy %d:%d to %d (%d)\n", lo, hi, state->mark_stack_base, size)); memcpy(state->mark_stack + state->mark_stack_base, state->mark + lo, size * sizeof(void*)); state->mark_stack_base += size; *mark_stack_base = state->mark_stack_base; return 0; } static int mark_restore(SRE_STATE* state, int lo, int hi, int *mark_stack_base) { int size; if (hi <= lo) return 0; size = (hi - lo) + 1; state->mark_stack_base = *mark_stack_base - size; TRACE(("copy %d:%d from %d\n", lo, hi, state->mark_stack_base)); memcpy(state->mark + lo, state->mark_stack + state->mark_stack_base, size * sizeof(void*)); return 0; } /* generate 8-bit version */ #define SRE_CHAR unsigned char #define SRE_AT sre_at #define SRE_COUNT sre_count #define SRE_CHARSET sre_charset #define SRE_INFO sre_info #define SRE_MATCH sre_match #define SRE_SEARCH sre_search #define SRE_LITERAL_TEMPLATE sre_literal_template #if defined(HAVE_UNICODE) #define SRE_RECURSIVE #include "_sre.c" #undef SRE_RECURSIVE #undef SRE_LITERAL_TEMPLATE #undef SRE_SEARCH #undef SRE_MATCH #undef SRE_INFO #undef SRE_CHARSET #undef SRE_COUNT #undef SRE_AT #undef SRE_CHAR /* generate 16-bit unicode version */ #define SRE_CHAR Py_UNICODE #define SRE_AT sre_uat #define SRE_COUNT sre_ucount #define SRE_CHARSET sre_ucharset #define SRE_INFO sre_uinfo #define SRE_MATCH sre_umatch #define SRE_SEARCH sre_usearch #define SRE_LITERAL_TEMPLATE sre_uliteral_template #endif #endif /* SRE_RECURSIVE */ /* -------------------------------------------------------------------- */ /* String matching engine */ /* the following section is compiled twice, with different character settings */ LOCAL(int) SRE_AT(SRE_STATE* state, SRE_CHAR* ptr, SRE_CODE at) { /* check if pointer is at given position */ int this, that; switch (at) { case SRE_AT_BEGINNING: case SRE_AT_BEGINNING_STRING: return ((void*) ptr == state->beginning); case SRE_AT_BEGINNING_LINE: return ((void*) ptr == state->beginning || SRE_IS_LINEBREAK((int) ptr[-1])); case SRE_AT_END: return (((void*) (ptr+1) == state->end && SRE_IS_LINEBREAK((int) ptr[0])) || ((void*) ptr == state->end)); case SRE_AT_END_LINE: return ((void*) ptr == state->end || SRE_IS_LINEBREAK((int) ptr[0])); case SRE_AT_END_STRING: return ((void*) ptr == state->end); case SRE_AT_BOUNDARY: if (state->beginning == state->end) return 0; that = ((void*) ptr > state->beginning) ? SRE_IS_WORD((int) ptr[-1]) : 0; this = ((void*) ptr < state->end) ? SRE_IS_WORD((int) ptr[0]) : 0; return this != that; case SRE_AT_NON_BOUNDARY: if (state->beginning == state->end) return 0; that = ((void*) ptr > state->beginning) ? SRE_IS_WORD((int) ptr[-1]) : 0; this = ((void*) ptr < state->end) ? SRE_IS_WORD((int) ptr[0]) : 0; return this == that; case SRE_AT_LOC_BOUNDARY: if (state->beginning == state->end) return 0; that = ((void*) ptr > state->beginning) ? SRE_LOC_IS_WORD((int) ptr[-1]) : 0; this = ((void*) ptr < state->end) ? SRE_LOC_IS_WORD((int) ptr[0]) : 0; return this != that; case SRE_AT_LOC_NON_BOUNDARY: if (state->beginning == state->end) return 0; that = ((void*) ptr > state->beginning) ? SRE_LOC_IS_WORD((int) ptr[-1]) : 0; this = ((void*) ptr < state->end) ? SRE_LOC_IS_WORD((int) ptr[0]) : 0; return this == that; #if defined(HAVE_UNICODE) case SRE_AT_UNI_BOUNDARY: if (state->beginning == state->end) return 0; that = ((void*) ptr > state->beginning) ? SRE_UNI_IS_WORD((int) ptr[-1]) : 0; this = ((void*) ptr < state->end) ? SRE_UNI_IS_WORD((int) ptr[0]) : 0; return this != that; case SRE_AT_UNI_NON_BOUNDARY: if (state->beginning == state->end) return 0; that = ((void*) ptr > state->beginning) ? SRE_UNI_IS_WORD((int) ptr[-1]) : 0; this = ((void*) ptr < state->end) ? SRE_UNI_IS_WORD((int) ptr[0]) : 0; return this == that; #endif } return 0; } LOCAL(int) SRE_CHARSET(SRE_CODE* set, SRE_CODE ch) { /* check if character is a member of the given set */ int ok = 1; for (;;) { switch (*set++) { case SRE_OP_LITERAL: /* */ if (ch == set[0]) return ok; set++; break; case SRE_OP_RANGE: /* */ if (set[0] <= ch && ch <= set[1]) return ok; set += 2; break; case SRE_OP_CHARSET: if (sizeof(SRE_CODE) == 2) { /* (16 bits per code word) */ if (ch < 256 && (set[ch >> 4] & (1 << (ch & 15)))) return ok; set += 16; } else { /* (32 bits per code word) */ if (ch < 256 && (set[ch >> 5] & (1 << (ch & 31)))) return ok; set += 8; } break; case SRE_OP_BIGCHARSET: /* <256 blockindices> */ { int count, block; count = *(set++); if (sizeof(SRE_CODE) == 2) { block = ((unsigned char*)set)[ch >> 8]; set += 128; if (set[block*16 + ((ch & 255)>>4)] & (1 << (ch & 15))) return ok; set += count*16; } else { if (ch < 65536) block = ((unsigned char*)set)[ch >> 8]; else block = -1; set += 64; if (block >=0 && (set[block*8 + ((ch & 255)>>5)] & (1 << (ch & 31)))) return ok; set += count*8; } break; } case SRE_OP_CATEGORY: /* */ if (sre_category(set[0], (int) ch)) return ok; set += 1; break; case SRE_OP_NEGATE: ok = !ok; break; case SRE_OP_FAILURE: return !ok; default: /* internal error -- there's not much we can do about it here, so let's just pretend it didn't match... */ return 0; } } } LOCAL(int) SRE_MATCH(SRE_STATE* state, SRE_CODE* pattern, int level); LOCAL(int) SRE_COUNT(SRE_STATE* state, SRE_CODE* pattern, int maxcount, int level) { SRE_CODE chr; SRE_CHAR* ptr = state->ptr; SRE_CHAR* end = state->end; int i; /* adjust end */ if (maxcount < end - ptr && maxcount != 65535) end = ptr + maxcount; switch (pattern[0]) { case SRE_OP_ANY: /* repeated dot wildcard. */ TRACE(("|%p|%p|COUNT ANY\n", pattern, ptr)); while (ptr < end && !SRE_IS_LINEBREAK(*ptr)) ptr++; break; case SRE_OP_ANY_ALL: /* repeated dot wildcare. skip to the end of the target string, and backtrack from there */ TRACE(("|%p|%p|COUNT ANY_ALL\n", pattern, ptr)); ptr = end; break; case SRE_OP_LITERAL: /* repeated literal */ chr = pattern[1]; TRACE(("|%p|%p|COUNT LITERAL %d\n", pattern, ptr, chr)); while (ptr < end && (SRE_CODE) *ptr == chr) ptr++; break; case SRE_OP_LITERAL_IGNORE: /* repeated literal */ chr = pattern[1]; TRACE(("|%p|%p|COUNT LITERAL_IGNORE %d\n", pattern, ptr, chr)); while (ptr < end && (SRE_CODE) state->lower(*ptr) == chr) ptr++; break; case SRE_OP_NOT_LITERAL: /* repeated non-literal */ chr = pattern[1]; TRACE(("|%p|%p|COUNT NOT_LITERAL %d\n", pattern, ptr, chr)); while (ptr < end && (SRE_CODE) *ptr != chr) ptr++; break; case SRE_OP_NOT_LITERAL_IGNORE: /* repeated non-literal */ chr = pattern[1]; TRACE(("|%p|%p|COUNT NOT_LITERAL_IGNORE %d\n", pattern, ptr, chr)); while (ptr < end && (SRE_CODE) state->lower(*ptr) != chr) ptr++; break; case SRE_OP_IN: /* repeated set */ TRACE(("|%p|%p|COUNT IN\n", pattern, ptr)); while (ptr < end && SRE_CHARSET(pattern + 2, *ptr)) ptr++; break; default: /* repeated single character pattern */ TRACE(("|%p|%p|COUNT SUBPATTERN\n", pattern, ptr)); while ((SRE_CHAR*) state->ptr < end) { i = SRE_MATCH(state, pattern, level); if (i < 0) return i; if (!i) break; } TRACE(("|%p|%p|COUNT %d\n", pattern, ptr, (SRE_CHAR*) state->ptr - ptr)); return (SRE_CHAR*) state->ptr - ptr; } TRACE(("|%p|%p|COUNT %d\n", pattern, ptr, ptr - (SRE_CHAR*) state->ptr)); return ptr - (SRE_CHAR*) state->ptr; } #if 0 /* not used in this release */ LOCAL(int) SRE_INFO(SRE_STATE* state, SRE_CODE* pattern) { /* check if an SRE_OP_INFO block matches at the current position. returns the number of SRE_CODE objects to skip if successful, 0 if no match */ SRE_CHAR* end = state->end; SRE_CHAR* ptr = state->ptr; int i; /* check minimal length */ if (pattern[3] && (end - ptr) < pattern[3]) return 0; /* check known prefix */ if (pattern[2] & SRE_INFO_PREFIX && pattern[5] > 1) { /* */ for (i = 0; i < pattern[5]; i++) if ((SRE_CODE) ptr[i] != pattern[7 + i]) return 0; return pattern[0] + 2 * pattern[6]; } return pattern[0]; } #endif /* The macros below should be used to protect recursive SRE_MATCH() * calls that *failed* and do *not* return immediately (IOW, those * that will backtrack). Explaining: * * - Recursive SRE_MATCH() returned true: that's usually a success * (besides atypical cases like ASSERT_NOT), therefore there's no * reason to restore lastmark; * * - Recursive SRE_MATCH() returned false but the current SRE_MATCH() * is returning to the caller: If the current SRE_MATCH() is the * top function of the recursion, returning false will be a matching * failure, and it doesn't matter where lastmark is pointing to. * If it's *not* the top function, it will be a recursive SRE_MATCH() * failure by itself, and the calling SRE_MATCH() will have to deal * with the failure by the same rules explained here (it will restore * lastmark by itself if necessary); * * - Recursive SRE_MATCH() returned false, and will continue the * outside 'for' loop: must be protected when breaking, since the next * OP could potentially depend on lastmark; * * - Recursive SRE_MATCH() returned false, and will be called again * inside a local for/while loop: must be protected between each * loop iteration, since the recursive SRE_MATCH() could do anything, * and could potentially depend on lastmark. * * For more information, check the discussion at SF patch #712900. */ #define LASTMARK_SAVE() \ do { \ lastmark = state->lastmark; \ lastindex = state->lastindex; \ } while (0) #define LASTMARK_RESTORE() \ do { \ if (state->lastmark > lastmark) { \ memset(state->mark + lastmark + 1, 0, \ (state->lastmark - lastmark) * sizeof(void*)); \ state->lastmark = lastmark; \ state->lastindex = lastindex; \ } \ } while (0) LOCAL(int) SRE_MATCH(SRE_STATE* state, SRE_CODE* pattern, int level) { /* check if string matches the given pattern. returns <0 for error, 0 for failure, and 1 for success */ SRE_CHAR* end = state->end; SRE_CHAR* ptr = state->ptr; int i, count; SRE_REPEAT* rp; int lastmark, lastindex, mark_stack_base; SRE_CODE chr; SRE_REPEAT rep; /* FIXME: allocate in STATE instead */ TRACE(("|%p|%p|ENTER %d\n", pattern, ptr, level)); #if defined(USE_STACKCHECK) if (level % 10 == 0 && PyOS_CheckStack()) return SRE_ERROR_RECURSION_LIMIT; #endif #if defined(USE_RECURSION_LIMIT) if (level > USE_RECURSION_LIMIT) return SRE_ERROR_RECURSION_LIMIT; #endif if (pattern[0] == SRE_OP_INFO) { /* optimization info block */ /* <1=skip> <2=flags> <3=min> ... */ if (pattern[3] && (end - ptr) < pattern[3]) { TRACE(("reject (got %d chars, need %d)\n", (end - ptr), pattern[3])); return 0; } pattern += pattern[1] + 1; } for (;;) { switch (*pattern++) { case SRE_OP_FAILURE: /* immediate failure */ TRACE(("|%p|%p|FAILURE\n", pattern, ptr)); return 0; case SRE_OP_SUCCESS: /* end of pattern */ TRACE(("|%p|%p|SUCCESS\n", pattern, ptr)); state->ptr = ptr; return 1; case SRE_OP_AT: /* match at given position */ /* */ TRACE(("|%p|%p|AT %d\n", pattern, ptr, *pattern)); if (!SRE_AT(state, ptr, *pattern)) return 0; pattern++; break; case SRE_OP_CATEGORY: /* match at given category */ /* */ TRACE(("|%p|%p|CATEGORY %d\n", pattern, ptr, *pattern)); if (ptr >= end || !sre_category(pattern[0], ptr[0])) return 0; pattern++; ptr++; break; case SRE_OP_LITERAL: /* match literal string */ /* */ TRACE(("|%p|%p|LITERAL %d\n", pattern, ptr, *pattern)); if (ptr >= end || (SRE_CODE) ptr[0] != pattern[0]) return 0; pattern++; ptr++; break; case SRE_OP_NOT_LITERAL: /* match anything that is not literal character */ /* */ TRACE(("|%p|%p|NOT_LITERAL %d\n", pattern, ptr, *pattern)); if (ptr >= end || (SRE_CODE) ptr[0] == pattern[0]) return 0; pattern++; ptr++; break; case SRE_OP_ANY: /* match anything (except a newline) */ /* */ TRACE(("|%p|%p|ANY\n", pattern, ptr)); if (ptr >= end || SRE_IS_LINEBREAK(ptr[0])) return 0; ptr++; break; case SRE_OP_ANY_ALL: /* match anything */ /* */ TRACE(("|%p|%p|ANY_ALL\n", pattern, ptr)); if (ptr >= end) return 0; ptr++; break; case SRE_OP_IN: /* match set member (or non_member) */ /* */ TRACE(("|%p|%p|IN\n", pattern, ptr)); if (ptr >= end || !SRE_CHARSET(pattern + 1, *ptr)) return 0; pattern += pattern[0]; ptr++; break; case SRE_OP_GROUPREF: /* match backreference */ TRACE(("|%p|%p|GROUPREF %d\n", pattern, ptr, pattern[0])); i = pattern[0]; { SRE_CHAR* p = (SRE_CHAR*) state->mark[i+i]; SRE_CHAR* e = (SRE_CHAR*) state->mark[i+i+1]; if (!p || !e || e < p) return 0; while (p < e) { if (ptr >= end || *ptr != *p) return 0; p++; ptr++; } } pattern++; break; case SRE_OP_GROUPREF_IGNORE: /* match backreference */ TRACE(("|%p|%p|GROUPREF_IGNORE %d\n", pattern, ptr, pattern[0])); i = pattern[0]; { SRE_CHAR* p = (SRE_CHAR*) state->mark[i+i]; SRE_CHAR* e = (SRE_CHAR*) state->mark[i+i+1]; if (!p || !e || e < p) return 0; while (p < e) { if (ptr >= end || state->lower(*ptr) != state->lower(*p)) return 0; p++; ptr++; } } pattern++; break; case SRE_OP_LITERAL_IGNORE: TRACE(("|%p|%p|LITERAL_IGNORE %d\n", pattern, ptr, pattern[0])); if (ptr >= end || state->lower(*ptr) != state->lower(*pattern)) return 0; pattern++; ptr++; break; case SRE_OP_NOT_LITERAL_IGNORE: TRACE(("|%p|%p|NOT_LITERAL_IGNORE %d\n", pattern, ptr, *pattern)); if (ptr >= end || state->lower(*ptr) == state->lower(*pattern)) return 0; pattern++; ptr++; break; case SRE_OP_IN_IGNORE: TRACE(("|%p|%p|IN_IGNORE\n", pattern, ptr)); if (ptr >= end || !SRE_CHARSET(pattern + 1, (SRE_CODE) state->lower(*ptr))) return 0; pattern += pattern[0]; ptr++; break; case SRE_OP_MARK: /* set mark */ /* */ TRACE(("|%p|%p|MARK %d\n", pattern, ptr, pattern[0])); i = pattern[0]; if (i & 1) state->lastindex = i/2 + 1; if (i > state->lastmark) state->lastmark = i; state->mark[i] = ptr; pattern++; break; case SRE_OP_JUMP: case SRE_OP_INFO: /* jump forward */ /* */ TRACE(("|%p|%p|JUMP %d\n", pattern, ptr, pattern[0])); pattern += pattern[0]; break; case SRE_OP_ASSERT: /* assert subpattern */ /* */ TRACE(("|%p|%p|ASSERT %d\n", pattern, ptr, pattern[1])); state->ptr = ptr - pattern[1]; if (state->ptr < state->beginning) return 0; i = SRE_MATCH(state, pattern + 2, level + 1); if (i <= 0) return i; pattern += pattern[0]; break; case SRE_OP_ASSERT_NOT: /* assert not subpattern */ /* */ TRACE(("|%p|%p|ASSERT_NOT %d\n", pattern, ptr, pattern[1])); state->ptr = ptr - pattern[1]; if (state->ptr >= state->beginning) { i = SRE_MATCH(state, pattern + 2, level + 1); if (i < 0) return i; if (i) return 0; } pattern += pattern[0]; break; case SRE_OP_BRANCH: /* alternation */ /* <0=skip> code ... */ TRACE(("|%p|%p|BRANCH\n", pattern, ptr)); LASTMARK_SAVE(); if (state->repeat) { i = mark_save(state, 0, lastmark, &mark_stack_base); if (i < 0) return i; } for (; pattern[0]; pattern += pattern[0]) { if (pattern[1] == SRE_OP_LITERAL && (ptr >= end || (SRE_CODE) *ptr != pattern[2])) continue; if (pattern[1] == SRE_OP_IN && (ptr >= end || !SRE_CHARSET(pattern + 3, (SRE_CODE) *ptr))) continue; state->ptr = ptr; i = SRE_MATCH(state, pattern + 1, level + 1); if (i) return i; if (state->repeat) { i = mark_restore(state, 0, lastmark, &mark_stack_base); if (i < 0) return i; } LASTMARK_RESTORE(); } return 0; case SRE_OP_REPEAT_ONE: /* match repeated sequence (maximizing regexp) */ /* this operator only works if the repeated item is exactly one character wide, and we're not already collecting backtracking points. for other cases, use the MAX_REPEAT operator */ /* <1=min> <2=max> item tail */ TRACE(("|%p|%p|REPEAT_ONE %d %d\n", pattern, ptr, pattern[1], pattern[2])); if (ptr + pattern[1] > end) return 0; /* cannot match */ state->ptr = ptr; count = SRE_COUNT(state, pattern + 3, pattern[2], level + 1); if (count < 0) return count; ptr += count; /* when we arrive here, count contains the number of matches, and ptr points to the tail of the target string. check if the rest of the pattern matches, and backtrack if not. */ if (count < (int) pattern[1]) return 0; if (pattern[pattern[0]] == SRE_OP_SUCCESS) { /* tail is empty. we're finished */ state->ptr = ptr; return 1; } LASTMARK_SAVE(); if (pattern[pattern[0]] == SRE_OP_LITERAL) { /* tail starts with a literal. skip positions where the rest of the pattern cannot possibly match */ chr = pattern[pattern[0]+1]; for (;;) { while (count >= (int) pattern[1] && (ptr >= end || *ptr != chr)) { ptr--; count--; } if (count < (int) pattern[1]) break; state->ptr = ptr; i = SRE_MATCH(state, pattern + pattern[0], level + 1); if (i) return i; ptr--; count--; LASTMARK_RESTORE(); } } else { /* general case */ while (count >= (int) pattern[1]) { state->ptr = ptr; i = SRE_MATCH(state, pattern + pattern[0], level + 1); if (i) return i; ptr--; count--; LASTMARK_RESTORE(); } } return 0; case SRE_OP_MIN_REPEAT_ONE: /* match repeated sequence (minimizing regexp) */ /* this operator only works if the repeated item is exactly one character wide, and we're not already collecting backtracking points. for other cases, use the MIN_REPEAT operator */ /* <1=min> <2=max> item tail */ TRACE(("|%p|%p|MIN_REPEAT_ONE %d %d\n", pattern, ptr, pattern[1], pattern[2])); if (ptr + pattern[1] > end) return 0; /* cannot match */ state->ptr = ptr; if (pattern[1] == 0) count = 0; else { /* count using pattern min as the maximum */ count = SRE_COUNT(state, pattern + 3, pattern[1], level + 1); if (count < 0) return count; /* exception */ if (count < (int) pattern[1]) return 0; /* did not match minimum number of times */ ptr += count; /* advance past minimum matches of repeat */ } if (pattern[pattern[0]] == SRE_OP_SUCCESS) { /* tail is empty. we're finished */ state->ptr = ptr; return 1; } else { /* general case */ int matchmax = ((int)pattern[2] == 65535); int c; LASTMARK_SAVE(); while (matchmax || count <= (int) pattern[2]) { state->ptr = ptr; i = SRE_MATCH(state, pattern + pattern[0], level + 1); if (i) return i; state->ptr = ptr; c = SRE_COUNT(state, pattern+3, 1, level+1); if (c < 0) return c; if (c == 0) break; assert(c == 1); ptr++; count++; LASTMARK_RESTORE(); } } return 0; case SRE_OP_REPEAT: /* create repeat context. all the hard work is done by the UNTIL operator (MAX_UNTIL, MIN_UNTIL) */ /* <1=min> <2=max> item tail */ TRACE(("|%p|%p|REPEAT %d %d\n", pattern, ptr, pattern[1], pattern[2])); rep.count = -1; rep.pattern = pattern; /* install new repeat context */ rep.prev = state->repeat; state->repeat = &rep; state->ptr = ptr; i = SRE_MATCH(state, pattern + pattern[0], level + 1); state->repeat = rep.prev; return i; case SRE_OP_MAX_UNTIL: /* maximizing repeat */ /* <1=min> <2=max> item tail */ /* FIXME: we probably need to deal with zero-width matches in here... */ rp = state->repeat; if (!rp) return SRE_ERROR_STATE; state->ptr = ptr; count = rp->count + 1; TRACE(("|%p|%p|MAX_UNTIL %d\n", pattern, ptr, count)); if (count < rp->pattern[1]) { /* not enough matches */ rp->count = count; /* RECURSIVE */ i = SRE_MATCH(state, rp->pattern + 3, level + 1); if (i) return i; rp->count = count - 1; state->ptr = ptr; return 0; } if (count < rp->pattern[2] || rp->pattern[2] == 65535) { /* we may have enough matches, but if we can match another item, do so */ rp->count = count; LASTMARK_SAVE(); i = mark_save(state, 0, lastmark, &mark_stack_base); if (i < 0) return i; /* RECURSIVE */ i = SRE_MATCH(state, rp->pattern + 3, level + 1); if (i) return i; i = mark_restore(state, 0, lastmark, &mark_stack_base); if (i < 0) return i; LASTMARK_RESTORE(); rp->count = count - 1; state->ptr = ptr; } /* cannot match more repeated items here. make sure the tail matches */ state->repeat = rp->prev; i = SRE_MATCH(state, pattern, level + 1); if (i) return i; state->repeat = rp; state->ptr = ptr; return 0; case SRE_OP_MIN_UNTIL: /* minimizing repeat */ /* <1=min> <2=max> item tail */ rp = state->repeat; if (!rp) return SRE_ERROR_STATE; state->ptr = ptr; count = rp->count + 1; TRACE(("|%p|%p|MIN_UNTIL %d %p\n", pattern, ptr, count, rp->pattern)); if (count < rp->pattern[1]) { /* not enough matches */ rp->count = count; /* RECURSIVE */ i = SRE_MATCH(state, rp->pattern + 3, level + 1); if (i) return i; rp->count = count-1; state->ptr = ptr; return 0; } LASTMARK_SAVE(); /* see if the tail matches */ state->repeat = rp->prev; i = SRE_MATCH(state, pattern, level + 1); if (i) return i; state->ptr = ptr; state->repeat = rp; if (count >= rp->pattern[2] && rp->pattern[2] != 65535) return 0; LASTMARK_RESTORE(); rp->count = count; /* RECURSIVE */ i = SRE_MATCH(state, rp->pattern + 3, level + 1); if (i) return i; rp->count = count - 1; state->ptr = ptr; return 0; default: TRACE(("|%p|%p|UNKNOWN %d\n", pattern, ptr, pattern[-1])); return SRE_ERROR_ILLEGAL; } } /* can't end up here */ /* return SRE_ERROR_ILLEGAL; -- see python-dev discussion */ } LOCAL(int) SRE_SEARCH(SRE_STATE* state, SRE_CODE* pattern) { SRE_CHAR* ptr = state->start; SRE_CHAR* end = state->end; int status = 0; int prefix_len = 0; int prefix_skip = 0; SRE_CODE* prefix = NULL; SRE_CODE* charset = NULL; SRE_CODE* overlap = NULL; int flags = 0; if (pattern[0] == SRE_OP_INFO) { /* optimization info block */ /* <1=skip> <2=flags> <3=min> <4=max> <5=prefix info> */ flags = pattern[2]; if (pattern[3] > 1) { /* adjust end point (but make sure we leave at least one character in there, so literal search will work) */ end -= pattern[3]-1; if (end <= ptr) end = ptr+1; } if (flags & SRE_INFO_PREFIX) { /* pattern starts with a known prefix */ /* */ prefix_len = pattern[5]; prefix_skip = pattern[6]; prefix = pattern + 7; overlap = prefix + prefix_len - 1; } else if (flags & SRE_INFO_CHARSET) /* pattern starts with a character from a known set */ /* */ charset = pattern + 5; pattern += 1 + pattern[1]; } TRACE(("prefix = %p %d %d\n", prefix, prefix_len, prefix_skip)); TRACE(("charset = %p\n", charset)); #if defined(USE_FAST_SEARCH) if (prefix_len > 1) { /* pattern starts with a known prefix. use the overlap table to skip forward as fast as we possibly can */ int i = 0; end = state->end; while (ptr < end) { for (;;) { if ((SRE_CODE) ptr[0] != prefix[i]) { if (!i) break; else i = overlap[i]; } else { if (++i == prefix_len) { /* found a potential match */ TRACE(("|%p|%p|SEARCH SCAN\n", pattern, ptr)); state->start = ptr + 1 - prefix_len; state->ptr = ptr + 1 - prefix_len + prefix_skip; if (flags & SRE_INFO_LITERAL) return 1; /* we got all of it */ status = SRE_MATCH(state, pattern + 2*prefix_skip, 1); if (status != 0) return status; /* close but no cigar -- try again */ i = overlap[i]; } break; } } ptr++; } return 0; } #endif if (pattern[0] == SRE_OP_LITERAL) { /* pattern starts with a literal character. this is used for short prefixes, and if fast search is disabled */ SRE_CODE chr = pattern[1]; end = state->end; for (;;) { while (ptr < end && (SRE_CODE) ptr[0] != chr) ptr++; if (ptr >= end) return 0; TRACE(("|%p|%p|SEARCH LITERAL\n", pattern, ptr)); state->start = ptr; state->ptr = ++ptr; if (flags & SRE_INFO_LITERAL) return 1; /* we got all of it */ status = SRE_MATCH(state, pattern + 2, 1); if (status != 0) break; } } else if (charset) { /* pattern starts with a character from a known set */ end = state->end; for (;;) { while (ptr < end && !SRE_CHARSET(charset, ptr[0])) ptr++; if (ptr >= end) return 0; TRACE(("|%p|%p|SEARCH CHARSET\n", pattern, ptr)); state->start = ptr; state->ptr = ptr; status = SRE_MATCH(state, pattern, 1); if (status != 0) break; ptr++; } } else /* general case */ while (ptr <= end) { TRACE(("|%p|%p|SEARCH\n", pattern, ptr)); state->start = state->ptr = ptr++; status = SRE_MATCH(state, pattern, 1); if (status != 0) break; } return status; } LOCAL(int) SRE_LITERAL_TEMPLATE(SRE_CHAR* ptr, int len) { /* check if given string is a literal template (i.e. no escapes) */ while (len-- > 0) if (*ptr++ == '\\') return 0; return 1; } #if !defined(SRE_RECURSIVE) /* -------------------------------------------------------------------- */ /* factories and destructors */ /* see sre.h for object declarations */ static PyTypeObject Pattern_Type; static PyTypeObject Match_Type; static PyTypeObject Scanner_Type; static PyObject * _compile(PyObject* self_, PyObject* args) { /* "compile" pattern descriptor to pattern object */ PatternObject* self; int i, n; PyObject* pattern; int flags = 0; PyObject* code; int groups = 0; PyObject* groupindex = NULL; PyObject* indexgroup = NULL; if (!PyArg_ParseTuple(args, "OiO!|iOO", &pattern, &flags, &PyList_Type, &code, &groups, &groupindex, &indexgroup)) return NULL; n = PyList_GET_SIZE(code); self = PyObject_NEW_VAR(PatternObject, &Pattern_Type, n); if (!self) return NULL; self->codesize = n; for (i = 0; i < n; i++) { PyObject *o = PyList_GET_ITEM(code, i); if (PyInt_Check(o)) self->code[i] = (SRE_CODE) PyInt_AsLong(o); else self->code[i] = (SRE_CODE) PyLong_AsUnsignedLong(o); } if (PyErr_Occurred()) { PyObject_DEL(self); return NULL; } Py_INCREF(pattern); self->pattern = pattern; self->flags = flags; self->groups = groups; Py_XINCREF(groupindex); self->groupindex = groupindex; Py_XINCREF(indexgroup); self->indexgroup = indexgroup; return (PyObject*) self; } static PyObject * sre_codesize(PyObject* self, PyObject* args) { return Py_BuildValue("i", sizeof(SRE_CODE)); } static PyObject * sre_getlower(PyObject* self, PyObject* args) { int character, flags; if (!PyArg_ParseTuple(args, "ii", &character, &flags)) return NULL; if (flags & SRE_FLAG_LOCALE) return Py_BuildValue("i", sre_lower_locale(character)); if (flags & SRE_FLAG_UNICODE) #if defined(HAVE_UNICODE) return Py_BuildValue("i", sre_lower_unicode(character)); #else return Py_BuildValue("i", sre_lower_locale(character)); #endif return Py_BuildValue("i", sre_lower(character)); } LOCAL(void) state_reset(SRE_STATE* state) { state->lastmark = 0; /* FIXME: dynamic! */ memset(state->mark, 0, sizeof(*state->mark) * SRE_MARK_SIZE); state->lastindex = -1; state->repeat = NULL; mark_fini(state); } static void* getstring(PyObject* string, int* p_length, int* p_charsize) { /* given a python object, return a data pointer, a length (in characters), and a character size. return NULL if the object is not a string (or not compatible) */ PyBufferProcs *buffer; int size, bytes, charsize; void* ptr; #if defined(HAVE_UNICODE) if (PyUnicode_Check(string)) { /* unicode strings doesn't always support the buffer interface */ ptr = (void*) PyUnicode_AS_DATA(string); bytes = PyUnicode_GET_DATA_SIZE(string); size = PyUnicode_GET_SIZE(string); charsize = sizeof(Py_UNICODE); } else { #endif /* get pointer to string buffer */ buffer = string->ob_type->tp_as_buffer; if (!buffer || !buffer->bf_getreadbuffer || !buffer->bf_getsegcount || buffer->bf_getsegcount(string, NULL) != 1) { PyErr_SetString(PyExc_TypeError, "expected string or buffer"); return NULL; } /* determine buffer size */ bytes = buffer->bf_getreadbuffer(string, 0, &ptr); if (bytes < 0) { PyErr_SetString(PyExc_TypeError, "buffer has negative size"); return NULL; } /* determine character size */ #if PY_VERSION_HEX >= 0x01060000 size = PyObject_Size(string); #else size = PyObject_Length(string); #endif if (PyString_Check(string) || bytes == size) charsize = 1; #if defined(HAVE_UNICODE) else if (bytes == (int) (size * sizeof(Py_UNICODE))) charsize = sizeof(Py_UNICODE); #endif else { PyErr_SetString(PyExc_TypeError, "buffer size mismatch"); return NULL; } #if defined(HAVE_UNICODE) } #endif *p_length = size; *p_charsize = charsize; return ptr; } LOCAL(PyObject*) state_init(SRE_STATE* state, PatternObject* pattern, PyObject* string, int start, int end) { /* prepare state object */ int length; int charsize; void* ptr; memset(state, 0, sizeof(SRE_STATE)); state->lastindex = -1; ptr = getstring(string, &length, &charsize); if (!ptr) return NULL; /* adjust boundaries */ if (start < 0) start = 0; else if (start > length) start = length; if (end < 0) end = 0; else if (end > length) end = length; state->charsize = charsize; state->beginning = ptr; state->start = (void*) ((char*) ptr + start * state->charsize); state->end = (void*) ((char*) ptr + end * state->charsize); Py_INCREF(string); state->string = string; state->pos = start; state->endpos = end; if (pattern->flags & SRE_FLAG_LOCALE) state->lower = sre_lower_locale; else if (pattern->flags & SRE_FLAG_UNICODE) #if defined(HAVE_UNICODE) state->lower = sre_lower_unicode; #else state->lower = sre_lower_locale; #endif else state->lower = sre_lower; return string; } LOCAL(void) state_fini(SRE_STATE* state) { Py_XDECREF(state->string); mark_fini(state); } /* calculate offset from start of string */ #define STATE_OFFSET(state, member)\ (((char*)(member) - (char*)(state)->beginning) / (state)->charsize) LOCAL(PyObject*) state_getslice(SRE_STATE* state, int index, PyObject* string, int empty) { int i, j; index = (index - 1) * 2; if (string == Py_None || !state->mark[index] || !state->mark[index+1]) { if (empty) /* want empty string */ i = j = 0; else { Py_INCREF(Py_None); return Py_None; } } else { i = STATE_OFFSET(state, state->mark[index]); j = STATE_OFFSET(state, state->mark[index+1]); } return PySequence_GetSlice(string, i, j); } static void pattern_error(int status) { switch (status) { case SRE_ERROR_RECURSION_LIMIT: PyErr_SetString( PyExc_RuntimeError, "maximum recursion limit exceeded" ); break; case SRE_ERROR_MEMORY: PyErr_NoMemory(); break; default: /* other error codes indicate compiler/engine bugs */ PyErr_SetString( PyExc_RuntimeError, "internal error in regular expression engine" ); } } static PyObject* pattern_new_match(PatternObject* pattern, SRE_STATE* state, int status) { /* create match object (from state object) */ MatchObject* match; int i, j; char* base; int n; if (status > 0) { /* create match object (with room for extra group marks) */ match = PyObject_NEW_VAR(MatchObject, &Match_Type, 2*(pattern->groups+1)); if (!match) return NULL; Py_INCREF(pattern); match->pattern = pattern; Py_INCREF(state->string); match->string = state->string; match->regs = NULL; match->groups = pattern->groups+1; /* fill in group slices */ base = (char*) state->beginning; n = state->charsize; match->mark[0] = ((char*) state->start - base) / n; match->mark[1] = ((char*) state->ptr - base) / n; for (i = j = 0; i < pattern->groups; i++, j+=2) if (j+1 <= state->lastmark && state->mark[j] && state->mark[j+1]) { match->mark[j+2] = ((char*) state->mark[j] - base) / n; match->mark[j+3] = ((char*) state->mark[j+1] - base) / n; } else match->mark[j+2] = match->mark[j+3] = -1; /* undefined */ match->pos = state->pos; match->endpos = state->endpos; match->lastindex = state->lastindex; return (PyObject*) match; } else if (status == 0) { /* no match */ Py_INCREF(Py_None); return Py_None; } /* internal error */ pattern_error(status); return NULL; } static PyObject* pattern_scanner(PatternObject* pattern, PyObject* args) { /* create search state object */ ScannerObject* self; PyObject* string; int start = 0; int end = INT_MAX; if (!PyArg_ParseTuple(args, "O|ii:scanner", &string, &start, &end)) return NULL; /* create scanner object */ self = PyObject_NEW(ScannerObject, &Scanner_Type); if (!self) return NULL; string = state_init(&self->state, pattern, string, start, end); if (!string) { PyObject_DEL(self); return NULL; } Py_INCREF(pattern); self->pattern = (PyObject*) pattern; return (PyObject*) self; } static void pattern_dealloc(PatternObject* self) { Py_XDECREF(self->pattern); Py_XDECREF(self->groupindex); Py_XDECREF(self->indexgroup); PyObject_DEL(self); } static PyObject* pattern_match(PatternObject* self, PyObject* args, PyObject* kw) { SRE_STATE state; int status; PyObject* string; int start = 0; int end = INT_MAX; static char* kwlist[] = { "pattern", "pos", "endpos", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "O|ii:match", kwlist, &string, &start, &end)) return NULL; string = state_init(&state, self, string, start, end); if (!string) return NULL; state.ptr = state.start; TRACE(("|%p|%p|MATCH\n", PatternObject_GetCode(self), state.ptr)); if (state.charsize == 1) { status = sre_match(&state, PatternObject_GetCode(self), 1); } else { #if defined(HAVE_UNICODE) status = sre_umatch(&state, PatternObject_GetCode(self), 1); #endif } TRACE(("|%p|%p|END\n", PatternObject_GetCode(self), state.ptr)); state_fini(&state); return pattern_new_match(self, &state, status); } static PyObject* pattern_search(PatternObject* self, PyObject* args, PyObject* kw) { SRE_STATE state; int status; PyObject* string; int start = 0; int end = INT_MAX; static char* kwlist[] = { "pattern", "pos", "endpos", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "O|ii:search", kwlist, &string, &start, &end)) return NULL; string = state_init(&state, self, string, start, end); if (!string) return NULL; TRACE(("|%p|%p|SEARCH\n", PatternObject_GetCode(self), state.ptr)); if (state.charsize == 1) { status = sre_search(&state, PatternObject_GetCode(self)); } else { #if defined(HAVE_UNICODE) status = sre_usearch(&state, PatternObject_GetCode(self)); #endif } TRACE(("|%p|%p|END\n", PatternObject_GetCode(self), state.ptr)); state_fini(&state); return pattern_new_match(self, &state, status); } static PyObject* call(char* module, char* function, PyObject* args) { PyObject* name; PyObject* mod; PyObject* func; PyObject* result; if (!args) return NULL; name = PyString_FromString(module); if (!name) return NULL; mod = PyImport_Import(name); Py_DECREF(name); if (!mod) return NULL; func = PyObject_GetAttrString(mod, function); Py_DECREF(mod); if (!func) return NULL; result = PyObject_CallObject(func, args); Py_DECREF(func); Py_DECREF(args); return result; } #ifdef USE_BUILTIN_COPY static int deepcopy(PyObject** object, PyObject* memo) { PyObject* copy; copy = call( "copy", "deepcopy", Py_BuildValue("OO", *object, memo) ); if (!copy) return 0; Py_DECREF(*object); *object = copy; return 1; /* success */ } #endif static PyObject* join_list(PyObject* list, PyObject* pattern) { /* join list elements */ PyObject* joiner; #if PY_VERSION_HEX >= 0x01060000 PyObject* function; PyObject* args; #endif PyObject* result; switch (PyList_GET_SIZE(list)) { case 0: Py_DECREF(list); return PySequence_GetSlice(pattern, 0, 0); case 1: result = PyList_GET_ITEM(list, 0); Py_INCREF(result); Py_DECREF(list); return result; } /* two or more elements: slice out a suitable separator from the first member, and use that to join the entire list */ joiner = PySequence_GetSlice(pattern, 0, 0); if (!joiner) return NULL; #if PY_VERSION_HEX >= 0x01060000 function = PyObject_GetAttrString(joiner, "join"); if (!function) { Py_DECREF(joiner); return NULL; } args = PyTuple_New(1); if (!args) { Py_DECREF(function); Py_DECREF(joiner); return NULL; } PyTuple_SET_ITEM(args, 0, list); result = PyObject_CallObject(function, args); Py_DECREF(args); /* also removes list */ Py_DECREF(function); #else result = call( "string", "join", Py_BuildValue("OO", list, joiner) ); #endif Py_DECREF(joiner); return result; } static PyObject* pattern_findall(PatternObject* self, PyObject* args, PyObject* kw) { SRE_STATE state; PyObject* list; int status; int i, b, e; PyObject* string; int start = 0; int end = INT_MAX; static char* kwlist[] = { "source", "pos", "endpos", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "O|ii:findall", kwlist, &string, &start, &end)) return NULL; string = state_init(&state, self, string, start, end); if (!string) return NULL; list = PyList_New(0); if (!list) { state_fini(&state); return NULL; } while (state.start <= state.end) { PyObject* item; state_reset(&state); state.ptr = state.start; if (state.charsize == 1) { status = sre_search(&state, PatternObject_GetCode(self)); } else { #if defined(HAVE_UNICODE) status = sre_usearch(&state, PatternObject_GetCode(self)); #endif } if (status <= 0) { if (status == 0) break; pattern_error(status); goto error; } /* don't bother to build a match object */ switch (self->groups) { case 0: b = STATE_OFFSET(&state, state.start); e = STATE_OFFSET(&state, state.ptr); item = PySequence_GetSlice(string, b, e); if (!item) goto error; break; case 1: item = state_getslice(&state, 1, string, 1); if (!item) goto error; break; default: item = PyTuple_New(self->groups); if (!item) goto error; for (i = 0; i < self->groups; i++) { PyObject* o = state_getslice(&state, i+1, string, 1); if (!o) { Py_DECREF(item); goto error; } PyTuple_SET_ITEM(item, i, o); } break; } status = PyList_Append(list, item); Py_DECREF(item); if (status < 0) goto error; if (state.ptr == state.start) state.start = (void*) ((char*) state.ptr + state.charsize); else state.start = state.ptr; } state_fini(&state); return list; error: Py_DECREF(list); state_fini(&state); return NULL; } #if PY_VERSION_HEX >= 0x02020000 static PyObject* pattern_finditer(PatternObject* pattern, PyObject* args) { PyObject* scanner; PyObject* search; PyObject* iterator; scanner = pattern_scanner(pattern, args); if (!scanner) return NULL; search = PyObject_GetAttrString(scanner, "search"); Py_DECREF(scanner); if (!search) return NULL; iterator = PyCallIter_New(search, Py_None); Py_DECREF(search); return iterator; } #endif static PyObject* pattern_split(PatternObject* self, PyObject* args, PyObject* kw) { SRE_STATE state; PyObject* list; PyObject* item; int status; int n; int i; void* last; PyObject* string; int maxsplit = 0; static char* kwlist[] = { "source", "maxsplit", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "O|i:split", kwlist, &string, &maxsplit)) return NULL; string = state_init(&state, self, string, 0, INT_MAX); if (!string) return NULL; list = PyList_New(0); if (!list) { state_fini(&state); return NULL; } n = 0; last = state.start; while (!maxsplit || n < maxsplit) { state_reset(&state); state.ptr = state.start; if (state.charsize == 1) { status = sre_search(&state, PatternObject_GetCode(self)); } else { #if defined(HAVE_UNICODE) status = sre_usearch(&state, PatternObject_GetCode(self)); #endif } if (status <= 0) { if (status == 0) break; pattern_error(status); goto error; } if (state.start == state.ptr) { if (last == state.end) break; /* skip one character */ state.start = (void*) ((char*) state.ptr + state.charsize); continue; } /* get segment before this match */ item = PySequence_GetSlice( string, STATE_OFFSET(&state, last), STATE_OFFSET(&state, state.start) ); if (!item) goto error; status = PyList_Append(list, item); Py_DECREF(item); if (status < 0) goto error; /* add groups (if any) */ for (i = 0; i < self->groups; i++) { item = state_getslice(&state, i+1, string, 0); if (!item) goto error; status = PyList_Append(list, item); Py_DECREF(item); if (status < 0) goto error; } n = n + 1; last = state.start = state.ptr; } /* get segment following last match (even if empty) */ item = PySequence_GetSlice( string, STATE_OFFSET(&state, last), state.endpos ); if (!item) goto error; status = PyList_Append(list, item); Py_DECREF(item); if (status < 0) goto error; state_fini(&state); return list; error: Py_DECREF(list); state_fini(&state); return NULL; } static PyObject* pattern_subx(PatternObject* self, PyObject* template, PyObject* string, int count, int subn) { SRE_STATE state; PyObject* list; PyObject* item; PyObject* filter; PyObject* args; PyObject* match; void* ptr; int status; int n; int i, b, e; int filter_is_callable; if (PyCallable_Check(template)) { /* sub/subn takes either a function or a template */ filter = template; Py_INCREF(filter); filter_is_callable = 1; } else { /* if not callable, check if it's a literal string */ int literal; ptr = getstring(template, &n, &b); if (ptr) { if (b == 1) { literal = sre_literal_template(ptr, n); } else { #if defined(HAVE_UNICODE) literal = sre_uliteral_template(ptr, n); #endif } } else { PyErr_Clear(); literal = 0; } if (literal) { filter = template; Py_INCREF(filter); filter_is_callable = 0; } else { /* not a literal; hand it over to the template compiler */ filter = call( SRE_MODULE, "_subx", Py_BuildValue("OO", self, template) ); if (!filter) return NULL; filter_is_callable = PyCallable_Check(filter); } } string = state_init(&state, self, string, 0, INT_MAX); if (!string) { Py_DECREF(filter); return NULL; } list = PyList_New(0); if (!list) { Py_DECREF(filter); state_fini(&state); return NULL; } n = i = 0; while (!count || n < count) { state_reset(&state); state.ptr = state.start; if (state.charsize == 1) { status = sre_search(&state, PatternObject_GetCode(self)); } else { #if defined(HAVE_UNICODE) status = sre_usearch(&state, PatternObject_GetCode(self)); #endif } if (status <= 0) { if (status == 0) break; pattern_error(status); goto error; } b = STATE_OFFSET(&state, state.start); e = STATE_OFFSET(&state, state.ptr); if (i < b) { /* get segment before this match */ item = PySequence_GetSlice(string, i, b); if (!item) goto error; status = PyList_Append(list, item); Py_DECREF(item); if (status < 0) goto error; } else if (i == b && i == e && n > 0) /* ignore empty match on latest position */ goto next; if (filter_is_callable) { /* pass match object through filter */ match = pattern_new_match(self, &state, 1); if (!match) goto error; args = Py_BuildValue("(O)", match); if (!args) { Py_DECREF(match); goto error; } item = PyObject_CallObject(filter, args); Py_DECREF(args); Py_DECREF(match); if (!item) goto error; } else { /* filter is literal string */ item = filter; Py_INCREF(item); } /* add to list */ if (item != Py_None) { status = PyList_Append(list, item); Py_DECREF(item); if (status < 0) goto error; } i = e; n = n + 1; next: /* move on */ if (state.ptr == state.start) state.start = (void*) ((char*) state.ptr + state.charsize); else state.start = state.ptr; } /* get segment following last match */ if (i < state.endpos) { item = PySequence_GetSlice(string, i, state.endpos); if (!item) goto error; status = PyList_Append(list, item); Py_DECREF(item); if (status < 0) goto error; } state_fini(&state); Py_DECREF(filter); /* convert list to single string (also removes list) */ item = join_list(list, self->pattern); if (!item) return NULL; if (subn) return Py_BuildValue("Ni", item, n); return item; error: Py_DECREF(list); state_fini(&state); Py_DECREF(filter); return NULL; } static PyObject* pattern_sub(PatternObject* self, PyObject* args, PyObject* kw) { PyObject* template; PyObject* string; int count = 0; static char* kwlist[] = { "repl", "string", "count", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "OO|i:sub", kwlist, &template, &string, &count)) return NULL; return pattern_subx(self, template, string, count, 0); } static PyObject* pattern_subn(PatternObject* self, PyObject* args, PyObject* kw) { PyObject* template; PyObject* string; int count = 0; static char* kwlist[] = { "repl", "string", "count", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "OO|i:subn", kwlist, &template, &string, &count)) return NULL; return pattern_subx(self, template, string, count, 1); } static PyObject* pattern_copy(PatternObject* self, PyObject* args) { #ifdef USE_BUILTIN_COPY PatternObject* copy; int offset; if (args != Py_None && !PyArg_ParseTuple(args, ":__copy__")) return NULL; copy = PyObject_NEW_VAR(PatternObject, &Pattern_Type, self->codesize); if (!copy) return NULL; offset = offsetof(PatternObject, groups); Py_XINCREF(self->groupindex); Py_XINCREF(self->indexgroup); Py_XINCREF(self->pattern); memcpy((char*) copy + offset, (char*) self + offset, sizeof(PatternObject) + self->codesize * sizeof(SRE_CODE) - offset); return (PyObject*) copy; #else PyErr_SetString(PyExc_TypeError, "cannot copy this pattern object"); return NULL; #endif } static PyObject* pattern_deepcopy(PatternObject* self, PyObject* args) { #ifdef USE_BUILTIN_COPY PatternObject* copy; PyObject* memo; if (!PyArg_ParseTuple(args, "O:__deepcopy__", &memo)) return NULL; copy = (PatternObject*) pattern_copy(self, Py_None); if (!copy) return NULL; if (!deepcopy(©->groupindex, memo) || !deepcopy(©->indexgroup, memo) || !deepcopy(©->pattern, memo)) { Py_DECREF(copy); return NULL; } #else PyErr_SetString(PyExc_TypeError, "cannot deepcopy this pattern object"); return NULL; #endif } static PyMethodDef pattern_methods[] = { {"match", (PyCFunction) pattern_match, METH_VARARGS|METH_KEYWORDS}, {"search", (PyCFunction) pattern_search, METH_VARARGS|METH_KEYWORDS}, {"sub", (PyCFunction) pattern_sub, METH_VARARGS|METH_KEYWORDS}, {"subn", (PyCFunction) pattern_subn, METH_VARARGS|METH_KEYWORDS}, {"split", (PyCFunction) pattern_split, METH_VARARGS|METH_KEYWORDS}, {"findall", (PyCFunction) pattern_findall, METH_VARARGS|METH_KEYWORDS}, #if PY_VERSION_HEX >= 0x02020000 {"finditer", (PyCFunction) pattern_finditer, METH_VARARGS}, #endif {"scanner", (PyCFunction) pattern_scanner, METH_VARARGS}, {"__copy__", (PyCFunction) pattern_copy, METH_VARARGS}, {"__deepcopy__", (PyCFunction) pattern_deepcopy, METH_VARARGS}, {NULL, NULL} }; static PyObject* pattern_getattr(PatternObject* self, char* name) { PyObject* res; res = Py_FindMethod(pattern_methods, (PyObject*) self, name); if (res) return res; PyErr_Clear(); /* attributes */ if (!strcmp(name, "pattern")) { Py_INCREF(self->pattern); return self->pattern; } if (!strcmp(name, "flags")) return Py_BuildValue("i", self->flags); if (!strcmp(name, "groups")) return Py_BuildValue("i", self->groups); if (!strcmp(name, "groupindex") && self->groupindex) { Py_INCREF(self->groupindex); return self->groupindex; } PyErr_SetString(PyExc_AttributeError, name); return NULL; } statichere PyTypeObject Pattern_Type = { PyObject_HEAD_INIT(NULL) 0, "_" SRE_MODULE ".SRE_Pattern", sizeof(PatternObject), sizeof(SRE_CODE), (destructor)pattern_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)pattern_getattr /*tp_getattr*/ }; /* -------------------------------------------------------------------- */ /* match methods */ static void match_dealloc(MatchObject* self) { Py_XDECREF(self->regs); Py_XDECREF(self->string); Py_DECREF(self->pattern); PyObject_DEL(self); } static PyObject* match_getslice_by_index(MatchObject* self, int index, PyObject* def) { if (index < 0 || index >= self->groups) { /* raise IndexError if we were given a bad group number */ PyErr_SetString( PyExc_IndexError, "no such group" ); return NULL; } index *= 2; if (self->string == Py_None || self->mark[index] < 0) { /* return default value if the string or group is undefined */ Py_INCREF(def); return def; } return PySequence_GetSlice( self->string, self->mark[index], self->mark[index+1] ); } static int match_getindex(MatchObject* self, PyObject* index) { int i; if (PyInt_Check(index)) return (int) PyInt_AS_LONG(index); i = -1; if (self->pattern->groupindex) { index = PyObject_GetItem(self->pattern->groupindex, index); if (index) { if (PyInt_Check(index)) i = (int) PyInt_AS_LONG(index); Py_DECREF(index); } else PyErr_Clear(); } return i; } static PyObject* match_getslice(MatchObject* self, PyObject* index, PyObject* def) { return match_getslice_by_index(self, match_getindex(self, index), def); } static PyObject* match_expand(MatchObject* self, PyObject* args) { PyObject* template; if (!PyArg_ParseTuple(args, "O:expand", &template)) return NULL; /* delegate to Python code */ return call( SRE_MODULE, "_expand", Py_BuildValue("OOO", self->pattern, self, template) ); } static PyObject* match_group(MatchObject* self, PyObject* args) { PyObject* result; int i, size; size = PyTuple_GET_SIZE(args); switch (size) { case 0: result = match_getslice(self, Py_False, Py_None); break; case 1: result = match_getslice(self, PyTuple_GET_ITEM(args, 0), Py_None); break; default: /* fetch multiple items */ result = PyTuple_New(size); if (!result) return NULL; for (i = 0; i < size; i++) { PyObject* item = match_getslice( self, PyTuple_GET_ITEM(args, i), Py_None ); if (!item) { Py_DECREF(result); return NULL; } PyTuple_SET_ITEM(result, i, item); } break; } return result; } static PyObject* match_groups(MatchObject* self, PyObject* args, PyObject* kw) { PyObject* result; int index; PyObject* def = Py_None; static char* kwlist[] = { "default", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "|O:groups", kwlist, &def)) return NULL; result = PyTuple_New(self->groups-1); if (!result) return NULL; for (index = 1; index < self->groups; index++) { PyObject* item; item = match_getslice_by_index(self, index, def); if (!item) { Py_DECREF(result); return NULL; } PyTuple_SET_ITEM(result, index-1, item); } return result; } static PyObject* match_groupdict(MatchObject* self, PyObject* args, PyObject* kw) { PyObject* result; PyObject* keys; int index; PyObject* def = Py_None; static char* kwlist[] = { "default", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kw, "|O:groupdict", kwlist, &def)) return NULL; result = PyDict_New(); if (!result || !self->pattern->groupindex) return result; keys = PyMapping_Keys(self->pattern->groupindex); if (!keys) goto failed; for (index = 0; index < PyList_GET_SIZE(keys); index++) { int status; PyObject* key; PyObject* value; key = PyList_GET_ITEM(keys, index); if (!key) goto failed; value = match_getslice(self, key, def); if (!value) { Py_DECREF(key); goto failed; } status = PyDict_SetItem(result, key, value); Py_DECREF(value); if (status < 0) goto failed; } Py_DECREF(keys); return result; failed: Py_DECREF(keys); Py_DECREF(result); return NULL; } static PyObject* match_start(MatchObject* self, PyObject* args) { int index; PyObject* index_ = Py_False; /* zero */ if (!PyArg_ParseTuple(args, "|O:start", &index_)) return NULL; index = match_getindex(self, index_); if (index < 0 || index >= self->groups) { PyErr_SetString( PyExc_IndexError, "no such group" ); return NULL; } /* mark is -1 if group is undefined */ return Py_BuildValue("i", self->mark[index*2]); } static PyObject* match_end(MatchObject* self, PyObject* args) { int index; PyObject* index_ = Py_False; /* zero */ if (!PyArg_ParseTuple(args, "|O:end", &index_)) return NULL; index = match_getindex(self, index_); if (index < 0 || index >= self->groups) { PyErr_SetString( PyExc_IndexError, "no such group" ); return NULL; } /* mark is -1 if group is undefined */ return Py_BuildValue("i", self->mark[index*2+1]); } LOCAL(PyObject*) _pair(int i1, int i2) { PyObject* pair; PyObject* item; pair = PyTuple_New(2); if (!pair) return NULL; item = PyInt_FromLong(i1); if (!item) goto error; PyTuple_SET_ITEM(pair, 0, item); item = PyInt_FromLong(i2); if (!item) goto error; PyTuple_SET_ITEM(pair, 1, item); return pair; error: Py_DECREF(pair); return NULL; } static PyObject* match_span(MatchObject* self, PyObject* args) { int index; PyObject* index_ = Py_False; /* zero */ if (!PyArg_ParseTuple(args, "|O:span", &index_)) return NULL; index = match_getindex(self, index_); if (index < 0 || index >= self->groups) { PyErr_SetString( PyExc_IndexError, "no such group" ); return NULL; } /* marks are -1 if group is undefined */ return _pair(self->mark[index*2], self->mark[index*2+1]); } static PyObject* match_regs(MatchObject* self) { PyObject* regs; PyObject* item; int index; regs = PyTuple_New(self->groups); if (!regs) return NULL; for (index = 0; index < self->groups; index++) { item = _pair(self->mark[index*2], self->mark[index*2+1]); if (!item) { Py_DECREF(regs); return NULL; } PyTuple_SET_ITEM(regs, index, item); } Py_INCREF(regs); self->regs = regs; return regs; } static PyObject* match_copy(MatchObject* self, PyObject* args) { #ifdef USE_BUILTIN_COPY MatchObject* copy; int slots, offset; if (args != Py_None && !PyArg_ParseTuple(args, ":__copy__")) return NULL; slots = 2 * (self->pattern->groups+1); copy = PyObject_NEW_VAR(MatchObject, &Match_Type, slots); if (!copy) return NULL; /* this value a constant, but any compiler should be able to figure that out all by itself */ offset = offsetof(MatchObject, string); Py_XINCREF(self->pattern); Py_XINCREF(self->string); Py_XINCREF(self->regs); memcpy((char*) copy + offset, (char*) self + offset, sizeof(MatchObject) + slots * sizeof(int) - offset); return (PyObject*) copy; #else PyErr_SetString(PyExc_TypeError, "cannot copy this match object"); return NULL; #endif } static PyObject* match_deepcopy(MatchObject* self, PyObject* args) { #ifdef USE_BUILTIN_COPY MatchObject* copy; PyObject* memo; if (!PyArg_ParseTuple(args, "O:__deepcopy__", &memo)) return NULL; copy = (MatchObject*) match_copy(self, Py_None); if (!copy) return NULL; if (!deepcopy((PyObject**) ©->pattern, memo) || !deepcopy(©->string, memo) || !deepcopy(©->regs, memo)) { Py_DECREF(copy); return NULL; } #else PyErr_SetString(PyExc_TypeError, "cannot deepcopy this match object"); return NULL; #endif } static PyMethodDef match_methods[] = { {"group", (PyCFunction) match_group, METH_VARARGS}, {"start", (PyCFunction) match_start, METH_VARARGS}, {"end", (PyCFunction) match_end, METH_VARARGS}, {"span", (PyCFunction) match_span, METH_VARARGS}, {"groups", (PyCFunction) match_groups, METH_VARARGS|METH_KEYWORDS}, {"groupdict", (PyCFunction) match_groupdict, METH_VARARGS|METH_KEYWORDS}, {"expand", (PyCFunction) match_expand, METH_VARARGS}, {"__copy__", (PyCFunction) match_copy, METH_VARARGS}, {"__deepcopy__", (PyCFunction) match_deepcopy, METH_VARARGS}, {NULL, NULL} }; static PyObject* match_getattr(MatchObject* self, char* name) { PyObject* res; res = Py_FindMethod(match_methods, (PyObject*) self, name); if (res) return res; PyErr_Clear(); if (!strcmp(name, "lastindex")) { if (self->lastindex >= 0) return Py_BuildValue("i", self->lastindex); Py_INCREF(Py_None); return Py_None; } if (!strcmp(name, "lastgroup")) { if (self->pattern->indexgroup && self->lastindex >= 0) { PyObject* result = PySequence_GetItem( self->pattern->indexgroup, self->lastindex ); if (result) return result; PyErr_Clear(); } Py_INCREF(Py_None); return Py_None; } if (!strcmp(name, "string")) { if (self->string) { Py_INCREF(self->string); return self->string; } else { Py_INCREF(Py_None); return Py_None; } } if (!strcmp(name, "regs")) { if (self->regs) { Py_INCREF(self->regs); return self->regs; } else return match_regs(self); } if (!strcmp(name, "re")) { Py_INCREF(self->pattern); return (PyObject*) self->pattern; } if (!strcmp(name, "pos")) return Py_BuildValue("i", self->pos); if (!strcmp(name, "endpos")) return Py_BuildValue("i", self->endpos); PyErr_SetString(PyExc_AttributeError, name); return NULL; } /* FIXME: implement setattr("string", None) as a special case (to detach the associated string, if any */ statichere PyTypeObject Match_Type = { PyObject_HEAD_INIT(NULL) 0, "_" SRE_MODULE ".SRE_Match", sizeof(MatchObject), sizeof(int), (destructor)match_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)match_getattr /*tp_getattr*/ }; /* -------------------------------------------------------------------- */ /* scanner methods (experimental) */ static void scanner_dealloc(ScannerObject* self) { state_fini(&self->state); Py_DECREF(self->pattern); PyObject_DEL(self); } static PyObject* scanner_match(ScannerObject* self, PyObject* args) { SRE_STATE* state = &self->state; PyObject* match; int status; state_reset(state); state->ptr = state->start; if (state->charsize == 1) { status = sre_match(state, PatternObject_GetCode(self->pattern), 1); } else { #if defined(HAVE_UNICODE) status = sre_umatch(state, PatternObject_GetCode(self->pattern), 1); #endif } match = pattern_new_match((PatternObject*) self->pattern, state, status); if ((status == 0 || state->ptr == state->start) && state->ptr < state->end) state->start = (void*) ((char*) state->ptr + state->charsize); else state->start = state->ptr; return match; } static PyObject* scanner_search(ScannerObject* self, PyObject* args) { SRE_STATE* state = &self->state; PyObject* match; int status; state_reset(state); state->ptr = state->start; if (state->charsize == 1) { status = sre_search(state, PatternObject_GetCode(self->pattern)); } else { #if defined(HAVE_UNICODE) status = sre_usearch(state, PatternObject_GetCode(self->pattern)); #endif } match = pattern_new_match((PatternObject*) self->pattern, state, status); if ((status == 0 || state->ptr == state->start) && state->ptr < state->end) state->start = (void*) ((char*) state->ptr + state->charsize); else state->start = state->ptr; return match; } static PyMethodDef scanner_methods[] = { /* FIXME: use METH_OLDARGS instead of 0 or fix to use METH_VARARGS */ /* METH_OLDARGS is not in Python 1.5.2 */ {"match", (PyCFunction) scanner_match, 0}, {"search", (PyCFunction) scanner_search, 0}, {NULL, NULL} }; static PyObject* scanner_getattr(ScannerObject* self, char* name) { PyObject* res; res = Py_FindMethod(scanner_methods, (PyObject*) self, name); if (res) return res; PyErr_Clear(); /* attributes */ if (!strcmp(name, "pattern")) { Py_INCREF(self->pattern); return self->pattern; } PyErr_SetString(PyExc_AttributeError, name); return NULL; } statichere PyTypeObject Scanner_Type = { PyObject_HEAD_INIT(NULL) 0, "_" SRE_MODULE ".SRE_Scanner", sizeof(ScannerObject), 0, (destructor)scanner_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)scanner_getattr, /*tp_getattr*/ }; static PyMethodDef _functions[] = { {"compile", _compile, METH_VARARGS}, {"getcodesize", sre_codesize, METH_VARARGS}, {"getlower", sre_getlower, METH_VARARGS}, {NULL, NULL} }; #if PY_VERSION_HEX < 0x02030000 DL_EXPORT(void) init_sre(void) #else PyMODINIT_FUNC init_sre(void) #endif { PyObject* m; PyObject* d; PyObject* x; /* Patch object types */ Pattern_Type.ob_type = Match_Type.ob_type = Scanner_Type.ob_type = &PyType_Type; m = Py_InitModule("_" SRE_MODULE, _functions); d = PyModule_GetDict(m); x = PyInt_FromLong(SRE_MAGIC); if (x) { PyDict_SetItemString(d, "MAGIC", x); Py_DECREF(x); } x = PyInt_FromLong(sizeof(SRE_CODE)); if (x) { PyDict_SetItemString(d, "CODESIZE", x); Py_DECREF(x); } x = PyString_FromString(copyright); if (x) { PyDict_SetItemString(d, "copyright", x); Py_DECREF(x); } } #endif /* !defined(SRE_RECURSIVE) */ /* vim:ts=4:sw=4:et */ Python-2.3.7/Modules/nismodule.c0000644001241000117560000001654107561600345016040 0ustar loewishpifb6/*********************************************************** Written by: Fred Gansevles B&O group, Faculteit der Informatica, Universiteit Twente, Enschede, the Netherlands. ******************************************************************/ /* NIS module implementation */ #include "Python.h" #include #include #include #include #include #ifdef __sgi /* This is missing from rpcsvc/ypclnt.h */ extern int yp_get_default_domain(char **); #endif static PyObject *NisError; static PyObject * nis_error (int err) { PyErr_SetString(NisError, yperr_string(err)); return NULL; } static struct nis_map { char *alias; char *map; int fix; } aliases [] = { {"passwd", "passwd.byname", 0}, {"group", "group.byname", 0}, {"networks", "networks.byaddr", 0}, {"hosts", "hosts.byname", 0}, {"protocols", "protocols.bynumber", 0}, {"services", "services.byname", 0}, {"aliases", "mail.aliases", 1}, /* created with 'makedbm -a' */ {"ethers", "ethers.byname", 0}, {0L, 0L, 0} }; static char * nis_mapname (char *map, int *pfix) { int i; *pfix = 0; for (i=0; aliases[i].alias != 0L; i++) { if (!strcmp (aliases[i].alias, map)) { *pfix = aliases[i].fix; return aliases[i].map; } if (!strcmp (aliases[i].map, map)) { *pfix = aliases[i].fix; return aliases[i].map; } } return map; } typedef int (*foreachfunc)(int, char *, int, char *, int, char *); struct ypcallback_data { PyObject *dict; int fix; }; static int nis_foreach (int instatus, char *inkey, int inkeylen, char *inval, int invallen, struct ypcallback_data *indata) { if (instatus == YP_TRUE) { PyObject *key; PyObject *val; int err; if (indata->fix) { if (inkeylen > 0 && inkey[inkeylen-1] == '\0') inkeylen--; if (invallen > 0 && inval[invallen-1] == '\0') invallen--; } key = PyString_FromStringAndSize(inkey, inkeylen); val = PyString_FromStringAndSize(inval, invallen); if (key == NULL || val == NULL) { /* XXX error -- don't know how to handle */ PyErr_Clear(); Py_XDECREF(key); Py_XDECREF(val); return 1; } err = PyDict_SetItem(indata->dict, key, val); Py_DECREF(key); Py_DECREF(val); if (err != 0) { PyErr_Clear(); return 1; } return 0; } return 1; } static PyObject * nis_match (PyObject *self, PyObject *args) { char *match; char *domain; int keylen, len; char *key, *map; int err; PyObject *res; int fix; if (!PyArg_ParseTuple(args, "t#s:match", &key, &keylen, &map)) return NULL; if ((err = yp_get_default_domain(&domain)) != 0) return nis_error(err); map = nis_mapname (map, &fix); if (fix) keylen++; Py_BEGIN_ALLOW_THREADS err = yp_match (domain, map, key, keylen, &match, &len); Py_END_ALLOW_THREADS if (fix) len--; if (err != 0) return nis_error(err); res = PyString_FromStringAndSize (match, len); free (match); return res; } static PyObject * nis_cat (PyObject *self, PyObject *args) { char *domain; char *map; struct ypall_callback cb; struct ypcallback_data data; PyObject *dict; int err; if (!PyArg_ParseTuple(args, "s:cat", &map)) return NULL; if ((err = yp_get_default_domain(&domain)) != 0) return nis_error(err); dict = PyDict_New (); if (dict == NULL) return NULL; cb.foreach = (foreachfunc)nis_foreach; data.dict = dict; map = nis_mapname (map, &data.fix); cb.data = (char *)&data; Py_BEGIN_ALLOW_THREADS err = yp_all (domain, map, &cb); Py_END_ALLOW_THREADS if (err != 0) { Py_DECREF(dict); return nis_error(err); } return dict; } /* These should be u_long on Sun h/w but not on 64-bit h/w. This is not portable to machines with 16-bit ints and no prototypes */ #ifndef YPPROC_MAPLIST #define YPPROC_MAPLIST 11 #endif #ifndef YPPROG #define YPPROG 100004 #endif #ifndef YPVERS #define YPVERS 2 #endif typedef char *domainname; typedef char *mapname; enum nisstat { NIS_TRUE = 1, NIS_NOMORE = 2, NIS_FALSE = 0, NIS_NOMAP = -1, NIS_NODOM = -2, NIS_NOKEY = -3, NIS_BADOP = -4, NIS_BADDB = -5, NIS_YPERR = -6, NIS_BADARGS = -7, NIS_VERS = -8 }; typedef enum nisstat nisstat; struct nismaplist { mapname map; struct nismaplist *next; }; typedef struct nismaplist nismaplist; struct nisresp_maplist { nisstat stat; nismaplist *maps; }; typedef struct nisresp_maplist nisresp_maplist; static struct timeval TIMEOUT = { 25, 0 }; static bool_t nis_xdr_domainname(XDR *xdrs, domainname *objp) { if (!xdr_string(xdrs, objp, YPMAXDOMAIN)) { return (FALSE); } return (TRUE); } static bool_t nis_xdr_mapname(XDR *xdrs, mapname *objp) { if (!xdr_string(xdrs, objp, YPMAXMAP)) { return (FALSE); } return (TRUE); } static bool_t nis_xdr_ypmaplist(XDR *xdrs, nismaplist *objp) { if (!nis_xdr_mapname(xdrs, &objp->map)) { return (FALSE); } if (!xdr_pointer(xdrs, (char **)&objp->next, sizeof(nismaplist), (xdrproc_t)nis_xdr_ypmaplist)) { return (FALSE); } return (TRUE); } static bool_t nis_xdr_ypstat(XDR *xdrs, nisstat *objp) { if (!xdr_enum(xdrs, (enum_t *)objp)) { return (FALSE); } return (TRUE); } static bool_t nis_xdr_ypresp_maplist(XDR *xdrs, nisresp_maplist *objp) { if (!nis_xdr_ypstat(xdrs, &objp->stat)) { return (FALSE); } if (!xdr_pointer(xdrs, (char **)&objp->maps, sizeof(nismaplist), (xdrproc_t)nis_xdr_ypmaplist)) { return (FALSE); } return (TRUE); } static nisresp_maplist * nisproc_maplist_2(domainname *argp, CLIENT *clnt) { static nisresp_maplist res; memset(&res, 0, sizeof(res)); if (clnt_call(clnt, YPPROC_MAPLIST, (xdrproc_t)nis_xdr_domainname, (caddr_t)argp, (xdrproc_t)nis_xdr_ypresp_maplist, (caddr_t)&res, TIMEOUT) != RPC_SUCCESS) { return (NULL); } return (&res); } static nismaplist * nis_maplist (void) { nisresp_maplist *list; char *dom; CLIENT *cl; char *server = NULL; int mapi = 0; int err; if ((err = yp_get_default_domain (&dom)) != 0) { nis_error(err); return NULL; } while (!server && aliases[mapi].map != 0L) { yp_master (dom, aliases[mapi].map, &server); mapi++; } if (!server) { PyErr_SetString(NisError, "No NIS master found for any map"); return NULL; } cl = clnt_create(server, YPPROG, YPVERS, "tcp"); if (cl == NULL) { PyErr_SetString(NisError, clnt_spcreateerror(server)); goto finally; } list = nisproc_maplist_2 (&dom, cl); clnt_destroy(cl); if (list == NULL) goto finally; if (list->stat != NIS_TRUE) goto finally; free(server); return list->maps; finally: free(server); return NULL; } static PyObject * nis_maps (PyObject *self) { nismaplist *maps; PyObject *list; if ((maps = nis_maplist ()) == NULL) return NULL; if ((list = PyList_New(0)) == NULL) return NULL; for (maps = maps; maps; maps = maps->next) { PyObject *str = PyString_FromString(maps->map); if (!str || PyList_Append(list, str) < 0) { Py_DECREF(list); list = NULL; break; } Py_DECREF(str); } /* XXX Shouldn't we free the list of maps now? */ return list; } static PyMethodDef nis_methods[] = { {"match", nis_match, METH_VARARGS}, {"cat", nis_cat, METH_VARARGS}, {"maps", (PyCFunction)nis_maps, METH_NOARGS}, {NULL, NULL} /* Sentinel */ }; void initnis (void) { PyObject *m, *d; m = Py_InitModule("nis", nis_methods); d = PyModule_GetDict(m); NisError = PyErr_NewException("nis.error", NULL, NULL); if (NisError != NULL) PyDict_SetItemString(d, "error", NisError); } Python-2.3.7/Modules/cdmodule.c0000644001241000117560000004543507462570620015643 0ustar loewishpifb6/* CD module -- interface to Mark Callow's and Roger Chickering's */ /* CD Audio Library (CD). */ #include #include #include "Python.h" #define NCALLBACKS 8 typedef struct { PyObject_HEAD CDPLAYER *ob_cdplayer; } cdplayerobject; static PyObject *CdError; /* exception cd.error */ static PyObject * CD_allowremoval(cdplayerobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":allowremoval")) return NULL; CDallowremoval(self->ob_cdplayer); Py_INCREF(Py_None); return Py_None; } static PyObject * CD_preventremoval(cdplayerobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":preventremoval")) return NULL; CDpreventremoval(self->ob_cdplayer); Py_INCREF(Py_None); return Py_None; } static PyObject * CD_bestreadsize(cdplayerobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":bestreadsize")) return NULL; return PyInt_FromLong((long) CDbestreadsize(self->ob_cdplayer)); } static PyObject * CD_close(cdplayerobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":close")) return NULL; if (!CDclose(self->ob_cdplayer)) { PyErr_SetFromErrno(CdError); /* XXX - ??? */ return NULL; } self->ob_cdplayer = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * CD_eject(cdplayerobject *self, PyObject *args) { CDSTATUS status; if (!PyArg_ParseTuple(args, ":eject")) return NULL; if (!CDeject(self->ob_cdplayer)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "eject failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_getstatus(cdplayerobject *self, PyObject *args) { CDSTATUS status; if (!PyArg_ParseTuple(args, ":getstatus")) return NULL; if (!CDgetstatus(self->ob_cdplayer, &status)) { PyErr_SetFromErrno(CdError); /* XXX - ??? */ return NULL; } return Py_BuildValue("(ii(iii)(iii)(iii)iiii)", status.state, status.track, status.min, status.sec, status.frame, status.abs_min, status.abs_sec, status.abs_frame, status.total_min, status.total_sec, status.total_frame, status.first, status.last, status.scsi_audio, status.cur_block); } static PyObject * CD_gettrackinfo(cdplayerobject *self, PyObject *args) { int track; CDTRACKINFO info; CDSTATUS status; if (!PyArg_ParseTuple(args, "i:gettrackinfo", &track)) return NULL; if (!CDgettrackinfo(self->ob_cdplayer, track, &info)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "gettrackinfo failed"); return NULL; } return Py_BuildValue("((iii)(iii))", info.start_min, info.start_sec, info.start_frame, info.total_min, info.total_sec, info.total_frame); } static PyObject * CD_msftoblock(cdplayerobject *self, PyObject *args) { int min, sec, frame; if (!PyArg_ParseTuple(args, "iii:msftoblock", &min, &sec, &frame)) return NULL; return PyInt_FromLong((long) CDmsftoblock(self->ob_cdplayer, min, sec, frame)); } static PyObject * CD_play(cdplayerobject *self, PyObject *args) { int start, play; CDSTATUS status; if (!PyArg_ParseTuple(args, "ii:play", &start, &play)) return NULL; if (!CDplay(self->ob_cdplayer, start, play)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "play failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_playabs(cdplayerobject *self, PyObject *args) { int min, sec, frame, play; CDSTATUS status; if (!PyArg_ParseTuple(args, "iiii:playabs", &min, &sec, &frame, &play)) return NULL; if (!CDplayabs(self->ob_cdplayer, min, sec, frame, play)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "playabs failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_playtrack(cdplayerobject *self, PyObject *args) { int start, play; CDSTATUS status; if (!PyArg_ParseTuple(args, "ii:playtrack", &start, &play)) return NULL; if (!CDplaytrack(self->ob_cdplayer, start, play)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "playtrack failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_playtrackabs(cdplayerobject *self, PyObject *args) { int track, min, sec, frame, play; CDSTATUS status; if (!PyArg_ParseTuple(args, "iiiii:playtrackabs", &track, &min, &sec, &frame, &play)) return NULL; if (!CDplaytrackabs(self->ob_cdplayer, track, min, sec, frame, play)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "playtrackabs failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_readda(cdplayerobject *self, PyObject *args) { int numframes, n; PyObject *result; if (!PyArg_ParseTuple(args, "i:readda", &numframes)) return NULL; result = PyString_FromStringAndSize(NULL, numframes * sizeof(CDFRAME)); if (result == NULL) return NULL; n = CDreadda(self->ob_cdplayer, (CDFRAME *) PyString_AsString(result), numframes); if (n == -1) { Py_DECREF(result); PyErr_SetFromErrno(CdError); return NULL; } if (n < numframes) _PyString_Resize(&result, n * sizeof(CDFRAME)); return result; } static PyObject * CD_seek(cdplayerobject *self, PyObject *args) { int min, sec, frame; long PyTryBlock; if (!PyArg_ParseTuple(args, "iii:seek", &min, &sec, &frame)) return NULL; PyTryBlock = CDseek(self->ob_cdplayer, min, sec, frame); if (PyTryBlock == -1) { PyErr_SetFromErrno(CdError); return NULL; } return PyInt_FromLong(PyTryBlock); } static PyObject * CD_seektrack(cdplayerobject *self, PyObject *args) { int track; long PyTryBlock; if (!PyArg_ParseTuple(args, "i:seektrack", &track)) return NULL; PyTryBlock = CDseektrack(self->ob_cdplayer, track); if (PyTryBlock == -1) { PyErr_SetFromErrno(CdError); return NULL; } return PyInt_FromLong(PyTryBlock); } static PyObject * CD_seekblock(cdplayerobject *self, PyObject *args) { unsigned long PyTryBlock; if (!PyArg_ParseTuple(args, "l:seekblock", &PyTryBlock)) return NULL; PyTryBlock = CDseekblock(self->ob_cdplayer, PyTryBlock); if (PyTryBlock == (unsigned long) -1) { PyErr_SetFromErrno(CdError); return NULL; } return PyInt_FromLong(PyTryBlock); } static PyObject * CD_stop(cdplayerobject *self, PyObject *args) { CDSTATUS status; if (!PyArg_ParseTuple(args, ":stop")) return NULL; if (!CDstop(self->ob_cdplayer)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "stop failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_togglepause(cdplayerobject *self, PyObject *args) { CDSTATUS status; if (!PyArg_ParseTuple(args, ":togglepause")) return NULL; if (!CDtogglepause(self->ob_cdplayer)) { if (CDgetstatus(self->ob_cdplayer, &status) && status.state == CD_NODISC) PyErr_SetString(CdError, "no disc in player"); else PyErr_SetString(CdError, "togglepause failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyMethodDef cdplayer_methods[] = { {"allowremoval", (PyCFunction)CD_allowremoval, METH_VARARGS}, {"bestreadsize", (PyCFunction)CD_bestreadsize, METH_VARARGS}, {"close", (PyCFunction)CD_close, METH_VARARGS}, {"eject", (PyCFunction)CD_eject, METH_VARARGS}, {"getstatus", (PyCFunction)CD_getstatus, METH_VARARGS}, {"gettrackinfo", (PyCFunction)CD_gettrackinfo, METH_VARARGS}, {"msftoblock", (PyCFunction)CD_msftoblock, METH_VARARGS}, {"play", (PyCFunction)CD_play, METH_VARARGS}, {"playabs", (PyCFunction)CD_playabs, METH_VARARGS}, {"playtrack", (PyCFunction)CD_playtrack, METH_VARARGS}, {"playtrackabs", (PyCFunction)CD_playtrackabs, METH_VARARGS}, {"preventremoval", (PyCFunction)CD_preventremoval, METH_VARARGS}, {"readda", (PyCFunction)CD_readda, METH_VARARGS}, {"seek", (PyCFunction)CD_seek, METH_VARARGS}, {"seekblock", (PyCFunction)CD_seekblock, METH_VARARGS}, {"seektrack", (PyCFunction)CD_seektrack, METH_VARARGS}, {"stop", (PyCFunction)CD_stop, METH_VARARGS}, {"togglepause", (PyCFunction)CD_togglepause, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static void cdplayer_dealloc(cdplayerobject *self) { if (self->ob_cdplayer != NULL) CDclose(self->ob_cdplayer); PyObject_Del(self); } static PyObject * cdplayer_getattr(cdplayerobject *self, char *name) { if (self->ob_cdplayer == NULL) { PyErr_SetString(PyExc_RuntimeError, "no player active"); return NULL; } return Py_FindMethod(cdplayer_methods, (PyObject *)self, name); } PyTypeObject CdPlayertype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "cd.cdplayer", /*tp_name*/ sizeof(cdplayerobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)cdplayer_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)cdplayer_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyObject * newcdplayerobject(CDPLAYER *cdp) { cdplayerobject *p; p = PyObject_New(cdplayerobject, &CdPlayertype); if (p == NULL) return NULL; p->ob_cdplayer = cdp; return (PyObject *) p; } static PyObject * CD_open(PyObject *self, PyObject *args) { char *dev, *direction; CDPLAYER *cdp; /* * Variable number of args. * First defaults to "None", second defaults to "r". */ dev = NULL; direction = "r"; if (!PyArg_ParseTuple(args, "|zs:open", &dev, &direction)) return NULL; cdp = CDopen(dev, direction); if (cdp == NULL) { PyErr_SetFromErrno(CdError); return NULL; } return newcdplayerobject(cdp); } typedef struct { PyObject_HEAD CDPARSER *ob_cdparser; struct { PyObject *ob_cdcallback; PyObject *ob_cdcallbackarg; } ob_cdcallbacks[NCALLBACKS]; } cdparserobject; static void CD_callback(void *arg, CDDATATYPES type, void *data) { PyObject *result, *args, *v = NULL; char *p; int i; cdparserobject *self; self = (cdparserobject *) arg; args = PyTuple_New(3); if (args == NULL) return; Py_INCREF(self->ob_cdcallbacks[type].ob_cdcallbackarg); PyTuple_SetItem(args, 0, self->ob_cdcallbacks[type].ob_cdcallbackarg); PyTuple_SetItem(args, 1, PyInt_FromLong((long) type)); switch (type) { case cd_audio: v = PyString_FromStringAndSize(data, CDDA_DATASIZE); break; case cd_pnum: case cd_index: v = PyInt_FromLong(((CDPROGNUM *) data)->value); break; case cd_ptime: case cd_atime: #define ptr ((struct cdtimecode *) data) v = Py_BuildValue("(iii)", ptr->mhi * 10 + ptr->mlo, ptr->shi * 10 + ptr->slo, ptr->fhi * 10 + ptr->flo); #undef ptr break; case cd_catalog: v = PyString_FromStringAndSize(NULL, 13); p = PyString_AsString(v); for (i = 0; i < 13; i++) *p++ = ((char *) data)[i] + '0'; break; case cd_ident: #define ptr ((struct cdident *) data) v = PyString_FromStringAndSize(NULL, 12); p = PyString_AsString(v); CDsbtoa(p, ptr->country, 2); p += 2; CDsbtoa(p, ptr->owner, 3); p += 3; *p++ = ptr->year[0] + '0'; *p++ = ptr->year[1] + '0'; *p++ = ptr->serial[0] + '0'; *p++ = ptr->serial[1] + '0'; *p++ = ptr->serial[2] + '0'; *p++ = ptr->serial[3] + '0'; *p++ = ptr->serial[4] + '0'; #undef ptr break; case cd_control: v = PyInt_FromLong((long) *((unchar *) data)); break; } PyTuple_SetItem(args, 2, v); if (PyErr_Occurred()) { Py_DECREF(args); return; } result = PyEval_CallObject(self->ob_cdcallbacks[type].ob_cdcallback, args); Py_DECREF(args); Py_XDECREF(result); } static PyObject * CD_deleteparser(cdparserobject *self, PyObject *args) { int i; if (!PyArg_ParseTuple(args, ":deleteparser")) return NULL; CDdeleteparser(self->ob_cdparser); self->ob_cdparser = NULL; /* no sense in keeping the callbacks, so remove them */ for (i = 0; i < NCALLBACKS; i++) { Py_XDECREF(self->ob_cdcallbacks[i].ob_cdcallback); self->ob_cdcallbacks[i].ob_cdcallback = NULL; Py_XDECREF(self->ob_cdcallbacks[i].ob_cdcallbackarg); self->ob_cdcallbacks[i].ob_cdcallbackarg = NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_parseframe(cdparserobject *self, PyObject *args) { char *cdfp; int length; CDFRAME *p; if (!PyArg_ParseTuple(args, "s#:parseframe", &cdfp, &length)) return NULL; if (length % sizeof(CDFRAME) != 0) { PyErr_SetString(PyExc_TypeError, "bad length"); return NULL; } p = (CDFRAME *) cdfp; while (length > 0) { CDparseframe(self->ob_cdparser, p); length -= sizeof(CDFRAME); p++; if (PyErr_Occurred()) return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * CD_removecallback(cdparserobject *self, PyObject *args) { int type; if (!PyArg_ParseTuple(args, "i:removecallback", &type)) return NULL; if (type < 0 || type >= NCALLBACKS) { PyErr_SetString(PyExc_TypeError, "bad type"); return NULL; } CDremovecallback(self->ob_cdparser, (CDDATATYPES) type); Py_XDECREF(self->ob_cdcallbacks[type].ob_cdcallback); self->ob_cdcallbacks[type].ob_cdcallback = NULL; Py_XDECREF(self->ob_cdcallbacks[type].ob_cdcallbackarg); self->ob_cdcallbacks[type].ob_cdcallbackarg = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * CD_resetparser(cdparserobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":resetparser")) return NULL; CDresetparser(self->ob_cdparser); Py_INCREF(Py_None); return Py_None; } static PyObject * CD_addcallback(cdparserobject *self, PyObject *args) { int type; PyObject *func, *funcarg; /* XXX - more work here */ if (!PyArg_ParseTuple(args, "iOO:addcallback", &type, &func, &funcarg)) return NULL; if (type < 0 || type >= NCALLBACKS) { PyErr_SetString(PyExc_TypeError, "argument out of range"); return NULL; } #ifdef CDsetcallback CDaddcallback(self->ob_cdparser, (CDDATATYPES) type, CD_callback, (void *) self); #else CDsetcallback(self->ob_cdparser, (CDDATATYPES) type, CD_callback, (void *) self); #endif Py_XDECREF(self->ob_cdcallbacks[type].ob_cdcallback); Py_INCREF(func); self->ob_cdcallbacks[type].ob_cdcallback = func; Py_XDECREF(self->ob_cdcallbacks[type].ob_cdcallbackarg); Py_INCREF(funcarg); self->ob_cdcallbacks[type].ob_cdcallbackarg = funcarg; /* if (type == cd_audio) { sigfpe_[_UNDERFL].repls = _ZERO; handle_sigfpes(_ON, _EN_UNDERFL, NULL, _ABORT_ON_ERROR, NULL); } */ Py_INCREF(Py_None); return Py_None; } static PyMethodDef cdparser_methods[] = { {"addcallback", (PyCFunction)CD_addcallback, METH_VARARGS}, {"deleteparser", (PyCFunction)CD_deleteparser, METH_VARARGS}, {"parseframe", (PyCFunction)CD_parseframe, METH_VARARGS}, {"removecallback", (PyCFunction)CD_removecallback, METH_VARARGS}, {"resetparser", (PyCFunction)CD_resetparser, METH_VARARGS}, /* backward compatibility */ {"setcallback", (PyCFunction)CD_addcallback, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static void cdparser_dealloc(cdparserobject *self) { int i; for (i = 0; i < NCALLBACKS; i++) { Py_XDECREF(self->ob_cdcallbacks[i].ob_cdcallback); self->ob_cdcallbacks[i].ob_cdcallback = NULL; Py_XDECREF(self->ob_cdcallbacks[i].ob_cdcallbackarg); self->ob_cdcallbacks[i].ob_cdcallbackarg = NULL; } CDdeleteparser(self->ob_cdparser); PyObject_Del(self); } static PyObject * cdparser_getattr(cdparserobject *self, char *name) { if (self->ob_cdparser == NULL) { PyErr_SetString(PyExc_RuntimeError, "no parser active"); return NULL; } return Py_FindMethod(cdparser_methods, (PyObject *)self, name); } PyTypeObject CdParsertype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "cd.cdparser", /*tp_name*/ sizeof(cdparserobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)cdparser_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)cdparser_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyObject * newcdparserobject(CDPARSER *cdp) { cdparserobject *p; int i; p = PyObject_New(cdparserobject, &CdParsertype); if (p == NULL) return NULL; p->ob_cdparser = cdp; for (i = 0; i < NCALLBACKS; i++) { p->ob_cdcallbacks[i].ob_cdcallback = NULL; p->ob_cdcallbacks[i].ob_cdcallbackarg = NULL; } return (PyObject *) p; } static PyObject * CD_createparser(PyObject *self, PyObject *args) { CDPARSER *cdp; if (!PyArg_ParseTuple(args, ":createparser")) return NULL; cdp = CDcreateparser(); if (cdp == NULL) { PyErr_SetString(CdError, "createparser failed"); return NULL; } return newcdparserobject(cdp); } static PyObject * CD_msftoframe(PyObject *self, PyObject *args) { int min, sec, frame; if (!PyArg_ParseTuple(args, "iii:msftoframe", &min, &sec, &frame)) return NULL; return PyInt_FromLong((long) CDmsftoframe(min, sec, frame)); } static PyMethodDef CD_methods[] = { {"open", (PyCFunction)CD_open, METH_VARARGS}, {"createparser", (PyCFunction)CD_createparser, METH_VARARGS}, {"msftoframe", (PyCFunction)CD_msftoframe, METH_VARARGS}, {NULL, NULL} /* Sentinel */ }; void initcd(void) { PyObject *m, *d; m = Py_InitModule("cd", CD_methods); d = PyModule_GetDict(m); CdError = PyErr_NewException("cd.error", NULL, NULL); PyDict_SetItemString(d, "error", CdError); /* Identifiers for the different types of callbacks from the parser */ PyDict_SetItemString(d, "audio", PyInt_FromLong((long) cd_audio)); PyDict_SetItemString(d, "pnum", PyInt_FromLong((long) cd_pnum)); PyDict_SetItemString(d, "index", PyInt_FromLong((long) cd_index)); PyDict_SetItemString(d, "ptime", PyInt_FromLong((long) cd_ptime)); PyDict_SetItemString(d, "atime", PyInt_FromLong((long) cd_atime)); PyDict_SetItemString(d, "catalog", PyInt_FromLong((long) cd_catalog)); PyDict_SetItemString(d, "ident", PyInt_FromLong((long) cd_ident)); PyDict_SetItemString(d, "control", PyInt_FromLong((long) cd_control)); /* Block size information for digital audio data */ PyDict_SetItemString(d, "DATASIZE", PyInt_FromLong((long) CDDA_DATASIZE)); PyDict_SetItemString(d, "BLOCKSIZE", PyInt_FromLong((long) CDDA_BLOCKSIZE)); /* Possible states for the cd player */ PyDict_SetItemString(d, "ERROR", PyInt_FromLong((long) CD_ERROR)); PyDict_SetItemString(d, "NODISC", PyInt_FromLong((long) CD_NODISC)); PyDict_SetItemString(d, "READY", PyInt_FromLong((long) CD_READY)); PyDict_SetItemString(d, "PLAYING", PyInt_FromLong((long) CD_PLAYING)); PyDict_SetItemString(d, "PAUSED", PyInt_FromLong((long) CD_PAUSED)); PyDict_SetItemString(d, "STILL", PyInt_FromLong((long) CD_STILL)); #ifdef CD_CDROM /* only newer versions of the library */ PyDict_SetItemString(d, "CDROM", PyInt_FromLong((long) CD_CDROM)); #endif } Python-2.3.7/Modules/rotormodule.c0000644001241000117560000003514307651761731016422 0ustar loewishpifb6/*********************************************************** Copyright 1994 by Lance Ellinghouse, Cathedral City, California Republic, United States of America. All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the name of Lance Ellinghouse not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. LANCE ELLINGHOUSE DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL LANCE ELLINGHOUSE BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ******************************************************************/ /* This creates an encryption and decryption engine I am calling a rotor due to the original design was a hardware rotor with contacts used in Germany during WWII. Rotor Module: - rotor.newrotor('key') -> rotorobject (default of 6 rotors) - rotor.newrotor('key', num_rotors) -> rotorobject Rotor Objects: - ro.setkey('string') -> None (resets the key as defined in newrotor(). - ro.encrypt('string') -> encrypted string - ro.decrypt('encrypted string') -> unencrypted string - ro.encryptmore('string') -> encrypted string - ro.decryptmore('encrypted string') -> unencrypted string NOTE: the {en,de}cryptmore() methods use the setup that was established via the {en,de}crypt calls. They will NOT re-initalize the rotors unless: 1) They have not been initialized with {en,de}crypt since the last setkey() call; 2) {en,de}crypt has not been called for this rotor yet. NOTE: you MUST use the SAME key in rotor.newrotor() if you wish to decrypt an encrypted string. Also, the encrypted string is NOT 0-127 ASCII. It is considered BINARY data. */ /* Rotor objects */ #include "Python.h" #ifndef TRUE #define TRUE 1 #endif #ifndef FALSE #define FALSE 0 #endif typedef struct { PyObject_HEAD int seed[3]; short key[5]; int isinited; int size; int size_mask; int rotors; unsigned char *e_rotor; /* [num_rotors][size] */ unsigned char *d_rotor; /* [num_rotors][size] */ unsigned char *positions; /* [num_rotors] */ unsigned char *advances; /* [num_rotors] */ } Rotorobj; static PyTypeObject Rotor_Type; #define is_rotor(v) ((v)->ob_type == &Rotor_Type) /* This defines the necessary routines to manage rotor objects */ static void set_seed(Rotorobj *r) { r->seed[0] = r->key[0]; r->seed[1] = r->key[1]; r->seed[2] = r->key[2]; r->isinited = FALSE; } /* Return the next random number in the range [0.0 .. 1.0) */ static double r_random(Rotorobj *r) { int x, y, z; double val, term; x = r->seed[0]; y = r->seed[1]; z = r->seed[2]; x = 171 * (x % 177) - 2 * (x/177); y = 172 * (y % 176) - 35 * (y/176); z = 170 * (z % 178) - 63 * (z/178); if (x < 0) x = x + 30269; if (y < 0) y = y + 30307; if (z < 0) z = z + 30323; r->seed[0] = x; r->seed[1] = y; r->seed[2] = z; term = (double)( (((double)x)/(double)30269.0) + (((double)y)/(double)30307.0) + (((double)z)/(double)30323.0) ); val = term - (double)floor((double)term); if (val >= 1.0) val = 0.0; return val; } static short r_rand(Rotorobj *r, short s) { return (short)((short)(r_random(r) * (double)s) % s); } static void set_key(Rotorobj *r, char *key) { unsigned long k1=995, k2=576, k3=767, k4=671, k5=463; size_t i; size_t len = strlen(key); for (i = 0; i < len; i++) { unsigned short ki = Py_CHARMASK(key[i]); k1 = (((k1<<3 | k1>>13) + ki) & 65535); k2 = (((k2<<3 | k2>>13) ^ ki) & 65535); k3 = (((k3<<3 | k3>>13) - ki) & 65535); k4 = ((ki - (k4<<3 | k4>>13)) & 65535); k5 = (((k5<<3 | k5>>13) ^ ~ki) & 65535); } r->key[0] = (short)k1; r->key[1] = (short)(k2|1); r->key[2] = (short)k3; r->key[3] = (short)k4; r->key[4] = (short)k5; set_seed(r); } /* These define the interface to a rotor object */ static Rotorobj * rotorobj_new(int num_rotors, char *key) { Rotorobj *xp; xp = PyObject_New(Rotorobj, &Rotor_Type); if (xp == NULL) return NULL; set_key(xp, key); xp->size = 256; xp->size_mask = xp->size - 1; xp->size_mask = 0; xp->rotors = num_rotors; xp->e_rotor = NULL; xp->d_rotor = NULL; xp->positions = NULL; xp->advances = NULL; if (!(xp->e_rotor = PyMem_NEW(unsigned char, num_rotors * xp->size))) goto finally; if (!(xp->d_rotor = PyMem_NEW(unsigned char, num_rotors * xp->size))) goto finally; if (!(xp->positions = PyMem_NEW(unsigned char, num_rotors))) goto finally; if (!(xp->advances = PyMem_NEW(unsigned char, num_rotors))) goto finally; return xp; finally: if (xp->e_rotor) PyMem_DEL(xp->e_rotor); if (xp->d_rotor) PyMem_DEL(xp->d_rotor); if (xp->positions) PyMem_DEL(xp->positions); if (xp->advances) PyMem_DEL(xp->advances); Py_DECREF(xp); return (Rotorobj*)PyErr_NoMemory(); } /* These routines implement the rotor itself */ /* Here is a fairly sophisticated {en,de}cryption system. It is based on the idea of a "rotor" machine. A bunch of rotors, each with a different permutation of the alphabet, rotate around a different amount after encrypting one character. The current state of the rotors is used to encrypt one character. The code is smart enough to tell if your alphabet has a number of characters equal to a power of two. If it does, it uses logical operations, if not it uses div and mod (both require a division). You will need to make two changes to the code 1) convert to c, and customize for an alphabet of 255 chars 2) add a filter at the begining, and end, which subtracts one on the way in, and adds one on the way out. You might wish to do some timing studies. Another viable alternative is to "byte stuff" the encrypted data of a normal (perhaps this one) encryption routine. j' */ /* Note: the C code here is a fairly straightforward transliteration of a * rotor implemented in lisp. The original lisp code has been removed from * this file to for simplification, but I've kept the docstrings as * comments in front of the functions. */ /* Set ROTOR to the identity permutation */ static void RTR_make_id_rotor(Rotorobj *r, unsigned char *rtr) { register int j; register int size = r->size; for (j = 0; j < size; j++) { rtr[j] = (unsigned char)j; } } /* The current set of encryption rotors */ static void RTR_e_rotors(Rotorobj *r) { int i; for (i = 0; i < r->rotors; i++) { RTR_make_id_rotor(r, &(r->e_rotor[(i*r->size)])); } } /* The current set of decryption rotors */ static void RTR_d_rotors(Rotorobj *r) { register int i, j; for (i = 0; i < r->rotors; i++) { for (j = 0; j < r->size; j++) { r->d_rotor[((i*r->size)+j)] = (unsigned char)j; } } } /* The positions of the rotors at this time */ static void RTR_positions(Rotorobj *r) { int i; for (i = 0; i < r->rotors; i++) { r->positions[i] = 1; } } /* The number of positions to advance the rotors at a time */ static void RTR_advances(Rotorobj *r) { int i; for (i = 0; i < r->rotors; i++) { r->advances[i] = 1; } } /* Permute the E rotor, and make the D rotor its inverse * see Knuth for explanation of algorithm. */ static void RTR_permute_rotor(Rotorobj *r, unsigned char *e, unsigned char *d) { short i = r->size; short q; unsigned char j; RTR_make_id_rotor(r,e); while (2 <= i) { q = r_rand(r,i); i--; j = e[q]; e[q] = (unsigned char)e[i]; e[i] = (unsigned char)j; d[j] = (unsigned char)i; } e[0] = (unsigned char)e[0]; d[(e[0])] = (unsigned char)0; } /* Given KEY (a list of 5 16 bit numbers), initialize the rotor machine. * Set the advancement, position, and permutation of the rotors */ static void RTR_init(Rotorobj *r) { int i; set_seed(r); RTR_positions(r); RTR_advances(r); RTR_e_rotors(r); RTR_d_rotors(r); for (i = 0; i < r->rotors; i++) { r->positions[i] = (unsigned char) r_rand(r, (short)r->size); r->advances[i] = (1+(2*(r_rand(r, (short)(r->size/2))))); RTR_permute_rotor(r, &(r->e_rotor[(i*r->size)]), &(r->d_rotor[(i*r->size)])); } r->isinited = TRUE; } /* Change the RTR-positions vector, using the RTR-advances vector */ static void RTR_advance(Rotorobj *r) { register int i=0, temp=0; if (r->size_mask) { while (i < r->rotors) { temp = r->positions[i] + r->advances[i]; r->positions[i] = temp & r->size_mask; if ((temp >= r->size) && (i < (r->rotors - 1))) { r->positions[(i+1)] = 1 + r->positions[(i+1)]; } i++; } } else { while (i < r->rotors) { temp = r->positions[i] + r->advances[i]; r->positions[i] = temp%r->size; if ((temp >= r->size) && (i < (r->rotors - 1))) { r->positions[(i+1)] = 1 + r->positions[(i+1)]; } i++; } } } /* Encrypt the character P with the current rotor machine */ static unsigned char RTR_e_char(Rotorobj *r, unsigned char p) { register int i=0; register unsigned char tp=p; if (r->size_mask) { while (i < r->rotors) { tp = r->e_rotor[(i*r->size) + (((r->positions[i] ^ tp) & r->size_mask))]; i++; } } else { while (i < r->rotors) { tp = r->e_rotor[(i*r->size) + (((r->positions[i] ^ tp) % (unsigned int) r->size))]; i++; } } RTR_advance(r); return ((unsigned char)tp); } /* Decrypt the character C with the current rotor machine */ static unsigned char RTR_d_char(Rotorobj *r, unsigned char c) { register int i = r->rotors - 1; register unsigned char tc = c; if (r->size_mask) { while (0 <= i) { tc = (r->positions[i] ^ r->d_rotor[(i*r->size)+tc]) & r->size_mask; i--; } } else { while (0 <= i) { tc = (r->positions[i] ^ r->d_rotor[(i*r->size)+tc]) % (unsigned int) r->size; i--; } } RTR_advance(r); return(tc); } /* Perform a rotor encryption of the region from BEG to END by KEY */ static void RTR_e_region(Rotorobj *r, unsigned char *beg, int len, int doinit) { register int i; if (doinit || r->isinited == FALSE) RTR_init(r); for (i = 0; i < len; i++) { beg[i] = RTR_e_char(r, beg[i]); } } /* Perform a rotor decryption of the region from BEG to END by KEY */ static void RTR_d_region(Rotorobj *r, unsigned char *beg, int len, int doinit) { register int i; if (doinit || r->isinited == FALSE) RTR_init(r); for (i = 0; i < len; i++) { beg[i] = RTR_d_char(r, beg[i]); } } /* Rotor methods */ static void rotor_dealloc(Rotorobj *xp) { if (xp->e_rotor) PyMem_DEL(xp->e_rotor); if (xp->d_rotor) PyMem_DEL(xp->d_rotor); if (xp->positions) PyMem_DEL(xp->positions); if (xp->advances) PyMem_DEL(xp->advances); PyObject_Del(xp); } static PyObject * rotorobj_encrypt(Rotorobj *self, PyObject *args) { char *string = NULL; int len = 0; PyObject *rtn = NULL; char *tmp; if (!PyArg_ParseTuple(args, "s#:encrypt", &string, &len)) return NULL; if (!(tmp = PyMem_NEW(char, len+5))) { PyErr_NoMemory(); return NULL; } memset(tmp, '\0', len+1); memcpy(tmp, string, len); RTR_e_region(self, (unsigned char *)tmp, len, TRUE); rtn = PyString_FromStringAndSize(tmp, len); PyMem_DEL(tmp); return(rtn); } static PyObject * rotorobj_encrypt_more(Rotorobj *self, PyObject *args) { char *string = NULL; int len = 0; PyObject *rtn = NULL; char *tmp; if (!PyArg_ParseTuple(args, "s#:encrypt_more", &string, &len)) return NULL; if (!(tmp = PyMem_NEW(char, len+5))) { PyErr_NoMemory(); return NULL; } memset(tmp, '\0', len+1); memcpy(tmp, string, len); RTR_e_region(self, (unsigned char *)tmp, len, FALSE); rtn = PyString_FromStringAndSize(tmp, len); PyMem_DEL(tmp); return(rtn); } static PyObject * rotorobj_decrypt(Rotorobj *self, PyObject *args) { char *string = NULL; int len = 0; PyObject *rtn = NULL; char *tmp; if (!PyArg_ParseTuple(args, "s#:decrypt", &string, &len)) return NULL; if (!(tmp = PyMem_NEW(char, len+5))) { PyErr_NoMemory(); return NULL; } memset(tmp, '\0', len+1); memcpy(tmp, string, len); RTR_d_region(self, (unsigned char *)tmp, len, TRUE); rtn = PyString_FromStringAndSize(tmp, len); PyMem_DEL(tmp); return(rtn); } static PyObject * rotorobj_decrypt_more(Rotorobj *self, PyObject *args) { char *string = NULL; int len = 0; PyObject *rtn = NULL; char *tmp; if (!PyArg_ParseTuple(args, "s#:decrypt_more", &string, &len)) return NULL; if (!(tmp = PyMem_NEW(char, len+5))) { PyErr_NoMemory(); return NULL; } memset(tmp, '\0', len+1); memcpy(tmp, string, len); RTR_d_region(self, (unsigned char *)tmp, len, FALSE); rtn = PyString_FromStringAndSize(tmp, len); PyMem_DEL(tmp); return(rtn); } static PyObject * rotorobj_setkey(Rotorobj *self, PyObject *args) { char *key; if (!PyArg_ParseTuple(args, "s:setkey", &key)) return NULL; set_key(self, key); Py_INCREF(Py_None); return Py_None; } static struct PyMethodDef rotorobj_methods[] = { {"encrypt", (PyCFunction)rotorobj_encrypt, METH_VARARGS}, {"encryptmore", (PyCFunction)rotorobj_encrypt_more, METH_VARARGS}, {"decrypt", (PyCFunction)rotorobj_decrypt, METH_VARARGS}, {"decryptmore", (PyCFunction)rotorobj_decrypt_more, METH_VARARGS}, {"setkey", (PyCFunction)rotorobj_setkey, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; /* Return a rotor object's named attribute. */ static PyObject * rotorobj_getattr(Rotorobj *s, char *name) { return Py_FindMethod(rotorobj_methods, (PyObject*)s, name); } static PyTypeObject Rotor_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "rotor.rotor", /*tp_name*/ sizeof(Rotorobj), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)rotor_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)rotorobj_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_hash*/ }; static PyObject * rotor_rotor(PyObject *self, PyObject *args) { Rotorobj *r; char *string; int num_rotors = 6; if (!PyArg_ParseTuple(args, "s|i:newrotor", &string, &num_rotors)) return NULL; r = rotorobj_new(num_rotors, string); return (PyObject *)r; } static struct PyMethodDef rotor_methods[] = { {"newrotor", rotor_rotor, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initrotor(void) { Rotor_Type.ob_type = &PyType_Type; (void)Py_InitModule("rotor", rotor_methods); if (PyErr_Warn(PyExc_DeprecationWarning, "the rotor module uses an insecure algorithm " "and is deprecated") < 0) return; } Python-2.3.7/Modules/getbuildinfo.c0000644001241000117560000000102407631403171016476 0ustar loewishpifb6#include "Python.h" #ifdef macintosh #include "macbuildno.h" #endif #ifndef DONT_HAVE_STDIO_H #include #endif #ifndef DATE #ifdef __DATE__ #define DATE __DATE__ #else #define DATE "xx/xx/xx" #endif #endif #ifndef TIME #ifdef __TIME__ #define TIME __TIME__ #else #define TIME "xx:xx:xx" #endif #endif #ifndef BUILD #define BUILD 0 #endif const char * Py_GetBuildInfo(void) { static char buildinfo[50]; PyOS_snprintf(buildinfo, sizeof(buildinfo), "#%d, %.20s, %.9s", BUILD, DATE, TIME); return buildinfo; } Python-2.3.7/Modules/_tkinter.c0000644001241000117560000021666607737326721015702 0ustar loewishpifb6/*********************************************************** Copyright (C) 1994 Steen Lumholt. All Rights Reserved ******************************************************************/ /* _tkinter.c -- Interface to libtk.a and libtcl.a. */ /* TCL/TK VERSION INFO: Only Tcl/Tk 8.2 and later are supported. Older versions are not supported. (Use Python 2.2 if you cannot upgrade your Tcl/Tk libraries.) */ /* XXX Further speed-up ideas, involving Tcl 8.0 features: - Register a new Tcl type, "Python callable", which can be called more efficiently and passed to Tcl_EvalObj() directly (if this is possible). */ #include "Python.h" #include #ifdef WITH_THREAD #include "pythread.h" #endif #ifdef MS_WINDOWS #include #endif #ifdef macintosh #define MAC_TCL #endif /* Allow using this code in Python 2.[12] */ #ifndef PyDoc_STRVAR #define PyDoc_STRVAR(name,str) static char name[] = str #endif #ifndef PyMODINIT_FUNC #define PyMODINIT_FUNC void #endif #ifndef PyBool_Check #define PyBool_Check(o) 0 #define PyBool_FromLong PyInt_FromLong #endif /* Starting with Tcl 8.4, many APIs offer const-correctness. Unfortunately, making _tkinter correct for this API means to break earlier versions. USE_COMPAT_CONST allows to make _tkinter work with both 8.4 and earlier versions. Once Tcl releases before 8.4 don't need to be supported anymore, this should go. */ #define USE_COMPAT_CONST /* If Tcl is compiled for threads, we must also define TCL_THREAD. We define it always; if Tcl is not threaded, the thread functions in Tcl are empty. */ #define TCL_THREADS #ifdef TK_FRAMEWORK #include #include #else #include #include #endif /* For Tcl 8.2 and 8.3, CONST* is not defined (except on Cygwin). */ #ifndef CONST84_RETURN #define CONST84_RETURN #undef CONST #define CONST #endif #define TKMAJORMINOR (TK_MAJOR_VERSION*1000 + TK_MINOR_VERSION) #if TKMAJORMINOR < 8002 #error "Tk older than 8.2 not supported" #endif /* Unicode conversion assumes that Tcl_UniChar is two bytes. We cannot test this directly, so we test UTF-8 size instead, expecting that TCL_UTF_MAX is changed if Tcl ever supports either UTF-16 or UCS-4. Redhat 8 sets TCL_UTF_MAX to 6, and uses wchar_t for Tcl_Unichar. This is also ok as long as Python uses UCS-4, as well. */ #if TCL_UTF_MAX != 3 && !(defined(Py_UNICODE_WIDE) && TCL_UTF_MAX==6) #error "unsupported Tcl configuration" #endif #if defined(macintosh) /* Sigh, we have to include this to get at the tcl qd pointer */ #include /* And this one we need to clear the menu bar */ #include #endif #if !(defined(MS_WINDOWS) || defined(__CYGWIN__) || defined(macintosh)) /* Mac has it, but it doesn't really work:-( */ #define HAVE_CREATEFILEHANDLER #endif #ifdef HAVE_CREATEFILEHANDLER /* Tcl_CreateFileHandler() changed several times; these macros deal with the messiness. In Tcl 8.0 and later, it is not available on Windows (and on Unix, only because Jack added it back); when available on Windows, it only applies to sockets. */ #ifdef MS_WINDOWS #define FHANDLETYPE TCL_WIN_SOCKET #else #define FHANDLETYPE TCL_UNIX_FD #endif /* If Tcl can wait for a Unix file descriptor, define the EventHook() routine which uses this to handle Tcl events while the user is typing commands. */ #if FHANDLETYPE == TCL_UNIX_FD #define WAIT_FOR_STDIN #endif #endif /* HAVE_CREATEFILEHANDLER */ #ifdef MS_WINDOWS #include #define WAIT_FOR_STDIN #endif #ifdef WITH_THREAD /* The threading situation is complicated. Tcl is not thread-safe, except when configured with --enable-threads. So we need to use a lock around all uses of Tcl. Previously, the Python interpreter lock was used for this. However, this causes problems when other Python threads need to run while Tcl is blocked waiting for events. To solve this problem, a separate lock for Tcl is introduced. Holding it is incompatible with holding Python's interpreter lock. The following four macros manipulate both locks together. ENTER_TCL and LEAVE_TCL are brackets, just like Py_BEGIN_ALLOW_THREADS and Py_END_ALLOW_THREADS. They should be used whenever a call into Tcl is made that could call an event handler, or otherwise affect the state of a Tcl interpreter. These assume that the surrounding code has the Python interpreter lock; inside the brackets, the Python interpreter lock has been released and the lock for Tcl has been acquired. Sometimes, it is necessary to have both the Python lock and the Tcl lock. (For example, when transferring data from the Tcl interpreter result to a Python string object.) This can be done by using different macros to close the ENTER_TCL block: ENTER_OVERLAP reacquires the Python lock (and restores the thread state) but doesn't release the Tcl lock; LEAVE_OVERLAP_TCL releases the Tcl lock. By contrast, ENTER_PYTHON and LEAVE_PYTHON are used in Tcl event handlers when the handler needs to use Python. Such event handlers are entered while the lock for Tcl is held; the event handler presumably needs to use Python. ENTER_PYTHON releases the lock for Tcl and acquires the Python interpreter lock, restoring the appropriate thread state, and LEAVE_PYTHON releases the Python interpreter lock and re-acquires the lock for Tcl. It is okay for ENTER_TCL/LEAVE_TCL pairs to be contained inside the code between ENTER_PYTHON and LEAVE_PYTHON. These locks expand to several statements and brackets; they should not be used in branches of if statements and the like. If Tcl is threaded, this approach won't work anymore. The Tcl interpreter is only valid in the thread that created it, and all Tk activity must happen in this thread, also. That means that the mainloop must be invoked in the thread that created the interpreter. Invoking commands from other threads is possible; _tkinter will queue an event for the interpreter thread, which will then execute the command and pass back the result. If the main thread is not in the mainloop, and invoking commands causes an exception; if the main loop is running but not processing events, the command invocation will block. In addition, for a threaded Tcl, a single global tcl_tstate won't be sufficient anymore, since multiple Tcl interpreters may simultaneously dispatch in different threads. So we use the Tcl TLS API. */ static PyThread_type_lock tcl_lock = 0; #ifdef TCL_THREADS static Tcl_ThreadDataKey state_key; typedef PyThreadState *ThreadSpecificData; #define tcl_tstate (*(PyThreadState**)Tcl_GetThreadData(&state_key, sizeof(PyThreadState*))) #else static PyThreadState *tcl_tstate = NULL; #endif #define ENTER_TCL \ { PyThreadState *tstate = PyThreadState_Get(); Py_BEGIN_ALLOW_THREADS \ if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = tstate; #define LEAVE_TCL \ tcl_tstate = NULL; if(tcl_lock)PyThread_release_lock(tcl_lock); Py_END_ALLOW_THREADS} #define ENTER_OVERLAP \ Py_END_ALLOW_THREADS #define LEAVE_OVERLAP_TCL \ tcl_tstate = NULL; if(tcl_lock)PyThread_release_lock(tcl_lock); } #define ENTER_PYTHON \ { PyThreadState *tstate = tcl_tstate; tcl_tstate = NULL; \ if(tcl_lock)PyThread_release_lock(tcl_lock); PyEval_RestoreThread((tstate)); } #define LEAVE_PYTHON \ { PyThreadState *tstate = PyEval_SaveThread(); \ if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = tstate; } #define CHECK_TCL_APPARTMENT \ if (((TkappObject *)self)->threaded && \ ((TkappObject *)self)->thread_id != Tcl_GetCurrentThread()) { \ PyErr_SetString(PyExc_RuntimeError, "Calling Tcl from different appartment"); \ return 0; \ } #else #define ENTER_TCL #define LEAVE_TCL #define ENTER_OVERLAP #define LEAVE_OVERLAP_TCL #define ENTER_PYTHON #define LEAVE_PYTHON #define CHECK_TCL_APPARTMENT #endif #ifdef macintosh /* ** Additional cruft needed by Tcl/Tk on the Mac. ** This is for Tcl 7.5 and Tk 4.1 (patch release 1). */ /* ckfree() expects a char* */ #define FREECAST (char *) #include /* For EventRecord */ typedef int (*TclMacConvertEventPtr) (EventRecord *eventPtr); void Tcl_MacSetEventProc(TclMacConvertEventPtr procPtr); int TkMacConvertEvent(EventRecord *eventPtr); static int PyMacConvertEvent(EventRecord *eventPtr); #include extern int SIOUXIsAppWindow(WindowPtr); #endif /* macintosh */ #ifndef FREECAST #define FREECAST (char *) #endif /**** Tkapp Object Declaration ****/ static PyTypeObject Tkapp_Type; typedef struct { PyObject_HEAD Tcl_Interp *interp; int wantobjects; int threaded; /* True if tcl_platform[threaded] */ Tcl_ThreadId thread_id; int dispatching; /* We cannot include tclInt.h, as this is internal. So we cache interesting types here. */ Tcl_ObjType *BooleanType; Tcl_ObjType *ByteArrayType; Tcl_ObjType *DoubleType; Tcl_ObjType *IntType; Tcl_ObjType *ListType; Tcl_ObjType *ProcBodyType; Tcl_ObjType *StringType; } TkappObject; #define Tkapp_Check(v) ((v)->ob_type == &Tkapp_Type) #define Tkapp_Interp(v) (((TkappObject *) (v))->interp) #define Tkapp_Result(v) Tcl_GetStringResult(Tkapp_Interp(v)) #define DEBUG_REFCNT(v) (printf("DEBUG: id=%p, refcnt=%i\n", \ (void *) v, ((PyObject *) v)->ob_refcnt)) /**** Error Handling ****/ static PyObject *Tkinter_TclError; static int quitMainLoop = 0; static int errorInCmd = 0; static PyObject *excInCmd; static PyObject *valInCmd; static PyObject *trbInCmd; static PyObject * Tkinter_Error(PyObject *v) { PyErr_SetString(Tkinter_TclError, Tkapp_Result(v)); return NULL; } /**** Utils ****/ static int Tkinter_busywaitinterval = 20; #ifdef WITH_THREAD #ifndef MS_WINDOWS /* Millisecond sleep() for Unix platforms. */ static void Sleep(int milli) { /* XXX Too bad if you don't have select(). */ struct timeval t; t.tv_sec = milli/1000; t.tv_usec = (milli%1000) * 1000; select(0, (fd_set *)0, (fd_set *)0, (fd_set *)0, &t); } #endif /* MS_WINDOWS */ /* Wait up to 1s for the mainloop to come up. */ static int WaitForMainloop(TkappObject* self) { int i; for (i = 0; i < 10; i++) { if (self->dispatching) return 1; Py_BEGIN_ALLOW_THREADS Sleep(100); Py_END_ALLOW_THREADS } if (self->dispatching) return 1; PyErr_SetString(PyExc_RuntimeError, "main thread is not in main loop"); return 0; } #endif /* WITH_THREAD */ static char * AsString(PyObject *value, PyObject *tmp) { if (PyString_Check(value)) return PyString_AsString(value); #ifdef Py_USING_UNICODE else if (PyUnicode_Check(value)) { PyObject *v = PyUnicode_AsUTF8String(value); if (v == NULL) return NULL; if (PyList_Append(tmp, v) != 0) { Py_DECREF(v); return NULL; } Py_DECREF(v); return PyString_AsString(v); } #endif else { PyObject *v = PyObject_Str(value); if (v == NULL) return NULL; if (PyList_Append(tmp, v) != 0) { Py_DECREF(v); return NULL; } Py_DECREF(v); return PyString_AsString(v); } } #define ARGSZ 64 static char * Merge(PyObject *args) { PyObject *tmp = NULL; char *argvStore[ARGSZ]; char **argv = NULL; int fvStore[ARGSZ]; int *fv = NULL; int argc = 0, fvc = 0, i; char *res = NULL; if (!(tmp = PyList_New(0))) return NULL; argv = argvStore; fv = fvStore; if (args == NULL) argc = 0; else if (!PyTuple_Check(args)) { argc = 1; fv[0] = 0; if (!(argv[0] = AsString(args, tmp))) goto finally; } else { argc = PyTuple_Size(args); if (argc > ARGSZ) { argv = (char **)ckalloc(argc * sizeof(char *)); fv = (int *)ckalloc(argc * sizeof(int)); if (argv == NULL || fv == NULL) { PyErr_NoMemory(); goto finally; } } for (i = 0; i < argc; i++) { PyObject *v = PyTuple_GetItem(args, i); if (PyTuple_Check(v)) { fv[i] = 1; if (!(argv[i] = Merge(v))) goto finally; fvc++; } else if (v == Py_None) { argc = i; break; } else { fv[i] = 0; if (!(argv[i] = AsString(v, tmp))) goto finally; fvc++; } } } res = Tcl_Merge(argc, argv); if (res == NULL) PyErr_SetString(Tkinter_TclError, "merge failed"); finally: for (i = 0; i < fvc; i++) if (fv[i]) { ckfree(argv[i]); } if (argv != argvStore) ckfree(FREECAST argv); if (fv != fvStore) ckfree(FREECAST fv); Py_DECREF(tmp); return res; } static PyObject * Split(char *list) { int argc; char **argv; PyObject *v; if (list == NULL) { Py_INCREF(Py_None); return Py_None; } if (Tcl_SplitList((Tcl_Interp *)NULL, list, &argc, &argv) != TCL_OK) { /* Not a list. * Could be a quoted string containing funnies, e.g. {"}. * Return the string itself. */ return PyString_FromString(list); } if (argc == 0) v = PyString_FromString(""); else if (argc == 1) v = PyString_FromString(argv[0]); else if ((v = PyTuple_New(argc)) != NULL) { int i; PyObject *w; for (i = 0; i < argc; i++) { if ((w = Split(argv[i])) == NULL) { Py_DECREF(v); v = NULL; break; } PyTuple_SetItem(v, i, w); } } Tcl_Free(FREECAST argv); return v; } /* In some cases, Tcl will still return strings that are supposed to be lists. SplitObj walks through a nested tuple, finding string objects that need to be split. */ PyObject * SplitObj(PyObject *arg) { if (PyTuple_Check(arg)) { int i, size; PyObject *elem, *newelem, *result; size = PyTuple_Size(arg); result = NULL; /* Recursively invoke SplitObj for all tuple items. If this does not return a new object, no action is needed. */ for(i = 0; i < size; i++) { elem = PyTuple_GetItem(arg, i); newelem = SplitObj(elem); if (!newelem) { Py_XDECREF(result); return NULL; } if (!result) { int k; if (newelem == elem) { Py_DECREF(newelem); continue; } result = PyTuple_New(size); if (!result) return NULL; for(k = 0; k < i; k++) { elem = PyTuple_GetItem(arg, k); Py_INCREF(elem); PyTuple_SetItem(result, k, elem); } } PyTuple_SetItem(result, i, newelem); } if (result) return result; /* Fall through, returning arg. */ } else if (PyString_Check(arg)) { int argc; char **argv; char *list = PyString_AsString(arg); if (Tcl_SplitList((Tcl_Interp *)NULL, list, &argc, &argv) != TCL_OK) { Py_INCREF(arg); return arg; } Tcl_Free(FREECAST argv); if (argc > 1) return Split(PyString_AsString(arg)); /* Fall through, returning arg. */ } Py_INCREF(arg); return arg; } /**** Tkapp Object ****/ #ifndef WITH_APPINIT int Tcl_AppInit(Tcl_Interp *interp) { Tk_Window main; main = Tk_MainWindow(interp); if (Tcl_Init(interp) == TCL_ERROR) { PySys_WriteStderr("Tcl_Init error: %s\n", Tcl_GetStringResult(interp)); return TCL_ERROR; } if (Tk_Init(interp) == TCL_ERROR) { PySys_WriteStderr("Tk_Init error: %s\n", Tcl_GetStringResult(interp)); return TCL_ERROR; } return TCL_OK; } #endif /* !WITH_APPINIT */ /* Initialize the Tk application; see the `main' function in * `tkMain.c'. */ static void EnableEventHook(void); /* Forward */ static void DisableEventHook(void); /* Forward */ static TkappObject * Tkapp_New(char *screenName, char *baseName, char *className, int interactive, int wantobjects) { TkappObject *v; char *argv0; v = PyObject_New(TkappObject, &Tkapp_Type); if (v == NULL) return NULL; v->interp = Tcl_CreateInterp(); v->wantobjects = wantobjects; v->threaded = Tcl_GetVar2Ex(v->interp, "tcl_platform", "threaded", TCL_GLOBAL_ONLY) != NULL; v->thread_id = Tcl_GetCurrentThread(); v->dispatching = 0; #ifndef TCL_THREADS if (v->threaded) { PyErr_SetString(PyExc_RuntimeError, "Tcl is threaded but _tkinter is not"); Py_DECREF(v); return 0; } #endif #ifdef WITH_THREAD if (v->threaded && tcl_lock) { /* If Tcl is threaded, we don't need the lock. */ PyThread_free_lock(tcl_lock); tcl_lock = NULL; } #endif v->BooleanType = Tcl_GetObjType("boolean"); v->ByteArrayType = Tcl_GetObjType("bytearray"); v->DoubleType = Tcl_GetObjType("double"); v->IntType = Tcl_GetObjType("int"); v->ListType = Tcl_GetObjType("list"); v->ProcBodyType = Tcl_GetObjType("procbody"); v->StringType = Tcl_GetObjType("string"); #if defined(macintosh) /* This seems to be needed */ ClearMenuBar(); TkMacInitMenus(v->interp); #endif /* Delete the 'exit' command, which can screw things up */ Tcl_DeleteCommand(v->interp, "exit"); if (screenName != NULL) Tcl_SetVar2(v->interp, "env", "DISPLAY", screenName, TCL_GLOBAL_ONLY); if (interactive) Tcl_SetVar(v->interp, "tcl_interactive", "1", TCL_GLOBAL_ONLY); else Tcl_SetVar(v->interp, "tcl_interactive", "0", TCL_GLOBAL_ONLY); /* This is used to get the application class for Tk 4.1 and up */ argv0 = (char*)ckalloc(strlen(className) + 1); if (!argv0) { PyErr_NoMemory(); Py_DECREF(v); return NULL; } strcpy(argv0, className); if (isupper((int)(argv0[0]))) argv0[0] = tolower(argv0[0]); Tcl_SetVar(v->interp, "argv0", argv0, TCL_GLOBAL_ONLY); ckfree(argv0); if (Tcl_AppInit(v->interp) != TCL_OK) return (TkappObject *)Tkinter_Error((PyObject *)v); EnableEventHook(); return v; } static void Tkapp_ThreadSend(TkappObject *self, Tcl_Event *ev, Tcl_Condition *cond, Tcl_Mutex *mutex) { Py_BEGIN_ALLOW_THREADS; Tcl_MutexLock(mutex); Tcl_ThreadQueueEvent(self->thread_id, ev, TCL_QUEUE_TAIL); Tcl_ThreadAlert(self->thread_id); Tcl_ConditionWait(cond, mutex, NULL); Tcl_MutexUnlock(mutex); Py_END_ALLOW_THREADS } /** Tcl Eval **/ typedef struct { PyObject_HEAD Tcl_Obj *value; PyObject *string; /* This cannot cause cycles. */ } PyTclObject; staticforward PyTypeObject PyTclObject_Type; #define PyTclObject_Check(v) ((v)->ob_type == &PyTclObject_Type) static PyObject * newPyTclObject(Tcl_Obj *arg) { PyTclObject *self; self = PyObject_New(PyTclObject, &PyTclObject_Type); if (self == NULL) return NULL; Tcl_IncrRefCount(arg); self->value = arg; self->string = NULL; return (PyObject*)self; } static void PyTclObject_dealloc(PyTclObject *self) { Tcl_DecrRefCount(self->value); Py_XDECREF(self->string); PyObject_Del(self); } static PyObject * PyTclObject_str(PyTclObject *self) { if (self->string && PyString_Check(self->string)) { Py_INCREF(self->string); return self->string; } /* XXX Could cache value if it is an ASCII string. */ return PyString_FromString(Tcl_GetString(self->value)); } static char* PyTclObject_TclString(PyObject *self) { return Tcl_GetString(((PyTclObject*)self)->value); } /* Like _str, but create Unicode if necessary. */ PyDoc_STRVAR(PyTclObject_string__doc__, "the string representation of this object, either as string or Unicode"); static PyObject * PyTclObject_string(PyTclObject *self, void *ignored) { char *s; int i, len; if (!self->string) { s = Tcl_GetStringFromObj(self->value, &len); for (i = 0; i < len; i++) if (s[i] & 0x80) break; #ifdef Py_USING_UNICODE if (i == len) /* It is an ASCII string. */ self->string = PyString_FromStringAndSize(s, len); else { self->string = PyUnicode_DecodeUTF8(s, len, "strict"); if (!self->string) { PyErr_Clear(); self->string = PyString_FromStringAndSize(s, len); } } #else self->string = PyString_FromStringAndSize(s, len); #endif if (!self->string) return NULL; } Py_INCREF(self->string); return self->string; } #ifdef Py_USING_UNICODE PyDoc_STRVAR(PyTclObject_unicode__doc__, "convert argument to unicode"); static PyObject * PyTclObject_unicode(PyTclObject *self, void *ignored) { char *s; int len; if (self->string && PyUnicode_Check(self->string)) { Py_INCREF(self->string); return self->string; } /* XXX Could chache result if it is non-ASCII. */ s = Tcl_GetStringFromObj(self->value, &len); return PyUnicode_DecodeUTF8(s, len, "strict"); } #endif static PyObject * PyTclObject_repr(PyTclObject *self) { char buf[50]; PyOS_snprintf(buf, 50, "<%s object at 0x%.8x>", self->value->typePtr->name, (int)self->value); return PyString_FromString(buf); } static int PyTclObject_cmp(PyTclObject *self, PyTclObject *other) { int res; res = strcmp(Tcl_GetString(self->value), Tcl_GetString(other->value)); if (res < 0) return -1; if (res > 0) return 1; return 0; } PyDoc_STRVAR(get_typename__doc__, "name of the Tcl type"); static PyObject* get_typename(PyTclObject* obj, void* ignored) { return PyString_FromString(obj->value->typePtr->name); } static PyGetSetDef PyTclObject_getsetlist[] = { {"typename", (getter)get_typename, NULL, get_typename__doc__}, {"string", (getter)PyTclObject_string, NULL, PyTclObject_string__doc__}, {0}, }; static PyMethodDef PyTclObject_methods[] = { {"__unicode__", (PyCFunction)PyTclObject_unicode, METH_NOARGS, PyTclObject_unicode__doc__}, {0} }; statichere PyTypeObject PyTclObject_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "_tkinter.Tcl_Obj", /*tp_name*/ sizeof(PyTclObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)PyTclObject_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ 0, /*tp_getattr*/ 0, /*tp_setattr*/ (cmpfunc)PyTclObject_cmp, /*tp_compare*/ (reprfunc)PyTclObject_repr, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ (reprfunc)PyTclObject_str, /*tp_str*/ PyObject_GenericGetAttr,/*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT, /*tp_flags*/ 0, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ 0, /*tp_iter*/ 0, /*tp_iternext*/ PyTclObject_methods, /*tp_methods*/ 0, /*tp_members*/ PyTclObject_getsetlist, /*tp_getset*/ 0, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ 0, /*tp_init*/ 0, /*tp_alloc*/ 0, /*tp_new*/ 0, /*tp_free*/ 0, /*tp_is_gc*/ }; static Tcl_Obj* AsObj(PyObject *value) { Tcl_Obj *result; if (PyString_Check(value)) return Tcl_NewStringObj(PyString_AS_STRING(value), PyString_GET_SIZE(value)); else if (PyBool_Check(value)) return Tcl_NewBooleanObj(PyObject_IsTrue(value)); else if (PyInt_Check(value)) return Tcl_NewLongObj(PyInt_AS_LONG(value)); else if (PyFloat_Check(value)) return Tcl_NewDoubleObj(PyFloat_AS_DOUBLE(value)); else if (PyTuple_Check(value)) { Tcl_Obj **argv = (Tcl_Obj**) ckalloc(PyTuple_Size(value)*sizeof(Tcl_Obj*)); int i; if(!argv) return 0; for(i=0;i= 0x10000) { /* Tcl doesn't do UTF-16, yet. */ PyErr_SetString(PyExc_ValueError, "unsupported character"); ckfree(FREECAST outbuf); return NULL; } outbuf[i] = inbuf[i]; } result = Tcl_NewUnicodeObj(outbuf, size); ckfree(FREECAST outbuf); return result; #else return Tcl_NewUnicodeObj(inbuf, size); #endif } #endif else if(PyTclObject_Check(value)) { Tcl_Obj *v = ((PyTclObject*)value)->value; Tcl_IncrRefCount(v); return v; } else { PyObject *v = PyObject_Str(value); if (!v) return 0; result = AsObj(v); Py_DECREF(v); return result; } } static PyObject* FromObj(PyObject* tkapp, Tcl_Obj *value) { PyObject *result = NULL; TkappObject *app = (TkappObject*)tkapp; if (value->typePtr == NULL) { /* If the result contains any bytes with the top bit set, it's UTF-8 and we should decode it to Unicode */ #ifdef Py_USING_UNICODE int i; char *s = value->bytes; int len = value->length; for (i = 0; i < len; i++) { if (value->bytes[i] & 0x80) break; } if (i == value->length) result = PyString_FromStringAndSize(s, len); else { /* Convert UTF-8 to Unicode string */ result = PyUnicode_DecodeUTF8(s, len, "strict"); if (result == NULL) { PyErr_Clear(); result = PyString_FromStringAndSize(s, len); } } #else res = PyString_FromStringAndSize(value->bytes, value->length); #endif return result; } if (value->typePtr == app->BooleanType) { result = value->internalRep.longValue ? Py_True : Py_False; Py_INCREF(result); return result; } if (value->typePtr == app->ByteArrayType) { int size; char *data = (char*)Tcl_GetByteArrayFromObj(value, &size); return PyString_FromStringAndSize(data, size); } if (value->typePtr == app->DoubleType) { return PyFloat_FromDouble(value->internalRep.doubleValue); } if (value->typePtr == app->IntType) { return PyInt_FromLong(value->internalRep.longValue); } if (value->typePtr == app->ListType) { int size; int i, status; PyObject *elem; Tcl_Obj *tcl_elem; status = Tcl_ListObjLength(Tkapp_Interp(tkapp), value, &size); if (status == TCL_ERROR) return Tkinter_Error(tkapp); result = PyTuple_New(size); if (!result) return NULL; for (i = 0; i < size; i++) { status = Tcl_ListObjIndex(Tkapp_Interp(tkapp), value, i, &tcl_elem); if (status == TCL_ERROR) { Py_DECREF(result); return Tkinter_Error(tkapp); } elem = FromObj(tkapp, tcl_elem); if (!elem) { Py_DECREF(result); return NULL; } PyTuple_SetItem(result, i, elem); } return result; } if (value->typePtr == app->ProcBodyType) { /* fall through: return tcl object. */ } if (value->typePtr == app->StringType) { #ifdef Py_USING_UNICODE #if defined(Py_UNICODE_WIDE) && TCL_UTF_MAX==3 PyObject *result; int size; Tcl_UniChar *input; Py_UNICODE *output; size = Tcl_GetCharLength(value); result = PyUnicode_FromUnicode(NULL, size); if (!result) return NULL; input = Tcl_GetUnicode(value); output = PyUnicode_AS_UNICODE(result); while (size--) *output++ = *input++; return result; #else return PyUnicode_FromUnicode(Tcl_GetUnicode(value), Tcl_GetCharLength(value)); #endif #else int size; char *c; c = Tcl_GetStringFromObj(value, &size); return PyString_FromStringAndSize(c, size); #endif } return newPyTclObject(value); } /* This mutex synchronizes inter-thread command calls. */ TCL_DECLARE_MUTEX(call_mutex) typedef struct Tkapp_CallEvent { Tcl_Event ev; /* Must be first */ TkappObject *self; PyObject *args; int flags; PyObject **res; PyObject **exc_type, **exc_value, **exc_tb; Tcl_Condition done; } Tkapp_CallEvent; void Tkapp_CallDeallocArgs(Tcl_Obj** objv, Tcl_Obj** objStore, int objc) { int i; for (i = 0; i < objc; i++) Tcl_DecrRefCount(objv[i]); if (objv != objStore) ckfree(FREECAST objv); } /* Convert Python objects to Tcl objects. This must happen in the interpreter thread, which may or may not be the calling thread. */ static Tcl_Obj** Tkapp_CallArgs(PyObject *args, Tcl_Obj** objStore, int *pobjc) { Tcl_Obj **objv = objStore; int objc = 0, i; if (args == NULL) /* do nothing */; else if (!PyTuple_Check(args)) { objv[0] = AsObj(args); if (objv[0] == 0) goto finally; objc = 1; Tcl_IncrRefCount(objv[0]); } else { objc = PyTuple_Size(args); if (objc > ARGSZ) { objv = (Tcl_Obj **)ckalloc(objc * sizeof(char *)); if (objv == NULL) { PyErr_NoMemory(); objc = 0; goto finally; } } for (i = 0; i < objc; i++) { PyObject *v = PyTuple_GetItem(args, i); if (v == Py_None) { objc = i; break; } objv[i] = AsObj(v); if (!objv[i]) { /* Reset objc, so it attempts to clear objects only up to i. */ objc = i; goto finally; } Tcl_IncrRefCount(objv[i]); } } *pobjc = objc; return objv; finally: Tkapp_CallDeallocArgs(objv, objStore, objc); return NULL; } /* Convert the results of a command call into a Python objects. */ static PyObject* Tkapp_CallResult(TkappObject *self) { PyObject *res = NULL; if(self->wantobjects) { Tcl_Obj *value = Tcl_GetObjResult(self->interp); /* Not sure whether the IncrRef is necessary, but something may overwrite the interpreter result while we are converting it. */ Tcl_IncrRefCount(value); res = FromObj((PyObject*)self, value); Tcl_DecrRefCount(value); } else { const char *s = Tcl_GetStringResult(self->interp); const char *p = s; /* If the result contains any bytes with the top bit set, it's UTF-8 and we should decode it to Unicode */ #ifdef Py_USING_UNICODE while (*p != '\0') { if (*p & 0x80) break; p++; } if (*p == '\0') res = PyString_FromStringAndSize(s, (int)(p-s)); else { /* Convert UTF-8 to Unicode string */ p = strchr(p, '\0'); res = PyUnicode_DecodeUTF8(s, (int)(p-s), "strict"); if (res == NULL) { PyErr_Clear(); res = PyString_FromStringAndSize(s, (int)(p-s)); } } #else p = strchr(p, '\0'); res = PyString_FromStringAndSize(s, (int)(p-s)); #endif } return res; } /* Tkapp_CallProc is the event procedure that is executed in the context of the Tcl interpreter thread. Initially, it holds the Tcl lock, and doesn't hold the Python lock. */ static int Tkapp_CallProc(Tkapp_CallEvent *e, int flags) { Tcl_Obj *objStore[ARGSZ]; Tcl_Obj **objv; int objc; int i; ENTER_PYTHON objv = Tkapp_CallArgs(e->args, objStore, &objc); if (!objv) { PyErr_Fetch(e->exc_type, e->exc_value, e->exc_tb); *(e->res) = NULL; } LEAVE_PYTHON if (!objv) goto done; i = Tcl_EvalObjv(e->self->interp, objc, objv, e->flags); ENTER_PYTHON if (i == TCL_ERROR) { *(e->res) = NULL; *(e->exc_type) = NULL; *(e->exc_tb) = NULL; *(e->exc_value) = PyObject_CallFunction( Tkinter_TclError, "s", Tcl_GetStringResult(e->self->interp)); } else { *(e->res) = Tkapp_CallResult(e->self); } LEAVE_PYTHON done: /* Wake up calling thread. */ Tcl_MutexLock(&call_mutex); Tcl_ConditionNotify(&e->done); Tcl_MutexUnlock(&call_mutex); return 1; } /* This is the main entry point for calling a Tcl command. It supports three cases, with regard to threading: 1. Tcl is not threaded: Must have the Tcl lock, then can invoke command in the context of the calling thread. 2. Tcl is threaded, caller of the command is in the interpreter thread: Execute the command in the calling thread. Since the Tcl lock will not be used, we can merge that with case 1. 3. Tcl is threaded, caller is in a different thread: Must queue an event to the interpreter thread. Allocation of Tcl objects needs to occur in the interpreter thread, so we ship the PyObject* args to the target thread, and perform processing there. */ static PyObject * Tkapp_Call(PyObject *_self, PyObject *args) { Tcl_Obj *objStore[ARGSZ]; Tcl_Obj **objv = NULL; int objc, i; PyObject *res = NULL; TkappObject *self = (TkappObject*)_self; /* Could add TCL_EVAL_GLOBAL if wrapped by GlobalCall... */ int flags = TCL_EVAL_DIRECT; #ifdef WITH_THREAD if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) { /* We cannot call the command directly. Instead, we must marshal the parameters to the interpreter thread. */ Tkapp_CallEvent *ev; PyObject *exc_type, *exc_value, *exc_tb; if (!WaitForMainloop(self)) return NULL; ev = (Tkapp_CallEvent*)ckalloc(sizeof(Tkapp_CallEvent)); ev->ev.proc = (Tcl_EventProc*)Tkapp_CallProc; ev->self = self; ev->args = args; ev->res = &res; ev->exc_type = &exc_type; ev->exc_value = &exc_value; ev->exc_tb = &exc_tb; ev->done = (Tcl_Condition)0; Tkapp_ThreadSend(self, (Tcl_Event*)ev, &ev->done, &call_mutex); if (res == NULL) { if (exc_type) PyErr_Restore(exc_type, exc_value, exc_tb); else PyErr_SetObject(Tkinter_TclError, exc_value); } } else #endif { objv = Tkapp_CallArgs(args, objStore, &objc); if (!objv) return NULL; ENTER_TCL i = Tcl_EvalObjv(self->interp, objc, objv, flags); ENTER_OVERLAP if (i == TCL_ERROR) Tkinter_Error(_self); else res = Tkapp_CallResult(self); LEAVE_OVERLAP_TCL Tkapp_CallDeallocArgs(objv, objStore, objc); } return res; } static PyObject * Tkapp_GlobalCall(PyObject *self, PyObject *args) { /* Could do the same here as for Tkapp_Call(), but this is not used much, so I can't be bothered. Unfortunately Tcl doesn't export a way for the user to do what all its Global* variants do (save and reset the scope pointer, call the local version, restore the saved scope pointer). */ char *cmd; PyObject *res = NULL; CHECK_TCL_APPARTMENT; cmd = Merge(args); if (cmd) { int err; ENTER_TCL err = Tcl_GlobalEval(Tkapp_Interp(self), cmd); ENTER_OVERLAP if (err == TCL_ERROR) res = Tkinter_Error(self); else res = PyString_FromString(Tkapp_Result(self)); LEAVE_OVERLAP_TCL ckfree(cmd); } return res; } static PyObject * Tkapp_Eval(PyObject *self, PyObject *args) { char *script; PyObject *res = NULL; int err; if (!PyArg_ParseTuple(args, "s:eval", &script)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL err = Tcl_Eval(Tkapp_Interp(self), script); ENTER_OVERLAP if (err == TCL_ERROR) res = Tkinter_Error(self); else res = PyString_FromString(Tkapp_Result(self)); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_GlobalEval(PyObject *self, PyObject *args) { char *script; PyObject *res = NULL; int err; if (!PyArg_ParseTuple(args, "s:globaleval", &script)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL err = Tcl_GlobalEval(Tkapp_Interp(self), script); ENTER_OVERLAP if (err == TCL_ERROR) res = Tkinter_Error(self); else res = PyString_FromString(Tkapp_Result(self)); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_EvalFile(PyObject *self, PyObject *args) { char *fileName; PyObject *res = NULL; int err; if (!PyArg_ParseTuple(args, "s:evalfile", &fileName)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL err = Tcl_EvalFile(Tkapp_Interp(self), fileName); ENTER_OVERLAP if (err == TCL_ERROR) res = Tkinter_Error(self); else res = PyString_FromString(Tkapp_Result(self)); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_Record(PyObject *self, PyObject *args) { char *script; PyObject *res = NULL; int err; if (!PyArg_ParseTuple(args, "s", &script)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL err = Tcl_RecordAndEval(Tkapp_Interp(self), script, TCL_NO_EVAL); ENTER_OVERLAP if (err == TCL_ERROR) res = Tkinter_Error(self); else res = PyString_FromString(Tkapp_Result(self)); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_AddErrorInfo(PyObject *self, PyObject *args) { char *msg; if (!PyArg_ParseTuple(args, "s:adderrorinfo", &msg)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL Tcl_AddErrorInfo(Tkapp_Interp(self), msg); LEAVE_TCL Py_INCREF(Py_None); return Py_None; } /** Tcl Variable **/ TCL_DECLARE_MUTEX(var_mutex) typedef PyObject* (*EventFunc)(PyObject*, PyObject *args, int flags); typedef struct VarEvent { Tcl_Event ev; /* must be first */ PyObject *self; PyObject *args; int flags; EventFunc func; PyObject **res; PyObject **exc_type; PyObject **exc_val; Tcl_Condition cond; } VarEvent; static int varname_converter(PyObject *in, void *_out) { char **out = (char**)_out; if (PyString_Check(in)) { *out = PyString_AsString(in); return 1; } if (PyTclObject_Check(in)) { *out = PyTclObject_TclString(in); return 1; } /* XXX: Should give diagnostics. */ return 0; } void var_perform(VarEvent *ev) { *(ev->res) = ev->func(ev->self, ev->args, ev->flags); if (!*(ev->res)) { PyObject *exc, *val, *tb; PyErr_Fetch(&exc, &val, &tb); PyErr_NormalizeException(&exc, &val, &tb); *(ev->exc_type) = exc; *(ev->exc_val) = val; Py_DECREF(tb); } } static int var_proc(VarEvent* ev, int flags) { ENTER_PYTHON var_perform(ev); Tcl_MutexLock(&var_mutex); Tcl_ConditionNotify(&ev->cond); Tcl_MutexUnlock(&var_mutex); LEAVE_PYTHON return 1; } static PyObject* var_invoke(EventFunc func, PyObject *_self, PyObject *args, int flags) { TkappObject *self = (TkappObject*)_self; #ifdef WITH_THREAD if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) { TkappObject *self = (TkappObject*)_self; VarEvent *ev; PyObject *res, *exc_type, *exc_val; /* The current thread is not the interpreter thread. Marshal the call to the interpreter thread, then wait for completion. */ if (!WaitForMainloop(self)) return NULL; ev = (VarEvent*)ckalloc(sizeof(VarEvent)); ev->self = _self; ev->args = args; ev->flags = flags; ev->func = func; ev->res = &res; ev->exc_type = &exc_type; ev->exc_val = &exc_val; ev->cond = NULL; ev->ev.proc = (Tcl_EventProc*)var_proc; Tkapp_ThreadSend(self, (Tcl_Event*)ev, &ev->cond, &var_mutex); if (!res) { PyErr_SetObject(exc_type, exc_val); Py_DECREF(exc_type); Py_DECREF(exc_val); return NULL; } return res; } #endif /* Tcl is not threaded, or this is the interpreter thread. */ return func(_self, args, flags); } static PyObject * SetVar(PyObject *self, PyObject *args, int flags) { char *name1, *name2; PyObject *newValue; PyObject *res = NULL; Tcl_Obj *newval, *ok; if (PyArg_ParseTuple(args, "O&O:setvar", varname_converter, &name1, &newValue)) { /* XXX Acquire tcl lock??? */ newval = AsObj(newValue); if (newval == NULL) return NULL; ENTER_TCL ok = Tcl_SetVar2Ex(Tkapp_Interp(self), name1, NULL, newval, flags); ENTER_OVERLAP if (!ok) Tkinter_Error(self); else { res = Py_None; Py_INCREF(res); } LEAVE_OVERLAP_TCL } else { PyErr_Clear(); if (PyArg_ParseTuple(args, "ssO:setvar", &name1, &name2, &newValue)) { /* XXX must hold tcl lock already??? */ newval = AsObj(newValue); ENTER_TCL ok = Tcl_SetVar2Ex(Tkapp_Interp(self), name1, name2, newval, flags); ENTER_OVERLAP if (!ok) Tkinter_Error(self); else { res = Py_None; Py_INCREF(res); } LEAVE_OVERLAP_TCL } else { return NULL; } } return res; } static PyObject * Tkapp_SetVar(PyObject *self, PyObject *args) { return var_invoke(SetVar, self, args, TCL_LEAVE_ERR_MSG); } static PyObject * Tkapp_GlobalSetVar(PyObject *self, PyObject *args) { return var_invoke(SetVar, self, args, TCL_LEAVE_ERR_MSG | TCL_GLOBAL_ONLY); } static PyObject * GetVar(PyObject *self, PyObject *args, int flags) { char *name1, *name2=NULL; PyObject *res = NULL; Tcl_Obj *tres; if (!PyArg_ParseTuple(args, "O&|s:getvar", varname_converter, &name1, &name2)) return NULL; ENTER_TCL tres = Tcl_GetVar2Ex(Tkapp_Interp(self), name1, name2, flags); ENTER_OVERLAP if (tres == NULL) { PyErr_SetString(Tkinter_TclError, Tcl_GetStringResult(Tkapp_Interp(self))); } else { if (((TkappObject*)self)->wantobjects) { res = FromObj(self, tres); } else { res = PyString_FromString(Tcl_GetString(tres)); } } LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_GetVar(PyObject *self, PyObject *args) { return var_invoke(GetVar, self, args, TCL_LEAVE_ERR_MSG); } static PyObject * Tkapp_GlobalGetVar(PyObject *self, PyObject *args) { return var_invoke(GetVar, self, args, TCL_LEAVE_ERR_MSG | TCL_GLOBAL_ONLY); } static PyObject * UnsetVar(PyObject *self, PyObject *args, int flags) { char *name1, *name2=NULL; int code; PyObject *res = NULL; if (!PyArg_ParseTuple(args, "s|s:unsetvar", &name1, &name2)) return NULL; ENTER_TCL code = Tcl_UnsetVar2(Tkapp_Interp(self), name1, name2, flags); ENTER_OVERLAP if (code == TCL_ERROR) res = Tkinter_Error(self); else { Py_INCREF(Py_None); res = Py_None; } LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_UnsetVar(PyObject *self, PyObject *args) { return var_invoke(UnsetVar, self, args, TCL_LEAVE_ERR_MSG); } static PyObject * Tkapp_GlobalUnsetVar(PyObject *self, PyObject *args) { return var_invoke(UnsetVar, self, args, TCL_LEAVE_ERR_MSG | TCL_GLOBAL_ONLY); } /** Tcl to Python **/ static PyObject * Tkapp_GetInt(PyObject *self, PyObject *args) { char *s; int v; if (PyTuple_Size(args) == 1) { PyObject* o = PyTuple_GetItem(args, 0); if (PyInt_Check(o)) { Py_INCREF(o); return o; } } if (!PyArg_ParseTuple(args, "s:getint", &s)) return NULL; if (Tcl_GetInt(Tkapp_Interp(self), s, &v) == TCL_ERROR) return Tkinter_Error(self); return Py_BuildValue("i", v); } static PyObject * Tkapp_GetDouble(PyObject *self, PyObject *args) { char *s; double v; if (PyTuple_Size(args) == 1) { PyObject *o = PyTuple_GetItem(args, 0); if (PyFloat_Check(o)) { Py_INCREF(o); return o; } } if (!PyArg_ParseTuple(args, "s:getdouble", &s)) return NULL; if (Tcl_GetDouble(Tkapp_Interp(self), s, &v) == TCL_ERROR) return Tkinter_Error(self); return Py_BuildValue("d", v); } static PyObject * Tkapp_GetBoolean(PyObject *self, PyObject *args) { char *s; int v; if (PyTuple_Size(args) == 1) { PyObject *o = PyTuple_GetItem(args, 0); if (PyInt_Check(o)) { Py_INCREF(o); return o; } } if (!PyArg_ParseTuple(args, "s:getboolean", &s)) return NULL; if (Tcl_GetBoolean(Tkapp_Interp(self), s, &v) == TCL_ERROR) return Tkinter_Error(self); return PyBool_FromLong(v); } static PyObject * Tkapp_ExprString(PyObject *self, PyObject *args) { char *s; PyObject *res = NULL; int retval; if (!PyArg_ParseTuple(args, "s:exprstring", &s)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL retval = Tcl_ExprString(Tkapp_Interp(self), s); ENTER_OVERLAP if (retval == TCL_ERROR) res = Tkinter_Error(self); else res = Py_BuildValue("s", Tkapp_Result(self)); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_ExprLong(PyObject *self, PyObject *args) { char *s; PyObject *res = NULL; int retval; long v; if (!PyArg_ParseTuple(args, "s:exprlong", &s)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL retval = Tcl_ExprLong(Tkapp_Interp(self), s, &v); ENTER_OVERLAP if (retval == TCL_ERROR) res = Tkinter_Error(self); else res = Py_BuildValue("l", v); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_ExprDouble(PyObject *self, PyObject *args) { char *s; PyObject *res = NULL; double v; int retval; if (!PyArg_ParseTuple(args, "s:exprdouble", &s)) return NULL; CHECK_TCL_APPARTMENT; PyFPE_START_PROTECT("Tkapp_ExprDouble", return 0) ENTER_TCL retval = Tcl_ExprDouble(Tkapp_Interp(self), s, &v); ENTER_OVERLAP PyFPE_END_PROTECT(retval) if (retval == TCL_ERROR) res = Tkinter_Error(self); else res = Py_BuildValue("d", v); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_ExprBoolean(PyObject *self, PyObject *args) { char *s; PyObject *res = NULL; int retval; int v; if (!PyArg_ParseTuple(args, "s:exprboolean", &s)) return NULL; CHECK_TCL_APPARTMENT; ENTER_TCL retval = Tcl_ExprBoolean(Tkapp_Interp(self), s, &v); ENTER_OVERLAP if (retval == TCL_ERROR) res = Tkinter_Error(self); else res = Py_BuildValue("i", v); LEAVE_OVERLAP_TCL return res; } static PyObject * Tkapp_SplitList(PyObject *self, PyObject *args) { char *list; int argc; char **argv; PyObject *v; int i; if (PyTuple_Size(args) == 1) { v = PyTuple_GetItem(args, 0); if (PyTuple_Check(v)) { Py_INCREF(v); return v; } } if (!PyArg_ParseTuple(args, "et:splitlist", "utf-8", &list)) return NULL; if (Tcl_SplitList(Tkapp_Interp(self), list, &argc, &argv) == TCL_ERROR) { PyMem_Free(list); return Tkinter_Error(self); } if (!(v = PyTuple_New(argc))) goto finally; for (i = 0; i < argc; i++) { PyObject *s = PyString_FromString(argv[i]); if (!s || PyTuple_SetItem(v, i, s)) { Py_DECREF(v); v = NULL; goto finally; } } finally: ckfree(FREECAST argv); PyMem_Free(list); return v; } static PyObject * Tkapp_Split(PyObject *self, PyObject *args) { PyObject *v; char *list; if (PyTuple_Size(args) == 1) { PyObject* o = PyTuple_GetItem(args, 0); if (PyTuple_Check(o)) { o = SplitObj(o); return o; } } if (!PyArg_ParseTuple(args, "et:split", "utf-8", &list)) return NULL; v = Split(list); PyMem_Free(list); return v; } static PyObject * Tkapp_Merge(PyObject *self, PyObject *args) { char *s = Merge(args); PyObject *res = NULL; if (s) { res = PyString_FromString(s); ckfree(s); } return res; } /** Tcl Command **/ /* Client data struct */ typedef struct { PyObject *self; PyObject *func; } PythonCmd_ClientData; static int PythonCmd_Error(Tcl_Interp *interp) { errorInCmd = 1; PyErr_Fetch(&excInCmd, &valInCmd, &trbInCmd); LEAVE_PYTHON return TCL_ERROR; } /* This is the Tcl command that acts as a wrapper for Python * function or method. */ static int PythonCmd(ClientData clientData, Tcl_Interp *interp, int argc, char *argv[]) { PythonCmd_ClientData *data = (PythonCmd_ClientData *)clientData; PyObject *self, *func, *arg, *res, *tmp; int i, rv; char *s; ENTER_PYTHON /* TBD: no error checking here since we know, via the * Tkapp_CreateCommand() that the client data is a two-tuple */ self = data->self; func = data->func; /* Create argument list (argv1, ..., argvN) */ if (!(arg = PyTuple_New(argc - 1))) return PythonCmd_Error(interp); for (i = 0; i < (argc - 1); i++) { PyObject *s = PyString_FromString(argv[i + 1]); if (!s || PyTuple_SetItem(arg, i, s)) { Py_DECREF(arg); return PythonCmd_Error(interp); } } res = PyEval_CallObject(func, arg); Py_DECREF(arg); if (res == NULL) return PythonCmd_Error(interp); if (!(tmp = PyList_New(0))) { Py_DECREF(res); return PythonCmd_Error(interp); } s = AsString(res, tmp); if (s == NULL) { rv = PythonCmd_Error(interp); } else { Tcl_SetResult(Tkapp_Interp(self), s, TCL_VOLATILE); rv = TCL_OK; } Py_DECREF(res); Py_DECREF(tmp); LEAVE_PYTHON return rv; } static void PythonCmdDelete(ClientData clientData) { PythonCmd_ClientData *data = (PythonCmd_ClientData *)clientData; ENTER_PYTHON Py_XDECREF(data->self); Py_XDECREF(data->func); PyMem_DEL(data); LEAVE_PYTHON } TCL_DECLARE_MUTEX(command_mutex) typedef struct CommandEvent{ Tcl_Event ev; Tcl_Interp* interp; char *name; int create; int *status; ClientData *data; Tcl_Condition done; } CommandEvent; static int Tkapp_CommandProc(CommandEvent *ev, int flags) { if (ev->create) *ev->status = Tcl_CreateCommand( ev->interp, ev->name, PythonCmd, ev->data, PythonCmdDelete) == NULL; else *ev->status = Tcl_DeleteCommand(ev->interp, ev->name); Tcl_MutexLock(&command_mutex); Tcl_ConditionNotify(&ev->done); Tcl_MutexUnlock(&command_mutex); return 1; } static PyObject * Tkapp_CreateCommand(PyObject *_self, PyObject *args) { TkappObject *self = (TkappObject*)_self; PythonCmd_ClientData *data; char *cmdName; PyObject *func; int err; if (!PyArg_ParseTuple(args, "sO:createcommand", &cmdName, &func)) return NULL; if (!PyCallable_Check(func)) { PyErr_SetString(PyExc_TypeError, "command not callable"); return NULL; } #ifdef WITH_THREAD if (self->threaded && self->thread_id != Tcl_GetCurrentThread() && !WaitForMainloop(self)) return NULL; #endif data = PyMem_NEW(PythonCmd_ClientData, 1); if (!data) return PyErr_NoMemory(); Py_XINCREF(self); Py_XINCREF(func); data->self = _self; data->func = func; if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) { CommandEvent *ev = (CommandEvent*)ckalloc(sizeof(CommandEvent)); ev->ev.proc = (Tcl_EventProc*)Tkapp_CommandProc; ev->interp = self->interp; ev->create = 1; ev->name = cmdName; ev->data = (ClientData)data; ev->status = &err; ev->done = NULL; Tkapp_ThreadSend(self, (Tcl_Event*)ev, &ev->done, &command_mutex); } else { ENTER_TCL err = Tcl_CreateCommand( Tkapp_Interp(self), cmdName, PythonCmd, (ClientData)data, PythonCmdDelete) == NULL; LEAVE_TCL } if (err) { PyErr_SetString(Tkinter_TclError, "can't create Tcl command"); PyMem_DEL(data); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * Tkapp_DeleteCommand(PyObject *_self, PyObject *args) { TkappObject *self = (TkappObject*)_self; char *cmdName; int err; if (!PyArg_ParseTuple(args, "s:deletecommand", &cmdName)) return NULL; if (self->threaded && self->thread_id != Tcl_GetCurrentThread()) { CommandEvent *ev; ev = (CommandEvent*)ckalloc(sizeof(CommandEvent)); ev->ev.proc = (Tcl_EventProc*)Tkapp_CommandProc; ev->interp = self->interp; ev->create = 0; ev->name = cmdName; ev->status = &err; ev->done = NULL; Tkapp_ThreadSend(self, (Tcl_Event*)ev, &ev->done, &command_mutex); } else { ENTER_TCL err = Tcl_DeleteCommand(self->interp, cmdName); LEAVE_TCL } if (err == -1) { PyErr_SetString(Tkinter_TclError, "can't delete Tcl command"); return NULL; } Py_INCREF(Py_None); return Py_None; } #ifdef HAVE_CREATEFILEHANDLER /** File Handler **/ typedef struct _fhcdata { PyObject *func; PyObject *file; int id; struct _fhcdata *next; } FileHandler_ClientData; static FileHandler_ClientData *HeadFHCD; static FileHandler_ClientData * NewFHCD(PyObject *func, PyObject *file, int id) { FileHandler_ClientData *p; p = PyMem_NEW(FileHandler_ClientData, 1); if (p != NULL) { Py_XINCREF(func); Py_XINCREF(file); p->func = func; p->file = file; p->id = id; p->next = HeadFHCD; HeadFHCD = p; } return p; } static void DeleteFHCD(int id) { FileHandler_ClientData *p, **pp; pp = &HeadFHCD; while ((p = *pp) != NULL) { if (p->id == id) { *pp = p->next; Py_XDECREF(p->func); Py_XDECREF(p->file); PyMem_DEL(p); } else pp = &p->next; } } static void FileHandler(ClientData clientData, int mask) { FileHandler_ClientData *data = (FileHandler_ClientData *)clientData; PyObject *func, *file, *arg, *res; ENTER_PYTHON func = data->func; file = data->file; arg = Py_BuildValue("(Oi)", file, (long) mask); res = PyEval_CallObject(func, arg); Py_DECREF(arg); if (res == NULL) { errorInCmd = 1; PyErr_Fetch(&excInCmd, &valInCmd, &trbInCmd); } Py_XDECREF(res); LEAVE_PYTHON } static PyObject * Tkapp_CreateFileHandler(PyObject *self, PyObject *args) /* args is (file, mask, func) */ { FileHandler_ClientData *data; PyObject *file, *func; int mask, tfile; if (!PyArg_ParseTuple(args, "OiO:createfilehandler", &file, &mask, &func)) return NULL; #ifdef WITH_THREAD if (!self && !tcl_lock) { /* We don't have the Tcl lock since Tcl is threaded. */ PyErr_SetString(PyExc_RuntimeError, "_tkinter.createfilehandler not supported " "for threaded Tcl"); return NULL; } #endif if (self) { CHECK_TCL_APPARTMENT; } tfile = PyObject_AsFileDescriptor(file); if (tfile < 0) return NULL; if (!PyCallable_Check(func)) { PyErr_SetString(PyExc_TypeError, "bad argument list"); return NULL; } data = NewFHCD(func, file, tfile); if (data == NULL) return NULL; /* Ought to check for null Tcl_File object... */ ENTER_TCL Tcl_CreateFileHandler(tfile, mask, FileHandler, (ClientData) data); LEAVE_TCL Py_INCREF(Py_None); return Py_None; } static PyObject * Tkapp_DeleteFileHandler(PyObject *self, PyObject *args) { PyObject *file; int tfile; if (!PyArg_ParseTuple(args, "O:deletefilehandler", &file)) return NULL; #ifdef WITH_THREAD if (!self && !tcl_lock) { /* We don't have the Tcl lock since Tcl is threaded. */ PyErr_SetString(PyExc_RuntimeError, "_tkinter.deletefilehandler not supported " "for threaded Tcl"); return NULL; } #endif if (self) { CHECK_TCL_APPARTMENT; } tfile = PyObject_AsFileDescriptor(file); if (tfile < 0) return NULL; DeleteFHCD(tfile); /* Ought to check for null Tcl_File object... */ ENTER_TCL Tcl_DeleteFileHandler(tfile); LEAVE_TCL Py_INCREF(Py_None); return Py_None; } #endif /* HAVE_CREATEFILEHANDLER */ /**** Tktt Object (timer token) ****/ static PyTypeObject Tktt_Type; typedef struct { PyObject_HEAD Tcl_TimerToken token; PyObject *func; } TkttObject; static PyObject * Tktt_DeleteTimerHandler(PyObject *self, PyObject *args) { TkttObject *v = (TkttObject *)self; PyObject *func = v->func; if (!PyArg_ParseTuple(args, ":deletetimerhandler")) return NULL; if (v->token != NULL) { Tcl_DeleteTimerHandler(v->token); v->token = NULL; } if (func != NULL) { v->func = NULL; Py_DECREF(func); Py_DECREF(v); /* See Tktt_New() */ } Py_INCREF(Py_None); return Py_None; } static PyMethodDef Tktt_methods[] = { {"deletetimerhandler", Tktt_DeleteTimerHandler, METH_VARARGS}, {NULL, NULL} }; static TkttObject * Tktt_New(PyObject *func) { TkttObject *v; v = PyObject_New(TkttObject, &Tktt_Type); if (v == NULL) return NULL; Py_INCREF(func); v->token = NULL; v->func = func; /* Extra reference, deleted when called or when handler is deleted */ Py_INCREF(v); return v; } static void Tktt_Dealloc(PyObject *self) { TkttObject *v = (TkttObject *)self; PyObject *func = v->func; Py_XDECREF(func); PyObject_Del(self); } static PyObject * Tktt_Repr(PyObject *self) { TkttObject *v = (TkttObject *)self; char buf[100]; PyOS_snprintf(buf, sizeof(buf), "", v, v->func == NULL ? ", handler deleted" : ""); return PyString_FromString(buf); } static PyObject * Tktt_GetAttr(PyObject *self, char *name) { return Py_FindMethod(Tktt_methods, self, name); } static PyTypeObject Tktt_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size */ "tktimertoken", /*tp_name */ sizeof(TkttObject), /*tp_basicsize */ 0, /*tp_itemsize */ Tktt_Dealloc, /*tp_dealloc */ 0, /*tp_print */ Tktt_GetAttr, /*tp_getattr */ 0, /*tp_setattr */ 0, /*tp_compare */ Tktt_Repr, /*tp_repr */ 0, /*tp_as_number */ 0, /*tp_as_sequence */ 0, /*tp_as_mapping */ 0, /*tp_hash */ }; /** Timer Handler **/ static void TimerHandler(ClientData clientData) { TkttObject *v = (TkttObject *)clientData; PyObject *func = v->func; PyObject *res; if (func == NULL) return; v->func = NULL; ENTER_PYTHON res = PyEval_CallObject(func, NULL); Py_DECREF(func); Py_DECREF(v); /* See Tktt_New() */ if (res == NULL) { errorInCmd = 1; PyErr_Fetch(&excInCmd, &valInCmd, &trbInCmd); } else Py_DECREF(res); LEAVE_PYTHON } static PyObject * Tkapp_CreateTimerHandler(PyObject *self, PyObject *args) { int milliseconds; PyObject *func; TkttObject *v; if (!PyArg_ParseTuple(args, "iO:createtimerhandler", &milliseconds, &func)) return NULL; if (!PyCallable_Check(func)) { PyErr_SetString(PyExc_TypeError, "bad argument list"); return NULL; } #ifdef WITH_THREAD if (!self && !tcl_lock) { /* We don't have the Tcl lock since Tcl is threaded. */ PyErr_SetString(PyExc_RuntimeError, "_tkinter.createtimerhandler not supported " "for threaded Tcl"); return NULL; } #endif if (self) { CHECK_TCL_APPARTMENT; } v = Tktt_New(func); v->token = Tcl_CreateTimerHandler(milliseconds, TimerHandler, (ClientData)v); return (PyObject *) v; } /** Event Loop **/ static PyObject * Tkapp_MainLoop(PyObject *_self, PyObject *args) { int threshold = 0; TkappObject *self = (TkappObject*)_self; #ifdef WITH_THREAD PyThreadState *tstate = PyThreadState_Get(); #endif if (!PyArg_ParseTuple(args, "|i:mainloop", &threshold)) return NULL; #ifdef WITH_THREAD if (!self && !tcl_lock) { /* We don't have the Tcl lock since Tcl is threaded. */ PyErr_SetString(PyExc_RuntimeError, "_tkinter.mainloop not supported " "for threaded Tcl"); return NULL; } #endif if (self) { CHECK_TCL_APPARTMENT; self->dispatching = 1; } quitMainLoop = 0; while (Tk_GetNumMainWindows() > threshold && !quitMainLoop && !errorInCmd) { int result; #ifdef WITH_THREAD if (self && self->threaded) { /* Allow other Python threads to run. */ ENTER_TCL result = Tcl_DoOneEvent(0); LEAVE_TCL } else { Py_BEGIN_ALLOW_THREADS if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = tstate; result = Tcl_DoOneEvent(TCL_DONT_WAIT); tcl_tstate = NULL; if(tcl_lock)PyThread_release_lock(tcl_lock); if (result == 0) Sleep(Tkinter_busywaitinterval); Py_END_ALLOW_THREADS } #else result = Tcl_DoOneEvent(0); #endif if (PyErr_CheckSignals() != 0) { if (self) self->dispatching = 0; return NULL; } if (result < 0) break; } if (self) self->dispatching = 0; quitMainLoop = 0; if (errorInCmd) { errorInCmd = 0; PyErr_Restore(excInCmd, valInCmd, trbInCmd); excInCmd = valInCmd = trbInCmd = NULL; return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * Tkapp_DoOneEvent(PyObject *self, PyObject *args) { int flags = 0; int rv; if (!PyArg_ParseTuple(args, "|i:dooneevent", &flags)) return NULL; ENTER_TCL rv = Tcl_DoOneEvent(flags); LEAVE_TCL return Py_BuildValue("i", rv); } static PyObject * Tkapp_Quit(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":quit")) return NULL; quitMainLoop = 1; Py_INCREF(Py_None); return Py_None; } static PyObject * Tkapp_InterpAddr(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":interpaddr")) return NULL; return PyInt_FromLong((long)Tkapp_Interp(self)); } static PyObject * Tkapp_WantObjects(PyObject *self, PyObject *args) { int wantobjects = -1; if (!PyArg_ParseTuple(args, "|i:wantobjects", &wantobjects)) return NULL; if (wantobjects == -1) return PyBool_FromLong(((TkappObject*)self)->wantobjects); ((TkappObject*)self)->wantobjects = wantobjects; Py_INCREF(Py_None); return Py_None; } static PyObject * Tkapp_WillDispatch(PyObject *self, PyObject *args) { ((TkappObject*)self)->dispatching = 1; Py_INCREF(Py_None); return Py_None; } /**** Tkapp Method List ****/ static PyMethodDef Tkapp_methods[] = { {"willdispatch", Tkapp_WillDispatch, METH_NOARGS}, {"wantobjects", Tkapp_WantObjects, METH_VARARGS}, {"call", Tkapp_Call, METH_OLDARGS}, {"globalcall", Tkapp_GlobalCall, METH_OLDARGS}, {"eval", Tkapp_Eval, METH_VARARGS}, {"globaleval", Tkapp_GlobalEval, METH_VARARGS}, {"evalfile", Tkapp_EvalFile, METH_VARARGS}, {"record", Tkapp_Record, METH_VARARGS}, {"adderrorinfo", Tkapp_AddErrorInfo, METH_VARARGS}, {"setvar", Tkapp_SetVar, METH_VARARGS}, {"globalsetvar", Tkapp_GlobalSetVar, METH_VARARGS}, {"getvar", Tkapp_GetVar, METH_VARARGS}, {"globalgetvar", Tkapp_GlobalGetVar, METH_VARARGS}, {"unsetvar", Tkapp_UnsetVar, METH_VARARGS}, {"globalunsetvar", Tkapp_GlobalUnsetVar, METH_VARARGS}, {"getint", Tkapp_GetInt, METH_VARARGS}, {"getdouble", Tkapp_GetDouble, METH_VARARGS}, {"getboolean", Tkapp_GetBoolean, METH_VARARGS}, {"exprstring", Tkapp_ExprString, METH_VARARGS}, {"exprlong", Tkapp_ExprLong, METH_VARARGS}, {"exprdouble", Tkapp_ExprDouble, METH_VARARGS}, {"exprboolean", Tkapp_ExprBoolean, METH_VARARGS}, {"splitlist", Tkapp_SplitList, METH_VARARGS}, {"split", Tkapp_Split, METH_VARARGS}, {"merge", Tkapp_Merge, METH_OLDARGS}, {"createcommand", Tkapp_CreateCommand, METH_VARARGS}, {"deletecommand", Tkapp_DeleteCommand, METH_VARARGS}, #ifdef HAVE_CREATEFILEHANDLER {"createfilehandler", Tkapp_CreateFileHandler, METH_VARARGS}, {"deletefilehandler", Tkapp_DeleteFileHandler, METH_VARARGS}, #endif {"createtimerhandler", Tkapp_CreateTimerHandler, METH_VARARGS}, {"mainloop", Tkapp_MainLoop, METH_VARARGS}, {"dooneevent", Tkapp_DoOneEvent, METH_VARARGS}, {"quit", Tkapp_Quit, METH_VARARGS}, {"interpaddr", Tkapp_InterpAddr, METH_VARARGS}, {NULL, NULL} }; /**** Tkapp Type Methods ****/ static void Tkapp_Dealloc(PyObject *self) { /*CHECK_TCL_APPARTMENT;*/ ENTER_TCL Tcl_DeleteInterp(Tkapp_Interp(self)); LEAVE_TCL PyObject_Del(self); DisableEventHook(); } static PyObject * Tkapp_GetAttr(PyObject *self, char *name) { return Py_FindMethod(Tkapp_methods, self, name); } static PyTypeObject Tkapp_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size */ "tkapp", /*tp_name */ sizeof(TkappObject), /*tp_basicsize */ 0, /*tp_itemsize */ Tkapp_Dealloc, /*tp_dealloc */ 0, /*tp_print */ Tkapp_GetAttr, /*tp_getattr */ 0, /*tp_setattr */ 0, /*tp_compare */ 0, /*tp_repr */ 0, /*tp_as_number */ 0, /*tp_as_sequence */ 0, /*tp_as_mapping */ 0, /*tp_hash */ }; /**** Tkinter Module ****/ typedef struct { PyObject* tuple; int size; /* current size */ int maxsize; /* allocated size */ } FlattenContext; static int _bump(FlattenContext* context, int size) { /* expand tuple to hold (at least) size new items. return true if successful, false if an exception was raised */ int maxsize = context->maxsize * 2; if (maxsize < context->size + size) maxsize = context->size + size; context->maxsize = maxsize; return _PyTuple_Resize(&context->tuple, maxsize) >= 0; } static int _flatten1(FlattenContext* context, PyObject* item, int depth) { /* add tuple or list to argument tuple (recursively) */ int i, size; if (depth > 1000) { PyErr_SetString(PyExc_ValueError, "nesting too deep in _flatten"); return 0; } else if (PyList_Check(item)) { size = PyList_GET_SIZE(item); /* preallocate (assume no nesting) */ if (context->size + size > context->maxsize && !_bump(context, size)) return 0; /* copy items to output tuple */ for (i = 0; i < size; i++) { PyObject *o = PyList_GET_ITEM(item, i); if (PyList_Check(o) || PyTuple_Check(o)) { if (!_flatten1(context, o, depth + 1)) return 0; } else if (o != Py_None) { if (context->size + 1 > context->maxsize && !_bump(context, 1)) return 0; Py_INCREF(o); PyTuple_SET_ITEM(context->tuple, context->size++, o); } } } else if (PyTuple_Check(item)) { /* same, for tuples */ size = PyTuple_GET_SIZE(item); if (context->size + size > context->maxsize && !_bump(context, size)) return 0; for (i = 0; i < size; i++) { PyObject *o = PyTuple_GET_ITEM(item, i); if (PyList_Check(o) || PyTuple_Check(o)) { if (!_flatten1(context, o, depth + 1)) return 0; } else if (o != Py_None) { if (context->size + 1 > context->maxsize && !_bump(context, 1)) return 0; Py_INCREF(o); PyTuple_SET_ITEM(context->tuple, context->size++, o); } } } else { PyErr_SetString(PyExc_TypeError, "argument must be sequence"); return 0; } return 1; } static PyObject * Tkinter_Flatten(PyObject* self, PyObject* args) { FlattenContext context; PyObject* item; if (!PyArg_ParseTuple(args, "O:_flatten", &item)) return NULL; context.maxsize = PySequence_Size(item); if (context.maxsize <= 0) return PyTuple_New(0); context.tuple = PyTuple_New(context.maxsize); if (!context.tuple) return NULL; context.size = 0; if (!_flatten1(&context, item,0)) return NULL; if (_PyTuple_Resize(&context.tuple, context.size)) return NULL; return context.tuple; } static PyObject * Tkinter_Create(PyObject *self, PyObject *args) { char *screenName = NULL; char *baseName = NULL; char *className = NULL; int interactive = 0; int wantobjects = 0; baseName = strrchr(Py_GetProgramName(), '/'); if (baseName != NULL) baseName++; else baseName = Py_GetProgramName(); className = "Tk"; if (!PyArg_ParseTuple(args, "|zssii:create", &screenName, &baseName, &className, &interactive, &wantobjects)) return NULL; return (PyObject *) Tkapp_New(screenName, baseName, className, interactive, wantobjects); } static PyObject * Tkinter_setbusywaitinterval(PyObject *self, PyObject *args) { int new_val; if (!PyArg_ParseTuple(args, "i:setbusywaitinterval", &new_val)) return NULL; if (new_val < 0) { PyErr_SetString(PyExc_ValueError, "busywaitinterval must be >= 0"); return NULL; } Tkinter_busywaitinterval = new_val; Py_INCREF(Py_None); return Py_None; } static char setbusywaitinterval_doc[] = "setbusywaitinterval(n) -> None\n\ \n\ Set the busy-wait interval in milliseconds between successive\n\ calls to Tcl_DoOneEvent in a threaded Python interpreter.\n\ It should be set to a divisor of the maximum time between\n\ frames in an animation."; static PyObject * Tkinter_getbusywaitinterval(PyObject *self, PyObject *args) { return PyInt_FromLong(Tkinter_busywaitinterval); } static char getbusywaitinterval_doc[] = "getbusywaitinterval() -> int\n\ \n\ Return the current busy-wait interval between successive\n\ calls to Tcl_DoOneEvent in a threaded Python interpreter."; static PyMethodDef moduleMethods[] = { {"_flatten", Tkinter_Flatten, METH_VARARGS}, {"create", Tkinter_Create, METH_VARARGS}, #ifdef HAVE_CREATEFILEHANDLER {"createfilehandler", Tkapp_CreateFileHandler, METH_VARARGS}, {"deletefilehandler", Tkapp_DeleteFileHandler, METH_VARARGS}, #endif {"createtimerhandler", Tkapp_CreateTimerHandler, METH_VARARGS}, {"mainloop", Tkapp_MainLoop, METH_VARARGS}, {"dooneevent", Tkapp_DoOneEvent, METH_VARARGS}, {"quit", Tkapp_Quit, METH_VARARGS}, {"setbusywaitinterval",Tkinter_setbusywaitinterval, METH_VARARGS, setbusywaitinterval_doc}, {"getbusywaitinterval",(PyCFunction)Tkinter_getbusywaitinterval, METH_NOARGS, getbusywaitinterval_doc}, {NULL, NULL} }; #ifdef WAIT_FOR_STDIN static int stdin_ready = 0; #ifndef MS_WINDOWS static void MyFileProc(void *clientData, int mask) { stdin_ready = 1; } #endif #ifdef WITH_THREAD static PyThreadState *event_tstate = NULL; #endif static int EventHook(void) { #ifndef MS_WINDOWS int tfile; #endif #ifdef WITH_THREAD PyEval_RestoreThread(event_tstate); #endif stdin_ready = 0; errorInCmd = 0; #ifndef MS_WINDOWS tfile = fileno(stdin); Tcl_CreateFileHandler(tfile, TCL_READABLE, MyFileProc, NULL); #endif while (!errorInCmd && !stdin_ready) { int result; #ifdef MS_WINDOWS if (_kbhit()) { stdin_ready = 1; break; } #endif #if defined(WITH_THREAD) || defined(MS_WINDOWS) Py_BEGIN_ALLOW_THREADS if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = event_tstate; result = Tcl_DoOneEvent(TCL_DONT_WAIT); tcl_tstate = NULL; if(tcl_lock)PyThread_release_lock(tcl_lock); if (result == 0) Sleep(Tkinter_busywaitinterval); Py_END_ALLOW_THREADS #else result = Tcl_DoOneEvent(0); #endif if (result < 0) break; } #ifndef MS_WINDOWS Tcl_DeleteFileHandler(tfile); #endif if (errorInCmd) { errorInCmd = 0; PyErr_Restore(excInCmd, valInCmd, trbInCmd); excInCmd = valInCmd = trbInCmd = NULL; PyErr_Print(); } #ifdef WITH_THREAD PyEval_SaveThread(); #endif return 0; } #endif static void EnableEventHook(void) { #ifdef WAIT_FOR_STDIN if (PyOS_InputHook == NULL) { #ifdef WITH_THREAD event_tstate = PyThreadState_Get(); #endif PyOS_InputHook = EventHook; } #endif } static void DisableEventHook(void) { #ifdef WAIT_FOR_STDIN if (Tk_GetNumMainWindows() == 0 && PyOS_InputHook == EventHook) { PyOS_InputHook = NULL; } #endif } /* all errors will be checked in one fell swoop in init_tkinter() */ static void ins_long(PyObject *d, char *name, long val) { PyObject *v = PyInt_FromLong(val); if (v) { PyDict_SetItemString(d, name, v); Py_DECREF(v); } } static void ins_string(PyObject *d, char *name, char *val) { PyObject *v = PyString_FromString(val); if (v) { PyDict_SetItemString(d, name, v); Py_DECREF(v); } } PyMODINIT_FUNC init_tkinter(void) { PyObject *m, *d; Tkapp_Type.ob_type = &PyType_Type; #ifdef WITH_THREAD tcl_lock = PyThread_allocate_lock(); #endif m = Py_InitModule("_tkinter", moduleMethods); d = PyModule_GetDict(m); Tkinter_TclError = PyErr_NewException("_tkinter.TclError", NULL, NULL); PyDict_SetItemString(d, "TclError", Tkinter_TclError); ins_long(d, "READABLE", TCL_READABLE); ins_long(d, "WRITABLE", TCL_WRITABLE); ins_long(d, "EXCEPTION", TCL_EXCEPTION); ins_long(d, "WINDOW_EVENTS", TCL_WINDOW_EVENTS); ins_long(d, "FILE_EVENTS", TCL_FILE_EVENTS); ins_long(d, "TIMER_EVENTS", TCL_TIMER_EVENTS); ins_long(d, "IDLE_EVENTS", TCL_IDLE_EVENTS); ins_long(d, "ALL_EVENTS", TCL_ALL_EVENTS); ins_long(d, "DONT_WAIT", TCL_DONT_WAIT); ins_string(d, "TK_VERSION", TK_VERSION); ins_string(d, "TCL_VERSION", TCL_VERSION); PyDict_SetItemString(d, "TkappType", (PyObject *)&Tkapp_Type); Tktt_Type.ob_type = &PyType_Type; PyDict_SetItemString(d, "TkttType", (PyObject *)&Tktt_Type); PyTclObject_Type.ob_type = &PyType_Type; PyDict_SetItemString(d, "Tcl_Obj", (PyObject *)&PyTclObject_Type); #ifdef TK_AQUA /* Tk_MacOSXSetupTkNotifier must be called before Tcl's subsystems * start waking up. Note that Tcl_FindExecutable will do this, this * code must be above it! The original warning from * tkMacOSXAppInit.c is copied below. * * NB - You have to swap in the Tk Notifier BEFORE you start up the * Tcl interpreter for now. It probably should work to do this * in the other order, but for now it doesn't seem to. * */ Tk_MacOSXSetupTkNotifier(); #endif /* This helps the dynamic loader; in Unicode aware Tcl versions it also helps Tcl find its encodings. */ Tcl_FindExecutable(Py_GetProgramName()); if (PyErr_Occurred()) return; #if 0 /* This was not a good idea; through bindings, Tcl_Finalize() may invoke Python code but at that point the interpreter and thread state have already been destroyed! */ Py_AtExit(Tcl_Finalize); #endif #ifdef macintosh /* ** Part of this code is stolen from MacintoshInit in tkMacAppInit. ** Most of the initializations in that routine (toolbox init calls and ** such) have already been done for us, so we only need these. */ tcl_macQdPtr = &qd; Tcl_MacSetEventProc(PyMacConvertEvent); #if GENERATINGCFM mac_addlibresources(); #endif /* GENERATINGCFM */ #endif /* macintosh */ } #ifdef macintosh /* ** Anyone who embeds Tcl/Tk on the Mac must define panic(). */ void panic(char * format, ...) { va_list varg; va_start(varg, format); vfprintf(stderr, format, varg); (void) fflush(stderr); va_end(varg); Py_FatalError("Tcl/Tk panic"); } /* ** Pass events to SIOUX before passing them to Tk. */ static int PyMacConvertEvent(EventRecord *eventPtr) { WindowPtr frontwin; /* ** Sioux eats too many events, so we don't pass it everything. We ** always pass update events to Sioux, and we only pass other events if ** the Sioux window is frontmost. This means that Tk menus don't work ** in that case, but at least we can scroll the sioux window. ** Note that the SIOUXIsAppWindow() routine we use here is not really ** part of the external interface of Sioux... */ frontwin = FrontWindow(); if ( eventPtr->what == updateEvt || SIOUXIsAppWindow(frontwin) ) { if (SIOUXHandleOneEvent(eventPtr)) return 0; /* Nothing happened to the Tcl event queue */ } return TkMacConvertEvent(eventPtr); } #if GENERATINGCFM /* ** Additional Mac specific code for dealing with shared libraries. */ #include #include static int loaded_from_shlib = 0; static FSSpec library_fss; /* ** If this module is dynamically loaded the following routine should ** be the init routine. It takes care of adding the shared library to ** the resource-file chain, so that the tk routines can find their ** resources. */ OSErr pascal init_tkinter_shlib(CFragInitBlockPtr data) { __initialize(); if ( data == nil ) return noErr; if ( data->fragLocator.where == kDataForkCFragLocator ) { library_fss = *data->fragLocator.u.onDisk.fileSpec; loaded_from_shlib = 1; } else if ( data->fragLocator.where == kResourceCFragLocator ) { library_fss = *data->fragLocator.u.inSegs.fileSpec; loaded_from_shlib = 1; } return noErr; } /* ** Insert the library resources into the search path. Put them after ** the resources from the application. Again, we ignore errors. */ static mac_addlibresources(void) { if ( !loaded_from_shlib ) return; (void)FSpOpenResFile(&library_fss, fsRdPerm); } #endif /* GENERATINGCFM */ #endif /* macintosh */ Python-2.3.7/Modules/structmodule.c0000644001241000117560000006616207641270032016572 0ustar loewishpifb6/* struct module -- pack values into and (out of) strings */ /* New version supporting byte order, alignment and size options, character strings, and unsigned numbers */ #include "Python.h" #include PyDoc_STRVAR(struct__doc__, "Functions to convert between Python values and C structs.\n\ Python strings are used to hold the data representing the C struct\n\ and also as format strings to describe the layout of data in the C struct.\n\ \n\ The optional first format char indicates byte order, size and alignment:\n\ @: native order, size & alignment (default)\n\ =: native order, std. size & alignment\n\ <: little-endian, std. size & alignment\n\ >: big-endian, std. size & alignment\n\ !: same as >\n\ \n\ The remaining chars indicate types of args and must match exactly;\n\ these can be preceded by a decimal repeat count:\n\ x: pad byte (no data); c:char; b:signed byte; B:unsigned byte;\n\ h:short; H:unsigned short; i:int; I:unsigned int;\n\ l:long; L:unsigned long; f:float; d:double.\n\ Special cases (preceding decimal count indicates length):\n\ s:string (array of char); p: pascal string (with count byte).\n\ Special case (only available in native format):\n\ P:an integer type that is wide enough to hold a pointer.\n\ Special case (not in native mode unless 'long long' in platform C):\n\ q:long long; Q:unsigned long long\n\ Whitespace between formats is ignored.\n\ \n\ The variable struct.error is an exception raised on errors."); /* Exception */ static PyObject *StructError; /* Define various structs to figure out the alignments of types */ #ifdef __MWERKS__ /* ** XXXX We have a problem here. There are no unique alignment rules ** on the PowerPC mac. */ #ifdef __powerc #pragma options align=mac68k #endif #endif /* __MWERKS__ */ typedef struct { char c; short x; } st_short; typedef struct { char c; int x; } st_int; typedef struct { char c; long x; } st_long; typedef struct { char c; float x; } st_float; typedef struct { char c; double x; } st_double; typedef struct { char c; void *x; } st_void_p; #define SHORT_ALIGN (sizeof(st_short) - sizeof(short)) #define INT_ALIGN (sizeof(st_int) - sizeof(int)) #define LONG_ALIGN (sizeof(st_long) - sizeof(long)) #define FLOAT_ALIGN (sizeof(st_float) - sizeof(float)) #define DOUBLE_ALIGN (sizeof(st_double) - sizeof(double)) #define VOID_P_ALIGN (sizeof(st_void_p) - sizeof(void *)) /* We can't support q and Q in native mode unless the compiler does; in std mode, they're 8 bytes on all platforms. */ #ifdef HAVE_LONG_LONG typedef struct { char c; PY_LONG_LONG x; } s_long_long; #define LONG_LONG_ALIGN (sizeof(s_long_long) - sizeof(PY_LONG_LONG)) #endif #define STRINGIFY(x) #x #ifdef __powerc #pragma options align=reset #endif /* Helper to get a PyLongObject by hook or by crook. Caller should decref. */ static PyObject * get_pylong(PyObject *v) { PyNumberMethods *m; assert(v != NULL); if (PyInt_Check(v)) return PyLong_FromLong(PyInt_AS_LONG(v)); if (PyLong_Check(v)) { Py_INCREF(v); return v; } m = v->ob_type->tp_as_number; if (m != NULL && m->nb_long != NULL) { v = m->nb_long(v); if (v == NULL) return NULL; if (PyLong_Check(v)) return v; Py_DECREF(v); } PyErr_SetString(StructError, "cannot convert argument to long"); return NULL; } /* Helper routine to get a Python integer and raise the appropriate error if it isn't one */ static int get_long(PyObject *v, long *p) { long x = PyInt_AsLong(v); if (x == -1 && PyErr_Occurred()) { if (PyErr_ExceptionMatches(PyExc_TypeError)) PyErr_SetString(StructError, "required argument is not an integer"); return -1; } *p = x; return 0; } /* Same, but handling unsigned long */ static int get_ulong(PyObject *v, unsigned long *p) { if (PyLong_Check(v)) { unsigned long x = PyLong_AsUnsignedLong(v); if (x == (unsigned long)(-1) && PyErr_Occurred()) return -1; *p = x; return 0; } else { return get_long(v, (long *)p); } } #ifdef HAVE_LONG_LONG /* Same, but handling native long long. */ static int get_longlong(PyObject *v, PY_LONG_LONG *p) { PY_LONG_LONG x; v = get_pylong(v); if (v == NULL) return -1; assert(PyLong_Check(v)); x = PyLong_AsLongLong(v); Py_DECREF(v); if (x == (PY_LONG_LONG)-1 && PyErr_Occurred()) return -1; *p = x; return 0; } /* Same, but handling native unsigned long long. */ static int get_ulonglong(PyObject *v, unsigned PY_LONG_LONG *p) { unsigned PY_LONG_LONG x; v = get_pylong(v); if (v == NULL) return -1; assert(PyLong_Check(v)); x = PyLong_AsUnsignedLongLong(v); Py_DECREF(v); if (x == (unsigned PY_LONG_LONG)-1 && PyErr_Occurred()) return -1; *p = x; return 0; } #endif /* Floating point helpers */ static PyObject * unpack_float(const char *p, /* start of 4-byte string */ int le) /* true for little-endian, false for big-endian */ { double x; x = _PyFloat_Unpack4((unsigned char *)p, le); if (x == -1.0 && PyErr_Occurred()) return NULL; return PyFloat_FromDouble(x); } static PyObject * unpack_double(const char *p, /* start of 8-byte string */ int le) /* true for little-endian, false for big-endian */ { double x; x = _PyFloat_Unpack8((unsigned char *)p, le); if (x == -1.0 && PyErr_Occurred()) return NULL; return PyFloat_FromDouble(x); } /* The translation function for each format character is table driven */ typedef struct _formatdef { char format; int size; int alignment; PyObject* (*unpack)(const char *, const struct _formatdef *); int (*pack)(char *, PyObject *, const struct _formatdef *); } formatdef; /* A large number of small routines follow, with names of the form [bln][up]_TYPE [bln] distiguishes among big-endian, little-endian and native. [pu] distiguishes between pack (to struct) and unpack (from struct). TYPE is one of char, byte, ubyte, etc. */ /* Native mode routines. ****************************************************/ /* NOTE: In all n[up]_ routines handling types larger than 1 byte, there is *no* guarantee that the p pointer is properly aligned for each type, therefore memcpy is called. An intermediate variable is used to compensate for big-endian architectures. Normally both the intermediate variable and the memcpy call will be skipped by C optimisation in little-endian architectures (gcc >= 2.91 does this). */ static PyObject * nu_char(const char *p, const formatdef *f) { return PyString_FromStringAndSize(p, 1); } static PyObject * nu_byte(const char *p, const formatdef *f) { return PyInt_FromLong((long) *(signed char *)p); } static PyObject * nu_ubyte(const char *p, const formatdef *f) { return PyInt_FromLong((long) *(unsigned char *)p); } static PyObject * nu_short(const char *p, const formatdef *f) { short x; memcpy((char *)&x, p, sizeof x); return PyInt_FromLong((long)x); } static PyObject * nu_ushort(const char *p, const formatdef *f) { unsigned short x; memcpy((char *)&x, p, sizeof x); return PyInt_FromLong((long)x); } static PyObject * nu_int(const char *p, const formatdef *f) { int x; memcpy((char *)&x, p, sizeof x); return PyInt_FromLong((long)x); } static PyObject * nu_uint(const char *p, const formatdef *f) { unsigned int x; memcpy((char *)&x, p, sizeof x); return PyLong_FromUnsignedLong((unsigned long)x); } static PyObject * nu_long(const char *p, const formatdef *f) { long x; memcpy((char *)&x, p, sizeof x); return PyInt_FromLong(x); } static PyObject * nu_ulong(const char *p, const formatdef *f) { unsigned long x; memcpy((char *)&x, p, sizeof x); return PyLong_FromUnsignedLong(x); } /* Native mode doesn't support q or Q unless the platform C supports long long (or, on Windows, __int64). */ #ifdef HAVE_LONG_LONG static PyObject * nu_longlong(const char *p, const formatdef *f) { PY_LONG_LONG x; memcpy((char *)&x, p, sizeof x); return PyLong_FromLongLong(x); } static PyObject * nu_ulonglong(const char *p, const formatdef *f) { unsigned PY_LONG_LONG x; memcpy((char *)&x, p, sizeof x); return PyLong_FromUnsignedLongLong(x); } #endif static PyObject * nu_float(const char *p, const formatdef *f) { float x; memcpy((char *)&x, p, sizeof x); return PyFloat_FromDouble((double)x); } static PyObject * nu_double(const char *p, const formatdef *f) { double x; memcpy((char *)&x, p, sizeof x); return PyFloat_FromDouble(x); } static PyObject * nu_void_p(const char *p, const formatdef *f) { void *x; memcpy((char *)&x, p, sizeof x); return PyLong_FromVoidPtr(x); } static int np_byte(char *p, PyObject *v, const formatdef *f) { long x; if (get_long(v, &x) < 0) return -1; if (x < -128 || x > 127){ PyErr_SetString(StructError, "byte format requires -128<=number<=127"); return -1; } *p = (char)x; return 0; } static int np_ubyte(char *p, PyObject *v, const formatdef *f) { long x; if (get_long(v, &x) < 0) return -1; if (x < 0 || x > 255){ PyErr_SetString(StructError, "ubyte format requires 0<=number<=255"); return -1; } *p = (char)x; return 0; } static int np_char(char *p, PyObject *v, const formatdef *f) { if (!PyString_Check(v) || PyString_Size(v) != 1) { PyErr_SetString(StructError, "char format require string of length 1"); return -1; } *p = *PyString_AsString(v); return 0; } static int np_short(char *p, PyObject *v, const formatdef *f) { long x; short y; if (get_long(v, &x) < 0) return -1; if (x < SHRT_MIN || x > SHRT_MAX){ PyErr_SetString(StructError, "short format requires " STRINGIFY(SHRT_MIN) "<=number<=" STRINGIFY(SHRT_MAX)); return -1; } y = (short)x; memcpy(p, (char *)&y, sizeof y); return 0; } static int np_ushort(char *p, PyObject *v, const formatdef *f) { long x; unsigned short y; if (get_long(v, &x) < 0) return -1; if (x < 0 || x > USHRT_MAX){ PyErr_SetString(StructError, "short format requires 0<=number<=" STRINGIFY(USHRT_MAX)); return -1; } y = (unsigned short)x; memcpy(p, (char *)&y, sizeof y); return 0; } static int np_int(char *p, PyObject *v, const formatdef *f) { long x; int y; if (get_long(v, &x) < 0) return -1; y = (int)x; memcpy(p, (char *)&y, sizeof y); return 0; } static int np_uint(char *p, PyObject *v, const formatdef *f) { unsigned long x; unsigned int y; if (get_ulong(v, &x) < 0) return -1; y = (unsigned int)x; memcpy(p, (char *)&y, sizeof y); return 0; } static int np_long(char *p, PyObject *v, const formatdef *f) { long x; if (get_long(v, &x) < 0) return -1; memcpy(p, (char *)&x, sizeof x); return 0; } static int np_ulong(char *p, PyObject *v, const formatdef *f) { unsigned long x; if (get_ulong(v, &x) < 0) return -1; memcpy(p, (char *)&x, sizeof x); return 0; } #ifdef HAVE_LONG_LONG static int np_longlong(char *p, PyObject *v, const formatdef *f) { PY_LONG_LONG x; if (get_longlong(v, &x) < 0) return -1; memcpy(p, (char *)&x, sizeof x); return 0; } static int np_ulonglong(char *p, PyObject *v, const formatdef *f) { unsigned PY_LONG_LONG x; if (get_ulonglong(v, &x) < 0) return -1; memcpy(p, (char *)&x, sizeof x); return 0; } #endif static int np_float(char *p, PyObject *v, const formatdef *f) { float x = (float)PyFloat_AsDouble(v); if (x == -1 && PyErr_Occurred()) { PyErr_SetString(StructError, "required argument is not a float"); return -1; } memcpy(p, (char *)&x, sizeof x); return 0; } static int np_double(char *p, PyObject *v, const formatdef *f) { double x = PyFloat_AsDouble(v); if (x == -1 && PyErr_Occurred()) { PyErr_SetString(StructError, "required argument is not a float"); return -1; } memcpy(p, (char *)&x, sizeof(double)); return 0; } static int np_void_p(char *p, PyObject *v, const formatdef *f) { void *x = PyLong_AsVoidPtr(v); if (x == NULL && PyErr_Occurred()) { /* ### hrm. PyLong_AsVoidPtr raises SystemError */ if (PyErr_ExceptionMatches(PyExc_TypeError)) PyErr_SetString(StructError, "required argument is not an integer"); return -1; } memcpy(p, (char *)&x, sizeof x); return 0; } static formatdef native_table[] = { {'x', sizeof(char), 0, NULL}, {'b', sizeof(char), 0, nu_byte, np_byte}, {'B', sizeof(char), 0, nu_ubyte, np_ubyte}, {'c', sizeof(char), 0, nu_char, np_char}, {'s', sizeof(char), 0, NULL}, {'p', sizeof(char), 0, NULL}, {'h', sizeof(short), SHORT_ALIGN, nu_short, np_short}, {'H', sizeof(short), SHORT_ALIGN, nu_ushort, np_ushort}, {'i', sizeof(int), INT_ALIGN, nu_int, np_int}, {'I', sizeof(int), INT_ALIGN, nu_uint, np_uint}, {'l', sizeof(long), LONG_ALIGN, nu_long, np_long}, {'L', sizeof(long), LONG_ALIGN, nu_ulong, np_ulong}, {'f', sizeof(float), FLOAT_ALIGN, nu_float, np_float}, {'d', sizeof(double), DOUBLE_ALIGN, nu_double, np_double}, {'P', sizeof(void *), VOID_P_ALIGN, nu_void_p, np_void_p}, #ifdef HAVE_LONG_LONG {'q', sizeof(PY_LONG_LONG), LONG_LONG_ALIGN, nu_longlong, np_longlong}, {'Q', sizeof(PY_LONG_LONG), LONG_LONG_ALIGN, nu_ulonglong,np_ulonglong}, #endif {0} }; /* Big-endian routines. *****************************************************/ static PyObject * bu_int(const char *p, const formatdef *f) { long x = 0; int i = f->size; do { x = (x<<8) | (*p++ & 0xFF); } while (--i > 0); /* Extend the sign bit. */ if (SIZEOF_LONG > f->size) x |= -(x & (1L << (8*f->size - 1))); return PyInt_FromLong(x); } static PyObject * bu_uint(const char *p, const formatdef *f) { unsigned long x = 0; int i = f->size; do { x = (x<<8) | (*p++ & 0xFF); } while (--i > 0); if (f->size >= 4) return PyLong_FromUnsignedLong(x); else return PyInt_FromLong((long)x); } static PyObject * bu_longlong(const char *p, const formatdef *f) { return _PyLong_FromByteArray((const unsigned char *)p, 8, 0, /* little-endian */ 1 /* signed */); } static PyObject * bu_ulonglong(const char *p, const formatdef *f) { return _PyLong_FromByteArray((const unsigned char *)p, 8, 0, /* little-endian */ 0 /* signed */); } static PyObject * bu_float(const char *p, const formatdef *f) { return unpack_float(p, 0); } static PyObject * bu_double(const char *p, const formatdef *f) { return unpack_double(p, 0); } static int bp_int(char *p, PyObject *v, const formatdef *f) { long x; int i; if (get_long(v, &x) < 0) return -1; i = f->size; do { p[--i] = (char)x; x >>= 8; } while (i > 0); return 0; } static int bp_uint(char *p, PyObject *v, const formatdef *f) { unsigned long x; int i; if (get_ulong(v, &x) < 0) return -1; i = f->size; do { p[--i] = (char)x; x >>= 8; } while (i > 0); return 0; } static int bp_longlong(char *p, PyObject *v, const formatdef *f) { int res; v = get_pylong(v); if (v == NULL) return -1; res = _PyLong_AsByteArray((PyLongObject *)v, (unsigned char *)p, 8, 0, /* little_endian */ 1 /* signed */); Py_DECREF(v); return res; } static int bp_ulonglong(char *p, PyObject *v, const formatdef *f) { int res; v = get_pylong(v); if (v == NULL) return -1; res = _PyLong_AsByteArray((PyLongObject *)v, (unsigned char *)p, 8, 0, /* little_endian */ 0 /* signed */); Py_DECREF(v); return res; } static int bp_float(char *p, PyObject *v, const formatdef *f) { double x = PyFloat_AsDouble(v); if (x == -1 && PyErr_Occurred()) { PyErr_SetString(StructError, "required argument is not a float"); return -1; } return _PyFloat_Pack4(x, (unsigned char *)p, 0); } static int bp_double(char *p, PyObject *v, const formatdef *f) { double x = PyFloat_AsDouble(v); if (x == -1 && PyErr_Occurred()) { PyErr_SetString(StructError, "required argument is not a float"); return -1; } return _PyFloat_Pack8(x, (unsigned char *)p, 0); } static formatdef bigendian_table[] = { {'x', 1, 0, NULL}, {'b', 1, 0, bu_int, bp_int}, {'B', 1, 0, bu_uint, bp_int}, {'c', 1, 0, nu_char, np_char}, {'s', 1, 0, NULL}, {'p', 1, 0, NULL}, {'h', 2, 0, bu_int, bp_int}, {'H', 2, 0, bu_uint, bp_uint}, {'i', 4, 0, bu_int, bp_int}, {'I', 4, 0, bu_uint, bp_uint}, {'l', 4, 0, bu_int, bp_int}, {'L', 4, 0, bu_uint, bp_uint}, {'q', 8, 0, bu_longlong, bp_longlong}, {'Q', 8, 0, bu_ulonglong, bp_ulonglong}, {'f', 4, 0, bu_float, bp_float}, {'d', 8, 0, bu_double, bp_double}, {0} }; /* Little-endian routines. *****************************************************/ static PyObject * lu_int(const char *p, const formatdef *f) { long x = 0; int i = f->size; do { x = (x<<8) | (p[--i] & 0xFF); } while (i > 0); /* Extend the sign bit. */ if (SIZEOF_LONG > f->size) x |= -(x & (1L << (8*f->size - 1))); return PyInt_FromLong(x); } static PyObject * lu_uint(const char *p, const formatdef *f) { unsigned long x = 0; int i = f->size; do { x = (x<<8) | (p[--i] & 0xFF); } while (i > 0); if (f->size >= 4) return PyLong_FromUnsignedLong(x); else return PyInt_FromLong((long)x); } static PyObject * lu_longlong(const char *p, const formatdef *f) { return _PyLong_FromByteArray((const unsigned char *)p, 8, 1, /* little-endian */ 1 /* signed */); } static PyObject * lu_ulonglong(const char *p, const formatdef *f) { return _PyLong_FromByteArray((const unsigned char *)p, 8, 1, /* little-endian */ 0 /* signed */); } static PyObject * lu_float(const char *p, const formatdef *f) { return unpack_float(p, 1); } static PyObject * lu_double(const char *p, const formatdef *f) { return unpack_double(p, 1); } static int lp_int(char *p, PyObject *v, const formatdef *f) { long x; int i; if (get_long(v, &x) < 0) return -1; i = f->size; do { *p++ = (char)x; x >>= 8; } while (--i > 0); return 0; } static int lp_uint(char *p, PyObject *v, const formatdef *f) { unsigned long x; int i; if (get_ulong(v, &x) < 0) return -1; i = f->size; do { *p++ = (char)x; x >>= 8; } while (--i > 0); return 0; } static int lp_longlong(char *p, PyObject *v, const formatdef *f) { int res; v = get_pylong(v); if (v == NULL) return -1; res = _PyLong_AsByteArray((PyLongObject*)v, (unsigned char *)p, 8, 1, /* little_endian */ 1 /* signed */); Py_DECREF(v); return res; } static int lp_ulonglong(char *p, PyObject *v, const formatdef *f) { int res; v = get_pylong(v); if (v == NULL) return -1; res = _PyLong_AsByteArray((PyLongObject*)v, (unsigned char *)p, 8, 1, /* little_endian */ 0 /* signed */); Py_DECREF(v); return res; } static int lp_float(char *p, PyObject *v, const formatdef *f) { double x = PyFloat_AsDouble(v); if (x == -1 && PyErr_Occurred()) { PyErr_SetString(StructError, "required argument is not a float"); return -1; } return _PyFloat_Pack4(x, (unsigned char *)p, 1); } static int lp_double(char *p, PyObject *v, const formatdef *f) { double x = PyFloat_AsDouble(v); if (x == -1 && PyErr_Occurred()) { PyErr_SetString(StructError, "required argument is not a float"); return -1; } return _PyFloat_Pack8(x, (unsigned char *)p, 1); } static formatdef lilendian_table[] = { {'x', 1, 0, NULL}, {'b', 1, 0, lu_int, lp_int}, {'B', 1, 0, lu_uint, lp_int}, {'c', 1, 0, nu_char, np_char}, {'s', 1, 0, NULL}, {'p', 1, 0, NULL}, {'h', 2, 0, lu_int, lp_int}, {'H', 2, 0, lu_uint, lp_uint}, {'i', 4, 0, lu_int, lp_int}, {'I', 4, 0, lu_uint, lp_uint}, {'l', 4, 0, lu_int, lp_int}, {'L', 4, 0, lu_uint, lp_uint}, {'q', 8, 0, lu_longlong, lp_longlong}, {'Q', 8, 0, lu_ulonglong, lp_ulonglong}, {'f', 4, 0, lu_float, lp_float}, {'d', 8, 0, lu_double, lp_double}, {0} }; static const formatdef * whichtable(char **pfmt) { const char *fmt = (*pfmt)++; /* May be backed out of later */ switch (*fmt) { case '<': return lilendian_table; case '>': case '!': /* Network byte order is big-endian */ return bigendian_table; case '=': { /* Host byte order -- different from native in aligment! */ int n = 1; char *p = (char *) &n; if (*p == 1) return lilendian_table; else return bigendian_table; } default: --*pfmt; /* Back out of pointer increment */ /* Fall through */ case '@': return native_table; } } /* Get the table entry for a format code */ static const formatdef * getentry(int c, const formatdef *f) { for (; f->format != '\0'; f++) { if (f->format == c) { return f; } } PyErr_SetString(StructError, "bad char in struct format"); return NULL; } /* Align a size according to a format code */ static int align(int size, int c, const formatdef *e) { if (e->format == c) { if (e->alignment) { size = ((size + e->alignment - 1) / e->alignment) * e->alignment; } } return size; } /* calculate the size of a format string */ static int calcsize(const char *fmt, const formatdef *f) { const formatdef *e; const char *s; char c; int size, num, itemsize, x; s = fmt; size = 0; while ((c = *s++) != '\0') { if (isspace((int)c)) continue; if ('0' <= c && c <= '9') { num = c - '0'; while ('0' <= (c = *s++) && c <= '9') { x = num*10 + (c - '0'); if (x/10 != num) { PyErr_SetString( StructError, "overflow in item count"); return -1; } num = x; } if (c == '\0') break; } else num = 1; e = getentry(c, f); if (e == NULL) return -1; itemsize = e->size; size = align(size, c, e); x = num * itemsize; size += x; if (x/itemsize != num || size < 0) { PyErr_SetString(StructError, "total struct size too long"); return -1; } } return size; } PyDoc_STRVAR(calcsize__doc__, "calcsize(fmt) -> int\n\ Return size of C struct described by format string fmt.\n\ See struct.__doc__ for more on format strings."); static PyObject * struct_calcsize(PyObject *self, PyObject *args) { char *fmt; const formatdef *f; int size; if (!PyArg_ParseTuple(args, "s:calcsize", &fmt)) return NULL; f = whichtable(&fmt); size = calcsize(fmt, f); if (size < 0) return NULL; return PyInt_FromLong((long)size); } PyDoc_STRVAR(pack__doc__, "pack(fmt, v1, v2, ...) -> string\n\ Return string containing values v1, v2, ... packed according to fmt.\n\ See struct.__doc__ for more on format strings."); static PyObject * struct_pack(PyObject *self, PyObject *args) { const formatdef *f, *e; PyObject *format, *result, *v; char *fmt; int size, num; int i, n; char *s, *res, *restart, *nres; char c; if (args == NULL || !PyTuple_Check(args) || (n = PyTuple_Size(args)) < 1) { PyErr_SetString(PyExc_TypeError, "struct.pack requires at least one argument"); return NULL; } format = PyTuple_GetItem(args, 0); fmt = PyString_AsString(format); if (!fmt) return NULL; f = whichtable(&fmt); size = calcsize(fmt, f); if (size < 0) return NULL; result = PyString_FromStringAndSize((char *)NULL, size); if (result == NULL) return NULL; s = fmt; i = 1; res = restart = PyString_AsString(result); while ((c = *s++) != '\0') { if (isspace((int)c)) continue; if ('0' <= c && c <= '9') { num = c - '0'; while ('0' <= (c = *s++) && c <= '9') num = num*10 + (c - '0'); if (c == '\0') break; } else num = 1; e = getentry(c, f); if (e == NULL) goto fail; nres = restart + align((int)(res-restart), c, e); /* Fill padd bytes with zeros */ while (res < nres) *res++ = '\0'; if (num == 0 && c != 's') continue; do { if (c == 'x') { /* doesn't consume arguments */ memset(res, '\0', num); res += num; break; } if (i >= n) { PyErr_SetString(StructError, "insufficient arguments to pack"); goto fail; } v = PyTuple_GetItem(args, i++); if (v == NULL) goto fail; if (c == 's') { /* num is string size, not repeat count */ int n; if (!PyString_Check(v)) { PyErr_SetString(StructError, "argument for 's' must be a string"); goto fail; } n = PyString_Size(v); if (n > num) n = num; if (n > 0) memcpy(res, PyString_AsString(v), n); if (n < num) memset(res+n, '\0', num-n); res += num; break; } else if (c == 'p') { /* num is string size + 1, to fit in the count byte */ int n; num--; /* now num is max string size */ if (!PyString_Check(v)) { PyErr_SetString(StructError, "argument for 'p' must be a string"); goto fail; } n = PyString_Size(v); if (n > num) n = num; if (n > 0) memcpy(res+1, PyString_AsString(v), n); if (n < num) /* no real need, just to be nice */ memset(res+1+n, '\0', num-n); if (n > 255) n = 255; *res++ = n; /* store the length byte */ res += num; break; } else { if (e->pack(res, v, e) < 0) goto fail; res += e->size; } } while (--num > 0); } if (i < n) { PyErr_SetString(StructError, "too many arguments for pack format"); goto fail; } return result; fail: Py_DECREF(result); return NULL; } PyDoc_STRVAR(unpack__doc__, "unpack(fmt, string) -> (v1, v2, ...)\n\ Unpack the string, containing packed C structure data, according\n\ to fmt. Requires len(string)==calcsize(fmt).\n\ See struct.__doc__ for more on format strings."); static PyObject * struct_unpack(PyObject *self, PyObject *args) { const formatdef *f, *e; char *str, *start, *fmt, *s; char c; int len, size, num; PyObject *res, *v; if (!PyArg_ParseTuple(args, "ss#:unpack", &fmt, &start, &len)) return NULL; f = whichtable(&fmt); size = calcsize(fmt, f); if (size < 0) return NULL; if (size != len) { PyErr_SetString(StructError, "unpack str size does not match format"); return NULL; } res = PyList_New(0); if (res == NULL) return NULL; str = start; s = fmt; while ((c = *s++) != '\0') { if (isspace((int)c)) continue; if ('0' <= c && c <= '9') { num = c - '0'; while ('0' <= (c = *s++) && c <= '9') num = num*10 + (c - '0'); if (c == '\0') break; } else num = 1; e = getentry(c, f); if (e == NULL) goto fail; str = start + align((int)(str-start), c, e); if (num == 0 && c != 's') continue; do { if (c == 'x') { str += num; break; } if (c == 's') { /* num is string size, not repeat count */ v = PyString_FromStringAndSize(str, num); if (v == NULL) goto fail; str += num; num = 0; } else if (c == 'p') { /* num is string buffer size, not repeat count */ int n = *(unsigned char*)str; /* first byte (unsigned) is string size */ if (n >= num) n = num-1; v = PyString_FromStringAndSize(str+1, n); if (v == NULL) goto fail; str += num; num = 0; } else { v = e->unpack(str, e); if (v == NULL) goto fail; str += e->size; } if (v == NULL || PyList_Append(res, v) < 0) goto fail; Py_DECREF(v); } while (--num > 0); } v = PyList_AsTuple(res); Py_DECREF(res); return v; fail: Py_DECREF(res); return NULL; } /* List of functions */ static PyMethodDef struct_methods[] = { {"calcsize", struct_calcsize, METH_VARARGS, calcsize__doc__}, {"pack", struct_pack, METH_VARARGS, pack__doc__}, {"unpack", struct_unpack, METH_VARARGS, unpack__doc__}, {NULL, NULL} /* sentinel */ }; /* Module initialization */ PyMODINIT_FUNC initstruct(void) { PyObject *m; /* Create the module and add the functions */ m = Py_InitModule4("struct", struct_methods, struct__doc__, (PyObject*)NULL, PYTHON_API_VERSION); /* Add some symbolic constants to the module */ if (StructError == NULL) { StructError = PyErr_NewException("struct.error", NULL, NULL); if (StructError == NULL) return; } Py_INCREF(StructError); PyModule_AddObject(m, "error", StructError); } Python-2.3.7/Modules/cgensupport.h0000644001241000117560000000416107154035731016411 0ustar loewishpifb6#ifndef Py_CGENSUPPORT_H #define Py_CGENSUPPORT_H #ifdef __cplusplus extern "C" { #endif /* Definitions used by cgen output */ /* XXX This file is obsolete. It is *only* used by glmodule.c. */ typedef char *string; #define mknewlongobject(x) PyInt_FromLong(x) #define mknewshortobject(x) PyInt_FromLong((long)x) #define mknewfloatobject(x) PyFloat_FromDouble(x) #define mknewcharobject(ch) Py_BuildValue("c", ch) #define getichararg PyArg_GetChar #define getidoublearray PyArg_GetDoubleArray #define getifloatarg PyArg_GetFloat #define getifloatarray PyArg_GetFloatArray #define getilongarg PyArg_GetLong #define getilongarray PyArg_GetLongArray #define getilongarraysize PyArg_GetLongArraySize #define getiobjectarg PyArg_GetObject #define getishortarg PyArg_GetShort #define getishortarray PyArg_GetShortArray #define getishortarraysize PyArg_GetShortArraySize #define getistringarg PyArg_GetString extern int PyArg_GetObject(PyObject *args, int nargs, int i, PyObject **p_a); extern int PyArg_GetLong(PyObject *args, int nargs, int i, long *p_a); extern int PyArg_GetShort(PyObject *args, int nargs, int i, short *p_a); extern int PyArg_GetFloat(PyObject *args, int nargs, int i, float *p_a); extern int PyArg_GetString(PyObject *args, int nargs, int i, string *p_a); extern int PyArg_GetChar(PyObject *args, int nargs, int i, char *p_a); extern int PyArg_GetLongArray(PyObject *args, int nargs, int i, int n, long *p_a); extern int PyArg_GetShortArray(PyObject *args, int nargs, int i, int n, short *p_a); extern int PyArg_GetDoubleArray(PyObject *args, int nargs, int i, int n, double *p_a); extern int PyArg_GetFloatArray(PyObject *args, int nargs, int i, int n, float *p_a); extern int PyArg_GetLongArraySize(PyObject *args, int nargs, int i, long *p_a); extern int PyArg_GetShortArraySize(PyObject *args, int nargs, int i, short *p_a); extern int PyArg_GetDoubleArraySize(PyObject *args, int nargs, int i, double *p_a); extern int PyArg_GetFloatArraySize(PyObject *args, int nargs, int i, float *p_a); #ifdef __cplusplus } #endif #endif /* !Py_CGENSUPPORT_H */ Python-2.3.7/Modules/cgensupport.c0000644001241000117560000001376207154035731016413 0ustar loewishpifb6 /* Functions used by cgen output */ #include "Python.h" #include "cgensupport.h" /* Functions to extract arguments. These needs to know the total number of arguments supplied, since the argument list is a tuple only of there is more than one argument. */ int PyArg_GetObject(register PyObject *args, int nargs, int i, PyObject **p_arg) { if (nargs != 1) { if (args == NULL || !PyTuple_Check(args) || nargs != PyTuple_Size(args) || i < 0 || i >= nargs) { return PyErr_BadArgument(); } else { args = PyTuple_GetItem(args, i); } } if (args == NULL) { return PyErr_BadArgument(); } *p_arg = args; return 1; } int PyArg_GetLong(register PyObject *args, int nargs, int i, long *p_arg) { if (nargs != 1) { if (args == NULL || !PyTuple_Check(args) || nargs != PyTuple_Size(args) || i < 0 || i >= nargs) { return PyErr_BadArgument(); } args = PyTuple_GetItem(args, i); } if (args == NULL || !PyInt_Check(args)) { return PyErr_BadArgument(); } *p_arg = PyInt_AsLong(args); return 1; } int PyArg_GetShort(register PyObject *args, int nargs, int i, short *p_arg) { long x; if (!PyArg_GetLong(args, nargs, i, &x)) return 0; *p_arg = (short) x; return 1; } static int extractdouble(register PyObject *v, double *p_arg) { if (v == NULL) { /* Fall through to error return at end of function */ } else if (PyFloat_Check(v)) { *p_arg = PyFloat_AS_DOUBLE((PyFloatObject *)v); return 1; } else if (PyInt_Check(v)) { *p_arg = PyInt_AS_LONG((PyIntObject *)v); return 1; } else if (PyLong_Check(v)) { *p_arg = PyLong_AsDouble(v); return 1; } return PyErr_BadArgument(); } static int extractfloat(register PyObject *v, float *p_arg) { if (v == NULL) { /* Fall through to error return at end of function */ } else if (PyFloat_Check(v)) { *p_arg = (float) PyFloat_AS_DOUBLE((PyFloatObject *)v); return 1; } else if (PyInt_Check(v)) { *p_arg = (float) PyInt_AS_LONG((PyIntObject *)v); return 1; } else if (PyLong_Check(v)) { *p_arg = (float) PyLong_AsDouble(v); return 1; } return PyErr_BadArgument(); } int PyArg_GetFloat(register PyObject *args, int nargs, int i, float *p_arg) { PyObject *v; float x; if (!PyArg_GetObject(args, nargs, i, &v)) return 0; if (!extractfloat(v, &x)) return 0; *p_arg = x; return 1; } int PyArg_GetString(PyObject *args, int nargs, int i, string *p_arg) { PyObject *v; if (!PyArg_GetObject(args, nargs, i, &v)) return 0; if (!PyString_Check(v)) { return PyErr_BadArgument(); } *p_arg = PyString_AsString(v); return 1; } int PyArg_GetChar(PyObject *args, int nargs, int i, char *p_arg) { string x; if (!PyArg_GetString(args, nargs, i, &x)) return 0; if (x[0] == '\0' || x[1] != '\0') { /* Not exactly one char */ return PyErr_BadArgument(); } *p_arg = x[0]; return 1; } int PyArg_GetLongArraySize(PyObject *args, int nargs, int i, long *p_arg) { PyObject *v; if (!PyArg_GetObject(args, nargs, i, &v)) return 0; if (PyTuple_Check(v)) { *p_arg = PyTuple_Size(v); return 1; } if (PyList_Check(v)) { *p_arg = PyList_Size(v); return 1; } return PyErr_BadArgument(); } int PyArg_GetShortArraySize(PyObject *args, int nargs, int i, short *p_arg) { long x; if (!PyArg_GetLongArraySize(args, nargs, i, &x)) return 0; *p_arg = (short) x; return 1; } /* XXX The following four are too similar. Should share more code. */ int PyArg_GetLongArray(PyObject *args, int nargs, int i, int n, long *p_arg) { PyObject *v, *w; if (!PyArg_GetObject(args, nargs, i, &v)) return 0; if (PyTuple_Check(v)) { if (PyTuple_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyTuple_GetItem(v, i); if (!PyInt_Check(w)) { return PyErr_BadArgument(); } p_arg[i] = PyInt_AsLong(w); } return 1; } else if (PyList_Check(v)) { if (PyList_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyList_GetItem(v, i); if (!PyInt_Check(w)) { return PyErr_BadArgument(); } p_arg[i] = PyInt_AsLong(w); } return 1; } else { return PyErr_BadArgument(); } } int PyArg_GetShortArray(PyObject *args, int nargs, int i, int n, short *p_arg) { PyObject *v, *w; if (!PyArg_GetObject(args, nargs, i, &v)) return 0; if (PyTuple_Check(v)) { if (PyTuple_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyTuple_GetItem(v, i); if (!PyInt_Check(w)) { return PyErr_BadArgument(); } p_arg[i] = (short) PyInt_AsLong(w); } return 1; } else if (PyList_Check(v)) { if (PyList_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyList_GetItem(v, i); if (!PyInt_Check(w)) { return PyErr_BadArgument(); } p_arg[i] = (short) PyInt_AsLong(w); } return 1; } else { return PyErr_BadArgument(); } } int PyArg_GetDoubleArray(PyObject *args, int nargs, int i, int n, double *p_arg) { PyObject *v, *w; if (!PyArg_GetObject(args, nargs, i, &v)) return 0; if (PyTuple_Check(v)) { if (PyTuple_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyTuple_GetItem(v, i); if (!extractdouble(w, &p_arg[i])) return 0; } return 1; } else if (PyList_Check(v)) { if (PyList_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyList_GetItem(v, i); if (!extractdouble(w, &p_arg[i])) return 0; } return 1; } else { return PyErr_BadArgument(); } } int PyArg_GetFloatArray(PyObject *args, int nargs, int i, int n, float *p_arg) { PyObject *v, *w; if (!PyArg_GetObject(args, nargs, i, &v)) return 0; if (PyTuple_Check(v)) { if (PyTuple_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyTuple_GetItem(v, i); if (!extractfloat(w, &p_arg[i])) return 0; } return 1; } else if (PyList_Check(v)) { if (PyList_Size(v) != n) { return PyErr_BadArgument(); } for (i = 0; i < n; i++) { w = PyList_GetItem(v, i); if (!extractfloat(w, &p_arg[i])) return 0; } return 1; } else { return PyErr_BadArgument(); } } Python-2.3.7/Modules/config.c.in0000644001241000117560000000224707511736246015716 0ustar loewishpifb6/* -*- C -*- *********************************************** Copyright (c) 2000, BeOpen.com. Copyright (c) 1995-2000, Corporation for National Research Initiatives. Copyright (c) 1990-1995, Stichting Mathematisch Centrum. All rights reserved. See the file "Misc/COPYRIGHT" for information on usage and redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. ******************************************************************/ /* Module configuration */ /* !!! !!! !!! This file is edited by the makesetup script !!! !!! !!! */ /* This file contains the table of built-in modules. See init_builtin() in import.c. */ #include "Python.h" /* -- ADDMODULE MARKER 1 -- */ extern void PyMarshal_Init(void); extern void initimp(void); extern void initgc(void); struct _inittab _PyImport_Inittab[] = { /* -- ADDMODULE MARKER 2 -- */ /* This module lives in marshal.c */ {"marshal", PyMarshal_Init}, /* This lives in import.c */ {"imp", initimp}, /* These entries are here for sys.builtin_module_names */ {"__main__", NULL}, {"__builtin__", NULL}, {"sys", NULL}, {"exceptions", NULL}, /* This lives in gcmodule.c */ {"gc", initgc}, /* Sentinel */ {0, 0} }; Python-2.3.7/Modules/grpmodule.c0000644001241000117560000001067310003316063016021 0ustar loewishpifb6 /* UNIX group file access module */ #include "Python.h" #include "structseq.h" #include #include static PyStructSequence_Field struct_group_type_fields[] = { {"gr_name", "group name"}, {"gr_passwd", "password"}, {"gr_gid", "group id"}, {"gr_mem", "group memebers"}, {0} }; PyDoc_STRVAR(struct_group__doc__, "grp.struct_group: Results from getgr*() routines.\n\n\ This object may be accessed either as a tuple of\n\ (gr_name,gr_passwd,gr_gid,gr_mem)\n\ or via the object attributes as named in the above tuple.\n"); static PyStructSequence_Desc struct_group_type_desc = { "grp.struct_group", struct_group__doc__, struct_group_type_fields, 4, }; static PyTypeObject StructGrpType; static PyObject * mkgrent(struct group *p) { int setIndex = 0; PyObject *v = PyStructSequence_New(&StructGrpType), *w; char **member; if (v == NULL) return NULL; if ((w = PyList_New(0)) == NULL) { Py_DECREF(v); return NULL; } for (member = p->gr_mem; *member != NULL; member++) { PyObject *x = PyString_FromString(*member); if (x == NULL || PyList_Append(w, x) != 0) { Py_XDECREF(x); Py_DECREF(w); Py_DECREF(v); return NULL; } Py_DECREF(x); } #define SET(i,val) PyStructSequence_SET_ITEM(v, i, val) SET(setIndex++, PyString_FromString(p->gr_name)); #ifdef __VMS SET(setIndex++, Py_None); Py_INCREF(Py_None); #else if (p->gr_passwd) SET(setIndex++, PyString_FromString(p->gr_passwd)); else { SET(setIndex++, Py_None); Py_INCREF(Py_None); } #endif SET(setIndex++, PyInt_FromLong((long) p->gr_gid)); SET(setIndex++, w); #undef SET if (PyErr_Occurred()) { Py_DECREF(v); Py_DECREF(w); return NULL; } return v; } static PyObject * grp_getgrgid(PyObject *self, PyObject *args) { int gid; struct group *p; if (!PyArg_ParseTuple(args, "i:getgrgid", &gid)) return NULL; if ((p = getgrgid(gid)) == NULL) { PyErr_Format(PyExc_KeyError, "getgrgid(): gid not found: %d", gid); return NULL; } return mkgrent(p); } static PyObject * grp_getgrnam(PyObject *self, PyObject *args) { char *name; struct group *p; if (!PyArg_ParseTuple(args, "s:getgrnam", &name)) return NULL; if ((p = getgrnam(name)) == NULL) { PyErr_Format(PyExc_KeyError, "getgrnam(): name not found: %s", name); return NULL; } return mkgrent(p); } static PyObject * grp_getgrall(PyObject *self, PyObject *args) { PyObject *d; struct group *p; if (!PyArg_ParseTuple(args, ":getgrall")) return NULL; if ((d = PyList_New(0)) == NULL) return NULL; setgrent(); while ((p = getgrent()) != NULL) { PyObject *v = mkgrent(p); if (v == NULL || PyList_Append(d, v) != 0) { Py_XDECREF(v); Py_DECREF(d); return NULL; } Py_DECREF(v); } endgrent(); return d; } static PyMethodDef grp_methods[] = { {"getgrgid", grp_getgrgid, METH_VARARGS, "getgrgid(id) -> tuple\n\ Return the group database entry for the given numeric group ID. If\n\ id is not valid, raise KeyError."}, {"getgrnam", grp_getgrnam, METH_VARARGS, "getgrnam(name) -> tuple\n\ Return the group database entry for the given group name. If\n\ name is not valid, raise KeyError."}, {"getgrall", grp_getgrall, METH_VARARGS, "getgrall() -> list of tuples\n\ Return a list of all available group entries, in arbitrary order."}, {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(grp__doc__, "Access to the Unix group database.\n\ \n\ Group entries are reported as 4-tuples containing the following fields\n\ from the group database, in order:\n\ \n\ name - name of the group\n\ passwd - group password (encrypted); often empty\n\ gid - numeric ID of the group\n\ mem - list of members\n\ \n\ The gid is an integer, name and password are strings. (Note that most\n\ users are not explicitly listed as members of the groups they are in\n\ according to the password database. Check both databases to get\n\ complete membership information.)"); PyMODINIT_FUNC initgrp(void) { PyObject *m, *d; m = Py_InitModule3("grp", grp_methods, grp__doc__); d = PyModule_GetDict(m); PyStructSequence_InitType(&StructGrpType, &struct_group_type_desc); PyDict_SetItemString(d, "struct_group", (PyObject *) &StructGrpType); } Python-2.3.7/Modules/md5.h0000644001241000117560000000374307475157366014551 0ustar loewishpifb6/* MD5.H - header file for MD5C.C */ /* Copyright (C) 1991-2, RSA Data Security, Inc. Created 1991. All rights reserved. License to copy and use this software is granted provided that it is identified as the "RSA Data Security, Inc. MD5 Message-Digest Algorithm" in all material mentioning or referencing this software or this function. License is also granted to make and use derivative works provided that such works are identified as "derived from the RSA Data Security, Inc. MD5 Message-Digest Algorithm" in all material mentioning or referencing the derived work. RSA Data Security, Inc. makes no representations concerning either the merchantability of this software or the suitability of this software for any particular purpose. It is provided "as is" without express or implied warranty of any kind. These notices must be retained in any copies of any part of this documentation and/or software. */ /* ========== include global.h ========== */ /* GLOBAL.H - RSAREF types and constants */ /* POINTER defines a generic pointer type */ typedef unsigned char *POINTER; /* UINT4 defines a four byte word */ #if SIZEOF_LONG == 4 typedef unsigned long int UINT4; #elif SIZEOF_SHORT == 4 typedef unsigned short int UINT4; #elif INT_MAX == 2147483647 typedef unsigned int UINT4; #else #error "Can't find a 4-byte integral type" #endif /* ========== End global.h; continue md5.h ========== */ /* MD5 context. */ typedef struct { UINT4 state[4]; /* state (ABCD) */ UINT4 count[2]; /* number of bits, modulo 2^64 (lsb first) */ unsigned char buffer[64]; /* input buffer */ } MD5_CTX; /* Rename all exported symbols to avoid conflicts with similarly named symbols in some systems' standard C libraries... */ #define MD5Init _Py_MD5Init #define MD5Update _Py_MD5Update #define MD5Final _Py_MD5Final void MD5Init(MD5_CTX *); void MD5Update(MD5_CTX *, unsigned char *, unsigned int); void MD5Final(unsigned char [16], MD5_CTX *); Python-2.3.7/Modules/socketmodule.h0000644001241000117560000001314207654704216016543 0ustar loewishpifb6/* Socket module header file */ /* Includes needed for the sockaddr_* symbols below */ #ifndef MS_WINDOWS #ifdef __VMS # include # else # include # endif # include # if !(defined(__BEOS__) || defined(__CYGWIN__) || (defined(PYOS_OS2) && defined(PYCC_VACPP))) # include # endif #else /* MS_WINDOWS */ #if _MSC_VER >= 1300 # include # include # define HAVE_ADDRINFO # define HAVE_SOCKADDR_STORAGE # define HAVE_GETADDRINFO # define HAVE_GETNAMEINFO # define ENABLE_IPV6 #else # include #endif #endif #ifdef HAVE_SYS_UN_H # include #else # undef AF_UNIX #endif #ifdef HAVE_NETPACKET_PACKET_H # include # include # include #endif #ifndef Py__SOCKET_H #define Py__SOCKET_H #ifdef __cplusplus extern "C" { #endif /* Python module and C API name */ #define PySocket_MODULE_NAME "_socket" #define PySocket_CAPI_NAME "CAPI" /* Abstract the socket file descriptor type */ #ifdef MS_WINDOWS typedef SOCKET SOCKET_T; # ifdef MS_WIN64 # define SIZEOF_SOCKET_T 8 # else # define SIZEOF_SOCKET_T 4 # endif #else typedef int SOCKET_T; # define SIZEOF_SOCKET_T SIZEOF_INT #endif /* The object holding a socket. It holds some extra information, like the address family, which is used to decode socket address arguments properly. */ typedef struct { PyObject_HEAD SOCKET_T sock_fd; /* Socket file descriptor */ int sock_family; /* Address family, e.g., AF_INET */ int sock_type; /* Socket type, e.g., SOCK_STREAM */ int sock_proto; /* Protocol type, usually 0 */ union sock_addr { struct sockaddr_in in; #ifdef AF_UNIX struct sockaddr_un un; #endif #ifdef ENABLE_IPV6 struct sockaddr_in6 in6; struct sockaddr_storage storage; #endif #ifdef HAVE_NETPACKET_PACKET_H struct sockaddr_ll ll; #endif } sock_addr; PyObject *(*errorhandler)(void); /* Error handler; checks errno, returns NULL and sets a Python exception */ double sock_timeout; /* Operation timeout in seconds; 0.0 means non-blocking */ } PySocketSockObject; /* --- C API ----------------------------------------------------*/ /* Short explanation of what this C API export mechanism does and how it works: The _ssl module needs access to the type object defined in the _socket module. Since cross-DLL linking introduces a lot of problems on many platforms, the "trick" is to wrap the C API of a module in a struct which then gets exported to other modules via a PyCObject. The code in socketmodule.c defines this struct (which currently only contains the type object reference, but could very well also include other C APIs needed by other modules) and exports it as PyCObject via the module dictionary under the name "CAPI". Other modules can now include the socketmodule.h file which defines the needed C APIs to import and set up a static copy of this struct in the importing module. After initialization, the importing module can then access the C APIs from the _socket module by simply referring to the static struct, e.g. Load _socket module and its C API; this sets up the global PySocketModule: if (PySocketModule_ImportModuleAndAPI()) return; Now use the C API as if it were defined in the using module: if (!PyArg_ParseTuple(args, "O!|zz:ssl", PySocketModule.Sock_Type, (PyObject*)&Sock, &key_file, &cert_file)) return NULL; Support could easily be extended to export more C APIs/symbols this way. Currently, only the type object is exported, other candidates would be socket constructors and socket access functions. */ /* C API for usage by other Python modules */ typedef struct { PyTypeObject *Sock_Type; } PySocketModule_APIObject; /* XXX The net effect of the following appears to be to define a function XXX named PySocketModule_APIObject in _ssl.c. It's unclear why it isn't XXX defined there directly. >>> It's defined here because other modules might also want to use >>> the C API. */ #ifndef PySocket_BUILDING_SOCKET /* --- C API ----------------------------------------------------*/ /* Interfacestructure to C API for other modules. Call PySocketModule_ImportModuleAndAPI() to initialize this structure. After that usage is simple: if (!PyArg_ParseTuple(args, "O!|zz:ssl", &PySocketModule.Sock_Type, (PyObject*)&Sock, &key_file, &cert_file)) return NULL; ... */ static PySocketModule_APIObject PySocketModule; /* You *must* call this before using any of the functions in PySocketModule and check its outcome; otherwise all accesses will result in a segfault. Returns 0 on success. */ #ifndef DPRINTF # define DPRINTF if (0) printf #endif static int PySocketModule_ImportModuleAndAPI(void) { PyObject *mod = 0, *v = 0; char *apimodule = PySocket_MODULE_NAME; char *apiname = PySocket_CAPI_NAME; void *api; DPRINTF("Importing the %s C API...\n", apimodule); mod = PyImport_ImportModule(apimodule); if (mod == NULL) goto onError; DPRINTF(" %s package found\n", apimodule); v = PyObject_GetAttrString(mod, apiname); if (v == NULL) goto onError; Py_DECREF(mod); DPRINTF(" API object %s found\n", apiname); api = PyCObject_AsVoidPtr(v); if (api == NULL) goto onError; Py_DECREF(v); memcpy(&PySocketModule, api, sizeof(PySocketModule)); DPRINTF(" API object loaded and initialized.\n"); return 0; onError: DPRINTF(" not found.\n"); Py_XDECREF(mod); Py_XDECREF(v); return -1; } #endif /* !PySocket_BUILDING_SOCKET */ #ifdef __cplusplus } #endif #endif /* !Py__SOCKET_H */ Python-2.3.7/Modules/regexpr.c0000644001241000117560000013340107524244437015515 0ustar loewishpifb6/* regexpr.c * * Author: Tatu Ylonen * * Copyright (c) 1991 Tatu Ylonen, Espoo, Finland * * Permission to use, copy, modify, distribute, and sell this software * and its documentation for any purpose is hereby granted without * fee, provided that the above copyright notice appear in all copies. * This software is provided "as is" without express or implied * warranty. * * Created: Thu Sep 26 17:14:05 1991 ylo * Last modified: Mon Nov 4 17:06:48 1991 ylo * Ported to Think C: 19 Jan 1992 guido@cwi.nl * * This code draws many ideas from the regular expression packages by * Henry Spencer of the University of Toronto and Richard Stallman of * the Free Software Foundation. * * Emacs-specific code and syntax table code is almost directly borrowed * from GNU regexp. * * Bugs fixed and lots of reorganization by Jeffrey C. Ollie, April * 1997 Thanks for bug reports and ideas from Andrew Kuchling, Tim * Peters, Guido van Rossum, Ka-Ping Yee, Sjoerd Mullender, and * probably one or two others that I'm forgetting. * * $Id: regexpr.c 28049 2002-08-07 16:21:51Z loewis $ */ #include "Python.h" #include "regexpr.h" /* The original code blithely assumed that sizeof(short) == 2. Not * always true. Original instances of "(short)x" were replaced by * SHORT(x), where SHORT is #defined below. */ #define SHORT(x) ((x) & 0x8000 ? (x) - 0x10000 : (x)) /* The stack implementation is taken from an idea by Andrew Kuchling. * It's a doubly linked list of arrays. The advantages of this over a * simple linked list are that the number of mallocs required are * reduced. It also makes it possible to statically allocate enough * space so that small patterns don't ever need to call malloc. * * The advantages over a single array is that is periodically * realloced when more space is needed is that we avoid ever copying * the stack. */ /* item_t is the basic stack element. Defined as a union of * structures so that both registers, failure points, and counters can * be pushed/popped from the stack. There's nothing built into the * item to keep track of whether a certain stack item is a register, a * failure point, or a counter. */ typedef union item_t { struct { int num; int level; unsigned char *start; unsigned char *end; } reg; struct { int count; int level; int phantom; unsigned char *code; unsigned char *text; } fail; struct { int num; int level; int count; } cntr; } item_t; #define STACK_PAGE_SIZE 256 #define NUM_REGISTERS 256 /* A 'page' of stack items. */ typedef struct item_page_t { item_t items[STACK_PAGE_SIZE]; struct item_page_t *prev; struct item_page_t *next; } item_page_t; typedef struct match_state { /* The number of registers that have been pushed onto the stack * since the last failure point. */ int count; /* Used to control when registers need to be pushed onto the * stack. */ int level; /* The number of failure points on the stack. */ int point; /* Storage for the registers. Each register consists of two * pointers to characters. So register N is represented as * start[N] and end[N]. The pointers must be converted to * offsets from the beginning of the string before returning the * registers to the calling program. */ unsigned char *start[NUM_REGISTERS]; unsigned char *end[NUM_REGISTERS]; /* Keeps track of whether a register has changed recently. */ int changed[NUM_REGISTERS]; /* Structure to encapsulate the stack. */ struct { /* index into the current page. If index == 0 and you need * to pop an item, move to the previous page and set index * = STACK_PAGE_SIZE - 1. Otherwise decrement index to * push a page. If index == STACK_PAGE_SIZE and you need * to push a page move to the next page and set index = * 0. If there is no new next page, allocate a new page * and link it in. Otherwise, increment index to push a * page. */ int index; item_page_t *current; /* Pointer to the current page. */ item_page_t first; /* First page is statically allocated. */ } stack; } match_state; /* Initialize a state object */ /* #define NEW_STATE(state) \ */ /* memset(&state, 0, (void *)(&state.stack) - (void *)(&state)); \ */ /* state.stack.current = &state.stack.first; \ */ /* state.stack.first.prev = NULL; \ */ /* state.stack.first.next = NULL; \ */ /* state.stack.index = 0; \ */ /* state.level = 1 */ #define NEW_STATE(state, nregs) \ { \ int i; \ for (i = 0; i < nregs; i++) \ { \ state.start[i] = NULL; \ state.end[i] = NULL; \ state.changed[i] = 0; \ } \ state.stack.current = &state.stack.first; \ state.stack.first.prev = NULL; \ state.stack.first.next = NULL; \ state.stack.index = 0; \ state.level = 1; \ state.count = 0; \ state.level = 0; \ state.point = 0; \ } /* Free any memory that might have been malloc'd */ #define FREE_STATE(state) \ while(state.stack.first.next != NULL) \ { \ state.stack.current = state.stack.first.next; \ state.stack.first.next = state.stack.current->next; \ free(state.stack.current); \ } /* Discard the top 'count' stack items. */ #define STACK_DISCARD(stack, count, on_error) \ stack.index -= count; \ while (stack.index < 0) \ { \ if (stack.current->prev == NULL) \ on_error; \ stack.current = stack.current->prev; \ stack.index += STACK_PAGE_SIZE; \ } /* Store a pointer to the previous item on the stack. Used to pop an * item off of the stack. */ #define STACK_PREV(stack, top, on_error) \ if (stack.index == 0) \ { \ if (stack.current->prev == NULL) \ on_error; \ stack.current = stack.current->prev; \ stack.index = STACK_PAGE_SIZE - 1; \ } \ else \ { \ stack.index--; \ } \ top = &(stack.current->items[stack.index]) /* Store a pointer to the next item on the stack. Used to push an item * on to the stack. */ #define STACK_NEXT(stack, top, on_error) \ if (stack.index == STACK_PAGE_SIZE) \ { \ if (stack.current->next == NULL) \ { \ stack.current->next = (item_page_t *)malloc(sizeof(item_page_t)); \ if (stack.current->next == NULL) \ on_error; \ stack.current->next->prev = stack.current; \ stack.current->next->next = NULL; \ } \ stack.current = stack.current->next; \ stack.index = 0; \ } \ top = &(stack.current->items[stack.index++]) /* Store a pointer to the item that is 'count' items back in the * stack. STACK_BACK(stack, top, 1, on_error) is equivalent to * STACK_TOP(stack, top, on_error). */ #define STACK_BACK(stack, top, count, on_error) \ { \ int index; \ item_page_t *current; \ current = stack.current; \ index = stack.index - (count); \ while (index < 0) \ { \ if (current->prev == NULL) \ on_error; \ current = current->prev; \ index += STACK_PAGE_SIZE; \ } \ top = &(current->items[index]); \ } /* Store a pointer to the top item on the stack. Execute the * 'on_error' code if there are no items on the stack. */ #define STACK_TOP(stack, top, on_error) \ if (stack.index == 0) \ { \ if (stack.current->prev == NULL) \ on_error; \ top = &(stack.current->prev->items[STACK_PAGE_SIZE - 1]); \ } \ else \ { \ top = &(stack.current->items[stack.index - 1]); \ } /* Test to see if the stack is empty */ #define STACK_EMPTY(stack) ((stack.index == 0) && \ (stack.current->prev == NULL)) /* Return the start of register 'reg' */ #define GET_REG_START(state, reg) (state.start[reg]) /* Return the end of register 'reg' */ #define GET_REG_END(state, reg) (state.end[reg]) /* Set the start of register 'reg'. If the state of the register needs * saving, push it on the stack. */ #define SET_REG_START(state, reg, text, on_error) \ if(state.changed[reg] < state.level) \ { \ item_t *item; \ STACK_NEXT(state.stack, item, on_error); \ item->reg.num = reg; \ item->reg.start = state.start[reg]; \ item->reg.end = state.end[reg]; \ item->reg.level = state.changed[reg]; \ state.changed[reg] = state.level; \ state.count++; \ } \ state.start[reg] = text /* Set the end of register 'reg'. If the state of the register needs * saving, push it on the stack. */ #define SET_REG_END(state, reg, text, on_error) \ if(state.changed[reg] < state.level) \ { \ item_t *item; \ STACK_NEXT(state.stack, item, on_error); \ item->reg.num = reg; \ item->reg.start = state.start[reg]; \ item->reg.end = state.end[reg]; \ item->reg.level = state.changed[reg]; \ state.changed[reg] = state.level; \ state.count++; \ } \ state.end[reg] = text #define PUSH_FAILURE(state, xcode, xtext, on_error) \ { \ item_t *item; \ STACK_NEXT(state.stack, item, on_error); \ item->fail.code = xcode; \ item->fail.text = xtext; \ item->fail.count = state.count; \ item->fail.level = state.level; \ item->fail.phantom = 0; \ state.count = 0; \ state.level++; \ state.point++; \ } /* Update the last failure point with a new position in the text. */ #define UPDATE_FAILURE(state, xtext, on_error) \ { \ item_t *item; \ STACK_BACK(state.stack, item, state.count + 1, on_error); \ if (!item->fail.phantom) \ { \ item_t *item2; \ STACK_NEXT(state.stack, item2, on_error); \ item2->fail.code = item->fail.code; \ item2->fail.text = xtext; \ item2->fail.count = state.count; \ item2->fail.level = state.level; \ item2->fail.phantom = 1; \ state.count = 0; \ state.level++; \ state.point++; \ } \ else \ { \ STACK_DISCARD(state.stack, state.count, on_error); \ STACK_TOP(state.stack, item, on_error); \ item->fail.text = xtext; \ state.count = 0; \ state.level++; \ } \ } #define POP_FAILURE(state, xcode, xtext, on_empty, on_error) \ { \ item_t *item; \ do \ { \ while(state.count > 0) \ { \ STACK_PREV(state.stack, item, on_error); \ state.start[item->reg.num] = item->reg.start; \ state.end[item->reg.num] = item->reg.end; \ state.changed[item->reg.num] = item->reg.level; \ state.count--; \ } \ STACK_PREV(state.stack, item, on_empty); \ xcode = item->fail.code; \ xtext = item->fail.text; \ state.count = item->fail.count; \ state.level = item->fail.level; \ state.point--; \ } \ while (item->fail.text == NULL); \ } enum regexp_compiled_ops /* opcodes for compiled regexp */ { Cend, /* end of pattern reached */ Cbol, /* beginning of line */ Ceol, /* end of line */ Cset, /* character set. Followed by 32 bytes of set. */ Cexact, /* followed by a byte to match */ Canychar, /* matches any character except newline */ Cstart_memory, /* set register start addr (followed by reg number) */ Cend_memory, /* set register end addr (followed by reg number) */ Cmatch_memory, /* match a duplicate of reg contents (regnum follows)*/ Cjump, /* followed by two bytes (lsb,msb) of displacement. */ Cstar_jump, /* will change to jump/update_failure_jump at runtime */ Cfailure_jump, /* jump to addr on failure */ Cupdate_failure_jump, /* update topmost failure point and jump */ Cdummy_failure_jump, /* push a dummy failure point and jump */ Cbegbuf, /* match at beginning of buffer */ Cendbuf, /* match at end of buffer */ Cwordbeg, /* match at beginning of word */ Cwordend, /* match at end of word */ Cwordbound, /* match if at word boundary */ Cnotwordbound, /* match if not at word boundary */ Csyntaxspec, /* matches syntax code (1 byte follows) */ Cnotsyntaxspec, /* matches if syntax code does not match (1 byte follows) */ Crepeat1 }; enum regexp_syntax_op /* syntax codes for plain and quoted characters */ { Rend, /* special code for end of regexp */ Rnormal, /* normal character */ Ranychar, /* any character except newline */ Rquote, /* the quote character */ Rbol, /* match beginning of line */ Reol, /* match end of line */ Roptional, /* match preceding expression optionally */ Rstar, /* match preceding expr zero or more times */ Rplus, /* match preceding expr one or more times */ Ror, /* match either of alternatives */ Ropenpar, /* opening parenthesis */ Rclosepar, /* closing parenthesis */ Rmemory, /* match memory register */ Rextended_memory, /* \vnn to match registers 10-99 */ Ropenset, /* open set. Internal syntax hard-coded below. */ /* the following are gnu extensions to "normal" regexp syntax */ Rbegbuf, /* beginning of buffer */ Rendbuf, /* end of buffer */ Rwordchar, /* word character */ Rnotwordchar, /* not word character */ Rwordbeg, /* beginning of word */ Rwordend, /* end of word */ Rwordbound, /* word bound */ Rnotwordbound, /* not word bound */ Rnum_ops }; static int re_compile_initialized = 0; static int regexp_syntax = 0; int re_syntax = 0; /* Exported copy of regexp_syntax */ static unsigned char regexp_plain_ops[256]; static unsigned char regexp_quoted_ops[256]; static unsigned char regexp_precedences[Rnum_ops]; static int regexp_context_indep_ops; static int regexp_ansi_sequences; #define NUM_LEVELS 5 /* number of precedence levels in use */ #define MAX_NESTING 100 /* max nesting level of operators */ #define SYNTAX(ch) re_syntax_table[(unsigned char)(ch)] unsigned char re_syntax_table[256]; void re_compile_initialize(void) { int a; static int syntax_table_inited = 0; if (!syntax_table_inited) { syntax_table_inited = 1; memset(re_syntax_table, 0, 256); for (a = 'a'; a <= 'z'; a++) re_syntax_table[a] = Sword; for (a = 'A'; a <= 'Z'; a++) re_syntax_table[a] = Sword; for (a = '0'; a <= '9'; a++) re_syntax_table[a] = Sword | Sdigit | Shexdigit; for (a = '0'; a <= '7'; a++) re_syntax_table[a] |= Soctaldigit; for (a = 'A'; a <= 'F'; a++) re_syntax_table[a] |= Shexdigit; for (a = 'a'; a <= 'f'; a++) re_syntax_table[a] |= Shexdigit; re_syntax_table['_'] = Sword; for (a = 9; a <= 13; a++) re_syntax_table[a] = Swhitespace; re_syntax_table[' '] = Swhitespace; } re_compile_initialized = 1; for (a = 0; a < 256; a++) { regexp_plain_ops[a] = Rnormal; regexp_quoted_ops[a] = Rnormal; } for (a = '0'; a <= '9'; a++) regexp_quoted_ops[a] = Rmemory; regexp_plain_ops['\134'] = Rquote; if (regexp_syntax & RE_NO_BK_PARENS) { regexp_plain_ops['('] = Ropenpar; regexp_plain_ops[')'] = Rclosepar; } else { regexp_quoted_ops['('] = Ropenpar; regexp_quoted_ops[')'] = Rclosepar; } if (regexp_syntax & RE_NO_BK_VBAR) regexp_plain_ops['\174'] = Ror; else regexp_quoted_ops['\174'] = Ror; regexp_plain_ops['*'] = Rstar; if (regexp_syntax & RE_BK_PLUS_QM) { regexp_quoted_ops['+'] = Rplus; regexp_quoted_ops['?'] = Roptional; } else { regexp_plain_ops['+'] = Rplus; regexp_plain_ops['?'] = Roptional; } if (regexp_syntax & RE_NEWLINE_OR) regexp_plain_ops['\n'] = Ror; regexp_plain_ops['\133'] = Ropenset; regexp_plain_ops['\136'] = Rbol; regexp_plain_ops['$'] = Reol; regexp_plain_ops['.'] = Ranychar; if (!(regexp_syntax & RE_NO_GNU_EXTENSIONS)) { regexp_quoted_ops['w'] = Rwordchar; regexp_quoted_ops['W'] = Rnotwordchar; regexp_quoted_ops['<'] = Rwordbeg; regexp_quoted_ops['>'] = Rwordend; regexp_quoted_ops['b'] = Rwordbound; regexp_quoted_ops['B'] = Rnotwordbound; regexp_quoted_ops['`'] = Rbegbuf; regexp_quoted_ops['\''] = Rendbuf; } if (regexp_syntax & RE_ANSI_HEX) regexp_quoted_ops['v'] = Rextended_memory; for (a = 0; a < Rnum_ops; a++) regexp_precedences[a] = 4; if (regexp_syntax & RE_TIGHT_VBAR) { regexp_precedences[Ror] = 3; regexp_precedences[Rbol] = 2; regexp_precedences[Reol] = 2; } else { regexp_precedences[Ror] = 2; regexp_precedences[Rbol] = 3; regexp_precedences[Reol] = 3; } regexp_precedences[Rclosepar] = 1; regexp_precedences[Rend] = 0; regexp_context_indep_ops = (regexp_syntax & RE_CONTEXT_INDEP_OPS) != 0; regexp_ansi_sequences = (regexp_syntax & RE_ANSI_HEX) != 0; } int re_set_syntax(int syntax) { int ret; ret = regexp_syntax; regexp_syntax = syntax; re_syntax = syntax; /* Exported copy */ re_compile_initialize(); return ret; } static int hex_char_to_decimal(int ch) { if (ch >= '0' && ch <= '9') return ch - '0'; if (ch >= 'a' && ch <= 'f') return ch - 'a' + 10; if (ch >= 'A' && ch <= 'F') return ch - 'A' + 10; return 16; } static void re_compile_fastmap_aux(unsigned char *code, int pos, unsigned char *visited, unsigned char *can_be_null, unsigned char *fastmap) { int a; int b; int syntaxcode; if (visited[pos]) return; /* we have already been here */ visited[pos] = 1; for (;;) switch (code[pos++]) { case Cend: { *can_be_null = 1; return; } case Cbol: case Cbegbuf: case Cendbuf: case Cwordbeg: case Cwordend: case Cwordbound: case Cnotwordbound: { for (a = 0; a < 256; a++) fastmap[a] = 1; break; } case Csyntaxspec: { syntaxcode = code[pos++]; for (a = 0; a < 256; a++) if (SYNTAX(a) & syntaxcode) fastmap[a] = 1; return; } case Cnotsyntaxspec: { syntaxcode = code[pos++]; for (a = 0; a < 256; a++) if (!(SYNTAX(a) & syntaxcode) ) fastmap[a] = 1; return; } case Ceol: { fastmap['\n'] = 1; if (*can_be_null == 0) *can_be_null = 2; /* can match null, but only at end of buffer*/ return; } case Cset: { for (a = 0; a < 256/8; a++) if (code[pos + a] != 0) for (b = 0; b < 8; b++) if (code[pos + a] & (1 << b)) fastmap[(a << 3) + b] = 1; pos += 256/8; return; } case Cexact: { fastmap[(unsigned char)code[pos]] = 1; return; } case Canychar: { for (a = 0; a < 256; a++) if (a != '\n') fastmap[a] = 1; return; } case Cstart_memory: case Cend_memory: { pos++; break; } case Cmatch_memory: { for (a = 0; a < 256; a++) fastmap[a] = 1; *can_be_null = 1; return; } case Cjump: case Cdummy_failure_jump: case Cupdate_failure_jump: case Cstar_jump: { a = (unsigned char)code[pos++]; a |= (unsigned char)code[pos++] << 8; pos += (int)SHORT(a); if (visited[pos]) { /* argh... the regexp contains empty loops. This is not good, as this may cause a failure stack overflow when matching. Oh well. */ /* this path leads nowhere; pursue other paths. */ return; } visited[pos] = 1; break; } case Cfailure_jump: { a = (unsigned char)code[pos++]; a |= (unsigned char)code[pos++] << 8; a = pos + (int)SHORT(a); re_compile_fastmap_aux(code, a, visited, can_be_null, fastmap); break; } case Crepeat1: { pos += 2; break; } default: { PyErr_SetString(PyExc_SystemError, "Unknown regex opcode: memory corrupted?"); return; /*NOTREACHED*/ } } } static int re_do_compile_fastmap(unsigned char *buffer, int used, int pos, unsigned char *can_be_null, unsigned char *fastmap) { unsigned char small_visited[512], *visited; if (used <= sizeof(small_visited)) visited = small_visited; else { visited = malloc(used); if (!visited) return 0; } *can_be_null = 0; memset(fastmap, 0, 256); memset(visited, 0, used); re_compile_fastmap_aux(buffer, pos, visited, can_be_null, fastmap); if (visited != small_visited) free(visited); return 1; } void re_compile_fastmap(regexp_t bufp) { if (!bufp->fastmap || bufp->fastmap_accurate) return; assert(bufp->used > 0); if (!re_do_compile_fastmap(bufp->buffer, bufp->used, 0, &bufp->can_be_null, bufp->fastmap)) return; if (PyErr_Occurred()) return; if (bufp->buffer[0] == Cbol) bufp->anchor = 1; /* begline */ else if (bufp->buffer[0] == Cbegbuf) bufp->anchor = 2; /* begbuf */ else bufp->anchor = 0; /* none */ bufp->fastmap_accurate = 1; } /* * star is coded as: * 1: failure_jump 2 * ... code for operand of star * star_jump 1 * 2: ... code after star * * We change the star_jump to update_failure_jump if we can determine * that it is safe to do so; otherwise we change it to an ordinary * jump. * * plus is coded as * * jump 2 * 1: failure_jump 3 * 2: ... code for operand of plus * star_jump 1 * 3: ... code after plus * * For star_jump considerations this is processed identically to star. * */ static int re_optimize_star_jump(regexp_t bufp, unsigned char *code) { unsigned char map[256]; unsigned char can_be_null; unsigned char *p1; unsigned char *p2; unsigned char ch; int a; int b; int num_instructions = 0; a = (unsigned char)*code++; a |= (unsigned char)*code++ << 8; a = (int)SHORT(a); p1 = code + a + 3; /* skip the failure_jump */ /* Check that the jump is within the pattern */ if (p1buffer || bufp->buffer+bufp->usedbuffer, bufp->used, (int)(p2 - bufp->buffer), &can_be_null, map)) goto make_normal_jump; /* If we might introduce a new update point inside the * loop, we can't optimize because then update_jump would * update a wrong failure point. Thus we have to be * quite careful here. */ /* loop until we find something that consumes a character */ loop_p1: num_instructions++; switch (*p1++) { case Cbol: case Ceol: case Cbegbuf: case Cendbuf: case Cwordbeg: case Cwordend: case Cwordbound: case Cnotwordbound: { goto loop_p1; } case Cstart_memory: case Cend_memory: { p1++; goto loop_p1; } case Cexact: { ch = (unsigned char)*p1++; if (map[(int)ch]) goto make_normal_jump; break; } case Canychar: { for (b = 0; b < 256; b++) if (b != '\n' && map[b]) goto make_normal_jump; break; } case Cset: { for (b = 0; b < 256; b++) if ((p1[b >> 3] & (1 << (b & 7))) && map[b]) goto make_normal_jump; p1 += 256/8; break; } default: { goto make_normal_jump; } } /* now we know that we can't backtrack. */ while (p1 != p2 - 3) { num_instructions++; switch (*p1++) { case Cend: { return 0; } case Cbol: case Ceol: case Canychar: case Cbegbuf: case Cendbuf: case Cwordbeg: case Cwordend: case Cwordbound: case Cnotwordbound: { break; } case Cset: { p1 += 256/8; break; } case Cexact: case Cstart_memory: case Cend_memory: case Cmatch_memory: case Csyntaxspec: case Cnotsyntaxspec: { p1++; break; } case Cjump: case Cstar_jump: case Cfailure_jump: case Cupdate_failure_jump: case Cdummy_failure_jump: { goto make_normal_jump; } default: { return 0; } } } /* make_update_jump: */ code -= 3; a += 3; /* jump to after the Cfailure_jump */ code[0] = Cupdate_failure_jump; code[1] = a & 0xff; code[2] = a >> 8; if (num_instructions > 1) return 1; assert(num_instructions == 1); /* if the only instruction matches a single character, we can do * better */ p1 = code + 3 + a; /* start of sole instruction */ if (*p1 == Cset || *p1 == Cexact || *p1 == Canychar || *p1 == Csyntaxspec || *p1 == Cnotsyntaxspec) code[0] = Crepeat1; return 1; make_normal_jump: code -= 3; *code = Cjump; return 1; } static int re_optimize(regexp_t bufp) { unsigned char *code; code = bufp->buffer; while(1) { switch (*code++) { case Cend: { return 1; } case Canychar: case Cbol: case Ceol: case Cbegbuf: case Cendbuf: case Cwordbeg: case Cwordend: case Cwordbound: case Cnotwordbound: { break; } case Cset: { code += 256/8; break; } case Cexact: case Cstart_memory: case Cend_memory: case Cmatch_memory: case Csyntaxspec: case Cnotsyntaxspec: { code++; break; } case Cstar_jump: { if (!re_optimize_star_jump(bufp, code)) { return 0; } /* fall through */ } case Cupdate_failure_jump: case Cjump: case Cdummy_failure_jump: case Cfailure_jump: case Crepeat1: { code += 2; break; } default: { return 0; } } } } #define NEXTCHAR(var) \ { \ if (pos >= size) \ goto ends_prematurely; \ (var) = regex[pos]; \ pos++; \ } #define ALLOC(amount) \ { \ if (pattern_offset+(amount) > alloc) \ { \ alloc += 256 + (amount); \ pattern = realloc(pattern, alloc); \ if (!pattern) \ goto out_of_memory; \ } \ } #define STORE(ch) pattern[pattern_offset++] = (ch) #define CURRENT_LEVEL_START (starts[starts_base + current_level]) #define SET_LEVEL_START starts[starts_base + current_level] = pattern_offset #define PUSH_LEVEL_STARTS \ if (starts_base < (MAX_NESTING-1)*NUM_LEVELS) \ starts_base += NUM_LEVELS; \ else \ goto too_complex \ #define POP_LEVEL_STARTS starts_base -= NUM_LEVELS #define PUT_ADDR(offset,addr) \ { \ int disp = (addr) - (offset) - 2; \ pattern[(offset)] = disp & 0xff; \ pattern[(offset)+1] = (disp>>8) & 0xff; \ } #define INSERT_JUMP(pos,type,addr) \ { \ int a, p = (pos), t = (type), ad = (addr); \ for (a = pattern_offset - 1; a >= p; a--) \ pattern[a + 3] = pattern[a]; \ pattern[p] = t; \ PUT_ADDR(p+1,ad); \ pattern_offset += 3; \ } #define SETBIT(buf,offset,bit) (buf)[(offset)+(bit)/8] |= (1<<((bit) & 7)) #define SET_FIELDS \ { \ bufp->allocated = alloc; \ bufp->buffer = pattern; \ bufp->used = pattern_offset; \ } #define GETHEX(var) \ { \ unsigned char gethex_ch, gethex_value; \ NEXTCHAR(gethex_ch); \ gethex_value = hex_char_to_decimal(gethex_ch); \ if (gethex_value == 16) \ goto hex_error; \ NEXTCHAR(gethex_ch); \ gethex_ch = hex_char_to_decimal(gethex_ch); \ if (gethex_ch == 16) \ goto hex_error; \ (var) = gethex_value * 16 + gethex_ch; \ } #define ANSI_TRANSLATE(ch) \ { \ switch (ch) \ { \ case 'a': \ case 'A': \ { \ ch = 7; /* audible bell */ \ break; \ } \ case 'b': \ case 'B': \ { \ ch = 8; /* backspace */ \ break; \ } \ case 'f': \ case 'F': \ { \ ch = 12; /* form feed */ \ break; \ } \ case 'n': \ case 'N': \ { \ ch = 10; /* line feed */ \ break; \ } \ case 'r': \ case 'R': \ { \ ch = 13; /* carriage return */ \ break; \ } \ case 't': \ case 'T': \ { \ ch = 9; /* tab */ \ break; \ } \ case 'v': \ case 'V': \ { \ ch = 11; /* vertical tab */ \ break; \ } \ case 'x': /* hex code */ \ case 'X': \ { \ GETHEX(ch); \ break; \ } \ default: \ { \ /* other characters passed through */ \ if (translate) \ ch = translate[(unsigned char)ch]; \ break; \ } \ } \ } char *re_compile_pattern(unsigned char *regex, int size, regexp_t bufp) { int a; int pos; int op; int current_level; int level; int opcode; int pattern_offset = 0, alloc; int starts[NUM_LEVELS * MAX_NESTING]; int starts_base; int future_jumps[MAX_NESTING]; int num_jumps; unsigned char ch = '\0'; unsigned char *pattern; unsigned char *translate; int next_register; int paren_depth; int num_open_registers; int open_registers[RE_NREGS]; int beginning_context; if (!re_compile_initialized) re_compile_initialize(); bufp->used = 0; bufp->fastmap_accurate = 0; bufp->uses_registers = 1; bufp->num_registers = 1; translate = bufp->translate; pattern = bufp->buffer; alloc = bufp->allocated; if (alloc == 0 || pattern == NULL) { alloc = 256; pattern = malloc(alloc); if (!pattern) goto out_of_memory; } pattern_offset = 0; starts_base = 0; num_jumps = 0; current_level = 0; SET_LEVEL_START; num_open_registers = 0; next_register = 1; paren_depth = 0; beginning_context = 1; op = -1; /* we use Rend dummy to ensure that pending jumps are updated (due to low priority of Rend) before exiting the loop. */ pos = 0; while (op != Rend) { if (pos >= size) op = Rend; else { NEXTCHAR(ch); if (translate) ch = translate[(unsigned char)ch]; op = regexp_plain_ops[(unsigned char)ch]; if (op == Rquote) { NEXTCHAR(ch); op = regexp_quoted_ops[(unsigned char)ch]; if (op == Rnormal && regexp_ansi_sequences) ANSI_TRANSLATE(ch); } } level = regexp_precedences[op]; /* printf("ch='%c' op=%d level=%d current_level=%d curlevstart=%d\n", ch, op, level, current_level, CURRENT_LEVEL_START); */ if (level > current_level) { for (current_level++; current_level < level; current_level++) SET_LEVEL_START; SET_LEVEL_START; } else if (level < current_level) { current_level = level; for (;num_jumps > 0 && future_jumps[num_jumps-1] >= CURRENT_LEVEL_START; num_jumps--) PUT_ADDR(future_jumps[num_jumps-1], pattern_offset); } switch (op) { case Rend: { break; } case Rnormal: { normal_char: opcode = Cexact; store_opcode_and_arg: /* opcode & ch must be set */ SET_LEVEL_START; ALLOC(2); STORE(opcode); STORE(ch); break; } case Ranychar: { opcode = Canychar; store_opcode: SET_LEVEL_START; ALLOC(1); STORE(opcode); break; } case Rquote: { Py_FatalError("Rquote"); /*NOTREACHED*/ } case Rbol: { if (!beginning_context) { if (regexp_context_indep_ops) goto op_error; else goto normal_char; } opcode = Cbol; goto store_opcode; } case Reol: { if (!((pos >= size) || ((regexp_syntax & RE_NO_BK_VBAR) ? (regex[pos] == '\174') : (pos+1 < size && regex[pos] == '\134' && regex[pos+1] == '\174')) || ((regexp_syntax & RE_NO_BK_PARENS)? (regex[pos] == ')'): (pos+1 < size && regex[pos] == '\134' && regex[pos+1] == ')')))) { if (regexp_context_indep_ops) goto op_error; else goto normal_char; } opcode = Ceol; goto store_opcode; /* NOTREACHED */ break; } case Roptional: { if (beginning_context) { if (regexp_context_indep_ops) goto op_error; else goto normal_char; } if (CURRENT_LEVEL_START == pattern_offset) break; /* ignore empty patterns for ? */ ALLOC(3); INSERT_JUMP(CURRENT_LEVEL_START, Cfailure_jump, pattern_offset + 3); break; } case Rstar: case Rplus: { if (beginning_context) { if (regexp_context_indep_ops) goto op_error; else goto normal_char; } if (CURRENT_LEVEL_START == pattern_offset) break; /* ignore empty patterns for + and * */ ALLOC(9); INSERT_JUMP(CURRENT_LEVEL_START, Cfailure_jump, pattern_offset + 6); INSERT_JUMP(pattern_offset, Cstar_jump, CURRENT_LEVEL_START); if (op == Rplus) /* jump over initial failure_jump */ INSERT_JUMP(CURRENT_LEVEL_START, Cdummy_failure_jump, CURRENT_LEVEL_START + 6); break; } case Ror: { ALLOC(6); INSERT_JUMP(CURRENT_LEVEL_START, Cfailure_jump, pattern_offset + 6); if (num_jumps >= MAX_NESTING) goto too_complex; STORE(Cjump); future_jumps[num_jumps++] = pattern_offset; STORE(0); STORE(0); SET_LEVEL_START; break; } case Ropenpar: { SET_LEVEL_START; if (next_register < RE_NREGS) { bufp->uses_registers = 1; ALLOC(2); STORE(Cstart_memory); STORE(next_register); open_registers[num_open_registers++] = next_register; bufp->num_registers++; next_register++; } paren_depth++; PUSH_LEVEL_STARTS; current_level = 0; SET_LEVEL_START; break; } case Rclosepar: { if (paren_depth <= 0) goto parenthesis_error; POP_LEVEL_STARTS; current_level = regexp_precedences[Ropenpar]; paren_depth--; if (paren_depth < num_open_registers) { bufp->uses_registers = 1; ALLOC(2); STORE(Cend_memory); num_open_registers--; STORE(open_registers[num_open_registers]); } break; } case Rmemory: { if (ch == '0') goto bad_match_register; assert(ch >= '0' && ch <= '9'); bufp->uses_registers = 1; opcode = Cmatch_memory; ch -= '0'; goto store_opcode_and_arg; } case Rextended_memory: { NEXTCHAR(ch); if (ch < '0' || ch > '9') goto bad_match_register; NEXTCHAR(a); if (a < '0' || a > '9') goto bad_match_register; ch = 10 * (a - '0') + ch - '0'; if (ch == 0 || ch >= RE_NREGS) goto bad_match_register; bufp->uses_registers = 1; opcode = Cmatch_memory; goto store_opcode_and_arg; } case Ropenset: { int complement; int prev; int offset; int range; int firstchar; SET_LEVEL_START; ALLOC(1+256/8); STORE(Cset); offset = pattern_offset; for (a = 0; a < 256/8; a++) STORE(0); NEXTCHAR(ch); if (translate) ch = translate[(unsigned char)ch]; if (ch == '\136') { complement = 1; NEXTCHAR(ch); if (translate) ch = translate[(unsigned char)ch]; } else complement = 0; prev = -1; range = 0; firstchar = 1; while (ch != '\135' || firstchar) { firstchar = 0; if (regexp_ansi_sequences && ch == '\134') { NEXTCHAR(ch); ANSI_TRANSLATE(ch); } if (range) { for (a = prev; a <= (int)ch; a++) SETBIT(pattern, offset, a); prev = -1; range = 0; } else if (prev != -1 && ch == '-') range = 1; else { SETBIT(pattern, offset, ch); prev = ch; } NEXTCHAR(ch); if (translate) ch = translate[(unsigned char)ch]; } if (range) SETBIT(pattern, offset, '-'); if (complement) { for (a = 0; a < 256/8; a++) pattern[offset+a] ^= 0xff; } break; } case Rbegbuf: { opcode = Cbegbuf; goto store_opcode; } case Rendbuf: { opcode = Cendbuf; goto store_opcode; } case Rwordchar: { opcode = Csyntaxspec; ch = Sword; goto store_opcode_and_arg; } case Rnotwordchar: { opcode = Cnotsyntaxspec; ch = Sword; goto store_opcode_and_arg; } case Rwordbeg: { opcode = Cwordbeg; goto store_opcode; } case Rwordend: { opcode = Cwordend; goto store_opcode; } case Rwordbound: { opcode = Cwordbound; goto store_opcode; } case Rnotwordbound: { opcode = Cnotwordbound; goto store_opcode; } default: { abort(); } } beginning_context = (op == Ropenpar || op == Ror); } if (starts_base != 0) goto parenthesis_error; assert(num_jumps == 0); ALLOC(1); STORE(Cend); SET_FIELDS; if(!re_optimize(bufp)) return "Optimization error"; return NULL; op_error: SET_FIELDS; return "Badly placed special character"; bad_match_register: SET_FIELDS; return "Bad match register number"; hex_error: SET_FIELDS; return "Bad hexadecimal number"; parenthesis_error: SET_FIELDS; return "Badly placed parenthesis"; out_of_memory: SET_FIELDS; return "Out of memory"; ends_prematurely: SET_FIELDS; return "Regular expression ends prematurely"; too_complex: SET_FIELDS; return "Regular expression too complex"; } #undef CHARAT #undef NEXTCHAR #undef GETHEX #undef ALLOC #undef STORE #undef CURRENT_LEVEL_START #undef SET_LEVEL_START #undef PUSH_LEVEL_STARTS #undef POP_LEVEL_STARTS #undef PUT_ADDR #undef INSERT_JUMP #undef SETBIT #undef SET_FIELDS #define PREFETCH if (text == textend) goto fail #define NEXTCHAR(var) \ PREFETCH; \ var = (unsigned char)*text++; \ if (translate) \ var = translate[var] int re_match(regexp_t bufp, unsigned char *string, int size, int pos, regexp_registers_t old_regs) { unsigned char *code; unsigned char *translate; unsigned char *text; unsigned char *textstart; unsigned char *textend; int a; int b; int ch; int reg; int match_end; unsigned char *regstart; unsigned char *regend; int regsize; match_state state; assert(pos >= 0 && size >= 0); assert(pos <= size); text = string + pos; textstart = string; textend = string + size; code = bufp->buffer; translate = bufp->translate; NEW_STATE(state, bufp->num_registers); continue_matching: switch (*code++) { case Cend: { match_end = text - textstart; if (old_regs) { old_regs->start[0] = pos; old_regs->end[0] = match_end; if (!bufp->uses_registers) { for (a = 1; a < RE_NREGS; a++) { old_regs->start[a] = -1; old_regs->end[a] = -1; } } else { for (a = 1; a < bufp->num_registers; a++) { if ((GET_REG_START(state, a) == NULL) || (GET_REG_END(state, a) == NULL)) { old_regs->start[a] = -1; old_regs->end[a] = -1; continue; } old_regs->start[a] = GET_REG_START(state, a) - textstart; old_regs->end[a] = GET_REG_END(state, a) - textstart; } for (; a < RE_NREGS; a++) { old_regs->start[a] = -1; old_regs->end[a] = -1; } } } FREE_STATE(state); return match_end - pos; } case Cbol: { if (text == textstart || text[-1] == '\n') goto continue_matching; goto fail; } case Ceol: { if (text == textend || *text == '\n') goto continue_matching; goto fail; } case Cset: { NEXTCHAR(ch); if (code[ch/8] & (1<<(ch & 7))) { code += 256/8; goto continue_matching; } goto fail; } case Cexact: { NEXTCHAR(ch); if (ch != (unsigned char)*code++) goto fail; goto continue_matching; } case Canychar: { NEXTCHAR(ch); if (ch == '\n') goto fail; goto continue_matching; } case Cstart_memory: { reg = *code++; SET_REG_START(state, reg, text, goto error); goto continue_matching; } case Cend_memory: { reg = *code++; SET_REG_END(state, reg, text, goto error); goto continue_matching; } case Cmatch_memory: { reg = *code++; regstart = GET_REG_START(state, reg); regend = GET_REG_END(state, reg); if ((regstart == NULL) || (regend == NULL)) goto fail; /* or should we just match nothing? */ regsize = regend - regstart; if (regsize > (textend - text)) goto fail; if(translate) { for (; regstart < regend; regstart++, text++) if (translate[*regstart] != translate[*text]) goto fail; } else for (; regstart < regend; regstart++, text++) if (*regstart != *text) goto fail; goto continue_matching; } case Cupdate_failure_jump: { UPDATE_FAILURE(state, text, goto error); /* fall to next case */ } /* treat Cstar_jump just like Cjump if it hasn't been optimized */ case Cstar_jump: case Cjump: { a = (unsigned char)*code++; a |= (unsigned char)*code++ << 8; code += (int)SHORT(a); if (codebuffer || bufp->buffer+bufp->usedbuffer || bufp->buffer+bufp->used < failuredest) { PyErr_SetString(PyExc_SystemError, "Regex VM jump out of bounds (Cdummy_failure_jump failuredest)"); FREE_STATE(state); return -2; } PUSH_FAILURE(state, failuredest, NULL, goto error); code += a; if (codebuffer || bufp->buffer+bufp->used < code) { PyErr_SetString(PyExc_SystemError, "Regex VM jump out of bounds (Cdummy_failure_jump code)"); FREE_STATE(state); return -2; } goto continue_matching; } case Cfailure_jump: { a = (unsigned char)*code++; a |= (unsigned char)*code++ << 8; a = (int)SHORT(a); if (code+abuffer || bufp->buffer+bufp->used < code+a) { PyErr_SetString(PyExc_SystemError, "Regex VM jump out of bounds (Cfailure_jump)"); FREE_STATE(state); return -2; } PUSH_FAILURE(state, code + a, text, goto error); goto continue_matching; } case Crepeat1: { unsigned char *pinst; a = (unsigned char)*code++; a |= (unsigned char)*code++ << 8; a = (int)SHORT(a); pinst = code + a; if (pinstbuffer || bufp->buffer+bufp->used */ } case Cbegbuf: { if (text == textstart) goto continue_matching; goto fail; } case Cendbuf: { if (text == textend) goto continue_matching; goto fail; } case Cwordbeg: { if (text == textend) goto fail; if (!(SYNTAX(*text) & Sword)) goto fail; if (text == textstart) goto continue_matching; if (!(SYNTAX(text[-1]) & Sword)) goto continue_matching; goto fail; } case Cwordend: { if (text == textstart) goto fail; if (!(SYNTAX(text[-1]) & Sword)) goto fail; if (text == textend) goto continue_matching; if (!(SYNTAX(*text) & Sword)) goto continue_matching; goto fail; } case Cwordbound: { /* Note: as in gnu regexp, this also matches at the * beginning and end of buffer. */ if (text == textstart || text == textend) goto continue_matching; if ((SYNTAX(text[-1]) & Sword) ^ (SYNTAX(*text) & Sword)) goto continue_matching; goto fail; } case Cnotwordbound: { /* Note: as in gnu regexp, this never matches at the * beginning and end of buffer. */ if (text == textstart || text == textend) goto fail; if (!((SYNTAX(text[-1]) & Sword) ^ (SYNTAX(*text) & Sword))) goto continue_matching; goto fail; } case Csyntaxspec: { NEXTCHAR(ch); if (!(SYNTAX(ch) & (unsigned char)*code++)) goto fail; goto continue_matching; } case Cnotsyntaxspec: { NEXTCHAR(ch); if (SYNTAX(ch) & (unsigned char)*code++) goto fail; goto continue_matching; } default: { FREE_STATE(state); PyErr_SetString(PyExc_SystemError, "Unknown regex opcode: memory corrupted?"); return -2; /*NOTREACHED*/ } } #if 0 /* This line is never reached --Guido */ abort(); #endif /* *NOTREACHED */ /* Using "break;" in the above switch statement is equivalent to "goto fail;" */ fail: POP_FAILURE(state, code, text, goto done_matching, goto error); goto continue_matching; done_matching: /* if(translated != NULL) */ /* free(translated); */ FREE_STATE(state); return -1; error: /* if (translated != NULL) */ /* free(translated); */ FREE_STATE(state); return -2; } #undef PREFETCH #undef NEXTCHAR int re_search(regexp_t bufp, unsigned char *string, int size, int pos, int range, regexp_registers_t regs) { unsigned char *fastmap; unsigned char *translate; unsigned char *text; unsigned char *partstart; unsigned char *partend; int dir; int ret; unsigned char anchor; assert(size >= 0 && pos >= 0); assert(pos + range >= 0 && pos + range <= size); /* Bugfix by ylo */ fastmap = bufp->fastmap; translate = bufp->translate; if (fastmap && !bufp->fastmap_accurate) { re_compile_fastmap(bufp); if (PyErr_Occurred()) return -2; } anchor = bufp->anchor; if (bufp->can_be_null == 1) /* can_be_null == 2: can match null at eob */ fastmap = NULL; if (range < 0) { dir = -1; range = -range; } else dir = 1; if (anchor == 2) { if (pos != 0) return -1; else range = 0; } for (; range >= 0; range--, pos += dir) { if (fastmap) { if (dir == 1) { /* searching forwards */ text = string + pos; partend = string + size; partstart = text; if (translate) while (text != partend && !fastmap[(unsigned char) translate[(unsigned char)*text]]) text++; else while (text != partend && !fastmap[(unsigned char)*text]) text++; pos += text - partstart; range -= text - partstart; if (pos == size && bufp->can_be_null == 0) return -1; } else { /* searching backwards */ text = string + pos; partstart = string + pos - range; partend = text; if (translate) while (text != partstart && !fastmap[(unsigned char) translate[(unsigned char)*text]]) text--; else while (text != partstart && !fastmap[(unsigned char)*text]) text--; pos -= partend - text; range -= partend - text; } } if (anchor == 1) { /* anchored to begline */ if (pos > 0 && (string[pos - 1] != '\n')) continue; } assert(pos >= 0 && pos <= size); ret = re_match(bufp, string, size, pos, regs); if (ret >= 0) return pos; if (ret == -2) return -2; } return -1; } /* ** Local Variables: ** mode: c ** c-file-style: "python" ** End: */ Python-2.3.7/Modules/yuv.h0000644001241000117560000000505207154035731014663 0ustar loewishpifb6 #ifndef Py_YUV_H #define Py_YUV_H #ifdef __cplusplus extern "C" { #endif /* * SVideo YUV 4:1:1 format. * * 4 consecutive quadwords describe 8 pixels on 2 lines, as depicted * below. An array of (width/4) of the below structure describes 2 * scan lines. * * +-------------------+ * | 00 | 01 | 02 | 03 | . . . * +-------------------+ * | 10 | 11 | 12 | 13 | . . . * +-------------------+ */ struct yuv411 { struct { unsigned int dummy:8; unsigned int y0:8; unsigned int u0:2; unsigned int v0:2; unsigned int y1:8; unsigned int u1:2; unsigned int v1:2; } v[4]; }; #define YUV411_Y00(y) (y).v[0].y0 #define YUV411_Y01(y) (y).v[1].y0 #define YUV411_Y02(y) (y).v[2].y0 #define YUV411_Y03(y) (y).v[3].y0 #define YUV411_Y10(y) (y).v[0].y1 #define YUV411_Y11(y) (y).v[1].y1 #define YUV411_Y12(y) (y).v[2].y1 #define YUV411_Y13(y) (y).v[3].y1 #define YUV411_U00(y) ((y).v[0].u0<<6|(y).v[1].u0<<4|(y).v[2].u0<<2|(y).v[3].u0) #define YUV411_U01(y) YUV411_U00(y) #define YUV411_U02(y) YUV411_U00(y) #define YUV411_U03(y) YUV411_U00(y) #define YUV411_U10(y) ((y).v[0].u1<<6|(y).v[1].u1<<4|(y).v[2].u1<<2|(y).v[3].u1) #define YUV411_U11(y) YUV411_U10(y) #define YUV411_U12(y) YUV411_U10(y) #define YUV411_U13(y) YUV411_U10(y) #define YUV411_V00(y) ((y).v[0].v0<<6|(y).v[1].v0<<4|(y).v[2].v0<<2|(y).v[3].v0) #define YUV411_V01(y) YUV411_V00(y) #define YUV411_V02(y) YUV411_V00(y) #define YUV411_V03(y) YUV411_V00(y) #define YUV411_V10(y) ((y).v[0].v1<<6|(y).v[1].v1<<4|(y).v[2].v1<<2|(y).v[3].v1) #define YUV411_V11(y) YUV411_V10(y) #define YUV411_V12(y) YUV411_V10(y) #define YUV411_V13(y) YUV411_V10(y) /* * Compression Library YUV 4:2:2 format. * * 1 longword describes 2 pixels. * * +-------+ * | 0 | 1 | * +-------+ */ struct yuv422 { unsigned int u:8; unsigned int y0:8; unsigned int v:8; unsigned int y1:8; }; #define YUV422_Y0(y) (y).y0 #define YUV422_Y1(y) (y).y1 #define YUV422_U0(y) (y).u #define YUV422_U1(y) (y).u #define YUV422_V0(y) (y).v #define YUV422_V1(y) (y).v /* * Compression library YUV 4:2:2 Duplicate Chroma format. * * This is like the previous format, but the U and V values are * duplicated vertically (and hence there is some redundancy in the * data). With other words, lines 2*n and 2*n+1 have the same U and V * values but different Y values. */ /* * Conversion functions. */ void yuv_sv411_to_cl422dc(int, void *, void *, int, int); void yuv_sv411_to_cl422dc_quartersize(int, void *, void *, int, int); void yuv_sv411_to_cl422dc_sixteenthsize(int, void *, void *, int, int); #ifdef __cplusplus } #endif #endif /* !Py_YUV_H */ Python-2.3.7/Modules/Setup.dist0000644001241000117560000004263507672706611015673 0ustar loewishpifb6# -*- makefile -*- # The file Setup is used by the makesetup script to construct the files # Makefile and config.c, from Makefile.pre and config.c.in, # respectively. The file Setup itself is initially copied from # Setup.dist; once it exists it will not be overwritten, so you can edit # Setup to your heart's content. Note that Makefile.pre is created # from Makefile.pre.in by the toplevel configure script. # (VPATH notes: Setup and Makefile.pre are in the build directory, as # are Makefile and config.c; the *.in and *.dist files are in the source # directory.) # Each line in this file describes one or more optional modules. # Modules enabled here will not be compiled by the setup.py script, # so the file can be used to override setup.py's behavior. # Lines have the following structure: # # ... [ ...] [ ...] [ ...] # # is anything ending in .c (.C, .cc, .c++ are C++ files) # is anything starting with -I, -D, -U or -C # is anything ending in .a or beginning with -l or -L # is anything else but should be a valid Python # identifier (letters, digits, underscores, beginning with non-digit) # # (As the makesetup script changes, it may recognize some other # arguments as well, e.g. *.so and *.sl as libraries. See the big # case statement in the makesetup script.) # # Lines can also have the form # # = # # which defines a Make variable definition inserted into Makefile.in # # Finally, if a line contains just the word "*shared*" (without the # quotes but with the stars), then the following modules will not be # built statically. The build process works like this: # # 1. Build all modules that are declared as static in Modules/Setup, # combine them into libpythonxy.a, combine that into python. # 2. Build all modules that are listed as shared in Modules/Setup. # 3. Invoke setup.py. That builds all modules that # a) are not builtin, and # b) are not listed in Modules/Setup, and # c) can be build on the target # # Therefore, modules declared to be shared will not be # included in the config.c file, nor in the list of objects to be # added to the library archive, and their linker options won't be # added to the linker options. Rules to create their .o files and # their shared libraries will still be added to the Makefile, and # their names will be collected in the Make variable SHAREDMODS. This # is used to build modules as shared libraries. (They can be # installed using "make sharedinstall", which is implied by the # toplevel "make install" target.) (For compatibility, # *noconfig* has the same effect as *shared*.) # # In addition, *static* explicitly declares the following modules to # be static. Lines containing "*static*" and "*shared*" may thus # alternate thoughout this file. # NOTE: As a standard policy, as many modules as can be supported by a # platform should be present. The distribution comes with all modules # enabled that are supported by most platforms and don't require you # to ftp sources from elsewhere. # Some special rules to define PYTHONPATH. # Edit the definitions below to indicate which options you are using. # Don't add any whitespace or comments! # Directories where library files get installed. # DESTLIB is for Python modules; MACHDESTLIB for shared libraries. DESTLIB=$(LIBDEST) MACHDESTLIB=$(BINLIBDEST) # NOTE: all the paths are now relative to the prefix that is computed # at run time! # Standard path -- don't edit. # No leading colon since this is the first entry. # Empty since this is now just the runtime prefix. DESTPATH= # Site specific path components -- should begin with : if non-empty SITEPATH= # Standard path components for test modules TESTPATH= # Path components for machine- or system-dependent modules and shared libraries MACHDEPPATH=:plat-$(MACHDEP) EXTRAMACHDEPPATH= # Path component for the Tkinter-related modules # The TKPATH variable is always enabled, to save you the effort. TKPATH=:lib-tk COREPYTHONPATH=$(DESTPATH)$(SITEPATH)$(TESTPATH)$(MACHDEPPATH)$(EXTRAMACHDEPPATH)$(TKPATH) PYTHONPATH=$(COREPYTHONPATH) # The modules listed here can't be built as shared libraries for # various reasons; therefore they are listed here instead of in the # normal order. # This only contains the minimal set of modules required to run the # setup.py script in the root of the Python source tree. posix posixmodule.c # posix (UNIX) system calls errno errnomodule.c # posix (UNIX) errno values _sre _sre.c # Fredrik Lundh's new regular expressions _codecs _codecsmodule.c # access to the builtin codecs and codec registry # The zipimport module is always imported at startup. Having it as a # builtin module avoids some bootstrapping problems and reduces overhead. zipimport zipimport.c # The rest of the modules listed in this file are all commented out by # default. Usually they can be detected and built as dynamically # loaded modules by the new setup.py script added in Python 2.1. If # you're on a platform that doesn't support dynamic loading, want to # compile modules statically into the Python binary, or need to # specify some odd set of compiler switches, you can uncomment the # appropriate lines below. # ====================================================================== # The Python symtable module depends on .h files that setup.py doesn't track _symtable symtablemodule.c # The SGI specific GL module: GLHACK=-Dclear=__GLclear #gl glmodule.c cgensupport.c -I$(srcdir) $(GLHACK) -lgl -lX11 # Pure module. Cannot be linked dynamically. # -DWITH_QUANTIFY, -DWITH_PURIFY, or -DWITH_ALL_PURE #WHICH_PURE_PRODUCTS=-DWITH_ALL_PURE #PURE_INCLS=-I/usr/local/include #PURE_STUBLIBS=-L/usr/local/lib -lpurify_stubs -lquantify_stubs #pure puremodule.c $(WHICH_PURE_PRODUCTS) $(PURE_INCLS) $(PURE_STUBLIBS) # Uncommenting the following line tells makesetup that all following # modules are to be built as shared libraries (see above for more # detail; also note that *static* reverses this effect): #*shared* # GNU readline. Unlike previous Python incarnations, GNU readline is # now incorporated in an optional module, configured in the Setup file # instead of by a configure script switch. You may have to insert a # -L option pointing to the directory where libreadline.* lives, # and you may have to change -ltermcap to -ltermlib or perhaps remove # it, depending on your system -- see the GNU readline instructions. # It's okay for this to be a shared library, too. #readline readline.c -lreadline -ltermcap # Modules that should always be present (non UNIX dependent): #array arraymodule.c # array objects #cmath cmathmodule.c # -lm # complex math library functions #math mathmodule.c # -lm # math library functions, e.g. sin() #struct structmodule.c # binary structure packing/unpacking #time timemodule.c # -lm # time operations and variables #operator operator.c # operator.add() and similar goodies #_weakref _weakref.c # basic weak reference support #_testcapi _testcapimodule.c # Python C API test module #unicodedata unicodedata.c # static Unicode character database # access to ISO C locale support #_locale _localemodule.c # -lintl # Modules with some UNIX dependencies -- on by default: # (If you have a really backward UNIX, select and socket may not be # supported...) #fcntl fcntlmodule.c # fcntl(2) and ioctl(2) #pwd pwdmodule.c # pwd(3) #grp grpmodule.c # grp(3) #select selectmodule.c # select(2); not on ancient System V # Memory-mapped files (also works on Win32). #mmap mmapmodule.c # Dynamic readlines #xreadlines xreadlinesmodule.c # CSV file helper #_csv _csv.c # Socket module helper for socket(2) #_socket socketmodule.c # Socket module helper for SSL support; you must comment out the other # socket line above, and possibly edit the SSL variable: #SSL=/usr/local/ssl #_ssl _ssl.c \ # -DUSE_SSL -I$(SSL)/include -I$(SSL)/include/openssl \ # -L$(SSL)/lib -lssl -lcrypto # The crypt module is now disabled by default because it breaks builds # on many systems (where -lcrypt is needed), e.g. Linux (I believe). # # First, look at Setup.config; configure may have set this for you. #crypt cryptmodule.c # -lcrypt # crypt(3); needs -lcrypt on some systems # Some more UNIX dependent modules -- off by default, since these # are not supported by all UNIX systems: #nis nismodule.c -lnsl # Sun yellow pages -- not everywhere #termios termios.c # Steen Lumholt's termios module #resource resource.c # Jeremy Hylton's rlimit interface # Multimedia modules -- off by default. # These don't work for 64-bit platforms!!! # These represent audio samples or images as strings: #audioop audioop.c # Operations on audio samples #imageop imageop.c # Operations on images #rgbimg rgbimgmodule.c # Read SGI RGB image files (but coded portably) # The md5 module implements the RSA Data Security, Inc. MD5 # Message-Digest Algorithm, described in RFC 1321. The necessary files # md5c.c and md5.h are included here. #md5 md5module.c md5c.c # The sha module implements the SHA checksum algorithm. # (NIST's Secure Hash Algorithm.) #sha shamodule.c # The mpz module interfaces to the GNU Multiple Precision library. # You need to ftp the GNU MP library. # The GMP variable must point to the GMP source directory. # This was originally written and tested against GMP 1.2 and 1.3.2. # It has been modified by Rob Hooft to work with 2.0.2 as well, but I # haven't tested it recently. # A compatible MP library unencombered by the GPL also exists. It was # posted to comp.sources.misc in volume 40 and is widely available from # FTP archive sites. One URL for it is: # ftp://gatekeeper.dec.com/.b/usenet/comp.sources.misc/volume40/fgmp/part01.Z #GMP=/ufs/guido/src/gmp #mpz mpzmodule.c -I$(GMP) $(GMP)/libgmp.a # SGI IRIX specific modules -- off by default. # These module work on any SGI machine: # *** gl must be enabled higher up in this file *** #fm fmmodule.c $(GLHACK) -lfm -lgl # Font Manager #sgi sgimodule.c # sgi.nap() and a few more # This module requires the header file # /usr/people/4Dgifts/iristools/include/izoom.h: #imgfile imgfile.c -limage -lgutil -lgl -lm # Image Processing Utilities # These modules require the Multimedia Development Option (I think): #al almodule.c -laudio # Audio Library #cd cdmodule.c -lcdaudio -lds -lmediad # CD Audio Library #cl clmodule.c -lcl -lawareaudio # Compression Library #sv svmodule.c yuvconvert.c -lsvideo -lXext -lX11 # Starter Video # The FORMS library, by Mark Overmars, implements user interface # components such as dialogs and buttons using SGI's GL and FM # libraries. You must ftp the FORMS library separately from # ftp://ftp.cs.ruu.nl/pub/SGI/FORMS. It was tested with FORMS 2.2a. # NOTE: if you want to be able to use FORMS and curses simultaneously # (or both link them statically into the same binary), you must # compile all of FORMS with the cc option "-Dclear=__GLclear". # The FORMS variable must point to the FORMS subdirectory of the forms # toplevel directory: #FORMS=/ufs/guido/src/forms/FORMS #fl flmodule.c -I$(FORMS) $(GLHACK) $(FORMS)/libforms.a -lfm -lgl # SunOS specific modules -- off by default: #sunaudiodev sunaudiodev.c # A Linux specific module -- off by default; this may also work on # some *BSDs. #linuxaudiodev linuxaudiodev.c # George Neville-Neil's timing module: #timing timingmodule.c # The _tkinter module. # # The command for _tkinter is long and site specific. Please # uncomment and/or edit those parts as indicated. If you don't have a # specific extension (e.g. Tix or BLT), leave the corresponding line # commented out. (Leave the trailing backslashes in! If you # experience strange errors, you may want to join all uncommented # lines and remove the backslashes -- the backslash interpretation is # done by the shell's "read" command and it may not be implemented on # every system. # *** Always uncomment this (leave the leading underscore in!): # _tkinter _tkinter.c tkappinit.c -DWITH_APPINIT \ # *** Uncomment and edit to reflect where your Tcl/Tk libraries are: # -L/usr/local/lib \ # *** Uncomment and edit to reflect where your Tcl/Tk headers are: # -I/usr/local/include \ # *** Uncomment and edit to reflect where your X11 header files are: # -I/usr/X11R6/include \ # *** Or uncomment this for Solaris: # -I/usr/openwin/include \ # *** Uncomment and edit for Tix extension only: # -DWITH_TIX -ltix8.1.8.2 \ # *** Uncomment and edit for BLT extension only: # -DWITH_BLT -I/usr/local/blt/blt8.0-unoff/include -lBLT8.0 \ # *** Uncomment and edit for PIL (TkImaging) extension only: # (See http://www.pythonware.com/products/pil/ for more info) # -DWITH_PIL -I../Extensions/Imaging/libImaging tkImaging.c \ # *** Uncomment and edit for TOGL extension only: # -DWITH_TOGL togl.c \ # *** Uncomment and edit to reflect your Tcl/Tk versions: # -ltk8.2 -ltcl8.2 \ # *** Uncomment and edit to reflect where your X11 libraries are: # -L/usr/X11R6/lib \ # *** Or uncomment this for Solaris: # -L/usr/openwin/lib \ # *** Uncomment these for TOGL extension only: # -lGL -lGLU -lXext -lXmu \ # *** Uncomment for AIX: # -lld \ # *** Always uncomment this; X11 libraries to link with: # -lX11 # Lance Ellinghaus's modules: #rotor rotormodule.c # enigma-inspired encryption #syslog syslogmodule.c # syslog daemon interface # Curses support, requring the System V version of curses, often # provided by the ncurses library. e.g. on Linux, link with -lncurses # instead of -lcurses; on SunOS 4.1.3, insert -I/usr/5include # -L/usr/5lib before -lcurses). # # First, look at Setup.config; configure may have set this for you. #_curses _cursesmodule.c -lcurses -ltermcap # Wrapper for the panel library that's part of ncurses and SYSV curses. #_curses_panel _curses_panel.c -lpanel -lncurses # Generic (SunOS / SVR4) dynamic loading module. # This is not needed for dynamic loading of Python modules -- # it is a highly experimental and dangerous device for calling # *arbitrary* C functions in *arbitrary* shared libraries: #dl dlmodule.c # Modules that provide persistent dictionary-like semantics. You will # probably want to arrange for at least one of them to be available on # your machine, though none are defined by default because of library # dependencies. The Python module anydbm.py provides an # implementation independent wrapper for these; dumbdbm.py provides # similar functionality (but slower of course) implemented in Python. # The standard Unix dbm module has been moved to Setup.config so that # it will be compiled as a shared library by default. Compiling it as # a built-in module causes conflicts with the pybsddb3 module since it # creates a static dependency on an out-of-date version of db.so. # # First, look at Setup.config; configure may have set this for you. #dbm dbmmodule.c # dbm(3) may require -lndbm or similar # Anthony Baxter's gdbm module. GNU dbm(3) will require -lgdbm: # # First, look at Setup.config; configure may have set this for you. #gdbm gdbmmodule.c -I/usr/local/include -L/usr/local/lib -lgdbm # Sleepycat Berkeley DB interface. # # This requires the Sleepycat DB code, see http://www.sleepycat.com/ # The earliest supported version of that library is 3.0, the latest # supported version is 4.0 (4.1 is specifically not supported, as that # changes the semantics of transactional databases). A list of available # releases can be found at # # http://www.sleepycat.com/update/index.html # # Edit the variables DB and DBLIBVERto point to the db top directory # and the subdirectory of PORT where you built it. #DB=/usr/local/BerkeleyDB.4.0 #DBLIBVER=4.0 #DBINC=$(DB)/include #DBLIB=$(DB)/lib #_bsddb _bsddb.c -I$(DBINC) -L$(DBLIB) -ldb-$(DBLIBVER) # Historical Berkeley DB 1.85 # # This module is deprecated; the 1.85 version of the Berkeley DB library has # bugs that can cause data corruption. If you can, use later versions of the # library instead, available from . #DB=/depot/sundry/src/berkeley-db/db.1.85 #DBPORT=$(DB)/PORT/irix.5.3 #bsddb185 bsddbmodule.c -I$(DBPORT)/include -I$(DBPORT) $(DBPORT)/libdb.a # Helper module for various ascii-encoders #binascii binascii.c # Fred Drake's interface to the Python parser #parser parsermodule.c # cStringIO and cPickle #cStringIO cStringIO.c #cPickle cPickle.c # Lee Busby's SIGFPE modules. # The library to link fpectl with is platform specific. # Choose *one* of the options below for fpectl: # For SGI IRIX (tested on 5.3): #fpectl fpectlmodule.c -lfpe # For Solaris with SunPro compiler (tested on Solaris 2.5 with SunPro C 4.2): # (Without the compiler you don't have -lsunmath.) #fpectl fpectlmodule.c -R/opt/SUNWspro/lib -lsunmath -lm # For other systems: see instructions in fpectlmodule.c. #fpectl fpectlmodule.c ... # Test module for fpectl. No extra libraries needed. #fpetest fpetestmodule.c # Andrew Kuchling's zlib module. # This require zlib 1.1.3 (or later). # See http://www.cdrom.com/pub/infozip/zlib/ #zlib zlibmodule.c -I$(prefix)/include -L$(exec_prefix)/lib -lz # Interface to the Expat XML parser # # Expat was written by James Clark and is now maintained by a group of # developers on SourceForge; see www.libexpat.org for more # information. The pyexpat module was written by Paul Prescod after a # prototype by Jack Jansen. Source of Expat 1.95.2 is included in # Modules/expat/. Usage of a system shared libexpat.so/expat.dll is # not advised. # # More information on Expat can be found at www.libexpat.org. # #EXPAT_DIR=/usr/local/src/expat-1.95.2 #pyexpat pyexpat.c -DHAVE_EXPAT_H -I$(EXPAT_DIR)/lib -L$(EXPAT_DIR) -lexpat # Example -- included for reference only: # xx xxmodule.c # Another example -- the 'xxsubtype' module shows C-level subtyping in action xxsubtype xxsubtype.c Python-2.3.7/Modules/socketmodule.c0000644001241000117560000031414510165004021016517 0ustar loewishpifb6/* Socket module */ /* This module provides an interface to Berkeley socket IPC. Limitations: - Only AF_INET, AF_INET6 and AF_UNIX address families are supported in a portable manner, though AF_PACKET is supported under Linux. - No read/write operations (use sendall/recv or makefile instead). - Additional restrictions apply on some non-Unix platforms (compensated for by socket.py). Module interface: - socket.error: exception raised for socket specific errors - socket.gaierror: exception raised for getaddrinfo/getnameinfo errors, a subclass of socket.error - socket.herror: exception raised for gethostby* errors, a subclass of socket.error - socket.fromfd(fd, family, type[, proto]) --> new socket object (created from an existing file descriptor) - socket.gethostbyname(hostname) --> host IP address (string: 'dd.dd.dd.dd') - socket.gethostbyaddr(IP address) --> (hostname, [alias, ...], [IP addr, ...]) - socket.gethostname() --> host name (string: 'spam' or 'spam.domain.com') - socket.getprotobyname(protocolname) --> protocol number - socket.getservbyname(servicename, protocolname) --> port number - socket.socket([family[, type [, proto]]]) --> new socket object - socket.ntohs(16 bit value) --> new int object - socket.ntohl(32 bit value) --> new int object - socket.htons(16 bit value) --> new int object - socket.htonl(32 bit value) --> new int object - socket.getaddrinfo(host, port [, family, socktype, proto, flags]) --> List of (family, socktype, proto, canonname, sockaddr) - socket.getnameinfo(sockaddr, flags) --> (host, port) - socket.AF_INET, socket.SOCK_STREAM, etc.: constants from - socket.has_ipv6: boolean value indicating if IPv6 is supported - socket.inet_aton(IP address) -> 32-bit packed IP representation - socket.inet_ntoa(packed IP) -> IP address string - socket.getdefaulttimeout() -> None | float - socket.setdefaulttimeout(None | float) - an Internet socket address is a pair (hostname, port) where hostname can be anything recognized by gethostbyname() (including the dd.dd.dd.dd notation) and port is in host byte order - where a hostname is returned, the dd.dd.dd.dd notation is used - a UNIX domain socket address is a string specifying the pathname - an AF_PACKET socket address is a tuple containing a string specifying the ethernet interface and an integer specifying the Ethernet protocol number to be received. For example: ("eth0",0x1234). Optional 3rd,4th,5th elements in the tuple specify packet-type and ha-type/addr -- these are ignored by networking code, but accepted since they are returned by the getsockname() method. Local naming conventions: - names starting with sock_ are socket object methods - names starting with socket_ are module-level functions - names starting with PySocket are exported through socketmodule.h */ #include "Python.h" #undef MAX #define MAX(x, y) ((x) < (y) ? (y) : (x)) /* Socket object documentation */ PyDoc_STRVAR(sock_doc, "socket([family[, type[, proto]]]) -> socket object\n\ \n\ Open a socket of the given type. The family argument specifies the\n\ address family; it defaults to AF_INET. The type argument specifies\n\ whether this is a stream (SOCK_STREAM, this is the default)\n\ or datagram (SOCK_DGRAM) socket. The protocol argument defaults to 0,\n\ specifying the default protocol. Keyword arguments are accepted.\n\ \n\ A socket object represents one endpoint of a network connection.\n\ \n\ Methods of socket objects (keyword arguments not allowed):\n\ \n\ accept() -- accept a connection, returning new socket and client address\n\ bind(addr) -- bind the socket to a local address\n\ close() -- close the socket\n\ connect(addr) -- connect the socket to a remote address\n\ connect_ex(addr) -- connect, return an error code instead of an exception\n\ dup() -- return a new socket object identical to the current one [*]\n\ fileno() -- return underlying file descriptor\n\ getpeername() -- return remote address [*]\n\ getsockname() -- return local address\n\ getsockopt(level, optname[, buflen]) -- get socket options\n\ gettimeout() -- return timeout or None\n\ listen(n) -- start listening for incoming connections\n\ makefile([mode, [bufsize]]) -- return a file object for the socket [*]\n\ recv(buflen[, flags]) -- receive data\n\ recvfrom(buflen[, flags]) -- receive data and sender's address\n\ sendall(data[, flags]) -- send all data\n\ send(data[, flags]) -- send data, may not send all of it\n\ sendto(data[, flags], addr) -- send data to a given address\n\ setblocking(0 | 1) -- set or clear the blocking I/O flag\n\ setsockopt(level, optname, value) -- set socket options\n\ settimeout(None | float) -- set or clear the timeout\n\ shutdown(how) -- shut down traffic in one or both directions\n\ \n\ [*] not available on all platforms!"); /* XXX This is a terrible mess of platform-dependent preprocessor hacks. I hope some day someone can clean this up please... */ /* Hacks for gethostbyname_r(). On some non-Linux platforms, the configure script doesn't get this right, so we hardcode some platform checks below. On the other hand, not all Linux versions agree, so there the settings computed by the configure script are needed! */ #ifndef linux # undef HAVE_GETHOSTBYNAME_R_3_ARG # undef HAVE_GETHOSTBYNAME_R_5_ARG # undef HAVE_GETHOSTBYNAME_R_6_ARG #endif #ifndef WITH_THREAD # undef HAVE_GETHOSTBYNAME_R #endif #ifdef HAVE_GETHOSTBYNAME_R # if defined(_AIX) || defined(__osf__) # define HAVE_GETHOSTBYNAME_R_3_ARG # elif defined(__sun) || defined(__sgi) # define HAVE_GETHOSTBYNAME_R_5_ARG # elif defined(linux) /* Rely on the configure script */ # else # undef HAVE_GETHOSTBYNAME_R # endif #endif #if !defined(HAVE_GETHOSTBYNAME_R) && defined(WITH_THREAD) && \ !defined(MS_WINDOWS) # define USE_GETHOSTBYNAME_LOCK #endif /* On systems on which getaddrinfo() is believed to not be thread-safe, (this includes the getaddrinfo emulation) protect access with a lock. */ #if defined(WITH_THREAD) && (defined(__APPLE__) || defined(__FreeBSD__) || \ defined(__OpenBSD__) || defined(__NetBSD__) || !defined(HAVE_GETADDRINFO)) #define USE_GETADDRINFO_LOCK #endif #ifdef USE_GETADDRINFO_LOCK #define ACQUIRE_GETADDRINFO_LOCK PyThread_acquire_lock(netdb_lock, 1); #define RELEASE_GETADDRINFO_LOCK PyThread_release_lock(netdb_lock); #else #define ACQUIRE_GETADDRINFO_LOCK #define RELEASE_GETADDRINFO_LOCK #endif #if defined(USE_GETHOSTBYNAME_LOCK) || defined(USE_GETADDRINFO_LOCK) # include "pythread.h" #endif #if defined(PYCC_VACPP) # include # include # include # include # include #endif #if defined(__VMS) #if ! defined(_SOCKADDR_LEN) # ifdef getaddrinfo # undef getaddrinfo # endif # include "TCPIP_IOCTL_ROUTINE" #else # include #endif #endif #if defined(PYOS_OS2) # define INCL_DOS # define INCL_DOSERRORS # define INCL_NOPMAPI # include #endif #if defined(__sgi) && _COMPILER_VERSION>700 && !_SGIAPI /* make sure that the reentrant (gethostbyaddr_r etc) functions are declared correctly if compiling with MIPSPro 7.x in ANSI C mode (default) */ /* XXX Using _SGIAPI is the wrong thing, but I don't know what the right thing is. */ #undef _SGIAPI /* to avoid warning */ #define _SGIAPI 1 #undef _XOPEN_SOURCE #include #include #include #ifdef _SS_ALIGNSIZE #define HAVE_GETADDRINFO 1 #define HAVE_GETNAMEINFO 1 #endif #define HAVE_INET_PTON #include #endif /* Irix 6.5 fails to define this variable at all. This is needed for both GCC and SGI's compiler. I'd say that the SGI headers are just busted. */ #if defined(__sgi) && !defined(INET_ADDRSTRLEN) #define INET_ADDRSTRLEN 16 #endif /* Generic includes */ #include #include /* Generic socket object definitions and includes */ #define PySocket_BUILDING_SOCKET #include "socketmodule.h" /* Addressing includes */ #ifndef MS_WINDOWS /* Non-MS WINDOWS includes */ # include /* Headers needed for inet_ntoa() and inet_addr() */ # ifdef __BEOS__ # include # elif defined(PYOS_OS2) && defined(PYCC_VACPP) # include typedef size_t socklen_t; # else # include # endif # ifndef RISCOS # include # else # include # include # define NO_DUP int h_errno; /* not used */ # define INET_ADDRSTRLEN 16 # endif #else /* MS_WINDOWS includes */ # include #endif #ifdef HAVE_STDDEF_H # include #endif #ifndef offsetof # define offsetof(type, member) ((size_t)(&((type *)0)->member)) #endif #ifndef O_NONBLOCK # define O_NONBLOCK O_NDELAY #endif /* include Python's addrinfo.h unless it causes trouble */ #if defined(__sgi) && _COMPILER_VERSION>700 && defined(_SS_ALIGNSIZE) /* Do not include addinfo.h on some newer IRIX versions. * __SS_ALIGNSIZE is defined in sys/socket.h by 6.5.21, * for example, but not by 6.5.10. */ #elif defined(_MSC_VER) && _MSC_VER>1200 /* Do not include addrinfo.h for MSVC7 or greater. * addrinfo and EAI_* constants are defined in ws2tcpip.h */ #else # include "addrinfo.h" #endif #ifndef HAVE_INET_PTON int inet_pton(int af, const char *src, void *dst); const char *inet_ntop(int af, const void *src, char *dst, socklen_t size); #endif #ifdef __APPLE__ /* On OS X, getaddrinfo returns no error indication of lookup failure, so we must use the emulation instead of the libinfo implementation. Unfortunately, performing an autoconf test for this bug would require DNS access for the machine performing the configuration, which is not acceptable. Therefore, we determine the bug just by checking for __APPLE__. If this bug gets ever fixed, perhaps checking for sys/version.h would be appropriate, which is 10/0 on the system with the bug. */ #ifndef HAVE_GETNAMEINFO /* This bug seems to be fixed in Jaguar. Ths easiest way I could Find to check for Jaguar is that it has getnameinfo(), which older releases don't have */ #undef HAVE_GETADDRINFO #endif #endif /* I know this is a bad practice, but it is the easiest... */ #if !defined(HAVE_GETADDRINFO) /* avoid clashes with the C library definition of the symbol. */ #define getaddrinfo fake_getaddrinfo #define gai_strerror fake_gai_strerror #define freeaddrinfo fake_freeaddrinfo #include "getaddrinfo.c" #endif #if !defined(HAVE_GETNAMEINFO) #define getnameinfo fake_getnameinfo #include "getnameinfo.c" #endif #if defined(MS_WINDOWS) || defined(__BEOS__) /* BeOS suffers from the same socket dichotomy as Win32... - [cjh] */ /* seem to be a few differences in the API */ #define SOCKETCLOSE closesocket #define NO_DUP /* Actually it exists on NT 3.5, but what the heck... */ #endif #ifdef MS_WIN32 #define EAFNOSUPPORT WSAEAFNOSUPPORT #define snprintf _snprintf #endif #if defined(PYOS_OS2) && !defined(PYCC_GCC) #define SOCKETCLOSE soclose #define NO_DUP /* Sockets are Not Actual File Handles under OS/2 */ #endif #ifndef SOCKETCLOSE #define SOCKETCLOSE close #endif #ifdef __VMS /* TCP/IP Services for VMS uses a maximum send/revc buffer length of 65535 */ #define SEGMENT_SIZE 65535 #endif /* * Constants for getnameinfo() */ #if !defined(NI_MAXHOST) #define NI_MAXHOST 1025 #endif #if !defined(NI_MAXSERV) #define NI_MAXSERV 32 #endif /* XXX There's a problem here: *static* functions are not supposed to have a Py prefix (or use CapitalizedWords). Later... */ /* Global variable holding the exception type for errors detected by this module (but not argument type or memory errors, etc.). */ static PyObject *socket_error; static PyObject *socket_herror; static PyObject *socket_gaierror; static PyObject *socket_timeout; #ifdef RISCOS /* Global variable which is !=0 if Python is running in a RISC OS taskwindow */ static int taskwindow; #endif /* A forward reference to the socket type object. The sock_type variable contains pointers to various functions, some of which call new_sockobject(), which uses sock_type, so there has to be a circular reference. */ static PyTypeObject sock_type; /* Convenience function to raise an error according to errno and return a NULL pointer from a function. */ static PyObject * set_error(void) { #ifdef MS_WINDOWS int err_no = WSAGetLastError(); static struct { int no; const char *msg; } *msgp, msgs[] = { {WSAEINTR, "Interrupted system call"}, {WSAEBADF, "Bad file descriptor"}, {WSAEACCES, "Permission denied"}, {WSAEFAULT, "Bad address"}, {WSAEINVAL, "Invalid argument"}, {WSAEMFILE, "Too many open files"}, {WSAEWOULDBLOCK, "The socket operation could not complete " "without blocking"}, {WSAEINPROGRESS, "Operation now in progress"}, {WSAEALREADY, "Operation already in progress"}, {WSAENOTSOCK, "Socket operation on non-socket"}, {WSAEDESTADDRREQ, "Destination address required"}, {WSAEMSGSIZE, "Message too long"}, {WSAEPROTOTYPE, "Protocol wrong type for socket"}, {WSAENOPROTOOPT, "Protocol not available"}, {WSAEPROTONOSUPPORT, "Protocol not supported"}, {WSAESOCKTNOSUPPORT, "Socket type not supported"}, {WSAEOPNOTSUPP, "Operation not supported"}, {WSAEPFNOSUPPORT, "Protocol family not supported"}, {WSAEAFNOSUPPORT, "Address family not supported"}, {WSAEADDRINUSE, "Address already in use"}, {WSAEADDRNOTAVAIL, "Can't assign requested address"}, {WSAENETDOWN, "Network is down"}, {WSAENETUNREACH, "Network is unreachable"}, {WSAENETRESET, "Network dropped connection on reset"}, {WSAECONNABORTED, "Software caused connection abort"}, {WSAECONNRESET, "Connection reset by peer"}, {WSAENOBUFS, "No buffer space available"}, {WSAEISCONN, "Socket is already connected"}, {WSAENOTCONN, "Socket is not connected"}, {WSAESHUTDOWN, "Can't send after socket shutdown"}, {WSAETOOMANYREFS, "Too many references: can't splice"}, {WSAETIMEDOUT, "Operation timed out"}, {WSAECONNREFUSED, "Connection refused"}, {WSAELOOP, "Too many levels of symbolic links"}, {WSAENAMETOOLONG, "File name too long"}, {WSAEHOSTDOWN, "Host is down"}, {WSAEHOSTUNREACH, "No route to host"}, {WSAENOTEMPTY, "Directory not empty"}, {WSAEPROCLIM, "Too many processes"}, {WSAEUSERS, "Too many users"}, {WSAEDQUOT, "Disc quota exceeded"}, {WSAESTALE, "Stale NFS file handle"}, {WSAEREMOTE, "Too many levels of remote in path"}, {WSASYSNOTREADY, "Network subsystem is unvailable"}, {WSAVERNOTSUPPORTED, "WinSock version is not supported"}, {WSANOTINITIALISED, "Successful WSAStartup() not yet performed"}, {WSAEDISCON, "Graceful shutdown in progress"}, /* Resolver errors */ {WSAHOST_NOT_FOUND, "No such host is known"}, {WSATRY_AGAIN, "Host not found, or server failed"}, {WSANO_RECOVERY, "Unexpected server error encountered"}, {WSANO_DATA, "Valid name without requested data"}, {WSANO_ADDRESS, "No address, look for MX record"}, {0, NULL} }; if (err_no) { PyObject *v; const char *msg = "winsock error"; for (msgp = msgs; msgp->msg; msgp++) { if (err_no == msgp->no) { msg = msgp->msg; break; } } v = Py_BuildValue("(is)", err_no, msg); if (v != NULL) { PyErr_SetObject(socket_error, v); Py_DECREF(v); } return NULL; } else #endif #if defined(PYOS_OS2) && !defined(PYCC_GCC) if (sock_errno() != NO_ERROR) { APIRET rc; ULONG msglen; char outbuf[100]; int myerrorcode = sock_errno(); /* Retrieve socket-related error message from MPTN.MSG file */ rc = DosGetMessage(NULL, 0, outbuf, sizeof(outbuf), myerrorcode - SOCBASEERR + 26, "mptn.msg", &msglen); if (rc == NO_ERROR) { PyObject *v; /* OS/2 doesn't guarantee a terminator */ outbuf[msglen] = '\0'; if (strlen(outbuf) > 0) { /* If non-empty msg, trim CRLF */ char *lastc = &outbuf[ strlen(outbuf)-1 ]; while (lastc > outbuf && isspace(*lastc)) { /* Trim trailing whitespace (CRLF) */ *lastc-- = '\0'; } } v = Py_BuildValue("(is)", myerrorcode, outbuf); if (v != NULL) { PyErr_SetObject(socket_error, v); Py_DECREF(v); } return NULL; } } #endif #if defined(RISCOS) if (_inet_error.errnum != NULL) { PyObject *v; v = Py_BuildValue("(is)", errno, _inet_err()); if (v != NULL) { PyErr_SetObject(socket_error, v); Py_DECREF(v); } return NULL; } #endif return PyErr_SetFromErrno(socket_error); } static PyObject * set_herror(int h_error) { PyObject *v; #ifdef HAVE_HSTRERROR v = Py_BuildValue("(is)", h_error, (char *)hstrerror(h_error)); #else v = Py_BuildValue("(is)", h_error, "host not found"); #endif if (v != NULL) { PyErr_SetObject(socket_herror, v); Py_DECREF(v); } return NULL; } static PyObject * set_gaierror(int error) { PyObject *v; #ifdef EAI_SYSTEM /* EAI_SYSTEM is not available on Windows XP. */ if (error == EAI_SYSTEM) return set_error(); #endif #ifdef HAVE_GAI_STRERROR v = Py_BuildValue("(is)", error, gai_strerror(error)); #else v = Py_BuildValue("(is)", error, "getaddrinfo failed"); #endif if (v != NULL) { PyErr_SetObject(socket_gaierror, v); Py_DECREF(v); } return NULL; } /* Function to perform the setting of socket blocking mode internally. block = (1 | 0). */ static int internal_setblocking(PySocketSockObject *s, int block) { #ifndef RISCOS #ifndef MS_WINDOWS int delay_flag; #endif #endif Py_BEGIN_ALLOW_THREADS #ifdef __BEOS__ block = !block; setsockopt(s->sock_fd, SOL_SOCKET, SO_NONBLOCK, (void *)(&block), sizeof(int)); #else #ifndef RISCOS #ifndef MS_WINDOWS #if defined(PYOS_OS2) && !defined(PYCC_GCC) block = !block; ioctl(s->sock_fd, FIONBIO, (caddr_t)&block, sizeof(block)); #elif defined(__VMS) block = !block; ioctl(s->sock_fd, FIONBIO, (char *)&block); #else /* !PYOS_OS2 && !_VMS */ delay_flag = fcntl(s->sock_fd, F_GETFL, 0); if (block) delay_flag &= (~O_NONBLOCK); else delay_flag |= O_NONBLOCK; fcntl(s->sock_fd, F_SETFL, delay_flag); #endif /* !PYOS_OS2 */ #else /* MS_WINDOWS */ block = !block; ioctlsocket(s->sock_fd, FIONBIO, (u_long*)&block); #endif /* MS_WINDOWS */ #else /* RISCOS */ block = !block; socketioctl(s->sock_fd, FIONBIO, (u_long*)&block); #endif /* RISCOS */ #endif /* __BEOS__ */ Py_END_ALLOW_THREADS /* Since these don't return anything */ return 1; } /* Do a select() on the socket, if necessary (sock_timeout > 0). The argument writing indicates the direction. This does not raise an exception; we'll let our caller do that after they've reacquired the interpreter lock. Returns 1 on timeout, 0 otherwise. */ static int internal_select(PySocketSockObject *s, int writing) { fd_set fds; struct timeval tv; int n; /* Nothing to do unless we're in timeout mode (not non-blocking) */ if (s->sock_timeout <= 0.0) return 0; /* Guard against closed socket */ if (s->sock_fd < 0) return 0; /* Construct the arguments to select */ tv.tv_sec = (int)s->sock_timeout; tv.tv_usec = (int)((s->sock_timeout - tv.tv_sec) * 1e6); FD_ZERO(&fds); FD_SET(s->sock_fd, &fds); /* See if the socket is ready */ if (writing) n = select(s->sock_fd+1, NULL, &fds, NULL, &tv); else n = select(s->sock_fd+1, &fds, NULL, NULL, &tv); if (n == 0) return 1; return 0; } /* Initialize a new socket object. */ static double defaulttimeout = -1.0; /* Default timeout for new sockets */ PyMODINIT_FUNC init_sockobject(PySocketSockObject *s, SOCKET_T fd, int family, int type, int proto) { #ifdef RISCOS int block = 1; #endif s->sock_fd = fd; s->sock_family = family; s->sock_type = type; s->sock_proto = proto; s->sock_timeout = defaulttimeout; s->errorhandler = &set_error; if (defaulttimeout >= 0.0) internal_setblocking(s, 0); #ifdef RISCOS if (taskwindow) socketioctl(s->sock_fd, 0x80046679, (u_long*)&block); #endif } /* Create a new socket object. This just creates the object and initializes it. If the creation fails, return NULL and set an exception (implicit in NEWOBJ()). */ static PySocketSockObject * new_sockobject(SOCKET_T fd, int family, int type, int proto) { PySocketSockObject *s; s = (PySocketSockObject *) PyType_GenericNew(&sock_type, NULL, NULL); if (s != NULL) init_sockobject(s, fd, family, type, proto); return s; } /* Lock to allow python interpreter to continue, but only allow one thread to be in gethostbyname or getaddrinfo */ #if defined(USE_GETHOSTBYNAME_LOCK) || defined(USE_GETADDRINFO_LOCK) PyThread_type_lock netdb_lock; #endif /* Convert a string specifying a host name or one of a few symbolic names to a numeric IP address. This usually calls gethostbyname() to do the work; the names "" and "" are special. Return the length (IPv4 should be 4 bytes), or negative if an error occurred; then an exception is raised. */ static int setipaddr(char *name, struct sockaddr *addr_ret, size_t addr_ret_size, int af) { struct addrinfo hints, *res; int error; int d1, d2, d3, d4; char ch; memset((void *) addr_ret, '\0', sizeof(*addr_ret)); if (name[0] == '\0') { int siz; memset(&hints, 0, sizeof(hints)); hints.ai_family = af; hints.ai_socktype = SOCK_DGRAM; /*dummy*/ hints.ai_flags = AI_PASSIVE; Py_BEGIN_ALLOW_THREADS ACQUIRE_GETADDRINFO_LOCK error = getaddrinfo(NULL, "0", &hints, &res); Py_END_ALLOW_THREADS /* We assume that those thread-unsafe getaddrinfo() versions *are* safe regarding their return value, ie. that a subsequent call to getaddrinfo() does not destroy the outcome of the first call. */ RELEASE_GETADDRINFO_LOCK if (error) { set_gaierror(error); return -1; } switch (res->ai_family) { case AF_INET: siz = 4; break; #ifdef ENABLE_IPV6 case AF_INET6: siz = 16; break; #endif default: freeaddrinfo(res); PyErr_SetString(socket_error, "unsupported address family"); return -1; } if (res->ai_next) { freeaddrinfo(res); PyErr_SetString(socket_error, "wildcard resolved to multiple address"); return -1; } if (res->ai_addrlen < addr_ret_size) addr_ret_size = res->ai_addrlen; memcpy(addr_ret, res->ai_addr, addr_ret_size); freeaddrinfo(res); return siz; } if (name[0] == '<' && strcmp(name, "") == 0) { struct sockaddr_in *sin; if (af != AF_INET && af != AF_UNSPEC) { PyErr_SetString(socket_error, "address family mismatched"); return -1; } sin = (struct sockaddr_in *)addr_ret; memset((void *) sin, '\0', sizeof(*sin)); sin->sin_family = AF_INET; #ifdef HAVE_SOCKADDR_SA_LEN sin->sin_len = sizeof(*sin); #endif sin->sin_addr.s_addr = INADDR_BROADCAST; return sizeof(sin->sin_addr); } if (sscanf(name, "%d.%d.%d.%d%c", &d1, &d2, &d3, &d4, &ch) == 4 && 0 <= d1 && d1 <= 255 && 0 <= d2 && d2 <= 255 && 0 <= d3 && d3 <= 255 && 0 <= d4 && d4 <= 255) { struct sockaddr_in *sin; sin = (struct sockaddr_in *)addr_ret; sin->sin_addr.s_addr = htonl( ((long) d1 << 24) | ((long) d2 << 16) | ((long) d3 << 8) | ((long) d4 << 0)); sin->sin_family = AF_INET; #ifdef HAVE_SOCKADDR_SA_LEN sin->sin_len = sizeof(*sin); #endif return 4; } memset(&hints, 0, sizeof(hints)); hints.ai_family = af; Py_BEGIN_ALLOW_THREADS ACQUIRE_GETADDRINFO_LOCK error = getaddrinfo(name, NULL, &hints, &res); #if defined(__digital__) && defined(__unix__) if (error == EAI_NONAME && af == AF_UNSPEC) { /* On Tru64 V5.1, numeric-to-addr conversion fails if no address family is given. Assume IPv4 for now.*/ hints.ai_family = AF_INET; error = getaddrinfo(name, NULL, &hints, &res); } #endif Py_END_ALLOW_THREADS RELEASE_GETADDRINFO_LOCK /* see comment in setipaddr() */ if (error) { set_gaierror(error); return -1; } if (res->ai_addrlen < addr_ret_size) addr_ret_size = res->ai_addrlen; memcpy((char *) addr_ret, res->ai_addr, addr_ret_size); freeaddrinfo(res); switch (addr_ret->sa_family) { case AF_INET: return 4; #ifdef ENABLE_IPV6 case AF_INET6: return 16; #endif default: PyErr_SetString(socket_error, "unknown address family"); return -1; } } /* Create a string object representing an IP address. This is always a string of the form 'dd.dd.dd.dd' (with variable size numbers). */ static PyObject * makeipaddr(struct sockaddr *addr, int addrlen) { char buf[NI_MAXHOST]; int error; error = getnameinfo(addr, addrlen, buf, sizeof(buf), NULL, 0, NI_NUMERICHOST); if (error) { set_gaierror(error); return NULL; } return PyString_FromString(buf); } /* Create an object representing the given socket address, suitable for passing it back to bind(), connect() etc. The family field of the sockaddr structure is inspected to determine what kind of address it really is. */ /*ARGSUSED*/ static PyObject * makesockaddr(int sockfd, struct sockaddr *addr, int addrlen) { if (addrlen == 0) { /* No address -- may be recvfrom() from known socket */ Py_INCREF(Py_None); return Py_None; } #ifdef __BEOS__ /* XXX: BeOS version of accept() doesn't set family correctly */ addr->sa_family = AF_INET; #endif switch (addr->sa_family) { case AF_INET: { struct sockaddr_in *a; PyObject *addrobj = makeipaddr(addr, sizeof(*a)); PyObject *ret = NULL; if (addrobj) { a = (struct sockaddr_in *)addr; ret = Py_BuildValue("Oi", addrobj, ntohs(a->sin_port)); Py_DECREF(addrobj); } return ret; } #if defined(AF_UNIX) case AF_UNIX: { struct sockaddr_un *a = (struct sockaddr_un *) addr; return PyString_FromString(a->sun_path); } #endif /* AF_UNIX */ #ifdef ENABLE_IPV6 case AF_INET6: { struct sockaddr_in6 *a; PyObject *addrobj = makeipaddr(addr, sizeof(*a)); PyObject *ret = NULL; if (addrobj) { a = (struct sockaddr_in6 *)addr; ret = Py_BuildValue("Oiii", addrobj, ntohs(a->sin6_port), a->sin6_flowinfo, a->sin6_scope_id); Py_DECREF(addrobj); } return ret; } #endif #ifdef HAVE_NETPACKET_PACKET_H case AF_PACKET: { struct sockaddr_ll *a = (struct sockaddr_ll *)addr; char *ifname = ""; struct ifreq ifr; /* need to look up interface name give index */ if (a->sll_ifindex) { ifr.ifr_ifindex = a->sll_ifindex; if (ioctl(sockfd, SIOCGIFNAME, &ifr) == 0) ifname = ifr.ifr_name; } return Py_BuildValue("shbhs#", ifname, ntohs(a->sll_protocol), a->sll_pkttype, a->sll_hatype, a->sll_addr, a->sll_halen); } #endif /* More cases here... */ default: /* If we don't know the address family, don't raise an exception -- return it as a tuple. */ return Py_BuildValue("is#", addr->sa_family, addr->sa_data, sizeof(addr->sa_data)); } } /* Parse a socket address argument according to the socket object's address family. Return 1 if the address was in the proper format, 0 of not. The address is returned through addr_ret, its length through len_ret. */ static int getsockaddrarg(PySocketSockObject *s, PyObject *args, struct sockaddr **addr_ret, int *len_ret) { switch (s->sock_family) { #if defined(AF_UNIX) case AF_UNIX: { struct sockaddr_un* addr; char *path; int len; addr = (struct sockaddr_un*)&(s->sock_addr).un; if (!PyArg_Parse(args, "t#", &path, &len)) return 0; if (len > sizeof addr->sun_path) { PyErr_SetString(socket_error, "AF_UNIX path too long"); return 0; } addr->sun_family = s->sock_family; memcpy(addr->sun_path, path, len); addr->sun_path[len] = 0; *addr_ret = (struct sockaddr *) addr; #if defined(PYOS_OS2) *len_ret = sizeof(*addr); #else *len_ret = len + sizeof(*addr) - sizeof(addr->sun_path); #endif return 1; } #endif /* AF_UNIX */ case AF_INET: { struct sockaddr_in* addr; char *host; int port, result; addr=(struct sockaddr_in*)&(s->sock_addr).in; if (!PyTuple_Check(args)) { PyErr_Format( PyExc_TypeError, "getsockaddrarg: " "AF_INET address must be tuple, not %.500s", args->ob_type->tp_name); return 0; } if (!PyArg_ParseTuple(args, "eti:getsockaddrarg", "idna", &host, &port)) return 0; result = setipaddr(host, (struct sockaddr *)addr, sizeof(*addr), AF_INET); PyMem_Free(host); if (result < 0) return 0; addr->sin_family = AF_INET; addr->sin_port = htons((short)port); *addr_ret = (struct sockaddr *) addr; *len_ret = sizeof *addr; return 1; } #ifdef ENABLE_IPV6 case AF_INET6: { struct sockaddr_in6* addr; char *host; int port, flowinfo, scope_id, result; addr = (struct sockaddr_in6*)&(s->sock_addr).in6; flowinfo = scope_id = 0; if (!PyArg_ParseTuple(args, "eti|ii", "idna", &host, &port, &flowinfo, &scope_id)) { return 0; } result = setipaddr(host, (struct sockaddr *)addr, sizeof(*addr), AF_INET6); PyMem_Free(host); if (result < 0) return 0; addr->sin6_family = s->sock_family; addr->sin6_port = htons((short)port); addr->sin6_flowinfo = flowinfo; addr->sin6_scope_id = scope_id; *addr_ret = (struct sockaddr *) addr; *len_ret = sizeof *addr; return 1; } #endif #ifdef HAVE_NETPACKET_PACKET_H case AF_PACKET: { struct sockaddr_ll* addr; struct ifreq ifr; char *interfaceName; int protoNumber; int hatype = 0; int pkttype = 0; char *haddr; if (!PyArg_ParseTuple(args, "si|iis", &interfaceName, &protoNumber, &pkttype, &hatype, &haddr)) return 0; strncpy(ifr.ifr_name, interfaceName, sizeof(ifr.ifr_name)); ifr.ifr_name[(sizeof(ifr.ifr_name))-1] = '\0'; if (ioctl(s->sock_fd, SIOCGIFINDEX, &ifr) < 0) { s->errorhandler(); return 0; } addr = &(s->sock_addr.ll); addr->sll_family = AF_PACKET; addr->sll_protocol = htons((short)protoNumber); addr->sll_ifindex = ifr.ifr_ifindex; addr->sll_pkttype = pkttype; addr->sll_hatype = hatype; *addr_ret = (struct sockaddr *) addr; *len_ret = sizeof *addr; return 1; } #endif /* More cases here... */ default: PyErr_SetString(socket_error, "getsockaddrarg: bad family"); return 0; } } /* Get the address length according to the socket object's address family. Return 1 if the family is known, 0 otherwise. The length is returned through len_ret. */ static int getsockaddrlen(PySocketSockObject *s, socklen_t *len_ret) { switch (s->sock_family) { #if defined(AF_UNIX) case AF_UNIX: { *len_ret = sizeof (struct sockaddr_un); return 1; } #endif /* AF_UNIX */ case AF_INET: { *len_ret = sizeof (struct sockaddr_in); return 1; } #ifdef ENABLE_IPV6 case AF_INET6: { *len_ret = sizeof (struct sockaddr_in6); return 1; } #endif #ifdef HAVE_NETPACKET_PACKET_H case AF_PACKET: { *len_ret = sizeof (struct sockaddr_ll); return 1; } #endif /* More cases here... */ default: PyErr_SetString(socket_error, "getsockaddrlen: bad family"); return 0; } } /* s.accept() method */ static PyObject * sock_accept(PySocketSockObject *s) { char addrbuf[256]; SOCKET_T newfd; socklen_t addrlen; PyObject *sock = NULL; PyObject *addr = NULL; PyObject *res = NULL; int timeout; if (!getsockaddrlen(s, &addrlen)) return NULL; memset(addrbuf, 0, addrlen); #ifdef MS_WINDOWS newfd = INVALID_SOCKET; #else newfd = -1; #endif Py_BEGIN_ALLOW_THREADS timeout = internal_select(s, 0); if (!timeout) newfd = accept(s->sock_fd, (struct sockaddr *) addrbuf, &addrlen); Py_END_ALLOW_THREADS if (timeout) { PyErr_SetString(socket_timeout, "timed out"); return NULL; } #ifdef MS_WINDOWS if (newfd == INVALID_SOCKET) #else if (newfd < 0) #endif return s->errorhandler(); /* Create the new object with unspecified family, to avoid calls to bind() etc. on it. */ sock = (PyObject *) new_sockobject(newfd, s->sock_family, s->sock_type, s->sock_proto); if (sock == NULL) { SOCKETCLOSE(newfd); goto finally; } addr = makesockaddr(s->sock_fd, (struct sockaddr *)addrbuf, addrlen); if (addr == NULL) goto finally; res = Py_BuildValue("OO", sock, addr); finally: Py_XDECREF(sock); Py_XDECREF(addr); return res; } PyDoc_STRVAR(accept_doc, "accept() -> (socket object, address info)\n\ \n\ Wait for an incoming connection. Return a new socket representing the\n\ connection, and the address of the client. For IP sockets, the address\n\ info is a pair (hostaddr, port)."); /* s.setblocking(flag) method. Argument: False -- non-blocking mode; same as settimeout(0) True -- blocking mode; same as settimeout(None) */ static PyObject * sock_setblocking(PySocketSockObject *s, PyObject *arg) { int block; block = PyInt_AsLong(arg); if (block == -1 && PyErr_Occurred()) return NULL; s->sock_timeout = block ? -1.0 : 0.0; internal_setblocking(s, block); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(setblocking_doc, "setblocking(flag)\n\ \n\ Set the socket to blocking (flag is true) or non-blocking (false).\n\ setblocking(True) is equivalent to settimeout(None);\n\ setblocking(False) is equivalent to settimeout(0.0)."); /* s.settimeout(timeout) method. Argument: None -- no timeout, blocking mode; same as setblocking(True) 0.0 -- non-blocking mode; same as setblocking(False) > 0 -- timeout mode; operations time out after timeout seconds < 0 -- illegal; raises an exception */ static PyObject * sock_settimeout(PySocketSockObject *s, PyObject *arg) { double timeout; if (arg == Py_None) timeout = -1.0; else { timeout = PyFloat_AsDouble(arg); if (timeout < 0.0) { if (!PyErr_Occurred()) PyErr_SetString(PyExc_ValueError, "Timeout value out of range"); return NULL; } } s->sock_timeout = timeout; internal_setblocking(s, timeout < 0.0); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(settimeout_doc, "settimeout(timeout)\n\ \n\ Set a timeout on socket operations. 'timeout' can be a float,\n\ giving in seconds, or None. Setting a timeout of None disables\n\ the timeout feature and is equivalent to setblocking(1).\n\ Setting a timeout of zero is the same as setblocking(0)."); /* s.gettimeout() method. Returns the timeout associated with a socket. */ static PyObject * sock_gettimeout(PySocketSockObject *s) { if (s->sock_timeout < 0.0) { Py_INCREF(Py_None); return Py_None; } else return PyFloat_FromDouble(s->sock_timeout); } PyDoc_STRVAR(gettimeout_doc, "gettimeout() -> timeout\n\ \n\ Returns the timeout in floating seconds associated with socket \n\ operations. A timeout of None indicates that timeouts on socket \n\ operations are disabled."); #ifdef RISCOS /* s.sleeptaskw(1 | 0) method */ static PyObject * sock_sleeptaskw(PySocketSockObject *s,PyObject *arg) { int block; block = PyInt_AsLong(arg); if (block == -1 && PyErr_Occurred()) return NULL; Py_BEGIN_ALLOW_THREADS socketioctl(s->sock_fd, 0x80046679, (u_long*)&block); Py_END_ALLOW_THREADS Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(sleeptaskw_doc, "sleeptaskw(flag)\n\ \n\ Allow sleeps in taskwindows."); #endif /* s.setsockopt() method. With an integer third argument, sets an integer option. With a string third argument, sets an option from a buffer; use optional built-in module 'struct' to encode the string. */ static PyObject * sock_setsockopt(PySocketSockObject *s, PyObject *args) { int level; int optname; int res; char *buf; int buflen; int flag; if (PyArg_ParseTuple(args, "iii:setsockopt", &level, &optname, &flag)) { buf = (char *) &flag; buflen = sizeof flag; } else { PyErr_Clear(); if (!PyArg_ParseTuple(args, "iis#:setsockopt", &level, &optname, &buf, &buflen)) return NULL; } res = setsockopt(s->sock_fd, level, optname, (void *)buf, buflen); if (res < 0) return s->errorhandler(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(setsockopt_doc, "setsockopt(level, option, value)\n\ \n\ Set a socket option. See the Unix manual for level and option.\n\ The value argument can either be an integer or a string."); /* s.getsockopt() method. With two arguments, retrieves an integer option. With a third integer argument, retrieves a string buffer of that size; use optional built-in module 'struct' to decode the string. */ static PyObject * sock_getsockopt(PySocketSockObject *s, PyObject *args) { int level; int optname; int res; PyObject *buf; socklen_t buflen = 0; #ifdef __BEOS__ /* We have incomplete socket support. */ PyErr_SetString(socket_error, "getsockopt not supported"); return NULL; #else if (!PyArg_ParseTuple(args, "ii|i:getsockopt", &level, &optname, &buflen)) return NULL; if (buflen == 0) { int flag = 0; socklen_t flagsize = sizeof flag; res = getsockopt(s->sock_fd, level, optname, (void *)&flag, &flagsize); if (res < 0) return s->errorhandler(); return PyInt_FromLong(flag); } #ifdef __VMS if (buflen > 1024) { #else if (buflen <= 0 || buflen > 1024) { #endif PyErr_SetString(socket_error, "getsockopt buflen out of range"); return NULL; } buf = PyString_FromStringAndSize((char *)NULL, buflen); if (buf == NULL) return NULL; res = getsockopt(s->sock_fd, level, optname, (void *)PyString_AS_STRING(buf), &buflen); if (res < 0) { Py_DECREF(buf); return s->errorhandler(); } _PyString_Resize(&buf, buflen); return buf; #endif /* __BEOS__ */ } PyDoc_STRVAR(getsockopt_doc, "getsockopt(level, option[, buffersize]) -> value\n\ \n\ Get a socket option. See the Unix manual for level and option.\n\ If a nonzero buffersize argument is given, the return value is a\n\ string of that length; otherwise it is an integer."); /* s.bind(sockaddr) method */ static PyObject * sock_bind(PySocketSockObject *s, PyObject *addro) { struct sockaddr *addr; int addrlen; int res; if (!getsockaddrarg(s, addro, &addr, &addrlen)) return NULL; Py_BEGIN_ALLOW_THREADS res = bind(s->sock_fd, addr, addrlen); Py_END_ALLOW_THREADS if (res < 0) return s->errorhandler(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(bind_doc, "bind(address)\n\ \n\ Bind the socket to a local address. For IP sockets, the address is a\n\ pair (host, port); the host must refer to the local host. For raw packet\n\ sockets the address is a tuple (ifname, proto [,pkttype [,hatype]])"); /* s.close() method. Set the file descriptor to -1 so operations tried subsequently will surely fail. */ static PyObject * sock_close(PySocketSockObject *s) { SOCKET_T fd; if ((fd = s->sock_fd) != -1) { s->sock_fd = -1; Py_BEGIN_ALLOW_THREADS (void) SOCKETCLOSE(fd); Py_END_ALLOW_THREADS } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(close_doc, "close()\n\ \n\ Close the socket. It cannot be used after this call."); static int internal_connect(PySocketSockObject *s, struct sockaddr *addr, int addrlen, int *timeoutp) { int res, timeout; timeout = 0; res = connect(s->sock_fd, addr, addrlen); #ifdef MS_WINDOWS if (s->sock_timeout > 0.0) { if (res < 0 && WSAGetLastError() == WSAEWOULDBLOCK) { /* This is a mess. Best solution: trust select */ fd_set fds; struct timeval tv; tv.tv_sec = (int)s->sock_timeout; tv.tv_usec = (int)((s->sock_timeout - tv.tv_sec) * 1e6); FD_ZERO(&fds); FD_SET(s->sock_fd, &fds); res = select(s->sock_fd+1, NULL, &fds, NULL, &tv); if (res == 0) { res = WSAEWOULDBLOCK; timeout = 1; } else if (res > 0) res = 0; /* else if (res < 0) an error occurred */ } } if (res < 0) res = WSAGetLastError(); #else if (s->sock_timeout > 0.0) { if (res < 0 && errno == EINPROGRESS) { timeout = internal_select(s, 1); res = connect(s->sock_fd, addr, addrlen); if (res < 0 && errno == EISCONN) res = 0; } } if (res < 0) res = errno; #endif *timeoutp = timeout; return res; } /* s.connect(sockaddr) method */ static PyObject * sock_connect(PySocketSockObject *s, PyObject *addro) { struct sockaddr *addr; int addrlen; int res; int timeout; if (!getsockaddrarg(s, addro, &addr, &addrlen)) return NULL; Py_BEGIN_ALLOW_THREADS res = internal_connect(s, addr, addrlen, &timeout); Py_END_ALLOW_THREADS if (timeout) { PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (res != 0) return s->errorhandler(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(connect_doc, "connect(address)\n\ \n\ Connect the socket to a remote address. For IP sockets, the address\n\ is a pair (host, port)."); /* s.connect_ex(sockaddr) method */ static PyObject * sock_connect_ex(PySocketSockObject *s, PyObject *addro) { struct sockaddr *addr; int addrlen; int res; int timeout; if (!getsockaddrarg(s, addro, &addr, &addrlen)) return NULL; Py_BEGIN_ALLOW_THREADS res = internal_connect(s, addr, addrlen, &timeout); Py_END_ALLOW_THREADS return PyInt_FromLong((long) res); } PyDoc_STRVAR(connect_ex_doc, "connect_ex(address) -> errno\n\ \n\ This is like connect(address), but returns an error code (the errno value)\n\ instead of raising an exception when an error occurs."); /* s.fileno() method */ static PyObject * sock_fileno(PySocketSockObject *s) { #if SIZEOF_SOCKET_T <= SIZEOF_LONG return PyInt_FromLong((long) s->sock_fd); #else return PyLong_FromLongLong((PY_LONG_LONG)s->sock_fd); #endif } PyDoc_STRVAR(fileno_doc, "fileno() -> integer\n\ \n\ Return the integer file descriptor of the socket."); #ifndef NO_DUP /* s.dup() method */ static PyObject * sock_dup(PySocketSockObject *s) { SOCKET_T newfd; PyObject *sock; newfd = dup(s->sock_fd); if (newfd < 0) return s->errorhandler(); sock = (PyObject *) new_sockobject(newfd, s->sock_family, s->sock_type, s->sock_proto); if (sock == NULL) SOCKETCLOSE(newfd); return sock; } PyDoc_STRVAR(dup_doc, "dup() -> socket object\n\ \n\ Return a new socket object connected to the same system resource."); #endif /* s.getsockname() method */ static PyObject * sock_getsockname(PySocketSockObject *s) { char addrbuf[256]; int res; socklen_t addrlen; if (!getsockaddrlen(s, &addrlen)) return NULL; memset(addrbuf, 0, addrlen); Py_BEGIN_ALLOW_THREADS res = getsockname(s->sock_fd, (struct sockaddr *) addrbuf, &addrlen); Py_END_ALLOW_THREADS if (res < 0) return s->errorhandler(); return makesockaddr(s->sock_fd, (struct sockaddr *) addrbuf, addrlen); } PyDoc_STRVAR(getsockname_doc, "getsockname() -> address info\n\ \n\ Return the address of the local endpoint. For IP sockets, the address\n\ info is a pair (hostaddr, port)."); #ifdef HAVE_GETPEERNAME /* Cray APP doesn't have this :-( */ /* s.getpeername() method */ static PyObject * sock_getpeername(PySocketSockObject *s) { char addrbuf[256]; int res; socklen_t addrlen; if (!getsockaddrlen(s, &addrlen)) return NULL; memset(addrbuf, 0, addrlen); Py_BEGIN_ALLOW_THREADS res = getpeername(s->sock_fd, (struct sockaddr *) addrbuf, &addrlen); Py_END_ALLOW_THREADS if (res < 0) return s->errorhandler(); return makesockaddr(s->sock_fd, (struct sockaddr *) addrbuf, addrlen); } PyDoc_STRVAR(getpeername_doc, "getpeername() -> address info\n\ \n\ Return the address of the remote endpoint. For IP sockets, the address\n\ info is a pair (hostaddr, port)."); #endif /* HAVE_GETPEERNAME */ /* s.listen(n) method */ static PyObject * sock_listen(PySocketSockObject *s, PyObject *arg) { int backlog; int res; backlog = PyInt_AsLong(arg); if (backlog == -1 && PyErr_Occurred()) return NULL; Py_BEGIN_ALLOW_THREADS if (backlog < 1) backlog = 1; res = listen(s->sock_fd, backlog); Py_END_ALLOW_THREADS if (res < 0) return s->errorhandler(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(listen_doc, "listen(backlog)\n\ \n\ Enable a server to accept connections. The backlog argument must be at\n\ least 1; it specifies the number of unaccepted connection that the system\n\ will allow before refusing new connections."); #ifndef NO_DUP /* s.makefile(mode) method. Create a new open file object referring to a dupped version of the socket's file descriptor. (The dup() call is necessary so that the open file and socket objects may be closed independent of each other.) The mode argument specifies 'r' or 'w' passed to fdopen(). */ static PyObject * sock_makefile(PySocketSockObject *s, PyObject *args) { extern int fclose(FILE *); char *mode = "r"; int bufsize = -1; #ifdef MS_WIN32 Py_intptr_t fd; #else int fd; #endif FILE *fp; PyObject *f; #ifdef __VMS char *mode_r = "r"; char *mode_w = "w"; #endif if (!PyArg_ParseTuple(args, "|si:makefile", &mode, &bufsize)) return NULL; #ifdef __VMS if (strcmp(mode,"rb") == 0) { mode = mode_r; } else { if (strcmp(mode,"wb") == 0) { mode = mode_w; } } #endif #ifdef MS_WIN32 if (((fd = _open_osfhandle(s->sock_fd, _O_BINARY)) < 0) || ((fd = dup(fd)) < 0) || ((fp = fdopen(fd, mode)) == NULL)) #else if ((fd = dup(s->sock_fd)) < 0 || (fp = fdopen(fd, mode)) == NULL) #endif { if (fd >= 0) SOCKETCLOSE(fd); return s->errorhandler(); } #ifdef USE_GUSI2 /* Workaround for bug in Metrowerks MSL vs. GUSI I/O library */ if (strchr(mode, 'b') != NULL) bufsize = 0; #endif f = PyFile_FromFile(fp, "", mode, fclose); if (f != NULL) PyFile_SetBufSize(f, bufsize); return f; } PyDoc_STRVAR(makefile_doc, "makefile([mode[, buffersize]]) -> file object\n\ \n\ Return a regular file object corresponding to the socket.\n\ The mode and buffersize arguments are as for the built-in open() function."); #endif /* NO_DUP */ /* s.recv(nbytes [,flags]) method */ static PyObject * sock_recv(PySocketSockObject *s, PyObject *args) { int len, n = 0, flags = 0, timeout; PyObject *buf; #ifdef __VMS int read_length; char *read_buf; #endif if (!PyArg_ParseTuple(args, "i|i:recv", &len, &flags)) return NULL; if (len < 0) { PyErr_SetString(PyExc_ValueError, "negative buffersize in recv"); return NULL; } buf = PyString_FromStringAndSize((char *) 0, len); if (buf == NULL) return NULL; #ifndef __VMS Py_BEGIN_ALLOW_THREADS timeout = internal_select(s, 0); if (!timeout) n = recv(s->sock_fd, PyString_AS_STRING(buf), len, flags); Py_END_ALLOW_THREADS if (timeout) { Py_DECREF(buf); PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (n < 0) { Py_DECREF(buf); return s->errorhandler(); } if (n != len) _PyString_Resize(&buf, n); #else read_buf = PyString_AsString(buf); read_length = len; while (read_length != 0) { unsigned int segment; segment = read_length /SEGMENT_SIZE; if (segment != 0) { segment = SEGMENT_SIZE; } else { segment = read_length; } Py_BEGIN_ALLOW_THREADS timeout = internal_select(s, 0); if (!timeout) n = recv(s->sock_fd, read_buf, segment, flags); Py_END_ALLOW_THREADS if (timeout) { Py_DECREF(buf); PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (n < 0) { Py_DECREF(buf); return s->errorhandler(); } if (n != read_length) { read_buf += n; break; } read_length -= segment; read_buf += segment; } if (_PyString_Resize(&buf, (read_buf - PyString_AsString(buf))) < 0) { return NULL; } #endif /* !__VMS */ return buf; } PyDoc_STRVAR(recv_doc, "recv(buffersize[, flags]) -> data\n\ \n\ Receive up to buffersize bytes from the socket. For the optional flags\n\ argument, see the Unix manual. When no data is available, block until\n\ at least one byte is available or until the remote end is closed. When\n\ the remote end is closed and all data is read, return the empty string."); /* s.recvfrom(nbytes [,flags]) method */ static PyObject * sock_recvfrom(PySocketSockObject *s, PyObject *args) { char addrbuf[256]; PyObject *buf = NULL; PyObject *addr = NULL; PyObject *ret = NULL; int len, n = 0, flags = 0, timeout; socklen_t addrlen; if (!PyArg_ParseTuple(args, "i|i:recvfrom", &len, &flags)) return NULL; if (!getsockaddrlen(s, &addrlen)) return NULL; buf = PyString_FromStringAndSize((char *) 0, len); if (buf == NULL) return NULL; Py_BEGIN_ALLOW_THREADS memset(addrbuf, 0, addrlen); timeout = internal_select(s, 0); if (!timeout) n = recvfrom(s->sock_fd, PyString_AS_STRING(buf), len, flags, #ifndef MS_WINDOWS #if defined(PYOS_OS2) && !defined(PYCC_GCC) (struct sockaddr *)addrbuf, &addrlen #else (void *)addrbuf, &addrlen #endif #else (struct sockaddr *)addrbuf, &addrlen #endif ); Py_END_ALLOW_THREADS if (timeout) { Py_DECREF(buf); PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (n < 0) { Py_DECREF(buf); return s->errorhandler(); } if (n != len && _PyString_Resize(&buf, n) < 0) return NULL; if (!(addr = makesockaddr(s->sock_fd, (struct sockaddr *)addrbuf, addrlen))) goto finally; ret = Py_BuildValue("OO", buf, addr); finally: Py_XDECREF(addr); Py_XDECREF(buf); return ret; } PyDoc_STRVAR(recvfrom_doc, "recvfrom(buffersize[, flags]) -> (data, address info)\n\ \n\ Like recv(buffersize, flags) but also return the sender's address info."); /* s.send(data [,flags]) method */ static PyObject * sock_send(PySocketSockObject *s, PyObject *args) { char *buf; int len, n = 0, flags = 0, timeout; #ifdef __VMS int send_length; #endif if (!PyArg_ParseTuple(args, "s#|i:send", &buf, &len, &flags)) return NULL; #ifndef __VMS Py_BEGIN_ALLOW_THREADS timeout = internal_select(s, 1); if (!timeout) n = send(s->sock_fd, buf, len, flags); Py_END_ALLOW_THREADS if (timeout) { PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (n < 0) return s->errorhandler(); #else /* Divide packet into smaller segments for */ /* TCP/IP Services for OpenVMS */ send_length = len; while (send_length != 0) { unsigned int segment; segment = send_length / SEGMENT_SIZE; if (segment != 0) { segment = SEGMENT_SIZE; } else { segment = send_length; } Py_BEGIN_ALLOW_THREADS timeout = internal_select(s, 1); if (!timeout) n = send(s->sock_fd, buf, segment, flags); Py_END_ALLOW_THREADS if (timeout) { PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (n < 0) { return s->errorhandler(); } send_length -= segment; buf += segment; } /* end while */ #endif /* !__VMS */ return PyInt_FromLong((long)n); } PyDoc_STRVAR(send_doc, "send(data[, flags]) -> count\n\ \n\ Send a data string to the socket. For the optional flags\n\ argument, see the Unix manual. Return the number of bytes\n\ sent; this may be less than len(data) if the network is busy."); /* s.sendall(data [,flags]) method */ static PyObject * sock_sendall(PySocketSockObject *s, PyObject *args) { char *buf; int len, n = 0, flags = 0, timeout; if (!PyArg_ParseTuple(args, "s#|i:sendall", &buf, &len, &flags)) return NULL; Py_BEGIN_ALLOW_THREADS do { timeout = internal_select(s, 1); if (timeout) break; n = send(s->sock_fd, buf, len, flags); if (n < 0) break; buf += n; len -= n; } while (len > 0); Py_END_ALLOW_THREADS if (timeout) { PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (n < 0) return s->errorhandler(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(sendall_doc, "sendall(data[, flags])\n\ \n\ Send a data string to the socket. For the optional flags\n\ argument, see the Unix manual. This calls send() repeatedly\n\ until all data is sent. If an error occurs, it's impossible\n\ to tell how much data has been sent."); /* s.sendto(data, [flags,] sockaddr) method */ static PyObject * sock_sendto(PySocketSockObject *s, PyObject *args) { PyObject *addro; char *buf; struct sockaddr *addr; int addrlen, len, n = 0, flags, timeout; flags = 0; if (!PyArg_ParseTuple(args, "s#O:sendto", &buf, &len, &addro)) { PyErr_Clear(); if (!PyArg_ParseTuple(args, "s#iO:sendto", &buf, &len, &flags, &addro)) return NULL; } if (!getsockaddrarg(s, addro, &addr, &addrlen)) return NULL; Py_BEGIN_ALLOW_THREADS timeout = internal_select(s, 1); if (!timeout) n = sendto(s->sock_fd, buf, len, flags, addr, addrlen); Py_END_ALLOW_THREADS if (timeout) { PyErr_SetString(socket_timeout, "timed out"); return NULL; } if (n < 0) return s->errorhandler(); return PyInt_FromLong((long)n); } PyDoc_STRVAR(sendto_doc, "sendto(data[, flags], address) -> count\n\ \n\ Like send(data, flags) but allows specifying the destination address.\n\ For IP sockets, the address is a pair (hostaddr, port)."); /* s.shutdown(how) method */ static PyObject * sock_shutdown(PySocketSockObject *s, PyObject *arg) { int how; int res; how = PyInt_AsLong(arg); if (how == -1 && PyErr_Occurred()) return NULL; Py_BEGIN_ALLOW_THREADS res = shutdown(s->sock_fd, how); Py_END_ALLOW_THREADS if (res < 0) return s->errorhandler(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(shutdown_doc, "shutdown(flag)\n\ \n\ Shut down the reading side of the socket (flag == 0), the writing side\n\ of the socket (flag == 1), or both ends (flag == 2)."); /* List of methods for socket objects */ static PyMethodDef sock_methods[] = { {"accept", (PyCFunction)sock_accept, METH_NOARGS, accept_doc}, {"bind", (PyCFunction)sock_bind, METH_O, bind_doc}, {"close", (PyCFunction)sock_close, METH_NOARGS, close_doc}, {"connect", (PyCFunction)sock_connect, METH_O, connect_doc}, {"connect_ex", (PyCFunction)sock_connect_ex, METH_O, connect_ex_doc}, #ifndef NO_DUP {"dup", (PyCFunction)sock_dup, METH_NOARGS, dup_doc}, #endif {"fileno", (PyCFunction)sock_fileno, METH_NOARGS, fileno_doc}, #ifdef HAVE_GETPEERNAME {"getpeername", (PyCFunction)sock_getpeername, METH_NOARGS, getpeername_doc}, #endif {"getsockname", (PyCFunction)sock_getsockname, METH_NOARGS, getsockname_doc}, {"getsockopt", (PyCFunction)sock_getsockopt, METH_VARARGS, getsockopt_doc}, {"listen", (PyCFunction)sock_listen, METH_O, listen_doc}, #ifndef NO_DUP {"makefile", (PyCFunction)sock_makefile, METH_VARARGS, makefile_doc}, #endif {"recv", (PyCFunction)sock_recv, METH_VARARGS, recv_doc}, {"recvfrom", (PyCFunction)sock_recvfrom, METH_VARARGS, recvfrom_doc}, {"send", (PyCFunction)sock_send, METH_VARARGS, send_doc}, {"sendall", (PyCFunction)sock_sendall, METH_VARARGS, sendall_doc}, {"sendto", (PyCFunction)sock_sendto, METH_VARARGS, sendto_doc}, {"setblocking", (PyCFunction)sock_setblocking, METH_O, setblocking_doc}, {"settimeout", (PyCFunction)sock_settimeout, METH_O, settimeout_doc}, {"gettimeout", (PyCFunction)sock_gettimeout, METH_NOARGS, gettimeout_doc}, {"setsockopt", (PyCFunction)sock_setsockopt, METH_VARARGS, setsockopt_doc}, {"shutdown", (PyCFunction)sock_shutdown, METH_O, shutdown_doc}, #ifdef RISCOS {"sleeptaskw", (PyCFunction)sock_sleeptaskw, METH_O, sleeptaskw_doc}, #endif {NULL, NULL} /* sentinel */ }; /* Deallocate a socket object in response to the last Py_DECREF(). First close the file description. */ static void sock_dealloc(PySocketSockObject *s) { if (s->sock_fd != -1) (void) SOCKETCLOSE(s->sock_fd); s->ob_type->tp_free((PyObject *)s); } static PyObject * sock_repr(PySocketSockObject *s) { char buf[512]; #if SIZEOF_SOCKET_T > SIZEOF_LONG if (s->sock_fd > LONG_MAX) { /* this can occur on Win64, and actually there is a special ugly printf formatter for decimal pointer length integer printing, only bother if necessary*/ PyErr_SetString(PyExc_OverflowError, "no printf formatter to display " "the socket descriptor in decimal"); return NULL; } #endif PyOS_snprintf( buf, sizeof(buf), "", (long)s->sock_fd, s->sock_family, s->sock_type, s->sock_proto); return PyString_FromString(buf); } /* Create a new, uninitialized socket object. */ static PyObject * sock_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { PyObject *new; new = type->tp_alloc(type, 0); if (new != NULL) { ((PySocketSockObject *)new)->sock_fd = -1; ((PySocketSockObject *)new)->sock_timeout = -1.0; ((PySocketSockObject *)new)->errorhandler = &set_error; } return new; } /* Initialize a new socket object. */ /*ARGSUSED*/ static int sock_initobj(PyObject *self, PyObject *args, PyObject *kwds) { PySocketSockObject *s = (PySocketSockObject *)self; SOCKET_T fd; int family = AF_INET, type = SOCK_STREAM, proto = 0; static char *keywords[] = {"family", "type", "proto", 0}; if (!PyArg_ParseTupleAndKeywords(args, kwds, "|iii:socket", keywords, &family, &type, &proto)) return -1; Py_BEGIN_ALLOW_THREADS fd = socket(family, type, proto); Py_END_ALLOW_THREADS #ifdef MS_WINDOWS if (fd == INVALID_SOCKET) #else if (fd < 0) #endif { set_error(); return -1; } init_sockobject(s, fd, family, type, proto); /* From now on, ignore SIGPIPE and let the error checking do the work. */ #ifdef SIGPIPE (void) signal(SIGPIPE, SIG_IGN); #endif return 0; } /* Type object for socket objects. */ static PyTypeObject sock_type = { PyObject_HEAD_INIT(0) /* Must fill in type value later */ 0, /* ob_size */ "_socket.socket", /* tp_name */ sizeof(PySocketSockObject), /* tp_basicsize */ 0, /* tp_itemsize */ (destructor)sock_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ (reprfunc)sock_repr, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /* tp_flags */ sock_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ sock_methods, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ sock_initobj, /* tp_init */ PyType_GenericAlloc, /* tp_alloc */ sock_new, /* tp_new */ PyObject_Del, /* tp_free */ }; /* Python interface to gethostname(). */ /*ARGSUSED*/ static PyObject * socket_gethostname(PyObject *self, PyObject *args) { char buf[1024]; int res; if (!PyArg_ParseTuple(args, ":gethostname")) return NULL; Py_BEGIN_ALLOW_THREADS res = gethostname(buf, (int) sizeof buf - 1); Py_END_ALLOW_THREADS if (res < 0) return set_error(); buf[sizeof buf - 1] = '\0'; return PyString_FromString(buf); } PyDoc_STRVAR(gethostname_doc, "gethostname() -> string\n\ \n\ Return the current host name."); /* Python interface to gethostbyname(name). */ /*ARGSUSED*/ static PyObject * socket_gethostbyname(PyObject *self, PyObject *args) { char *name; #ifdef ENABLE_IPV6 struct sockaddr_storage addrbuf; #else struct sockaddr_in addrbuf; #endif if (!PyArg_ParseTuple(args, "s:gethostbyname", &name)) return NULL; if (setipaddr(name, (struct sockaddr *)&addrbuf, sizeof(addrbuf), AF_INET) < 0) return NULL; return makeipaddr((struct sockaddr *)&addrbuf, sizeof(struct sockaddr_in)); } PyDoc_STRVAR(gethostbyname_doc, "gethostbyname(host) -> address\n\ \n\ Return the IP address (a string of the form '255.255.255.255') for a host."); /* Convenience function common to gethostbyname_ex and gethostbyaddr */ static PyObject * gethost_common(struct hostent *h, struct sockaddr *addr, int alen, int af) { char **pch; PyObject *rtn_tuple = (PyObject *)NULL; PyObject *name_list = (PyObject *)NULL; PyObject *addr_list = (PyObject *)NULL; PyObject *tmp; if (h == NULL) { /* Let's get real error message to return */ #ifndef RISCOS set_herror(h_errno); #else PyErr_SetString(socket_error, "host not found"); #endif return NULL; } if (h->h_addrtype != af) { #ifdef HAVE_STRERROR /* Let's get real error message to return */ PyErr_SetString(socket_error, (char *)strerror(EAFNOSUPPORT)); #else PyErr_SetString( socket_error, "Address family not supported by protocol family"); #endif return NULL; } switch (af) { case AF_INET: if (alen < sizeof(struct sockaddr_in)) return NULL; break; #ifdef ENABLE_IPV6 case AF_INET6: if (alen < sizeof(struct sockaddr_in6)) return NULL; break; #endif } if ((name_list = PyList_New(0)) == NULL) goto err; if ((addr_list = PyList_New(0)) == NULL) goto err; for (pch = h->h_aliases; *pch != NULL; pch++) { int status; tmp = PyString_FromString(*pch); if (tmp == NULL) goto err; status = PyList_Append(name_list, tmp); Py_DECREF(tmp); if (status) goto err; } for (pch = h->h_addr_list; *pch != NULL; pch++) { int status; switch (af) { case AF_INET: { struct sockaddr_in sin; memset(&sin, 0, sizeof(sin)); sin.sin_family = af; #ifdef HAVE_SOCKADDR_SA_LEN sin.sin_len = sizeof(sin); #endif memcpy(&sin.sin_addr, *pch, sizeof(sin.sin_addr)); tmp = makeipaddr((struct sockaddr *)&sin, sizeof(sin)); if (pch == h->h_addr_list && alen >= sizeof(sin)) memcpy((char *) addr, &sin, sizeof(sin)); break; } #ifdef ENABLE_IPV6 case AF_INET6: { struct sockaddr_in6 sin6; memset(&sin6, 0, sizeof(sin6)); sin6.sin6_family = af; #ifdef HAVE_SOCKADDR_SA_LEN sin6.sin6_len = sizeof(sin6); #endif memcpy(&sin6.sin6_addr, *pch, sizeof(sin6.sin6_addr)); tmp = makeipaddr((struct sockaddr *)&sin6, sizeof(sin6)); if (pch == h->h_addr_list && alen >= sizeof(sin6)) memcpy((char *) addr, &sin6, sizeof(sin6)); break; } #endif default: /* can't happen */ PyErr_SetString(socket_error, "unsupported address family"); return NULL; } if (tmp == NULL) goto err; status = PyList_Append(addr_list, tmp); Py_DECREF(tmp); if (status) goto err; } rtn_tuple = Py_BuildValue("sOO", h->h_name, name_list, addr_list); err: Py_XDECREF(name_list); Py_XDECREF(addr_list); return rtn_tuple; } /* Python interface to gethostbyname_ex(name). */ /*ARGSUSED*/ static PyObject * socket_gethostbyname_ex(PyObject *self, PyObject *args) { char *name; struct hostent *h; #ifdef ENABLE_IPV6 struct sockaddr_storage addr; #else struct sockaddr_in addr; #endif struct sockaddr *sa; PyObject *ret; #ifdef HAVE_GETHOSTBYNAME_R struct hostent hp_allocated; #ifdef HAVE_GETHOSTBYNAME_R_3_ARG struct hostent_data data; #else char buf[16384]; int buf_len = (sizeof buf) - 1; int errnop; #endif #if defined(HAVE_GETHOSTBYNAME_R_3_ARG) || defined(HAVE_GETHOSTBYNAME_R_6_ARG) int result; #endif #endif /* HAVE_GETHOSTBYNAME_R */ if (!PyArg_ParseTuple(args, "s:gethostbyname_ex", &name)) return NULL; if (setipaddr(name, (struct sockaddr *)&addr, sizeof(addr), AF_INET) < 0) return NULL; Py_BEGIN_ALLOW_THREADS #ifdef HAVE_GETHOSTBYNAME_R #if defined(HAVE_GETHOSTBYNAME_R_6_ARG) result = gethostbyname_r(name, &hp_allocated, buf, buf_len, &h, &errnop); #elif defined(HAVE_GETHOSTBYNAME_R_5_ARG) h = gethostbyname_r(name, &hp_allocated, buf, buf_len, &errnop); #else /* HAVE_GETHOSTBYNAME_R_3_ARG */ memset((void *) &data, '\0', sizeof(data)); result = gethostbyname_r(name, &hp_allocated, &data); h = (result != 0) ? NULL : &hp_allocated; #endif #else /* not HAVE_GETHOSTBYNAME_R */ #ifdef USE_GETHOSTBYNAME_LOCK PyThread_acquire_lock(netdb_lock, 1); #endif h = gethostbyname(name); #endif /* HAVE_GETHOSTBYNAME_R */ Py_END_ALLOW_THREADS /* Some C libraries would require addr.__ss_family instead of addr.ss_family. Therefore, we cast the sockaddr_storage into sockaddr to access sa_family. */ sa = (struct sockaddr*)&addr; ret = gethost_common(h, (struct sockaddr *)&addr, sizeof(addr), sa->sa_family); #ifdef USE_GETHOSTBYNAME_LOCK PyThread_release_lock(netdb_lock); #endif return ret; } PyDoc_STRVAR(ghbn_ex_doc, "gethostbyname_ex(host) -> (name, aliaslist, addresslist)\n\ \n\ Return the true host name, a list of aliases, and a list of IP addresses,\n\ for a host. The host argument is a string giving a host name or IP number."); /* Python interface to gethostbyaddr(IP). */ /*ARGSUSED*/ static PyObject * socket_gethostbyaddr(PyObject *self, PyObject *args) { #ifdef ENABLE_IPV6 struct sockaddr_storage addr; #else struct sockaddr_in addr; #endif struct sockaddr *sa = (struct sockaddr *)&addr; char *ip_num; struct hostent *h; PyObject *ret; #ifdef HAVE_GETHOSTBYNAME_R struct hostent hp_allocated; #ifdef HAVE_GETHOSTBYNAME_R_3_ARG struct hostent_data data; #else char buf[16384]; int buf_len = (sizeof buf) - 1; int errnop; #endif #if defined(HAVE_GETHOSTBYNAME_R_3_ARG) || defined(HAVE_GETHOSTBYNAME_R_6_ARG) int result; #endif #endif /* HAVE_GETHOSTBYNAME_R */ char *ap; int al; int af; if (!PyArg_ParseTuple(args, "s:gethostbyaddr", &ip_num)) return NULL; af = AF_UNSPEC; if (setipaddr(ip_num, sa, sizeof(addr), af) < 0) return NULL; af = sa->sa_family; ap = NULL; al = 0; switch (af) { case AF_INET: ap = (char *)&((struct sockaddr_in *)sa)->sin_addr; al = sizeof(((struct sockaddr_in *)sa)->sin_addr); break; #ifdef ENABLE_IPV6 case AF_INET6: ap = (char *)&((struct sockaddr_in6 *)sa)->sin6_addr; al = sizeof(((struct sockaddr_in6 *)sa)->sin6_addr); break; #endif default: PyErr_SetString(socket_error, "unsupported address family"); return NULL; } Py_BEGIN_ALLOW_THREADS #ifdef HAVE_GETHOSTBYNAME_R #if defined(HAVE_GETHOSTBYNAME_R_6_ARG) result = gethostbyaddr_r(ap, al, af, &hp_allocated, buf, buf_len, &h, &errnop); #elif defined(HAVE_GETHOSTBYNAME_R_5_ARG) h = gethostbyaddr_r(ap, al, af, &hp_allocated, buf, buf_len, &errnop); #else /* HAVE_GETHOSTBYNAME_R_3_ARG */ memset((void *) &data, '\0', sizeof(data)); result = gethostbyaddr_r(ap, al, af, &hp_allocated, &data); h = (result != 0) ? NULL : &hp_allocated; #endif #else /* not HAVE_GETHOSTBYNAME_R */ #ifdef USE_GETHOSTBYNAME_LOCK PyThread_acquire_lock(netdb_lock, 1); #endif h = gethostbyaddr(ap, al, af); #endif /* HAVE_GETHOSTBYNAME_R */ Py_END_ALLOW_THREADS ret = gethost_common(h, (struct sockaddr *)&addr, sizeof(addr), af); #ifdef USE_GETHOSTBYNAME_LOCK PyThread_release_lock(netdb_lock); #endif return ret; } PyDoc_STRVAR(gethostbyaddr_doc, "gethostbyaddr(host) -> (name, aliaslist, addresslist)\n\ \n\ Return the true host name, a list of aliases, and a list of IP addresses,\n\ for a host. The host argument is a string giving a host name or IP number."); /* Python interface to getservbyname(name). This only returns the port number, since the other info is already known or not useful (like the list of aliases). */ /*ARGSUSED*/ static PyObject * socket_getservbyname(PyObject *self, PyObject *args) { char *name, *proto; struct servent *sp; if (!PyArg_ParseTuple(args, "ss:getservbyname", &name, &proto)) return NULL; Py_BEGIN_ALLOW_THREADS sp = getservbyname(name, proto); Py_END_ALLOW_THREADS if (sp == NULL) { PyErr_SetString(socket_error, "service/proto not found"); return NULL; } return PyInt_FromLong((long) ntohs(sp->s_port)); } PyDoc_STRVAR(getservbyname_doc, "getservbyname(servicename, protocolname) -> integer\n\ \n\ Return a port number from a service name and protocol name.\n\ The protocol name should be 'tcp' or 'udp'."); /* Python interface to getprotobyname(name). This only returns the protocol number, since the other info is already known or not useful (like the list of aliases). */ /*ARGSUSED*/ static PyObject * socket_getprotobyname(PyObject *self, PyObject *args) { char *name; struct protoent *sp; #ifdef __BEOS__ /* Not available in BeOS yet. - [cjh] */ PyErr_SetString(socket_error, "getprotobyname not supported"); return NULL; #else if (!PyArg_ParseTuple(args, "s:getprotobyname", &name)) return NULL; Py_BEGIN_ALLOW_THREADS sp = getprotobyname(name); Py_END_ALLOW_THREADS if (sp == NULL) { PyErr_SetString(socket_error, "protocol not found"); return NULL; } return PyInt_FromLong((long) sp->p_proto); #endif } PyDoc_STRVAR(getprotobyname_doc, "getprotobyname(name) -> integer\n\ \n\ Return the protocol number for the named protocol. (Rarely used.)"); #ifndef NO_DUP /* Create a socket object from a numeric file description. Useful e.g. if stdin is a socket. Additional arguments as for socket(). */ /*ARGSUSED*/ static PyObject * socket_fromfd(PyObject *self, PyObject *args) { PySocketSockObject *s; SOCKET_T fd; int family, type, proto = 0; if (!PyArg_ParseTuple(args, "iii|i:fromfd", &fd, &family, &type, &proto)) return NULL; /* Dup the fd so it and the socket can be closed independently */ fd = dup(fd); if (fd < 0) return set_error(); s = new_sockobject(fd, family, type, proto); /* From now on, ignore SIGPIPE and let the error checking do the work. */ #ifdef SIGPIPE (void) signal(SIGPIPE, SIG_IGN); #endif return (PyObject *) s; } PyDoc_STRVAR(fromfd_doc, "fromfd(fd, family, type[, proto]) -> socket object\n\ \n\ Create a socket object from the given file descriptor.\n\ The remaining arguments are the same as for socket()."); #endif /* NO_DUP */ static PyObject * socket_ntohs(PyObject *self, PyObject *args) { int x1, x2; if (!PyArg_ParseTuple(args, "i:ntohs", &x1)) { return NULL; } x2 = (int)ntohs((short)x1); return PyInt_FromLong(x2); } PyDoc_STRVAR(ntohs_doc, "ntohs(integer) -> integer\n\ \n\ Convert a 16-bit integer from network to host byte order."); static PyObject * socket_ntohl(PyObject *self, PyObject *arg) { unsigned long x; if (PyInt_Check(arg)) { x = PyInt_AS_LONG(arg); if (x == (unsigned long) -1 && PyErr_Occurred()) return NULL; } else if (PyLong_Check(arg)) { x = PyLong_AsUnsignedLong(arg); if (x == (unsigned long) -1 && PyErr_Occurred()) return NULL; #if SIZEOF_LONG > 4 { unsigned long y; /* only want the trailing 32 bits */ y = x & 0xFFFFFFFFUL; if (y ^ x) return PyErr_Format(PyExc_OverflowError, "long int larger than 32 bits"); x = y; } #endif } else return PyErr_Format(PyExc_TypeError, "expected int/long, %s found", arg->ob_type->tp_name); if (x == (unsigned long) -1 && PyErr_Occurred()) return NULL; return PyInt_FromLong(ntohl(x)); } PyDoc_STRVAR(ntohl_doc, "ntohl(integer) -> integer\n\ \n\ Convert a 32-bit integer from network to host byte order."); static PyObject * socket_htons(PyObject *self, PyObject *args) { unsigned long x1, x2; if (!PyArg_ParseTuple(args, "i:htons", &x1)) { return NULL; } x2 = (int)htons((short)x1); return PyInt_FromLong(x2); } PyDoc_STRVAR(htons_doc, "htons(integer) -> integer\n\ \n\ Convert a 16-bit integer from host to network byte order."); static PyObject * socket_htonl(PyObject *self, PyObject *arg) { unsigned long x; if (PyInt_Check(arg)) { x = PyInt_AS_LONG(arg); if (x == (unsigned long) -1 && PyErr_Occurred()) return NULL; } else if (PyLong_Check(arg)) { x = PyLong_AsUnsignedLong(arg); if (x == (unsigned long) -1 && PyErr_Occurred()) return NULL; #if SIZEOF_LONG > 4 { unsigned long y; /* only want the trailing 32 bits */ y = x & 0xFFFFFFFFUL; if (y ^ x) return PyErr_Format(PyExc_OverflowError, "long int larger than 32 bits"); x = y; } #endif } else return PyErr_Format(PyExc_TypeError, "expected int/long, %s found", arg->ob_type->tp_name); return PyInt_FromLong(htonl(x)); } PyDoc_STRVAR(htonl_doc, "htonl(integer) -> integer\n\ \n\ Convert a 32-bit integer from host to network byte order."); /* socket.inet_aton() and socket.inet_ntoa() functions. */ PyDoc_STRVAR(inet_aton_doc, "inet_aton(string) -> packed 32-bit IP representation\n\ \n\ Convert an IP address in string format (123.45.67.89) to the 32-bit packed\n\ binary format used in low-level network functions."); static PyObject* socket_inet_aton(PyObject *self, PyObject *args) { #ifndef INADDR_NONE #define INADDR_NONE (-1) #endif #ifdef HAVE_INET_ATON struct in_addr buf; #else /* Have to use inet_addr() instead */ unsigned long packed_addr; #endif char *ip_addr; if (!PyArg_ParseTuple(args, "s:inet_aton", &ip_addr)) return NULL; #ifdef HAVE_INET_ATON if (inet_aton(ip_addr, &buf)) return PyString_FromStringAndSize((char *)(&buf), sizeof(buf)); PyErr_SetString(socket_error, "illegal IP address string passed to inet_aton"); return NULL; #else /* ! HAVE_INET_ATON */ /* XXX Problem here: inet_aton('255.255.255.255') raises an exception while it should be a valid address. */ packed_addr = inet_addr(ip_addr); if (packed_addr == INADDR_NONE) { /* invalid address */ PyErr_SetString(socket_error, "illegal IP address string passed to inet_aton"); return NULL; } return PyString_FromStringAndSize((char *) &packed_addr, sizeof(packed_addr)); #endif } PyDoc_STRVAR(inet_ntoa_doc, "inet_ntoa(packed_ip) -> ip_address_string\n\ \n\ Convert an IP address from 32-bit packed binary format to string format"); static PyObject* socket_inet_ntoa(PyObject *self, PyObject *args) { char *packed_str; int addr_len; struct in_addr packed_addr; if (!PyArg_ParseTuple(args, "s#:inet_ntoa", &packed_str, &addr_len)) { return NULL; } if (addr_len != sizeof(packed_addr)) { PyErr_SetString(socket_error, "packed IP wrong length for inet_ntoa"); return NULL; } memcpy(&packed_addr, packed_str, addr_len); return PyString_FromString(inet_ntoa(packed_addr)); } #ifdef HAVE_INET_PTON PyDoc_STRVAR(inet_pton_doc, "inet_pton(af, ip) -> packed IP address string\n\ \n\ Convert an IP address from string format to a packed string suitable\n\ for use with low-level network functions."); static PyObject * socket_inet_pton(PyObject *self, PyObject *args) { int af; char* ip; int retval; #ifdef ENABLE_IPV6 char packed[MAX(sizeof(struct in_addr), sizeof(struct in6_addr))]; #else char packed[sizeof(struct in_addr)]; #endif if (!PyArg_ParseTuple(args, "is:inet_pton", &af, &ip)) { return NULL; } #if !defined(ENABLE_IPV6) && defined(AF_INET6) if(af == AF_INET6) { PyErr_SetString(socket_error, "can't use AF_INET6, IPv6 is disabled"); return NULL; } #endif retval = inet_pton(af, ip, packed); if (retval < 0) { PyErr_SetFromErrno(socket_error); return NULL; } else if (retval == 0) { PyErr_SetString(socket_error, "illegal IP address string passed to inet_pton"); return NULL; } else if (af == AF_INET) { return PyString_FromStringAndSize(packed, sizeof(struct in_addr)); #ifdef ENABLE_IPV6 } else if (af == AF_INET6) { return PyString_FromStringAndSize(packed, sizeof(struct in6_addr)); #endif } else { PyErr_SetString(socket_error, "unknown address family"); return NULL; } } PyDoc_STRVAR(inet_ntop_doc, "inet_ntop(af, packed_ip) -> string formatted IP address\n\ \n\ Convert a packed IP address of the given family to string format."); static PyObject * socket_inet_ntop(PyObject *self, PyObject *args) { int af; char* packed; int len; const char* retval; #ifdef ENABLE_IPV6 char ip[MAX(INET_ADDRSTRLEN, INET6_ADDRSTRLEN) + 1]; #else char ip[INET_ADDRSTRLEN + 1]; #endif /* Guarantee NUL-termination for PyString_FromString() below */ memset((void *) &ip[0], '\0', sizeof(ip) + 1); if (!PyArg_ParseTuple(args, "is#:inet_ntop", &af, &packed, &len)) { return NULL; } if (af == AF_INET) { if (len != sizeof(struct in_addr)) { PyErr_SetString(PyExc_ValueError, "invalid length of packed IP address string"); return NULL; } #ifdef ENABLE_IPV6 } else if (af == AF_INET6) { if (len != sizeof(struct in6_addr)) { PyErr_SetString(PyExc_ValueError, "invalid length of packed IP address string"); return NULL; } #endif } else { PyErr_Format(PyExc_ValueError, "unknown address family %d", af); return NULL; } retval = inet_ntop(af, packed, ip, sizeof(ip)); if (!retval) { PyErr_SetFromErrno(socket_error); return NULL; } else { return PyString_FromString(retval); } /* NOTREACHED */ PyErr_SetString(PyExc_RuntimeError, "invalid handling of inet_ntop"); return NULL; } #endif /* HAVE_INET_PTON */ /* Python interface to getaddrinfo(host, port). */ /*ARGSUSED*/ static PyObject * socket_getaddrinfo(PyObject *self, PyObject *args) { struct addrinfo hints, *res; struct addrinfo *res0 = NULL; PyObject *hobj = NULL; PyObject *pobj = (PyObject *)NULL; char pbuf[30]; char *hptr, *pptr; int family, socktype, protocol, flags; int error; PyObject *all = (PyObject *)NULL; PyObject *single = (PyObject *)NULL; PyObject *idna = NULL; family = socktype = protocol = flags = 0; family = AF_UNSPEC; if (!PyArg_ParseTuple(args, "OO|iiii:getaddrinfo", &hobj, &pobj, &family, &socktype, &protocol, &flags)) { return NULL; } if (hobj == Py_None) { hptr = NULL; } else if (PyUnicode_Check(hobj)) { idna = PyObject_CallMethod(hobj, "encode", "s", "idna"); if (!idna) return NULL; hptr = PyString_AsString(idna); } else if (PyString_Check(hobj)) { hptr = PyString_AsString(hobj); } else { PyErr_SetString(PyExc_TypeError, "getaddrinfo() argument 1 must be string or None"); return NULL; } if (PyInt_Check(pobj)) { PyOS_snprintf(pbuf, sizeof(pbuf), "%ld", PyInt_AsLong(pobj)); pptr = pbuf; } else if (PyString_Check(pobj)) { pptr = PyString_AsString(pobj); } else if (pobj == Py_None) { pptr = (char *)NULL; } else { PyErr_SetString(socket_error, "Int or String expected"); goto err; } memset(&hints, 0, sizeof(hints)); hints.ai_family = family; hints.ai_socktype = socktype; hints.ai_protocol = protocol; hints.ai_flags = flags; Py_BEGIN_ALLOW_THREADS ACQUIRE_GETADDRINFO_LOCK error = getaddrinfo(hptr, pptr, &hints, &res0); Py_END_ALLOW_THREADS RELEASE_GETADDRINFO_LOCK /* see comment in setipaddr() */ if (error) { set_gaierror(error); goto err; } if ((all = PyList_New(0)) == NULL) goto err; for (res = res0; res; res = res->ai_next) { PyObject *addr = makesockaddr(-1, res->ai_addr, res->ai_addrlen); if (addr == NULL) goto err; single = Py_BuildValue("iiisO", res->ai_family, res->ai_socktype, res->ai_protocol, res->ai_canonname ? res->ai_canonname : "", addr); Py_DECREF(addr); if (single == NULL) goto err; if (PyList_Append(all, single)) goto err; Py_XDECREF(single); } Py_XDECREF(idna); if (res0) freeaddrinfo(res0); return all; err: Py_XDECREF(single); Py_XDECREF(all); Py_XDECREF(idna); if (res0) freeaddrinfo(res0); return (PyObject *)NULL; } PyDoc_STRVAR(getaddrinfo_doc, "getaddrinfo(host, port [, family, socktype, proto, flags])\n\ -> list of (family, socktype, proto, canonname, sockaddr)\n\ \n\ Resolve host and port into addrinfo struct."); /* Python interface to getnameinfo(sa, flags). */ /*ARGSUSED*/ static PyObject * socket_getnameinfo(PyObject *self, PyObject *args) { PyObject *sa = (PyObject *)NULL; int flags; char *hostp; int port, flowinfo, scope_id; char hbuf[NI_MAXHOST], pbuf[NI_MAXSERV]; struct addrinfo hints, *res = NULL; int error; PyObject *ret = (PyObject *)NULL; flags = flowinfo = scope_id = 0; if (!PyArg_ParseTuple(args, "Oi:getnameinfo", &sa, &flags)) return NULL; if (!PyArg_ParseTuple(sa, "si|ii", &hostp, &port, &flowinfo, &scope_id)) return NULL; PyOS_snprintf(pbuf, sizeof(pbuf), "%d", port); memset(&hints, 0, sizeof(hints)); hints.ai_family = AF_UNSPEC; hints.ai_socktype = SOCK_DGRAM; /* make numeric port happy */ Py_BEGIN_ALLOW_THREADS ACQUIRE_GETADDRINFO_LOCK error = getaddrinfo(hostp, pbuf, &hints, &res); Py_END_ALLOW_THREADS RELEASE_GETADDRINFO_LOCK /* see comment in setipaddr() */ if (error) { set_gaierror(error); goto fail; } if (res->ai_next) { PyErr_SetString(socket_error, "sockaddr resolved to multiple addresses"); goto fail; } switch (res->ai_family) { case AF_INET: { char *t1; int t2; if (PyArg_ParseTuple(sa, "si", &t1, &t2) == 0) { PyErr_SetString(socket_error, "IPv4 sockaddr must be 2 tuple"); goto fail; } break; } #ifdef ENABLE_IPV6 case AF_INET6: { struct sockaddr_in6 *sin6; sin6 = (struct sockaddr_in6 *)res->ai_addr; sin6->sin6_flowinfo = flowinfo; sin6->sin6_scope_id = scope_id; break; } #endif } error = getnameinfo(res->ai_addr, res->ai_addrlen, hbuf, sizeof(hbuf), pbuf, sizeof(pbuf), flags); if (error) { set_gaierror(error); goto fail; } ret = Py_BuildValue("ss", hbuf, pbuf); fail: if (res) freeaddrinfo(res); return ret; } PyDoc_STRVAR(getnameinfo_doc, "getnameinfo(sockaddr, flags) --> (host, port)\n\ \n\ Get host and port for a sockaddr."); /* Python API to getting and setting the default timeout value. */ static PyObject * socket_getdefaulttimeout(PyObject *self) { if (defaulttimeout < 0.0) { Py_INCREF(Py_None); return Py_None; } else return PyFloat_FromDouble(defaulttimeout); } PyDoc_STRVAR(getdefaulttimeout_doc, "getdefaulttimeout() -> timeout\n\ \n\ Returns the default timeout in floating seconds for new socket objects.\n\ A value of None indicates that new socket objects have no timeout.\n\ When the socket module is first imported, the default is None."); static PyObject * socket_setdefaulttimeout(PyObject *self, PyObject *arg) { double timeout; if (arg == Py_None) timeout = -1.0; else { timeout = PyFloat_AsDouble(arg); if (timeout < 0.0) { if (!PyErr_Occurred()) PyErr_SetString(PyExc_ValueError, "Timeout value out of range"); return NULL; } } defaulttimeout = timeout; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(setdefaulttimeout_doc, "setdefaulttimeout(timeout)\n\ \n\ Set the default timeout in floating seconds for new socket objects.\n\ A value of None indicates that new socket objects have no timeout.\n\ When the socket module is first imported, the default is None."); /* List of functions exported by this module. */ static PyMethodDef socket_methods[] = { {"gethostbyname", socket_gethostbyname, METH_VARARGS, gethostbyname_doc}, {"gethostbyname_ex", socket_gethostbyname_ex, METH_VARARGS, ghbn_ex_doc}, {"gethostbyaddr", socket_gethostbyaddr, METH_VARARGS, gethostbyaddr_doc}, {"gethostname", socket_gethostname, METH_VARARGS, gethostname_doc}, {"getservbyname", socket_getservbyname, METH_VARARGS, getservbyname_doc}, {"getprotobyname", socket_getprotobyname, METH_VARARGS,getprotobyname_doc}, #ifndef NO_DUP {"fromfd", socket_fromfd, METH_VARARGS, fromfd_doc}, #endif {"ntohs", socket_ntohs, METH_VARARGS, ntohs_doc}, {"ntohl", socket_ntohl, METH_O, ntohl_doc}, {"htons", socket_htons, METH_VARARGS, htons_doc}, {"htonl", socket_htonl, METH_O, htonl_doc}, {"inet_aton", socket_inet_aton, METH_VARARGS, inet_aton_doc}, {"inet_ntoa", socket_inet_ntoa, METH_VARARGS, inet_ntoa_doc}, #ifdef HAVE_INET_PTON {"inet_pton", socket_inet_pton, METH_VARARGS, inet_pton_doc}, {"inet_ntop", socket_inet_ntop, METH_VARARGS, inet_ntop_doc}, #endif {"getaddrinfo", socket_getaddrinfo, METH_VARARGS, getaddrinfo_doc}, {"getnameinfo", socket_getnameinfo, METH_VARARGS, getnameinfo_doc}, {"getdefaulttimeout", (PyCFunction)socket_getdefaulttimeout, METH_NOARGS, getdefaulttimeout_doc}, {"setdefaulttimeout", socket_setdefaulttimeout, METH_O, setdefaulttimeout_doc}, {NULL, NULL} /* Sentinel */ }; #ifdef RISCOS #define OS_INIT_DEFINED static int os_init(void) { _kernel_swi_regs r; r.r[0] = 0; _kernel_swi(0x43380, &r, &r); taskwindow = r.r[0]; return 1; } #endif /* RISCOS */ #ifdef MS_WINDOWS #define OS_INIT_DEFINED /* Additional initialization and cleanup for Windows */ static void os_cleanup(void) { WSACleanup(); } static int os_init(void) { WSADATA WSAData; int ret; char buf[100]; ret = WSAStartup(0x0101, &WSAData); switch (ret) { case 0: /* No error */ Py_AtExit(os_cleanup); return 1; /* Success */ case WSASYSNOTREADY: PyErr_SetString(PyExc_ImportError, "WSAStartup failed: network not ready"); break; case WSAVERNOTSUPPORTED: case WSAEINVAL: PyErr_SetString( PyExc_ImportError, "WSAStartup failed: requested version not supported"); break; default: PyOS_snprintf(buf, sizeof(buf), "WSAStartup failed: error code %d", ret); PyErr_SetString(PyExc_ImportError, buf); break; } return 0; /* Failure */ } #endif /* MS_WINDOWS */ #ifdef PYOS_OS2 #define OS_INIT_DEFINED /* Additional initialization for OS/2 */ static int os_init(void) { #ifndef PYCC_GCC char reason[64]; int rc = sock_init(); if (rc == 0) { return 1; /* Success */ } PyOS_snprintf(reason, sizeof(reason), "OS/2 TCP/IP Error# %d", sock_errno()); PyErr_SetString(PyExc_ImportError, reason); return 0; /* Failure */ #else /* No need to initialise sockets with GCC/EMX */ return 1; /* Success */ #endif } #endif /* PYOS_OS2 */ #ifndef OS_INIT_DEFINED static int os_init(void) { return 1; /* Success */ } #endif /* C API table - always add new things to the end for binary compatibility. */ static PySocketModule_APIObject PySocketModuleAPI = { &sock_type, }; /* Initialize the _socket module. This module is actually called "_socket", and there's a wrapper "socket.py" which implements some additional functionality. On some platforms (e.g. Windows and OS/2), socket.py also implements a wrapper for the socket type that provides missing functionality such as makefile(), dup() and fromfd(). The import of "_socket" may fail with an ImportError exception if os-specific initialization fails. On Windows, this does WINSOCK initialization. When WINSOCK is initialized succesfully, a call to WSACleanup() is scheduled to be made at exit time. */ PyDoc_STRVAR(socket_doc, "Implementation module for socket operations.\n\ \n\ See the socket module for documentation."); PyMODINIT_FUNC init_socket(void) { PyObject *m, *has_ipv6; if (!os_init()) return; sock_type.ob_type = &PyType_Type; m = Py_InitModule3(PySocket_MODULE_NAME, socket_methods, socket_doc); socket_error = PyErr_NewException("socket.error", NULL, NULL); if (socket_error == NULL) return; Py_INCREF(socket_error); PyModule_AddObject(m, "error", socket_error); socket_herror = PyErr_NewException("socket.herror", socket_error, NULL); if (socket_herror == NULL) return; Py_INCREF(socket_herror); PyModule_AddObject(m, "herror", socket_herror); socket_gaierror = PyErr_NewException("socket.gaierror", socket_error, NULL); if (socket_gaierror == NULL) return; Py_INCREF(socket_gaierror); PyModule_AddObject(m, "gaierror", socket_gaierror); socket_timeout = PyErr_NewException("socket.timeout", socket_error, NULL); if (socket_timeout == NULL) return; Py_INCREF(socket_timeout); PyModule_AddObject(m, "timeout", socket_timeout); Py_INCREF((PyObject *)&sock_type); if (PyModule_AddObject(m, "SocketType", (PyObject *)&sock_type) != 0) return; Py_INCREF((PyObject *)&sock_type); if (PyModule_AddObject(m, "socket", (PyObject *)&sock_type) != 0) return; #ifdef ENABLE_IPV6 has_ipv6 = Py_True; #else has_ipv6 = Py_False; #endif Py_INCREF(has_ipv6); PyModule_AddObject(m, "has_ipv6", has_ipv6); /* Export C API */ if (PyModule_AddObject(m, PySocket_CAPI_NAME, PyCObject_FromVoidPtr((void *)&PySocketModuleAPI, NULL) ) != 0) return; /* Address families (we only support AF_INET and AF_UNIX) */ #ifdef AF_UNSPEC PyModule_AddIntConstant(m, "AF_UNSPEC", AF_UNSPEC); #endif PyModule_AddIntConstant(m, "AF_INET", AF_INET); #ifdef AF_INET6 PyModule_AddIntConstant(m, "AF_INET6", AF_INET6); #endif /* AF_INET6 */ #if defined(AF_UNIX) PyModule_AddIntConstant(m, "AF_UNIX", AF_UNIX); #endif /* AF_UNIX */ #ifdef AF_AX25 /* Amateur Radio AX.25 */ PyModule_AddIntConstant(m, "AF_AX25", AF_AX25); #endif #ifdef AF_IPX PyModule_AddIntConstant(m, "AF_IPX", AF_IPX); /* Novell IPX */ #endif #ifdef AF_APPLETALK /* Appletalk DDP */ PyModule_AddIntConstant(m, "AF_APPLETALK", AF_APPLETALK); #endif #ifdef AF_NETROM /* Amateur radio NetROM */ PyModule_AddIntConstant(m, "AF_NETROM", AF_NETROM); #endif #ifdef AF_BRIDGE /* Multiprotocol bridge */ PyModule_AddIntConstant(m, "AF_BRIDGE", AF_BRIDGE); #endif #ifdef AF_AAL5 /* Reserved for Werner's ATM */ PyModule_AddIntConstant(m, "AF_AAL5", AF_AAL5); #endif #ifdef AF_X25 /* Reserved for X.25 project */ PyModule_AddIntConstant(m, "AF_X25", AF_X25); #endif #ifdef AF_INET6 PyModule_AddIntConstant(m, "AF_INET6", AF_INET6); /* IP version 6 */ #endif #ifdef AF_ROSE /* Amateur Radio X.25 PLP */ PyModule_AddIntConstant(m, "AF_ROSE", AF_ROSE); #endif #ifdef HAVE_NETPACKET_PACKET_H PyModule_AddIntConstant(m, "AF_PACKET", AF_PACKET); PyModule_AddIntConstant(m, "PF_PACKET", PF_PACKET); PyModule_AddIntConstant(m, "PACKET_HOST", PACKET_HOST); PyModule_AddIntConstant(m, "PACKET_BROADCAST", PACKET_BROADCAST); PyModule_AddIntConstant(m, "PACKET_MULTICAST", PACKET_MULTICAST); PyModule_AddIntConstant(m, "PACKET_OTHERHOST", PACKET_OTHERHOST); PyModule_AddIntConstant(m, "PACKET_OUTGOING", PACKET_OUTGOING); PyModule_AddIntConstant(m, "PACKET_LOOPBACK", PACKET_LOOPBACK); PyModule_AddIntConstant(m, "PACKET_FASTROUTE", PACKET_FASTROUTE); #endif /* Socket types */ PyModule_AddIntConstant(m, "SOCK_STREAM", SOCK_STREAM); PyModule_AddIntConstant(m, "SOCK_DGRAM", SOCK_DGRAM); #ifndef __BEOS__ /* We have incomplete socket support. */ PyModule_AddIntConstant(m, "SOCK_RAW", SOCK_RAW); PyModule_AddIntConstant(m, "SOCK_SEQPACKET", SOCK_SEQPACKET); #if defined(SOCK_RDM) PyModule_AddIntConstant(m, "SOCK_RDM", SOCK_RDM); #endif #endif #ifdef SO_DEBUG PyModule_AddIntConstant(m, "SO_DEBUG", SO_DEBUG); #endif #ifdef SO_ACCEPTCONN PyModule_AddIntConstant(m, "SO_ACCEPTCONN", SO_ACCEPTCONN); #endif #ifdef SO_REUSEADDR PyModule_AddIntConstant(m, "SO_REUSEADDR", SO_REUSEADDR); #endif #ifdef SO_KEEPALIVE PyModule_AddIntConstant(m, "SO_KEEPALIVE", SO_KEEPALIVE); #endif #ifdef SO_DONTROUTE PyModule_AddIntConstant(m, "SO_DONTROUTE", SO_DONTROUTE); #endif #ifdef SO_BROADCAST PyModule_AddIntConstant(m, "SO_BROADCAST", SO_BROADCAST); #endif #ifdef SO_USELOOPBACK PyModule_AddIntConstant(m, "SO_USELOOPBACK", SO_USELOOPBACK); #endif #ifdef SO_LINGER PyModule_AddIntConstant(m, "SO_LINGER", SO_LINGER); #endif #ifdef SO_OOBINLINE PyModule_AddIntConstant(m, "SO_OOBINLINE", SO_OOBINLINE); #endif #ifdef SO_REUSEPORT PyModule_AddIntConstant(m, "SO_REUSEPORT", SO_REUSEPORT); #endif #ifdef SO_SNDBUF PyModule_AddIntConstant(m, "SO_SNDBUF", SO_SNDBUF); #endif #ifdef SO_RCVBUF PyModule_AddIntConstant(m, "SO_RCVBUF", SO_RCVBUF); #endif #ifdef SO_SNDLOWAT PyModule_AddIntConstant(m, "SO_SNDLOWAT", SO_SNDLOWAT); #endif #ifdef SO_RCVLOWAT PyModule_AddIntConstant(m, "SO_RCVLOWAT", SO_RCVLOWAT); #endif #ifdef SO_SNDTIMEO PyModule_AddIntConstant(m, "SO_SNDTIMEO", SO_SNDTIMEO); #endif #ifdef SO_RCVTIMEO PyModule_AddIntConstant(m, "SO_RCVTIMEO", SO_RCVTIMEO); #endif #ifdef SO_ERROR PyModule_AddIntConstant(m, "SO_ERROR", SO_ERROR); #endif #ifdef SO_TYPE PyModule_AddIntConstant(m, "SO_TYPE", SO_TYPE); #endif /* Maximum number of connections for "listen" */ #ifdef SOMAXCONN PyModule_AddIntConstant(m, "SOMAXCONN", SOMAXCONN); #else PyModule_AddIntConstant(m, "SOMAXCONN", 5); /* Common value */ #endif /* Flags for send, recv */ #ifdef MSG_OOB PyModule_AddIntConstant(m, "MSG_OOB", MSG_OOB); #endif #ifdef MSG_PEEK PyModule_AddIntConstant(m, "MSG_PEEK", MSG_PEEK); #endif #ifdef MSG_DONTROUTE PyModule_AddIntConstant(m, "MSG_DONTROUTE", MSG_DONTROUTE); #endif #ifdef MSG_DONTWAIT PyModule_AddIntConstant(m, "MSG_DONTWAIT", MSG_DONTWAIT); #endif #ifdef MSG_EOR PyModule_AddIntConstant(m, "MSG_EOR", MSG_EOR); #endif #ifdef MSG_TRUNC PyModule_AddIntConstant(m, "MSG_TRUNC", MSG_TRUNC); #endif #ifdef MSG_CTRUNC PyModule_AddIntConstant(m, "MSG_CTRUNC", MSG_CTRUNC); #endif #ifdef MSG_WAITALL PyModule_AddIntConstant(m, "MSG_WAITALL", MSG_WAITALL); #endif #ifdef MSG_BTAG PyModule_AddIntConstant(m, "MSG_BTAG", MSG_BTAG); #endif #ifdef MSG_ETAG PyModule_AddIntConstant(m, "MSG_ETAG", MSG_ETAG); #endif /* Protocol level and numbers, usable for [gs]etsockopt */ #ifdef SOL_SOCKET PyModule_AddIntConstant(m, "SOL_SOCKET", SOL_SOCKET); #endif #ifdef SOL_IP PyModule_AddIntConstant(m, "SOL_IP", SOL_IP); #else PyModule_AddIntConstant(m, "SOL_IP", 0); #endif #ifdef SOL_IPX PyModule_AddIntConstant(m, "SOL_IPX", SOL_IPX); #endif #ifdef SOL_AX25 PyModule_AddIntConstant(m, "SOL_AX25", SOL_AX25); #endif #ifdef SOL_ATALK PyModule_AddIntConstant(m, "SOL_ATALK", SOL_ATALK); #endif #ifdef SOL_NETROM PyModule_AddIntConstant(m, "SOL_NETROM", SOL_NETROM); #endif #ifdef SOL_ROSE PyModule_AddIntConstant(m, "SOL_ROSE", SOL_ROSE); #endif #ifdef SOL_TCP PyModule_AddIntConstant(m, "SOL_TCP", SOL_TCP); #else PyModule_AddIntConstant(m, "SOL_TCP", 6); #endif #ifdef SOL_UDP PyModule_AddIntConstant(m, "SOL_UDP", SOL_UDP); #else PyModule_AddIntConstant(m, "SOL_UDP", 17); #endif #ifdef IPPROTO_IP PyModule_AddIntConstant(m, "IPPROTO_IP", IPPROTO_IP); #else PyModule_AddIntConstant(m, "IPPROTO_IP", 0); #endif #ifdef IPPROTO_HOPOPTS PyModule_AddIntConstant(m, "IPPROTO_HOPOPTS", IPPROTO_HOPOPTS); #endif #ifdef IPPROTO_ICMP PyModule_AddIntConstant(m, "IPPROTO_ICMP", IPPROTO_ICMP); #else PyModule_AddIntConstant(m, "IPPROTO_ICMP", 1); #endif #ifdef IPPROTO_IGMP PyModule_AddIntConstant(m, "IPPROTO_IGMP", IPPROTO_IGMP); #endif #ifdef IPPROTO_GGP PyModule_AddIntConstant(m, "IPPROTO_GGP", IPPROTO_GGP); #endif #ifdef IPPROTO_IPV4 PyModule_AddIntConstant(m, "IPPROTO_IPV4", IPPROTO_IPV4); #endif #ifdef IPPROTO_IPV6 PyModule_AddIntConstant(m, "IPPROTO_IPV6", IPPROTO_IPV6); #endif #ifdef IPPROTO_IPIP PyModule_AddIntConstant(m, "IPPROTO_IPIP", IPPROTO_IPIP); #endif #ifdef IPPROTO_TCP PyModule_AddIntConstant(m, "IPPROTO_TCP", IPPROTO_TCP); #else PyModule_AddIntConstant(m, "IPPROTO_TCP", 6); #endif #ifdef IPPROTO_EGP PyModule_AddIntConstant(m, "IPPROTO_EGP", IPPROTO_EGP); #endif #ifdef IPPROTO_PUP PyModule_AddIntConstant(m, "IPPROTO_PUP", IPPROTO_PUP); #endif #ifdef IPPROTO_UDP PyModule_AddIntConstant(m, "IPPROTO_UDP", IPPROTO_UDP); #else PyModule_AddIntConstant(m, "IPPROTO_UDP", 17); #endif #ifdef IPPROTO_IDP PyModule_AddIntConstant(m, "IPPROTO_IDP", IPPROTO_IDP); #endif #ifdef IPPROTO_HELLO PyModule_AddIntConstant(m, "IPPROTO_HELLO", IPPROTO_HELLO); #endif #ifdef IPPROTO_ND PyModule_AddIntConstant(m, "IPPROTO_ND", IPPROTO_ND); #endif #ifdef IPPROTO_TP PyModule_AddIntConstant(m, "IPPROTO_TP", IPPROTO_TP); #endif #ifdef IPPROTO_IPV6 PyModule_AddIntConstant(m, "IPPROTO_IPV6", IPPROTO_IPV6); #endif #ifdef IPPROTO_ROUTING PyModule_AddIntConstant(m, "IPPROTO_ROUTING", IPPROTO_ROUTING); #endif #ifdef IPPROTO_FRAGMENT PyModule_AddIntConstant(m, "IPPROTO_FRAGMENT", IPPROTO_FRAGMENT); #endif #ifdef IPPROTO_RSVP PyModule_AddIntConstant(m, "IPPROTO_RSVP", IPPROTO_RSVP); #endif #ifdef IPPROTO_GRE PyModule_AddIntConstant(m, "IPPROTO_GRE", IPPROTO_GRE); #endif #ifdef IPPROTO_ESP PyModule_AddIntConstant(m, "IPPROTO_ESP", IPPROTO_ESP); #endif #ifdef IPPROTO_AH PyModule_AddIntConstant(m, "IPPROTO_AH", IPPROTO_AH); #endif #ifdef IPPROTO_MOBILE PyModule_AddIntConstant(m, "IPPROTO_MOBILE", IPPROTO_MOBILE); #endif #ifdef IPPROTO_ICMPV6 PyModule_AddIntConstant(m, "IPPROTO_ICMPV6", IPPROTO_ICMPV6); #endif #ifdef IPPROTO_NONE PyModule_AddIntConstant(m, "IPPROTO_NONE", IPPROTO_NONE); #endif #ifdef IPPROTO_DSTOPTS PyModule_AddIntConstant(m, "IPPROTO_DSTOPTS", IPPROTO_DSTOPTS); #endif #ifdef IPPROTO_XTP PyModule_AddIntConstant(m, "IPPROTO_XTP", IPPROTO_XTP); #endif #ifdef IPPROTO_EON PyModule_AddIntConstant(m, "IPPROTO_EON", IPPROTO_EON); #endif #ifdef IPPROTO_PIM PyModule_AddIntConstant(m, "IPPROTO_PIM", IPPROTO_PIM); #endif #ifdef IPPROTO_IPCOMP PyModule_AddIntConstant(m, "IPPROTO_IPCOMP", IPPROTO_IPCOMP); #endif #ifdef IPPROTO_VRRP PyModule_AddIntConstant(m, "IPPROTO_VRRP", IPPROTO_VRRP); #endif #ifdef IPPROTO_BIP PyModule_AddIntConstant(m, "IPPROTO_BIP", IPPROTO_BIP); #endif /**/ #ifdef IPPROTO_RAW PyModule_AddIntConstant(m, "IPPROTO_RAW", IPPROTO_RAW); #else PyModule_AddIntConstant(m, "IPPROTO_RAW", 255); #endif #ifdef IPPROTO_MAX PyModule_AddIntConstant(m, "IPPROTO_MAX", IPPROTO_MAX); #endif /* Some port configuration */ #ifdef IPPORT_RESERVED PyModule_AddIntConstant(m, "IPPORT_RESERVED", IPPORT_RESERVED); #else PyModule_AddIntConstant(m, "IPPORT_RESERVED", 1024); #endif #ifdef IPPORT_USERRESERVED PyModule_AddIntConstant(m, "IPPORT_USERRESERVED", IPPORT_USERRESERVED); #else PyModule_AddIntConstant(m, "IPPORT_USERRESERVED", 5000); #endif /* Some reserved IP v.4 addresses */ #ifdef INADDR_ANY PyModule_AddIntConstant(m, "INADDR_ANY", INADDR_ANY); #else PyModule_AddIntConstant(m, "INADDR_ANY", 0x00000000); #endif #ifdef INADDR_BROADCAST PyModule_AddIntConstant(m, "INADDR_BROADCAST", INADDR_BROADCAST); #else PyModule_AddIntConstant(m, "INADDR_BROADCAST", 0xffffffff); #endif #ifdef INADDR_LOOPBACK PyModule_AddIntConstant(m, "INADDR_LOOPBACK", INADDR_LOOPBACK); #else PyModule_AddIntConstant(m, "INADDR_LOOPBACK", 0x7F000001); #endif #ifdef INADDR_UNSPEC_GROUP PyModule_AddIntConstant(m, "INADDR_UNSPEC_GROUP", INADDR_UNSPEC_GROUP); #else PyModule_AddIntConstant(m, "INADDR_UNSPEC_GROUP", 0xe0000000); #endif #ifdef INADDR_ALLHOSTS_GROUP PyModule_AddIntConstant(m, "INADDR_ALLHOSTS_GROUP", INADDR_ALLHOSTS_GROUP); #else PyModule_AddIntConstant(m, "INADDR_ALLHOSTS_GROUP", 0xe0000001); #endif #ifdef INADDR_MAX_LOCAL_GROUP PyModule_AddIntConstant(m, "INADDR_MAX_LOCAL_GROUP", INADDR_MAX_LOCAL_GROUP); #else PyModule_AddIntConstant(m, "INADDR_MAX_LOCAL_GROUP", 0xe00000ff); #endif #ifdef INADDR_NONE PyModule_AddIntConstant(m, "INADDR_NONE", INADDR_NONE); #else PyModule_AddIntConstant(m, "INADDR_NONE", 0xffffffff); #endif /* IPv4 [gs]etsockopt options */ #ifdef IP_OPTIONS PyModule_AddIntConstant(m, "IP_OPTIONS", IP_OPTIONS); #endif #ifdef IP_HDRINCL PyModule_AddIntConstant(m, "IP_HDRINCL", IP_HDRINCL); #endif #ifdef IP_TOS PyModule_AddIntConstant(m, "IP_TOS", IP_TOS); #endif #ifdef IP_TTL PyModule_AddIntConstant(m, "IP_TTL", IP_TTL); #endif #ifdef IP_RECVOPTS PyModule_AddIntConstant(m, "IP_RECVOPTS", IP_RECVOPTS); #endif #ifdef IP_RECVRETOPTS PyModule_AddIntConstant(m, "IP_RECVRETOPTS", IP_RECVRETOPTS); #endif #ifdef IP_RECVDSTADDR PyModule_AddIntConstant(m, "IP_RECVDSTADDR", IP_RECVDSTADDR); #endif #ifdef IP_RETOPTS PyModule_AddIntConstant(m, "IP_RETOPTS", IP_RETOPTS); #endif #ifdef IP_MULTICAST_IF PyModule_AddIntConstant(m, "IP_MULTICAST_IF", IP_MULTICAST_IF); #endif #ifdef IP_MULTICAST_TTL PyModule_AddIntConstant(m, "IP_MULTICAST_TTL", IP_MULTICAST_TTL); #endif #ifdef IP_MULTICAST_LOOP PyModule_AddIntConstant(m, "IP_MULTICAST_LOOP", IP_MULTICAST_LOOP); #endif #ifdef IP_ADD_MEMBERSHIP PyModule_AddIntConstant(m, "IP_ADD_MEMBERSHIP", IP_ADD_MEMBERSHIP); #endif #ifdef IP_DROP_MEMBERSHIP PyModule_AddIntConstant(m, "IP_DROP_MEMBERSHIP", IP_DROP_MEMBERSHIP); #endif #ifdef IP_DEFAULT_MULTICAST_TTL PyModule_AddIntConstant(m, "IP_DEFAULT_MULTICAST_TTL", IP_DEFAULT_MULTICAST_TTL); #endif #ifdef IP_DEFAULT_MULTICAST_LOOP PyModule_AddIntConstant(m, "IP_DEFAULT_MULTICAST_LOOP", IP_DEFAULT_MULTICAST_LOOP); #endif #ifdef IP_MAX_MEMBERSHIPS PyModule_AddIntConstant(m, "IP_MAX_MEMBERSHIPS", IP_MAX_MEMBERSHIPS); #endif /* IPv6 [gs]etsockopt options, defined in RFC2553 */ #ifdef IPV6_JOIN_GROUP PyModule_AddIntConstant(m, "IPV6_JOIN_GROUP", IPV6_JOIN_GROUP); #endif #ifdef IPV6_LEAVE_GROUP PyModule_AddIntConstant(m, "IPV6_LEAVE_GROUP", IPV6_LEAVE_GROUP); #endif #ifdef IPV6_MULTICAST_HOPS PyModule_AddIntConstant(m, "IPV6_MULTICAST_HOPS", IPV6_MULTICAST_HOPS); #endif #ifdef IPV6_MULTICAST_IF PyModule_AddIntConstant(m, "IPV6_MULTICAST_IF", IPV6_MULTICAST_IF); #endif #ifdef IPV6_MULTICAST_LOOP PyModule_AddIntConstant(m, "IPV6_MULTICAST_LOOP", IPV6_MULTICAST_LOOP); #endif #ifdef IPV6_UNICAST_HOPS PyModule_AddIntConstant(m, "IPV6_UNICAST_HOPS", IPV6_UNICAST_HOPS); #endif /* TCP options */ #ifdef TCP_NODELAY PyModule_AddIntConstant(m, "TCP_NODELAY", TCP_NODELAY); #endif #ifdef TCP_MAXSEG PyModule_AddIntConstant(m, "TCP_MAXSEG", TCP_MAXSEG); #endif #ifdef TCP_CORK PyModule_AddIntConstant(m, "TCP_CORK", TCP_CORK); #endif #ifdef TCP_KEEPIDLE PyModule_AddIntConstant(m, "TCP_KEEPIDLE", TCP_KEEPIDLE); #endif #ifdef TCP_KEEPINTVL PyModule_AddIntConstant(m, "TCP_KEEPINTVL", TCP_KEEPINTVL); #endif #ifdef TCP_KEEPCNT PyModule_AddIntConstant(m, "TCP_KEEPCNT", TCP_KEEPCNT); #endif #ifdef TCP_SYNCNT PyModule_AddIntConstant(m, "TCP_SYNCNT", TCP_SYNCNT); #endif #ifdef TCP_LINGER2 PyModule_AddIntConstant(m, "TCP_LINGER2", TCP_LINGER2); #endif #ifdef TCP_DEFER_ACCEPT PyModule_AddIntConstant(m, "TCP_DEFER_ACCEPT", TCP_DEFER_ACCEPT); #endif #ifdef TCP_WINDOW_CLAMP PyModule_AddIntConstant(m, "TCP_WINDOW_CLAMP", TCP_WINDOW_CLAMP); #endif #ifdef TCP_INFO PyModule_AddIntConstant(m, "TCP_INFO", TCP_INFO); #endif #ifdef TCP_QUICKACK PyModule_AddIntConstant(m, "TCP_QUICKACK", TCP_QUICKACK); #endif /* IPX options */ #ifdef IPX_TYPE PyModule_AddIntConstant(m, "IPX_TYPE", IPX_TYPE); #endif /* get{addr,name}info parameters */ #ifdef EAI_ADDRFAMILY PyModule_AddIntConstant(m, "EAI_ADDRFAMILY", EAI_ADDRFAMILY); #endif #ifdef EAI_AGAIN PyModule_AddIntConstant(m, "EAI_AGAIN", EAI_AGAIN); #endif #ifdef EAI_BADFLAGS PyModule_AddIntConstant(m, "EAI_BADFLAGS", EAI_BADFLAGS); #endif #ifdef EAI_FAIL PyModule_AddIntConstant(m, "EAI_FAIL", EAI_FAIL); #endif #ifdef EAI_FAMILY PyModule_AddIntConstant(m, "EAI_FAMILY", EAI_FAMILY); #endif #ifdef EAI_MEMORY PyModule_AddIntConstant(m, "EAI_MEMORY", EAI_MEMORY); #endif #ifdef EAI_NODATA PyModule_AddIntConstant(m, "EAI_NODATA", EAI_NODATA); #endif #ifdef EAI_NONAME PyModule_AddIntConstant(m, "EAI_NONAME", EAI_NONAME); #endif #ifdef EAI_SERVICE PyModule_AddIntConstant(m, "EAI_SERVICE", EAI_SERVICE); #endif #ifdef EAI_SOCKTYPE PyModule_AddIntConstant(m, "EAI_SOCKTYPE", EAI_SOCKTYPE); #endif #ifdef EAI_SYSTEM PyModule_AddIntConstant(m, "EAI_SYSTEM", EAI_SYSTEM); #endif #ifdef EAI_BADHINTS PyModule_AddIntConstant(m, "EAI_BADHINTS", EAI_BADHINTS); #endif #ifdef EAI_PROTOCOL PyModule_AddIntConstant(m, "EAI_PROTOCOL", EAI_PROTOCOL); #endif #ifdef EAI_MAX PyModule_AddIntConstant(m, "EAI_MAX", EAI_MAX); #endif #ifdef AI_PASSIVE PyModule_AddIntConstant(m, "AI_PASSIVE", AI_PASSIVE); #endif #ifdef AI_CANONNAME PyModule_AddIntConstant(m, "AI_CANONNAME", AI_CANONNAME); #endif #ifdef AI_NUMERICHOST PyModule_AddIntConstant(m, "AI_NUMERICHOST", AI_NUMERICHOST); #endif #ifdef AI_MASK PyModule_AddIntConstant(m, "AI_MASK", AI_MASK); #endif #ifdef AI_ALL PyModule_AddIntConstant(m, "AI_ALL", AI_ALL); #endif #ifdef AI_V4MAPPED_CFG PyModule_AddIntConstant(m, "AI_V4MAPPED_CFG", AI_V4MAPPED_CFG); #endif #ifdef AI_ADDRCONFIG PyModule_AddIntConstant(m, "AI_ADDRCONFIG", AI_ADDRCONFIG); #endif #ifdef AI_V4MAPPED PyModule_AddIntConstant(m, "AI_V4MAPPED", AI_V4MAPPED); #endif #ifdef AI_DEFAULT PyModule_AddIntConstant(m, "AI_DEFAULT", AI_DEFAULT); #endif #ifdef NI_MAXHOST PyModule_AddIntConstant(m, "NI_MAXHOST", NI_MAXHOST); #endif #ifdef NI_MAXSERV PyModule_AddIntConstant(m, "NI_MAXSERV", NI_MAXSERV); #endif #ifdef NI_NOFQDN PyModule_AddIntConstant(m, "NI_NOFQDN", NI_NOFQDN); #endif #ifdef NI_NUMERICHOST PyModule_AddIntConstant(m, "NI_NUMERICHOST", NI_NUMERICHOST); #endif #ifdef NI_NAMEREQD PyModule_AddIntConstant(m, "NI_NAMEREQD", NI_NAMEREQD); #endif #ifdef NI_NUMERICSERV PyModule_AddIntConstant(m, "NI_NUMERICSERV", NI_NUMERICSERV); #endif #ifdef NI_DGRAM PyModule_AddIntConstant(m, "NI_DGRAM", NI_DGRAM); #endif /* Initialize gethostbyname lock */ #if defined(USE_GETHOSTBYNAME_LOCK) || defined(USE_GETADDRINFO_LOCK) netdb_lock = PyThread_allocate_lock(); #endif } #ifndef HAVE_INET_PTON /* Simplistic emulation code for inet_pton that only works for IPv4 */ /* These are not exposed because they do not set errno properly */ int inet_pton(int af, const char *src, void *dst) { if (af == AF_INET) { long packed_addr; packed_addr = inet_addr(src); if (packed_addr == INADDR_NONE) return 0; memcpy(dst, &packed_addr, 4); return 1; } /* Should set errno to EAFNOSUPPORT */ return -1; } const char * inet_ntop(int af, const void *src, char *dst, socklen_t size) { if (af == AF_INET) { struct in_addr packed_addr; if (size < 16) /* Should set errno to ENOSPC. */ return NULL; memcpy(&packed_addr, src, sizeof(packed_addr)); return strncpy(dst, inet_ntoa(packed_addr), size); } /* Should set errno to EAFNOSUPPORT */ return NULL; } #endif Python-2.3.7/Modules/almodule.c0000644001241000117560000023714207641663136015653 0ustar loewishpifb6 #define OLD_INTERFACE /* define for pre-Irix 6 interface */ #include "Python.h" #include "stringobject.h" #include #include #ifndef AL_NO_ELEM #ifndef OLD_INTERFACE #define OLD_INTERFACE #endif /* OLD_INTERFACE */ #endif /* AL_NO_ELEM */ static PyObject *ErrorObject; /* ----------------------------------------------------- */ /* Declarations for objects of type port */ typedef struct { PyObject_HEAD /* XXXX Add your own stuff here */ ALport port; } alpobject; static PyTypeObject Alptype; /* ---------------------------------------------------------------- */ /* Declarations for objects of type config */ typedef struct { PyObject_HEAD /* XXXX Add your own stuff here */ ALconfig config; } alcobject; static PyTypeObject Alctype; static void ErrorHandler(long code, const char *fmt, ...) { va_list args; char buf[128]; va_start(args, fmt); vsprintf(buf, fmt, args); va_end(args); PyErr_SetString(ErrorObject, buf); } #ifdef AL_NO_ELEM /* IRIX 6 */ static PyObject * param2python(int resource, int param, ALvalue value, ALparamInfo *pinfo) { ALparamInfo info; if (pinfo == NULL) { pinfo = &info; if (alGetParamInfo(resource, param, &info) < 0) return NULL; } switch (pinfo->elementType) { case AL_PTR_ELEM: /* XXXX don't know how to handle this */ case AL_NO_ELEM: Py_INCREF(Py_None); return Py_None; case AL_INT32_ELEM: case AL_RESOURCE_ELEM: case AL_ENUM_ELEM: return PyInt_FromLong((long) value.i); case AL_INT64_ELEM: return PyLong_FromLongLong(value.ll); case AL_FIXED_ELEM: return PyFloat_FromDouble(alFixedToDouble(value.ll)); case AL_CHAR_ELEM: if (value.ptr == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString((char *) value.ptr); default: PyErr_SetString(ErrorObject, "unknown element type"); return NULL; } } static int python2elem(PyObject *item, void *ptr, int elementType) { switch (elementType) { case AL_INT32_ELEM: case AL_RESOURCE_ELEM: case AL_ENUM_ELEM: if (!PyInt_Check(item)) { PyErr_BadArgument(); return -1; } *((int *) ptr) = PyInt_AsLong(item); break; case AL_INT64_ELEM: if (PyInt_Check(item)) *((long long *) ptr) = PyInt_AsLong(item); else if (PyLong_Check(item)) *((long long *) ptr) = PyLong_AsLongLong(item); else { PyErr_BadArgument(); return -1; } break; case AL_FIXED_ELEM: if (PyInt_Check(item)) *((long long *) ptr) = alDoubleToFixed((double) PyInt_AsLong(item)); else if (PyFloat_Check(item)) *((long long *) ptr) = alDoubleToFixed(PyFloat_AsDouble(item)); else { PyErr_BadArgument(); return -1; } break; default: PyErr_SetString(ErrorObject, "unknown element type"); return -1; } return 0; } static int python2param(int resource, ALpv *param, PyObject *value, ALparamInfo *pinfo) { ALparamInfo info; int i, stepsize; PyObject *item; if (pinfo == NULL) { pinfo = &info; if (alGetParamInfo(resource, param->param, &info) < 0) return -1; } switch (pinfo->valueType) { case AL_STRING_VAL: if (pinfo->elementType != AL_CHAR_ELEM) { PyErr_SetString(ErrorObject, "unknown element type"); return -1; } if (!PyString_Check(value)) { PyErr_BadArgument(); return -1; } param->value.ptr = PyString_AS_STRING(value); param->sizeIn = PyString_GET_SIZE(value)+1; /*account for NUL*/ break; case AL_SET_VAL: case AL_VECTOR_VAL: if (!PyList_Check(value) && !PyTuple_Check(value)) { PyErr_BadArgument(); return -1; } switch (pinfo->elementType) { case AL_INT32_ELEM: case AL_RESOURCE_ELEM: case AL_ENUM_ELEM: param->sizeIn = PySequence_Size(value); param->value.ptr = PyMem_NEW(int, param->sizeIn); stepsize = sizeof(int); break; case AL_INT64_ELEM: case AL_FIXED_ELEM: param->sizeIn = PySequence_Size(value); param->value.ptr = PyMem_NEW(long long, param->sizeIn); stepsize = sizeof(long long); break; } for (i = 0; i < param->sizeIn; i++) { item = PySequence_GetItem(value, i); if (python2elem(item, (void *) ((char *) param->value.ptr + i*stepsize), pinfo->elementType) < 0) { PyMem_DEL(param->value.ptr); return -1; } } break; case AL_SCALAR_VAL: switch (pinfo->elementType) { case AL_INT32_ELEM: case AL_RESOURCE_ELEM: case AL_ENUM_ELEM: return python2elem(value, (void *) ¶m->value.i, pinfo->elementType); case AL_INT64_ELEM: case AL_FIXED_ELEM: return python2elem(value, (void *) ¶m->value.ll, pinfo->elementType); default: PyErr_SetString(ErrorObject, "unknown element type"); return -1; } } return 0; } static int python2params(int resource1, int resource2, PyObject *list, ALpv **pvsp, ALparamInfo **pinfop) { PyObject *item; ALpv *pvs; ALparamInfo *pinfo; int npvs, i; npvs = PyList_Size(list); pvs = PyMem_NEW(ALpv, npvs); pinfo = PyMem_NEW(ALparamInfo, npvs); for (i = 0; i < npvs; i++) { item = PyList_GetItem(list, i); if (!PyArg_ParseTuple(item, "iO", &pvs[i].param, &item)) goto error; if (alGetParamInfo(resource1, pvs[i].param, &pinfo[i]) < 0 && alGetParamInfo(resource2, pvs[i].param, &pinfo[i]) < 0) goto error; if (python2param(resource1, &pvs[i], item, &pinfo[i]) < 0) goto error; } *pvsp = pvs; *pinfop = pinfo; return npvs; error: /* XXXX we should clean up everything */ if (pvs) PyMem_DEL(pvs); if (pinfo) PyMem_DEL(pinfo); return -1; } /* -------------------------------------------------------- */ static PyObject * SetConfig(alcobject *self, PyObject *args, int (*func)(ALconfig, int)) { int par; if (!PyArg_ParseTuple(args, "i:SetConfig", &par)) return NULL; if ((*func)(self->config, par) == -1) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * GetConfig(alcobject *self, PyObject *args, int (*func)(ALconfig)) { int par; if (!PyArg_ParseTuple(args, ":GetConfig")) return NULL; if ((par = (*func)(self->config)) == -1) return NULL; return PyInt_FromLong((long) par); } PyDoc_STRVAR(alc_SetWidth__doc__, "alSetWidth: set the wordsize for integer audio data."); static PyObject * alc_SetWidth(alcobject *self, PyObject *args) { return SetConfig(self, args, alSetWidth); } PyDoc_STRVAR(alc_GetWidth__doc__, "alGetWidth: get the wordsize for integer audio data."); static PyObject * alc_GetWidth(alcobject *self, PyObject *args) { return GetConfig(self, args, alGetWidth); } PyDoc_STRVAR(alc_SetSampFmt__doc__, "alSetSampFmt: set the sample format setting in an audio ALconfig " "structure."); static PyObject * alc_SetSampFmt(alcobject *self, PyObject *args) { return SetConfig(self, args, alSetSampFmt); } PyDoc_STRVAR(alc_GetSampFmt__doc__, "alGetSampFmt: get the sample format setting in an audio ALconfig " "structure."); static PyObject * alc_GetSampFmt(alcobject *self, PyObject *args) { return GetConfig(self, args, alGetSampFmt); } PyDoc_STRVAR(alc_SetChannels__doc__, "alSetChannels: set the channel settings in an audio ALconfig."); static PyObject * alc_SetChannels(alcobject *self, PyObject *args) { return SetConfig(self, args, alSetChannels); } PyDoc_STRVAR(alc_GetChannels__doc__, "alGetChannels: get the channel settings in an audio ALconfig."); static PyObject * alc_GetChannels(alcobject *self, PyObject *args) { return GetConfig(self, args, alGetChannels); } PyDoc_STRVAR(alc_SetFloatMax__doc__, "alSetFloatMax: set the maximum value of floating point sample data."); static PyObject * alc_SetFloatMax(alcobject *self, PyObject *args) { double maximum_value; if (!PyArg_ParseTuple(args, "d:SetFloatMax", &maximum_value)) return NULL; if (alSetFloatMax(self->config, maximum_value) < 0) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(alc_GetFloatMax__doc__, "alGetFloatMax: get the maximum value of floating point sample data."); static PyObject * alc_GetFloatMax(alcobject *self, PyObject *args) { double maximum_value; if (!PyArg_ParseTuple(args, ":GetFloatMax")) return NULL; if ((maximum_value = alGetFloatMax(self->config)) == 0) return NULL; return PyFloat_FromDouble(maximum_value); } PyDoc_STRVAR(alc_SetDevice__doc__, "alSetDevice: set the device setting in an audio ALconfig structure."); static PyObject * alc_SetDevice(alcobject *self, PyObject *args) { return SetConfig(self, args, alSetDevice); } PyDoc_STRVAR(alc_GetDevice__doc__, "alGetDevice: get the device setting in an audio ALconfig structure."); static PyObject * alc_GetDevice(alcobject *self, PyObject *args) { return GetConfig(self, args, alGetDevice); } PyDoc_STRVAR(alc_SetQueueSize__doc__, "alSetQueueSize: set audio port buffer size."); static PyObject * alc_SetQueueSize(alcobject *self, PyObject *args) { return SetConfig(self, args, alSetQueueSize); } PyDoc_STRVAR(alc_GetQueueSize__doc__, "alGetQueueSize: get audio port buffer size."); static PyObject * alc_GetQueueSize(alcobject *self, PyObject *args) { return GetConfig(self, args, alGetQueueSize); } #endif /* AL_NO_ELEM */ static PyObject * setconfig(alcobject *self, PyObject *args, int (*func)(ALconfig, long)) { long par; if (!PyArg_ParseTuple(args, "l:SetConfig", &par)) return NULL; if ((*func)(self->config, par) == -1) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * getconfig(alcobject *self, PyObject *args, long (*func)(ALconfig)) { long par; if (!PyArg_ParseTuple(args, ":GetConfig")) return NULL; if ((par = (*func)(self->config)) == -1) return NULL; return PyInt_FromLong((long) par); } static PyObject * alc_setqueuesize (alcobject *self, PyObject *args) { return setconfig(self, args, ALsetqueuesize); } static PyObject * alc_getqueuesize (alcobject *self, PyObject *args) { return getconfig(self, args, ALgetqueuesize); } static PyObject * alc_setwidth (alcobject *self, PyObject *args) { return setconfig(self, args, ALsetwidth); } static PyObject * alc_getwidth (alcobject *self, PyObject *args) { return getconfig(self, args, ALgetwidth); } static PyObject * alc_getchannels (alcobject *self, PyObject *args) { return getconfig(self, args, ALgetchannels); } static PyObject * alc_setchannels (alcobject *self, PyObject *args) { return setconfig(self, args, ALsetchannels); } #ifdef AL_405 static PyObject * alc_getsampfmt (alcobject *self, PyObject *args) { return getconfig(self, args, ALgetsampfmt); } static PyObject * alc_setsampfmt (alcobject *self, PyObject *args) { return setconfig(self, args, ALsetsampfmt); } static PyObject * alc_getfloatmax(alcobject *self, PyObject *args) { double arg; if (!PyArg_ParseTuple(args, ":GetFloatMax")) return 0; if ((arg = ALgetfloatmax(self->config)) == 0) return NULL; return PyFloat_FromDouble(arg); } static PyObject * alc_setfloatmax(alcobject *self, PyObject *args) { double arg; if (!PyArg_ParseTuple(args, "d:SetFloatMax", &arg)) return 0; if (ALsetfloatmax(self->config, arg) == -1) return NULL; Py_INCREF(Py_None); return Py_None; } #endif /* AL_405 */ static struct PyMethodDef alc_methods[] = { #ifdef AL_NO_ELEM /* IRIX 6 */ {"SetWidth", (PyCFunction)alc_SetWidth, METH_VARARGS, alc_SetWidth__doc__}, {"GetWidth", (PyCFunction)alc_GetWidth, METH_VARARGS, alc_GetWidth__doc__}, {"SetSampFmt", (PyCFunction)alc_SetSampFmt, METH_VARARGS, alc_SetSampFmt__doc__}, {"GetSampFmt", (PyCFunction)alc_GetSampFmt, METH_VARARGS, alc_GetSampFmt__doc__}, {"SetChannels", (PyCFunction)alc_SetChannels, METH_VARARGS, alc_SetChannels__doc__}, {"GetChannels", (PyCFunction)alc_GetChannels, METH_VARARGS, alc_GetChannels__doc__}, {"SetFloatMax", (PyCFunction)alc_SetFloatMax, METH_VARARGS, alc_SetFloatMax__doc__}, {"GetFloatMax", (PyCFunction)alc_GetFloatMax, METH_VARARGS, alc_GetFloatMax__doc__}, {"SetDevice", (PyCFunction)alc_SetDevice, METH_VARARGS, alc_SetDevice__doc__}, {"GetDevice", (PyCFunction)alc_GetDevice, METH_VARARGS, alc_GetDevice__doc__}, {"SetQueueSize", (PyCFunction)alc_SetQueueSize, METH_VARARGS, alc_SetQueueSize__doc__}, {"GetQueueSize", (PyCFunction)alc_GetQueueSize, METH_VARARGS, alc_GetQueueSize__doc__}, #endif /* AL_NO_ELEM */ {"getqueuesize", (PyCFunction)alc_getqueuesize, METH_VARARGS}, {"setqueuesize", (PyCFunction)alc_setqueuesize, METH_VARARGS}, {"getwidth", (PyCFunction)alc_getwidth, METH_VARARGS}, {"setwidth", (PyCFunction)alc_setwidth, METH_VARARGS}, {"getchannels", (PyCFunction)alc_getchannels, METH_VARARGS}, {"setchannels", (PyCFunction)alc_setchannels, METH_VARARGS}, #ifdef AL_405 {"getsampfmt", (PyCFunction)alc_getsampfmt, METH_VARARGS}, {"setsampfmt", (PyCFunction)alc_setsampfmt, METH_VARARGS}, {"getfloatmax", (PyCFunction)alc_getfloatmax, METH_VARARGS}, {"setfloatmax", (PyCFunction)alc_setfloatmax, METH_VARARGS}, #endif /* AL_405 */ {NULL, NULL} /* sentinel */ }; /* ---------- */ static PyObject * newalcobject(ALconfig config) { alcobject *self; self = PyObject_New(alcobject, &Alctype); if (self == NULL) return NULL; /* XXXX Add your own initializers here */ self->config = config; return (PyObject *) self; } static void alc_dealloc(alcobject *self) { /* XXXX Add your own cleanup code here */ #ifdef AL_NO_ELEM /* IRIX 6 */ (void) alFreeConfig(self->config); /* ignore errors */ #else (void) ALfreeconfig(self->config); /* ignore errors */ #endif PyObject_Del(self); } static PyObject * alc_getattr(alcobject *self, char *name) { /* XXXX Add your own getattr code here */ return Py_FindMethod(alc_methods, (PyObject *)self, name); } PyDoc_STRVAR(Alctype__doc__, ""); static PyTypeObject Alctype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "al.config", /*tp_name*/ sizeof(alcobject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)alc_dealloc, /*tp_dealloc*/ (printfunc)0, /*tp_print*/ (getattrfunc)alc_getattr, /*tp_getattr*/ (setattrfunc)0, /*tp_setattr*/ (cmpfunc)0, /*tp_compare*/ (reprfunc)0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ (hashfunc)0, /*tp_hash*/ (ternaryfunc)0, /*tp_call*/ (reprfunc)0, /*tp_str*/ /* Space for future expansion */ 0L,0L,0L,0L, Alctype__doc__ /* Documentation string */ }; /* End of code for config objects */ /* ---------------------------------------------------------------- */ #ifdef AL_NO_ELEM /* IRIX 6 */ PyDoc_STRVAR(alp_SetConfig__doc__, "alSetConfig: set the ALconfig of an audio ALport."); static PyObject * alp_SetConfig(alpobject *self, PyObject *args) { alcobject *config; if (!PyArg_ParseTuple(args, "O!:SetConfig", &Alctype, &config)) return NULL; if (alSetConfig(self->port, config->config) < 0) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(alp_GetConfig__doc__, "alGetConfig: get the ALconfig of an audio ALport."); static PyObject * alp_GetConfig(alpobject *self, PyObject *args) { ALconfig config; if (!PyArg_ParseTuple(args, ":GetConfig")) return NULL; if ((config = alGetConfig(self->port)) == NULL) return NULL; return newalcobject(config); } PyDoc_STRVAR(alp_GetResource__doc__, "alGetResource: get the resource associated with an audio port."); static PyObject * alp_GetResource(alpobject *self, PyObject *args) { int resource; if (!PyArg_ParseTuple(args, ":GetResource")) return NULL; if ((resource = alGetResource(self->port)) == 0) return NULL; return PyInt_FromLong((long) resource); } PyDoc_STRVAR(alp_GetFD__doc__, "alGetFD: get the file descriptor for an audio port."); static PyObject * alp_GetFD(alpobject *self, PyObject *args) { int fd; if (!PyArg_ParseTuple(args, ":GetFD")) return NULL; if ((fd = alGetFD(self->port)) < 0) return NULL; return PyInt_FromLong((long) fd); } PyDoc_STRVAR(alp_GetFilled__doc__, "alGetFilled: return the number of filled sample frames in " "an audio port."); static PyObject * alp_GetFilled(alpobject *self, PyObject *args) { int filled; if (!PyArg_ParseTuple(args, ":GetFilled")) return NULL; if ((filled = alGetFilled(self->port)) < 0) return NULL; return PyInt_FromLong((long) filled); } PyDoc_STRVAR(alp_GetFillable__doc__, "alGetFillable: report the number of unfilled sample frames " "in an audio port."); static PyObject * alp_GetFillable(alpobject *self, PyObject *args) { int fillable; if (!PyArg_ParseTuple(args, ":GetFillable")) return NULL; if ((fillable = alGetFillable(self->port)) < 0) return NULL; return PyInt_FromLong((long) fillable); } PyDoc_STRVAR(alp_ReadFrames__doc__, "alReadFrames: read sample frames from an audio port."); static PyObject * alp_ReadFrames(alpobject *self, PyObject *args) { int framecount; PyObject *v; int size; int ch; ALconfig c; if (!PyArg_ParseTuple(args, "i:ReadFrames", &framecount)) return NULL; if (framecount < 0) { PyErr_SetString(ErrorObject, "negative framecount"); return NULL; } c = alGetConfig(self->port); switch (alGetSampFmt(c)) { case AL_SAMPFMT_TWOSCOMP: switch (alGetWidth(c)) { case AL_SAMPLE_8: size = 1; break; case AL_SAMPLE_16: size = 2; break; case AL_SAMPLE_24: size = 4; break; default: PyErr_SetString(ErrorObject, "can't determine width"); alFreeConfig(c); return NULL; } break; case AL_SAMPFMT_FLOAT: size = 4; break; case AL_SAMPFMT_DOUBLE: size = 8; break; default: PyErr_SetString(ErrorObject, "can't determine format"); alFreeConfig(c); return NULL; } ch = alGetChannels(c); alFreeConfig(c); if (ch < 0) { PyErr_SetString(ErrorObject, "can't determine # of channels"); return NULL; } size *= ch; v = PyString_FromStringAndSize((char *) NULL, size * framecount); if (v == NULL) return NULL; Py_BEGIN_ALLOW_THREADS alReadFrames(self->port, (void *) PyString_AS_STRING(v), framecount); Py_END_ALLOW_THREADS return v; } PyDoc_STRVAR(alp_DiscardFrames__doc__, "alDiscardFrames: discard audio from an audio port."); static PyObject * alp_DiscardFrames(alpobject *self, PyObject *args) { int framecount; if (!PyArg_ParseTuple(args, "i:DiscardFrames", &framecount)) return NULL; Py_BEGIN_ALLOW_THREADS framecount = alDiscardFrames(self->port, framecount); Py_END_ALLOW_THREADS if (framecount < 0) return NULL; return PyInt_FromLong((long) framecount); } PyDoc_STRVAR(alp_ZeroFrames__doc__, "alZeroFrames: write zero-valued sample frames to an audio port."); static PyObject * alp_ZeroFrames(alpobject *self, PyObject *args) { int framecount; if (!PyArg_ParseTuple(args, "i:ZeroFrames", &framecount)) return NULL; if (framecount < 0) { PyErr_SetString(ErrorObject, "negative framecount"); return NULL; } Py_BEGIN_ALLOW_THREADS alZeroFrames(self->port, framecount); Py_END_ALLOW_THREADS Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(alp_SetFillPoint__doc__, "alSetFillPoint: set low- or high-water mark for an audio port."); static PyObject * alp_SetFillPoint(alpobject *self, PyObject *args) { int fillpoint; if (!PyArg_ParseTuple(args, "i:SetFillPoint", &fillpoint)) return NULL; if (alSetFillPoint(self->port, fillpoint) < 0) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(alp_GetFillPoint__doc__, "alGetFillPoint: get low- or high-water mark for an audio port."); static PyObject * alp_GetFillPoint(alpobject *self, PyObject *args) { int fillpoint; if (!PyArg_ParseTuple(args, ":GetFillPoint")) return NULL; if ((fillpoint = alGetFillPoint(self->port)) < 0) return NULL; return PyInt_FromLong((long) fillpoint); } PyDoc_STRVAR(alp_GetFrameNumber__doc__, "alGetFrameNumber: get the absolute sample frame number " "associated with a port."); static PyObject * alp_GetFrameNumber(alpobject *self, PyObject *args) { stamp_t fnum; if (!PyArg_ParseTuple(args, ":GetFrameNumber")) return NULL; if (alGetFrameNumber(self->port, &fnum) < 0) return NULL; return PyLong_FromLongLong((long long) fnum); } PyDoc_STRVAR(alp_GetFrameTime__doc__, "alGetFrameTime: get the time at which a sample frame came " "in or will go out."); static PyObject * alp_GetFrameTime(alpobject *self, PyObject *args) { stamp_t fnum, time; PyObject *ret, *v0, *v1; if (!PyArg_ParseTuple(args, ":GetFrameTime")) return NULL; if (alGetFrameTime(self->port, &fnum, &time) < 0) return NULL; v0 = PyLong_FromLongLong((long long) fnum); v1 = PyLong_FromLongLong((long long) time); if (PyErr_Occurred()) { Py_XDECREF(v0); Py_XDECREF(v1); return NULL; } ret = Py_BuildValue("(OO)", v0, v1); Py_DECREF(v0); Py_DECREF(v1); return ret; } PyDoc_STRVAR(alp_WriteFrames__doc__, "alWriteFrames: write sample frames to an audio port."); static PyObject * alp_WriteFrames(alpobject *self, PyObject *args) { char *samples; int length; int size, ch; ALconfig c; if (!PyArg_ParseTuple(args, "s#:WriteFrames", &samples, &length)) return NULL; c = alGetConfig(self->port); switch (alGetSampFmt(c)) { case AL_SAMPFMT_TWOSCOMP: switch (alGetWidth(c)) { case AL_SAMPLE_8: size = 1; break; case AL_SAMPLE_16: size = 2; break; case AL_SAMPLE_24: size = 4; break; default: PyErr_SetString(ErrorObject, "can't determine width"); alFreeConfig(c); return NULL; } break; case AL_SAMPFMT_FLOAT: size = 4; break; case AL_SAMPFMT_DOUBLE: size = 8; break; default: PyErr_SetString(ErrorObject, "can't determine format"); alFreeConfig(c); return NULL; } ch = alGetChannels(c); alFreeConfig(c); if (ch < 0) { PyErr_SetString(ErrorObject, "can't determine # of channels"); return NULL; } size *= ch; if (length % size != 0) { PyErr_SetString(ErrorObject, "buffer length not whole number of frames"); return NULL; } Py_BEGIN_ALLOW_THREADS alWriteFrames(self->port, (void *) samples, length / size); Py_END_ALLOW_THREADS Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(alp_ClosePort__doc__, "alClosePort: close an audio port."); static PyObject * alp_ClosePort(alpobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":ClosePort")) return NULL; if (alClosePort(self->port) < 0) return NULL; self->port = NULL; Py_INCREF(Py_None); return Py_None; } #endif /* AL_NO_ELEM */ #ifdef OLD_INTERFACE static PyObject * alp_closeport(alpobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":ClosePort")) return NULL; if (ALcloseport(self->port) < 0) return NULL; self->port = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * alp_getfd(alpobject *self, PyObject *args) { int fd; if (!PyArg_ParseTuple(args, ":GetFD")) return NULL; if ((fd = ALgetfd(self-> port)) == -1) return NULL; return PyInt_FromLong(fd); } static PyObject * alp_getfilled(alpobject *self, PyObject *args) { long count; if (!PyArg_ParseTuple(args, ":GetFilled")) return NULL; if ((count = ALgetfilled(self-> port)) == -1) return NULL; return PyInt_FromLong(count); } static PyObject * alp_getfillable(alpobject *self, PyObject *args) { long count; if (!PyArg_ParseTuple(args, ":GetFillable")) return NULL; if ((count = ALgetfillable(self-> port)) == -1) return NULL; return PyInt_FromLong (count); } static PyObject * alp_readsamps(alpobject *self, PyObject *args) { long count; PyObject *v; ALconfig c; int width; int ret; if (!PyArg_ParseTuple(args, "l:readsamps", &count)) return NULL; if (count <= 0) { PyErr_SetString(ErrorObject, "al.readsamps : arg <= 0"); return NULL; } c = ALgetconfig(self->port); #ifdef AL_405 width = ALgetsampfmt(c); if (width == AL_SAMPFMT_FLOAT) width = sizeof(float); else if (width == AL_SAMPFMT_DOUBLE) width = sizeof(double); else width = ALgetwidth(c); #else width = ALgetwidth(c); #endif /* AL_405 */ ALfreeconfig(c); v = PyString_FromStringAndSize((char *)NULL, width * count); if (v == NULL) return NULL; Py_BEGIN_ALLOW_THREADS ret = ALreadsamps(self->port, (void *) PyString_AsString(v), count); Py_END_ALLOW_THREADS if (ret == -1) { Py_DECREF(v); return NULL; } return (v); } static PyObject * alp_writesamps(alpobject *self, PyObject *args) { char *buf; int size, width; ALconfig c; int ret; if (!PyArg_ParseTuple(args, "s#:writesamps", &buf, &size)) return NULL; c = ALgetconfig(self->port); #ifdef AL_405 width = ALgetsampfmt(c); if (width == AL_SAMPFMT_FLOAT) width = sizeof(float); else if (width == AL_SAMPFMT_DOUBLE) width = sizeof(double); else width = ALgetwidth(c); #else width = ALgetwidth(c); #endif /* AL_405 */ ALfreeconfig(c); Py_BEGIN_ALLOW_THREADS ret = ALwritesamps (self->port, (void *) buf, (long) size / width); Py_END_ALLOW_THREADS if (ret == -1) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * alp_getfillpoint(alpobject *self, PyObject *args) { long count; if (!PyArg_ParseTuple(args, ":GetFillPoint")) return NULL; if ((count = ALgetfillpoint(self->port)) == -1) return NULL; return PyInt_FromLong(count); } static PyObject * alp_setfillpoint(alpobject *self, PyObject *args) { long count; if (!PyArg_ParseTuple(args, "l:SetFillPoint", &count)) return NULL; if (ALsetfillpoint(self->port, count) == -1) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * alp_setconfig(alpobject *self, PyObject *args) { alcobject *config; if (!PyArg_ParseTuple(args, "O!:SetConfig", &Alctype, &config)) return NULL; if (ALsetconfig(self->port, config->config) == -1) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * alp_getconfig(alpobject *self, PyObject *args) { ALconfig config; if (!PyArg_ParseTuple(args, ":GetConfig")) return NULL; config = ALgetconfig(self->port); if (config == NULL) return NULL; return newalcobject(config); } #ifdef AL_405 static PyObject * alp_getstatus(alpobject *self, PyObject *args) { PyObject *list, *v; long *PVbuffer; long length; int i; if (!PyArg_ParseTuple(args, "O!", &PyList_Type, &list)) return NULL; length = PyList_Size(list); PVbuffer = PyMem_NEW(long, length); if (PVbuffer == NULL) return PyErr_NoMemory(); for (i = 0; i < length; i++) { v = PyList_GetItem(list, i); if (!PyInt_Check(v)) { PyMem_DEL(PVbuffer); PyErr_BadArgument(); return NULL; } PVbuffer[i] = PyInt_AsLong(v); } if (ALgetstatus(self->port, PVbuffer, length) == -1) return NULL; for (i = 0; i < length; i++) PyList_SetItem(list, i, PyInt_FromLong(PVbuffer[i])); PyMem_DEL(PVbuffer); Py_INCREF(Py_None); return Py_None; } #endif /* AL_405 */ #endif /* OLD_INTERFACE */ static struct PyMethodDef alp_methods[] = { #ifdef AL_NO_ELEM /* IRIX 6 */ {"SetConfig", (PyCFunction)alp_SetConfig, METH_VARARGS, alp_SetConfig__doc__}, {"GetConfig", (PyCFunction)alp_GetConfig, METH_VARARGS, alp_GetConfig__doc__}, {"GetResource", (PyCFunction)alp_GetResource, METH_VARARGS, alp_GetResource__doc__}, {"GetFD", (PyCFunction)alp_GetFD, METH_VARARGS, alp_GetFD__doc__}, {"GetFilled", (PyCFunction)alp_GetFilled, METH_VARARGS, alp_GetFilled__doc__}, {"GetFillable", (PyCFunction)alp_GetFillable, METH_VARARGS, alp_GetFillable__doc__}, {"ReadFrames", (PyCFunction)alp_ReadFrames, METH_VARARGS, alp_ReadFrames__doc__}, {"DiscardFrames", (PyCFunction)alp_DiscardFrames, METH_VARARGS, alp_DiscardFrames__doc__}, {"ZeroFrames", (PyCFunction)alp_ZeroFrames, METH_VARARGS, alp_ZeroFrames__doc__}, {"SetFillPoint", (PyCFunction)alp_SetFillPoint, METH_VARARGS, alp_SetFillPoint__doc__}, {"GetFillPoint", (PyCFunction)alp_GetFillPoint, METH_VARARGS, alp_GetFillPoint__doc__}, {"GetFrameNumber", (PyCFunction)alp_GetFrameNumber, METH_VARARGS, alp_GetFrameNumber__doc__}, {"GetFrameTime", (PyCFunction)alp_GetFrameTime, METH_VARARGS, alp_GetFrameTime__doc__}, {"WriteFrames", (PyCFunction)alp_WriteFrames, METH_VARARGS, alp_WriteFrames__doc__}, {"ClosePort", (PyCFunction)alp_ClosePort, METH_VARARGS, alp_ClosePort__doc__}, #endif /* AL_NO_ELEM */ #ifdef OLD_INTERFACE {"closeport", (PyCFunction)alp_closeport, METH_VARARGS}, {"getfd", (PyCFunction)alp_getfd, METH_VARARGS}, {"fileno", (PyCFunction)alp_getfd, METH_VARARGS}, {"getfilled", (PyCFunction)alp_getfilled, METH_VARARGS}, {"getfillable", (PyCFunction)alp_getfillable, METH_VARARGS}, {"readsamps", (PyCFunction)alp_readsamps, METH_VARARGS}, {"writesamps", (PyCFunction)alp_writesamps, METH_VARARGS}, {"setfillpoint", (PyCFunction)alp_setfillpoint, METH_VARARGS}, {"getfillpoint", (PyCFunction)alp_getfillpoint, METH_VARARGS}, {"setconfig", (PyCFunction)alp_setconfig, METH_VARARGS}, {"getconfig", (PyCFunction)alp_getconfig, METH_VARARGS}, #ifdef AL_405 {"getstatus", (PyCFunction)alp_getstatus, METH_VARARGS}, #endif /* AL_405 */ #endif /* OLD_INTERFACE */ {NULL, NULL} /* sentinel */ }; /* ---------- */ static PyObject * newalpobject(ALport port) { alpobject *self; self = PyObject_New(alpobject, &Alptype); if (self == NULL) return NULL; /* XXXX Add your own initializers here */ self->port = port; return (PyObject *) self; } static void alp_dealloc(alpobject *self) { /* XXXX Add your own cleanup code here */ if (self->port) { #ifdef AL_NO_ELEM /* IRIX 6 */ alClosePort(self->port); #else ALcloseport(self->port); #endif } PyObject_Del(self); } static PyObject * alp_getattr(alpobject *self, char *name) { /* XXXX Add your own getattr code here */ if (self->port == NULL) { PyErr_SetString(ErrorObject, "port already closed"); return NULL; } return Py_FindMethod(alp_methods, (PyObject *)self, name); } PyDoc_STRVAR(Alptype__doc__, ""); static PyTypeObject Alptype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "al.port", /*tp_name*/ sizeof(alpobject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)alp_dealloc, /*tp_dealloc*/ (printfunc)0, /*tp_print*/ (getattrfunc)alp_getattr, /*tp_getattr*/ (setattrfunc)0, /*tp_setattr*/ (cmpfunc)0, /*tp_compare*/ (reprfunc)0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ (hashfunc)0, /*tp_hash*/ (ternaryfunc)0, /*tp_call*/ (reprfunc)0, /*tp_str*/ /* Space for future expansion */ 0L,0L,0L,0L, Alptype__doc__ /* Documentation string */ }; /* End of code for port objects */ /* -------------------------------------------------------- */ #ifdef AL_NO_ELEM /* IRIX 6 */ PyDoc_STRVAR(al_NewConfig__doc__, "alNewConfig: create and initialize an audio ALconfig structure."); static PyObject * al_NewConfig(PyObject *self, PyObject *args) { ALconfig config; if (!PyArg_ParseTuple(args, ":NewConfig")) return NULL; if ((config = alNewConfig()) == NULL) return NULL; return newalcobject(config); } PyDoc_STRVAR(al_OpenPort__doc__, "alOpenPort: open an audio port."); static PyObject * al_OpenPort(PyObject *self, PyObject *args) { ALport port; char *name, *dir; alcobject *config = NULL; if (!PyArg_ParseTuple(args, "ss|O!:OpenPort", &name, &dir, &Alctype, &config)) return NULL; if ((port = alOpenPort(name, dir, config ? config->config : NULL)) == NULL) return NULL; return newalpobject(port); } PyDoc_STRVAR(al_Connect__doc__, "alConnect: connect two audio I/O resources."); static PyObject * al_Connect(PyObject *self, PyObject *args) { int source, dest, nprops = 0, id, i; ALpv *props = NULL; ALparamInfo *propinfo = NULL; PyObject *propobj = NULL; if (!PyArg_ParseTuple(args, "ii|O!:Connect", &source, &dest, &PyList_Type, &propobj)) return NULL; if (propobj != NULL) { nprops = python2params(source, dest, propobj, &props, &propinfo); if (nprops < 0) return NULL; } id = alConnect(source, dest, props, nprops); if (props) { for (i = 0; i < nprops; i++) { switch (propinfo[i].valueType) { case AL_SET_VAL: case AL_VECTOR_VAL: PyMem_DEL(props[i].value.ptr); break; } } PyMem_DEL(props); PyMem_DEL(propinfo); } if (id < 0) return NULL; return PyInt_FromLong((long) id); } PyDoc_STRVAR(al_Disconnect__doc__, "alDisconnect: delete a connection between two audio I/O resources."); static PyObject * al_Disconnect(PyObject *self, PyObject *args) { int res; if (!PyArg_ParseTuple(args, "i:Disconnect", &res)) return NULL; if (alDisconnect(res) < 0) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(al_GetParams__doc__, "alGetParams: get the values of audio resource parameters."); static PyObject * al_GetParams(PyObject *self, PyObject *args) { int resource; PyObject *pvslist, *item = NULL, *v = NULL; ALpv *pvs; int i, j, npvs; ALparamInfo *pinfo; if (!PyArg_ParseTuple(args, "iO!:GetParams", &resource, &PyList_Type, &pvslist)) return NULL; npvs = PyList_Size(pvslist); pvs = PyMem_NEW(ALpv, npvs); pinfo = PyMem_NEW(ALparamInfo, npvs); for (i = 0; i < npvs; i++) { item = PyList_GetItem(pvslist, i); if (!PyInt_Check(item)) { item = NULL; PyErr_SetString(ErrorObject, "list of integers expected"); goto error; } pvs[i].param = (int) PyInt_AsLong(item); item = NULL; /* not needed anymore */ if (alGetParamInfo(resource, pvs[i].param, &pinfo[i]) < 0) goto error; switch (pinfo[i].valueType) { case AL_NO_VAL: break; case AL_MATRIX_VAL: pinfo[i].maxElems *= pinfo[i].maxElems2; /* fall through */ case AL_STRING_VAL: case AL_SET_VAL: case AL_VECTOR_VAL: switch (pinfo[i].elementType) { case AL_INT32_ELEM: case AL_RESOURCE_ELEM: case AL_ENUM_ELEM: pvs[i].value.ptr = PyMem_NEW(int, pinfo[i].maxElems); pvs[i].sizeIn = pinfo[i].maxElems; break; case AL_INT64_ELEM: case AL_FIXED_ELEM: pvs[i].value.ptr = PyMem_NEW(long long, pinfo[i].maxElems); pvs[i].sizeIn = pinfo[i].maxElems; break; case AL_CHAR_ELEM: pvs[i].value.ptr = PyMem_NEW(char, 32); pvs[i].sizeIn = 32; break; case AL_NO_ELEM: case AL_PTR_ELEM: default: PyErr_SetString(ErrorObject, "internal error"); goto error; } break; case AL_SCALAR_VAL: break; default: PyErr_SetString(ErrorObject, "internal error"); goto error; } if (pinfo[i].valueType == AL_MATRIX_VAL) { pinfo[i].maxElems /= pinfo[i].maxElems2; pvs[i].sizeIn /= pinfo[i].maxElems2; pvs[i].size2In = pinfo[i].maxElems2; } } if (alGetParams(resource, pvs, npvs) < 0) goto error; v = PyList_New(npvs); for (i = 0; i < npvs; i++) { if (pvs[i].sizeOut < 0) { char buf[32]; PyOS_snprintf(buf, sizeof(buf), "problem with param %d", i); PyErr_SetString(ErrorObject, buf); goto error; } switch (pinfo[i].valueType) { case AL_NO_VAL: item = Py_None; Py_INCREF(item); break; case AL_STRING_VAL: item = PyString_FromString(pvs[i].value.ptr); PyMem_DEL(pvs[i].value.ptr); break; case AL_MATRIX_VAL: /* XXXX this is not right */ pvs[i].sizeOut *= pvs[i].size2Out; /* fall through */ case AL_SET_VAL: case AL_VECTOR_VAL: item = PyList_New(pvs[i].sizeOut); for (j = 0; j < pvs[i].sizeOut; j++) { switch (pinfo[i].elementType) { case AL_INT32_ELEM: case AL_RESOURCE_ELEM: case AL_ENUM_ELEM: PyList_SetItem(item, j, PyInt_FromLong((long) ((int *) pvs[i].value.ptr)[j])); break; case AL_INT64_ELEM: PyList_SetItem(item, j, PyLong_FromLongLong(((long long *) pvs[i].value.ptr)[j])); break; case AL_FIXED_ELEM: PyList_SetItem(item, j, PyFloat_FromDouble(alFixedToDouble(((long long *) pvs[i].value.ptr)[j]))); break; default: PyErr_SetString(ErrorObject, "internal error"); goto error; } } PyMem_DEL(pvs[i].value.ptr); break; case AL_SCALAR_VAL: item = param2python(resource, pvs[i].param, pvs[i].value, &pinfo[i]); break; } if (PyErr_Occurred() || PyList_SetItem(v, i, Py_BuildValue("(iO)", pvs[i].param, item)) < 0 || PyErr_Occurred()) goto error; Py_DECREF(item); } PyMem_DEL(pvs); PyMem_DEL(pinfo); return v; error: Py_XDECREF(v); Py_XDECREF(item); if (pvs) PyMem_DEL(pvs); if (pinfo) PyMem_DEL(pinfo); return NULL; } PyDoc_STRVAR(al_SetParams__doc__, "alSetParams: set the values of audio resource parameters."); static PyObject * al_SetParams(PyObject *self, PyObject *args) { int resource; PyObject *pvslist; ALpv *pvs; ALparamInfo *pinfo; int npvs, i; if (!PyArg_ParseTuple(args, "iO!:SetParams", &resource, &PyList_Type, &pvslist)) return NULL; npvs = python2params(resource, -1, pvslist, &pvs, &pinfo); if (npvs < 0) return NULL; if (alSetParams(resource, pvs, npvs) < 0) goto error; /* cleanup */ for (i = 0; i < npvs; i++) { switch (pinfo[i].valueType) { case AL_SET_VAL: case AL_VECTOR_VAL: PyMem_DEL(pvs[i].value.ptr); break; } } PyMem_DEL(pvs); PyMem_DEL(pinfo); Py_INCREF(Py_None); return Py_None; error: /* XXXX we should clean up everything */ if (pvs) PyMem_DEL(pvs); if (pinfo) PyMem_DEL(pinfo); return NULL; } PyDoc_STRVAR(al_QueryValues__doc__, "alQueryValues: get the set of possible values for a parameter."); static PyObject * al_QueryValues(PyObject *self, PyObject *args) { int resource, param; ALvalue *return_set = NULL; int setsize = 32, qualsize = 0, nvals, i; ALpv *quals = NULL; ALparamInfo pinfo; ALparamInfo *qualinfo = NULL; PyObject *qualobj = NULL; PyObject *res = NULL, *item; if (!PyArg_ParseTuple(args, "ii|O!:QueryValues", &resource, ¶m, &PyList_Type, &qualobj)) return NULL; if (qualobj != NULL) { qualsize = python2params(resource, param, qualobj, &quals, &qualinfo); if (qualsize < 0) return NULL; } setsize = 32; return_set = PyMem_NEW(ALvalue, setsize); if (return_set == NULL) { PyErr_NoMemory(); goto cleanup; } retry: nvals = alQueryValues(resource, param, return_set, setsize, quals, qualsize); if (nvals < 0) goto cleanup; if (nvals > setsize) { setsize = nvals; PyMem_RESIZE(return_set, ALvalue, setsize); if (return_set == NULL) { PyErr_NoMemory(); goto cleanup; } goto retry; } if (alGetParamInfo(resource, param, &pinfo) < 0) goto cleanup; res = PyList_New(nvals); if (res == NULL) goto cleanup; for (i = 0; i < nvals; i++) { item = param2python(resource, param, return_set[i], &pinfo); if (item == NULL || PyList_SetItem(res, i, item) < 0) { Py_DECREF(res); res = NULL; goto cleanup; } } cleanup: if (return_set) PyMem_DEL(return_set); if (quals) { for (i = 0; i < qualsize; i++) { switch (qualinfo[i].valueType) { case AL_SET_VAL: case AL_VECTOR_VAL: PyMem_DEL(quals[i].value.ptr); break; } } PyMem_DEL(quals); PyMem_DEL(qualinfo); } return res; } PyDoc_STRVAR(al_GetParamInfo__doc__, "alGetParamInfo: get information about a parameter on " "a particular audio resource."); static PyObject * al_GetParamInfo(PyObject *self, PyObject *args) { int res, param; ALparamInfo pinfo; PyObject *v, *item;; if (!PyArg_ParseTuple(args, "ii:GetParamInfo", &res, ¶m)) return NULL; if (alGetParamInfo(res, param, &pinfo) < 0) return NULL; v = PyDict_New(); item = PyInt_FromLong((long) pinfo.resource); PyDict_SetItemString(v, "resource", item); Py_DECREF(item); item = PyInt_FromLong((long) pinfo.param); PyDict_SetItemString(v, "param", item); Py_DECREF(item); item = PyInt_FromLong((long) pinfo.valueType); PyDict_SetItemString(v, "valueType", item); Py_DECREF(item); if (pinfo.valueType != AL_NO_VAL && pinfo.valueType != AL_SCALAR_VAL) { /* multiple values */ item = PyInt_FromLong((long) pinfo.maxElems); PyDict_SetItemString(v, "maxElems", item); Py_DECREF(item); if (pinfo.valueType == AL_MATRIX_VAL) { /* 2 dimensional */ item = PyInt_FromLong((long) pinfo.maxElems2); PyDict_SetItemString(v, "maxElems2", item); Py_DECREF(item); } } item = PyInt_FromLong((long) pinfo.elementType); PyDict_SetItemString(v, "elementType", item); Py_DECREF(item); item = PyString_FromString(pinfo.name); PyDict_SetItemString(v, "name", item); Py_DECREF(item); item = param2python(res, param, pinfo.initial, &pinfo); PyDict_SetItemString(v, "initial", item); Py_DECREF(item); if (pinfo.elementType != AL_ENUM_ELEM && pinfo.elementType != AL_RESOURCE_ELEM && pinfo.elementType != AL_CHAR_ELEM) { /* range param */ item = param2python(res, param, pinfo.min, &pinfo); PyDict_SetItemString(v, "min", item); Py_DECREF(item); item = param2python(res, param, pinfo.max, &pinfo); PyDict_SetItemString(v, "max", item); Py_DECREF(item); item = param2python(res, param, pinfo.minDelta, &pinfo); PyDict_SetItemString(v, "minDelta", item); Py_DECREF(item); item = param2python(res, param, pinfo.maxDelta, &pinfo); PyDict_SetItemString(v, "maxDelta", item); Py_DECREF(item); item = PyInt_FromLong((long) pinfo.specialVals); PyDict_SetItemString(v, "specialVals", item); Py_DECREF(item); } return v; } PyDoc_STRVAR(al_GetResourceByName__doc__, "alGetResourceByName: find an audio resource by name."); static PyObject * al_GetResourceByName(PyObject *self, PyObject *args) { int res, start_res, type; char *name; if (!PyArg_ParseTuple(args, "isi:GetResourceByName", &start_res, &name, &type)) return NULL; if ((res = alGetResourceByName(start_res, name, type)) == 0) return NULL; return PyInt_FromLong((long) res); } PyDoc_STRVAR(al_IsSubtype__doc__, "alIsSubtype: indicate if one resource type is a subtype of another."); static PyObject * al_IsSubtype(PyObject *self, PyObject *args) { int type, subtype; if (!PyArg_ParseTuple(args, "ii:IsSubtype", &type, &subtype)) return NULL; return PyInt_FromLong((long) alIsSubtype(type, subtype)); } PyDoc_STRVAR(al_SetErrorHandler__doc__, ""); static PyObject * al_SetErrorHandler(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":SetErrorHandler")) return NULL; Py_INCREF(Py_None); return Py_None; } #endif /* AL_NO_ELEM */ #ifdef OLD_INTERFACE static PyObject * al_openport(PyObject *self, PyObject *args) { char *name, *dir; ALport port; alcobject *config = NULL; if (!PyArg_ParseTuple(args, "ss|O!:OpenPort", &name, &dir, &Alctype, &config)) return NULL; if ((port = ALopenport(name, dir, config ? config->config : NULL)) == NULL) return NULL; return newalpobject(port); } static PyObject * al_newconfig(PyObject *self, PyObject *args) { ALconfig config; if (!PyArg_ParseTuple(args, ":NewConfig")) return NULL; if ((config = ALnewconfig ()) == NULL) return NULL; return newalcobject(config); } static PyObject * al_queryparams(PyObject *self, PyObject *args) { long device; long length; long *PVbuffer; long PVdummy[2]; PyObject *v = NULL; int i; if (!PyArg_ParseTuple(args, "l:queryparams", &device)) return NULL; if ((length = ALqueryparams(device, PVdummy, 2L)) == -1) return NULL; if ((PVbuffer = PyMem_NEW(long, length)) == NULL) return PyErr_NoMemory(); if (ALqueryparams(device, PVbuffer, length) >= 0 && (v = PyList_New((int)length)) != NULL) { for (i = 0; i < length; i++) PyList_SetItem(v, i, PyInt_FromLong(PVbuffer[i])); } PyMem_DEL(PVbuffer); return v; } static PyObject * doParams(PyObject *args, int (*func)(long, long *, long), int modified) { long device; PyObject *list, *v; long *PVbuffer; long length; int i; if (!PyArg_ParseTuple(args, "lO!", &device, &PyList_Type, &list)) return NULL; length = PyList_Size(list); PVbuffer = PyMem_NEW(long, length); if (PVbuffer == NULL) return PyErr_NoMemory(); for (i = 0; i < length; i++) { v = PyList_GetItem(list, i); if (!PyInt_Check(v)) { PyMem_DEL(PVbuffer); PyErr_BadArgument(); return NULL; } PVbuffer[i] = PyInt_AsLong(v); } if ((*func)(device, PVbuffer, length) == -1) { PyMem_DEL(PVbuffer); return NULL; } if (modified) { for (i = 0; i < length; i++) PyList_SetItem(list, i, PyInt_FromLong(PVbuffer[i])); } PyMem_DEL(PVbuffer); Py_INCREF(Py_None); return Py_None; } static PyObject * al_getparams(PyObject *self, PyObject *args) { return doParams(args, ALgetparams, 1); } static PyObject * al_setparams(PyObject *self, PyObject *args) { return doParams(args, ALsetparams, 0); } static PyObject * al_getname(PyObject *self, PyObject *args) { long device, descriptor; char *name; if (!PyArg_ParseTuple(args, "ll:getname", &device, &descriptor)) return NULL; if ((name = ALgetname(device, descriptor)) == NULL) return NULL; return PyString_FromString(name); } static PyObject * al_getdefault(PyObject *self, PyObject *args) { long device, descriptor, value; if (!PyArg_ParseTuple(args, "ll:getdefault", &device, &descriptor)) return NULL; if ((value = ALgetdefault(device, descriptor)) == -1) return NULL; return PyLong_FromLong(value); } static PyObject * al_getminmax(PyObject *self, PyObject *args) { long device, descriptor, min, max; if (!PyArg_ParseTuple(args, "ll:getminmax", &device, &descriptor)) return NULL; min = -1; max = -1; if (ALgetminmax(device, descriptor, &min, &max) == -1) return NULL; return Py_BuildValue("ll", min, max); } #endif /* OLD_INTERFACE */ /* List of methods defined in the module */ static struct PyMethodDef al_methods[] = { #ifdef AL_NO_ELEM /* IRIX 6 */ {"NewConfig", (PyCFunction)al_NewConfig, METH_VARARGS, al_NewConfig__doc__}, {"OpenPort", (PyCFunction)al_OpenPort, METH_VARARGS, al_OpenPort__doc__}, {"Connect", (PyCFunction)al_Connect, METH_VARARGS, al_Connect__doc__}, {"Disconnect", (PyCFunction)al_Disconnect, METH_VARARGS, al_Disconnect__doc__}, {"GetParams", (PyCFunction)al_GetParams, METH_VARARGS, al_GetParams__doc__}, {"SetParams", (PyCFunction)al_SetParams, METH_VARARGS, al_SetParams__doc__}, {"QueryValues", (PyCFunction)al_QueryValues, METH_VARARGS, al_QueryValues__doc__}, {"GetParamInfo", (PyCFunction)al_GetParamInfo, METH_VARARGS, al_GetParamInfo__doc__}, {"GetResourceByName", (PyCFunction)al_GetResourceByName, METH_VARARGS, al_GetResourceByName__doc__}, {"IsSubtype", (PyCFunction)al_IsSubtype, METH_VARARGS, al_IsSubtype__doc__}, #if 0 /* this one not supported */ {"SetErrorHandler", (PyCFunction)al_SetErrorHandler, METH_VARARGS, al_SetErrorHandler__doc__}, #endif #endif /* AL_NO_ELEM */ #ifdef OLD_INTERFACE {"openport", (PyCFunction)al_openport, METH_VARARGS}, {"newconfig", (PyCFunction)al_newconfig, METH_VARARGS}, {"queryparams", (PyCFunction)al_queryparams, METH_VARARGS}, {"getparams", (PyCFunction)al_getparams, METH_VARARGS}, {"setparams", (PyCFunction)al_setparams, METH_VARARGS}, {"getname", (PyCFunction)al_getname, METH_VARARGS}, {"getdefault", (PyCFunction)al_getdefault, METH_VARARGS}, {"getminmax", (PyCFunction)al_getminmax, METH_VARARGS}, #endif /* OLD_INTERFACE */ {NULL, (PyCFunction)NULL, 0, NULL} /* sentinel */ }; /* Initialization function for the module (*must* be called inital) */ PyDoc_STRVAR(al_module_documentation, ""); void inital(void) { PyObject *m, *d, *x; /* Create the module and add the functions */ m = Py_InitModule4("al", al_methods, al_module_documentation, (PyObject*)NULL,PYTHON_API_VERSION); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); ErrorObject = PyErr_NewException("al.error", NULL, NULL); PyDict_SetItemString(d, "error", ErrorObject); /* XXXX Add constants here */ #ifdef AL_4CHANNEL x = PyInt_FromLong((long) AL_4CHANNEL); if (x == NULL || PyDict_SetItemString(d, "FOURCHANNEL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ADAT_IF_TYPE x = PyInt_FromLong((long) AL_ADAT_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "ADAT_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ADAT_MCLK_TYPE x = PyInt_FromLong((long) AL_ADAT_MCLK_TYPE); if (x == NULL || PyDict_SetItemString(d, "ADAT_MCLK_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_AES_IF_TYPE x = PyInt_FromLong((long) AL_AES_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "AES_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_AES_MCLK_TYPE x = PyInt_FromLong((long) AL_AES_MCLK_TYPE); if (x == NULL || PyDict_SetItemString(d, "AES_MCLK_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ANALOG_IF_TYPE x = PyInt_FromLong((long) AL_ANALOG_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "ANALOG_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ASSOCIATE x = PyInt_FromLong((long) AL_ASSOCIATE); if (x == NULL || PyDict_SetItemString(d, "ASSOCIATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_BUFFER_NULL x = PyInt_FromLong((long) AL_BAD_BUFFER_NULL); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFER_NULL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_BUFFERLENGTH x = PyInt_FromLong((long) AL_BAD_BUFFERLENGTH); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFERLENGTH", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_BUFFERLENGTH_NEG x = PyInt_FromLong((long) AL_BAD_BUFFERLENGTH_NEG); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFERLENGTH_NEG", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_BUFFERLENGTH_ODD x = PyInt_FromLong((long) AL_BAD_BUFFERLENGTH_ODD); if (x == NULL || PyDict_SetItemString(d, "BAD_BUFFERLENGTH_ODD", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_CHANNELS x = PyInt_FromLong((long) AL_BAD_CHANNELS); if (x == NULL || PyDict_SetItemString(d, "BAD_CHANNELS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_CONFIG x = PyInt_FromLong((long) AL_BAD_CONFIG); if (x == NULL || PyDict_SetItemString(d, "BAD_CONFIG", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_COUNT_NEG x = PyInt_FromLong((long) AL_BAD_COUNT_NEG); if (x == NULL || PyDict_SetItemString(d, "BAD_COUNT_NEG", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_DEVICE x = PyInt_FromLong((long) AL_BAD_DEVICE); if (x == NULL || PyDict_SetItemString(d, "BAD_DEVICE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_DEVICE_ACCESS x = PyInt_FromLong((long) AL_BAD_DEVICE_ACCESS); if (x == NULL || PyDict_SetItemString(d, "BAD_DEVICE_ACCESS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_DIRECTION x = PyInt_FromLong((long) AL_BAD_DIRECTION); if (x == NULL || PyDict_SetItemString(d, "BAD_DIRECTION", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_FILLPOINT x = PyInt_FromLong((long) AL_BAD_FILLPOINT); if (x == NULL || PyDict_SetItemString(d, "BAD_FILLPOINT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_FLOATMAX x = PyInt_FromLong((long) AL_BAD_FLOATMAX); if (x == NULL || PyDict_SetItemString(d, "BAD_FLOATMAX", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_ILLEGAL_STATE x = PyInt_FromLong((long) AL_BAD_ILLEGAL_STATE); if (x == NULL || PyDict_SetItemString(d, "BAD_ILLEGAL_STATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_NO_PORTS x = PyInt_FromLong((long) AL_BAD_NO_PORTS); if (x == NULL || PyDict_SetItemString(d, "BAD_NO_PORTS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_NOT_FOUND x = PyInt_FromLong((long) AL_BAD_NOT_FOUND); if (x == NULL || PyDict_SetItemString(d, "BAD_NOT_FOUND", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_NOT_IMPLEMENTED x = PyInt_FromLong((long) AL_BAD_NOT_IMPLEMENTED); if (x == NULL || PyDict_SetItemString(d, "BAD_NOT_IMPLEMENTED", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_OUT_OF_MEM x = PyInt_FromLong((long) AL_BAD_OUT_OF_MEM); if (x == NULL || PyDict_SetItemString(d, "BAD_OUT_OF_MEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_PARAM x = PyInt_FromLong((long) AL_BAD_PARAM); if (x == NULL || PyDict_SetItemString(d, "BAD_PARAM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_PERMISSIONS x = PyInt_FromLong((long) AL_BAD_PERMISSIONS); if (x == NULL || PyDict_SetItemString(d, "BAD_PERMISSIONS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_PORT x = PyInt_FromLong((long) AL_BAD_PORT); if (x == NULL || PyDict_SetItemString(d, "BAD_PORT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_PORTSTYLE x = PyInt_FromLong((long) AL_BAD_PORTSTYLE); if (x == NULL || PyDict_SetItemString(d, "BAD_PORTSTYLE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_PVBUFFER x = PyInt_FromLong((long) AL_BAD_PVBUFFER); if (x == NULL || PyDict_SetItemString(d, "BAD_PVBUFFER", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_QSIZE x = PyInt_FromLong((long) AL_BAD_QSIZE); if (x == NULL || PyDict_SetItemString(d, "BAD_QSIZE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_RATE x = PyInt_FromLong((long) AL_BAD_RATE); if (x == NULL || PyDict_SetItemString(d, "BAD_RATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_RESOURCE x = PyInt_FromLong((long) AL_BAD_RESOURCE); if (x == NULL || PyDict_SetItemString(d, "BAD_RESOURCE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_SAMPFMT x = PyInt_FromLong((long) AL_BAD_SAMPFMT); if (x == NULL || PyDict_SetItemString(d, "BAD_SAMPFMT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_TRANSFER_SIZE x = PyInt_FromLong((long) AL_BAD_TRANSFER_SIZE); if (x == NULL || PyDict_SetItemString(d, "BAD_TRANSFER_SIZE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_BAD_WIDTH x = PyInt_FromLong((long) AL_BAD_WIDTH); if (x == NULL || PyDict_SetItemString(d, "BAD_WIDTH", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CHANNEL_MODE x = PyInt_FromLong((long) AL_CHANNEL_MODE); if (x == NULL || PyDict_SetItemString(d, "CHANNEL_MODE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CHANNELS x = PyInt_FromLong((long) AL_CHANNELS); if (x == NULL || PyDict_SetItemString(d, "CHANNELS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CHAR_ELEM x = PyInt_FromLong((long) AL_CHAR_ELEM); if (x == NULL || PyDict_SetItemString(d, "CHAR_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CLOCK_GEN x = PyInt_FromLong((long) AL_CLOCK_GEN); if (x == NULL || PyDict_SetItemString(d, "CLOCK_GEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CLOCKGEN_TYPE x = PyInt_FromLong((long) AL_CLOCKGEN_TYPE); if (x == NULL || PyDict_SetItemString(d, "CLOCKGEN_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CONNECT x = PyInt_FromLong((long) AL_CONNECT); if (x == NULL || PyDict_SetItemString(d, "CONNECT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CONNECTION_TYPE x = PyInt_FromLong((long) AL_CONNECTION_TYPE); if (x == NULL || PyDict_SetItemString(d, "CONNECTION_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CONNECTIONS x = PyInt_FromLong((long) AL_CONNECTIONS); if (x == NULL || PyDict_SetItemString(d, "CONNECTIONS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_CRYSTAL_MCLK_TYPE x = PyInt_FromLong((long) AL_CRYSTAL_MCLK_TYPE); if (x == NULL || PyDict_SetItemString(d, "CRYSTAL_MCLK_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DEFAULT_DEVICE x = PyInt_FromLong((long) AL_DEFAULT_DEVICE); if (x == NULL || PyDict_SetItemString(d, "DEFAULT_DEVICE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DEFAULT_INPUT x = PyInt_FromLong((long) AL_DEFAULT_INPUT); if (x == NULL || PyDict_SetItemString(d, "DEFAULT_INPUT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DEFAULT_OUTPUT x = PyInt_FromLong((long) AL_DEFAULT_OUTPUT); if (x == NULL || PyDict_SetItemString(d, "DEFAULT_OUTPUT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DEST x = PyInt_FromLong((long) AL_DEST); if (x == NULL || PyDict_SetItemString(d, "DEST", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DEVICE_TYPE x = PyInt_FromLong((long) AL_DEVICE_TYPE); if (x == NULL || PyDict_SetItemString(d, "DEVICE_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DEVICES x = PyInt_FromLong((long) AL_DEVICES); if (x == NULL || PyDict_SetItemString(d, "DEVICES", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DIGITAL_IF_TYPE x = PyInt_FromLong((long) AL_DIGITAL_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "DIGITAL_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DIGITAL_INPUT_RATE x = PyInt_FromLong((long) AL_DIGITAL_INPUT_RATE); if (x == NULL || PyDict_SetItemString(d, "DIGITAL_INPUT_RATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_DISCONNECT x = PyInt_FromLong((long) AL_DISCONNECT); if (x == NULL || PyDict_SetItemString(d, "DISCONNECT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ENUM_ELEM x = PyInt_FromLong((long) AL_ENUM_ELEM); if (x == NULL || PyDict_SetItemString(d, "ENUM_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ENUM_VALUE x = PyInt_FromLong((long) AL_ENUM_VALUE); if (x == NULL || PyDict_SetItemString(d, "ENUM_VALUE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ERROR_INPUT_OVERFLOW x = PyInt_FromLong((long) AL_ERROR_INPUT_OVERFLOW); if (x == NULL || PyDict_SetItemString(d, "ERROR_INPUT_OVERFLOW", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ERROR_LENGTH x = PyInt_FromLong((long) AL_ERROR_LENGTH); if (x == NULL || PyDict_SetItemString(d, "ERROR_LENGTH", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ERROR_LOCATION_LSP x = PyInt_FromLong((long) AL_ERROR_LOCATION_LSP); if (x == NULL || PyDict_SetItemString(d, "ERROR_LOCATION_LSP", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ERROR_LOCATION_MSP x = PyInt_FromLong((long) AL_ERROR_LOCATION_MSP); if (x == NULL || PyDict_SetItemString(d, "ERROR_LOCATION_MSP", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ERROR_NUMBER x = PyInt_FromLong((long) AL_ERROR_NUMBER); if (x == NULL || PyDict_SetItemString(d, "ERROR_NUMBER", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ERROR_OUTPUT_UNDERFLOW x = PyInt_FromLong((long) AL_ERROR_OUTPUT_UNDERFLOW); if (x == NULL || PyDict_SetItemString(d, "ERROR_OUTPUT_UNDERFLOW", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_ERROR_TYPE x = PyInt_FromLong((long) AL_ERROR_TYPE); if (x == NULL || PyDict_SetItemString(d, "ERROR_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_FIXED_ELEM x = PyInt_FromLong((long) AL_FIXED_ELEM); if (x == NULL || PyDict_SetItemString(d, "FIXED_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_FIXED_MCLK_TYPE x = PyInt_FromLong((long) AL_FIXED_MCLK_TYPE); if (x == NULL || PyDict_SetItemString(d, "FIXED_MCLK_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_GAIN x = PyInt_FromLong((long) AL_GAIN); if (x == NULL || PyDict_SetItemString(d, "GAIN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_GAIN_REF x = PyInt_FromLong((long) AL_GAIN_REF); if (x == NULL || PyDict_SetItemString(d, "GAIN_REF", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_HRB_TYPE x = PyInt_FromLong((long) AL_HRB_TYPE); if (x == NULL || PyDict_SetItemString(d, "HRB_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_COUNT x = PyInt_FromLong((long) AL_INPUT_COUNT); if (x == NULL || PyDict_SetItemString(d, "INPUT_COUNT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_DEVICE_TYPE x = PyInt_FromLong((long) AL_INPUT_DEVICE_TYPE); if (x == NULL || PyDict_SetItemString(d, "INPUT_DEVICE_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_DIGITAL x = PyInt_FromLong((long) AL_INPUT_DIGITAL); if (x == NULL || PyDict_SetItemString(d, "INPUT_DIGITAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_HRB_TYPE x = PyInt_FromLong((long) AL_INPUT_HRB_TYPE); if (x == NULL || PyDict_SetItemString(d, "INPUT_HRB_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_LINE x = PyInt_FromLong((long) AL_INPUT_LINE); if (x == NULL || PyDict_SetItemString(d, "INPUT_LINE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_MIC x = PyInt_FromLong((long) AL_INPUT_MIC); if (x == NULL || PyDict_SetItemString(d, "INPUT_MIC", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_PORT_TYPE x = PyInt_FromLong((long) AL_INPUT_PORT_TYPE); if (x == NULL || PyDict_SetItemString(d, "INPUT_PORT_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_RATE x = PyInt_FromLong((long) AL_INPUT_RATE); if (x == NULL || PyDict_SetItemString(d, "INPUT_RATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INPUT_SOURCE x = PyInt_FromLong((long) AL_INPUT_SOURCE); if (x == NULL || PyDict_SetItemString(d, "INPUT_SOURCE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INT32_ELEM x = PyInt_FromLong((long) AL_INT32_ELEM); if (x == NULL || PyDict_SetItemString(d, "INT32_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INT64_ELEM x = PyInt_FromLong((long) AL_INT64_ELEM); if (x == NULL || PyDict_SetItemString(d, "INT64_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INTERFACE x = PyInt_FromLong((long) AL_INTERFACE); if (x == NULL || PyDict_SetItemString(d, "INTERFACE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INTERFACE_TYPE x = PyInt_FromLong((long) AL_INTERFACE_TYPE); if (x == NULL || PyDict_SetItemString(d, "INTERFACE_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INVALID_PARAM x = PyInt_FromLong((long) AL_INVALID_PARAM); if (x == NULL || PyDict_SetItemString(d, "INVALID_PARAM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_INVALID_VALUE x = PyInt_FromLong((long) AL_INVALID_VALUE); if (x == NULL || PyDict_SetItemString(d, "INVALID_VALUE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_JITTER x = PyInt_FromLong((long) AL_JITTER); if (x == NULL || PyDict_SetItemString(d, "JITTER", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LABEL x = PyInt_FromLong((long) AL_LABEL); if (x == NULL || PyDict_SetItemString(d, "LABEL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LEFT_INPUT_ATTEN x = PyInt_FromLong((long) AL_LEFT_INPUT_ATTEN); if (x == NULL || PyDict_SetItemString(d, "LEFT_INPUT_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LEFT_MONITOR_ATTEN x = PyInt_FromLong((long) AL_LEFT_MONITOR_ATTEN); if (x == NULL || PyDict_SetItemString(d, "LEFT_MONITOR_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LEFT_SPEAKER_GAIN x = PyInt_FromLong((long) AL_LEFT_SPEAKER_GAIN); if (x == NULL || PyDict_SetItemString(d, "LEFT_SPEAKER_GAIN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LEFT1_INPUT_ATTEN x = PyInt_FromLong((long) AL_LEFT1_INPUT_ATTEN); if (x == NULL || PyDict_SetItemString(d, "LEFT1_INPUT_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LEFT2_INPUT_ATTEN x = PyInt_FromLong((long) AL_LEFT2_INPUT_ATTEN); if (x == NULL || PyDict_SetItemString(d, "LEFT2_INPUT_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LINE_IF_TYPE x = PyInt_FromLong((long) AL_LINE_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "LINE_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_LOCKED x = PyInt_FromLong((long) AL_LOCKED); if (x == NULL || PyDict_SetItemString(d, "LOCKED", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MASTER_CLOCK x = PyInt_FromLong((long) AL_MASTER_CLOCK); if (x == NULL || PyDict_SetItemString(d, "MASTER_CLOCK", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MATRIX_VAL x = PyInt_FromLong((long) AL_MATRIX_VAL); if (x == NULL || PyDict_SetItemString(d, "MATRIX_VAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MAX_ERROR x = PyInt_FromLong((long) AL_MAX_ERROR); if (x == NULL || PyDict_SetItemString(d, "MAX_ERROR", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MAX_EVENT_PARAM x = PyInt_FromLong((long) AL_MAX_EVENT_PARAM); if (x == NULL || PyDict_SetItemString(d, "MAX_EVENT_PARAM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MAX_PBUFSIZE x = PyInt_FromLong((long) AL_MAX_PBUFSIZE); if (x == NULL || PyDict_SetItemString(d, "MAX_PBUFSIZE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MAX_PORTS x = PyInt_FromLong((long) AL_MAX_PORTS); if (x == NULL || PyDict_SetItemString(d, "MAX_PORTS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MAX_RESOURCE_ID x = PyInt_FromLong((long) AL_MAX_RESOURCE_ID); if (x == NULL || PyDict_SetItemString(d, "MAX_RESOURCE_ID", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MAX_SETSIZE x = PyInt_FromLong((long) AL_MAX_SETSIZE); if (x == NULL || PyDict_SetItemString(d, "MAX_SETSIZE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MAX_STRLEN x = PyInt_FromLong((long) AL_MAX_STRLEN); if (x == NULL || PyDict_SetItemString(d, "MAX_STRLEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MCLK_TYPE x = PyInt_FromLong((long) AL_MCLK_TYPE); if (x == NULL || PyDict_SetItemString(d, "MCLK_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MIC_IF_TYPE x = PyInt_FromLong((long) AL_MIC_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "MIC_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MONITOR_CTL x = PyInt_FromLong((long) AL_MONITOR_CTL); if (x == NULL || PyDict_SetItemString(d, "MONITOR_CTL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MONITOR_OFF x = PyInt_FromLong((long) AL_MONITOR_OFF); if (x == NULL || PyDict_SetItemString(d, "MONITOR_OFF", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MONITOR_ON x = PyInt_FromLong((long) AL_MONITOR_ON); if (x == NULL || PyDict_SetItemString(d, "MONITOR_ON", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MONO x = PyInt_FromLong((long) AL_MONO); if (x == NULL || PyDict_SetItemString(d, "MONO", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_MUTE x = PyInt_FromLong((long) AL_MUTE); if (x == NULL || PyDict_SetItemString(d, "MUTE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NAME x = PyInt_FromLong((long) AL_NAME); if (x == NULL || PyDict_SetItemString(d, "NAME", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NEG_INFINITY x = PyInt_FromLong((long) AL_NEG_INFINITY); if (x == NULL || PyDict_SetItemString(d, "NEG_INFINITY", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NEG_INFINITY_BIT x = PyInt_FromLong((long) AL_NEG_INFINITY_BIT); if (x == NULL || PyDict_SetItemString(d, "NEG_INFINITY_BIT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NO_CHANGE x = PyInt_FromLong((long) AL_NO_CHANGE); if (x == NULL || PyDict_SetItemString(d, "NO_CHANGE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NO_CHANGE_BIT x = PyInt_FromLong((long) AL_NO_CHANGE_BIT); if (x == NULL || PyDict_SetItemString(d, "NO_CHANGE_BIT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NO_ELEM x = PyInt_FromLong((long) AL_NO_ELEM); if (x == NULL || PyDict_SetItemString(d, "NO_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NO_ERRORS x = PyInt_FromLong((long) AL_NO_ERRORS); if (x == NULL || PyDict_SetItemString(d, "NO_ERRORS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NO_OP x = PyInt_FromLong((long) AL_NO_OP); if (x == NULL || PyDict_SetItemString(d, "NO_OP", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NO_VAL x = PyInt_FromLong((long) AL_NO_VAL); if (x == NULL || PyDict_SetItemString(d, "NO_VAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NULL_INTERFACE x = PyInt_FromLong((long) AL_NULL_INTERFACE); if (x == NULL || PyDict_SetItemString(d, "NULL_INTERFACE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NULL_RESOURCE x = PyInt_FromLong((long) AL_NULL_RESOURCE); if (x == NULL || PyDict_SetItemString(d, "NULL_RESOURCE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_OPTICAL_IF_TYPE x = PyInt_FromLong((long) AL_OPTICAL_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "OPTICAL_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_OUTPUT_COUNT x = PyInt_FromLong((long) AL_OUTPUT_COUNT); if (x == NULL || PyDict_SetItemString(d, "OUTPUT_COUNT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_OUTPUT_DEVICE_TYPE x = PyInt_FromLong((long) AL_OUTPUT_DEVICE_TYPE); if (x == NULL || PyDict_SetItemString(d, "OUTPUT_DEVICE_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_OUTPUT_HRB_TYPE x = PyInt_FromLong((long) AL_OUTPUT_HRB_TYPE); if (x == NULL || PyDict_SetItemString(d, "OUTPUT_HRB_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_OUTPUT_PORT_TYPE x = PyInt_FromLong((long) AL_OUTPUT_PORT_TYPE); if (x == NULL || PyDict_SetItemString(d, "OUTPUT_PORT_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_OUTPUT_RATE x = PyInt_FromLong((long) AL_OUTPUT_RATE); if (x == NULL || PyDict_SetItemString(d, "OUTPUT_RATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PARAM_BIT x = PyInt_FromLong((long) AL_PARAM_BIT); if (x == NULL || PyDict_SetItemString(d, "PARAM_BIT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PARAMS x = PyInt_FromLong((long) AL_PARAMS); if (x == NULL || PyDict_SetItemString(d, "PARAMS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PORT_COUNT x = PyInt_FromLong((long) AL_PORT_COUNT); if (x == NULL || PyDict_SetItemString(d, "PORT_COUNT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PORT_TYPE x = PyInt_FromLong((long) AL_PORT_TYPE); if (x == NULL || PyDict_SetItemString(d, "PORT_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PORTS x = PyInt_FromLong((long) AL_PORTS); if (x == NULL || PyDict_SetItemString(d, "PORTS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PORTSTYLE_DIRECT x = PyInt_FromLong((long) AL_PORTSTYLE_DIRECT); if (x == NULL || PyDict_SetItemString(d, "PORTSTYLE_DIRECT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PORTSTYLE_SERIAL x = PyInt_FromLong((long) AL_PORTSTYLE_SERIAL); if (x == NULL || PyDict_SetItemString(d, "PORTSTYLE_SERIAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PRINT_ERRORS x = PyInt_FromLong((long) AL_PRINT_ERRORS); if (x == NULL || PyDict_SetItemString(d, "PRINT_ERRORS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_PTR_ELEM x = PyInt_FromLong((long) AL_PTR_ELEM); if (x == NULL || PyDict_SetItemString(d, "PTR_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RANGE_VALUE x = PyInt_FromLong((long) AL_RANGE_VALUE); if (x == NULL || PyDict_SetItemString(d, "RANGE_VALUE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE x = PyInt_FromLong((long) AL_RATE); if (x == NULL || PyDict_SetItemString(d, "RATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_11025 x = PyInt_FromLong((long) AL_RATE_11025); if (x == NULL || PyDict_SetItemString(d, "RATE_11025", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_16000 x = PyInt_FromLong((long) AL_RATE_16000); if (x == NULL || PyDict_SetItemString(d, "RATE_16000", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_22050 x = PyInt_FromLong((long) AL_RATE_22050); if (x == NULL || PyDict_SetItemString(d, "RATE_22050", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_32000 x = PyInt_FromLong((long) AL_RATE_32000); if (x == NULL || PyDict_SetItemString(d, "RATE_32000", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_44100 x = PyInt_FromLong((long) AL_RATE_44100); if (x == NULL || PyDict_SetItemString(d, "RATE_44100", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_48000 x = PyInt_FromLong((long) AL_RATE_48000); if (x == NULL || PyDict_SetItemString(d, "RATE_48000", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_8000 x = PyInt_FromLong((long) AL_RATE_8000); if (x == NULL || PyDict_SetItemString(d, "RATE_8000", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_AES_1 x = PyInt_FromLong((long) AL_RATE_AES_1); if (x == NULL || PyDict_SetItemString(d, "RATE_AES_1", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_AES_1s x = PyInt_FromLong((long) AL_RATE_AES_1s); if (x == NULL || PyDict_SetItemString(d, "RATE_AES_1s", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_AES_2 x = PyInt_FromLong((long) AL_RATE_AES_2); if (x == NULL || PyDict_SetItemString(d, "RATE_AES_2", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_AES_3 x = PyInt_FromLong((long) AL_RATE_AES_3); if (x == NULL || PyDict_SetItemString(d, "RATE_AES_3", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_AES_4 x = PyInt_FromLong((long) AL_RATE_AES_4); if (x == NULL || PyDict_SetItemString(d, "RATE_AES_4", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_AES_6 x = PyInt_FromLong((long) AL_RATE_AES_6); if (x == NULL || PyDict_SetItemString(d, "RATE_AES_6", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_FRACTION_D x = PyInt_FromLong((long) AL_RATE_FRACTION_D); if (x == NULL || PyDict_SetItemString(d, "RATE_FRACTION_D", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_FRACTION_N x = PyInt_FromLong((long) AL_RATE_FRACTION_N); if (x == NULL || PyDict_SetItemString(d, "RATE_FRACTION_N", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_INPUTRATE x = PyInt_FromLong((long) AL_RATE_INPUTRATE); if (x == NULL || PyDict_SetItemString(d, "RATE_INPUTRATE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_NO_DIGITAL_INPUT x = PyInt_FromLong((long) AL_RATE_NO_DIGITAL_INPUT); if (x == NULL || PyDict_SetItemString(d, "RATE_NO_DIGITAL_INPUT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_UNACQUIRED x = PyInt_FromLong((long) AL_RATE_UNACQUIRED); if (x == NULL || PyDict_SetItemString(d, "RATE_UNACQUIRED", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RATE_UNDEFINED x = PyInt_FromLong((long) AL_RATE_UNDEFINED); if (x == NULL || PyDict_SetItemString(d, "RATE_UNDEFINED", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_REF_0DBV x = PyInt_FromLong((long) AL_REF_0DBV); if (x == NULL || PyDict_SetItemString(d, "REF_0DBV", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_REF_NONE x = PyInt_FromLong((long) AL_REF_NONE); if (x == NULL || PyDict_SetItemString(d, "REF_NONE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RESERVED1_TYPE x = PyInt_FromLong((long) AL_RESERVED1_TYPE); if (x == NULL || PyDict_SetItemString(d, "RESERVED1_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RESERVED2_TYPE x = PyInt_FromLong((long) AL_RESERVED2_TYPE); if (x == NULL || PyDict_SetItemString(d, "RESERVED2_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RESERVED3_TYPE x = PyInt_FromLong((long) AL_RESERVED3_TYPE); if (x == NULL || PyDict_SetItemString(d, "RESERVED3_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RESERVED4_TYPE x = PyInt_FromLong((long) AL_RESERVED4_TYPE); if (x == NULL || PyDict_SetItemString(d, "RESERVED4_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RESOURCE x = PyInt_FromLong((long) AL_RESOURCE); if (x == NULL || PyDict_SetItemString(d, "RESOURCE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RESOURCE_ELEM x = PyInt_FromLong((long) AL_RESOURCE_ELEM); if (x == NULL || PyDict_SetItemString(d, "RESOURCE_ELEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RESOURCE_TYPE x = PyInt_FromLong((long) AL_RESOURCE_TYPE); if (x == NULL || PyDict_SetItemString(d, "RESOURCE_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RIGHT_INPUT_ATTEN x = PyInt_FromLong((long) AL_RIGHT_INPUT_ATTEN); if (x == NULL || PyDict_SetItemString(d, "RIGHT_INPUT_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RIGHT_MONITOR_ATTEN x = PyInt_FromLong((long) AL_RIGHT_MONITOR_ATTEN); if (x == NULL || PyDict_SetItemString(d, "RIGHT_MONITOR_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RIGHT_SPEAKER_GAIN x = PyInt_FromLong((long) AL_RIGHT_SPEAKER_GAIN); if (x == NULL || PyDict_SetItemString(d, "RIGHT_SPEAKER_GAIN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RIGHT1_INPUT_ATTEN x = PyInt_FromLong((long) AL_RIGHT1_INPUT_ATTEN); if (x == NULL || PyDict_SetItemString(d, "RIGHT1_INPUT_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_RIGHT2_INPUT_ATTEN x = PyInt_FromLong((long) AL_RIGHT2_INPUT_ATTEN); if (x == NULL || PyDict_SetItemString(d, "RIGHT2_INPUT_ATTEN", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SAMPFMT_DOUBLE x = PyInt_FromLong((long) AL_SAMPFMT_DOUBLE); if (x == NULL || PyDict_SetItemString(d, "SAMPFMT_DOUBLE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SAMPFMT_FLOAT x = PyInt_FromLong((long) AL_SAMPFMT_FLOAT); if (x == NULL || PyDict_SetItemString(d, "SAMPFMT_FLOAT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SAMPFMT_TWOSCOMP x = PyInt_FromLong((long) AL_SAMPFMT_TWOSCOMP); if (x == NULL || PyDict_SetItemString(d, "SAMPFMT_TWOSCOMP", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SAMPLE_16 x = PyInt_FromLong((long) AL_SAMPLE_16); if (x == NULL || PyDict_SetItemString(d, "SAMPLE_16", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SAMPLE_24 x = PyInt_FromLong((long) AL_SAMPLE_24); if (x == NULL || PyDict_SetItemString(d, "SAMPLE_24", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SAMPLE_8 x = PyInt_FromLong((long) AL_SAMPLE_8); if (x == NULL || PyDict_SetItemString(d, "SAMPLE_8", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SCALAR_VAL x = PyInt_FromLong((long) AL_SCALAR_VAL); if (x == NULL || PyDict_SetItemString(d, "SCALAR_VAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SET_VAL x = PyInt_FromLong((long) AL_SET_VAL); if (x == NULL || PyDict_SetItemString(d, "SET_VAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SHORT_NAME x = PyInt_FromLong((long) AL_SHORT_NAME); if (x == NULL || PyDict_SetItemString(d, "SHORT_NAME", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SMPTE272M_IF_TYPE x = PyInt_FromLong((long) AL_SMPTE272M_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "SMPTE272M_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SOURCE x = PyInt_FromLong((long) AL_SOURCE); if (x == NULL || PyDict_SetItemString(d, "SOURCE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SPEAKER_IF_TYPE x = PyInt_FromLong((long) AL_SPEAKER_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "SPEAKER_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SPEAKER_MUTE_CTL x = PyInt_FromLong((long) AL_SPEAKER_MUTE_CTL); if (x == NULL || PyDict_SetItemString(d, "SPEAKER_MUTE_CTL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SPEAKER_MUTE_OFF x = PyInt_FromLong((long) AL_SPEAKER_MUTE_OFF); if (x == NULL || PyDict_SetItemString(d, "SPEAKER_MUTE_OFF", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SPEAKER_MUTE_ON x = PyInt_FromLong((long) AL_SPEAKER_MUTE_ON); if (x == NULL || PyDict_SetItemString(d, "SPEAKER_MUTE_ON", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SPEAKER_PLUS_LINE_IF_TYPE x = PyInt_FromLong((long) AL_SPEAKER_PLUS_LINE_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "SPEAKER_PLUS_LINE_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_STEREO x = PyInt_FromLong((long) AL_STEREO); if (x == NULL || PyDict_SetItemString(d, "STEREO", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_STRING_VAL x = PyInt_FromLong((long) AL_STRING_VAL); if (x == NULL || PyDict_SetItemString(d, "STRING_VAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SUBSYSTEM x = PyInt_FromLong((long) AL_SUBSYSTEM); if (x == NULL || PyDict_SetItemString(d, "SUBSYSTEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SUBSYSTEM_TYPE x = PyInt_FromLong((long) AL_SUBSYSTEM_TYPE); if (x == NULL || PyDict_SetItemString(d, "SUBSYSTEM_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SYNC_INPUT_TO_AES x = PyInt_FromLong((long) AL_SYNC_INPUT_TO_AES); if (x == NULL || PyDict_SetItemString(d, "SYNC_INPUT_TO_AES", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SYNC_OUTPUT_TO_AES x = PyInt_FromLong((long) AL_SYNC_OUTPUT_TO_AES); if (x == NULL || PyDict_SetItemString(d, "SYNC_OUTPUT_TO_AES", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SYSTEM x = PyInt_FromLong((long) AL_SYSTEM); if (x == NULL || PyDict_SetItemString(d, "SYSTEM", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_SYSTEM_TYPE x = PyInt_FromLong((long) AL_SYSTEM_TYPE); if (x == NULL || PyDict_SetItemString(d, "SYSTEM_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_TEST_IF_TYPE x = PyInt_FromLong((long) AL_TEST_IF_TYPE); if (x == NULL || PyDict_SetItemString(d, "TEST_IF_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_TYPE x = PyInt_FromLong((long) AL_TYPE); if (x == NULL || PyDict_SetItemString(d, "TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_TYPE_BIT x = PyInt_FromLong((long) AL_TYPE_BIT); if (x == NULL || PyDict_SetItemString(d, "TYPE_BIT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_UNUSED_COUNT x = PyInt_FromLong((long) AL_UNUSED_COUNT); if (x == NULL || PyDict_SetItemString(d, "UNUSED_COUNT", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_UNUSED_PORTS x = PyInt_FromLong((long) AL_UNUSED_PORTS); if (x == NULL || PyDict_SetItemString(d, "UNUSED_PORTS", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_VARIABLE_MCLK_TYPE x = PyInt_FromLong((long) AL_VARIABLE_MCLK_TYPE); if (x == NULL || PyDict_SetItemString(d, "VARIABLE_MCLK_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_VECTOR_VAL x = PyInt_FromLong((long) AL_VECTOR_VAL); if (x == NULL || PyDict_SetItemString(d, "VECTOR_VAL", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_VIDEO_MCLK_TYPE x = PyInt_FromLong((long) AL_VIDEO_MCLK_TYPE); if (x == NULL || PyDict_SetItemString(d, "VIDEO_MCLK_TYPE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_WORDSIZE x = PyInt_FromLong((long) AL_WORDSIZE); if (x == NULL || PyDict_SetItemString(d, "WORDSIZE", x) < 0) goto error; Py_DECREF(x); #endif #ifdef AL_NO_ELEM /* IRIX 6 */ (void) alSetErrorHandler(ErrorHandler); #endif /* AL_NO_ELEM */ #ifdef OLD_INTERFACE (void) ALseterrorhandler(ErrorHandler); #endif /* OLD_INTERFACE */ error: return; } Python-2.3.7/Modules/_localemodule.c0000644001241000117560000005015210027371327016635 0ustar loewishpifb6/*********************************************************** Copyright (C) 1997, 2002, 2003 Martin von Loewis Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies. This software comes with no warranty. Use at your own risk. ******************************************************************/ #include "Python.h" #include #include #include #include #include #ifdef HAVE_LANGINFO_H #include #endif #ifdef HAVE_LIBINTL_H #include #endif #ifdef HAVE_WCHAR_H #include #endif #if defined(MS_WINDOWS) #define WIN32_LEAN_AND_MEAN #include #endif #if defined(__APPLE__) || defined(__MWERKS__) #include "macglue.h" #endif #ifdef RISCOS char *strdup(const char *); #endif PyDoc_STRVAR(locale__doc__, "Support for POSIX locales."); static PyObject *Error; /* support functions for formatting floating point numbers */ PyDoc_STRVAR(setlocale__doc__, "(integer,string=None) -> string. Activates/queries locale processing."); /* to record the LC_NUMERIC settings */ static PyObject* grouping = NULL; static PyObject* thousands_sep = NULL; static PyObject* decimal_point = NULL; /* if non-null, indicates that LC_NUMERIC is different from "C" */ static char* saved_numeric = NULL; /* the grouping is terminated by either 0 or CHAR_MAX */ static PyObject* copy_grouping(char* s) { int i; PyObject *result, *val = NULL; if (s[0] == '\0') /* empty string: no grouping at all */ return PyList_New(0); for (i = 0; s[i] != '\0' && s[i] != CHAR_MAX; i++) ; /* nothing */ result = PyList_New(i+1); if (!result) return NULL; i = -1; do { i++; val = PyInt_FromLong(s[i]); if (!val) break; if (PyList_SetItem(result, i, val)) { Py_DECREF(val); val = NULL; break; } } while (s[i] != '\0' && s[i] != CHAR_MAX); if (!val) { Py_DECREF(result); return NULL; } return result; } static void fixup_ulcase(void) { PyObject *mods, *strop, *string, *ulo; unsigned char ul[256]; int n, c; /* find the string and strop modules */ mods = PyImport_GetModuleDict(); if (!mods) return; string = PyDict_GetItemString(mods, "string"); if (string) string = PyModule_GetDict(string); strop=PyDict_GetItemString(mods, "strop"); if (strop) strop = PyModule_GetDict(strop); if (!string && !strop) return; /* create uppercase map string */ n = 0; for (c = 0; c < 256; c++) { if (isupper(c)) ul[n++] = c; } ulo = PyString_FromStringAndSize((const char *)ul, n); if (!ulo) return; if (string) PyDict_SetItemString(string, "uppercase", ulo); if (strop) PyDict_SetItemString(strop, "uppercase", ulo); Py_DECREF(ulo); /* create lowercase string */ n = 0; for (c = 0; c < 256; c++) { if (islower(c)) ul[n++] = c; } ulo = PyString_FromStringAndSize((const char *)ul, n); if (!ulo) return; if (string) PyDict_SetItemString(string, "lowercase", ulo); if (strop) PyDict_SetItemString(strop, "lowercase", ulo); Py_DECREF(ulo); /* create letters string */ n = 0; for (c = 0; c < 256; c++) { if (isalpha(c)) ul[n++] = c; } ulo = PyString_FromStringAndSize((const char *)ul, n); if (!ulo) return; if (string) PyDict_SetItemString(string, "letters", ulo); Py_DECREF(ulo); } static PyObject* PyLocale_setlocale(PyObject* self, PyObject* args) { int category; char *locale = NULL, *result; PyObject *result_object; struct lconv *lc; if (!PyArg_ParseTuple(args, "i|z:setlocale", &category, &locale)) return NULL; if (locale) { /* set locale */ result = setlocale(category, locale); if (!result) { /* operation failed, no setting was changed */ PyErr_SetString(Error, "unsupported locale setting"); return NULL; } result_object = PyString_FromString(result); if (!result_object) return NULL; /* record changes to LC_NUMERIC */ if (category == LC_NUMERIC || category == LC_ALL) { if (strcmp(locale, "C") == 0 || strcmp(locale, "POSIX") == 0) { /* user just asked for default numeric locale */ if (saved_numeric) free(saved_numeric); saved_numeric = NULL; } else { /* remember values */ lc = localeconv(); Py_XDECREF(grouping); grouping = copy_grouping(lc->grouping); Py_XDECREF(thousands_sep); thousands_sep = PyString_FromString(lc->thousands_sep); Py_XDECREF(decimal_point); decimal_point = PyString_FromString(lc->decimal_point); if (saved_numeric) free(saved_numeric); saved_numeric = strdup(locale); /* restore to "C" */ setlocale(LC_NUMERIC, "C"); } } /* record changes to LC_CTYPE */ if (category == LC_CTYPE || category == LC_ALL) fixup_ulcase(); /* things that got wrong up to here are ignored */ PyErr_Clear(); } else { /* get locale */ /* restore LC_NUMERIC first, if appropriate */ if (saved_numeric) setlocale(LC_NUMERIC, saved_numeric); result = setlocale(category, NULL); if (!result) { PyErr_SetString(Error, "locale query failed"); return NULL; } result_object = PyString_FromString(result); /* restore back to "C" */ if (saved_numeric) setlocale(LC_NUMERIC, "C"); } return result_object; } PyDoc_STRVAR(localeconv__doc__, "() -> dict. Returns numeric and monetary locale-specific parameters."); static PyObject* PyLocale_localeconv(PyObject* self) { PyObject* result; struct lconv *l; PyObject *x; result = PyDict_New(); if (!result) return NULL; /* if LC_NUMERIC is different in the C library, use saved value */ l = localeconv(); /* hopefully, the localeconv result survives the C library calls involved herein */ #define RESULT_STRING(s)\ x = PyString_FromString(l->s);\ if (!x) goto failed;\ PyDict_SetItemString(result, #s, x);\ Py_XDECREF(x) #define RESULT_INT(i)\ x = PyInt_FromLong(l->i);\ if (!x) goto failed;\ PyDict_SetItemString(result, #i, x);\ Py_XDECREF(x) /* Numeric information */ if (saved_numeric){ /* cannot use localeconv results */ PyDict_SetItemString(result, "decimal_point", decimal_point); PyDict_SetItemString(result, "grouping", grouping); PyDict_SetItemString(result, "thousands_sep", thousands_sep); } else { RESULT_STRING(decimal_point); RESULT_STRING(thousands_sep); x = copy_grouping(l->grouping); if (!x) goto failed; PyDict_SetItemString(result, "grouping", x); Py_XDECREF(x); } /* Monetary information */ RESULT_STRING(int_curr_symbol); RESULT_STRING(currency_symbol); RESULT_STRING(mon_decimal_point); RESULT_STRING(mon_thousands_sep); x = copy_grouping(l->mon_grouping); if (!x) goto failed; PyDict_SetItemString(result, "mon_grouping", x); Py_XDECREF(x); RESULT_STRING(positive_sign); RESULT_STRING(negative_sign); RESULT_INT(int_frac_digits); RESULT_INT(frac_digits); RESULT_INT(p_cs_precedes); RESULT_INT(p_sep_by_space); RESULT_INT(n_cs_precedes); RESULT_INT(n_sep_by_space); RESULT_INT(p_sign_posn); RESULT_INT(n_sign_posn); return result; failed: Py_XDECREF(result); Py_XDECREF(x); return NULL; } PyDoc_STRVAR(strcoll__doc__, "string,string -> int. Compares two strings according to the locale."); static PyObject* PyLocale_strcoll(PyObject* self, PyObject* args) { #if !defined(HAVE_WCSCOLL) || !defined(Py_USING_UNICODE) char *s1,*s2; if (!PyArg_ParseTuple(args, "ss:strcoll", &s1, &s2)) return NULL; return PyInt_FromLong(strcoll(s1, s2)); #else PyObject *os1, *os2, *result = NULL; wchar_t *ws1 = NULL, *ws2 = NULL; int rel1 = 0, rel2 = 0, len1, len2; if (!PyArg_ParseTuple(args, "OO:strcoll", &os1, &os2)) return NULL; /* If both arguments are byte strings, use strcoll. */ if (PyString_Check(os1) && PyString_Check(os2)) return PyInt_FromLong(strcoll(PyString_AS_STRING(os1), PyString_AS_STRING(os2))); /* If neither argument is unicode, it's an error. */ if (!PyUnicode_Check(os1) && !PyUnicode_Check(os2)) { PyErr_SetString(PyExc_ValueError, "strcoll arguments must be strings"); } /* Convert the non-unicode argument to unicode. */ if (!PyUnicode_Check(os1)) { os1 = PyUnicode_FromObject(os1); if (!os1) return NULL; rel1 = 1; } if (!PyUnicode_Check(os2)) { os2 = PyUnicode_FromObject(os2); if (!os2) { Py_DECREF(os1); return NULL; } rel2 = 1; } /* Convert the unicode strings to wchar[]. */ len1 = PyUnicode_GET_SIZE(os1) + 1; len2 = PyUnicode_GET_SIZE(os2) + 1; ws1 = PyMem_MALLOC(len1 * sizeof(wchar_t)); if (!ws1) { PyErr_NoMemory(); goto done; } if (PyUnicode_AsWideChar((PyUnicodeObject*)os1, ws1, len1) == -1) goto done; ws2 = PyMem_MALLOC(len2 * sizeof(wchar_t)); if (!ws2) { PyErr_NoMemory(); goto done; } if (PyUnicode_AsWideChar((PyUnicodeObject*)os2, ws2, len2) == -1) goto done; /* Collate the strings. */ result = PyInt_FromLong(wcscoll(ws1, ws2)); done: /* Deallocate everything. */ if (ws1) PyMem_FREE(ws1); if (ws2) PyMem_FREE(ws2); if (rel1) { Py_DECREF(os1); } if (rel2) { Py_DECREF(os2); } return result; #endif } PyDoc_STRVAR(strxfrm__doc__, "string -> string. Returns a string that behaves for cmp locale-aware."); static PyObject* PyLocale_strxfrm(PyObject* self, PyObject* args) { char *s, *buf; size_t n1, n2; PyObject *result; if (!PyArg_ParseTuple(args, "s:strxfrm", &s)) return NULL; /* assume no change in size, first */ n1 = strlen(s) + 1; buf = PyMem_Malloc(n1); if (!buf) return PyErr_NoMemory(); n2 = strxfrm(buf, s, n1); if (n2 > n1) { /* more space needed */ buf = PyMem_Realloc(buf, n2); if (!buf) return PyErr_NoMemory(); strxfrm(buf, s, n2); } result = PyString_FromString(buf); PyMem_Free(buf); return result; } #if defined(MS_WINDOWS) static PyObject* PyLocale_getdefaultlocale(PyObject* self) { char encoding[100]; char locale[100]; PyOS_snprintf(encoding, sizeof(encoding), "cp%d", GetACP()); if (GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SISO639LANGNAME, locale, sizeof(locale))) { int i = strlen(locale); locale[i++] = '_'; if (GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SISO3166CTRYNAME, locale+i, sizeof(locale)-i)) return Py_BuildValue("ss", locale, encoding); } /* If we end up here, this windows version didn't know about ISO639/ISO3166 names (it's probably Windows 95). Return the Windows language identifier instead (a hexadecimal number) */ locale[0] = '0'; locale[1] = 'x'; if (GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_IDEFAULTLANGUAGE, locale+2, sizeof(locale)-2)) { return Py_BuildValue("ss", locale, encoding); } /* cannot determine the language code (very unlikely) */ Py_INCREF(Py_None); return Py_BuildValue("Os", Py_None, encoding); } #endif #if defined(__APPLE__) static PyObject* PyLocale_getdefaultlocale(PyObject* self) { return Py_BuildValue("Os", Py_None, PyMac_getscript()); } #endif #ifdef HAVE_LANGINFO_H #define LANGINFO(X) {#X, X} struct langinfo_constant{ char* name; int value; } langinfo_constants[] = { /* These constants should exist on any langinfo implementation */ LANGINFO(DAY_1), LANGINFO(DAY_2), LANGINFO(DAY_3), LANGINFO(DAY_4), LANGINFO(DAY_5), LANGINFO(DAY_6), LANGINFO(DAY_7), LANGINFO(ABDAY_1), LANGINFO(ABDAY_2), LANGINFO(ABDAY_3), LANGINFO(ABDAY_4), LANGINFO(ABDAY_5), LANGINFO(ABDAY_6), LANGINFO(ABDAY_7), LANGINFO(MON_1), LANGINFO(MON_2), LANGINFO(MON_3), LANGINFO(MON_4), LANGINFO(MON_5), LANGINFO(MON_6), LANGINFO(MON_7), LANGINFO(MON_8), LANGINFO(MON_9), LANGINFO(MON_10), LANGINFO(MON_11), LANGINFO(MON_12), LANGINFO(ABMON_1), LANGINFO(ABMON_2), LANGINFO(ABMON_3), LANGINFO(ABMON_4), LANGINFO(ABMON_5), LANGINFO(ABMON_6), LANGINFO(ABMON_7), LANGINFO(ABMON_8), LANGINFO(ABMON_9), LANGINFO(ABMON_10), LANGINFO(ABMON_11), LANGINFO(ABMON_12), #ifdef RADIXCHAR /* The following are not available with glibc 2.0 */ LANGINFO(RADIXCHAR), LANGINFO(THOUSEP), /* YESSTR and NOSTR are deprecated in glibc, since they are a special case of message translation, which should be rather done using gettext. So we don't expose it to Python in the first place. LANGINFO(YESSTR), LANGINFO(NOSTR), */ LANGINFO(CRNCYSTR), #endif LANGINFO(D_T_FMT), LANGINFO(D_FMT), LANGINFO(T_FMT), LANGINFO(AM_STR), LANGINFO(PM_STR), /* The following constants are available only with XPG4, but... AIX 3.2. only has CODESET. OpenBSD doesn't have CODESET but has T_FMT_AMPM, and doesn't have a few of the others. Solution: ifdef-test them all. */ #ifdef CODESET LANGINFO(CODESET), #endif #ifdef T_FMT_AMPM LANGINFO(T_FMT_AMPM), #endif #ifdef ERA LANGINFO(ERA), #endif #ifdef ERA_D_FMT LANGINFO(ERA_D_FMT), #endif #ifdef ERA_D_T_FMT LANGINFO(ERA_D_T_FMT), #endif #ifdef ERA_T_FMT LANGINFO(ERA_T_FMT), #endif #ifdef ALT_DIGITS LANGINFO(ALT_DIGITS), #endif #ifdef YESEXPR LANGINFO(YESEXPR), #endif #ifdef NOEXPR LANGINFO(NOEXPR), #endif #ifdef _DATE_FMT /* This is not available in all glibc versions that have CODESET. */ LANGINFO(_DATE_FMT), #endif {0, 0} }; PyDoc_STRVAR(nl_langinfo__doc__, "nl_langinfo(key) -> string\n" "Return the value for the locale information associated with key."); static PyObject* PyLocale_nl_langinfo(PyObject* self, PyObject* args) { int item, i; if (!PyArg_ParseTuple(args, "i:nl_langinfo", &item)) return NULL; /* Check whether this is a supported constant. GNU libc sometimes returns numeric values in the char* return value, which would crash PyString_FromString. */ #ifdef RADIXCHAR if (saved_numeric) { if(item == RADIXCHAR) { Py_INCREF(decimal_point); return decimal_point; } if(item == THOUSEP) { Py_INCREF(thousands_sep); return thousands_sep; } } #endif for (i = 0; langinfo_constants[i].name; i++) if (langinfo_constants[i].value == item) { /* Check NULL as a workaround for GNU libc's returning NULL instead of an empty string for nl_langinfo(ERA). */ const char *result = nl_langinfo(item); return PyString_FromString(result != NULL ? result : ""); } PyErr_SetString(PyExc_ValueError, "unsupported langinfo constant"); return NULL; } #endif /* HAVE_LANGINFO_H */ #ifdef HAVE_LIBINTL_H PyDoc_STRVAR(gettext__doc__, "gettext(msg) -> string\n" "Return translation of msg."); static PyObject* PyIntl_gettext(PyObject* self, PyObject *args) { char *in; if (!PyArg_ParseTuple(args, "z", &in)) return 0; return PyString_FromString(gettext(in)); } PyDoc_STRVAR(dgettext__doc__, "dgettext(domain, msg) -> string\n" "Return translation of msg in domain."); static PyObject* PyIntl_dgettext(PyObject* self, PyObject *args) { char *domain, *in; if (!PyArg_ParseTuple(args, "zz", &domain, &in)) return 0; return PyString_FromString(dgettext(domain, in)); } PyDoc_STRVAR(dcgettext__doc__, "dcgettext(domain, msg, category) -> string\n" "Return translation of msg in domain and category."); static PyObject* PyIntl_dcgettext(PyObject *self, PyObject *args) { char *domain, *msgid; int category; if (!PyArg_ParseTuple(args, "zzi", &domain, &msgid, &category)) return 0; return PyString_FromString(dcgettext(domain,msgid,category)); } PyDoc_STRVAR(textdomain__doc__, "textdomain(domain) -> string\n" "Set the C library's textdmain to domain, returning the new domain."); static PyObject* PyIntl_textdomain(PyObject* self, PyObject* args) { char *domain; if (!PyArg_ParseTuple(args, "z", &domain)) return 0; domain = textdomain(domain); if (!domain) { PyErr_SetFromErrno(PyExc_OSError); return NULL; } return PyString_FromString(domain); } PyDoc_STRVAR(bindtextdomain__doc__, "bindtextdomain(domain, dir) -> string\n" "Bind the C library's domain to dir."); static PyObject* PyIntl_bindtextdomain(PyObject* self,PyObject*args) { char *domain,*dirname; if (!PyArg_ParseTuple(args, "zz", &domain, &dirname)) return 0; dirname = bindtextdomain(domain, dirname); if (!dirname) { PyErr_SetFromErrno(PyExc_OSError); return NULL; } return PyString_FromString(dirname); } #endif static struct PyMethodDef PyLocale_Methods[] = { {"setlocale", (PyCFunction) PyLocale_setlocale, METH_VARARGS, setlocale__doc__}, {"localeconv", (PyCFunction) PyLocale_localeconv, METH_NOARGS, localeconv__doc__}, {"strcoll", (PyCFunction) PyLocale_strcoll, METH_VARARGS, strcoll__doc__}, {"strxfrm", (PyCFunction) PyLocale_strxfrm, METH_VARARGS, strxfrm__doc__}, #if defined(MS_WINDOWS) || defined(__APPLE__) {"_getdefaultlocale", (PyCFunction) PyLocale_getdefaultlocale, METH_NOARGS}, #endif #ifdef HAVE_LANGINFO_H {"nl_langinfo", (PyCFunction) PyLocale_nl_langinfo, METH_VARARGS, nl_langinfo__doc__}, #endif #ifdef HAVE_LIBINTL_H {"gettext",(PyCFunction)PyIntl_gettext,METH_VARARGS, gettext__doc__}, {"dgettext",(PyCFunction)PyIntl_dgettext,METH_VARARGS, dgettext__doc__}, {"dcgettext",(PyCFunction)PyIntl_dcgettext,METH_VARARGS, dcgettext__doc__}, {"textdomain",(PyCFunction)PyIntl_textdomain,METH_VARARGS, textdomain__doc__}, {"bindtextdomain",(PyCFunction)PyIntl_bindtextdomain,METH_VARARGS, bindtextdomain__doc__}, #endif {NULL, NULL} }; PyMODINIT_FUNC init_locale(void) { PyObject *m, *d, *x; #ifdef HAVE_LANGINFO_H int i; #endif m = Py_InitModule("_locale", PyLocale_Methods); d = PyModule_GetDict(m); x = PyInt_FromLong(LC_CTYPE); PyDict_SetItemString(d, "LC_CTYPE", x); Py_XDECREF(x); x = PyInt_FromLong(LC_TIME); PyDict_SetItemString(d, "LC_TIME", x); Py_XDECREF(x); x = PyInt_FromLong(LC_COLLATE); PyDict_SetItemString(d, "LC_COLLATE", x); Py_XDECREF(x); x = PyInt_FromLong(LC_MONETARY); PyDict_SetItemString(d, "LC_MONETARY", x); Py_XDECREF(x); #ifdef LC_MESSAGES x = PyInt_FromLong(LC_MESSAGES); PyDict_SetItemString(d, "LC_MESSAGES", x); Py_XDECREF(x); #endif /* LC_MESSAGES */ x = PyInt_FromLong(LC_NUMERIC); PyDict_SetItemString(d, "LC_NUMERIC", x); Py_XDECREF(x); x = PyInt_FromLong(LC_ALL); PyDict_SetItemString(d, "LC_ALL", x); Py_XDECREF(x); x = PyInt_FromLong(CHAR_MAX); PyDict_SetItemString(d, "CHAR_MAX", x); Py_XDECREF(x); Error = PyErr_NewException("locale.Error", NULL, NULL); PyDict_SetItemString(d, "Error", Error); x = PyString_FromString(locale__doc__); PyDict_SetItemString(d, "__doc__", x); Py_XDECREF(x); #ifdef HAVE_LANGINFO_H for (i = 0; langinfo_constants[i].name; i++) { PyModule_AddIntConstant(m, langinfo_constants[i].name, langinfo_constants[i].value); } #endif } /* Local variables: c-basic-offset: 4 indent-tabs-mode: nil End: */ Python-2.3.7/Modules/gc_weakref.txt0000644001241000117560000002632710141027023016516 0ustar loewishpifb6Intro ===== The basic rule for dealing with weakref callbacks (and __del__ methods too, for that matter) during cyclic gc: Once gc has computed the set of unreachable objects, no Python-level code can be allowed to access an unreachable object. If that can happen, then the Python code can resurrect unreachable objects too, and gc can't detect that without starting over. Since gc eventually runs tp_clear on all unreachable objects, if an unreachable object is resurrected then tp_clear will eventually be called on it (or may already have been called before resurrection). At best (and this has been an historically common bug), tp_clear empties an instance's __dict__, and "impossible" AttributeErrors result. At worst, tp_clear leaves behind an insane object at the C level, and segfaults result (historically, most often by setting a new-style class's mro pointer to NULL, after which attribute lookups performed by the class can segfault). OTOH, it's OK to run Python-level code that can't access unreachable objects, and sometimes that's necessary. The chief example is the callback attached to a reachable weakref W to an unreachable object O. Since O is going away, and W is still alive, the callback must be invoked. Because W is still alive, everything reachable from its callback is also reachable, so it's also safe to invoke the callback (although that's trickier than it sounds, since other reachable weakrefs to other unreachable objects may still exist, and be accessible to the callback -- there are lots of painful details like this covered in the rest of this file). Python 2.4/2.3.5 ================ The "Before 2.3.3" section below turned out to be wrong in some ways, but I'm leaving it as-is because it's more right than wrong, and serves as a wonderful example of how painful analysis can miss not only the forest for the trees, but also miss the trees for the aphids sucking the trees dry . The primary thing it missed is that when a weakref to a piece of cyclic trash (CT) exists, then any call to any Python code whatsoever can end up materializing a strong reference to that weakref's CT referent, and so possibly resurrect an insane object (one for which cyclic gc has called-- or will call before it's done --tp_clear()). It's not even necessarily that a weakref callback or __del__ method does something nasty on purpose: as soon as we execute Python code, threads other than the gc thread can run too, and they can do ordinary things with weakrefs that end up resurrecting CT while gc is running. http://www.python.org/sf/1055820 shows how innocent it can be, and also how nasty. Variants of the three focussed test cases attached to that bug report are now part of Python's standard Lib/test/test_gc.py. Jim Fulton gave the best nutshell summary of the new (in 2.4 and 2.3.5) approach: Clearing cyclic trash can call Python code. If there are weakrefs to any of the cyclic trash, then those weakrefs can be used to resurrect the objects. Therefore, *before* clearing cyclic trash, we need to remove any weakrefs. If any of the weakrefs being removed have callbacks, then we need to save the callbacks and call them *after* all of the weakrefs have been cleared. Alas, doing just that much doesn't work, because it overlooks what turned out to be the much subtler problems that were fixed earlier, and described below. We do clear all weakrefs to CT now before breaking cycles, but not all callbacks encountered can be run later. That's explained in horrid detail below. Older text follows, with a some later comments in [] brackets: Before 2.3.3 ============ Before 2.3.3, Python's cyclic gc didn't pay any attention to weakrefs. Segfaults in Zope3 resulted. weakrefs in Python are designed to, at worst, let *other* objects learn that a given object has died, via a callback function. The weakly referenced object itself is not passed to the callback, and the presumption is that the weakly referenced object is unreachable trash at the time the callback is invoked. That's usually true, but not always. Suppose a weakly referenced object becomes part of a clump of cyclic trash. When enough cycles are broken by cyclic gc that the object is reclaimed, the callback is invoked. If it's possible for the callback to get at objects in the cycle(s), then it may be possible for those objects to access (via strong references in the cycle) the weakly referenced object being torn down, or other objects in the cycle that have already suffered a tp_clear() call. There's no guarantee that an object is in a sane state after tp_clear(). Bad things (including segfaults) can happen right then, during the callback's execution, or can happen at any later time if the callback manages to resurrect an insane object. [That missed that, in addition, a weakref to CT can exist outside CT, and any callback into Python can use such a non-CT weakref to resurrect its CT referent. The same bad kinds of things can happen then.] Note that if it's possible for the callback to get at objects in the trash cycles, it must also be the case that the callback itself is part of the trash cycles. Else the callback would have acted as an external root to the current collection, and nothing reachable from it would be in cyclic trash either. [Except that a non-CT callback can also use a non-CT weakref to get at CT objects.] More, if the callback itself is in cyclic trash, then the weakref to which the callback is attached must also be trash, and for the same kind of reason: if the weakref acted as an external root, then the callback could not have been cyclic trash. So a problem here requires that a weakref, that weakref's callback, and the weakly referenced object, all be in cyclic trash at the same time. This isn't easy to stumble into by accident while Python is running, and, indeed, it took quite a while to dream up failing test cases. Zope3 saw segfaults during shutdown, during the second call of gc in Py_Finalize, after most modules had been torn down. That creates many trash cycles (esp. those involving new-style classes), making the problem much more likely. Once you know what's required to provoke the problem, though, it's easy to create tests that segfault before shutdown. In 2.3.3, before breaking cycles, we first clear all the weakrefs with callbacks in cyclic trash. Since the weakrefs *are* trash, and there's no defined-- or even predictable --order in which tp_clear() gets called on cyclic trash, it's defensible to first clear weakrefs with callbacks. It's a feature of Python's weakrefs too that when a weakref goes away, the callback (if any) associated with it is thrown away too, unexecuted. [In 2.4/2.3.5, we first clear all weakrefs to CT objects, whether or not those weakrefs are themselves CT, and whether or not they have callbacks. The callbacks (if any) on non-CT weakrefs (if any) are invoked later, after all weakrefs-to-CT have been cleared. The callbacks (if any) on CT weakrefs (if any) are never invoked, for the excruciating reasons explained here.] Just that much is almost enough to prevent problems, by throwing away *almost* all the weakref callbacks that could get triggered by gc. The problem remaining is that clearing a weakref with a callback decrefs the callback object, and the callback object may *itself* be weakly referenced, via another weakref with another callback. So the process of clearing weakrefs can trigger callbacks attached to other weakrefs, and those latter weakrefs may or may not be part of cyclic trash. So, to prevent any Python code from running while gc is invoking tp_clear() on all the objects in cyclic trash, [That was always wrong: we can't stop Python code from running when gc is breaking cycles. If an object with a __del__ method is not itself in a cycle, but is reachable only from CT, then breaking cycles will, as a matter of course, drop the refcount on that object to 0, and its __del__ will run right then. What we can and must stop is running any Python code that could access CT.] it's not quite enough just to invoke tp_clear() on weakrefs with callbacks first. Instead the weakref module grew a new private function (_PyWeakref_ClearRef) that does only part of tp_clear(): it removes the weakref from the weakly-referenced object's list of weakrefs, but does not decref the callback object. So calling _PyWeakref_ClearRef(wr) ensures that wr's callback object will never trigger, and (unlike weakref's tp_clear()) also prevents any callback associated *with* wr's callback object from triggering. [Although we may trigger such callbacks later, as explained below.] Then we can call tp_clear on all the cyclic objects and never trigger Python code. [As above, not so: it means never trigger Python code that can access CT.] After we do that, the callback objects still need to be decref'ed. Callbacks (if any) *on* the callback objects that were also part of cyclic trash won't get invoked, because we cleared all trash weakrefs with callbacks at the start. Callbacks on the callback objects that were not part of cyclic trash acted as external roots to everything reachable from them, so nothing reachable from them was part of cyclic trash, so gc didn't do any damage to objects reachable from them, and it's safe to call them at the end of gc. [That's so. In addition, now we also invoke (if any) the callbacks on non-CT weakrefs to CT objects, during the same pass that decrefs the callback objects.] An alternative would have been to treat objects with callbacks like objects with __del__ methods, refusing to collect them, appending them to gc.garbage instead. That would have been much easier. Jim Fulton gave a strong argument against that (on Python-Dev): There's a big difference between __del__ and weakref callbacks. The __del__ method is "internal" to a design. When you design a class with a del method, you know you have to avoid including the class in cycles. Now, suppose you have a design that makes has no __del__ methods but that does use cyclic data structures. You reason about the design, run tests, and convince yourself you don't have a leak. Now, suppose some external code creates a weakref to one of your objects. All of a sudden, you start leaking. You can look at your code all you want and you won't find a reason for the leak. IOW, a class designer can out-think __del__ problems, but has no control over who creates weakrefs to his classes or class instances. The class user has little chance either of predicting when the weakrefs he creates may end up in cycles. Callbacks on weakref callbacks are executed in an arbitrary order, and that's not good (a primary reason not to collect cycles with objects with __del__ methods is to avoid running finalizers in an arbitrary order). However, a weakref callback on a weakref callback has got to be rare. It's possible to do such a thing, so gc has to be robust against it, but I doubt anyone has done it outside the test case I wrote for it. [The callbacks (if any) on non-CT weakrefs to CT objects are also executed in an arbitrary order now. But they were before too, depending on the vagaries of when tp_clear() happened to break enough cycles to trigger them. People simply shouldn't try to use __del__ or weakref callbacks to do fancy stuff.] Python-2.3.7/Modules/xreadlinesmodule.c0000644001241000117560000000741107635423003017375 0ustar loewishpifb6#include "Python.h" PyDoc_STRVAR(xreadlines_doc, "xreadlines(f)\n\ \n\ Return an xreadlines object for the file f."); typedef struct { PyObject_HEAD PyObject *file; PyObject *lines; int lineslen; int lineno; int abslineno; } PyXReadlinesObject; static PyTypeObject XReadlinesObject_Type; static void xreadlines_dealloc(PyXReadlinesObject *op) { Py_XDECREF(op->file); Py_XDECREF(op->lines); PyObject_DEL(op); } /* A larger chunk size doesn't seem to make a difference */ #define CHUNKSIZE 8192 static PyXReadlinesObject * newreadlinesobject(PyObject *file) { PyXReadlinesObject *op; op = PyObject_NEW(PyXReadlinesObject, &XReadlinesObject_Type); if (op == NULL) return NULL; Py_XINCREF(file); op->file = file; op->lines = NULL; op->abslineno = op->lineno = op->lineslen = 0; return op; } static PyObject * xreadlines(PyObject *self, PyObject *args) { PyObject *file; PyXReadlinesObject *ret; if (!PyArg_ParseTuple(args, "O:xreadlines", &file)) return NULL; ret = newreadlinesobject(file); return (PyObject*)ret; } static PyObject * xreadlines_common(PyXReadlinesObject *a) { if (a->lineno >= a->lineslen) { Py_XDECREF(a->lines); a->lines = PyObject_CallMethod(a->file, "readlines", "(i)", CHUNKSIZE); if (a->lines == NULL) return NULL; a->lineno = 0; if ((a->lineslen = PySequence_Size(a->lines)) < 0) return NULL; } a->abslineno++; return PySequence_GetItem(a->lines, a->lineno++); } static PyObject * xreadlines_item(PyXReadlinesObject *a, int i) { if (i != a->abslineno) { PyErr_SetString(PyExc_RuntimeError, "xreadlines object accessed out of order"); return NULL; } return xreadlines_common(a); } static PyObject * xreadlines_iternext(PyXReadlinesObject *a) { PyObject *res; res = xreadlines_common(a); if (res == NULL && PyErr_ExceptionMatches(PyExc_IndexError)) PyErr_Clear(); return res; } static PyObject * xreadlines_next(PyXReadlinesObject *a, PyObject *args) { PyObject *res; if (!PyArg_ParseTuple(args, "")) return NULL; res = xreadlines_common(a); if (res == NULL && PyErr_ExceptionMatches(PyExc_IndexError)) PyErr_SetObject(PyExc_StopIteration, Py_None); return res; } PyDoc_STRVAR(next_doc, "x.next() -> the next line or raise StopIteration"); static PyMethodDef xreadlines_methods[] = { {"next", (PyCFunction)xreadlines_next, METH_VARARGS, next_doc}, {NULL, NULL} }; static PyObject * xreadlines_getattr(PyObject *a, char *name) { return Py_FindMethod(xreadlines_methods, a, name); } static PySequenceMethods xreadlines_as_sequence = { 0, /*sq_length*/ 0, /*sq_concat*/ 0, /*sq_repeat*/ (intargfunc)xreadlines_item, /*sq_item*/ }; static PyTypeObject XReadlinesObject_Type = { PyObject_HEAD_INIT(NULL) 0, "xreadlines.xreadlines", sizeof(PyXReadlinesObject), 0, (destructor)xreadlines_dealloc, /* tp_dealloc */ 0, /* tp_print */ xreadlines_getattr, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ &xreadlines_as_sequence, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT, /* tp_flags */ 0, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)xreadlines_iternext, /* tp_iternext */ }; static PyMethodDef xreadlines_functions[] = { {"xreadlines", xreadlines, METH_VARARGS, xreadlines_doc}, {NULL, NULL} }; PyMODINIT_FUNC initxreadlines(void) { XReadlinesObject_Type.ob_type = &PyType_Type; Py_InitModule("xreadlines", xreadlines_functions); PyErr_Warn(PyExc_DeprecationWarning, "xreadlines is deprecated; use 'for line in file'."); } Python-2.3.7/Modules/tkappinit.c0000644001241000117560000000734307404770254016047 0ustar loewishpifb6/* appinit.c -- Tcl and Tk application initialization. The function Tcl_AppInit() below initializes various Tcl packages. It is called for each Tcl interpreter created by _tkinter.create(). It needs to be compiled with -DWITH_ flags for each package that you are statically linking with. You may have to add sections for packages not yet listed below. Note that those packages for which Tcl_StaticPackage() is called with a NULL first argument are known as "static loadable" packages to Tcl but not actually initialized. To use these, you have to load it explicitly, e.g. tkapp.eval("load {} Blt"). */ #include #include int Tcl_AppInit(Tcl_Interp *interp) { Tk_Window main_window; #ifdef TK_AQUA #ifndef MAX_PATH_LEN #define MAX_PATH_LEN 1024 #endif char tclLibPath[MAX_PATH_LEN], tkLibPath[MAX_PATH_LEN]; Tcl_Obj* pathPtr; /* pre- Tcl_Init code copied from tkMacOSXAppInit.c */ Tk_MacOSXOpenBundleResources (interp, "com.tcltk.tcllibrary", tclLibPath, MAX_PATH_LEN, 0); if (tclLibPath[0] != '\0') { Tcl_SetVar(interp, "tcl_library", tclLibPath, TCL_GLOBAL_ONLY); Tcl_SetVar(interp, "tclDefaultLibrary", tclLibPath, TCL_GLOBAL_ONLY); Tcl_SetVar(interp, "tcl_pkgPath", tclLibPath, TCL_GLOBAL_ONLY); } if (tclLibPath[0] != '\0') { Tcl_SetVar(interp, "tcl_library", tclLibPath, TCL_GLOBAL_ONLY); Tcl_SetVar(interp, "tclDefaultLibrary", tclLibPath, TCL_GLOBAL_ONLY); Tcl_SetVar(interp, "tcl_pkgPath", tclLibPath, TCL_GLOBAL_ONLY); } #endif if (Tcl_Init (interp) == TCL_ERROR) return TCL_ERROR; #ifdef TK_AQUA /* pre- Tk_Init code copied from tkMacOSXAppInit.c */ Tk_MacOSXOpenBundleResources (interp, "com.tcltk.tklibrary", tkLibPath, MAX_PATH_LEN, 1); if (tclLibPath[0] != '\0') { pathPtr = Tcl_NewStringObj(tclLibPath, -1); } else { Tcl_Obj *pathPtr = TclGetLibraryPath(); } if (tkLibPath[0] != '\0') { Tcl_Obj *objPtr; Tcl_SetVar(interp, "tk_library", tkLibPath, TCL_GLOBAL_ONLY); objPtr = Tcl_NewStringObj(tkLibPath, -1); Tcl_ListObjAppendElement(NULL, pathPtr, objPtr); } TclSetLibraryPath(pathPtr); #endif if (Tk_Init (interp) == TCL_ERROR) return TCL_ERROR; main_window = Tk_MainWindow(interp); #ifdef TK_AQUA TkMacOSXInitAppleEvents(interp); TkMacOSXInitMenus(interp); #endif #ifdef WITH_MOREBUTTONS { extern Tcl_CmdProc studButtonCmd; extern Tcl_CmdProc triButtonCmd; Tcl_CreateCommand(interp, "studbutton", studButtonCmd, (ClientData) main_window, NULL); Tcl_CreateCommand(interp, "tributton", triButtonCmd, (ClientData) main_window, NULL); } #endif #ifdef WITH_PIL /* 0.2b5 and later -- not yet released as of May 14 */ { extern void TkImaging_Init(Tcl_Interp *); TkImaging_Init(interp); /* XXX TkImaging_Init() doesn't have the right return type */ /*Tcl_StaticPackage(interp, "Imaging", TkImaging_Init, NULL);*/ } #endif #ifdef WITH_PIL_OLD /* 0.2b4 and earlier */ { extern void TkImaging_Init(void); /* XXX TkImaging_Init() doesn't have the right prototype */ /*Tcl_StaticPackage(interp, "Imaging", TkImaging_Init, NULL);*/ } #endif #ifdef WITH_TIX { extern int Tix_Init(Tcl_Interp *interp); extern int Tix_SafeInit(Tcl_Interp *interp); Tcl_StaticPackage(NULL, "Tix", Tix_Init, Tix_SafeInit); } #endif #ifdef WITH_BLT { extern int Blt_Init(Tcl_Interp *); extern int Blt_SafeInit(Tcl_Interp *); Tcl_StaticPackage(NULL, "Blt", Blt_Init, Blt_SafeInit); } #endif #ifdef WITH_TOGL { /* XXX I've heard rumors that this doesn't work */ extern int Togl_Init(Tcl_Interp *); /* XXX Is there no Togl_SafeInit? */ Tcl_StaticPackage(NULL, "Togl", Togl_Init, NULL); } #endif #ifdef WITH_XXX #endif return TCL_OK; } Python-2.3.7/Modules/makesetup0000755001241000117560000001640607451125663015624 0ustar loewishpifb6#! /bin/sh # Convert templates into Makefile and config.c, based on the module # definitions found in the file Setup. # # Usage: makesetup [-s dir] [-c file] [-m file] [Setup] ... [-n [Setup] ...] # # Options: # -s directory: alternative source directory (default .) # -l directory: library source directory (default derived from $0) # -c file: alternative config.c template (default $libdir/config.c.in) # -c -: don't write config.c # -m file: alternative Makefile template (default ./Makefile.pre) # -m -: don't write Makefile # # Remaining arguments are one or more Setup files (default ./Setup). # Setup files after a -n option are used for their variables, modules # and libraries but not for their .o files. # # See Setup.dist for a description of the format of the Setup file. # # The following edits are made: # # Copying config.c.in to config.c: # - insert an identifying comment at the start # - for each mentioned in Setup before *noconfig*: # + insert 'extern void init(void);' before MARKER 1 # + insert '{"", initmodule},' before MARKER 2 # # Copying Makefile.pre to Makefile: # - insert an identifying comment at the start # - replace _MODOBJS_ by the list of objects from Setup (except for # Setup files after a -n option) # - replace _MODLIBS_ by the list of libraries from Setup # - for each object file mentioned in Setup, append a rule # '.o: .c; ' to the end of the Makefile # - for each module mentioned in Setup, append a rule # which creates a shared library version to the end of the Makefile # - for each variable definition found in Setup, insert the definition # before the comment 'Definitions added by makesetup' # Loop over command line options usage=' usage: makesetup [-s srcdir] [-l libdir] [-c config.c.in] [-m Makefile.pre] [Setup] ... [-n [Setup] ...]' srcdir='.' libdir='' config='' makepre='' noobjects='' doconfig=yes while : do case $1 in -s) shift; srcdir=$1; shift;; -l) shift; libdir=$1; shift;; -c) shift; config=$1; shift;; -m) shift; makepre=$1; shift;; --) shift; break;; -n) noobjects=yes;; -*) echo "$usage" 1>&2; exit 2;; *) break;; esac done # Set default libdir and config if not set by command line # (Not all systems have dirname) case $libdir in '') case $0 in */*) libdir=`echo $0 | sed 's,/[^/]*$,,'`;; *) libdir=.;; esac;; esac case $config in '') config=$libdir/config.c.in;; esac case $makepre in '') makepre=Makefile.pre;; esac # Newline for sed i and a commands NL='\ ' # Setup to link with extra libraries when makeing shared extensions. # Currently, only Cygwin needs this baggage. case `uname -s` in CYGWIN*) if test $libdir = . then ExtraLibDir=. else ExtraLibDir='$(LIBPL)' fi ExtraLibs="-L$ExtraLibDir -lpython\$(VERSION)";; esac # Main loop for i in ${*-Setup} do case $i in -n) echo '*noobjects*';; *) echo '*doconfig*'; cat "$i";; esac done | sed -e 's/[ ]*#.*//' -e '/^[ ]*$/d' | ( rulesf="@rules.$$" trap 'rm -f $rulesf' 0 1 2 3 echo " # Rules appended by makedepend " >$rulesf DEFS= MODS= SHAREDMODS= OBJS= LIBS= LOCALLIBS= BASELIBS= while read line do # to handle backslashes for sh's that don't automatically # continue a read when the last char is a backslash while echo $line | grep '\\$' > /dev/null do read extraline line=`echo $line| sed s/.$//`$extraline done # Output DEFS in reverse order so first definition overrides case $line in *=*) DEFS="$line$NL$DEFS"; continue;; 'include '*) DEFS="$line$NL$DEFS"; continue;; '*noobjects*') case $noobjects in yes) ;; *) LOCALLIBS=$LIBS; LIBS=;; esac noobjects=yes; continue;; '*doconfig*') doconfig=yes; continue;; '*static*') doconfig=yes; continue;; '*noconfig*') doconfig=no; continue;; '*shared*') doconfig=no; continue;; esac srcs= cpps= libs= mods= skip= for arg in $line do case $skip in libs) libs="$libs $arg"; skip=; continue;; cpps) cpps="$cpps $arg"; skip=; continue;; srcs) srcs="$srcs $arg"; skip=; continue;; esac case $arg in -framework) libs="$libs $arg"; skip=libs; # OSX/OSXS/Darwin framework link cmd ;; -[IDUCfF]*) cpps="$cpps $arg";; -Xcompiler) skip=cpps;; -Xlinker) libs="$libs $arg"; skip=libs;; -rpath) libs="$libs $arg"; skip=libs;; --rpath) libs="$libs $arg"; skip=libs;; -[A-Zl]*) libs="$libs $arg";; *.a) libs="$libs $arg";; *.so) libs="$libs $arg";; *.sl) libs="$libs $arg";; /*.o) libs="$libs $arg";; *.def) libs="$libs $arg";; *.o) srcs="$srcs `basename $arg .o`.c";; *.[cC]) srcs="$srcs $arg";; *.m) srcs="$srcs $arg";; # Objective-C src *.cc) srcs="$srcs $arg";; *.c++) srcs="$srcs $arg";; *.cxx) srcs="$srcs $arg";; *.cpp) srcs="$srcs $arg";; \$*) libs="$libs $arg" cpps="$cpps $arg";; *.*) echo 1>&2 "bad word $arg in $line" exit 1;; -u) skip=libs; libs="$libs -u";; [a-zA-Z_]*) mods="$mods $arg";; *) echo 1>&2 "bad word $arg in $line" exit 1;; esac done case $doconfig in yes) LIBS="$LIBS $libs" MODS="$MODS $mods" ;; esac case $noobjects in yes) continue;; esac objs='' for src in $srcs do case $src in *.c) obj=`basename $src .c`.o; cc='$(CC)';; *.cc) obj=`basename $src .cc`.o; cc='$(CXX)';; *.c++) obj=`basename $src .c++`.o; cc='$(CXX)';; *.C) obj=`basename $src .C`.o; cc='$(CXX)';; *.cxx) obj=`basename $src .cxx`.o; cc='$(CXX)';; *.cpp) obj=`basename $src .cpp`.o; cc='$(CXX)';; *.m) obj=`basename $src .m`.o; cc='$(CC)';; # Obj-C *) continue;; esac obj="$srcdir/$obj" objs="$objs $obj" case $src in glmodule.c) ;; /*) ;; \$*) ;; *) src='$(srcdir)/'"$srcdir/$src";; esac case $doconfig in no) cc="$cc \$(CCSHARED) \$(CFLAGS) \$(CPPFLAGS)";; *) cc="$cc \$(PY_CFLAGS)";; esac rule="$obj: $src; $cc $cpps -c $src -o $obj" echo "$rule" >>$rulesf done case $doconfig in yes) OBJS="$OBJS $objs";; esac for mod in $mods do case $objs in *$mod.o*) base=$mod;; *) base=${mod}module;; esac file="$srcdir/$base\$(SO)" case $doconfig in no) SHAREDMODS="$SHAREDMODS $file";; esac rule="$file: $objs" rule="$rule; \$(LDSHARED) $objs $libs $ExtraLibs -o $file" echo "$rule" >>$rulesf done done case $SHAREDMODS in '') ;; *) DEFS="SHAREDMODS=$SHAREDMODS$NL$DEFS";; esac case $noobjects in yes) BASELIBS=$LIBS;; *) LOCALLIBS=$LIBS;; esac LIBS='$(LOCALMODLIBS) $(BASEMODLIBS)' DEFS="BASEMODLIBS=$BASELIBS$NL$DEFS" DEFS="LOCALMODLIBS=$LOCALLIBS$NL$DEFS" EXTDECLS= INITBITS= for mod in $MODS do EXTDECLS="${EXTDECLS}extern void init$mod(void);$NL" INITBITS="${INITBITS} {\"$mod\", init$mod},$NL" done case $config in -) ;; *) sed -e " 1i$NL/* Generated automatically from $config by makesetup. */ /MARKER 1/i$NL$EXTDECLS /MARKER 2/i$NL$INITBITS " $config >config.c ;; esac case $makepre in -) ;; *) sedf="@sed.in.$$" trap 'rm -f $sedf' 0 1 2 3 echo "1i\\" >$sedf str="# Generated automatically from $makepre by makesetup." echo "$str" >>$sedf echo "s%_MODOBJS_%$OBJS%" >>$sedf echo "s%_MODLIBS_%$LIBS%" >>$sedf echo "/Definitions added by makesetup/a$NL$NL$DEFS" >>$sedf sed -f $sedf $makepre >Makefile cat $rulesf >>Makefile rm -f $sedf ;; esac rm -f $rulesf ) Python-2.3.7/Modules/arraymodule.c0000644001241000117560000014166410762607371016375 0ustar loewishpifb6/* Array object implementation */ /* An array is a uniform list -- all items have the same type. The item type is restricted to simple C types like int or float */ #include "Python.h" #ifdef STDC_HEADERS #include #else /* !STDC_HEADERS */ #ifndef DONT_HAVE_SYS_TYPES_H #include /* For size_t */ #endif /* DONT_HAVE_SYS_TYPES_H */ #endif /* !STDC_HEADERS */ /* Shamelessy stolen from listobject.c */ static int roundupsize(int n) { unsigned int nbits = 0; unsigned int n2 = (unsigned int)n >> 5; /* Round up: * If n < 256, to a multiple of 8. * If n < 2048, to a multiple of 64. * If n < 16384, to a multiple of 512. * If n < 131072, to a multiple of 4096. * If n < 1048576, to a multiple of 32768. * If n < 8388608, to a multiple of 262144. * If n < 67108864, to a multiple of 2097152. * If n < 536870912, to a multiple of 16777216. * ... * If n < 2**(5+3*i), to a multiple of 2**(3*i). * * This over-allocates proportional to the list size, making room * for additional growth. The over-allocation is mild, but is * enough to give linear-time amortized behavior over a long * sequence of appends() in the presence of a poorly-performing * system realloc() (which is a reality, e.g., across all flavors * of Windows, with Win9x behavior being particularly bad -- and * we've still got address space fragmentation problems on Win9x * even with this scheme, although it requires much longer lists to * provoke them than it used to). */ do { n2 >>= 3; nbits += 3; } while (n2); return ((n >> nbits) + 1) << nbits; } #define NRESIZE(var, type, nitems) \ do { \ size_t _new_size = roundupsize(nitems); \ if (_new_size <= ((~(size_t)0) / sizeof(type))) \ PyMem_RESIZE(var, type, _new_size); \ else \ var = NULL; \ } while (0) /* END SHAMELESSLY STOLEN CODE */ struct arrayobject; /* Forward */ /* All possible arraydescr values are defined in the vector "descriptors" * below. That's defined later because the appropriate get and set * functions aren't visible yet. */ struct arraydescr { int typecode; int itemsize; PyObject * (*getitem)(struct arrayobject *, int); int (*setitem)(struct arrayobject *, int, PyObject *); }; typedef struct arrayobject { PyObject_HEAD int ob_size; char *ob_item; struct arraydescr *ob_descr; } arrayobject; static PyTypeObject Arraytype; #define array_Check(op) PyObject_TypeCheck(op, &Arraytype) #define array_CheckExact(op) ((op)->ob_type == &Arraytype) /**************************************************************************** Get and Set functions for each type. A Get function takes an arrayobject* and an integer index, returning the array value at that index wrapped in an appropriate PyObject*. A Set function takes an arrayobject, integer index, and PyObject*; sets the array value at that index to the raw C data extracted from the PyObject*, and returns 0 if successful, else nonzero on failure (PyObject* not of an appropriate type or value). Note that the basic Get and Set functions do NOT check that the index is in bounds; that's the responsibility of the caller. ****************************************************************************/ static PyObject * c_getitem(arrayobject *ap, int i) { return PyString_FromStringAndSize(&((char *)ap->ob_item)[i], 1); } static int c_setitem(arrayobject *ap, int i, PyObject *v) { char x; if (!PyArg_Parse(v, "c;array item must be char", &x)) return -1; if (i >= 0) ((char *)ap->ob_item)[i] = x; return 0; } static PyObject * b_getitem(arrayobject *ap, int i) { long x = ((char *)ap->ob_item)[i]; if (x >= 128) x -= 256; return PyInt_FromLong(x); } static int b_setitem(arrayobject *ap, int i, PyObject *v) { short x; /* PyArg_Parse's 'b' formatter is for an unsigned char, therefore must use the next size up that is signed ('h') and manually do the overflow checking */ if (!PyArg_Parse(v, "h;array item must be integer", &x)) return -1; else if (x < -128) { PyErr_SetString(PyExc_OverflowError, "signed char is less than minimum"); return -1; } else if (x > 127) { PyErr_SetString(PyExc_OverflowError, "signed char is greater than maximum"); return -1; } if (i >= 0) ((char *)ap->ob_item)[i] = (char)x; return 0; } static PyObject * BB_getitem(arrayobject *ap, int i) { long x = ((unsigned char *)ap->ob_item)[i]; return PyInt_FromLong(x); } static int BB_setitem(arrayobject *ap, int i, PyObject *v) { unsigned char x; /* 'B' == unsigned char, maps to PyArg_Parse's 'b' formatter */ if (!PyArg_Parse(v, "b;array item must be integer", &x)) return -1; if (i >= 0) ((char *)ap->ob_item)[i] = x; return 0; } #ifdef Py_USING_UNICODE static PyObject * u_getitem(arrayobject *ap, int i) { return PyUnicode_FromUnicode(&((Py_UNICODE *) ap->ob_item)[i], 1); } static int u_setitem(arrayobject *ap, int i, PyObject *v) { Py_UNICODE *p; int len; if (!PyArg_Parse(v, "u#;array item must be unicode character", &p, &len)) return -1; if (len != 1) { PyErr_SetString(PyExc_TypeError, "array item must be unicode character"); return -1; } if (i >= 0) ((Py_UNICODE *)ap->ob_item)[i] = p[0]; return 0; } #endif static PyObject * h_getitem(arrayobject *ap, int i) { return PyInt_FromLong((long) ((short *)ap->ob_item)[i]); } static int h_setitem(arrayobject *ap, int i, PyObject *v) { short x; /* 'h' == signed short, maps to PyArg_Parse's 'h' formatter */ if (!PyArg_Parse(v, "h;array item must be integer", &x)) return -1; if (i >= 0) ((short *)ap->ob_item)[i] = x; return 0; } static PyObject * HH_getitem(arrayobject *ap, int i) { return PyInt_FromLong((long) ((unsigned short *)ap->ob_item)[i]); } static int HH_setitem(arrayobject *ap, int i, PyObject *v) { int x; /* PyArg_Parse's 'h' formatter is for a signed short, therefore must use the next size up and manually do the overflow checking */ if (!PyArg_Parse(v, "i;array item must be integer", &x)) return -1; else if (x < 0) { PyErr_SetString(PyExc_OverflowError, "unsigned short is less than minimum"); return -1; } else if (x > USHRT_MAX) { PyErr_SetString(PyExc_OverflowError, "unsigned short is greater than maximum"); return -1; } if (i >= 0) ((short *)ap->ob_item)[i] = (short)x; return 0; } static PyObject * i_getitem(arrayobject *ap, int i) { return PyInt_FromLong((long) ((int *)ap->ob_item)[i]); } static int i_setitem(arrayobject *ap, int i, PyObject *v) { int x; /* 'i' == signed int, maps to PyArg_Parse's 'i' formatter */ if (!PyArg_Parse(v, "i;array item must be integer", &x)) return -1; if (i >= 0) ((int *)ap->ob_item)[i] = x; return 0; } static PyObject * II_getitem(arrayobject *ap, int i) { return PyLong_FromUnsignedLong( (unsigned long) ((unsigned int *)ap->ob_item)[i]); } static int II_setitem(arrayobject *ap, int i, PyObject *v) { unsigned long x; if (PyLong_Check(v)) { x = PyLong_AsUnsignedLong(v); if (x == (unsigned long) -1 && PyErr_Occurred()) return -1; } else { long y; if (!PyArg_Parse(v, "l;array item must be integer", &y)) return -1; if (y < 0) { PyErr_SetString(PyExc_OverflowError, "unsigned int is less than minimum"); return -1; } x = (unsigned long)y; } if (x > UINT_MAX) { PyErr_SetString(PyExc_OverflowError, "unsigned int is greater than maximum"); return -1; } if (i >= 0) ((unsigned int *)ap->ob_item)[i] = (unsigned int)x; return 0; } static PyObject * l_getitem(arrayobject *ap, int i) { return PyInt_FromLong(((long *)ap->ob_item)[i]); } static int l_setitem(arrayobject *ap, int i, PyObject *v) { long x; if (!PyArg_Parse(v, "l;array item must be integer", &x)) return -1; if (i >= 0) ((long *)ap->ob_item)[i] = x; return 0; } static PyObject * LL_getitem(arrayobject *ap, int i) { return PyLong_FromUnsignedLong(((unsigned long *)ap->ob_item)[i]); } static int LL_setitem(arrayobject *ap, int i, PyObject *v) { unsigned long x; if (PyLong_Check(v)) { x = PyLong_AsUnsignedLong(v); if (x == (unsigned long) -1 && PyErr_Occurred()) return -1; } else { long y; if (!PyArg_Parse(v, "l;array item must be integer", &y)) return -1; if (y < 0) { PyErr_SetString(PyExc_OverflowError, "unsigned long is less than minimum"); return -1; } x = (unsigned long)y; } if (x > ULONG_MAX) { PyErr_SetString(PyExc_OverflowError, "unsigned long is greater than maximum"); return -1; } if (i >= 0) ((unsigned long *)ap->ob_item)[i] = x; return 0; } static PyObject * f_getitem(arrayobject *ap, int i) { return PyFloat_FromDouble((double) ((float *)ap->ob_item)[i]); } static int f_setitem(arrayobject *ap, int i, PyObject *v) { float x; if (!PyArg_Parse(v, "f;array item must be float", &x)) return -1; if (i >= 0) ((float *)ap->ob_item)[i] = x; return 0; } static PyObject * d_getitem(arrayobject *ap, int i) { return PyFloat_FromDouble(((double *)ap->ob_item)[i]); } static int d_setitem(arrayobject *ap, int i, PyObject *v) { double x; if (!PyArg_Parse(v, "d;array item must be float", &x)) return -1; if (i >= 0) ((double *)ap->ob_item)[i] = x; return 0; } /* Description of types */ static struct arraydescr descriptors[] = { {'c', sizeof(char), c_getitem, c_setitem}, {'b', sizeof(char), b_getitem, b_setitem}, {'B', sizeof(char), BB_getitem, BB_setitem}, #ifdef Py_USING_UNICODE {'u', sizeof(Py_UNICODE), u_getitem, u_setitem}, #endif {'h', sizeof(short), h_getitem, h_setitem}, {'H', sizeof(short), HH_getitem, HH_setitem}, {'i', sizeof(int), i_getitem, i_setitem}, {'I', sizeof(int), II_getitem, II_setitem}, {'l', sizeof(long), l_getitem, l_setitem}, {'L', sizeof(long), LL_getitem, LL_setitem}, {'f', sizeof(float), f_getitem, f_setitem}, {'d', sizeof(double), d_getitem, d_setitem}, {'\0', 0, 0, 0} /* Sentinel */ }; /**************************************************************************** Implementations of array object methods. ****************************************************************************/ static PyObject * newarrayobject(PyTypeObject *type, int size, struct arraydescr *descr) { arrayobject *op; size_t nbytes; if (size < 0) { PyErr_BadInternalCall(); return NULL; } nbytes = size * descr->itemsize; /* Check for overflow */ if (nbytes / descr->itemsize != (size_t)size) { return PyErr_NoMemory(); } op = (arrayobject *) type->tp_alloc(type, 0); if (op == NULL) { return NULL; } op->ob_size = size; if (size <= 0) { op->ob_item = NULL; } else { op->ob_item = PyMem_NEW(char, nbytes); if (op->ob_item == NULL) { PyObject_Del(op); return PyErr_NoMemory(); } } op->ob_descr = descr; return (PyObject *) op; } static PyObject * getarrayitem(PyObject *op, int i) { register arrayobject *ap; assert(array_Check(op)); ap = (arrayobject *)op; assert(i>=0 && iob_size); return (*ap->ob_descr->getitem)(ap, i); } static int ins1(arrayobject *self, int where, PyObject *v) { char *items; if (v == NULL) { PyErr_BadInternalCall(); return -1; } if ((*self->ob_descr->setitem)(self, -1, v) < 0) return -1; items = self->ob_item; NRESIZE(items, char, (self->ob_size+1) * self->ob_descr->itemsize); if (items == NULL) { PyErr_NoMemory(); return -1; } if (where < 0) { where += self->ob_size; if (where < 0) where = 0; } if (where > self->ob_size) where = self->ob_size; memmove(items + (where+1)*self->ob_descr->itemsize, items + where*self->ob_descr->itemsize, (self->ob_size-where)*self->ob_descr->itemsize); self->ob_item = items; self->ob_size++; return (*self->ob_descr->setitem)(self, where, v); } /* Methods */ static void array_dealloc(arrayobject *op) { if (op->ob_item != NULL) PyMem_DEL(op->ob_item); op->ob_type->tp_free((PyObject *)op); } static PyObject * array_richcompare(PyObject *v, PyObject *w, int op) { arrayobject *va, *wa; PyObject *vi = NULL; PyObject *wi = NULL; int i, k; PyObject *res; if (!array_Check(v) || !array_Check(w)) { Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } va = (arrayobject *)v; wa = (arrayobject *)w; if (va->ob_size != wa->ob_size && (op == Py_EQ || op == Py_NE)) { /* Shortcut: if the lengths differ, the arrays differ */ if (op == Py_EQ) res = Py_False; else res = Py_True; Py_INCREF(res); return res; } /* Search for the first index where items are different */ k = 1; for (i = 0; i < va->ob_size && i < wa->ob_size; i++) { vi = getarrayitem(v, i); wi = getarrayitem(w, i); if (vi == NULL || wi == NULL) { Py_XDECREF(vi); Py_XDECREF(wi); return NULL; } k = PyObject_RichCompareBool(vi, wi, Py_EQ); if (k == 0) break; /* Keeping vi and wi alive! */ Py_DECREF(vi); Py_DECREF(wi); if (k < 0) return NULL; } if (k) { /* No more items to compare -- compare sizes */ int vs = va->ob_size; int ws = wa->ob_size; int cmp; switch (op) { case Py_LT: cmp = vs < ws; break; case Py_LE: cmp = vs <= ws; break; case Py_EQ: cmp = vs == ws; break; case Py_NE: cmp = vs != ws; break; case Py_GT: cmp = vs > ws; break; case Py_GE: cmp = vs >= ws; break; default: return NULL; /* cannot happen */ } if (cmp) res = Py_True; else res = Py_False; Py_INCREF(res); return res; } /* We have an item that differs. First, shortcuts for EQ/NE */ if (op == Py_EQ) { Py_INCREF(Py_False); res = Py_False; } else if (op == Py_NE) { Py_INCREF(Py_True); res = Py_True; } else { /* Compare the final item again using the proper operator */ res = PyObject_RichCompare(vi, wi, op); } Py_DECREF(vi); Py_DECREF(wi); return res; } static int array_length(arrayobject *a) { return a->ob_size; } static PyObject * array_item(arrayobject *a, int i) { if (i < 0 || i >= a->ob_size) { PyErr_SetString(PyExc_IndexError, "array index out of range"); return NULL; } return getarrayitem((PyObject *)a, i); } static PyObject * array_slice(arrayobject *a, int ilow, int ihigh) { arrayobject *np; if (ilow < 0) ilow = 0; else if (ilow > a->ob_size) ilow = a->ob_size; if (ihigh < 0) ihigh = 0; if (ihigh < ilow) ihigh = ilow; else if (ihigh > a->ob_size) ihigh = a->ob_size; np = (arrayobject *) newarrayobject(&Arraytype, ihigh - ilow, a->ob_descr); if (np == NULL) return NULL; memcpy(np->ob_item, a->ob_item + ilow * a->ob_descr->itemsize, (ihigh-ilow) * a->ob_descr->itemsize); return (PyObject *)np; } static PyObject * array_concat(arrayobject *a, PyObject *bb) { int size; arrayobject *np; if (!array_Check(bb)) { PyErr_Format(PyExc_TypeError, "can only append array (not \"%.200s\") to array", bb->ob_type->tp_name); return NULL; } #define b ((arrayobject *)bb) if (a->ob_descr != b->ob_descr) { PyErr_BadArgument(); return NULL; } if (a->ob_size > INT_MAX - b->ob_size) { return PyErr_NoMemory(); } size = a->ob_size + b->ob_size; np = (arrayobject *) newarrayobject(&Arraytype, size, a->ob_descr); if (np == NULL) { return NULL; } memcpy(np->ob_item, a->ob_item, a->ob_size*a->ob_descr->itemsize); memcpy(np->ob_item + a->ob_size*a->ob_descr->itemsize, b->ob_item, b->ob_size*b->ob_descr->itemsize); return (PyObject *)np; #undef b } static PyObject * array_repeat(arrayobject *a, int n) { int i; int size; arrayobject *np; char *p; int nbytes; if (n < 0) n = 0; if ((a->ob_size != 0) && (n > INT_MAX / a->ob_size)) { return PyErr_NoMemory(); } size = a->ob_size * n; np = (arrayobject *) newarrayobject(&Arraytype, size, a->ob_descr); if (np == NULL) return NULL; p = np->ob_item; nbytes = a->ob_size * a->ob_descr->itemsize; for (i = 0; i < n; i++) { memcpy(p, a->ob_item, nbytes); p += nbytes; } return (PyObject *) np; } static int array_ass_slice(arrayobject *a, int ilow, int ihigh, PyObject *v) { char *item; int n; /* Size of replacement array */ int d; /* Change in size */ #define b ((arrayobject *)v) if (v == NULL) n = 0; else if (array_Check(v)) { n = b->ob_size; if (a == b) { /* Special case "a[i:j] = a" -- copy b first */ int ret; v = array_slice(b, 0, n); ret = array_ass_slice(a, ilow, ihigh, v); Py_DECREF(v); return ret; } if (b->ob_descr != a->ob_descr) { PyErr_BadArgument(); return -1; } } else { PyErr_Format(PyExc_TypeError, "can only assign array (not \"%.200s\") to array slice", v->ob_type->tp_name); return -1; } if (ilow < 0) ilow = 0; else if (ilow > a->ob_size) ilow = a->ob_size; if (ihigh < 0) ihigh = 0; if (ihigh < ilow) ihigh = ilow; else if (ihigh > a->ob_size) ihigh = a->ob_size; item = a->ob_item; d = n - (ihigh-ilow); if (d < 0) { /* Delete -d items */ memmove(item + (ihigh+d)*a->ob_descr->itemsize, item + ihigh*a->ob_descr->itemsize, (a->ob_size-ihigh)*a->ob_descr->itemsize); a->ob_size += d; PyMem_RESIZE(item, char, a->ob_size*a->ob_descr->itemsize); /* Can't fail */ a->ob_item = item; } else if (d > 0) { /* Insert d items */ PyMem_RESIZE(item, char, (a->ob_size + d)*a->ob_descr->itemsize); if (item == NULL) { PyErr_NoMemory(); return -1; } memmove(item + (ihigh+d)*a->ob_descr->itemsize, item + ihigh*a->ob_descr->itemsize, (a->ob_size-ihigh)*a->ob_descr->itemsize); a->ob_item = item; a->ob_size += d; } if (n > 0) memcpy(item + ilow*a->ob_descr->itemsize, b->ob_item, n*b->ob_descr->itemsize); return 0; #undef b } static int array_ass_item(arrayobject *a, int i, PyObject *v) { if (i < 0 || i >= a->ob_size) { PyErr_SetString(PyExc_IndexError, "array assignment index out of range"); return -1; } if (v == NULL) return array_ass_slice(a, i, i+1, v); return (*a->ob_descr->setitem)(a, i, v); } static int setarrayitem(PyObject *a, int i, PyObject *v) { assert(array_Check(a)); return array_ass_item((arrayobject *)a, i, v); } static int array_do_extend(arrayobject *self, PyObject *bb) { int size; if (!array_Check(bb)) { PyErr_Format(PyExc_TypeError, "can only extend array with array (not \"%.200s\")", bb->ob_type->tp_name); return -1; } #define b ((arrayobject *)bb) if (self->ob_descr != b->ob_descr) { PyErr_SetString(PyExc_TypeError, "can only extend with array of same kind"); return -1; } if ((self->ob_size > INT_MAX - b->ob_size) || ((self->ob_size + b->ob_size) > INT_MAX / self->ob_descr->itemsize)) { PyErr_NoMemory(); return -1; } size = self->ob_size + b->ob_size; PyMem_RESIZE(self->ob_item, char, size*self->ob_descr->itemsize); if (self->ob_item == NULL) { PyObject_Del(self); PyErr_NoMemory(); return -1; } memcpy(self->ob_item + self->ob_size*self->ob_descr->itemsize, b->ob_item, b->ob_size*b->ob_descr->itemsize); self->ob_size = size; return 0; #undef b } static PyObject * array_inplace_concat(arrayobject *self, PyObject *bb) { if (array_do_extend(self, bb) == -1) return NULL; Py_INCREF(self); return (PyObject *)self; } static PyObject * array_inplace_repeat(arrayobject *self, int n) { char *items, *p; int size, i; if (self->ob_size > 0) { if (n < 0) n = 0; items = self->ob_item; if ((self->ob_descr->itemsize != 0) && (self->ob_size > INT_MAX / self->ob_descr->itemsize)) { return PyErr_NoMemory(); } size = self->ob_size * self->ob_descr->itemsize; if (n == 0) { PyMem_FREE(items); self->ob_item = NULL; self->ob_size = 0; } else { if (size > INT_MAX / n) { return PyErr_NoMemory(); } PyMem_Resize(items, char, n * size); if (items == NULL) return PyErr_NoMemory(); p = items; for (i = 1; i < n; i++) { p += size; memcpy(p, items, size); } self->ob_item = items; self->ob_size *= n; } } Py_INCREF(self); return (PyObject *)self; } static PyObject * ins(arrayobject *self, int where, PyObject *v) { if (ins1(self, where, v) != 0) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * array_count(arrayobject *self, PyObject *v) { int count = 0; int i; for (i = 0; i < self->ob_size; i++) { PyObject *selfi = getarrayitem((PyObject *)self, i); int cmp = PyObject_RichCompareBool(selfi, v, Py_EQ); Py_DECREF(selfi); if (cmp > 0) count++; else if (cmp < 0) return NULL; } return PyInt_FromLong((long)count); } PyDoc_STRVAR(count_doc, "count(x)\n\ \n\ Return number of occurences of x in the array."); static PyObject * array_index(arrayobject *self, PyObject *v) { int i; for (i = 0; i < self->ob_size; i++) { PyObject *selfi = getarrayitem((PyObject *)self, i); int cmp = PyObject_RichCompareBool(selfi, v, Py_EQ); Py_DECREF(selfi); if (cmp > 0) { return PyInt_FromLong((long)i); } else if (cmp < 0) return NULL; } PyErr_SetString(PyExc_ValueError, "array.index(x): x not in list"); return NULL; } PyDoc_STRVAR(index_doc, "index(x)\n\ \n\ Return index of first occurence of x in the array."); static int array_contains(arrayobject *self, PyObject *v) { int i, cmp; for (i = 0, cmp = 0 ; cmp == 0 && i < self->ob_size; i++) { PyObject *selfi = getarrayitem((PyObject *)self, i); cmp = PyObject_RichCompareBool(selfi, v, Py_EQ); Py_DECREF(selfi); } return cmp; } static PyObject * array_remove(arrayobject *self, PyObject *v) { int i; for (i = 0; i < self->ob_size; i++) { PyObject *selfi = getarrayitem((PyObject *)self,i); int cmp = PyObject_RichCompareBool(selfi, v, Py_EQ); Py_DECREF(selfi); if (cmp > 0) { if (array_ass_slice(self, i, i+1, (PyObject *)NULL) != 0) return NULL; Py_INCREF(Py_None); return Py_None; } else if (cmp < 0) return NULL; } PyErr_SetString(PyExc_ValueError, "array.remove(x): x not in list"); return NULL; } PyDoc_STRVAR(remove_doc, "remove(x)\n\ \n\ Remove the first occurence of x in the array."); static PyObject * array_pop(arrayobject *self, PyObject *args) { int i = -1; PyObject *v; if (!PyArg_ParseTuple(args, "|i:pop", &i)) return NULL; if (self->ob_size == 0) { /* Special-case most common failure cause */ PyErr_SetString(PyExc_IndexError, "pop from empty array"); return NULL; } if (i < 0) i += self->ob_size; if (i < 0 || i >= self->ob_size) { PyErr_SetString(PyExc_IndexError, "pop index out of range"); return NULL; } v = getarrayitem((PyObject *)self,i); if (array_ass_slice(self, i, i+1, (PyObject *)NULL) != 0) { Py_DECREF(v); return NULL; } return v; } PyDoc_STRVAR(pop_doc, "pop([i])\n\ \n\ Return the i-th element and delete it from the array. i defaults to -1."); static PyObject * array_extend(arrayobject *self, PyObject *bb) { if (array_do_extend(self, bb) == -1) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(extend_doc, "extend(array)\n\ \n\ Append array items to the end of the array."); static PyObject * array_insert(arrayobject *self, PyObject *args) { int i; PyObject *v; if (!PyArg_ParseTuple(args, "iO:insert", &i, &v)) return NULL; return ins(self, i, v); } PyDoc_STRVAR(insert_doc, "insert(i,x)\n\ \n\ Insert a new item x into the array before position i."); static PyObject * array_buffer_info(arrayobject *self, PyObject *unused) { PyObject* retval = NULL; retval = PyTuple_New(2); if (!retval) return NULL; PyTuple_SET_ITEM(retval, 0, PyLong_FromVoidPtr(self->ob_item)); PyTuple_SET_ITEM(retval, 1, PyInt_FromLong((long)(self->ob_size))); return retval; } PyDoc_STRVAR(buffer_info_doc, "buffer_info() -> (address, length)\n\ \n\ Return a tuple (address, length) giving the current memory address and\n\ the length in items of the buffer used to hold array's contents\n\ The length should be multiplied by the itemsize attribute to calculate\n\ the buffer length in bytes."); static PyObject * array_append(arrayobject *self, PyObject *v) { return ins(self, (int) self->ob_size, v); } PyDoc_STRVAR(append_doc, "append(x)\n\ \n\ Append new value x to the end of the array."); static PyObject * array_byteswap(arrayobject *self, PyObject *unused) { char *p; int i; switch (self->ob_descr->itemsize) { case 1: break; case 2: for (p = self->ob_item, i = self->ob_size; --i >= 0; p += 2) { char p0 = p[0]; p[0] = p[1]; p[1] = p0; } break; case 4: for (p = self->ob_item, i = self->ob_size; --i >= 0; p += 4) { char p0 = p[0]; char p1 = p[1]; p[0] = p[3]; p[1] = p[2]; p[2] = p1; p[3] = p0; } break; case 8: for (p = self->ob_item, i = self->ob_size; --i >= 0; p += 8) { char p0 = p[0]; char p1 = p[1]; char p2 = p[2]; char p3 = p[3]; p[0] = p[7]; p[1] = p[6]; p[2] = p[5]; p[3] = p[4]; p[4] = p3; p[5] = p2; p[6] = p1; p[7] = p0; } break; default: PyErr_SetString(PyExc_RuntimeError, "don't know how to byteswap this array type"); return NULL; } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(byteswap_doc, "byteswap()\n\ \n\ Byteswap all items of the array. If the items in the array are not 1, 2,\n\ 4, or 8 bytes in size, RuntimeError is raised."); static PyObject * array_reverse(arrayobject *self, PyObject *unused) { register int itemsize = self->ob_descr->itemsize; register char *p, *q; /* little buffer to hold items while swapping */ char tmp[256]; /* 8 is probably enough -- but why skimp */ assert(itemsize <= sizeof(tmp)); if (self->ob_size > 1) { for (p = self->ob_item, q = self->ob_item + (self->ob_size - 1)*itemsize; p < q; p += itemsize, q -= itemsize) { /* memory areas guaranteed disjoint, so memcpy * is safe (& memmove may be slower). */ memcpy(tmp, p, itemsize); memcpy(p, q, itemsize); memcpy(q, tmp, itemsize); } } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(reverse_doc, "reverse()\n\ \n\ Reverse the order of the items in the array."); static PyObject * array_fromfile(arrayobject *self, PyObject *args) { PyObject *f; int n; FILE *fp; if (!PyArg_ParseTuple(args, "Oi:fromfile", &f, &n)) return NULL; fp = PyFile_AsFile(f); if (fp == NULL) { PyErr_SetString(PyExc_TypeError, "arg1 must be open file"); return NULL; } if (n > 0) { char *item = self->ob_item; int itemsize = self->ob_descr->itemsize; size_t nread; int newlength; size_t newbytes; /* Be careful here about overflow */ if ((newlength = self->ob_size + n) <= 0 || (newbytes = newlength * itemsize) / itemsize != (size_t)newlength) goto nomem; PyMem_RESIZE(item, char, newbytes); if (item == NULL) { nomem: PyErr_NoMemory(); return NULL; } self->ob_item = item; self->ob_size += n; nread = fread(item + (self->ob_size - n) * itemsize, itemsize, n, fp); if (nread < (size_t)n) { self->ob_size -= (n - nread); PyMem_RESIZE(item, char, self->ob_size*itemsize); self->ob_item = item; PyErr_SetString(PyExc_EOFError, "not enough items in file"); return NULL; } } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(fromfile_doc, "fromfile(f, n)\n\ \n\ Read n objects from the file object f and append them to the end of the\n\ array. Also called as read."); static PyObject * array_tofile(arrayobject *self, PyObject *f) { FILE *fp; fp = PyFile_AsFile(f); if (fp == NULL) { PyErr_SetString(PyExc_TypeError, "arg must be open file"); return NULL; } if (self->ob_size > 0) { if (fwrite(self->ob_item, self->ob_descr->itemsize, self->ob_size, fp) != (size_t)self->ob_size) { PyErr_SetFromErrno(PyExc_IOError); clearerr(fp); return NULL; } } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(tofile_doc, "tofile(f)\n\ \n\ Write all items (as machine values) to the file object f. Also called as\n\ write."); static PyObject * array_fromlist(arrayobject *self, PyObject *list) { int n; int itemsize = self->ob_descr->itemsize; if (!PyList_Check(list)) { PyErr_SetString(PyExc_TypeError, "arg must be list"); return NULL; } n = PyList_Size(list); if (n > 0) { char *item = self->ob_item; int i; PyMem_RESIZE(item, char, (self->ob_size + n) * itemsize); if (item == NULL) { PyErr_NoMemory(); return NULL; } self->ob_item = item; self->ob_size += n; for (i = 0; i < n; i++) { PyObject *v = PyList_GetItem(list, i); if ((*self->ob_descr->setitem)(self, self->ob_size - n + i, v) != 0) { self->ob_size -= n; if (itemsize && (self->ob_size > INT_MAX / itemsize)) { return PyErr_NoMemory(); } PyMem_RESIZE(item, char, self->ob_size * itemsize); self->ob_item = item; return NULL; } } } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(fromlist_doc, "fromlist(list)\n\ \n\ Append items to array from list."); static PyObject * array_tolist(arrayobject *self, PyObject *unused) { PyObject *list = PyList_New(self->ob_size); int i; if (list == NULL) return NULL; for (i = 0; i < self->ob_size; i++) { PyObject *v = getarrayitem((PyObject *)self, i); if (v == NULL) { Py_DECREF(list); return NULL; } PyList_SetItem(list, i, v); } return list; } PyDoc_STRVAR(tolist_doc, "tolist() -> list\n\ \n\ Convert array to an ordinary list with the same items."); static PyObject * array_fromstring(arrayobject *self, PyObject *args) { char *str; int n; int itemsize = self->ob_descr->itemsize; if (!PyArg_ParseTuple(args, "s#:fromstring", &str, &n)) return NULL; if (n % itemsize != 0) { PyErr_SetString(PyExc_ValueError, "string length not a multiple of item size"); return NULL; } n = n / itemsize; if (n > 0) { char *item = self->ob_item; if ((n > INT_MAX - self->ob_size) || ((self->ob_size + n) > INT_MAX / itemsize)) { return PyErr_NoMemory(); } PyMem_RESIZE(item, char, (self->ob_size + n) * itemsize); if (item == NULL) { PyErr_NoMemory(); return NULL; } self->ob_item = item; self->ob_size += n; memcpy(item + (self->ob_size - n) * itemsize, str, itemsize*n); } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(fromstring_doc, "fromstring(string)\n\ \n\ Appends items from the string, interpreting it as an array of machine\n\ values,as if it had been read from a file using the fromfile() method)."); static PyObject * array_tostring(arrayobject *self, PyObject *unused) { if (self->ob_size <= INT_MAX / self->ob_descr->itemsize) { return PyString_FromStringAndSize(self->ob_item, self->ob_size * self->ob_descr->itemsize); } else { return PyErr_NoMemory(); } } PyDoc_STRVAR(tostring_doc, "tostring() -> string\n\ \n\ Convert the array to an array of machine values and return the string\n\ representation."); #ifdef Py_USING_UNICODE static PyObject * array_fromunicode(arrayobject *self, PyObject *args) { Py_UNICODE *ustr; int n; if (!PyArg_ParseTuple(args, "u#:fromunicode", &ustr, &n)) return NULL; if (self->ob_descr->typecode != 'u') { PyErr_SetString(PyExc_ValueError, "fromunicode() may only be called on " "type 'u' arrays"); return NULL; } if (n > 0) { Py_UNICODE *item = (Py_UNICODE *) self->ob_item; if (self->ob_size > INT_MAX - n) { return PyErr_NoMemory(); } PyMem_RESIZE(item, Py_UNICODE, self->ob_size + n); if (item == NULL) { PyErr_NoMemory(); return NULL; } self->ob_item = (char *) item; self->ob_size += n; memcpy(item + self->ob_size - n, ustr, n * sizeof(Py_UNICODE)); } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(fromunicode_doc, "fromunicode(ustr)\n\ \n\ Extends this array with data from the unicode string ustr.\n\ The array must be a type 'u' array; otherwise a ValueError\n\ is raised. Use array.fromstring(ustr.decode(...)) to\n\ append Unicode data to an array of some other type."); static PyObject * array_tounicode(arrayobject *self, PyObject *unused) { if (self->ob_descr->typecode != 'u') { PyErr_SetString(PyExc_ValueError, "tounicode() may only be called on type 'u' arrays"); return NULL; } return PyUnicode_FromUnicode((Py_UNICODE *) self->ob_item, self->ob_size); } PyDoc_STRVAR(tounicode_doc, "tounicode() -> unicode\n\ \n\ Convert the array to a unicode string. The array must be\n\ a type 'u' array; otherwise a ValueError is raised. Use\n\ array.tostring().decode() to obtain a unicode string from\n\ an array of some other type."); #endif /* Py_USING_UNICODE */ static PyObject * array_get_typecode(arrayobject *a, void *closure) { char tc = a->ob_descr->typecode; return PyString_FromStringAndSize(&tc, 1); } static PyObject * array_get_itemsize(arrayobject *a, void *closure) { return PyInt_FromLong((long)a->ob_descr->itemsize); } static PyGetSetDef array_getsets [] = { {"typecode", (getter) array_get_typecode, NULL, "the typecode character used to create the array"}, {"itemsize", (getter) array_get_itemsize, NULL, "the size, in bytes, of one array item"}, {NULL} }; PyMethodDef array_methods[] = { {"append", (PyCFunction)array_append, METH_O, append_doc}, {"buffer_info", (PyCFunction)array_buffer_info, METH_NOARGS, buffer_info_doc}, {"byteswap", (PyCFunction)array_byteswap, METH_NOARGS, byteswap_doc}, {"count", (PyCFunction)array_count, METH_O, count_doc}, {"extend", (PyCFunction)array_extend, METH_O, extend_doc}, {"fromfile", (PyCFunction)array_fromfile, METH_VARARGS, fromfile_doc}, {"fromlist", (PyCFunction)array_fromlist, METH_O, fromlist_doc}, {"fromstring", (PyCFunction)array_fromstring, METH_VARARGS, fromstring_doc}, #ifdef Py_USING_UNICODE {"fromunicode", (PyCFunction)array_fromunicode, METH_VARARGS, fromunicode_doc}, #endif {"index", (PyCFunction)array_index, METH_O, index_doc}, {"insert", (PyCFunction)array_insert, METH_VARARGS, insert_doc}, {"pop", (PyCFunction)array_pop, METH_VARARGS, pop_doc}, {"read", (PyCFunction)array_fromfile, METH_VARARGS, fromfile_doc}, {"remove", (PyCFunction)array_remove, METH_O, remove_doc}, {"reverse", (PyCFunction)array_reverse, METH_NOARGS, reverse_doc}, /* {"sort", (PyCFunction)array_sort, METH_VARARGS, sort_doc},*/ {"tofile", (PyCFunction)array_tofile, METH_O, tofile_doc}, {"tolist", (PyCFunction)array_tolist, METH_NOARGS, tolist_doc}, {"tostring", (PyCFunction)array_tostring, METH_NOARGS, tostring_doc}, #ifdef Py_USING_UNICODE {"tounicode", (PyCFunction)array_tounicode, METH_NOARGS, tounicode_doc}, #endif {"write", (PyCFunction)array_tofile, METH_O, tofile_doc}, {NULL, NULL} /* sentinel */ }; static PyObject * array_repr(arrayobject *a) { char buf[256], typecode; PyObject *s, *t, *v = NULL; int len; len = a->ob_size; typecode = a->ob_descr->typecode; if (len == 0) { PyOS_snprintf(buf, sizeof(buf), "array('%c')", typecode); return PyString_FromString(buf); } if (typecode == 'c') v = array_tostring(a, NULL); #ifdef Py_USING_UNICODE else if (typecode == 'u') v = array_tounicode(a, NULL); #endif else v = array_tolist(a, NULL); t = PyObject_Repr(v); Py_XDECREF(v); PyOS_snprintf(buf, sizeof(buf), "array('%c', ", typecode); s = PyString_FromString(buf); PyString_ConcatAndDel(&s, t); PyString_ConcatAndDel(&s, PyString_FromString(")")); return s; } static PyObject* array_subscr(arrayobject* self, PyObject* item) { if (PyInt_Check(item)) { long i = PyInt_AS_LONG(item); if (i < 0) i += self->ob_size; return array_item(self, i); } else if (PyLong_Check(item)) { long i = PyLong_AsLong(item); if (i == -1 && PyErr_Occurred()) return NULL; if (i < 0) i += self->ob_size; return array_item(self, i); } else if (PySlice_Check(item)) { int start, stop, step, slicelength, cur, i; PyObject* result; arrayobject* ar; int itemsize = self->ob_descr->itemsize; if (PySlice_GetIndicesEx((PySliceObject*)item, self->ob_size, &start, &stop, &step, &slicelength) < 0) { return NULL; } if (slicelength <= 0) { return newarrayobject(&Arraytype, 0, self->ob_descr); } else { result = newarrayobject(&Arraytype, slicelength, self->ob_descr); if (!result) return NULL; ar = (arrayobject*)result; for (cur = start, i = 0; i < slicelength; cur += step, i++) { memcpy(ar->ob_item + i*itemsize, self->ob_item + cur*itemsize, itemsize); } return result; } } else { PyErr_SetString(PyExc_TypeError, "list indices must be integers"); return NULL; } } static int array_ass_subscr(arrayobject* self, PyObject* item, PyObject* value) { if (PyInt_Check(item)) { long i = PyInt_AS_LONG(item); if (i < 0) i += self->ob_size; return array_ass_item(self, i, value); } else if (PyLong_Check(item)) { long i = PyLong_AsLong(item); if (i == -1 && PyErr_Occurred()) return -1; if (i < 0) i += self->ob_size; return array_ass_item(self, i, value); } else if (PySlice_Check(item)) { int start, stop, step, slicelength; int itemsize = self->ob_descr->itemsize; if (PySlice_GetIndicesEx((PySliceObject*)item, self->ob_size, &start, &stop, &step, &slicelength) < 0) { return -1; } /* treat A[slice(a,b)] = v _exactly_ like A[a:b] = v */ if (step == 1 && ((PySliceObject*)item)->step == Py_None) return array_ass_slice(self, start, stop, value); if (value == NULL) { /* delete slice */ int cur, i, extra; if (slicelength <= 0) return 0; if (step < 0) { stop = start + 1; start = stop + step*(slicelength - 1) - 1; step = -step; } for (cur = start, i = 0; i < slicelength - 1; cur += step, i++) { memmove(self->ob_item + (cur - i)*itemsize, self->ob_item + (cur + 1)*itemsize, (step - 1) * itemsize); } extra = self->ob_size - (cur + 1); if (extra > 0) { memmove(self->ob_item + (cur - i)*itemsize, self->ob_item + (cur + 1)*itemsize, extra*itemsize); } self->ob_size -= slicelength; self->ob_item = PyMem_REALLOC(self->ob_item, itemsize*self->ob_size); return 0; } else { /* assign slice */ int cur, i; arrayobject* av; if (!array_Check(value)) { PyErr_Format(PyExc_TypeError, "must assign array (not \"%.200s\") to slice", value->ob_type->tp_name); return -1; } av = (arrayobject*)value; if (av->ob_size != slicelength) { PyErr_Format(PyExc_ValueError, "attempt to assign array of size %d to extended slice of size %d", av->ob_size, slicelength); return -1; } if (!slicelength) return 0; /* protect against a[::-1] = a */ if (self == av) { value = array_slice(av, 0, av->ob_size); av = (arrayobject*)value; } else { Py_INCREF(value); } for (cur = start, i = 0; i < slicelength; cur += step, i++) { memcpy(self->ob_item + cur*itemsize, av->ob_item + i*itemsize, itemsize); } Py_DECREF(value); return 0; } } else { PyErr_SetString(PyExc_TypeError, "list indices must be integers"); return -1; } } static PyMappingMethods array_as_mapping = { (inquiry)array_length, (binaryfunc)array_subscr, (objobjargproc)array_ass_subscr }; static int array_buffer_getreadbuf(arrayobject *self, int index, const void **ptr) { if ( index != 0 ) { PyErr_SetString(PyExc_SystemError, "Accessing non-existent array segment"); return -1; } *ptr = (void *)self->ob_item; return self->ob_size*self->ob_descr->itemsize; } static int array_buffer_getwritebuf(arrayobject *self, int index, const void **ptr) { if ( index != 0 ) { PyErr_SetString(PyExc_SystemError, "Accessing non-existent array segment"); return -1; } *ptr = (void *)self->ob_item; return self->ob_size*self->ob_descr->itemsize; } static int array_buffer_getsegcount(arrayobject *self, int *lenp) { if ( lenp ) *lenp = self->ob_size*self->ob_descr->itemsize; return 1; } static PySequenceMethods array_as_sequence = { (inquiry)array_length, /*sq_length*/ (binaryfunc)array_concat, /*sq_concat*/ (intargfunc)array_repeat, /*sq_repeat*/ (intargfunc)array_item, /*sq_item*/ (intintargfunc)array_slice, /*sq_slice*/ (intobjargproc)array_ass_item, /*sq_ass_item*/ (intintobjargproc)array_ass_slice, /*sq_ass_slice*/ (objobjproc)array_contains, /*sq_contains*/ (binaryfunc)array_inplace_concat, /*sq_inplace_concat*/ (intargfunc)array_inplace_repeat /*sq_inplace_repeat*/ }; static PyBufferProcs array_as_buffer = { (getreadbufferproc)array_buffer_getreadbuf, (getwritebufferproc)array_buffer_getwritebuf, (getsegcountproc)array_buffer_getsegcount, }; static PyObject * array_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { char c; PyObject *initial = NULL; struct arraydescr *descr; if (kwds != NULL) { int i = PyObject_Length(kwds); if (i < 0) return NULL; else if (i > 0) { PyErr_SetString(PyExc_TypeError, "array.array constructor takes " "no keyword arguments"); return NULL; } } if (!PyArg_ParseTuple(args, "c|O:array", &c, &initial)) return NULL; if (!(initial == NULL || PyList_Check(initial) || PyString_Check(initial) || PyTuple_Check(initial) || (c == 'u' && PyUnicode_Check(initial)))) { PyErr_SetString(PyExc_TypeError, "array initializer must be list or string"); return NULL; } for (descr = descriptors; descr->typecode != '\0'; descr++) { if (descr->typecode == c) { PyObject *a; int len; if (initial == NULL || !(PyList_Check(initial) || PyTuple_Check(initial))) len = 0; else len = PySequence_Size(initial); a = newarrayobject(type, len, descr); if (a == NULL) return NULL; if (len > 0) { int i; for (i = 0; i < len; i++) { PyObject *v = PySequence_GetItem(initial, i); if (v == NULL) { Py_DECREF(a); return NULL; } if (setarrayitem(a, i, v) != 0) { Py_DECREF(v); Py_DECREF(a); return NULL; } Py_DECREF(v); } } else if (initial != NULL && PyString_Check(initial)) { PyObject *t_initial = Py_BuildValue("(O)", initial); PyObject *v = array_fromstring((arrayobject *)a, t_initial); Py_DECREF(t_initial); if (v == NULL) { Py_DECREF(a); return NULL; } Py_DECREF(v); #ifdef Py_USING_UNICODE } else if (initial != NULL && PyUnicode_Check(initial)) { int n = PyUnicode_GET_DATA_SIZE(initial); if (n > 0) { arrayobject *self = (arrayobject *)a; char *item = self->ob_item; item = PyMem_Realloc(item, n); if (item == NULL) { PyErr_NoMemory(); Py_DECREF(a); return NULL; } self->ob_item = item; self->ob_size = n / sizeof(Py_UNICODE); memcpy(item, PyUnicode_AS_DATA(initial), n); } #endif } return a; } } PyErr_SetString(PyExc_ValueError, "bad typecode (must be c, b, B, u, h, H, i, I, l, L, f or d)"); return NULL; } PyDoc_STRVAR(module_doc, "This module defines an object type which can efficiently represent\n\ an array of basic values: characters, integers, floating point\n\ numbers. Arrays are sequence types and behave very much like lists,\n\ except that the type of objects stored in them is constrained. The\n\ type is specified at object creation time by using a type code, which\n\ is a single character. The following type codes are defined:\n\ \n\ Type code C Type Minimum size in bytes \n\ 'c' character 1 \n\ 'b' signed integer 1 \n\ 'B' unsigned integer 1 \n\ 'u' Unicode character 2 \n\ 'h' signed integer 2 \n\ 'H' unsigned integer 2 \n\ 'i' signed integer 2 \n\ 'I' unsigned integer 2 \n\ 'l' signed integer 4 \n\ 'L' unsigned integer 4 \n\ 'f' floating point 4 \n\ 'd' floating point 8 \n\ \n\ The constructor is:\n\ \n\ array(typecode [, initializer]) -- create a new array\n\ "); PyDoc_STRVAR(arraytype_doc, "array(typecode [, initializer]) -> array\n\ \n\ Return a new array whose items are restricted by typecode, and\n\ initialized from the optional initializer value, which must be a list\n\ or a string.\n\ \n\ Arrays represent basic values and behave very much like lists, except\n\ the type of objects stored in them is constrained.\n\ \n\ Methods:\n\ \n\ append() -- append a new item to the end of the array\n\ buffer_info() -- return information giving the current memory info\n\ byteswap() -- byteswap all the items of the array\n\ count() -- return number of occurences of an object\n\ extend() -- extend array by appending array elements\n\ fromfile() -- read items from a file object\n\ fromlist() -- append items from the list\n\ fromstring() -- append items from the string\n\ index() -- return index of first occurence of an object\n\ insert() -- insert a new item into the array at a provided position\n\ pop() -- remove and return item (default last)\n\ read() -- DEPRECATED, use fromfile()\n\ remove() -- remove first occurence of an object\n\ reverse() -- reverse the order of the items in the array\n\ tofile() -- write all items to a file object\n\ tolist() -- return the array converted to an ordinary list\n\ tostring() -- return the array converted to a string\n\ write() -- DEPRECATED, use tofile()\n\ \n\ Attributes:\n\ \n\ typecode -- the typecode character used to create the array\n\ itemsize -- the length in bytes of one array item\n\ "); static PyObject *array_iter(arrayobject *ao); static PyTypeObject Arraytype = { PyObject_HEAD_INIT(NULL) 0, "array.array", sizeof(arrayobject), 0, (destructor)array_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ (reprfunc)array_repr, /* tp_repr */ 0, /* tp_as _number*/ &array_as_sequence, /* tp_as _sequence*/ &array_as_mapping, /* tp_as _mapping*/ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ &array_as_buffer, /* tp_as_buffer*/ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /* tp_flags */ arraytype_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ array_richcompare, /* tp_richcompare */ 0, /* tp_weaklistoffset */ (getiterfunc)array_iter, /* tp_iter */ 0, /* tp_iternext */ array_methods, /* tp_methods */ 0, /* tp_members */ array_getsets, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ PyType_GenericAlloc, /* tp_alloc */ array_new, /* tp_new */ PyObject_Del, /* tp_free */ }; /*********************** Array Iterator **************************/ typedef struct { PyObject_HEAD long index; arrayobject *ao; PyObject * (*getitem)(struct arrayobject *, int); } arrayiterobject; static PyTypeObject PyArrayIter_Type; #define PyArrayIter_Check(op) PyObject_TypeCheck(op, &PyArrayIter_Type) static PyObject * array_iter(arrayobject *ao) { arrayiterobject *it; if (!array_Check(ao)) { PyErr_BadInternalCall(); return NULL; } it = PyObject_GC_New(arrayiterobject, &PyArrayIter_Type); if (it == NULL) return NULL; Py_INCREF(ao); it->ao = ao; it->index = 0; it->getitem = ao->ob_descr->getitem; PyObject_GC_Track(it); return (PyObject *)it; } static PyObject * arrayiter_next(arrayiterobject *it) { assert(PyArrayIter_Check(it)); if (it->index < it->ao->ob_size) return (*it->getitem)(it->ao, it->index++); return NULL; } static void arrayiter_dealloc(arrayiterobject *it) { PyObject_GC_UnTrack(it); Py_XDECREF(it->ao); PyObject_GC_Del(it); } static int arrayiter_traverse(arrayiterobject *it, visitproc visit, void *arg) { if (it->ao != NULL) return visit((PyObject *)(it->ao), arg); return 0; } static PyTypeObject PyArrayIter_Type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "arrayiterator", /* tp_name */ sizeof(arrayiterobject), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)arrayiter_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC,/* tp_flags */ 0, /* tp_doc */ (traverseproc)arrayiter_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)arrayiter_next, /* tp_iternext */ 0, /* tp_methods */ }; /*********************** Install Module **************************/ /* No functions in array module. */ static PyMethodDef a_methods[] = { {NULL, NULL, 0, NULL} /* Sentinel */ }; PyMODINIT_FUNC initarray(void) { PyObject *m; Arraytype.ob_type = &PyType_Type; PyArrayIter_Type.ob_type = &PyType_Type; m = Py_InitModule3("array", a_methods, module_doc); Py_INCREF((PyObject *)&Arraytype); PyModule_AddObject(m, "ArrayType", (PyObject *)&Arraytype); Py_INCREF((PyObject *)&Arraytype); PyModule_AddObject(m, "array", (PyObject *)&Arraytype); /* No need to check the error here, the caller will do that */ } Python-2.3.7/Modules/cPickle.c0000644001241000117560000035236610762607371015426 0ustar loewishpifb6#include "Python.h" #include "cStringIO.h" #include "structmember.h" PyDoc_STRVAR(cPickle_module_documentation, "C implementation and optimization of the Python pickle module."); #ifndef Py_eval_input #include #define Py_eval_input eval_input #endif /* Py_eval_input */ #define DEL_LIST_SLICE(list, from, to) (PyList_SetSlice(list, from, to, NULL)) #define WRITE_BUF_SIZE 256 /* Bump this when new opcodes are added to the pickle protocol. */ #define HIGHEST_PROTOCOL 2 /* * Pickle opcodes. These must be kept in synch with pickle.py. Extensive * docs are in pickletools.py. */ #define MARK '(' #define STOP '.' #define POP '0' #define POP_MARK '1' #define DUP '2' #define FLOAT 'F' #define BINFLOAT 'G' #define INT 'I' #define BININT 'J' #define BININT1 'K' #define LONG 'L' #define BININT2 'M' #define NONE 'N' #define PERSID 'P' #define BINPERSID 'Q' #define REDUCE 'R' #define STRING 'S' #define BINSTRING 'T' #define SHORT_BINSTRING 'U' #define UNICODE 'V' #define BINUNICODE 'X' #define APPEND 'a' #define BUILD 'b' #define GLOBAL 'c' #define DICT 'd' #define EMPTY_DICT '}' #define APPENDS 'e' #define GET 'g' #define BINGET 'h' #define INST 'i' #define LONG_BINGET 'j' #define LIST 'l' #define EMPTY_LIST ']' #define OBJ 'o' #define PUT 'p' #define BINPUT 'q' #define LONG_BINPUT 'r' #define SETITEM 's' #define TUPLE 't' #define EMPTY_TUPLE ')' #define SETITEMS 'u' /* Protocol 2. */ #define PROTO '\x80' /* identify pickle protocol */ #define NEWOBJ '\x81' /* build object by applying cls.__new__ to argtuple */ #define EXT1 '\x82' /* push object from extension registry; 1-byte index */ #define EXT2 '\x83' /* ditto, but 2-byte index */ #define EXT4 '\x84' /* ditto, but 4-byte index */ #define TUPLE1 '\x85' /* build 1-tuple from stack top */ #define TUPLE2 '\x86' /* build 2-tuple from two topmost stack items */ #define TUPLE3 '\x87' /* build 3-tuple from three topmost stack items */ #define NEWTRUE '\x88' /* push True */ #define NEWFALSE '\x89' /* push False */ #define LONG1 '\x8a' /* push long from < 256 bytes */ #define LONG4 '\x8b' /* push really big long */ /* There aren't opcodes -- they're ways to pickle bools before protocol 2, * so that unpicklers written before bools were introduced unpickle them * as ints, but unpicklers after can recognize that bools were intended. * Note that protocol 2 added direct ways to pickle bools. */ #undef TRUE #define TRUE "I01\n" #undef FALSE #define FALSE "I00\n" /* Keep in synch with pickle.Pickler._BATCHSIZE. This is how many elements * batch_list/dict() pumps out before doing APPENDS/SETITEMS. Nothing will * break if this gets out of synch with pickle.py, but it's unclear that * would help anything either. */ #define BATCHSIZE 1000 static char MARKv = MARK; static PyObject *PickleError; static PyObject *PicklingError; static PyObject *UnpickleableError; static PyObject *UnpicklingError; static PyObject *BadPickleGet; /* As the name says, an empty tuple. */ static PyObject *empty_tuple; /* copy_reg.dispatch_table, {type_object: pickling_function} */ static PyObject *dispatch_table; /* For EXT[124] opcodes. */ /* copy_reg._extension_registry, {(module_name, function_name): code} */ static PyObject *extension_registry; /* copy_reg._inverted_registry, {code: (module_name, function_name)} */ static PyObject *inverted_registry; /* copy_reg._extension_cache, {code: object} */ static PyObject *extension_cache; /* For looking up name pairs in copy_reg._extension_registry. */ static PyObject *two_tuple; static PyObject *__class___str, *__getinitargs___str, *__dict___str, *__getstate___str, *__setstate___str, *__name___str, *__reduce___str, *__reduce_ex___str, *write_str, *append_str, *read_str, *readline_str, *__main___str, *__basicnew___str, *copy_reg_str, *dispatch_table_str; /************************************************************************* Internal Data type for pickle data. */ typedef struct { PyObject_HEAD int length; /* number of initial slots in data currently used */ int size; /* number of slots in data allocated */ PyObject **data; } Pdata; static void Pdata_dealloc(Pdata *self) { int i; PyObject **p; for (i = self->length, p = self->data; --i >= 0; p++) { Py_DECREF(*p); } if (self->data) free(self->data); PyObject_Del(self); } static PyTypeObject PdataType = { PyObject_HEAD_INIT(NULL) 0, "cPickle.Pdata", sizeof(Pdata), 0, (destructor)Pdata_dealloc, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0L,0L,0L,0L, "" }; #define Pdata_Check(O) ((O)->ob_type == &PdataType) static PyObject * Pdata_New(void) { Pdata *self; if (!(self = PyObject_New(Pdata, &PdataType))) return NULL; self->size = 8; self->length = 0; self->data = malloc(self->size * sizeof(PyObject*)); if (self->data) return (PyObject*)self; Py_DECREF(self); return PyErr_NoMemory(); } static int stackUnderflow(void) { PyErr_SetString(UnpicklingError, "unpickling stack underflow"); return -1; } /* Retain only the initial clearto items. If clearto >= the current * number of items, this is a (non-erroneous) NOP. */ static int Pdata_clear(Pdata *self, int clearto) { int i; PyObject **p; if (clearto < 0) return stackUnderflow(); if (clearto >= self->length) return 0; for (i = self->length, p = self->data + clearto; --i >= clearto; p++) { Py_DECREF(*p); } self->length = clearto; return 0; } static int Pdata_grow(Pdata *self) { int bigger; size_t nbytes; bigger = self->size << 1; if (bigger <= 0) /* was 0, or new value overflows */ goto nomemory; if ((int)(size_t)bigger != bigger) goto nomemory; nbytes = (size_t)bigger * sizeof(PyObject *); if (nbytes / sizeof(PyObject *) != (size_t)bigger) goto nomemory; self->data = realloc(self->data, nbytes); if (self->data == NULL) goto nomemory; self->size = bigger; return 0; nomemory: self->size = 0; PyErr_NoMemory(); return -1; } /* D is a Pdata*. Pop the topmost element and store it into V, which * must be an lvalue holding PyObject*. On stack underflow, UnpicklingError * is raised and V is set to NULL. D and V may be evaluated several times. */ #define PDATA_POP(D, V) { \ if ((D)->length) \ (V) = (D)->data[--((D)->length)]; \ else { \ PyErr_SetString(UnpicklingError, "bad pickle data"); \ (V) = NULL; \ } \ } /* PDATA_PUSH and PDATA_APPEND both push rvalue PyObject* O on to Pdata* * D. If the Pdata stack can't be grown to hold the new value, both * raise MemoryError and execute "return ER". The difference is in ownership * of O after: _PUSH transfers ownership of O from the caller to the stack * (no incref of O is done, and in case of error O is decrefed), while * _APPEND pushes a new reference. */ /* Push O on stack D, giving ownership of O to the stack. */ #define PDATA_PUSH(D, O, ER) { \ if (((Pdata*)(D))->length == ((Pdata*)(D))->size && \ Pdata_grow((Pdata*)(D)) < 0) { \ Py_DECREF(O); \ return ER; \ } \ ((Pdata*)(D))->data[((Pdata*)(D))->length++] = (O); \ } /* Push O on stack D, pushing a new reference. */ #define PDATA_APPEND(D, O, ER) { \ if (((Pdata*)(D))->length == ((Pdata*)(D))->size && \ Pdata_grow((Pdata*)(D)) < 0) \ return ER; \ Py_INCREF(O); \ ((Pdata*)(D))->data[((Pdata*)(D))->length++] = (O); \ } static PyObject * Pdata_popTuple(Pdata *self, int start) { PyObject *r; int i, j, l; l = self->length-start; r = PyTuple_New(l); if (r == NULL) return NULL; for (i = start, j = 0 ; j < l; i++, j++) PyTuple_SET_ITEM(r, j, self->data[i]); self->length = start; return r; } static PyObject * Pdata_popList(Pdata *self, int start) { PyObject *r; int i, j, l; l=self->length-start; if (!( r=PyList_New(l))) return NULL; for (i=start, j=0 ; j < l; i++, j++) PyList_SET_ITEM(r, j, self->data[i]); self->length=start; return r; } /*************************************************************************/ #define ARG_TUP(self, o) { \ if (self->arg || (self->arg=PyTuple_New(1))) { \ Py_XDECREF(PyTuple_GET_ITEM(self->arg,0)); \ PyTuple_SET_ITEM(self->arg,0,o); \ } \ else { \ Py_DECREF(o); \ } \ } #define FREE_ARG_TUP(self) { \ if (self->arg->ob_refcnt > 1) { \ Py_DECREF(self->arg); \ self->arg=NULL; \ } \ } typedef struct Picklerobject { PyObject_HEAD FILE *fp; PyObject *write; PyObject *file; PyObject *memo; PyObject *arg; PyObject *pers_func; PyObject *inst_pers_func; /* pickle protocol number, >= 0 */ int proto; /* bool, true if proto > 0 */ int bin; int fast; /* Fast mode doesn't save in memo, don't use if circ ref */ int nesting; int (*write_func)(struct Picklerobject *, char *, int); char *write_buf; int buf_size; PyObject *dispatch_table; int fast_container; /* count nested container dumps */ PyObject *fast_memo; } Picklerobject; #ifndef PY_CPICKLE_FAST_LIMIT #define PY_CPICKLE_FAST_LIMIT 50 #endif static PyTypeObject Picklertype; typedef struct Unpicklerobject { PyObject_HEAD FILE *fp; PyObject *file; PyObject *readline; PyObject *read; PyObject *memo; PyObject *arg; Pdata *stack; PyObject *mark; PyObject *pers_func; PyObject *last_string; int *marks; int num_marks; int marks_size; int (*read_func)(struct Unpicklerobject *, char **, int); int (*readline_func)(struct Unpicklerobject *, char **); int buf_size; char *buf; PyObject *find_class; } Unpicklerobject; static PyTypeObject Unpicklertype; /* Forward decls that need the above structs */ static int save(Picklerobject *, PyObject *, int); static int put2(Picklerobject *, PyObject *); static PyObject * cPickle_ErrFormat(PyObject *ErrType, char *stringformat, char *format, ...) { va_list va; PyObject *args=0, *retval=0; va_start(va, format); if (format) args = Py_VaBuildValue(format, va); va_end(va); if (format && ! args) return NULL; if (stringformat && !(retval=PyString_FromString(stringformat))) return NULL; if (retval) { if (args) { PyObject *v; v=PyString_Format(retval, args); Py_DECREF(retval); Py_DECREF(args); if (! v) return NULL; retval=v; } } else if (args) retval=args; else { PyErr_SetObject(ErrType,Py_None); return NULL; } PyErr_SetObject(ErrType,retval); Py_DECREF(retval); return NULL; } static int write_file(Picklerobject *self, char *s, int n) { size_t nbyteswritten; if (s == NULL) { return 0; } Py_BEGIN_ALLOW_THREADS nbyteswritten = fwrite(s, sizeof(char), n, self->fp); Py_END_ALLOW_THREADS if (nbyteswritten != (size_t)n) { PyErr_SetFromErrno(PyExc_IOError); return -1; } return n; } static int write_cStringIO(Picklerobject *self, char *s, int n) { if (s == NULL) { return 0; } if (PycStringIO->cwrite((PyObject *)self->file, s, n) != n) { return -1; } return n; } static int write_none(Picklerobject *self, char *s, int n) { if (s == NULL) return 0; return n; } static int write_other(Picklerobject *self, char *s, int n) { PyObject *py_str = 0, *junk = 0; if (s == NULL) { if (!( self->buf_size )) return 0; py_str = PyString_FromStringAndSize(self->write_buf, self->buf_size); if (!py_str) return -1; } else { if (self->buf_size && (n + self->buf_size) > WRITE_BUF_SIZE) { if (write_other(self, NULL, 0) < 0) return -1; } if (n > WRITE_BUF_SIZE) { if (!( py_str = PyString_FromStringAndSize(s, n))) return -1; } else { memcpy(self->write_buf + self->buf_size, s, n); self->buf_size += n; return n; } } if (self->write) { /* object with write method */ ARG_TUP(self, py_str); if (self->arg) { junk = PyObject_Call(self->write, self->arg, NULL); FREE_ARG_TUP(self); } if (junk) Py_DECREF(junk); else return -1; } else PDATA_PUSH(self->file, py_str, -1); self->buf_size = 0; return n; } static int read_file(Unpicklerobject *self, char **s, int n) { size_t nbytesread; if (self->buf_size == 0) { int size; size = ((n < 32) ? 32 : n); if (!( self->buf = (char *)malloc(size))) { PyErr_NoMemory(); return -1; } self->buf_size = size; } else if (n > self->buf_size) { self->buf = (char *)realloc(self->buf, n); if (!self->buf) { PyErr_NoMemory(); return -1; } self->buf_size = n; } Py_BEGIN_ALLOW_THREADS nbytesread = fread(self->buf, sizeof(char), n, self->fp); Py_END_ALLOW_THREADS if (nbytesread != (size_t)n) { if (feof(self->fp)) { PyErr_SetNone(PyExc_EOFError); return -1; } PyErr_SetFromErrno(PyExc_IOError); return -1; } *s = self->buf; return n; } static int readline_file(Unpicklerobject *self, char **s) { int i; if (self->buf_size == 0) { if (!( self->buf = (char *)malloc(40))) { PyErr_NoMemory(); return -1; } self->buf_size = 40; } i = 0; while (1) { int bigger; for (; i < (self->buf_size - 1); i++) { if (feof(self->fp) || (self->buf[i] = getc(self->fp)) == '\n') { self->buf[i + 1] = '\0'; *s = self->buf; return i + 1; } } bigger = self->buf_size << 1; if (bigger <= 0) { /* overflow */ PyErr_NoMemory(); return -1; } self->buf = (char *)realloc(self->buf, bigger); if (!self->buf) { PyErr_NoMemory(); return -1; } self->buf_size = bigger; } } static int read_cStringIO(Unpicklerobject *self, char **s, int n) { char *ptr; if (PycStringIO->cread((PyObject *)self->file, &ptr, n) != n) { PyErr_SetNone(PyExc_EOFError); return -1; } *s = ptr; return n; } static int readline_cStringIO(Unpicklerobject *self, char **s) { int n; char *ptr; if ((n = PycStringIO->creadline((PyObject *)self->file, &ptr)) < 0) { return -1; } *s = ptr; return n; } static int read_other(Unpicklerobject *self, char **s, int n) { PyObject *bytes, *str=0; if (!( bytes = PyInt_FromLong(n))) return -1; ARG_TUP(self, bytes); if (self->arg) { str = PyObject_Call(self->read, self->arg, NULL); FREE_ARG_TUP(self); } if (! str) return -1; Py_XDECREF(self->last_string); self->last_string = str; if (! (*s = PyString_AsString(str))) return -1; return n; } static int readline_other(Unpicklerobject *self, char **s) { PyObject *str; int str_size; if (!( str = PyObject_CallObject(self->readline, empty_tuple))) { return -1; } if ((str_size = PyString_Size(str)) < 0) return -1; Py_XDECREF(self->last_string); self->last_string = str; if (! (*s = PyString_AsString(str))) return -1; return str_size; } /* Copy the first n bytes from s into newly malloc'ed memory, plus a * trailing 0 byte. Return a pointer to that, or NULL if out of memory. * The caller is responsible for free()'ing the return value. */ static char * pystrndup(char *s, int n) { char *r = (char *)malloc(n+1); if (r == NULL) return (char*)PyErr_NoMemory(); memcpy(r, s, n); r[n] = 0; return r; } static int get(Picklerobject *self, PyObject *id) { PyObject *value, *mv; long c_value; char s[30]; size_t len; if (!( mv = PyDict_GetItem(self->memo, id))) { PyErr_SetObject(PyExc_KeyError, id); return -1; } if (!( value = PyTuple_GetItem(mv, 0))) return -1; if (!( PyInt_Check(value))) { PyErr_SetString(PicklingError, "no int where int expected in memo"); return -1; } c_value = PyInt_AS_LONG((PyIntObject*)value); if (!self->bin) { s[0] = GET; PyOS_snprintf(s + 1, sizeof(s) - 1, "%ld\n", c_value); len = strlen(s); } else if (Pdata_Check(self->file)) { if (write_other(self, NULL, 0) < 0) return -1; PDATA_APPEND(self->file, mv, -1); return 0; } else { if (c_value < 256) { s[0] = BINGET; s[1] = (int)(c_value & 0xff); len = 2; } else { s[0] = LONG_BINGET; s[1] = (int)(c_value & 0xff); s[2] = (int)((c_value >> 8) & 0xff); s[3] = (int)((c_value >> 16) & 0xff); s[4] = (int)((c_value >> 24) & 0xff); len = 5; } } if (self->write_func(self, s, len) < 0) return -1; return 0; } static int put(Picklerobject *self, PyObject *ob) { if (ob->ob_refcnt < 2 || self->fast) return 0; return put2(self, ob); } static int put2(Picklerobject *self, PyObject *ob) { char c_str[30]; int p; size_t len; int res = -1; PyObject *py_ob_id = 0, *memo_len = 0, *t = 0; if (self->fast) return 0; if ((p = PyDict_Size(self->memo)) < 0) goto finally; /* Make sure memo keys are positive! */ /* XXX Why? * XXX And does "positive" really mean non-negative? * XXX pickle.py starts with PUT index 0, not 1. This makes for * XXX gratuitous differences between the pickling modules. */ p++; if (!( py_ob_id = PyLong_FromVoidPtr(ob))) goto finally; if (!( memo_len = PyInt_FromLong(p))) goto finally; if (!( t = PyTuple_New(2))) goto finally; PyTuple_SET_ITEM(t, 0, memo_len); Py_INCREF(memo_len); PyTuple_SET_ITEM(t, 1, ob); Py_INCREF(ob); if (PyDict_SetItem(self->memo, py_ob_id, t) < 0) goto finally; if (!self->bin) { c_str[0] = PUT; PyOS_snprintf(c_str + 1, sizeof(c_str) - 1, "%d\n", p); len = strlen(c_str); } else if (Pdata_Check(self->file)) { if (write_other(self, NULL, 0) < 0) return -1; PDATA_APPEND(self->file, memo_len, -1); res=0; /* Job well done ;) */ goto finally; } else { if (p >= 256) { c_str[0] = LONG_BINPUT; c_str[1] = (int)(p & 0xff); c_str[2] = (int)((p >> 8) & 0xff); c_str[3] = (int)((p >> 16) & 0xff); c_str[4] = (int)((p >> 24) & 0xff); len = 5; } else { c_str[0] = BINPUT; c_str[1] = p; len = 2; } } if (self->write_func(self, c_str, len) < 0) goto finally; res = 0; finally: Py_XDECREF(py_ob_id); Py_XDECREF(memo_len); Py_XDECREF(t); return res; } static PyObject * whichmodule(PyObject *global, PyObject *global_name) { int i, j; PyObject *module = 0, *modules_dict = 0, *global_name_attr = 0, *name = 0; module = PyObject_GetAttrString(global, "__module__"); if (module) return module; if (PyErr_ExceptionMatches(PyExc_AttributeError)) PyErr_Clear(); else return NULL; if (!( modules_dict = PySys_GetObject("modules"))) return NULL; i = 0; while ((j = PyDict_Next(modules_dict, &i, &name, &module))) { if (PyObject_Compare(name, __main___str)==0) continue; global_name_attr = PyObject_GetAttr(module, global_name); if (!global_name_attr) { if (PyErr_ExceptionMatches(PyExc_AttributeError)) PyErr_Clear(); else return NULL; continue; } if (global_name_attr != global) { Py_DECREF(global_name_attr); continue; } Py_DECREF(global_name_attr); break; } /* The following implements the rule in pickle.py added in 1.5 that used __main__ if no module is found. I don't actually like this rule. jlf */ if (!j) { j=1; name=__main___str; } Py_INCREF(name); return name; } static int fast_save_enter(Picklerobject *self, PyObject *obj) { /* if fast_container < 0, we're doing an error exit. */ if (++self->fast_container >= PY_CPICKLE_FAST_LIMIT) { PyObject *key = NULL; if (self->fast_memo == NULL) { self->fast_memo = PyDict_New(); if (self->fast_memo == NULL) { self->fast_container = -1; return 0; } } key = PyLong_FromVoidPtr(obj); if (key == NULL) return 0; if (PyDict_GetItem(self->fast_memo, key)) { Py_DECREF(key); PyErr_Format(PyExc_ValueError, "fast mode: can't pickle cyclic objects " "including object type %s at %p", obj->ob_type->tp_name, obj); self->fast_container = -1; return 0; } if (PyDict_SetItem(self->fast_memo, key, Py_None) < 0) { Py_DECREF(key); self->fast_container = -1; return 0; } Py_DECREF(key); } return 1; } int fast_save_leave(Picklerobject *self, PyObject *obj) { if (self->fast_container-- >= PY_CPICKLE_FAST_LIMIT) { PyObject *key = PyLong_FromVoidPtr(obj); if (key == NULL) return 0; if (PyDict_DelItem(self->fast_memo, key) < 0) { Py_DECREF(key); return 0; } Py_DECREF(key); } return 1; } static int save_none(Picklerobject *self, PyObject *args) { static char none = NONE; if (self->write_func(self, &none, 1) < 0) return -1; return 0; } static int save_bool(Picklerobject *self, PyObject *args) { static char *buf[2] = {FALSE, TRUE}; static char len[2] = {sizeof(FALSE)-1, sizeof(TRUE)-1}; long l = PyInt_AS_LONG((PyIntObject *)args); if (self->proto >= 2) { char opcode = l ? NEWTRUE : NEWFALSE; if (self->write_func(self, &opcode, 1) < 0) return -1; } else if (self->write_func(self, buf[l], len[l]) < 0) return -1; return 0; } static int save_int(Picklerobject *self, PyObject *args) { char c_str[32]; long l = PyInt_AS_LONG((PyIntObject *)args); int len = 0; if (!self->bin #if SIZEOF_LONG > 4 || l > 0x7fffffffL || l < -0x80000000L #endif ) { /* Text-mode pickle, or long too big to fit in the 4-byte * signed BININT format: store as a string. */ c_str[0] = INT; PyOS_snprintf(c_str + 1, sizeof(c_str) - 1, "%ld\n", l); if (self->write_func(self, c_str, strlen(c_str)) < 0) return -1; } else { /* Binary pickle and l fits in a signed 4-byte int. */ c_str[1] = (int)( l & 0xff); c_str[2] = (int)((l >> 8) & 0xff); c_str[3] = (int)((l >> 16) & 0xff); c_str[4] = (int)((l >> 24) & 0xff); if ((c_str[4] == 0) && (c_str[3] == 0)) { if (c_str[2] == 0) { c_str[0] = BININT1; len = 2; } else { c_str[0] = BININT2; len = 3; } } else { c_str[0] = BININT; len = 5; } if (self->write_func(self, c_str, len) < 0) return -1; } return 0; } static int save_long(Picklerobject *self, PyObject *args) { int size; int res = -1; PyObject *repr = NULL; static char l = LONG; if (self->proto >= 2) { /* Linear-time pickling. */ size_t nbits; size_t nbytes; unsigned char *pdata; char c_str[5]; int i; int sign = _PyLong_Sign(args); if (sign == 0) { /* It's 0 -- an empty bytestring. */ c_str[0] = LONG1; c_str[1] = 0; i = self->write_func(self, c_str, 2); if (i < 0) goto finally; res = 0; goto finally; } nbits = _PyLong_NumBits(args); if (nbits == (size_t)-1 && PyErr_Occurred()) goto finally; /* How many bytes do we need? There are nbits >> 3 full * bytes of data, and nbits & 7 leftover bits. If there * are any leftover bits, then we clearly need another * byte. Wnat's not so obvious is that we *probably* * need another byte even if there aren't any leftovers: * the most-significant bit of the most-significant byte * acts like a sign bit, and it's usually got a sense * opposite of the one we need. The exception is longs * of the form -(2**(8*j-1)) for j > 0. Such a long is * its own 256's-complement, so has the right sign bit * even without the extra byte. That's a pain to check * for in advance, though, so we always grab an extra * byte at the start, and cut it back later if possible. */ nbytes = (nbits >> 3) + 1; if ((int)nbytes < 0 || (size_t)(int)nbytes != nbytes) { PyErr_SetString(PyExc_OverflowError, "long too large " "to pickle"); goto finally; } repr = PyString_FromStringAndSize(NULL, (int)nbytes); if (repr == NULL) goto finally; pdata = (unsigned char *)PyString_AS_STRING(repr); i = _PyLong_AsByteArray((PyLongObject *)args, pdata, nbytes, 1 /* little endian */, 1 /* signed */); if (i < 0) goto finally; /* If the long is negative, this may be a byte more than * needed. This is so iff the MSB is all redundant sign * bits. */ if (sign < 0 && nbytes > 1 && pdata[nbytes - 1] == 0xff && (pdata[nbytes - 2] & 0x80) != 0) --nbytes; if (nbytes < 256) { c_str[0] = LONG1; c_str[1] = (char)nbytes; size = 2; } else { c_str[0] = LONG4; size = (int)nbytes; for (i = 1; i < 5; i++) { c_str[i] = (char)(size & 0xff); size >>= 8; } size = 5; } i = self->write_func(self, c_str, size); if (i < 0) goto finally; i = self->write_func(self, (char *)pdata, (int)nbytes); if (i < 0) goto finally; res = 0; goto finally; } /* proto < 2: write the repr and newline. This is quadratic-time * (in the number of digits), in both directions. */ if (!( repr = PyObject_Repr(args))) goto finally; if ((size = PyString_Size(repr)) < 0) goto finally; if (self->write_func(self, &l, 1) < 0) goto finally; if (self->write_func(self, PyString_AS_STRING((PyStringObject *)repr), size) < 0) goto finally; if (self->write_func(self, "\n", 1) < 0) goto finally; res = 0; finally: Py_XDECREF(repr); return res; } static int save_float(Picklerobject *self, PyObject *args) { double x = PyFloat_AS_DOUBLE((PyFloatObject *)args); if (self->bin) { char str[9]; str[0] = BINFLOAT; if (_PyFloat_Pack8(x, (unsigned char *)&str[1], 0) < 0) return -1; if (self->write_func(self, str, 9) < 0) return -1; } else { char c_str[250]; c_str[0] = FLOAT; PyOS_snprintf(c_str + 1, sizeof(c_str) - 1, "%.17g\n", x); if (self->write_func(self, c_str, strlen(c_str)) < 0) return -1; } return 0; } static int save_string(Picklerobject *self, PyObject *args, int doput) { int size, len; PyObject *repr=0; if ((size = PyString_Size(args)) < 0) return -1; if (!self->bin) { char *repr_str; static char string = STRING; if (!( repr = PyObject_Repr(args))) return -1; if ((len = PyString_Size(repr)) < 0) goto err; repr_str = PyString_AS_STRING((PyStringObject *)repr); if (self->write_func(self, &string, 1) < 0) goto err; if (self->write_func(self, repr_str, len) < 0) goto err; if (self->write_func(self, "\n", 1) < 0) goto err; Py_XDECREF(repr); } else { int i; char c_str[5]; if ((size = PyString_Size(args)) < 0) return -1; if (size < 256) { c_str[0] = SHORT_BINSTRING; c_str[1] = size; len = 2; } else { c_str[0] = BINSTRING; for (i = 1; i < 5; i++) c_str[i] = (int)(size >> ((i - 1) * 8)); len = 5; } if (self->write_func(self, c_str, len) < 0) return -1; if (size > 128 && Pdata_Check(self->file)) { if (write_other(self, NULL, 0) < 0) return -1; PDATA_APPEND(self->file, args, -1); } else { if (self->write_func(self, PyString_AS_STRING( (PyStringObject *)args), size) < 0) return -1; } } if (doput) if (put(self, args) < 0) return -1; return 0; err: Py_XDECREF(repr); return -1; } #ifdef Py_USING_UNICODE /* A copy of PyUnicode_EncodeRawUnicodeEscape() that also translates backslash and newline characters to \uXXXX escapes. */ static PyObject * modified_EncodeRawUnicodeEscape(const Py_UNICODE *s, int size) { PyObject *repr; char *p; char *q; static const char *hexdigit = "0123456789ABCDEF"; repr = PyString_FromStringAndSize(NULL, 6 * size); if (repr == NULL) return NULL; if (size == 0) return repr; p = q = PyString_AS_STRING(repr); while (size-- > 0) { Py_UNICODE ch = *s++; /* Map 16-bit characters to '\uxxxx' */ if (ch >= 256 || ch == '\\' || ch == '\n') { *p++ = '\\'; *p++ = 'u'; *p++ = hexdigit[(ch >> 12) & 0xf]; *p++ = hexdigit[(ch >> 8) & 0xf]; *p++ = hexdigit[(ch >> 4) & 0xf]; *p++ = hexdigit[ch & 15]; } /* Copy everything else as-is */ else *p++ = (char) ch; } *p = '\0'; _PyString_Resize(&repr, p - q); return repr; } static int save_unicode(Picklerobject *self, PyObject *args, int doput) { int size, len; PyObject *repr=0; if (!PyUnicode_Check(args)) return -1; if (!self->bin) { char *repr_str; static char string = UNICODE; repr = modified_EncodeRawUnicodeEscape( PyUnicode_AS_UNICODE(args), PyUnicode_GET_SIZE(args)); if (!repr) return -1; if ((len = PyString_Size(repr)) < 0) goto err; repr_str = PyString_AS_STRING((PyStringObject *)repr); if (self->write_func(self, &string, 1) < 0) goto err; if (self->write_func(self, repr_str, len) < 0) goto err; if (self->write_func(self, "\n", 1) < 0) goto err; Py_XDECREF(repr); } else { int i; char c_str[5]; if (!( repr = PyUnicode_AsUTF8String(args))) return -1; if ((size = PyString_Size(repr)) < 0) goto err; c_str[0] = BINUNICODE; for (i = 1; i < 5; i++) c_str[i] = (int)(size >> ((i - 1) * 8)); len = 5; if (self->write_func(self, c_str, len) < 0) goto err; if (size > 128 && Pdata_Check(self->file)) { if (write_other(self, NULL, 0) < 0) goto err; PDATA_APPEND(self->file, repr, -1); } else { if (self->write_func(self, PyString_AS_STRING(repr), size) < 0) goto err; } Py_DECREF(repr); } if (doput) if (put(self, args) < 0) return -1; return 0; err: Py_XDECREF(repr); return -1; } #endif /* A helper for save_tuple. Push the len elements in tuple t on the stack. */ static int store_tuple_elements(Picklerobject *self, PyObject *t, int len) { int i; int res = -1; /* guilty until proved innocent */ assert(PyTuple_Size(t) == len); for (i = 0; i < len; i++) { PyObject *element = PyTuple_GET_ITEM(t, i); if (element == NULL) goto finally; if (save(self, element, 0) < 0) goto finally; } res = 0; finally: return res; } /* Tuples are ubiquitous in the pickle protocols, so many techniques are * used across protocols to minimize the space needed to pickle them. * Tuples are also the only builtin immutable type that can be recursive * (a tuple can be reached from itself), and that requires some subtle * magic so that it works in all cases. IOW, this is a long routine. */ static int save_tuple(Picklerobject *self, PyObject *args) { PyObject *py_tuple_id = NULL; int len, i; int res = -1; static char tuple = TUPLE; static char pop = POP; static char pop_mark = POP_MARK; static char len2opcode[] = {EMPTY_TUPLE, TUPLE1, TUPLE2, TUPLE3}; if ((len = PyTuple_Size(args)) < 0) goto finally; if (len == 0) { char c_str[2]; if (self->proto) { c_str[0] = EMPTY_TUPLE; len = 1; } else { c_str[0] = MARK; c_str[1] = TUPLE; len = 2; } if (self->write_func(self, c_str, len) >= 0) res = 0; /* Don't memoize an empty tuple. */ goto finally; } /* A non-empty tuple. */ /* id(tuple) isn't in the memo now. If it shows up there after * saving the tuple elements, the tuple must be recursive, in * which case we'll pop everything we put on the stack, and fetch * its value from the memo. */ py_tuple_id = PyLong_FromVoidPtr(args); if (py_tuple_id == NULL) goto finally; if (len <= 3 && self->proto >= 2) { /* Use TUPLE{1,2,3} opcodes. */ if (store_tuple_elements(self, args, len) < 0) goto finally; if (PyDict_GetItem(self->memo, py_tuple_id)) { /* pop the len elements */ for (i = 0; i < len; ++i) if (self->write_func(self, &pop, 1) < 0) goto finally; /* fetch from memo */ if (get(self, py_tuple_id) < 0) goto finally; res = 0; goto finally; } /* Not recursive. */ if (self->write_func(self, len2opcode + len, 1) < 0) goto finally; goto memoize; } /* proto < 2 and len > 0, or proto >= 2 and len > 3. * Generate MARK elt1 elt2 ... TUPLE */ if (self->write_func(self, &MARKv, 1) < 0) goto finally; if (store_tuple_elements(self, args, len) < 0) goto finally; if (PyDict_GetItem(self->memo, py_tuple_id)) { /* pop the stack stuff we pushed */ if (self->bin) { if (self->write_func(self, &pop_mark, 1) < 0) goto finally; } else { /* Note that we pop one more than len, to remove * the MARK too. */ for (i = 0; i <= len; i++) if (self->write_func(self, &pop, 1) < 0) goto finally; } /* fetch from memo */ if (get(self, py_tuple_id) >= 0) res = 0; goto finally; } /* Not recursive. */ if (self->write_func(self, &tuple, 1) < 0) goto finally; memoize: if (put(self, args) >= 0) res = 0; finally: Py_XDECREF(py_tuple_id); return res; } /* iter is an iterator giving items, and we batch up chunks of * MARK item item ... item APPENDS * opcode sequences. Calling code should have arranged to first create an * empty list, or list-like object, for the APPENDS to operate on. * Returns 0 on success, <0 on error. */ static int batch_list(Picklerobject *self, PyObject *iter) { PyObject *obj; PyObject *slice[BATCHSIZE]; int i, n; static char append = APPEND; static char appends = APPENDS; assert(iter != NULL); if (self->proto == 0) { /* APPENDS isn't available; do one at a time. */ for (;;) { obj = PyIter_Next(iter); if (obj == NULL) { if (PyErr_Occurred()) return -1; break; } i = save(self, obj, 0); Py_DECREF(obj); if (i < 0) return -1; if (self->write_func(self, &append, 1) < 0) return -1; } return 0; } /* proto > 0: write in batches of BATCHSIZE. */ do { /* Get next group of (no more than) BATCHSIZE elements. */ for (n = 0; n < BATCHSIZE; ++n) { obj = PyIter_Next(iter); if (obj == NULL) { if (PyErr_Occurred()) goto BatchFailed; break; } slice[n] = obj; } if (n > 1) { /* Pump out MARK, slice[0:n], APPENDS. */ if (self->write_func(self, &MARKv, 1) < 0) goto BatchFailed; for (i = 0; i < n; ++i) { if (save(self, slice[i], 0) < 0) goto BatchFailed; } if (self->write_func(self, &appends, 1) < 0) goto BatchFailed; } else if (n == 1) { if (save(self, slice[0], 0) < 0) goto BatchFailed; if (self->write_func(self, &append, 1) < 0) goto BatchFailed; } for (i = 0; i < n; ++i) { Py_DECREF(slice[i]); } } while (n == BATCHSIZE); return 0; BatchFailed: while (--n >= 0) { Py_DECREF(slice[n]); } return -1; } static int save_list(Picklerobject *self, PyObject *args) { int res = -1; char s[3]; int len; PyObject *iter; if (self->fast && !fast_save_enter(self, args)) goto finally; /* Create an empty list. */ if (self->bin) { s[0] = EMPTY_LIST; len = 1; } else { s[0] = MARK; s[1] = LIST; len = 2; } if (self->write_func(self, s, len) < 0) goto finally; /* Get list length, and bow out early if empty. */ if ((len = PyList_Size(args)) < 0) goto finally; /* Memoize. */ if (len == 0) { if (put(self, args) >= 0) res = 0; goto finally; } if (put2(self, args) < 0) goto finally; /* Materialize the list elements. */ iter = PyObject_GetIter(args); if (iter == NULL) goto finally; res = batch_list(self, iter); Py_DECREF(iter); finally: if (self->fast && !fast_save_leave(self, args)) res = -1; return res; } /* iter is an iterator giving (key, value) pairs, and we batch up chunks of * MARK key value ... key value SETITEMS * opcode sequences. Calling code should have arranged to first create an * empty dict, or dict-like object, for the SETITEMS to operate on. * Returns 0 on success, <0 on error. * * This is very much like batch_list(). The difference between saving * elements directly, and picking apart two-tuples, is so long-winded at * the C level, though, that attempts to combine these routines were too * ugly to bear. */ static int batch_dict(Picklerobject *self, PyObject *iter) { PyObject *p; PyObject *slice[BATCHSIZE]; int i, n; static char setitem = SETITEM; static char setitems = SETITEMS; assert(iter != NULL); if (self->proto == 0) { /* SETITEMS isn't available; do one at a time. */ for (;;) { p = PyIter_Next(iter); if (p == NULL) { if (PyErr_Occurred()) return -1; break; } if (!PyTuple_Check(p) || PyTuple_Size(p) != 2) { PyErr_SetString(PyExc_TypeError, "dict items " "iterator must return 2-tuples"); return -1; } i = save(self, PyTuple_GET_ITEM(p, 0), 0); if (i >= 0) i = save(self, PyTuple_GET_ITEM(p, 1), 0); Py_DECREF(p); if (i < 0) return -1; if (self->write_func(self, &setitem, 1) < 0) return -1; } return 0; } /* proto > 0: write in batches of BATCHSIZE. */ do { /* Get next group of (no more than) BATCHSIZE elements. */ for (n = 0; n < BATCHSIZE; ++n) { p = PyIter_Next(iter); if (p == NULL) { if (PyErr_Occurred()) goto BatchFailed; break; } if (!PyTuple_Check(p) || PyTuple_Size(p) != 2) { PyErr_SetString(PyExc_TypeError, "dict items " "iterator must return 2-tuples"); goto BatchFailed; } slice[n] = p; } if (n > 1) { /* Pump out MARK, slice[0:n], SETITEMS. */ if (self->write_func(self, &MARKv, 1) < 0) goto BatchFailed; for (i = 0; i < n; ++i) { p = slice[i]; if (save(self, PyTuple_GET_ITEM(p, 0), 0) < 0) goto BatchFailed; if (save(self, PyTuple_GET_ITEM(p, 1), 0) < 0) goto BatchFailed; } if (self->write_func(self, &setitems, 1) < 0) goto BatchFailed; } else if (n == 1) { p = slice[0]; if (save(self, PyTuple_GET_ITEM(p, 0), 0) < 0) goto BatchFailed; if (save(self, PyTuple_GET_ITEM(p, 1), 0) < 0) goto BatchFailed; if (self->write_func(self, &setitem, 1) < 0) goto BatchFailed; } for (i = 0; i < n; ++i) { Py_DECREF(slice[i]); } } while (n == BATCHSIZE); return 0; BatchFailed: while (--n >= 0) { Py_DECREF(slice[n]); } return -1; } static int save_dict(Picklerobject *self, PyObject *args) { int res = -1; char s[3]; int len; PyObject *iter; if (self->fast && !fast_save_enter(self, args)) goto finally; /* Create an empty dict. */ if (self->bin) { s[0] = EMPTY_DICT; len = 1; } else { s[0] = MARK; s[1] = DICT; len = 2; } if (self->write_func(self, s, len) < 0) goto finally; /* Get dict size, and bow out early if empty. */ if ((len = PyDict_Size(args)) < 0) goto finally; if (len == 0) { if (put(self, args) >= 0) res = 0; goto finally; } if (put2(self, args) < 0) goto finally; /* Materialize the dict items. */ iter = PyObject_CallMethod(args, "iteritems", "()"); if (iter == NULL) goto finally; res = batch_dict(self, iter); Py_DECREF(iter); finally: if (self->fast && !fast_save_leave(self, args)) res = -1; return res; } static int save_inst(Picklerobject *self, PyObject *args) { PyObject *class = 0, *module = 0, *name = 0, *state = 0, *getinitargs_func = 0, *getstate_func = 0, *class_args = 0; char *module_str, *name_str; int module_size, name_size, res = -1; static char inst = INST, obj = OBJ, build = BUILD; if (self->fast && !fast_save_enter(self, args)) goto finally; if (self->write_func(self, &MARKv, 1) < 0) goto finally; if (!( class = PyObject_GetAttr(args, __class___str))) goto finally; if (self->bin) { if (save(self, class, 0) < 0) goto finally; } if ((getinitargs_func = PyObject_GetAttr(args, __getinitargs___str))) { PyObject *element = 0; int i, len; if (!( class_args = PyObject_Call(getinitargs_func, empty_tuple, NULL))) goto finally; if ((len = PyObject_Size(class_args)) < 0) goto finally; for (i = 0; i < len; i++) { if (!( element = PySequence_GetItem(class_args, i))) goto finally; if (save(self, element, 0) < 0) { Py_DECREF(element); goto finally; } Py_DECREF(element); } } else { if (PyErr_ExceptionMatches(PyExc_AttributeError)) PyErr_Clear(); else goto finally; } if (!self->bin) { if (!( name = ((PyClassObject *)class)->cl_name )) { PyErr_SetString(PicklingError, "class has no name"); goto finally; } if (!( module = whichmodule(class, name))) goto finally; if ((module_size = PyString_Size(module)) < 0 || (name_size = PyString_Size(name)) < 0) goto finally; module_str = PyString_AS_STRING((PyStringObject *)module); name_str = PyString_AS_STRING((PyStringObject *)name); if (self->write_func(self, &inst, 1) < 0) goto finally; if (self->write_func(self, module_str, module_size) < 0) goto finally; if (self->write_func(self, "\n", 1) < 0) goto finally; if (self->write_func(self, name_str, name_size) < 0) goto finally; if (self->write_func(self, "\n", 1) < 0) goto finally; } else if (self->write_func(self, &obj, 1) < 0) { goto finally; } if ((getstate_func = PyObject_GetAttr(args, __getstate___str))) { state = PyObject_Call(getstate_func, empty_tuple, NULL); if (!state) goto finally; } else { if (PyErr_ExceptionMatches(PyExc_AttributeError)) PyErr_Clear(); else goto finally; if (!( state = PyObject_GetAttr(args, __dict___str))) { if (PyErr_ExceptionMatches(PyExc_AttributeError)) PyErr_Clear(); else goto finally; res = 0; goto finally; } } if (!PyDict_Check(state)) { if (put2(self, args) < 0) goto finally; } else { if (put(self, args) < 0) goto finally; } if (save(self, state, 0) < 0) goto finally; if (self->write_func(self, &build, 1) < 0) goto finally; res = 0; finally: if (self->fast && !fast_save_leave(self, args)) res = -1; Py_XDECREF(module); Py_XDECREF(class); Py_XDECREF(state); Py_XDECREF(getinitargs_func); Py_XDECREF(getstate_func); Py_XDECREF(class_args); return res; } static int save_global(Picklerobject *self, PyObject *args, PyObject *name) { PyObject *global_name = 0, *module = 0, *mod = 0, *klass = 0; char *name_str, *module_str; int module_size, name_size, res = -1; static char global = GLOBAL; if (name) { global_name = name; Py_INCREF(global_name); } else { if (!( global_name = PyObject_GetAttr(args, __name___str))) goto finally; } if (!( module = whichmodule(args, global_name))) goto finally; if ((module_size = PyString_Size(module)) < 0 || (name_size = PyString_Size(global_name)) < 0) goto finally; module_str = PyString_AS_STRING((PyStringObject *)module); name_str = PyString_AS_STRING((PyStringObject *)global_name); /* XXX This can be doing a relative import. Clearly it shouldn't, but I don't know how to stop it. :-( */ mod = PyImport_ImportModule(module_str); if (mod == NULL) { cPickle_ErrFormat(PicklingError, "Can't pickle %s: import of module %s " "failed", "OS", args, module); goto finally; } klass = PyObject_GetAttrString(mod, name_str); if (klass == NULL) { cPickle_ErrFormat(PicklingError, "Can't pickle %s: attribute lookup %s.%s " "failed", "OSS", args, module, global_name); goto finally; } if (klass != args) { Py_DECREF(klass); cPickle_ErrFormat(PicklingError, "Can't pickle %s: it's not the same object " "as %s.%s", "OSS", args, module, global_name); goto finally; } Py_DECREF(klass); if (self->proto >= 2) { /* See whether this is in the extension registry, and if * so generate an EXT opcode. */ PyObject *py_code; /* extension code as Python object */ long code; /* extension code as C value */ char c_str[5]; int n; PyTuple_SET_ITEM(two_tuple, 0, module); PyTuple_SET_ITEM(two_tuple, 1, global_name); py_code = PyDict_GetItem(extension_registry, two_tuple); if (py_code == NULL) goto gen_global; /* not registered */ /* Verify py_code has the right type and value. */ if (!PyInt_Check(py_code)) { cPickle_ErrFormat(PicklingError, "Can't pickle %s: " "extension code %s isn't an integer", "OO", args, py_code); goto finally; } code = PyInt_AS_LONG(py_code); if (code <= 0 || code > 0x7fffffffL) { cPickle_ErrFormat(PicklingError, "Can't pickle %s: " "extension code %ld is out of range", "Ol", args, code); goto finally; } /* Generate an EXT opcode. */ if (code <= 0xff) { c_str[0] = EXT1; c_str[1] = (char)code; n = 2; } else if (code <= 0xffff) { c_str[0] = EXT2; c_str[1] = (char)(code & 0xff); c_str[2] = (char)((code >> 8) & 0xff); n = 3; } else { c_str[0] = EXT4; c_str[1] = (char)(code & 0xff); c_str[2] = (char)((code >> 8) & 0xff); c_str[3] = (char)((code >> 16) & 0xff); c_str[4] = (char)((code >> 24) & 0xff); n = 5; } if (self->write_func(self, c_str, n) >= 0) res = 0; goto finally; /* and don't memoize */ } gen_global: if (self->write_func(self, &global, 1) < 0) goto finally; if (self->write_func(self, module_str, module_size) < 0) goto finally; if (self->write_func(self, "\n", 1) < 0) goto finally; if (self->write_func(self, name_str, name_size) < 0) goto finally; if (self->write_func(self, "\n", 1) < 0) goto finally; if (put(self, args) < 0) goto finally; res = 0; finally: Py_XDECREF(module); Py_XDECREF(global_name); Py_XDECREF(mod); return res; } static int save_pers(Picklerobject *self, PyObject *args, PyObject *f) { PyObject *pid = 0; int size, res = -1; static char persid = PERSID, binpersid = BINPERSID; Py_INCREF(args); ARG_TUP(self, args); if (self->arg) { pid = PyObject_Call(f, self->arg, NULL); FREE_ARG_TUP(self); } if (! pid) return -1; if (pid != Py_None) { if (!self->bin) { if (!PyString_Check(pid)) { PyErr_SetString(PicklingError, "persistent id must be string"); goto finally; } if (self->write_func(self, &persid, 1) < 0) goto finally; if ((size = PyString_Size(pid)) < 0) goto finally; if (self->write_func(self, PyString_AS_STRING( (PyStringObject *)pid), size) < 0) goto finally; if (self->write_func(self, "\n", 1) < 0) goto finally; res = 1; goto finally; } else if (save(self, pid, 1) >= 0) { if (self->write_func(self, &binpersid, 1) < 0) res = -1; else res = 1; } goto finally; } res = 0; finally: Py_XDECREF(pid); return res; } /* We're saving ob, and args is the 2-thru-5 tuple returned by the * appropriate __reduce__ method for ob. */ static int save_reduce(Picklerobject *self, PyObject *args, PyObject *ob) { PyObject *callable; PyObject *argtup; PyObject *state = NULL; PyObject *listitems = NULL; PyObject *dictitems = NULL; int use_newobj = self->proto >= 2; static char reduce = REDUCE; static char build = BUILD; static char newobj = NEWOBJ; if (! PyArg_UnpackTuple(args, "save_reduce", 2, 5, &callable, &argtup, &state, &listitems, &dictitems)) return -1; if (state == Py_None) state = NULL; if (listitems == Py_None) listitems = NULL; if (dictitems == Py_None) dictitems = NULL; /* Protocol 2 special case: if callable's name is __newobj__, use * NEWOBJ. This consumes a lot of code. */ if (use_newobj) { PyObject *temp = PyObject_GetAttr(callable, __name___str); if (temp == NULL) { if (PyErr_ExceptionMatches(PyExc_AttributeError)) PyErr_Clear(); else return -1; use_newobj = 0; } else { use_newobj = PyString_Check(temp) && strcmp(PyString_AS_STRING(temp), "__newobj__") == 0; Py_DECREF(temp); } } if (use_newobj) { PyObject *cls; PyObject *newargtup; int n, i; /* Sanity checks. */ n = PyTuple_Size(argtup); if (n < 1) { PyErr_SetString(PicklingError, "__newobj__ arglist " "is empty"); return -1; } cls = PyTuple_GET_ITEM(argtup, 0); if (! PyObject_HasAttrString(cls, "__new__")) { PyErr_SetString(PicklingError, "args[0] from " "__newobj__ args has no __new__"); return -1; } /* XXX How could ob be NULL? */ if (ob != NULL) { PyObject *ob_dot_class; ob_dot_class = PyObject_GetAttr(ob, __class___str); if (ob_dot_class == NULL) { if (PyErr_ExceptionMatches( PyExc_AttributeError)) PyErr_Clear(); else return -1; } i = ob_dot_class != cls; /* true iff a problem */ Py_XDECREF(ob_dot_class); if (i) { PyErr_SetString(PicklingError, "args[0] from " "__newobj__ args has the wrong class"); return -1; } } /* Save the class and its __new__ arguments. */ if (save(self, cls, 0) < 0) return -1; newargtup = PyTuple_New(n-1); /* argtup[1:] */ if (newargtup == NULL) return -1; for (i = 1; i < n; ++i) { PyObject *temp = PyTuple_GET_ITEM(argtup, i); Py_INCREF(temp); PyTuple_SET_ITEM(newargtup, i-1, temp); } i = save(self, newargtup, 0) < 0; Py_DECREF(newargtup); if (i < 0) return -1; /* Add NEWOBJ opcode. */ if (self->write_func(self, &newobj, 1) < 0) return -1; } else { /* Not using NEWOBJ. */ if (save(self, callable, 0) < 0 || save(self, argtup, 0) < 0 || self->write_func(self, &reduce, 1) < 0) return -1; } /* Memoize. */ /* XXX How can ob be NULL? */ if (ob != NULL) { if (state && !PyDict_Check(state)) { if (put2(self, ob) < 0) return -1; } else if (put(self, ob) < 0) return -1; } if (listitems && batch_list(self, listitems) < 0) return -1; if (dictitems && batch_dict(self, dictitems) < 0) return -1; if (state) { if (save(self, state, 0) < 0 || self->write_func(self, &build, 1) < 0) return -1; } return 0; } static int save(Picklerobject *self, PyObject *args, int pers_save) { PyTypeObject *type; PyObject *py_ob_id = 0, *__reduce__ = 0, *t = 0; PyObject *arg_tup; int res = -1; int tmp, size; if (self->nesting++ > Py_GetRecursionLimit()){ PyErr_SetString(PyExc_RuntimeError, "maximum recursion depth exceeded"); goto finally; } if (!pers_save && self->pers_func) { if ((tmp = save_pers(self, args, self->pers_func)) != 0) { res = tmp; goto finally; } } if (args == Py_None) { res = save_none(self, args); goto finally; } type = args->ob_type; switch (type->tp_name[0]) { case 'b': if (args == Py_False || args == Py_True) { res = save_bool(self, args); goto finally; } break; case 'i': if (type == &PyInt_Type) { res = save_int(self, args); goto finally; } break; case 'l': if (type == &PyLong_Type) { res = save_long(self, args); goto finally; } break; case 'f': if (type == &PyFloat_Type) { res = save_float(self, args); goto finally; } break; case 't': if (type == &PyTuple_Type && PyTuple_Size(args) == 0) { res = save_tuple(self, args); goto finally; } break; case 's': if ((type == &PyString_Type) && (PyString_GET_SIZE(args) < 2)) { res = save_string(self, args, 0); goto finally; } #ifdef Py_USING_UNICODE case 'u': if ((type == &PyUnicode_Type) && (PyString_GET_SIZE(args) < 2)) { res = save_unicode(self, args, 0); goto finally; } #endif } if (args->ob_refcnt > 1) { if (!( py_ob_id = PyLong_FromVoidPtr(args))) goto finally; if (PyDict_GetItem(self->memo, py_ob_id)) { if (get(self, py_ob_id) < 0) goto finally; res = 0; goto finally; } } switch (type->tp_name[0]) { case 's': if (type == &PyString_Type) { res = save_string(self, args, 1); goto finally; } break; #ifdef Py_USING_UNICODE case 'u': if (type == &PyUnicode_Type) { res = save_unicode(self, args, 1); goto finally; } break; #endif case 't': if (type == &PyTuple_Type) { res = save_tuple(self, args); goto finally; } if (type == &PyType_Type) { res = save_global(self, args, NULL); goto finally; } break; case 'l': if (type == &PyList_Type) { res = save_list(self, args); goto finally; } break; case 'd': if (type == &PyDict_Type) { res = save_dict(self, args); goto finally; } break; case 'i': if (type == &PyInstance_Type) { res = save_inst(self, args); goto finally; } break; case 'c': if (type == &PyClass_Type) { res = save_global(self, args, NULL); goto finally; } break; case 'f': if (type == &PyFunction_Type) { res = save_global(self, args, NULL); goto finally; } break; case 'b': if (type == &PyCFunction_Type) { res = save_global(self, args, NULL); goto finally; } } if (!pers_save && self->inst_pers_func) { if ((tmp = save_pers(self, args, self->inst_pers_func)) != 0) { res = tmp; goto finally; } } if (PyType_IsSubtype(type, &PyType_Type)) { res = save_global(self, args, NULL); goto finally; } /* Get a reduction callable, and call it. This may come from * copy_reg.dispatch_table, the object's __reduce_ex__ method, * or the object's __reduce__ method. */ __reduce__ = PyDict_GetItem(dispatch_table, (PyObject *)type); if (__reduce__ != NULL) { Py_INCREF(__reduce__); Py_INCREF(args); ARG_TUP(self, args); if (self->arg) { t = PyObject_Call(__reduce__, self->arg, NULL); FREE_ARG_TUP(self); } } else { /* Check for a __reduce_ex__ method. */ __reduce__ = PyObject_GetAttr(args, __reduce_ex___str); if (__reduce__ != NULL) { t = PyInt_FromLong(self->proto); if (t != NULL) { ARG_TUP(self, t); t = NULL; if (self->arg) { t = PyObject_Call(__reduce__, self->arg, NULL); FREE_ARG_TUP(self); } } } else { if (PyErr_ExceptionMatches(PyExc_AttributeError)) PyErr_Clear(); else goto finally; /* Check for a __reduce__ method. */ __reduce__ = PyObject_GetAttr(args, __reduce___str); if (__reduce__ != NULL) { t = PyObject_Call(__reduce__, empty_tuple, NULL); } else { PyErr_SetObject(UnpickleableError, args); goto finally; } } } if (t == NULL) goto finally; if (PyString_Check(t)) { res = save_global(self, args, t); goto finally; } if (! PyTuple_Check(t)) { cPickle_ErrFormat(PicklingError, "Value returned by " "%s must be string or tuple", "O", __reduce__); goto finally; } size = PyTuple_Size(t); if (size < 2 || size > 5) { cPickle_ErrFormat(PicklingError, "tuple returned by " "%s must contain 2 through 5 elements", "O", __reduce__); goto finally; } arg_tup = PyTuple_GET_ITEM(t, 1); if (!(PyTuple_Check(arg_tup) || arg_tup == Py_None)) { cPickle_ErrFormat(PicklingError, "Second element of " "tuple returned by %s must be a tuple", "O", __reduce__); goto finally; } res = save_reduce(self, t, args); finally: self->nesting--; Py_XDECREF(py_ob_id); Py_XDECREF(__reduce__); Py_XDECREF(t); return res; } static int dump(Picklerobject *self, PyObject *args) { static char stop = STOP; if (self->proto >= 2) { char bytes[2]; bytes[0] = PROTO; assert(self->proto >= 0 && self->proto < 256); bytes[1] = (char)self->proto; if (self->write_func(self, bytes, 2) < 0) return -1; } if (save(self, args, 0) < 0) return -1; if (self->write_func(self, &stop, 1) < 0) return -1; if (self->write_func(self, NULL, 0) < 0) return -1; return 0; } static PyObject * Pickle_clear_memo(Picklerobject *self, PyObject *args) { if (self->memo) PyDict_Clear(self->memo); Py_INCREF(Py_None); return Py_None; } static PyObject * Pickle_getvalue(Picklerobject *self, PyObject *args) { int l, i, rsize, ssize, clear=1, lm; long ik; PyObject *k, *r; char *s, *p, *have_get; Pdata *data; /* Can be called by Python code or C code */ if (args && !PyArg_ParseTuple(args, "|i:getvalue", &clear)) return NULL; /* Check to make sure we are based on a list */ if (! Pdata_Check(self->file)) { PyErr_SetString(PicklingError, "Attempt to getvalue() a non-list-based pickler"); return NULL; } /* flush write buffer */ if (write_other(self, NULL, 0) < 0) return NULL; data=(Pdata*)self->file; l=data->length; /* set up an array to hold get/put status */ lm = PyDict_Size(self->memo); if (lm < 0) return NULL; lm++; have_get = malloc(lm); if (have_get == NULL) return PyErr_NoMemory(); memset(have_get, 0, lm); /* Scan for gets. */ for (rsize = 0, i = l; --i >= 0; ) { k = data->data[i]; if (PyString_Check(k)) rsize += PyString_GET_SIZE(k); else if (PyInt_Check(k)) { /* put */ ik = PyInt_AS_LONG((PyIntObject*)k); if (ik >= lm || ik == 0) { PyErr_SetString(PicklingError, "Invalid get data"); return NULL; } if (have_get[ik]) /* with matching get */ rsize += ik < 256 ? 2 : 5; } else if (! (PyTuple_Check(k) && PyTuple_GET_SIZE(k) == 2 && PyInt_Check((k = PyTuple_GET_ITEM(k, 0)))) ) { PyErr_SetString(PicklingError, "Unexpected data in internal list"); return NULL; } else { /* put */ ik = PyInt_AS_LONG((PyIntObject *)k); if (ik >= lm || ik == 0) { PyErr_SetString(PicklingError, "Invalid get data"); return NULL; } have_get[ik] = 1; rsize += ik < 256 ? 2 : 5; } } /* Now generate the result */ r = PyString_FromStringAndSize(NULL, rsize); if (r == NULL) goto err; s = PyString_AS_STRING((PyStringObject *)r); for (i = 0; i < l; i++) { k = data->data[i]; if (PyString_Check(k)) { ssize = PyString_GET_SIZE(k); if (ssize) { p=PyString_AS_STRING((PyStringObject *)k); while (--ssize >= 0) *s++ = *p++; } } else if (PyTuple_Check(k)) { /* get */ ik = PyInt_AS_LONG((PyIntObject *) PyTuple_GET_ITEM(k, 0)); if (ik < 256) { *s++ = BINGET; *s++ = (int)(ik & 0xff); } else { *s++ = LONG_BINGET; *s++ = (int)(ik & 0xff); *s++ = (int)((ik >> 8) & 0xff); *s++ = (int)((ik >> 16) & 0xff); *s++ = (int)((ik >> 24) & 0xff); } } else { /* put */ ik = PyInt_AS_LONG((PyIntObject*)k); if (have_get[ik]) { /* with matching get */ if (ik < 256) { *s++ = BINPUT; *s++ = (int)(ik & 0xff); } else { *s++ = LONG_BINPUT; *s++ = (int)(ik & 0xff); *s++ = (int)((ik >> 8) & 0xff); *s++ = (int)((ik >> 16) & 0xff); *s++ = (int)((ik >> 24) & 0xff); } } } } if (clear) { PyDict_Clear(self->memo); Pdata_clear(data, 0); } free(have_get); return r; err: free(have_get); return NULL; } static PyObject * Pickler_dump(Picklerobject *self, PyObject *args) { PyObject *ob; int get=0; if (!( PyArg_ParseTuple(args, "O|i:dump", &ob, &get))) return NULL; if (dump(self, ob) < 0) return NULL; if (get) return Pickle_getvalue(self, NULL); /* XXX Why does dump() return self? */ Py_INCREF(self); return (PyObject*)self; } static struct PyMethodDef Pickler_methods[] = { {"dump", (PyCFunction)Pickler_dump, METH_VARARGS, PyDoc_STR("dump(object) -- " "Write an object in pickle format to the object's pickle stream")}, {"clear_memo", (PyCFunction)Pickle_clear_memo, METH_NOARGS, PyDoc_STR("clear_memo() -- Clear the picklers memo")}, {"getvalue", (PyCFunction)Pickle_getvalue, METH_VARARGS, PyDoc_STR("getvalue() -- Finish picking a list-based pickle")}, {NULL, NULL} /* sentinel */ }; static Picklerobject * newPicklerobject(PyObject *file, int proto) { Picklerobject *self; if (proto < 0) proto = HIGHEST_PROTOCOL; if (proto > HIGHEST_PROTOCOL) { PyErr_Format(PyExc_ValueError, "pickle protocol %d asked for; " "the highest available protocol is %d", proto, HIGHEST_PROTOCOL); return NULL; } self = PyObject_GC_New(Picklerobject, &Picklertype); if (self == NULL) return NULL; self->proto = proto; self->bin = proto > 0; self->fp = NULL; self->write = NULL; self->memo = NULL; self->arg = NULL; self->pers_func = NULL; self->inst_pers_func = NULL; self->write_buf = NULL; self->fast = 0; self->nesting = 0; self->fast_container = 0; self->fast_memo = NULL; self->buf_size = 0; self->dispatch_table = NULL; self->file = NULL; if (file) Py_INCREF(file); else { file = Pdata_New(); if (file == NULL) goto err; } self->file = file; if (!( self->memo = PyDict_New())) goto err; if (PyFile_Check(file)) { self->fp = PyFile_AsFile(file); if (self->fp == NULL) { PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto err; } self->write_func = write_file; } else if (PycStringIO_OutputCheck(file)) { self->write_func = write_cStringIO; } else if (file == Py_None) { self->write_func = write_none; } else { self->write_func = write_other; if (! Pdata_Check(file)) { self->write = PyObject_GetAttr(file, write_str); if (!self->write) { PyErr_Clear(); PyErr_SetString(PyExc_TypeError, "argument must have 'write' " "attribute"); goto err; } } self->write_buf = (char *)PyMem_Malloc(WRITE_BUF_SIZE); if (self->write_buf == NULL) { PyErr_NoMemory(); goto err; } } if (PyEval_GetRestricted()) { /* Restricted execution, get private tables */ PyObject *m = PyImport_Import(copy_reg_str); if (m == NULL) goto err; self->dispatch_table = PyObject_GetAttr(m, dispatch_table_str); Py_DECREF(m); if (self->dispatch_table == NULL) goto err; } else { self->dispatch_table = dispatch_table; Py_INCREF(dispatch_table); } PyObject_GC_Track(self); return self; err: Py_DECREF(self); return NULL; } static PyObject * get_Pickler(PyObject *self, PyObject *args) { PyObject *file = NULL; int proto = 0; /* XXX * The documented signature is Pickler(file, proto=0), but this * accepts Pickler() and Pickler(integer) too. The meaning then * is clear as mud, undocumented, and not supported by pickle.py. * I'm told Zope uses this, but I haven't traced into this code * far enough to figure out what it means. */ if (!PyArg_ParseTuple(args, "|i:Pickler", &proto)) { PyErr_Clear(); proto = 0; if (!PyArg_ParseTuple(args, "O|i:Pickler", &file, &proto)) return NULL; } return (PyObject *)newPicklerobject(file, proto); } static void Pickler_dealloc(Picklerobject *self) { PyObject_GC_UnTrack(self); Py_XDECREF(self->write); Py_XDECREF(self->memo); Py_XDECREF(self->fast_memo); Py_XDECREF(self->arg); Py_XDECREF(self->file); Py_XDECREF(self->pers_func); Py_XDECREF(self->inst_pers_func); Py_XDECREF(self->dispatch_table); PyMem_Free(self->write_buf); self->ob_type->tp_free((PyObject *)self); } static int Pickler_traverse(Picklerobject *self, visitproc visit, void *arg) { int err; #define VISIT(SLOT) \ if (SLOT) { \ err = visit((PyObject *)(SLOT), arg); \ if (err) \ return err; \ } VISIT(self->write); VISIT(self->memo); VISIT(self->fast_memo); VISIT(self->arg); VISIT(self->file); VISIT(self->pers_func); VISIT(self->inst_pers_func); VISIT(self->dispatch_table); #undef VISIT return 0; } static int Pickler_clear(Picklerobject *self) { #define CLEAR(SLOT) Py_XDECREF(SLOT); SLOT = NULL; CLEAR(self->write); CLEAR(self->memo); CLEAR(self->fast_memo); CLEAR(self->arg); CLEAR(self->file); CLEAR(self->pers_func); CLEAR(self->inst_pers_func); CLEAR(self->dispatch_table); #undef CLEAR return 0; } static PyObject * Pickler_get_pers_func(Picklerobject *p) { if (p->pers_func == NULL) PyErr_SetString(PyExc_AttributeError, "persistent_id"); else Py_INCREF(p->pers_func); return p->pers_func; } static int Pickler_set_pers_func(Picklerobject *p, PyObject *v) { if (v == NULL) { PyErr_SetString(PyExc_TypeError, "attribute deletion is not supported"); return -1; } Py_XDECREF(p->pers_func); Py_INCREF(v); p->pers_func = v; return 0; } static int Pickler_set_inst_pers_func(Picklerobject *p, PyObject *v) { if (v == NULL) { PyErr_SetString(PyExc_TypeError, "attribute deletion is not supported"); return -1; } Py_XDECREF(p->inst_pers_func); Py_INCREF(v); p->inst_pers_func = v; return 0; } static PyObject * Pickler_get_memo(Picklerobject *p) { if (p->memo == NULL) PyErr_SetString(PyExc_AttributeError, "memo"); else Py_INCREF(p->memo); return p->memo; } static int Pickler_set_memo(Picklerobject *p, PyObject *v) { if (v == NULL) { PyErr_SetString(PyExc_TypeError, "attribute deletion is not supported"); return -1; } if (!PyDict_Check(v)) { PyErr_SetString(PyExc_TypeError, "memo must be a dictionary"); return -1; } Py_XDECREF(p->memo); Py_INCREF(v); p->memo = v; return 0; } static PyObject * Pickler_get_error(Picklerobject *p) { /* why is this an attribute on the Pickler? */ Py_INCREF(PicklingError); return PicklingError; } static PyMemberDef Pickler_members[] = { {"binary", T_INT, offsetof(Picklerobject, bin)}, {"fast", T_INT, offsetof(Picklerobject, fast)}, {NULL} }; static PyGetSetDef Pickler_getsets[] = { {"persistent_id", (getter)Pickler_get_pers_func, (setter)Pickler_set_pers_func}, {"inst_persistent_id", NULL, (setter)Pickler_set_inst_pers_func}, {"memo", (getter)Pickler_get_memo, (setter)Pickler_set_memo}, {"PicklingError", (getter)Pickler_get_error, NULL}, {NULL} }; PyDoc_STRVAR(Picklertype__doc__, "Objects that know how to pickle objects\n"); static PyTypeObject Picklertype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "cPickle.Pickler", /*tp_name*/ sizeof(Picklerobject), /*tp_basicsize*/ 0, (destructor)Pickler_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ PyObject_GenericSetAttr, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, Picklertype__doc__, /* tp_doc */ (traverseproc)Pickler_traverse, /* tp_traverse */ (inquiry)Pickler_clear, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ Pickler_methods, /* tp_methods */ Pickler_members, /* tp_members */ Pickler_getsets, /* tp_getset */ }; static PyObject * find_class(PyObject *py_module_name, PyObject *py_global_name, PyObject *fc) { PyObject *global = 0, *module; if (fc) { if (fc==Py_None) { PyErr_SetString(UnpicklingError, "Global and instance " "pickles are not supported."); return NULL; } return PyObject_CallFunction(fc, "OO", py_module_name, py_global_name); } module = PySys_GetObject("modules"); if (module == NULL) return NULL; module = PyDict_GetItem(module, py_module_name); if (module == NULL) { module = PyImport_Import(py_module_name); if (!module) return NULL; global = PyObject_GetAttr(module, py_global_name); Py_DECREF(module); } else global = PyObject_GetAttr(module, py_global_name); return global; } static int marker(Unpicklerobject *self) { if (self->num_marks < 1) { PyErr_SetString(UnpicklingError, "could not find MARK"); return -1; } return self->marks[--self->num_marks]; } static int load_none(Unpicklerobject *self) { PDATA_APPEND(self->stack, Py_None, -1); return 0; } static int bad_readline(void) { PyErr_SetString(UnpicklingError, "pickle data was truncated"); return -1; } static int load_int(Unpicklerobject *self) { PyObject *py_int = 0; char *endptr, *s; int len, res = -1; long l; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); if (!( s=pystrndup(s,len))) return -1; errno = 0; l = strtol(s, &endptr, 0); if (errno || (*endptr != '\n') || (endptr[1] != '\0')) { /* Hm, maybe we've got something long. Let's try reading it as a Python long object. */ errno = 0; py_int = PyLong_FromString(s, NULL, 0); if (py_int == NULL) { PyErr_SetString(PyExc_ValueError, "could not convert string to int"); goto finally; } } else { if (len == 3 && (l == 0 || l == 1)) { if (!( py_int = PyBool_FromLong(l))) goto finally; } else { if (!( py_int = PyInt_FromLong(l))) goto finally; } } free(s); PDATA_PUSH(self->stack, py_int, -1); return 0; finally: free(s); return res; } static int load_bool(Unpicklerobject *self, PyObject *boolean) { assert(boolean == Py_True || boolean == Py_False); PDATA_APPEND(self->stack, boolean, -1); return 0; } /* s contains x bytes of a little-endian integer. Return its value as a * C int. Obscure: when x is 1 or 2, this is an unsigned little-endian * int, but when x is 4 it's a signed one. This is an historical source * of x-platform bugs. */ static long calc_binint(char *s, int x) { unsigned char c; int i; long l; for (i = 0, l = 0L; i < x; i++) { c = (unsigned char)s[i]; l |= (long)c << (i * 8); } #if SIZEOF_LONG > 4 /* Unlike BININT1 and BININT2, BININT (more accurately BININT4) * is signed, so on a box with longs bigger than 4 bytes we need * to extend a BININT's sign bit to the full width. */ if (x == 4 && l & (1L << 31)) l |= (~0L) << 32; #endif return l; } static int load_binintx(Unpicklerobject *self, char *s, int x) { PyObject *py_int = 0; long l; l = calc_binint(s, x); if (!( py_int = PyInt_FromLong(l))) return -1; PDATA_PUSH(self->stack, py_int, -1); return 0; } static int load_binint(Unpicklerobject *self) { char *s; if (self->read_func(self, &s, 4) < 0) return -1; return load_binintx(self, s, 4); } static int load_binint1(Unpicklerobject *self) { char *s; if (self->read_func(self, &s, 1) < 0) return -1; return load_binintx(self, s, 1); } static int load_binint2(Unpicklerobject *self) { char *s; if (self->read_func(self, &s, 2) < 0) return -1; return load_binintx(self, s, 2); } static int load_long(Unpicklerobject *self) { PyObject *l = 0; char *end, *s; int len, res = -1; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); if (!( s=pystrndup(s,len))) return -1; if (!( l = PyLong_FromString(s, &end, 0))) goto finally; free(s); PDATA_PUSH(self->stack, l, -1); return 0; finally: free(s); return res; } /* 'size' bytes contain the # of bytes of little-endian 256's-complement * data following. */ static int load_counted_long(Unpicklerobject *self, int size) { int i; char *nbytes; unsigned char *pdata; PyObject *along; assert(size == 1 || size == 4); i = self->read_func(self, &nbytes, size); if (i < 0) return -1; size = calc_binint(nbytes, size); if (size < 0) { /* Corrupt or hostile pickle -- we never write one like * this. */ PyErr_SetString(UnpicklingError, "LONG pickle has negative " "byte count"); return -1; } if (size == 0) along = PyLong_FromLong(0L); else { /* Read the raw little-endian bytes & convert. */ i = self->read_func(self, (char **)&pdata, size); if (i < 0) return -1; along = _PyLong_FromByteArray(pdata, (size_t)size, 1 /* little endian */, 1 /* signed */); } if (along == NULL) return -1; PDATA_PUSH(self->stack, along, -1); return 0; } static int load_float(Unpicklerobject *self) { PyObject *py_float = 0; char *endptr, *s; int len, res = -1; double d; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); if (!( s=pystrndup(s,len))) return -1; errno = 0; d = strtod(s, &endptr); if (errno || (endptr[0] != '\n') || (endptr[1] != '\0')) { PyErr_SetString(PyExc_ValueError, "could not convert string to float"); goto finally; } if (!( py_float = PyFloat_FromDouble(d))) goto finally; free(s); PDATA_PUSH(self->stack, py_float, -1); return 0; finally: free(s); return res; } static int load_binfloat(Unpicklerobject *self) { PyObject *py_float; double x; char *p; if (self->read_func(self, &p, 8) < 0) return -1; x = _PyFloat_Unpack8((unsigned char *)p, 0); if (x == -1.0 && PyErr_Occurred()) return -1; py_float = PyFloat_FromDouble(x); if (py_float == NULL) return -1; PDATA_PUSH(self->stack, py_float, -1); return 0; } static int load_string(Unpicklerobject *self) { PyObject *str = 0; int len, res = -1; char *s, *p; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); if (!( s=pystrndup(s,len))) return -1; /* Strip outermost quotes */ while (s[len-1] <= ' ') len--; if(s[0]=='"' && s[len-1]=='"'){ s[len-1] = '\0'; p = s + 1 ; len -= 2; } else if(s[0]=='\'' && s[len-1]=='\''){ s[len-1] = '\0'; p = s + 1 ; len -= 2; } else goto insecure; /********************************************/ str = PyString_DecodeEscape(p, len, NULL, 0, NULL); if (str) { PDATA_PUSH(self->stack, str, -1); res = 0; } free(s); return res; insecure: free(s); PyErr_SetString(PyExc_ValueError,"insecure string pickle"); return -1; } static int load_binstring(Unpicklerobject *self) { PyObject *py_string = 0; long l; char *s; if (self->read_func(self, &s, 4) < 0) return -1; l = calc_binint(s, 4); if (l < 0) { /* Corrupt or hostile pickle -- we never write one like * this. */ PyErr_SetString(UnpicklingError, "BINSTRING pickle has negative byte count"); return -1; } if (self->read_func(self, &s, l) < 0) return -1; if (!( py_string = PyString_FromStringAndSize(s, l))) return -1; PDATA_PUSH(self->stack, py_string, -1); return 0; } static int load_short_binstring(Unpicklerobject *self) { PyObject *py_string = 0; unsigned char l; char *s; if (self->read_func(self, &s, 1) < 0) return -1; l = (unsigned char)s[0]; if (self->read_func(self, &s, l) < 0) return -1; if (!( py_string = PyString_FromStringAndSize(s, l))) return -1; PDATA_PUSH(self->stack, py_string, -1); return 0; } #ifdef Py_USING_UNICODE static int load_unicode(Unpicklerobject *self) { PyObject *str = 0; int len, res = -1; char *s; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 1) return bad_readline(); if (!( str = PyUnicode_DecodeRawUnicodeEscape(s, len - 1, NULL))) goto finally; PDATA_PUSH(self->stack, str, -1); return 0; finally: return res; } #endif #ifdef Py_USING_UNICODE static int load_binunicode(Unpicklerobject *self) { PyObject *unicode; long l; char *s; if (self->read_func(self, &s, 4) < 0) return -1; l = calc_binint(s, 4); if (l < 0) { /* Corrupt or hostile pickle -- we never write one like * this. */ PyErr_SetString(UnpicklingError, "BINUNICODE pickle has negative byte count"); return -1; } if (self->read_func(self, &s, l) < 0) return -1; if (!( unicode = PyUnicode_DecodeUTF8(s, l, NULL))) return -1; PDATA_PUSH(self->stack, unicode, -1); return 0; } #endif static int load_tuple(Unpicklerobject *self) { PyObject *tup; int i; if ((i = marker(self)) < 0) return -1; if (!( tup=Pdata_popTuple(self->stack, i))) return -1; PDATA_PUSH(self->stack, tup, -1); return 0; } static int load_counted_tuple(Unpicklerobject *self, int len) { PyObject *tup = PyTuple_New(len); if (tup == NULL) return -1; while (--len >= 0) { PyObject *element; PDATA_POP(self->stack, element); if (element == NULL) return -1; PyTuple_SET_ITEM(tup, len, element); } PDATA_PUSH(self->stack, tup, -1); return 0; } static int load_empty_list(Unpicklerobject *self) { PyObject *list; if (!( list=PyList_New(0))) return -1; PDATA_PUSH(self->stack, list, -1); return 0; } static int load_empty_dict(Unpicklerobject *self) { PyObject *dict; if (!( dict=PyDict_New())) return -1; PDATA_PUSH(self->stack, dict, -1); return 0; } static int load_list(Unpicklerobject *self) { PyObject *list = 0; int i; if ((i = marker(self)) < 0) return -1; if (!( list=Pdata_popList(self->stack, i))) return -1; PDATA_PUSH(self->stack, list, -1); return 0; } static int load_dict(Unpicklerobject *self) { PyObject *dict, *key, *value; int i, j, k; if ((i = marker(self)) < 0) return -1; j=self->stack->length; if (!( dict = PyDict_New())) return -1; for (k = i+1; k < j; k += 2) { key =self->stack->data[k-1]; value=self->stack->data[k ]; if (PyDict_SetItem(dict, key, value) < 0) { Py_DECREF(dict); return -1; } } Pdata_clear(self->stack, i); PDATA_PUSH(self->stack, dict, -1); return 0; } static PyObject * Instance_New(PyObject *cls, PyObject *args) { PyObject *r = 0; if (PyClass_Check(cls)) { int l; if ((l=PyObject_Size(args)) < 0) goto err; if (!( l )) { PyObject *__getinitargs__; __getinitargs__ = PyObject_GetAttr(cls, __getinitargs___str); if (!__getinitargs__) { /* We have a class with no __getinitargs__, so bypass usual construction */ PyObject *inst; PyErr_Clear(); if (!( inst=PyInstance_NewRaw(cls, NULL))) goto err; return inst; } Py_DECREF(__getinitargs__); } if ((r=PyInstance_New(cls, args, NULL))) return r; else goto err; } if (args==Py_None) { /* Special case, call cls.__basicnew__() */ PyObject *basicnew; basicnew = PyObject_GetAttr(cls, __basicnew___str); if (!basicnew) return NULL; r=PyObject_CallObject(basicnew, NULL); Py_DECREF(basicnew); if (r) return r; } if ((r=PyObject_CallObject(cls, args))) return r; err: { PyObject *tp, *v, *tb; PyErr_Fetch(&tp, &v, &tb); if ((r=Py_BuildValue("OOO",v,cls,args))) { Py_XDECREF(v); v=r; } PyErr_Restore(tp,v,tb); } return NULL; } static int load_obj(Unpicklerobject *self) { PyObject *class, *tup, *obj=0; int i; if ((i = marker(self)) < 0) return -1; if (!( tup=Pdata_popTuple(self->stack, i+1))) return -1; PDATA_POP(self->stack, class); if (class) { obj = Instance_New(class, tup); Py_DECREF(class); } Py_DECREF(tup); if (! obj) return -1; PDATA_PUSH(self->stack, obj, -1); return 0; } static int load_inst(Unpicklerobject *self) { PyObject *tup, *class=0, *obj=0, *module_name, *class_name; int i, len; char *s; if ((i = marker(self)) < 0) return -1; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); module_name = PyString_FromStringAndSize(s, len - 1); if (!module_name) return -1; if ((len = self->readline_func(self, &s)) >= 0) { if (len < 2) return bad_readline(); if ((class_name = PyString_FromStringAndSize(s, len - 1))) { class = find_class(module_name, class_name, self->find_class); Py_DECREF(class_name); } } Py_DECREF(module_name); if (! class) return -1; if ((tup=Pdata_popTuple(self->stack, i))) { obj = Instance_New(class, tup); Py_DECREF(tup); } Py_DECREF(class); if (! obj) return -1; PDATA_PUSH(self->stack, obj, -1); return 0; } static int load_newobj(Unpicklerobject *self) { PyObject *args = NULL; PyObject *clsraw = NULL; PyTypeObject *cls; /* clsraw cast to its true type */ PyObject *obj; /* Stack is ... cls argtuple, and we want to call * cls.__new__(cls, *argtuple). */ PDATA_POP(self->stack, args); if (args == NULL) goto Fail; if (! PyTuple_Check(args)) { PyErr_SetString(UnpicklingError, "NEWOBJ expected an arg " "tuple."); goto Fail; } PDATA_POP(self->stack, clsraw); cls = (PyTypeObject *)clsraw; if (cls == NULL) goto Fail; if (! PyType_Check(cls)) { PyErr_SetString(UnpicklingError, "NEWOBJ class argument " "isn't a type object"); goto Fail; } if (cls->tp_new == NULL) { PyErr_SetString(UnpicklingError, "NEWOBJ class argument " "has NULL tp_new"); goto Fail; } /* Call __new__. */ obj = cls->tp_new(cls, args, NULL); if (obj == NULL) goto Fail; Py_DECREF(args); Py_DECREF(clsraw); PDATA_PUSH(self->stack, obj, -1); return 0; Fail: Py_XDECREF(args); Py_XDECREF(clsraw); return -1; } static int load_global(Unpicklerobject *self) { PyObject *class = 0, *module_name = 0, *class_name = 0; int len; char *s; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); module_name = PyString_FromStringAndSize(s, len - 1); if (!module_name) return -1; if ((len = self->readline_func(self, &s)) >= 0) { if (len < 2) { Py_DECREF(module_name); return bad_readline(); } if ((class_name = PyString_FromStringAndSize(s, len - 1))) { class = find_class(module_name, class_name, self->find_class); Py_DECREF(class_name); } } Py_DECREF(module_name); if (! class) return -1; PDATA_PUSH(self->stack, class, -1); return 0; } static int load_persid(Unpicklerobject *self) { PyObject *pid = 0; int len; char *s; if (self->pers_func) { if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); pid = PyString_FromStringAndSize(s, len - 1); if (!pid) return -1; if (PyList_Check(self->pers_func)) { if (PyList_Append(self->pers_func, pid) < 0) { Py_DECREF(pid); return -1; } } else { ARG_TUP(self, pid); if (self->arg) { pid = PyObject_Call(self->pers_func, self->arg, NULL); FREE_ARG_TUP(self); } } if (! pid) return -1; PDATA_PUSH(self->stack, pid, -1); return 0; } else { PyErr_SetString(UnpicklingError, "A load persistent id instruction was encountered,\n" "but no persistent_load function was specified."); return -1; } } static int load_binpersid(Unpicklerobject *self) { PyObject *pid = 0; if (self->pers_func) { PDATA_POP(self->stack, pid); if (! pid) return -1; if (PyList_Check(self->pers_func)) { if (PyList_Append(self->pers_func, pid) < 0) { Py_DECREF(pid); return -1; } } else { ARG_TUP(self, pid); if (self->arg) { pid = PyObject_Call(self->pers_func, self->arg, NULL); FREE_ARG_TUP(self); } if (! pid) return -1; } PDATA_PUSH(self->stack, pid, -1); return 0; } else { PyErr_SetString(UnpicklingError, "A load persistent id instruction was encountered,\n" "but no persistent_load function was specified."); return -1; } } static int load_pop(Unpicklerobject *self) { int len; if (!( (len=self->stack->length) > 0 )) return stackUnderflow(); /* Note that we split the (pickle.py) stack into two stacks, an object stack and a mark stack. We have to be clever and pop the right one. We do this by looking at the top of the mark stack. */ if ((self->num_marks > 0) && (self->marks[self->num_marks - 1] == len)) self->num_marks--; else { len--; Py_DECREF(self->stack->data[len]); self->stack->length=len; } return 0; } static int load_pop_mark(Unpicklerobject *self) { int i; if ((i = marker(self)) < 0) return -1; Pdata_clear(self->stack, i); return 0; } static int load_dup(Unpicklerobject *self) { PyObject *last; int len; if ((len = self->stack->length) <= 0) return stackUnderflow(); last=self->stack->data[len-1]; Py_INCREF(last); PDATA_PUSH(self->stack, last, -1); return 0; } static int load_get(Unpicklerobject *self) { PyObject *py_str = 0, *value = 0; int len; char *s; int rc; if ((len = self->readline_func(self, &s)) < 0) return -1; if (len < 2) return bad_readline(); if (!( py_str = PyString_FromStringAndSize(s, len - 1))) return -1; value = PyDict_GetItem(self->memo, py_str); if (! value) { PyErr_SetObject(BadPickleGet, py_str); rc = -1; } else { PDATA_APPEND(self->stack, value, -1); rc = 0; } Py_DECREF(py_str); return rc; } static int load_binget(Unpicklerobject *self) { PyObject *py_key = 0, *value = 0; unsigned char key; char *s; int rc; if (self->read_func(self, &s, 1) < 0) return -1; key = (unsigned char)s[0]; if (!( py_key = PyInt_FromLong((long)key))) return -1; value = PyDict_GetItem(self->memo, py_key); if (! value) { PyErr_SetObject(BadPickleGet, py_key); rc = -1; } else { PDATA_APPEND(self->stack, value, -1); rc = 0; } Py_DECREF(py_key); return rc; } static int load_long_binget(Unpicklerobject *self) { PyObject *py_key = 0, *value = 0; unsigned char c; char *s; long key; int rc; if (self->read_func(self, &s, 4) < 0) return -1; c = (unsigned char)s[0]; key = (long)c; c = (unsigned char)s[1]; key |= (long)c << 8; c = (unsigned char)s[2]; key |= (long)c << 16; c = (unsigned char)s[3]; key |= (long)c << 24; if (!( py_key = PyInt_FromLong((long)key))) return -1; value = PyDict_GetItem(self->memo, py_key); if (! value) { PyErr_SetObject(BadPickleGet, py_key); rc = -1; } else { PDATA_APPEND(self->stack, value, -1); rc = 0; } Py_DECREF(py_key); return rc; } /* Push an object from the extension registry (EXT[124]). nbytes is * the number of bytes following the opcode, holding the index (code) value. */ static int load_extension(Unpicklerobject *self, int nbytes) { char *codebytes; /* the nbytes bytes after the opcode */ long code; /* calc_binint returns long */ PyObject *py_code; /* code as a Python int */ PyObject *obj; /* the object to push */ PyObject *pair; /* (module_name, class_name) */ PyObject *module_name, *class_name; assert(nbytes == 1 || nbytes == 2 || nbytes == 4); if (self->read_func(self, &codebytes, nbytes) < 0) return -1; code = calc_binint(codebytes, nbytes); if (code <= 0) { /* note that 0 is forbidden */ /* Corrupt or hostile pickle. */ PyErr_SetString(UnpicklingError, "EXT specifies code <= 0"); return -1; } /* Look for the code in the cache. */ py_code = PyInt_FromLong(code); if (py_code == NULL) return -1; obj = PyDict_GetItem(extension_cache, py_code); if (obj != NULL) { /* Bingo. */ Py_DECREF(py_code); PDATA_APPEND(self->stack, obj, -1); return 0; } /* Look up the (module_name, class_name) pair. */ pair = PyDict_GetItem(inverted_registry, py_code); if (pair == NULL) { Py_DECREF(py_code); PyErr_Format(PyExc_ValueError, "unregistered extension " "code %ld", code); return -1; } /* Since the extension registry is manipulable via Python code, * confirm that pair is really a 2-tuple of strings. */ if (!PyTuple_Check(pair) || PyTuple_Size(pair) != 2 || !PyString_Check(module_name = PyTuple_GET_ITEM(pair, 0)) || !PyString_Check(class_name = PyTuple_GET_ITEM(pair, 1))) { Py_DECREF(py_code); PyErr_Format(PyExc_ValueError, "_inverted_registry[%ld] " "isn't a 2-tuple of strings", code); return -1; } /* Load the object. */ obj = find_class(module_name, class_name, self->find_class); if (obj == NULL) { Py_DECREF(py_code); return -1; } /* Cache code -> obj. */ code = PyDict_SetItem(extension_cache, py_code, obj); Py_DECREF(py_code); if (code < 0) { Py_DECREF(obj); return -1; } PDATA_PUSH(self->stack, obj, -1); return 0; } static int load_put(Unpicklerobject *self) { PyObject *py_str = 0, *value = 0; int len, l; char *s; if ((l = self->readline_func(self, &s)) < 0) return -1; if (l < 2) return bad_readline(); if (!( len=self->stack->length )) return stackUnderflow(); if (!( py_str = PyString_FromStringAndSize(s, l - 1))) return -1; value=self->stack->data[len-1]; l=PyDict_SetItem(self->memo, py_str, value); Py_DECREF(py_str); return l; } static int load_binput(Unpicklerobject *self) { PyObject *py_key = 0, *value = 0; unsigned char key; char *s; int len; if (self->read_func(self, &s, 1) < 0) return -1; if (!( (len=self->stack->length) > 0 )) return stackUnderflow(); key = (unsigned char)s[0]; if (!( py_key = PyInt_FromLong((long)key))) return -1; value=self->stack->data[len-1]; len=PyDict_SetItem(self->memo, py_key, value); Py_DECREF(py_key); return len; } static int load_long_binput(Unpicklerobject *self) { PyObject *py_key = 0, *value = 0; long key; unsigned char c; char *s; int len; if (self->read_func(self, &s, 4) < 0) return -1; if (!( len=self->stack->length )) return stackUnderflow(); c = (unsigned char)s[0]; key = (long)c; c = (unsigned char)s[1]; key |= (long)c << 8; c = (unsigned char)s[2]; key |= (long)c << 16; c = (unsigned char)s[3]; key |= (long)c << 24; if (!( py_key = PyInt_FromLong(key))) return -1; value=self->stack->data[len-1]; len=PyDict_SetItem(self->memo, py_key, value); Py_DECREF(py_key); return len; } static int do_append(Unpicklerobject *self, int x) { PyObject *value = 0, *list = 0, *append_method = 0; int len, i; len=self->stack->length; if (!( len >= x && x > 0 )) return stackUnderflow(); /* nothing to do */ if (len==x) return 0; list=self->stack->data[x-1]; if (PyList_Check(list)) { PyObject *slice; int list_len; slice=Pdata_popList(self->stack, x); list_len = PyList_GET_SIZE(list); i=PyList_SetSlice(list, list_len, list_len, slice); Py_DECREF(slice); return i; } else { if (!( append_method = PyObject_GetAttr(list, append_str))) return -1; for (i = x; i < len; i++) { PyObject *junk; value=self->stack->data[i]; junk=0; ARG_TUP(self, value); if (self->arg) { junk = PyObject_Call(append_method, self->arg, NULL); FREE_ARG_TUP(self); } if (! junk) { Pdata_clear(self->stack, i+1); self->stack->length=x; Py_DECREF(append_method); return -1; } Py_DECREF(junk); } self->stack->length=x; Py_DECREF(append_method); } return 0; } static int load_append(Unpicklerobject *self) { return do_append(self, self->stack->length - 1); } static int load_appends(Unpicklerobject *self) { return do_append(self, marker(self)); } static int do_setitems(Unpicklerobject *self, int x) { PyObject *value = 0, *key = 0, *dict = 0; int len, i, r=0; if (!( (len=self->stack->length) >= x && x > 0 )) return stackUnderflow(); dict=self->stack->data[x-1]; for (i = x+1; i < len; i += 2) { key =self->stack->data[i-1]; value=self->stack->data[i ]; if (PyObject_SetItem(dict, key, value) < 0) { r=-1; break; } } Pdata_clear(self->stack, x); return r; } static int load_setitem(Unpicklerobject *self) { return do_setitems(self, self->stack->length - 2); } static int load_setitems(Unpicklerobject *self) { return do_setitems(self, marker(self)); } static int load_build(Unpicklerobject *self) { PyObject *state, *inst, *slotstate; PyObject *__setstate__; PyObject *d_key, *d_value; int i; int res = -1; /* Stack is ... instance, state. We want to leave instance at * the stack top, possibly mutated via instance.__setstate__(state). */ if (self->stack->length < 2) return stackUnderflow(); PDATA_POP(self->stack, state); if (state == NULL) return -1; inst = self->stack->data[self->stack->length - 1]; __setstate__ = PyObject_GetAttr(inst, __setstate___str); if (__setstate__ != NULL) { PyObject *junk = NULL; /* The explicit __setstate__ is responsible for everything. */ ARG_TUP(self, state); if (self->arg) { junk = PyObject_Call(__setstate__, self->arg, NULL); FREE_ARG_TUP(self); } Py_DECREF(__setstate__); if (junk == NULL) return -1; Py_DECREF(junk); return 0; } if (!PyErr_ExceptionMatches(PyExc_AttributeError)) return -1; PyErr_Clear(); /* A default __setstate__. First see whether state embeds a * slot state dict too (a proto 2 addition). */ if (PyTuple_Check(state) && PyTuple_Size(state) == 2) { PyObject *temp = state; state = PyTuple_GET_ITEM(temp, 0); slotstate = PyTuple_GET_ITEM(temp, 1); Py_INCREF(state); Py_INCREF(slotstate); Py_DECREF(temp); } else slotstate = NULL; /* Set inst.__dict__ from the state dict (if any). */ if (state != Py_None) { PyObject *dict; if (! PyDict_Check(state)) { PyErr_SetString(UnpicklingError, "state is not a " "dictionary"); goto finally; } dict = PyObject_GetAttr(inst, __dict___str); if (dict == NULL) goto finally; i = 0; while (PyDict_Next(state, &i, &d_key, &d_value)) { if (PyObject_SetItem(dict, d_key, d_value) < 0) goto finally; } Py_DECREF(dict); } /* Also set instance attributes from the slotstate dict (if any). */ if (slotstate != NULL) { if (! PyDict_Check(slotstate)) { PyErr_SetString(UnpicklingError, "slot state is not " "a dictionary"); goto finally; } i = 0; while (PyDict_Next(slotstate, &i, &d_key, &d_value)) { if (PyObject_SetAttr(inst, d_key, d_value) < 0) goto finally; } } res = 0; finally: Py_DECREF(state); Py_XDECREF(slotstate); return res; } static int load_mark(Unpicklerobject *self) { int s; /* Note that we split the (pickle.py) stack into two stacks, an object stack and a mark stack. Here we push a mark onto the mark stack. */ if ((self->num_marks + 1) >= self->marks_size) { s=self->marks_size+20; if (s <= self->num_marks) s=self->num_marks + 1; if (self->marks == NULL) self->marks=(int *)malloc(s * sizeof(int)); else self->marks=(int *)realloc(self->marks, s * sizeof(int)); if (! self->marks) { PyErr_NoMemory(); return -1; } self->marks_size = s; } self->marks[self->num_marks++] = self->stack->length; return 0; } static int load_reduce(Unpicklerobject *self) { PyObject *callable = 0, *arg_tup = 0, *ob = 0; PDATA_POP(self->stack, arg_tup); if (! arg_tup) return -1; PDATA_POP(self->stack, callable); if (callable) { ob = Instance_New(callable, arg_tup); Py_DECREF(callable); } Py_DECREF(arg_tup); if (! ob) return -1; PDATA_PUSH(self->stack, ob, -1); return 0; } /* Just raises an error if we don't know the protocol specified. PROTO * is the first opcode for protocols >= 2. */ static int load_proto(Unpicklerobject *self) { int i; char *protobyte; i = self->read_func(self, &protobyte, 1); if (i < 0) return -1; i = calc_binint(protobyte, 1); /* No point checking for < 0, since calc_binint returns an unsigned * int when chewing on 1 byte. */ assert(i >= 0); if (i <= HIGHEST_PROTOCOL) return 0; PyErr_Format(PyExc_ValueError, "unsupported pickle protocol: %d", i); return -1; } static PyObject * load(Unpicklerobject *self) { PyObject *err = 0, *val = 0; char *s; self->num_marks = 0; if (self->stack->length) Pdata_clear(self->stack, 0); while (1) { if (self->read_func(self, &s, 1) < 0) break; switch (s[0]) { case NONE: if (load_none(self) < 0) break; continue; case BININT: if (load_binint(self) < 0) break; continue; case BININT1: if (load_binint1(self) < 0) break; continue; case BININT2: if (load_binint2(self) < 0) break; continue; case INT: if (load_int(self) < 0) break; continue; case LONG: if (load_long(self) < 0) break; continue; case LONG1: if (load_counted_long(self, 1) < 0) break; continue; case LONG4: if (load_counted_long(self, 4) < 0) break; continue; case FLOAT: if (load_float(self) < 0) break; continue; case BINFLOAT: if (load_binfloat(self) < 0) break; continue; case BINSTRING: if (load_binstring(self) < 0) break; continue; case SHORT_BINSTRING: if (load_short_binstring(self) < 0) break; continue; case STRING: if (load_string(self) < 0) break; continue; #ifdef Py_USING_UNICODE case UNICODE: if (load_unicode(self) < 0) break; continue; case BINUNICODE: if (load_binunicode(self) < 0) break; continue; #endif case EMPTY_TUPLE: if (load_counted_tuple(self, 0) < 0) break; continue; case TUPLE1: if (load_counted_tuple(self, 1) < 0) break; continue; case TUPLE2: if (load_counted_tuple(self, 2) < 0) break; continue; case TUPLE3: if (load_counted_tuple(self, 3) < 0) break; continue; case TUPLE: if (load_tuple(self) < 0) break; continue; case EMPTY_LIST: if (load_empty_list(self) < 0) break; continue; case LIST: if (load_list(self) < 0) break; continue; case EMPTY_DICT: if (load_empty_dict(self) < 0) break; continue; case DICT: if (load_dict(self) < 0) break; continue; case OBJ: if (load_obj(self) < 0) break; continue; case INST: if (load_inst(self) < 0) break; continue; case NEWOBJ: if (load_newobj(self) < 0) break; continue; case GLOBAL: if (load_global(self) < 0) break; continue; case APPEND: if (load_append(self) < 0) break; continue; case APPENDS: if (load_appends(self) < 0) break; continue; case BUILD: if (load_build(self) < 0) break; continue; case DUP: if (load_dup(self) < 0) break; continue; case BINGET: if (load_binget(self) < 0) break; continue; case LONG_BINGET: if (load_long_binget(self) < 0) break; continue; case GET: if (load_get(self) < 0) break; continue; case EXT1: if (load_extension(self, 1) < 0) break; continue; case EXT2: if (load_extension(self, 2) < 0) break; continue; case EXT4: if (load_extension(self, 4) < 0) break; continue; case MARK: if (load_mark(self) < 0) break; continue; case BINPUT: if (load_binput(self) < 0) break; continue; case LONG_BINPUT: if (load_long_binput(self) < 0) break; continue; case PUT: if (load_put(self) < 0) break; continue; case POP: if (load_pop(self) < 0) break; continue; case POP_MARK: if (load_pop_mark(self) < 0) break; continue; case SETITEM: if (load_setitem(self) < 0) break; continue; case SETITEMS: if (load_setitems(self) < 0) break; continue; case STOP: break; case PERSID: if (load_persid(self) < 0) break; continue; case BINPERSID: if (load_binpersid(self) < 0) break; continue; case REDUCE: if (load_reduce(self) < 0) break; continue; case PROTO: if (load_proto(self) < 0) break; continue; case NEWTRUE: if (load_bool(self, Py_True) < 0) break; continue; case NEWFALSE: if (load_bool(self, Py_False) < 0) break; continue; case '\0': /* end of file */ PyErr_SetNone(PyExc_EOFError); break; default: cPickle_ErrFormat(UnpicklingError, "invalid load key, '%s'.", "c", s[0]); return NULL; } break; } if ((err = PyErr_Occurred())) { if (err == PyExc_EOFError) { PyErr_SetNone(PyExc_EOFError); } return NULL; } PDATA_POP(self->stack, val); return val; } /* No-load functions to support noload, which is used to find persistent references. */ static int noload_obj(Unpicklerobject *self) { int i; if ((i = marker(self)) < 0) return -1; return Pdata_clear(self->stack, i+1); } static int noload_inst(Unpicklerobject *self) { int i; char *s; if ((i = marker(self)) < 0) return -1; Pdata_clear(self->stack, i); if (self->readline_func(self, &s) < 0) return -1; if (self->readline_func(self, &s) < 0) return -1; PDATA_APPEND(self->stack, Py_None, -1); return 0; } static int noload_newobj(Unpicklerobject *self) { PyObject *obj; PDATA_POP(self->stack, obj); /* pop argtuple */ if (obj == NULL) return -1; Py_DECREF(obj); PDATA_POP(self->stack, obj); /* pop cls */ if (obj == NULL) return -1; Py_DECREF(obj); PDATA_APPEND(self->stack, Py_None, -1); return 0; } static int noload_global(Unpicklerobject *self) { char *s; if (self->readline_func(self, &s) < 0) return -1; if (self->readline_func(self, &s) < 0) return -1; PDATA_APPEND(self->stack, Py_None,-1); return 0; } static int noload_reduce(Unpicklerobject *self) { if (self->stack->length < 2) return stackUnderflow(); Pdata_clear(self->stack, self->stack->length-2); PDATA_APPEND(self->stack, Py_None,-1); return 0; } static int noload_build(Unpicklerobject *self) { if (self->stack->length < 1) return stackUnderflow(); Pdata_clear(self->stack, self->stack->length-1); return 0; } static int noload_extension(Unpicklerobject *self, int nbytes) { char *codebytes; assert(nbytes == 1 || nbytes == 2 || nbytes == 4); if (self->read_func(self, &codebytes, nbytes) < 0) return -1; PDATA_APPEND(self->stack, Py_None, -1); return 0; } static PyObject * noload(Unpicklerobject *self) { PyObject *err = 0, *val = 0; char *s; self->num_marks = 0; Pdata_clear(self->stack, 0); while (1) { if (self->read_func(self, &s, 1) < 0) break; switch (s[0]) { case NONE: if (load_none(self) < 0) break; continue; case BININT: if (load_binint(self) < 0) break; continue; case BININT1: if (load_binint1(self) < 0) break; continue; case BININT2: if (load_binint2(self) < 0) break; continue; case INT: if (load_int(self) < 0) break; continue; case LONG: if (load_long(self) < 0) break; continue; case LONG1: if (load_counted_long(self, 1) < 0) break; continue; case LONG4: if (load_counted_long(self, 4) < 0) break; continue; case FLOAT: if (load_float(self) < 0) break; continue; case BINFLOAT: if (load_binfloat(self) < 0) break; continue; case BINSTRING: if (load_binstring(self) < 0) break; continue; case SHORT_BINSTRING: if (load_short_binstring(self) < 0) break; continue; case STRING: if (load_string(self) < 0) break; continue; #ifdef Py_USING_UNICODE case UNICODE: if (load_unicode(self) < 0) break; continue; case BINUNICODE: if (load_binunicode(self) < 0) break; continue; #endif case EMPTY_TUPLE: if (load_counted_tuple(self, 0) < 0) break; continue; case TUPLE1: if (load_counted_tuple(self, 1) < 0) break; continue; case TUPLE2: if (load_counted_tuple(self, 2) < 0) break; continue; case TUPLE3: if (load_counted_tuple(self, 3) < 0) break; continue; case TUPLE: if (load_tuple(self) < 0) break; continue; case EMPTY_LIST: if (load_empty_list(self) < 0) break; continue; case LIST: if (load_list(self) < 0) break; continue; case EMPTY_DICT: if (load_empty_dict(self) < 0) break; continue; case DICT: if (load_dict(self) < 0) break; continue; case OBJ: if (noload_obj(self) < 0) break; continue; case INST: if (noload_inst(self) < 0) break; continue; case NEWOBJ: if (noload_newobj(self) < 0) break; continue; case GLOBAL: if (noload_global(self) < 0) break; continue; case APPEND: if (load_append(self) < 0) break; continue; case APPENDS: if (load_appends(self) < 0) break; continue; case BUILD: if (noload_build(self) < 0) break; continue; case DUP: if (load_dup(self) < 0) break; continue; case BINGET: if (load_binget(self) < 0) break; continue; case LONG_BINGET: if (load_long_binget(self) < 0) break; continue; case GET: if (load_get(self) < 0) break; continue; case EXT1: if (noload_extension(self, 1) < 0) break; continue; case EXT2: if (noload_extension(self, 2) < 0) break; continue; case EXT4: if (noload_extension(self, 4) < 0) break; continue; case MARK: if (load_mark(self) < 0) break; continue; case BINPUT: if (load_binput(self) < 0) break; continue; case LONG_BINPUT: if (load_long_binput(self) < 0) break; continue; case PUT: if (load_put(self) < 0) break; continue; case POP: if (load_pop(self) < 0) break; continue; case POP_MARK: if (load_pop_mark(self) < 0) break; continue; case SETITEM: if (load_setitem(self) < 0) break; continue; case SETITEMS: if (load_setitems(self) < 0) break; continue; case STOP: break; case PERSID: if (load_persid(self) < 0) break; continue; case BINPERSID: if (load_binpersid(self) < 0) break; continue; case REDUCE: if (noload_reduce(self) < 0) break; continue; case PROTO: if (load_proto(self) < 0) break; continue; case NEWTRUE: if (load_bool(self, Py_True) < 0) break; continue; case NEWFALSE: if (load_bool(self, Py_False) < 0) break; continue; default: cPickle_ErrFormat(UnpicklingError, "invalid load key, '%s'.", "c", s[0]); return NULL; } break; } if ((err = PyErr_Occurred())) { if (err == PyExc_EOFError) { PyErr_SetNone(PyExc_EOFError); } return NULL; } PDATA_POP(self->stack, val); return val; } static PyObject * Unpickler_load(Unpicklerobject *self, PyObject *args) { if (!( PyArg_ParseTuple(args, ":load"))) return NULL; return load(self); } static PyObject * Unpickler_noload(Unpicklerobject *self, PyObject *args) { if (!( PyArg_ParseTuple(args, ":noload"))) return NULL; return noload(self); } static struct PyMethodDef Unpickler_methods[] = { {"load", (PyCFunction)Unpickler_load, METH_VARARGS, PyDoc_STR("load() -- Load a pickle") }, {"noload", (PyCFunction)Unpickler_noload, METH_VARARGS, PyDoc_STR( "noload() -- not load a pickle, but go through most of the motions\n" "\n" "This function can be used to read past a pickle without instantiating\n" "any objects or importing any modules. It can also be used to find all\n" "persistent references without instantiating any objects or importing\n" "any modules.\n") }, {NULL, NULL} /* sentinel */ }; static Unpicklerobject * newUnpicklerobject(PyObject *f) { Unpicklerobject *self; if (!( self = PyObject_GC_New(Unpicklerobject, &Unpicklertype))) return NULL; self->file = NULL; self->arg = NULL; self->stack = (Pdata*)Pdata_New(); self->pers_func = NULL; self->last_string = NULL; self->marks = NULL; self->num_marks = 0; self->marks_size = 0; self->buf_size = 0; self->read = NULL; self->readline = NULL; self->find_class = NULL; if (!( self->memo = PyDict_New())) goto err; Py_INCREF(f); self->file = f; /* Set read, readline based on type of f */ if (PyFile_Check(f)) { self->fp = PyFile_AsFile(f); if (self->fp == NULL) { PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto err; } self->read_func = read_file; self->readline_func = readline_file; } else if (PycStringIO_InputCheck(f)) { self->fp = NULL; self->read_func = read_cStringIO; self->readline_func = readline_cStringIO; } else { self->fp = NULL; self->read_func = read_other; self->readline_func = readline_other; if (!( (self->readline = PyObject_GetAttr(f, readline_str)) && (self->read = PyObject_GetAttr(f, read_str)))) { PyErr_Clear(); PyErr_SetString( PyExc_TypeError, "argument must have 'read' and " "'readline' attributes" ); goto err; } } PyObject_GC_Track(self); return self; err: Py_DECREF((PyObject *)self); return NULL; } static PyObject * get_Unpickler(PyObject *self, PyObject *args) { PyObject *file; if (!( PyArg_ParseTuple(args, "O:Unpickler", &file))) return NULL; return (PyObject *)newUnpicklerobject(file); } static void Unpickler_dealloc(Unpicklerobject *self) { PyObject_GC_UnTrack((PyObject *)self); Py_XDECREF(self->readline); Py_XDECREF(self->read); Py_XDECREF(self->file); Py_XDECREF(self->memo); Py_XDECREF(self->stack); Py_XDECREF(self->pers_func); Py_XDECREF(self->arg); Py_XDECREF(self->last_string); Py_XDECREF(self->find_class); if (self->marks) { free(self->marks); } if (self->buf_size) { free(self->buf); } self->ob_type->tp_free((PyObject *)self); } static int Unpickler_traverse(Unpicklerobject *self, visitproc visit, void *arg) { int err; #define VISIT(SLOT) \ if (SLOT) { \ err = visit((PyObject *)(SLOT), arg); \ if (err) \ return err; \ } VISIT(self->readline); VISIT(self->read); VISIT(self->file); VISIT(self->memo); VISIT(self->stack); VISIT(self->pers_func); VISIT(self->arg); VISIT(self->last_string); VISIT(self->find_class); #undef VISIT return 0; } static int Unpickler_clear(Unpicklerobject *self) { #define CLEAR(SLOT) Py_XDECREF(SLOT); SLOT = NULL CLEAR(self->readline); CLEAR(self->read); CLEAR(self->file); CLEAR(self->memo); CLEAR(self->stack); CLEAR(self->pers_func); CLEAR(self->arg); CLEAR(self->last_string); CLEAR(self->find_class); #undef CLEAR return 0; } static PyObject * Unpickler_getattr(Unpicklerobject *self, char *name) { if (!strcmp(name, "persistent_load")) { if (!self->pers_func) { PyErr_SetString(PyExc_AttributeError, name); return NULL; } Py_INCREF(self->pers_func); return self->pers_func; } if (!strcmp(name, "find_global")) { if (!self->find_class) { PyErr_SetString(PyExc_AttributeError, name); return NULL; } Py_INCREF(self->find_class); return self->find_class; } if (!strcmp(name, "memo")) { if (!self->memo) { PyErr_SetString(PyExc_AttributeError, name); return NULL; } Py_INCREF(self->memo); return self->memo; } if (!strcmp(name, "UnpicklingError")) { Py_INCREF(UnpicklingError); return UnpicklingError; } return Py_FindMethod(Unpickler_methods, (PyObject *)self, name); } static int Unpickler_setattr(Unpicklerobject *self, char *name, PyObject *value) { if (!strcmp(name, "persistent_load")) { Py_XDECREF(self->pers_func); self->pers_func = value; Py_XINCREF(value); return 0; } if (!strcmp(name, "find_global")) { Py_XDECREF(self->find_class); self->find_class = value; Py_XINCREF(value); return 0; } if (! value) { PyErr_SetString(PyExc_TypeError, "attribute deletion is not supported"); return -1; } if (strcmp(name, "memo") == 0) { if (!PyDict_Check(value)) { PyErr_SetString(PyExc_TypeError, "memo must be a dictionary"); return -1; } Py_XDECREF(self->memo); self->memo = value; Py_INCREF(value); return 0; } PyErr_SetString(PyExc_AttributeError, name); return -1; } /* --------------------------------------------------------------------------- * Module-level functions. */ /* dump(obj, file, proto=0). */ static PyObject * cpm_dump(PyObject *self, PyObject *args) { PyObject *ob, *file, *res = NULL; Picklerobject *pickler = 0; int proto = 0; if (!( PyArg_ParseTuple(args, "OO|i", &ob, &file, &proto))) goto finally; if (!( pickler = newPicklerobject(file, proto))) goto finally; if (dump(pickler, ob) < 0) goto finally; Py_INCREF(Py_None); res = Py_None; finally: Py_XDECREF(pickler); return res; } /* dumps(obj, proto=0). */ static PyObject * cpm_dumps(PyObject *self, PyObject *args) { PyObject *ob, *file = 0, *res = NULL; Picklerobject *pickler = 0; int proto = 0; if (!( PyArg_ParseTuple(args, "O|i:dumps", &ob, &proto))) goto finally; if (!( file = PycStringIO->NewOutput(128))) goto finally; if (!( pickler = newPicklerobject(file, proto))) goto finally; if (dump(pickler, ob) < 0) goto finally; res = PycStringIO->cgetvalue(file); finally: Py_XDECREF(pickler); Py_XDECREF(file); return res; } /* load(fileobj). */ static PyObject * cpm_load(PyObject *self, PyObject *args) { Unpicklerobject *unpickler = 0; PyObject *ob, *res = NULL; if (!( PyArg_ParseTuple(args, "O:load", &ob))) goto finally; if (!( unpickler = newUnpicklerobject(ob))) goto finally; res = load(unpickler); finally: Py_XDECREF(unpickler); return res; } /* loads(string) */ static PyObject * cpm_loads(PyObject *self, PyObject *args) { PyObject *ob, *file = 0, *res = NULL; Unpicklerobject *unpickler = 0; if (!( PyArg_ParseTuple(args, "S:loads", &ob))) goto finally; if (!( file = PycStringIO->NewInput(ob))) goto finally; if (!( unpickler = newUnpicklerobject(file))) goto finally; res = load(unpickler); finally: Py_XDECREF(file); Py_XDECREF(unpickler); return res; } PyDoc_STRVAR(Unpicklertype__doc__, "Objects that know how to unpickle"); static PyTypeObject Unpicklertype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "cPickle.Unpickler", /*tp_name*/ sizeof(Unpicklerobject), /*tp_basicsize*/ 0, (destructor)Unpickler_dealloc, /* tp_dealloc */ 0, /* tp_print */ (getattrfunc)Unpickler_getattr, /* tp_getattr */ (setattrfunc)Unpickler_setattr, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, Unpicklertype__doc__, /* tp_doc */ (traverseproc)Unpickler_traverse, /* tp_traverse */ (inquiry)Unpickler_clear, /* tp_clear */ }; static struct PyMethodDef cPickle_methods[] = { {"dump", (PyCFunction)cpm_dump, METH_VARARGS, PyDoc_STR("dump(object, file, proto=0) -- " "Write an object in pickle format to the given file.\n" "\n" "See the Pickler docstring for the meaning of optional argument proto.") }, {"dumps", (PyCFunction)cpm_dumps, METH_VARARGS, PyDoc_STR("dumps(object, proto=0) -- " "Return a string containing an object in pickle format.\n" "\n" "See the Pickler docstring for the meaning of optional argument proto.") }, {"load", (PyCFunction)cpm_load, METH_VARARGS, PyDoc_STR("load(file) -- Load a pickle from the given file")}, {"loads", (PyCFunction)cpm_loads, METH_VARARGS, PyDoc_STR("loads(string) -- Load a pickle from the given string")}, {"Pickler", (PyCFunction)get_Pickler, METH_VARARGS, PyDoc_STR("Pickler(file, proto=0) -- Create a pickler.\n" "\n" "This takes a file-like object for writing a pickle data stream.\n" "The optional proto argument tells the pickler to use the given\n" "protocol; supported protocols are 0, 1, 2. The default\n" "protocol is 0, to be backwards compatible. (Protocol 0 is the\n" "only protocol that can be written to a file opened in text\n" "mode and read back successfully. When using a protocol higher\n" "than 0, make sure the file is opened in binary mode, both when\n" "pickling and unpickling.)\n" "\n" "Protocol 1 is more efficient than protocol 0; protocol 2 is\n" "more efficient than protocol 1.\n" "\n" "Specifying a negative protocol version selects the highest\n" "protocol version supported. The higher the protocol used, the\n" "more recent the version of Python needed to read the pickle\n" "produced.\n" "\n" "The file parameter must have a write() method that accepts a single\n" "string argument. It can thus be an open file object, a StringIO\n" "object, or any other custom object that meets this interface.\n") }, {"Unpickler", (PyCFunction)get_Unpickler, METH_VARARGS, PyDoc_STR("Unpickler(file) -- Create an unpickler.")}, { NULL, NULL } }; static int init_stuff(PyObject *module_dict) { PyObject *copy_reg, *t, *r; #define INIT_STR(S) if (!( S ## _str=PyString_InternFromString(#S))) return -1; if (PyType_Ready(&Unpicklertype) < 0) return -1; if (PyType_Ready(&Picklertype) < 0) return -1; INIT_STR(__class__); INIT_STR(__getinitargs__); INIT_STR(__dict__); INIT_STR(__getstate__); INIT_STR(__setstate__); INIT_STR(__name__); INIT_STR(__main__); INIT_STR(__reduce__); INIT_STR(__reduce_ex__); INIT_STR(write); INIT_STR(append); INIT_STR(read); INIT_STR(readline); INIT_STR(copy_reg); INIT_STR(dispatch_table); INIT_STR(__basicnew__); if (!( copy_reg = PyImport_ImportModule("copy_reg"))) return -1; /* This is special because we want to use a different one in restricted mode. */ dispatch_table = PyObject_GetAttr(copy_reg, dispatch_table_str); if (!dispatch_table) return -1; extension_registry = PyObject_GetAttrString(copy_reg, "_extension_registry"); if (!extension_registry) return -1; inverted_registry = PyObject_GetAttrString(copy_reg, "_inverted_registry"); if (!inverted_registry) return -1; extension_cache = PyObject_GetAttrString(copy_reg, "_extension_cache"); if (!extension_cache) return -1; Py_DECREF(copy_reg); if (!(empty_tuple = PyTuple_New(0))) return -1; two_tuple = PyTuple_New(2); if (two_tuple == NULL) return -1; /* We use this temp container with no regard to refcounts, or to * keeping containees alive. Exempt from GC, because we don't * want anything looking at two_tuple() by magic. */ PyObject_GC_UnTrack(two_tuple); /* Ugh */ if (!( t=PyImport_ImportModule("__builtin__"))) return -1; if (PyDict_SetItemString(module_dict, "__builtins__", t) < 0) return -1; if (!( t=PyDict_New())) return -1; if (!( r=PyRun_String( "def __init__(self, *args): self.args=args\n\n" "def __str__(self):\n" " return self.args and ('%s' % self.args[0]) or '(what)'\n", Py_file_input, module_dict, t) )) return -1; Py_DECREF(r); PickleError = PyErr_NewException("cPickle.PickleError", NULL, t); if (!PickleError) return -1; Py_DECREF(t); PicklingError = PyErr_NewException("cPickle.PicklingError", PickleError, NULL); if (!PicklingError) return -1; if (!( t=PyDict_New())) return -1; if (!( r=PyRun_String( "def __init__(self, *args): self.args=args\n\n" "def __str__(self):\n" " a=self.args\n" " a=a and type(a[0]) or '(what)'\n" " return 'Cannot pickle %s objects' % a\n" , Py_file_input, module_dict, t) )) return -1; Py_DECREF(r); if (!( UnpickleableError = PyErr_NewException( "cPickle.UnpickleableError", PicklingError, t))) return -1; Py_DECREF(t); if (!( UnpicklingError = PyErr_NewException("cPickle.UnpicklingError", PickleError, NULL))) return -1; if (!( BadPickleGet = PyErr_NewException("cPickle.BadPickleGet", UnpicklingError, NULL))) return -1; if (PyDict_SetItemString(module_dict, "PickleError", PickleError) < 0) return -1; if (PyDict_SetItemString(module_dict, "PicklingError", PicklingError) < 0) return -1; if (PyDict_SetItemString(module_dict, "UnpicklingError", UnpicklingError) < 0) return -1; if (PyDict_SetItemString(module_dict, "UnpickleableError", UnpickleableError) < 0) return -1; if (PyDict_SetItemString(module_dict, "BadPickleGet", BadPickleGet) < 0) return -1; PycString_IMPORT; return 0; } #ifndef PyMODINIT_FUNC /* declarations for DLL import/export */ #define PyMODINIT_FUNC void #endif PyMODINIT_FUNC initcPickle(void) { PyObject *m, *d, *di, *v, *k; int i; char *rev = "1.71"; /* XXX when does this change? */ PyObject *format_version; PyObject *compatible_formats; Picklertype.ob_type = &PyType_Type; Unpicklertype.ob_type = &PyType_Type; PdataType.ob_type = &PyType_Type; /* Initialize some pieces. We need to do this before module creation, * so we're forced to use a temporary dictionary. :( */ di = PyDict_New(); if (!di) return; if (init_stuff(di) < 0) return; /* Create the module and add the functions */ m = Py_InitModule4("cPickle", cPickle_methods, cPickle_module_documentation, (PyObject*)NULL,PYTHON_API_VERSION); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); v = PyString_FromString(rev); PyDict_SetItemString(d, "__version__", v); Py_XDECREF(v); /* Copy data from di. Waaa. */ for (i=0; PyDict_Next(di, &i, &k, &v); ) { if (PyObject_SetItem(d, k, v) < 0) { Py_DECREF(di); return; } } Py_DECREF(di); i = PyModule_AddIntConstant(m, "HIGHEST_PROTOCOL", HIGHEST_PROTOCOL); if (i < 0) return; /* These are purely informational; no code uses them. */ /* File format version we write. */ format_version = PyString_FromString("2.0"); /* Format versions we can read. */ compatible_formats = Py_BuildValue("[sssss]", "1.0", /* Original protocol 0 */ "1.1", /* Protocol 0 + INST */ "1.2", /* Original protocol 1 */ "1.3", /* Protocol 1 + BINFLOAT */ "2.0"); /* Original protocol 2 */ PyDict_SetItemString(d, "format_version", format_version); PyDict_SetItemString(d, "compatible_formats", compatible_formats); Py_XDECREF(format_version); Py_XDECREF(compatible_formats); } Python-2.3.7/Modules/md5module.c0000644001241000117560000001405107702632345015730 0ustar loewishpifb6 /* MD5 module */ /* This module provides an interface to the RSA Data Security, Inc. MD5 Message-Digest Algorithm, described in RFC 1321. It requires the files md5c.c and md5.h (which are slightly changed from the versions in the RFC to avoid the "global.h" file.) */ /* MD5 objects */ #include "Python.h" #include "md5.h" typedef struct { PyObject_HEAD MD5_CTX md5; /* the context holder */ } md5object; static PyTypeObject MD5type; #define is_md5object(v) ((v)->ob_type == &MD5type) static md5object * newmd5object(void) { md5object *md5p; md5p = PyObject_New(md5object, &MD5type); if (md5p == NULL) return NULL; MD5Init(&md5p->md5); /* actual initialisation */ return md5p; } /* MD5 methods */ static void md5_dealloc(md5object *md5p) { PyObject_Del(md5p); } /* MD5 methods-as-attributes */ static PyObject * md5_update(md5object *self, PyObject *args) { unsigned char *cp; int len; if (!PyArg_ParseTuple(args, "s#:update", &cp, &len)) return NULL; MD5Update(&self->md5, cp, len); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(update_doc, "update (arg)\n\ \n\ Update the md5 object with the string arg. Repeated calls are\n\ equivalent to a single call with the concatenation of all the\n\ arguments."); static PyObject * md5_digest(md5object *self) { MD5_CTX mdContext; unsigned char aDigest[16]; /* make a temporary copy, and perform the final */ mdContext = self->md5; MD5Final(aDigest, &mdContext); return PyString_FromStringAndSize((char *)aDigest, 16); } PyDoc_STRVAR(digest_doc, "digest() -> string\n\ \n\ Return the digest of the strings passed to the update() method so\n\ far. This is a 16-byte string which may contain non-ASCII characters,\n\ including null bytes."); static PyObject * md5_hexdigest(md5object *self) { MD5_CTX mdContext; unsigned char digest[16]; unsigned char hexdigest[32]; int i, j; /* make a temporary copy, and perform the final */ mdContext = self->md5; MD5Final(digest, &mdContext); /* Make hex version of the digest */ for(i=j=0; i<16; i++) { char c; c = (digest[i] >> 4) & 0xf; c = (c>9) ? c+'a'-10 : c + '0'; hexdigest[j++] = c; c = (digest[i] & 0xf); c = (c>9) ? c+'a'-10 : c + '0'; hexdigest[j++] = c; } return PyString_FromStringAndSize((char*)hexdigest, 32); } PyDoc_STRVAR(hexdigest_doc, "hexdigest() -> string\n\ \n\ Like digest(), but returns the digest as a string of hexadecimal digits."); static PyObject * md5_copy(md5object *self) { md5object *md5p; if ((md5p = newmd5object()) == NULL) return NULL; md5p->md5 = self->md5; return (PyObject *)md5p; } PyDoc_STRVAR(copy_doc, "copy() -> md5 object\n\ \n\ Return a copy (``clone'') of the md5 object."); static PyMethodDef md5_methods[] = { {"update", (PyCFunction)md5_update, METH_VARARGS, update_doc}, {"digest", (PyCFunction)md5_digest, METH_NOARGS, digest_doc}, {"hexdigest", (PyCFunction)md5_hexdigest, METH_NOARGS, hexdigest_doc}, {"copy", (PyCFunction)md5_copy, METH_NOARGS, copy_doc}, {NULL, NULL} /* sentinel */ }; static PyObject * md5_getattr(md5object *self, char *name) { if (strcmp(name, "digest_size") == 0) { return PyInt_FromLong(16); } return Py_FindMethod(md5_methods, (PyObject *)self, name); } PyDoc_STRVAR(module_doc, "This module implements the interface to RSA's MD5 message digest\n\ algorithm (see also Internet RFC 1321). Its use is quite\n\ straightforward: use the new() to create an md5 object. You can now\n\ feed this object with arbitrary strings using the update() method, and\n\ at any point you can ask it for the digest (a strong kind of 128-bit\n\ checksum, a.k.a. ``fingerprint'') of the concatenation of the strings\n\ fed to it so far using the digest() method.\n\ \n\ Functions:\n\ \n\ new([arg]) -- return a new md5 object, initialized with arg if provided\n\ md5([arg]) -- DEPRECATED, same as new, but for compatibility\n\ \n\ Special Objects:\n\ \n\ MD5Type -- type object for md5 objects"); PyDoc_STRVAR(md5type_doc, "An md5 represents the object used to calculate the MD5 checksum of a\n\ string of information.\n\ \n\ Methods:\n\ \n\ update() -- updates the current digest with an additional string\n\ digest() -- return the current digest value\n\ hexdigest() -- return the current digest as a string of hexadecimal digits\n\ copy() -- return a copy of the current md5 object"); static PyTypeObject MD5type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "md5.md5", /*tp_name*/ sizeof(md5object), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)md5_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)md5_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ 0, /*tp_xxx4*/ md5type_doc, /*tp_doc*/ }; /* MD5 functions */ static PyObject * MD5_new(PyObject *self, PyObject *args) { md5object *md5p; unsigned char *cp = NULL; int len = 0; if (!PyArg_ParseTuple(args, "|s#:new", &cp, &len)) return NULL; if ((md5p = newmd5object()) == NULL) return NULL; if (cp) MD5Update(&md5p->md5, cp, len); return (PyObject *)md5p; } PyDoc_STRVAR(new_doc, "new([arg]) -> md5 object\n\ \n\ Return a new md5 object. If arg is present, the method call update(arg)\n\ is made."); /* List of functions exported by this module */ static PyMethodDef md5_functions[] = { {"new", (PyCFunction)MD5_new, METH_VARARGS, new_doc}, {"md5", (PyCFunction)MD5_new, METH_VARARGS, new_doc}, /* Backward compatibility */ {NULL, NULL} /* Sentinel */ }; /* Initialize this module. */ PyMODINIT_FUNC initmd5(void) { PyObject *m, *d; MD5type.ob_type = &PyType_Type; m = Py_InitModule3("md5", md5_functions, module_doc); d = PyModule_GetDict(m); PyDict_SetItemString(d, "MD5Type", (PyObject *)&MD5type); PyModule_AddIntConstant(m, "digest_size", 16); /* No need to check the error here, the caller will do that */ } Python-2.3.7/Modules/ar_beos0000755001241000117560000000344407243116602015226 0ustar loewishpifb6#!/bin/sh # # Truly fake ar, using a directory to store object files. # # Donn Cave, donn@oz.net usage='Usage: ar-fake cr libpython.dir obj.o ... ar-fake d libpython.dir obj.o ... ar-fake so libpython.dir libpython.so' case $# in 0|1|2) echo "$usage" >&2 exit 1 ;; esac command=$1 library=$2 shift 2 case $command in cr) if test -d $library then : else mkdir $library fi if cp -p $* $library then # To force directory modify date, create or delete a file. if test -e $library/.tch then rm $library/.tch else echo tch > $library/.tch fi exit 0 fi ;; d) if test -d $library then cd $library rm -f $* fi ;; so) case $BE_HOST_CPU in ppc) # In case your libpython.a refers to any exotic libraries, # mwld needs to know that here. The following hack makes # a couple of assumptions about Modules/Makefile. If it # doesn't work, you may as well add the necessary libraries # here explicitly instead. extralibs=$( (cd Modules; make -f Makefile -n link) | sed -n 's/.*\.so \(.*\) -o python.*/\1/p' ) mwld -xms -export pragma -nodup -o $1 $library/* $extralibs ;; x86) ld -shared -soname $(basename $1) -o $1 $library/* ;; esac status=$? cd $(dirname $1) ln -sf $PWD lib exit $status ;; *) echo "$usage" >&2 exit 1 ;; esac Python-2.3.7/Modules/puremodule.c0000644001241000117560000007506107421655456016234 0ustar loewishpifb6/* This module exports the C API to such Pure Software Inc. (tm) (now * called Pure Atria Corporation) products as Purify (tm) and Quantify * (tm). Other packages could be added, but I didn't have those products * and thus lack the API documentation. * * Currently supported: Quantify 2.x, Purify 3.x * * You need to decide which products you want to incorporate into the * module when you compile this file. The way to do this is to edit * /Modules/Setup to pass the appropriate flags to the compiler. * -DWITH_PURIFY compiles in the Purify support, and -DWITH_QUANTIFY * compiles in the Quantify support. -DWITH_ALL_PURE compiles in both. * You can also build a Purify'd or Quantify'd interpreter by passing in * the LINKCC variable to make. E.g. if you want to build a Purify'd * interpreter and are using gcc, build Python with this command: * * make LINKCC='purify gcc' * * It would be nice (and probably easy) to provide this file as a shared * library, however since it doesn't appear that Pure gives us shared * libraries of the stubs, it doesn't really matter. For now, you have to * link this file in statically. * * Major bogosity. The purify.h header file exports purify_exit(), but * guess what? It is not defined in the libpurify_stubs.a file! I tried * to fake one here, hoping the Pure linker would Do The Right Thing when * instrumented for Purify, but it doesn't seem to, so I don't export * purify_exit() to the Python layer. In Python you should raise a * SystemExit exception anyway. * * The actual purify.h and quantify.h files which embody the APIs are * copyrighted by Pure Software, Inc. and are only attainable through them. * This module assumes you have legally installed licenses of their * software. Contact them on the Web via * * Author: Barry Warsaw * */ #include "Python.h" #if defined(WITH_PURIFY) || defined(WITH_ALL_PURE) # include # define HAS_PURIFY_EXIT 0 /* See note at top of file */ # define PURE_PURIFY_VERSION 3 /* not provided by purify.h */ #endif #if defined(WITH_QUANTIFY) || defined(WITH_ALL_PURE) # include # define PURE_QUANTIFY_VERSION 2 /* not provided by quantify.h */ #endif #if defined(PURIFY_H) || defined(QUANTIFY_H) # define COMMON_PURE_FUNCTIONS #endif /* PURIFY_H || QUANTIFY_H */ typedef int (*VoidArgFunc)(void); typedef int (*StringArgFunc)(char*); typedef int (*PrintfishFunc)(const char*, ...); typedef int (*StringIntArgFunc)(const char*, int); static PyObject* call_voidarg_function(VoidArgFunc func, PyObject *self, PyObject *args) { int status; if (!PyArg_ParseTuple(args, "")) return NULL; status = func(); return Py_BuildValue("i", status); } static PyObject* call_stringarg_function(StringArgFunc func, PyObject *self, PyObject *args) { int status; char* stringarg; if (!PyArg_ParseTuple(args, "s", &stringarg)) return NULL; status = func(stringarg); return Py_BuildValue("i", status); } static PyObject* call_stringorint_function(StringArgFunc func, PyObject *self, PyObject *args) { int status; int intarg; char* stringarg; /* according to the quantify.h file, the argument to * quantify_*_recording_system_call can be an integer or a string, * but the functions are prototyped as taking a single char* * argument. Yikes! */ if (PyArg_ParseTuple(args, "i", &intarg)) /* func is prototyped as int(*)(char*) * better shut up the compiler */ status = func((char*)intarg); else { PyErr_Clear(); if (!PyArg_ParseTuple(args, "s", &stringarg)) return NULL; else status = func(stringarg); } return Py_BuildValue("i", status); } static PyObject* call_printfish_function(PrintfishFunc func, PyObject *self, PyObject *args) { /* we support the printf() style vararg functions by requiring the * formatting be done in Python. At the C level we pass just a string * to the printf() style function. */ int status; char* argstring; if (!PyArg_ParseTuple(args, "s", &argstring)) return NULL; status = func("%s", argstring); return Py_BuildValue("i", status); } static PyObject* call_intasaddr_function(StringArgFunc func, PyObject *self, PyObject *args) { long memrep; int id; if (!PyArg_ParseTuple(args, "l", &memrep)) return NULL; id = func((char*)memrep); return Py_BuildValue("i", id); } static PyObject* call_stringandint_function(StringIntArgFunc func, PyObject *self, PyObject *args) { long srcrep; int size; int status; if (!PyArg_ParseTuple(args, "li", &srcrep, &size)) return NULL; status = func((char*)srcrep, size); return Py_BuildValue("i", status); } /* functions common to all products * * N.B. These printf() style functions are a bit of a kludge. Since the * API doesn't provide vprintf versions of them, we can't call them * directly. They don't support all the standard printf % modifiers * anyway. The way to use these is to use Python's % string operator to do * the formatting. By the time these functions get the thing to print, * it's already a string, and they just use "%s" as the format string. */ #ifdef COMMON_PURE_FUNCTIONS static PyObject* pure_pure_logfile_printf(PyObject* self, PyObject* args) { return call_printfish_function(pure_logfile_printf, self, args); } static PyObject* pure_pure_printf(PyObject* self, PyObject* args) { return call_printfish_function(pure_printf, self, args); } static PyObject* pure_pure_printf_with_banner(PyObject* self, PyObject* args) { return call_printfish_function(pure_printf_with_banner, self, args); } #endif /* COMMON_PURE_FUNCTIONS */ /* Purify functions * * N.B. There are some interfaces described in the purify.h file that are * not described in the manual. * * Unsigned longs purify_report_{address,number,type,result} are not * accessible from the Python layer since they seem mostly useful when * purify_stop_here() is called by the (C) debugger. The same is true of * the purify_stop_here_internal() function so it isn't exported either. * And purify_stop_here() should never be called directly. * * The header file says purify_{new,all,clear_new}_reports() are obsolete * so they aren't exported. * * None of the custom dynamic loader functions are exported. * * purify_unsafe_memcpy() isn't exported. * * purify_{start,size}_of_block() aren't exported. * * The manual that I have says that the prototype for the second argument * to purify_map_pool is: * * void (*fn)(char*) * * but the purify.h file declares it as: * * void (*fn)(char*, int, void*) * * and does not explain what the other arguments are for. I support the * latter but I don't know if I do it right or usefully. * * The header file says that purify_describe() returns a char* which is the * pointer passed to it. The manual says it returns an int, but I believe * that is a typo. */ #ifdef PURIFY_H static PyObject* pure_purify_all_inuse(PyObject *self, PyObject *args) { return call_voidarg_function(purify_all_inuse, self, args); } static PyObject* pure_purify_all_leaks(PyObject *self, PyObject *args) { return call_voidarg_function(purify_all_leaks, self, args); } static PyObject* pure_purify_new_inuse(PyObject *self, PyObject *args) { return call_voidarg_function(purify_new_inuse, self, args); } static PyObject* pure_purify_new_leaks(PyObject *self, PyObject *args) { return call_voidarg_function(purify_new_leaks, self, args); } static PyObject* pure_purify_clear_inuse(PyObject *self, PyObject *args) { return call_voidarg_function(purify_clear_inuse, self, args); } static PyObject* pure_purify_clear_leaks(PyObject *self, PyObject *args) { return call_voidarg_function(purify_clear_leaks, self, args); } static PyObject* pure_purify_all_fds_inuse(PyObject *self, PyObject *args) { return call_voidarg_function(purify_all_fds_inuse, self, args); } static PyObject* pure_purify_new_fds_inuse(PyObject *self, PyObject *args) { return call_voidarg_function(purify_new_fds_inuse, self, args); } static PyObject* pure_purify_printf_with_call_chain(PyObject *self, PyObject *args) { return call_printfish_function(purify_printf_with_call_chain, self, args); } static PyObject* pure_purify_set_pool_id(PyObject *self, PyObject *args) { long memrep; int id; if (!PyArg_ParseTuple(args, "li:purify_set_pool_id", &memrep, &id)) return NULL; purify_set_pool_id((char*)memrep, id); Py_INCREF(Py_None); return Py_None; } static PyObject* pure_purify_get_pool_id(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_get_pool_id, self, args); } static PyObject* pure_purify_set_user_data(PyObject *self, PyObject *args) { long memrep; long datarep; if (!PyArg_ParseTuple(args, "ll:purify_set_user_data", &memrep, &datarep)) return NULL; purify_set_user_data((char*)memrep, (void*)datarep); Py_INCREF(Py_None); return Py_None; } static PyObject* pure_purify_get_user_data(PyObject *self, PyObject *args) { /* can't use call_intasaddr_function() since purify_get_user_data() * returns a void* */ long memrep; void* data; if (!PyArg_ParseTuple(args, "l:purify_get_user_data", &memrep)) return NULL; data = purify_get_user_data((char*)memrep); return Py_BuildValue("l", (long)data); } /* this global variable is shared by both mapping functions: * pure_purify_map_pool() and pure_purify_map_pool_id(). Since they cache * this variable it should be safe in the face of recursion or cross * calling. * * Further note that the prototype for the callback function is wrong in * the Purify manual. The manual says the function takes a single char*, * but the header file says it takes an additional int and void*. I have * no idea what these are for! */ static PyObject* MapCallable = NULL; static void map_pool_callback(char* mem, int user_size, void *user_aux_data) { long memrep = (long)mem; long user_aux_data_rep = (long)user_aux_data; PyObject* result; PyObject* memobj = Py_BuildValue("lil", memrep, user_size, user_aux_data_rep); if (memobj == NULL) return; result = PyEval_CallObject(MapCallable, memobj); Py_DECREF(result); Py_DECREF(memobj); } static PyObject* pure_purify_map_pool(PyObject *self, PyObject *args) { /* cache global variable in case of recursion */ PyObject* saved_callable = MapCallable; PyObject* arg_callable; int id; if (!PyArg_ParseTuple(args, "iO:purify_map_pool", &id, &arg_callable)) return NULL; if (!PyCallable_Check(arg_callable)) { PyErr_SetString(PyExc_TypeError, "Second argument must be callable"); return NULL; } MapCallable = arg_callable; purify_map_pool(id, map_pool_callback); MapCallable = saved_callable; Py_INCREF(Py_None); return Py_None; } static void PurifyMapPoolIdCallback(int id) { PyObject* result; PyObject* intobj = Py_BuildValue("i", id); if (intobj == NULL) return; result = PyEval_CallObject(MapCallable, intobj); Py_DECREF(result); Py_DECREF(intobj); } static PyObject* pure_purify_map_pool_id(PyObject *self, PyObject *args) { /* cache global variable in case of recursion */ PyObject* saved_callable = MapCallable; PyObject* arg_callable; if (!PyArg_ParseTuple(args, "O:purify_map_pool_id", &arg_callable)) return NULL; if (!PyCallable_Check(arg_callable)) { PyErr_SetString(PyExc_TypeError, "Argument must be callable."); return NULL; } MapCallable = arg_callable; purify_map_pool_id(PurifyMapPoolIdCallback); MapCallable = saved_callable; Py_INCREF(Py_None); return Py_None; } static PyObject* pure_purify_new_messages(PyObject *self, PyObject *args) { return call_voidarg_function(purify_new_messages, self, args); } static PyObject* pure_purify_all_messages(PyObject *self, PyObject *args) { return call_voidarg_function(purify_all_messages, self, args); } static PyObject* pure_purify_clear_messages(PyObject *self, PyObject *args) { return call_voidarg_function(purify_clear_messages, self, args); } static PyObject* pure_purify_clear_new_messages(PyObject *self, PyObject *args) { return call_voidarg_function(purify_clear_new_messages, self, args); } static PyObject* pure_purify_start_batch(PyObject *self, PyObject *args) { return call_voidarg_function(purify_start_batch, self, args); } static PyObject* pure_purify_start_batch_show_first(PyObject *self, PyObject *args) { return call_voidarg_function(purify_start_batch_show_first, self, args); } static PyObject* pure_purify_stop_batch(PyObject *self, PyObject *args) { return call_voidarg_function(purify_stop_batch, self, args); } static PyObject* pure_purify_name_thread(PyObject *self, PyObject *args) { /* can't strictly use call_stringarg_function since * purify_name_thread takes a const char*, not a char* */ int status; char* stringarg; if (!PyArg_ParseTuple(args, "s:purify_name_thread", &stringarg)) return NULL; status = purify_name_thread(stringarg); return Py_BuildValue("i", status); } static PyObject* pure_purify_watch(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch, self, args); } static PyObject* pure_purify_watch_1(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_1, self, args); } static PyObject* pure_purify_watch_2(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_2, self, args); } static PyObject* pure_purify_watch_4(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_4, self, args); } static PyObject* pure_purify_watch_8(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_8, self, args); } static PyObject* pure_purify_watch_w_1(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_w_1, self, args); } static PyObject* pure_purify_watch_w_2(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_w_2, self, args); } static PyObject* pure_purify_watch_w_4(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_w_4, self, args); } static PyObject* pure_purify_watch_w_8(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_w_8, self, args); } static PyObject* pure_purify_watch_r_1(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_r_1, self, args); } static PyObject* pure_purify_watch_r_2(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_r_2, self, args); } static PyObject* pure_purify_watch_r_4(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_r_4, self, args); } static PyObject* pure_purify_watch_r_8(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_r_8, self, args); } static PyObject* pure_purify_watch_rw_1(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_rw_1, self, args); } static PyObject* pure_purify_watch_rw_2(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_rw_2, self, args); } static PyObject* pure_purify_watch_rw_4(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_rw_4, self, args); } static PyObject* pure_purify_watch_rw_8(PyObject *self, PyObject *args) { return call_intasaddr_function(purify_watch_rw_8, self, args); } static PyObject* pure_purify_watch_n(PyObject *self, PyObject *args) { long addrrep; unsigned int size; char* type; int status; if (!PyArg_ParseTuple(args, "lis:purify_watch_n", &addrrep, &size, &type)) return NULL; status = purify_watch_n((char*)addrrep, size, type); return Py_BuildValue("i", status); } static PyObject* pure_purify_watch_info(PyObject *self, PyObject *args) { return call_voidarg_function(purify_watch_info, self, args); } static PyObject* pure_purify_watch_remove(PyObject *self, PyObject *args) { int watchno; int status; if (!PyArg_ParseTuple(args, "i:purify_watch_remove", &watchno)) return NULL; status = purify_watch_remove(watchno); return Py_BuildValue("i", status); } static PyObject* pure_purify_watch_remove_all(PyObject *self, PyObject *args) { return call_voidarg_function(purify_watch_remove_all, self, args); } static PyObject* pure_purify_describe(PyObject *self, PyObject *args) { long addrrep; char* rtn; if (!PyArg_ParseTuple(args, "l:purify_describe", &addrrep)) return NULL; rtn = purify_describe((char*)addrrep); return Py_BuildValue("l", (long)rtn); } static PyObject* pure_purify_what_colors(PyObject *self, PyObject *args) { long addrrep; unsigned int size; int status; if (!PyArg_ParseTuple(args, "li:purify_what_colors", &addrrep, &size)) return NULL; status = purify_what_colors((char*)addrrep, size); return Py_BuildValue("i", status); } static PyObject* pure_purify_is_running(PyObject *self, PyObject *args) { return call_voidarg_function(purify_is_running, self, args); } static PyObject* pure_purify_assert_is_readable(PyObject *self, PyObject *args) { return call_stringandint_function(purify_assert_is_readable, self, args); } static PyObject* pure_purify_assert_is_writable(PyObject *self, PyObject *args) { return call_stringandint_function(purify_assert_is_writable, self, args); } #if HAS_PURIFY_EXIT /* I wish I could include this, but I can't. See the notes at the top of * the file. */ static PyObject* pure_purify_exit(PyObject *self, PyObject *args) { int status; if (!PyArg_ParseTuple(args, "i:purify_exit", &status)) return NULL; /* purify_exit doesn't always act like exit(). See the manual */ purify_exit(status); Py_INCREF(Py_None); return Py_None; } #endif /* HAS_PURIFY_EXIT */ #endif /* PURIFY_H */ /* Quantify functions * * N.B. Some of these functions are only described in the quantify.h file, * not in the version of the hardcopy manual that I had. If you're not * sure what some of these do, check the header file, it is documented * fairly well. * * None of the custom dynamic loader functions are exported. * */ #ifdef QUANTIFY_H static PyObject* pure_quantify_is_running(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_is_running, self, args); } static PyObject* pure_quantify_help(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_help, self, args); } static PyObject* pure_quantify_print_recording_state(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_print_recording_state, self, args); } static PyObject* pure_quantify_start_recording_data(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_start_recording_data, self, args); } static PyObject* pure_quantify_stop_recording_data(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_stop_recording_data, self, args); } static PyObject* pure_quantify_is_recording_data(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_is_recording_data, self, args); } static PyObject* pure_quantify_start_recording_system_calls(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_start_recording_system_calls, self, args); } static PyObject* pure_quantify_stop_recording_system_calls(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_stop_recording_system_calls, self, args); } static PyObject* pure_quantify_is_recording_system_calls(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_is_recording_system_calls, self, args); } static PyObject* pure_quantify_start_recording_system_call(PyObject *self, PyObject *args) { return call_stringorint_function(quantify_start_recording_system_call, self, args); } static PyObject* pure_quantify_stop_recording_system_call(PyObject *self, PyObject *args) { return call_stringorint_function(quantify_stop_recording_system_call, self, args); } static PyObject* pure_quantify_is_recording_system_call(PyObject *self, PyObject *args) { return call_stringorint_function(quantify_is_recording_system_call, self, args); } static PyObject* pure_quantify_start_recording_dynamic_library_data(PyObject *self, PyObject *args) { return call_voidarg_function( quantify_start_recording_dynamic_library_data, self, args); } static PyObject* pure_quantify_stop_recording_dynamic_library_data(PyObject *self, PyObject *args) { return call_voidarg_function( quantify_stop_recording_dynamic_library_data, self, args); } static PyObject* pure_quantify_is_recording_dynamic_library_data(PyObject *self, PyObject *args) { return call_voidarg_function( quantify_is_recording_dynamic_library_data, self, args); } static PyObject* pure_quantify_start_recording_register_window_traps(PyObject *self, PyObject *args) { return call_voidarg_function( quantify_start_recording_register_window_traps, self, args); } static PyObject* pure_quantify_stop_recording_register_window_traps(PyObject *self, PyObject *args) { return call_voidarg_function( quantify_stop_recording_register_window_traps, self, args); } static PyObject* pure_quantify_is_recording_register_window_traps(PyObject *self, PyObject *args) { return call_voidarg_function( quantify_is_recording_register_window_traps, self, args); } static PyObject* pure_quantify_disable_recording_data(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_disable_recording_data, self, args); } static PyObject* pure_quantify_clear_data(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_clear_data, self, args); } static PyObject* pure_quantify_save_data(PyObject *self, PyObject *args) { return call_voidarg_function(quantify_save_data, self, args); } static PyObject* pure_quantify_save_data_to_file(PyObject *self, PyObject *args) { return call_stringarg_function(quantify_save_data_to_file, self, args); } static PyObject* pure_quantify_add_annotation(PyObject *self, PyObject *args) { return call_stringarg_function(quantify_add_annotation, self, args); } #endif /* QUANTIFY_H */ /* external interface */ static struct PyMethodDef pure_methods[] = { #ifdef COMMON_PURE_FUNCTIONS {"pure_logfile_printf", pure_pure_logfile_printf, METH_VARARGS}, {"pure_printf", pure_pure_printf, METH_VARARGS}, {"pure_printf_with_banner", pure_pure_printf_with_banner, METH_VARARGS}, #endif /* COMMON_PURE_FUNCTIONS */ #ifdef PURIFY_H {"purify_all_inuse", pure_purify_all_inuse, METH_VARARGS}, {"purify_all_leaks", pure_purify_all_leaks, METH_VARARGS}, {"purify_new_inuse", pure_purify_new_inuse, METH_VARARGS}, {"purify_new_leaks", pure_purify_new_leaks, METH_VARARGS}, {"purify_clear_inuse", pure_purify_clear_inuse, METH_VARARGS}, {"purify_clear_leaks", pure_purify_clear_leaks, METH_VARARGS}, {"purify_all_fds_inuse", pure_purify_all_fds_inuse, METH_VARARGS}, {"purify_new_fds_inuse", pure_purify_new_fds_inuse, METH_VARARGS}, /* see purify.h */ {"purify_logfile_printf", pure_pure_logfile_printf, METH_VARARGS}, {"purify_printf", pure_pure_printf, METH_VARARGS}, {"purify_printf_with_banner", pure_pure_printf_with_banner, METH_VARARGS}, /**/ {"purify_printf_with_call_chain", pure_purify_printf_with_call_chain, METH_VARARGS}, {"purify_set_pool_id", pure_purify_set_pool_id, METH_VARARGS}, {"purify_get_pool_id", pure_purify_get_pool_id, METH_VARARGS}, {"purify_set_user_data", pure_purify_set_user_data, METH_VARARGS}, {"purify_get_user_data", pure_purify_get_user_data, METH_VARARGS}, {"purify_map_pool", pure_purify_map_pool, METH_VARARGS}, {"purify_map_pool_id", pure_purify_map_pool_id, METH_VARARGS}, {"purify_new_messages", pure_purify_new_messages, METH_VARARGS}, {"purify_all_messages", pure_purify_all_messages, METH_VARARGS}, {"purify_clear_messages", pure_purify_clear_messages, METH_VARARGS}, {"purify_clear_new_messages", pure_purify_clear_new_messages, METH_VARARGS}, {"purify_start_batch", pure_purify_start_batch, METH_VARARGS}, {"purify_start_batch_show_first", pure_purify_start_batch_show_first, METH_VARARGS}, {"purify_stop_batch", pure_purify_stop_batch, METH_VARARGS}, {"purify_name_thread", pure_purify_name_thread, METH_VARARGS}, {"purify_watch", pure_purify_watch, METH_VARARGS}, {"purify_watch_1", pure_purify_watch_1, METH_VARARGS}, {"purify_watch_2", pure_purify_watch_2, METH_VARARGS}, {"purify_watch_4", pure_purify_watch_4, METH_VARARGS}, {"purify_watch_8", pure_purify_watch_8, METH_VARARGS}, {"purify_watch_w_1", pure_purify_watch_w_1, METH_VARARGS}, {"purify_watch_w_2", pure_purify_watch_w_2, METH_VARARGS}, {"purify_watch_w_4", pure_purify_watch_w_4, METH_VARARGS}, {"purify_watch_w_8", pure_purify_watch_w_8, METH_VARARGS}, {"purify_watch_r_1", pure_purify_watch_r_1, METH_VARARGS}, {"purify_watch_r_2", pure_purify_watch_r_2, METH_VARARGS}, {"purify_watch_r_4", pure_purify_watch_r_4, METH_VARARGS}, {"purify_watch_r_8", pure_purify_watch_r_8, METH_VARARGS}, {"purify_watch_rw_1", pure_purify_watch_rw_1, METH_VARARGS}, {"purify_watch_rw_2", pure_purify_watch_rw_2, METH_VARARGS}, {"purify_watch_rw_4", pure_purify_watch_rw_4, METH_VARARGS}, {"purify_watch_rw_8", pure_purify_watch_rw_8, METH_VARARGS}, {"purify_watch_n", pure_purify_watch_n, METH_VARARGS}, {"purify_watch_info", pure_purify_watch_info, METH_VARARGS}, {"purify_watch_remove", pure_purify_watch_remove, METH_VARARGS}, {"purify_watch_remove_all", pure_purify_watch_remove_all, METH_VARARGS}, {"purify_describe", pure_purify_describe, METH_VARARGS}, {"purify_what_colors", pure_purify_what_colors, METH_VARARGS}, {"purify_is_running", pure_purify_is_running, METH_VARARGS}, {"purify_assert_is_readable", pure_purify_assert_is_readable, METH_VARARGS}, {"purify_assert_is_writable", pure_purify_assert_is_writable, METH_VARARGS}, #if HAS_PURIFY_EXIT /* I wish I could include this, but I can't. See the notes at the * top of the file. */ {"purify_exit", pure_purify_exit, METH_VARARGS}, #endif /* HAS_PURIFY_EXIT */ #endif /* PURIFY_H */ #ifdef QUANTIFY_H {"quantify_is_running", pure_quantify_is_running, METH_VARARGS}, {"quantify_help", pure_quantify_help, METH_VARARGS}, {"quantify_print_recording_state", pure_quantify_print_recording_state, METH_VARARGS}, {"quantify_start_recording_data", pure_quantify_start_recording_data, METH_VARARGS}, {"quantify_stop_recording_data", pure_quantify_stop_recording_data, METH_VARARGS}, {"quantify_is_recording_data", pure_quantify_is_recording_data, METH_VARARGS}, {"quantify_start_recording_system_calls", pure_quantify_start_recording_system_calls, METH_VARARGS}, {"quantify_stop_recording_system_calls", pure_quantify_stop_recording_system_calls, METH_VARARGS}, {"quantify_is_recording_system_calls", pure_quantify_is_recording_system_calls, METH_VARARGS}, {"quantify_start_recording_system_call", pure_quantify_start_recording_system_call, METH_VARARGS}, {"quantify_stop_recording_system_call", pure_quantify_stop_recording_system_call, METH_VARARGS}, {"quantify_is_recording_system_call", pure_quantify_is_recording_system_call, METH_VARARGS}, {"quantify_start_recording_dynamic_library_data", pure_quantify_start_recording_dynamic_library_data, METH_VARARGS}, {"quantify_stop_recording_dynamic_library_data", pure_quantify_stop_recording_dynamic_library_data, METH_VARARGS}, {"quantify_is_recording_dynamic_library_data", pure_quantify_is_recording_dynamic_library_data, METH_VARARGS}, {"quantify_start_recording_register_window_traps", pure_quantify_start_recording_register_window_traps, METH_VARARGS}, {"quantify_stop_recording_register_window_traps", pure_quantify_stop_recording_register_window_traps, METH_VARARGS}, {"quantify_is_recording_register_window_traps", pure_quantify_is_recording_register_window_traps, METH_VARARGS}, {"quantify_disable_recording_data", pure_quantify_disable_recording_data, METH_VARARGS}, {"quantify_clear_data", pure_quantify_clear_data, METH_VARARGS}, {"quantify_save_data", pure_quantify_save_data, METH_VARARGS}, {"quantify_save_data_to_file", pure_quantify_save_data_to_file, METH_VARARGS}, {"quantify_add_annotation", pure_quantify_add_annotation, METH_VARARGS}, #endif /* QUANTIFY_H */ {NULL, NULL} /* sentinel */ }; static void ins(d, name, val) PyObject *d; char* name; long val; { PyObject *v = PyInt_FromLong(val); if (v) { (void)PyDict_SetItemString(d, name, v); Py_DECREF(v); } } void initpure() { PyObject *m, *d; m = Py_InitModule("pure", pure_methods); d = PyModule_GetDict(m); /* this is bogus because we should be able to find this information * out from the header files. Pure's current versions don't * include this information! */ #ifdef PURE_PURIFY_VERSION ins(d, "PURIFY_VERSION", PURE_PURIFY_VERSION); #else PyDict_SetItemString(d, "PURIFY_VERSION", Py_None); #endif /* these aren't terribly useful because purify_exit() isn't * exported correctly. See the note at the top of the file. */ #ifdef PURIFY_EXIT_ERRORS ins(d, "PURIFY_EXIT_ERRORS", PURIFY_EXIT_ERRORS); #endif #ifdef PURIFY_EXIT_LEAKS ins(d, "PURIFY_EXIT_LEAKS", PURIFY_EXIT_LEAKS); #endif #ifdef PURIFY_EXIT_PLEAKS ins(d, "PURIFY_EXIT_PLEAKS", PURIFY_EXIT_PLEAKS); #endif #ifdef PURE_QUANTIFY_VERSION ins(d, "QUANTIFY_VERSION", PURE_QUANTIFY_VERSION); #else PyDict_SetItemString(d, "QUANTIFY_VERSION", Py_None); #endif } Python-2.3.7/Modules/_hotshot.c0000644001241000117560000013322310103652250015651 0ustar loewishpifb6/* * This is the High Performance Python Profiler portion of HotShot. */ #include "Python.h" #include "compile.h" #include "eval.h" #include "frameobject.h" #include "structmember.h" /* * Which timer to use should be made more configurable, but that should not * be difficult. This will do for now. */ #ifdef MS_WINDOWS #include #include /* for getcwd() */ typedef __int64 hs_time; #define GETTIMEOFDAY(P_HS_TIME) \ { LARGE_INTEGER _temp; \ QueryPerformanceCounter(&_temp); \ *(P_HS_TIME) = _temp.QuadPart; } #else #ifndef HAVE_GETTIMEOFDAY #error "This module requires gettimeofday() on non-Windows platforms!" #endif #if defined(macintosh) || (defined(PYOS_OS2) && defined(PYCC_GCC)) #include #else #include #include #endif typedef struct timeval hs_time; #endif #if !defined(__cplusplus) && !defined(inline) #ifdef __GNUC__ #define inline __inline #endif #endif #ifndef inline #define inline #endif #define BUFFERSIZE 10240 #ifdef macintosh #define PATH_MAX 254 #endif #if defined(PYOS_OS2) && defined(PYCC_GCC) #define PATH_MAX 260 #endif #if defined(__sgi) && _COMPILER_VERSION>700 && !defined(PATH_MAX) /* fix PATH_MAX not being defined with MIPSPro 7.x if mode is ANSI C (default) */ #define PATH_MAX 1024 #endif #ifndef PATH_MAX # ifdef MAX_PATH # define PATH_MAX MAX_PATH # elif defined (_POSIX_PATH_MAX) # define PATH_MAX _POSIX_PATH_MAX # else # error "Need a defn. for PATH_MAX in _hotshot.c" # endif #endif typedef struct { PyObject_HEAD PyObject *filemap; PyObject *logfilename; int index; unsigned char buffer[BUFFERSIZE]; FILE *logfp; int lineevents; int linetimings; int frametimings; /* size_t filled; */ int active; int next_fileno; hs_time prev_timeofday; } ProfilerObject; typedef struct { PyObject_HEAD PyObject *info; FILE *logfp; int linetimings; int frametimings; } LogReaderObject; static PyObject * ProfilerError = NULL; #ifndef MS_WINDOWS #ifdef GETTIMEOFDAY_NO_TZ #define GETTIMEOFDAY(ptv) gettimeofday((ptv)) #else #define GETTIMEOFDAY(ptv) gettimeofday((ptv), (struct timezone *)NULL) #endif #endif /* The log reader... */ PyDoc_STRVAR(logreader_close__doc__, "close()\n" "Close the log file, preventing additional records from being read."); static PyObject * logreader_close(LogReaderObject *self, PyObject *args) { if (self->logfp != NULL) { fclose(self->logfp); self->logfp = NULL; } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(logreader_fileno__doc__, "fileno() -> file descriptor\n" "Returns the file descriptor for the log file, if open.\n" "Raises ValueError if the log file is closed."); static PyObject * logreader_fileno(LogReaderObject *self) { if (self->logfp == NULL) { PyErr_SetString(PyExc_ValueError, "logreader's file object already closed"); return NULL; } return PyInt_FromLong(fileno(self->logfp)); } /* Log File Format * --------------- * * The log file consists of a sequence of variable-length records. * Each record is identified with a record type identifier in two * bits of the first byte. The two bits are the "least significant" * bits of the byte. * * Low bits: Opcode: Meaning: * 0x00 ENTER enter a frame * 0x01 EXIT exit a frame * 0x02 LINENO execution moved onto a different line * 0x03 OTHER more bits are needed to deecode * * If the type is OTHER, the record is not packed so tightly, and the * remaining bits are used to disambiguate the record type. These * records are not used as frequently so compaction is not an issue. * Each of the first three record types has a highly tailored * structure that allows it to be packed tightly. * * The OTHER records have the following identifiers: * * First byte: Opcode: Meaning: * 0x13 ADD_INFO define a key/value pair * 0x23 DEFINE_FILE define an int->filename mapping * 0x33 LINE_TIMES indicates if LINENO events have tdeltas * 0x43 DEFINE_FUNC define a (fileno,lineno)->funcname mapping * 0x53 FRAME_TIMES indicates if ENTER/EXIT events have tdeltas * * Packed Integers * * "Packed integers" are non-negative integer values encoded as a * sequence of bytes. Each byte is encoded such that the most * significant bit is set if the next byte is also part of the * integer. Each byte provides bits to the least-significant end of * the result; the accumulated value must be shifted up to place the * new bits into the result. * * "Modified packed integers" are packed integers where only a portion * of the first byte is used. In the rest of the specification, these * are referred to as "MPI(n,name)", where "n" is the number of bits * discarded from the least-signicant positions of the byte, and * "name" is a name being given to those "discarded" bits, since they * are a field themselves. * * ENTER records: * * MPI(2,type) fileno -- type is 0x00 * PI lineno * PI tdelta -- iff frame times are enabled * * EXIT records * * MPI(2,type) tdelta -- type is 0x01; tdelta will be 0 * if frame times are disabled * * LINENO records * * MPI(2,type) lineno -- type is 0x02 * PI tdelta -- iff LINENO includes it * * ADD_INFO records * * BYTE type -- always 0x13 * PI len1 -- length of first string * BYTE string1[len1] -- len1 bytes of string data * PI len2 -- length of second string * BYTE string2[len2] -- len2 bytes of string data * * DEFINE_FILE records * * BYTE type -- always 0x23 * PI fileno * PI len -- length of filename * BYTE filename[len] -- len bytes of string data * * DEFINE_FUNC records * * BYTE type -- always 0x43 * PI fileno * PI lineno * PI len -- length of funcname * BYTE funcname[len] -- len bytes of string data * * LINE_TIMES records * * This record can be used only before the start of ENTER/EXIT/LINENO * records. If have_tdelta is true, LINENO records will include the * tdelta field, otherwise it will be omitted. If this record is not * given, LINENO records will not contain the tdelta field. * * BYTE type -- always 0x33 * BYTE have_tdelta -- 0 if LINENO does *not* have * timing information * FRAME_TIMES records * * This record can be used only before the start of ENTER/EXIT/LINENO * records. If have_tdelta is true, ENTER and EXIT records will * include the tdelta field, otherwise it will be omitted. If this * record is not given, ENTER and EXIT records will contain the tdelta * field. * * BYTE type -- always 0x53 * BYTE have_tdelta -- 0 if ENTER/EXIT do *not* have * timing information */ #define WHAT_ENTER 0x00 #define WHAT_EXIT 0x01 #define WHAT_LINENO 0x02 #define WHAT_OTHER 0x03 /* only used in decoding */ #define WHAT_ADD_INFO 0x13 #define WHAT_DEFINE_FILE 0x23 #define WHAT_LINE_TIMES 0x33 #define WHAT_DEFINE_FUNC 0x43 #define WHAT_FRAME_TIMES 0x53 #define ERR_NONE 0 #define ERR_EOF -1 #define ERR_EXCEPTION -2 #define ERR_BAD_RECTYPE -3 #define PISIZE (sizeof(int) + 1) #define MPISIZE (PISIZE + 1) /* Maximum size of "normal" events -- nothing that contains string data */ #define MAXEVENTSIZE (MPISIZE + PISIZE*2) /* Unpack a packed integer; if "discard" is non-zero, unpack a modified * packed integer with "discard" discarded bits. */ static int unpack_packed_int(LogReaderObject *self, int *pvalue, int discard) { int c; int accum = 0; int bits = 0; int cont; do { /* read byte */ if ((c = fgetc(self->logfp)) == EOF) return ERR_EOF; accum |= ((c & 0x7F) >> discard) << bits; bits += (7 - discard); cont = c & 0x80; discard = 0; } while (cont); *pvalue = accum; return 0; } /* Unpack a string, which is encoded as a packed integer giving the * length of the string, followed by the string data. */ static int unpack_string(LogReaderObject *self, PyObject **pvalue) { int i; int len; int err; int ch; char *buf; if ((err = unpack_packed_int(self, &len, 0))) return err; buf = malloc(len); for (i=0; i < len; i++) { ch = fgetc(self->logfp); buf[i] = ch; if (ch == EOF) { free(buf); return ERR_EOF; } } *pvalue = PyString_FromStringAndSize(buf, len); free(buf); if (*pvalue == NULL) { return ERR_EXCEPTION; } return 0; } static int unpack_add_info(LogReaderObject *self) { PyObject *key; PyObject *value = NULL; int err; err = unpack_string(self, &key); if (!err) { err = unpack_string(self, &value); if (err) Py_DECREF(key); else { PyObject *list = PyDict_GetItem(self->info, key); if (list == NULL) { list = PyList_New(0); if (list == NULL) { err = ERR_EXCEPTION; goto finally; } if (PyDict_SetItem(self->info, key, list)) { Py_DECREF(list); err = ERR_EXCEPTION; goto finally; } Py_DECREF(list); } if (PyList_Append(list, value)) err = ERR_EXCEPTION; } } finally: Py_XDECREF(key); Py_XDECREF(value); return err; } static void eof_error(LogReaderObject *self) { fclose(self->logfp); self->logfp = NULL; PyErr_SetString(PyExc_EOFError, "end of file with incomplete profile record"); } static PyObject * logreader_tp_iternext(LogReaderObject *self) { int c; int what; int err = ERR_NONE; int lineno = -1; int fileno = -1; int tdelta = -1; PyObject *s1 = NULL, *s2 = NULL; PyObject *result = NULL; #if 0 unsigned char b0, b1; #endif if (self->logfp == NULL) { PyErr_SetString(ProfilerError, "cannot iterate over closed LogReader object"); return NULL; } restart: /* decode the record type */ if ((c = fgetc(self->logfp)) == EOF) { fclose(self->logfp); self->logfp = NULL; return NULL; } what = c & WHAT_OTHER; if (what == WHAT_OTHER) what = c; /* need all the bits for type */ else ungetc(c, self->logfp); /* type byte includes packed int */ switch (what) { case WHAT_ENTER: err = unpack_packed_int(self, &fileno, 2); if (!err) { err = unpack_packed_int(self, &lineno, 0); if (self->frametimings && !err) err = unpack_packed_int(self, &tdelta, 0); } break; case WHAT_EXIT: err = unpack_packed_int(self, &tdelta, 2); break; case WHAT_LINENO: err = unpack_packed_int(self, &lineno, 2); if (self->linetimings && !err) err = unpack_packed_int(self, &tdelta, 0); break; case WHAT_ADD_INFO: err = unpack_add_info(self); break; case WHAT_DEFINE_FILE: err = unpack_packed_int(self, &fileno, 0); if (!err) { err = unpack_string(self, &s1); if (!err) { Py_INCREF(Py_None); s2 = Py_None; } } break; case WHAT_DEFINE_FUNC: err = unpack_packed_int(self, &fileno, 0); if (!err) { err = unpack_packed_int(self, &lineno, 0); if (!err) err = unpack_string(self, &s1); } break; case WHAT_LINE_TIMES: if ((c = fgetc(self->logfp)) == EOF) err = ERR_EOF; else { self->linetimings = c ? 1 : 0; goto restart; } break; case WHAT_FRAME_TIMES: if ((c = fgetc(self->logfp)) == EOF) err = ERR_EOF; else { self->frametimings = c ? 1 : 0; goto restart; } break; default: err = ERR_BAD_RECTYPE; } if (err == ERR_BAD_RECTYPE) { PyErr_SetString(PyExc_ValueError, "unknown record type in log file"); } else if (err == ERR_EOF) { eof_error(self); } else if (!err) { result = PyTuple_New(4); PyTuple_SET_ITEM(result, 0, PyInt_FromLong(what)); PyTuple_SET_ITEM(result, 2, PyInt_FromLong(fileno)); if (s1 == NULL) PyTuple_SET_ITEM(result, 1, PyInt_FromLong(tdelta)); else PyTuple_SET_ITEM(result, 1, s1); if (s2 == NULL) PyTuple_SET_ITEM(result, 3, PyInt_FromLong(lineno)); else PyTuple_SET_ITEM(result, 3, s2); } /* The only other case is err == ERR_EXCEPTION, in which case the * exception is already set. */ #if 0 b0 = self->buffer[self->index]; b1 = self->buffer[self->index + 1]; if (b0 & 1) { /* This is a line-number event. */ what = PyTrace_LINE; lineno = ((b0 & ~1) << 7) + b1; self->index += 2; } else { what = (b0 & 0x0E) >> 1; tdelta = ((b0 & 0xF0) << 4) + b1; if (what == PyTrace_CALL) { /* we know there's a 2-byte file ID & 2-byte line number */ fileno = ((self->buffer[self->index + 2] << 8) + self->buffer[self->index + 3]); lineno = ((self->buffer[self->index + 4] << 8) + self->buffer[self->index + 5]); self->index += 6; } else self->index += 2; } #endif return result; } static void logreader_dealloc(LogReaderObject *self) { if (self->logfp != NULL) { fclose(self->logfp); self->logfp = NULL; } Py_XDECREF(self->info); PyObject_Del(self); } static PyObject * logreader_sq_item(LogReaderObject *self, int index) { PyObject *result = logreader_tp_iternext(self); if (result == NULL && !PyErr_Occurred()) { PyErr_SetString(PyExc_IndexError, "no more events in log"); return NULL; } return result; } static void do_stop(ProfilerObject *self); static int flush_data(ProfilerObject *self) { /* Need to dump data to the log file... */ size_t written = fwrite(self->buffer, 1, self->index, self->logfp); if (written == (size_t)self->index) self->index = 0; else { memmove(self->buffer, &self->buffer[written], self->index - written); self->index -= written; if (written == 0) { char *s = PyString_AsString(self->logfilename); PyErr_SetFromErrnoWithFilename(PyExc_IOError, s); do_stop(self); return -1; } } if (written > 0) { if (fflush(self->logfp)) { char *s = PyString_AsString(self->logfilename); PyErr_SetFromErrnoWithFilename(PyExc_IOError, s); do_stop(self); return -1; } } return 0; } static inline int pack_packed_int(ProfilerObject *self, int value) { unsigned char partial; do { partial = value & 0x7F; value >>= 7; if (value) partial |= 0x80; self->buffer[self->index] = partial; self->index++; } while (value); return 0; } /* Encode a modified packed integer, with a subfield of modsize bits * containing the value "subfield". The value of subfield is not * checked to ensure it actually fits in modsize bits. */ static inline int pack_modified_packed_int(ProfilerObject *self, int value, int modsize, int subfield) { const int maxvalues[] = {-1, 1, 3, 7, 15, 31, 63, 127}; int bits = 7 - modsize; int partial = value & maxvalues[bits]; unsigned char b = subfield | (partial << modsize); if (partial != value) { b |= 0x80; self->buffer[self->index] = b; self->index++; return pack_packed_int(self, value >> bits); } self->buffer[self->index] = b; self->index++; return 0; } static int pack_string(ProfilerObject *self, const char *s, int len) { if (len + PISIZE + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } if (pack_packed_int(self, len) < 0) return -1; memcpy(self->buffer + self->index, s, len); self->index += len; return 0; } static int pack_add_info(ProfilerObject *self, const char *s1, const char *s2) { int len1 = strlen(s1); int len2 = strlen(s2); if (len1 + len2 + PISIZE*2 + 1 + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } self->buffer[self->index] = WHAT_ADD_INFO; self->index++; if (pack_string(self, s1, len1) < 0) return -1; return pack_string(self, s2, len2); } static int pack_define_file(ProfilerObject *self, int fileno, const char *filename) { int len = strlen(filename); if (len + PISIZE*2 + 1 + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } self->buffer[self->index] = WHAT_DEFINE_FILE; self->index++; if (pack_packed_int(self, fileno) < 0) return -1; return pack_string(self, filename, len); } static int pack_define_func(ProfilerObject *self, int fileno, int lineno, const char *funcname) { int len = strlen(funcname); if (len + PISIZE*3 + 1 + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } self->buffer[self->index] = WHAT_DEFINE_FUNC; self->index++; if (pack_packed_int(self, fileno) < 0) return -1; if (pack_packed_int(self, lineno) < 0) return -1; return pack_string(self, funcname, len); } static int pack_line_times(ProfilerObject *self) { if (2 + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } self->buffer[self->index] = WHAT_LINE_TIMES; self->buffer[self->index + 1] = self->linetimings ? 1 : 0; self->index += 2; return 0; } static int pack_frame_times(ProfilerObject *self) { if (2 + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } self->buffer[self->index] = WHAT_FRAME_TIMES; self->buffer[self->index + 1] = self->frametimings ? 1 : 0; self->index += 2; return 0; } static inline int pack_enter(ProfilerObject *self, int fileno, int tdelta, int lineno) { if (MPISIZE + PISIZE*2 + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } pack_modified_packed_int(self, fileno, 2, WHAT_ENTER); pack_packed_int(self, lineno); if (self->frametimings) return pack_packed_int(self, tdelta); else return 0; } static inline int pack_exit(ProfilerObject *self, int tdelta) { if (MPISIZE + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } if (self->frametimings) return pack_modified_packed_int(self, tdelta, 2, WHAT_EXIT); self->buffer[self->index] = WHAT_EXIT; self->index++; return 0; } static inline int pack_lineno(ProfilerObject *self, int lineno) { if (MPISIZE + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return -1; } return pack_modified_packed_int(self, lineno, 2, WHAT_LINENO); } static inline int pack_lineno_tdelta(ProfilerObject *self, int lineno, int tdelta) { if (MPISIZE + PISIZE + self->index >= BUFFERSIZE) { if (flush_data(self) < 0) return 0; } if (pack_modified_packed_int(self, lineno, 2, WHAT_LINENO) < 0) return -1; return pack_packed_int(self, tdelta); } static inline int get_fileno(ProfilerObject *self, PyCodeObject *fcode) { /* This is only used for ENTER events. */ PyObject *obj; PyObject *dict; int fileno; obj = PyDict_GetItem(self->filemap, fcode->co_filename); if (obj == NULL) { /* first sighting of this file */ dict = PyDict_New(); if (dict == NULL) { return -1; } fileno = self->next_fileno; obj = Py_BuildValue("iN", fileno, dict); if (obj == NULL) { return -1; } if (PyDict_SetItem(self->filemap, fcode->co_filename, obj)) { Py_DECREF(obj); return -1; } self->next_fileno++; Py_DECREF(obj); if (pack_define_file(self, fileno, PyString_AS_STRING(fcode->co_filename)) < 0) return -1; } else { /* already know this ID */ fileno = PyInt_AS_LONG(PyTuple_GET_ITEM(obj, 0)); dict = PyTuple_GET_ITEM(obj, 1); } /* make sure we save a function name for this (fileno, lineno) */ obj = PyInt_FromLong(fcode->co_firstlineno); if (obj == NULL) { /* We just won't have it saved; too bad. */ PyErr_Clear(); } else { PyObject *name = PyDict_GetItem(dict, obj); if (name == NULL) { if (pack_define_func(self, fileno, fcode->co_firstlineno, PyString_AS_STRING(fcode->co_name)) < 0) { Py_DECREF(obj); return -1; } if (PyDict_SetItem(dict, obj, fcode->co_name)) { Py_DECREF(obj); return -1; } } Py_DECREF(obj); } return fileno; } static inline int get_tdelta(ProfilerObject *self) { int tdelta; #ifdef MS_WINDOWS hs_time tv; hs_time diff; GETTIMEOFDAY(&tv); diff = tv - self->prev_timeofday; tdelta = (int)diff; #else struct timeval tv; GETTIMEOFDAY(&tv); if (tv.tv_sec == self->prev_timeofday.tv_sec) tdelta = tv.tv_usec - self->prev_timeofday.tv_usec; else tdelta = ((tv.tv_sec - self->prev_timeofday.tv_sec) * 1000000 + tv.tv_usec); #endif self->prev_timeofday = tv; return tdelta; } /* The workhorse: the profiler callback function. */ static int profiler_callback(ProfilerObject *self, PyFrameObject *frame, int what, PyObject *arg) { int tdelta = -1; int fileno; if (self->frametimings) tdelta = get_tdelta(self); switch (what) { case PyTrace_CALL: fileno = get_fileno(self, frame->f_code); if (fileno < 0) return -1; if (pack_enter(self, fileno, tdelta, frame->f_code->co_firstlineno) < 0) return -1; break; case PyTrace_RETURN: if (pack_exit(self, tdelta) < 0) return -1; break; default: /* should never get here */ break; } return 0; } /* Alternate callback when we want PyTrace_LINE events */ static int tracer_callback(ProfilerObject *self, PyFrameObject *frame, int what, PyObject *arg) { int fileno; switch (what) { case PyTrace_CALL: fileno = get_fileno(self, frame->f_code); if (fileno < 0) return -1; return pack_enter(self, fileno, self->frametimings ? get_tdelta(self) : -1, frame->f_code->co_firstlineno); case PyTrace_RETURN: return pack_exit(self, get_tdelta(self)); case PyTrace_LINE: if (self->linetimings) return pack_lineno_tdelta(self, frame->f_lineno, get_tdelta(self)); else return pack_lineno(self, frame->f_lineno); default: /* ignore PyTrace_EXCEPTION */ break; } return 0; } /* A couple of useful helper functions. */ #ifdef MS_WINDOWS static LARGE_INTEGER frequency = {0, 0}; #endif static unsigned long timeofday_diff = 0; static unsigned long rusage_diff = 0; static void calibrate(void) { hs_time tv1, tv2; #ifdef MS_WINDOWS hs_time diff; QueryPerformanceFrequency(&frequency); #endif GETTIMEOFDAY(&tv1); while (1) { GETTIMEOFDAY(&tv2); #ifdef MS_WINDOWS diff = tv2 - tv1; if (diff != 0) { timeofday_diff = (unsigned long)diff; break; } #else if (tv1.tv_sec != tv2.tv_sec || tv1.tv_usec != tv2.tv_usec) { if (tv1.tv_sec == tv2.tv_sec) timeofday_diff = tv2.tv_usec - tv1.tv_usec; else timeofday_diff = (1000000 - tv1.tv_usec) + tv2.tv_usec; break; } #endif } #if defined(MS_WINDOWS) || defined(macintosh) || defined(PYOS_OS2) || \ defined(__VMS) rusage_diff = -1; #else { struct rusage ru1, ru2; getrusage(RUSAGE_SELF, &ru1); while (1) { getrusage(RUSAGE_SELF, &ru2); if (ru1.ru_utime.tv_sec != ru2.ru_utime.tv_sec) { rusage_diff = ((1000000 - ru1.ru_utime.tv_usec) + ru2.ru_utime.tv_usec); break; } else if (ru1.ru_utime.tv_usec != ru2.ru_utime.tv_usec) { rusage_diff = ru2.ru_utime.tv_usec - ru1.ru_utime.tv_usec; break; } else if (ru1.ru_stime.tv_sec != ru2.ru_stime.tv_sec) { rusage_diff = ((1000000 - ru1.ru_stime.tv_usec) + ru2.ru_stime.tv_usec); break; } else if (ru1.ru_stime.tv_usec != ru2.ru_stime.tv_usec) { rusage_diff = ru2.ru_stime.tv_usec - ru1.ru_stime.tv_usec; break; } } } #endif } static void do_start(ProfilerObject *self) { self->active = 1; GETTIMEOFDAY(&self->prev_timeofday); if (self->lineevents) PyEval_SetTrace((Py_tracefunc) tracer_callback, (PyObject *)self); else PyEval_SetProfile((Py_tracefunc) profiler_callback, (PyObject *)self); } static void do_stop(ProfilerObject *self) { if (self->active) { self->active = 0; if (self->lineevents) PyEval_SetTrace(NULL, NULL); else PyEval_SetProfile(NULL, NULL); } if (self->index > 0) { /* Best effort to dump out any remaining data. */ flush_data(self); } } static int is_available(ProfilerObject *self) { if (self->active) { PyErr_SetString(ProfilerError, "profiler already active"); return 0; } if (self->logfp == NULL) { PyErr_SetString(ProfilerError, "profiler already closed"); return 0; } return 1; } /* Profiler object interface methods. */ PyDoc_STRVAR(addinfo__doc__, "addinfo(key, value)\n" "Insert an ADD_INFO record into the log."); static PyObject * profiler_addinfo(ProfilerObject *self, PyObject *args) { PyObject *result = NULL; char *key, *value; if (PyArg_ParseTuple(args, "ss:addinfo", &key, &value)) { if (self->logfp == NULL) PyErr_SetString(ProfilerError, "profiler already closed"); else { if (pack_add_info(self, key, value) == 0) { result = Py_None; Py_INCREF(result); } } } return result; } PyDoc_STRVAR(close__doc__, "close()\n" "Shut down this profiler and close the log files, even if its active."); static PyObject * profiler_close(ProfilerObject *self) { do_stop(self); if (self->logfp != NULL) { fclose(self->logfp); self->logfp = NULL; } Py_INCREF(Py_None); return Py_None; } #define fileno__doc__ logreader_fileno__doc__ static PyObject * profiler_fileno(ProfilerObject *self) { if (self->logfp == NULL) { PyErr_SetString(PyExc_ValueError, "profiler's file object already closed"); return NULL; } return PyInt_FromLong(fileno(self->logfp)); } PyDoc_STRVAR(runcall__doc__, "runcall(callable[, args[, kw]]) -> callable()\n" "Profile a specific function call, returning the result of that call."); static PyObject * profiler_runcall(ProfilerObject *self, PyObject *args) { PyObject *result = NULL; PyObject *callargs = NULL; PyObject *callkw = NULL; PyObject *callable; if (PyArg_ParseTuple(args, "O|OO:runcall", &callable, &callargs, &callkw)) { if (is_available(self)) { do_start(self); result = PyEval_CallObjectWithKeywords(callable, callargs, callkw); do_stop(self); } } return result; } PyDoc_STRVAR(runcode__doc__, "runcode(code, globals[, locals])\n" "Execute a code object while collecting profile data. If locals is\n" "omitted, globals is used for the locals as well."); static PyObject * profiler_runcode(ProfilerObject *self, PyObject *args) { PyObject *result = NULL; PyCodeObject *code; PyObject *globals; PyObject *locals = NULL; if (PyArg_ParseTuple(args, "O!O!|O:runcode", &PyCode_Type, &code, &PyDict_Type, &globals, &locals)) { if (is_available(self)) { if (locals == NULL || locals == Py_None) locals = globals; else if (!PyDict_Check(locals)) { PyErr_SetString(PyExc_TypeError, "locals must be a dictionary or None"); return NULL; } do_start(self); result = PyEval_EvalCode(code, globals, locals); do_stop(self); #if 0 if (!PyErr_Occurred()) { result = Py_None; Py_INCREF(result); } #endif } } return result; } PyDoc_STRVAR(start__doc__, "start()\n" "Install this profiler for the current thread."); static PyObject * profiler_start(ProfilerObject *self, PyObject *args) { PyObject *result = NULL; if (is_available(self)) { do_start(self); result = Py_None; Py_INCREF(result); } return result; } PyDoc_STRVAR(stop__doc__, "stop()\n" "Remove this profiler from the current thread."); static PyObject * profiler_stop(ProfilerObject *self, PyObject *args) { PyObject *result = NULL; if (!self->active) PyErr_SetString(ProfilerError, "profiler not active"); else { do_stop(self); result = Py_None; Py_INCREF(result); } return result; } /* Python API support. */ static void profiler_dealloc(ProfilerObject *self) { do_stop(self); if (self->logfp != NULL) fclose(self->logfp); Py_XDECREF(self->filemap); Py_XDECREF(self->logfilename); PyObject_Del((PyObject *)self); } static PyMethodDef profiler_methods[] = { {"addinfo", (PyCFunction)profiler_addinfo, METH_VARARGS, addinfo__doc__}, {"close", (PyCFunction)profiler_close, METH_NOARGS, close__doc__}, {"fileno", (PyCFunction)profiler_fileno, METH_NOARGS, fileno__doc__}, {"runcall", (PyCFunction)profiler_runcall, METH_VARARGS, runcall__doc__}, {"runcode", (PyCFunction)profiler_runcode, METH_VARARGS, runcode__doc__}, {"start", (PyCFunction)profiler_start, METH_NOARGS, start__doc__}, {"stop", (PyCFunction)profiler_stop, METH_NOARGS, stop__doc__}, {NULL, NULL} }; static PyMemberDef profiler_members[] = { {"frametimings", T_LONG, offsetof(ProfilerObject, linetimings), READONLY}, {"lineevents", T_LONG, offsetof(ProfilerObject, lineevents), READONLY}, {"linetimings", T_LONG, offsetof(ProfilerObject, linetimings), READONLY}, {NULL} }; static PyObject * profiler_get_closed(ProfilerObject *self, void *closure) { PyObject *result = (self->logfp == NULL) ? Py_True : Py_False; Py_INCREF(result); return result; } static PyGetSetDef profiler_getsets[] = { {"closed", (getter)profiler_get_closed, NULL, PyDoc_STR("True if the profiler's output file has already been closed.")}, {NULL} }; PyDoc_STRVAR(profiler_object__doc__, "High-performance profiler object.\n" "\n" "Methods:\n" "\n" "close(): Stop the profiler and close the log files.\n" "fileno(): Returns the file descriptor of the log file.\n" "runcall(): Run a single function call with profiling enabled.\n" "runcode(): Execute a code object with profiling enabled.\n" "start(): Install the profiler and return.\n" "stop(): Remove the profiler.\n" "\n" "Attributes (read-only):\n" "\n" "closed: True if the profiler has already been closed.\n" "frametimings: True if ENTER/EXIT events collect timing information.\n" "lineevents: True if line events are reported to the profiler.\n" "linetimings: True if line events collect timing information."); static PyTypeObject ProfilerType = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "_hotshot.ProfilerType", /* tp_name */ (int) sizeof(ProfilerObject), /* tp_basicsize */ 0, /* tp_itemsize */ (destructor)profiler_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT, /* tp_flags */ profiler_object__doc__, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ profiler_methods, /* tp_methods */ profiler_members, /* tp_members */ profiler_getsets, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ }; static PyMethodDef logreader_methods[] = { {"close", (PyCFunction)logreader_close, METH_NOARGS, logreader_close__doc__}, {"fileno", (PyCFunction)logreader_fileno, METH_NOARGS, logreader_fileno__doc__}, {NULL, NULL} }; static PyMemberDef logreader_members[] = { {"info", T_OBJECT, offsetof(LogReaderObject, info), RO, PyDoc_STR("Dictionary mapping informational keys to lists of values.")}, {NULL} }; PyDoc_STRVAR(logreader__doc__, "logreader(filename) --> log-iterator\n\ Create a log-reader for the timing information file."); static PySequenceMethods logreader_as_sequence = { 0, /* sq_length */ 0, /* sq_concat */ 0, /* sq_repeat */ (intargfunc)logreader_sq_item, /* sq_item */ 0, /* sq_slice */ 0, /* sq_ass_item */ 0, /* sq_ass_slice */ 0, /* sq_contains */ 0, /* sq_inplace_concat */ 0, /* sq_inplace_repeat */ }; static PyObject * logreader_get_closed(LogReaderObject *self, void *closure) { PyObject *result = (self->logfp == NULL) ? Py_True : Py_False; Py_INCREF(result); return result; } static PyGetSetDef logreader_getsets[] = { {"closed", (getter)logreader_get_closed, NULL, PyDoc_STR("True if the logreader's input file has already been closed.")}, {NULL} }; static PyTypeObject LogReaderType = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "_hotshot.LogReaderType", /* tp_name */ (int) sizeof(LogReaderObject), /* tp_basicsize */ 0, /* tp_itemsize */ (destructor)logreader_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ &logreader_as_sequence, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT, /* tp_flags */ logreader__doc__, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)logreader_tp_iternext,/* tp_iternext */ logreader_methods, /* tp_methods */ logreader_members, /* tp_members */ logreader_getsets, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ }; static PyObject * hotshot_logreader(PyObject *unused, PyObject *args) { LogReaderObject *self = NULL; char *filename; int c; int err = 0; if (PyArg_ParseTuple(args, "s:logreader", &filename)) { self = PyObject_New(LogReaderObject, &LogReaderType); if (self != NULL) { self->frametimings = 1; self->linetimings = 0; self->info = NULL; self->logfp = fopen(filename, "rb"); if (self->logfp == NULL) { PyErr_SetFromErrnoWithFilename(PyExc_IOError, filename); Py_DECREF(self); self = NULL; goto finally; } self->info = PyDict_New(); if (self->info == NULL) { Py_DECREF(self); goto finally; } /* read initial info */ for (;;) { if ((c = fgetc(self->logfp)) == EOF) { eof_error(self); break; } if (c != WHAT_ADD_INFO) { ungetc(c, self->logfp); break; } err = unpack_add_info(self); if (err) { if (err == ERR_EOF) eof_error(self); else PyErr_SetString(PyExc_RuntimeError, "unexpected error"); break; } } } } finally: return (PyObject *) self; } /* Return a Python string that represents the version number without the * extra cruft added by revision control, even if the right options were * given to the "cvs export" command to make it not include the extra * cruft. */ static char * get_version_string(void) { static char *rcsid = "$Revision: 36744 $"; char *rev = rcsid; char *buffer; int i = 0; while (*rev && !isdigit((int)*rev)) ++rev; while (rev[i] != ' ' && rev[i] != '\0') ++i; buffer = malloc(i + 1); if (buffer != NULL) { memmove(buffer, rev, i); buffer[i] = '\0'; } return buffer; } /* Write out a RFC 822-style header with various useful bits of * information to make the output easier to manage. */ static int write_header(ProfilerObject *self) { char *buffer; char cwdbuffer[PATH_MAX]; PyObject *temp; int i, len; buffer = get_version_string(); if (buffer == NULL) { PyErr_NoMemory(); return -1; } pack_add_info(self, "hotshot-version", buffer); pack_add_info(self, "requested-frame-timings", (self->frametimings ? "yes" : "no")); pack_add_info(self, "requested-line-events", (self->lineevents ? "yes" : "no")); pack_add_info(self, "requested-line-timings", (self->linetimings ? "yes" : "no")); pack_add_info(self, "platform", Py_GetPlatform()); pack_add_info(self, "executable", Py_GetProgramFullPath()); free(buffer); buffer = (char *) Py_GetVersion(); if (buffer == NULL) PyErr_Clear(); else pack_add_info(self, "executable-version", buffer); #ifdef MS_WINDOWS PyOS_snprintf(cwdbuffer, sizeof(cwdbuffer), "%I64d", frequency.QuadPart); pack_add_info(self, "reported-performance-frequency", cwdbuffer); #else PyOS_snprintf(cwdbuffer, sizeof(cwdbuffer), "%lu", rusage_diff); pack_add_info(self, "observed-interval-getrusage", cwdbuffer); PyOS_snprintf(cwdbuffer, sizeof(cwdbuffer), "%lu", timeofday_diff); pack_add_info(self, "observed-interval-gettimeofday", cwdbuffer); #endif pack_add_info(self, "current-directory", getcwd(cwdbuffer, sizeof cwdbuffer)); temp = PySys_GetObject("path"); len = PyList_GET_SIZE(temp); for (i = 0; i < len; ++i) { PyObject *item = PyList_GET_ITEM(temp, i); buffer = PyString_AsString(item); if (buffer == NULL) { pack_add_info(self, "sys-path-entry", ""); PyErr_Clear(); } else { pack_add_info(self, "sys-path-entry", buffer); } } pack_frame_times(self); pack_line_times(self); return 0; } PyDoc_STRVAR(profiler__doc__, "profiler(logfilename[, lineevents[, linetimes]]) -> profiler\n\ Create a new profiler object."); static PyObject * hotshot_profiler(PyObject *unused, PyObject *args) { char *logfilename; ProfilerObject *self = NULL; int lineevents = 0; int linetimings = 1; if (PyArg_ParseTuple(args, "s|ii:profiler", &logfilename, &lineevents, &linetimings)) { self = PyObject_New(ProfilerObject, &ProfilerType); if (self == NULL) return NULL; self->frametimings = 1; self->lineevents = lineevents ? 1 : 0; self->linetimings = (lineevents && linetimings) ? 1 : 0; self->index = 0; self->active = 0; self->next_fileno = 0; self->logfp = NULL; self->logfilename = PyTuple_GET_ITEM(args, 0); Py_INCREF(self->logfilename); self->filemap = PyDict_New(); if (self->filemap == NULL) { Py_DECREF(self); return NULL; } self->logfp = fopen(logfilename, "wb"); if (self->logfp == NULL) { Py_DECREF(self); PyErr_SetFromErrnoWithFilename(PyExc_IOError, logfilename); return NULL; } if (timeofday_diff == 0) { /* Run this several times since sometimes the first * doesn't give the lowest values, and we're really trying * to determine the lowest. */ calibrate(); calibrate(); calibrate(); } if (write_header(self)) /* some error occurred, exception has been set */ self = NULL; } return (PyObject *) self; } PyDoc_STRVAR(coverage__doc__, "coverage(logfilename) -> profiler\n\ Returns a profiler that doesn't collect any timing information, which is\n\ useful in building a coverage analysis tool."); static PyObject * hotshot_coverage(PyObject *unused, PyObject *args) { char *logfilename; PyObject *result = NULL; if (PyArg_ParseTuple(args, "s:coverage", &logfilename)) { result = hotshot_profiler(unused, args); if (result != NULL) { ProfilerObject *self = (ProfilerObject *) result; self->frametimings = 0; self->linetimings = 0; self->lineevents = 1; } } return result; } PyDoc_VAR(resolution__doc__) = #ifdef MS_WINDOWS PyDoc_STR( "resolution() -> (performance-counter-ticks, update-frequency)\n" "Return the resolution of the timer provided by the QueryPerformanceCounter()\n" "function. The first value is the smallest observed change, and the second\n" "is the result of QueryPerformanceFrequency()." ) #else PyDoc_STR( "resolution() -> (gettimeofday-usecs, getrusage-usecs)\n" "Return the resolution of the timers provided by the gettimeofday() and\n" "getrusage() system calls, or -1 if the call is not supported." ) #endif ; static PyObject * hotshot_resolution(PyObject *unused, PyObject *args) { PyObject *result = NULL; if (PyArg_ParseTuple(args, ":resolution")) { if (timeofday_diff == 0) { calibrate(); calibrate(); calibrate(); } #ifdef MS_WINDOWS result = Py_BuildValue("ii", timeofday_diff, frequency.LowPart); #else result = Py_BuildValue("ii", timeofday_diff, rusage_diff); #endif } return result; } static PyMethodDef functions[] = { {"coverage", hotshot_coverage, METH_VARARGS, coverage__doc__}, {"profiler", hotshot_profiler, METH_VARARGS, profiler__doc__}, {"logreader", hotshot_logreader, METH_VARARGS, logreader__doc__}, {"resolution", hotshot_resolution, METH_VARARGS, resolution__doc__}, {NULL, NULL} }; void init_hotshot(void) { PyObject *module; LogReaderType.ob_type = &PyType_Type; ProfilerType.ob_type = &PyType_Type; module = Py_InitModule("_hotshot", functions); if (module != NULL) { char *s = get_version_string(); PyModule_AddStringConstant(module, "__version__", s); free(s); Py_INCREF(&LogReaderType); PyModule_AddObject(module, "LogReaderType", (PyObject *)&LogReaderType); Py_INCREF(&ProfilerType); PyModule_AddObject(module, "ProfilerType", (PyObject *)&ProfilerType); if (ProfilerError == NULL) ProfilerError = PyErr_NewException("hotshot.ProfilerError", NULL, NULL); if (ProfilerError != NULL) { Py_INCREF(ProfilerError); PyModule_AddObject(module, "ProfilerError", ProfilerError); } PyModule_AddIntConstant(module, "WHAT_ENTER", WHAT_ENTER); PyModule_AddIntConstant(module, "WHAT_EXIT", WHAT_EXIT); PyModule_AddIntConstant(module, "WHAT_LINENO", WHAT_LINENO); PyModule_AddIntConstant(module, "WHAT_OTHER", WHAT_OTHER); PyModule_AddIntConstant(module, "WHAT_ADD_INFO", WHAT_ADD_INFO); PyModule_AddIntConstant(module, "WHAT_DEFINE_FILE", WHAT_DEFINE_FILE); PyModule_AddIntConstant(module, "WHAT_DEFINE_FUNC", WHAT_DEFINE_FUNC); PyModule_AddIntConstant(module, "WHAT_LINE_TIMES", WHAT_LINE_TIMES); } } Python-2.3.7/Modules/zipimport.c0000644001241000117560000007373507707277007016115 0ustar loewishpifb6#include "Python.h" #include "structmember.h" #include "osdefs.h" #include "marshal.h" #include "compile.h" #include #define IS_SOURCE 0x0 #define IS_BYTECODE 0x1 #define IS_PACKAGE 0x2 struct st_zip_searchorder { char suffix[14]; int type; }; /* zip_searchorder defines how we search for a module in the Zip archive: we first search for a package __init__, then for non-package .pyc, .pyo and .py entries. The .pyc and .pyo entries are swapped by initzipimport() if we run in optimized mode. Also, '/' is replaced by SEP there. */ static struct st_zip_searchorder zip_searchorder[] = { {"/__init__.pyc", IS_PACKAGE | IS_BYTECODE}, {"/__init__.pyo", IS_PACKAGE | IS_BYTECODE}, {"/__init__.py", IS_PACKAGE | IS_SOURCE}, {".pyc", IS_BYTECODE}, {".pyo", IS_BYTECODE}, {".py", IS_SOURCE}, {"", 0} }; /* zipimporter object definition and support */ typedef struct _zipimporter ZipImporter; struct _zipimporter { PyObject_HEAD PyObject *archive; /* pathname of the Zip archive */ PyObject *prefix; /* file prefix: "a/sub/directory/" */ PyObject *files; /* dict with file info {path: toc_entry} */ }; static PyTypeObject ZipImporter_Type; static PyObject *ZipImportError; static PyObject *zip_directory_cache = NULL; /* forward decls */ static PyObject *read_directory(char *archive); static PyObject *get_data(char *archive, PyObject *toc_entry); static PyObject *get_module_code(ZipImporter *self, char *fullname, int *p_ispackage, char **p_modpath); #define ZipImporter_Check(op) PyObject_TypeCheck(op, &ZipImporter_Type) /* zipimporter.__init__ Split the "subdirectory" from the Zip archive path, lookup a matching entry in sys.path_importer_cache, fetch the file directory from there if found, or else read it from the archive. */ static int zipimporter_init(ZipImporter *self, PyObject *args, PyObject *kwds) { char *path, *p, *prefix, buf[MAXPATHLEN+2]; int len; if (!PyArg_ParseTuple(args, "s:zipimporter", &path)) return -1; len = strlen(path); if (len == 0) { PyErr_SetString(ZipImportError, "archive path is empty"); return -1; } if (len >= MAXPATHLEN) { PyErr_SetString(ZipImportError, "archive path too long"); return -1; } strcpy(buf, path); #ifdef ALTSEP for (p = buf; *p; p++) { if (*p == ALTSEP) *p = SEP; } #endif path = NULL; prefix = NULL; for (;;) { #ifndef RISCOS struct stat statbuf; int rv; rv = stat(buf, &statbuf); if (rv == 0) { /* it exists */ if (S_ISREG(statbuf.st_mode)) /* it's a file */ path = buf; break; } #else if (object_exists(buf)) { /* it exists */ if (isfile(buf)) /* it's a file */ path = buf; break; } #endif /* back up one path element */ p = strrchr(buf, SEP); if (prefix != NULL) *prefix = SEP; if (p == NULL) break; *p = '\0'; prefix = p; } if (path != NULL) { PyObject *files; files = PyDict_GetItemString(zip_directory_cache, path); if (files == NULL) { files = read_directory(buf); if (files == NULL) return -1; if (PyDict_SetItemString(zip_directory_cache, path, files) != 0) return -1; } else Py_INCREF(files); self->files = files; } else { PyErr_SetString(ZipImportError, "not a Zip file"); return -1; } if (prefix == NULL) prefix = ""; else { prefix++; len = strlen(prefix); if (prefix[len-1] != SEP) { /* add trailing SEP */ prefix[len] = SEP; prefix[len + 1] = '\0'; } } self->archive = PyString_FromString(buf); if (self->archive == NULL) return -1; self->prefix = PyString_FromString(prefix); if (self->prefix == NULL) return -1; return 0; } /* GC support. */ static int zipimporter_traverse(PyObject *obj, visitproc visit, void *arg) { ZipImporter *self = (ZipImporter *)obj; int err; if (self->files != NULL) { err = visit(self->files, arg); if (err) return err; } return 0; } static void zipimporter_dealloc(ZipImporter *self) { PyObject_GC_UnTrack(self); Py_XDECREF(self->archive); Py_XDECREF(self->prefix); Py_XDECREF(self->files); self->ob_type->tp_free((PyObject *)self); } static PyObject * zipimporter_repr(ZipImporter *self) { char buf[500]; char *archive = "???"; char *prefix = ""; if (self->archive != NULL && PyString_Check(self->archive)) archive = PyString_AsString(self->archive); if (self->prefix != NULL && PyString_Check(self->prefix)) prefix = PyString_AsString(self->prefix); if (prefix != NULL && *prefix) PyOS_snprintf(buf, sizeof(buf), "", archive, SEP, prefix); else PyOS_snprintf(buf, sizeof(buf), "", archive); return PyString_FromString(buf); } /* return fullname.split(".")[-1] */ static char * get_subname(char *fullname) { char *subname = strrchr(fullname, '.'); if (subname == NULL) subname = fullname; else subname++; return subname; } /* Given a (sub)modulename, write the potential file path in the archive (without extension) to the path buffer. Return the length of the resulting string. */ static int make_filename(char *prefix, char *name, char *path) { int len; char *p; len = strlen(prefix); /* self.prefix + name [+ SEP + "__init__"] + ".py[co]" */ if (len + strlen(name) + 13 >= MAXPATHLEN) { PyErr_SetString(ZipImportError, "path too long"); return -1; } strcpy(path, prefix); strcpy(path + len, name); for (p = path + len; *p; p++) { if (*p == '.') *p = SEP; } len += strlen(name); return len; } enum module_info { MI_ERROR, MI_NOT_FOUND, MI_MODULE, MI_PACKAGE }; /* Return some information about a module. */ static enum module_info get_module_info(ZipImporter *self, char *fullname) { char *subname, path[MAXPATHLEN + 1]; int len; struct st_zip_searchorder *zso; subname = get_subname(fullname); len = make_filename(PyString_AsString(self->prefix), subname, path); if (len < 0) return MI_ERROR; for (zso = zip_searchorder; *zso->suffix; zso++) { strcpy(path + len, zso->suffix); if (PyDict_GetItemString(self->files, path) != NULL) { if (zso->type & IS_PACKAGE) return MI_PACKAGE; else return MI_MODULE; } } return MI_NOT_FOUND; } /* Check whether we can satisfy the import of the module named by 'fullname'. Return self if we can, None if we can't. */ static PyObject * zipimporter_find_module(PyObject *obj, PyObject *args) { ZipImporter *self = (ZipImporter *)obj; PyObject *path = NULL; char *fullname; enum module_info mi; if (!PyArg_ParseTuple(args, "s|O:zipimporter.find_module", &fullname, &path)) return NULL; mi = get_module_info(self, fullname); if (mi == MI_ERROR) return NULL; if (mi == MI_NOT_FOUND) { Py_INCREF(Py_None); return Py_None; } Py_INCREF(self); return (PyObject *)self; } /* Load and return the module named by 'fullname'. */ static PyObject * zipimporter_load_module(PyObject *obj, PyObject *args) { ZipImporter *self = (ZipImporter *)obj; PyObject *code, *mod, *dict; char *fullname, *modpath; int ispackage; if (!PyArg_ParseTuple(args, "s:zipimporter.load_module", &fullname)) return NULL; code = get_module_code(self, fullname, &ispackage, &modpath); if (code == NULL) return NULL; mod = PyImport_AddModule(fullname); if (mod == NULL) { Py_DECREF(code); return NULL; } dict = PyModule_GetDict(mod); /* mod.__loader__ = self */ if (PyDict_SetItemString(dict, "__loader__", (PyObject *)self) != 0) goto error; if (ispackage) { /* add __path__ to the module *before* the code gets executed */ PyObject *pkgpath, *fullpath; char *prefix = PyString_AsString(self->prefix); char *subname = get_subname(fullname); int err; fullpath = PyString_FromFormat("%s%c%s%s", PyString_AsString(self->archive), SEP, *prefix ? prefix : "", subname); if (fullpath == NULL) goto error; pkgpath = Py_BuildValue("[O]", fullpath); Py_DECREF(fullpath); if (pkgpath == NULL) goto error; err = PyDict_SetItemString(dict, "__path__", pkgpath); Py_DECREF(pkgpath); if (err != 0) goto error; } mod = PyImport_ExecCodeModuleEx(fullname, code, modpath); Py_DECREF(code); if (Py_VerboseFlag) PySys_WriteStderr("import %s # loaded from Zip %s\n", fullname, modpath); return mod; error: Py_DECREF(code); Py_DECREF(mod); return NULL; } /* Return a bool signifying whether the module is a package or not. */ static PyObject * zipimporter_is_package(PyObject *obj, PyObject *args) { ZipImporter *self = (ZipImporter *)obj; char *fullname; enum module_info mi; if (!PyArg_ParseTuple(args, "s:zipimporter.is_package", &fullname)) return NULL; mi = get_module_info(self, fullname); if (mi == MI_ERROR) return NULL; if (mi == MI_NOT_FOUND) { PyErr_Format(ZipImportError, "can't find module '%.200s'", fullname); return NULL; } return PyBool_FromLong(mi == MI_PACKAGE); } static PyObject * zipimporter_get_data(PyObject *obj, PyObject *args) { ZipImporter *self = (ZipImporter *)obj; char *path; #ifdef ALTSEP char *p, buf[MAXPATHLEN + 1]; #endif PyObject *toc_entry; int len; if (!PyArg_ParseTuple(args, "s:zipimporter.get_data", &path)) return NULL; #ifdef ALTSEP if (strlen(path) >= MAXPATHLEN) { PyErr_SetString(ZipImportError, "path too long"); return NULL; } strcpy(buf, path); for (p = buf; *p; p++) { if (*p == ALTSEP) *p = SEP; } path = buf; #endif len = PyString_Size(self->archive); if ((size_t)len < strlen(path) && strncmp(path, PyString_AsString(self->archive), len) == 0 && path[len] == SEP) { path = path + len + 1; } toc_entry = PyDict_GetItemString(self->files, path); if (toc_entry == NULL) { PyErr_Format(PyExc_IOError, "file not found [%.200s]", path); return NULL; } return get_data(PyString_AsString(self->archive), toc_entry); } static PyObject * zipimporter_get_code(PyObject *obj, PyObject *args) { ZipImporter *self = (ZipImporter *)obj; char *fullname; if (!PyArg_ParseTuple(args, "s:zipimporter.get_code", &fullname)) return NULL; return get_module_code(self, fullname, NULL, NULL); } static PyObject * zipimporter_get_source(PyObject *obj, PyObject *args) { ZipImporter *self = (ZipImporter *)obj; PyObject *toc_entry; char *fullname, *subname, path[MAXPATHLEN+1]; int len; enum module_info mi; if (!PyArg_ParseTuple(args, "s:zipimporter.get_source", &fullname)) return NULL; mi = get_module_info(self, fullname); if (mi == MI_ERROR) return NULL; if (mi == MI_NOT_FOUND) { PyErr_Format(ZipImportError, "can't find module '%.200s'", fullname); return NULL; } subname = get_subname(fullname); len = make_filename(PyString_AsString(self->prefix), subname, path); if (len < 0) return NULL; if (mi == MI_PACKAGE) { path[len] = SEP; strcpy(path + len + 1, "__init__.py"); } else strcpy(path + len, ".py"); toc_entry = PyDict_GetItemString(self->files, path); if (toc_entry != NULL) return get_data(PyString_AsString(self->archive), toc_entry); /* we have the module, but no source */ Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(doc_find_module, "find_module(fullname, path=None) -> self or None.\n\ \n\ Search for a module specified by 'fullname'. 'fullname' must be the\n\ fully qualified (dotted) module name. It returns the zipimporter\n\ instance itself if the module was found, or None if it wasn't.\n\ The optional 'path' argument is ignored -- it's there for compatibility\n\ with the importer protocol."); PyDoc_STRVAR(doc_load_module, "load_module(fullname) -> module.\n\ \n\ Load the module specified by 'fullname'. 'fullname' must be the\n\ fully qualified (dotted) module name. It returns the imported\n\ module, or raises ZipImportError if it wasn't found."); PyDoc_STRVAR(doc_get_data, "get_data(pathname) -> string with file data.\n\ \n\ Return the data associated with 'pathname'. Raise IOError if\n\ the file wasn't found."); PyDoc_STRVAR(doc_is_package, "is_package(fullname) -> bool.\n\ \n\ Return True if the module specified by fullname is a package.\n\ Raise ZipImportError is the module couldn't be found."); PyDoc_STRVAR(doc_get_code, "get_code(fullname) -> code object.\n\ \n\ Return the code object for the specified module. Raise ZipImportError\n\ is the module couldn't be found."); PyDoc_STRVAR(doc_get_source, "get_source(fullname) -> source string.\n\ \n\ Return the source code for the specified module. Raise ZipImportError\n\ is the module couldn't be found, return None if the archive does\n\ contain the module, but has no source for it."); static PyMethodDef zipimporter_methods[] = { {"find_module", zipimporter_find_module, METH_VARARGS, doc_find_module}, {"load_module", zipimporter_load_module, METH_VARARGS, doc_load_module}, {"get_data", zipimporter_get_data, METH_VARARGS, doc_get_data}, {"get_code", zipimporter_get_code, METH_VARARGS, doc_get_code}, {"get_source", zipimporter_get_source, METH_VARARGS, doc_get_source}, {"is_package", zipimporter_is_package, METH_VARARGS, doc_is_package}, {NULL, NULL} /* sentinel */ }; static PyMemberDef zipimporter_members[] = { {"archive", T_OBJECT, offsetof(ZipImporter, archive), READONLY}, {"prefix", T_OBJECT, offsetof(ZipImporter, prefix), READONLY}, {"_files", T_OBJECT, offsetof(ZipImporter, files), READONLY}, {NULL} }; PyDoc_STRVAR(zipimporter_doc, "zipimporter(archivepath) -> zipimporter object\n\ \n\ Create a new zipimporter instance. 'archivepath' must be a path to\n\ a zipfile. ZipImportError is raised if 'archivepath' doesn't point to\n\ a valid Zip archive."); #define DEFERRED_ADDRESS(ADDR) 0 static PyTypeObject ZipImporter_Type = { PyObject_HEAD_INIT(DEFERRED_ADDRESS(&PyType_Type)) 0, "zipimport.zipimporter", sizeof(ZipImporter), 0, /* tp_itemsize */ (destructor)zipimporter_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ (reprfunc)zipimporter_repr, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, /* tp_flags */ zipimporter_doc, /* tp_doc */ zipimporter_traverse, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ zipimporter_methods, /* tp_methods */ zipimporter_members, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ (initproc)zipimporter_init, /* tp_init */ PyType_GenericAlloc, /* tp_alloc */ PyType_GenericNew, /* tp_new */ PyObject_GC_Del, /* tp_free */ }; /* implementation */ /* Given a buffer, return the long that is represented by the first 4 bytes, encoded as little endian. This partially reimplements marshal.c:r_long() */ static long get_long(unsigned char *buf) { long x; x = buf[0]; x |= (long)buf[1] << 8; x |= (long)buf[2] << 16; x |= (long)buf[3] << 24; #if SIZEOF_LONG > 4 /* Sign extension for 64-bit machines */ x |= -(x & 0x80000000L); #endif return x; } /* read_directory(archive) -> files dict (new reference) Given a path to a Zip archive, build a dict, mapping file names (local to the archive, using SEP as a separator) to toc entries. A toc_entry is a tuple: (compress, # compression kind; 0 for uncompressed data_size, # size of compressed data on disk file_size, # size of decompressed data file_offset, # offset of file header from start of archive time, # mod time of file (in dos format) date, # mod data of file (in dos format) crc, # crc checksum of the data ) Directories can be recognized by the trailing SEP in the name, data_size and file_offset are 0. */ static PyObject * read_directory(char *archive) { PyObject *files = NULL; FILE *fp; long compress, crc, data_size, file_size, file_offset, date, time; long header_offset, name_size, header_size, header_position; long i, l, length, count; char path[MAXPATHLEN + 5]; char name[MAXPATHLEN + 5]; char *p, endof_central_dir[22]; long arc_offset; /* offset from beginning of file to start of zip-archive */ if (strlen(archive) > MAXPATHLEN) { PyErr_SetString(PyExc_OverflowError, "Zip path name is too long"); return NULL; } strcpy(path, archive); fp = fopen(archive, "rb"); if (fp == NULL) { PyErr_Format(ZipImportError, "can't open Zip file: " "'%.200s'", archive); return NULL; } fseek(fp, -22, SEEK_END); header_position = ftell(fp); if (fread(endof_central_dir, 1, 22, fp) != 22) { fclose(fp); PyErr_Format(ZipImportError, "can't read Zip file: " "'%.200s'", archive); return NULL; } if (get_long((unsigned char *)endof_central_dir) != 0x06054B50) { /* Bad: End of Central Dir signature */ fclose(fp); PyErr_Format(ZipImportError, "not a Zip file: " "'%.200s'", archive); return NULL; } header_size = get_long((unsigned char *)endof_central_dir + 12); header_offset = get_long((unsigned char *)endof_central_dir + 16); arc_offset = header_position - header_offset - header_size; header_offset += arc_offset; files = PyDict_New(); if (files == NULL) goto error; length = (long)strlen(path); path[length] = SEP; /* Start of Central Directory */ count = 0; for (;;) { PyObject *t; int err; fseek(fp, header_offset, 0); /* Start of file header */ l = PyMarshal_ReadLongFromFile(fp); if (l != 0x02014B50) break; /* Bad: Central Dir File Header */ fseek(fp, header_offset + 10, 0); compress = PyMarshal_ReadShortFromFile(fp); time = PyMarshal_ReadShortFromFile(fp); date = PyMarshal_ReadShortFromFile(fp); crc = PyMarshal_ReadLongFromFile(fp); data_size = PyMarshal_ReadLongFromFile(fp); file_size = PyMarshal_ReadLongFromFile(fp); name_size = PyMarshal_ReadShortFromFile(fp); header_size = 46 + name_size + PyMarshal_ReadShortFromFile(fp) + PyMarshal_ReadShortFromFile(fp); fseek(fp, header_offset + 42, 0); file_offset = PyMarshal_ReadLongFromFile(fp) + arc_offset; if (name_size > MAXPATHLEN) name_size = MAXPATHLEN; p = name; for (i = 0; i < name_size; i++) { *p = (char)getc(fp); if (*p == '/') *p = SEP; p++; } *p = 0; /* Add terminating null byte */ header_offset += header_size; strncpy(path + length + 1, name, MAXPATHLEN - length - 1); t = Py_BuildValue("siiiiiii", path, compress, data_size, file_size, file_offset, time, date, crc); if (t == NULL) goto error; err = PyDict_SetItemString(files, name, t); Py_DECREF(t); if (err != 0) goto error; count++; } fclose(fp); if (Py_VerboseFlag) PySys_WriteStderr("# zipimport: found %ld names in %s\n", count, archive); return files; error: fclose(fp); Py_XDECREF(files); return NULL; } /* Return the zlib.decompress function object, or NULL if zlib couldn't be imported. The function is cached when found, so subsequent calls don't import zlib again. Returns a *borrowed* reference. XXX This makes zlib.decompress immortal. */ static PyObject * get_decompress_func(void) { static PyObject *decompress = NULL; if (decompress == NULL) { PyObject *zlib; static int importing_zlib = 0; if (importing_zlib != 0) /* Someone has a zlib.py[co] in their Zip file; let's avoid a stack overflow. */ return NULL; importing_zlib = 1; zlib = PyImport_ImportModule("zlib"); /* import zlib */ importing_zlib = 0; if (zlib != NULL) { decompress = PyObject_GetAttrString(zlib, "decompress"); Py_DECREF(zlib); } else PyErr_Clear(); if (Py_VerboseFlag) PySys_WriteStderr("# zipimport: zlib %s\n", zlib != NULL ? "available": "UNAVAILABLE"); } return decompress; } /* Given a path to a Zip file and a toc_entry, return the (uncompressed) data as a new reference. */ static PyObject * get_data(char *archive, PyObject *toc_entry) { PyObject *raw_data, *data = NULL, *decompress; char *buf; FILE *fp; int err, bytes_read = 0; long l; char *datapath; long compress, data_size, file_size, file_offset; long time, date, crc; if (!PyArg_ParseTuple(toc_entry, "slllllll", &datapath, &compress, &data_size, &file_size, &file_offset, &time, &date, &crc)) { return NULL; } fp = fopen(archive, "rb"); if (!fp) { PyErr_Format(PyExc_IOError, "zipimport: can not open file %s", archive); return NULL; } /* Check to make sure the local file header is correct */ fseek(fp, file_offset, 0); l = PyMarshal_ReadLongFromFile(fp); if (l != 0x04034B50) { /* Bad: Local File Header */ PyErr_Format(ZipImportError, "bad local file header in %s", archive); fclose(fp); return NULL; } fseek(fp, file_offset + 26, 0); l = 30 + PyMarshal_ReadShortFromFile(fp) + PyMarshal_ReadShortFromFile(fp); /* local header size */ file_offset += l; /* Start of file data */ raw_data = PyString_FromStringAndSize((char *)NULL, compress == 0 ? data_size : data_size + 1); if (raw_data == NULL) { fclose(fp); return NULL; } buf = PyString_AsString(raw_data); err = fseek(fp, file_offset, 0); if (err == 0) bytes_read = fread(buf, 1, data_size, fp); fclose(fp); if (err || bytes_read != data_size) { PyErr_SetString(PyExc_IOError, "zipimport: can't read data"); Py_DECREF(raw_data); return NULL; } if (compress != 0) { buf[data_size] = 'Z'; /* saw this in zipfile.py */ data_size++; } buf[data_size] = '\0'; if (compress == 0) /* data is not compressed */ return raw_data; /* Decompress with zlib */ decompress = get_decompress_func(); if (decompress == NULL) { PyErr_SetString(ZipImportError, "can't decompress data; " "zlib not available"); goto error; } data = PyObject_CallFunction(decompress, "Ol", raw_data, -15); error: Py_DECREF(raw_data); return data; } /* Lenient date/time comparison function. The precision of the mtime in the archive is lower than the mtime stored in a .pyc: we must allow a difference of at most one second. */ static int eq_mtime(time_t t1, time_t t2) { time_t d = t1 - t2; if (d < 0) d = -d; /* dostime only stores even seconds, so be lenient */ return d <= 1; } /* Given the contents of a .py[co] file in a buffer, unmarshal the data and return the code object. Return None if it the magic word doesn't match (we do this instead of raising an exception as we fall back to .py if available and we don't want to mask other errors). Returns a new reference. */ static PyObject * unmarshal_code(char *pathname, PyObject *data, time_t mtime) { PyObject *code; char *buf = PyString_AsString(data); int size = PyString_Size(data); if (size <= 9) { PyErr_SetString(ZipImportError, "bad pyc data"); return NULL; } if (get_long((unsigned char *)buf) != PyImport_GetMagicNumber()) { if (Py_VerboseFlag) PySys_WriteStderr("# %s has bad magic\n", pathname); Py_INCREF(Py_None); return Py_None; /* signal caller to try alternative */ } if (mtime != 0 && !eq_mtime(get_long((unsigned char *)buf + 4), mtime)) { if (Py_VerboseFlag) PySys_WriteStderr("# %s has bad mtime\n", pathname); Py_INCREF(Py_None); return Py_None; /* signal caller to try alternative */ } code = PyMarshal_ReadObjectFromString(buf + 8, size - 8); if (code == NULL) return NULL; if (!PyCode_Check(code)) { Py_DECREF(code); PyErr_Format(PyExc_TypeError, "compiled module %.200s is not a code object", pathname); return NULL; } return code; } /* Replace any occurances of "\r\n?" in the input string with "\n". This converts DOS and Mac line endings to Unix line endings. Also append a trailing "\n" to be compatible with PyParser_SimpleParseFile(). Returns a new reference. */ static PyObject * normalize_line_endings(PyObject *source) { char *buf, *q, *p = PyString_AsString(source); PyObject *fixed_source; /* one char extra for trailing \n and one for terminating \0 */ buf = PyMem_Malloc(PyString_Size(source) + 2); if (buf == NULL) { PyErr_SetString(PyExc_MemoryError, "zipimport: no memory to allocate " "source buffer"); return NULL; } /* replace "\r\n?" by "\n" */ for (q = buf; *p != '\0'; p++) { if (*p == '\r') { *q++ = '\n'; if (*(p + 1) == '\n') p++; } else *q++ = *p; } *q++ = '\n'; /* add trailing \n */ *q = '\0'; fixed_source = PyString_FromString(buf); PyMem_Free(buf); return fixed_source; } /* Given a string buffer containing Python source code, compile it return and return a code object as a new reference. */ static PyObject * compile_source(char *pathname, PyObject *source) { PyObject *code, *fixed_source; fixed_source = normalize_line_endings(source); if (fixed_source == NULL) return NULL; code = Py_CompileString(PyString_AsString(fixed_source), pathname, Py_file_input); Py_DECREF(fixed_source); return code; } /* Convert the date/time values found in the Zip archive to a value that's compatible with the time stamp stored in .pyc files. */ static time_t parse_dostime(int dostime, int dosdate) { struct tm stm; stm.tm_sec = (dostime & 0x1f) * 2; stm.tm_min = (dostime >> 5) & 0x3f; stm.tm_hour = (dostime >> 11) & 0x1f; stm.tm_mday = dosdate & 0x1f; stm.tm_mon = ((dosdate >> 5) & 0x0f) - 1; stm.tm_year = ((dosdate >> 9) & 0x7f) + 80; stm.tm_isdst = -1; /* wday/yday is ignored */ return mktime(&stm); } /* Given a path to a .pyc or .pyo file in the archive, return the modifictaion time of the matching .py file, or 0 if no source is available. */ static time_t get_mtime_of_source(ZipImporter *self, char *path) { PyObject *toc_entry; time_t mtime = 0; int lastchar = strlen(path) - 1; char savechar = path[lastchar]; path[lastchar] = '\0'; /* strip 'c' or 'o' from *.py[co] */ toc_entry = PyDict_GetItemString(self->files, path); if (toc_entry != NULL && PyTuple_Check(toc_entry) && PyTuple_Size(toc_entry) == 8) { /* fetch the time stamp of the .py file for comparison with an embedded pyc time stamp */ int time, date; time = PyInt_AsLong(PyTuple_GetItem(toc_entry, 5)); date = PyInt_AsLong(PyTuple_GetItem(toc_entry, 6)); mtime = parse_dostime(time, date); } path[lastchar] = savechar; return mtime; } /* Return the code object for the module named by 'fullname' from the Zip archive as a new reference. */ static PyObject * get_code_from_data(ZipImporter *self, int ispackage, int isbytecode, time_t mtime, PyObject *toc_entry) { PyObject *data, *code; char *modpath; char *archive = PyString_AsString(self->archive); if (archive == NULL) return NULL; data = get_data(archive, toc_entry); if (data == NULL) return NULL; modpath = PyString_AsString(PyTuple_GetItem(toc_entry, 0)); if (isbytecode) { code = unmarshal_code(modpath, data, mtime); } else { code = compile_source(modpath, data); } Py_DECREF(data); return code; } /* Get the code object assoiciated with the module specified by 'fullname'. */ static PyObject * get_module_code(ZipImporter *self, char *fullname, int *p_ispackage, char **p_modpath) { PyObject *toc_entry; char *subname, path[MAXPATHLEN + 1]; int len; struct st_zip_searchorder *zso; subname = get_subname(fullname); len = make_filename(PyString_AsString(self->prefix), subname, path); if (len < 0) return NULL; for (zso = zip_searchorder; *zso->suffix; zso++) { PyObject *code = NULL; strcpy(path + len, zso->suffix); if (Py_VerboseFlag > 1) PySys_WriteStderr("# trying %s%c%s\n", PyString_AsString(self->archive), SEP, path); toc_entry = PyDict_GetItemString(self->files, path); if (toc_entry != NULL) { time_t mtime = 0; int ispackage = zso->type & IS_PACKAGE; int isbytecode = zso->type & IS_BYTECODE; if (isbytecode) mtime = get_mtime_of_source(self, path); if (p_ispackage != NULL) *p_ispackage = ispackage; code = get_code_from_data(self, ispackage, isbytecode, mtime, toc_entry); if (code == Py_None) { /* bad magic number or non-matching mtime in byte code, try next */ Py_DECREF(code); continue; } if (code != NULL && p_modpath != NULL) *p_modpath = PyString_AsString( PyTuple_GetItem(toc_entry, 0)); return code; } } PyErr_Format(ZipImportError, "can't find module '%.200s'", fullname); return NULL; } /* Module init */ PyDoc_STRVAR(zipimport_doc, "zipimport provides support for importing Python modules from Zip archives.\n\ \n\ This module exports three objects:\n\ - zipimporter: a class; its constructor takes a path to a Zip archive.\n\ - ZipImporterError: exception raised by zipimporter objects. It's a\n\ subclass of ImportError, so it can be caught as ImportError, too.\n\ - _zip_directory_cache: a dict, mapping archive paths to zip directory\n\ info dicts, as used in zipimporter._files.\n\ \n\ It is usually not needed to use the zipimport module explicitly; it is\n\ used by the builtin import mechanism for sys.path items that are paths\n\ to Zip archives."); PyMODINIT_FUNC initzipimport(void) { PyObject *mod; if (PyType_Ready(&ZipImporter_Type) < 0) return; /* Correct directory separator */ zip_searchorder[0].suffix[0] = SEP; zip_searchorder[1].suffix[0] = SEP; zip_searchorder[2].suffix[0] = SEP; if (Py_OptimizeFlag) { /* Reverse *.pyc and *.pyo */ struct st_zip_searchorder tmp; tmp = zip_searchorder[0]; zip_searchorder[0] = zip_searchorder[1]; zip_searchorder[1] = tmp; tmp = zip_searchorder[3]; zip_searchorder[3] = zip_searchorder[4]; zip_searchorder[4] = tmp; } mod = Py_InitModule4("zipimport", NULL, zipimport_doc, NULL, PYTHON_API_VERSION); ZipImportError = PyErr_NewException("zipimport.ZipImportError", PyExc_ImportError, NULL); if (ZipImportError == NULL) return; Py_INCREF(ZipImportError); if (PyModule_AddObject(mod, "ZipImportError", ZipImportError) < 0) return; Py_INCREF(&ZipImporter_Type); if (PyModule_AddObject(mod, "zipimporter", (PyObject *)&ZipImporter_Type) < 0) return; zip_directory_cache = PyDict_New(); if (zip_directory_cache == NULL) return; Py_INCREF(zip_directory_cache); if (PyModule_AddObject(mod, "_zip_directory_cache", zip_directory_cache) < 0) return; } Python-2.3.7/Modules/glmodule.c0000644001241000117560000050045107521006153015640 0ustar loewishpifb6 /* Input used to generate the Python module "glmodule.c". The stub generator is a Python script called "cgen.py". Each definition must be contained on one line: can be: void, short, long (XXX maybe others?) can be: char, string, short, float, long, or double string indicates a null terminated string; if is char and begins with a *, the * is stripped and is changed into string has the form or [] where can be s: arg is sent r: arg is received (arg is a pointer) and can be (N and I are numbers): N argI retval N*argI N*I N*retval In the case where the subscript consists of two parts separated by *, the first part is the width of the matrix, and the second part is the length of the matrix. This order is opposite from the order used in C to declare a two-dimensional matrix. */ /* * An attempt has been made to make this module switch threads on qread * calls. It is far from safe, though. */ #include #include #ifdef __sgi extern int devport(); extern int textwritemask(); extern int pagewritemask(); extern int gewrite(); extern int gettp(); #endif #include "Python.h" #include "cgensupport.h" /* Some stubs are too complicated for the stub generator. We can include manually written versions of them here. A line starting with '%' gives the name of the function so the stub generator can include it in the table of functions. */ static PyObject * gl_qread(PyObject *self, PyObject *args) { long retval; short arg1 ; Py_BEGIN_ALLOW_THREADS retval = qread( & arg1 ); Py_END_ALLOW_THREADS { PyObject *v = PyTuple_New( 2 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewlongobject(retval)); PyTuple_SetItem(v, 1, mknewshortobject(arg1)); return v; } } /* varray -- an array of v.. calls. The argument is an array (maybe list or tuple) of points. Each point must be a tuple or list of coordinates (x, y, z). The points may be 2- or 3-dimensional but must all have the same dimension. Float and int values may be mixed however. The points are always converted to 3D double precision points by assuming z=0.0 if necessary (as indicated in the man page), and for each point v3d() is called. */ static PyObject * gl_varray(PyObject *self, PyObject *args) { PyObject *v, *w=NULL; int i, n, width; double vec[3]; PyObject * (*getitem)(PyObject *, int); if (!PyArg_GetObject(args, 1, 0, &v)) return NULL; if (PyList_Check(v)) { n = PyList_Size(v); getitem = PyList_GetItem; } else if (PyTuple_Check(v)) { n = PyTuple_Size(v); getitem = PyTuple_GetItem; } else { PyErr_BadArgument(); return NULL; } if (n == 0) { Py_INCREF(Py_None); return Py_None; } if (n > 0) w = (*getitem)(v, 0); width = 0; if (w == NULL) { } else if (PyList_Check(w)) { width = PyList_Size(w); } else if (PyTuple_Check(w)) { width = PyTuple_Size(w); } switch (width) { case 2: vec[2] = 0.0; /* Fall through */ case 3: break; default: PyErr_BadArgument(); return NULL; } for (i = 0; i < n; i++) { w = (*getitem)(v, i); if (!PyArg_GetDoubleArray(w, 1, 0, width, vec)) return NULL; v3d(vec); } Py_INCREF(Py_None); return Py_None; } /* vnarray, nvarray -- an array of n3f and v3f calls. The argument is an array (list or tuple) of pairs of points and normals. Each pair is a tuple (NOT a list) of a point and a normal for that point. Each point or normal must be a tuple (NOT a list) of coordinates (x, y, z). Three coordinates must be given. Float and int values may be mixed. For each pair, n3f() is called for the normal, and then v3f() is called for the vector. vnarray and nvarray differ only in the order of the vector and normal in the pair: vnarray expects (v, n) while nvarray expects (n, v). */ static PyObject *gen_nvarray(); /* Forward */ static PyObject * gl_nvarray(PyObject *self, PyObject *args) { return gen_nvarray(args, 0); } static PyObject * gl_vnarray(PyObject *self, PyObject *args) { return gen_nvarray(args, 1); } /* Generic, internal version of {nv,nv}array: inorm indicates the argument order, 0: normal first, 1: vector first. */ static PyObject * gen_nvarray(PyObject *args, int inorm) { PyObject *v, *w, *wnorm, *wvec; int i, n; float norm[3], vec[3]; PyObject * (*getitem)(PyObject *, int); if (!PyArg_GetObject(args, 1, 0, &v)) return NULL; if (PyList_Check(v)) { n = PyList_Size(v); getitem = PyList_GetItem; } else if (PyTuple_Check(v)) { n = PyTuple_Size(v); getitem = PyTuple_GetItem; } else { PyErr_BadArgument(); return NULL; } for (i = 0; i < n; i++) { w = (*getitem)(v, i); if (!PyTuple_Check(w) || PyTuple_Size(w) != 2) { PyErr_BadArgument(); return NULL; } wnorm = PyTuple_GetItem(w, inorm); wvec = PyTuple_GetItem(w, 1 - inorm); if (!PyArg_GetFloatArray(wnorm, 1, 0, 3, norm) || !PyArg_GetFloatArray(wvec, 1, 0, 3, vec)) return NULL; n3f(norm); v3f(vec); } Py_INCREF(Py_None); return Py_None; } /* nurbssurface(s_knots[], t_knots[], ctl[][], s_order, t_order, type). The dimensions of ctl[] are computed as follows: [len(s_knots) - s_order], [len(t_knots) - t_order] */ static PyObject * gl_nurbssurface(PyObject *self, PyObject *args) { long arg1 ; double * arg2 ; long arg3 ; double * arg4 ; double *arg5 ; long arg6 ; long arg7 ; long arg8 ; long ncoords; long s_byte_stride, t_byte_stride; long s_nctl, t_nctl; long s, t; PyObject *v, *w, *pt; double *pnext; if (!PyArg_GetLongArraySize(args, 6, 0, &arg1)) return NULL; if ((arg2 = PyMem_NEW(double, arg1 )) == NULL) { return PyErr_NoMemory(); } if (!PyArg_GetDoubleArray(args, 6, 0, arg1 , arg2)) return NULL; if (!PyArg_GetLongArraySize(args, 6, 1, &arg3)) return NULL; if ((arg4 = PyMem_NEW(double, arg3 )) == NULL) { return PyErr_NoMemory(); } if (!PyArg_GetDoubleArray(args, 6, 1, arg3 , arg4)) return NULL; if (!PyArg_GetLong(args, 6, 3, &arg6)) return NULL; if (!PyArg_GetLong(args, 6, 4, &arg7)) return NULL; if (!PyArg_GetLong(args, 6, 5, &arg8)) return NULL; if (arg8 == N_XYZ) ncoords = 3; else if (arg8 == N_XYZW) ncoords = 4; else { PyErr_BadArgument(); return NULL; } s_nctl = arg1 - arg6; t_nctl = arg3 - arg7; if (!PyArg_GetObject(args, 6, 2, &v)) return NULL; if (!PyList_Check(v) || PyList_Size(v) != s_nctl) { PyErr_BadArgument(); return NULL; } if ((arg5 = PyMem_NEW(double, s_nctl*t_nctl*ncoords )) == NULL) { return PyErr_NoMemory(); } pnext = arg5; for (s = 0; s < s_nctl; s++) { w = PyList_GetItem(v, s); if (w == NULL || !PyList_Check(w) || PyList_Size(w) != t_nctl) { PyErr_BadArgument(); return NULL; } for (t = 0; t < t_nctl; t++) { pt = PyList_GetItem(w, t); if (!PyArg_GetDoubleArray(pt, 1, 0, ncoords, pnext)) return NULL; pnext += ncoords; } } s_byte_stride = sizeof(double) * ncoords; t_byte_stride = s_byte_stride * s_nctl; nurbssurface( arg1 , arg2 , arg3 , arg4 , s_byte_stride , t_byte_stride , arg5 , arg6 , arg7 , arg8 ); PyMem_DEL(arg2); PyMem_DEL(arg4); PyMem_DEL(arg5); Py_INCREF(Py_None); return Py_None; } /* nurbscurve(knots, ctlpoints, order, type). The length of ctlpoints is len(knots)-order. */ static PyObject * gl_nurbscurve(PyObject *self, PyObject *args) { long arg1 ; double * arg2 ; long arg3 ; double * arg4 ; long arg5 ; long arg6 ; int ncoords, npoints; int i; PyObject *v; double *pnext; if (!PyArg_GetLongArraySize(args, 4, 0, &arg1)) return NULL; if ((arg2 = PyMem_NEW(double, arg1 )) == NULL) { return PyErr_NoMemory(); } if (!PyArg_GetDoubleArray(args, 4, 0, arg1 , arg2)) return NULL; if (!PyArg_GetLong(args, 4, 2, &arg5)) return NULL; if (!PyArg_GetLong(args, 4, 3, &arg6)) return NULL; if (arg6 == N_ST) ncoords = 2; else if (arg6 == N_STW) ncoords = 3; else { PyErr_BadArgument(); return NULL; } npoints = arg1 - arg5; if (!PyArg_GetObject(args, 4, 1, &v)) return NULL; if (!PyList_Check(v) || PyList_Size(v) != npoints) { PyErr_BadArgument(); return NULL; } if ((arg4 = PyMem_NEW(double, npoints*ncoords )) == NULL) { return PyErr_NoMemory(); } pnext = arg4; for (i = 0; i < npoints; i++) { if (!PyArg_GetDoubleArray(PyList_GetItem(v, i), 1, 0, ncoords, pnext)) return NULL; pnext += ncoords; } arg3 = (sizeof(double)) * ncoords; nurbscurve( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); PyMem_DEL(arg2); PyMem_DEL(arg4); Py_INCREF(Py_None); return Py_None; } /* pwlcurve(points, type). Points is a list of points. Type must be N_ST. */ static PyObject * gl_pwlcurve(PyObject *self, PyObject *args) { PyObject *v; long type; double *data, *pnext; long npoints, ncoords; int i; if (!PyArg_GetObject(args, 2, 0, &v)) return NULL; if (!PyArg_GetLong(args, 2, 1, &type)) return NULL; if (!PyList_Check(v)) { PyErr_BadArgument(); return NULL; } npoints = PyList_Size(v); if (type == N_ST) ncoords = 2; else { PyErr_BadArgument(); return NULL; } if ((data = PyMem_NEW(double, npoints*ncoords)) == NULL) { return PyErr_NoMemory(); } pnext = data; for (i = 0; i < npoints; i++) { if (!PyArg_GetDoubleArray(PyList_GetItem(v, i), 1, 0, ncoords, pnext)) return NULL; pnext += ncoords; } pwlcurve(npoints, data, sizeof(double)*ncoords, type); PyMem_DEL(data); Py_INCREF(Py_None); return Py_None; } /* Picking and Selecting */ static short *pickbuffer = NULL; static long pickbuffersize; static PyObject * pick_select(PyObject *args, void (*func)()) { if (!PyArg_GetLong(args, 1, 0, &pickbuffersize)) return NULL; if (pickbuffer != NULL) { PyErr_SetString(PyExc_RuntimeError, "pick/gselect: already picking/selecting"); return NULL; } if ((pickbuffer = PyMem_NEW(short, pickbuffersize)) == NULL) { return PyErr_NoMemory(); } (*func)(pickbuffer, pickbuffersize); Py_INCREF(Py_None); return Py_None; } static PyObject * endpick_select(long (*func)()) { PyObject *v, *w; int i, nhits, n; if (pickbuffer == NULL) { PyErr_SetString(PyExc_RuntimeError, "endpick/endselect: not in pick/select mode"); return NULL; } nhits = (*func)(pickbuffer); if (nhits < 0) { nhits = -nhits; /* How to report buffer overflow otherwise? */ } /* Scan the buffer to see how many integers */ n = 0; for (; nhits > 0; nhits--) { n += 1 + pickbuffer[n]; } v = PyList_New(n); if (v == NULL) return NULL; /* XXX Could do it nicer and interpret the data structure here, returning a list of lists. But this can be done in Python... */ for (i = 0; i < n; i++) { w = PyInt_FromLong((long)pickbuffer[i]); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(v, i, w); } PyMem_DEL(pickbuffer); pickbuffer = NULL; return v; } extern void pick(), gselect(); extern long endpick(), endselect(); static PyObject *gl_pick(PyObject *self, PyObject *args) { return pick_select(args, pick); } static PyObject *gl_endpick(PyObject *self) { return endpick_select(endpick); } static PyObject *gl_gselect(PyObject *self, PyObject *args) { return pick_select(args, gselect); } static PyObject *gl_endselect(PyObject *self) { return endpick_select(endselect); } /* XXX The generator botches this one. Here's a quick hack to fix it. */ /* XXX The generator botches this one. Here's a quick hack to fix it. */ static PyObject * gl_getmatrix(PyObject *self, PyObject *args) { Matrix arg1; PyObject *v, *w; int i, j; getmatrix( arg1 ); v = PyList_New(16); if (v == NULL) { return PyErr_NoMemory(); } for (i = 0; i < 4; i++) for (j = 0; j < 4; j++) { w = mknewfloatobject(arg1[i][j]); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(v, i*4+j, w); } return v; } /* Here's an alternate version that returns a 4x4 matrix instead of a vector. Unfortunately it is incompatible with loadmatrix and multmatrix... */ static PyObject * gl_altgetmatrix(PyObject *self, PyObject *args) { Matrix arg1; PyObject *v, *w; int i, j; getmatrix( arg1 ); v = PyList_New(4); if (v == NULL) { return NULL; } for (i = 0; i < 4; i++) { w = PyList_New(4); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(v, i, w); } for (i = 0; i < 4; i++) { for (j = 0; j < 4; j++) { w = mknewfloatobject(arg1[i][j]); if (w == NULL) { Py_DECREF(v); return NULL; } PyList_SetItem(PyList_GetItem(v, i), j, w); } } return v; } static PyObject * gl_lrectwrite(PyObject *self, PyObject *args) { short x1 ; short y1 ; short x2 ; short y2 ; string parray ; PyObject *s; #if 0 int pixcount; #endif if (!PyArg_GetShort(args, 5, 0, &x1)) return NULL; if (!PyArg_GetShort(args, 5, 1, &y1)) return NULL; if (!PyArg_GetShort(args, 5, 2, &x2)) return NULL; if (!PyArg_GetShort(args, 5, 3, &y2)) return NULL; if (!PyArg_GetString(args, 5, 4, &parray)) return NULL; if (!PyArg_GetObject(args, 5, 4, &s)) return NULL; #if 0 /* Don't check this, it breaks experiments with pixmode(PM_SIZE, ...) */ pixcount = (long)(x2+1-x1) * (long)(y2+1-y1); if (!PyString_Check(s) || PyString_Size(s) != pixcount*sizeof(long)) { PyErr_SetString(PyExc_RuntimeError, "string arg to lrectwrite has wrong size"); return NULL; } #endif lrectwrite( x1 , y1 , x2 , y2 , (unsigned long *) parray ); Py_INCREF(Py_None); return Py_None; } static PyObject * gl_lrectread(PyObject *self, PyObject *args) { short x1 ; short y1 ; short x2 ; short y2 ; PyObject *parray; int pixcount; if (!PyArg_GetShort(args, 4, 0, &x1)) return NULL; if (!PyArg_GetShort(args, 4, 1, &y1)) return NULL; if (!PyArg_GetShort(args, 4, 2, &x2)) return NULL; if (!PyArg_GetShort(args, 4, 3, &y2)) return NULL; pixcount = (long)(x2+1-x1) * (long)(y2+1-y1); parray = PyString_FromStringAndSize((char *)NULL, pixcount*sizeof(long)); if (parray == NULL) return NULL; /* No memory */ lrectread(x1, y1, x2, y2, (unsigned long *) PyString_AsString(parray)); return parray; } static PyObject * gl_readdisplay(PyObject *self, PyObject *args) { short x1, y1, x2, y2; unsigned long *parray, hints; long size, size_ret; PyObject *rv; if ( !PyArg_Parse(args, "hhhhl", &x1, &y1, &x2, &y2, &hints) ) return 0; size = (long)(x2+1-x1) * (long)(y2+1-y1); rv = PyString_FromStringAndSize((char *)NULL, size*sizeof(long)); if ( rv == NULL ) return NULL; parray = (unsigned long *)PyString_AsString(rv); size_ret = readdisplay(x1, y1, x2, y2, parray, hints); if ( size_ret != size ) { printf("gl_readdisplay: got %ld pixels, expected %ld\n", size_ret, size); PyErr_SetString(PyExc_RuntimeError, "readdisplay returned unexpected length"); return NULL; } return rv; } /* Desperately needed, here are tools to compress and decompress the data manipulated by lrectread/lrectwrite. gl.packrect(width, height, packfactor, bigdata) --> smalldata makes 'bigdata' 4*(packfactor**2) times smaller by: - turning it into B/W (a factor 4) - replacing squares of size pacfactor by one representative gl.unpackrect(width, height, packfactor, smalldata) --> bigdata is the inverse; the numeric arguments must be *the same*. Both work best if width and height are multiples of packfactor (in fact unpackrect will leave garbage bytes). */ static PyObject * gl_packrect(PyObject *self, PyObject *args) { long width, height, packfactor; char *s; PyObject *unpacked, *packed; int pixcount, packedcount, x, y, r, g, b; unsigned long pixel; unsigned char *p; unsigned long *parray; if (!PyArg_GetLong(args, 4, 0, &width)) return NULL; if (!PyArg_GetLong(args, 4, 1, &height)) return NULL; if (!PyArg_GetLong(args, 4, 2, &packfactor)) return NULL; if (!PyArg_GetString(args, 4, 3, &s)) /* For type checking only */ return NULL; if (!PyArg_GetObject(args, 4, 3, &unpacked)) return NULL; if (width <= 0 || height <= 0 || packfactor <= 0) { PyErr_SetString(PyExc_RuntimeError, "packrect args must be > 0"); return NULL; } pixcount = width*height; packedcount = ((width+packfactor-1)/packfactor) * ((height+packfactor-1)/packfactor); if (PyString_Size(unpacked) != pixcount*sizeof(long)) { PyErr_SetString(PyExc_RuntimeError, "string arg to packrect has wrong size"); return NULL; } packed = PyString_FromStringAndSize((char *)NULL, packedcount); if (packed == NULL) return NULL; parray = (unsigned long *) PyString_AsString(unpacked); p = (unsigned char *) PyString_AsString(packed); for (y = 0; y < height; y += packfactor, parray += packfactor*width) { for (x = 0; x < width; x += packfactor) { pixel = parray[x]; r = pixel & 0xff; g = (pixel >> 8) & 0xff; b = (pixel >> 16) & 0xff; *p++ = (30*r+59*g+11*b) / 100; } } return packed; } static unsigned long unpacktab[256]; static int unpacktab_inited = 0; static PyObject * gl_unpackrect(PyObject *self, PyObject *args) { long width, height, packfactor; char *s; PyObject *unpacked, *packed; int pixcount, packedcount; register unsigned char *p; register unsigned long *parray; if (!unpacktab_inited) { register int white; for (white = 256; --white >= 0; ) unpacktab[white] = white * 0x010101L; unpacktab_inited++; } if (!PyArg_GetLong(args, 4, 0, &width)) return NULL; if (!PyArg_GetLong(args, 4, 1, &height)) return NULL; if (!PyArg_GetLong(args, 4, 2, &packfactor)) return NULL; if (!PyArg_GetString(args, 4, 3, &s)) /* For type checking only */ return NULL; if (!PyArg_GetObject(args, 4, 3, &packed)) return NULL; if (width <= 0 || height <= 0 || packfactor <= 0) { PyErr_SetString(PyExc_RuntimeError, "packrect args must be > 0"); return NULL; } pixcount = width*height; packedcount = ((width+packfactor-1)/packfactor) * ((height+packfactor-1)/packfactor); if (PyString_Size(packed) != packedcount) { PyErr_SetString(PyExc_RuntimeError, "string arg to unpackrect has wrong size"); return NULL; } unpacked = PyString_FromStringAndSize((char *)NULL, pixcount*sizeof(long)); if (unpacked == NULL) return NULL; parray = (unsigned long *) PyString_AsString(unpacked); p = (unsigned char *) PyString_AsString(packed); if (packfactor == 1 && width*height > 0) { /* Just expand bytes to longs */ register int x = width * height; do { *parray++ = unpacktab[*p++]; } while (--x >= 0); } else { register int y; for (y = 0; y < height-packfactor+1; y += packfactor, parray += packfactor*width) { register int x; for (x = 0; x < width-packfactor+1; x += packfactor) { register unsigned long pixel = unpacktab[*p++]; register int i; for (i = packfactor*width; (i-=width) >= 0;) { register int j; for (j = packfactor; --j >= 0; ) parray[i+x+j] = pixel; } } } } return unpacked; } static PyObject * gl_gversion(PyObject *self, PyObject *args) { char buf[20]; gversion(buf); return PyString_FromString(buf); } /* void clear - Manual because of clash with termcap */ static PyObject * gl_clear(PyObject *self, PyObject *args) { __GLclear( ); Py_INCREF(Py_None); return Py_None; } /* End of manually written stubs */ /* long getshade */ static PyObject * gl_getshade(PyObject *self, PyObject *args) { long retval; retval = getshade( ); return mknewlongobject(retval); } /* void devport short s long s */ static PyObject * gl_devport(PyObject *self, PyObject *args) { short arg1 ; long arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; devport( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rdr2i long s long s */ static PyObject * gl_rdr2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; rdr2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rectfs short s short s short s short s */ static PyObject * gl_rectfs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; rectfs( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void rects short s short s short s short s */ static PyObject * gl_rects(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; rects( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void rmv2i long s long s */ static PyObject * gl_rmv2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; rmv2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void noport */ static PyObject * gl_noport(PyObject *self, PyObject *args) { noport( ); Py_INCREF(Py_None); return Py_None; } /* void popviewport */ static PyObject * gl_popviewport(PyObject *self, PyObject *args) { popviewport( ); Py_INCREF(Py_None); return Py_None; } /* void clearhitcode */ static PyObject * gl_clearhitcode(PyObject *self, PyObject *args) { clearhitcode( ); Py_INCREF(Py_None); return Py_None; } /* void closeobj */ static PyObject * gl_closeobj(PyObject *self, PyObject *args) { closeobj( ); Py_INCREF(Py_None); return Py_None; } /* void cursoff */ static PyObject * gl_cursoff(PyObject *self, PyObject *args) { cursoff( ); Py_INCREF(Py_None); return Py_None; } /* void curson */ static PyObject * gl_curson(PyObject *self, PyObject *args) { curson( ); Py_INCREF(Py_None); return Py_None; } /* void doublebuffer */ static PyObject * gl_doublebuffer(PyObject *self, PyObject *args) { doublebuffer( ); Py_INCREF(Py_None); return Py_None; } /* void finish */ static PyObject * gl_finish(PyObject *self, PyObject *args) { finish( ); Py_INCREF(Py_None); return Py_None; } /* void gconfig */ static PyObject * gl_gconfig(PyObject *self, PyObject *args) { gconfig( ); Py_INCREF(Py_None); return Py_None; } /* void ginit */ static PyObject * gl_ginit(PyObject *self, PyObject *args) { ginit( ); Py_INCREF(Py_None); return Py_None; } /* void greset */ static PyObject * gl_greset(PyObject *self, PyObject *args) { greset( ); Py_INCREF(Py_None); return Py_None; } /* void multimap */ static PyObject * gl_multimap(PyObject *self, PyObject *args) { multimap( ); Py_INCREF(Py_None); return Py_None; } /* void onemap */ static PyObject * gl_onemap(PyObject *self, PyObject *args) { onemap( ); Py_INCREF(Py_None); return Py_None; } /* void popattributes */ static PyObject * gl_popattributes(PyObject *self, PyObject *args) { popattributes( ); Py_INCREF(Py_None); return Py_None; } /* void popmatrix */ static PyObject * gl_popmatrix(PyObject *self, PyObject *args) { popmatrix( ); Py_INCREF(Py_None); return Py_None; } /* void pushattributes */ static PyObject * gl_pushattributes(PyObject *self, PyObject *args) { pushattributes( ); Py_INCREF(Py_None); return Py_None; } /* void pushmatrix */ static PyObject * gl_pushmatrix(PyObject *self, PyObject *args) { pushmatrix( ); Py_INCREF(Py_None); return Py_None; } /* void pushviewport */ static PyObject * gl_pushviewport(PyObject *self, PyObject *args) { pushviewport( ); Py_INCREF(Py_None); return Py_None; } /* void qreset */ static PyObject * gl_qreset(PyObject *self, PyObject *args) { qreset( ); Py_INCREF(Py_None); return Py_None; } /* void RGBmode */ static PyObject * gl_RGBmode(PyObject *self, PyObject *args) { RGBmode( ); Py_INCREF(Py_None); return Py_None; } /* void singlebuffer */ static PyObject * gl_singlebuffer(PyObject *self, PyObject *args) { singlebuffer( ); Py_INCREF(Py_None); return Py_None; } /* void swapbuffers */ static PyObject * gl_swapbuffers(PyObject *self, PyObject *args) { swapbuffers( ); Py_INCREF(Py_None); return Py_None; } /* void gsync */ static PyObject * gl_gsync(PyObject *self, PyObject *args) { gsync( ); Py_INCREF(Py_None); return Py_None; } /* void gflush */ static PyObject * gl_gflush(PyObject *self, PyObject *args) { gflush( ); Py_INCREF(Py_None); return Py_None; } /* void tpon */ static PyObject * gl_tpon(PyObject *self, PyObject *args) { tpon( ); Py_INCREF(Py_None); return Py_None; } /* void tpoff */ static PyObject * gl_tpoff(PyObject *self, PyObject *args) { tpoff( ); Py_INCREF(Py_None); return Py_None; } /* void clkon */ static PyObject * gl_clkon(PyObject *self, PyObject *args) { clkon( ); Py_INCREF(Py_None); return Py_None; } /* void clkoff */ static PyObject * gl_clkoff(PyObject *self, PyObject *args) { clkoff( ); Py_INCREF(Py_None); return Py_None; } /* void ringbell */ static PyObject * gl_ringbell(PyObject *self, PyObject *args) { ringbell( ); Py_INCREF(Py_None); return Py_None; } /* void gbegin */ static PyObject * gl_gbegin(PyObject *self, PyObject *args) { gbegin( ); Py_INCREF(Py_None); return Py_None; } /* void textinit */ static PyObject * gl_textinit(PyObject *self, PyObject *args) { textinit( ); Py_INCREF(Py_None); return Py_None; } /* void initnames */ static PyObject * gl_initnames(PyObject *self, PyObject *args) { initnames( ); Py_INCREF(Py_None); return Py_None; } /* void pclos */ static PyObject * gl_pclos(PyObject *self, PyObject *args) { pclos( ); Py_INCREF(Py_None); return Py_None; } /* void popname */ static PyObject * gl_popname(PyObject *self, PyObject *args) { popname( ); Py_INCREF(Py_None); return Py_None; } /* void spclos */ static PyObject * gl_spclos(PyObject *self, PyObject *args) { spclos( ); Py_INCREF(Py_None); return Py_None; } /* void zclear */ static PyObject * gl_zclear(PyObject *self, PyObject *args) { zclear( ); Py_INCREF(Py_None); return Py_None; } /* void screenspace */ static PyObject * gl_screenspace(PyObject *self, PyObject *args) { screenspace( ); Py_INCREF(Py_None); return Py_None; } /* void reshapeviewport */ static PyObject * gl_reshapeviewport(PyObject *self, PyObject *args) { reshapeviewport( ); Py_INCREF(Py_None); return Py_None; } /* void winpush */ static PyObject * gl_winpush(PyObject *self, PyObject *args) { winpush( ); Py_INCREF(Py_None); return Py_None; } /* void winpop */ static PyObject * gl_winpop(PyObject *self, PyObject *args) { winpop( ); Py_INCREF(Py_None); return Py_None; } /* void foreground */ static PyObject * gl_foreground(PyObject *self, PyObject *args) { foreground( ); Py_INCREF(Py_None); return Py_None; } /* void endfullscrn */ static PyObject * gl_endfullscrn(PyObject *self, PyObject *args) { endfullscrn( ); Py_INCREF(Py_None); return Py_None; } /* void endpupmode */ static PyObject * gl_endpupmode(PyObject *self, PyObject *args) { endpupmode( ); Py_INCREF(Py_None); return Py_None; } /* void fullscrn */ static PyObject * gl_fullscrn(PyObject *self, PyObject *args) { fullscrn( ); Py_INCREF(Py_None); return Py_None; } /* void pupmode */ static PyObject * gl_pupmode(PyObject *self, PyObject *args) { pupmode( ); Py_INCREF(Py_None); return Py_None; } /* void winconstraints */ static PyObject * gl_winconstraints(PyObject *self, PyObject *args) { winconstraints( ); Py_INCREF(Py_None); return Py_None; } /* void pagecolor short s */ static PyObject * gl_pagecolor(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; pagecolor( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void textcolor short s */ static PyObject * gl_textcolor(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; textcolor( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void color short s */ static PyObject * gl_color(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; color( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void curveit short s */ static PyObject * gl_curveit(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; curveit( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void font short s */ static PyObject * gl_font(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; font( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void linewidth short s */ static PyObject * gl_linewidth(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; linewidth( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void setlinestyle short s */ static PyObject * gl_setlinestyle(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; setlinestyle( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void setmap short s */ static PyObject * gl_setmap(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; setmap( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void swapinterval short s */ static PyObject * gl_swapinterval(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; swapinterval( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void writemask short s */ static PyObject * gl_writemask(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; writemask( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void textwritemask short s */ static PyObject * gl_textwritemask(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; textwritemask( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void qdevice short s */ static PyObject * gl_qdevice(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; qdevice( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void unqdevice short s */ static PyObject * gl_unqdevice(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; unqdevice( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void curvebasis short s */ static PyObject * gl_curvebasis(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; curvebasis( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void curveprecision short s */ static PyObject * gl_curveprecision(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; curveprecision( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void loadname short s */ static PyObject * gl_loadname(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; loadname( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void passthrough short s */ static PyObject * gl_passthrough(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; passthrough( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void pushname short s */ static PyObject * gl_pushname(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; pushname( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void setmonitor short s */ static PyObject * gl_setmonitor(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; setmonitor( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void setshade short s */ static PyObject * gl_setshade(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; setshade( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void setpattern short s */ static PyObject * gl_setpattern(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; setpattern( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void pagewritemask short s */ static PyObject * gl_pagewritemask(PyObject *self, PyObject *args) { short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; pagewritemask( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void callobj long s */ static PyObject * gl_callobj(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; callobj( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void delobj long s */ static PyObject * gl_delobj(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; delobj( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void editobj long s */ static PyObject * gl_editobj(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; editobj( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void makeobj long s */ static PyObject * gl_makeobj(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; makeobj( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void maketag long s */ static PyObject * gl_maketag(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; maketag( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void chunksize long s */ static PyObject * gl_chunksize(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; chunksize( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void compactify long s */ static PyObject * gl_compactify(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; compactify( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void deltag long s */ static PyObject * gl_deltag(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; deltag( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void lsrepeat long s */ static PyObject * gl_lsrepeat(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; lsrepeat( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void objinsert long s */ static PyObject * gl_objinsert(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; objinsert( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void objreplace long s */ static PyObject * gl_objreplace(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; objreplace( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void winclose long s */ static PyObject * gl_winclose(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; winclose( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void blanktime long s */ static PyObject * gl_blanktime(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; blanktime( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void freepup long s */ static PyObject * gl_freepup(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; freepup( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void backbuffer long s */ static PyObject * gl_backbuffer(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; backbuffer( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void frontbuffer long s */ static PyObject * gl_frontbuffer(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; frontbuffer( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void lsbackup long s */ static PyObject * gl_lsbackup(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; lsbackup( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void resetls long s */ static PyObject * gl_resetls(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; resetls( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void lampon long s */ static PyObject * gl_lampon(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; lampon( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void lampoff long s */ static PyObject * gl_lampoff(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; lampoff( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void setbell long s */ static PyObject * gl_setbell(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; setbell( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void blankscreen long s */ static PyObject * gl_blankscreen(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; blankscreen( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void depthcue long s */ static PyObject * gl_depthcue(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; depthcue( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void zbuffer long s */ static PyObject * gl_zbuffer(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; zbuffer( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void backface long s */ static PyObject * gl_backface(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; backface( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void cmov2i long s long s */ static PyObject * gl_cmov2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; cmov2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void draw2i long s long s */ static PyObject * gl_draw2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; draw2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void move2i long s long s */ static PyObject * gl_move2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; move2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pnt2i long s long s */ static PyObject * gl_pnt2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; pnt2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void patchbasis long s long s */ static PyObject * gl_patchbasis(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; patchbasis( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void patchprecision long s long s */ static PyObject * gl_patchprecision(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; patchprecision( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pdr2i long s long s */ static PyObject * gl_pdr2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; pdr2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pmv2i long s long s */ static PyObject * gl_pmv2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; pmv2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rpdr2i long s long s */ static PyObject * gl_rpdr2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; rpdr2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rpmv2i long s long s */ static PyObject * gl_rpmv2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; rpmv2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void xfpt2i long s long s */ static PyObject * gl_xfpt2i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; xfpt2i( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void objdelete long s long s */ static PyObject * gl_objdelete(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; objdelete( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void patchcurves long s long s */ static PyObject * gl_patchcurves(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; patchcurves( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void minsize long s long s */ static PyObject * gl_minsize(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; minsize( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void maxsize long s long s */ static PyObject * gl_maxsize(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; maxsize( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void keepaspect long s long s */ static PyObject * gl_keepaspect(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; keepaspect( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void prefsize long s long s */ static PyObject * gl_prefsize(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; prefsize( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void stepunit long s long s */ static PyObject * gl_stepunit(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; stepunit( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void fudge long s long s */ static PyObject * gl_fudge(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; fudge( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void winmove long s long s */ static PyObject * gl_winmove(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; winmove( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void attachcursor short s short s */ static PyObject * gl_attachcursor(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; attachcursor( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void deflinestyle short s short s */ static PyObject * gl_deflinestyle(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; deflinestyle( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void noise short s short s */ static PyObject * gl_noise(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; noise( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void picksize short s short s */ static PyObject * gl_picksize(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; picksize( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void qenter short s short s */ static PyObject * gl_qenter(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; qenter( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void setdepth short s short s */ static PyObject * gl_setdepth(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; setdepth( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void cmov2s short s short s */ static PyObject * gl_cmov2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; cmov2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void draw2s short s short s */ static PyObject * gl_draw2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; draw2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void move2s short s short s */ static PyObject * gl_move2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; move2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pdr2s short s short s */ static PyObject * gl_pdr2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; pdr2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pmv2s short s short s */ static PyObject * gl_pmv2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; pmv2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pnt2s short s short s */ static PyObject * gl_pnt2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; pnt2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rdr2s short s short s */ static PyObject * gl_rdr2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; rdr2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rmv2s short s short s */ static PyObject * gl_rmv2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; rmv2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rpdr2s short s short s */ static PyObject * gl_rpdr2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; rpdr2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rpmv2s short s short s */ static PyObject * gl_rpmv2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; rpmv2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void xfpt2s short s short s */ static PyObject * gl_xfpt2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; xfpt2s( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void cmov2 float s float s */ static PyObject * gl_cmov2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; cmov2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void draw2 float s float s */ static PyObject * gl_draw2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; draw2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void move2 float s float s */ static PyObject * gl_move2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; move2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pnt2 float s float s */ static PyObject * gl_pnt2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; pnt2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pdr2 float s float s */ static PyObject * gl_pdr2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; pdr2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void pmv2 float s float s */ static PyObject * gl_pmv2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; pmv2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rdr2 float s float s */ static PyObject * gl_rdr2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; rdr2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rmv2 float s float s */ static PyObject * gl_rmv2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; rmv2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rpdr2 float s float s */ static PyObject * gl_rpdr2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; rpdr2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rpmv2 float s float s */ static PyObject * gl_rpmv2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; rpmv2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void xfpt2 float s float s */ static PyObject * gl_xfpt2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; xfpt2( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void loadmatrix float s[4*4] */ static PyObject * gl_loadmatrix(PyObject *self, PyObject *args) { float arg1 [ 4 ] [ 4 ] ; if (!getifloatarray(args, 1, 0, 4 * 4 , (float *) arg1)) return NULL; loadmatrix( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void multmatrix float s[4*4] */ static PyObject * gl_multmatrix(PyObject *self, PyObject *args) { float arg1 [ 4 ] [ 4 ] ; if (!getifloatarray(args, 1, 0, 4 * 4 , (float *) arg1)) return NULL; multmatrix( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void crv float s[3*4] */ static PyObject * gl_crv(PyObject *self, PyObject *args) { float arg1 [ 4 ] [ 3 ] ; if (!getifloatarray(args, 1, 0, 3 * 4 , (float *) arg1)) return NULL; crv( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void rcrv float s[4*4] */ static PyObject * gl_rcrv(PyObject *self, PyObject *args) { float arg1 [ 4 ] [ 4 ] ; if (!getifloatarray(args, 1, 0, 4 * 4 , (float *) arg1)) return NULL; rcrv( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void addtopup long s char *s long s */ static PyObject * gl_addtopup(PyObject *self, PyObject *args) { long arg1 ; string arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getistringarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; addtopup( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void charstr char *s */ static PyObject * gl_charstr(PyObject *self, PyObject *args) { string arg1 ; if (!getistringarg(args, 1, 0, &arg1)) return NULL; charstr( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void getport char *s */ static PyObject * gl_getport(PyObject *self, PyObject *args) { string arg1 ; if (!getistringarg(args, 1, 0, &arg1)) return NULL; getport( arg1 ); Py_INCREF(Py_None); return Py_None; } /* long strwidth char *s */ static PyObject * gl_strwidth(PyObject *self, PyObject *args) { long retval; string arg1 ; if (!getistringarg(args, 1, 0, &arg1)) return NULL; retval = strwidth( arg1 ); return mknewlongobject(retval); } /* long winopen char *s */ static PyObject * gl_winopen(PyObject *self, PyObject *args) { long retval; string arg1 ; if (!getistringarg(args, 1, 0, &arg1)) return NULL; retval = winopen( arg1 ); return mknewlongobject(retval); } /* void wintitle char *s */ static PyObject * gl_wintitle(PyObject *self, PyObject *args) { string arg1 ; if (!getistringarg(args, 1, 0, &arg1)) return NULL; wintitle( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void polf long s float s[3*arg1] */ static PyObject * gl_polf(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 3 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (float(*)[3]) PyMem_NEW(float , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 1, 0, 3 * arg1 , (float *) arg2)) return NULL; polf( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void polf2 long s float s[2*arg1] */ static PyObject * gl_polf2(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 2 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (float(*)[2]) PyMem_NEW(float , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 1, 0, 2 * arg1 , (float *) arg2)) return NULL; polf2( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void poly long s float s[3*arg1] */ static PyObject * gl_poly(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 3 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (float(*)[3]) PyMem_NEW(float , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 1, 0, 3 * arg1 , (float *) arg2)) return NULL; poly( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void poly2 long s float s[2*arg1] */ static PyObject * gl_poly2(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 2 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (float(*)[2]) PyMem_NEW(float , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 1, 0, 2 * arg1 , (float *) arg2)) return NULL; poly2( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void crvn long s float s[3*arg1] */ static PyObject * gl_crvn(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 3 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (float(*)[3]) PyMem_NEW(float , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 1, 0, 3 * arg1 , (float *) arg2)) return NULL; crvn( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void rcrvn long s float s[4*arg1] */ static PyObject * gl_rcrvn(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 4 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 4; if ((arg2 = (float(*)[4]) PyMem_NEW(float , 4 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 1, 0, 4 * arg1 , (float *) arg2)) return NULL; rcrvn( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void polf2i long s long s[2*arg1] */ static PyObject * gl_polf2i(PyObject *self, PyObject *args) { long arg1 ; long (* arg2) [ 2 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (long(*)[2]) PyMem_NEW(long , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getilongarray(args, 1, 0, 2 * arg1 , (long *) arg2)) return NULL; polf2i( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void polfi long s long s[3*arg1] */ static PyObject * gl_polfi(PyObject *self, PyObject *args) { long arg1 ; long (* arg2) [ 3 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (long(*)[3]) PyMem_NEW(long , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getilongarray(args, 1, 0, 3 * arg1 , (long *) arg2)) return NULL; polfi( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void poly2i long s long s[2*arg1] */ static PyObject * gl_poly2i(PyObject *self, PyObject *args) { long arg1 ; long (* arg2) [ 2 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (long(*)[2]) PyMem_NEW(long , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getilongarray(args, 1, 0, 2 * arg1 , (long *) arg2)) return NULL; poly2i( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void polyi long s long s[3*arg1] */ static PyObject * gl_polyi(PyObject *self, PyObject *args) { long arg1 ; long (* arg2) [ 3 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (long(*)[3]) PyMem_NEW(long , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getilongarray(args, 1, 0, 3 * arg1 , (long *) arg2)) return NULL; polyi( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void polf2s long s short s[2*arg1] */ static PyObject * gl_polf2s(PyObject *self, PyObject *args) { long arg1 ; short (* arg2) [ 2 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (short(*)[2]) PyMem_NEW(short , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 1, 0, 2 * arg1 , (short *) arg2)) return NULL; polf2s( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void polfs long s short s[3*arg1] */ static PyObject * gl_polfs(PyObject *self, PyObject *args) { long arg1 ; short (* arg2) [ 3 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (short(*)[3]) PyMem_NEW(short , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 1, 0, 3 * arg1 , (short *) arg2)) return NULL; polfs( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void polys long s short s[3*arg1] */ static PyObject * gl_polys(PyObject *self, PyObject *args) { long arg1 ; short (* arg2) [ 3 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (short(*)[3]) PyMem_NEW(short , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 1, 0, 3 * arg1 , (short *) arg2)) return NULL; polys( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void poly2s long s short s[2*arg1] */ static PyObject * gl_poly2s(PyObject *self, PyObject *args) { long arg1 ; short (* arg2) [ 2 ] ; if (!getilongarraysize(args, 1, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (short(*)[2]) PyMem_NEW(short , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 1, 0, 2 * arg1 , (short *) arg2)) return NULL; poly2s( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void defcursor short s u_short s[128] */ static PyObject * gl_defcursor(PyObject *self, PyObject *args) { short arg1 ; unsigned short arg2 [ 128 ] ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarray(args, 2, 1, 128 , (short *) arg2)) return NULL; defcursor( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void writepixels short s u_short s[arg1] */ static PyObject * gl_writepixels(PyObject *self, PyObject *args) { short arg1 ; unsigned short * arg2 ; if (!getishortarraysize(args, 1, 0, &arg1)) return NULL; if ((arg2 = PyMem_NEW(unsigned short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 1, 0, arg1 , (short *) arg2)) return NULL; writepixels( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void defbasis long s float s[4*4] */ static PyObject * gl_defbasis(PyObject *self, PyObject *args) { long arg1 ; float arg2 [ 4 ] [ 4 ] ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarray(args, 2, 1, 4 * 4 , (float *) arg2)) return NULL; defbasis( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void gewrite short s short s[arg1] */ static PyObject * gl_gewrite(PyObject *self, PyObject *args) { short arg1 ; short * arg2 ; if (!getishortarraysize(args, 1, 0, &arg1)) return NULL; if ((arg2 = PyMem_NEW(short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 1, 0, arg1 , arg2)) return NULL; gewrite( arg1 , arg2 ); PyMem_DEL(arg2); Py_INCREF(Py_None); return Py_None; } /* void rotate short s char s */ static PyObject * gl_rotate(PyObject *self, PyObject *args) { short arg1 ; char arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getichararg(args, 2, 1, &arg2)) return NULL; rotate( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void rot float s char s */ static PyObject * gl_rot(PyObject *self, PyObject *args) { float arg1 ; char arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getichararg(args, 2, 1, &arg2)) return NULL; rot( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void circfi long s long s long s */ static PyObject * gl_circfi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; circfi( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void circi long s long s long s */ static PyObject * gl_circi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; circi( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void cmovi long s long s long s */ static PyObject * gl_cmovi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; cmovi( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void drawi long s long s long s */ static PyObject * gl_drawi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; drawi( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void movei long s long s long s */ static PyObject * gl_movei(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; movei( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pnti long s long s long s */ static PyObject * gl_pnti(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; pnti( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void newtag long s long s long s */ static PyObject * gl_newtag(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; newtag( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pdri long s long s long s */ static PyObject * gl_pdri(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; pdri( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pmvi long s long s long s */ static PyObject * gl_pmvi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; pmvi( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rdri long s long s long s */ static PyObject * gl_rdri(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; rdri( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rmvi long s long s long s */ static PyObject * gl_rmvi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; rmvi( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rpdri long s long s long s */ static PyObject * gl_rpdri(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; rpdri( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rpmvi long s long s long s */ static PyObject * gl_rpmvi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; rpmvi( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void xfpti long s long s long s */ static PyObject * gl_xfpti(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; xfpti( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void circ float s float s float s */ static PyObject * gl_circ(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; circ( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void circf float s float s float s */ static PyObject * gl_circf(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; circf( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void cmov float s float s float s */ static PyObject * gl_cmov(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; cmov( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void draw float s float s float s */ static PyObject * gl_draw(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; draw( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void move float s float s float s */ static PyObject * gl_move(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; move( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pnt float s float s float s */ static PyObject * gl_pnt(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; pnt( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void scale float s float s float s */ static PyObject * gl_scale(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; scale( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void translate float s float s float s */ static PyObject * gl_translate(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; translate( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pdr float s float s float s */ static PyObject * gl_pdr(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; pdr( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pmv float s float s float s */ static PyObject * gl_pmv(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; pmv( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rdr float s float s float s */ static PyObject * gl_rdr(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; rdr( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rmv float s float s float s */ static PyObject * gl_rmv(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; rmv( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rpdr float s float s float s */ static PyObject * gl_rpdr(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; rpdr( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rpmv float s float s float s */ static PyObject * gl_rpmv(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; rpmv( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void xfpt float s float s float s */ static PyObject * gl_xfpt(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; if (!getifloatarg(args, 3, 0, &arg1)) return NULL; if (!getifloatarg(args, 3, 1, &arg2)) return NULL; if (!getifloatarg(args, 3, 2, &arg3)) return NULL; xfpt( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void RGBcolor short s short s short s */ static PyObject * gl_RGBcolor(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; RGBcolor( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void RGBwritemask short s short s short s */ static PyObject * gl_RGBwritemask(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; RGBwritemask( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void setcursor short s short s short s */ static PyObject * gl_setcursor(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; setcursor( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void tie short s short s short s */ static PyObject * gl_tie(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; tie( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void circfs short s short s short s */ static PyObject * gl_circfs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; circfs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void circs short s short s short s */ static PyObject * gl_circs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; circs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void cmovs short s short s short s */ static PyObject * gl_cmovs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; cmovs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void draws short s short s short s */ static PyObject * gl_draws(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; draws( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void moves short s short s short s */ static PyObject * gl_moves(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; moves( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pdrs short s short s short s */ static PyObject * gl_pdrs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; pdrs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pmvs short s short s short s */ static PyObject * gl_pmvs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; pmvs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void pnts short s short s short s */ static PyObject * gl_pnts(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; pnts( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rdrs short s short s short s */ static PyObject * gl_rdrs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; rdrs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rmvs short s short s short s */ static PyObject * gl_rmvs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; rmvs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rpdrs short s short s short s */ static PyObject * gl_rpdrs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; rpdrs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void rpmvs short s short s short s */ static PyObject * gl_rpmvs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; rpmvs( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void xfpts short s short s short s */ static PyObject * gl_xfpts(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; xfpts( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void curorigin short s short s short s */ static PyObject * gl_curorigin(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; curorigin( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void cyclemap short s short s short s */ static PyObject * gl_cyclemap(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; if (!getishortarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; cyclemap( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void patch float s[4*4] float s[4*4] float s[4*4] */ static PyObject * gl_patch(PyObject *self, PyObject *args) { float arg1 [ 4 ] [ 4 ] ; float arg2 [ 4 ] [ 4 ] ; float arg3 [ 4 ] [ 4 ] ; if (!getifloatarray(args, 3, 0, 4 * 4 , (float *) arg1)) return NULL; if (!getifloatarray(args, 3, 1, 4 * 4 , (float *) arg2)) return NULL; if (!getifloatarray(args, 3, 2, 4 * 4 , (float *) arg3)) return NULL; patch( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void splf long s float s[3*arg1] u_short s[arg1] */ static PyObject * gl_splf(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 3 ] ; unsigned short * arg3 ; if (!getilongarraysize(args, 2, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (float(*)[3]) PyMem_NEW(float , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 2, 0, 3 * arg1 , (float *) arg2)) return NULL; if ((arg3 = PyMem_NEW(unsigned short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 1, arg1 , (short *) arg3)) return NULL; splf( arg1 , arg2 , arg3 ); PyMem_DEL(arg2); PyMem_DEL(arg3); Py_INCREF(Py_None); return Py_None; } /* void splf2 long s float s[2*arg1] u_short s[arg1] */ static PyObject * gl_splf2(PyObject *self, PyObject *args) { long arg1 ; float (* arg2) [ 2 ] ; unsigned short * arg3 ; if (!getilongarraysize(args, 2, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (float(*)[2]) PyMem_NEW(float , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 2, 0, 2 * arg1 , (float *) arg2)) return NULL; if ((arg3 = PyMem_NEW(unsigned short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 1, arg1 , (short *) arg3)) return NULL; splf2( arg1 , arg2 , arg3 ); PyMem_DEL(arg2); PyMem_DEL(arg3); Py_INCREF(Py_None); return Py_None; } /* void splfi long s long s[3*arg1] u_short s[arg1] */ static PyObject * gl_splfi(PyObject *self, PyObject *args) { long arg1 ; long (* arg2) [ 3 ] ; unsigned short * arg3 ; if (!getilongarraysize(args, 2, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (long(*)[3]) PyMem_NEW(long , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getilongarray(args, 2, 0, 3 * arg1 , (long *) arg2)) return NULL; if ((arg3 = PyMem_NEW(unsigned short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 1, arg1 , (short *) arg3)) return NULL; splfi( arg1 , arg2 , arg3 ); PyMem_DEL(arg2); PyMem_DEL(arg3); Py_INCREF(Py_None); return Py_None; } /* void splf2i long s long s[2*arg1] u_short s[arg1] */ static PyObject * gl_splf2i(PyObject *self, PyObject *args) { long arg1 ; long (* arg2) [ 2 ] ; unsigned short * arg3 ; if (!getilongarraysize(args, 2, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (long(*)[2]) PyMem_NEW(long , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getilongarray(args, 2, 0, 2 * arg1 , (long *) arg2)) return NULL; if ((arg3 = PyMem_NEW(unsigned short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 1, arg1 , (short *) arg3)) return NULL; splf2i( arg1 , arg2 , arg3 ); PyMem_DEL(arg2); PyMem_DEL(arg3); Py_INCREF(Py_None); return Py_None; } /* void splfs long s short s[3*arg1] u_short s[arg1] */ static PyObject * gl_splfs(PyObject *self, PyObject *args) { long arg1 ; short (* arg2) [ 3 ] ; unsigned short * arg3 ; if (!getilongarraysize(args, 2, 0, &arg1)) return NULL; arg1 = arg1 / 3; if ((arg2 = (short(*)[3]) PyMem_NEW(short , 3 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 0, 3 * arg1 , (short *) arg2)) return NULL; if ((arg3 = PyMem_NEW(unsigned short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 1, arg1 , (short *) arg3)) return NULL; splfs( arg1 , arg2 , arg3 ); PyMem_DEL(arg2); PyMem_DEL(arg3); Py_INCREF(Py_None); return Py_None; } /* void splf2s long s short s[2*arg1] u_short s[arg1] */ static PyObject * gl_splf2s(PyObject *self, PyObject *args) { long arg1 ; short (* arg2) [ 2 ] ; unsigned short * arg3 ; if (!getilongarraysize(args, 2, 0, &arg1)) return NULL; arg1 = arg1 / 2; if ((arg2 = (short(*)[2]) PyMem_NEW(short , 2 * arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 0, 2 * arg1 , (short *) arg2)) return NULL; if ((arg3 = PyMem_NEW(unsigned short , arg1 )) == NULL) return PyErr_NoMemory(); if (!getishortarray(args, 2, 1, arg1 , (short *) arg3)) return NULL; splf2s( arg1 , arg2 , arg3 ); PyMem_DEL(arg2); PyMem_DEL(arg3); Py_INCREF(Py_None); return Py_None; } /* void rpatch float s[4*4] float s[4*4] float s[4*4] float s[4*4] */ static PyObject * gl_rpatch(PyObject *self, PyObject *args) { float arg1 [ 4 ] [ 4 ] ; float arg2 [ 4 ] [ 4 ] ; float arg3 [ 4 ] [ 4 ] ; float arg4 [ 4 ] [ 4 ] ; if (!getifloatarray(args, 4, 0, 4 * 4 , (float *) arg1)) return NULL; if (!getifloatarray(args, 4, 1, 4 * 4 , (float *) arg2)) return NULL; if (!getifloatarray(args, 4, 2, 4 * 4 , (float *) arg3)) return NULL; if (!getifloatarray(args, 4, 3, 4 * 4 , (float *) arg4)) return NULL; rpatch( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void ortho2 float s float s float s float s */ static PyObject * gl_ortho2(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; if (!getifloatarg(args, 4, 0, &arg1)) return NULL; if (!getifloatarg(args, 4, 1, &arg2)) return NULL; if (!getifloatarg(args, 4, 2, &arg3)) return NULL; if (!getifloatarg(args, 4, 3, &arg4)) return NULL; ortho2( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void rect float s float s float s float s */ static PyObject * gl_rect(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; if (!getifloatarg(args, 4, 0, &arg1)) return NULL; if (!getifloatarg(args, 4, 1, &arg2)) return NULL; if (!getifloatarg(args, 4, 2, &arg3)) return NULL; if (!getifloatarg(args, 4, 3, &arg4)) return NULL; rect( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void rectf float s float s float s float s */ static PyObject * gl_rectf(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; if (!getifloatarg(args, 4, 0, &arg1)) return NULL; if (!getifloatarg(args, 4, 1, &arg2)) return NULL; if (!getifloatarg(args, 4, 2, &arg3)) return NULL; if (!getifloatarg(args, 4, 3, &arg4)) return NULL; rectf( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void xfpt4 float s float s float s float s */ static PyObject * gl_xfpt4(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; if (!getifloatarg(args, 4, 0, &arg1)) return NULL; if (!getifloatarg(args, 4, 1, &arg2)) return NULL; if (!getifloatarg(args, 4, 2, &arg3)) return NULL; if (!getifloatarg(args, 4, 3, &arg4)) return NULL; xfpt4( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void textport short s short s short s short s */ static PyObject * gl_textport(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; textport( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void mapcolor short s short s short s short s */ static PyObject * gl_mapcolor(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; mapcolor( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void scrmask short s short s short s short s */ static PyObject * gl_scrmask(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; scrmask( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void setvaluator short s short s short s short s */ static PyObject * gl_setvaluator(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; setvaluator( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void viewport short s short s short s short s */ static PyObject * gl_viewport(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; viewport( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void shaderange short s short s short s short s */ static PyObject * gl_shaderange(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; shaderange( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void xfpt4s short s short s short s short s */ static PyObject * gl_xfpt4s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; xfpt4s( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void rectfi long s long s long s long s */ static PyObject * gl_rectfi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; long arg4 ; if (!getilongarg(args, 4, 0, &arg1)) return NULL; if (!getilongarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; rectfi( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void recti long s long s long s long s */ static PyObject * gl_recti(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; long arg4 ; if (!getilongarg(args, 4, 0, &arg1)) return NULL; if (!getilongarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; recti( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void xfpt4i long s long s long s long s */ static PyObject * gl_xfpt4i(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; long arg4 ; if (!getilongarg(args, 4, 0, &arg1)) return NULL; if (!getilongarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; xfpt4i( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void prefposition long s long s long s long s */ static PyObject * gl_prefposition(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; long arg4 ; if (!getilongarg(args, 4, 0, &arg1)) return NULL; if (!getilongarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; prefposition( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void arc float s float s float s short s short s */ static PyObject * gl_arc(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; short arg4 ; short arg5 ; if (!getifloatarg(args, 5, 0, &arg1)) return NULL; if (!getifloatarg(args, 5, 1, &arg2)) return NULL; if (!getifloatarg(args, 5, 2, &arg3)) return NULL; if (!getishortarg(args, 5, 3, &arg4)) return NULL; if (!getishortarg(args, 5, 4, &arg5)) return NULL; arc( arg1 , arg2 , arg3 , arg4 , arg5 ); Py_INCREF(Py_None); return Py_None; } /* void arcf float s float s float s short s short s */ static PyObject * gl_arcf(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; short arg4 ; short arg5 ; if (!getifloatarg(args, 5, 0, &arg1)) return NULL; if (!getifloatarg(args, 5, 1, &arg2)) return NULL; if (!getifloatarg(args, 5, 2, &arg3)) return NULL; if (!getishortarg(args, 5, 3, &arg4)) return NULL; if (!getishortarg(args, 5, 4, &arg5)) return NULL; arcf( arg1 , arg2 , arg3 , arg4 , arg5 ); Py_INCREF(Py_None); return Py_None; } /* void arcfi long s long s long s short s short s */ static PyObject * gl_arcfi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; short arg4 ; short arg5 ; if (!getilongarg(args, 5, 0, &arg1)) return NULL; if (!getilongarg(args, 5, 1, &arg2)) return NULL; if (!getilongarg(args, 5, 2, &arg3)) return NULL; if (!getishortarg(args, 5, 3, &arg4)) return NULL; if (!getishortarg(args, 5, 4, &arg5)) return NULL; arcfi( arg1 , arg2 , arg3 , arg4 , arg5 ); Py_INCREF(Py_None); return Py_None; } /* void arci long s long s long s short s short s */ static PyObject * gl_arci(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; short arg4 ; short arg5 ; if (!getilongarg(args, 5, 0, &arg1)) return NULL; if (!getilongarg(args, 5, 1, &arg2)) return NULL; if (!getilongarg(args, 5, 2, &arg3)) return NULL; if (!getishortarg(args, 5, 3, &arg4)) return NULL; if (!getishortarg(args, 5, 4, &arg5)) return NULL; arci( arg1 , arg2 , arg3 , arg4 , arg5 ); Py_INCREF(Py_None); return Py_None; } /* void bbox2 short s short s float s float s float s float s */ static PyObject * gl_bbox2(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; float arg3 ; float arg4 ; float arg5 ; float arg6 ; if (!getishortarg(args, 6, 0, &arg1)) return NULL; if (!getishortarg(args, 6, 1, &arg2)) return NULL; if (!getifloatarg(args, 6, 2, &arg3)) return NULL; if (!getifloatarg(args, 6, 3, &arg4)) return NULL; if (!getifloatarg(args, 6, 4, &arg5)) return NULL; if (!getifloatarg(args, 6, 5, &arg6)) return NULL; bbox2( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); Py_INCREF(Py_None); return Py_None; } /* void bbox2i short s short s long s long s long s long s */ static PyObject * gl_bbox2i(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; long arg3 ; long arg4 ; long arg5 ; long arg6 ; if (!getishortarg(args, 6, 0, &arg1)) return NULL; if (!getishortarg(args, 6, 1, &arg2)) return NULL; if (!getilongarg(args, 6, 2, &arg3)) return NULL; if (!getilongarg(args, 6, 3, &arg4)) return NULL; if (!getilongarg(args, 6, 4, &arg5)) return NULL; if (!getilongarg(args, 6, 5, &arg6)) return NULL; bbox2i( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); Py_INCREF(Py_None); return Py_None; } /* void bbox2s short s short s short s short s short s short s */ static PyObject * gl_bbox2s(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; short arg6 ; if (!getishortarg(args, 6, 0, &arg1)) return NULL; if (!getishortarg(args, 6, 1, &arg2)) return NULL; if (!getishortarg(args, 6, 2, &arg3)) return NULL; if (!getishortarg(args, 6, 3, &arg4)) return NULL; if (!getishortarg(args, 6, 4, &arg5)) return NULL; if (!getishortarg(args, 6, 5, &arg6)) return NULL; bbox2s( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); Py_INCREF(Py_None); return Py_None; } /* void blink short s short s short s short s short s */ static PyObject * gl_blink(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; if (!getishortarg(args, 5, 0, &arg1)) return NULL; if (!getishortarg(args, 5, 1, &arg2)) return NULL; if (!getishortarg(args, 5, 2, &arg3)) return NULL; if (!getishortarg(args, 5, 3, &arg4)) return NULL; if (!getishortarg(args, 5, 4, &arg5)) return NULL; blink( arg1 , arg2 , arg3 , arg4 , arg5 ); Py_INCREF(Py_None); return Py_None; } /* void ortho float s float s float s float s float s float s */ static PyObject * gl_ortho(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; float arg5 ; float arg6 ; if (!getifloatarg(args, 6, 0, &arg1)) return NULL; if (!getifloatarg(args, 6, 1, &arg2)) return NULL; if (!getifloatarg(args, 6, 2, &arg3)) return NULL; if (!getifloatarg(args, 6, 3, &arg4)) return NULL; if (!getifloatarg(args, 6, 4, &arg5)) return NULL; if (!getifloatarg(args, 6, 5, &arg6)) return NULL; ortho( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); Py_INCREF(Py_None); return Py_None; } /* void window float s float s float s float s float s float s */ static PyObject * gl_window(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; float arg5 ; float arg6 ; if (!getifloatarg(args, 6, 0, &arg1)) return NULL; if (!getifloatarg(args, 6, 1, &arg2)) return NULL; if (!getifloatarg(args, 6, 2, &arg3)) return NULL; if (!getifloatarg(args, 6, 3, &arg4)) return NULL; if (!getifloatarg(args, 6, 4, &arg5)) return NULL; if (!getifloatarg(args, 6, 5, &arg6)) return NULL; window( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); Py_INCREF(Py_None); return Py_None; } /* void lookat float s float s float s float s float s float s short s */ static PyObject * gl_lookat(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; float arg5 ; float arg6 ; short arg7 ; if (!getifloatarg(args, 7, 0, &arg1)) return NULL; if (!getifloatarg(args, 7, 1, &arg2)) return NULL; if (!getifloatarg(args, 7, 2, &arg3)) return NULL; if (!getifloatarg(args, 7, 3, &arg4)) return NULL; if (!getifloatarg(args, 7, 4, &arg5)) return NULL; if (!getifloatarg(args, 7, 5, &arg6)) return NULL; if (!getishortarg(args, 7, 6, &arg7)) return NULL; lookat( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 , arg7 ); Py_INCREF(Py_None); return Py_None; } /* void perspective short s float s float s float s */ static PyObject * gl_perspective(PyObject *self, PyObject *args) { short arg1 ; float arg2 ; float arg3 ; float arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getifloatarg(args, 4, 1, &arg2)) return NULL; if (!getifloatarg(args, 4, 2, &arg3)) return NULL; if (!getifloatarg(args, 4, 3, &arg4)) return NULL; perspective( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void polarview float s short s short s short s */ static PyObject * gl_polarview(PyObject *self, PyObject *args) { float arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getifloatarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; polarview( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void arcfs short s short s short s short s short s */ static PyObject * gl_arcfs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; if (!getishortarg(args, 5, 0, &arg1)) return NULL; if (!getishortarg(args, 5, 1, &arg2)) return NULL; if (!getishortarg(args, 5, 2, &arg3)) return NULL; if (!getishortarg(args, 5, 3, &arg4)) return NULL; if (!getishortarg(args, 5, 4, &arg5)) return NULL; arcfs( arg1 , arg2 , arg3 , arg4 , arg5 ); Py_INCREF(Py_None); return Py_None; } /* void arcs short s short s short s short s short s */ static PyObject * gl_arcs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; if (!getishortarg(args, 5, 0, &arg1)) return NULL; if (!getishortarg(args, 5, 1, &arg2)) return NULL; if (!getishortarg(args, 5, 2, &arg3)) return NULL; if (!getishortarg(args, 5, 3, &arg4)) return NULL; if (!getishortarg(args, 5, 4, &arg5)) return NULL; arcs( arg1 , arg2 , arg3 , arg4 , arg5 ); Py_INCREF(Py_None); return Py_None; } /* void rectcopy short s short s short s short s short s short s */ static PyObject * gl_rectcopy(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; short arg6 ; if (!getishortarg(args, 6, 0, &arg1)) return NULL; if (!getishortarg(args, 6, 1, &arg2)) return NULL; if (!getishortarg(args, 6, 2, &arg3)) return NULL; if (!getishortarg(args, 6, 3, &arg4)) return NULL; if (!getishortarg(args, 6, 4, &arg5)) return NULL; if (!getishortarg(args, 6, 5, &arg6)) return NULL; rectcopy( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 ); Py_INCREF(Py_None); return Py_None; } /* void RGBcursor short s short s short s short s short s short s short s */ static PyObject * gl_RGBcursor(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; short arg6 ; short arg7 ; if (!getishortarg(args, 7, 0, &arg1)) return NULL; if (!getishortarg(args, 7, 1, &arg2)) return NULL; if (!getishortarg(args, 7, 2, &arg3)) return NULL; if (!getishortarg(args, 7, 3, &arg4)) return NULL; if (!getishortarg(args, 7, 4, &arg5)) return NULL; if (!getishortarg(args, 7, 5, &arg6)) return NULL; if (!getishortarg(args, 7, 6, &arg7)) return NULL; RGBcursor( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 , arg7 ); Py_INCREF(Py_None); return Py_None; } /* long getbutton short s */ static PyObject * gl_getbutton(PyObject *self, PyObject *args) { long retval; short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; retval = getbutton( arg1 ); return mknewlongobject(retval); } /* long getcmmode */ static PyObject * gl_getcmmode(PyObject *self, PyObject *args) { long retval; retval = getcmmode( ); return mknewlongobject(retval); } /* long getlsbackup */ static PyObject * gl_getlsbackup(PyObject *self, PyObject *args) { long retval; retval = getlsbackup( ); return mknewlongobject(retval); } /* long getresetls */ static PyObject * gl_getresetls(PyObject *self, PyObject *args) { long retval; retval = getresetls( ); return mknewlongobject(retval); } /* long getdcm */ static PyObject * gl_getdcm(PyObject *self, PyObject *args) { long retval; retval = getdcm( ); return mknewlongobject(retval); } /* long getzbuffer */ static PyObject * gl_getzbuffer(PyObject *self, PyObject *args) { long retval; retval = getzbuffer( ); return mknewlongobject(retval); } /* long ismex */ static PyObject * gl_ismex(PyObject *self, PyObject *args) { long retval; retval = ismex( ); return mknewlongobject(retval); } /* long isobj long s */ static PyObject * gl_isobj(PyObject *self, PyObject *args) { long retval; long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; retval = isobj( arg1 ); return mknewlongobject(retval); } /* long isqueued short s */ static PyObject * gl_isqueued(PyObject *self, PyObject *args) { long retval; short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; retval = isqueued( arg1 ); return mknewlongobject(retval); } /* long istag long s */ static PyObject * gl_istag(PyObject *self, PyObject *args) { long retval; long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; retval = istag( arg1 ); return mknewlongobject(retval); } /* long genobj */ static PyObject * gl_genobj(PyObject *self, PyObject *args) { long retval; retval = genobj( ); return mknewlongobject(retval); } /* long gentag */ static PyObject * gl_gentag(PyObject *self, PyObject *args) { long retval; retval = gentag( ); return mknewlongobject(retval); } /* long getbuffer */ static PyObject * gl_getbuffer(PyObject *self, PyObject *args) { long retval; retval = getbuffer( ); return mknewlongobject(retval); } /* long getcolor */ static PyObject * gl_getcolor(PyObject *self, PyObject *args) { long retval; retval = getcolor( ); return mknewlongobject(retval); } /* long getdisplaymode */ static PyObject * gl_getdisplaymode(PyObject *self, PyObject *args) { long retval; retval = getdisplaymode( ); return mknewlongobject(retval); } /* long getfont */ static PyObject * gl_getfont(PyObject *self, PyObject *args) { long retval; retval = getfont( ); return mknewlongobject(retval); } /* long getheight */ static PyObject * gl_getheight(PyObject *self, PyObject *args) { long retval; retval = getheight( ); return mknewlongobject(retval); } /* long gethitcode */ static PyObject * gl_gethitcode(PyObject *self, PyObject *args) { long retval; retval = gethitcode( ); return mknewlongobject(retval); } /* long getlstyle */ static PyObject * gl_getlstyle(PyObject *self, PyObject *args) { long retval; retval = getlstyle( ); return mknewlongobject(retval); } /* long getlwidth */ static PyObject * gl_getlwidth(PyObject *self, PyObject *args) { long retval; retval = getlwidth( ); return mknewlongobject(retval); } /* long getmap */ static PyObject * gl_getmap(PyObject *self, PyObject *args) { long retval; retval = getmap( ); return mknewlongobject(retval); } /* long getplanes */ static PyObject * gl_getplanes(PyObject *self, PyObject *args) { long retval; retval = getplanes( ); return mknewlongobject(retval); } /* long getwritemask */ static PyObject * gl_getwritemask(PyObject *self, PyObject *args) { long retval; retval = getwritemask( ); return mknewlongobject(retval); } /* long qtest */ static PyObject * gl_qtest(PyObject *self, PyObject *args) { long retval; retval = qtest( ); return mknewlongobject(retval); } /* long getlsrepeat */ static PyObject * gl_getlsrepeat(PyObject *self, PyObject *args) { long retval; retval = getlsrepeat( ); return mknewlongobject(retval); } /* long getmonitor */ static PyObject * gl_getmonitor(PyObject *self, PyObject *args) { long retval; retval = getmonitor( ); return mknewlongobject(retval); } /* long getopenobj */ static PyObject * gl_getopenobj(PyObject *self, PyObject *args) { long retval; retval = getopenobj( ); return mknewlongobject(retval); } /* long getpattern */ static PyObject * gl_getpattern(PyObject *self, PyObject *args) { long retval; retval = getpattern( ); return mknewlongobject(retval); } /* long winget */ static PyObject * gl_winget(PyObject *self, PyObject *args) { long retval; retval = winget( ); return mknewlongobject(retval); } /* long winattach */ static PyObject * gl_winattach(PyObject *self, PyObject *args) { long retval; retval = winattach( ); return mknewlongobject(retval); } /* long getothermonitor */ static PyObject * gl_getothermonitor(PyObject *self, PyObject *args) { long retval; retval = getothermonitor( ); return mknewlongobject(retval); } /* long newpup */ static PyObject * gl_newpup(PyObject *self, PyObject *args) { long retval; retval = newpup( ); return mknewlongobject(retval); } /* long getvaluator short s */ static PyObject * gl_getvaluator(PyObject *self, PyObject *args) { long retval; short arg1 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; retval = getvaluator( arg1 ); return mknewlongobject(retval); } /* void winset long s */ static PyObject * gl_winset(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; winset( arg1 ); Py_INCREF(Py_None); return Py_None; } /* long dopup long s */ static PyObject * gl_dopup(PyObject *self, PyObject *args) { long retval; long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; retval = dopup( arg1 ); return mknewlongobject(retval); } /* void getdepth short r short r */ static PyObject * gl_getdepth(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; getdepth( & arg1 , & arg2 ); { PyObject *v = PyTuple_New( 2 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject(arg2)); return v; } } /* void getcpos short r short r */ static PyObject * gl_getcpos(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; getcpos( & arg1 , & arg2 ); { PyObject *v = PyTuple_New( 2 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject(arg2)); return v; } } /* void getsize long r long r */ static PyObject * gl_getsize(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; getsize( & arg1 , & arg2 ); { PyObject *v = PyTuple_New( 2 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewlongobject(arg1)); PyTuple_SetItem(v, 1, mknewlongobject(arg2)); return v; } } /* void getorigin long r long r */ static PyObject * gl_getorigin(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; getorigin( & arg1 , & arg2 ); { PyObject *v = PyTuple_New( 2 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewlongobject(arg1)); PyTuple_SetItem(v, 1, mknewlongobject(arg2)); return v; } } /* void getviewport short r short r short r short r */ static PyObject * gl_getviewport(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; getviewport( & arg1 , & arg2 , & arg3 , & arg4 ); { PyObject *v = PyTuple_New( 4 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject(arg2)); PyTuple_SetItem(v, 2, mknewshortobject(arg3)); PyTuple_SetItem(v, 3, mknewshortobject(arg4)); return v; } } /* void gettp short r short r short r short r */ static PyObject * gl_gettp(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; gettp( & arg1 , & arg2 , & arg3 , & arg4 ); { PyObject *v = PyTuple_New( 4 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject(arg2)); PyTuple_SetItem(v, 2, mknewshortobject(arg3)); PyTuple_SetItem(v, 3, mknewshortobject(arg4)); return v; } } /* void getgpos float r float r float r float r */ static PyObject * gl_getgpos(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; getgpos( & arg1 , & arg2 , & arg3 , & arg4 ); { PyObject *v = PyTuple_New( 4 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewfloatobject(arg1)); PyTuple_SetItem(v, 1, mknewfloatobject(arg2)); PyTuple_SetItem(v, 2, mknewfloatobject(arg3)); PyTuple_SetItem(v, 3, mknewfloatobject(arg4)); return v; } } /* void winposition long s long s long s long s */ static PyObject * gl_winposition(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; long arg4 ; if (!getilongarg(args, 4, 0, &arg1)) return NULL; if (!getilongarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; winposition( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void gRGBcolor short r short r short r */ static PyObject * gl_gRGBcolor(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; gRGBcolor( & arg1 , & arg2 , & arg3 ); { PyObject *v = PyTuple_New( 3 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject(arg2)); PyTuple_SetItem(v, 2, mknewshortobject(arg3)); return v; } } /* void gRGBmask short r short r short r */ static PyObject * gl_gRGBmask(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; gRGBmask( & arg1 , & arg2 , & arg3 ); { PyObject *v = PyTuple_New( 3 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject(arg2)); PyTuple_SetItem(v, 2, mknewshortobject(arg3)); return v; } } /* void getscrmask short r short r short r short r */ static PyObject * gl_getscrmask(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; getscrmask( & arg1 , & arg2 , & arg3 , & arg4 ); { PyObject *v = PyTuple_New( 4 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject(arg2)); PyTuple_SetItem(v, 2, mknewshortobject(arg3)); PyTuple_SetItem(v, 3, mknewshortobject(arg4)); return v; } } /* void getmcolor short s short r short r short r */ static PyObject * gl_getmcolor(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 1, 0, &arg1)) return NULL; getmcolor( arg1 , & arg2 , & arg3 , & arg4 ); { PyObject *v = PyTuple_New( 3 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg2)); PyTuple_SetItem(v, 1, mknewshortobject(arg3)); PyTuple_SetItem(v, 2, mknewshortobject(arg4)); return v; } } /* void mapw long s short s short s float r float r float r float r float r float r */ static PyObject * gl_mapw(PyObject *self, PyObject *args) { long arg1 ; short arg2 ; short arg3 ; float arg4 ; float arg5 ; float arg6 ; float arg7 ; float arg8 ; float arg9 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; mapw( arg1 , arg2 , arg3 , & arg4 , & arg5 , & arg6 , & arg7 , & arg8 , & arg9 ); { PyObject *v = PyTuple_New( 6 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewfloatobject(arg4)); PyTuple_SetItem(v, 1, mknewfloatobject(arg5)); PyTuple_SetItem(v, 2, mknewfloatobject(arg6)); PyTuple_SetItem(v, 3, mknewfloatobject(arg7)); PyTuple_SetItem(v, 4, mknewfloatobject(arg8)); PyTuple_SetItem(v, 5, mknewfloatobject(arg9)); return v; } } /* void mapw2 long s short s short s float r float r */ static PyObject * gl_mapw2(PyObject *self, PyObject *args) { long arg1 ; short arg2 ; short arg3 ; float arg4 ; float arg5 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getishortarg(args, 3, 1, &arg2)) return NULL; if (!getishortarg(args, 3, 2, &arg3)) return NULL; mapw2( arg1 , arg2 , arg3 , & arg4 , & arg5 ); { PyObject *v = PyTuple_New( 2 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewfloatobject(arg4)); PyTuple_SetItem(v, 1, mknewfloatobject(arg5)); return v; } } /* void getcursor short r u_short r u_short r long r */ static PyObject * gl_getcursor(PyObject *self, PyObject *args) { short arg1 ; unsigned short arg2 ; unsigned short arg3 ; long arg4 ; getcursor( & arg1 , & arg2 , & arg3 , & arg4 ); { PyObject *v = PyTuple_New( 4 ); if (v == NULL) return NULL; PyTuple_SetItem(v, 0, mknewshortobject(arg1)); PyTuple_SetItem(v, 1, mknewshortobject((short) arg2)); PyTuple_SetItem(v, 2, mknewshortobject((short) arg3)); PyTuple_SetItem(v, 3, mknewlongobject(arg4)); return v; } } /* void cmode */ static PyObject * gl_cmode(PyObject *self, PyObject *args) { cmode( ); Py_INCREF(Py_None); return Py_None; } /* void concave long s */ static PyObject * gl_concave(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; concave( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void curstype long s */ static PyObject * gl_curstype(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; curstype( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void drawmode long s */ static PyObject * gl_drawmode(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; drawmode( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void gammaramp short s[256] short s[256] short s[256] */ static PyObject * gl_gammaramp(PyObject *self, PyObject *args) { short arg1 [ 256 ] ; short arg2 [ 256 ] ; short arg3 [ 256 ] ; if (!getishortarray(args, 3, 0, 256 , arg1)) return NULL; if (!getishortarray(args, 3, 1, 256 , arg2)) return NULL; if (!getishortarray(args, 3, 2, 256 , arg3)) return NULL; gammaramp( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* long getbackface */ static PyObject * gl_getbackface(PyObject *self, PyObject *args) { long retval; retval = getbackface( ); return mknewlongobject(retval); } /* long getdescender */ static PyObject * gl_getdescender(PyObject *self, PyObject *args) { long retval; retval = getdescender( ); return mknewlongobject(retval); } /* long getdrawmode */ static PyObject * gl_getdrawmode(PyObject *self, PyObject *args) { long retval; retval = getdrawmode( ); return mknewlongobject(retval); } /* long getmmode */ static PyObject * gl_getmmode(PyObject *self, PyObject *args) { long retval; retval = getmmode( ); return mknewlongobject(retval); } /* long getsm */ static PyObject * gl_getsm(PyObject *self, PyObject *args) { long retval; retval = getsm( ); return mknewlongobject(retval); } /* long getvideo long s */ static PyObject * gl_getvideo(PyObject *self, PyObject *args) { long retval; long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; retval = getvideo( arg1 ); return mknewlongobject(retval); } /* void imakebackground */ static PyObject * gl_imakebackground(PyObject *self, PyObject *args) { imakebackground( ); Py_INCREF(Py_None); return Py_None; } /* void lmbind short s short s */ static PyObject * gl_lmbind(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; if (!getishortarg(args, 2, 0, &arg1)) return NULL; if (!getishortarg(args, 2, 1, &arg2)) return NULL; lmbind( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void lmdef long s long s long s float s[arg3] */ static PyObject * gl_lmdef(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; float * arg4 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarraysize(args, 3, 2, &arg3)) return NULL; if ((arg4 = PyMem_NEW(float , arg3 )) == NULL) return PyErr_NoMemory(); if (!getifloatarray(args, 3, 2, arg3 , arg4)) return NULL; lmdef( arg1 , arg2 , arg3 , arg4 ); PyMem_DEL(arg4); Py_INCREF(Py_None); return Py_None; } /* void mmode long s */ static PyObject * gl_mmode(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; mmode( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void normal float s[3] */ static PyObject * gl_normal(PyObject *self, PyObject *args) { float arg1 [ 3 ] ; if (!getifloatarray(args, 1, 0, 3 , arg1)) return NULL; normal( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void overlay long s */ static PyObject * gl_overlay(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; overlay( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void RGBrange short s short s short s short s short s short s short s short s */ static PyObject * gl_RGBrange(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; short arg6 ; short arg7 ; short arg8 ; if (!getishortarg(args, 8, 0, &arg1)) return NULL; if (!getishortarg(args, 8, 1, &arg2)) return NULL; if (!getishortarg(args, 8, 2, &arg3)) return NULL; if (!getishortarg(args, 8, 3, &arg4)) return NULL; if (!getishortarg(args, 8, 4, &arg5)) return NULL; if (!getishortarg(args, 8, 5, &arg6)) return NULL; if (!getishortarg(args, 8, 6, &arg7)) return NULL; if (!getishortarg(args, 8, 7, &arg8)) return NULL; RGBrange( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 , arg7 , arg8 ); Py_INCREF(Py_None); return Py_None; } /* void setvideo long s long s */ static PyObject * gl_setvideo(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; setvideo( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void shademodel long s */ static PyObject * gl_shademodel(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; shademodel( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void underlay long s */ static PyObject * gl_underlay(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; underlay( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void bgnclosedline */ static PyObject * gl_bgnclosedline(PyObject *self, PyObject *args) { bgnclosedline( ); Py_INCREF(Py_None); return Py_None; } /* void bgnline */ static PyObject * gl_bgnline(PyObject *self, PyObject *args) { bgnline( ); Py_INCREF(Py_None); return Py_None; } /* void bgnpoint */ static PyObject * gl_bgnpoint(PyObject *self, PyObject *args) { bgnpoint( ); Py_INCREF(Py_None); return Py_None; } /* void bgnpolygon */ static PyObject * gl_bgnpolygon(PyObject *self, PyObject *args) { bgnpolygon( ); Py_INCREF(Py_None); return Py_None; } /* void bgnsurface */ static PyObject * gl_bgnsurface(PyObject *self, PyObject *args) { bgnsurface( ); Py_INCREF(Py_None); return Py_None; } /* void bgntmesh */ static PyObject * gl_bgntmesh(PyObject *self, PyObject *args) { bgntmesh( ); Py_INCREF(Py_None); return Py_None; } /* void bgntrim */ static PyObject * gl_bgntrim(PyObject *self, PyObject *args) { bgntrim( ); Py_INCREF(Py_None); return Py_None; } /* void endclosedline */ static PyObject * gl_endclosedline(PyObject *self, PyObject *args) { endclosedline( ); Py_INCREF(Py_None); return Py_None; } /* void endline */ static PyObject * gl_endline(PyObject *self, PyObject *args) { endline( ); Py_INCREF(Py_None); return Py_None; } /* void endpoint */ static PyObject * gl_endpoint(PyObject *self, PyObject *args) { endpoint( ); Py_INCREF(Py_None); return Py_None; } /* void endpolygon */ static PyObject * gl_endpolygon(PyObject *self, PyObject *args) { endpolygon( ); Py_INCREF(Py_None); return Py_None; } /* void endsurface */ static PyObject * gl_endsurface(PyObject *self, PyObject *args) { endsurface( ); Py_INCREF(Py_None); return Py_None; } /* void endtmesh */ static PyObject * gl_endtmesh(PyObject *self, PyObject *args) { endtmesh( ); Py_INCREF(Py_None); return Py_None; } /* void endtrim */ static PyObject * gl_endtrim(PyObject *self, PyObject *args) { endtrim( ); Py_INCREF(Py_None); return Py_None; } /* void blendfunction long s long s */ static PyObject * gl_blendfunction(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; blendfunction( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void c3f float s[3] */ static PyObject * gl_c3f(PyObject *self, PyObject *args) { float arg1 [ 3 ] ; if (!getifloatarray(args, 1, 0, 3 , arg1)) return NULL; c3f( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void c3i long s[3] */ static PyObject * gl_c3i(PyObject *self, PyObject *args) { long arg1 [ 3 ] ; if (!getilongarray(args, 1, 0, 3 , arg1)) return NULL; c3i( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void c3s short s[3] */ static PyObject * gl_c3s(PyObject *self, PyObject *args) { short arg1 [ 3 ] ; if (!getishortarray(args, 1, 0, 3 , arg1)) return NULL; c3s( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void c4f float s[4] */ static PyObject * gl_c4f(PyObject *self, PyObject *args) { float arg1 [ 4 ] ; if (!getifloatarray(args, 1, 0, 4 , arg1)) return NULL; c4f( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void c4i long s[4] */ static PyObject * gl_c4i(PyObject *self, PyObject *args) { long arg1 [ 4 ] ; if (!getilongarray(args, 1, 0, 4 , arg1)) return NULL; c4i( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void c4s short s[4] */ static PyObject * gl_c4s(PyObject *self, PyObject *args) { short arg1 [ 4 ] ; if (!getishortarray(args, 1, 0, 4 , arg1)) return NULL; c4s( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void colorf float s */ static PyObject * gl_colorf(PyObject *self, PyObject *args) { float arg1 ; if (!getifloatarg(args, 1, 0, &arg1)) return NULL; colorf( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void cpack long s */ static PyObject * gl_cpack(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; cpack( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void czclear long s long s */ static PyObject * gl_czclear(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; czclear( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void dglclose long s */ static PyObject * gl_dglclose(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; dglclose( arg1 ); Py_INCREF(Py_None); return Py_None; } /* long dglopen char *s long s */ static PyObject * gl_dglopen(PyObject *self, PyObject *args) { long retval; string arg1 ; long arg2 ; if (!getistringarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; retval = dglopen( arg1 , arg2 ); return mknewlongobject(retval); } /* long getgdesc long s */ static PyObject * gl_getgdesc(PyObject *self, PyObject *args) { long retval; long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; retval = getgdesc( arg1 ); return mknewlongobject(retval); } /* void getnurbsproperty long s float r */ static PyObject * gl_getnurbsproperty(PyObject *self, PyObject *args) { long arg1 ; float arg2 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; getnurbsproperty( arg1 , & arg2 ); return mknewfloatobject(arg2); } /* void glcompat long s long s */ static PyObject * gl_glcompat(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; glcompat( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void iconsize long s long s */ static PyObject * gl_iconsize(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; iconsize( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void icontitle char *s */ static PyObject * gl_icontitle(PyObject *self, PyObject *args) { string arg1 ; if (!getistringarg(args, 1, 0, &arg1)) return NULL; icontitle( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void lRGBrange short s short s short s short s short s short s long s long s */ static PyObject * gl_lRGBrange(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; short arg5 ; short arg6 ; long arg7 ; long arg8 ; if (!getishortarg(args, 8, 0, &arg1)) return NULL; if (!getishortarg(args, 8, 1, &arg2)) return NULL; if (!getishortarg(args, 8, 2, &arg3)) return NULL; if (!getishortarg(args, 8, 3, &arg4)) return NULL; if (!getishortarg(args, 8, 4, &arg5)) return NULL; if (!getishortarg(args, 8, 5, &arg6)) return NULL; if (!getilongarg(args, 8, 6, &arg7)) return NULL; if (!getilongarg(args, 8, 7, &arg8)) return NULL; lRGBrange( arg1 , arg2 , arg3 , arg4 , arg5 , arg6 , arg7 , arg8 ); Py_INCREF(Py_None); return Py_None; } /* void linesmooth long s */ static PyObject * gl_linesmooth(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; linesmooth( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void lmcolor long s */ static PyObject * gl_lmcolor(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; lmcolor( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void logicop long s */ static PyObject * gl_logicop(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; logicop( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void lsetdepth long s long s */ static PyObject * gl_lsetdepth(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; lsetdepth( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void lshaderange short s short s long s long s */ static PyObject * gl_lshaderange(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; long arg3 ; long arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; lshaderange( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void n3f float s[3] */ static PyObject * gl_n3f(PyObject *self, PyObject *args) { float arg1 [ 3 ] ; if (!getifloatarray(args, 1, 0, 3 , arg1)) return NULL; n3f( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void noborder */ static PyObject * gl_noborder(PyObject *self, PyObject *args) { noborder( ); Py_INCREF(Py_None); return Py_None; } /* void pntsmooth long s */ static PyObject * gl_pntsmooth(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; pntsmooth( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void readsource long s */ static PyObject * gl_readsource(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; readsource( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void rectzoom float s float s */ static PyObject * gl_rectzoom(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; if (!getifloatarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; rectzoom( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void sbox float s float s float s float s */ static PyObject * gl_sbox(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; if (!getifloatarg(args, 4, 0, &arg1)) return NULL; if (!getifloatarg(args, 4, 1, &arg2)) return NULL; if (!getifloatarg(args, 4, 2, &arg3)) return NULL; if (!getifloatarg(args, 4, 3, &arg4)) return NULL; sbox( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void sboxi long s long s long s long s */ static PyObject * gl_sboxi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; long arg4 ; if (!getilongarg(args, 4, 0, &arg1)) return NULL; if (!getilongarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; sboxi( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void sboxs short s short s short s short s */ static PyObject * gl_sboxs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; sboxs( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void sboxf float s float s float s float s */ static PyObject * gl_sboxf(PyObject *self, PyObject *args) { float arg1 ; float arg2 ; float arg3 ; float arg4 ; if (!getifloatarg(args, 4, 0, &arg1)) return NULL; if (!getifloatarg(args, 4, 1, &arg2)) return NULL; if (!getifloatarg(args, 4, 2, &arg3)) return NULL; if (!getifloatarg(args, 4, 3, &arg4)) return NULL; sboxf( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void sboxfi long s long s long s long s */ static PyObject * gl_sboxfi(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; long arg4 ; if (!getilongarg(args, 4, 0, &arg1)) return NULL; if (!getilongarg(args, 4, 1, &arg2)) return NULL; if (!getilongarg(args, 4, 2, &arg3)) return NULL; if (!getilongarg(args, 4, 3, &arg4)) return NULL; sboxfi( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void sboxfs short s short s short s short s */ static PyObject * gl_sboxfs(PyObject *self, PyObject *args) { short arg1 ; short arg2 ; short arg3 ; short arg4 ; if (!getishortarg(args, 4, 0, &arg1)) return NULL; if (!getishortarg(args, 4, 1, &arg2)) return NULL; if (!getishortarg(args, 4, 2, &arg3)) return NULL; if (!getishortarg(args, 4, 3, &arg4)) return NULL; sboxfs( arg1 , arg2 , arg3 , arg4 ); Py_INCREF(Py_None); return Py_None; } /* void setnurbsproperty long s float s */ static PyObject * gl_setnurbsproperty(PyObject *self, PyObject *args) { long arg1 ; float arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getifloatarg(args, 2, 1, &arg2)) return NULL; setnurbsproperty( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* void setpup long s long s long s */ static PyObject * gl_setpup(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; long arg3 ; if (!getilongarg(args, 3, 0, &arg1)) return NULL; if (!getilongarg(args, 3, 1, &arg2)) return NULL; if (!getilongarg(args, 3, 2, &arg3)) return NULL; setpup( arg1 , arg2 , arg3 ); Py_INCREF(Py_None); return Py_None; } /* void smoothline long s */ static PyObject * gl_smoothline(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; smoothline( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void subpixel long s */ static PyObject * gl_subpixel(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; subpixel( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void swaptmesh */ static PyObject * gl_swaptmesh(PyObject *self, PyObject *args) { swaptmesh( ); Py_INCREF(Py_None); return Py_None; } /* long swinopen long s */ static PyObject * gl_swinopen(PyObject *self, PyObject *args) { long retval; long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; retval = swinopen( arg1 ); return mknewlongobject(retval); } /* void v2f float s[2] */ static PyObject * gl_v2f(PyObject *self, PyObject *args) { float arg1 [ 2 ] ; if (!getifloatarray(args, 1, 0, 2 , arg1)) return NULL; v2f( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v2i long s[2] */ static PyObject * gl_v2i(PyObject *self, PyObject *args) { long arg1 [ 2 ] ; if (!getilongarray(args, 1, 0, 2 , arg1)) return NULL; v2i( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v2s short s[2] */ static PyObject * gl_v2s(PyObject *self, PyObject *args) { short arg1 [ 2 ] ; if (!getishortarray(args, 1, 0, 2 , arg1)) return NULL; v2s( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v3f float s[3] */ static PyObject * gl_v3f(PyObject *self, PyObject *args) { float arg1 [ 3 ] ; if (!getifloatarray(args, 1, 0, 3 , arg1)) return NULL; v3f( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v3i long s[3] */ static PyObject * gl_v3i(PyObject *self, PyObject *args) { long arg1 [ 3 ] ; if (!getilongarray(args, 1, 0, 3 , arg1)) return NULL; v3i( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v3s short s[3] */ static PyObject * gl_v3s(PyObject *self, PyObject *args) { short arg1 [ 3 ] ; if (!getishortarray(args, 1, 0, 3 , arg1)) return NULL; v3s( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v4f float s[4] */ static PyObject * gl_v4f(PyObject *self, PyObject *args) { float arg1 [ 4 ] ; if (!getifloatarray(args, 1, 0, 4 , arg1)) return NULL; v4f( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v4i long s[4] */ static PyObject * gl_v4i(PyObject *self, PyObject *args) { long arg1 [ 4 ] ; if (!getilongarray(args, 1, 0, 4 , arg1)) return NULL; v4i( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v4s short s[4] */ static PyObject * gl_v4s(PyObject *self, PyObject *args) { short arg1 [ 4 ] ; if (!getishortarray(args, 1, 0, 4 , arg1)) return NULL; v4s( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void videocmd long s */ static PyObject * gl_videocmd(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; videocmd( arg1 ); Py_INCREF(Py_None); return Py_None; } /* long windepth long s */ static PyObject * gl_windepth(PyObject *self, PyObject *args) { long retval; long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; retval = windepth( arg1 ); return mknewlongobject(retval); } /* void wmpack long s */ static PyObject * gl_wmpack(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; wmpack( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void zdraw long s */ static PyObject * gl_zdraw(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; zdraw( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void zfunction long s */ static PyObject * gl_zfunction(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; zfunction( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void zsource long s */ static PyObject * gl_zsource(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; zsource( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void zwritemask long s */ static PyObject * gl_zwritemask(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; zwritemask( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v2d double s[2] */ static PyObject * gl_v2d(PyObject *self, PyObject *args) { double arg1 [ 2 ] ; if (!getidoublearray(args, 1, 0, 2 , arg1)) return NULL; v2d( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v3d double s[3] */ static PyObject * gl_v3d(PyObject *self, PyObject *args) { double arg1 [ 3 ] ; if (!getidoublearray(args, 1, 0, 3 , arg1)) return NULL; v3d( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void v4d double s[4] */ static PyObject * gl_v4d(PyObject *self, PyObject *args) { double arg1 [ 4 ] ; if (!getidoublearray(args, 1, 0, 4 , arg1)) return NULL; v4d( arg1 ); Py_INCREF(Py_None); return Py_None; } /* void pixmode long s long s */ static PyObject * gl_pixmode(PyObject *self, PyObject *args) { long arg1 ; long arg2 ; if (!getilongarg(args, 2, 0, &arg1)) return NULL; if (!getilongarg(args, 2, 1, &arg2)) return NULL; pixmode( arg1 , arg2 ); Py_INCREF(Py_None); return Py_None; } /* long qgetfd */ static PyObject * gl_qgetfd(PyObject *self, PyObject *args) { long retval; retval = qgetfd( ); return mknewlongobject(retval); } /* void dither long s */ static PyObject * gl_dither(PyObject *self, PyObject *args) { long arg1 ; if (!getilongarg(args, 1, 0, &arg1)) return NULL; dither( arg1 ); Py_INCREF(Py_None); return Py_None; } static struct PyMethodDef gl_methods[] = { {"qread", gl_qread, METH_OLDARGS}, {"varray", gl_varray, METH_OLDARGS}, {"nvarray", gl_nvarray, METH_OLDARGS}, {"vnarray", gl_vnarray, METH_OLDARGS}, {"nurbssurface", gl_nurbssurface, METH_OLDARGS}, {"nurbscurve", gl_nurbscurve, METH_OLDARGS}, {"pwlcurve", gl_pwlcurve, METH_OLDARGS}, {"pick", gl_pick, METH_OLDARGS}, {"endpick", gl_endpick, METH_NOARGS}, {"gselect", gl_gselect, METH_OLDARGS}, {"endselect", gl_endselect, METH_NOARGS}, {"getmatrix", gl_getmatrix, METH_OLDARGS}, {"altgetmatrix", gl_altgetmatrix, METH_OLDARGS}, {"lrectwrite", gl_lrectwrite, METH_OLDARGS}, {"lrectread", gl_lrectread, METH_OLDARGS}, {"readdisplay", gl_readdisplay, METH_OLDARGS}, {"packrect", gl_packrect, METH_OLDARGS}, {"unpackrect", gl_unpackrect, METH_OLDARGS}, {"gversion", gl_gversion, METH_OLDARGS}, {"clear", gl_clear, METH_OLDARGS}, {"getshade", gl_getshade, METH_OLDARGS}, {"devport", gl_devport, METH_OLDARGS}, {"rdr2i", gl_rdr2i, METH_OLDARGS}, {"rectfs", gl_rectfs, METH_OLDARGS}, {"rects", gl_rects, METH_OLDARGS}, {"rmv2i", gl_rmv2i, METH_OLDARGS}, {"noport", gl_noport, METH_OLDARGS}, {"popviewport", gl_popviewport, METH_OLDARGS}, {"clearhitcode", gl_clearhitcode, METH_OLDARGS}, {"closeobj", gl_closeobj, METH_OLDARGS}, {"cursoff", gl_cursoff, METH_OLDARGS}, {"curson", gl_curson, METH_OLDARGS}, {"doublebuffer", gl_doublebuffer, METH_OLDARGS}, {"finish", gl_finish, METH_OLDARGS}, {"gconfig", gl_gconfig, METH_OLDARGS}, {"ginit", gl_ginit, METH_OLDARGS}, {"greset", gl_greset, METH_OLDARGS}, {"multimap", gl_multimap, METH_OLDARGS}, {"onemap", gl_onemap, METH_OLDARGS}, {"popattributes", gl_popattributes, METH_OLDARGS}, {"popmatrix", gl_popmatrix, METH_OLDARGS}, {"pushattributes", gl_pushattributes,METH_OLDARGS}, {"pushmatrix", gl_pushmatrix, METH_OLDARGS}, {"pushviewport", gl_pushviewport, METH_OLDARGS}, {"qreset", gl_qreset, METH_OLDARGS}, {"RGBmode", gl_RGBmode, METH_OLDARGS}, {"singlebuffer", gl_singlebuffer, METH_OLDARGS}, {"swapbuffers", gl_swapbuffers, METH_OLDARGS}, {"gsync", gl_gsync, METH_OLDARGS}, {"gflush", gl_gflush, METH_OLDARGS}, {"tpon", gl_tpon, METH_OLDARGS}, {"tpoff", gl_tpoff, METH_OLDARGS}, {"clkon", gl_clkon, METH_OLDARGS}, {"clkoff", gl_clkoff, METH_OLDARGS}, {"ringbell", gl_ringbell, METH_OLDARGS}, {"gbegin", gl_gbegin, METH_OLDARGS}, {"textinit", gl_textinit, METH_OLDARGS}, {"initnames", gl_initnames, METH_OLDARGS}, {"pclos", gl_pclos, METH_OLDARGS}, {"popname", gl_popname, METH_OLDARGS}, {"spclos", gl_spclos, METH_OLDARGS}, {"zclear", gl_zclear, METH_OLDARGS}, {"screenspace", gl_screenspace, METH_OLDARGS}, {"reshapeviewport", gl_reshapeviewport, METH_OLDARGS}, {"winpush", gl_winpush, METH_OLDARGS}, {"winpop", gl_winpop, METH_OLDARGS}, {"foreground", gl_foreground, METH_OLDARGS}, {"endfullscrn", gl_endfullscrn, METH_OLDARGS}, {"endpupmode", gl_endpupmode, METH_OLDARGS}, {"fullscrn", gl_fullscrn, METH_OLDARGS}, {"pupmode", gl_pupmode, METH_OLDARGS}, {"winconstraints", gl_winconstraints, METH_OLDARGS}, {"pagecolor", gl_pagecolor, METH_OLDARGS}, {"textcolor", gl_textcolor, METH_OLDARGS}, {"color", gl_color, METH_OLDARGS}, {"curveit", gl_curveit, METH_OLDARGS}, {"font", gl_font, METH_OLDARGS}, {"linewidth", gl_linewidth, METH_OLDARGS}, {"setlinestyle", gl_setlinestyle, METH_OLDARGS}, {"setmap", gl_setmap, METH_OLDARGS}, {"swapinterval", gl_swapinterval, METH_OLDARGS}, {"writemask", gl_writemask, METH_OLDARGS}, {"textwritemask", gl_textwritemask, METH_OLDARGS}, {"qdevice", gl_qdevice, METH_OLDARGS}, {"unqdevice", gl_unqdevice, METH_OLDARGS}, {"curvebasis", gl_curvebasis, METH_OLDARGS}, {"curveprecision", gl_curveprecision,METH_OLDARGS}, {"loadname", gl_loadname, METH_OLDARGS}, {"passthrough", gl_passthrough, METH_OLDARGS}, {"pushname", gl_pushname, METH_OLDARGS}, {"setmonitor", gl_setmonitor, METH_OLDARGS}, {"setshade", gl_setshade, METH_OLDARGS}, {"setpattern", gl_setpattern, METH_OLDARGS}, {"pagewritemask", gl_pagewritemask, METH_OLDARGS}, {"callobj", gl_callobj, METH_OLDARGS}, {"delobj", gl_delobj, METH_OLDARGS}, {"editobj", gl_editobj, METH_OLDARGS}, {"makeobj", gl_makeobj, METH_OLDARGS}, {"maketag", gl_maketag, METH_OLDARGS}, {"chunksize", gl_chunksize, METH_OLDARGS}, {"compactify", gl_compactify, METH_OLDARGS}, {"deltag", gl_deltag, METH_OLDARGS}, {"lsrepeat", gl_lsrepeat, METH_OLDARGS}, {"objinsert", gl_objinsert, METH_OLDARGS}, {"objreplace", gl_objreplace, METH_OLDARGS}, {"winclose", gl_winclose, METH_OLDARGS}, {"blanktime", gl_blanktime, METH_OLDARGS}, {"freepup", gl_freepup, METH_OLDARGS}, {"backbuffer", gl_backbuffer, METH_OLDARGS}, {"frontbuffer", gl_frontbuffer, METH_OLDARGS}, {"lsbackup", gl_lsbackup, METH_OLDARGS}, {"resetls", gl_resetls, METH_OLDARGS}, {"lampon", gl_lampon, METH_OLDARGS}, {"lampoff", gl_lampoff, METH_OLDARGS}, {"setbell", gl_setbell, METH_OLDARGS}, {"blankscreen", gl_blankscreen, METH_OLDARGS}, {"depthcue", gl_depthcue, METH_OLDARGS}, {"zbuffer", gl_zbuffer, METH_OLDARGS}, {"backface", gl_backface, METH_OLDARGS}, {"cmov2i", gl_cmov2i, METH_OLDARGS}, {"draw2i", gl_draw2i, METH_OLDARGS}, {"move2i", gl_move2i, METH_OLDARGS}, {"pnt2i", gl_pnt2i, METH_OLDARGS}, {"patchbasis", gl_patchbasis, METH_OLDARGS}, {"patchprecision", gl_patchprecision, METH_OLDARGS}, {"pdr2i", gl_pdr2i, METH_OLDARGS}, {"pmv2i", gl_pmv2i, METH_OLDARGS}, {"rpdr2i", gl_rpdr2i, METH_OLDARGS}, {"rpmv2i", gl_rpmv2i, METH_OLDARGS}, {"xfpt2i", gl_xfpt2i, METH_OLDARGS}, {"objdelete", gl_objdelete, METH_OLDARGS}, {"patchcurves", gl_patchcurves, METH_OLDARGS}, {"minsize", gl_minsize, METH_OLDARGS}, {"maxsize", gl_maxsize, METH_OLDARGS}, {"keepaspect", gl_keepaspect, METH_OLDARGS}, {"prefsize", gl_prefsize, METH_OLDARGS}, {"stepunit", gl_stepunit, METH_OLDARGS}, {"fudge", gl_fudge, METH_OLDARGS}, {"winmove", gl_winmove, METH_OLDARGS}, {"attachcursor", gl_attachcursor, METH_OLDARGS}, {"deflinestyle", gl_deflinestyle, METH_OLDARGS}, {"noise", gl_noise, METH_OLDARGS}, {"picksize", gl_picksize, METH_OLDARGS}, {"qenter", gl_qenter, METH_OLDARGS}, {"setdepth", gl_setdepth, METH_OLDARGS}, {"cmov2s", gl_cmov2s, METH_OLDARGS}, {"draw2s", gl_draw2s, METH_OLDARGS}, {"move2s", gl_move2s, METH_OLDARGS}, {"pdr2s", gl_pdr2s, METH_OLDARGS}, {"pmv2s", gl_pmv2s, METH_OLDARGS}, {"pnt2s", gl_pnt2s, METH_OLDARGS}, {"rdr2s", gl_rdr2s, METH_OLDARGS}, {"rmv2s", gl_rmv2s, METH_OLDARGS}, {"rpdr2s", gl_rpdr2s, METH_OLDARGS}, {"rpmv2s", gl_rpmv2s, METH_OLDARGS}, {"xfpt2s", gl_xfpt2s, METH_OLDARGS}, {"cmov2", gl_cmov2, METH_OLDARGS}, {"draw2", gl_draw2, METH_OLDARGS}, {"move2", gl_move2, METH_OLDARGS}, {"pnt2", gl_pnt2, METH_OLDARGS}, {"pdr2", gl_pdr2, METH_OLDARGS}, {"pmv2", gl_pmv2, METH_OLDARGS}, {"rdr2", gl_rdr2, METH_OLDARGS}, {"rmv2", gl_rmv2, METH_OLDARGS}, {"rpdr2", gl_rpdr2, METH_OLDARGS}, {"rpmv2", gl_rpmv2, METH_OLDARGS}, {"xfpt2", gl_xfpt2, METH_OLDARGS}, {"loadmatrix", gl_loadmatrix, METH_OLDARGS}, {"multmatrix", gl_multmatrix, METH_OLDARGS}, {"crv", gl_crv, METH_OLDARGS}, {"rcrv", gl_rcrv, METH_OLDARGS}, {"addtopup", gl_addtopup, METH_OLDARGS}, {"charstr", gl_charstr, METH_OLDARGS}, {"getport", gl_getport, METH_OLDARGS}, {"strwidth", gl_strwidth, METH_OLDARGS}, {"winopen", gl_winopen, METH_OLDARGS}, {"wintitle", gl_wintitle, METH_OLDARGS}, {"polf", gl_polf, METH_OLDARGS}, {"polf2", gl_polf2, METH_OLDARGS}, {"poly", gl_poly, METH_OLDARGS}, {"poly2", gl_poly2, METH_OLDARGS}, {"crvn", gl_crvn, METH_OLDARGS}, {"rcrvn", gl_rcrvn, METH_OLDARGS}, {"polf2i", gl_polf2i, METH_OLDARGS}, {"polfi", gl_polfi, METH_OLDARGS}, {"poly2i", gl_poly2i, METH_OLDARGS}, {"polyi", gl_polyi, METH_OLDARGS}, {"polf2s", gl_polf2s, METH_OLDARGS}, {"polfs", gl_polfs, METH_OLDARGS}, {"polys", gl_polys, METH_OLDARGS}, {"poly2s", gl_poly2s, METH_OLDARGS}, {"defcursor", gl_defcursor, METH_OLDARGS}, {"writepixels", gl_writepixels, METH_OLDARGS}, {"defbasis", gl_defbasis, METH_OLDARGS}, {"gewrite", gl_gewrite, METH_OLDARGS}, {"rotate", gl_rotate, METH_OLDARGS}, {"rot", gl_rot, METH_OLDARGS}, {"circfi", gl_circfi, METH_OLDARGS}, {"circi", gl_circi, METH_OLDARGS}, {"cmovi", gl_cmovi, METH_OLDARGS}, {"drawi", gl_drawi, METH_OLDARGS}, {"movei", gl_movei, METH_OLDARGS}, {"pnti", gl_pnti, METH_OLDARGS}, {"newtag", gl_newtag, METH_OLDARGS}, {"pdri", gl_pdri, METH_OLDARGS}, {"pmvi", gl_pmvi, METH_OLDARGS}, {"rdri", gl_rdri, METH_OLDARGS}, {"rmvi", gl_rmvi, METH_OLDARGS}, {"rpdri", gl_rpdri, METH_OLDARGS}, {"rpmvi", gl_rpmvi, METH_OLDARGS}, {"xfpti", gl_xfpti, METH_OLDARGS}, {"circ", gl_circ, METH_OLDARGS}, {"circf", gl_circf, METH_OLDARGS}, {"cmov", gl_cmov, METH_OLDARGS}, {"draw", gl_draw, METH_OLDARGS}, {"move", gl_move, METH_OLDARGS}, {"pnt", gl_pnt, METH_OLDARGS}, {"scale", gl_scale, METH_OLDARGS}, {"translate", gl_translate, METH_OLDARGS}, {"pdr", gl_pdr, METH_OLDARGS}, {"pmv", gl_pmv, METH_OLDARGS}, {"rdr", gl_rdr, METH_OLDARGS}, {"rmv", gl_rmv, METH_OLDARGS}, {"rpdr", gl_rpdr, METH_OLDARGS}, {"rpmv", gl_rpmv, METH_OLDARGS}, {"xfpt", gl_xfpt, METH_OLDARGS}, {"RGBcolor", gl_RGBcolor, METH_OLDARGS}, {"RGBwritemask", gl_RGBwritemask, METH_OLDARGS}, {"setcursor", gl_setcursor, METH_OLDARGS}, {"tie", gl_tie, METH_OLDARGS}, {"circfs", gl_circfs, METH_OLDARGS}, {"circs", gl_circs, METH_OLDARGS}, {"cmovs", gl_cmovs, METH_OLDARGS}, {"draws", gl_draws, METH_OLDARGS}, {"moves", gl_moves, METH_OLDARGS}, {"pdrs", gl_pdrs, METH_OLDARGS}, {"pmvs", gl_pmvs, METH_OLDARGS}, {"pnts", gl_pnts, METH_OLDARGS}, {"rdrs", gl_rdrs, METH_OLDARGS}, {"rmvs", gl_rmvs, METH_OLDARGS}, {"rpdrs", gl_rpdrs, METH_OLDARGS}, {"rpmvs", gl_rpmvs, METH_OLDARGS}, {"xfpts", gl_xfpts, METH_OLDARGS}, {"curorigin", gl_curorigin, METH_OLDARGS}, {"cyclemap", gl_cyclemap, METH_OLDARGS}, {"patch", gl_patch, METH_OLDARGS}, {"splf", gl_splf, METH_OLDARGS}, {"splf2", gl_splf2, METH_OLDARGS}, {"splfi", gl_splfi, METH_OLDARGS}, {"splf2i", gl_splf2i, METH_OLDARGS}, {"splfs", gl_splfs, METH_OLDARGS}, {"splf2s", gl_splf2s, METH_OLDARGS}, {"rpatch", gl_rpatch, METH_OLDARGS}, {"ortho2", gl_ortho2, METH_OLDARGS}, {"rect", gl_rect, METH_OLDARGS}, {"rectf", gl_rectf, METH_OLDARGS}, {"xfpt4", gl_xfpt4, METH_OLDARGS}, {"textport", gl_textport, METH_OLDARGS}, {"mapcolor", gl_mapcolor, METH_OLDARGS}, {"scrmask", gl_scrmask, METH_OLDARGS}, {"setvaluator", gl_setvaluator, METH_OLDARGS}, {"viewport", gl_viewport, METH_OLDARGS}, {"shaderange", gl_shaderange, METH_OLDARGS}, {"xfpt4s", gl_xfpt4s, METH_OLDARGS}, {"rectfi", gl_rectfi, METH_OLDARGS}, {"recti", gl_recti, METH_OLDARGS}, {"xfpt4i", gl_xfpt4i, METH_OLDARGS}, {"prefposition", gl_prefposition, METH_OLDARGS}, {"arc", gl_arc, METH_OLDARGS}, {"arcf", gl_arcf, METH_OLDARGS}, {"arcfi", gl_arcfi, METH_OLDARGS}, {"arci", gl_arci, METH_OLDARGS}, {"bbox2", gl_bbox2, METH_OLDARGS}, {"bbox2i", gl_bbox2i, METH_OLDARGS}, {"bbox2s", gl_bbox2s, METH_OLDARGS}, {"blink", gl_blink, METH_OLDARGS}, {"ortho", gl_ortho, METH_OLDARGS}, {"window", gl_window, METH_OLDARGS}, {"lookat", gl_lookat, METH_OLDARGS}, {"perspective", gl_perspective, METH_OLDARGS}, {"polarview", gl_polarview, METH_OLDARGS}, {"arcfs", gl_arcfs, METH_OLDARGS}, {"arcs", gl_arcs, METH_OLDARGS}, {"rectcopy", gl_rectcopy, METH_OLDARGS}, {"RGBcursor", gl_RGBcursor, METH_OLDARGS}, {"getbutton", gl_getbutton, METH_OLDARGS}, {"getcmmode", gl_getcmmode, METH_OLDARGS}, {"getlsbackup", gl_getlsbackup, METH_OLDARGS}, {"getresetls", gl_getresetls, METH_OLDARGS}, {"getdcm", gl_getdcm, METH_OLDARGS}, {"getzbuffer", gl_getzbuffer, METH_OLDARGS}, {"ismex", gl_ismex, METH_OLDARGS}, {"isobj", gl_isobj, METH_OLDARGS}, {"isqueued", gl_isqueued, METH_OLDARGS}, {"istag", gl_istag, METH_OLDARGS}, {"genobj", gl_genobj, METH_OLDARGS}, {"gentag", gl_gentag, METH_OLDARGS}, {"getbuffer", gl_getbuffer, METH_OLDARGS}, {"getcolor", gl_getcolor, METH_OLDARGS}, {"getdisplaymode", gl_getdisplaymode, METH_OLDARGS}, {"getfont", gl_getfont, METH_OLDARGS}, {"getheight", gl_getheight, METH_OLDARGS}, {"gethitcode", gl_gethitcode, METH_OLDARGS}, {"getlstyle", gl_getlstyle, METH_OLDARGS}, {"getlwidth", gl_getlwidth, METH_OLDARGS}, {"getmap", gl_getmap, METH_OLDARGS}, {"getplanes", gl_getplanes, METH_OLDARGS}, {"getwritemask", gl_getwritemask, METH_OLDARGS}, {"qtest", gl_qtest, METH_OLDARGS}, {"getlsrepeat", gl_getlsrepeat, METH_OLDARGS}, {"getmonitor", gl_getmonitor, METH_OLDARGS}, {"getopenobj", gl_getopenobj, METH_OLDARGS}, {"getpattern", gl_getpattern, METH_OLDARGS}, {"winget", gl_winget, METH_OLDARGS}, {"winattach", gl_winattach, METH_OLDARGS}, {"getothermonitor", gl_getothermonitor, METH_OLDARGS}, {"newpup", gl_newpup, METH_OLDARGS}, {"getvaluator", gl_getvaluator, METH_OLDARGS}, {"winset", gl_winset, METH_OLDARGS}, {"dopup", gl_dopup, METH_OLDARGS}, {"getdepth", gl_getdepth, METH_OLDARGS}, {"getcpos", gl_getcpos, METH_OLDARGS}, {"getsize", gl_getsize, METH_OLDARGS}, {"getorigin", gl_getorigin, METH_OLDARGS}, {"getviewport", gl_getviewport, METH_OLDARGS}, {"gettp", gl_gettp, METH_OLDARGS}, {"getgpos", gl_getgpos, METH_OLDARGS}, {"winposition", gl_winposition, METH_OLDARGS}, {"gRGBcolor", gl_gRGBcolor, METH_OLDARGS}, {"gRGBmask", gl_gRGBmask, METH_OLDARGS}, {"getscrmask", gl_getscrmask, METH_OLDARGS}, {"getmcolor", gl_getmcolor, METH_OLDARGS}, {"mapw", gl_mapw, METH_OLDARGS}, {"mapw2", gl_mapw2, METH_OLDARGS}, {"getcursor", gl_getcursor, METH_OLDARGS}, {"cmode", gl_cmode, METH_OLDARGS}, {"concave", gl_concave, METH_OLDARGS}, {"curstype", gl_curstype, METH_OLDARGS}, {"drawmode", gl_drawmode, METH_OLDARGS}, {"gammaramp", gl_gammaramp, METH_OLDARGS}, {"getbackface", gl_getbackface, METH_OLDARGS}, {"getdescender", gl_getdescender, METH_OLDARGS}, {"getdrawmode", gl_getdrawmode, METH_OLDARGS}, {"getmmode", gl_getmmode, METH_OLDARGS}, {"getsm", gl_getsm, METH_OLDARGS}, {"getvideo", gl_getvideo, METH_OLDARGS}, {"imakebackground", gl_imakebackground, METH_OLDARGS}, {"lmbind", gl_lmbind, METH_OLDARGS}, {"lmdef", gl_lmdef, METH_OLDARGS}, {"mmode", gl_mmode, METH_OLDARGS}, {"normal", gl_normal, METH_OLDARGS}, {"overlay", gl_overlay, METH_OLDARGS}, {"RGBrange", gl_RGBrange, METH_OLDARGS}, {"setvideo", gl_setvideo, METH_OLDARGS}, {"shademodel", gl_shademodel, METH_OLDARGS}, {"underlay", gl_underlay, METH_OLDARGS}, {"bgnclosedline", gl_bgnclosedline, METH_OLDARGS}, {"bgnline", gl_bgnline, METH_OLDARGS}, {"bgnpoint", gl_bgnpoint, METH_OLDARGS}, {"bgnpolygon", gl_bgnpolygon, METH_OLDARGS}, {"bgnsurface", gl_bgnsurface, METH_OLDARGS}, {"bgntmesh", gl_bgntmesh, METH_OLDARGS}, {"bgntrim", gl_bgntrim, METH_OLDARGS}, {"endclosedline", gl_endclosedline, METH_OLDARGS}, {"endline", gl_endline, METH_OLDARGS}, {"endpoint", gl_endpoint, METH_OLDARGS}, {"endpolygon", gl_endpolygon, METH_OLDARGS}, {"endsurface", gl_endsurface, METH_OLDARGS}, {"endtmesh", gl_endtmesh, METH_OLDARGS}, {"endtrim", gl_endtrim, METH_OLDARGS}, {"blendfunction", gl_blendfunction, METH_OLDARGS}, {"c3f", gl_c3f, METH_OLDARGS}, {"c3i", gl_c3i, METH_OLDARGS}, {"c3s", gl_c3s, METH_OLDARGS}, {"c4f", gl_c4f, METH_OLDARGS}, {"c4i", gl_c4i, METH_OLDARGS}, {"c4s", gl_c4s, METH_OLDARGS}, {"colorf", gl_colorf, METH_OLDARGS}, {"cpack", gl_cpack, METH_OLDARGS}, {"czclear", gl_czclear, METH_OLDARGS}, {"dglclose", gl_dglclose, METH_OLDARGS}, {"dglopen", gl_dglopen, METH_OLDARGS}, {"getgdesc", gl_getgdesc, METH_OLDARGS}, {"getnurbsproperty", gl_getnurbsproperty, METH_OLDARGS}, {"glcompat", gl_glcompat, METH_OLDARGS}, {"iconsize", gl_iconsize, METH_OLDARGS}, {"icontitle", gl_icontitle, METH_OLDARGS}, {"lRGBrange", gl_lRGBrange, METH_OLDARGS}, {"linesmooth", gl_linesmooth, METH_OLDARGS}, {"lmcolor", gl_lmcolor, METH_OLDARGS}, {"logicop", gl_logicop, METH_OLDARGS}, {"lsetdepth", gl_lsetdepth, METH_OLDARGS}, {"lshaderange", gl_lshaderange, METH_OLDARGS}, {"n3f", gl_n3f, METH_OLDARGS}, {"noborder", gl_noborder, METH_OLDARGS}, {"pntsmooth", gl_pntsmooth, METH_OLDARGS}, {"readsource", gl_readsource, METH_OLDARGS}, {"rectzoom", gl_rectzoom, METH_OLDARGS}, {"sbox", gl_sbox, METH_OLDARGS}, {"sboxi", gl_sboxi, METH_OLDARGS}, {"sboxs", gl_sboxs, METH_OLDARGS}, {"sboxf", gl_sboxf, METH_OLDARGS}, {"sboxfi", gl_sboxfi, METH_OLDARGS}, {"sboxfs", gl_sboxfs, METH_OLDARGS}, {"setnurbsproperty", gl_setnurbsproperty, METH_OLDARGS}, {"setpup", gl_setpup, METH_OLDARGS}, {"smoothline", gl_smoothline, METH_OLDARGS}, {"subpixel", gl_subpixel, METH_OLDARGS}, {"swaptmesh", gl_swaptmesh, METH_OLDARGS}, {"swinopen", gl_swinopen, METH_OLDARGS}, {"v2f", gl_v2f, METH_OLDARGS}, {"v2i", gl_v2i, METH_OLDARGS}, {"v2s", gl_v2s, METH_OLDARGS}, {"v3f", gl_v3f, METH_OLDARGS}, {"v3i", gl_v3i, METH_OLDARGS}, {"v3s", gl_v3s, METH_OLDARGS}, {"v4f", gl_v4f, METH_OLDARGS}, {"v4i", gl_v4i, METH_OLDARGS}, {"v4s", gl_v4s, METH_OLDARGS}, {"videocmd", gl_videocmd, METH_OLDARGS}, {"windepth", gl_windepth, METH_OLDARGS}, {"wmpack", gl_wmpack, METH_OLDARGS}, {"zdraw", gl_zdraw, METH_OLDARGS}, {"zfunction", gl_zfunction, METH_OLDARGS}, {"zsource", gl_zsource, METH_OLDARGS}, {"zwritemask", gl_zwritemask, METH_OLDARGS}, {"v2d", gl_v2d, METH_OLDARGS}, {"v3d", gl_v3d, METH_OLDARGS}, {"v4d", gl_v4d, METH_OLDARGS}, {"pixmode", gl_pixmode, METH_OLDARGS}, {"qgetfd", gl_qgetfd, METH_OLDARGS}, {"dither", gl_dither, METH_OLDARGS}, {NULL, NULL} /* Sentinel */ }; void initgl(void) { (void) Py_InitModule("gl", gl_methods); } Python-2.3.7/Modules/timingmodule.c0000644001241000117560000000167007522367001016527 0ustar loewishpifb6/* * Author: George V. Neville-Neil */ #include "Python.h" /* Our stuff... */ #include "timing.h" static PyObject * start_timing(PyObject *self) { Py_INCREF(Py_None); BEGINTIMING; return Py_None; } static PyObject * finish_timing(PyObject *self) { ENDTIMING Py_INCREF(Py_None); return Py_None; } static PyObject * seconds(PyObject *self) { return PyInt_FromLong(TIMINGS); } static PyObject * milli(PyObject *self) { return PyInt_FromLong(TIMINGMS); } static PyObject * micro(PyObject *self) { return PyInt_FromLong(TIMINGUS); } static PyMethodDef timing_methods[] = { {"start", (PyCFunction)start_timing, METH_NOARGS}, {"finish", (PyCFunction)finish_timing, METH_NOARGS}, {"seconds", (PyCFunction)seconds, METH_NOARGS}, {"milli", (PyCFunction)milli, METH_NOARGS}, {"micro", (PyCFunction)micro, METH_NOARGS}, {NULL, NULL} }; PyMODINIT_FUNC inittiming(void) { (void)Py_InitModule("timing", timing_methods); } Python-2.3.7/Modules/stropmodule.c0000644001241000117560000006724410762607371016427 0ustar loewishpifb6/* strop module */ #include "Python.h" #include PyDoc_STRVAR(strop_module__doc__, "Common string manipulations, optimized for speed.\n" "\n" "Always use \"import string\" rather than referencing\n" "this module directly."); /* XXX This file assumes that the is*() functions XXX are defined for all 8-bit characters! */ #define WARN if (PyErr_Warn(PyExc_DeprecationWarning, \ "strop functions are obsolete; use string methods")) \ return NULL /* The lstrip(), rstrip() and strip() functions are implemented in do_strip(), which uses an additional parameter to indicate what type of strip should occur. */ #define LEFTSTRIP 0 #define RIGHTSTRIP 1 #define BOTHSTRIP 2 static PyObject * split_whitespace(char *s, int len, int maxsplit) { int i = 0, j, err; int countsplit = 0; PyObject* item; PyObject *list = PyList_New(0); if (list == NULL) return NULL; while (i < len) { while (i < len && isspace(Py_CHARMASK(s[i]))) { i = i+1; } j = i; while (i < len && !isspace(Py_CHARMASK(s[i]))) { i = i+1; } if (j < i) { item = PyString_FromStringAndSize(s+j, (int)(i-j)); if (item == NULL) goto finally; err = PyList_Append(list, item); Py_DECREF(item); if (err < 0) goto finally; countsplit++; while (i < len && isspace(Py_CHARMASK(s[i]))) { i = i+1; } if (maxsplit && (countsplit >= maxsplit) && i < len) { item = PyString_FromStringAndSize( s+i, (int)(len - i)); if (item == NULL) goto finally; err = PyList_Append(list, item); Py_DECREF(item); if (err < 0) goto finally; i = len; } } } return list; finally: Py_DECREF(list); return NULL; } PyDoc_STRVAR(splitfields__doc__, "split(s [,sep [,maxsplit]]) -> list of strings\n" "splitfields(s [,sep [,maxsplit]]) -> list of strings\n" "\n" "Return a list of the words in the string s, using sep as the\n" "delimiter string. If maxsplit is nonzero, splits into at most\n" "maxsplit words. If sep is not specified, any whitespace string\n" "is a separator. Maxsplit defaults to 0.\n" "\n" "(split and splitfields are synonymous)"); static PyObject * strop_splitfields(PyObject *self, PyObject *args) { int len, n, i, j, err; int splitcount, maxsplit; char *s, *sub; PyObject *list, *item; WARN; sub = NULL; n = 0; splitcount = 0; maxsplit = 0; if (!PyArg_ParseTuple(args, "t#|z#i:split", &s, &len, &sub, &n, &maxsplit)) return NULL; if (sub == NULL) return split_whitespace(s, len, maxsplit); if (n == 0) { PyErr_SetString(PyExc_ValueError, "empty separator"); return NULL; } list = PyList_New(0); if (list == NULL) return NULL; i = j = 0; while (i+n <= len) { if (s[i] == sub[0] && (n == 1 || memcmp(s+i, sub, n) == 0)) { item = PyString_FromStringAndSize(s+j, (int)(i-j)); if (item == NULL) goto fail; err = PyList_Append(list, item); Py_DECREF(item); if (err < 0) goto fail; i = j = i + n; splitcount++; if (maxsplit && (splitcount >= maxsplit)) break; } else i++; } item = PyString_FromStringAndSize(s+j, (int)(len-j)); if (item == NULL) goto fail; err = PyList_Append(list, item); Py_DECREF(item); if (err < 0) goto fail; return list; fail: Py_DECREF(list); return NULL; } PyDoc_STRVAR(joinfields__doc__, "join(list [,sep]) -> string\n" "joinfields(list [,sep]) -> string\n" "\n" "Return a string composed of the words in list, with\n" "intervening occurrences of sep. Sep defaults to a single\n" "space.\n" "\n" "(join and joinfields are synonymous)"); static PyObject * strop_joinfields(PyObject *self, PyObject *args) { PyObject *seq; char *sep = NULL; int seqlen, seplen = 0; int i, reslen = 0, slen = 0, sz = 100; PyObject *res = NULL; char* p = NULL; intargfunc getitemfunc; WARN; if (!PyArg_ParseTuple(args, "O|t#:join", &seq, &sep, &seplen)) return NULL; if (sep == NULL) { sep = " "; seplen = 1; } seqlen = PySequence_Size(seq); if (seqlen < 0 && PyErr_Occurred()) return NULL; if (seqlen == 1) { /* Optimization if there's only one item */ PyObject *item = PySequence_GetItem(seq, 0); if (item && !PyString_Check(item)) { PyErr_SetString(PyExc_TypeError, "first argument must be sequence of strings"); Py_DECREF(item); return NULL; } return item; } if (!(res = PyString_FromStringAndSize((char*)NULL, sz))) return NULL; p = PyString_AsString(res); /* optimize for lists, since it's the most common case. all others * (tuples and arbitrary sequences) just use the sequence abstract * interface. */ if (PyList_Check(seq)) { for (i = 0; i < seqlen; i++) { PyObject *item = PyList_GET_ITEM(seq, i); if (!PyString_Check(item)) { PyErr_SetString(PyExc_TypeError, "first argument must be sequence of strings"); Py_DECREF(res); return NULL; } slen = PyString_GET_SIZE(item); while (reslen + slen + seplen >= sz) { if (_PyString_Resize(&res, sz * 2) < 0) return NULL; sz *= 2; p = PyString_AsString(res) + reslen; } if (i > 0) { memcpy(p, sep, seplen); p += seplen; reslen += seplen; } memcpy(p, PyString_AS_STRING(item), slen); p += slen; reslen += slen; } _PyString_Resize(&res, reslen); return res; } if (seq->ob_type->tp_as_sequence == NULL || (getitemfunc = seq->ob_type->tp_as_sequence->sq_item) == NULL) { PyErr_SetString(PyExc_TypeError, "first argument must be a sequence"); return NULL; } /* This is now type safe */ for (i = 0; i < seqlen; i++) { PyObject *item = getitemfunc(seq, i); if (!item || !PyString_Check(item)) { PyErr_SetString(PyExc_TypeError, "first argument must be sequence of strings"); Py_DECREF(res); Py_XDECREF(item); return NULL; } slen = PyString_GET_SIZE(item); while (reslen + slen + seplen >= sz) { if (_PyString_Resize(&res, sz * 2) < 0) { Py_DECREF(item); return NULL; } sz *= 2; p = PyString_AsString(res) + reslen; } if (i > 0) { memcpy(p, sep, seplen); p += seplen; reslen += seplen; } memcpy(p, PyString_AS_STRING(item), slen); p += slen; reslen += slen; Py_DECREF(item); } _PyString_Resize(&res, reslen); return res; } PyDoc_STRVAR(find__doc__, "find(s, sub [,start [,end]]) -> in\n" "\n" "Return the lowest index in s where substring sub is found,\n" "such that sub is contained within s[start,end]. Optional\n" "arguments start and end are interpreted as in slice notation.\n" "\n" "Return -1 on failure."); static PyObject * strop_find(PyObject *self, PyObject *args) { char *s, *sub; int len, n, i = 0, last = INT_MAX; WARN; if (!PyArg_ParseTuple(args, "t#t#|ii:find", &s, &len, &sub, &n, &i, &last)) return NULL; if (last > len) last = len; if (last < 0) last += len; if (last < 0) last = 0; if (i < 0) i += len; if (i < 0) i = 0; if (n == 0 && i <= last) return PyInt_FromLong((long)i); last -= n; for (; i <= last; ++i) if (s[i] == sub[0] && (n == 1 || memcmp(&s[i+1], &sub[1], n-1) == 0)) return PyInt_FromLong((long)i); return PyInt_FromLong(-1L); } PyDoc_STRVAR(rfind__doc__, "rfind(s, sub [,start [,end]]) -> int\n" "\n" "Return the highest index in s where substring sub is found,\n" "such that sub is contained within s[start,end]. Optional\n" "arguments start and end are interpreted as in slice notation.\n" "\n" "Return -1 on failure."); static PyObject * strop_rfind(PyObject *self, PyObject *args) { char *s, *sub; int len, n, j; int i = 0, last = INT_MAX; WARN; if (!PyArg_ParseTuple(args, "t#t#|ii:rfind", &s, &len, &sub, &n, &i, &last)) return NULL; if (last > len) last = len; if (last < 0) last += len; if (last < 0) last = 0; if (i < 0) i += len; if (i < 0) i = 0; if (n == 0 && i <= last) return PyInt_FromLong((long)last); for (j = last-n; j >= i; --j) if (s[j] == sub[0] && (n == 1 || memcmp(&s[j+1], &sub[1], n-1) == 0)) return PyInt_FromLong((long)j); return PyInt_FromLong(-1L); } static PyObject * do_strip(PyObject *args, int striptype) { char *s; int len, i, j; if (PyString_AsStringAndSize(args, &s, &len)) return NULL; i = 0; if (striptype != RIGHTSTRIP) { while (i < len && isspace(Py_CHARMASK(s[i]))) { i++; } } j = len; if (striptype != LEFTSTRIP) { do { j--; } while (j >= i && isspace(Py_CHARMASK(s[j]))); j++; } if (i == 0 && j == len) { Py_INCREF(args); return args; } else return PyString_FromStringAndSize(s+i, j-i); } PyDoc_STRVAR(strip__doc__, "strip(s) -> string\n" "\n" "Return a copy of the string s with leading and trailing\n" "whitespace removed."); static PyObject * strop_strip(PyObject *self, PyObject *args) { WARN; return do_strip(args, BOTHSTRIP); } PyDoc_STRVAR(lstrip__doc__, "lstrip(s) -> string\n" "\n" "Return a copy of the string s with leading whitespace removed."); static PyObject * strop_lstrip(PyObject *self, PyObject *args) { WARN; return do_strip(args, LEFTSTRIP); } PyDoc_STRVAR(rstrip__doc__, "rstrip(s) -> string\n" "\n" "Return a copy of the string s with trailing whitespace removed."); static PyObject * strop_rstrip(PyObject *self, PyObject *args) { WARN; return do_strip(args, RIGHTSTRIP); } PyDoc_STRVAR(lower__doc__, "lower(s) -> string\n" "\n" "Return a copy of the string s converted to lowercase."); static PyObject * strop_lower(PyObject *self, PyObject *args) { char *s, *s_new; int i, n; PyObject *new; int changed; WARN; if (PyString_AsStringAndSize(args, &s, &n)) return NULL; new = PyString_FromStringAndSize(NULL, n); if (new == NULL) return NULL; s_new = PyString_AsString(new); changed = 0; for (i = 0; i < n; i++) { int c = Py_CHARMASK(*s++); if (isupper(c)) { changed = 1; *s_new = tolower(c); } else *s_new = c; s_new++; } if (!changed) { Py_DECREF(new); Py_INCREF(args); return args; } return new; } PyDoc_STRVAR(upper__doc__, "upper(s) -> string\n" "\n" "Return a copy of the string s converted to uppercase."); static PyObject * strop_upper(PyObject *self, PyObject *args) { char *s, *s_new; int i, n; PyObject *new; int changed; WARN; if (PyString_AsStringAndSize(args, &s, &n)) return NULL; new = PyString_FromStringAndSize(NULL, n); if (new == NULL) return NULL; s_new = PyString_AsString(new); changed = 0; for (i = 0; i < n; i++) { int c = Py_CHARMASK(*s++); if (islower(c)) { changed = 1; *s_new = toupper(c); } else *s_new = c; s_new++; } if (!changed) { Py_DECREF(new); Py_INCREF(args); return args; } return new; } PyDoc_STRVAR(capitalize__doc__, "capitalize(s) -> string\n" "\n" "Return a copy of the string s with only its first character\n" "capitalized."); static PyObject * strop_capitalize(PyObject *self, PyObject *args) { char *s, *s_new; int i, n; PyObject *new; int changed; WARN; if (PyString_AsStringAndSize(args, &s, &n)) return NULL; new = PyString_FromStringAndSize(NULL, n); if (new == NULL) return NULL; s_new = PyString_AsString(new); changed = 0; if (0 < n) { int c = Py_CHARMASK(*s++); if (islower(c)) { changed = 1; *s_new = toupper(c); } else *s_new = c; s_new++; } for (i = 1; i < n; i++) { int c = Py_CHARMASK(*s++); if (isupper(c)) { changed = 1; *s_new = tolower(c); } else *s_new = c; s_new++; } if (!changed) { Py_DECREF(new); Py_INCREF(args); return args; } return new; } PyDoc_STRVAR(expandtabs__doc__, "expandtabs(string, [tabsize]) -> string\n" "\n" "Expand tabs in a string, i.e. replace them by one or more spaces,\n" "depending on the current column and the given tab size (default 8).\n" "The column number is reset to zero after each newline occurring in the\n" "string. This doesn't understand other non-printing characters."); static PyObject * strop_expandtabs(PyObject *self, PyObject *args) { /* Original by Fredrik Lundh */ char* e; char* p; char* q; int i, j, old_j; PyObject* out; char* string; int stringlen; int tabsize = 8; WARN; /* Get arguments */ if (!PyArg_ParseTuple(args, "s#|i:expandtabs", &string, &stringlen, &tabsize)) return NULL; if (tabsize < 1) { PyErr_SetString(PyExc_ValueError, "tabsize must be at least 1"); return NULL; } /* First pass: determine size of output string */ i = j = old_j = 0; /* j: current column; i: total of previous lines */ e = string + stringlen; for (p = string; p < e; p++) { if (*p == '\t') { j += tabsize - (j%tabsize); if (old_j > j) { PyErr_SetString(PyExc_OverflowError, "new string is too long"); return NULL; } old_j = j; } else { j++; if (*p == '\n') { i += j; j = 0; } } } if ((i + j) < 0) { PyErr_SetString(PyExc_OverflowError, "new string is too long"); return NULL; } /* Second pass: create output string and fill it */ out = PyString_FromStringAndSize(NULL, i+j); if (out == NULL) return NULL; i = 0; q = PyString_AS_STRING(out); for (p = string; p < e; p++) { if (*p == '\t') { j = tabsize - (i%tabsize); i += j; while (j-- > 0) *q++ = ' '; } else { *q++ = *p; i++; if (*p == '\n') i = 0; } } return out; } PyDoc_STRVAR(count__doc__, "count(s, sub[, start[, end]]) -> int\n" "\n" "Return the number of occurrences of substring sub in string\n" "s[start:end]. Optional arguments start and end are\n" "interpreted as in slice notation."); static PyObject * strop_count(PyObject *self, PyObject *args) { char *s, *sub; int len, n; int i = 0, last = INT_MAX; int m, r; WARN; if (!PyArg_ParseTuple(args, "t#t#|ii:count", &s, &len, &sub, &n, &i, &last)) return NULL; if (last > len) last = len; if (last < 0) last += len; if (last < 0) last = 0; if (i < 0) i += len; if (i < 0) i = 0; m = last + 1 - n; if (n == 0) return PyInt_FromLong((long) (m-i)); r = 0; while (i < m) { if (!memcmp(s+i, sub, n)) { r++; i += n; } else { i++; } } return PyInt_FromLong((long) r); } PyDoc_STRVAR(swapcase__doc__, "swapcase(s) -> string\n" "\n" "Return a copy of the string s with upper case characters\n" "converted to lowercase and vice versa."); static PyObject * strop_swapcase(PyObject *self, PyObject *args) { char *s, *s_new; int i, n; PyObject *new; int changed; WARN; if (PyString_AsStringAndSize(args, &s, &n)) return NULL; new = PyString_FromStringAndSize(NULL, n); if (new == NULL) return NULL; s_new = PyString_AsString(new); changed = 0; for (i = 0; i < n; i++) { int c = Py_CHARMASK(*s++); if (islower(c)) { changed = 1; *s_new = toupper(c); } else if (isupper(c)) { changed = 1; *s_new = tolower(c); } else *s_new = c; s_new++; } if (!changed) { Py_DECREF(new); Py_INCREF(args); return args; } return new; } PyDoc_STRVAR(atoi__doc__, "atoi(s [,base]) -> int\n" "\n" "Return the integer represented by the string s in the given\n" "base, which defaults to 10. The string s must consist of one\n" "or more digits, possibly preceded by a sign. If base is 0, it\n" "is chosen from the leading characters of s, 0 for octal, 0x or\n" "0X for hexadecimal. If base is 16, a preceding 0x or 0X is\n" "accepted."); static PyObject * strop_atoi(PyObject *self, PyObject *args) { char *s, *end; int base = 10; long x; char buffer[256]; /* For errors */ WARN; if (!PyArg_ParseTuple(args, "s|i:atoi", &s, &base)) return NULL; if ((base != 0 && base < 2) || base > 36) { PyErr_SetString(PyExc_ValueError, "invalid base for atoi()"); return NULL; } while (*s && isspace(Py_CHARMASK(*s))) s++; errno = 0; if (base == 0 && s[0] == '0') x = (long) PyOS_strtoul(s, &end, base); else x = PyOS_strtol(s, &end, base); if (end == s || !isalnum((int)end[-1])) goto bad; while (*end && isspace(Py_CHARMASK(*end))) end++; if (*end != '\0') { bad: PyOS_snprintf(buffer, sizeof(buffer), "invalid literal for atoi(): %.200s", s); PyErr_SetString(PyExc_ValueError, buffer); return NULL; } else if (errno != 0) { PyOS_snprintf(buffer, sizeof(buffer), "atoi() literal too large: %.200s", s); PyErr_SetString(PyExc_ValueError, buffer); return NULL; } return PyInt_FromLong(x); } PyDoc_STRVAR(atol__doc__, "atol(s [,base]) -> long\n" "\n" "Return the long integer represented by the string s in the\n" "given base, which defaults to 10. The string s must consist\n" "of one or more digits, possibly preceded by a sign. If base\n" "is 0, it is chosen from the leading characters of s, 0 for\n" "octal, 0x or 0X for hexadecimal. If base is 16, a preceding\n" "0x or 0X is accepted. A trailing L or l is not accepted,\n" "unless base is 0."); static PyObject * strop_atol(PyObject *self, PyObject *args) { char *s, *end; int base = 10; PyObject *x; char buffer[256]; /* For errors */ WARN; if (!PyArg_ParseTuple(args, "s|i:atol", &s, &base)) return NULL; if ((base != 0 && base < 2) || base > 36) { PyErr_SetString(PyExc_ValueError, "invalid base for atol()"); return NULL; } while (*s && isspace(Py_CHARMASK(*s))) s++; if (s[0] == '\0') { PyErr_SetString(PyExc_ValueError, "empty string for atol()"); return NULL; } x = PyLong_FromString(s, &end, base); if (x == NULL) return NULL; if (base == 0 && (*end == 'l' || *end == 'L')) end++; while (*end && isspace(Py_CHARMASK(*end))) end++; if (*end != '\0') { PyOS_snprintf(buffer, sizeof(buffer), "invalid literal for atol(): %.200s", s); PyErr_SetString(PyExc_ValueError, buffer); Py_DECREF(x); return NULL; } return x; } PyDoc_STRVAR(atof__doc__, "atof(s) -> float\n" "\n" "Return the floating point number represented by the string s."); static PyObject * strop_atof(PyObject *self, PyObject *args) { extern double strtod(const char *, char **); char *s, *end; double x; char buffer[256]; /* For errors */ WARN; if (!PyArg_ParseTuple(args, "s:atof", &s)) return NULL; while (*s && isspace(Py_CHARMASK(*s))) s++; if (s[0] == '\0') { PyErr_SetString(PyExc_ValueError, "empty string for atof()"); return NULL; } errno = 0; PyFPE_START_PROTECT("strop_atof", return 0) x = strtod(s, &end); PyFPE_END_PROTECT(x) while (*end && isspace(Py_CHARMASK(*end))) end++; if (*end != '\0') { PyOS_snprintf(buffer, sizeof(buffer), "invalid literal for atof(): %.200s", s); PyErr_SetString(PyExc_ValueError, buffer); return NULL; } else if (errno != 0) { PyOS_snprintf(buffer, sizeof(buffer), "atof() literal too large: %.200s", s); PyErr_SetString(PyExc_ValueError, buffer); return NULL; } return PyFloat_FromDouble(x); } PyDoc_STRVAR(maketrans__doc__, "maketrans(frm, to) -> string\n" "\n" "Return a translation table (a string of 256 bytes long)\n" "suitable for use in string.translate. The strings frm and to\n" "must be of the same length."); static PyObject * strop_maketrans(PyObject *self, PyObject *args) { unsigned char *c, *from=NULL, *to=NULL; int i, fromlen=0, tolen=0; PyObject *result; if (!PyArg_ParseTuple(args, "t#t#:maketrans", &from, &fromlen, &to, &tolen)) return NULL; if (fromlen != tolen) { PyErr_SetString(PyExc_ValueError, "maketrans arguments must have same length"); return NULL; } result = PyString_FromStringAndSize((char *)NULL, 256); if (result == NULL) return NULL; c = (unsigned char *) PyString_AS_STRING((PyStringObject *)result); for (i = 0; i < 256; i++) c[i]=(unsigned char)i; for (i = 0; i < fromlen; i++) c[from[i]]=to[i]; return result; } PyDoc_STRVAR(translate__doc__, "translate(s,table [,deletechars]) -> string\n" "\n" "Return a copy of the string s, where all characters occurring\n" "in the optional argument deletechars are removed, and the\n" "remaining characters have been mapped through the given\n" "translation table, which must be a string of length 256."); static PyObject * strop_translate(PyObject *self, PyObject *args) { register char *input, *table, *output; register int i, c, changed = 0; PyObject *input_obj; char *table1, *output_start, *del_table=NULL; int inlen, tablen, dellen = 0; PyObject *result; int trans_table[256]; WARN; if (!PyArg_ParseTuple(args, "St#|t#:translate", &input_obj, &table1, &tablen, &del_table, &dellen)) return NULL; if (tablen != 256) { PyErr_SetString(PyExc_ValueError, "translation table must be 256 characters long"); return NULL; } table = table1; inlen = PyString_Size(input_obj); result = PyString_FromStringAndSize((char *)NULL, inlen); if (result == NULL) return NULL; output_start = output = PyString_AsString(result); input = PyString_AsString(input_obj); if (dellen == 0) { /* If no deletions are required, use faster code */ for (i = inlen; --i >= 0; ) { c = Py_CHARMASK(*input++); if (Py_CHARMASK((*output++ = table[c])) != c) changed = 1; } if (changed) return result; Py_DECREF(result); Py_INCREF(input_obj); return input_obj; } for (i = 0; i < 256; i++) trans_table[i] = Py_CHARMASK(table[i]); for (i = 0; i < dellen; i++) trans_table[(int) Py_CHARMASK(del_table[i])] = -1; for (i = inlen; --i >= 0; ) { c = Py_CHARMASK(*input++); if (trans_table[c] != -1) if (Py_CHARMASK(*output++ = (char)trans_table[c]) == c) continue; changed = 1; } if (!changed) { Py_DECREF(result); Py_INCREF(input_obj); return input_obj; } /* Fix the size of the resulting string */ if (inlen > 0) _PyString_Resize(&result, output - output_start); return result; } /* What follows is used for implementing replace(). Perry Stoll. */ /* mymemfind strstr replacement for arbitrary blocks of memory. Locates the first occurrence in the memory pointed to by MEM of the contents of memory pointed to by PAT. Returns the index into MEM if found, or -1 if not found. If len of PAT is greater than length of MEM, the function returns -1. */ static int mymemfind(const char *mem, int len, const char *pat, int pat_len) { register int ii; /* pattern can not occur in the last pat_len-1 chars */ len -= pat_len; for (ii = 0; ii <= len; ii++) { if (mem[ii] == pat[0] && (pat_len == 1 || memcmp(&mem[ii+1], &pat[1], pat_len-1) == 0)) { return ii; } } return -1; } /* mymemcnt Return the number of distinct times PAT is found in MEM. meaning mem=1111 and pat==11 returns 2. mem=11111 and pat==11 also return 2. */ static int mymemcnt(const char *mem, int len, const char *pat, int pat_len) { register int offset = 0; int nfound = 0; while (len >= 0) { offset = mymemfind(mem, len, pat, pat_len); if (offset == -1) break; mem += offset + pat_len; len -= offset + pat_len; nfound++; } return nfound; } /* mymemreplace Return a string in which all occurrences of PAT in memory STR are replaced with SUB. If length of PAT is less than length of STR or there are no occurrences of PAT in STR, then the original string is returned. Otherwise, a new string is allocated here and returned. on return, out_len is: the length of output string, or -1 if the input string is returned, or unchanged if an error occurs (no memory). return value is: the new string allocated locally, or NULL if an error occurred. */ static char * mymemreplace(const char *str, int len, /* input string */ const char *pat, int pat_len, /* pattern string to find */ const char *sub, int sub_len, /* substitution string */ int count, /* number of replacements */ int *out_len) { char *out_s; char *new_s; int nfound, offset, new_len; if (len == 0 || pat_len > len) goto return_same; /* find length of output string */ nfound = mymemcnt(str, len, pat, pat_len); if (count < 0) count = INT_MAX; else if (nfound > count) nfound = count; if (nfound == 0) goto return_same; new_len = len + nfound*(sub_len - pat_len); if (new_len == 0) { /* Have to allocate something for the caller to free(). */ out_s = (char *)PyMem_MALLOC(1); if (out_s == NULL) return NULL; out_s[0] = '\0'; } else { assert(new_len > 0); new_s = (char *)PyMem_MALLOC(new_len); if (new_s == NULL) return NULL; out_s = new_s; for (; count > 0 && len > 0; --count) { /* find index of next instance of pattern */ offset = mymemfind(str, len, pat, pat_len); if (offset == -1) break; /* copy non matching part of input string */ memcpy(new_s, str, offset); str += offset + pat_len; len -= offset + pat_len; /* copy substitute into the output string */ new_s += offset; memcpy(new_s, sub, sub_len); new_s += sub_len; } /* copy any remaining values into output string */ if (len > 0) memcpy(new_s, str, len); } *out_len = new_len; return out_s; return_same: *out_len = -1; return (char *)str; /* cast away const */ } PyDoc_STRVAR(replace__doc__, "replace (str, old, new[, maxsplit]) -> string\n" "\n" "Return a copy of string str with all occurrences of substring\n" "old replaced by new. If the optional argument maxsplit is\n" "given, only the first maxsplit occurrences are replaced."); static PyObject * strop_replace(PyObject *self, PyObject *args) { char *str, *pat,*sub,*new_s; int len,pat_len,sub_len,out_len; int count = -1; PyObject *new; WARN; if (!PyArg_ParseTuple(args, "t#t#t#|i:replace", &str, &len, &pat, &pat_len, &sub, &sub_len, &count)) return NULL; if (pat_len <= 0) { PyErr_SetString(PyExc_ValueError, "empty pattern string"); return NULL; } /* CAUTION: strop treats a replace count of 0 as infinity, unlke * current (2.1) string.py and string methods. Preserve this for * ... well, hard to say for what . */ if (count == 0) count = -1; new_s = mymemreplace(str,len,pat,pat_len,sub,sub_len,count,&out_len); if (new_s == NULL) { PyErr_NoMemory(); return NULL; } if (out_len == -1) { /* we're returning another reference to the input string */ new = PyTuple_GetItem(args, 0); Py_XINCREF(new); } else { new = PyString_FromStringAndSize(new_s, out_len); PyMem_FREE(new_s); } return new; } /* List of functions defined in the module */ static PyMethodDef strop_methods[] = { {"atof", strop_atof, METH_VARARGS, atof__doc__}, {"atoi", strop_atoi, METH_VARARGS, atoi__doc__}, {"atol", strop_atol, METH_VARARGS, atol__doc__}, {"capitalize", strop_capitalize, METH_O, capitalize__doc__}, {"count", strop_count, METH_VARARGS, count__doc__}, {"expandtabs", strop_expandtabs, METH_VARARGS, expandtabs__doc__}, {"find", strop_find, METH_VARARGS, find__doc__}, {"join", strop_joinfields, METH_VARARGS, joinfields__doc__}, {"joinfields", strop_joinfields, METH_VARARGS, joinfields__doc__}, {"lstrip", strop_lstrip, METH_O, lstrip__doc__}, {"lower", strop_lower, METH_O, lower__doc__}, {"maketrans", strop_maketrans, METH_VARARGS, maketrans__doc__}, {"replace", strop_replace, METH_VARARGS, replace__doc__}, {"rfind", strop_rfind, METH_VARARGS, rfind__doc__}, {"rstrip", strop_rstrip, METH_O, rstrip__doc__}, {"split", strop_splitfields, METH_VARARGS, splitfields__doc__}, {"splitfields", strop_splitfields, METH_VARARGS, splitfields__doc__}, {"strip", strop_strip, METH_O, strip__doc__}, {"swapcase", strop_swapcase, METH_O, swapcase__doc__}, {"translate", strop_translate, METH_VARARGS, translate__doc__}, {"upper", strop_upper, METH_O, upper__doc__}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initstrop(void) { PyObject *m, *s; char buf[256]; int c, n; m = Py_InitModule4("strop", strop_methods, strop_module__doc__, (PyObject*)NULL, PYTHON_API_VERSION); /* Create 'whitespace' object */ n = 0; for (c = 0; c < 256; c++) { if (isspace(c)) buf[n++] = c; } s = PyString_FromStringAndSize(buf, n); if (s) PyModule_AddObject(m, "whitespace", s); /* Create 'lowercase' object */ n = 0; for (c = 0; c < 256; c++) { if (islower(c)) buf[n++] = c; } s = PyString_FromStringAndSize(buf, n); if (s) PyModule_AddObject(m, "lowercase", s); /* Create 'uppercase' object */ n = 0; for (c = 0; c < 256; c++) { if (isupper(c)) buf[n++] = c; } s = PyString_FromStringAndSize(buf, n); if (s) PyModule_AddObject(m, "uppercase", s); } Python-2.3.7/Modules/cStringIO.c0000644001241000117560000004725010762607371015706 0ustar loewishpifb6 #include "Python.h" #include "import.h" #include "cStringIO.h" #include "structmember.h" PyDoc_STRVAR(cStringIO_module_documentation, "A simple fast partial StringIO replacement.\n" "\n" "This module provides a simple useful replacement for\n" "the StringIO module that is written in C. It does not provide the\n" "full generality of StringIO, but it provides enough for most\n" "applications and is especially useful in conjunction with the\n" "pickle module.\n" "\n" "Usage:\n" "\n" " from cStringIO import StringIO\n" "\n" " an_output_stream=StringIO()\n" " an_output_stream.write(some_stuff)\n" " ...\n" " value=an_output_stream.getvalue()\n" "\n" " an_input_stream=StringIO(a_string)\n" " spam=an_input_stream.readline()\n" " spam=an_input_stream.read(5)\n" " an_input_stream.seek(0) # OK, start over\n" " spam=an_input_stream.read() # and read it all\n" " \n" "If someone else wants to provide a more complete implementation,\n" "go for it. :-) \n" "\n" "cStringIO.c,v 1.29 1999/06/15 14:10:27 jim Exp\n"); #define UNLESS(E) if (!(E)) /* Declaration for file-like objects that manage data as strings The IOobject type should be though of as a common base type for Iobjects, which provide input (read-only) StringIO objects and Oobjects, which provide read-write objects. Most of the methods depend only on common data. */ typedef struct { PyObject_HEAD char *buf; int pos, string_size; } IOobject; #define IOOOBJECT(O) ((IOobject*)(O)) /* Declarations for objects of type StringO */ typedef struct { /* Subtype of IOobject */ PyObject_HEAD char *buf; int pos, string_size; int buf_size, softspace; } Oobject; /* Declarations for objects of type StringI */ typedef struct { /* Subtype of IOobject */ PyObject_HEAD char *buf; int pos, string_size; /* We store a reference to the object here in order to keep the buffer alive during the lifetime of the Iobject. */ PyObject *pbuf; } Iobject; /* IOobject (common) methods */ PyDoc_STRVAR(IO_flush__doc__, "flush(): does nothing."); static int IO__opencheck(IOobject *self) { UNLESS (self->buf) { PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); return 0; } return 1; } static PyObject * IO_get_closed(IOobject *self, void *closure) { PyObject *result = Py_False; if (self->buf == NULL) result = Py_True; Py_INCREF(result); return result; } static PyGetSetDef file_getsetlist[] = { {"closed", (getter)IO_get_closed, NULL, "True if the file is closed"}, {0}, }; static PyObject * IO_flush(IOobject *self, PyObject *unused) { UNLESS (IO__opencheck(self)) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(IO_getval__doc__, "getvalue([use_pos]) -- Get the string value." "\n" "If use_pos is specified and is a true value, then the string returned\n" "will include only the text up to the current file position.\n"); static PyObject * IO_cgetval(PyObject *self) { UNLESS (IO__opencheck(IOOOBJECT(self))) return NULL; assert(IOOOBJECT(self)->pos >= 0); return PyString_FromStringAndSize(((IOobject*)self)->buf, ((IOobject*)self)->pos); } static PyObject * IO_getval(IOobject *self, PyObject *args) { PyObject *use_pos=Py_None; int s; UNLESS (IO__opencheck(self)) return NULL; UNLESS (PyArg_UnpackTuple(args,"getval", 0, 1,&use_pos)) return NULL; if (PyObject_IsTrue(use_pos)) { s=self->pos; if (s > self->string_size) s=self->string_size; } else s=self->string_size; assert(self->pos >= 0); return PyString_FromStringAndSize(self->buf, s); } PyDoc_STRVAR(IO_isatty__doc__, "isatty(): always returns 0"); static PyObject * IO_isatty(IOobject *self, PyObject *unused) { Py_INCREF(Py_False); return Py_False; } PyDoc_STRVAR(IO_read__doc__, "read([s]) -- Read s characters, or the rest of the string"); static int IO_cread(PyObject *self, char **output, int n) { int l; UNLESS (IO__opencheck(IOOOBJECT(self))) return -1; assert(IOOOBJECT(self)->pos >= 0); assert(IOOOBJECT(self)->string_size >= 0); l = ((IOobject*)self)->string_size - ((IOobject*)self)->pos; if (n < 0 || n > l) { n = l; if (n < 0) n=0; } *output=((IOobject*)self)->buf + ((IOobject*)self)->pos; ((IOobject*)self)->pos += n; return n; } static PyObject * IO_read(IOobject *self, PyObject *args) { int n = -1; char *output; UNLESS (PyArg_ParseTuple(args, "|i:read", &n)) return NULL; if ( (n=IO_cread((PyObject*)self,&output,n)) < 0) return NULL; return PyString_FromStringAndSize(output, n); } PyDoc_STRVAR(IO_readline__doc__, "readline() -- Read one line"); static int IO_creadline(PyObject *self, char **output) { char *n, *s; int l; UNLESS (IO__opencheck(IOOOBJECT(self))) return -1; for (n = ((IOobject*)self)->buf + ((IOobject*)self)->pos, s = ((IOobject*)self)->buf + ((IOobject*)self)->string_size; n < s && *n != '\n'; n++); if (n < s) n++; *output=((IOobject*)self)->buf + ((IOobject*)self)->pos; l = n - ((IOobject*)self)->buf - ((IOobject*)self)->pos; assert(IOOOBJECT(self)->pos <= INT_MAX - l); assert(IOOOBJECT(self)->pos >= 0); assert(IOOOBJECT(self)->string_size >= 0); ((IOobject*)self)->pos += l; return l; } static PyObject * IO_readline(IOobject *self, PyObject *args) { int n, m=-1; char *output; if (args) UNLESS (PyArg_ParseTuple(args, "|i:readline", &m)) return NULL; if( (n=IO_creadline((PyObject*)self,&output)) < 0) return NULL; if (m >= 0 && m < n) { m = n - m; n -= m; self->pos -= m; } assert(IOOOBJECT(self)->pos >= 0); return PyString_FromStringAndSize(output, n); } PyDoc_STRVAR(IO_readlines__doc__, "readlines() -- Read all lines"); static PyObject * IO_readlines(IOobject *self, PyObject *args) { int n; char *output; PyObject *result, *line; int hint = 0, length = 0; UNLESS (PyArg_ParseTuple(args, "|i:readlines", &hint)) return NULL; result = PyList_New(0); if (!result) return NULL; while (1){ if ( (n = IO_creadline((PyObject*)self,&output)) < 0) goto err; if (n == 0) break; line = PyString_FromStringAndSize (output, n); if (!line) goto err; PyList_Append (result, line); Py_DECREF (line); length += n; if (hint > 0 && length >= hint) break; } return result; err: Py_DECREF(result); return NULL; } PyDoc_STRVAR(IO_reset__doc__, "reset() -- Reset the file position to the beginning"); static PyObject * IO_reset(IOobject *self, PyObject *unused) { UNLESS (IO__opencheck(self)) return NULL; self->pos = 0; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(IO_tell__doc__, "tell() -- get the current position."); static PyObject * IO_tell(IOobject *self, PyObject *unused) { UNLESS (IO__opencheck(self)) return NULL; assert(self->pos >= 0); return PyInt_FromLong(self->pos); } PyDoc_STRVAR(IO_truncate__doc__, "truncate(): truncate the file at the current position."); static PyObject * IO_truncate(IOobject *self, PyObject *args) { int pos = -1; UNLESS (IO__opencheck(self)) return NULL; UNLESS (PyArg_ParseTuple(args, "|i:truncate", &pos)) return NULL; if (pos < 0) pos = self->pos; if (self->string_size > pos) self->string_size = pos; Py_INCREF(Py_None); return Py_None; } static PyObject * IO_iternext(Iobject *self) { PyObject *next; next = IO_readline((IOobject *)self, NULL); if (!next) return NULL; if (!PyString_GET_SIZE(next)) { Py_DECREF(next); PyErr_SetNone(PyExc_StopIteration); return NULL; } return next; } /* Read-write object methods */ PyDoc_STRVAR(O_seek__doc__, "seek(position) -- set the current position\n" "seek(position, mode) -- mode 0: absolute; 1: relative; 2: relative to EOF"); static PyObject * O_seek(Oobject *self, PyObject *args) { int position, mode = 0; UNLESS (IO__opencheck(IOOOBJECT(self))) return NULL; UNLESS (PyArg_ParseTuple(args, "i|i:seek", &position, &mode)) return NULL; if (mode == 2) { position += self->string_size; } else if (mode == 1) { position += self->pos; } if (position > self->buf_size) { self->buf_size*=2; if (self->buf_size <= position) self->buf_size=position+1; UNLESS (self->buf=(char*) realloc(self->buf,self->buf_size*sizeof(char))) { self->buf_size=self->pos=0; return PyErr_NoMemory(); } } else if (position < 0) position=0; self->pos=position; while (--position >= self->string_size) self->buf[position]=0; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(O_write__doc__, "write(s) -- Write a string to the file" "\n\nNote (hack:) writing None resets the buffer"); static int O_cwrite(PyObject *self, char *c, int l) { int newl; Oobject *oself; UNLESS (IO__opencheck(IOOOBJECT(self))) return -1; oself = (Oobject *)self; newl = oself->pos+l; if (newl >= oself->buf_size) { oself->buf_size *= 2; if (oself->buf_size <= newl) oself->buf_size = newl+1; UNLESS (oself->buf = (char*)realloc(oself->buf, (oself->buf_size) * sizeof(char))) { PyErr_SetString(PyExc_MemoryError,"out of memory"); oself->buf_size = oself->pos = 0; return -1; } } memcpy(oself->buf+oself->pos,c,l); oself->pos += l; if (oself->string_size < oself->pos) { oself->string_size = oself->pos; } return l; } static PyObject * O_write(Oobject *self, PyObject *args) { char *c; int l; UNLESS (PyArg_ParseTuple(args, "t#:write", &c, &l)) return NULL; if (O_cwrite((PyObject*)self,c,l) < 0) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(O_close__doc__, "close(): explicitly release resources held."); static PyObject * O_close(Oobject *self, PyObject *unused) { if (self->buf != NULL) free(self->buf); self->buf = NULL; self->pos = self->string_size = self->buf_size = 0; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(O_writelines__doc__, "writelines(sequence_of_strings): write each string"); static PyObject * O_writelines(Oobject *self, PyObject *args) { PyObject *tmp = 0; static PyObject *joiner = NULL; if (!joiner) { PyObject *empty_string = PyString_FromString(""); if (empty_string == NULL) return NULL; joiner = PyObject_GetAttrString(empty_string, "join"); Py_DECREF(empty_string); if (joiner == NULL) return NULL; } if (PyObject_Size(args) < 0) return NULL; tmp = PyObject_CallFunction(joiner, "O", args); UNLESS (tmp) return NULL; args = Py_BuildValue("(O)", tmp); Py_DECREF(tmp); UNLESS (args) return NULL; tmp = O_write(self, args); Py_DECREF(args); return tmp; } static struct PyMethodDef O_methods[] = { /* Common methods: */ {"flush", (PyCFunction)IO_flush, METH_NOARGS, IO_flush__doc__}, {"getvalue", (PyCFunction)IO_getval, METH_VARARGS, IO_getval__doc__}, {"isatty", (PyCFunction)IO_isatty, METH_NOARGS, IO_isatty__doc__}, {"read", (PyCFunction)IO_read, METH_VARARGS, IO_read__doc__}, {"readline", (PyCFunction)IO_readline, METH_VARARGS, IO_readline__doc__}, {"readlines", (PyCFunction)IO_readlines,METH_VARARGS, IO_readlines__doc__}, {"reset", (PyCFunction)IO_reset, METH_NOARGS, IO_reset__doc__}, {"tell", (PyCFunction)IO_tell, METH_NOARGS, IO_tell__doc__}, {"truncate", (PyCFunction)IO_truncate, METH_VARARGS, IO_truncate__doc__}, /* Read-write StringIO specific methods: */ {"close", (PyCFunction)O_close, METH_NOARGS, O_close__doc__}, {"seek", (PyCFunction)O_seek, METH_VARARGS, O_seek__doc__}, {"write", (PyCFunction)O_write, METH_VARARGS, O_write__doc__}, {"writelines", (PyCFunction)O_writelines, METH_O, O_writelines__doc__}, {NULL, NULL} /* sentinel */ }; static PyMemberDef O_memberlist[] = { {"softspace", T_INT, offsetof(Oobject, softspace), 0, "flag indicating that a space needs to be printed; used by print"}, /* getattr(f, "closed") is implemented without this table */ {NULL} /* Sentinel */ }; static void O_dealloc(Oobject *self) { if (self->buf != NULL) free(self->buf); PyObject_Del(self); } PyDoc_STRVAR(Otype__doc__, "Simple type for output to strings."); static PyTypeObject Otype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "cStringIO.StringO", /*tp_name*/ sizeof(Oobject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)O_dealloc, /*tp_dealloc*/ (printfunc)0, /*tp_print*/ 0, /*tp_getattr */ 0, /*tp_setattr */ (cmpfunc)0, /*tp_compare*/ (reprfunc)0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ (hashfunc)0, /*tp_hash*/ (ternaryfunc)0, /*tp_call*/ (reprfunc)0, /*tp_str*/ 0, /*tp_getattro */ 0, /*tp_setattro */ 0, /*tp_as_buffer */ Py_TPFLAGS_DEFAULT, /*tp_flags*/ Otype__doc__, /*tp_doc */ 0, /*tp_traverse */ 0, /*tp_clear */ 0, /*tp_richcompare */ 0, /*tp_weaklistoffset */ PyObject_SelfIter, /*tp_iter */ (iternextfunc)IO_iternext, /*tp_iternext */ O_methods, /*tp_methods */ O_memberlist, /*tp_members */ file_getsetlist, /*tp_getset */ }; static PyObject * newOobject(int size) { Oobject *self; self = PyObject_New(Oobject, &Otype); if (self == NULL) return NULL; self->pos=0; self->string_size = 0; self->softspace = 0; UNLESS (self->buf=malloc(size*sizeof(char))) { PyErr_SetString(PyExc_MemoryError,"out of memory"); self->buf_size = 0; return NULL; } self->buf_size=size; return (PyObject*)self; } /* End of code for StringO objects */ /* -------------------------------------------------------- */ static PyObject * I_close(Iobject *self, PyObject *unused) { Py_XDECREF(self->pbuf); self->pbuf = NULL; self->buf = NULL; self->pos = self->string_size = 0; Py_INCREF(Py_None); return Py_None; } static PyObject * I_seek(Iobject *self, PyObject *args) { int position, mode = 0; UNLESS (IO__opencheck(IOOOBJECT(self))) return NULL; UNLESS (PyArg_ParseTuple(args, "i|i:seek", &position, &mode)) return NULL; if (mode == 2) position += self->string_size; else if (mode == 1) position += self->pos; if (position < 0) position=0; self->pos=position; Py_INCREF(Py_None); return Py_None; } static struct PyMethodDef I_methods[] = { /* Common methods: */ {"flush", (PyCFunction)IO_flush, METH_NOARGS, IO_flush__doc__}, {"getvalue", (PyCFunction)IO_getval, METH_VARARGS, IO_getval__doc__}, {"isatty", (PyCFunction)IO_isatty, METH_NOARGS, IO_isatty__doc__}, {"read", (PyCFunction)IO_read, METH_VARARGS, IO_read__doc__}, {"readline", (PyCFunction)IO_readline, METH_VARARGS, IO_readline__doc__}, {"readlines", (PyCFunction)IO_readlines,METH_VARARGS, IO_readlines__doc__}, {"reset", (PyCFunction)IO_reset, METH_NOARGS, IO_reset__doc__}, {"tell", (PyCFunction)IO_tell, METH_NOARGS, IO_tell__doc__}, {"truncate", (PyCFunction)IO_truncate, METH_VARARGS, IO_truncate__doc__}, /* Read-only StringIO specific methods: */ {"close", (PyCFunction)I_close, METH_NOARGS, O_close__doc__}, {"seek", (PyCFunction)I_seek, METH_VARARGS, O_seek__doc__}, {NULL, NULL} }; static void I_dealloc(Iobject *self) { Py_XDECREF(self->pbuf); PyObject_Del(self); } PyDoc_STRVAR(Itype__doc__, "Simple type for treating strings as input file streams"); static PyTypeObject Itype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "cStringIO.StringI", /*tp_name*/ sizeof(Iobject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)I_dealloc, /*tp_dealloc*/ (printfunc)0, /*tp_print*/ 0, /* tp_getattr */ (setattrfunc)0, /*tp_setattr*/ (cmpfunc)0, /*tp_compare*/ (reprfunc)0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ (hashfunc)0, /*tp_hash*/ (ternaryfunc)0, /*tp_call*/ (reprfunc)0, /*tp_str*/ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT, /* tp_flags */ Itype__doc__, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ PyObject_SelfIter, /* tp_iter */ (iternextfunc)IO_iternext, /* tp_iternext */ I_methods, /* tp_methods */ 0, /* tp_members */ file_getsetlist, /* tp_getset */ }; static PyObject * newIobject(PyObject *s) { Iobject *self; char *buf; int size; if (PyObject_AsReadBuffer(s, (const void **)&buf, &size)) { PyErr_Format(PyExc_TypeError, "expected read buffer, %.200s found", s->ob_type->tp_name); return NULL; } UNLESS (self = PyObject_New(Iobject, &Itype)) return NULL; Py_INCREF(s); self->buf=buf; self->string_size=size; self->pbuf=s; self->pos=0; return (PyObject*)self; } /* End of code for StringI objects */ /* -------------------------------------------------------- */ PyDoc_STRVAR(IO_StringIO__doc__, "StringIO([s]) -- Return a StringIO-like stream for reading or writing"); static PyObject * IO_StringIO(PyObject *self, PyObject *args) { PyObject *s=0; if (!PyArg_UnpackTuple(args, "StringIO", 0, 1, &s)) return NULL; if (s) return newIobject(s); return newOobject(128); } /* List of methods defined in the module */ static struct PyMethodDef IO_methods[] = { {"StringIO", (PyCFunction)IO_StringIO, METH_VARARGS, IO_StringIO__doc__}, {NULL, NULL} /* sentinel */ }; /* Initialization function for the module (*must* be called initcStringIO) */ static struct PycStringIO_CAPI CAPI = { IO_cread, IO_creadline, O_cwrite, IO_cgetval, newOobject, newIobject, &Itype, &Otype, }; #ifndef PyMODINIT_FUNC /* declarations for DLL import/export */ #define PyMODINIT_FUNC void #endif PyMODINIT_FUNC initcStringIO(void) { PyObject *m, *d, *v; /* Create the module and add the functions */ m = Py_InitModule4("cStringIO", IO_methods, cStringIO_module_documentation, (PyObject*)NULL,PYTHON_API_VERSION); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); /* Export C API */ Itype.ob_type=&PyType_Type; Otype.ob_type=&PyType_Type; if (PyType_Ready(&Otype) < 0) return; if (PyType_Ready(&Itype) < 0) return; PyDict_SetItemString(d,"cStringIO_CAPI", v = PyCObject_FromVoidPtr(&CAPI,NULL)); Py_XDECREF(v); /* Export Types */ PyDict_SetItemString(d,"InputType", (PyObject*)&Itype); PyDict_SetItemString(d,"OutputType", (PyObject*)&Otype); /* Maybe make certain warnings go away */ if (0) PycString_IMPORT; } Python-2.3.7/Modules/regexpr.h0000644001241000117560000001273207134322320015506 0ustar loewishpifb6/* * -*- mode: c-mode; c-file-style: python -*- */ #ifndef Py_REGEXPR_H #define Py_REGEXPR_H #ifdef __cplusplus extern "C" { #endif /* * regexpr.h * * Author: Tatu Ylonen * * Copyright (c) 1991 Tatu Ylonen, Espoo, Finland * * Permission to use, copy, modify, distribute, and sell this software * and its documentation for any purpose is hereby granted without fee, * provided that the above copyright notice appear in all copies. This * software is provided "as is" without express or implied warranty. * * Created: Thu Sep 26 17:15:36 1991 ylo * Last modified: Mon Nov 4 15:49:46 1991 ylo */ /* $Id: regexpr.h 16382 2000-07-16 12:04:32Z twouters $ */ #ifndef REGEXPR_H #define REGEXPR_H #define RE_NREGS 100 /* number of registers available */ typedef struct re_pattern_buffer { unsigned char *buffer; /* compiled pattern */ int allocated; /* allocated size of compiled pattern */ int used; /* actual length of compiled pattern */ unsigned char *fastmap; /* fastmap[ch] is true if ch can start pattern */ unsigned char *translate; /* translation to apply during compilation/matching */ unsigned char fastmap_accurate; /* true if fastmap is valid */ unsigned char can_be_null; /* true if can match empty string */ unsigned char uses_registers; /* registers are used and need to be initialized */ int num_registers; /* number of registers used */ unsigned char anchor; /* anchor: 0=none 1=begline 2=begbuf */ } *regexp_t; typedef struct re_registers { int start[RE_NREGS]; /* start offset of region */ int end[RE_NREGS]; /* end offset of region */ } *regexp_registers_t; /* bit definitions for syntax */ #define RE_NO_BK_PARENS 1 /* no quoting for parentheses */ #define RE_NO_BK_VBAR 2 /* no quoting for vertical bar */ #define RE_BK_PLUS_QM 4 /* quoting needed for + and ? */ #define RE_TIGHT_VBAR 8 /* | binds tighter than ^ and $ */ #define RE_NEWLINE_OR 16 /* treat newline as or */ #define RE_CONTEXT_INDEP_OPS 32 /* ^$?*+ are special in all contexts */ #define RE_ANSI_HEX 64 /* ansi sequences (\n etc) and \xhh */ #define RE_NO_GNU_EXTENSIONS 128 /* no gnu extensions */ /* definitions for some common regexp styles */ #define RE_SYNTAX_AWK (RE_NO_BK_PARENS|RE_NO_BK_VBAR|RE_CONTEXT_INDEP_OPS) #define RE_SYNTAX_EGREP (RE_SYNTAX_AWK|RE_NEWLINE_OR) #define RE_SYNTAX_GREP (RE_BK_PLUS_QM|RE_NEWLINE_OR) #define RE_SYNTAX_EMACS 0 #define Sword 1 #define Swhitespace 2 #define Sdigit 4 #define Soctaldigit 8 #define Shexdigit 16 /* Rename all exported symbols to avoid conflicts with similarly named symbols in some systems' standard C libraries... */ #define re_syntax _Py_re_syntax #define re_syntax_table _Py_re_syntax_table #define re_compile_initialize _Py_re_compile_initialize #define re_set_syntax _Py_re_set_syntax #define re_compile_pattern _Py_re_compile_pattern #define re_match _Py_re_match #define re_search _Py_re_search #define re_compile_fastmap _Py_re_compile_fastmap #define re_comp _Py_re_comp #define re_exec _Py_re_exec #ifdef HAVE_PROTOTYPES extern int re_syntax; /* This is the actual syntax mask. It was added so that Python could do * syntax-dependent munging of patterns before compilation. */ extern unsigned char re_syntax_table[256]; void re_compile_initialize(void); int re_set_syntax(int syntax); /* This sets the syntax to use and returns the previous syntax. The * syntax is specified by a bit mask of the above defined bits. */ char *re_compile_pattern(unsigned char *regex, int regex_size, regexp_t compiled); /* This compiles the regexp (given in regex and length in regex_size). * This returns NULL if the regexp compiled successfully, and an error * message if an error was encountered. The buffer field must be * initialized to a memory area allocated by malloc (or to NULL) before * use, and the allocated field must be set to its length (or 0 if * buffer is NULL). Also, the translate field must be set to point to a * valid translation table, or NULL if it is not used. */ int re_match(regexp_t compiled, unsigned char *string, int size, int pos, regexp_registers_t old_regs); /* This tries to match the regexp against the string. This returns the * length of the matched portion, or -1 if the pattern could not be * matched and -2 if an error (such as failure stack overflow) is * encountered. */ int re_search(regexp_t compiled, unsigned char *string, int size, int startpos, int range, regexp_registers_t regs); /* This searches for a substring matching the regexp. This returns the * first index at which a match is found. range specifies at how many * positions to try matching; positive values indicate searching * forwards, and negative values indicate searching backwards. mstop * specifies the offset beyond which a match must not go. This returns * -1 if no match is found, and -2 if an error (such as failure stack * overflow) is encountered. */ void re_compile_fastmap(regexp_t compiled); /* This computes the fastmap for the regexp. For this to have any effect, * the calling program must have initialized the fastmap field to point * to an array of 256 characters. */ #else /* HAVE_PROTOTYPES */ extern int re_syntax; extern unsigned char re_syntax_table[256]; void re_compile_initialize(); int re_set_syntax(); char *re_compile_pattern(); int re_match(); int re_search(); void re_compile_fastmap(); #endif /* HAVE_PROTOTYPES */ #endif /* REGEXPR_H */ #ifdef __cplusplus } #endif #endif /* !Py_REGEXPR_H */ Python-2.3.7/Modules/unicodedata.c0000644001241000117560000005757510040303455016321 0ustar loewishpifb6/* ------------------------------------------------------------------------ unicodedata -- Provides access to the Unicode 3.2 data base. Data was extracted from the Unicode 3.2 UnicodeData.txt file. Written by Marc-Andre Lemburg (mal@lemburg.com). Modified for Python 2.0 by Fredrik Lundh (fredrik@pythonware.com) Modified by Martin v. Löwis (martin@v.loewis.de) Copyright (c) Corporation for National Research Initiatives. ------------------------------------------------------------------------ */ #include "Python.h" #include "ucnhash.h" /* character properties */ typedef struct { const unsigned char category; /* index into _PyUnicode_CategoryNames */ const unsigned char combining; /* combining class value 0 - 255 */ const unsigned char bidirectional; /* index into _PyUnicode_BidirectionalNames */ const unsigned char mirrored; /* true if mirrored in bidir mode */ } _PyUnicode_DatabaseRecord; /* data file generated by Tools/unicode/makeunicodedata.py */ #include "unicodedata_db.h" static const _PyUnicode_DatabaseRecord* _getrecord_ex(Py_UCS4 code) { int index; if (code >= 0x110000) index = 0; else { index = index1[(code>>SHIFT)]; index = index2[(index<category; return PyString_FromString(_PyUnicode_CategoryNames[index]); } static PyObject * unicodedata_bidirectional(PyObject *self, PyObject *args) { PyUnicodeObject *v; int index; if (!PyArg_ParseTuple(args, "O!:bidirectional", &PyUnicode_Type, &v)) return NULL; if (PyUnicode_GET_SIZE(v) != 1) { PyErr_SetString(PyExc_TypeError, "need a single Unicode character as parameter"); return NULL; } index = (int) _getrecord(v)->bidirectional; return PyString_FromString(_PyUnicode_BidirectionalNames[index]); } static PyObject * unicodedata_combining(PyObject *self, PyObject *args) { PyUnicodeObject *v; if (!PyArg_ParseTuple(args, "O!:combining", &PyUnicode_Type, &v)) return NULL; if (PyUnicode_GET_SIZE(v) != 1) { PyErr_SetString(PyExc_TypeError, "need a single Unicode character as parameter"); return NULL; } return PyInt_FromLong((int) _getrecord(v)->combining); } static PyObject * unicodedata_mirrored(PyObject *self, PyObject *args) { PyUnicodeObject *v; if (!PyArg_ParseTuple(args, "O!:mirrored", &PyUnicode_Type, &v)) return NULL; if (PyUnicode_GET_SIZE(v) != 1) { PyErr_SetString(PyExc_TypeError, "need a single Unicode character as parameter"); return NULL; } return PyInt_FromLong((int) _getrecord(v)->mirrored); } static PyObject * unicodedata_decomposition(PyObject *self, PyObject *args) { PyUnicodeObject *v; char decomp[256]; int code, index, count, i; if (!PyArg_ParseTuple(args, "O!:decomposition", &PyUnicode_Type, &v)) return NULL; if (PyUnicode_GET_SIZE(v) != 1) { PyErr_SetString(PyExc_TypeError, "need a single Unicode character as parameter"); return NULL; } code = (int) *PyUnicode_AS_UNICODE(v); if (code < 0 || code >= 0x110000) index = 0; else { index = decomp_index1[(code>>DECOMP_SHIFT)]; index = decomp_index2[(index<> 8; /* XXX: could allocate the PyString up front instead (strlen(prefix) + 5 * count + 1 bytes) */ /* copy prefix */ i = strlen(decomp_prefix[decomp_data[index] & 255]); memcpy(decomp, decomp_prefix[decomp_data[index] & 255], i); while (count-- > 0) { if (i) decomp[i++] = ' '; assert((size_t)i < sizeof(decomp)); PyOS_snprintf(decomp + i, sizeof(decomp) - i, "%04X", decomp_data[++index]); i += strlen(decomp + i); } decomp[i] = '\0'; return PyString_FromString(decomp); } void get_decomp_record(Py_UCS4 code, int *index, int *prefix, int *count) { if (code >= 0x110000) { *index = 0; } else { *index = decomp_index1[(code>>DECOMP_SHIFT)]; *index = decomp_index2[(*index<> 8; *prefix = decomp_data[*index] & 255; (*index)++; } #define SBase 0xAC00 #define LBase 0x1100 #define VBase 0x1161 #define TBase 0x11A7 #define LCount 19 #define VCount 21 #define TCount 28 #define NCount (VCount*TCount) #define SCount (LCount*NCount) static PyObject* nfd_nfkd(PyObject *input, int k) { PyObject *result; Py_UNICODE *i, *end, *o; /* Longest decomposition in Unicode 3.2: U+FDFA */ Py_UNICODE stack[20]; int space, stackptr, isize; int index, prefix, count; unsigned char prev, cur; stackptr = 0; isize = PyUnicode_GET_SIZE(input); /* Overallocate atmost 10 characters. */ space = (isize > 10 ? 10 : isize) + isize; result = PyUnicode_FromUnicode(NULL, space); if (!result) return NULL; i = PyUnicode_AS_UNICODE(input); end = i + isize; o = PyUnicode_AS_UNICODE(result); while (i < end) { stack[stackptr++] = *i++; while(stackptr) { Py_UNICODE code = stack[--stackptr]; /* Hangul Decomposition adds three characters in a single step, so we need atleast that much room. */ if (space < 3) { int newsize = PyString_GET_SIZE(result) + 10; space += 10; if (PyUnicode_Resize(&result, newsize) == -1) return NULL; o = PyUnicode_AS_UNICODE(result) + newsize - space; } /* Hangul Decomposition. */ if (SBase <= code && code < (SBase+SCount)) { int SIndex = code - SBase; int L = LBase + SIndex / NCount; int V = VBase + (SIndex % NCount) / TCount; int T = TBase + SIndex % TCount; *o++ = L; *o++ = V; space -= 2; if (T != TBase) { *o++ = T; space --; } continue; } /* Other decompoistions. */ get_decomp_record(code, &index, &prefix, &count); /* Copy character if it is not decomposable, or has a compatibility decomposition, but we do NFD. */ if (!count || (prefix && !k)) { *o++ = code; space--; continue; } /* Copy decomposition onto the stack, in reverse order. */ while(count) { code = decomp_data[index + (--count)]; stack[stackptr++] = code; } } } /* Drop overallocation. Cannot fail. */ PyUnicode_Resize(&result, PyUnicode_GET_SIZE(result) - space); /* Sort canonically. */ i = PyUnicode_AS_UNICODE(result); prev = _getrecord_ex(*i)->combining; end = i + PyUnicode_GET_SIZE(result); for (i++; i < end; i++) { cur = _getrecord_ex(*i)->combining; if (prev == 0 || cur == 0 || prev <= cur) { prev = cur; continue; } /* Non-canonical order. Need to switch *i with previous. */ o = i - 1; while (1) { Py_UNICODE tmp = o[1]; o[1] = o[0]; o[0] = tmp; o--; if (o < PyUnicode_AS_UNICODE(result)) break; prev = _getrecord_ex(*o)->combining; if (prev == 0 || prev <= cur) break; } prev = _getrecord_ex(*i)->combining; } return result; } static int find_nfc_index(struct reindex* nfc, Py_UNICODE code) { int index; for (index = 0; nfc[index].start; index++) { int start = nfc[index].start; if (code < start) return -1; if (code <= start + nfc[index].count) { int delta = code - start; return nfc[index].index + delta; } } return -1; } static PyObject* nfc_nfkc(PyObject *input, int k) { PyObject *result; Py_UNICODE *i, *i1, *o, *end; int f,l,index,index1,comb; Py_UNICODE code; Py_UNICODE *skipped[20]; int cskipped = 0; result = nfd_nfkd(input, k); if (!result) return NULL; /* We are going to modify result in-place. If nfd_nfkd is changed to sometimes return the input, this code needs to be reviewed. */ assert(result != input); i = PyUnicode_AS_UNICODE(result); end = i + PyUnicode_GET_SIZE(result); o = PyUnicode_AS_UNICODE(result); again: while (i < end) { for (index = 0; index < cskipped; index++) { if (skipped[index] == i) { /* *i character is skipped. Remove from list. */ skipped[index] = skipped[cskipped-1]; cskipped--; i++; goto again; /* continue while */ } } /* Hangul Composition. We don't need to check for pairs, since we always have decomposed data. */ if (LBase <= *i && *i < (LBase+LCount) && i + 1 < end && VBase <= i[1] && i[1] <= (VBase+VCount)) { int LIndex, VIndex; LIndex = i[0] - LBase; VIndex = i[1] - VBase; code = SBase + (LIndex*VCount+VIndex)*TCount; i+=2; if (i < end && TBase <= *i && *i <= (TBase+TCount)) { code += *i-TBase; i++; } *o++ = code; continue; } f = find_nfc_index(nfc_first, *i); if (f == -1) { *o++ = *i++; continue; } /* Find next unblocked character. */ i1 = i+1; comb = 0; while (i1 < end) { int comb1 = _getrecord_ex(*i1)->combining; if (comb1 && comb == comb1) { /* Character is blocked. */ i1++; continue; } l = find_nfc_index(nfc_last, *i1); /* *i1 cannot be combined with *i. If *i1 is a starter, we don't need to look further. Otherwise, record the combining class. */ if (l == -1) { not_combinable: if (comb1 == 0) break; comb = comb1; i1++; continue; } index = f*TOTAL_LAST + l; index1 = comp_index[index >> COMP_SHIFT]; code = comp_data[(index1<>24) & 0xff)) & 0x00ffffff; } return h; } static char *hangul_syllables[][3] = { { "G", "A", "" }, { "GG", "AE", "G" }, { "N", "YA", "GG" }, { "D", "YAE", "GS" }, { "DD", "EO", "N", }, { "R", "E", "NJ" }, { "M", "YEO", "NH" }, { "B", "YE", "D" }, { "BB", "O", "L" }, { "S", "WA", "LG" }, { "SS", "WAE", "LM" }, { "", "OE", "LB" }, { "J", "YO", "LS" }, { "JJ", "U", "LT" }, { "C", "WEO", "LP" }, { "K", "WE", "LH" }, { "T", "WI", "M" }, { "P", "YU", "B" }, { "H", "EU", "BS" }, { 0, "YI", "S" }, { 0, "I", "SS" }, { 0, 0, "NG" }, { 0, 0, "J" }, { 0, 0, "C" }, { 0, 0, "K" }, { 0, 0, "T" }, { 0, 0, "P" }, { 0, 0, "H" } }; static int is_unified_ideograph(Py_UCS4 code) { return ( (0x3400 <= code && code <= 0x4DB5) || /* CJK Ideograph Extension A */ (0x4E00 <= code && code <= 0x9FA5) || /* CJK Ideograph */ (0x20000 <= code && code <= 0x2A6D6));/* CJK Ideograph Extension B */ } static int _getucname(Py_UCS4 code, char* buffer, int buflen) { int offset; int i; int word; unsigned char* w; if (SBase <= code && code < SBase+SCount) { /* Hangul syllable. */ int SIndex = code - SBase; int L = SIndex / NCount; int V = (SIndex % NCount) / TCount; int T = SIndex % TCount; if (buflen < 27) /* Worst case: HANGUL SYLLABLE <10chars>. */ return 0; strcpy(buffer, "HANGUL SYLLABLE "); buffer += 16; strcpy(buffer, hangul_syllables[L][0]); buffer += strlen(hangul_syllables[L][0]); strcpy(buffer, hangul_syllables[V][1]); buffer += strlen(hangul_syllables[V][1]); strcpy(buffer, hangul_syllables[T][2]); buffer += strlen(hangul_syllables[T][2]); *buffer = '\0'; return 1; } if (is_unified_ideograph(code)) { if (buflen < 28) /* Worst case: CJK UNIFIED IDEOGRAPH-20000 */ return 0; sprintf(buffer, "CJK UNIFIED IDEOGRAPH-%X", code); return 1; } if (code >= 0x110000) return 0; /* get offset into phrasebook */ offset = phrasebook_offset1[(code>>phrasebook_shift)]; offset = phrasebook_offset2[(offset<= 0) { word = (word << 8) + phrasebook[offset+1]; offset += 2; } else word = phrasebook[offset++]; if (i) { if (i > buflen) return 0; /* buffer overflow */ buffer[i++] = ' '; } /* copy word string from lexicon. the last character in the word has bit 7 set. the last word in a string ends with 0x80 */ w = lexicon + lexicon_offset[word]; while (*w < 128) { if (i >= buflen) return 0; /* buffer overflow */ buffer[i++] = *w++; } if (i >= buflen) return 0; /* buffer overflow */ buffer[i++] = *w & 127; if (*w == 128) break; /* end of word */ } return 1; } static int _cmpname(int code, const char* name, int namelen) { /* check if code corresponds to the given name */ int i; char buffer[NAME_MAXLEN]; if (!_getucname(code, buffer, sizeof(buffer))) return 0; for (i = 0; i < namelen; i++) { if (toupper(name[i]) != buffer[i]) return 0; } return buffer[namelen] == '\0'; } static void find_syllable(const char *str, int *len, int *pos, int count, int column) { int i, len1; *len = -1; for (i = 0; i < count; i++) { char *s = hangul_syllables[i][column]; len1 = strlen(s); if (len1 <= *len) continue; if (strncmp(str, s, len1) == 0) { *len = len1; *pos = i; } } if (*len == -1) { *len = 0; *pos = -1; } } static int _getcode(const char* name, int namelen, Py_UCS4* code) { unsigned int h, v; unsigned int mask = code_size-1; unsigned int i, incr; /* Check for hangul syllables. */ if (strncmp(name, "HANGUL SYLLABLE ", 16) == 0) { int L, V, T, len; const char *pos = name + 16; find_syllable(pos, &len, &L, LCount, 0); pos += len; find_syllable(pos, &len, &V, VCount, 1); pos += len; find_syllable(pos, &len, &T, TCount, 2); pos += len; if (V != -1 && V != -1 && T != -1 && pos-name == namelen) { *code = SBase + (L*VCount+V)*TCount + T; return 1; } /* Otherwise, it's an illegal syllable name. */ return 0; } /* Check for unified ideographs. */ if (strncmp(name, "CJK UNIFIED IDEOGRAPH-", 22) == 0) { /* Four or five hexdigits must follow. */ v = 0; name += 22; namelen -= 22; if (namelen != 4 && namelen != 5) return 0; while (namelen--) { v *= 16; if (*name >= '0' && *name <= '9') v += *name - '0'; else if (*name >= 'A' && *name <= 'F') v += *name - 'A' + 10; else return 0; name++; } if (!is_unified_ideograph(v)) return 0; *code = v; return 1; } /* the following is the same as python's dictionary lookup, with only minor changes. see the makeunicodedata script for more details */ h = (unsigned int) _gethash(name, namelen, code_magic); i = (~h) & mask; v = code_hash[i]; if (!v) return 0; if (_cmpname(v, name, namelen)) { *code = v; return 1; } incr = (h ^ (h >> 3)) & mask; if (!incr) incr = mask; for (;;) { i = (i + incr) & mask; v = code_hash[i]; if (!v) return 0; if (_cmpname(v, name, namelen)) { *code = v; return 1; } incr = incr << 1; if (incr > mask) incr = incr ^ code_poly; } } static const _PyUnicode_Name_CAPI hashAPI = { sizeof(_PyUnicode_Name_CAPI), _getucname, _getcode }; /* -------------------------------------------------------------------- */ /* Python bindings */ static PyObject * unicodedata_name(PyObject* self, PyObject* args) { char name[NAME_MAXLEN]; PyUnicodeObject* v; PyObject* defobj = NULL; if (!PyArg_ParseTuple(args, "O!|O:name", &PyUnicode_Type, &v, &defobj)) return NULL; if (PyUnicode_GET_SIZE(v) != 1) { PyErr_SetString(PyExc_TypeError, "need a single Unicode character as parameter"); return NULL; } if (!_getucname((Py_UCS4) *PyUnicode_AS_UNICODE(v), name, sizeof(name))) { if (defobj == NULL) { PyErr_SetString(PyExc_ValueError, "no such name"); return NULL; } else { Py_INCREF(defobj); return defobj; } } return Py_BuildValue("s", name); } static PyObject * unicodedata_lookup(PyObject* self, PyObject* args) { Py_UCS4 code; Py_UNICODE str[1]; char* name; int namelen; if (!PyArg_ParseTuple(args, "s#:lookup", &name, &namelen)) return NULL; if (!_getcode(name, namelen, &code)) { char fmt[] = "undefined character name '%s'"; char *buf = PyMem_MALLOC(sizeof(fmt) + namelen); sprintf(buf, fmt, name); PyErr_SetString(PyExc_KeyError, buf); PyMem_FREE(buf); return NULL; } str[0] = (Py_UNICODE) code; return PyUnicode_FromUnicode(str, 1); } /* XXX Add doc strings. */ static PyMethodDef unicodedata_functions[] = { {"decimal", unicodedata_decimal, METH_VARARGS}, {"digit", unicodedata_digit, METH_VARARGS}, {"numeric", unicodedata_numeric, METH_VARARGS}, {"category", unicodedata_category, METH_VARARGS}, {"bidirectional", unicodedata_bidirectional, METH_VARARGS}, {"combining", unicodedata_combining, METH_VARARGS}, {"mirrored", unicodedata_mirrored, METH_VARARGS}, {"decomposition",unicodedata_decomposition, METH_VARARGS}, {"name", unicodedata_name, METH_VARARGS}, {"lookup", unicodedata_lookup, METH_VARARGS}, {"normalize", unicodedata_normalize, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(unicodedata_docstring, "unicode character database"); PyMODINIT_FUNC initunicodedata(void) { PyObject *m, *v; m = Py_InitModule3( "unicodedata", unicodedata_functions, unicodedata_docstring); if (!m) return; PyModule_AddStringConstant(m, "unidata_version", UNIDATA_VERSION); /* Export C API */ v = PyCObject_FromVoidPtr((void *) &hashAPI, NULL); if (v != NULL) PyModule_AddObject(m, "ucnhash_CAPI", v); } /* Local variables: c-basic-offset: 4 indent-tabs-mode: nil End: */ Python-2.3.7/Modules/pcre-int.h0000644001241000117560000002637006524352034015565 0ustar loewishpifb6/************************************************* * Perl-Compatible Regular Expressions * *************************************************/ #define PCRE_VERSION "1.09 28-Apr-1998" /* This is a library of functions to support regular expressions whose syntax and semantics are as close as possible to those of the Perl 5 language. See the file Tech.Notes for some information on the internals. Written by: Philip Hazel Copyright (c) 1998 University of Cambridge ----------------------------------------------------------------------------- Permission is granted to anyone to use this software for any purpose on any computer system, and to redistribute it freely, subject to the following restrictions: 1. This software is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 2. The origin of this software must not be misrepresented, either by explicit claim or by omission. 3. Altered versions must be plainly marked as such, and must not be misrepresented as being the original software. ----------------------------------------------------------------------------- */ /* This header contains definitions that are shared between the different modules, but which are not relevant to the outside. */ /* To cope with SunOS4 and other systems that lack memmove() but have bcopy(), define a macro for memmove() if USE_BCOPY is defined. */ #ifdef USE_BCOPY #undef memmove /* some systems may have a macro */ #define memmove(a, b, c) bcopy(b, a, c) #endif /* Standard C headers plus the external interface definition */ #include #include #include #include #include #include #include #include "pcre.h" /* In case there is no definition of offsetof() provided - though any proper Standard C system should have one. */ #ifndef offsetof #define offsetof(p_type,field) ((size_t)&(((p_type *)0)->field)) #endif /* Private options flags start at the most significant end of the two bytes. The public options defined in pcre.h start at the least significant end. Make sure they don't overlap! */ #define PCRE_FIRSTSET 0x8000 /* first_char is set */ #define PCRE_STARTLINE 0x4000 /* start after \n for multiline */ #define PCRE_COMPILED_CASELESS 0x2000 /* like it says */ /* Options for the "extra" block produced by pcre_study(). */ #define PCRE_STUDY_CASELESS 0x01 /* study was caseless */ #define PCRE_STUDY_MAPPED 0x02 /* a map of starting chars exists */ /* Masks for identifying the public options: all permitted at compile time, only some permitted at run or study time. */ #ifdef FOR_PYTHON #define PUBLIC_OPTIONS \ (PCRE_CASELESS|PCRE_EXTENDED|PCRE_ANCHORED|PCRE_MULTILINE| \ PCRE_DOTALL|PCRE_DOLLAR_ENDONLY|PCRE_EXTRA|PCRE_UNGREEDY| \ PCRE_LOCALE) #else #define PUBLIC_OPTIONS \ (PCRE_CASELESS|PCRE_EXTENDED|PCRE_ANCHORED|PCRE_MULTILINE| \ PCRE_DOTALL|PCRE_DOLLAR_ENDONLY|PCRE_EXTRA|PCRE_UNGREEDY) #endif #define PUBLIC_EXEC_OPTIONS \ (PCRE_CASELESS|PCRE_ANCHORED|PCRE_MULTILINE|PCRE_NOTBOL|PCRE_NOTEOL| \ PCRE_DOTALL|PCRE_DOLLAR_ENDONLY) #define PUBLIC_STUDY_OPTIONS (PCRE_CASELESS) /* Magic number to provide a small check against being handed junk. */ #define MAGIC_NUMBER 0x50435245 /* 'PCRE' */ /* Miscellaneous definitions */ typedef int BOOL; #define FALSE 0 #define TRUE 1 /* These are escaped items that aren't just an encoding of a particular data value such as \n. They must have non-zero values, as check_escape() returns their negation. Also, they must appear in the same order as in the opcode definitions below, up to ESC_Z. The final one must be ESC_REF as subsequent values are used for \1, \2, \3, etc. There is a test in the code for an escape greater than ESC_b and less than ESC_X to detect the types that may be repeated. If any new escapes are put in-between that don't consume a character, that code will have to change. */ enum { ESC_A = 1, ESC_B, ESC_b, ESC_D, ESC_d, ESC_S, ESC_s, ESC_W, ESC_w, /* These are not Perl escapes, so can't appear in the */ ESC_X, /* simple table-lookup because they must be conditional */ /* on PCRE_EXTRA. */ ESC_Z, ESC_REF }; /* Opcode table: OP_BRA must be last, as all values >= it are used for brackets that extract substrings. Starting from 1 (i.e. after OP_END), the values up to OP_EOD must correspond in order to the list of escapes immediately above. */ enum { OP_END, /* End of pattern */ /* Values corresponding to backslashed metacharacters */ OP_SOD, /* Start of data: \A */ OP_NOT_WORD_BOUNDARY, /* \B */ OP_WORD_BOUNDARY, /* \b */ OP_NOT_DIGIT, /* \D */ OP_DIGIT, /* \d */ OP_NOT_WHITESPACE, /* \S */ OP_WHITESPACE, /* \s */ OP_NOT_WORDCHAR, /* \W */ OP_WORDCHAR, /* \w */ OP_CUT, /* The analogue of Prolog's "cut" operation (extension) */ OP_EOD, /* End of data: \Z. */ OP_NOT_WORD_BOUNDARY_L, /* localized \B */ OP_WORD_BOUNDARY_L, /* localized \b */ OP_NOT_WORDCHAR_L, /* localized \W */ OP_WORDCHAR_L, /* localized \w */ OP_CIRC, /* Start of line - varies with multiline switch */ OP_DOLL, /* End of line - varies with multiline switch */ OP_ANY, /* Match any character */ OP_CHARS, /* Match string of characters */ OP_NOT, /* Match anything but the following char */ OP_STAR, /* The maximizing and minimizing versions of */ OP_MINSTAR, /* all these opcodes must come in pairs, with */ OP_PLUS, /* the minimizing one second. */ OP_MINPLUS, /* This first set applies to single characters */ OP_QUERY, OP_MINQUERY, OP_UPTO, /* From 0 to n matches */ OP_MINUPTO, OP_EXACT, /* Exactly n matches */ OP_NOTSTAR, /* The maximizing and minimizing versions of */ OP_NOTMINSTAR, /* all these opcodes must come in pairs, with */ OP_NOTPLUS, /* the minimizing one second. */ OP_NOTMINPLUS, /* This first set applies to "not" single characters */ OP_NOTQUERY, OP_NOTMINQUERY, OP_NOTUPTO, /* From 0 to n matches */ OP_NOTMINUPTO, OP_NOTEXACT, /* Exactly n matches */ OP_TYPESTAR, /* The maximizing and minimizing versions of */ OP_TYPEMINSTAR, /* all these opcodes must come in pairs, with */ OP_TYPEPLUS, /* the minimizing one second. These codes must */ OP_TYPEMINPLUS, /* be in exactly the same order as those above. */ OP_TYPEQUERY, /* This set applies to character types such as \d */ OP_TYPEMINQUERY, OP_TYPEUPTO, /* From 0 to n matches */ OP_TYPEMINUPTO, OP_TYPEEXACT, /* Exactly n matches */ OP_CRSTAR, /* The maximizing and minimizing versions of */ OP_CRMINSTAR, /* all these opcodes must come in pairs, with */ OP_CRPLUS, /* the minimizing one second. These codes must */ OP_CRMINPLUS, /* be in exactly the same order as those above. */ OP_CRQUERY, /* These are for character classes and back refs */ OP_CRMINQUERY, OP_CRRANGE, /* These are different to the three seta above. */ OP_CRMINRANGE, OP_CLASS, /* Match a character class */ OP_NEGCLASS, /* Match a character class, specified negatively */ OP_CLASS_L, /* Match a character class */ OP_REF, /* Match a back reference */ OP_ALT, /* Start of alternation */ OP_KET, /* End of group that doesn't have an unbounded repeat */ OP_KETRMAX, /* These two must remain together and in this */ OP_KETRMIN, /* order. They are for groups the repeat for ever. */ OP_ASSERT, OP_ASSERT_NOT, OP_ONCE, /* Once matched, don't back up into the subpattern */ OP_BRAZERO, /* These two must remain together and in this */ OP_BRAMINZERO, /* order. */ OP_BRA /* This and greater values are used for brackets that extract substrings. */ }; /* The highest extraction number. This is limited by the number of opcodes left after OP_BRA, i.e. 255 - OP_BRA. We actually set it somewhat lower. */ #define EXTRACT_MAX 99 /* The texts of compile-time error messages are defined as macros here so that they can be accessed by the POSIX wrapper and converted into error codes. Yes, I could have used error codes in the first place, but didn't feel like changing just to accommodate the POSIX wrapper. */ #define ERR1 "\\ at end of pattern" #define ERR2 "\\c at end of pattern" #define ERR3 "unrecognized character follows \\" #define ERR4 "numbers out of order in {} quantifier" #define ERR5 "number too big in {} quantifier" #define ERR6 "missing terminating ] for character class" #define ERR7 "invalid escape sequence in character class" #define ERR8 "range out of order in character class" #define ERR9 "nothing to repeat" #define ERR10 "operand of unlimited repeat could match the empty string" #define ERR11 "internal error: unexpected repeat" #define ERR12 "unrecognized character after (?" #define ERR13 "too many capturing parenthesized sub-patterns" #define ERR14 "missing )" #define ERR15 "back reference to non-existent subpattern" #define ERR16 "erroffset passed as NULL" #define ERR17 "unknown option bit(s) set" #define ERR18 "missing ) after comment" #define ERR19 "too many sets of parentheses" #define ERR20 "regular expression too large" #define ERR21 "failed to get memory" #define ERR22 "unmatched brackets" #define ERR23 "internal error: code overflow" /* All character handling must be done as unsigned characters. Otherwise there are problems with top-bit-set characters and functions such as isspace(). However, we leave the interface to the outside world as char *, because that should make things easier for callers. We define a short type for unsigned char to save lots of typing. I tried "uchar", but it causes problems on Digital Unix, where it is defined in sys/types, so use "uschar" instead. */ typedef unsigned char uschar; /* The real format of the start of the pcre block; the actual code vector runs on as long as necessary after the end. */ typedef struct real_pcre { unsigned int magic_number; unsigned short int options; unsigned char top_bracket; unsigned char top_backref; unsigned char first_char; unsigned char code[1]; } real_pcre; /* The real format of the extra block returned by pcre_study(). */ typedef struct real_pcre_extra { unsigned char options; unsigned char start_bits[32]; } real_pcre_extra; /* Global tables from chartables.c */ extern uschar pcre_lcc[]; extern uschar pcre_fcc[]; extern uschar pcre_cbits[]; extern uschar pcre_ctypes[]; /* Bit definitions for entries in pcre_ctypes[]. */ #define ctype_space 0x01 #define ctype_letter 0x02 #define ctype_digit 0x04 #define ctype_xdigit 0x08 #define ctype_word 0x10 /* alphameric or '_' */ #define ctype_odigit 0x20 /* octal digit */ #define ctype_meta 0x80 /* regexp meta char or zero (end pattern) */ /* Offsets for the bitmap tables */ #define cbit_digit 0 #define cbit_letter 32 #define cbit_word 64 #define cbit_space 96 #define cbit_length 128 /* Length of the cbits table */ /* End of internal.h */ Python-2.3.7/Modules/svmodule.c0000644001241000117560000005074307421655456015711 0ustar loewishpifb6/* SV module -- interface to the Indigo video board */ /* WARNING! This module is for hardware that we don't have any more, so it hasn't been tested. It has been converted to the new coding style, and it is possible that this conversion has broken something -- user beware! */ #include #include #include "Python.h" #include "compile.h" #include "yuv.h" /* for YUV conversion functions */ typedef struct { PyObject_HEAD SV_nodeP ob_svideo; svCaptureInfo ob_info; } svobject; typedef struct { PyObject_HEAD void *ob_capture; int ob_mustunlock; svCaptureInfo ob_info; svobject *ob_svideo; } captureobject; static PyObject *SvError; /* exception sv.error */ static PyObject *newcaptureobject(svobject *, void *, int); /* Set a SV-specific error from svideo_errno and return NULL */ static PyObject * sv_error(void) { PyErr_SetString(SvError, svStrerror(svideo_errno)); return NULL; } static PyObject * svc_conversion(captureobject *self, PyObject *args, void (*function)(), float factor) { PyObject *output; int invert; char* outstr; if (!PyArg_Parse(args, "i", &invert)) return NULL; if (!(output = PyString_FromStringAndSize( NULL, (int)(self->ob_info.width * self->ob_info.height * factor)))) { return NULL; } if (!(outstr = PyString_AsString(output))) { Py_DECREF(output); return NULL; } (*function)((boolean)invert, self->ob_capture, outstr, self->ob_info.width, self->ob_info.height); return output; } /* * 3 functions to convert from Starter Video YUV 4:1:1 format to * Compression Library 4:2:2 Duplicate Chroma format. */ static PyObject * svc_YUVtoYUV422DC(captureobject *self, PyObject *args) { if (self->ob_info.format != SV_YUV411_FRAMES) { PyErr_SetString(SvError, "data has bad format"); return NULL; } return svc_conversion(self, args, yuv_sv411_to_cl422dc, 2.0); } static PyObject * svc_YUVtoYUV422DC_quarter(captureobject *self, PyObject *args) { if (self->ob_info.format != SV_YUV411_FRAMES) { PyErr_SetString(SvError, "data has bad format"); return NULL; } return svc_conversion(self, args, yuv_sv411_to_cl422dc_quartersize, 0.5); } static PyObject * svc_YUVtoYUV422DC_sixteenth(captureobject *self, PyObject *args) { if (self->ob_info.format != SV_YUV411_FRAMES) { PyErr_SetString(SvError, "data has bad format"); return NULL; } return svc_conversion(self, args, yuv_sv411_to_cl422dc_sixteenthsize, 0.125); } static PyObject * svc_YUVtoRGB(captureobject *self, PyObject *args) { switch (self->ob_info.format) { case SV_YUV411_FRAMES: case SV_YUV411_FRAMES_AND_BLANKING_BUFFER: break; default: PyErr_SetString(SvError, "data had bad format"); return NULL; } return svc_conversion(self, args, svYUVtoRGB, (float) sizeof(long)); } static PyObject * svc_RGB8toRGB32(captureobject *self, PyObject *args) { if (self->ob_info.format != SV_RGB8_FRAMES) { PyErr_SetString(SvError, "data has bad format"); return NULL; } return svc_conversion(self, args, svRGB8toRGB32, (float) sizeof(long)); } static PyObject * svc_InterleaveFields(captureobject *self, PyObject *args) { if (self->ob_info.format != SV_RGB8_FRAMES) { PyErr_SetString(SvError, "data has bad format"); return NULL; } return svc_conversion(self, args, svInterleaveFields, 1.0); } static PyObject * svc_GetFields(captureobject *self, PyObject *args) { PyObject *f1 = NULL; PyObject *f2 = NULL; PyObject *ret = NULL; int fieldsize; char* obcapture; if (self->ob_info.format != SV_RGB8_FRAMES) { PyErr_SetString(SvError, "data has bad format"); return NULL; } fieldsize = self->ob_info.width * self->ob_info.height / 2; obcapture = (char*)self->ob_capture; if (!(f1 = PyString_FromStringAndSize(obcapture, fieldsize))) goto finally; if (!(f2 = PyString_FromStringAndSize(obcapture + fieldsize, fieldsize))) goto finally; ret = Py_BuildValue("(OO)", f1, f2); finally: Py_XDECREF(f1); Py_XDECREF(f2); return ret; } static PyObject * svc_UnlockCaptureData(captureobject *self, PyObject *args) { if (!PyArg_Parse(args, "")) return NULL; if (!self->ob_mustunlock) { PyErr_SetString(SvError, "buffer should not be unlocked"); return NULL; } if (svUnlockCaptureData(self->ob_svideo->ob_svideo, self->ob_capture)) return sv_error(); self->ob_mustunlock = 0; Py_INCREF(Py_None); return Py_None; } #ifdef USE_GL #include static PyObject * svc_lrectwrite(captureobject *self, PyObject *args) { Screencoord x1, x2, y1, y2; if (!PyArg_Parse(args, "(hhhh)", &x1, &x2, &y1, &y2)) return NULL; lrectwrite(x1, x2, y1, y2, (unsigned long *) self->ob_capture); Py_INCREF(Py_None); return Py_None; } #endif static PyObject * svc_writefile(captureobject *self, PyObject *args) { PyObject *file; int size; FILE* fp; if (!PyArg_Parse(args, "O", &file)) return NULL; if (!PyFile_Check(file)) { PyErr_SetString(SvError, "not a file object"); return NULL; } if (!(fp = PyFile_AsFile(file))) return NULL; size = self->ob_info.width * self->ob_info.height; if (fwrite(self->ob_capture, sizeof(long), size, fp) != size) { PyErr_SetString(SvError, "writing failed"); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * svc_FindVisibleRegion(captureobject *self, PyObject *args) { void *visible; int width; if (!PyArg_Parse(args, "")) return NULL; if (svFindVisibleRegion(self->ob_svideo->ob_svideo, self->ob_capture, &visible, self->ob_info.width)) return sv_error(); if (visible == NULL) { PyErr_SetString(SvError, "data in wrong format"); return NULL; } return newcaptureobject(self->ob_svideo, visible, 0); } static PyMethodDef capture_methods[] = { {"YUVtoRGB", (PyCFunction)svc_YUVtoRGB, METH_OLDARGS}, {"RGB8toRGB32", (PyCFunction)svc_RGB8toRGB32, METH_OLDARGS}, {"InterleaveFields", (PyCFunction)svc_InterleaveFields, METH_OLDARGS}, {"UnlockCaptureData", (PyCFunction)svc_UnlockCaptureData, METH_OLDARGS}, {"FindVisibleRegion", (PyCFunction)svc_FindVisibleRegion, METH_OLDARGS}, {"GetFields", (PyCFunction)svc_GetFields, METH_OLDARGS}, {"YUVtoYUV422DC", (PyCFunction)svc_YUVtoYUV422DC, METH_OLDARGS}, {"YUVtoYUV422DC_quarter",(PyCFunction)svc_YUVtoYUV422DC_quarter, METH_OLDARGS}, {"YUVtoYUV422DC_sixteenth",(PyCFunction)svc_YUVtoYUV422DC_sixteenth, METH_OLDARGS}, #ifdef USE_GL {"lrectwrite", (PyCFunction)svc_lrectwrite, METH_OLDARGS}, #endif {"writefile", (PyCFunction)svc_writefile, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static void capture_dealloc(captureobject *self) { if (self->ob_capture != NULL) { if (self->ob_mustunlock) (void)svUnlockCaptureData(self->ob_svideo->ob_svideo, self->ob_capture); self->ob_capture = NULL; Py_DECREF(self->ob_svideo); self->ob_svideo = NULL; } PyObject_Del(self); } static PyObject * capture_getattr(svobject *self, char *name) { return Py_FindMethod(capture_methods, (PyObject *)self, name); } PyTypeObject Capturetype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "sv.capture", /*tp_name*/ sizeof(captureobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)capture_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)capture_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyObject * newcaptureobject(svobject *self, void *ptr, int mustunlock) { captureobject *p; p = PyObject_New(captureobject, &Capturetype); if (p == NULL) return NULL; p->ob_svideo = self; Py_INCREF(self); p->ob_capture = ptr; p->ob_mustunlock = mustunlock; p->ob_info = self->ob_info; return (PyObject *) p; } static PyObject * sv_GetCaptureData(svobject *self, PyObject *args) { void *ptr; long fieldID; PyObject *res, *c; if (!PyArg_Parse(args, "")) return NULL; if (svGetCaptureData(self->ob_svideo, &ptr, &fieldID)) return sv_error(); if (ptr == NULL) { PyErr_SetString(SvError, "no data available"); return NULL; } c = newcaptureobject(self, ptr, 1); if (c == NULL) return NULL; res = Py_BuildValue("(Oi)", c, fieldID); Py_DECREF(c); return res; } static PyObject * sv_BindGLWindow(svobject *self, PyObject *args) { long wid; int mode; if (!PyArg_Parse(args, "(ii)", &wid, &mode)) return NULL; if (svBindGLWindow(self->ob_svideo, wid, mode)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_EndContinuousCapture(svobject *self, PyObject *args) { if (!PyArg_Parse(args, "")) return NULL; if (svEndContinuousCapture(self->ob_svideo)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_IsVideoDisplayed(svobject *self, PyObject *args) { int v; if (!PyArg_Parse(args, "")) return NULL; v = svIsVideoDisplayed(self->ob_svideo); if (v == -1) return sv_error(); return PyInt_FromLong((long) v); } static PyObject * sv_OutputOffset(svobject *self, PyObject *args) { int x_offset; int y_offset; if (!PyArg_Parse(args, "(ii)", &x_offset, &y_offset)) return NULL; if (svOutputOffset(self->ob_svideo, x_offset, y_offset)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_PutFrame(svobject *self, PyObject *args) { char *buffer; if (!PyArg_Parse(args, "s", &buffer)) return NULL; if (svPutFrame(self->ob_svideo, buffer)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_QuerySize(svobject *self, PyObject *args) { int w; int h; int rw; int rh; if (!PyArg_Parse(args, "(ii)", &w, &h)) return NULL; if (svQuerySize(self->ob_svideo, w, h, &rw, &rh)) return sv_error(); return Py_BuildValue("(ii)", (long) rw, (long) rh); } static PyObject * sv_SetSize(svobject *self, PyObject *args) { int w; int h; if (!PyArg_Parse(args, "(ii)", &w, &h)) return NULL; if (svSetSize(self->ob_svideo, w, h)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_SetStdDefaults(svobject *self, PyObject *args) { if (!PyArg_Parse(args, "")) return NULL; if (svSetStdDefaults(self->ob_svideo)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_UseExclusive(svobject *self, PyObject *args) { boolean onoff; int mode; if (!PyArg_Parse(args, "(ii)", &onoff, &mode)) return NULL; if (svUseExclusive(self->ob_svideo, onoff, mode)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_WindowOffset(svobject *self, PyObject *args) { int x_offset; int y_offset; if (!PyArg_Parse(args, "(ii)", &x_offset, &y_offset)) return NULL; if (svWindowOffset(self->ob_svideo, x_offset, y_offset)) return sv_error(); Py_INCREF(Py_None); return Py_None; } static PyObject * sv_CaptureBurst(svobject *self, PyObject *args) { int bytes, i; svCaptureInfo info; void *bitvector = NULL; PyObject *videodata = NULL; PyObject *bitvecobj = NULL; PyObject *res = NULL; static PyObject *evenitem, *odditem; if (!PyArg_Parse(args, "(iiiii)", &info.format, &info.width, &info.height, &info.size, &info.samplingrate)) return NULL; switch (info.format) { case SV_RGB8_FRAMES: bitvector = malloc(SV_BITVEC_SIZE(info.size)); break; case SV_YUV411_FRAMES_AND_BLANKING_BUFFER: break; default: PyErr_SetString(SvError, "illegal format specified"); return NULL; } if (svQueryCaptureBufferSize(self->ob_svideo, &info, &bytes)) { res = sv_error(); goto finally; } if (!(videodata = PyString_FromStringAndSize(NULL, bytes))) goto finally; /* XXX -- need to do something about the bitvector */ { char* str = PyString_AsString(videodata); if (!str) goto finally; if (svCaptureBurst(self->ob_svideo, &info, str, bitvector)) { res = sv_error(); goto finally; } } if (bitvector) { if (evenitem == NULL) { if (!(evenitem = PyInt_FromLong(0))) goto finally; } if (odditem == NULL) { if (!(odditem = PyInt_FromLong(1))) goto finally; } if (!(bitvecobj = PyTuple_New(2 * info.size))) goto finally; for (i = 0; i < 2 * info.size; i++) { int sts; if (SV_GET_FIELD(bitvector, i) == SV_EVEN_FIELD) { Py_INCREF(evenitem); sts = PyTuple_SetItem(bitvecobj, i, evenitem); } else { Py_INCREF(odditem); sts = PyTuple_SetItem(bitvecobj, i, odditem); } if (sts < 0) goto finally; } } else { bitvecobj = Py_None; Py_INCREF(Py_None); } res = Py_BuildValue("((iiiii)OO)", info.format, info.width, info.height, info.size, info.samplingrate, videodata, bitvecobj); finally: if (bitvector) free(bitvector); Py_XDECREF(videodata); Py_XDECREF(bitvecobj); return res; } static PyObject * sv_CaptureOneFrame(svobject *self, PyObject *args) { svCaptureInfo info; int format, width, height; int bytes; PyObject *videodata = NULL; PyObject *res = NULL; char *str; if (!PyArg_Parse(args, "(iii)", &format, &width, &height)) return NULL; info.format = format; info.width = width; info.height = height; info.size = 0; info.samplingrate = 0; if (svQueryCaptureBufferSize(self->ob_svideo, &info, &bytes)) return sv_error(); if (!(videodata = PyString_FromStringAndSize(NULL, bytes))) return NULL; str = PyString_AsString(videodata); if (!str) goto finally; if (svCaptureOneFrame(self->ob_svideo, format, &width, &height, str)) { res = sv_error(); goto finally; } res = Py_BuildValue("(iiO)", width, height, videodata); finally: Py_XDECREF(videodata); return res; } static PyObject * sv_InitContinuousCapture(svobject *self, PyObject *args) { svCaptureInfo info; if (!PyArg_Parse(args, "(iiiii)", &info.format, &info.width, &info.height, &info.size, &info.samplingrate)) return NULL; if (svInitContinuousCapture(self->ob_svideo, &info)) return sv_error(); self->ob_info = info; return Py_BuildValue("(iiiii)", info.format, info.width, info.height, info.size, info.samplingrate); } static PyObject * sv_LoadMap(svobject *self, PyObject *args) { PyObject *rgb; PyObject *res = NULL; rgb_tuple *mapp = NULL; int maptype; int i, j; /* indices */ if (!PyArg_Parse(args, "(iO)", &maptype, &rgb)) return NULL; if (!PyList_Check(rgb) || PyList_Size(rgb) != 256) { PyErr_BadArgument(); return NULL; } if (!(mapp = PyMem_NEW(rgb_tuple, 256))) return PyErr_NoMemory(); for (i = 0; i < 256; i++) { PyObject* v = PyList_GetItem(rgb, i); if (!v) goto finally; if (!PyTuple_Check(v) || PyTuple_Size(v) != 3) { PyErr_BadArgument(); goto finally; } for (j = 0; j < 3; j++) { PyObject* cell = PyTuple_GetItem(v, j); if (!cell) goto finally; if (!PyInt_Check(cell)) { PyErr_BadArgument(); goto finally; } switch (j) { case 0: mapp[i].red = PyInt_AsLong(cell); break; case 1: mapp[i].blue = PyInt_AsLong(cell); break; case 2: mapp[i].green = PyInt_AsLong(cell); break; } if (PyErr_Occurred()) goto finally; } } if (svLoadMap(self->ob_svideo, maptype, mapp)) { res = sv_error(); goto finally; } Py_INCREF(Py_None); res = Py_None; finally: PyMem_DEL(mapp); return res; } static PyObject * sv_CloseVideo(svobject *self, PyObject *args) { if (!PyArg_Parse(args, "")) return NULL; if (svCloseVideo(self->ob_svideo)) return sv_error(); self->ob_svideo = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * doParams(svobject *self, PyObject *args, int (*func)(SV_nodeP, long *, int), int modified) { PyObject *list; PyObject *res = NULL; long *PVbuffer = NULL; long length; int i; if (!PyArg_Parse(args, "O", &list)) return NULL; if (!PyList_Check(list)) { PyErr_BadArgument(); return NULL; } if ((length = PyList_Size(list)) < 0) return NULL; PVbuffer = PyMem_NEW(long, length); if (PVbuffer == NULL) return PyErr_NoMemory(); for (i = 0; i < length; i++) { PyObject *v = PyList_GetItem(list, i); if (!v) goto finally; if (!PyInt_Check(v)) { PyErr_BadArgument(); goto finally; } PVbuffer[i] = PyInt_AsLong(v); /* can't just test the return value, because what if the value was -1?! */ if (PVbuffer[i] == -1 && PyErr_Occurred()) goto finally; } if ((*func)(self->ob_svideo, PVbuffer, length)) { res = sv_error(); goto finally; } if (modified) { for (i = 0; i < length; i++) { PyObject* v = PyInt_FromLong(PVbuffer[i]); if (!v || PyList_SetItem(list, i, v) < 0) goto finally; } } Py_INCREF(Py_None); res = Py_None; finally: PyMem_DEL(PVbuffer); return res; } static PyObject * sv_GetParam(PyObject *self, PyObject *args) { return doParams(self, args, svGetParam, 1); } static PyObject * sv_GetParamRange(PyObject *self, PyObject *args) { return doParams(self, args, svGetParamRange, 1); } static PyObject * sv_SetParam(PyObject *self, PyObject *args) { return doParams(self, args, svSetParam, 0); } static PyMethodDef svideo_methods[] = { {"BindGLWindow", (PyCFunction)sv_BindGLWindow, METH_OLDARGS}, {"EndContinuousCapture",(PyCFunction)sv_EndContinuousCapture, METH_OLDARGS}, {"IsVideoDisplayed", (PyCFunction)sv_IsVideoDisplayed, METH_OLDARGS}, {"OutputOffset", (PyCFunction)sv_OutputOffset, METH_OLDARGS}, {"PutFrame", (PyCFunction)sv_PutFrame, METH_OLDARGS}, {"QuerySize", (PyCFunction)sv_QuerySize, METH_OLDARGS}, {"SetSize", (PyCFunction)sv_SetSize, METH_OLDARGS}, {"SetStdDefaults", (PyCFunction)sv_SetStdDefaults, METH_OLDARGS}, {"UseExclusive", (PyCFunction)sv_UseExclusive, METH_OLDARGS}, {"WindowOffset", (PyCFunction)sv_WindowOffset, METH_OLDARGS}, {"InitContinuousCapture",(PyCFunction)sv_InitContinuousCapture, METH_OLDARGS}, {"CaptureBurst", (PyCFunction)sv_CaptureBurst, METH_OLDARGS}, {"CaptureOneFrame", (PyCFunction)sv_CaptureOneFrame, METH_OLDARGS}, {"GetCaptureData", (PyCFunction)sv_GetCaptureData, METH_OLDARGS}, {"CloseVideo", (PyCFunction)sv_CloseVideo, METH_OLDARGS}, {"LoadMap", (PyCFunction)sv_LoadMap, METH_OLDARGS}, {"GetParam", (PyCFunction)sv_GetParam, METH_OLDARGS}, {"GetParamRange", (PyCFunction)sv_GetParamRange, METH_OLDARGS}, {"SetParam", (PyCFunction)sv_SetParam, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * sv_conversion(PyObject *self, PyObject *args, void (*function)(), int inputfactor, float factor) { int invert, width, height, inputlength; char *input, *str; PyObject *output; if (!PyArg_Parse(args, "(is#ii)", &invert, &input, &inputlength, &width, &height)) return NULL; if (width * height * inputfactor > inputlength) { PyErr_SetString(SvError, "input buffer not long enough"); return NULL; } if (!(output = PyString_FromStringAndSize(NULL, (int)(width * height * factor)))) return NULL; str = PyString_AsString(output); if (!str) { Py_DECREF(output); return NULL; } (*function)(invert, input, str, width, height); return output; } static PyObject * sv_InterleaveFields(PyObject *self, PyObject *args) { return sv_conversion(self, args, svInterleaveFields, 1, 1.0); } static PyObject * sv_RGB8toRGB32(PyObject *self, PyObject *args) { return sv_conversion(self, args, svRGB8toRGB32, 1, (float) sizeof(long)); } static PyObject * sv_YUVtoRGB(PyObject *self, PyObject *args) { return sv_conversion(self, args, svYUVtoRGB, 2, (float) sizeof(long)); } static void svideo_dealloc(svobject *self) { if (self->ob_svideo != NULL) (void) svCloseVideo(self->ob_svideo); PyObject_Del(self); } static PyObject * svideo_getattr(svobject *self, char *name) { return Py_FindMethod(svideo_methods, (PyObject *)self, name); } PyTypeObject Svtype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "sv.sv", /*tp_name*/ sizeof(svobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)svideo_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)svideo_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; static PyObject * newsvobject(SV_nodeP svp) { svobject *p; p = PyObject_New(svobject, &Svtype); if (p == NULL) return NULL; p->ob_svideo = svp; p->ob_info.format = 0; p->ob_info.size = 0; p->ob_info.width = 0; p->ob_info.height = 0; p->ob_info.samplingrate = 0; return (PyObject *) p; } static PyObject * sv_OpenVideo(PyObject *self, PyObject *args) { SV_nodeP svp; if (!PyArg_Parse(args, "")) return NULL; svp = svOpenVideo(); if (svp == NULL) return sv_error(); return newsvobject(svp); } static PyMethodDef sv_methods[] = { {"InterleaveFields", (PyCFunction)sv_InterleaveFields, METH_OLDARGS}, {"RGB8toRGB32", (PyCFunction)sv_RGB8toRGB32, METH_OLDARGS}, {"YUVtoRGB", (PyCFunction)sv_YUVtoRGB, METH_OLDARGS}, {"OpenVideo", (PyCFunction)sv_OpenVideo, METH_OLDARGS}, {NULL, NULL} /* Sentinel */ }; void initsv(void) { PyObject *m, *d; m = Py_InitModule("sv", sv_methods); d = PyModule_GetDict(m); SvError = PyErr_NewException("sv.error", NULL, NULL); if (SvError == NULL || PyDict_SetItemString(d, "error", SvError) != 0) return; } Python-2.3.7/Modules/audioop.c0000644001241000117560000011276710762607371015513 0ustar loewishpifb6 /* audioopmodule - Module to detect peak values in arrays */ #include "Python.h" #if SIZEOF_INT == 4 typedef int Py_Int32; typedef unsigned int Py_UInt32; #else #if SIZEOF_LONG == 4 typedef long Py_Int32; typedef unsigned long Py_UInt32; #else #error "No 4-byte integral type" #endif #endif #if defined(__CHAR_UNSIGNED__) #if defined(signed) /* This module currently does not work on systems where only unsigned characters are available. Take it out of Setup. Sorry. */ #endif #endif /* Code shamelessly stolen from sox, ** (c) Craig Reese, Joe Campbell and Jeff Poskanzer 1989 */ #define MINLIN -32768 #define MAXLIN 32767 #define LINCLIP(x) do { if ( x < MINLIN ) x = MINLIN ; \ else if ( x > MAXLIN ) x = MAXLIN; \ } while ( 0 ) static unsigned char st_linear_to_ulaw(int sample); /* ** This macro converts from ulaw to 16 bit linear, faster. ** ** Jef Poskanzer ** 23 October 1989 ** ** Input: 8 bit ulaw sample ** Output: signed 16 bit linear sample */ #define st_ulaw_to_linear(ulawbyte) ulaw_table[ulawbyte] static int ulaw_table[256] = { -32124, -31100, -30076, -29052, -28028, -27004, -25980, -24956, -23932, -22908, -21884, -20860, -19836, -18812, -17788, -16764, -15996, -15484, -14972, -14460, -13948, -13436, -12924, -12412, -11900, -11388, -10876, -10364, -9852, -9340, -8828, -8316, -7932, -7676, -7420, -7164, -6908, -6652, -6396, -6140, -5884, -5628, -5372, -5116, -4860, -4604, -4348, -4092, -3900, -3772, -3644, -3516, -3388, -3260, -3132, -3004, -2876, -2748, -2620, -2492, -2364, -2236, -2108, -1980, -1884, -1820, -1756, -1692, -1628, -1564, -1500, -1436, -1372, -1308, -1244, -1180, -1116, -1052, -988, -924, -876, -844, -812, -780, -748, -716, -684, -652, -620, -588, -556, -524, -492, -460, -428, -396, -372, -356, -340, -324, -308, -292, -276, -260, -244, -228, -212, -196, -180, -164, -148, -132, -120, -112, -104, -96, -88, -80, -72, -64, -56, -48, -40, -32, -24, -16, -8, 0, 32124, 31100, 30076, 29052, 28028, 27004, 25980, 24956, 23932, 22908, 21884, 20860, 19836, 18812, 17788, 16764, 15996, 15484, 14972, 14460, 13948, 13436, 12924, 12412, 11900, 11388, 10876, 10364, 9852, 9340, 8828, 8316, 7932, 7676, 7420, 7164, 6908, 6652, 6396, 6140, 5884, 5628, 5372, 5116, 4860, 4604, 4348, 4092, 3900, 3772, 3644, 3516, 3388, 3260, 3132, 3004, 2876, 2748, 2620, 2492, 2364, 2236, 2108, 1980, 1884, 1820, 1756, 1692, 1628, 1564, 1500, 1436, 1372, 1308, 1244, 1180, 1116, 1052, 988, 924, 876, 844, 812, 780, 748, 716, 684, 652, 620, 588, 556, 524, 492, 460, 428, 396, 372, 356, 340, 324, 308, 292, 276, 260, 244, 228, 212, 196, 180, 164, 148, 132, 120, 112, 104, 96, 88, 80, 72, 64, 56, 48, 40, 32, 24, 16, 8, 0 }; /* #define ZEROTRAP */ /* turn on the trap as per the MIL-STD */ #define BIAS 0x84 /* define the add-in bias for 16 bit samples */ #define CLIP 32635 static unsigned char st_linear_to_ulaw(int sample) { static int exp_lut[256] = {0,0,1,1,2,2,2,2,3,3,3,3,3,3,3,3, 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4, 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5, 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5, 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7, 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7}; int sign, exponent, mantissa; unsigned char ulawbyte; /* Get the sample into sign-magnitude. */ sign = (sample >> 8) & 0x80; /* set aside the sign */ if ( sign != 0 ) sample = -sample; /* get magnitude */ if ( sample > CLIP ) sample = CLIP; /* clip the magnitude */ /* Convert from 16 bit linear to ulaw. */ sample = sample + BIAS; exponent = exp_lut[( sample >> 7 ) & 0xFF]; mantissa = ( sample >> ( exponent + 3 ) ) & 0x0F; ulawbyte = ~ ( sign | ( exponent << 4 ) | mantissa ); #ifdef ZEROTRAP if ( ulawbyte == 0 ) ulawbyte = 0x02; /* optional CCITT trap */ #endif return ulawbyte; } /* End of code taken from sox */ /* Intel ADPCM step variation table */ static int indexTable[16] = { -1, -1, -1, -1, 2, 4, 6, 8, -1, -1, -1, -1, 2, 4, 6, 8, }; static int stepsizeTable[89] = { 7, 8, 9, 10, 11, 12, 13, 14, 16, 17, 19, 21, 23, 25, 28, 31, 34, 37, 41, 45, 50, 55, 60, 66, 73, 80, 88, 97, 107, 118, 130, 143, 157, 173, 190, 209, 230, 253, 279, 307, 337, 371, 408, 449, 494, 544, 598, 658, 724, 796, 876, 963, 1060, 1166, 1282, 1411, 1552, 1707, 1878, 2066, 2272, 2499, 2749, 3024, 3327, 3660, 4026, 4428, 4871, 5358, 5894, 6484, 7132, 7845, 8630, 9493, 10442, 11487, 12635, 13899, 15289, 16818, 18500, 20350, 22385, 24623, 27086, 29794, 32767 }; #define CHARP(cp, i) ((signed char *)(cp+i)) #define SHORTP(cp, i) ((short *)(cp+i)) #define LONGP(cp, i) ((Py_Int32 *)(cp+i)) static PyObject *AudioopError; static PyObject * audioop_getsample(PyObject *self, PyObject *args) { signed char *cp; int len, size, val = 0; int i; if ( !PyArg_Parse(args, "(s#ii)", &cp, &len, &size, &i) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } if ( i < 0 || i >= len/size ) { PyErr_SetString(AudioopError, "Index out of range"); return 0; } if ( size == 1 ) val = (int)*CHARP(cp, i); else if ( size == 2 ) val = (int)*SHORTP(cp, i*2); else if ( size == 4 ) val = (int)*LONGP(cp, i*4); return PyInt_FromLong(val); } static PyObject * audioop_max(PyObject *self, PyObject *args) { signed char *cp; int len, size, val = 0; int i; int max = 0; if ( !PyArg_Parse(args, "(s#i)", &cp, &len, &size) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } for ( i=0; i max ) max = val; } return PyInt_FromLong(max); } static PyObject * audioop_minmax(PyObject *self, PyObject *args) { signed char *cp; int len, size, val = 0; int i; int min = 0x7fffffff, max = -0x7fffffff; if (!PyArg_Parse(args, "(s#i)", &cp, &len, &size)) return NULL; if (size != 1 && size != 2 && size != 4) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return NULL; } for (i = 0; i < len; i += size) { if (size == 1) val = (int) *CHARP(cp, i); else if (size == 2) val = (int) *SHORTP(cp, i); else if (size == 4) val = (int) *LONGP(cp, i); if (val > max) max = val; if (val < min) min = val; } return Py_BuildValue("(ii)", min, max); } static PyObject * audioop_avg(PyObject *self, PyObject *args) { signed char *cp; int len, size, val = 0; int i; double avg = 0.0; if ( !PyArg_Parse(args, "(s#i)", &cp, &len, &size) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } for ( i=0; i n, and let all sums be over i from 0 to n-1. ** ** Now, for each j in {0..N-n} we compute a factor fj so that -fj*R matches A ** as good as possible, i.e. sum( (A[j+i]+fj*R[i])^2 ) is minimal. This ** equation gives fj = sum( A[j+i]R[i] ) / sum(R[i]^2). ** ** Next, we compute the relative distance between the original signal and ** the modified signal and minimize that over j: ** vj = sum( (A[j+i]-fj*R[i])^2 ) / sum( A[j+i]^2 ) => ** vj = ( sum(A[j+i]^2)*sum(R[i]^2) - sum(A[j+i]R[i])^2 ) / sum( A[j+i]^2 ) ** ** In the code variables correspond as follows: ** cp1 A ** cp2 R ** len1 N ** len2 n ** aj_m1 A[j-1] ** aj_lm1 A[j+n-1] ** sum_ri_2 sum(R[i]^2) ** sum_aij_2 sum(A[i+j]^2) ** sum_aij_ri sum(A[i+j]R[i]) ** ** sum_ri is calculated once, sum_aij_2 is updated each step and sum_aij_ri ** is completely recalculated each step. */ static PyObject * audioop_findfit(PyObject *self, PyObject *args) { short *cp1, *cp2; int len1, len2; int j, best_j; double aj_m1, aj_lm1; double sum_ri_2, sum_aij_2, sum_aij_ri, result, best_result, factor; if ( !PyArg_Parse(args, "(s#s#)", &cp1, &len1, &cp2, &len2) ) return 0; if ( len1 & 1 || len2 & 1 ) { PyErr_SetString(AudioopError, "Strings should be even-sized"); return 0; } len1 >>= 1; len2 >>= 1; if ( len1 < len2 ) { PyErr_SetString(AudioopError, "First sample should be longer"); return 0; } sum_ri_2 = _sum2(cp2, cp2, len2); sum_aij_2 = _sum2(cp1, cp1, len2); sum_aij_ri = _sum2(cp1, cp2, len2); result = (sum_ri_2*sum_aij_2 - sum_aij_ri*sum_aij_ri) / sum_aij_2; best_result = result; best_j = 0; j = 0; for ( j=1; j<=len1-len2; j++) { aj_m1 = (double)cp1[j-1]; aj_lm1 = (double)cp1[j+len2-1]; sum_aij_2 = sum_aij_2 + aj_lm1*aj_lm1 - aj_m1*aj_m1; sum_aij_ri = _sum2(cp1+j, cp2, len2); result = (sum_ri_2*sum_aij_2 - sum_aij_ri*sum_aij_ri) / sum_aij_2; if ( result < best_result ) { best_result = result; best_j = j; } } factor = _sum2(cp1+best_j, cp2, len2) / sum_ri_2; return Py_BuildValue("(if)", best_j, factor); } /* ** findfactor finds a factor f so that the energy in A-fB is minimal. ** See the comment for findfit for details. */ static PyObject * audioop_findfactor(PyObject *self, PyObject *args) { short *cp1, *cp2; int len1, len2; double sum_ri_2, sum_aij_ri, result; if ( !PyArg_Parse(args, "(s#s#)", &cp1, &len1, &cp2, &len2) ) return 0; if ( len1 & 1 || len2 & 1 ) { PyErr_SetString(AudioopError, "Strings should be even-sized"); return 0; } if ( len1 != len2 ) { PyErr_SetString(AudioopError, "Samples should be same size"); return 0; } len2 >>= 1; sum_ri_2 = _sum2(cp2, cp2, len2); sum_aij_ri = _sum2(cp1, cp2, len2); result = sum_aij_ri / sum_ri_2; return PyFloat_FromDouble(result); } /* ** findmax returns the index of the n-sized segment of the input sample ** that contains the most energy. */ static PyObject * audioop_findmax(PyObject *self, PyObject *args) { short *cp1; int len1, len2; int j, best_j; double aj_m1, aj_lm1; double result, best_result; if ( !PyArg_Parse(args, "(s#i)", &cp1, &len1, &len2) ) return 0; if ( len1 & 1 ) { PyErr_SetString(AudioopError, "Strings should be even-sized"); return 0; } len1 >>= 1; if ( len1 < len2 ) { PyErr_SetString(AudioopError, "Input sample should be longer"); return 0; } result = _sum2(cp1, cp1, len2); best_result = result; best_j = 0; j = 0; for ( j=1; j<=len1-len2; j++) { aj_m1 = (double)cp1[j-1]; aj_lm1 = (double)cp1[j+len2-1]; result = result + aj_lm1*aj_lm1 - aj_m1*aj_m1; if ( result > best_result ) { best_result = result; best_j = j; } } return PyInt_FromLong(best_j); } static PyObject * audioop_avgpp(PyObject *self, PyObject *args) { signed char *cp; int len, size, val = 0, prevval = 0, prevextremevalid = 0, prevextreme = 0; int i; double avg = 0.0; int diff, prevdiff, extremediff, nextreme = 0; if ( !PyArg_Parse(args, "(s#i)", &cp, &len, &size) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } /* Compute first delta value ahead. Also automatically makes us ** skip the first extreme value */ if ( size == 1 ) prevval = (int)*CHARP(cp, 0); else if ( size == 2 ) prevval = (int)*SHORTP(cp, 0); else if ( size == 4 ) prevval = (int)*LONGP(cp, 0); if ( size == 1 ) val = (int)*CHARP(cp, size); else if ( size == 2 ) val = (int)*SHORTP(cp, size); else if ( size == 4 ) val = (int)*LONGP(cp, size); prevdiff = val - prevval; for ( i=size; i max ) max = extremediff; } prevextremevalid = 1; prevextreme = prevval; } prevval = val; if ( diff != 0 ) prevdiff = diff; } return PyInt_FromLong(max); } static PyObject * audioop_cross(PyObject *self, PyObject *args) { signed char *cp; int len, size, val = 0; int i; int prevval, ncross; if ( !PyArg_Parse(args, "(s#i)", &cp, &len, &size) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } ncross = -1; prevval = 17; /* Anything <> 0,1 */ for ( i=0; i> 7; else if ( size == 2 ) val = ((int)*SHORTP(cp, i)) >> 15; else if ( size == 4 ) val = ((int)*LONGP(cp, i)) >> 31; val = val & 1; if ( val != prevval ) ncross++; prevval = val; } return PyInt_FromLong(ncross); } static PyObject * audioop_mul(PyObject *self, PyObject *args) { signed char *cp, *ncp; int len, size, val = 0; double factor, fval, maxval; PyObject *rv; int i; if ( !PyArg_Parse(args, "(s#id)", &cp, &len, &size, &factor ) ) return 0; if ( size == 1 ) maxval = (double) 0x7f; else if ( size == 2 ) maxval = (double) 0x7fff; else if ( size == 4 ) maxval = (double) 0x7fffffff; else { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } rv = PyString_FromStringAndSize(NULL, len); if ( rv == 0 ) return 0; ncp = (signed char *)PyString_AsString(rv); for ( i=0; i < len; i += size ) { if ( size == 1 ) val = (int)*CHARP(cp, i); else if ( size == 2 ) val = (int)*SHORTP(cp, i); else if ( size == 4 ) val = (int)*LONGP(cp, i); fval = (double)val*factor; if ( fval > maxval ) fval = maxval; else if ( fval < -maxval ) fval = -maxval; val = (int)fval; if ( size == 1 ) *CHARP(ncp, i) = (signed char)val; else if ( size == 2 ) *SHORTP(ncp, i) = (short)val; else if ( size == 4 ) *LONGP(ncp, i) = (Py_Int32)val; } return rv; } static PyObject * audioop_tomono(PyObject *self, PyObject *args) { signed char *cp, *ncp; int len, size, val1 = 0, val2 = 0; double fac1, fac2, fval, maxval; PyObject *rv; int i; if ( !PyArg_Parse(args, "(s#idd)", &cp, &len, &size, &fac1, &fac2 ) ) return 0; if ( size == 1 ) maxval = (double) 0x7f; else if ( size == 2 ) maxval = (double) 0x7fff; else if ( size == 4 ) maxval = (double) 0x7fffffff; else { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } rv = PyString_FromStringAndSize(NULL, len/2); if ( rv == 0 ) return 0; ncp = (signed char *)PyString_AsString(rv); for ( i=0; i < len; i += size*2 ) { if ( size == 1 ) val1 = (int)*CHARP(cp, i); else if ( size == 2 ) val1 = (int)*SHORTP(cp, i); else if ( size == 4 ) val1 = (int)*LONGP(cp, i); if ( size == 1 ) val2 = (int)*CHARP(cp, i+1); else if ( size == 2 ) val2 = (int)*SHORTP(cp, i+2); else if ( size == 4 ) val2 = (int)*LONGP(cp, i+4); fval = (double)val1*fac1 + (double)val2*fac2; if ( fval > maxval ) fval = maxval; else if ( fval < -maxval ) fval = -maxval; val1 = (int)fval; if ( size == 1 ) *CHARP(ncp, i/2) = (signed char)val1; else if ( size == 2 ) *SHORTP(ncp, i/2) = (short)val1; else if ( size == 4 ) *LONGP(ncp, i/2)= (Py_Int32)val1; } return rv; } static PyObject * audioop_tostereo(PyObject *self, PyObject *args) { signed char *cp, *ncp; int len, new_len, size, val1, val2, val = 0; double fac1, fac2, fval, maxval; PyObject *rv; int i; if ( !PyArg_Parse(args, "(s#idd)", &cp, &len, &size, &fac1, &fac2 ) ) return 0; if ( size == 1 ) maxval = (double) 0x7f; else if ( size == 2 ) maxval = (double) 0x7fff; else if ( size == 4 ) maxval = (double) 0x7fffffff; else { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } new_len = len*2; if (new_len < 0) { PyErr_SetString(PyExc_MemoryError, "not enough memory for output buffer"); return 0; } rv = PyString_FromStringAndSize(NULL, new_len); if ( rv == 0 ) return 0; ncp = (signed char *)PyString_AsString(rv); for ( i=0; i < len; i += size ) { if ( size == 1 ) val = (int)*CHARP(cp, i); else if ( size == 2 ) val = (int)*SHORTP(cp, i); else if ( size == 4 ) val = (int)*LONGP(cp, i); fval = (double)val*fac1; if ( fval > maxval ) fval = maxval; else if ( fval < -maxval ) fval = -maxval; val1 = (int)fval; fval = (double)val*fac2; if ( fval > maxval ) fval = maxval; else if ( fval < -maxval ) fval = -maxval; val2 = (int)fval; if ( size == 1 ) *CHARP(ncp, i*2) = (signed char)val1; else if ( size == 2 ) *SHORTP(ncp, i*2) = (short)val1; else if ( size == 4 ) *LONGP(ncp, i*2) = (Py_Int32)val1; if ( size == 1 ) *CHARP(ncp, i*2+1) = (signed char)val2; else if ( size == 2 ) *SHORTP(ncp, i*2+2) = (short)val2; else if ( size == 4 ) *LONGP(ncp, i*2+4) = (Py_Int32)val2; } return rv; } static PyObject * audioop_add(PyObject *self, PyObject *args) { signed char *cp1, *cp2, *ncp; int len1, len2, size, val1 = 0, val2 = 0, maxval, newval; PyObject *rv; int i; if ( !PyArg_Parse(args, "(s#s#i)", &cp1, &len1, &cp2, &len2, &size ) ) return 0; if ( len1 != len2 ) { PyErr_SetString(AudioopError, "Lengths should be the same"); return 0; } if ( size == 1 ) maxval = 0x7f; else if ( size == 2 ) maxval = 0x7fff; else if ( size == 4 ) maxval = 0x7fffffff; else { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } rv = PyString_FromStringAndSize(NULL, len1); if ( rv == 0 ) return 0; ncp = (signed char *)PyString_AsString(rv); for ( i=0; i < len1; i += size ) { if ( size == 1 ) val1 = (int)*CHARP(cp1, i); else if ( size == 2 ) val1 = (int)*SHORTP(cp1, i); else if ( size == 4 ) val1 = (int)*LONGP(cp1, i); if ( size == 1 ) val2 = (int)*CHARP(cp2, i); else if ( size == 2 ) val2 = (int)*SHORTP(cp2, i); else if ( size == 4 ) val2 = (int)*LONGP(cp2, i); newval = val1 + val2; /* truncate in case of overflow */ if (newval > maxval) newval = maxval; else if (newval < -maxval) newval = -maxval; else if (size == 4 && (newval^val1) < 0 && (newval^val2) < 0) newval = val1 > 0 ? maxval : - maxval; if ( size == 1 ) *CHARP(ncp, i) = (signed char)newval; else if ( size == 2 ) *SHORTP(ncp, i) = (short)newval; else if ( size == 4 ) *LONGP(ncp, i) = (Py_Int32)newval; } return rv; } static PyObject * audioop_bias(PyObject *self, PyObject *args) { signed char *cp, *ncp; int len, size, val = 0; PyObject *rv; int i; int bias; if ( !PyArg_Parse(args, "(s#ii)", &cp, &len, &size , &bias) ) return 0; if ( size != 1 && size != 2 && size != 4) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } rv = PyString_FromStringAndSize(NULL, len); if ( rv == 0 ) return 0; ncp = (signed char *)PyString_AsString(rv); for ( i=0; i < len; i += size ) { if ( size == 1 ) val = (int)*CHARP(cp, i); else if ( size == 2 ) val = (int)*SHORTP(cp, i); else if ( size == 4 ) val = (int)*LONGP(cp, i); if ( size == 1 ) *CHARP(ncp, i) = (signed char)(val+bias); else if ( size == 2 ) *SHORTP(ncp, i) = (short)(val+bias); else if ( size == 4 ) *LONGP(ncp, i) = (Py_Int32)(val+bias); } return rv; } static PyObject * audioop_reverse(PyObject *self, PyObject *args) { signed char *cp; unsigned char *ncp; int len, size, val = 0; PyObject *rv; int i, j; if ( !PyArg_Parse(args, "(s#i)", &cp, &len, &size) ) return 0; if ( size != 1 && size != 2 && size != 4 ) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } rv = PyString_FromStringAndSize(NULL, len); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); for ( i=0; i < len; i += size ) { if ( size == 1 ) val = ((int)*CHARP(cp, i)) << 8; else if ( size == 2 ) val = (int)*SHORTP(cp, i); else if ( size == 4 ) val = ((int)*LONGP(cp, i)) >> 16; j = len - i - size; if ( size == 1 ) *CHARP(ncp, j) = (signed char)(val >> 8); else if ( size == 2 ) *SHORTP(ncp, j) = (short)(val); else if ( size == 4 ) *LONGP(ncp, j) = (Py_Int32)(val<<16); } return rv; } static PyObject * audioop_lin2lin(PyObject *self, PyObject *args) { signed char *cp; unsigned char *ncp; int len, new_len, size, size2, val = 0; PyObject *rv; int i, j; if ( !PyArg_Parse(args, "(s#ii)", &cp, &len, &size, &size2) ) return 0; if ( (size != 1 && size != 2 && size != 4) || (size2 != 1 && size2 != 2 && size2 != 4)) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } new_len = (len/size)*size2; if (new_len < 0) { PyErr_SetString(PyExc_MemoryError, "not enough memory for output buffer"); return 0; } rv = PyString_FromStringAndSize(NULL, new_len); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); for ( i=0, j=0; i < len; i += size, j += size2 ) { if ( size == 1 ) val = ((int)*CHARP(cp, i)) << 8; else if ( size == 2 ) val = (int)*SHORTP(cp, i); else if ( size == 4 ) val = ((int)*LONGP(cp, i)) >> 16; if ( size2 == 1 ) *CHARP(ncp, j) = (signed char)(val >> 8); else if ( size2 == 2 ) *SHORTP(ncp, j) = (short)(val); else if ( size2 == 4 ) *LONGP(ncp, j) = (Py_Int32)(val<<16); } return rv; } static int gcd(int a, int b) { while (b > 0) { int tmp = a % b; a = b; b = tmp; } return a; } static PyObject * audioop_ratecv(PyObject *self, PyObject *args) { char *cp, *ncp; int len, size, nchannels, inrate, outrate, weightA, weightB; int chan, d, *prev_i, *cur_i, cur_o; PyObject *state, *samps, *str, *rv = NULL; int bytes_per_frame; size_t alloc_size; weightA = 1; weightB = 0; if (!PyArg_ParseTuple(args, "s#iiiiO|ii:ratecv", &cp, &len, &size, &nchannels, &inrate, &outrate, &state, &weightA, &weightB)) return NULL; if (size != 1 && size != 2 && size != 4) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return NULL; } if (nchannels < 1) { PyErr_SetString(AudioopError, "# of channels should be >= 1"); return NULL; } bytes_per_frame = size * nchannels; if (bytes_per_frame / nchannels != size) { /* This overflow test is rigorously correct because both multiplicands are >= 1. Use the argument names from the docs for the error msg. */ PyErr_SetString(PyExc_OverflowError, "width * nchannels too big for a C int"); return NULL; } if (weightA < 1 || weightB < 0) { PyErr_SetString(AudioopError, "weightA should be >= 1, weightB should be >= 0"); return NULL; } if (len % bytes_per_frame != 0) { PyErr_SetString(AudioopError, "not a whole number of frames"); return NULL; } if (inrate <= 0 || outrate <= 0) { PyErr_SetString(AudioopError, "sampling rate not > 0"); return NULL; } /* divide inrate and outrate by their greatest common divisor */ d = gcd(inrate, outrate); inrate /= d; outrate /= d; alloc_size = sizeof(int) * (unsigned)nchannels; if (alloc_size < nchannels) { PyErr_SetString(PyExc_MemoryError, "not enough memory for output buffer"); return 0; } prev_i = (int *) malloc(alloc_size); cur_i = (int *) malloc(alloc_size); if (prev_i == NULL || cur_i == NULL) { (void) PyErr_NoMemory(); goto exit; } len /= bytes_per_frame; /* # of frames */ if (state == Py_None) { d = -outrate; for (chan = 0; chan < nchannels; chan++) prev_i[chan] = cur_i[chan] = 0; } else { if (!PyArg_ParseTuple(state, "iO!;audioop.ratecv: illegal state argument", &d, &PyTuple_Type, &samps)) goto exit; if (PyTuple_Size(samps) != nchannels) { PyErr_SetString(AudioopError, "illegal state argument"); goto exit; } for (chan = 0; chan < nchannels; chan++) { if (!PyArg_ParseTuple(PyTuple_GetItem(samps, chan), "ii:ratecv",&prev_i[chan],&cur_i[chan])) goto exit; } } /* str <- Space for the output buffer. */ { /* There are len input frames, so we need (mathematically) ceiling(len*outrate/inrate) output frames, and each frame requires bytes_per_frame bytes. Computing this without spurious overflow is the challenge; we can settle for a reasonable upper bound, though. */ int ceiling; /* the number of output frames */ int nbytes; /* the number of output bytes needed */ int q = len / inrate; /* Now len = q * inrate + r exactly (with r = len % inrate), and this is less than q * inrate + inrate = (q+1)*inrate. So a reasonable upper bound on len*outrate/inrate is ((q+1)*inrate)*outrate/inrate = (q+1)*outrate. */ ceiling = (q+1) * outrate; nbytes = ceiling * bytes_per_frame; /* See whether anything overflowed; if not, get the space. */ if (q+1 < 0 || ceiling / outrate != q+1 || nbytes / bytes_per_frame != ceiling) str = NULL; else str = PyString_FromStringAndSize(NULL, nbytes); if (str == NULL) { PyErr_SetString(PyExc_MemoryError, "not enough memory for output buffer"); goto exit; } } ncp = PyString_AsString(str); for (;;) { while (d < 0) { if (len == 0) { samps = PyTuple_New(nchannels); for (chan = 0; chan < nchannels; chan++) PyTuple_SetItem(samps, chan, Py_BuildValue("(ii)", prev_i[chan], cur_i[chan])); if (PyErr_Occurred()) goto exit; len = ncp - PyString_AsString(str); if (len == 0) { /*don't want to resize to zero length*/ rv = PyString_FromStringAndSize("", 0); Py_DECREF(str); str = rv; } else if (_PyString_Resize(&str, len) < 0) goto exit; rv = Py_BuildValue("(O(iO))", str, d, samps); Py_DECREF(samps); Py_DECREF(str); goto exit; /* return rv */ } for (chan = 0; chan < nchannels; chan++) { prev_i[chan] = cur_i[chan]; if (size == 1) cur_i[chan] = ((int)*CHARP(cp, 0)) << 8; else if (size == 2) cur_i[chan] = (int)*SHORTP(cp, 0); else if (size == 4) cur_i[chan] = ((int)*LONGP(cp, 0)) >> 16; cp += size; /* implements a simple digital filter */ cur_i[chan] = (weightA * cur_i[chan] + weightB * prev_i[chan]) / (weightA + weightB); } len--; d += outrate; } while (d >= 0) { for (chan = 0; chan < nchannels; chan++) { cur_o = (prev_i[chan] * d + cur_i[chan] * (outrate - d)) / outrate; if (size == 1) *CHARP(ncp, 0) = (signed char)(cur_o >> 8); else if (size == 2) *SHORTP(ncp, 0) = (short)(cur_o); else if (size == 4) *LONGP(ncp, 0) = (Py_Int32)(cur_o<<16); ncp += size; } d -= inrate; } } exit: if (prev_i != NULL) free(prev_i); if (cur_i != NULL) free(cur_i); return rv; } static PyObject * audioop_lin2ulaw(PyObject *self, PyObject *args) { signed char *cp; unsigned char *ncp; int len, size, val = 0; PyObject *rv; int i; if ( !PyArg_Parse(args, "(s#i)", &cp, &len, &size) ) return 0; if ( size != 1 && size != 2 && size != 4) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } rv = PyString_FromStringAndSize(NULL, len/size); if ( rv == 0 ) return 0; ncp = (unsigned char *)PyString_AsString(rv); for ( i=0; i < len; i += size ) { if ( size == 1 ) val = ((int)*CHARP(cp, i)) << 8; else if ( size == 2 ) val = (int)*SHORTP(cp, i); else if ( size == 4 ) val = ((int)*LONGP(cp, i)) >> 16; *ncp++ = st_linear_to_ulaw(val); } return rv; } static PyObject * audioop_ulaw2lin(PyObject *self, PyObject *args) { unsigned char *cp; unsigned char cval; signed char *ncp; int len, new_len, size, val; PyObject *rv; int i; if ( !PyArg_Parse(args, "(s#i)", &cp, &len, &size) ) return 0; if ( size != 1 && size != 2 && size != 4) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } new_len = len*size; if (new_len < 0) { PyErr_SetString(PyExc_MemoryError, "not enough memory for output buffer"); return 0; } rv = PyString_FromStringAndSize(NULL, new_len); if ( rv == 0 ) return 0; ncp = (signed char *)PyString_AsString(rv); for ( i=0; i < new_len; i += size ) { cval = *cp++; val = st_ulaw_to_linear(cval); if ( size == 1 ) *CHARP(ncp, i) = (signed char)(val >> 8); else if ( size == 2 ) *SHORTP(ncp, i) = (short)(val); else if ( size == 4 ) *LONGP(ncp, i) = (Py_Int32)(val<<16); } return rv; } static PyObject * audioop_lin2adpcm(PyObject *self, PyObject *args) { signed char *cp; signed char *ncp; int len, size, val = 0, step, valpred, delta, index, sign, vpdiff, diff; PyObject *rv, *state, *str; int i, outputbuffer = 0, bufferstep; if ( !PyArg_Parse(args, "(s#iO)", &cp, &len, &size, &state) ) return 0; if ( size != 1 && size != 2 && size != 4) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } str = PyString_FromStringAndSize(NULL, len/(size*2)); if ( str == 0 ) return 0; ncp = (signed char *)PyString_AsString(str); /* Decode state, should have (value, step) */ if ( state == Py_None ) { /* First time, it seems. Set defaults */ valpred = 0; step = 7; index = 0; } else if ( !PyArg_Parse(state, "(ii)", &valpred, &index) ) return 0; step = stepsizeTable[index]; bufferstep = 1; for ( i=0; i < len; i += size ) { if ( size == 1 ) val = ((int)*CHARP(cp, i)) << 8; else if ( size == 2 ) val = (int)*SHORTP(cp, i); else if ( size == 4 ) val = ((int)*LONGP(cp, i)) >> 16; /* Step 1 - compute difference with previous value */ diff = val - valpred; sign = (diff < 0) ? 8 : 0; if ( sign ) diff = (-diff); /* Step 2 - Divide and clamp */ /* Note: ** This code *approximately* computes: ** delta = diff*4/step; ** vpdiff = (delta+0.5)*step/4; ** but in shift step bits are dropped. The net result of this ** is that even if you have fast mul/div hardware you cannot ** put it to good use since the fixup would be too expensive. */ delta = 0; vpdiff = (step >> 3); if ( diff >= step ) { delta = 4; diff -= step; vpdiff += step; } step >>= 1; if ( diff >= step ) { delta |= 2; diff -= step; vpdiff += step; } step >>= 1; if ( diff >= step ) { delta |= 1; vpdiff += step; } /* Step 3 - Update previous value */ if ( sign ) valpred -= vpdiff; else valpred += vpdiff; /* Step 4 - Clamp previous value to 16 bits */ if ( valpred > 32767 ) valpred = 32767; else if ( valpred < -32768 ) valpred = -32768; /* Step 5 - Assemble value, update index and step values */ delta |= sign; index += indexTable[delta]; if ( index < 0 ) index = 0; if ( index > 88 ) index = 88; step = stepsizeTable[index]; /* Step 6 - Output value */ if ( bufferstep ) { outputbuffer = (delta << 4) & 0xf0; } else { *ncp++ = (delta & 0x0f) | outputbuffer; } bufferstep = !bufferstep; } rv = Py_BuildValue("(O(ii))", str, valpred, index); Py_DECREF(str); return rv; } static PyObject * audioop_adpcm2lin(PyObject *self, PyObject *args) { signed char *cp; signed char *ncp; int len, new_len, size, valpred, step, delta, index, sign, vpdiff; PyObject *rv, *str, *state; int i, inputbuffer = 0, bufferstep; if ( !PyArg_Parse(args, "(s#iO)", &cp, &len, &size, &state) ) return 0; if ( size != 1 && size != 2 && size != 4) { PyErr_SetString(AudioopError, "Size should be 1, 2 or 4"); return 0; } /* Decode state, should have (value, step) */ if ( state == Py_None ) { /* First time, it seems. Set defaults */ valpred = 0; step = 7; index = 0; } else if ( !PyArg_Parse(state, "(ii)", &valpred, &index) ) return 0; new_len = len*size*2; if (new_len < 0) { PyErr_SetString(PyExc_MemoryError, "not enough memory for output buffer"); return 0; } str = PyString_FromStringAndSize(NULL, new_len); if ( str == 0 ) return 0; ncp = (signed char *)PyString_AsString(str); step = stepsizeTable[index]; bufferstep = 0; for ( i=0; i < new_len; i += size ) { /* Step 1 - get the delta value and compute next index */ if ( bufferstep ) { delta = inputbuffer & 0xf; } else { inputbuffer = *cp++; delta = (inputbuffer >> 4) & 0xf; } bufferstep = !bufferstep; /* Step 2 - Find new index value (for later) */ index += indexTable[delta]; if ( index < 0 ) index = 0; if ( index > 88 ) index = 88; /* Step 3 - Separate sign and magnitude */ sign = delta & 8; delta = delta & 7; /* Step 4 - Compute difference and new predicted value */ /* ** Computes 'vpdiff = (delta+0.5)*step/4', but see comment ** in adpcm_coder. */ vpdiff = step >> 3; if ( delta & 4 ) vpdiff += step; if ( delta & 2 ) vpdiff += step>>1; if ( delta & 1 ) vpdiff += step>>2; if ( sign ) valpred -= vpdiff; else valpred += vpdiff; /* Step 5 - clamp output value */ if ( valpred > 32767 ) valpred = 32767; else if ( valpred < -32768 ) valpred = -32768; /* Step 6 - Update step value */ step = stepsizeTable[index]; /* Step 6 - Output value */ if ( size == 1 ) *CHARP(ncp, i) = (signed char)(valpred >> 8); else if ( size == 2 ) *SHORTP(ncp, i) = (short)(valpred); else if ( size == 4 ) *LONGP(ncp, i) = (Py_Int32)(valpred<<16); } rv = Py_BuildValue("(O(ii))", str, valpred, index); Py_DECREF(str); return rv; } static PyMethodDef audioop_methods[] = { { "max", audioop_max, METH_OLDARGS }, { "minmax", audioop_minmax, METH_OLDARGS }, { "avg", audioop_avg, METH_OLDARGS }, { "maxpp", audioop_maxpp, METH_OLDARGS }, { "avgpp", audioop_avgpp, METH_OLDARGS }, { "rms", audioop_rms, METH_OLDARGS }, { "findfit", audioop_findfit, METH_OLDARGS }, { "findmax", audioop_findmax, METH_OLDARGS }, { "findfactor", audioop_findfactor, METH_OLDARGS }, { "cross", audioop_cross, METH_OLDARGS }, { "mul", audioop_mul, METH_OLDARGS }, { "add", audioop_add, METH_OLDARGS }, { "bias", audioop_bias, METH_OLDARGS }, { "ulaw2lin", audioop_ulaw2lin, METH_OLDARGS }, { "lin2ulaw", audioop_lin2ulaw, METH_OLDARGS }, { "lin2lin", audioop_lin2lin, METH_OLDARGS }, { "adpcm2lin", audioop_adpcm2lin, METH_OLDARGS }, { "lin2adpcm", audioop_lin2adpcm, METH_OLDARGS }, { "tomono", audioop_tomono, METH_OLDARGS }, { "tostereo", audioop_tostereo, METH_OLDARGS }, { "getsample", audioop_getsample, METH_OLDARGS }, { "reverse", audioop_reverse, METH_OLDARGS }, { "ratecv", audioop_ratecv, METH_VARARGS }, { 0, 0 } }; PyMODINIT_FUNC initaudioop(void) { PyObject *m, *d; m = Py_InitModule("audioop", audioop_methods); d = PyModule_GetDict(m); AudioopError = PyErr_NewException("audioop.error", NULL, NULL); if (AudioopError != NULL) PyDict_SetItemString(d,"error",AudioopError); } Python-2.3.7/Modules/_bsddb.c0000644001241000117560000037511210161412767015257 0ustar loewishpifb6/*---------------------------------------------------------------------- Copyright (c) 1999-2001, Digital Creations, Fredericksburg, VA, USA and Andrew Kuchling. All rights reserved. Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: o Redistributions of source code must retain the above copyright notice, this list of conditions, and the disclaimer that follows. o Redistributions in binary form must reproduce the above copyright notice, this list of conditions, and the following disclaimer in the documentation and/or other materials provided with the distribution. o Neither the name of Digital Creations nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission. THIS SOFTWARE IS PROVIDED BY DIGITAL CREATIONS AND CONTRIBUTORS *AS IS* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL DIGITAL CREATIONS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. ------------------------------------------------------------------------*/ /* * Handwritten code to wrap version 3.x of the Berkeley DB library, * written to replace a SWIG-generated file. It has since been updated * to compile with BerkeleyDB versions 3.2 through 4.2. * * This module was started by Andrew Kuchling to remove the dependency * on SWIG in a package by Gregory P. Smith who * based his work on a similar package by Robin Dunn * which wrapped Berkeley DB 2.7.x. * * Development of this module then returned full circle back to Robin Dunn * who worked on behalf of Digital Creations to complete the wrapping of * the DB 3.x API and to build a solid unit test suite. Robin has * since gone onto other projects (wxPython). * * Gregory P. Smith is once again the maintainer. * * Use the pybsddb-users@lists.sf.net mailing list for all questions. * Things can change faster than the header of this file is updated. This * file is shared with the PyBSDDB project at SourceForge: * * http://pybsddb.sf.net * * This file should remain backward compatible with Python 2.1, but see PEP * 291 for the most current backward compatibility requirements: * * http://www.python.org/peps/pep-0291.html * * This module contains 5 types: * * DB (Database) * DBCursor (Database Cursor) * DBEnv (database environment) * DBTxn (An explicit database transaction) * DBLock (A lock handle) * */ /* --------------------------------------------------------------------- */ /* * Portions of this module, associated unit tests and build scripts are the * result of a contract with The Written Word (http://thewrittenword.com/) * Many thanks go out to them for causing me to raise the bar on quality and * functionality, resulting in a better bsddb3 package for all of us to use. * * --Robin */ /* --------------------------------------------------------------------- */ #include #include /* --------------------------------------------------------------------- */ /* Various macro definitions */ /* 40 = 4.0, 33 = 3.3; this will break if the second number is > 9 */ #define DBVER (DB_VERSION_MAJOR * 10 + DB_VERSION_MINOR) #define PY_BSDDB_VERSION "4.2.0.5" static char *rcs_id = "$Id: _bsddb.c 38064 2004-12-19 23:59:51Z greg $"; #ifdef WITH_THREAD /* These are for when calling Python --> C */ #define MYDB_BEGIN_ALLOW_THREADS Py_BEGIN_ALLOW_THREADS; #define MYDB_END_ALLOW_THREADS Py_END_ALLOW_THREADS; /* For 2.3, use the PyGILState_ calls */ #if (PY_VERSION_HEX >= 0x02030000) #define MYDB_USE_GILSTATE #endif /* and these are for calling C --> Python */ #if defined(MYDB_USE_GILSTATE) #define MYDB_BEGIN_BLOCK_THREADS \ PyGILState_STATE __savestate = PyGILState_Ensure(); #define MYDB_END_BLOCK_THREADS \ PyGILState_Release(__savestate); #else /* MYDB_USE_GILSTATE */ /* Pre GILState API - do it the long old way */ static PyInterpreterState* _db_interpreterState = NULL; #define MYDB_BEGIN_BLOCK_THREADS { \ PyThreadState* prevState; \ PyThreadState* newState; \ PyEval_AcquireLock(); \ newState = PyThreadState_New(_db_interpreterState); \ prevState = PyThreadState_Swap(newState); #define MYDB_END_BLOCK_THREADS \ newState = PyThreadState_Swap(prevState); \ PyThreadState_Clear(newState); \ PyEval_ReleaseLock(); \ PyThreadState_Delete(newState); \ } #endif /* MYDB_USE_GILSTATE */ #else /* Compiled without threads - avoid all this cruft */ #define MYDB_BEGIN_ALLOW_THREADS #define MYDB_END_ALLOW_THREADS #define MYDB_BEGIN_BLOCK_THREADS #define MYDB_END_BLOCK_THREADS #endif /* Should DB_INCOMPLETE be turned into a warning or an exception? */ #define INCOMPLETE_IS_WARNING 1 /* --------------------------------------------------------------------- */ /* Exceptions */ static PyObject* DBError; /* Base class, all others derive from this */ static PyObject* DBKeyEmptyError; /* DB_KEYEMPTY */ static PyObject* DBKeyExistError; /* DB_KEYEXIST */ static PyObject* DBLockDeadlockError; /* DB_LOCK_DEADLOCK */ static PyObject* DBLockNotGrantedError; /* DB_LOCK_NOTGRANTED */ static PyObject* DBNotFoundError; /* DB_NOTFOUND: also derives from KeyError */ static PyObject* DBOldVersionError; /* DB_OLD_VERSION */ static PyObject* DBRunRecoveryError; /* DB_RUNRECOVERY */ static PyObject* DBVerifyBadError; /* DB_VERIFY_BAD */ static PyObject* DBNoServerError; /* DB_NOSERVER */ static PyObject* DBNoServerHomeError; /* DB_NOSERVER_HOME */ static PyObject* DBNoServerIDError; /* DB_NOSERVER_ID */ #if (DBVER >= 33) static PyObject* DBPageNotFoundError; /* DB_PAGE_NOTFOUND */ static PyObject* DBSecondaryBadError; /* DB_SECONDARY_BAD */ #endif #if !INCOMPLETE_IS_WARNING static PyObject* DBIncompleteError; /* DB_INCOMPLETE */ #endif static PyObject* DBInvalidArgError; /* EINVAL */ static PyObject* DBAccessError; /* EACCES */ static PyObject* DBNoSpaceError; /* ENOSPC */ static PyObject* DBNoMemoryError; /* ENOMEM */ static PyObject* DBAgainError; /* EAGAIN */ static PyObject* DBBusyError; /* EBUSY */ static PyObject* DBFileExistsError; /* EEXIST */ static PyObject* DBNoSuchFileError; /* ENOENT */ static PyObject* DBPermissionsError; /* EPERM */ /* --------------------------------------------------------------------- */ /* Structure definitions */ struct behaviourFlags { /* What is the default behaviour when DB->get or DBCursor->get returns a DB_NOTFOUND error? Return None or raise an exception? */ unsigned int getReturnsNone : 1; /* What is the default behaviour for DBCursor.set* methods when DBCursor->get * returns a DB_NOTFOUND error? Return None or raise an exception? */ unsigned int cursorSetReturnsNone : 1; }; #define DEFAULT_GET_RETURNS_NONE 1 #define DEFAULT_CURSOR_SET_RETURNS_NONE 0 /* 0 in pybsddb < 4.2, python < 2.4 */ typedef struct { PyObject_HEAD DB_ENV* db_env; u_int32_t flags; /* saved flags from open() */ int closed; struct behaviourFlags moduleFlags; } DBEnvObject; typedef struct { PyObject_HEAD DB* db; DBEnvObject* myenvobj; /* PyObject containing the DB_ENV */ u_int32_t flags; /* saved flags from open() */ u_int32_t setflags; /* saved flags from set_flags() */ int haveStat; struct behaviourFlags moduleFlags; #if (DBVER >= 33) PyObject* associateCallback; int primaryDBType; #endif } DBObject; typedef struct { PyObject_HEAD DBC* dbc; DBObject* mydb; } DBCursorObject; typedef struct { PyObject_HEAD DB_TXN* txn; } DBTxnObject; typedef struct { PyObject_HEAD DB_LOCK lock; } DBLockObject; staticforward PyTypeObject DB_Type, DBCursor_Type, DBEnv_Type, DBTxn_Type, DBLock_Type; #define DBObject_Check(v) ((v)->ob_type == &DB_Type) #define DBCursorObject_Check(v) ((v)->ob_type == &DBCursor_Type) #define DBEnvObject_Check(v) ((v)->ob_type == &DBEnv_Type) #define DBTxnObject_Check(v) ((v)->ob_type == &DBTxn_Type) #define DBLockObject_Check(v) ((v)->ob_type == &DBLock_Type) /* --------------------------------------------------------------------- */ /* Utility macros and functions */ #define RETURN_IF_ERR() \ if (makeDBError(err)) { \ return NULL; \ } #define RETURN_NONE() Py_INCREF(Py_None); return Py_None; #define CHECK_DB_NOT_CLOSED(dbobj) \ if (dbobj->db == NULL) { \ PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, \ "DB object has been closed")); \ return NULL; \ } #define CHECK_ENV_NOT_CLOSED(env) \ if (env->db_env == NULL) { \ PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, \ "DBEnv object has been closed"));\ return NULL; \ } #define CHECK_CURSOR_NOT_CLOSED(curs) \ if (curs->dbc == NULL) { \ PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, \ "DBCursor object has been closed"));\ return NULL; \ } #define CHECK_DBFLAG(mydb, flag) (((mydb)->flags & (flag)) || \ (((mydb)->myenvobj != NULL) && ((mydb)->myenvobj->flags & (flag)))) #define CLEAR_DBT(dbt) (memset(&(dbt), 0, sizeof(dbt))) #define FREE_DBT(dbt) if ((dbt.flags & (DB_DBT_MALLOC|DB_DBT_REALLOC)) && \ dbt.data != NULL) { free(dbt.data); dbt.data = NULL; } static int makeDBError(int err); /* Return the access method type of the DBObject */ static int _DB_get_type(DBObject* self) { #if (DBVER >= 33) DBTYPE type; int err; err = self->db->get_type(self->db, &type); if (makeDBError(err)) { return -1; } return type; #else return self->db->get_type(self->db); #endif } /* Create a DBT structure (containing key and data values) from Python strings. Returns 1 on success, 0 on an error. */ static int make_dbt(PyObject* obj, DBT* dbt) { CLEAR_DBT(*dbt); if (obj == Py_None) { /* no need to do anything, the structure has already been zeroed */ } else if (!PyArg_Parse(obj, "s#", &dbt->data, &dbt->size)) { PyErr_SetString(PyExc_TypeError, "Data values must be of type string or None."); return 0; } return 1; } /* Recno and Queue DBs can have integer keys. This function figures out what's been given, verifies that it's allowed, and then makes the DBT. Caller MUST call FREE_DBT(key) when done. */ static int make_key_dbt(DBObject* self, PyObject* keyobj, DBT* key, int* pflags) { db_recno_t recno; int type; CLEAR_DBT(*key); if (keyobj == Py_None) { /* TODO: is None really okay for keys? */ /* no need to do anything, the structure has already been zeroed */ } else if (PyString_Check(keyobj)) { /* verify access method type */ type = _DB_get_type(self); if (type == -1) return 0; if (type == DB_RECNO || type == DB_QUEUE) { PyErr_SetString( PyExc_TypeError, "String keys not allowed for Recno and Queue DB's"); return 0; } key->data = PyString_AS_STRING(keyobj); key->size = PyString_GET_SIZE(keyobj); } else if (PyInt_Check(keyobj)) { /* verify access method type */ type = _DB_get_type(self); if (type == -1) return 0; if (type == DB_BTREE && pflags != NULL) { /* if BTREE then an Integer key is allowed with the * DB_SET_RECNO flag */ *pflags |= DB_SET_RECNO; } else if (type != DB_RECNO && type != DB_QUEUE) { PyErr_SetString( PyExc_TypeError, "Integer keys only allowed for Recno and Queue DB's"); return 0; } /* Make a key out of the requested recno, use allocated space so DB * will be able to realloc room for the real key if needed. */ recno = PyInt_AS_LONG(keyobj); key->data = malloc(sizeof(db_recno_t)); if (key->data == NULL) { PyErr_SetString(PyExc_MemoryError, "Key memory allocation failed"); return 0; } key->ulen = key->size = sizeof(db_recno_t); memcpy(key->data, &recno, sizeof(db_recno_t)); key->flags = DB_DBT_REALLOC; } else { PyErr_Format(PyExc_TypeError, "String or Integer object expected for key, %s found", keyobj->ob_type->tp_name); return 0; } return 1; } /* Add partial record access to an existing DBT data struct. If dlen and doff are set, then the DB_DBT_PARTIAL flag will be set and the data storage/retrieval will be done using dlen and doff. */ static int add_partial_dbt(DBT* d, int dlen, int doff) { /* if neither were set we do nothing (-1 is the default value) */ if ((dlen == -1) && (doff == -1)) { return 1; } if ((dlen < 0) || (doff < 0)) { PyErr_SetString(PyExc_TypeError, "dlen and doff must both be >= 0"); return 0; } d->flags = d->flags | DB_DBT_PARTIAL; d->dlen = (unsigned int) dlen; d->doff = (unsigned int) doff; return 1; } /* Callback used to save away more information about errors from the DB * library. */ static char _db_errmsg[1024]; static void _db_errorCallback(const char* prefix, char* msg) { strcpy(_db_errmsg, msg); } /* make a nice exception object to raise for errors. */ static int makeDBError(int err) { char errTxt[2048]; /* really big, just in case... */ PyObject *errObj = NULL; PyObject *errTuple = NULL; int exceptionRaised = 0; switch (err) { case 0: /* successful, no error */ break; #if (DBVER < 41) case DB_INCOMPLETE: #if INCOMPLETE_IS_WARNING strcpy(errTxt, db_strerror(err)); if (_db_errmsg[0]) { strcat(errTxt, " -- "); strcat(errTxt, _db_errmsg); _db_errmsg[0] = 0; } /* if Python 2.1 or better use warning framework */ #if PYTHON_API_VERSION >= 1010 exceptionRaised = PyErr_Warn(PyExc_RuntimeWarning, errTxt); #else fprintf(stderr, errTxt); fprintf(stderr, "\n"); #endif #else /* do an exception instead */ errObj = DBIncompleteError; #endif break; #endif /* DBVER < 41 */ case DB_KEYEMPTY: errObj = DBKeyEmptyError; break; case DB_KEYEXIST: errObj = DBKeyExistError; break; case DB_LOCK_DEADLOCK: errObj = DBLockDeadlockError; break; case DB_LOCK_NOTGRANTED: errObj = DBLockNotGrantedError; break; case DB_NOTFOUND: errObj = DBNotFoundError; break; case DB_OLD_VERSION: errObj = DBOldVersionError; break; case DB_RUNRECOVERY: errObj = DBRunRecoveryError; break; case DB_VERIFY_BAD: errObj = DBVerifyBadError; break; case DB_NOSERVER: errObj = DBNoServerError; break; case DB_NOSERVER_HOME: errObj = DBNoServerHomeError; break; case DB_NOSERVER_ID: errObj = DBNoServerIDError; break; #if (DBVER >= 33) case DB_PAGE_NOTFOUND: errObj = DBPageNotFoundError; break; case DB_SECONDARY_BAD: errObj = DBSecondaryBadError; break; #endif case EINVAL: errObj = DBInvalidArgError; break; case EACCES: errObj = DBAccessError; break; case ENOSPC: errObj = DBNoSpaceError; break; case ENOMEM: errObj = DBNoMemoryError; break; case EAGAIN: errObj = DBAgainError; break; case EBUSY : errObj = DBBusyError; break; case EEXIST: errObj = DBFileExistsError; break; case ENOENT: errObj = DBNoSuchFileError; break; case EPERM : errObj = DBPermissionsError; break; default: errObj = DBError; break; } if (errObj != NULL) { /* FIXME this needs proper bounds checking on errTxt */ strcpy(errTxt, db_strerror(err)); if (_db_errmsg[0]) { strcat(errTxt, " -- "); strcat(errTxt, _db_errmsg); _db_errmsg[0] = 0; } errTuple = Py_BuildValue("(is)", err, errTxt); PyErr_SetObject(errObj, errTuple); Py_DECREF(errTuple); } return ((errObj != NULL) || exceptionRaised); } /* set a type exception */ static void makeTypeError(char* expected, PyObject* found) { PyErr_Format(PyExc_TypeError, "Expected %s argument, %s found.", expected, found->ob_type->tp_name); } /* verify that an obj is either None or a DBTxn, and set the txn pointer */ static int checkTxnObj(PyObject* txnobj, DB_TXN** txn) { if (txnobj == Py_None || txnobj == NULL) { *txn = NULL; return 1; } if (DBTxnObject_Check(txnobj)) { *txn = ((DBTxnObject*)txnobj)->txn; return 1; } else makeTypeError("DBTxn", txnobj); return 0; } /* Delete a key from a database Returns 0 on success, -1 on an error. */ static int _DB_delete(DBObject* self, DB_TXN *txn, DBT *key, int flags) { int err; MYDB_BEGIN_ALLOW_THREADS; err = self->db->del(self->db, txn, key, 0); MYDB_END_ALLOW_THREADS; if (makeDBError(err)) { return -1; } self->haveStat = 0; return 0; } /* Store a key into a database Returns 0 on success, -1 on an error. */ static int _DB_put(DBObject* self, DB_TXN *txn, DBT *key, DBT *data, int flags) { int err; MYDB_BEGIN_ALLOW_THREADS; err = self->db->put(self->db, txn, key, data, flags); MYDB_END_ALLOW_THREADS; if (makeDBError(err)) { return -1; } self->haveStat = 0; return 0; } /* Get a key/data pair from a cursor */ static PyObject* _DBCursor_get(DBCursorObject* self, int extra_flags, PyObject *args, PyObject *kwargs, char *format) { int err; PyObject* retval = NULL; DBT key, data; int dlen = -1; int doff = -1; int flags = 0; char* kwnames[] = { "flags", "dlen", "doff", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, format, kwnames, &flags, &dlen, &doff)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); flags |= extra_flags; CLEAR_DBT(key); CLEAR_DBT(data); if (CHECK_DBFLAG(self->mydb, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; key.flags = DB_DBT_MALLOC; } if (!add_partial_dbt(&data, dlen, doff)) return NULL; MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, flags); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->mydb->moduleFlags.getReturnsNone) { Py_INCREF(Py_None); retval = Py_None; } else if (makeDBError(err)) { retval = NULL; } else { /* otherwise, success! */ /* if Recno or Queue, return the key as an Int */ switch (_DB_get_type(self->mydb)) { case -1: retval = NULL; break; case DB_RECNO: case DB_QUEUE: retval = Py_BuildValue("is#", *((db_recno_t*)key.data), data.data, data.size); break; case DB_HASH: case DB_BTREE: default: retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); break; } } if (!err) { FREE_DBT(key); FREE_DBT(data); } return retval; } /* add an integer to a dictionary using the given name as a key */ static void _addIntToDict(PyObject* dict, char *name, int value) { PyObject* v = PyInt_FromLong((long) value); if (!v || PyDict_SetItemString(dict, name, v)) PyErr_Clear(); Py_XDECREF(v); } /* --------------------------------------------------------------------- */ /* Allocators and deallocators */ static DBObject* newDBObject(DBEnvObject* arg, int flags) { DBObject* self; DB_ENV* db_env = NULL; int err; #if PYTHON_API_VERSION <= 1007 /* 1.5 compatibility */ self = PyObject_NEW(DBObject, &DB_Type); #else self = PyObject_New(DBObject, &DB_Type); #endif if (self == NULL) return NULL; self->haveStat = 0; self->flags = 0; self->setflags = 0; self->myenvobj = NULL; #if (DBVER >= 33) self->associateCallback = NULL; self->primaryDBType = 0; #endif /* keep a reference to our python DBEnv object */ if (arg) { Py_INCREF(arg); self->myenvobj = arg; db_env = arg->db_env; } if (self->myenvobj) self->moduleFlags = self->myenvobj->moduleFlags; else self->moduleFlags.getReturnsNone = DEFAULT_GET_RETURNS_NONE; self->moduleFlags.cursorSetReturnsNone = DEFAULT_CURSOR_SET_RETURNS_NONE; MYDB_BEGIN_ALLOW_THREADS; err = db_create(&self->db, db_env, flags); self->db->set_errcall(self->db, _db_errorCallback); #if (DBVER >= 33) self->db->app_private = (void*)self; #endif MYDB_END_ALLOW_THREADS; if (makeDBError(err)) { if (self->myenvobj) { Py_DECREF(self->myenvobj); self->myenvobj = NULL; } self = NULL; } return self; } static void DB_dealloc(DBObject* self) { if (self->db != NULL) { /* avoid closing a DB when its DBEnv has been closed out from under * it */ if (!self->myenvobj || (self->myenvobj && self->myenvobj->db_env)) { MYDB_BEGIN_ALLOW_THREADS; self->db->close(self->db, 0); MYDB_END_ALLOW_THREADS; /* if Python 2.1 or better use warning framework */ #if PYTHON_API_VERSION >= 1010 } else { PyErr_Warn(PyExc_RuntimeWarning, "DB could not be closed in destructor: DBEnv already closed"); #endif } self->db = NULL; } if (self->myenvobj) { Py_DECREF(self->myenvobj); self->myenvobj = NULL; } #if (DBVER >= 33) if (self->associateCallback != NULL) { Py_DECREF(self->associateCallback); self->associateCallback = NULL; } #endif #if PYTHON_API_VERSION <= 1007 PyMem_DEL(self); #else PyObject_Del(self); #endif } static DBCursorObject* newDBCursorObject(DBC* dbc, DBObject* db) { DBCursorObject* self; #if PYTHON_API_VERSION <= 1007 self = PyObject_NEW(DBCursorObject, &DBCursor_Type); #else self = PyObject_New(DBCursorObject, &DBCursor_Type); #endif if (self == NULL) return NULL; self->dbc = dbc; self->mydb = db; Py_INCREF(self->mydb); return self; } static void DBCursor_dealloc(DBCursorObject* self) { int err; if (self->dbc != NULL) { MYDB_BEGIN_ALLOW_THREADS; /* If the underlying database has been closed, we don't need to do anything. If the environment has been closed we need to leak, as BerkeleyDB will crash trying to access the environment. There was an exception when the user closed the environment even though there still was a database open. */ if (self->mydb->db && self->mydb->myenvobj && !self->mydb->myenvobj->closed) err = self->dbc->c_close(self->dbc); self->dbc = NULL; MYDB_END_ALLOW_THREADS; } Py_XDECREF( self->mydb ); #if PYTHON_API_VERSION <= 1007 PyMem_DEL(self); #else PyObject_Del(self); #endif } static DBEnvObject* newDBEnvObject(int flags) { int err; DBEnvObject* self; #if PYTHON_API_VERSION <= 1007 self = PyObject_NEW(DBEnvObject, &DBEnv_Type); #else self = PyObject_New(DBEnvObject, &DBEnv_Type); #endif if (self == NULL) return NULL; self->closed = 1; self->flags = flags; self->moduleFlags.getReturnsNone = DEFAULT_GET_RETURNS_NONE; self->moduleFlags.cursorSetReturnsNone = DEFAULT_CURSOR_SET_RETURNS_NONE; MYDB_BEGIN_ALLOW_THREADS; err = db_env_create(&self->db_env, flags); MYDB_END_ALLOW_THREADS; if (makeDBError(err)) { self = NULL; } else { self->db_env->set_errcall(self->db_env, _db_errorCallback); } return self; } static void DBEnv_dealloc(DBEnvObject* self) { if (self->db_env) { MYDB_BEGIN_ALLOW_THREADS; self->db_env->close(self->db_env, 0); MYDB_END_ALLOW_THREADS; } #if PYTHON_API_VERSION <= 1007 PyMem_DEL(self); #else PyObject_Del(self); #endif } static DBTxnObject* newDBTxnObject(DBEnvObject* myenv, DB_TXN *parent, int flags) { int err; DBTxnObject* self; #if PYTHON_API_VERSION <= 1007 self = PyObject_NEW(DBTxnObject, &DBTxn_Type); #else self = PyObject_New(DBTxnObject, &DBTxn_Type); #endif if (self == NULL) return NULL; MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = myenv->db_env->txn_begin(myenv->db_env, parent, &(self->txn), flags); #else err = txn_begin(myenv->db_env, parent, &(self->txn), flags); #endif MYDB_END_ALLOW_THREADS; if (makeDBError(err)) { self = NULL; } return self; } static void DBTxn_dealloc(DBTxnObject* self) { /* XXX nothing to do for transaction objects?!? */ /* TODO: if it hasn't been commited, should we abort it? */ #if PYTHON_API_VERSION <= 1007 PyMem_DEL(self); #else PyObject_Del(self); #endif } static DBLockObject* newDBLockObject(DBEnvObject* myenv, u_int32_t locker, DBT* obj, db_lockmode_t lock_mode, int flags) { int err; DBLockObject* self; #if PYTHON_API_VERSION <= 1007 self = PyObject_NEW(DBLockObject, &DBLock_Type); #else self = PyObject_New(DBLockObject, &DBLock_Type); #endif if (self == NULL) return NULL; MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = myenv->db_env->lock_get(myenv->db_env, locker, flags, obj, lock_mode, &self->lock); #else err = lock_get(myenv->db_env, locker, flags, obj, lock_mode, &self->lock); #endif MYDB_END_ALLOW_THREADS; if (makeDBError(err)) { self = NULL; } return self; } static void DBLock_dealloc(DBLockObject* self) { /* TODO: if it hasn't been released, should we do it? */ #if PYTHON_API_VERSION <= 1007 PyMem_DEL(self); #else PyObject_Del(self); #endif } /* --------------------------------------------------------------------- */ /* DB methods */ static PyObject* DB_append(DBObject* self, PyObject* args) { PyObject* txnobj = NULL; PyObject* dataobj; db_recno_t recno; DBT key, data; DB_TXN *txn = NULL; if (!PyArg_ParseTuple(args, "O|O:append", &dataobj, &txnobj)) return NULL; CHECK_DB_NOT_CLOSED(self); /* make a dummy key out of a recno */ recno = 0; CLEAR_DBT(key); key.data = &recno; key.size = sizeof(recno); key.ulen = key.size; key.flags = DB_DBT_USERMEM; if (!make_dbt(dataobj, &data)) return NULL; if (!checkTxnObj(txnobj, &txn)) return NULL; if (-1 == _DB_put(self, txn, &key, &data, DB_APPEND)) return NULL; return PyInt_FromLong(recno); } #if (DBVER >= 33) static int _db_associateCallback(DB* db, const DBT* priKey, const DBT* priData, DBT* secKey) { int retval = DB_DONOTINDEX; DBObject* secondaryDB = (DBObject*)db->app_private; PyObject* callback = secondaryDB->associateCallback; int type = secondaryDB->primaryDBType; PyObject* key; PyObject* data; PyObject* args; PyObject* result; if (callback != NULL) { MYDB_BEGIN_BLOCK_THREADS; if (type == DB_RECNO || type == DB_QUEUE) { key = PyInt_FromLong( *((db_recno_t*)priKey->data)); } else { key = PyString_FromStringAndSize(priKey->data, priKey->size); } data = PyString_FromStringAndSize(priData->data, priData->size); args = PyTuple_New(2); PyTuple_SET_ITEM(args, 0, key); /* steals reference */ PyTuple_SET_ITEM(args, 1, data); /* steals reference */ result = PyEval_CallObject(callback, args); if (result == NULL) { PyErr_Print(); } else if (result == Py_None) { retval = DB_DONOTINDEX; } else if (PyInt_Check(result)) { retval = PyInt_AsLong(result); } else if (PyString_Check(result)) { char* data; int size; CLEAR_DBT(*secKey); #if PYTHON_API_VERSION <= 1007 /* 1.5 compatibility */ size = PyString_Size(result); data = PyString_AsString(result); #else PyString_AsStringAndSize(result, &data, &size); #endif secKey->flags = DB_DBT_APPMALLOC; /* DB will free */ secKey->data = malloc(size); /* TODO, check this */ if (secKey->data) { memcpy(secKey->data, data, size); secKey->size = size; retval = 0; } else { PyErr_SetString(PyExc_MemoryError, "malloc failed in _db_associateCallback"); PyErr_Print(); } } else { PyErr_SetString( PyExc_TypeError, "DB associate callback should return DB_DONOTINDEX or string."); PyErr_Print(); } Py_DECREF(args); if (result) { Py_DECREF(result); } MYDB_END_BLOCK_THREADS; } return retval; } static PyObject* DB_associate(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; DBObject* secondaryDB; PyObject* callback; #if (DBVER >= 41) PyObject *txnobj = NULL; DB_TXN *txn = NULL; char* kwnames[] = {"secondaryDB", "callback", "flags", "txn", NULL}; #else char* kwnames[] = {"secondaryDB", "callback", "flags", NULL}; #endif #if (DBVER >= 41) if (!PyArg_ParseTupleAndKeywords(args, kwargs, "OO|iO:associate", kwnames, &secondaryDB, &callback, &flags, &txnobj)) { #else if (!PyArg_ParseTupleAndKeywords(args, kwargs, "OO|i:associate", kwnames, &secondaryDB, &callback, &flags)) { #endif return NULL; } #if (DBVER >= 41) if (!checkTxnObj(txnobj, &txn)) return NULL; #endif CHECK_DB_NOT_CLOSED(self); if (!DBObject_Check(secondaryDB)) { makeTypeError("DB", (PyObject*)secondaryDB); return NULL; } if (callback == Py_None) { callback = NULL; } else if (!PyCallable_Check(callback)) { makeTypeError("Callable", callback); return NULL; } /* Save a reference to the callback in the secondary DB. */ if (self->associateCallback != NULL) { Py_DECREF(self->associateCallback); } Py_INCREF(callback); secondaryDB->associateCallback = callback; secondaryDB->primaryDBType = _DB_get_type(self); /* PyEval_InitThreads is called here due to a quirk in python 1.5 * - 2.2.1 (at least) according to Russell Williamson : * The global interepreter lock is not initialized until the first * thread is created using thread.start_new_thread() or fork() is * called. that would cause the ALLOW_THREADS here to segfault due * to a null pointer reference if no threads or child processes * have been created. This works around that and is a no-op if * threads have already been initialized. * (see pybsddb-users mailing list post on 2002-08-07) */ #ifdef WITH_THREAD PyEval_InitThreads(); #endif MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 41) err = self->db->associate(self->db, txn, secondaryDB->db, _db_associateCallback, flags); #else err = self->db->associate(self->db, secondaryDB->db, _db_associateCallback, flags); #endif MYDB_END_ALLOW_THREADS; if (err) { Py_DECREF(self->associateCallback); self->associateCallback = NULL; secondaryDB->primaryDBType = 0; } RETURN_IF_ERR(); RETURN_NONE(); } #endif static PyObject* DB_close(DBObject* self, PyObject* args) { int err, flags=0; if (!PyArg_ParseTuple(args,"|i:close", &flags)) return NULL; if (self->db != NULL) { if (self->myenvobj) CHECK_ENV_NOT_CLOSED(self->myenvobj); err = self->db->close(self->db, flags); self->db = NULL; RETURN_IF_ERR(); } RETURN_NONE(); } #if (DBVER >= 32) static PyObject* _DB_consume(DBObject* self, PyObject* args, PyObject* kwargs, int consume_flag) { int err, flags=0, type; PyObject* txnobj = NULL; PyObject* retval = NULL; DBT key, data; DB_TXN *txn = NULL; char* kwnames[] = { "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "|Oi:consume", kwnames, &txnobj, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); type = _DB_get_type(self); if (type == -1) return NULL; if (type != DB_QUEUE) { PyErr_SetString(PyExc_TypeError, "Consume methods only allowed for Queue DB's"); return NULL; } if (!checkTxnObj(txnobj, &txn)) return NULL; CLEAR_DBT(key); CLEAR_DBT(data); if (CHECK_DBFLAG(self, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; key.flags = DB_DBT_MALLOC; } MYDB_BEGIN_ALLOW_THREADS; err = self->db->get(self->db, txn, &key, &data, flags|consume_flag); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->moduleFlags.getReturnsNone) { err = 0; Py_INCREF(Py_None); retval = Py_None; } else if (!err) { retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); FREE_DBT(key); FREE_DBT(data); } RETURN_IF_ERR(); return retval; } static PyObject* DB_consume(DBObject* self, PyObject* args, PyObject* kwargs, int consume_flag) { return _DB_consume(self, args, kwargs, DB_CONSUME); } static PyObject* DB_consume_wait(DBObject* self, PyObject* args, PyObject* kwargs, int consume_flag) { return _DB_consume(self, args, kwargs, DB_CONSUME_WAIT); } #endif static PyObject* DB_cursor(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; DBC* dbc; PyObject* txnobj = NULL; DB_TXN *txn = NULL; char* kwnames[] = { "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "|Oi:cursor", kwnames, &txnobj, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!checkTxnObj(txnobj, &txn)) return NULL; MYDB_BEGIN_ALLOW_THREADS; err = self->db->cursor(self->db, txn, &dbc, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return (PyObject*) newDBCursorObject(dbc, self); } static PyObject* DB_delete(DBObject* self, PyObject* args, PyObject* kwargs) { PyObject* txnobj = NULL; int flags = 0; PyObject* keyobj; DBT key; DB_TXN *txn = NULL; char* kwnames[] = { "key", "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "O|Oi:delete", kwnames, &keyobj, &txnobj, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!make_key_dbt(self, keyobj, &key, NULL)) return NULL; if (!checkTxnObj(txnobj, &txn)) { FREE_DBT(key); return NULL; } if (-1 == _DB_delete(self, txn, &key, 0)) { FREE_DBT(key); return NULL; } FREE_DBT(key); RETURN_NONE(); } static PyObject* DB_fd(DBObject* self, PyObject* args) { int err, the_fd; if (!PyArg_ParseTuple(args,":fd")) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->fd(self->db, &the_fd); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return PyInt_FromLong(the_fd); } static PyObject* DB_get(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; PyObject* txnobj = NULL; PyObject* keyobj; PyObject* dfltobj = NULL; PyObject* retval = NULL; int dlen = -1; int doff = -1; DBT key, data; DB_TXN *txn = NULL; char* kwnames[] = {"key", "default", "txn", "flags", "dlen", "doff", NULL}; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "O|OOiii:get", kwnames, &keyobj, &dfltobj, &txnobj, &flags, &dlen, &doff)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!make_key_dbt(self, keyobj, &key, &flags)) return NULL; if (!checkTxnObj(txnobj, &txn)) { FREE_DBT(key); return NULL; } CLEAR_DBT(data); if (CHECK_DBFLAG(self, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; } if (!add_partial_dbt(&data, dlen, doff)) { FREE_DBT(key); return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->db->get(self->db, txn, &key, &data, flags); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && (dfltobj != NULL)) { err = 0; Py_INCREF(dfltobj); retval = dfltobj; } else if ((err == DB_NOTFOUND) && self->moduleFlags.getReturnsNone) { err = 0; Py_INCREF(Py_None); retval = Py_None; } else if (!err) { if (flags & DB_SET_RECNO) /* return both key and data */ retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); else /* return just the data */ retval = PyString_FromStringAndSize((char*)data.data, data.size); FREE_DBT(data); } FREE_DBT(key); RETURN_IF_ERR(); return retval; } /* Return size of entry */ static PyObject* DB_get_size(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; PyObject* txnobj = NULL; PyObject* keyobj; PyObject* retval = NULL; DBT key, data; DB_TXN *txn = NULL; char* kwnames[] = { "key", "txn", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "O|O:get_size", kwnames, &keyobj, &txnobj)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!make_key_dbt(self, keyobj, &key, &flags)) return NULL; if (!checkTxnObj(txnobj, &txn)) { FREE_DBT(key); return NULL; } CLEAR_DBT(data); /* We don't allocate any memory, forcing a ENOMEM error and thus getting the record size. */ data.flags = DB_DBT_USERMEM; data.ulen = 0; MYDB_BEGIN_ALLOW_THREADS; err = self->db->get(self->db, txn, &key, &data, flags); MYDB_END_ALLOW_THREADS; if (err == ENOMEM) { retval = PyInt_FromLong((long)data.size); err = 0; } FREE_DBT(key); FREE_DBT(data); RETURN_IF_ERR(); return retval; } static PyObject* DB_get_both(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; PyObject* txnobj = NULL; PyObject* keyobj; PyObject* dataobj; PyObject* retval = NULL; DBT key, data; DB_TXN *txn = NULL; char* kwnames[] = { "key", "data", "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "OO|Oi:get_both", kwnames, &keyobj, &dataobj, &txnobj, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!make_key_dbt(self, keyobj, &key, NULL)) return NULL; if ( !make_dbt(dataobj, &data) || !checkTxnObj(txnobj, &txn) ) { FREE_DBT(key); return NULL; } flags |= DB_GET_BOTH; if (CHECK_DBFLAG(self, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; /* TODO: Is this flag needed? We're passing a data object that should match what's in the DB, so there should be no need to malloc. We run the risk of freeing something twice! Check this. */ } MYDB_BEGIN_ALLOW_THREADS; err = self->db->get(self->db, txn, &key, &data, flags); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->moduleFlags.getReturnsNone) { err = 0; Py_INCREF(Py_None); retval = Py_None; } else if (!err) { retval = PyString_FromStringAndSize((char*)data.data, data.size); FREE_DBT(data); /* Only if retrieval was successful */ } FREE_DBT(key); RETURN_IF_ERR(); return retval; } static PyObject* DB_get_byteswapped(DBObject* self, PyObject* args) { #if (DBVER >= 33) int err = 0; #endif int retval = -1; if (!PyArg_ParseTuple(args,":get_byteswapped")) return NULL; CHECK_DB_NOT_CLOSED(self); #if (DBVER >= 33) MYDB_BEGIN_ALLOW_THREADS; err = self->db->get_byteswapped(self->db, &retval); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); #else MYDB_BEGIN_ALLOW_THREADS; retval = self->db->get_byteswapped(self->db); MYDB_END_ALLOW_THREADS; #endif return PyInt_FromLong(retval); } static PyObject* DB_get_type(DBObject* self, PyObject* args) { int type; if (!PyArg_ParseTuple(args,":get_type")) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; type = _DB_get_type(self); MYDB_END_ALLOW_THREADS; if (type == -1) return NULL; return PyInt_FromLong(type); } static PyObject* DB_join(DBObject* self, PyObject* args) { int err, flags=0; int length, x; PyObject* cursorsObj; DBC** cursors; DBC* dbc; if (!PyArg_ParseTuple(args,"O|i:join", &cursorsObj, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!PySequence_Check(cursorsObj)) { PyErr_SetString(PyExc_TypeError, "Sequence of DBCursor objects expected"); return NULL; } length = PyObject_Length(cursorsObj); cursors = malloc((length+1) * sizeof(DBC*)); cursors[length] = NULL; for (x=0; xdbc; } MYDB_BEGIN_ALLOW_THREADS; err = self->db->join(self->db, cursors, &dbc, flags); MYDB_END_ALLOW_THREADS; free(cursors); RETURN_IF_ERR(); /* FIXME: this is a buggy interface. The returned cursor contains internal references to the passed in cursors but does not hold python references to them or prevent them from being closed prematurely. This can cause python to crash when things are done in the wrong order. */ return (PyObject*) newDBCursorObject(dbc, self); } static PyObject* DB_key_range(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; PyObject* txnobj = NULL; PyObject* keyobj; DBT key; DB_TXN *txn = NULL; DB_KEY_RANGE range; char* kwnames[] = { "key", "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "O|Oi:key_range", kwnames, &keyobj, &txnobj, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!make_dbt(keyobj, &key)) /* BTree only, don't need to allow for an int key */ return NULL; if (!checkTxnObj(txnobj, &txn)) return NULL; MYDB_BEGIN_ALLOW_THREADS; err = self->db->key_range(self->db, txn, &key, &range, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return Py_BuildValue("ddd", range.less, range.equal, range.greater); } static PyObject* DB_open(DBObject* self, PyObject* args, PyObject* kwargs) { int err, type = DB_UNKNOWN, flags=0, mode=0660; char* filename = NULL; char* dbname = NULL; #if (DBVER >= 41) PyObject *txnobj = NULL; DB_TXN *txn = NULL; /* with dbname */ char* kwnames[] = { "filename", "dbname", "dbtype", "flags", "mode", "txn", NULL}; /* without dbname */ char* kwnames_basic[] = { "filename", "dbtype", "flags", "mode", "txn", NULL}; #else /* with dbname */ char* kwnames[] = { "filename", "dbname", "dbtype", "flags", "mode", NULL}; /* without dbname */ char* kwnames_basic[] = { "filename", "dbtype", "flags", "mode", NULL}; #endif #if (DBVER >= 41) if (!PyArg_ParseTupleAndKeywords(args, kwargs, "z|ziiiO:open", kwnames, &filename, &dbname, &type, &flags, &mode, &txnobj)) #else if (!PyArg_ParseTupleAndKeywords(args, kwargs, "z|ziii:open", kwnames, &filename, &dbname, &type, &flags, &mode)) #endif { PyErr_Clear(); type = DB_UNKNOWN; flags = 0; mode = 0660; filename = NULL; dbname = NULL; #if (DBVER >= 41) if (!PyArg_ParseTupleAndKeywords(args, kwargs,"z|iiiO:open", kwnames_basic, &filename, &type, &flags, &mode, &txnobj)) return NULL; #else if (!PyArg_ParseTupleAndKeywords(args, kwargs,"z|iii:open", kwnames_basic, &filename, &type, &flags, &mode)) return NULL; #endif } #if (DBVER >= 41) if (!checkTxnObj(txnobj, &txn)) return NULL; #endif if (NULL == self->db) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "Cannot call open() twice for DB object")); return NULL; } #if 0 && (DBVER >= 41) if ((!txn) && (txnobj != Py_None) && self->myenvobj && (self->myenvobj->flags & DB_INIT_TXN)) { /* If no 'txn' parameter was supplied (no DbTxn object and None was not * explicitly passed) but we are in a transaction ready environment: * add DB_AUTO_COMMIT to allow for older pybsddb apps using transactions * to work on BerkeleyDB 4.1 without needing to modify their * DBEnv or DB open calls. * TODO make this behaviour of the library configurable. */ flags |= DB_AUTO_COMMIT; } #endif MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 41) err = self->db->open(self->db, txn, filename, dbname, type, flags, mode); #else err = self->db->open(self->db, filename, dbname, type, flags, mode); #endif MYDB_END_ALLOW_THREADS; if (makeDBError(err)) { self->db->close(self->db, 0); self->db = NULL; return NULL; } self->flags = flags; RETURN_NONE(); } static PyObject* DB_put(DBObject* self, PyObject* args, PyObject* kwargs) { int flags=0; PyObject* txnobj = NULL; int dlen = -1; int doff = -1; PyObject* keyobj, *dataobj, *retval; DBT key, data; DB_TXN *txn = NULL; char* kwnames[] = { "key", "data", "txn", "flags", "dlen", "doff", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "OO|Oiii:put", kwnames, &keyobj, &dataobj, &txnobj, &flags, &dlen, &doff)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!make_key_dbt(self, keyobj, &key, NULL)) return NULL; if ( !make_dbt(dataobj, &data) || !add_partial_dbt(&data, dlen, doff) || !checkTxnObj(txnobj, &txn) ) { FREE_DBT(key); return NULL; } if (-1 == _DB_put(self, txn, &key, &data, flags)) { FREE_DBT(key); return NULL; } if (flags & DB_APPEND) retval = PyInt_FromLong(*((db_recno_t*)key.data)); else { retval = Py_None; Py_INCREF(retval); } FREE_DBT(key); return retval; } static PyObject* DB_remove(DBObject* self, PyObject* args, PyObject* kwargs) { char* filename; char* database = NULL; int err, flags=0; char* kwnames[] = { "filename", "dbname", "flags", NULL}; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "s|zi:remove", kwnames, &filename, &database, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); err = self->db->remove(self->db, filename, database, flags); self->db = NULL; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_rename(DBObject* self, PyObject* args) { char* filename; char* database; char* newname; int err, flags=0; if (!PyArg_ParseTuple(args, "sss|i:rename", &filename, &database, &newname, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->rename(self->db, filename, database, newname, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_bt_minkey(DBObject* self, PyObject* args) { int err, minkey; if (!PyArg_ParseTuple(args,"i:set_bt_minkey", &minkey )) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_bt_minkey(self->db, minkey); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_cachesize(DBObject* self, PyObject* args) { int err; int gbytes = 0, bytes = 0, ncache = 0; if (!PyArg_ParseTuple(args,"ii|i:set_cachesize", &gbytes,&bytes,&ncache)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_cachesize(self->db, gbytes, bytes, ncache); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_flags(DBObject* self, PyObject* args) { int err, flags; if (!PyArg_ParseTuple(args,"i:set_flags", &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_flags(self->db, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); self->setflags |= flags; RETURN_NONE(); } static PyObject* DB_set_h_ffactor(DBObject* self, PyObject* args) { int err, ffactor; if (!PyArg_ParseTuple(args,"i:set_h_ffactor", &ffactor)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_h_ffactor(self->db, ffactor); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_h_nelem(DBObject* self, PyObject* args) { int err, nelem; if (!PyArg_ParseTuple(args,"i:set_h_nelem", &nelem)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_h_nelem(self->db, nelem); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_lorder(DBObject* self, PyObject* args) { int err, lorder; if (!PyArg_ParseTuple(args,"i:set_lorder", &lorder)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_lorder(self->db, lorder); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_pagesize(DBObject* self, PyObject* args) { int err, pagesize; if (!PyArg_ParseTuple(args,"i:set_pagesize", &pagesize)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_pagesize(self->db, pagesize); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_re_delim(DBObject* self, PyObject* args) { int err; char delim; if (!PyArg_ParseTuple(args,"b:set_re_delim", &delim)) { PyErr_Clear(); if (!PyArg_ParseTuple(args,"c:set_re_delim", &delim)) return NULL; } CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_re_delim(self->db, delim); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_re_len(DBObject* self, PyObject* args) { int err, len; if (!PyArg_ParseTuple(args,"i:set_re_len", &len)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_re_len(self->db, len); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_re_pad(DBObject* self, PyObject* args) { int err; char pad; if (!PyArg_ParseTuple(args,"b:set_re_pad", &pad)) { PyErr_Clear(); if (!PyArg_ParseTuple(args,"c:set_re_pad", &pad)) return NULL; } CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_re_pad(self->db, pad); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_re_source(DBObject* self, PyObject* args) { int err; char *re_source; if (!PyArg_ParseTuple(args,"s:set_re_source", &re_source)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_re_source(self->db, re_source); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #if (DBVER >= 32) static PyObject* DB_set_q_extentsize(DBObject* self, PyObject* args) { int err; int extentsize; if (!PyArg_ParseTuple(args,"i:set_q_extentsize", &extentsize)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_q_extentsize(self->db, extentsize); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #endif static PyObject* DB_stat(DBObject* self, PyObject* args) { int err, flags = 0, type; void* sp; PyObject* d; if (!PyArg_ParseTuple(args, "|i:stat", &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 33) err = self->db->stat(self->db, &sp, flags); #else err = self->db->stat(self->db, &sp, NULL, flags); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); self->haveStat = 1; /* Turn the stat structure into a dictionary */ type = _DB_get_type(self); if ((type == -1) || ((d = PyDict_New()) == NULL)) { free(sp); return NULL; } #define MAKE_HASH_ENTRY(name) _addIntToDict(d, #name, ((DB_HASH_STAT*)sp)->hash_##name) #define MAKE_BT_ENTRY(name) _addIntToDict(d, #name, ((DB_BTREE_STAT*)sp)->bt_##name) #define MAKE_QUEUE_ENTRY(name) _addIntToDict(d, #name, ((DB_QUEUE_STAT*)sp)->qs_##name) switch (type) { case DB_HASH: MAKE_HASH_ENTRY(magic); MAKE_HASH_ENTRY(version); MAKE_HASH_ENTRY(nkeys); MAKE_HASH_ENTRY(ndata); MAKE_HASH_ENTRY(pagesize); #if (DBVER < 41) MAKE_HASH_ENTRY(nelem); #endif MAKE_HASH_ENTRY(ffactor); MAKE_HASH_ENTRY(buckets); MAKE_HASH_ENTRY(free); MAKE_HASH_ENTRY(bfree); MAKE_HASH_ENTRY(bigpages); MAKE_HASH_ENTRY(big_bfree); MAKE_HASH_ENTRY(overflows); MAKE_HASH_ENTRY(ovfl_free); MAKE_HASH_ENTRY(dup); MAKE_HASH_ENTRY(dup_free); break; case DB_BTREE: case DB_RECNO: MAKE_BT_ENTRY(magic); MAKE_BT_ENTRY(version); MAKE_BT_ENTRY(nkeys); MAKE_BT_ENTRY(ndata); MAKE_BT_ENTRY(pagesize); MAKE_BT_ENTRY(minkey); MAKE_BT_ENTRY(re_len); MAKE_BT_ENTRY(re_pad); MAKE_BT_ENTRY(levels); MAKE_BT_ENTRY(int_pg); MAKE_BT_ENTRY(leaf_pg); MAKE_BT_ENTRY(dup_pg); MAKE_BT_ENTRY(over_pg); MAKE_BT_ENTRY(free); MAKE_BT_ENTRY(int_pgfree); MAKE_BT_ENTRY(leaf_pgfree); MAKE_BT_ENTRY(dup_pgfree); MAKE_BT_ENTRY(over_pgfree); break; case DB_QUEUE: MAKE_QUEUE_ENTRY(magic); MAKE_QUEUE_ENTRY(version); MAKE_QUEUE_ENTRY(nkeys); MAKE_QUEUE_ENTRY(ndata); MAKE_QUEUE_ENTRY(pagesize); MAKE_QUEUE_ENTRY(pages); MAKE_QUEUE_ENTRY(re_len); MAKE_QUEUE_ENTRY(re_pad); MAKE_QUEUE_ENTRY(pgfree); #if (DBVER == 31) MAKE_QUEUE_ENTRY(start); #endif MAKE_QUEUE_ENTRY(first_recno); MAKE_QUEUE_ENTRY(cur_recno); break; default: PyErr_SetString(PyExc_TypeError, "Unknown DB type, unable to stat"); Py_DECREF(d); d = NULL; } #undef MAKE_HASH_ENTRY #undef MAKE_BT_ENTRY #undef MAKE_QUEUE_ENTRY free(sp); return d; } static PyObject* DB_sync(DBObject* self, PyObject* args) { int err; int flags = 0; if (!PyArg_ParseTuple(args,"|i:sync", &flags )) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->sync(self->db, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #if (DBVER >= 33) static PyObject* DB_truncate(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; u_int32_t count=0; PyObject* txnobj = NULL; DB_TXN *txn = NULL; char* kwnames[] = { "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "|Oi:cursor", kwnames, &txnobj, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!checkTxnObj(txnobj, &txn)) return NULL; MYDB_BEGIN_ALLOW_THREADS; err = self->db->truncate(self->db, txn, &count, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return PyInt_FromLong(count); } #endif static PyObject* DB_upgrade(DBObject* self, PyObject* args) { int err, flags=0; char *filename; if (!PyArg_ParseTuple(args,"s|i:upgrade", &filename, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db->upgrade(self->db, filename, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_verify(DBObject* self, PyObject* args, PyObject* kwargs) { int err, flags=0; char* fileName; char* dbName=NULL; char* outFileName=NULL; FILE* outFile=NULL; char* kwnames[] = { "filename", "dbname", "outfile", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "s|zzi:verify", kwnames, &fileName, &dbName, &outFileName, &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (outFileName) outFile = fopen(outFileName, "w"); MYDB_BEGIN_ALLOW_THREADS; err = self->db->verify(self->db, fileName, dbName, outFile, flags); MYDB_END_ALLOW_THREADS; if (outFileName) fclose(outFile); /* DB.verify acts as a DB handle destructor (like close); this was * documented in BerkeleyDB 4.2 but had the undocumented effect * of not being safe in prior versions while still requiring an explicit * DB.close call afterwards. Lets call close for the user to emulate * the safe 4.2 behaviour. */ #if (DBVER <= 41) self->db->close(self->db, 0); #endif self->db = NULL; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DB_set_get_returns_none(DBObject* self, PyObject* args) { int flags=0; int oldValue=0; if (!PyArg_ParseTuple(args,"i:set_get_returns_none", &flags)) return NULL; CHECK_DB_NOT_CLOSED(self); if (self->moduleFlags.getReturnsNone) ++oldValue; if (self->moduleFlags.cursorSetReturnsNone) ++oldValue; self->moduleFlags.getReturnsNone = (flags >= 1); self->moduleFlags.cursorSetReturnsNone = (flags >= 2); return PyInt_FromLong(oldValue); } #if (DBVER >= 41) static PyObject* DB_set_encrypt(DBObject* self, PyObject* args, PyObject* kwargs) { int err; u_int32_t flags=0; char *passwd = NULL; char* kwnames[] = { "passwd", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "s|i:set_encrypt", kwnames, &passwd, &flags)) { return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->db->set_encrypt(self->db, passwd, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #endif /* DBVER >= 41 */ /*-------------------------------------------------------------- */ /* Mapping and Dictionary-like access routines */ int DB_length(DBObject* self) { int err; long size = 0; int flags = 0; void* sp; if (self->db == NULL) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "DB object has been closed")); return -1; } if (self->haveStat) { /* Has the stat function been called recently? If so, we can use the cached value. */ flags = DB_CACHED_COUNTS; } MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 33) err = self->db->stat(self->db, &sp, flags); #else err = self->db->stat(self->db, &sp, NULL, flags); #endif MYDB_END_ALLOW_THREADS; if (err) return -1; self->haveStat = 1; /* All the stat structures have matching fields upto the ndata field, so we can use any of them for the type cast */ size = ((DB_BTREE_STAT*)sp)->bt_ndata; free(sp); return size; } PyObject* DB_subscript(DBObject* self, PyObject* keyobj) { int err; PyObject* retval; DBT key; DBT data; CHECK_DB_NOT_CLOSED(self); if (!make_key_dbt(self, keyobj, &key, NULL)) return NULL; CLEAR_DBT(data); if (CHECK_DBFLAG(self, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; } MYDB_BEGIN_ALLOW_THREADS; err = self->db->get(self->db, NULL, &key, &data, 0); MYDB_END_ALLOW_THREADS; if (err == DB_NOTFOUND || err == DB_KEYEMPTY) { PyErr_SetObject(PyExc_KeyError, keyobj); retval = NULL; } else if (makeDBError(err)) { retval = NULL; } else { retval = PyString_FromStringAndSize((char*)data.data, data.size); FREE_DBT(data); } FREE_DBT(key); return retval; } static int DB_ass_sub(DBObject* self, PyObject* keyobj, PyObject* dataobj) { DBT key, data; int retval; int flags = 0; if (self->db == NULL) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "DB object has been closed")); return -1; } if (!make_key_dbt(self, keyobj, &key, NULL)) return -1; if (dataobj != NULL) { if (!make_dbt(dataobj, &data)) retval = -1; else { if (self->setflags & (DB_DUP|DB_DUPSORT)) /* dictionaries shouldn't have duplicate keys */ flags = DB_NOOVERWRITE; retval = _DB_put(self, NULL, &key, &data, flags); if ((retval == -1) && (self->setflags & (DB_DUP|DB_DUPSORT))) { /* try deleting any old record that matches and then PUT it * again... */ _DB_delete(self, NULL, &key, 0); PyErr_Clear(); retval = _DB_put(self, NULL, &key, &data, flags); } } } else { /* dataobj == NULL, so delete the key */ retval = _DB_delete(self, NULL, &key, 0); } FREE_DBT(key); return retval; } static PyObject* DB_has_key(DBObject* self, PyObject* args) { int err; PyObject* keyobj; DBT key, data; PyObject* txnobj = NULL; DB_TXN *txn = NULL; if (!PyArg_ParseTuple(args,"O|O:has_key", &keyobj, &txnobj)) return NULL; CHECK_DB_NOT_CLOSED(self); if (!make_key_dbt(self, keyobj, &key, NULL)) return NULL; if (!checkTxnObj(txnobj, &txn)) { FREE_DBT(key); return NULL; } /* This causes ENOMEM to be returned when the db has the key because it has a record but can't allocate a buffer for the data. This saves having to deal with data we won't be using. */ CLEAR_DBT(data); data.flags = DB_DBT_USERMEM; MYDB_BEGIN_ALLOW_THREADS; err = self->db->get(self->db, txn, &key, &data, 0); MYDB_END_ALLOW_THREADS; FREE_DBT(key); return PyInt_FromLong((err == ENOMEM) || (err == 0)); } #define _KEYS_LIST 1 #define _VALUES_LIST 2 #define _ITEMS_LIST 3 static PyObject* _DB_make_list(DBObject* self, DB_TXN* txn, int type) { int err, dbtype; DBT key; DBT data; DBC *cursor; PyObject* list; PyObject* item = NULL; CHECK_DB_NOT_CLOSED(self); CLEAR_DBT(key); CLEAR_DBT(data); dbtype = _DB_get_type(self); if (dbtype == -1) return NULL; list = PyList_New(0); if (list == NULL) { PyErr_SetString(PyExc_MemoryError, "PyList_New failed"); return NULL; } /* get a cursor */ MYDB_BEGIN_ALLOW_THREADS; err = self->db->cursor(self->db, txn, &cursor, 0); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); if (CHECK_DBFLAG(self, DB_THREAD)) { key.flags = DB_DBT_REALLOC; data.flags = DB_DBT_REALLOC; } while (1) { /* use the cursor to traverse the DB, collecting items */ MYDB_BEGIN_ALLOW_THREADS; err = cursor->c_get(cursor, &key, &data, DB_NEXT); MYDB_END_ALLOW_THREADS; if (err) { /* for any error, break out of the loop */ break; } switch (type) { case _KEYS_LIST: switch(dbtype) { case DB_BTREE: case DB_HASH: default: item = PyString_FromStringAndSize((char*)key.data, key.size); break; case DB_RECNO: case DB_QUEUE: item = PyInt_FromLong(*((db_recno_t*)key.data)); break; } break; case _VALUES_LIST: item = PyString_FromStringAndSize((char*)data.data, data.size); break; case _ITEMS_LIST: switch(dbtype) { case DB_BTREE: case DB_HASH: default: item = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); break; case DB_RECNO: case DB_QUEUE: item = Py_BuildValue("is#", *((db_recno_t*)key.data), data.data, data.size); break; } break; } if (item == NULL) { Py_DECREF(list); PyErr_SetString(PyExc_MemoryError, "List item creation failed"); list = NULL; goto done; } PyList_Append(list, item); Py_DECREF(item); } /* DB_NOTFOUND is okay, it just means we got to the end */ if (err != DB_NOTFOUND && makeDBError(err)) { Py_DECREF(list); list = NULL; } done: FREE_DBT(key); FREE_DBT(data); MYDB_BEGIN_ALLOW_THREADS; cursor->c_close(cursor); MYDB_END_ALLOW_THREADS; return list; } static PyObject* DB_keys(DBObject* self, PyObject* args) { PyObject* txnobj = NULL; DB_TXN *txn = NULL; if (!PyArg_ParseTuple(args,"|O:keys", &txnobj)) return NULL; if (!checkTxnObj(txnobj, &txn)) return NULL; return _DB_make_list(self, txn, _KEYS_LIST); } static PyObject* DB_items(DBObject* self, PyObject* args) { PyObject* txnobj = NULL; DB_TXN *txn = NULL; if (!PyArg_ParseTuple(args,"|O:items", &txnobj)) return NULL; if (!checkTxnObj(txnobj, &txn)) return NULL; return _DB_make_list(self, txn, _ITEMS_LIST); } static PyObject* DB_values(DBObject* self, PyObject* args) { PyObject* txnobj = NULL; DB_TXN *txn = NULL; if (!PyArg_ParseTuple(args,"|O:values", &txnobj)) return NULL; if (!checkTxnObj(txnobj, &txn)) return NULL; return _DB_make_list(self, txn, _VALUES_LIST); } /* --------------------------------------------------------------------- */ /* DBCursor methods */ static PyObject* DBC_close(DBCursorObject* self, PyObject* args) { int err = 0; if (!PyArg_ParseTuple(args, ":close")) return NULL; if (self->dbc != NULL) { MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_close(self->dbc); self->dbc = NULL; MYDB_END_ALLOW_THREADS; } RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBC_count(DBCursorObject* self, PyObject* args) { int err = 0; db_recno_t count; int flags = 0; if (!PyArg_ParseTuple(args, "|i:count", &flags)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_count(self->dbc, &count, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return PyInt_FromLong(count); } static PyObject* DBC_current(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_CURRENT,args,kwargs,"|iii:current"); } static PyObject* DBC_delete(DBCursorObject* self, PyObject* args) { int err, flags=0; if (!PyArg_ParseTuple(args, "|i:delete", &flags)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_del(self->dbc, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); self->mydb->haveStat = 0; RETURN_NONE(); } static PyObject* DBC_dup(DBCursorObject* self, PyObject* args) { int err, flags =0; DBC* dbc = NULL; if (!PyArg_ParseTuple(args, "|i:dup", &flags)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_dup(self->dbc, &dbc, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return (PyObject*) newDBCursorObject(dbc, self->mydb); } static PyObject* DBC_first(DBCursorObject* self, PyObject* args, PyObject* kwargs) { return _DBCursor_get(self,DB_FIRST,args,kwargs,"|iii:first"); } static PyObject* DBC_get(DBCursorObject* self, PyObject* args, PyObject *kwargs) { int err, flags=0; PyObject* keyobj = NULL; PyObject* dataobj = NULL; PyObject* retval = NULL; int dlen = -1; int doff = -1; DBT key, data; char* kwnames[] = { "key","data", "flags", "dlen", "doff", NULL }; CLEAR_DBT(key); CLEAR_DBT(data); if (!PyArg_ParseTupleAndKeywords(args, kwargs, "i|ii:get", &kwnames[2], &flags, &dlen, &doff)) { PyErr_Clear(); if (!PyArg_ParseTupleAndKeywords(args, kwargs, "Oi|ii:get", &kwnames[1], &keyobj, &flags, &dlen, &doff)) { PyErr_Clear(); if (!PyArg_ParseTupleAndKeywords(args, kwargs, "OOi|ii:get", kwnames, &keyobj, &dataobj, &flags, &dlen, &doff)) { return NULL; } } } CHECK_CURSOR_NOT_CLOSED(self); if (keyobj && !make_key_dbt(self->mydb, keyobj, &key, NULL)) return NULL; if ( (dataobj && !make_dbt(dataobj, &data)) || (!add_partial_dbt(&data, dlen, doff)) ) { FREE_DBT(key); return NULL; } if (CHECK_DBFLAG(self->mydb, DB_THREAD)) { data.flags = DB_DBT_MALLOC; if (!(key.flags & DB_DBT_REALLOC)) { key.flags |= DB_DBT_MALLOC; } } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, flags); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->mydb->moduleFlags.getReturnsNone) { Py_INCREF(Py_None); retval = Py_None; } else if (makeDBError(err)) { retval = NULL; } else { switch (_DB_get_type(self->mydb)) { case -1: retval = NULL; break; case DB_BTREE: case DB_HASH: default: retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); break; case DB_RECNO: case DB_QUEUE: retval = Py_BuildValue("is#", *((db_recno_t*)key.data), data.data, data.size); break; } FREE_DBT(data); } FREE_DBT(key); return retval; } static PyObject* DBC_get_recno(DBCursorObject* self, PyObject* args) { int err; db_recno_t recno; DBT key; DBT data; if (!PyArg_ParseTuple(args, ":get_recno")) return NULL; CHECK_CURSOR_NOT_CLOSED(self); CLEAR_DBT(key); CLEAR_DBT(data); if (CHECK_DBFLAG(self->mydb, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; key.flags = DB_DBT_MALLOC; } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, DB_GET_RECNO); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); recno = *((db_recno_t*)data.data); FREE_DBT(key); FREE_DBT(data); return PyInt_FromLong(recno); } static PyObject* DBC_last(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_LAST,args,kwargs,"|iii:last"); } static PyObject* DBC_next(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_NEXT,args,kwargs,"|iii:next"); } static PyObject* DBC_prev(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_PREV,args,kwargs,"|iii:prev"); } static PyObject* DBC_put(DBCursorObject* self, PyObject* args, PyObject* kwargs) { int err, flags = 0; PyObject* keyobj, *dataobj; DBT key, data; char* kwnames[] = { "key", "data", "flags", "dlen", "doff", NULL }; int dlen = -1; int doff = -1; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "OO|iii:put", kwnames, &keyobj, &dataobj, &flags, &dlen, &doff)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); if (!make_key_dbt(self->mydb, keyobj, &key, NULL)) return NULL; if (!make_dbt(dataobj, &data) || !add_partial_dbt(&data, dlen, doff) ) { FREE_DBT(key); return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_put(self->dbc, &key, &data, flags); MYDB_END_ALLOW_THREADS; FREE_DBT(key); RETURN_IF_ERR(); self->mydb->haveStat = 0; RETURN_NONE(); } static PyObject* DBC_set(DBCursorObject* self, PyObject* args, PyObject *kwargs) { int err, flags = 0; DBT key, data; PyObject* retval, *keyobj; char* kwnames[] = { "key", "flags", "dlen", "doff", NULL }; int dlen = -1; int doff = -1; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "O|iii:set", kwnames, &keyobj, &flags, &dlen, &doff)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); if (!make_key_dbt(self->mydb, keyobj, &key, NULL)) return NULL; CLEAR_DBT(data); if (CHECK_DBFLAG(self->mydb, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; } if (!add_partial_dbt(&data, dlen, doff)) { FREE_DBT(key); return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, flags|DB_SET); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->mydb->moduleFlags.cursorSetReturnsNone) { Py_INCREF(Py_None); retval = Py_None; } else if (makeDBError(err)) { retval = NULL; } else { switch (_DB_get_type(self->mydb)) { case -1: retval = NULL; break; case DB_BTREE: case DB_HASH: default: retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); break; case DB_RECNO: case DB_QUEUE: retval = Py_BuildValue("is#", *((db_recno_t*)key.data), data.data, data.size); break; } FREE_DBT(data); } FREE_DBT(key); return retval; } static PyObject* DBC_set_range(DBCursorObject* self, PyObject* args, PyObject* kwargs) { int err, flags = 0; DBT key, data; PyObject* retval, *keyobj; char* kwnames[] = { "key", "flags", "dlen", "doff", NULL }; int dlen = -1; int doff = -1; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "O|iii:set_range", kwnames, &keyobj, &flags, &dlen, &doff)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); if (!make_key_dbt(self->mydb, keyobj, &key, NULL)) return NULL; CLEAR_DBT(data); if (!add_partial_dbt(&data, dlen, doff)) { FREE_DBT(key); return NULL; } if (CHECK_DBFLAG(self->mydb, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags |= DB_DBT_MALLOC; /* only BTREE databases will return anything in the key */ if (!(key.flags & DB_DBT_REALLOC) && _DB_get_type(self->mydb) == DB_BTREE) { key.flags |= DB_DBT_MALLOC; } } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, flags|DB_SET_RANGE); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->mydb->moduleFlags.cursorSetReturnsNone) { Py_INCREF(Py_None); retval = Py_None; } else if (makeDBError(err)) { retval = NULL; } else { switch (_DB_get_type(self->mydb)) { case -1: retval = NULL; break; case DB_BTREE: case DB_HASH: default: retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); break; case DB_RECNO: case DB_QUEUE: retval = Py_BuildValue("is#", *((db_recno_t*)key.data), data.data, data.size); break; } FREE_DBT(key); FREE_DBT(data); } /* the only time REALLOC should be set is if we used an integer * key that make_dbt_key malloc'd for us. always free these. */ if (key.flags & DB_DBT_REALLOC) { FREE_DBT(key); } return retval; } static PyObject* _DBC_get_set_both(DBCursorObject* self, PyObject* keyobj, PyObject* dataobj, int flags, unsigned int returnsNone) { int err; DBT key, data; PyObject* retval; /* the caller did this: CHECK_CURSOR_NOT_CLOSED(self); */ if (!make_key_dbt(self->mydb, keyobj, &key, NULL)) return NULL; if (!make_dbt(dataobj, &data)) { FREE_DBT(key); return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, flags|DB_GET_BOTH); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && returnsNone) { Py_INCREF(Py_None); retval = Py_None; } else if (makeDBError(err)) { retval = NULL; } else { switch (_DB_get_type(self->mydb)) { case -1: retval = NULL; break; case DB_BTREE: case DB_HASH: default: retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); break; case DB_RECNO: case DB_QUEUE: retval = Py_BuildValue("is#", *((db_recno_t*)key.data), data.data, data.size); break; } } FREE_DBT(key); return retval; } static PyObject* DBC_get_both(DBCursorObject* self, PyObject* args) { int flags=0; PyObject *keyobj, *dataobj; if (!PyArg_ParseTuple(args, "OO|i:get_both", &keyobj, &dataobj, &flags)) return NULL; /* if the cursor is closed, self->mydb may be invalid */ CHECK_CURSOR_NOT_CLOSED(self); return _DBC_get_set_both(self, keyobj, dataobj, flags, self->mydb->moduleFlags.getReturnsNone); } static PyObject* DBC_set_both(DBCursorObject* self, PyObject* args) { int flags=0; PyObject *keyobj, *dataobj; if (!PyArg_ParseTuple(args, "OO|i:set_both", &keyobj, &dataobj, &flags)) return NULL; /* if the cursor is closed, self->mydb may be invalid */ CHECK_CURSOR_NOT_CLOSED(self); return _DBC_get_set_both(self, keyobj, dataobj, flags, self->mydb->moduleFlags.cursorSetReturnsNone); } static PyObject* DBC_set_recno(DBCursorObject* self, PyObject* args, PyObject *kwargs) { int err, irecno, flags=0; db_recno_t recno; DBT key, data; PyObject* retval; int dlen = -1; int doff = -1; char* kwnames[] = { "recno","flags", "dlen", "doff", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "i|iii:set_recno", kwnames, &irecno, &flags, &dlen, &doff)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); CLEAR_DBT(key); recno = (db_recno_t) irecno; /* use allocated space so DB will be able to realloc room for the real * key */ key.data = malloc(sizeof(db_recno_t)); if (key.data == NULL) { PyErr_SetString(PyExc_MemoryError, "Key memory allocation failed"); return NULL; } key.size = sizeof(db_recno_t); key.ulen = key.size; memcpy(key.data, &recno, sizeof(db_recno_t)); key.flags = DB_DBT_REALLOC; CLEAR_DBT(data); if (CHECK_DBFLAG(self->mydb, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ data.flags = DB_DBT_MALLOC; } if (!add_partial_dbt(&data, dlen, doff)) { FREE_DBT(key); return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, flags|DB_SET_RECNO); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->mydb->moduleFlags.cursorSetReturnsNone) { Py_INCREF(Py_None); retval = Py_None; } else if (makeDBError(err)) { retval = NULL; } else { /* Can only be used for BTrees, so no need to return int key */ retval = Py_BuildValue("s#s#", key.data, key.size, data.data, data.size); FREE_DBT(data); } FREE_DBT(key); return retval; } static PyObject* DBC_consume(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_CONSUME,args,kwargs,"|iii:consume"); } static PyObject* DBC_next_dup(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_NEXT_DUP,args,kwargs,"|iii:next_dup"); } static PyObject* DBC_next_nodup(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_NEXT_NODUP,args,kwargs,"|iii:next_nodup"); } static PyObject* DBC_prev_nodup(DBCursorObject* self, PyObject* args, PyObject *kwargs) { return _DBCursor_get(self,DB_PREV_NODUP,args,kwargs,"|iii:prev_nodup"); } static PyObject* DBC_join_item(DBCursorObject* self, PyObject* args) { int err, flags=0; DBT key, data; PyObject* retval; if (!PyArg_ParseTuple(args, "|i:join_item", &flags)) return NULL; CHECK_CURSOR_NOT_CLOSED(self); CLEAR_DBT(key); CLEAR_DBT(data); if (CHECK_DBFLAG(self->mydb, DB_THREAD)) { /* Tell BerkeleyDB to malloc the return value (thread safe) */ key.flags = DB_DBT_MALLOC; } MYDB_BEGIN_ALLOW_THREADS; err = self->dbc->c_get(self->dbc, &key, &data, flags | DB_JOIN_ITEM); MYDB_END_ALLOW_THREADS; if ((err == DB_NOTFOUND) && self->mydb->moduleFlags.getReturnsNone) { Py_INCREF(Py_None); retval = Py_None; } else if (makeDBError(err)) { retval = NULL; } else { retval = Py_BuildValue("s#", key.data, key.size); FREE_DBT(key); } return retval; } /* --------------------------------------------------------------------- */ /* DBEnv methods */ static PyObject* DBEnv_close(DBEnvObject* self, PyObject* args) { int err, flags = 0; if (!PyArg_ParseTuple(args, "|i:close", &flags)) return NULL; if (!self->closed) { /* Don't close more than once */ MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->close(self->db_env, flags); MYDB_END_ALLOW_THREADS; /* after calling DBEnv->close, regardless of error, this DBEnv * may not be accessed again (BerkeleyDB docs). */ self->closed = 1; self->db_env = NULL; RETURN_IF_ERR(); } RETURN_NONE(); } static PyObject* DBEnv_open(DBEnvObject* self, PyObject* args) { int err, flags=0, mode=0660; char *db_home; if (!PyArg_ParseTuple(args, "z|ii:open", &db_home, &flags, &mode)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->open(self->db_env, db_home, flags, mode); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); self->closed = 0; self->flags = flags; RETURN_NONE(); } static PyObject* DBEnv_remove(DBEnvObject* self, PyObject* args) { int err, flags=0; char *db_home; if (!PyArg_ParseTuple(args, "s|i:remove", &db_home, &flags)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->remove(self->db_env, db_home, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #if (DBVER >= 41) static PyObject* DBEnv_dbremove(DBEnvObject* self, PyObject* args, PyObject* kwargs) { int err; u_int32_t flags=0; char *file = NULL; char *database = NULL; PyObject *txnobj = NULL; DB_TXN *txn = NULL; char* kwnames[] = { "file", "database", "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "ss|Oi:dbremove", kwnames, &file, &database, &txnobj, &flags)) { return NULL; } if (!checkTxnObj(txnobj, &txn)) { return NULL; } CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->dbremove(self->db_env, txn, file, database, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_dbrename(DBEnvObject* self, PyObject* args, PyObject* kwargs) { int err; u_int32_t flags=0; char *file = NULL; char *database = NULL; char *newname = NULL; PyObject *txnobj = NULL; DB_TXN *txn = NULL; char* kwnames[] = { "file", "database", "newname", "txn", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "sss|Oi:dbrename", kwnames, &file, &database, &newname, &txnobj, &flags)) { return NULL; } if (!checkTxnObj(txnobj, &txn)) { return NULL; } CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->dbrename(self->db_env, txn, file, database, newname, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_encrypt(DBEnvObject* self, PyObject* args, PyObject* kwargs) { int err; u_int32_t flags=0; char *passwd = NULL; char* kwnames[] = { "passwd", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "s|i:set_encrypt", kwnames, &passwd, &flags)) { return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_encrypt(self->db_env, passwd, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #endif /* DBVER >= 41 */ #if (DBVER >= 40) static PyObject* DBEnv_set_timeout(DBEnvObject* self, PyObject* args, PyObject* kwargs) { int err; u_int32_t flags=0; u_int32_t timeout = 0; char* kwnames[] = { "timeout", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "ii:set_timeout", kwnames, &timeout, &flags)) { return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_timeout(self->db_env, (db_timeout_t)timeout, flags); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #endif /* DBVER >= 40 */ static PyObject* DBEnv_set_shm_key(DBEnvObject* self, PyObject* args) { int err; long shm_key = 0; if (!PyArg_ParseTuple(args, "l:set_shm_key", &shm_key)) return NULL; CHECK_ENV_NOT_CLOSED(self); err = self->db_env->set_shm_key(self->db_env, shm_key); RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_cachesize(DBEnvObject* self, PyObject* args) { int err, gbytes=0, bytes=0, ncache=0; if (!PyArg_ParseTuple(args, "ii|i:set_cachesize", &gbytes, &bytes, &ncache)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_cachesize(self->db_env, gbytes, bytes, ncache); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #if (DBVER >= 32) static PyObject* DBEnv_set_flags(DBEnvObject* self, PyObject* args) { int err, flags=0, onoff=0; if (!PyArg_ParseTuple(args, "ii:set_flags", &flags, &onoff)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_flags(self->db_env, flags, onoff); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #endif static PyObject* DBEnv_set_data_dir(DBEnvObject* self, PyObject* args) { int err; char *dir; if (!PyArg_ParseTuple(args, "s:set_data_dir", &dir)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_data_dir(self->db_env, dir); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_lg_bsize(DBEnvObject* self, PyObject* args) { int err, lg_bsize; if (!PyArg_ParseTuple(args, "i:set_lg_bsize", &lg_bsize)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lg_bsize(self->db_env, lg_bsize); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_lg_dir(DBEnvObject* self, PyObject* args) { int err; char *dir; if (!PyArg_ParseTuple(args, "s:set_lg_dir", &dir)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lg_dir(self->db_env, dir); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_lg_max(DBEnvObject* self, PyObject* args) { int err, lg_max; if (!PyArg_ParseTuple(args, "i:set_lg_max", &lg_max)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lg_max(self->db_env, lg_max); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_lk_detect(DBEnvObject* self, PyObject* args) { int err, lk_detect; if (!PyArg_ParseTuple(args, "i:set_lk_detect", &lk_detect)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lk_detect(self->db_env, lk_detect); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_lk_max(DBEnvObject* self, PyObject* args) { int err, max; if (!PyArg_ParseTuple(args, "i:set_lk_max", &max)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lk_max(self->db_env, max); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #if (DBVER >= 32) static PyObject* DBEnv_set_lk_max_locks(DBEnvObject* self, PyObject* args) { int err, max; if (!PyArg_ParseTuple(args, "i:set_lk_max_locks", &max)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lk_max_locks(self->db_env, max); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_lk_max_lockers(DBEnvObject* self, PyObject* args) { int err, max; if (!PyArg_ParseTuple(args, "i:set_lk_max_lockers", &max)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lk_max_lockers(self->db_env, max); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_lk_max_objects(DBEnvObject* self, PyObject* args) { int err, max; if (!PyArg_ParseTuple(args, "i:set_lk_max_objects", &max)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_lk_max_objects(self->db_env, max); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } #endif static PyObject* DBEnv_set_mp_mmapsize(DBEnvObject* self, PyObject* args) { int err, mp_mmapsize; if (!PyArg_ParseTuple(args, "i:set_mp_mmapsize", &mp_mmapsize)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_mp_mmapsize(self->db_env, mp_mmapsize); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_tmp_dir(DBEnvObject* self, PyObject* args) { int err; char *dir; if (!PyArg_ParseTuple(args, "s:set_tmp_dir", &dir)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_tmp_dir(self->db_env, dir); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_txn_begin(DBEnvObject* self, PyObject* args, PyObject* kwargs) { int flags = 0; PyObject* txnobj = NULL; DB_TXN *txn = NULL; char* kwnames[] = { "parent", "flags", NULL }; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "|Oi:txn_begin", kwnames, &txnobj, &flags)) return NULL; if (!checkTxnObj(txnobj, &txn)) return NULL; CHECK_ENV_NOT_CLOSED(self); return (PyObject*)newDBTxnObject(self, txn, flags); } static PyObject* DBEnv_txn_checkpoint(DBEnvObject* self, PyObject* args) { int err, kbyte=0, min=0, flags=0; if (!PyArg_ParseTuple(args, "|iii:txn_checkpoint", &kbyte, &min, &flags)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->db_env->txn_checkpoint(self->db_env, kbyte, min, flags); #else err = txn_checkpoint(self->db_env, kbyte, min, flags); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_set_tx_max(DBEnvObject* self, PyObject* args) { int err, max; if (!PyArg_ParseTuple(args, "i:set_tx_max", &max)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; err = self->db_env->set_tx_max(self->db_env, max); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_lock_detect(DBEnvObject* self, PyObject* args) { int err, atype, flags=0; int aborted = 0; if (!PyArg_ParseTuple(args, "i|i:lock_detect", &atype, &flags)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->db_env->lock_detect(self->db_env, flags, atype, &aborted); #else err = lock_detect(self->db_env, flags, atype, &aborted); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return PyInt_FromLong(aborted); } static PyObject* DBEnv_lock_get(DBEnvObject* self, PyObject* args) { int flags=0; int locker, lock_mode; DBT obj; PyObject* objobj; if (!PyArg_ParseTuple(args, "iOi|i:lock_get", &locker, &objobj, &lock_mode, &flags)) return NULL; if (!make_dbt(objobj, &obj)) return NULL; return (PyObject*)newDBLockObject(self, locker, &obj, lock_mode, flags); } static PyObject* DBEnv_lock_id(DBEnvObject* self, PyObject* args) { int err; u_int32_t theID; if (!PyArg_ParseTuple(args, ":lock_id")) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->db_env->lock_id(self->db_env, &theID); #else err = lock_id(self->db_env, &theID); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); return PyInt_FromLong((long)theID); } static PyObject* DBEnv_lock_put(DBEnvObject* self, PyObject* args) { int err; DBLockObject* dblockobj; if (!PyArg_ParseTuple(args, "O!:lock_put", &DBLock_Type, &dblockobj)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->db_env->lock_put(self->db_env, &dblockobj->lock); #else err = lock_put(self->db_env, &dblockobj->lock); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBEnv_lock_stat(DBEnvObject* self, PyObject* args) { int err; DB_LOCK_STAT* sp; PyObject* d = NULL; u_int32_t flags = 0; if (!PyArg_ParseTuple(args, "|i:lock_stat", &flags)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->db_env->lock_stat(self->db_env, &sp, flags); #else #if (DBVER >= 33) err = lock_stat(self->db_env, &sp); #else err = lock_stat(self->db_env, &sp, NULL); #endif #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); /* Turn the stat structure into a dictionary */ d = PyDict_New(); if (d == NULL) { free(sp); return NULL; } #define MAKE_ENTRY(name) _addIntToDict(d, #name, sp->st_##name) #if (DBVER < 41) MAKE_ENTRY(lastid); #endif MAKE_ENTRY(nmodes); #if (DBVER >= 32) MAKE_ENTRY(maxlocks); MAKE_ENTRY(maxlockers); MAKE_ENTRY(maxobjects); MAKE_ENTRY(nlocks); MAKE_ENTRY(maxnlocks); #endif MAKE_ENTRY(nlockers); MAKE_ENTRY(maxnlockers); #if (DBVER >= 32) MAKE_ENTRY(nobjects); MAKE_ENTRY(maxnobjects); #endif MAKE_ENTRY(nrequests); MAKE_ENTRY(nreleases); MAKE_ENTRY(nnowaits); MAKE_ENTRY(nconflicts); MAKE_ENTRY(ndeadlocks); MAKE_ENTRY(regsize); MAKE_ENTRY(region_wait); MAKE_ENTRY(region_nowait); #undef MAKE_ENTRY free(sp); return d; } static PyObject* DBEnv_log_archive(DBEnvObject* self, PyObject* args) { int flags=0; int err; char **log_list_start, **log_list; PyObject* list; PyObject* item = NULL; if (!PyArg_ParseTuple(args, "|i:log_archive", &flags)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->db_env->log_archive(self->db_env, &log_list, flags); #elif (DBVER == 33) err = log_archive(self->db_env, &log_list, flags); #else err = log_archive(self->db_env, &log_list, flags, NULL); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); list = PyList_New(0); if (list == NULL) { PyErr_SetString(PyExc_MemoryError, "PyList_New failed"); return NULL; } if (log_list) { for (log_list_start = log_list; *log_list != NULL; ++log_list) { item = PyString_FromString (*log_list); if (item == NULL) { Py_DECREF(list); PyErr_SetString(PyExc_MemoryError, "List item creation failed"); list = NULL; break; } PyList_Append(list, item); Py_DECREF(item); } free(log_list_start); } return list; } static PyObject* DBEnv_txn_stat(DBEnvObject* self, PyObject* args) { int err; DB_TXN_STAT* sp; PyObject* d = NULL; u_int32_t flags=0; if (!PyArg_ParseTuple(args, "|i:txn_stat", &flags)) return NULL; CHECK_ENV_NOT_CLOSED(self); MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->db_env->txn_stat(self->db_env, &sp, flags); #elif (DBVER == 33) err = txn_stat(self->db_env, &sp); #else err = txn_stat(self->db_env, &sp, NULL); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); /* Turn the stat structure into a dictionary */ d = PyDict_New(); if (d == NULL) { free(sp); return NULL; } #define MAKE_ENTRY(name) _addIntToDict(d, #name, sp->st_##name) MAKE_ENTRY(time_ckp); MAKE_ENTRY(last_txnid); MAKE_ENTRY(maxtxns); MAKE_ENTRY(nactive); MAKE_ENTRY(maxnactive); MAKE_ENTRY(nbegins); MAKE_ENTRY(naborts); MAKE_ENTRY(ncommits); MAKE_ENTRY(regsize); MAKE_ENTRY(region_wait); MAKE_ENTRY(region_nowait); #undef MAKE_ENTRY free(sp); return d; } static PyObject* DBEnv_set_get_returns_none(DBEnvObject* self, PyObject* args) { int flags=0; int oldValue=0; if (!PyArg_ParseTuple(args,"i:set_get_returns_none", &flags)) return NULL; CHECK_ENV_NOT_CLOSED(self); if (self->moduleFlags.getReturnsNone) ++oldValue; if (self->moduleFlags.cursorSetReturnsNone) ++oldValue; self->moduleFlags.getReturnsNone = (flags >= 1); self->moduleFlags.cursorSetReturnsNone = (flags >= 2); return PyInt_FromLong(oldValue); } /* --------------------------------------------------------------------- */ /* DBTxn methods */ static PyObject* DBTxn_commit(DBTxnObject* self, PyObject* args) { int flags=0, err; DB_TXN *txn; if (!PyArg_ParseTuple(args, "|i:commit", &flags)) return NULL; if (!self->txn) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "DBTxn must not be used after txn_commit or txn_abort")); return NULL; } txn = self->txn; self->txn = NULL; /* this DB_TXN is no longer valid after this call */ MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = txn->commit(txn, flags); #else err = txn_commit(txn, flags); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBTxn_prepare(DBTxnObject* self, PyObject* args) { #if (DBVER >= 33) int err; char* gid=NULL; int gid_size=0; if (!PyArg_ParseTuple(args, "s#:prepare", &gid, &gid_size)) return NULL; if (gid_size != DB_XIDDATASIZE) { PyErr_SetString(PyExc_TypeError, "gid must be DB_XIDDATASIZE bytes long"); return NULL; } if (!self->txn) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "DBTxn must not be used after txn_commit or txn_abort")); return NULL; } MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = self->txn->prepare(self->txn, (u_int8_t*)gid); #else err = txn_prepare(self->txn, (u_int8_t*)gid); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); #else int err; if (!PyArg_ParseTuple(args, ":prepare")) return NULL; if (!self->txn) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "DBTxn must not be used after txn_commit or txn_abort")); return NULL; } MYDB_BEGIN_ALLOW_THREADS; err = txn_prepare(self->txn); MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); #endif } static PyObject* DBTxn_abort(DBTxnObject* self, PyObject* args) { int err; DB_TXN *txn; if (!PyArg_ParseTuple(args, ":abort")) return NULL; if (!self->txn) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "DBTxn must not be used after txn_commit or txn_abort")); return NULL; } txn = self->txn; self->txn = NULL; /* this DB_TXN is no longer valid after this call */ MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) err = txn->abort(txn); #else err = txn_abort(txn); #endif MYDB_END_ALLOW_THREADS; RETURN_IF_ERR(); RETURN_NONE(); } static PyObject* DBTxn_id(DBTxnObject* self, PyObject* args) { int id; if (!PyArg_ParseTuple(args, ":id")) return NULL; if (!self->txn) { PyErr_SetObject(DBError, Py_BuildValue("(is)", 0, "DBTxn must not be used after txn_commit or txn_abort")); return NULL; } MYDB_BEGIN_ALLOW_THREADS; #if (DBVER >= 40) id = self->txn->id(self->txn); #else id = txn_id(self->txn); #endif MYDB_END_ALLOW_THREADS; return PyInt_FromLong(id); } /* --------------------------------------------------------------------- */ /* Method definition tables and type objects */ static PyMethodDef DB_methods[] = { {"append", (PyCFunction)DB_append, METH_VARARGS}, #if (DBVER >= 33) {"associate", (PyCFunction)DB_associate, METH_VARARGS|METH_KEYWORDS}, #endif {"close", (PyCFunction)DB_close, METH_VARARGS}, #if (DBVER >= 32) {"consume", (PyCFunction)DB_consume, METH_VARARGS|METH_KEYWORDS}, {"consume_wait", (PyCFunction)DB_consume_wait, METH_VARARGS|METH_KEYWORDS}, #endif {"cursor", (PyCFunction)DB_cursor, METH_VARARGS|METH_KEYWORDS}, {"delete", (PyCFunction)DB_delete, METH_VARARGS|METH_KEYWORDS}, {"fd", (PyCFunction)DB_fd, METH_VARARGS}, {"get", (PyCFunction)DB_get, METH_VARARGS|METH_KEYWORDS}, {"get_both", (PyCFunction)DB_get_both, METH_VARARGS|METH_KEYWORDS}, {"get_byteswapped", (PyCFunction)DB_get_byteswapped,METH_VARARGS}, {"get_size", (PyCFunction)DB_get_size, METH_VARARGS|METH_KEYWORDS}, {"get_type", (PyCFunction)DB_get_type, METH_VARARGS}, {"join", (PyCFunction)DB_join, METH_VARARGS}, {"key_range", (PyCFunction)DB_key_range, METH_VARARGS|METH_KEYWORDS}, {"has_key", (PyCFunction)DB_has_key, METH_VARARGS}, {"items", (PyCFunction)DB_items, METH_VARARGS}, {"keys", (PyCFunction)DB_keys, METH_VARARGS}, {"open", (PyCFunction)DB_open, METH_VARARGS|METH_KEYWORDS}, {"put", (PyCFunction)DB_put, METH_VARARGS|METH_KEYWORDS}, {"remove", (PyCFunction)DB_remove, METH_VARARGS|METH_KEYWORDS}, {"rename", (PyCFunction)DB_rename, METH_VARARGS}, {"set_bt_minkey", (PyCFunction)DB_set_bt_minkey, METH_VARARGS}, {"set_cachesize", (PyCFunction)DB_set_cachesize, METH_VARARGS}, #if (DBVER >= 41) {"set_encrypt", (PyCFunction)DB_set_encrypt, METH_VARARGS|METH_KEYWORDS}, #endif {"set_flags", (PyCFunction)DB_set_flags, METH_VARARGS}, {"set_h_ffactor", (PyCFunction)DB_set_h_ffactor, METH_VARARGS}, {"set_h_nelem", (PyCFunction)DB_set_h_nelem, METH_VARARGS}, {"set_lorder", (PyCFunction)DB_set_lorder, METH_VARARGS}, {"set_pagesize", (PyCFunction)DB_set_pagesize, METH_VARARGS}, {"set_re_delim", (PyCFunction)DB_set_re_delim, METH_VARARGS}, {"set_re_len", (PyCFunction)DB_set_re_len, METH_VARARGS}, {"set_re_pad", (PyCFunction)DB_set_re_pad, METH_VARARGS}, {"set_re_source", (PyCFunction)DB_set_re_source, METH_VARARGS}, #if (DBVER >= 32) {"set_q_extentsize",(PyCFunction)DB_set_q_extentsize,METH_VARARGS}, #endif {"stat", (PyCFunction)DB_stat, METH_VARARGS}, {"sync", (PyCFunction)DB_sync, METH_VARARGS}, #if (DBVER >= 33) {"truncate", (PyCFunction)DB_truncate, METH_VARARGS|METH_KEYWORDS}, #endif {"type", (PyCFunction)DB_get_type, METH_VARARGS}, {"upgrade", (PyCFunction)DB_upgrade, METH_VARARGS}, {"values", (PyCFunction)DB_values, METH_VARARGS}, {"verify", (PyCFunction)DB_verify, METH_VARARGS|METH_KEYWORDS}, {"set_get_returns_none",(PyCFunction)DB_set_get_returns_none, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static PyMappingMethods DB_mapping = { (inquiry)DB_length, /*mp_length*/ (binaryfunc)DB_subscript, /*mp_subscript*/ (objobjargproc)DB_ass_sub, /*mp_ass_subscript*/ }; static PyMethodDef DBCursor_methods[] = { {"close", (PyCFunction)DBC_close, METH_VARARGS}, {"count", (PyCFunction)DBC_count, METH_VARARGS}, {"current", (PyCFunction)DBC_current, METH_VARARGS|METH_KEYWORDS}, {"delete", (PyCFunction)DBC_delete, METH_VARARGS}, {"dup", (PyCFunction)DBC_dup, METH_VARARGS}, {"first", (PyCFunction)DBC_first, METH_VARARGS|METH_KEYWORDS}, {"get", (PyCFunction)DBC_get, METH_VARARGS|METH_KEYWORDS}, {"get_recno", (PyCFunction)DBC_get_recno, METH_VARARGS}, {"last", (PyCFunction)DBC_last, METH_VARARGS|METH_KEYWORDS}, {"next", (PyCFunction)DBC_next, METH_VARARGS|METH_KEYWORDS}, {"prev", (PyCFunction)DBC_prev, METH_VARARGS|METH_KEYWORDS}, {"put", (PyCFunction)DBC_put, METH_VARARGS|METH_KEYWORDS}, {"set", (PyCFunction)DBC_set, METH_VARARGS|METH_KEYWORDS}, {"set_range", (PyCFunction)DBC_set_range, METH_VARARGS|METH_KEYWORDS}, {"get_both", (PyCFunction)DBC_get_both, METH_VARARGS}, {"set_both", (PyCFunction)DBC_set_both, METH_VARARGS}, {"set_recno", (PyCFunction)DBC_set_recno, METH_VARARGS|METH_KEYWORDS}, {"consume", (PyCFunction)DBC_consume, METH_VARARGS|METH_KEYWORDS}, {"next_dup", (PyCFunction)DBC_next_dup, METH_VARARGS|METH_KEYWORDS}, {"next_nodup", (PyCFunction)DBC_next_nodup, METH_VARARGS|METH_KEYWORDS}, {"prev_nodup", (PyCFunction)DBC_prev_nodup, METH_VARARGS|METH_KEYWORDS}, {"join_item", (PyCFunction)DBC_join_item, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static PyMethodDef DBEnv_methods[] = { {"close", (PyCFunction)DBEnv_close, METH_VARARGS}, {"open", (PyCFunction)DBEnv_open, METH_VARARGS}, {"remove", (PyCFunction)DBEnv_remove, METH_VARARGS}, #if (DBVER >= 41) {"dbremove", (PyCFunction)DBEnv_dbremove, METH_VARARGS|METH_KEYWORDS}, {"dbrename", (PyCFunction)DBEnv_dbrename, METH_VARARGS|METH_KEYWORDS}, {"set_encrypt", (PyCFunction)DBEnv_set_encrypt, METH_VARARGS|METH_KEYWORDS}, #endif #if (DBVER >= 40) {"set_timeout", (PyCFunction)DBEnv_set_timeout, METH_VARARGS|METH_KEYWORDS}, #endif {"set_shm_key", (PyCFunction)DBEnv_set_shm_key, METH_VARARGS}, {"set_cachesize", (PyCFunction)DBEnv_set_cachesize, METH_VARARGS}, {"set_data_dir", (PyCFunction)DBEnv_set_data_dir, METH_VARARGS}, #if (DBVER >= 32) {"set_flags", (PyCFunction)DBEnv_set_flags, METH_VARARGS}, #endif {"set_lg_bsize", (PyCFunction)DBEnv_set_lg_bsize, METH_VARARGS}, {"set_lg_dir", (PyCFunction)DBEnv_set_lg_dir, METH_VARARGS}, {"set_lg_max", (PyCFunction)DBEnv_set_lg_max, METH_VARARGS}, {"set_lk_detect", (PyCFunction)DBEnv_set_lk_detect, METH_VARARGS}, {"set_lk_max", (PyCFunction)DBEnv_set_lk_max, METH_VARARGS}, #if (DBVER >= 32) {"set_lk_max_locks", (PyCFunction)DBEnv_set_lk_max_locks, METH_VARARGS}, {"set_lk_max_lockers", (PyCFunction)DBEnv_set_lk_max_lockers, METH_VARARGS}, {"set_lk_max_objects", (PyCFunction)DBEnv_set_lk_max_objects, METH_VARARGS}, #endif {"set_mp_mmapsize", (PyCFunction)DBEnv_set_mp_mmapsize, METH_VARARGS}, {"set_tmp_dir", (PyCFunction)DBEnv_set_tmp_dir, METH_VARARGS}, {"txn_begin", (PyCFunction)DBEnv_txn_begin, METH_VARARGS|METH_KEYWORDS}, {"txn_checkpoint", (PyCFunction)DBEnv_txn_checkpoint, METH_VARARGS}, {"txn_stat", (PyCFunction)DBEnv_txn_stat, METH_VARARGS}, {"set_tx_max", (PyCFunction)DBEnv_set_tx_max, METH_VARARGS}, {"lock_detect", (PyCFunction)DBEnv_lock_detect, METH_VARARGS}, {"lock_get", (PyCFunction)DBEnv_lock_get, METH_VARARGS}, {"lock_id", (PyCFunction)DBEnv_lock_id, METH_VARARGS}, {"lock_put", (PyCFunction)DBEnv_lock_put, METH_VARARGS}, {"lock_stat", (PyCFunction)DBEnv_lock_stat, METH_VARARGS}, {"log_archive", (PyCFunction)DBEnv_log_archive, METH_VARARGS}, {"set_get_returns_none",(PyCFunction)DBEnv_set_get_returns_none, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static PyMethodDef DBTxn_methods[] = { {"commit", (PyCFunction)DBTxn_commit, METH_VARARGS}, {"prepare", (PyCFunction)DBTxn_prepare, METH_VARARGS}, {"abort", (PyCFunction)DBTxn_abort, METH_VARARGS}, {"id", (PyCFunction)DBTxn_id, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static PyObject* DB_getattr(DBObject* self, char *name) { return Py_FindMethod(DB_methods, (PyObject* )self, name); } static PyObject* DBEnv_getattr(DBEnvObject* self, char *name) { if (!strcmp(name, "db_home")) { CHECK_ENV_NOT_CLOSED(self); if (self->db_env->db_home == NULL) { RETURN_NONE(); } return PyString_FromString(self->db_env->db_home); } return Py_FindMethod(DBEnv_methods, (PyObject* )self, name); } static PyObject* DBCursor_getattr(DBCursorObject* self, char *name) { return Py_FindMethod(DBCursor_methods, (PyObject* )self, name); } static PyObject* DBTxn_getattr(DBTxnObject* self, char *name) { return Py_FindMethod(DBTxn_methods, (PyObject* )self, name); } static PyObject* DBLock_getattr(DBLockObject* self, char *name) { return NULL; } statichere PyTypeObject DB_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "DB", /*tp_name*/ sizeof(DBObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)DB_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)DB_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ &DB_mapping,/*tp_as_mapping*/ 0, /*tp_hash*/ }; statichere PyTypeObject DBCursor_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "DBCursor", /*tp_name*/ sizeof(DBCursorObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)DBCursor_dealloc,/*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)DBCursor_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; statichere PyTypeObject DBEnv_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "DBEnv", /*tp_name*/ sizeof(DBEnvObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)DBEnv_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)DBEnv_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; statichere PyTypeObject DBTxn_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "DBTxn", /*tp_name*/ sizeof(DBTxnObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)DBTxn_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)DBTxn_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; statichere PyTypeObject DBLock_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "DBLock", /*tp_name*/ sizeof(DBLockObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)DBLock_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)DBLock_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; /* --------------------------------------------------------------------- */ /* Module-level functions */ static PyObject* DB_construct(PyObject* self, PyObject* args, PyObject* kwargs) { PyObject* dbenvobj = NULL; int flags = 0; char* kwnames[] = { "dbEnv", "flags", NULL}; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "|Oi:DB", kwnames, &dbenvobj, &flags)) return NULL; if (dbenvobj == Py_None) dbenvobj = NULL; else if (dbenvobj && !DBEnvObject_Check(dbenvobj)) { makeTypeError("DBEnv", dbenvobj); return NULL; } return (PyObject* )newDBObject((DBEnvObject*)dbenvobj, flags); } static PyObject* DBEnv_construct(PyObject* self, PyObject* args) { int flags = 0; if (!PyArg_ParseTuple(args, "|i:DbEnv", &flags)) return NULL; return (PyObject* )newDBEnvObject(flags); } static char bsddb_version_doc[] = "Returns a tuple of major, minor, and patch release numbers of the\n\ underlying DB library."; static PyObject* bsddb_version(PyObject* self, PyObject* args) { int major, minor, patch; if (!PyArg_ParseTuple(args, ":version")) return NULL; db_version(&major, &minor, &patch); return Py_BuildValue("(iii)", major, minor, patch); } /* List of functions defined in the module */ static PyMethodDef bsddb_methods[] = { {"DB", (PyCFunction)DB_construct, METH_VARARGS | METH_KEYWORDS }, {"DBEnv", (PyCFunction)DBEnv_construct, METH_VARARGS}, {"version", (PyCFunction)bsddb_version, METH_VARARGS, bsddb_version_doc}, {NULL, NULL} /* sentinel */ }; /* --------------------------------------------------------------------- */ /* Module initialization */ /* Convenience routine to export an integer value. * Errors are silently ignored, for better or for worse... */ #define ADD_INT(dict, NAME) _addIntToDict(dict, #NAME, NAME) DL_EXPORT(void) init_bsddb(void) { PyObject* m; PyObject* d; PyObject* pybsddb_version_s = PyString_FromString( PY_BSDDB_VERSION ); PyObject* db_version_s = PyString_FromString( DB_VERSION_STRING ); PyObject* cvsid_s = PyString_FromString( rcs_id ); /* Initialize the type of the new type objects here; doing it here is required for portability to Windows without requiring C++. */ DB_Type.ob_type = &PyType_Type; DBCursor_Type.ob_type = &PyType_Type; DBEnv_Type.ob_type = &PyType_Type; DBTxn_Type.ob_type = &PyType_Type; DBLock_Type.ob_type = &PyType_Type; #if defined(WITH_THREAD) && !defined(MYDB_USE_GILSTATE) /* Save the current interpreter, so callbacks can do the right thing. */ _db_interpreterState = PyThreadState_Get()->interp; #endif /* Create the module and add the functions */ m = Py_InitModule("_bsddb", bsddb_methods); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); PyDict_SetItemString(d, "__version__", pybsddb_version_s); PyDict_SetItemString(d, "cvsid", cvsid_s); PyDict_SetItemString(d, "DB_VERSION_STRING", db_version_s); Py_DECREF(pybsddb_version_s); pybsddb_version_s = NULL; Py_DECREF(cvsid_s); cvsid_s = NULL; Py_DECREF(db_version_s); db_version_s = NULL; ADD_INT(d, DB_VERSION_MAJOR); ADD_INT(d, DB_VERSION_MINOR); ADD_INT(d, DB_VERSION_PATCH); ADD_INT(d, DB_MAX_PAGES); ADD_INT(d, DB_MAX_RECORDS); #if (DBVER >= 42) ADD_INT(d, DB_RPCCLIENT); #else ADD_INT(d, DB_CLIENT); /* allow apps to be written using DB_RPCCLIENT on older BerkeleyDB */ _addIntToDict(d, "DB_RPCCLIENT", DB_CLIENT); #endif ADD_INT(d, DB_XA_CREATE); ADD_INT(d, DB_CREATE); ADD_INT(d, DB_NOMMAP); ADD_INT(d, DB_THREAD); ADD_INT(d, DB_FORCE); ADD_INT(d, DB_INIT_CDB); ADD_INT(d, DB_INIT_LOCK); ADD_INT(d, DB_INIT_LOG); ADD_INT(d, DB_INIT_MPOOL); ADD_INT(d, DB_INIT_TXN); #if (DBVER >= 32) ADD_INT(d, DB_JOINENV); #endif ADD_INT(d, DB_RECOVER); ADD_INT(d, DB_RECOVER_FATAL); ADD_INT(d, DB_TXN_NOSYNC); ADD_INT(d, DB_USE_ENVIRON); ADD_INT(d, DB_USE_ENVIRON_ROOT); ADD_INT(d, DB_LOCKDOWN); ADD_INT(d, DB_PRIVATE); ADD_INT(d, DB_SYSTEM_MEM); ADD_INT(d, DB_TXN_SYNC); ADD_INT(d, DB_TXN_NOWAIT); ADD_INT(d, DB_EXCL); ADD_INT(d, DB_FCNTL_LOCKING); ADD_INT(d, DB_ODDFILESIZE); ADD_INT(d, DB_RDWRMASTER); ADD_INT(d, DB_RDONLY); ADD_INT(d, DB_TRUNCATE); #if (DBVER >= 32) ADD_INT(d, DB_EXTENT); ADD_INT(d, DB_CDB_ALLDB); ADD_INT(d, DB_VERIFY); #endif ADD_INT(d, DB_UPGRADE); ADD_INT(d, DB_AGGRESSIVE); ADD_INT(d, DB_NOORDERCHK); ADD_INT(d, DB_ORDERCHKONLY); ADD_INT(d, DB_PR_PAGE); #if ! (DBVER >= 33) ADD_INT(d, DB_VRFY_FLAGMASK); ADD_INT(d, DB_PR_HEADERS); #endif ADD_INT(d, DB_PR_RECOVERYTEST); ADD_INT(d, DB_SALVAGE); ADD_INT(d, DB_LOCK_NORUN); ADD_INT(d, DB_LOCK_DEFAULT); ADD_INT(d, DB_LOCK_OLDEST); ADD_INT(d, DB_LOCK_RANDOM); ADD_INT(d, DB_LOCK_YOUNGEST); #if (DBVER >= 33) ADD_INT(d, DB_LOCK_MAXLOCKS); ADD_INT(d, DB_LOCK_MINLOCKS); ADD_INT(d, DB_LOCK_MINWRITE); #endif #if (DBVER >= 33) /* docs say to use zero instead */ _addIntToDict(d, "DB_LOCK_CONFLICT", 0); #else ADD_INT(d, DB_LOCK_CONFLICT); #endif ADD_INT(d, DB_LOCK_DUMP); ADD_INT(d, DB_LOCK_GET); ADD_INT(d, DB_LOCK_INHERIT); ADD_INT(d, DB_LOCK_PUT); ADD_INT(d, DB_LOCK_PUT_ALL); ADD_INT(d, DB_LOCK_PUT_OBJ); ADD_INT(d, DB_LOCK_NG); ADD_INT(d, DB_LOCK_READ); ADD_INT(d, DB_LOCK_WRITE); ADD_INT(d, DB_LOCK_NOWAIT); #if (DBVER >= 32) ADD_INT(d, DB_LOCK_WAIT); #endif ADD_INT(d, DB_LOCK_IWRITE); ADD_INT(d, DB_LOCK_IREAD); ADD_INT(d, DB_LOCK_IWR); #if (DBVER >= 33) ADD_INT(d, DB_LOCK_DIRTY); ADD_INT(d, DB_LOCK_WWRITE); #endif ADD_INT(d, DB_LOCK_RECORD); ADD_INT(d, DB_LOCK_UPGRADE); #if (DBVER >= 32) ADD_INT(d, DB_LOCK_SWITCH); #endif #if (DBVER >= 33) ADD_INT(d, DB_LOCK_UPGRADE_WRITE); #endif ADD_INT(d, DB_LOCK_NOWAIT); ADD_INT(d, DB_LOCK_RECORD); ADD_INT(d, DB_LOCK_UPGRADE); #if (DBVER >= 33) ADD_INT(d, DB_LSTAT_ABORTED); ADD_INT(d, DB_LSTAT_ERR); ADD_INT(d, DB_LSTAT_FREE); ADD_INT(d, DB_LSTAT_HELD); #if (DBVER == 33) ADD_INT(d, DB_LSTAT_NOGRANT); #endif ADD_INT(d, DB_LSTAT_PENDING); ADD_INT(d, DB_LSTAT_WAITING); #endif ADD_INT(d, DB_ARCH_ABS); ADD_INT(d, DB_ARCH_DATA); ADD_INT(d, DB_ARCH_LOG); ADD_INT(d, DB_BTREE); ADD_INT(d, DB_HASH); ADD_INT(d, DB_RECNO); ADD_INT(d, DB_QUEUE); ADD_INT(d, DB_UNKNOWN); ADD_INT(d, DB_DUP); ADD_INT(d, DB_DUPSORT); ADD_INT(d, DB_RECNUM); ADD_INT(d, DB_RENUMBER); ADD_INT(d, DB_REVSPLITOFF); ADD_INT(d, DB_SNAPSHOT); ADD_INT(d, DB_JOIN_NOSORT); ADD_INT(d, DB_AFTER); ADD_INT(d, DB_APPEND); ADD_INT(d, DB_BEFORE); ADD_INT(d, DB_CACHED_COUNTS); #if (DBVER >= 41) _addIntToDict(d, "DB_CHECKPOINT", 0); #else ADD_INT(d, DB_CHECKPOINT); ADD_INT(d, DB_CURLSN); #endif #if ((DBVER >= 33) && (DBVER <= 41)) ADD_INT(d, DB_COMMIT); #endif ADD_INT(d, DB_CONSUME); #if (DBVER >= 32) ADD_INT(d, DB_CONSUME_WAIT); #endif ADD_INT(d, DB_CURRENT); #if (DBVER >= 33) ADD_INT(d, DB_FAST_STAT); #endif ADD_INT(d, DB_FIRST); ADD_INT(d, DB_FLUSH); ADD_INT(d, DB_GET_BOTH); ADD_INT(d, DB_GET_RECNO); ADD_INT(d, DB_JOIN_ITEM); ADD_INT(d, DB_KEYFIRST); ADD_INT(d, DB_KEYLAST); ADD_INT(d, DB_LAST); ADD_INT(d, DB_NEXT); ADD_INT(d, DB_NEXT_DUP); ADD_INT(d, DB_NEXT_NODUP); ADD_INT(d, DB_NODUPDATA); ADD_INT(d, DB_NOOVERWRITE); ADD_INT(d, DB_NOSYNC); ADD_INT(d, DB_POSITION); ADD_INT(d, DB_PREV); ADD_INT(d, DB_PREV_NODUP); ADD_INT(d, DB_RECORDCOUNT); ADD_INT(d, DB_SET); ADD_INT(d, DB_SET_RANGE); ADD_INT(d, DB_SET_RECNO); ADD_INT(d, DB_WRITECURSOR); ADD_INT(d, DB_OPFLAGS_MASK); ADD_INT(d, DB_RMW); #if (DBVER >= 33) ADD_INT(d, DB_DIRTY_READ); ADD_INT(d, DB_MULTIPLE); ADD_INT(d, DB_MULTIPLE_KEY); #endif #if (DBVER >= 33) ADD_INT(d, DB_DONOTINDEX); #endif #if (DBVER >= 41) _addIntToDict(d, "DB_INCOMPLETE", 0); #else ADD_INT(d, DB_INCOMPLETE); #endif ADD_INT(d, DB_KEYEMPTY); ADD_INT(d, DB_KEYEXIST); ADD_INT(d, DB_LOCK_DEADLOCK); ADD_INT(d, DB_LOCK_NOTGRANTED); ADD_INT(d, DB_NOSERVER); ADD_INT(d, DB_NOSERVER_HOME); ADD_INT(d, DB_NOSERVER_ID); ADD_INT(d, DB_NOTFOUND); ADD_INT(d, DB_OLD_VERSION); ADD_INT(d, DB_RUNRECOVERY); ADD_INT(d, DB_VERIFY_BAD); #if (DBVER >= 33) ADD_INT(d, DB_PAGE_NOTFOUND); ADD_INT(d, DB_SECONDARY_BAD); #endif #if (DBVER >= 40) ADD_INT(d, DB_STAT_CLEAR); ADD_INT(d, DB_REGION_INIT); ADD_INT(d, DB_NOLOCKING); ADD_INT(d, DB_YIELDCPU); ADD_INT(d, DB_PANIC_ENVIRONMENT); ADD_INT(d, DB_NOPANIC); #endif #if (DBVER >= 42) ADD_INT(d, DB_TIME_NOTGRANTED); ADD_INT(d, DB_TXN_NOT_DURABLE); ADD_INT(d, DB_TXN_WRITE_NOSYNC); ADD_INT(d, DB_LOG_AUTOREMOVE); ADD_INT(d, DB_DIRECT_LOG); ADD_INT(d, DB_DIRECT_DB); ADD_INT(d, DB_INIT_REP); ADD_INT(d, DB_ENCRYPT); ADD_INT(d, DB_CHKSUM); #endif #if (DBVER >= 41) ADD_INT(d, DB_ENCRYPT_AES); ADD_INT(d, DB_AUTO_COMMIT); #else /* allow berkeleydb 4.1 aware apps to run on older versions */ _addIntToDict(d, "DB_AUTO_COMMIT", 0); #endif ADD_INT(d, EINVAL); ADD_INT(d, EACCES); ADD_INT(d, ENOSPC); ADD_INT(d, ENOMEM); ADD_INT(d, EAGAIN); ADD_INT(d, EBUSY); ADD_INT(d, EEXIST); ADD_INT(d, ENOENT); ADD_INT(d, EPERM); #if (DBVER >= 40) ADD_INT(d, DB_SET_LOCK_TIMEOUT); ADD_INT(d, DB_SET_TXN_TIMEOUT); #endif /* The base exception class is DBError */ DBError = PyErr_NewException("bsddb._db.DBError", NULL, NULL); PyDict_SetItemString(d, "DBError", DBError); /* Some magic to make DBNotFoundError derive from both DBError and KeyError, since the API only supports using one base class. */ PyDict_SetItemString(d, "KeyError", PyExc_KeyError); PyRun_String("class DBNotFoundError(DBError, KeyError): pass", Py_file_input, d, d); DBNotFoundError = PyDict_GetItemString(d, "DBNotFoundError"); PyDict_DelItemString(d, "KeyError"); /* All the rest of the exceptions derive only from DBError */ #define MAKE_EX(name) name = PyErr_NewException("bsddb._db." #name, DBError, NULL); \ PyDict_SetItemString(d, #name, name) #if !INCOMPLETE_IS_WARNING MAKE_EX(DBIncompleteError); #endif MAKE_EX(DBKeyEmptyError); MAKE_EX(DBKeyExistError); MAKE_EX(DBLockDeadlockError); MAKE_EX(DBLockNotGrantedError); MAKE_EX(DBOldVersionError); MAKE_EX(DBRunRecoveryError); MAKE_EX(DBVerifyBadError); MAKE_EX(DBNoServerError); MAKE_EX(DBNoServerHomeError); MAKE_EX(DBNoServerIDError); #if (DBVER >= 33) MAKE_EX(DBPageNotFoundError); MAKE_EX(DBSecondaryBadError); #endif MAKE_EX(DBInvalidArgError); MAKE_EX(DBAccessError); MAKE_EX(DBNoSpaceError); MAKE_EX(DBNoMemoryError); MAKE_EX(DBAgainError); MAKE_EX(DBBusyError); MAKE_EX(DBFileExistsError); MAKE_EX(DBNoSuchFileError); MAKE_EX(DBPermissionsError); #undef MAKE_EX /* Check for errors */ if (PyErr_Occurred()) { PyErr_Print(); Py_FatalError("can't initialize module _bsddb"); } } Python-2.3.7/Modules/cryptmodule.c0000644001241000117560000000214107522367001016373 0ustar loewishpifb6/* cryptmodule.c - by Steve Majewski */ #include "Python.h" #include /* Module crypt */ static PyObject *crypt_crypt(PyObject *self, PyObject *args) { char *word, *salt; extern char * crypt(const char *, const char *); if (!PyArg_ParseTuple(args, "ss:crypt", &word, &salt)) { return NULL; } /* On some platforms (AtheOS) crypt returns NULL for an invalid salt. Return None in that case. XXX Maybe raise an exception? */ return Py_BuildValue("s", crypt(word, salt)); } PyDoc_STRVAR(crypt_crypt__doc__, "crypt(word, salt) -> string\n\ word will usually be a user's password. salt is a 2-character string\n\ which will be used to select one of 4096 variations of DES. The characters\n\ in salt must be either \".\", \"/\", or an alphanumeric character. Returns\n\ the hashed password as a string, which will be composed of characters from\n\ the same alphabet as the salt."); static PyMethodDef crypt_methods[] = { {"crypt", crypt_crypt, METH_VARARGS, crypt_crypt__doc__}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initcrypt(void) { Py_InitModule("crypt", crypt_methods); } Python-2.3.7/Modules/unicodename_db.h0000644001241000117560000300461207570364701017004 0ustar loewishpifb6/* this file was generated by Tools/unicode/makeunicodedata.py 2.2 */ #define NAME_MAXLEN 256 /* lexicon */ static unsigned char lexicon[] = { 76, 69, 84, 84, 69, 210, 87, 73, 84, 200, 83, 77, 65, 76, 204, 83, 89, 76, 76, 65, 66, 76, 197, 67, 65, 80, 73, 84, 65, 204, 89, 201, 67, 74, 203, 77, 65, 84, 72, 69, 77, 65, 84, 73, 67, 65, 204, 76, 65, 84, 73, 206, 65, 82, 65, 66, 73, 195, 67, 79, 77, 80, 65, 84, 73, 66, 73, 76, 73, 84, 217, 70, 79, 82, 77, 128, 83, 89, 77, 66, 79, 204, 67, 65, 78, 65, 68, 73, 65, 206, 83, 89, 76, 76, 65, 66, 73, 67, 211, 66, 79, 76, 196, 76, 73, 71, 65, 84, 85, 82, 197, 65, 78, 196, 77, 85, 83, 73, 67, 65, 204, 72, 65, 78, 71, 85, 204, 73, 84, 65, 76, 73, 195, 82, 65, 68, 73, 67, 65, 204, 83, 65, 78, 83, 45, 83, 69, 82, 73, 198, 69, 84, 72, 73, 79, 80, 73, 195, 83, 73, 71, 206, 71, 82, 69, 69, 203, 68, 73, 71, 73, 212, 67, 73, 82, 67, 76, 69, 196, 70, 73, 78, 65, 204, 83, 81, 85, 65, 82, 197, 67, 89, 82, 73, 76, 76, 73, 195, 66, 82, 65, 73, 76, 76, 197, 80, 65, 84, 84, 69, 82, 206, 66, 89, 90, 65, 78, 84, 73, 78, 197, 73, 83, 79, 76, 65, 84, 69, 196, 76, 69, 70, 212, 82, 73, 71, 72, 212, 86, 79, 87, 69, 204, 75, 65, 84, 65, 75, 65, 78, 193, 75, 65, 78, 71, 88, 201, 84, 73, 66, 69, 84, 65, 206, 68, 79, 85, 66, 76, 197, 77, 69, 69, 205, 67, 65, 82, 82, 73, 69, 210, 66, 69, 76, 79, 87, 128, 73, 78, 73, 84, 73, 65, 204, 65, 66, 79, 86, 69, 128, 67, 79, 77, 66, 73, 78, 73, 78, 199, 68, 79, 212, 89, 69, 200, 77, 79, 78, 71, 79, 76, 73, 65, 206, 65, 82, 82, 79, 87, 128, 65, 66, 79, 86, 197, 70, 79, 210, 86, 69, 82, 84, 73, 67, 65, 204, 66, 79, 216, 83, 73, 71, 78, 128, 87, 72, 73, 84, 197, 65, 82, 82, 79, 215, 68, 82, 65, 87, 73, 78, 71, 211, 72, 69, 66, 82, 69, 215, 72, 65, 76, 70, 87, 73, 68, 84, 200, 82, 73, 71, 72, 84, 87, 65, 82, 68, 211, 65, 128, 77, 65, 82, 75, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 73, 195, 65, 76, 69, 198, 80, 65, 82, 69, 78, 84, 72, 69, 83, 73, 90, 69, 196, 73, 128, 83, 67, 82, 73, 80, 212, 68, 69, 86, 65, 78, 65, 71, 65, 82, 201, 70, 85, 76, 76, 87, 73, 68, 84, 200, 75, 72, 77, 69, 210, 85, 208, 84, 79, 128, 70, 82, 65, 75, 84, 85, 210, 68, 79, 87, 206, 69, 81, 85, 65, 204, 72, 65, 200, 72, 69, 65, 86, 217, 78, 85, 77, 66, 69, 210, 85, 128, 84, 65, 199, 66, 76, 65, 67, 203, 65, 82, 77, 69, 78, 73, 65, 206, 67, 72, 79, 83, 69, 79, 78, 199, 74, 69, 69, 205, 83, 89, 77, 66, 79, 76, 128, 66, 69, 78, 71, 65, 76, 201, 67, 72, 65, 82, 65, 67, 84, 69, 210, 72, 73, 82, 65, 71, 65, 78, 193, 87, 69, 83, 84, 45, 67, 82, 69, 197, 84, 72, 65, 201, 67, 72, 69, 82, 79, 75, 69, 197, 73, 68, 69, 79, 71, 82, 65, 80, 200, 77, 69, 68, 73, 65, 204, 74, 79, 78, 71, 83, 69, 79, 78, 199, 82, 85, 78, 73, 195, 71, 69, 79, 82, 71, 73, 65, 206, 75, 65, 78, 78, 65, 68, 193, 83, 73, 78, 72, 65, 76, 193, 84, 69, 76, 85, 71, 213, 79, 82, 73, 89, 193, 71, 85, 74, 65, 82, 65, 84, 201, 77, 65, 76, 65, 89, 65, 76, 65, 205, 77, 89, 65, 78, 77, 65, 210, 207, 66, 82, 65, 67, 75, 69, 84, 128, 68, 69, 83, 69, 82, 69, 212, 71, 85, 82, 77, 85, 75, 72, 201, 84, 87, 79, 128, 65, 67, 85, 84, 69, 128, 76, 73, 71, 72, 212, 83, 89, 82, 73, 65, 195, 68, 79, 85, 66, 76, 69, 45, 83, 84, 82, 85, 67, 203, 79, 78, 69, 128, 83, 84, 82, 79, 75, 69, 128, 65, 80, 204, 70, 85, 78, 67, 84, 73, 79, 78, 65, 204, 72, 65, 77, 90, 193, 76, 69, 70, 84, 87, 65, 82, 68, 211, 84, 69, 76, 69, 71, 82, 65, 80, 200, 72, 79, 79, 75, 128, 74, 85, 78, 71, 83, 69, 79, 78, 199, 68, 65, 83, 73, 193, 77, 65, 75, 83, 85, 82, 193, 76, 65, 207, 66, 65, 82, 194, 66, 79, 80, 79, 77, 79, 70, 207, 82, 128, 72, 65, 76, 198, 79, 198, 80, 83, 73, 76, 201, 84, 207, 77, 79, 78, 79, 83, 80, 65, 67, 197, 78, 79, 212, 84, 65, 77, 73, 204, 66, 65, 82, 128, 75, 72, 65, 200, 72, 79, 82, 73, 90, 79, 78, 84, 65, 204, 77, 79, 68, 73, 70, 73, 69, 210, 76, 79, 87, 69, 210, 68, 73, 65, 69, 82, 69, 83, 73, 83, 128, 78, 85, 77, 69, 82, 65, 204, 86, 79, 67, 65, 76, 73, 195, 84, 72, 82, 69, 69, 128, 72, 65, 82, 80, 79, 79, 206, 85, 80, 80, 69, 210, 67, 73, 82, 67, 85, 77, 70, 76, 69, 216, 71, 82, 65, 86, 69, 128, 65, 78, 71, 76, 197, 84, 72, 65, 65, 78, 193, 65, 76, 80, 72, 193, 70, 79, 85, 82, 128, 72, 128, 76, 79, 78, 199, 77, 65, 67, 82, 79, 78, 128, 77, 65, 82, 203, 70, 73, 86, 69, 128, 83, 73, 88, 128, 79, 77, 69, 71, 193, 79, 88, 73, 65, 128, 86, 65, 82, 73, 65, 128, 67, 73, 82, 67, 76, 197, 69, 73, 71, 72, 84, 128, 78, 79, 79, 206, 78, 73, 78, 69, 128, 83, 69, 86, 69, 78, 128, 84, 73, 76, 68, 69, 128, 89, 128, 69, 84, 193, 82, 73, 71, 72, 84, 128, 83, 85, 66, 74, 79, 73, 78, 69, 196, 86, 128, 68, 128, 72, 69, 200, 83, 84, 79, 80, 128, 84, 69, 200, 67, 65, 82, 79, 78, 128, 71, 128, 71, 82, 69, 65, 84, 69, 82, 45, 84, 72, 65, 206, 66, 128, 74, 128, 90, 128, 67, 128, 70, 128, 76, 69, 83, 83, 45, 84, 72, 65, 206, 83, 72, 79, 82, 212, 75, 65, 128, 81, 128, 85, 80, 87, 65, 82, 68, 211, 89, 80, 79, 71, 69, 71, 82, 65, 77, 77, 69, 78, 73, 128, 66, 82, 69, 86, 69, 128, 70, 85, 76, 204, 83, 69, 69, 206, 83, 72, 69, 69, 206, 89, 65, 128, 76, 73, 78, 197, 82, 79, 77, 65, 206, 84, 82, 73, 65, 78, 71, 76, 69, 128, 68, 79, 87, 78, 87, 65, 82, 68, 211, 77, 65, 128, 79, 80, 69, 82, 65, 84, 79, 82, 128, 82, 69, 86, 69, 82, 83, 69, 196, 84, 87, 207, 66, 82, 65, 67, 75, 69, 212, 68, 79, 84, 128, 73, 79, 84, 193, 84, 73, 76, 68, 197, 65, 67, 67, 69, 78, 212, 66, 76, 65, 67, 75, 128, 80, 65, 83, 83, 73, 86, 69, 45, 80, 85, 76, 76, 45, 68, 79, 87, 78, 45, 79, 85, 84, 80, 85, 212, 66, 89, 69, 76, 79, 82, 85, 83, 83, 73, 65, 78, 45, 85, 75, 82, 65, 73, 78, 73, 65, 206, 67, 69, 79, 78, 71, 67, 72, 73, 69, 85, 77, 83, 83, 65, 78, 71, 67, 73, 69, 85, 67, 128, 80, 65, 83, 83, 73, 86, 69, 45, 80, 85, 76, 76, 45, 85, 80, 45, 79, 85, 84, 80, 85, 212, 65, 78, 84, 73, 67, 76, 79, 67, 75, 87, 73, 83, 69, 45, 82, 79, 84, 65, 84, 69, 196, 67, 69, 79, 78, 71, 67, 72, 73, 69, 85, 77, 83, 83, 65, 78, 71, 83, 73, 79, 83, 128, 80, 83, 73, 70, 73, 83, 84, 79, 80, 65, 82, 65, 75, 65, 76, 69, 83, 77, 65, 128, 82, 73, 69, 85, 76, 45, 75, 65, 80, 89, 69, 79, 85, 78, 80, 73, 69, 85, 80, 128, 75, 65, 80, 89, 69, 79, 85, 78, 83, 83, 65, 78, 71, 80, 73, 69, 85, 80, 128, 79, 80, 69, 78, 45, 67, 73, 82, 67, 85, 73, 84, 45, 79, 85, 84, 80, 85, 212, 67, 69, 79, 78, 71, 67, 72, 73, 69, 85, 77, 67, 72, 73, 69, 85, 67, 72, 128, 67, 72, 73, 84, 85, 69, 85, 77, 83, 83, 65, 78, 71, 67, 73, 69, 85, 67, 128, 75, 73, 89, 69, 79, 75, 45, 83, 73, 79, 83, 45, 75, 73, 89, 69, 79, 75, 128, 82, 73, 69, 85, 76, 45, 77, 73, 69, 85, 77, 45, 75, 73, 89, 69, 79, 75, 128, 82, 73, 69, 85, 76, 45, 84, 73, 75, 69, 85, 84, 45, 72, 73, 69, 85, 72, 128, 84, 82, 79, 77, 73, 75, 79, 80, 65, 82, 65, 75, 65, 76, 69, 83, 77, 65, 128, 80, 73, 69, 85, 80, 45, 83, 73, 79, 83, 45, 75, 73, 89, 69, 79, 75, 128, 80, 73, 69, 85, 80, 45, 83, 73, 79, 83, 45, 84, 73, 75, 69, 85, 84, 128, 82, 73, 69, 85, 76, 45, 75, 73, 89, 69, 79, 75, 45, 83, 73, 79, 83, 128, 82, 73, 69, 85, 76, 45, 89, 69, 79, 82, 73, 78, 72, 73, 69, 85, 72, 128, 67, 72, 73, 84, 85, 69, 85, 77, 83, 83, 65, 78, 71, 83, 73, 79, 83, 128, 73, 69, 85, 78, 71, 45, 83, 83, 65, 78, 71, 75, 73, 89, 69, 79, 75, 128, 76, 79, 78, 71, 45, 66, 82, 65, 78, 67, 72, 45, 72, 65, 71, 65, 76, 204, 80, 65, 82, 84, 73, 65, 76, 76, 89, 45, 82, 69, 67, 89, 67, 76, 69, 196, 82, 73, 69, 85, 76, 45, 80, 73, 69, 85, 80, 45, 72, 73, 69, 85, 72, 128, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 66, 74, 65, 82, 75, 65, 206, 83, 73, 79, 83, 45, 80, 73, 69, 85, 80, 45, 75, 73, 89, 69, 79, 75, 128, 75, 65, 84, 65, 75, 65, 78, 65, 45, 72, 73, 82, 65, 71, 65, 78, 193, 82, 73, 69, 85, 76, 45, 80, 73, 69, 85, 80, 45, 83, 73, 79, 83, 128, 89, 69, 83, 73, 69, 85, 78, 71, 45, 80, 65, 78, 83, 73, 79, 83, 128, 67, 69, 79, 78, 71, 67, 72, 73, 69, 85, 77, 67, 73, 69, 85, 67, 128, 77, 65, 82, 67, 65, 84, 79, 45, 83, 84, 65, 67, 67, 65, 84, 79, 128, 80, 73, 69, 85, 80, 45, 83, 73, 79, 83, 45, 67, 73, 69, 85, 67, 128, 80, 73, 69, 85, 80, 45, 83, 73, 79, 83, 45, 80, 73, 69, 85, 80, 128, 82, 73, 69, 85, 76, 45, 77, 73, 69, 85, 77, 45, 83, 73, 79, 83, 128, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 72, 65, 71, 65, 76, 204, 83, 79, 70, 84, 87, 65, 82, 69, 45, 70, 85, 78, 67, 84, 73, 79, 206, 84, 82, 79, 77, 73, 75, 79, 80, 83, 73, 70, 73, 83, 84, 79, 78, 128, 75, 65, 80, 89, 69, 79, 85, 78, 80, 72, 73, 69, 85, 80, 72, 128, 65, 78, 84, 73, 82, 69, 83, 84, 82, 73, 67, 84, 73, 79, 78, 128, 65, 67, 67, 69, 78, 84, 45, 83, 84, 65, 67, 67, 65, 84, 79, 128, 65, 78, 84, 73, 75, 69, 78, 79, 75, 89, 76, 73, 83, 77, 65, 128, 67, 69, 79, 78, 71, 67, 72, 73, 69, 85, 77, 83, 73, 79, 83, 128, 67, 72, 73, 69, 85, 67, 72, 45, 75, 72, 73, 69, 85, 75, 72, 128, 67, 72, 73, 84, 85, 69, 85, 77, 67, 72, 73, 69, 85, 67, 72, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 48, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 49, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 50, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 51, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 52, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 53, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 54, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 55, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 56, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 57, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 65, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 66, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 67, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 68, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 69, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 56, 70, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 48, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 49, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 50, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 51, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 52, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 53, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 54, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 55, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 56, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 57, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 65, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 66, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 67, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 68, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 69, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 57, 70, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 48, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 50, 70, 65, 49, 68, 128, 74, 65, 76, 76, 65, 74, 65, 76, 65, 76, 79, 85, 72, 79, 85, 128, 75, 82, 65, 84, 73, 77, 79, 75, 79, 85, 70, 73, 83, 77, 65, 128, 75, 82, 65, 84, 73, 77, 79, 89, 80, 79, 82, 82, 79, 79, 78, 128, 76, 79, 78, 71, 45, 66, 82, 65, 78, 67, 72, 45, 77, 65, 68, 210, 77, 73, 69, 85, 77, 45, 83, 83, 65, 78, 71, 83, 73, 79, 83, 128, 80, 69, 84, 65, 83, 84, 79, 75, 79, 85, 70, 73, 83, 77, 65, 128, 80, 73, 69, 85, 80, 45, 83, 83, 65, 78, 71, 83, 73, 79, 83, 128, 80, 83, 73, 70, 73, 83, 84, 79, 76, 89, 71, 73, 83, 77, 65, 128, 80, 83, 73, 70, 73, 83, 84, 79, 83, 89, 78, 65, 71, 77, 65, 128, 82, 73, 69, 85, 76, 45, 83, 83, 65, 78, 71, 83, 73, 79, 83, 128, 84, 69, 65, 82, 68, 82, 79, 80, 45, 83, 72, 65, 78, 75, 69, 196, 80, 82, 79, 83, 71, 69, 71, 82, 65, 77, 77, 69, 78, 73, 128, 84, 69, 65, 82, 68, 82, 79, 80, 45, 83, 80, 79, 75, 69, 196, 66, 76, 65, 67, 75, 45, 70, 69, 65, 84, 72, 69, 82, 69, 196, 84, 82, 73, 65, 78, 71, 76, 69, 45, 72, 69, 65, 68, 69, 196, 67, 79, 78, 71, 82, 65, 84, 85, 76, 65, 84, 73, 79, 78, 128, 72, 73, 71, 72, 45, 82, 69, 86, 69, 82, 83, 69, 68, 45, 185, 65, 70, 79, 82, 69, 77, 69, 78, 84, 73, 79, 78, 69, 68, 128, 65, 82, 79, 85, 78, 68, 45, 80, 82, 79, 70, 73, 76, 69, 128, 67, 79, 78, 67, 65, 86, 69, 45, 80, 79, 73, 78, 84, 69, 196, 71, 79, 82, 71, 79, 83, 89, 78, 84, 72, 69, 84, 79, 78, 128, 73, 68, 69, 78, 84, 73, 70, 73, 67, 65, 84, 73, 79, 78, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 48, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 49, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 50, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 51, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 52, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 53, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 54, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 55, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 56, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 57, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 65, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 66, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 67, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 68, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 69, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 57, 70, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 48, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 49, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 50, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 51, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 52, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 65, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 66, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 67, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 68, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 69, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 53, 70, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 48, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 49, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 50, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 51, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 52, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 53, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 54, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 55, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 56, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 57, 128, 73, 68, 69, 79, 71, 82, 65, 80, 72, 45, 70, 65, 54, 65, 128, 76, 79, 78, 71, 45, 66, 82, 65, 78, 67, 72, 45, 79, 83, 211, 76, 79, 78, 71, 45, 66, 82, 65, 78, 67, 72, 45, 83, 79, 204, 76, 79, 78, 71, 45, 66, 82, 65, 78, 67, 72, 45, 89, 82, 128, 77, 85, 76, 84, 73, 80, 76, 73, 67, 65, 84, 73, 79, 78, 128, 80, 65, 76, 65, 84, 65, 76, 73, 90, 65, 84, 73, 79, 78, 128, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 77, 65, 68, 210, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 78, 65, 85, 196, 83, 73, 79, 83, 45, 83, 83, 65, 78, 71, 83, 73, 79, 83, 128, 84, 69, 65, 82, 68, 82, 79, 80, 45, 66, 65, 82, 66, 69, 196, 84, 82, 79, 77, 73, 75, 79, 76, 89, 71, 73, 83, 77, 65, 128, 84, 82, 79, 77, 73, 75, 79, 83, 89, 78, 65, 71, 77, 65, 128, 87, 72, 73, 84, 69, 45, 70, 69, 65, 84, 72, 69, 82, 69, 196, 82, 73, 71, 72, 84, 45, 80, 79, 73, 78, 84, 73, 78, 199, 77, 85, 76, 84, 73, 80, 76, 73, 67, 65, 84, 73, 79, 206, 82, 73, 71, 72, 84, 45, 83, 72, 65, 68, 79, 87, 69, 196, 66, 65, 76, 76, 79, 79, 78, 45, 83, 80, 79, 75, 69, 196, 75, 65, 80, 89, 69, 79, 85, 78, 77, 73, 69, 85, 77, 128, 82, 73, 69, 85, 76, 45, 80, 72, 73, 69, 85, 80, 72, 128, 82, 73, 69, 85, 76, 45, 84, 72, 73, 69, 85, 84, 72, 128, 65, 82, 71, 79, 83, 89, 78, 84, 72, 69, 84, 79, 78, 128, 65, 83, 89, 77, 80, 84, 79, 84, 73, 67, 65, 76, 76, 217, 77, 73, 69, 85, 77, 45, 80, 65, 78, 83, 73, 79, 83, 128, 78, 73, 69, 85, 78, 45, 80, 65, 78, 83, 73, 79, 83, 128, 80, 65, 82, 65, 76, 76, 69, 76, 79, 71, 82, 65, 77, 128, 80, 72, 73, 69, 85, 80, 72, 45, 80, 73, 69, 85, 80, 128, 80, 73, 69, 85, 80, 45, 80, 72, 73, 69, 85, 80, 72, 128, 80, 73, 69, 85, 80, 45, 84, 72, 73, 69, 85, 84, 72, 128, 82, 73, 69, 85, 76, 45, 80, 65, 78, 83, 73, 79, 83, 128, 84, 69, 84, 65, 82, 84, 73, 77, 79, 82, 73, 79, 78, 128, 84, 73, 75, 69, 85, 84, 45, 75, 73, 89, 69, 79, 75, 128, 84, 82, 73, 65, 78, 71, 76, 69, 45, 82, 79, 85, 78, 196, 89, 69, 83, 73, 69, 85, 78, 71, 45, 83, 73, 79, 83, 128, 65, 86, 65, 75, 82, 65, 72, 65, 83, 65, 78, 89, 65, 128, 66, 79, 84, 84, 79, 77, 45, 76, 73, 71, 72, 84, 69, 196, 67, 72, 73, 69, 85, 67, 72, 45, 72, 73, 69, 85, 72, 128, 67, 72, 73, 84, 85, 69, 85, 77, 67, 73, 69, 85, 67, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 54, 55, 56, 128, 73, 69, 85, 78, 71, 45, 67, 72, 73, 69, 85, 67, 72, 128, 73, 69, 85, 78, 71, 45, 75, 72, 73, 69, 85, 75, 72, 128, 73, 69, 85, 78, 71, 45, 80, 72, 73, 69, 85, 80, 72, 128, 73, 69, 85, 78, 71, 45, 84, 72, 73, 69, 85, 84, 72, 128, 75, 65, 80, 89, 69, 79, 85, 78, 82, 73, 69, 85, 76, 128, 76, 79, 78, 71, 45, 66, 82, 65, 78, 67, 72, 45, 65, 210, 77, 73, 69, 85, 77, 45, 67, 72, 73, 69, 85, 67, 72, 128, 78, 73, 69, 85, 78, 45, 84, 72, 73, 69, 85, 84, 72, 128, 80, 69, 82, 80, 69, 78, 68, 73, 67, 85, 76, 65, 82, 128, 80, 73, 69, 85, 80, 45, 67, 72, 73, 69, 85, 67, 72, 128, 82, 73, 69, 85, 76, 45, 75, 72, 73, 69, 85, 75, 72, 128, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 79, 83, 211, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 83, 79, 204, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 84, 89, 210, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 89, 82, 128, 83, 84, 65, 67, 67, 65, 84, 73, 83, 83, 73, 77, 79, 128, 84, 72, 69, 82, 77, 79, 68, 89, 78, 65, 77, 73, 67, 128, 89, 85, 85, 75, 65, 76, 69, 65, 80, 73, 78, 84, 85, 128, 71, 82, 69, 65, 84, 69, 82, 45, 84, 72, 65, 78, 128, 65, 78, 84, 73, 67, 76, 79, 67, 75, 87, 73, 83, 197, 76, 69, 70, 84, 45, 80, 79, 73, 78, 84, 73, 78, 199, 73, 78, 84, 69, 82, 83, 69, 67, 84, 73, 79, 78, 128, 65, 80, 80, 82, 79, 88, 73, 77, 65, 84, 69, 76, 217, 68, 73, 70, 70, 69, 82, 69, 78, 84, 73, 65, 76, 128, 68, 79, 87, 78, 45, 80, 79, 73, 78, 84, 73, 78, 199, 80, 65, 82, 69, 83, 84, 73, 71, 77, 69, 78, 79, 206, 72, 89, 80, 72, 69, 78, 45, 77, 73, 78, 85, 83, 128, 67, 79, 78, 67, 65, 86, 69, 45, 83, 73, 68, 69, 196, 76, 69, 70, 84, 45, 84, 79, 45, 82, 73, 71, 72, 212, 78, 73, 69, 85, 78, 45, 84, 73, 75, 69, 85, 84, 128, 82, 73, 69, 85, 76, 45, 75, 73, 89, 69, 79, 75, 128, 82, 73, 71, 72, 84, 45, 84, 79, 45, 76, 69, 70, 212, 68, 73, 77, 73, 78, 85, 84, 73, 79, 78, 45, 49, 128, 68, 82, 79, 80, 45, 83, 72, 65, 68, 79, 87, 69, 196, 71, 65, 69, 84, 84, 65, 45, 80, 73, 76, 76, 65, 128, 71, 69, 79, 77, 69, 84, 82, 73, 67, 65, 76, 76, 217, 73, 69, 85, 78, 71, 45, 75, 73, 89, 69, 79, 75, 128, 78, 73, 69, 85, 78, 45, 75, 73, 89, 69, 79, 75, 128, 80, 73, 69, 85, 80, 45, 84, 73, 75, 69, 85, 84, 128, 82, 73, 69, 85, 76, 45, 84, 73, 75, 69, 85, 84, 128, 84, 72, 73, 82, 84, 89, 45, 83, 69, 67, 79, 78, 196, 84, 87, 69, 78, 84, 89, 45, 69, 73, 71, 72, 84, 200, 84, 87, 69, 78, 84, 89, 45, 84, 72, 82, 69, 69, 128, 65, 78, 65, 84, 82, 73, 67, 72, 73, 83, 77, 65, 128, 67, 72, 73, 84, 85, 69, 85, 77, 83, 73, 79, 83, 128, 67, 82, 79, 83, 83, 69, 68, 45, 84, 65, 73, 76, 128, 67, 89, 76, 73, 78, 68, 82, 73, 67, 73, 84, 89, 128, 68, 73, 77, 73, 78, 85, 84, 73, 79, 78, 45, 50, 128, 68, 73, 77, 73, 78, 85, 84, 73, 79, 78, 45, 51, 128, 68, 73, 83, 67, 79, 78, 84, 73, 78, 85, 79, 85, 211, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 54, 55, 56, 128, 69, 85, 82, 79, 45, 67, 85, 82, 82, 69, 78, 67, 217, 71, 82, 79, 78, 84, 72, 73, 83, 77, 65, 84, 65, 128, 73, 67, 69, 76, 65, 78, 68, 73, 67, 45, 89, 82, 128, 73, 69, 85, 78, 71, 45, 84, 73, 75, 69, 85, 84, 128, 73, 78, 84, 69, 82, 83, 89, 76, 76, 65, 66, 73, 195, 74, 85, 68, 69, 79, 45, 83, 80, 65, 78, 73, 83, 200, 75, 73, 89, 69, 79, 75, 45, 82, 73, 69, 85, 76, 128, 77, 73, 78, 85, 83, 45, 79, 82, 45, 80, 76, 85, 211, 79, 80, 69, 78, 45, 79, 85, 84, 76, 73, 78, 69, 196, 80, 69, 82, 80, 69, 78, 68, 73, 67, 85, 76, 65, 210, 82, 85, 76, 69, 45, 68, 69, 76, 65, 89, 69, 68, 128, 83, 72, 79, 82, 84, 45, 84, 87, 73, 71, 45, 65, 210, 83, 73, 79, 83, 45, 67, 72, 73, 69, 85, 67, 72, 128, 83, 73, 79, 83, 45, 75, 72, 73, 69, 85, 75, 72, 128, 83, 73, 79, 83, 45, 80, 72, 73, 69, 85, 80, 72, 128, 83, 73, 79, 83, 45, 84, 72, 73, 69, 85, 84, 72, 128, 83, 84, 82, 65, 71, 71, 73, 83, 77, 65, 84, 65, 128, 84, 72, 85, 78, 68, 69, 82, 83, 84, 79, 82, 77, 128, 84, 73, 75, 69, 85, 84, 45, 82, 73, 69, 85, 76, 128, 84, 82, 65, 78, 83, 77, 73, 83, 83, 73, 79, 78, 128, 84, 87, 69, 78, 84, 89, 45, 69, 73, 71, 72, 84, 128, 84, 87, 69, 78, 84, 89, 45, 83, 69, 86, 69, 78, 128, 80, 69, 82, 73, 83, 80, 79, 77, 69, 78, 73, 128, 67, 45, 83, 73, 77, 80, 76, 73, 70, 73, 69, 196, 80, 82, 69, 83, 69, 78, 84, 65, 84, 73, 79, 206, 65, 82, 65, 66, 73, 67, 45, 73, 78, 68, 73, 195, 80, 65, 82, 69, 78, 84, 72, 69, 83, 73, 83, 128, 73, 78, 84, 69, 82, 83, 69, 67, 84, 73, 79, 206, 67, 65, 78, 68, 82, 65, 66, 73, 78, 68, 85, 128, 69, 82, 82, 79, 82, 45, 66, 65, 82, 82, 69, 196, 66, 76, 65, 67, 75, 45, 76, 69, 84, 84, 69, 210, 80, 85, 78, 67, 84, 85, 65, 84, 73, 79, 78, 128, 65, 80, 80, 82, 79, 88, 73, 77, 65, 84, 69, 128, 67, 65, 78, 84, 73, 76, 76, 65, 84, 73, 79, 206, 69, 75, 70, 79, 78, 73, 84, 73, 75, 79, 78, 128, 74, 45, 83, 73, 77, 80, 76, 73, 70, 73, 69, 196, 82, 73, 69, 85, 76, 45, 72, 73, 69, 85, 72, 128, 83, 79, 85, 84, 72, 45, 83, 76, 65, 86, 69, 217, 65, 66, 66, 82, 69, 86, 73, 65, 84, 73, 79, 206, 65, 83, 84, 82, 79, 76, 79, 71, 73, 67, 65, 204, 71, 65, 89, 65, 78, 85, 75, 73, 84, 84, 65, 128, 77, 73, 69, 85, 77, 45, 80, 73, 69, 85, 80, 128, 78, 73, 69, 85, 78, 45, 67, 73, 69, 85, 67, 128, 78, 73, 69, 85, 78, 45, 72, 73, 69, 85, 72, 128, 82, 73, 69, 85, 76, 45, 77, 73, 69, 85, 77, 128, 82, 73, 69, 85, 76, 45, 80, 73, 69, 85, 80, 128, 83, 69, 77, 73, 67, 73, 82, 67, 85, 76, 65, 210, 83, 83, 65, 78, 71, 84, 73, 75, 69, 85, 84, 128, 65, 67, 75, 78, 79, 87, 76, 69, 68, 71, 69, 128, 67, 79, 77, 80, 79, 83, 73, 84, 73, 79, 78, 128, 73, 78, 84, 69, 82, 83, 69, 67, 84, 73, 78, 199, 80, 73, 69, 85, 80, 45, 67, 73, 69, 85, 67, 128, 81, 85, 73, 78, 68, 73, 67, 69, 83, 73, 77, 193, 82, 73, 69, 85, 76, 45, 78, 73, 69, 85, 78, 128, 83, 73, 88, 84, 89, 45, 70, 79, 85, 82, 84, 200, 84, 82, 73, 84, 73, 77, 79, 82, 73, 79, 78, 128, 84, 87, 69, 78, 84, 89, 45, 70, 79, 85, 82, 128, 87, 69, 68, 71, 69, 45, 84, 65, 73, 76, 69, 196, 65, 77, 65, 76, 71, 65, 77, 65, 84, 73, 79, 206, 65, 80, 80, 76, 73, 67, 65, 84, 73, 79, 78, 128, 65, 85, 71, 77, 69, 78, 84, 65, 84, 73, 79, 206, 67, 65, 78, 67, 69, 76, 76, 65, 84, 73, 79, 206, 67, 73, 69, 85, 67, 45, 73, 69, 85, 78, 71, 128, 67, 79, 78, 74, 85, 78, 67, 84, 73, 79, 78, 128, 67, 79, 78, 84, 82, 65, 67, 84, 73, 79, 78, 128, 67, 79, 82, 80, 79, 82, 65, 84, 73, 79, 78, 128, 67, 79, 85, 78, 84, 69, 82, 66, 79, 82, 69, 128, 67, 79, 85, 78, 84, 69, 82, 83, 73, 78, 75, 128, 68, 69, 67, 82, 69, 83, 67, 69, 78, 68, 79, 128, 68, 69, 78, 79, 77, 73, 78, 65, 84, 79, 82, 128, 68, 73, 83, 84, 73, 78, 71, 85, 73, 83, 72, 128, 68, 79, 65, 67, 72, 65, 83, 72, 77, 69, 69, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 54, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 52, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 52, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 51, 52, 53, 54, 55, 56, 128, 68, 79, 85, 66, 76, 69, 45, 69, 78, 68, 69, 196, 69, 65, 77, 72, 65, 78, 67, 72, 79, 76, 76, 128, 70, 73, 78, 71, 69, 82, 78, 65, 73, 76, 83, 128, 70, 82, 79, 78, 84, 45, 84, 73, 76, 84, 69, 196, 72, 65, 85, 80, 84, 83, 84, 73, 77, 77, 69, 128, 72, 73, 69, 85, 72, 45, 77, 73, 69, 85, 77, 128, 72, 73, 69, 85, 72, 45, 78, 73, 69, 85, 78, 128, 72, 73, 69, 85, 72, 45, 80, 73, 69, 85, 80, 128, 72, 73, 69, 85, 72, 45, 82, 73, 69, 85, 76, 128, 73, 69, 85, 78, 71, 45, 67, 73, 69, 85, 67, 128, 73, 69, 85, 78, 71, 45, 77, 73, 69, 85, 77, 128, 73, 69, 85, 78, 71, 45, 80, 73, 69, 85, 80, 128, 73, 78, 84, 69, 71, 82, 65, 84, 73, 79, 78, 128, 73, 78, 84, 69, 82, 67, 65, 76, 65, 84, 69, 128, 73, 78, 84, 69, 82, 82, 79, 66, 65, 78, 71, 128, 75, 73, 82, 79, 77, 69, 69, 84, 79, 82, 85, 128, 76, 65, 75, 75, 72, 65, 78, 71, 89, 65, 79, 128, 77, 73, 69, 85, 77, 45, 72, 73, 69, 85, 72, 128, 77, 73, 69, 85, 77, 45, 82, 73, 69, 85, 76, 128, 77, 85, 85, 83, 73, 75, 65, 84, 79, 65, 78, 128, 78, 65, 65, 75, 83, 73, 75, 89, 65, 89, 65, 128, 78, 69, 66, 69, 78, 83, 84, 73, 77, 77, 69, 128, 78, 73, 69, 85, 78, 45, 80, 73, 69, 85, 80, 128, 78, 79, 78, 45, 66, 82, 69, 65, 75, 73, 78, 199, 80, 65, 82, 65, 75, 76, 73, 84, 73, 75, 73, 128, 80, 69, 82, 83, 80, 69, 67, 84, 73, 86, 69, 128, 80, 73, 69, 85, 80, 45, 78, 73, 69, 85, 78, 128, 80, 73, 69, 85, 80, 45, 82, 73, 69, 85, 76, 128, 80, 79, 83, 84, 80, 79, 83, 73, 84, 73, 79, 206, 80, 82, 69, 83, 67, 82, 73, 80, 84, 73, 79, 206, 80, 82, 79, 80, 79, 82, 84, 73, 79, 78, 65, 204, 82, 73, 71, 72, 84, 45, 83, 72, 65, 68, 69, 196, 82, 73, 78, 70, 79, 82, 90, 65, 78, 68, 79, 128, 82, 79, 85, 78, 68, 45, 84, 73, 80, 80, 69, 196, 83, 65, 71, 73, 84, 84, 65, 82, 73, 85, 83, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 48, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 49, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 50, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 51, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 52, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 53, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 54, 128, 83, 80, 82, 69, 67, 72, 71, 69, 83, 65, 78, 199, 83, 85, 80, 69, 82, 73, 77, 80, 79, 83, 69, 196, 84, 69, 84, 82, 65, 70, 79, 78, 73, 65, 83, 128, 84, 72, 65, 78, 84, 72, 65, 75, 72, 65, 84, 128, 84, 72, 82, 69, 69, 45, 80, 69, 82, 45, 69, 205, 84, 79, 65, 78, 68, 65, 75, 72, 73, 65, 84, 128, 84, 82, 65, 78, 83, 77, 73, 83, 83, 73, 79, 206, 84, 87, 69, 78, 84, 89, 45, 70, 73, 86, 69, 128, 84, 87, 69, 78, 84, 89, 45, 78, 73, 78, 69, 128, 85, 78, 65, 83, 80, 73, 82, 65, 84, 69, 68, 128, 67, 73, 82, 67, 85, 77, 70, 76, 69, 88, 128, 83, 85, 80, 69, 82, 83, 67, 82, 73, 80, 212, 72, 79, 82, 73, 90, 79, 78, 84, 65, 76, 128, 73, 78, 68, 69, 80, 69, 78, 68, 69, 78, 212, 80, 69, 82, 73, 83, 80, 79, 77, 69, 78, 201, 68, 69, 83, 67, 82, 73, 80, 84, 73, 79, 206, 69, 88, 67, 76, 65, 77, 65, 84, 73, 79, 206, 80, 65, 82, 69, 78, 84, 72, 69, 83, 73, 211, 68, 79, 85, 66, 76, 69, 45, 76, 73, 78, 197, 77, 65, 72, 65, 65, 80, 82, 65, 65, 78, 193, 65, 80, 79, 83, 84, 82, 79, 80, 72, 69, 128, 80, 85, 78, 67, 84, 85, 65, 84, 73, 79, 206, 85, 80, 45, 80, 79, 73, 78, 84, 73, 78, 199, 83, 73, 78, 71, 76, 69, 45, 76, 73, 78, 197, 73, 77, 80, 69, 82, 70, 69, 67, 84, 85, 205, 82, 73, 71, 72, 84, 87, 65, 82, 68, 83, 128, 65, 82, 82, 79, 87, 45, 84, 65, 73, 76, 128, 68, 79, 65, 67, 72, 65, 83, 72, 77, 69, 197, 65, 69, 76, 65, 45, 80, 73, 76, 76, 65, 128, 65, 76, 84, 69, 82, 78, 65, 84, 73, 86, 197, 73, 78, 84, 69, 71, 82, 65, 84, 73, 79, 206, 73, 78, 84, 69, 82, 76, 73, 78, 69, 65, 210, 79, 80, 69, 78, 45, 72, 69, 65, 68, 69, 196, 82, 73, 69, 85, 76, 45, 83, 73, 79, 83, 128, 83, 69, 77, 73, 45, 86, 79, 73, 67, 69, 196, 83, 83, 65, 78, 71, 73, 69, 85, 78, 71, 128, 83, 85, 80, 82, 65, 76, 73, 78, 69, 65, 210, 65, 69, 68, 65, 45, 80, 73, 76, 76, 65, 128, 67, 79, 78, 83, 69, 67, 85, 84, 73, 86, 197, 68, 73, 86, 73, 78, 65, 84, 73, 79, 78, 128, 69, 78, 84, 69, 82, 80, 82, 73, 83, 69, 128, 73, 77, 80, 69, 82, 70, 69, 67, 84, 65, 128, 77, 79, 78, 79, 70, 79, 78, 73, 65, 83, 128, 77, 79, 78, 79, 71, 82, 65, 77, 77, 79, 211, 78, 65, 65, 83, 73, 75, 89, 65, 89, 65, 128, 78, 73, 69, 85, 78, 45, 83, 73, 79, 83, 128, 79, 86, 69, 82, 76, 65, 80, 80, 73, 78, 199, 80, 65, 82, 65, 75, 65, 76, 69, 83, 77, 193, 80, 65, 82, 65, 75, 76, 73, 84, 73, 75, 201, 80, 69, 82, 67, 85, 83, 83, 73, 86, 69, 128, 80, 82, 79, 80, 79, 82, 84, 73, 79, 78, 128, 82, 69, 67, 84, 65, 78, 71, 85, 76, 65, 210, 82, 69, 67, 84, 73, 76, 73, 78, 69, 65, 210, 82, 69, 80, 76, 65, 67, 69, 77, 69, 78, 212, 83, 73, 79, 83, 45, 78, 73, 69, 85, 78, 128, 83, 73, 79, 83, 45, 82, 73, 69, 85, 76, 128, 83, 83, 65, 78, 71, 72, 73, 69, 85, 72, 128, 83, 83, 65, 78, 71, 78, 73, 69, 85, 78, 128, 83, 83, 65, 78, 71, 82, 73, 69, 85, 76, 128, 84, 65, 66, 85, 76, 65, 84, 73, 79, 78, 128, 84, 69, 84, 82, 65, 83, 73, 77, 79, 85, 128, 84, 72, 69, 77, 65, 84, 73, 83, 77, 79, 211, 84, 87, 69, 78, 84, 89, 45, 79, 78, 69, 128, 84, 87, 69, 78, 84, 89, 45, 84, 87, 79, 128, 65, 76, 84, 69, 82, 78, 65, 84, 73, 79, 206, 65, 78, 71, 75, 72, 65, 78, 75, 72, 85, 128, 65, 78, 84, 73, 75, 69, 78, 79, 77, 65, 128, 65, 78, 85, 83, 86, 65, 82, 65, 89, 65, 128, 65, 80, 79, 83, 84, 82, 79, 70, 79, 83, 128, 65, 83, 84, 69, 82, 73, 83, 67, 85, 83, 128, 66, 65, 67, 75, 45, 84, 73, 76, 84, 69, 196, 66, 65, 82, 73, 89, 79, 79, 83, 65, 78, 128, 66, 65, 84, 72, 65, 77, 65, 83, 65, 84, 128, 67, 73, 82, 67, 85, 76, 65, 84, 73, 79, 206, 67, 76, 85, 66, 45, 83, 80, 79, 75, 69, 196, 67, 79, 77, 80, 76, 69, 77, 69, 78, 84, 128, 67, 79, 77, 80, 79, 83, 73, 84, 73, 79, 206, 67, 79, 82, 82, 69, 83, 80, 79, 78, 68, 211, 67, 82, 79, 83, 83, 66, 79, 78, 69, 83, 128, 68, 69, 70, 73, 78, 73, 84, 73, 79, 78, 128, 68, 69, 78, 79, 77, 73, 78, 65, 84, 79, 210, 68, 73, 82, 69, 67, 84, 73, 79, 78, 65, 204, 68, 79, 84, 83, 45, 49, 50, 51, 52, 53, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 54, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 52, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 54, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 51, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 54, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 55, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 52, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 50, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 54, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 55, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 54, 55, 128, 68, 79, 84, 83, 45, 49, 51, 52, 54, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 51, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 51, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 49, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 54, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 55, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 54, 55, 128, 68, 79, 84, 83, 45, 50, 51, 52, 54, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 53, 54, 55, 128, 68, 79, 84, 83, 45, 50, 51, 53, 54, 56, 128, 68, 79, 84, 83, 45, 50, 51, 53, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 50, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 50, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 50, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 51, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 51, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 51, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 51, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 51, 53, 54, 55, 56, 128, 68, 79, 84, 83, 45, 52, 53, 54, 55, 56, 128, 69, 75, 83, 84, 82, 69, 80, 84, 79, 78, 128, 69, 77, 66, 82, 79, 73, 68, 69, 82, 89, 128, 69, 81, 85, 73, 65, 78, 71, 85, 76, 65, 210, 70, 65, 72, 82, 69, 78, 72, 69, 73, 84, 128, 70, 79, 82, 77, 65, 84, 84, 73, 78, 71, 128, 70, 79, 85, 82, 45, 80, 69, 82, 45, 69, 205, 70, 79, 85, 82, 45, 83, 84, 82, 73, 78, 199, 72, 66, 65, 83, 65, 45, 69, 83, 65, 83, 193, 72, 79, 77, 79, 84, 72, 69, 84, 73, 67, 128, 72, 89, 80, 72, 69, 78, 65, 84, 73, 79, 206, 73, 77, 73, 68, 73, 65, 82, 71, 79, 78, 128, 73, 77, 73, 70, 84, 72, 79, 82, 79, 78, 128, 73, 78, 70, 79, 82, 77, 65, 84, 73, 79, 206, 75, 73, 82, 79, 71, 85, 82, 65, 77, 85, 128, 75, 85, 78, 68, 68, 65, 76, 73, 89, 65, 128, 76, 69, 70, 84, 45, 83, 72, 65, 68, 69, 196, 77, 69, 77, 66, 69, 82, 83, 72, 73, 80, 128, 78, 65, 78, 71, 77, 79, 78, 84, 72, 79, 128, 78, 79, 78, 45, 74, 79, 73, 78, 69, 82, 128, 78, 79, 78, 70, 79, 82, 75, 73, 78, 71, 128, 79, 80, 80, 79, 83, 73, 84, 73, 79, 78, 128, 80, 65, 76, 65, 84, 65, 76, 73, 90, 69, 196, 80, 82, 79, 74, 69, 67, 84, 73, 79, 78, 128, 80, 82, 79, 74, 69, 67, 84, 73, 86, 69, 128, 82, 65, 68, 73, 79, 65, 67, 84, 73, 86, 197, 83, 65, 67, 82, 73, 70, 73, 67, 73, 65, 204, 83, 65, 76, 76, 65, 76, 76, 65, 72, 79, 213, 83, 69, 76, 69, 67, 84, 79, 82, 45, 49, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 50, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 51, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 52, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 53, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 54, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 55, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 56, 128, 83, 69, 76, 69, 67, 84, 79, 82, 45, 57, 128, 83, 72, 65, 76, 83, 72, 69, 76, 69, 84, 128, 83, 73, 79, 83, 45, 72, 73, 69, 85, 72, 128, 83, 73, 79, 83, 45, 73, 69, 85, 78, 71, 128, 83, 73, 79, 83, 45, 77, 73, 69, 85, 77, 128, 83, 83, 65, 78, 71, 65, 82, 65, 69, 65, 128, 83, 85, 66, 80, 85, 78, 67, 84, 73, 83, 128, 83, 85, 66, 83, 84, 73, 84, 85, 84, 69, 128, 83, 89, 78, 67, 72, 82, 79, 78, 79, 85, 211, 84, 69, 82, 77, 73, 78, 65, 84, 79, 82, 128, 84, 72, 73, 82, 84, 89, 45, 79, 78, 69, 128, 84, 79, 80, 45, 76, 73, 71, 72, 84, 69, 196, 84, 82, 65, 78, 83, 86, 69, 82, 83, 65, 204, 84, 87, 69, 78, 84, 89, 45, 83, 73, 88, 128, 86, 69, 82, 84, 73, 67, 65, 76, 76, 89, 128, 87, 73, 68, 69, 45, 72, 69, 65, 68, 69, 196, 76, 69, 83, 83, 45, 84, 72, 65, 78, 128, 65, 78, 78, 79, 84, 65, 84, 73, 79, 206, 68, 69, 83, 67, 69, 78, 68, 69, 82, 128, 69, 81, 85, 73, 86, 65, 76, 69, 78, 212, 83, 69, 80, 65, 82, 65, 84, 79, 82, 128, 65, 76, 80, 65, 80, 82, 65, 65, 78, 193, 65, 82, 82, 79, 87, 72, 69, 65, 68, 128, 80, 72, 65, 82, 89, 78, 71, 69, 65, 204, 80, 82, 79, 76, 65, 84, 73, 79, 78, 197, 84, 85, 82, 78, 83, 84, 73, 76, 69, 128, 84, 87, 79, 45, 72, 69, 65, 68, 69, 196, 68, 79, 87, 78, 87, 65, 82, 68, 83, 128, 69, 88, 84, 69, 78, 83, 73, 79, 78, 128, 83, 69, 77, 73, 67, 79, 76, 79, 78, 128, 65, 77, 80, 69, 82, 83, 65, 78, 68, 128, 76, 69, 70, 84, 87, 65, 82, 68, 83, 128, 76, 69, 78, 84, 73, 67, 85, 76, 65, 210, 67, 79, 77, 77, 69, 82, 67, 73, 65, 204, 83, 69, 77, 73, 68, 73, 82, 69, 67, 212, 83, 69, 86, 69, 78, 84, 69, 69, 78, 128, 87, 79, 79, 68, 83, 45, 67, 82, 69, 197, 66, 65, 67, 75, 83, 76, 65, 83, 72, 128, 68, 73, 65, 76, 89, 84, 73, 75, 65, 128, 70, 73, 88, 69, 68, 45, 70, 79, 82, 205, 73, 77, 80, 69, 82, 70, 69, 67, 84, 193, 73, 78, 68, 73, 67, 65, 84, 79, 82, 128, 82, 69, 67, 84, 65, 78, 71, 76, 69, 128, 69, 78, 67, 76, 79, 83, 85, 82, 69, 128, 72, 79, 85, 82, 71, 76, 65, 83, 83, 128, 83, 69, 77, 73, 66, 82, 69, 86, 73, 211, 83, 69, 77, 73, 77, 73, 78, 73, 77, 193, 83, 78, 79, 87, 70, 76, 65, 75, 69, 128, 84, 82, 73, 65, 78, 71, 85, 76, 65, 210, 65, 80, 79, 83, 84, 82, 79, 70, 79, 201, 65, 80, 79, 83, 84, 82, 79, 70, 79, 211, 65, 82, 80, 69, 71, 71, 73, 65, 84, 207, 65, 84, 72, 65, 80, 65, 83, 67, 65, 206, 67, 69, 78, 84, 82, 69, 76, 73, 78, 197, 67, 72, 65, 82, 65, 67, 84, 69, 82, 128, 67, 79, 78, 84, 65, 73, 78, 73, 78, 199, 67, 79, 80, 82, 79, 68, 85, 67, 84, 128, 67, 82, 79, 83, 83, 72, 65, 84, 67, 200, 69, 77, 66, 69, 68, 68, 73, 78, 71, 128, 70, 73, 78, 65, 78, 67, 73, 65, 76, 128, 70, 82, 69, 84, 66, 79, 65, 82, 68, 128, 71, 69, 82, 83, 72, 65, 89, 73, 77, 128, 71, 79, 82, 84, 72, 77, 73, 75, 79, 206, 73, 67, 72, 73, 77, 65, 84, 79, 83, 128, 75, 72, 65, 75, 65, 83, 83, 73, 65, 206, 80, 65, 65, 45, 80, 73, 76, 76, 65, 128, 80, 72, 73, 76, 73, 80, 80, 73, 78, 197, 83, 69, 77, 73, 67, 73, 82, 67, 76, 197, 83, 85, 77, 77, 65, 84, 73, 79, 78, 128, 83, 85, 80, 69, 82, 86, 73, 83, 69, 128, 84, 69, 76, 69, 80, 72, 79, 78, 69, 128, 84, 82, 69, 77, 79, 76, 79, 45, 49, 128, 84, 82, 69, 77, 79, 76, 79, 45, 50, 128, 84, 82, 69, 77, 79, 76, 79, 45, 51, 128, 84, 82, 73, 71, 82, 65, 77, 77, 79, 211, 65, 65, 66, 65, 65, 70, 73, 76, 73, 128, 65, 76, 45, 76, 65, 75, 85, 78, 65, 128, 65, 78, 84, 73, 70, 79, 78, 73, 65, 128, 65, 80, 80, 82, 79, 65, 67, 72, 69, 211, 65, 83, 83, 69, 82, 84, 73, 79, 78, 128, 65, 84, 84, 69, 78, 84, 73, 79, 78, 128, 66, 65, 67, 75, 83, 80, 65, 67, 69, 128, 66, 73, 66, 76, 69, 45, 67, 82, 69, 197, 67, 65, 80, 82, 73, 67, 79, 82, 78, 128, 67, 72, 65, 86, 73, 89, 65, 78, 73, 128, 67, 79, 77, 80, 76, 69, 84, 69, 68, 128, 67, 79, 80, 89, 82, 73, 71, 72, 84, 128, 68, 69, 76, 73, 77, 73, 84, 69, 82, 128, 68, 69, 83, 67, 69, 78, 68, 73, 78, 199, 68, 73, 70, 70, 69, 82, 69, 78, 67, 197, 68, 79, 84, 83, 45, 49, 50, 51, 52, 128, 68, 79, 84, 83, 45, 49, 50, 51, 53, 128, 68, 79, 84, 83, 45, 49, 50, 51, 54, 128, 68, 79, 84, 83, 45, 49, 50, 51, 55, 128, 68, 79, 84, 83, 45, 49, 50, 51, 56, 128, 68, 79, 84, 83, 45, 49, 50, 52, 53, 128, 68, 79, 84, 83, 45, 49, 50, 52, 54, 128, 68, 79, 84, 83, 45, 49, 50, 52, 55, 128, 68, 79, 84, 83, 45, 49, 50, 52, 56, 128, 68, 79, 84, 83, 45, 49, 50, 53, 54, 128, 68, 79, 84, 83, 45, 49, 50, 53, 55, 128, 68, 79, 84, 83, 45, 49, 50, 53, 56, 128, 68, 79, 84, 83, 45, 49, 50, 54, 55, 128, 68, 79, 84, 83, 45, 49, 50, 54, 56, 128, 68, 79, 84, 83, 45, 49, 50, 55, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 53, 128, 68, 79, 84, 83, 45, 49, 51, 52, 54, 128, 68, 79, 84, 83, 45, 49, 51, 52, 55, 128, 68, 79, 84, 83, 45, 49, 51, 52, 56, 128, 68, 79, 84, 83, 45, 49, 51, 53, 54, 128, 68, 79, 84, 83, 45, 49, 51, 53, 55, 128, 68, 79, 84, 83, 45, 49, 51, 53, 56, 128, 68, 79, 84, 83, 45, 49, 51, 54, 55, 128, 68, 79, 84, 83, 45, 49, 51, 54, 56, 128, 68, 79, 84, 83, 45, 49, 51, 55, 56, 128, 68, 79, 84, 83, 45, 49, 52, 53, 54, 128, 68, 79, 84, 83, 45, 49, 52, 53, 55, 128, 68, 79, 84, 83, 45, 49, 52, 53, 56, 128, 68, 79, 84, 83, 45, 49, 52, 54, 55, 128, 68, 79, 84, 83, 45, 49, 52, 54, 56, 128, 68, 79, 84, 83, 45, 49, 52, 55, 56, 128, 68, 79, 84, 83, 45, 49, 53, 54, 55, 128, 68, 79, 84, 83, 45, 49, 53, 54, 56, 128, 68, 79, 84, 83, 45, 49, 53, 55, 56, 128, 68, 79, 84, 83, 45, 49, 54, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 53, 128, 68, 79, 84, 83, 45, 50, 51, 52, 54, 128, 68, 79, 84, 83, 45, 50, 51, 52, 55, 128, 68, 79, 84, 83, 45, 50, 51, 52, 56, 128, 68, 79, 84, 83, 45, 50, 51, 53, 54, 128, 68, 79, 84, 83, 45, 50, 51, 53, 55, 128, 68, 79, 84, 83, 45, 50, 51, 53, 56, 128, 68, 79, 84, 83, 45, 50, 51, 54, 55, 128, 68, 79, 84, 83, 45, 50, 51, 54, 56, 128, 68, 79, 84, 83, 45, 50, 51, 55, 56, 128, 68, 79, 84, 83, 45, 50, 52, 53, 54, 128, 68, 79, 84, 83, 45, 50, 52, 53, 55, 128, 68, 79, 84, 83, 45, 50, 52, 53, 56, 128, 68, 79, 84, 83, 45, 50, 52, 54, 55, 128, 68, 79, 84, 83, 45, 50, 52, 54, 56, 128, 68, 79, 84, 83, 45, 50, 52, 55, 56, 128, 68, 79, 84, 83, 45, 50, 53, 54, 55, 128, 68, 79, 84, 83, 45, 50, 53, 54, 56, 128, 68, 79, 84, 83, 45, 50, 53, 55, 56, 128, 68, 79, 84, 83, 45, 50, 54, 55, 56, 128, 68, 79, 84, 83, 45, 51, 52, 53, 54, 128, 68, 79, 84, 83, 45, 51, 52, 53, 55, 128, 68, 79, 84, 83, 45, 51, 52, 53, 56, 128, 68, 79, 84, 83, 45, 51, 52, 54, 55, 128, 68, 79, 84, 83, 45, 51, 52, 54, 56, 128, 68, 79, 84, 83, 45, 51, 52, 55, 56, 128, 68, 79, 84, 83, 45, 51, 53, 54, 55, 128, 68, 79, 84, 83, 45, 51, 53, 54, 56, 128, 68, 79, 84, 83, 45, 51, 53, 55, 56, 128, 68, 79, 84, 83, 45, 51, 54, 55, 56, 128, 68, 79, 84, 83, 45, 52, 53, 54, 55, 128, 68, 79, 84, 83, 45, 52, 53, 54, 56, 128, 68, 79, 84, 83, 45, 52, 53, 55, 56, 128, 68, 79, 84, 83, 45, 52, 54, 55, 56, 128, 68, 79, 84, 83, 45, 53, 54, 55, 56, 128, 69, 69, 66, 69, 69, 70, 73, 76, 73, 128, 69, 78, 65, 82, 77, 79, 78, 73, 79, 211, 69, 78, 68, 79, 70, 79, 78, 79, 78, 128, 69, 83, 84, 73, 77, 65, 84, 69, 83, 128, 69, 88, 67, 69, 76, 76, 69, 78, 84, 128, 69, 88, 84, 82, 65, 45, 72, 73, 71, 200, 69, 89, 66, 69, 89, 70, 73, 76, 73, 128, 70, 82, 73, 67, 65, 84, 73, 86, 69, 128, 71, 78, 65, 86, 73, 89, 65, 78, 73, 128, 71, 79, 82, 71, 79, 84, 69, 82, 73, 128, 71, 85, 82, 65, 77, 85, 84, 79, 78, 128, 72, 69, 75, 85, 84, 65, 65, 82, 85, 128, 72, 79, 77, 79, 84, 72, 69, 84, 73, 195, 72, 89, 83, 84, 69, 82, 69, 83, 73, 211, 73, 76, 85, 85, 89, 65, 78, 78, 65, 128, 73, 77, 73, 70, 84, 72, 79, 82, 65, 128, 73, 78, 67, 79, 77, 80, 76, 69, 84, 197, 73, 78, 67, 82, 69, 77, 69, 78, 84, 128, 73, 78, 68, 85, 83, 84, 82, 73, 65, 204, 73, 82, 85, 85, 89, 65, 78, 78, 65, 128, 74, 69, 82, 85, 83, 65, 76, 69, 77, 128, 75, 65, 84, 65, 86, 65, 83, 77, 65, 128, 75, 69, 78, 84, 73, 77, 65, 84, 65, 128, 75, 73, 82, 79, 87, 65, 84, 84, 79, 128, 75, 82, 65, 84, 73, 77, 65, 84, 65, 128, 75, 85, 82, 85, 90, 69, 73, 82, 79, 128, 76, 72, 65, 86, 73, 89, 65, 78, 73, 128, 76, 73, 71, 72, 84, 78, 73, 78, 71, 128, 77, 65, 73, 84, 65, 73, 75, 72, 85, 128, 77, 65, 84, 69, 82, 73, 65, 76, 83, 128, 77, 69, 84, 79, 66, 69, 76, 85, 83, 128, 77, 73, 82, 73, 66, 65, 65, 82, 85, 128, 77, 79, 78, 79, 83, 84, 65, 66, 76, 197, 77, 79, 79, 83, 69, 45, 67, 82, 69, 197, 78, 73, 71, 71, 65, 72, 73, 84, 65, 128, 79, 65, 66, 79, 65, 70, 73, 76, 73, 128, 79, 79, 66, 79, 79, 70, 73, 76, 73, 128, 79, 82, 84, 72, 79, 71, 79, 78, 65, 204, 80, 65, 73, 89, 65, 78, 78, 79, 73, 128, 80, 65, 82, 65, 71, 82, 65, 80, 72, 128, 80, 73, 65, 83, 85, 84, 79, 82, 85, 128, 80, 73, 84, 67, 72, 70, 79, 82, 75, 128, 80, 73, 90, 90, 73, 67, 65, 84, 79, 128, 80, 76, 85, 83, 45, 77, 73, 78, 85, 211, 80, 79, 82, 82, 69, 67, 84, 85, 83, 128, 80, 82, 79, 84, 79, 86, 65, 82, 89, 211, 81, 85, 65, 84, 69, 82, 78, 73, 79, 206, 81, 85, 69, 83, 84, 73, 79, 78, 69, 196, 81, 85, 83, 72, 83, 72, 65, 89, 65, 128, 82, 69, 71, 73, 83, 84, 69, 82, 69, 196, 82, 69, 76, 65, 84, 73, 79, 78, 65, 204, 82, 69, 80, 82, 69, 83, 69, 78, 84, 128, 82, 69, 83, 85, 80, 73, 78, 85, 83, 128, 82, 73, 71, 72, 84, 45, 83, 73, 68, 197, 83, 67, 65, 78, 68, 73, 67, 85, 83, 128, 83, 69, 80, 84, 69, 77, 66, 69, 82, 128, 83, 72, 65, 86, 73, 89, 65, 78, 73, 128, 83, 72, 79, 85, 76, 68, 69, 82, 69, 196, 83, 73, 88, 45, 80, 69, 82, 45, 69, 205, 83, 73, 88, 45, 83, 84, 82, 73, 78, 199, 83, 84, 82, 79, 75, 69, 45, 49, 48, 128, 83, 84, 82, 79, 75, 69, 45, 49, 49, 128, 83, 85, 66, 83, 84, 73, 84, 85, 84, 197, 83, 89, 82, 77, 65, 84, 73, 75, 73, 128, 84, 72, 69, 82, 69, 70, 79, 82, 69, 128, 84, 72, 82, 69, 69, 45, 76, 73, 78, 197, 84, 82, 73, 70, 79, 76, 73, 65, 84, 197, 84, 82, 73, 70, 79, 78, 73, 65, 83, 128, 84, 82, 73, 71, 79, 82, 71, 79, 78, 128, 86, 73, 83, 65, 82, 71, 65, 89, 65, 128, 87, 79, 82, 68, 83, 80, 65, 67, 69, 128, 89, 80, 79, 75, 82, 73, 83, 73, 83, 128, 85, 78, 68, 69, 82, 66, 65, 82, 128, 81, 85, 79, 84, 65, 84, 73, 79, 206, 65, 83, 84, 69, 82, 73, 83, 75, 128, 79, 82, 78, 65, 77, 69, 78, 84, 128, 86, 65, 82, 73, 65, 84, 73, 79, 206, 65, 82, 67, 72, 65, 73, 79, 78, 128, 68, 73, 65, 69, 82, 69, 83, 73, 211, 66, 76, 65, 67, 75, 70, 79, 79, 212, 83, 85, 66, 83, 67, 82, 73, 80, 212, 68, 69, 78, 84, 73, 83, 84, 82, 217, 68, 73, 65, 76, 89, 84, 73, 75, 193, 73, 78, 84, 69, 71, 82, 65, 76, 128, 86, 69, 82, 84, 73, 67, 65, 76, 128, 82, 69, 67, 89, 67, 76, 73, 78, 199, 65, 78, 85, 83, 86, 65, 82, 65, 128, 65, 66, 75, 72, 65, 83, 73, 65, 206, 68, 79, 68, 69, 75, 65, 84, 65, 128, 81, 85, 65, 68, 82, 65, 78, 84, 128, 81, 85, 65, 68, 82, 85, 80, 76, 197, 68, 73, 65, 84, 79, 78, 73, 75, 201, 69, 76, 76, 73, 80, 83, 73, 83, 128, 69, 78, 67, 76, 79, 83, 73, 78, 199, 79, 86, 69, 82, 76, 73, 78, 69, 128, 80, 76, 65, 83, 84, 73, 67, 83, 128, 82, 69, 84, 82, 79, 70, 76, 69, 216, 73, 84, 69, 82, 65, 84, 73, 79, 206, 78, 79, 84, 69, 72, 69, 65, 68, 128, 78, 85, 77, 69, 82, 65, 84, 79, 210, 84, 72, 79, 85, 83, 65, 78, 68, 128, 69, 73, 71, 72, 84, 69, 69, 78, 128, 70, 79, 85, 82, 84, 69, 69, 78, 128, 78, 73, 78, 69, 84, 69, 69, 78, 128, 84, 72, 73, 82, 84, 69, 69, 78, 128, 68, 73, 65, 71, 79, 78, 65, 76, 128, 70, 76, 79, 82, 69, 84, 84, 69, 128, 73, 68, 69, 78, 84, 73, 67, 65, 204, 75, 69, 78, 84, 73, 77, 65, 84, 193, 80, 65, 82, 65, 71, 82, 65, 80, 200, 82, 69, 76, 65, 84, 73, 79, 78, 128, 83, 67, 73, 83, 83, 79, 82, 83, 128, 83, 85, 80, 69, 82, 83, 69, 84, 128, 65, 86, 65, 71, 82, 65, 72, 65, 128, 68, 68, 65, 89, 65, 78, 78, 65, 128, 68, 69, 80, 65, 82, 84, 73, 78, 199, 70, 65, 78, 69, 82, 79, 83, 73, 211, 73, 78, 70, 73, 78, 73, 84, 89, 128, 77, 85, 76, 84, 73, 77, 65, 80, 128, 77, 85, 85, 82, 68, 72, 65, 74, 193, 80, 65, 82, 65, 76, 76, 69, 76, 128, 80, 82, 69, 67, 69, 68, 69, 83, 128, 83, 73, 88, 84, 69, 69, 78, 84, 200, 83, 80, 72, 69, 82, 73, 67, 65, 204, 83, 85, 66, 76, 73, 78, 69, 65, 210, 83, 85, 67, 67, 69, 69, 68, 83, 128, 83, 85, 77, 77, 65, 84, 73, 79, 206, 84, 69, 76, 69, 80, 72, 79, 78, 197, 84, 72, 79, 85, 83, 65, 78, 68, 211, 89, 69, 83, 73, 69, 85, 78, 71, 128, 65, 76, 76, 73, 65, 78, 67, 69, 128, 67, 79, 78, 83, 84, 65, 78, 84, 128, 68, 73, 70, 79, 78, 73, 65, 83, 128, 68, 73, 71, 82, 65, 77, 77, 79, 211, 70, 73, 83, 72, 72, 79, 79, 75, 128, 70, 76, 65, 84, 84, 69, 78, 69, 196, 71, 65, 82, 83, 72, 85, 78, 73, 128, 71, 76, 73, 83, 83, 65, 78, 68, 207, 71, 82, 69, 71, 79, 82, 73, 65, 206, 73, 78, 83, 69, 82, 84, 73, 79, 206, 73, 78, 86, 73, 83, 73, 66, 76, 197, 73, 83, 45, 80, 73, 76, 76, 65, 128, 77, 79, 85, 78, 84, 65, 73, 78, 128, 79, 86, 69, 82, 82, 73, 68, 69, 128, 79, 89, 82, 65, 78, 73, 83, 77, 193, 80, 69, 68, 69, 83, 84, 65, 76, 128, 80, 78, 69, 85, 77, 65, 84, 65, 128, 80, 82, 79, 76, 79, 78, 71, 69, 196, 80, 82, 79, 80, 69, 76, 76, 69, 210, 82, 69, 83, 79, 85, 82, 67, 69, 128, 82, 69, 86, 69, 82, 83, 69, 68, 128, 83, 69, 77, 73, 86, 79, 87, 69, 204, 83, 69, 80, 65, 82, 65, 84, 79, 210, 83, 85, 66, 71, 82, 79, 85, 80, 128, 83, 87, 65, 80, 80, 73, 78, 71, 128, 83, 89, 77, 77, 69, 84, 82, 73, 195, 84, 82, 73, 83, 73, 77, 79, 85, 128, 84, 84, 65, 89, 65, 78, 78, 65, 128, 85, 78, 68, 69, 82, 76, 73, 78, 197, 85, 78, 73, 86, 69, 82, 83, 65, 204, 65, 68, 68, 82, 69, 83, 83, 69, 196, 65, 69, 69, 89, 65, 78, 78, 65, 128, 65, 73, 82, 80, 76, 65, 78, 69, 128, 65, 78, 85, 68, 65, 84, 84, 65, 128, 65, 80, 79, 68, 69, 88, 73, 65, 128, 65, 80, 79, 84, 72, 69, 77, 65, 128, 65, 81, 85, 65, 82, 73, 85, 83, 128, 65, 82, 65, 69, 65, 45, 69, 79, 128, 65, 82, 71, 79, 84, 69, 82, 73, 128, 65, 82, 73, 83, 84, 69, 82, 65, 128, 65, 82, 82, 79, 87, 72, 69, 65, 196, 65, 83, 67, 69, 78, 68, 73, 78, 199, 65, 83, 84, 69, 82, 73, 83, 75, 211, 65, 83, 84, 69, 82, 73, 83, 77, 128, 66, 65, 67, 75, 83, 76, 65, 83, 200, 66, 73, 79, 72, 65, 90, 65, 82, 196, 66, 73, 83, 69, 67, 84, 73, 78, 199, 66, 85, 76, 76, 83, 69, 89, 69, 128, 66, 85, 83, 83, 89, 69, 82, 85, 128, 67, 65, 68, 85, 67, 69, 85, 83, 128, 67, 65, 85, 76, 68, 82, 79, 78, 128, 67, 72, 65, 77, 73, 76, 79, 78, 128, 67, 72, 65, 84, 84, 65, 87, 65, 128, 67, 73, 86, 73, 76, 73, 65, 78, 128, 67, 76, 73, 77, 65, 67, 85, 83, 128, 67, 79, 78, 71, 82, 85, 69, 78, 212, 67, 79, 78, 74, 85, 71, 65, 84, 197, 67, 79, 78, 84, 79, 85, 82, 69, 196, 67, 79, 80, 89, 82, 73, 71, 72, 212, 67, 82, 69, 83, 67, 69, 78, 84, 128, 68, 65, 77, 77, 65, 84, 65, 78, 128, 68, 65, 86, 73, 89, 65, 78, 73, 128, 68, 69, 67, 69, 77, 66, 69, 82, 128, 68, 69, 76, 73, 77, 73, 84, 69, 210, 68, 73, 70, 84, 79, 71, 71, 79, 211, 68, 73, 71, 79, 82, 71, 79, 78, 128, 68, 73, 77, 69, 78, 83, 73, 79, 206, 68, 79, 84, 83, 45, 49, 50, 51, 128, 68, 79, 84, 83, 45, 49, 50, 52, 128, 68, 79, 84, 83, 45, 49, 50, 53, 128, 68, 79, 84, 83, 45, 49, 50, 54, 128, 68, 79, 84, 83, 45, 49, 50, 55, 128, 68, 79, 84, 83, 45, 49, 50, 56, 128, 68, 79, 84, 83, 45, 49, 51, 52, 128, 68, 79, 84, 83, 45, 49, 51, 53, 128, 68, 79, 84, 83, 45, 49, 51, 54, 128, 68, 79, 84, 83, 45, 49, 51, 55, 128, 68, 79, 84, 83, 45, 49, 51, 56, 128, 68, 79, 84, 83, 45, 49, 52, 53, 128, 68, 79, 84, 83, 45, 49, 52, 54, 128, 68, 79, 84, 83, 45, 49, 52, 55, 128, 68, 79, 84, 83, 45, 49, 52, 56, 128, 68, 79, 84, 83, 45, 49, 53, 54, 128, 68, 79, 84, 83, 45, 49, 53, 55, 128, 68, 79, 84, 83, 45, 49, 53, 56, 128, 68, 79, 84, 83, 45, 49, 54, 55, 128, 68, 79, 84, 83, 45, 49, 54, 56, 128, 68, 79, 84, 83, 45, 49, 55, 56, 128, 68, 79, 84, 83, 45, 50, 51, 52, 128, 68, 79, 84, 83, 45, 50, 51, 53, 128, 68, 79, 84, 83, 45, 50, 51, 54, 128, 68, 79, 84, 83, 45, 50, 51, 55, 128, 68, 79, 84, 83, 45, 50, 51, 56, 128, 68, 79, 84, 83, 45, 50, 52, 53, 128, 68, 79, 84, 83, 45, 50, 52, 54, 128, 68, 79, 84, 83, 45, 50, 52, 55, 128, 68, 79, 84, 83, 45, 50, 52, 56, 128, 68, 79, 84, 83, 45, 50, 53, 54, 128, 68, 79, 84, 83, 45, 50, 53, 55, 128, 68, 79, 84, 83, 45, 50, 53, 56, 128, 68, 79, 84, 83, 45, 50, 54, 55, 128, 68, 79, 84, 83, 45, 50, 54, 56, 128, 68, 79, 84, 83, 45, 50, 55, 56, 128, 68, 79, 84, 83, 45, 51, 52, 53, 128, 68, 79, 84, 83, 45, 51, 52, 54, 128, 68, 79, 84, 83, 45, 51, 52, 55, 128, 68, 79, 84, 83, 45, 51, 52, 56, 128, 68, 79, 84, 83, 45, 51, 53, 54, 128, 68, 79, 84, 83, 45, 51, 53, 55, 128, 68, 79, 84, 83, 45, 51, 53, 56, 128, 68, 79, 84, 83, 45, 51, 54, 55, 128, 68, 79, 84, 83, 45, 51, 54, 56, 128, 68, 79, 84, 83, 45, 51, 55, 56, 128, 68, 79, 84, 83, 45, 52, 53, 54, 128, 68, 79, 84, 83, 45, 52, 53, 55, 128, 68, 79, 84, 83, 45, 52, 53, 56, 128, 68, 79, 84, 83, 45, 52, 54, 55, 128, 68, 79, 84, 83, 45, 52, 54, 56, 128, 68, 79, 84, 83, 45, 52, 55, 56, 128, 68, 79, 84, 83, 45, 53, 54, 55, 128, 68, 79, 84, 83, 45, 53, 54, 56, 128, 68, 79, 84, 83, 45, 53, 55, 56, 128, 68, 79, 84, 83, 45, 54, 55, 56, 128, 68, 79, 84, 84, 69, 68, 45, 76, 128, 68, 79, 84, 84, 69, 68, 45, 78, 128, 68, 79, 84, 84, 69, 68, 45, 80, 128, 69, 78, 86, 69, 76, 79, 80, 69, 128, 69, 80, 69, 71, 69, 82, 77, 65, 128, 69, 83, 84, 73, 77, 65, 84, 69, 196, 69, 83, 85, 75, 85, 85, 68, 79, 128, 69, 88, 84, 82, 65, 45, 76, 79, 215, 70, 65, 84, 72, 65, 84, 65, 78, 128, 70, 69, 66, 82, 85, 65, 82, 89, 128, 70, 69, 83, 84, 73, 86, 65, 76, 128, 70, 73, 71, 85, 82, 69, 45, 49, 128, 70, 73, 71, 85, 82, 69, 45, 50, 128, 70, 73, 71, 85, 82, 69, 45, 51, 128, 70, 73, 86, 69, 45, 76, 73, 78, 197, 70, 79, 85, 82, 45, 76, 73, 78, 197, 70, 82, 65, 71, 77, 69, 78, 84, 128, 70, 82, 65, 71, 82, 65, 78, 84, 128, 70, 85, 78, 67, 84, 73, 79, 78, 128, 71, 69, 78, 73, 84, 73, 86, 69, 128, 71, 69, 79, 77, 69, 84, 82, 73, 195, 72, 65, 78, 45, 65, 75, 65, 84, 128, 72, 65, 82, 77, 79, 78, 73, 67, 128, 72, 69, 82, 77, 73, 84, 73, 65, 206, 72, 85, 65, 82, 65, 68, 68, 79, 128, 73, 76, 85, 89, 65, 78, 78, 65, 128, 73, 77, 73, 70, 79, 78, 79, 78, 128, 73, 78, 67, 76, 85, 68, 73, 78, 199, 73, 78, 67, 82, 69, 65, 83, 69, 211, 73, 82, 85, 89, 65, 78, 78, 65, 128, 74, 65, 86, 73, 89, 65, 78, 73, 128, 75, 65, 83, 82, 65, 84, 65, 78, 128, 75, 65, 84, 72, 73, 83, 84, 73, 128, 75, 69, 89, 66, 79, 65, 82, 68, 128, 75, 79, 78, 84, 69, 86, 77, 65, 128, 75, 82, 69, 77, 65, 83, 84, 73, 128, 76, 69, 70, 84, 45, 83, 73, 68, 197, 76, 79, 67, 65, 84, 73, 86, 69, 128, 76, 79, 82, 82, 65, 73, 78, 69, 128, 77, 65, 72, 65, 80, 65, 75, 72, 128, 77, 65, 73, 77, 65, 76, 65, 73, 128, 77, 65, 73, 89, 65, 77, 79, 75, 128, 77, 65, 83, 67, 85, 76, 73, 78, 197, 77, 69, 68, 73, 67, 73, 78, 69, 128, 77, 73, 78, 73, 83, 84, 69, 82, 128, 77, 85, 76, 84, 73, 83, 69, 84, 128, 78, 73, 75, 72, 65, 72, 73, 84, 128, 78, 79, 82, 84, 72, 87, 69, 83, 212, 78, 79, 86, 69, 77, 66, 69, 82, 128, 79, 86, 69, 82, 76, 65, 73, 68, 128, 80, 65, 65, 83, 69, 78, 84, 79, 128, 80, 65, 73, 82, 84, 72, 82, 65, 128, 80, 65, 76, 79, 67, 72, 75, 65, 128, 80, 65, 77, 85, 68, 80, 79, 68, 128, 80, 65, 82, 73, 67, 72, 79, 78, 128, 80, 65, 86, 73, 89, 65, 78, 73, 128, 80, 69, 76, 65, 83, 84, 79, 78, 128, 80, 73, 84, 67, 72, 70, 79, 82, 203, 80, 79, 82, 82, 69, 67, 84, 85, 211, 80, 82, 79, 70, 79, 85, 78, 68, 128, 80, 83, 73, 70, 73, 83, 84, 79, 206, 81, 65, 73, 82, 84, 72, 82, 65, 128, 81, 85, 65, 82, 84, 69, 82, 83, 128, 81, 85, 69, 83, 84, 73, 79, 78, 128, 82, 69, 67, 79, 82, 68, 69, 82, 128, 82, 69, 67, 79, 82, 68, 73, 78, 199, 82, 69, 67, 84, 65, 78, 71, 76, 197, 82, 69, 70, 69, 82, 69, 78, 67, 197, 82, 69, 76, 73, 71, 73, 79, 78, 128, 82, 69, 78, 84, 79, 71, 69, 78, 128, 82, 69, 83, 80, 79, 78, 83, 69, 128, 82, 73, 71, 72, 84, 72, 65, 78, 196, 82, 85, 75, 75, 65, 75, 72, 65, 128, 83, 65, 78, 84, 73, 73, 77, 85, 128, 83, 65, 88, 73, 77, 65, 84, 65, 128, 83, 67, 65, 78, 68, 73, 67, 85, 211, 83, 67, 79, 82, 80, 73, 85, 83, 128, 83, 69, 77, 73, 67, 79, 76, 79, 206, 83, 69, 86, 69, 78, 84, 69, 69, 206, 83, 73, 67, 75, 78, 69, 83, 83, 128, 83, 84, 79, 80, 80, 73, 78, 71, 128, 83, 84, 82, 69, 84, 67, 72, 69, 196, 83, 84, 82, 79, 75, 69, 45, 49, 128, 83, 84, 82, 79, 75, 69, 45, 50, 128, 83, 84, 82, 79, 75, 69, 45, 51, 128, 83, 84, 82, 79, 75, 69, 45, 52, 128, 83, 84, 82, 79, 75, 69, 45, 53, 128, 83, 84, 82, 79, 75, 69, 45, 54, 128, 83, 84, 82, 79, 75, 69, 45, 55, 128, 83, 84, 82, 79, 75, 69, 45, 56, 128, 83, 84, 82, 79, 75, 69, 45, 57, 128, 83, 85, 73, 84, 65, 66, 76, 69, 128, 83, 85, 82, 82, 79, 85, 78, 68, 128, 83, 89, 77, 77, 69, 84, 82, 89, 128, 83, 89, 78, 68, 69, 83, 77, 79, 211, 84, 65, 86, 73, 89, 65, 78, 73, 128, 84, 69, 84, 82, 65, 80, 76, 73, 128, 84, 79, 82, 67, 85, 76, 85, 83, 128, 84, 82, 79, 77, 73, 75, 79, 78, 128, 84, 82, 85, 78, 67, 65, 84, 69, 196, 85, 73, 76, 76, 69, 65, 78, 78, 128, 85, 77, 66, 82, 69, 76, 76, 65, 128, 85, 78, 68, 69, 82, 68, 79, 84, 128, 85, 78, 68, 69, 82, 84, 73, 69, 128, 86, 69, 82, 83, 73, 67, 76, 69, 128, 87, 65, 83, 65, 76, 76, 65, 77, 128, 89, 65, 77, 65, 75, 75, 65, 78, 128, 89, 80, 79, 75, 82, 73, 83, 73, 211, 90, 65, 86, 73, 89, 65, 78, 73, 128, 78, 69, 71, 65, 84, 73, 86, 197, 73, 78, 86, 69, 82, 84, 69, 196, 67, 69, 68, 73, 76, 76, 65, 128, 84, 82, 73, 65, 78, 71, 76, 197, 78, 79, 84, 69, 72, 69, 65, 196, 83, 85, 80, 69, 82, 83, 69, 212, 84, 65, 71, 66, 65, 78, 87, 193, 70, 82, 65, 67, 84, 73, 79, 206, 81, 85, 65, 68, 82, 65, 78, 212, 68, 73, 65, 71, 79, 78, 65, 204, 81, 85, 69, 83, 84, 73, 79, 206, 85, 80, 83, 73, 76, 79, 78, 128, 77, 65, 82, 84, 89, 82, 73, 193, 79, 86, 69, 82, 66, 65, 82, 128, 79, 86, 69, 82, 76, 65, 89, 128, 68, 73, 65, 77, 79, 78, 68, 128, 69, 80, 83, 73, 76, 79, 78, 128, 72, 65, 78, 71, 90, 72, 79, 213, 73, 78, 84, 69, 71, 82, 65, 204, 77, 69, 65, 83, 85, 82, 69, 196, 79, 77, 73, 67, 82, 79, 78, 128, 84, 79, 82, 84, 79, 73, 83, 197, 79, 82, 78, 65, 77, 69, 78, 212, 69, 88, 84, 69, 78, 68, 69, 196, 72, 65, 82, 80, 79, 79, 78, 128, 80, 82, 69, 67, 69, 68, 69, 211, 83, 79, 76, 73, 68, 85, 83, 128, 83, 85, 67, 67, 69, 69, 68, 211, 67, 79, 78, 84, 65, 73, 78, 211, 86, 73, 83, 65, 82, 71, 65, 128, 67, 82, 79, 83, 83, 73, 78, 199, 72, 85, 78, 68, 82, 69, 68, 128, 83, 73, 77, 65, 78, 83, 73, 211, 68, 73, 71, 82, 65, 80, 72, 128, 66, 65, 82, 76, 73, 78, 69, 128, 68, 73, 86, 73, 83, 73, 79, 206, 73, 79, 84, 73, 70, 73, 69, 196, 80, 65, 82, 65, 76, 76, 69, 204, 83, 73, 88, 84, 69, 69, 78, 128, 83, 81, 85, 65, 82, 69, 68, 128, 83, 85, 66, 71, 82, 79, 85, 208, 83, 85, 82, 82, 79, 85, 78, 196, 70, 73, 70, 84, 69, 69, 78, 128, 79, 80, 69, 82, 65, 84, 79, 210, 79, 82, 73, 71, 73, 78, 65, 204, 68, 73, 65, 83, 84, 79, 76, 201, 70, 65, 84, 72, 65, 84, 65, 206, 80, 79, 73, 78, 84, 69, 82, 128, 83, 84, 82, 65, 73, 71, 72, 212, 85, 80, 87, 65, 82, 68, 83, 128, 66, 65, 89, 65, 78, 78, 65, 128, 67, 72, 82, 79, 78, 79, 78, 128, 68, 73, 71, 79, 82, 71, 79, 206, 69, 73, 71, 72, 84, 72, 83, 128, 70, 73, 78, 71, 69, 82, 69, 196, 71, 65, 89, 65, 78, 78, 65, 128, 72, 65, 82, 75, 76, 69, 65, 206, 74, 65, 89, 65, 78, 78, 65, 128, 75, 79, 82, 79, 78, 73, 83, 128, 76, 69, 65, 84, 72, 69, 82, 128, 76, 79, 90, 69, 78, 71, 69, 128, 77, 65, 75, 83, 85, 82, 65, 128, 78, 79, 45, 66, 82, 69, 65, 203, 80, 73, 78, 87, 72, 69, 69, 204, 82, 69, 80, 69, 65, 84, 69, 196, 83, 65, 89, 65, 78, 78, 65, 128, 83, 69, 76, 69, 67, 84, 79, 210, 83, 81, 85, 73, 71, 71, 76, 197, 84, 69, 84, 65, 82, 84, 79, 211, 84, 82, 79, 77, 73, 75, 79, 206, 65, 67, 84, 73, 86, 65, 84, 197, 65, 67, 84, 85, 65, 76, 76, 217, 65, 80, 79, 68, 69, 82, 77, 193, 65, 82, 73, 83, 84, 69, 82, 193, 65, 83, 84, 69, 82, 73, 83, 203, 66, 69, 84, 87, 69, 69, 78, 128, 66, 73, 76, 65, 66, 73, 65, 204, 67, 65, 89, 65, 78, 78, 65, 128, 67, 69, 73, 76, 73, 78, 71, 128, 67, 72, 79, 82, 69, 86, 77, 193, 67, 72, 82, 79, 78, 79, 85, 128, 67, 76, 79, 84, 72, 69, 83, 128, 68, 65, 77, 77, 65, 84, 65, 206, 68, 69, 89, 84, 69, 82, 79, 211, 68, 73, 71, 65, 77, 77, 65, 128, 68, 73, 83, 73, 77, 79, 85, 128, 69, 77, 80, 72, 65, 83, 73, 211, 70, 69, 77, 73, 78, 73, 78, 197, 73, 78, 72, 69, 82, 69, 78, 212, 73, 78, 84, 69, 82, 73, 79, 210, 73, 90, 72, 73, 84, 83, 65, 128, 75, 65, 83, 82, 65, 84, 65, 206, 75, 65, 89, 65, 78, 78, 65, 128, 75, 79, 77, 66, 85, 86, 65, 128, 76, 65, 89, 65, 78, 78, 65, 128, 76, 79, 71, 79, 84, 89, 80, 197, 77, 85, 76, 84, 73, 83, 69, 212, 78, 65, 89, 65, 78, 78, 65, 128, 80, 65, 89, 65, 78, 78, 65, 128, 80, 69, 68, 69, 83, 84, 65, 204, 80, 69, 84, 65, 76, 76, 69, 196, 81, 85, 65, 82, 84, 69, 82, 211, 82, 71, 89, 73, 78, 71, 83, 128, 83, 69, 77, 73, 83, 79, 70, 212, 83, 69, 77, 75, 65, 84, 72, 128, 83, 72, 65, 80, 73, 78, 71, 128, 83, 79, 67, 73, 69, 84, 89, 128, 83, 80, 65, 82, 75, 76, 69, 128, 83, 80, 69, 67, 73, 65, 76, 128, 83, 84, 65, 78, 68, 65, 82, 196, 83, 84, 82, 79, 75, 69, 83, 128, 84, 72, 69, 83, 69, 79, 83, 128, 84, 72, 79, 85, 83, 65, 78, 196, 85, 66, 65, 68, 65, 77, 65, 128, 65, 65, 89, 65, 78, 78, 65, 128, 65, 66, 65, 70, 73, 76, 73, 128, 65, 69, 89, 65, 78, 78, 65, 128, 65, 73, 89, 65, 78, 78, 65, 128, 65, 76, 86, 69, 79, 76, 65, 210, 65, 78, 71, 83, 84, 82, 79, 205, 65, 78, 71, 85, 76, 65, 82, 128, 65, 78, 85, 83, 86, 65, 82, 193, 65, 80, 79, 84, 72, 69, 83, 128, 65, 82, 65, 69, 65, 45, 73, 128, 65, 82, 65, 69, 65, 45, 85, 128, 65, 82, 67, 72, 65, 73, 79, 206, 65, 85, 89, 65, 78, 78, 65, 128, 66, 65, 65, 82, 69, 82, 85, 128, 66, 65, 73, 82, 75, 65, 78, 128, 66, 65, 82, 82, 69, 75, 72, 128, 66, 69, 67, 65, 85, 83, 69, 128, 66, 69, 76, 71, 84, 72, 79, 210, 66, 69, 82, 75, 65, 78, 65, 206, 66, 73, 68, 69, 78, 84, 65, 204, 66, 79, 85, 78, 68, 65, 82, 217, 66, 82, 73, 83, 84, 76, 69, 128, 67, 65, 69, 83, 85, 82, 65, 128, 67, 65, 80, 73, 84, 65, 76, 128, 67, 65, 82, 82, 73, 65, 71, 197, 67, 69, 76, 83, 73, 85, 83, 128, 67, 72, 65, 77, 73, 76, 73, 128, 67, 79, 77, 80, 65, 82, 69, 128, 67, 79, 78, 83, 84, 65, 78, 212, 67, 79, 82, 78, 69, 82, 83, 128, 67, 79, 82, 82, 69, 67, 84, 128, 67, 82, 85, 90, 69, 73, 82, 207, 67, 85, 83, 84, 79, 77, 69, 210, 67, 87, 69, 79, 82, 84, 72, 128, 68, 65, 71, 65, 76, 71, 65, 128, 68, 69, 89, 84, 69, 82, 79, 213, 68, 73, 65, 77, 69, 84, 69, 210, 68, 73, 65, 84, 79, 78, 79, 206, 68, 73, 71, 82, 65, 77, 77, 193, 68, 73, 80, 76, 79, 85, 78, 128, 68, 73, 82, 69, 67, 84, 76, 217, 68, 73, 86, 73, 68, 69, 83, 128, 68, 79, 84, 83, 45, 49, 50, 128, 68, 79, 84, 83, 45, 49, 51, 128, 68, 79, 84, 83, 45, 49, 52, 128, 68, 79, 84, 83, 45, 49, 53, 128, 68, 79, 84, 83, 45, 49, 54, 128, 68, 79, 84, 83, 45, 49, 55, 128, 68, 79, 84, 83, 45, 49, 56, 128, 68, 79, 84, 83, 45, 50, 51, 128, 68, 79, 84, 83, 45, 50, 52, 128, 68, 79, 84, 83, 45, 50, 53, 128, 68, 79, 84, 83, 45, 50, 54, 128, 68, 79, 84, 83, 45, 50, 55, 128, 68, 79, 84, 83, 45, 50, 56, 128, 68, 79, 84, 83, 45, 51, 52, 128, 68, 79, 84, 83, 45, 51, 53, 128, 68, 79, 84, 83, 45, 51, 54, 128, 68, 79, 84, 83, 45, 51, 55, 128, 68, 79, 84, 83, 45, 51, 56, 128, 68, 79, 84, 83, 45, 52, 53, 128, 68, 79, 84, 83, 45, 52, 54, 128, 68, 79, 84, 83, 45, 52, 55, 128, 68, 79, 84, 83, 45, 52, 56, 128, 68, 79, 84, 83, 45, 53, 54, 128, 68, 79, 84, 83, 45, 53, 55, 128, 68, 79, 84, 83, 45, 53, 56, 128, 68, 79, 84, 83, 45, 54, 55, 128, 68, 79, 84, 83, 45, 54, 56, 128, 68, 79, 84, 83, 45, 55, 56, 128, 68, 82, 65, 70, 84, 73, 78, 199, 69, 65, 66, 72, 65, 68, 72, 128, 69, 65, 68, 72, 65, 68, 72, 128, 69, 66, 69, 70, 73, 76, 73, 128, 69, 73, 71, 72, 84, 69, 69, 206, 69, 76, 65, 70, 82, 79, 78, 128, 69, 76, 69, 67, 84, 82, 73, 195, 69, 78, 81, 85, 73, 82, 89, 128, 69, 78, 84, 69, 82, 73, 78, 199, 69, 84, 78, 65, 72, 84, 65, 128, 69, 86, 69, 78, 73, 78, 71, 128, 70, 65, 89, 65, 78, 78, 65, 128, 70, 69, 65, 84, 72, 69, 82, 128, 70, 69, 82, 77, 65, 84, 65, 128, 70, 73, 83, 72, 69, 89, 69, 128, 70, 79, 78, 71, 77, 65, 78, 128, 70, 79, 85, 82, 84, 69, 69, 206, 70, 82, 79, 87, 78, 73, 78, 199, 71, 73, 82, 85, 68, 65, 65, 128, 71, 82, 65, 80, 72, 69, 77, 197, 72, 65, 76, 65, 78, 84, 65, 128, 72, 65, 76, 66, 69, 82, 68, 128, 72, 65, 89, 65, 78, 78, 65, 128, 72, 69, 65, 68, 73, 78, 71, 128, 73, 45, 65, 82, 65, 69, 65, 128, 73, 66, 73, 70, 73, 76, 73, 128, 73, 67, 72, 65, 68, 73, 78, 128, 73, 73, 89, 65, 78, 78, 65, 128, 73, 78, 70, 73, 78, 73, 84, 217, 73, 78, 84, 69, 82, 69, 83, 212, 73, 79, 68, 72, 65, 68, 72, 128, 74, 65, 78, 85, 65, 82, 89, 128, 74, 65, 80, 65, 78, 69, 83, 197, 74, 85, 80, 73, 84, 69, 82, 128, 75, 65, 75, 65, 66, 65, 84, 128, 75, 65, 82, 65, 84, 84, 79, 128, 75, 65, 82, 79, 82, 73, 73, 128, 75, 79, 78, 84, 69, 86, 77, 193, 75, 79, 79, 77, 85, 85, 84, 128, 75, 85, 82, 79, 79, 78, 69, 128, 76, 65, 78, 71, 85, 65, 71, 197, 76, 79, 67, 65, 84, 73, 79, 206, 77, 65, 73, 75, 85, 82, 79, 128, 77, 65, 73, 77, 85, 65, 78, 128, 77, 65, 78, 83, 89, 79, 78, 128, 77, 65, 82, 66, 85, 84, 65, 128, 77, 65, 82, 67, 65, 84, 79, 128, 77, 65, 89, 65, 78, 78, 65, 128, 77, 69, 71, 65, 84, 79, 78, 128, 77, 69, 82, 67, 85, 82, 89, 128, 77, 73, 75, 85, 82, 79, 78, 128, 77, 73, 76, 76, 73, 79, 78, 211, 77, 79, 72, 65, 77, 77, 65, 196, 77, 79, 82, 78, 73, 78, 71, 128, 77, 85, 76, 84, 73, 80, 76, 197, 78, 65, 84, 73, 79, 78, 65, 204, 78, 69, 71, 65, 84, 73, 79, 206, 78, 69, 80, 84, 85, 78, 69, 128, 78, 69, 87, 76, 73, 78, 69, 128, 78, 71, 69, 65, 68, 65, 76, 128, 78, 73, 75, 65, 72, 73, 84, 128, 78, 73, 78, 69, 84, 69, 69, 206, 79, 66, 79, 70, 73, 76, 73, 128, 79, 67, 84, 79, 66, 69, 82, 128, 79, 78, 69, 45, 76, 73, 78, 197, 79, 78, 69, 83, 69, 76, 70, 128, 79, 79, 89, 65, 78, 78, 65, 128, 79, 82, 84, 72, 79, 68, 79, 216, 79, 85, 84, 76, 73, 78, 69, 128, 80, 69, 76, 65, 83, 84, 79, 206, 80, 69, 84, 65, 83, 77, 65, 128, 80, 69, 84, 65, 83, 84, 73, 128, 80, 72, 73, 78, 84, 72, 85, 128, 80, 72, 85, 84, 72, 65, 79, 128, 80, 79, 68, 65, 84, 85, 83, 128, 80, 82, 69, 67, 69, 68, 69, 128, 80, 82, 69, 67, 69, 68, 69, 196, 80, 82, 69, 86, 73, 79, 85, 211, 80, 82, 73, 86, 65, 84, 69, 128, 80, 82, 79, 80, 69, 82, 84, 217, 81, 85, 65, 82, 84, 69, 82, 128, 82, 65, 75, 72, 65, 78, 71, 128, 82, 65, 80, 73, 83, 77, 65, 128, 82, 65, 89, 65, 78, 78, 65, 128, 82, 69, 65, 72, 77, 85, 75, 128, 82, 73, 84, 84, 79, 82, 85, 128, 82, 85, 85, 66, 85, 82, 85, 128, 83, 65, 73, 75, 85, 82, 85, 128, 83, 65, 76, 84, 73, 82, 69, 128, 83, 65, 77, 80, 72, 65, 79, 128, 83, 65, 78, 89, 79, 79, 71, 193, 83, 67, 72, 79, 76, 65, 82, 128, 83, 67, 82, 85, 80, 76, 69, 128, 83, 69, 71, 77, 69, 78, 84, 128, 83, 69, 86, 69, 78, 84, 89, 128, 83, 73, 77, 73, 76, 65, 82, 128, 83, 73, 82, 73, 78, 71, 85, 128, 83, 73, 88, 45, 76, 73, 78, 197, 83, 78, 79, 87, 77, 65, 78, 128, 83, 80, 82, 73, 78, 71, 83, 128, 83, 81, 85, 65, 82, 69, 83, 128, 83, 84, 65, 86, 82, 79, 83, 128, 83, 84, 65, 86, 82, 79, 85, 128, 83, 84, 82, 73, 67, 84, 76, 217, 83, 85, 66, 74, 69, 67, 84, 128, 83, 85, 67, 67, 69, 69, 68, 128, 83, 89, 78, 69, 86, 77, 65, 128, 84, 65, 73, 83, 89, 79, 85, 128, 84, 65, 84, 87, 69, 69, 76, 128, 84, 67, 72, 69, 72, 69, 72, 128, 84, 69, 83, 83, 65, 82, 79, 206, 84, 69, 83, 83, 69, 82, 65, 128, 84, 72, 73, 82, 84, 69, 69, 206, 84, 72, 85, 78, 68, 69, 82, 128, 84, 72, 85, 82, 73, 83, 65, 218, 84, 73, 78, 65, 71, 77, 65, 128, 84, 73, 82, 79, 78, 73, 65, 206, 84, 79, 82, 67, 85, 76, 85, 211, 84, 82, 73, 73, 83, 65, 80, 128, 84, 86, 73, 77, 65, 68, 85, 210, 84, 87, 79, 45, 76, 73, 78, 197, 85, 45, 69, 79, 45, 69, 85, 128, 85, 66, 85, 70, 73, 76, 73, 128, 86, 65, 89, 65, 78, 78, 65, 128, 86, 73, 69, 87, 68, 65, 84, 193, 86, 73, 76, 76, 65, 71, 69, 128, 86, 79, 73, 67, 73, 78, 71, 128, 87, 65, 83, 65, 76, 76, 65, 205, 89, 65, 89, 65, 78, 78, 65, 128, 89, 80, 79, 82, 82, 79, 73, 128, 85, 80, 83, 73, 76, 79, 206, 67, 73, 82, 67, 76, 69, 128, 68, 73, 78, 71, 66, 65, 212, 65, 67, 67, 69, 78, 84, 128, 69, 80, 83, 73, 76, 79, 206, 83, 76, 65, 78, 84, 69, 196, 72, 65, 78, 85, 78, 79, 207, 83, 81, 85, 65, 82, 69, 128, 68, 65, 71, 69, 83, 72, 128, 84, 65, 71, 65, 76, 79, 199, 79, 77, 73, 67, 82, 79, 206, 71, 76, 79, 84, 84, 65, 204, 78, 65, 83, 75, 65, 80, 201, 67, 79, 82, 78, 69, 82, 128, 69, 76, 69, 77, 69, 78, 212, 66, 85, 76, 76, 69, 84, 128, 79, 71, 79, 78, 69, 75, 128, 75, 73, 82, 71, 72, 73, 218, 82, 69, 86, 69, 82, 83, 197, 86, 73, 82, 65, 77, 65, 128, 68, 73, 65, 77, 79, 78, 196, 68, 79, 85, 66, 76, 69, 128, 78, 69, 73, 84, 72, 69, 210, 81, 85, 65, 82, 84, 69, 210, 83, 73, 77, 73, 76, 65, 210, 83, 73, 78, 71, 76, 69, 128, 83, 81, 85, 65, 82, 69, 196, 68, 79, 84, 76, 69, 83, 211, 78, 85, 78, 65, 86, 73, 203, 83, 79, 76, 73, 68, 85, 211, 84, 72, 45, 67, 82, 69, 197, 84, 82, 73, 71, 82, 65, 205, 65, 82, 75, 84, 73, 75, 207, 69, 76, 69, 86, 69, 78, 128, 73, 78, 83, 73, 68, 69, 128, 79, 80, 69, 78, 73, 78, 199, 83, 85, 66, 83, 69, 84, 128, 84, 87, 69, 76, 86, 69, 128, 84, 87, 69, 78, 84, 89, 128, 69, 73, 71, 72, 84, 72, 211, 72, 89, 80, 72, 69, 78, 128, 80, 65, 82, 84, 73, 65, 204, 86, 82, 65, 67, 72, 89, 128, 65, 82, 82, 79, 87, 83, 128, 70, 65, 76, 76, 73, 78, 199, 80, 69, 82, 67, 69, 78, 212, 84, 72, 82, 79, 85, 71, 200, 67, 69, 68, 73, 76, 76, 193, 67, 79, 78, 84, 82, 79, 204, 67, 85, 82, 86, 73, 78, 199, 68, 73, 71, 82, 65, 80, 200, 69, 81, 85, 65, 76, 83, 128, 70, 73, 76, 76, 69, 82, 128, 73, 78, 86, 69, 82, 83, 197, 75, 69, 78, 84, 73, 77, 193, 79, 66, 76, 73, 81, 85, 197, 82, 79, 85, 78, 68, 69, 196, 83, 65, 78, 89, 65, 75, 193, 84, 67, 72, 69, 72, 69, 200, 84, 72, 73, 82, 84, 89, 128, 84, 79, 80, 66, 65, 82, 128, 84, 85, 82, 84, 76, 69, 128, 89, 73, 68, 68, 73, 83, 200, 45, 75, 72, 89, 73, 76, 128, 66, 79, 84, 84, 79, 77, 128, 67, 69, 78, 84, 82, 69, 196, 67, 79, 78, 84, 65, 73, 206, 67, 79, 78, 84, 79, 85, 210, 68, 65, 78, 84, 65, 74, 193, 68, 73, 86, 73, 68, 69, 196, 68, 79, 84, 84, 69, 68, 128, 68, 82, 65, 71, 79, 78, 128, 70, 73, 70, 84, 72, 83, 128, 72, 85, 78, 68, 82, 69, 196, 75, 79, 77, 66, 85, 86, 193, 75, 82, 65, 84, 73, 77, 193, 76, 69, 65, 68, 69, 82, 128, 77, 65, 82, 66, 85, 84, 193, 77, 69, 77, 66, 69, 82, 128, 78, 65, 84, 85, 82, 65, 204, 80, 69, 78, 67, 73, 76, 128, 81, 65, 77, 65, 84, 83, 128, 83, 75, 76, 73, 82, 79, 206, 83, 84, 73, 71, 77, 65, 128, 83, 89, 78, 65, 71, 77, 193, 84, 65, 65, 76, 85, 74, 193, 84, 72, 69, 83, 69, 79, 211, 84, 79, 78, 71, 85, 69, 128, 65, 67, 67, 79, 85, 78, 212, 65, 80, 76, 79, 85, 78, 128, 65, 82, 67, 72, 65, 73, 195, 66, 65, 76, 85, 68, 65, 128, 66, 65, 77, 66, 79, 79, 128, 66, 65, 83, 72, 75, 73, 210, 66, 73, 78, 68, 73, 78, 199, 66, 73, 83, 72, 79, 80, 128, 66, 79, 87, 84, 73, 69, 128, 67, 69, 78, 84, 82, 69, 128, 67, 72, 73, 69, 85, 67, 200, 67, 76, 85, 83, 84, 69, 210, 68, 65, 71, 71, 69, 82, 128, 68, 69, 67, 73, 77, 65, 204, 68, 73, 86, 73, 68, 69, 128, 69, 83, 67, 65, 80, 69, 128, 70, 69, 65, 84, 72, 69, 210, 70, 76, 69, 88, 85, 83, 128, 71, 65, 78, 71, 73, 65, 128, 71, 69, 82, 69, 83, 72, 128, 73, 78, 72, 73, 66, 73, 212, 73, 83, 83, 72, 65, 82, 128, 73, 90, 72, 73, 84, 83, 193, 75, 72, 73, 69, 85, 75, 200, 75, 76, 65, 83, 77, 65, 128, 75, 78, 73, 71, 72, 84, 128, 75, 79, 82, 65, 78, 73, 195, 76, 69, 71, 69, 84, 79, 211, 77, 65, 76, 65, 75, 79, 206, 77, 79, 82, 84, 65, 82, 128, 78, 69, 71, 65, 84, 69, 196, 78, 73, 78, 69, 84, 89, 128, 78, 79, 84, 67, 72, 69, 196, 79, 82, 68, 73, 78, 65, 204, 80, 72, 73, 69, 85, 80, 200, 80, 72, 82, 65, 83, 69, 128, 80, 73, 76, 67, 82, 79, 215, 80, 76, 65, 71, 73, 79, 211, 83, 69, 82, 73, 70, 83, 128, 83, 72, 65, 80, 69, 83, 128, 83, 73, 88, 84, 69, 69, 206, 83, 76, 79, 80, 73, 78, 199, 83, 77, 65, 76, 76, 69, 210, 83, 77, 73, 76, 73, 78, 199, 83, 80, 69, 69, 67, 72, 128, 84, 69, 76, 69, 73, 65, 128, 84, 69, 76, 73, 83, 72, 193, 84, 69, 83, 83, 69, 82, 193, 84, 72, 73, 69, 85, 84, 200, 84, 72, 82, 69, 65, 68, 128, 84, 72, 82, 69, 69, 45, 196, 85, 80, 84, 85, 82, 78, 128, 89, 69, 76, 76, 79, 87, 128, 89, 79, 45, 89, 65, 69, 128, 89, 85, 45, 89, 69, 79, 128, 65, 70, 82, 73, 67, 65, 206, 65, 73, 72, 86, 85, 83, 128, 65, 73, 86, 73, 76, 73, 203, 65, 76, 73, 71, 78, 69, 196, 65, 78, 67, 72, 79, 82, 128, 65, 78, 78, 85, 73, 84, 217, 65, 80, 65, 65, 84, 79, 128, 65, 82, 65, 69, 65, 69, 128, 65, 82, 82, 73, 86, 69, 128, 65, 82, 83, 69, 79, 83, 128, 65, 82, 85, 72, 85, 65, 128, 65, 85, 71, 85, 83, 84, 128, 65, 86, 69, 82, 65, 71, 197, 66, 65, 68, 71, 69, 82, 128, 66, 65, 73, 77, 65, 73, 128, 66, 65, 78, 84, 79, 67, 128, 66, 65, 82, 82, 69, 69, 128, 66, 69, 78, 90, 69, 78, 197, 66, 69, 84, 87, 69, 69, 206, 66, 69, 89, 89, 65, 76, 128, 66, 73, 84, 84, 69, 82, 128, 66, 79, 82, 85, 84, 79, 128, 66, 82, 65, 78, 67, 72, 128, 66, 82, 69, 86, 73, 83, 128, 66, 85, 67, 75, 76, 69, 128, 67, 65, 78, 67, 69, 76, 128, 67, 65, 78, 67, 69, 82, 128, 67, 65, 84, 65, 87, 65, 128, 67, 65, 85, 84, 73, 79, 206, 67, 72, 69, 86, 82, 79, 206, 67, 76, 69, 70, 45, 49, 128, 67, 76, 69, 70, 45, 50, 128, 67, 76, 73, 86, 73, 83, 128, 67, 76, 79, 83, 69, 68, 128, 67, 79, 78, 73, 67, 65, 204, 67, 79, 82, 80, 83, 69, 128, 67, 85, 82, 82, 69, 78, 212, 68, 65, 65, 68, 72, 85, 128, 68, 65, 76, 65, 84, 72, 128, 68, 65, 77, 65, 82, 85, 128, 68, 65, 83, 69, 73, 65, 128, 68, 68, 65, 72, 65, 76, 128, 68, 69, 76, 69, 84, 69, 128, 68, 72, 65, 65, 76, 85, 128, 68, 72, 65, 82, 77, 65, 128, 68, 73, 69, 83, 73, 83, 128, 68, 73, 80, 80, 69, 82, 128, 68, 79, 84, 83, 45, 49, 128, 68, 79, 84, 83, 45, 50, 128, 68, 79, 84, 83, 45, 51, 128, 68, 79, 84, 83, 45, 52, 128, 68, 79, 84, 83, 45, 53, 128, 68, 79, 84, 83, 45, 54, 128, 68, 79, 84, 83, 45, 55, 128, 68, 79, 84, 83, 45, 56, 128, 68, 82, 65, 67, 72, 77, 193, 69, 73, 71, 72, 84, 72, 128, 69, 73, 71, 72, 84, 89, 128, 69, 78, 65, 82, 88, 73, 211, 69, 88, 67, 69, 83, 83, 128, 69, 88, 73, 83, 84, 83, 128, 70, 65, 67, 69, 45, 49, 128, 70, 65, 67, 69, 45, 50, 128, 70, 65, 67, 69, 45, 51, 128, 70, 65, 67, 69, 45, 52, 128, 70, 65, 67, 69, 45, 53, 128, 70, 65, 67, 69, 45, 54, 128, 70, 65, 84, 72, 69, 82, 128, 70, 69, 77, 65, 76, 69, 128, 70, 69, 82, 77, 65, 84, 193, 70, 73, 70, 84, 69, 69, 206, 70, 76, 65, 71, 45, 49, 128, 70, 76, 65, 71, 45, 50, 128, 70, 76, 65, 71, 45, 51, 128, 70, 76, 65, 71, 45, 52, 128, 70, 76, 65, 71, 45, 53, 128, 70, 79, 82, 67, 69, 83, 128, 71, 69, 68, 79, 76, 65, 128, 71, 69, 77, 73, 78, 73, 128, 71, 69, 78, 69, 82, 73, 195, 71, 72, 65, 73, 78, 85, 128, 71, 72, 85, 78, 78, 65, 128, 72, 69, 65, 86, 69, 78, 128, 72, 69, 73, 83, 69, 73, 128, 72, 69, 82, 85, 84, 85, 128, 72, 85, 73, 73, 84, 79, 128, 73, 45, 66, 69, 65, 77, 128, 73, 77, 73, 83, 69, 79, 211, 73, 78, 71, 87, 65, 90, 128, 73, 78, 73, 78, 71, 85, 128, 73, 78, 83, 69, 67, 84, 128, 75, 65, 78, 84, 65, 74, 193, 75, 69, 70, 85, 76, 65, 128, 75, 69, 89, 67, 65, 80, 128, 75, 72, 79, 77, 85, 84, 128, 75, 76, 73, 84, 79, 78, 128, 75, 79, 82, 85, 78, 65, 128, 75, 89, 85, 82, 73, 73, 128, 76, 65, 77, 65, 68, 72, 128, 76, 65, 84, 69, 82, 65, 204, 76, 73, 78, 69, 45, 49, 128, 76, 73, 78, 69, 45, 51, 128, 76, 73, 78, 69, 45, 55, 128, 76, 73, 78, 69, 45, 57, 128, 76, 73, 78, 75, 73, 78, 199, 76, 79, 90, 69, 78, 71, 197, 77, 65, 76, 84, 69, 83, 197, 77, 65, 82, 75, 69, 82, 128, 77, 65, 82, 85, 75, 85, 128, 77, 65, 84, 82, 73, 88, 128, 77, 65, 88, 73, 77, 65, 128, 77, 69, 68, 73, 85, 77, 128, 77, 69, 71, 65, 76, 73, 128, 77, 69, 82, 75, 72, 65, 128, 77, 69, 84, 82, 73, 65, 128, 77, 73, 68, 76, 73, 78, 197, 77, 73, 76, 76, 69, 84, 128, 77, 73, 78, 73, 77, 65, 128, 77, 79, 68, 69, 76, 83, 128, 77, 79, 84, 72, 69, 82, 128, 77, 85, 81, 68, 65, 77, 128, 78, 65, 85, 84, 72, 83, 128, 78, 69, 78, 65, 78, 79, 128, 78, 73, 82, 85, 71, 85, 128, 78, 79, 75, 72, 85, 75, 128, 78, 79, 77, 73, 78, 65, 204, 78, 85, 77, 66, 69, 82, 128, 78, 85, 78, 65, 86, 85, 212, 79, 77, 65, 76, 79, 78, 128, 79, 80, 69, 78, 45, 80, 128, 79, 80, 80, 79, 83, 69, 128, 79, 82, 73, 71, 73, 78, 128, 79, 84, 72, 65, 76, 65, 206, 80, 65, 76, 65, 84, 65, 204, 80, 65, 76, 85, 84, 65, 128, 80, 65, 83, 72, 84, 65, 128, 80, 69, 78, 73, 72, 73, 128, 80, 69, 82, 83, 79, 78, 128, 80, 73, 75, 85, 82, 85, 128, 80, 73, 80, 73, 78, 71, 128, 80, 73, 83, 67, 69, 83, 128, 80, 79, 73, 78, 84, 79, 128, 80, 82, 69, 67, 69, 68, 197, 80, 82, 69, 70, 65, 67, 197, 80, 82, 79, 68, 85, 67, 212, 81, 69, 84, 65, 78, 65, 128, 81, 85, 66, 85, 84, 83, 128, 82, 69, 80, 69, 65, 84, 128, 82, 69, 84, 85, 82, 78, 128, 82, 85, 78, 79, 85, 84, 128, 83, 65, 65, 68, 72, 85, 128, 83, 65, 74, 68, 65, 72, 128, 83, 65, 77, 69, 75, 72, 128, 83, 65, 78, 78, 89, 65, 128, 83, 65, 84, 85, 82, 78, 128, 83, 67, 82, 69, 69, 78, 128, 83, 67, 82, 73, 80, 84, 128, 83, 69, 65, 71, 85, 76, 204, 83, 69, 67, 79, 78, 68, 128, 83, 69, 67, 82, 69, 84, 128, 83, 69, 67, 84, 79, 82, 128, 83, 69, 73, 83, 77, 65, 128, 83, 69, 82, 86, 73, 67, 197, 83, 72, 65, 68, 68, 65, 128, 83, 72, 65, 75, 84, 73, 128, 83, 72, 69, 69, 78, 85, 128, 83, 72, 85, 70, 70, 76, 197, 83, 73, 67, 75, 76, 69, 128, 83, 73, 88, 84, 72, 83, 128, 83, 76, 79, 87, 76, 89, 128, 83, 80, 65, 84, 72, 73, 128, 83, 80, 73, 82, 73, 84, 128, 83, 80, 82, 79, 85, 84, 128, 83, 84, 65, 86, 82, 79, 211, 83, 84, 82, 65, 73, 70, 128, 83, 84, 82, 73, 68, 69, 128, 83, 84, 82, 79, 75, 69, 211, 83, 85, 66, 73, 84, 79, 128, 83, 85, 67, 67, 69, 69, 196, 83, 85, 82, 70, 65, 67, 197, 83, 89, 78, 65, 70, 73, 128, 83, 89, 79, 85, 87, 65, 128, 84, 65, 84, 87, 69, 69, 204, 84, 65, 85, 82, 85, 83, 128, 84, 69, 78, 85, 84, 79, 128, 84, 72, 65, 65, 76, 85, 128, 84, 72, 65, 72, 65, 78, 128, 84, 72, 73, 82, 68, 83, 128, 84, 72, 73, 85, 84, 72, 128, 84, 73, 80, 69, 72, 65, 128, 84, 82, 73, 80, 76, 73, 128, 84, 82, 73, 80, 79, 68, 128, 84, 83, 72, 85, 71, 83, 128, 84, 84, 69, 72, 69, 72, 128, 84, 85, 82, 66, 65, 78, 128, 85, 80, 82, 73, 71, 72, 212, 85, 82, 65, 78, 85, 83, 128, 86, 65, 76, 76, 69, 89, 128, 86, 65, 82, 69, 73, 65, 201, 86, 65, 82, 73, 65, 78, 212, 86, 65, 82, 73, 75, 65, 128, 86, 73, 67, 84, 79, 82, 217, 86, 73, 82, 73, 65, 77, 128, 86, 73, 83, 65, 82, 71, 193, 87, 69, 65, 80, 79, 78, 128, 87, 82, 73, 84, 73, 78, 199, 89, 70, 69, 83, 73, 83, 128, 89, 79, 45, 89, 69, 79, 128, 89, 80, 83, 73, 76, 73, 128, 84, 82, 73, 80, 76, 197, 84, 85, 82, 78, 69, 196, 69, 81, 85, 65, 76, 211, 71, 79, 84, 72, 73, 195, 76, 73, 71, 72, 84, 128, 72, 69, 65, 86, 89, 128, 77, 73, 68, 68, 76, 197, 83, 73, 78, 71, 76, 197, 66, 76, 79, 67, 75, 128, 77, 65, 78, 67, 72, 213, 84, 79, 78, 79, 83, 128, 70, 84, 72, 79, 82, 193, 79, 77, 69, 71, 65, 128, 83, 73, 71, 77, 65, 128, 68, 65, 83, 73, 65, 128, 83, 85, 66, 83, 69, 212, 67, 76, 79, 83, 69, 196, 65, 76, 80, 72, 65, 128, 66, 79, 84, 84, 79, 205, 77, 69, 68, 73, 85, 205, 86, 85, 76, 71, 65, 210, 67, 79, 77, 77, 65, 128, 67, 79, 80, 84, 73, 195, 67, 79, 82, 78, 69, 210, 68, 69, 76, 84, 65, 128, 69, 81, 85, 65, 76, 128, 73, 67, 72, 79, 83, 128, 83, 65, 89, 73, 83, 201, 87, 72, 73, 84, 69, 128, 65, 76, 77, 79, 83, 212, 67, 82, 79, 83, 83, 128, 75, 65, 80, 80, 65, 128, 76, 65, 77, 68, 65, 128, 84, 72, 69, 84, 65, 128, 89, 45, 67, 82, 69, 197, 66, 69, 83, 73, 68, 197, 67, 69, 78, 84, 82, 197, 77, 65, 67, 82, 79, 206, 83, 72, 65, 68, 68, 193, 78, 79, 82, 77, 65, 204, 84, 87, 69, 78, 84, 217, 68, 65, 83, 72, 69, 196, 76, 69, 78, 71, 84, 200, 80, 82, 73, 77, 69, 128, 84, 72, 73, 82, 84, 217, 85, 78, 73, 79, 78, 128, 67, 65, 78, 68, 82, 193, 82, 69, 80, 69, 65, 212, 83, 84, 82, 79, 75, 197, 84, 69, 77, 80, 85, 211, 68, 79, 84, 84, 69, 196, 82, 73, 83, 73, 78, 199, 82, 84, 65, 71, 83, 128, 68, 73, 69, 83, 73, 211, 68, 73, 80, 76, 73, 128, 73, 78, 68, 69, 88, 128, 75, 79, 80, 80, 65, 128, 78, 65, 66, 76, 65, 128, 79, 84, 84, 65, 86, 193, 83, 84, 65, 70, 70, 128, 89, 70, 69, 83, 73, 211, 66, 65, 76, 76, 79, 212, 66, 65, 82, 82, 69, 197, 67, 76, 73, 67, 75, 128, 67, 85, 82, 86, 69, 196, 69, 65, 82, 84, 72, 128, 70, 69, 78, 67, 69, 128, 70, 73, 70, 84, 89, 128, 76, 69, 73, 77, 77, 193, 76, 73, 84, 84, 76, 197, 78, 69, 83, 84, 69, 196, 78, 85, 75, 84, 65, 128, 85, 73, 71, 72, 85, 210, 66, 65, 83, 83, 65, 128, 66, 82, 73, 68, 71, 197, 67, 72, 82, 79, 77, 193, 67, 85, 66, 69, 68, 128, 68, 69, 71, 82, 69, 197, 68, 69, 86, 73, 67, 197, 68, 79, 76, 76, 65, 210, 80, 65, 73, 82, 69, 196, 80, 65, 84, 65, 72, 128, 80, 73, 69, 67, 69, 128, 83, 67, 72, 87, 65, 128, 83, 75, 69, 87, 69, 196, 84, 73, 77, 69, 83, 128, 84, 84, 69, 72, 69, 200, 87, 65, 84, 69, 82, 128, 87, 73, 71, 71, 76, 217, 65, 82, 79, 85, 78, 196, 65, 82, 83, 69, 79, 211, 66, 82, 79, 75, 69, 206, 67, 65, 82, 69, 84, 128, 67, 76, 73, 70, 70, 128, 68, 65, 71, 69, 83, 200, 70, 76, 79, 82, 65, 204, 72, 69, 65, 82, 84, 128, 76, 65, 77, 69, 68, 128, 76, 85, 78, 65, 84, 197, 77, 65, 80, 73, 81, 128, 78, 45, 67, 82, 69, 197, 80, 79, 83, 84, 65, 204, 80, 84, 72, 65, 72, 193, 83, 67, 72, 69, 77, 193, 83, 69, 71, 79, 76, 128, 83, 72, 65, 68, 69, 128, 83, 84, 82, 69, 83, 211, 84, 72, 79, 82, 78, 128, 84, 73, 84, 76, 79, 128, 84, 79, 79, 84, 72, 128, 86, 65, 82, 69, 73, 193, 90, 73, 71, 90, 65, 199, 90, 81, 65, 80, 72, 193, 65, 76, 65, 80, 72, 128, 65, 76, 65, 89, 72, 197, 66, 69, 65, 77, 69, 196, 66, 73, 78, 65, 82, 217, 66, 79, 87, 84, 73, 197, 67, 72, 69, 67, 75, 128, 67, 76, 79, 84, 72, 128, 67, 85, 82, 86, 69, 128, 68, 65, 76, 69, 84, 128, 68, 65, 78, 68, 65, 128, 68, 68, 65, 72, 65, 204, 68, 69, 65, 84, 72, 128, 69, 84, 69, 82, 79, 206, 70, 65, 67, 84, 79, 210, 70, 73, 71, 85, 82, 197, 70, 76, 79, 79, 82, 128, 70, 79, 82, 84, 89, 128, 71, 65, 80, 80, 69, 196, 71, 69, 78, 73, 75, 201, 71, 72, 79, 83, 84, 128, 71, 72, 85, 78, 78, 193, 71, 78, 89, 73, 83, 128, 71, 79, 82, 71, 73, 128, 72, 65, 77, 90, 65, 128, 72, 73, 82, 73, 81, 128, 72, 79, 76, 65, 77, 128, 72, 79, 82, 83, 69, 128, 72, 87, 65, 73, 82, 128, 75, 65, 90, 65, 75, 200, 75, 73, 89, 69, 79, 203, 75, 76, 65, 83, 77, 193, 76, 65, 66, 79, 82, 128, 76, 65, 82, 71, 69, 210, 77, 69, 84, 65, 76, 128, 78, 79, 84, 69, 83, 128, 79, 71, 79, 78, 69, 203, 79, 76, 73, 71, 79, 206, 79, 82, 78, 65, 84, 197, 80, 73, 65, 83, 77, 193, 80, 76, 65, 78, 67, 203, 80, 79, 73, 78, 84, 128, 80, 82, 79, 84, 79, 211, 81, 85, 69, 69, 78, 128, 81, 85, 73, 76, 76, 128, 83, 65, 77, 80, 73, 128, 83, 67, 82, 69, 69, 206, 83, 69, 71, 78, 79, 128, 83, 69, 82, 73, 70, 211, 83, 69, 83, 65, 77, 197, 83, 72, 65, 82, 80, 128, 83, 72, 67, 72, 65, 128, 83, 72, 69, 69, 80, 128, 83, 72, 69, 76, 76, 128, 83, 72, 73, 77, 65, 128, 83, 72, 87, 65, 65, 128, 83, 72, 87, 73, 73, 128, 83, 72, 87, 79, 79, 128, 83, 73, 71, 78, 83, 128, 83, 73, 78, 68, 72, 201, 83, 77, 65, 76, 76, 128, 83, 80, 73, 82, 73, 212, 83, 84, 79, 67, 75, 128, 83, 84, 85, 68, 89, 128, 83, 85, 75, 85, 78, 128, 84, 65, 78, 78, 69, 196, 84, 69, 76, 79, 85, 211, 84, 72, 87, 65, 65, 128, 84, 73, 71, 69, 82, 128, 84, 73, 75, 69, 85, 212, 84, 82, 85, 78, 75, 128, 84, 83, 65, 68, 73, 128, 84, 83, 72, 69, 71, 128, 84, 83, 72, 69, 83, 128, 84, 87, 69, 76, 86, 197, 87, 72, 69, 65, 84, 128, 89, 79, 45, 89, 65, 128, 89, 85, 45, 89, 69, 128, 90, 90, 73, 69, 84, 128, 45, 67, 72, 65, 76, 128, 45, 75, 72, 89, 85, 196, 45, 80, 72, 82, 85, 128, 65, 68, 68, 65, 75, 128, 65, 71, 65, 73, 78, 128, 65, 72, 83, 68, 65, 128, 65, 76, 73, 70, 85, 128, 65, 77, 79, 85, 78, 212, 65, 78, 80, 69, 65, 128, 65, 80, 82, 73, 76, 128, 65, 82, 73, 69, 83, 128, 65, 82, 76, 65, 85, 199, 66, 66, 73, 69, 80, 128, 66, 66, 73, 69, 84, 128, 66, 66, 73, 69, 88, 128, 66, 66, 85, 79, 80, 128, 66, 66, 85, 79, 88, 128, 66, 66, 85, 82, 88, 128, 66, 69, 69, 84, 65, 128, 66, 69, 72, 69, 72, 128, 66, 69, 73, 84, 72, 128, 66, 73, 78, 68, 73, 128, 66, 73, 82, 71, 65, 128, 66, 76, 65, 78, 75, 128, 66, 76, 79, 79, 68, 128, 66, 82, 65, 67, 69, 128, 66, 82, 65, 78, 67, 200, 66, 82, 69, 65, 84, 200, 66, 82, 85, 83, 72, 128, 66, 83, 84, 65, 82, 128, 66, 85, 76, 76, 69, 212, 67, 65, 77, 78, 85, 195, 67, 65, 78, 67, 69, 204, 67, 69, 65, 76, 67, 128, 67, 69, 73, 82, 84, 128, 67, 72, 65, 68, 65, 128, 67, 72, 65, 73, 82, 128, 67, 72, 65, 78, 71, 128, 67, 72, 73, 76, 68, 128, 67, 72, 73, 78, 71, 128, 67, 72, 79, 75, 69, 128, 67, 72, 85, 76, 65, 128, 67, 72, 85, 79, 80, 128, 67, 72, 85, 79, 84, 128, 67, 72, 85, 79, 88, 128, 67, 72, 85, 82, 88, 128, 67, 72, 89, 82, 88, 128, 67, 76, 79, 85, 68, 128, 67, 79, 69, 78, 71, 128, 67, 79, 76, 79, 82, 128, 67, 79, 77, 69, 84, 128, 67, 79, 77, 77, 79, 206, 67, 79, 86, 69, 82, 128, 67, 82, 79, 73, 88, 128, 68, 65, 65, 83, 85, 128, 68, 65, 76, 65, 84, 200, 68, 65, 77, 77, 65, 128, 68, 65, 82, 71, 65, 128, 68, 65, 86, 73, 68, 128, 68, 68, 68, 72, 65, 128, 68, 68, 73, 69, 80, 128, 68, 68, 73, 69, 88, 128, 68, 68, 85, 79, 80, 128, 68, 68, 85, 79, 88, 128, 68, 68, 85, 82, 88, 128, 68, 69, 76, 69, 84, 197, 68, 73, 86, 73, 68, 197, 68, 79, 77, 65, 73, 206, 68, 82, 73, 86, 69, 128, 69, 69, 75, 65, 65, 128, 69, 76, 69, 86, 69, 206, 69, 76, 73, 70, 73, 128, 69, 78, 84, 69, 82, 128, 69, 79, 76, 72, 88, 128, 69, 85, 45, 69, 85, 128, 69, 88, 73, 83, 84, 128, 70, 65, 65, 70, 85, 128, 70, 65, 73, 72, 85, 128, 70, 65, 84, 72, 65, 128, 70, 69, 65, 82, 78, 128, 70, 69, 77, 65, 76, 197, 70, 72, 84, 79, 82, 193, 70, 73, 69, 76, 68, 128, 70, 73, 70, 84, 72, 128, 70, 73, 71, 72, 84, 128, 70, 73, 76, 76, 69, 196, 70, 73, 78, 73, 84, 197, 70, 76, 85, 84, 69, 128, 70, 79, 82, 67, 69, 128, 70, 79, 82, 84, 69, 128, 70, 82, 69, 78, 67, 200, 70, 82, 79, 87, 78, 128, 71, 65, 65, 70, 85, 128, 71, 65, 68, 79, 76, 128, 71, 65, 77, 65, 76, 128, 71, 65, 78, 77, 65, 128, 71, 65, 82, 79, 78, 128, 71, 69, 82, 69, 83, 200, 71, 69, 82, 77, 65, 206, 71, 71, 73, 69, 80, 128, 71, 71, 73, 69, 88, 128, 71, 71, 85, 79, 80, 128, 71, 71, 85, 79, 84, 128, 71, 71, 85, 79, 88, 128, 71, 71, 85, 82, 88, 128, 71, 72, 65, 73, 78, 128, 71, 73, 77, 69, 76, 128, 71, 73, 78, 73, 73, 128, 71, 76, 69, 73, 67, 200, 71, 82, 65, 73, 78, 128, 71, 82, 65, 83, 83, 128, 72, 45, 84, 89, 80, 197, 72, 65, 71, 76, 65, 218, 72, 65, 73, 84, 85, 128, 72, 65, 77, 77, 69, 210, 72, 65, 78, 68, 83, 128, 72, 69, 65, 86, 69, 206, 72, 73, 68, 73, 78, 199, 72, 76, 73, 69, 80, 128, 72, 76, 73, 69, 88, 128, 72, 76, 85, 79, 80, 128, 72, 76, 85, 79, 88, 128, 72, 76, 85, 82, 88, 128, 72, 76, 89, 82, 88, 128, 72, 77, 73, 69, 80, 128, 72, 77, 73, 69, 88, 128, 72, 77, 85, 79, 80, 128, 72, 77, 85, 79, 88, 128, 72, 77, 85, 82, 88, 128, 72, 77, 89, 82, 88, 128, 72, 78, 73, 69, 80, 128, 72, 78, 73, 69, 84, 128, 72, 78, 73, 69, 88, 128, 72, 78, 85, 79, 88, 128, 72, 79, 79, 82, 85, 128, 72, 79, 85, 83, 69, 128, 72, 85, 82, 65, 78, 128, 72, 88, 73, 69, 80, 128, 72, 88, 73, 69, 84, 128, 72, 88, 73, 69, 88, 128, 72, 88, 85, 79, 80, 128, 72, 88, 85, 79, 84, 128, 72, 88, 85, 79, 88, 128, 72, 89, 80, 72, 69, 206, 73, 67, 72, 79, 85, 128, 73, 71, 71, 87, 83, 128, 73, 83, 65, 75, 73, 193, 74, 74, 73, 69, 80, 128, 74, 74, 73, 69, 84, 128, 74, 74, 73, 69, 88, 128, 74, 74, 85, 79, 80, 128, 74, 74, 85, 79, 88, 128, 74, 74, 85, 82, 88, 128, 75, 65, 65, 70, 85, 128, 75, 65, 73, 82, 73, 128, 75, 65, 83, 82, 65, 128, 75, 65, 84, 65, 86, 193, 75, 65, 85, 78, 65, 128, 75, 69, 69, 83, 85, 128, 75, 69, 72, 69, 72, 128, 75, 69, 76, 86, 73, 206, 75, 72, 85, 65, 84, 128, 75, 72, 87, 65, 73, 128, 75, 78, 73, 70, 69, 128, 75, 79, 79, 80, 79, 128, 75, 79, 82, 69, 65, 206, 75, 85, 83, 77, 65, 128, 75, 88, 87, 65, 65, 128, 75, 88, 87, 69, 69, 128, 76, 45, 84, 89, 80, 197, 76, 65, 65, 77, 85, 128, 76, 65, 71, 85, 83, 128, 76, 65, 77, 66, 68, 193, 76, 65, 85, 75, 65, 218, 76, 69, 77, 79, 73, 128, 76, 73, 66, 82, 65, 128, 76, 73, 77, 73, 84, 128, 76, 79, 78, 71, 65, 128, 76, 79, 85, 82, 69, 128, 77, 65, 68, 68, 65, 128, 77, 65, 68, 68, 65, 200, 77, 65, 72, 72, 65, 128, 77, 65, 73, 82, 85, 128, 77, 65, 78, 78, 65, 128, 77, 65, 78, 78, 65, 218, 77, 65, 81, 65, 70, 128, 77, 65, 82, 67, 72, 128, 77, 65, 83, 79, 82, 193, 77, 69, 69, 77, 85, 128, 77, 69, 73, 90, 73, 128, 77, 69, 76, 79, 78, 128, 77, 69, 77, 66, 69, 210, 77, 69, 82, 75, 72, 193, 77, 69, 84, 69, 71, 128, 77, 69, 90, 90, 79, 128, 77, 71, 73, 69, 88, 128, 77, 71, 85, 79, 80, 128, 77, 71, 85, 79, 88, 128, 77, 71, 85, 82, 88, 128, 77, 73, 75, 82, 73, 128, 77, 73, 75, 82, 79, 206, 77, 79, 68, 85, 76, 207, 77, 79, 85, 78, 68, 128, 77, 79, 85, 84, 72, 128, 77, 85, 78, 65, 72, 128, 77, 85, 83, 73, 67, 128, 78, 65, 82, 82, 79, 215, 78, 65, 85, 68, 73, 218, 78, 66, 73, 69, 80, 128, 78, 66, 73, 69, 88, 128, 78, 66, 85, 82, 88, 128, 78, 66, 89, 82, 88, 128, 78, 68, 73, 69, 88, 128, 78, 68, 85, 82, 88, 128, 78, 71, 65, 65, 73, 128, 78, 71, 73, 69, 80, 128, 78, 71, 73, 69, 88, 128, 78, 71, 79, 69, 72, 128, 78, 71, 85, 79, 84, 128, 78, 71, 85, 79, 88, 128, 78, 74, 73, 69, 80, 128, 78, 74, 73, 69, 84, 128, 78, 74, 73, 69, 88, 128, 78, 74, 85, 79, 88, 128, 78, 74, 85, 82, 88, 128, 78, 74, 89, 82, 88, 128, 78, 78, 71, 65, 65, 128, 78, 78, 71, 73, 73, 128, 78, 78, 71, 79, 79, 128, 78, 79, 79, 78, 85, 128, 78, 79, 84, 67, 72, 128, 78, 79, 84, 84, 79, 128, 78, 82, 85, 82, 88, 128, 78, 82, 89, 82, 88, 128, 78, 85, 77, 69, 82, 207, 78, 89, 73, 69, 80, 128, 78, 89, 73, 69, 84, 128, 78, 89, 73, 69, 88, 128, 78, 89, 85, 79, 80, 128, 78, 89, 85, 79, 88, 128, 78, 90, 73, 69, 80, 128, 78, 90, 73, 69, 88, 128, 78, 90, 85, 79, 88, 128, 78, 90, 85, 82, 88, 128, 78, 90, 89, 82, 88, 128, 79, 66, 74, 69, 67, 212, 79, 78, 75, 65, 82, 128, 79, 80, 84, 73, 79, 206, 79, 84, 72, 65, 76, 128, 79, 88, 69, 73, 65, 201, 80, 65, 65, 84, 85, 128, 80, 65, 83, 69, 81, 128, 80, 65, 83, 85, 81, 128, 80, 65, 84, 65, 75, 128, 80, 65, 90, 69, 82, 128, 80, 69, 69, 90, 73, 128, 80, 69, 72, 69, 72, 128, 80, 69, 73, 84, 72, 128, 80, 69, 78, 83, 85, 128, 80, 69, 79, 82, 84, 200, 80, 69, 82, 84, 72, 207, 80, 69, 83, 69, 84, 193, 80, 72, 78, 65, 69, 203, 80, 72, 85, 78, 71, 128, 80, 73, 65, 78, 79, 128, 80, 76, 85, 84, 79, 128, 80, 79, 78, 68, 79, 128, 80, 79, 87, 69, 82, 128, 80, 82, 73, 78, 84, 128, 80, 82, 79, 79, 70, 128, 80, 82, 79, 86, 69, 128, 81, 65, 65, 70, 85, 128, 81, 65, 68, 77, 65, 128, 81, 65, 82, 78, 69, 217, 81, 65, 84, 65, 78, 128, 81, 72, 87, 65, 65, 128, 81, 72, 87, 69, 69, 128, 82, 45, 67, 82, 69, 197, 82, 65, 73, 68, 65, 128, 82, 65, 83, 79, 85, 204, 82, 65, 84, 73, 79, 128, 82, 69, 65, 67, 72, 128, 82, 69, 67, 79, 82, 196, 82, 69, 84, 85, 82, 206, 82, 69, 86, 73, 65, 128, 82, 69, 86, 77, 65, 128, 82, 72, 79, 84, 73, 195, 82, 73, 86, 69, 82, 128, 82, 78, 79, 79, 78, 128, 82, 79, 66, 65, 84, 128, 82, 82, 85, 79, 88, 128, 82, 82, 85, 82, 88, 128, 82, 82, 89, 82, 88, 128, 82, 85, 80, 73, 73, 128, 82, 87, 65, 72, 65, 128, 83, 65, 68, 72, 69, 128, 83, 65, 77, 69, 75, 200, 83, 65, 77, 89, 79, 203, 83, 65, 85, 73, 76, 128, 83, 69, 69, 78, 85, 128, 83, 69, 73, 83, 77, 193, 83, 69, 78, 84, 73, 128, 83, 72, 69, 69, 78, 128, 83, 72, 69, 81, 69, 204, 83, 72, 69, 86, 65, 128, 83, 72, 79, 79, 84, 128, 83, 72, 85, 79, 80, 128, 83, 72, 85, 79, 88, 128, 83, 72, 85, 82, 88, 128, 83, 72, 89, 82, 88, 128, 83, 73, 88, 84, 72, 128, 83, 73, 88, 84, 89, 128, 83, 76, 65, 86, 69, 128, 83, 76, 73, 67, 69, 128, 83, 76, 79, 80, 69, 128, 83, 77, 69, 65, 82, 128, 83, 77, 73, 76, 69, 128, 83, 78, 65, 75, 69, 128, 83, 78, 79, 85, 84, 128, 83, 79, 85, 78, 68, 128, 83, 79, 87, 73, 76, 207, 83, 80, 69, 65, 82, 128, 83, 80, 79, 79, 78, 128, 83, 80, 85, 78, 71, 211, 83, 81, 85, 73, 83, 200, 83, 83, 73, 69, 80, 128, 83, 83, 73, 69, 88, 128, 83, 83, 89, 82, 88, 128, 83, 84, 65, 78, 68, 128, 83, 84, 65, 82, 75, 128, 83, 84, 69, 65, 77, 128, 83, 84, 79, 78, 69, 128, 83, 87, 69, 69, 84, 128, 83, 89, 82, 77, 65, 128, 84, 65, 80, 69, 82, 128, 84, 67, 72, 69, 72, 128, 84, 69, 73, 87, 83, 128, 84, 69, 86, 73, 82, 128, 84, 72, 73, 82, 68, 128, 84, 72, 73, 84, 65, 128, 84, 72, 79, 78, 71, 128, 84, 72, 85, 78, 71, 128, 84, 73, 78, 78, 69, 128, 84, 73, 80, 80, 73, 128, 84, 76, 72, 69, 69, 128, 84, 82, 65, 67, 75, 128, 84, 82, 73, 84, 79, 211, 84, 83, 69, 82, 69, 128, 84, 84, 83, 69, 69, 128, 84, 85, 71, 82, 73, 203, 84, 89, 80, 69, 45, 177, 84, 89, 80, 69, 45, 178, 84, 89, 80, 69, 45, 179, 84, 89, 80, 69, 45, 180, 84, 89, 80, 69, 45, 181, 84, 89, 80, 69, 45, 182, 84, 89, 80, 69, 45, 183, 85, 80, 87, 65, 82, 196, 86, 65, 65, 86, 85, 128, 86, 65, 83, 73, 83, 128, 86, 65, 84, 72, 89, 128, 86, 69, 67, 84, 79, 210, 86, 73, 82, 71, 65, 128, 86, 73, 82, 71, 79, 128, 86, 79, 76, 85, 77, 197, 87, 65, 65, 86, 85, 128, 87, 65, 83, 76, 65, 128, 87, 65, 84, 67, 72, 128, 87, 73, 78, 74, 65, 128, 87, 79, 77, 65, 78, 128, 87, 82, 69, 65, 84, 200, 87, 82, 79, 78, 71, 128, 89, 65, 45, 89, 79, 128, 89, 65, 65, 68, 79, 128, 89, 65, 65, 82, 85, 128, 89, 69, 79, 45, 79, 128, 89, 69, 79, 45, 85, 128, 89, 69, 84, 73, 86, 128, 89, 85, 45, 69, 79, 128, 90, 65, 82, 81, 65, 128, 90, 65, 89, 73, 78, 128, 90, 72, 85, 79, 80, 128, 90, 72, 85, 79, 88, 128, 90, 72, 85, 82, 88, 128, 90, 72, 89, 82, 88, 128, 90, 73, 76, 68, 69, 128, 90, 73, 78, 79, 82, 128, 90, 89, 71, 79, 83, 128, 90, 90, 73, 69, 80, 128, 90, 90, 73, 69, 88, 128, 90, 90, 85, 82, 88, 128, 90, 90, 89, 82, 88, 128, 84, 72, 82, 69, 197, 76, 69, 70, 84, 128, 90, 69, 82, 79, 128, 79, 71, 72, 65, 205, 67, 85, 82, 76, 217, 78, 79, 82, 84, 200, 66, 85, 72, 73, 196, 80, 79, 73, 78, 212, 83, 79, 85, 84, 200, 82, 73, 78, 71, 128, 84, 65, 67, 75, 128, 68, 79, 87, 78, 128, 78, 45, 65, 82, 217, 82, 69, 83, 84, 128, 66, 69, 76, 79, 215, 68, 65, 83, 72, 128, 71, 72, 65, 73, 206, 73, 79, 84, 65, 128, 67, 79, 77, 77, 193, 86, 65, 82, 73, 193, 66, 82, 69, 86, 197, 84, 84, 72, 65, 128, 65, 67, 85, 84, 197, 66, 69, 84, 65, 128, 67, 72, 69, 83, 211, 71, 82, 65, 86, 197, 83, 72, 69, 76, 204, 84, 72, 69, 84, 193, 90, 69, 84, 65, 128, 83, 79, 85, 78, 196, 85, 78, 73, 79, 206, 69, 73, 71, 72, 212, 78, 79, 84, 69, 128, 70, 79, 82, 84, 217, 73, 77, 65, 71, 197, 80, 76, 85, 83, 128, 65, 71, 79, 71, 201, 68, 79, 84, 83, 128, 69, 77, 80, 84, 217, 72, 65, 76, 70, 128, 72, 69, 65, 82, 212, 83, 85, 73, 84, 128, 70, 73, 76, 76, 128, 75, 65, 84, 79, 128, 76, 65, 82, 71, 197, 83, 72, 65, 68, 128, 65, 76, 69, 70, 128, 67, 65, 82, 69, 212, 67, 85, 82, 76, 128, 70, 65, 82, 83, 201, 75, 65, 80, 80, 193, 77, 79, 79, 78, 128, 83, 85, 78, 71, 128, 84, 73, 67, 75, 128, 67, 76, 69, 70, 128, 67, 82, 79, 83, 211, 70, 65, 67, 69, 128, 70, 73, 82, 69, 128, 77, 65, 68, 68, 193, 81, 85, 65, 68, 128, 83, 84, 69, 77, 128, 84, 67, 72, 69, 200, 84, 73, 77, 69, 211, 84, 83, 72, 69, 199, 65, 76, 84, 65, 128, 66, 69, 71, 73, 206, 66, 69, 72, 69, 200, 67, 72, 69, 69, 128, 67, 82, 79, 80, 128, 68, 65, 77, 77, 193, 70, 65, 84, 72, 193, 72, 65, 78, 68, 128, 74, 79, 73, 78, 128, 75, 65, 83, 82, 193, 75, 69, 72, 69, 200, 75, 87, 65, 65, 128, 78, 71, 79, 69, 200, 80, 69, 72, 69, 200, 82, 65, 70, 69, 128, 82, 78, 79, 79, 206, 82, 84, 65, 71, 211, 83, 69, 86, 69, 206, 83, 72, 65, 82, 208, 83, 72, 73, 78, 128, 84, 72, 65, 65, 128, 84, 72, 69, 69, 128, 86, 65, 78, 69, 128, 87, 65, 86, 69, 128, 65, 76, 76, 79, 128, 66, 73, 82, 68, 128, 67, 65, 82, 79, 206, 67, 72, 69, 67, 203, 67, 72, 82, 79, 193, 67, 73, 69, 85, 195, 67, 87, 65, 65, 128, 68, 69, 76, 84, 193, 70, 79, 79, 84, 128, 71, 82, 65, 83, 211, 72, 65, 84, 65, 198, 75, 69, 84, 84, 201, 76, 76, 76, 65, 128, 76, 79, 79, 80, 128, 77, 85, 83, 73, 195, 77, 87, 65, 65, 128, 78, 87, 65, 65, 128, 79, 85, 84, 69, 210, 79, 88, 69, 73, 193, 80, 69, 68, 65, 204, 80, 79, 76, 69, 128, 80, 82, 73, 77, 197, 80, 87, 65, 65, 128, 82, 79, 79, 84, 128, 82, 85, 80, 69, 197, 83, 67, 72, 87, 193, 83, 69, 69, 78, 128, 83, 72, 87, 65, 128, 83, 73, 76, 75, 128, 83, 84, 65, 82, 212, 83, 87, 65, 65, 128, 84, 72, 73, 73, 128, 84, 87, 65, 65, 128, 87, 73, 78, 68, 128, 89, 73, 87, 78, 128, 89, 87, 65, 65, 128, 90, 72, 69, 69, 128, 45, 68, 90, 85, 196, 65, 80, 69, 83, 207, 65, 82, 71, 73, 128, 66, 66, 85, 84, 128, 66, 69, 65, 84, 128, 66, 76, 65, 68, 197, 66, 76, 85, 69, 128, 66, 79, 78, 69, 128, 66, 82, 85, 83, 200, 66, 90, 85, 78, 199, 67, 65, 82, 84, 128, 67, 72, 65, 82, 128, 67, 72, 73, 78, 128, 67, 85, 79, 80, 128, 67, 85, 82, 86, 197, 67, 87, 73, 73, 128, 67, 87, 79, 79, 128, 68, 65, 76, 69, 212, 68, 68, 85, 82, 128, 68, 90, 72, 65, 128, 68, 90, 72, 69, 128, 68, 90, 74, 69, 128, 69, 82, 65, 83, 197, 70, 69, 69, 68, 128, 70, 73, 82, 83, 212, 70, 73, 83, 72, 128, 70, 73, 84, 65, 128, 70, 76, 65, 84, 128, 70, 82, 79, 71, 128, 70, 87, 65, 65, 128, 71, 65, 84, 69, 128, 71, 67, 73, 71, 128, 71, 71, 79, 80, 128, 71, 71, 85, 79, 128, 71, 72, 65, 68, 128, 71, 72, 65, 78, 128, 71, 72, 72, 65, 128, 71, 73, 77, 69, 204, 71, 79, 65, 76, 128, 71, 79, 76, 68, 128, 71, 82, 65, 67, 197, 71, 83, 85, 77, 128, 71, 89, 65, 83, 128, 71, 89, 79, 78, 128, 72, 65, 86, 69, 128, 72, 66, 65, 83, 193, 72, 72, 65, 65, 128, 72, 73, 69, 85, 200, 72, 79, 82, 73, 128, 72, 88, 73, 84, 128, 72, 88, 79, 80, 128, 72, 88, 85, 79, 128, 73, 69, 85, 78, 199, 74, 65, 68, 69, 128, 74, 69, 69, 77, 128, 74, 72, 65, 78, 128, 74, 72, 69, 72, 128, 74, 74, 73, 69, 128, 74, 74, 85, 84, 128, 75, 72, 65, 72, 128, 75, 72, 65, 78, 199, 75, 72, 65, 82, 128, 75, 72, 69, 73, 128, 75, 72, 72, 65, 128, 75, 78, 73, 70, 197, 75, 83, 83, 65, 128, 75, 87, 73, 73, 128, 75, 87, 79, 79, 128, 76, 69, 65, 70, 128, 76, 73, 87, 78, 128, 76, 79, 78, 71, 128, 76, 79, 78, 71, 193, 76, 79, 87, 45, 185, 76, 87, 65, 65, 128, 76, 87, 73, 73, 128, 76, 87, 79, 79, 128, 77, 69, 65, 84, 128, 77, 69, 69, 77, 128, 77, 69, 83, 79, 128, 77, 73, 69, 85, 205, 77, 79, 85, 78, 196, 77, 87, 73, 73, 128, 77, 87, 79, 79, 128, 78, 65, 77, 69, 128, 78, 65, 78, 65, 128, 78, 66, 73, 69, 128, 78, 73, 69, 85, 206, 78, 78, 78, 65, 128, 78, 79, 68, 69, 128, 78, 89, 73, 80, 128, 78, 89, 79, 80, 128, 78, 90, 85, 80, 128, 80, 65, 71, 69, 128, 80, 65, 80, 69, 210, 80, 65, 87, 78, 128, 80, 72, 65, 82, 128, 80, 73, 69, 85, 208, 80, 73, 87, 82, 128, 80, 76, 65, 67, 197, 80, 79, 85, 78, 196, 80, 87, 73, 73, 128, 80, 87, 79, 79, 128, 81, 85, 79, 84, 197, 82, 65, 89, 83, 128, 82, 66, 65, 83, 193, 82, 73, 69, 85, 204, 82, 73, 83, 72, 128, 82, 79, 79, 75, 128, 82, 87, 65, 65, 128, 83, 65, 76, 76, 193, 83, 65, 76, 84, 128, 83, 69, 65, 76, 128, 83, 72, 65, 65, 128, 83, 72, 65, 84, 128, 83, 72, 69, 69, 128, 83, 72, 69, 73, 128, 83, 72, 72, 65, 128, 83, 72, 73, 70, 212, 83, 72, 79, 71, 201, 83, 72, 85, 82, 128, 83, 72, 87, 69, 128, 83, 72, 87, 73, 128, 83, 72, 87, 79, 128, 83, 76, 85, 82, 128, 83, 77, 65, 83, 200, 83, 78, 79, 85, 212, 83, 80, 65, 68, 197, 83, 81, 85, 65, 212, 83, 85, 75, 85, 206, 83, 87, 73, 73, 128, 83, 87, 79, 79, 128, 84, 69, 88, 84, 128, 84, 72, 69, 82, 197, 84, 72, 79, 79, 128, 84, 73, 77, 69, 128, 84, 73, 87, 78, 128, 84, 76, 72, 65, 128, 84, 76, 72, 69, 128, 84, 76, 72, 73, 128, 84, 76, 72, 79, 128, 84, 82, 85, 69, 128, 84, 83, 72, 65, 128, 84, 83, 72, 69, 128, 84, 84, 72, 79, 128, 84, 87, 73, 73, 128, 84, 87, 79, 79, 128, 85, 78, 68, 69, 210, 87, 65, 76, 75, 128, 87, 65, 83, 76, 193, 87, 65, 84, 69, 210, 87, 72, 79, 76, 197, 87, 73, 78, 69, 128, 87, 79, 79, 68, 128, 87, 89, 78, 78, 128, 89, 79, 45, 73, 128, 89, 79, 71, 72, 128, 89, 85, 45, 73, 128, 89, 87, 73, 73, 128, 89, 87, 79, 79, 128, 90, 65, 73, 78, 128, 90, 65, 81, 69, 198, 90, 72, 65, 82, 128, 90, 76, 65, 77, 193, 45, 67, 72, 65, 210, 65, 69, 83, 67, 128, 65, 72, 83, 65, 128, 65, 73, 76, 77, 128, 65, 73, 78, 78, 128, 65, 75, 66, 65, 210, 65, 76, 71, 73, 218, 65, 76, 76, 65, 200, 65, 77, 80, 83, 128, 65, 78, 75, 72, 128, 65, 78, 83, 85, 218, 65, 85, 78, 78, 128, 65, 89, 65, 72, 128, 66, 65, 72, 84, 128, 66, 65, 82, 83, 128, 66, 65, 83, 69, 128, 66, 66, 65, 80, 128, 66, 66, 65, 84, 128, 66, 66, 65, 88, 128, 66, 66, 69, 80, 128, 66, 66, 69, 88, 128, 66, 66, 73, 69, 128, 66, 66, 73, 80, 128, 66, 66, 73, 84, 128, 66, 66, 73, 88, 128, 66, 66, 79, 80, 128, 66, 66, 79, 84, 128, 66, 66, 79, 88, 128, 66, 66, 85, 79, 128, 66, 66, 85, 80, 128, 66, 66, 85, 82, 128, 66, 66, 85, 88, 128, 66, 66, 89, 80, 128, 66, 66, 89, 84, 128, 66, 66, 89, 88, 128, 66, 67, 65, 68, 128, 66, 69, 65, 78, 128, 66, 69, 69, 72, 128, 66, 69, 76, 76, 128, 66, 69, 76, 84, 128, 66, 69, 78, 68, 128, 66, 69, 79, 82, 195, 66, 69, 84, 72, 128, 66, 73, 82, 85, 128, 66, 76, 65, 78, 203, 66, 79, 65, 84, 128, 66, 79, 68, 89, 128, 66, 83, 68, 85, 211, 66, 83, 75, 85, 210, 66, 85, 77, 80, 217, 67, 65, 65, 73, 128, 67, 65, 76, 67, 128, 67, 65, 76, 76, 128, 67, 65, 80, 79, 128, 67, 65, 86, 69, 128, 67, 72, 65, 65, 128, 67, 72, 65, 78, 128, 67, 72, 65, 80, 128, 67, 72, 65, 84, 128, 67, 72, 65, 88, 128, 67, 72, 69, 80, 128, 67, 72, 69, 84, 128, 67, 72, 69, 88, 128, 67, 72, 79, 69, 128, 67, 72, 79, 80, 128, 67, 72, 79, 84, 128, 67, 72, 79, 88, 128, 67, 72, 85, 79, 128, 67, 72, 85, 80, 128, 67, 72, 85, 82, 128, 67, 72, 85, 88, 128, 67, 72, 89, 80, 128, 67, 72, 89, 82, 128, 67, 72, 89, 84, 128, 67, 72, 89, 88, 128, 67, 73, 69, 80, 128, 67, 73, 69, 84, 128, 67, 73, 69, 88, 128, 67, 76, 65, 78, 128, 67, 76, 65, 87, 128, 67, 76, 69, 65, 210, 67, 76, 79, 83, 197, 67, 79, 68, 65, 128, 67, 79, 76, 76, 128, 67, 79, 80, 89, 128, 67, 85, 79, 88, 128, 67, 85, 82, 88, 128, 67, 89, 82, 88, 128, 68, 65, 71, 65, 218, 68, 65, 71, 83, 128, 68, 65, 73, 82, 128, 68, 65, 77, 80, 128, 68, 68, 65, 65, 128, 68, 68, 65, 76, 128, 68, 68, 65, 80, 128, 68, 68, 65, 84, 128, 68, 68, 65, 88, 128, 68, 68, 69, 69, 128, 68, 68, 69, 80, 128, 68, 68, 69, 88, 128, 68, 68, 73, 69, 128, 68, 68, 73, 80, 128, 68, 68, 73, 84, 128, 68, 68, 73, 88, 128, 68, 68, 79, 80, 128, 68, 68, 79, 84, 128, 68, 68, 79, 88, 128, 68, 68, 85, 79, 128, 68, 68, 85, 80, 128, 68, 68, 85, 84, 128, 68, 68, 85, 88, 128, 68, 68, 87, 65, 128, 68, 69, 69, 82, 128, 68, 69, 72, 73, 128, 68, 69, 75, 65, 128, 68, 69, 83, 73, 128, 68, 73, 80, 76, 201, 68, 73, 83, 72, 128, 68, 73, 84, 84, 207, 68, 76, 69, 69, 128, 68, 79, 73, 84, 128, 68, 79, 79, 82, 128, 68, 79, 82, 85, 128, 68, 82, 85, 77, 128, 68, 89, 69, 72, 128, 68, 90, 69, 69, 128, 69, 65, 82, 84, 200, 69, 72, 87, 65, 218, 69, 78, 84, 69, 210, 69, 84, 72, 69, 204, 69, 85, 45, 85, 128, 69, 85, 76, 69, 210, 70, 65, 65, 73, 128, 70, 65, 78, 71, 128, 70, 76, 73, 80, 128, 70, 79, 82, 77, 211, 70, 82, 65, 78, 195, 70, 85, 82, 88, 128, 71, 65, 77, 65, 204, 71, 68, 65, 78, 128, 71, 71, 65, 65, 128, 71, 71, 65, 80, 128, 71, 71, 65, 84, 128, 71, 71, 65, 88, 128, 71, 71, 69, 69, 128, 71, 71, 69, 80, 128, 71, 71, 69, 84, 128, 71, 71, 69, 88, 128, 71, 71, 73, 69, 128, 71, 71, 73, 84, 128, 71, 71, 73, 88, 128, 71, 71, 79, 84, 128, 71, 71, 79, 88, 128, 71, 71, 85, 80, 128, 71, 71, 85, 82, 128, 71, 71, 85, 84, 128, 71, 71, 85, 88, 128, 71, 72, 69, 69, 128, 71, 73, 66, 65, 128, 71, 73, 69, 84, 128, 71, 73, 71, 65, 128, 71, 79, 82, 84, 128, 71, 85, 69, 72, 128, 71, 87, 65, 65, 128, 71, 87, 69, 69, 128, 72, 65, 69, 71, 204, 72, 65, 71, 76, 128, 72, 69, 77, 80, 128, 72, 69, 84, 72, 128, 72, 72, 69, 69, 128, 72, 72, 87, 65, 128, 72, 73, 69, 88, 128, 72, 73, 71, 72, 128, 72, 73, 90, 66, 128, 72, 76, 65, 80, 128, 72, 76, 65, 84, 128, 72, 76, 65, 88, 128, 72, 76, 69, 80, 128, 72, 76, 69, 88, 128, 72, 76, 73, 69, 128, 72, 76, 73, 80, 128, 72, 76, 73, 84, 128, 72, 76, 73, 88, 128, 72, 76, 79, 80, 128, 72, 76, 79, 88, 128, 72, 76, 85, 79, 128, 72, 76, 85, 80, 128, 72, 76, 85, 82, 128, 72, 76, 85, 84, 128, 72, 76, 85, 88, 128, 72, 76, 89, 80, 128, 72, 76, 89, 82, 128, 72, 76, 89, 84, 128, 72, 76, 89, 88, 128, 72, 77, 65, 80, 128, 72, 77, 65, 84, 128, 72, 77, 65, 88, 128, 72, 77, 73, 69, 128, 72, 77, 73, 80, 128, 72, 77, 73, 84, 128, 72, 77, 73, 88, 128, 72, 77, 79, 80, 128, 72, 77, 79, 84, 128, 72, 77, 79, 88, 128, 72, 77, 85, 79, 128, 72, 77, 85, 80, 128, 72, 77, 85, 82, 128, 72, 77, 85, 84, 128, 72, 77, 85, 88, 128, 72, 77, 89, 80, 128, 72, 77, 89, 82, 128, 72, 77, 89, 88, 128, 72, 78, 65, 80, 128, 72, 78, 65, 84, 128, 72, 78, 65, 88, 128, 72, 78, 69, 80, 128, 72, 78, 69, 88, 128, 72, 78, 73, 69, 128, 72, 78, 73, 80, 128, 72, 78, 73, 84, 128, 72, 78, 73, 88, 128, 72, 78, 79, 80, 128, 72, 78, 79, 84, 128, 72, 78, 79, 88, 128, 72, 78, 85, 79, 128, 72, 78, 85, 84, 128, 72, 79, 79, 78, 128, 72, 88, 65, 80, 128, 72, 88, 65, 84, 128, 72, 88, 65, 88, 128, 72, 88, 69, 80, 128, 72, 88, 69, 88, 128, 72, 88, 73, 69, 128, 72, 88, 73, 80, 128, 72, 88, 73, 88, 128, 72, 88, 79, 84, 128, 72, 88, 79, 88, 128, 73, 45, 69, 85, 128, 73, 45, 89, 65, 128, 73, 68, 76, 69, 128, 73, 70, 73, 78, 128, 73, 76, 85, 89, 128, 73, 78, 67, 72, 128, 73, 78, 78, 78, 128, 73, 78, 84, 73, 128, 73, 83, 79, 78, 128, 73, 84, 69, 77, 128, 73, 85, 74, 65, 128, 74, 69, 82, 65, 206, 74, 74, 69, 69, 128, 74, 74, 73, 80, 128, 74, 74, 73, 84, 128, 74, 74, 73, 88, 128, 74, 74, 79, 80, 128, 74, 74, 79, 84, 128, 74, 74, 79, 88, 128, 74, 74, 85, 79, 128, 74, 74, 85, 80, 128, 74, 74, 85, 82, 128, 74, 74, 85, 88, 128, 74, 74, 89, 80, 128, 74, 74, 89, 84, 128, 74, 74, 89, 88, 128, 74, 85, 76, 89, 128, 74, 85, 78, 69, 128, 74, 85, 79, 84, 128, 75, 65, 65, 73, 128, 75, 65, 80, 72, 128, 75, 67, 65, 76, 128, 75, 72, 65, 65, 128, 75, 72, 65, 73, 128, 75, 72, 65, 78, 128, 75, 72, 69, 69, 128, 75, 72, 79, 78, 128, 75, 73, 69, 80, 128, 75, 73, 69, 88, 128, 75, 73, 82, 79, 128, 75, 75, 69, 69, 128, 75, 79, 77, 66, 213, 75, 79, 84, 79, 128, 75, 85, 79, 80, 128, 75, 85, 79, 88, 128, 75, 85, 82, 88, 128, 75, 85, 85, 72, 128, 75, 87, 69, 69, 128, 75, 88, 65, 65, 128, 75, 88, 69, 69, 128, 75, 88, 87, 65, 128, 75, 88, 87, 69, 128, 75, 88, 87, 73, 128, 76, 65, 65, 73, 128, 76, 65, 77, 69, 128, 76, 65, 77, 69, 196, 76, 68, 65, 78, 128, 76, 69, 69, 75, 128, 76, 69, 71, 83, 128, 76, 69, 86, 69, 204, 76, 69, 90, 72, 128, 76, 72, 65, 65, 128, 76, 72, 73, 73, 128, 76, 72, 79, 79, 128, 76, 73, 69, 84, 128, 76, 73, 70, 69, 128, 76, 79, 79, 84, 128, 76, 85, 73, 83, 128, 76, 85, 79, 84, 128, 77, 65, 65, 73, 128, 77, 69, 83, 72, 128, 77, 69, 83, 73, 128, 77, 71, 65, 80, 128, 77, 71, 65, 84, 128, 77, 71, 65, 88, 128, 77, 71, 69, 80, 128, 77, 71, 69, 88, 128, 77, 71, 73, 69, 128, 77, 71, 79, 80, 128, 77, 71, 79, 84, 128, 77, 71, 79, 88, 128, 77, 71, 85, 79, 128, 77, 71, 85, 80, 128, 77, 71, 85, 82, 128, 77, 71, 85, 84, 128, 77, 71, 85, 88, 128, 77, 73, 67, 82, 207, 77, 73, 76, 76, 197, 77, 73, 78, 89, 128, 77, 73, 82, 73, 128, 77, 79, 86, 69, 196, 77, 85, 73, 78, 128, 77, 85, 76, 84, 201, 77, 85, 79, 84, 128, 78, 65, 65, 73, 128, 78, 65, 73, 82, 193, 78, 65, 78, 68, 128, 78, 66, 65, 80, 128, 78, 66, 65, 84, 128, 78, 66, 65, 88, 128, 78, 66, 73, 80, 128, 78, 66, 73, 84, 128, 78, 66, 73, 88, 128, 78, 66, 79, 80, 128, 78, 66, 79, 84, 128, 78, 66, 79, 88, 128, 78, 66, 85, 80, 128, 78, 66, 85, 82, 128, 78, 66, 85, 84, 128, 78, 66, 85, 88, 128, 78, 66, 89, 80, 128, 78, 66, 89, 82, 128, 78, 66, 89, 84, 128, 78, 66, 89, 88, 128, 78, 68, 65, 80, 128, 78, 68, 65, 84, 128, 78, 68, 65, 88, 128, 78, 68, 69, 80, 128, 78, 68, 73, 69, 128, 78, 68, 73, 80, 128, 78, 68, 73, 84, 128, 78, 68, 73, 88, 128, 78, 68, 79, 80, 128, 78, 68, 79, 84, 128, 78, 68, 79, 88, 128, 78, 68, 85, 80, 128, 78, 68, 85, 82, 128, 78, 68, 85, 84, 128, 78, 68, 85, 88, 128, 78, 71, 65, 73, 128, 78, 71, 65, 80, 128, 78, 71, 65, 84, 128, 78, 71, 65, 88, 128, 78, 71, 69, 80, 128, 78, 71, 69, 88, 128, 78, 71, 73, 69, 128, 78, 71, 79, 80, 128, 78, 71, 79, 84, 128, 78, 71, 79, 88, 128, 78, 71, 85, 79, 128, 78, 74, 73, 69, 128, 78, 74, 73, 80, 128, 78, 74, 73, 84, 128, 78, 74, 73, 88, 128, 78, 74, 79, 80, 128, 78, 74, 79, 84, 128, 78, 74, 79, 88, 128, 78, 74, 85, 79, 128, 78, 74, 85, 80, 128, 78, 74, 85, 82, 128, 78, 74, 85, 88, 128, 78, 74, 89, 80, 128, 78, 74, 89, 82, 128, 78, 74, 89, 84, 128, 78, 74, 89, 88, 128, 78, 78, 71, 65, 128, 78, 78, 71, 73, 128, 78, 78, 71, 79, 128, 78, 79, 83, 69, 128, 78, 82, 65, 80, 128, 78, 82, 65, 84, 128, 78, 82, 65, 88, 128, 78, 82, 69, 80, 128, 78, 82, 69, 84, 128, 78, 82, 69, 88, 128, 78, 82, 79, 80, 128, 78, 82, 79, 88, 128, 78, 82, 85, 80, 128, 78, 82, 85, 82, 128, 78, 82, 85, 84, 128, 78, 82, 85, 88, 128, 78, 82, 89, 80, 128, 78, 82, 89, 82, 128, 78, 82, 89, 84, 128, 78, 82, 89, 88, 128, 78, 85, 76, 76, 128, 78, 85, 79, 80, 128, 78, 85, 82, 88, 128, 78, 89, 65, 65, 128, 78, 89, 69, 69, 128, 78, 89, 69, 72, 128, 78, 89, 73, 69, 128, 78, 89, 73, 84, 128, 78, 89, 73, 88, 128, 78, 89, 79, 84, 128, 78, 89, 79, 88, 128, 78, 89, 85, 79, 128, 78, 89, 85, 80, 128, 78, 89, 85, 84, 128, 78, 89, 85, 88, 128, 78, 89, 87, 65, 128, 78, 90, 65, 80, 128, 78, 90, 65, 84, 128, 78, 90, 65, 88, 128, 78, 90, 69, 88, 128, 78, 90, 73, 69, 128, 78, 90, 73, 80, 128, 78, 90, 73, 84, 128, 78, 90, 73, 88, 128, 78, 90, 79, 80, 128, 78, 90, 79, 88, 128, 78, 90, 85, 79, 128, 78, 90, 85, 82, 128, 78, 90, 85, 88, 128, 78, 90, 89, 80, 128, 78, 90, 89, 82, 128, 78, 90, 89, 84, 128, 78, 90, 89, 88, 128, 79, 45, 69, 79, 128, 79, 45, 89, 69, 128, 79, 78, 83, 85, 128, 79, 79, 77, 85, 128, 79, 85, 78, 67, 197, 80, 65, 65, 73, 128, 80, 65, 68, 77, 193, 80, 65, 82, 65, 128, 80, 69, 65, 67, 197, 80, 69, 78, 78, 217, 80, 69, 83, 79, 128, 80, 72, 65, 65, 128, 80, 72, 65, 78, 128, 80, 72, 69, 69, 128, 80, 72, 87, 65, 128, 80, 73, 69, 80, 128, 80, 73, 69, 88, 128, 80, 73, 75, 79, 128, 80, 76, 79, 87, 128, 80, 82, 73, 78, 212, 80, 85, 79, 80, 128, 80, 85, 79, 88, 128, 80, 85, 82, 88, 128, 80, 89, 82, 88, 128, 81, 65, 65, 73, 128, 81, 65, 80, 72, 128, 81, 72, 65, 65, 128, 81, 72, 69, 69, 128, 81, 72, 87, 65, 128, 81, 72, 87, 69, 128, 81, 72, 87, 73, 128, 81, 73, 69, 80, 128, 81, 73, 69, 84, 128, 81, 73, 69, 88, 128, 81, 85, 79, 80, 128, 81, 85, 79, 84, 128, 81, 85, 79, 88, 128, 81, 85, 82, 88, 128, 81, 85, 85, 86, 128, 81, 87, 65, 65, 128, 81, 87, 69, 69, 128, 81, 89, 82, 88, 128, 82, 65, 65, 73, 128, 82, 65, 73, 68, 207, 82, 65, 78, 71, 197, 82, 69, 77, 85, 128, 82, 73, 67, 69, 128, 82, 73, 69, 76, 128, 82, 73, 82, 65, 128, 82, 82, 65, 88, 128, 82, 82, 69, 72, 128, 82, 82, 69, 80, 128, 82, 82, 69, 84, 128, 82, 82, 69, 88, 128, 82, 82, 79, 80, 128, 82, 82, 79, 84, 128, 82, 82, 79, 88, 128, 82, 82, 85, 79, 128, 82, 82, 85, 80, 128, 82, 82, 85, 82, 128, 82, 82, 85, 84, 128, 82, 82, 85, 88, 128, 82, 82, 89, 80, 128, 82, 82, 89, 82, 128, 82, 82, 89, 84, 128, 82, 82, 89, 88, 128, 82, 85, 73, 83, 128, 82, 85, 76, 69, 128, 82, 85, 79, 80, 128, 82, 85, 83, 73, 128, 83, 65, 65, 73, 128, 83, 65, 73, 76, 128, 83, 65, 76, 65, 128, 83, 65, 76, 65, 205, 83, 66, 82, 85, 204, 83, 67, 87, 65, 128, 83, 68, 79, 78, 199, 83, 72, 65, 80, 128, 83, 72, 65, 88, 128, 83, 72, 69, 80, 128, 83, 72, 69, 84, 128, 83, 72, 69, 88, 128, 83, 72, 73, 73, 128, 83, 72, 79, 79, 128, 83, 72, 79, 84, 128, 83, 72, 79, 88, 128, 83, 72, 85, 79, 128, 83, 72, 85, 80, 128, 83, 72, 85, 84, 128, 83, 72, 85, 88, 128, 83, 72, 89, 80, 128, 83, 72, 89, 82, 128, 83, 72, 89, 84, 128, 83, 72, 89, 88, 128, 83, 73, 71, 69, 204, 83, 73, 71, 77, 193, 83, 75, 73, 78, 128, 83, 75, 85, 76, 204, 83, 75, 87, 65, 128, 83, 80, 79, 84, 128, 83, 80, 87, 65, 128, 83, 83, 65, 80, 128, 83, 83, 65, 84, 128, 83, 83, 65, 88, 128, 83, 83, 69, 80, 128, 83, 83, 69, 88, 128, 83, 83, 73, 69, 128, 83, 83, 73, 80, 128, 83, 83, 73, 84, 128, 83, 83, 73, 88, 128, 83, 83, 79, 80, 128, 83, 83, 79, 84, 128, 83, 83, 79, 88, 128, 83, 83, 85, 80, 128, 83, 83, 85, 84, 128, 83, 83, 85, 88, 128, 83, 83, 89, 80, 128, 83, 83, 89, 82, 128, 83, 83, 89, 84, 128, 83, 83, 89, 88, 128, 83, 84, 65, 78, 128, 83, 84, 69, 80, 128, 83, 84, 73, 76, 197, 83, 84, 87, 65, 128, 83, 85, 79, 80, 128, 83, 85, 79, 88, 128, 83, 85, 82, 88, 128, 83, 87, 65, 83, 200, 83, 90, 65, 65, 128, 83, 90, 69, 69, 128, 83, 90, 87, 65, 128, 84, 65, 65, 73, 128, 84, 65, 75, 69, 128, 84, 65, 76, 76, 128, 84, 69, 45, 85, 128, 84, 69, 78, 84, 128, 84, 69, 84, 72, 128, 84, 72, 69, 72, 128, 84, 72, 69, 77, 193, 84, 72, 73, 82, 196, 84, 72, 85, 82, 211, 84, 72, 87, 65, 128, 84, 73, 69, 80, 128, 84, 73, 69, 88, 128, 84, 73, 71, 72, 212, 84, 73, 78, 89, 128, 84, 73, 87, 65, 218, 84, 76, 69, 69, 128, 84, 76, 72, 85, 128, 84, 79, 84, 65, 204, 84, 82, 65, 68, 197, 84, 82, 69, 69, 128, 84, 82, 73, 79, 206, 84, 83, 65, 65, 128, 84, 83, 65, 68, 201, 84, 83, 87, 65, 128, 84, 84, 65, 65, 128, 84, 84, 69, 69, 128, 84, 84, 69, 72, 128, 84, 84, 72, 69, 128, 84, 84, 72, 73, 128, 84, 84, 83, 65, 128, 84, 84, 83, 69, 128, 84, 84, 83, 73, 128, 84, 84, 83, 79, 128, 84, 84, 83, 85, 128, 84, 85, 79, 80, 128, 84, 85, 79, 84, 128, 84, 85, 79, 88, 128, 84, 85, 82, 88, 128, 84, 90, 65, 65, 128, 84, 90, 69, 69, 128, 85, 45, 65, 69, 128, 85, 65, 84, 72, 128, 86, 73, 69, 80, 128, 86, 73, 69, 84, 128, 86, 73, 69, 88, 128, 86, 85, 82, 88, 128, 86, 89, 82, 88, 128, 87, 65, 69, 78, 128, 87, 65, 76, 76, 128, 87, 69, 83, 84, 128, 87, 79, 82, 75, 128, 87, 82, 65, 80, 128, 87, 85, 78, 74, 207, 87, 85, 79, 80, 128, 87, 85, 79, 88, 128, 88, 73, 82, 79, 206, 88, 89, 82, 88, 128, 89, 65, 45, 79, 128, 89, 65, 65, 73, 128, 89, 65, 78, 71, 128, 89, 69, 82, 65, 200, 89, 73, 45, 85, 128, 89, 73, 78, 71, 128, 89, 79, 45, 79, 128, 89, 79, 77, 79, 128, 89, 79, 82, 73, 128, 89, 85, 45, 65, 128, 89, 85, 45, 69, 128, 89, 85, 45, 85, 128, 89, 85, 65, 78, 128, 89, 85, 68, 72, 128, 89, 85, 79, 84, 128, 89, 85, 82, 88, 128, 89, 89, 82, 88, 128, 90, 65, 89, 73, 206, 90, 72, 65, 65, 128, 90, 72, 65, 80, 128, 90, 72, 65, 84, 128, 90, 72, 65, 88, 128, 90, 72, 69, 80, 128, 90, 72, 69, 84, 128, 90, 72, 69, 88, 128, 90, 72, 79, 80, 128, 90, 72, 79, 84, 128, 90, 72, 79, 88, 128, 90, 72, 85, 79, 128, 90, 72, 85, 80, 128, 90, 72, 85, 82, 128, 90, 72, 85, 84, 128, 90, 72, 85, 88, 128, 90, 72, 87, 65, 128, 90, 72, 89, 80, 128, 90, 72, 89, 82, 128, 90, 72, 89, 84, 128, 90, 72, 89, 88, 128, 90, 85, 79, 80, 128, 90, 90, 65, 80, 128, 90, 90, 65, 84, 128, 90, 90, 65, 88, 128, 90, 90, 69, 80, 128, 90, 90, 69, 88, 128, 90, 90, 73, 69, 128, 90, 90, 73, 80, 128, 90, 90, 73, 84, 128, 90, 90, 73, 88, 128, 90, 90, 79, 80, 128, 90, 90, 79, 88, 128, 90, 90, 85, 80, 128, 90, 90, 85, 82, 128, 90, 90, 85, 88, 128, 90, 90, 89, 80, 128, 90, 90, 89, 82, 128, 90, 90, 89, 84, 128, 90, 90, 89, 88, 128, 68, 79, 84, 211, 70, 82, 79, 205, 72, 79, 79, 203, 79, 80, 69, 206, 84, 79, 68, 207, 69, 65, 83, 212, 84, 79, 78, 197, 72, 79, 85, 210, 83, 73, 66, 197, 72, 79, 82, 206, 81, 85, 65, 196, 68, 65, 83, 200, 78, 69, 79, 128, 84, 69, 78, 128, 84, 72, 69, 200, 75, 79, 77, 201, 67, 72, 73, 128, 79, 86, 69, 210, 79, 88, 73, 193, 70, 79, 85, 210, 80, 72, 73, 128, 80, 83, 73, 128, 82, 72, 79, 128, 83, 65, 82, 193, 84, 65, 67, 203, 71, 72, 65, 128, 66, 72, 65, 128, 68, 79, 69, 211, 84, 65, 85, 128, 67, 72, 69, 128, 74, 72, 65, 128, 70, 73, 86, 197, 82, 82, 65, 128, 87, 73, 68, 197, 82, 68, 69, 204, 83, 72, 73, 206, 87, 65, 86, 217, 89, 85, 83, 128, 90, 65, 73, 206, 67, 65, 78, 128, 68, 73, 71, 193, 65, 82, 67, 128, 83, 84, 79, 208, 84, 65, 77, 128, 68, 90, 69, 128, 71, 72, 69, 128, 71, 79, 65, 204, 71, 84, 69, 210, 75, 65, 70, 128, 76, 69, 71, 128, 78, 89, 79, 128, 83, 72, 79, 128, 83, 84, 65, 210, 83, 85, 78, 128, 84, 65, 73, 204, 87, 65, 86, 197, 65, 80, 76, 201, 66, 69, 69, 200, 67, 72, 79, 128, 67, 76, 69, 198, 68, 74, 69, 128, 68, 75, 65, 210, 68, 89, 69, 200, 68, 90, 65, 128, 70, 69, 72, 128, 70, 73, 83, 200, 71, 85, 69, 200, 76, 65, 77, 197, 76, 74, 69, 128, 77, 71, 79, 128, 77, 85, 67, 200, 78, 65, 77, 197, 78, 74, 69, 128, 78, 79, 87, 128, 78, 89, 69, 200, 80, 69, 69, 128, 82, 65, 65, 128, 83, 72, 73, 128, 84, 72, 69, 206, 84, 73, 67, 203, 84, 84, 69, 200, 87, 65, 87, 128, 90, 69, 82, 207, 66, 69, 69, 128, 66, 79, 87, 128, 66, 90, 72, 201, 67, 72, 85, 128, 70, 76, 65, 212, 70, 82, 69, 197, 72, 73, 69, 128, 75, 69, 72, 128, 75, 87, 69, 128, 75, 87, 73, 128, 76, 87, 65, 128, 77, 69, 77, 128, 77, 69, 78, 128, 77, 87, 65, 128, 78, 65, 65, 128, 78, 85, 78, 128, 78, 87, 65, 128, 78, 89, 73, 211, 80, 69, 72, 128, 81, 65, 65, 128, 82, 72, 65, 128, 83, 72, 79, 197, 83, 72, 85, 128, 84, 72, 65, 204, 84, 79, 79, 128, 86, 69, 69, 128, 87, 65, 69, 128, 87, 65, 76, 203, 87, 69, 79, 128, 88, 69, 72, 128, 89, 79, 68, 128, 89, 89, 65, 128, 65, 76, 76, 201, 65, 89, 66, 128, 66, 65, 65, 128, 66, 69, 72, 128, 66, 69, 78, 128, 66, 79, 76, 212, 67, 65, 65, 128, 67, 73, 80, 128, 67, 76, 85, 194, 67, 79, 79, 128, 67, 79, 87, 128, 67, 85, 80, 128, 67, 87, 69, 128, 67, 87, 73, 128, 67, 87, 79, 128, 67, 89, 80, 128, 67, 89, 84, 128, 68, 68, 65, 204, 68, 68, 69, 128, 68, 68, 73, 128, 68, 68, 85, 128, 68, 69, 73, 128, 68, 76, 65, 128, 68, 79, 71, 128, 68, 79, 78, 128, 68, 82, 85, 205, 70, 65, 65, 128, 70, 69, 73, 128, 70, 76, 89, 128, 70, 85, 82, 128, 70, 85, 83, 193, 71, 65, 78, 128, 71, 65, 89, 128, 71, 71, 65, 128, 71, 71, 69, 128, 71, 71, 73, 128, 71, 71, 79, 128, 71, 71, 85, 128, 71, 73, 77, 128, 71, 74, 69, 128, 72, 65, 69, 128, 72, 65, 82, 196, 72, 77, 79, 128, 72, 78, 65, 128, 73, 83, 79, 206, 74, 73, 76, 128, 74, 74, 73, 128, 74, 74, 79, 128, 74, 74, 85, 128, 74, 74, 89, 128, 75, 65, 89, 128, 75, 69, 78, 128, 75, 72, 69, 128, 75, 72, 79, 128, 75, 73, 84, 128, 75, 74, 69, 128, 75, 79, 79, 128, 75, 83, 73, 128, 75, 87, 79, 128, 76, 65, 65, 128, 76, 65, 83, 128, 76, 79, 79, 128, 76, 87, 69, 128, 76, 87, 73, 128, 76, 87, 79, 128, 77, 65, 65, 128, 77, 79, 79, 128, 77, 79, 79, 206, 77, 87, 69, 128, 77, 87, 73, 128, 77, 87, 79, 128, 78, 65, 82, 128, 78, 69, 69, 128, 78, 71, 65, 211, 78, 73, 66, 128, 78, 79, 79, 128, 78, 79, 84, 197, 78, 87, 69, 128, 78, 89, 73, 128, 78, 89, 85, 128, 79, 72, 77, 128, 79, 75, 84, 207, 79, 78, 78, 128, 80, 65, 65, 128, 80, 65, 82, 128, 80, 65, 82, 212, 80, 65, 84, 200, 80, 72, 79, 128, 80, 72, 85, 210, 80, 79, 76, 201, 80, 79, 79, 128, 80, 85, 84, 128, 80, 87, 69, 128, 80, 87, 73, 128, 80, 87, 79, 128, 80, 89, 84, 128, 81, 65, 73, 128, 81, 65, 82, 128, 81, 73, 73, 128, 81, 79, 84, 128, 81, 85, 79, 128, 81, 85, 85, 128, 82, 65, 69, 128, 82, 71, 89, 193, 82, 78, 65, 205, 82, 82, 69, 200, 83, 69, 72, 128, 83, 72, 65, 196, 83, 72, 89, 128, 83, 73, 79, 211, 83, 74, 69, 128, 83, 79, 79, 128, 83, 83, 73, 128, 83, 83, 79, 128, 83, 87, 69, 128, 83, 87, 73, 128, 83, 87, 79, 128, 84, 65, 71, 128, 84, 65, 84, 128, 84, 65, 86, 128, 84, 74, 69, 128, 84, 76, 65, 128, 84, 76, 73, 128, 84, 76, 85, 128, 84, 82, 69, 197, 84, 84, 73, 128, 84, 87, 69, 128, 84, 87, 73, 128, 85, 83, 69, 196, 86, 65, 86, 128, 86, 69, 80, 128, 86, 69, 82, 217, 86, 69, 87, 128, 86, 73, 78, 128, 86, 79, 85, 128, 86, 85, 82, 128, 88, 65, 78, 128, 89, 65, 78, 199, 89, 65, 84, 128, 89, 69, 82, 213, 89, 70, 69, 206, 89, 79, 79, 128, 89, 87, 69, 128, 89, 87, 73, 128, 89, 87, 79, 128, 90, 69, 78, 128, 90, 72, 73, 128, 90, 72, 79, 128, 90, 72, 85, 128, 90, 79, 84, 128, 65, 77, 66, 193, 65, 82, 67, 200, 65, 88, 69, 128, 66, 65, 78, 203, 66, 66, 65, 128, 66, 66, 69, 128, 66, 66, 73, 128, 66, 66, 79, 128, 66, 66, 85, 128, 66, 66, 89, 128, 66, 67, 65, 196, 66, 69, 76, 204, 66, 69, 76, 212, 66, 69, 84, 128, 66, 69, 84, 193, 66, 73, 71, 128, 66, 75, 65, 173, 66, 87, 65, 128, 67, 65, 68, 193, 67, 65, 78, 199, 67, 65, 82, 197, 67, 65, 84, 128, 67, 65, 88, 128, 67, 69, 69, 128, 67, 69, 78, 128, 67, 69, 80, 128, 67, 69, 88, 128, 67, 72, 65, 196, 67, 72, 69, 206, 67, 73, 69, 128, 67, 73, 73, 128, 67, 73, 84, 128, 67, 73, 88, 128, 67, 79, 80, 128, 67, 79, 84, 128, 67, 79, 88, 128, 67, 85, 66, 197, 67, 85, 79, 128, 67, 85, 82, 128, 67, 85, 84, 128, 67, 85, 88, 128, 67, 89, 65, 128, 67, 89, 82, 128, 67, 89, 88, 128, 68, 65, 68, 128, 68, 65, 69, 199, 68, 65, 77, 208, 68, 65, 82, 203, 68, 69, 75, 128, 68, 69, 76, 128, 68, 69, 90, 200, 68, 76, 73, 128, 68, 76, 79, 128, 68, 76, 85, 128, 68, 82, 73, 204, 68, 82, 89, 128, 68, 85, 76, 128, 68, 89, 79, 128, 68, 90, 73, 128, 68, 90, 79, 128, 68, 90, 85, 128, 69, 73, 83, 128, 69, 75, 83, 128, 69, 78, 78, 128, 69, 78, 79, 211, 69, 79, 72, 128, 69, 85, 82, 207, 69, 87, 69, 128, 69, 88, 79, 128, 70, 65, 78, 128, 70, 65, 80, 128, 70, 65, 84, 128, 70, 65, 88, 128, 70, 69, 69, 128, 70, 69, 69, 196, 70, 69, 72, 213, 70, 69, 78, 199, 70, 69, 79, 200, 70, 70, 73, 128, 70, 70, 76, 128, 70, 73, 73, 128, 70, 73, 76, 197, 70, 73, 76, 204, 70, 73, 80, 128, 70, 73, 84, 128, 70, 73, 88, 128, 70, 79, 79, 128, 70, 79, 80, 128, 70, 79, 88, 128, 70, 85, 80, 128, 70, 85, 84, 128, 70, 85, 88, 128, 70, 87, 65, 128, 70, 89, 65, 128, 70, 89, 80, 128, 70, 89, 84, 128, 70, 89, 88, 128, 71, 65, 70, 128, 71, 65, 82, 128, 71, 67, 65, 206, 71, 69, 66, 207, 71, 69, 84, 193, 71, 72, 73, 128, 71, 72, 79, 128, 71, 72, 85, 128, 71, 72, 90, 128, 71, 73, 80, 128, 71, 80, 65, 128, 71, 83, 85, 205, 71, 87, 65, 128, 71, 87, 69, 128, 71, 87, 73, 128, 71, 89, 70, 213, 72, 65, 73, 210, 72, 69, 76, 205, 72, 69, 78, 199, 72, 72, 69, 128, 72, 72, 73, 128, 72, 72, 79, 128, 72, 72, 85, 128, 72, 76, 65, 128, 72, 76, 69, 128, 72, 76, 73, 128, 72, 76, 79, 128, 72, 76, 85, 128, 72, 76, 89, 128, 72, 77, 65, 128, 72, 77, 73, 128, 72, 77, 85, 128, 72, 77, 89, 128, 72, 78, 69, 128, 72, 78, 73, 128, 72, 80, 65, 128, 72, 87, 85, 128, 72, 88, 65, 128, 72, 88, 69, 128, 72, 88, 73, 128, 72, 88, 79, 128, 73, 45, 65, 128, 73, 45, 79, 128, 73, 79, 82, 128, 74, 65, 65, 128, 74, 65, 82, 128, 74, 69, 72, 128, 74, 69, 82, 128, 74, 73, 65, 128, 74, 74, 65, 128, 74, 74, 69, 128, 74, 87, 65, 128, 75, 65, 72, 128, 75, 65, 73, 128, 75, 65, 80, 128, 75, 65, 85, 206, 75, 65, 88, 128, 75, 69, 80, 128, 75, 69, 88, 128, 75, 69, 89, 128, 75, 72, 73, 128, 75, 72, 90, 128, 75, 73, 69, 128, 75, 73, 72, 128, 75, 73, 73, 128, 75, 73, 80, 128, 75, 73, 88, 128, 75, 75, 65, 128, 75, 75, 69, 128, 75, 75, 73, 128, 75, 75, 79, 128, 75, 75, 85, 128, 75, 79, 72, 128, 75, 79, 80, 128, 75, 79, 84, 128, 75, 79, 88, 128, 75, 80, 65, 128, 75, 82, 65, 128, 75, 85, 79, 128, 75, 85, 80, 128, 75, 85, 82, 128, 75, 85, 84, 128, 75, 85, 88, 128, 75, 88, 65, 128, 75, 88, 69, 128, 75, 88, 73, 128, 75, 88, 79, 128, 75, 88, 85, 128, 76, 65, 71, 213, 76, 65, 83, 212, 76, 65, 90, 217, 76, 69, 79, 128, 76, 72, 65, 199, 76, 73, 68, 128, 76, 73, 73, 128, 76, 73, 78, 203, 76, 73, 82, 193, 76, 79, 71, 128, 76, 79, 71, 210, 76, 79, 84, 128, 76, 89, 89, 128, 77, 65, 83, 213, 77, 65, 89, 128, 77, 67, 72, 213, 77, 68, 85, 206, 77, 69, 84, 193, 77, 69, 88, 128, 77, 71, 65, 128, 77, 71, 69, 128, 77, 71, 85, 128, 77, 72, 90, 128, 77, 73, 73, 128, 77, 73, 76, 128, 77, 73, 76, 204, 77, 73, 77, 128, 77, 79, 76, 128, 77, 80, 65, 128, 77, 89, 65, 128, 77, 89, 84, 128, 78, 65, 71, 128, 78, 65, 79, 211, 78, 66, 65, 128, 78, 66, 73, 128, 78, 66, 79, 128, 78, 66, 85, 128, 78, 66, 89, 128, 78, 68, 69, 128, 78, 69, 78, 128, 78, 69, 84, 128, 78, 69, 88, 212, 78, 71, 71, 128, 78, 74, 73, 128, 78, 74, 79, 128, 78, 74, 85, 128, 78, 74, 89, 128, 78, 78, 71, 128, 78, 78, 79, 128, 78, 82, 65, 128, 78, 82, 69, 128, 78, 82, 79, 128, 78, 82, 85, 128, 78, 82, 89, 128, 78, 85, 76, 204, 78, 85, 80, 128, 78, 85, 82, 128, 78, 85, 88, 128, 78, 89, 69, 128, 78, 90, 65, 128, 78, 90, 69, 128, 78, 90, 73, 128, 78, 90, 85, 128, 78, 90, 89, 128, 79, 45, 69, 128, 80, 65, 80, 128, 80, 65, 84, 128, 80, 65, 88, 128, 80, 72, 85, 128, 80, 73, 69, 128, 80, 73, 71, 128, 80, 73, 80, 128, 80, 73, 84, 128, 80, 73, 88, 128, 80, 76, 65, 128, 80, 79, 80, 128, 80, 79, 88, 128, 80, 80, 77, 128, 80, 85, 79, 128, 80, 85, 80, 128, 80, 85, 82, 128, 80, 85, 88, 128, 80, 89, 80, 128, 80, 89, 82, 128, 80, 89, 88, 128, 81, 65, 76, 193, 81, 65, 81, 128, 81, 65, 85, 128, 81, 69, 69, 128, 81, 72, 65, 128, 81, 72, 69, 128, 81, 72, 73, 128, 81, 72, 79, 128, 81, 72, 85, 128, 81, 73, 69, 128, 81, 73, 80, 128, 81, 73, 84, 128, 81, 73, 88, 128, 81, 79, 70, 128, 81, 79, 79, 128, 81, 79, 80, 128, 81, 79, 88, 128, 81, 85, 65, 128, 81, 85, 69, 128, 81, 85, 73, 128, 81, 85, 75, 128, 81, 85, 80, 128, 81, 85, 82, 128, 81, 85, 84, 128, 81, 85, 86, 128, 81, 85, 88, 128, 81, 87, 65, 128, 81, 87, 69, 128, 81, 87, 73, 128, 81, 89, 80, 128, 81, 89, 82, 128, 81, 89, 84, 128, 81, 89, 88, 128, 82, 65, 68, 128, 82, 65, 77, 211, 82, 69, 73, 196, 82, 73, 80, 128, 82, 74, 69, 128, 82, 74, 69, 211, 82, 79, 79, 128, 82, 82, 69, 128, 82, 82, 79, 128, 82, 82, 85, 128, 82, 82, 89, 128, 82, 85, 65, 128, 82, 85, 78, 128, 82, 87, 65, 128, 82, 89, 65, 128, 82, 89, 89, 128, 83, 45, 87, 128, 83, 65, 68, 128, 83, 65, 89, 128, 83, 66, 85, 194, 83, 71, 65, 194, 83, 71, 79, 210, 83, 71, 82, 193, 83, 72, 79, 199, 83, 73, 73, 128, 83, 73, 78, 197, 83, 75, 87, 128, 83, 78, 65, 208, 83, 83, 69, 128, 83, 83, 85, 128, 83, 83, 89, 128, 83, 84, 69, 205, 83, 85, 65, 128, 83, 85, 79, 128, 83, 85, 82, 128, 83, 90, 65, 128, 83, 90, 69, 128, 83, 90, 73, 128, 83, 90, 79, 128, 83, 90, 85, 128, 84, 65, 79, 128, 84, 65, 80, 128, 84, 65, 80, 197, 84, 65, 87, 128, 84, 65, 88, 128, 84, 69, 83, 200, 84, 69, 84, 128, 84, 69, 84, 200, 84, 69, 88, 128, 84, 72, 69, 211, 84, 72, 73, 206, 84, 72, 90, 128, 84, 73, 73, 128, 84, 73, 80, 128, 84, 73, 84, 128, 84, 73, 88, 128, 84, 76, 86, 128, 84, 79, 84, 128, 84, 79, 88, 128, 84, 82, 73, 128, 84, 83, 86, 128, 84, 84, 72, 128, 84, 84, 85, 128, 84, 85, 79, 128, 84, 85, 80, 128, 84, 85, 82, 128, 84, 85, 84, 128, 84, 85, 88, 128, 84, 89, 65, 128, 84, 89, 69, 128, 84, 89, 73, 128, 84, 89, 79, 128, 84, 90, 65, 128, 84, 90, 69, 128, 84, 90, 73, 128, 84, 90, 79, 128, 84, 90, 85, 128, 85, 69, 69, 128, 85, 78, 68, 207, 85, 78, 73, 212, 85, 79, 78, 128, 85, 82, 85, 218, 86, 65, 65, 128, 86, 65, 80, 128, 86, 65, 84, 128, 86, 65, 88, 128, 86, 69, 72, 128, 86, 69, 88, 128, 86, 73, 69, 128, 86, 73, 80, 128, 86, 73, 84, 128, 86, 73, 88, 128, 86, 79, 73, 196, 86, 79, 80, 128, 86, 79, 84, 128, 86, 79, 88, 128, 86, 85, 80, 128, 86, 85, 84, 128, 86, 85, 88, 128, 86, 87, 65, 128, 86, 89, 80, 128, 86, 89, 82, 128, 86, 89, 84, 128, 86, 89, 88, 128, 87, 65, 80, 128, 87, 65, 84, 128, 87, 65, 88, 128, 87, 69, 80, 128, 87, 69, 88, 128, 87, 79, 80, 128, 87, 79, 82, 196, 87, 79, 88, 128, 87, 85, 79, 128, 87, 89, 78, 206, 88, 79, 82, 128, 88, 89, 80, 128, 88, 89, 82, 128, 88, 89, 84, 128, 88, 89, 88, 128, 89, 65, 75, 128, 89, 73, 73, 128, 89, 85, 68, 200, 89, 85, 82, 128, 89, 89, 80, 128, 89, 89, 82, 128, 89, 89, 84, 128, 89, 89, 88, 128, 90, 65, 72, 128, 90, 72, 89, 128, 90, 76, 65, 128, 90, 82, 65, 128, 90, 85, 84, 128, 90, 90, 65, 128, 90, 90, 69, 128, 90, 90, 73, 128, 90, 90, 85, 128, 90, 90, 89, 128, 75, 65, 198, 68, 65, 217, 66, 69, 200, 68, 65, 196, 83, 65, 196, 70, 69, 200, 81, 65, 198, 84, 65, 200, 69, 78, 196, 82, 82, 128, 65, 82, 195, 78, 79, 210, 77, 65, 201, 79, 67, 210, 87, 65, 215, 67, 72, 197, 82, 72, 207, 84, 72, 197, 89, 73, 199, 65, 82, 205, 66, 85, 212, 67, 79, 128, 67, 85, 205, 78, 69, 207, 71, 65, 198, 75, 72, 207, 77, 71, 207, 90, 65, 200, 66, 73, 199, 68, 73, 197, 71, 72, 197, 80, 72, 201, 86, 79, 128, 90, 72, 197, 80, 72, 207, 80, 85, 128, 67, 72, 207, 77, 69, 206, 78, 69, 212, 80, 69, 200, 81, 73, 128, 84, 69, 206, 84, 73, 208, 86, 69, 200, 89, 79, 196, 66, 69, 212, 67, 73, 128, 68, 89, 207, 70, 79, 128, 72, 65, 193, 75, 65, 201, 78, 65, 199, 81, 79, 128, 81, 85, 128, 82, 65, 196, 83, 73, 206, 83, 73, 216, 86, 65, 214, 86, 73, 128, 45, 85, 205, 67, 72, 201, 67, 85, 128, 67, 89, 128, 68, 85, 204, 68, 90, 128, 69, 88, 207, 71, 82, 213, 71, 85, 199, 72, 86, 128, 73, 74, 128, 74, 69, 200, 74, 79, 212, 75, 69, 217, 75, 71, 128, 75, 75, 128, 76, 74, 128, 77, 73, 199, 78, 74, 128, 78, 86, 128, 78, 89, 201, 79, 72, 205, 80, 65, 215, 81, 69, 128, 81, 79, 207, 82, 68, 207, 83, 85, 206, 87, 79, 206, 89, 69, 206, 65, 78, 207, 66, 65, 199, 66, 69, 206, 66, 79, 215, 66, 81, 128, 67, 77, 128, 67, 85, 212, 68, 76, 128, 68, 86, 128, 69, 67, 200, 70, 77, 128, 70, 89, 128, 71, 66, 128, 71, 86, 128, 71, 89, 128, 72, 75, 128, 72, 79, 212, 72, 80, 128, 73, 83, 211, 73, 85, 128, 73, 89, 128, 75, 66, 128, 75, 73, 208, 75, 76, 128, 75, 77, 128, 75, 84, 128, 75, 86, 128, 76, 67, 197, 76, 67, 201, 76, 69, 203, 76, 72, 128, 76, 78, 128, 76, 88, 128, 77, 66, 128, 77, 69, 205, 77, 71, 128, 77, 72, 128, 77, 73, 196, 77, 76, 128, 77, 77, 128, 77, 83, 128, 77, 86, 128, 77, 87, 128, 78, 65, 193, 78, 69, 215, 78, 70, 128, 78, 71, 207, 78, 72, 128, 78, 77, 128, 78, 85, 206, 78, 87, 128, 78, 89, 196, 79, 86, 128, 80, 67, 128, 80, 69, 211, 80, 70, 128, 80, 73, 201, 80, 79, 208, 80, 82, 128, 80, 86, 128, 80, 87, 128, 81, 79, 198, 81, 89, 128, 82, 73, 206, 82, 74, 197, 82, 85, 194, 83, 78, 193, 83, 79, 198, 83, 82, 128, 83, 87, 128, 84, 65, 214, 84, 69, 197, 84, 69, 212, 84, 73, 210, 84, 82, 128, 86, 69, 197, 86, 69, 215, 87, 66, 128, 87, 86, 128, 88, 89, 128, 89, 65, 210, 89, 78, 128, 89, 86, 128, 90, 76, 193, 66, 217, 77, 213, 65, 197, 89, 213, 65, 213, 68, 218, 90, 197, 75, 205, 67, 205, 75, 213, 77, 205, 76, 218, 77, 194, 77, 207, 77, 214, 77, 215, 80, 207, 84, 195, 202, 209, }; static unsigned short lexicon_offset[] = { 0, 0, 6, 10, 15, 23, 30, 32, 35, 47, 52, 58, 71, 76, 82, 90, 99, 103, 111, 114, 121, 127, 133, 140, 150, 158, 162, 167, 172, 179, 184, 190, 198, 205, 212, 221, 229, 233, 238, 243, 251, 257, 264, 270, 274, 281, 287, 294, 300, 309, 312, 315, 324, 330, 335, 338, 346, 349, 354, 359, 364, 372, 378, 387, 397, 399, 404, 415, 419, 432, 298, 434, 440, 450, 459, 464, 466, 469, 467, 476, 480, 485, 488, 493, 499, 501, 504, 509, 517, 525, 529, 536, 543, 552, 560, 569, 573, 581, 590, 596, 605, 610, 618, 625, 632, 638, 643, 651, 660, 667, 668, 676, 336, 683, 691, 637, 695, 701, 706, 250, 712, 725, 729, 736, 739, 749, 754, 763, 772, 777, 786, 791, 798, 801, 805, 813, 815, 819, 821, 826, 828, 837, 840, 845, 22, 849, 853, 863, 534, 871, 876, 886, 893, 900, 906, 657, 913, 918, 928, 884, 934, 939, 945, 950, 955, 957, 961, 968, 972, 977, 979, 74, 981, 986, 991, 997, 1003, 1009, 1013, 1018, 1024, 1030, 1032, 352, 1035, 1041, 1050, 1052, 1054, 1057, 674, 1062, 540, 1065, 1071, 539, 1073, 31, 1060, 1085, 1087, 285, 1089, 1091, 1093, 402, 1095, 1104, 1109, 1112, 1114, 1121, 1135, 1141, 1145, 1149, 1154, 1157, 1161, 1166, 1175, 1184, 100, 1187, 1196, 1204, 1207, 1214, 1218, 1222, 1227, 1233, 1239, 1263, 1285, 1307, 1329, 1350, 1371, 1391, 1411, 1430, 1449, 1468, 1487, 1506, 1525, 1544, 1563, 1581, 1599, 1617, 1635, 1653, 1671, 1689, 1707, 1725, 1743, 1761, 1778, 1795, 1812, 1829, 1846, 1863, 1880, 1897, 1914, 1931, 1948, 1964, 1980, 1996, 2012, 2028, 2044, 2060, 2076, 2092, 2108, 2124, 2140, 2156, 2172, 2188, 2204, 2220, 2236, 2252, 2268, 2284, 2300, 2316, 2332, 2348, 2364, 2380, 2396, 2412, 2428, 2444, 2460, 2476, 2492, 2508, 2524, 2540, 2556, 2572, 2588, 2604, 2620, 2636, 2652, 2668, 2684, 2700, 2716, 2732, 2748, 2764, 2780, 2796, 2812, 2828, 2844, 2860, 2876, 2892, 2908, 2924, 2940, 2956, 2972, 2988, 3004, 3020, 3036, 3052, 3068, 3084, 3100, 3116, 3132, 3148, 3164, 3180, 3196, 3212, 3228, 3244, 3260, 3276, 3292, 3308, 3324, 3340, 3356, 3372, 3388, 3404, 3420, 3436, 3452, 3468, 3484, 3500, 3516, 3532, 3548, 3564, 3580, 3596, 3612, 3628, 3644, 3660, 3676, 3692, 3708, 3724, 3740, 3756, 3772, 3788, 3804, 3820, 3836, 3852, 3868, 3884, 3900, 3916, 3932, 3948, 3964, 3980, 3996, 4012, 4028, 4044, 4060, 4076, 4092, 4108, 4124, 4140, 4156, 4172, 4188, 4204, 4220, 4236, 4252, 4268, 4284, 4300, 4316, 4332, 4348, 4364, 4380, 4396, 4412, 4428, 4444, 4460, 4476, 4492, 4508, 4524, 4540, 4556, 4572, 4588, 4604, 4620, 4636, 4652, 4668, 4684, 4700, 4716, 4732, 4748, 4764, 4780, 4796, 4812, 4828, 4844, 4860, 4876, 4892, 4908, 4924, 4940, 4956, 4972, 4988, 5004, 5020, 5036, 5052, 5068, 5084, 5100, 5116, 5132, 5148, 5164, 5180, 5196, 5212, 5228, 5244, 5260, 5276, 5292, 5308, 5324, 5340, 5356, 5372, 5388, 5404, 5420, 5436, 5452, 5468, 5484, 5500, 5516, 5532, 5548, 5564, 5580, 5596, 5612, 5628, 5644, 5660, 5676, 5692, 5708, 5724, 5740, 5756, 5772, 5788, 5804, 5820, 5836, 5852, 5868, 5884, 5900, 5916, 5932, 5948, 5964, 5980, 5996, 6012, 6028, 6044, 6060, 6076, 6092, 6108, 6124, 6140, 6156, 6172, 6188, 6204, 6220, 6236, 6252, 6268, 6284, 6300, 6316, 6332, 6348, 6364, 6380, 6396, 6412, 6428, 6444, 6460, 6476, 6492, 6508, 6524, 6540, 6556, 6572, 6588, 6604, 6620, 6636, 6652, 6668, 6684, 6700, 6716, 6732, 6748, 6764, 6780, 6796, 6812, 6828, 6844, 6860, 6876, 6892, 6908, 6924, 6940, 6956, 6972, 6988, 7004, 7020, 7036, 7052, 7068, 7084, 7100, 7116, 7132, 7148, 7164, 7180, 7196, 7212, 7228, 7244, 7260, 7276, 7292, 7308, 7324, 7340, 7356, 7372, 7388, 7404, 7420, 7436, 7452, 7468, 7484, 7500, 7516, 7532, 7548, 7564, 7580, 7596, 7612, 7628, 7644, 7660, 7676, 7692, 7708, 7724, 7740, 7756, 7772, 7788, 7804, 7820, 7836, 7852, 7868, 7884, 7900, 7916, 7932, 7948, 7964, 7980, 7996, 8012, 8028, 8044, 8060, 8076, 8092, 8108, 8124, 8140, 8156, 8172, 8188, 8204, 8220, 8236, 8252, 8268, 8284, 8300, 8316, 8332, 8348, 8364, 8380, 8396, 8412, 8428, 8444, 8460, 8476, 8492, 8508, 8524, 8540, 8556, 8572, 8588, 8604, 8620, 8636, 8652, 8668, 8684, 8700, 8716, 8732, 8748, 8764, 8780, 8796, 8812, 8828, 8844, 8860, 8876, 8892, 8908, 8924, 8940, 8956, 8972, 8988, 9004, 9020, 9036, 9052, 9068, 9084, 9100, 9116, 9132, 9148, 9164, 9180, 9196, 9212, 9228, 9244, 9260, 9276, 9292, 9308, 9324, 9340, 9356, 9372, 9388, 9404, 9420, 9436, 9452, 9468, 9484, 9500, 9516, 9532, 9548, 9564, 9580, 9596, 9612, 9628, 9644, 9660, 9676, 9692, 9708, 9724, 9740, 9756, 9772, 9788, 9804, 9820, 9836, 9852, 9868, 9884, 9900, 9916, 9932, 9948, 9964, 9980, 9996, 10012, 10028, 10044, 10060, 10076, 10092, 10108, 10124, 10140, 10156, 10172, 10188, 10204, 10220, 10236, 10252, 10268, 10284, 10300, 10316, 10332, 10348, 10364, 10380, 10396, 10412, 10428, 10444, 10460, 10476, 10492, 10508, 10524, 10540, 10556, 10572, 10588, 10604, 10620, 10636, 10652, 10668, 10684, 10700, 10716, 10732, 10748, 10764, 10780, 10796, 10812, 10828, 10844, 10860, 10876, 10892, 10908, 10923, 10938, 10953, 10968, 10983, 10998, 11013, 11028, 11043, 11058, 11073, 11088, 11103, 11118, 11133, 11148, 11163, 11178, 11193, 11208, 11223, 11238, 11253, 11268, 11283, 11298, 11313, 11328, 11343, 11358, 11373, 11388, 11403, 11418, 11433, 11448, 11463, 11478, 11493, 11508, 11523, 11538, 11553, 11568, 11583, 11598, 11613, 11628, 11643, 11658, 11673, 11688, 11703, 11718, 11733, 11748, 11763, 11778, 11793, 11808, 11823, 11838, 11853, 11868, 11883, 11898, 11913, 11928, 11943, 11958, 11973, 11988, 12003, 12018, 12033, 12048, 12063, 12078, 12093, 12108, 12123, 12138, 12153, 12168, 12183, 12198, 12213, 12228, 12243, 12258, 12273, 12288, 12303, 12318, 12333, 12348, 12363, 12378, 12393, 12408, 12423, 12438, 12453, 12468, 12483, 12498, 12513, 12528, 12543, 12558, 12573, 12588, 12603, 12618, 12633, 12648, 12663, 12678, 12693, 12708, 12723, 12738, 12753, 12768, 12783, 12798, 12813, 12828, 12843, 12858, 12873, 12888, 12903, 12918, 12933, 12948, 12963, 12978, 12993, 13008, 13023, 13038, 13053, 13068, 13083, 13098, 13113, 13128, 13143, 13158, 13173, 13188, 13203, 13218, 13233, 13248, 13263, 13278, 13293, 13308, 13323, 13338, 13353, 13368, 13383, 13398, 13413, 13428, 13443, 13458, 13473, 13488, 13503, 13518, 13533, 13548, 13563, 13578, 13593, 13608, 13623, 13638, 13653, 13668, 13683, 13698, 13713, 13728, 13743, 13758, 13773, 13788, 13803, 13818, 13833, 13848, 13863, 13878, 13893, 13908, 13923, 13938, 13953, 13968, 13983, 13998, 14013, 14028, 14043, 14058, 14073, 14088, 14103, 14118, 14133, 14148, 14163, 14178, 14193, 14208, 14223, 14238, 14253, 14268, 14283, 14298, 14313, 14328, 14343, 14358, 14373, 14388, 14403, 14418, 14433, 14448, 14463, 14478, 14493, 14508, 14523, 14538, 14553, 14568, 14583, 14598, 14613, 14628, 14643, 14658, 14673, 14688, 14703, 14718, 14733, 14748, 14763, 14778, 14793, 14808, 14823, 14838, 14853, 14868, 14883, 14898, 14913, 14928, 14943, 14958, 14973, 14988, 15003, 15018, 15033, 15048, 15063, 15078, 15093, 15108, 15123, 15138, 15153, 15168, 15183, 15198, 15213, 15228, 15243, 15258, 15273, 15288, 15303, 15318, 15333, 15348, 15363, 15378, 15393, 15408, 15423, 15438, 15453, 15468, 15483, 15498, 15513, 15528, 15543, 15558, 15573, 15588, 15603, 15618, 15633, 15648, 15663, 15678, 15693, 15708, 15723, 15738, 15753, 15768, 15783, 15798, 15813, 15828, 15843, 15858, 15873, 15888, 15903, 15918, 15933, 15948, 15963, 15978, 15993, 16008, 16023, 16038, 16053, 16068, 16083, 16098, 16113, 16128, 16143, 16158, 16173, 16188, 16203, 16218, 16233, 16248, 16263, 16278, 16293, 16308, 16323, 16338, 16353, 16368, 16383, 16398, 16413, 16428, 16443, 16458, 16473, 16488, 16503, 16518, 16533, 16548, 16563, 16578, 16593, 16608, 16623, 16638, 16653, 16668, 16682, 16696, 16710, 16724, 1397, 16738, 16752, 16766, 16780, 16794, 16808, 16822, 16836, 16850, 16864, 16878, 16892, 16906, 16920, 16934, 16948, 16962, 16976, 16990, 17004, 17018, 17032, 1798, 17046, 17060, 17074, 17088, 17102, 17116, 17130, 17144, 17158, 17172, 17186, 17200, 17214, 17228, 17242, 17256, 17270, 17283, 17296, 17309, 17322, 17335, 17348, 17361, 17374, 17387, 17400, 17413, 17426, 17439, 17452, 17465, 17478, 17491, 17504, 17517, 1748, 17530, 17543, 17556, 17569, 17582, 17595, 17608, 17621, 17634, 17647, 17660, 17673, 17686, 17699, 17712, 17725, 17738, 17751, 17764, 17777, 17790, 17803, 17816, 17829, 17842, 17855, 17868, 1512, 17881, 17894, 17907, 17920, 17933, 17946, 17959, 17972, 17985, 17998, 18011, 18024, 18037, 18050, 18063, 18076, 18088, 18100, 18112, 18124, 18136, 18148, 18160, 18172, 18184, 18196, 18208, 18220, 18232, 18244, 18256, 1659, 18268, 18280, 18292, 1605, 18304, 18316, 18328, 18340, 18352, 18364, 1494, 1587, 18376, 1623, 18388, 18400, 18412, 18424, 18436, 18448, 18460, 18472, 18484, 18496, 18508, 18520, 18532, 18544, 18556, 18568, 18580, 18592, 18604, 18616, 18628, 18640, 18652, 18664, 18676, 18688, 18700, 18712, 18724, 18736, 18748, 18760, 18772, 18784, 18796, 18808, 18820, 18832, 18844, 18856, 18868, 18880, 18892, 18904, 18916, 18928, 18940, 18952, 18964, 18976, 18988, 19000, 19012, 19024, 19036, 19048, 19060, 19072, 19084, 19096, 19108, 19120, 19132, 19144, 19156, 19168, 19180, 19192, 19204, 19216, 19228, 19240, 19252, 19264, 19276, 19288, 1379, 19300, 19312, 1713, 19324, 19336, 19348, 19360, 19372, 19384, 19396, 19408, 19420, 19432, 19444, 19456, 19468, 19480, 19492, 19504, 19516, 19528, 19540, 19552, 19564, 19576, 19588, 19600, 19612, 19624, 19636, 19647, 19658, 19669, 19680, 19691, 19702, 19713, 19724, 19735, 19746, 19757, 19768, 19779, 19790, 19801, 19812, 19823, 1784, 19834, 19845, 19856, 19867, 19878, 19889, 19900, 1869, 1296, 19911, 1419, 19922, 19933, 19944, 19955, 19966, 19977, 1886, 19988, 19999, 20010, 20021, 20032, 20043, 20054, 20065, 20076, 20087, 20098, 20109, 1852, 20120, 20131, 20142, 20153, 20164, 20175, 20186, 20197, 20208, 20219, 20230, 20241, 20252, 20263, 20274, 20285, 20296, 20307, 20318, 20329, 20340, 20351, 20362, 20373, 20384, 20395, 20406, 20417, 20428, 20439, 20450, 20461, 20472, 20483, 20494, 20505, 20516, 20527, 20538, 20549, 20560, 20571, 20582, 20593, 20604, 20615, 20626, 20637, 20648, 20659, 20670, 20681, 20692, 20703, 20714, 20725, 20736, 20747, 20758, 20769, 20780, 20791, 20802, 20813, 20824, 20835, 20846, 20857, 20868, 20879, 20890, 20901, 20912, 20923, 20934, 20945, 20956, 20967, 20978, 20989, 21000, 21011, 21022, 21033, 21044, 21055, 21066, 21077, 21088, 21099, 21110, 21121, 21132, 21143, 16937, 21154, 21165, 21176, 21187, 21198, 21209, 21220, 21231, 21242, 21253, 21264, 21275, 21286, 21297, 21308, 21319, 21330, 21341, 21352, 21363, 21374, 21385, 21396, 21407, 21418, 21429, 21440, 21451, 21462, 21473, 21484, 21495, 21506, 21517, 21528, 21539, 21550, 21561, 21572, 21583, 21594, 21605, 21615, 21625, 21635, 21645, 21655, 21665, 21675, 21685, 21695, 21705, 21715, 21725, 21735, 21745, 21755, 21765, 21775, 21785, 21795, 18090, 21805, 21815, 21825, 21835, 21845, 21855, 21865, 1361, 21875, 21885, 21895, 21905, 21915, 21925, 21935, 21945, 21955, 21965, 21975, 21985, 21995, 22005, 22015, 22025, 22035, 22045, 22055, 22065, 22075, 22085, 22095, 22105, 22115, 22125, 22135, 22145, 22155, 22165, 22175, 22185, 22195, 22205, 22215, 22225, 22235, 22245, 22255, 22265, 22275, 22285, 22295, 17676, 22305, 18630, 22315, 22325, 22335, 22345, 22355, 22365, 22375, 22385, 22395, 22405, 22415, 22425, 22435, 22445, 22455, 22465, 22475, 22485, 22495, 22505, 22515, 22525, 22535, 22545, 22555, 22565, 22575, 22585, 22595, 22605, 22615, 22625, 22635, 22645, 22655, 22665, 22675, 22685, 22695, 22705, 22715, 22725, 22735, 22745, 22755, 22765, 22775, 22785, 22795, 22805, 22815, 22825, 22835, 22845, 22855, 22865, 22875, 22885, 22895, 22905, 22915, 22925, 22935, 22945, 22955, 22965, 22975, 22985, 22995, 23005, 23015, 23025, 23035, 23045, 23055, 23065, 23075, 23085, 23095, 23105, 23115, 23125, 23135, 23145, 23155, 23165, 23175, 23185, 23195, 23205, 23215, 23225, 23235, 23245, 23255, 23265, 23275, 23285, 23295, 23305, 23315, 23325, 23335, 23345, 23355, 23365, 23375, 23385, 23395, 23405, 23415, 23425, 23435, 23445, 23455, 23465, 23475, 23485, 23495, 1938, 23505, 23515, 23525, 23535, 23545, 23555, 23565, 23575, 23585, 23595, 23605, 23615, 23625, 23635, 23645, 23655, 23665, 23675, 23685, 23695, 23705, 23715, 23725, 23735, 23745, 23755, 23765, 23774, 23783, 23792, 23801, 23810, 23819, 23828, 23837, 23846, 23855, 23864, 17287, 23873, 23882, 23891, 23900, 23909, 23918, 23927, 23936, 23945, 23954, 23963, 23972, 23981, 23990, 23999, 24008, 24017, 24026, 24035, 24044, 24053, 24062, 24071, 24080, 24089, 24098, 24107, 24116, 24125, 24134, 24143, 24152, 24161, 24170, 24179, 24188, 24197, 19792, 24206, 24215, 24224, 24233, 24242, 24251, 24260, 24269, 24278, 24287, 24296, 24305, 24314, 24323, 24332, 24341, 24350, 24359, 24368, 24377, 24386, 24395, 24404, 24413, 24422, 19979, 24431, 24440, 24449, 24458, 24467, 24476, 24485, 24494, 24503, 24512, 24521, 24530, 1276, 24539, 24548, 24557, 24566, 24575, 24584, 24593, 24602, 24611, 24620, 24629, 24638, 24647, 24656, 24665, 24674, 24683, 24692, 24701, 24710, 24719, 24728, 24737, 24746, 24755, 24764, 24773, 24782, 24791, 24800, 24809, 24818, 24827, 24836, 24845, 24854, 24863, 24872, 24881, 24890, 24899, 24908, 24917, 24926, 24935, 24944, 24953, 24962, 24971, 24980, 24989, 24998, 25007, 25016, 25025, 25034, 25043, 25052, 25061, 25070, 25079, 25088, 25097, 25106, 25115, 25124, 25133, 25142, 25151, 25160, 25169, 25178, 25187, 25196, 25205, 25214, 25223, 25232, 25241, 25250, 25259, 25268, 25277, 25286, 25295, 25304, 25313, 25322, 25331, 25340, 25349, 25358, 25367, 25376, 25385, 25394, 25403, 25412, 25421, 25430, 25439, 25448, 25457, 25466, 25475, 25484, 25493, 25502, 25511, 25520, 25529, 25538, 25547, 25556, 25565, 25574, 25583, 25592, 25601, 25610, 25619, 25628, 25637, 25646, 25655, 25664, 25673, 25682, 25691, 25700, 10755, 25709, 25718, 25727, 25736, 25745, 25754, 25763, 25772, 25781, 25790, 25799, 25808, 25817, 25826, 25835, 25844, 25853, 25862, 25871, 25880, 25889, 25898, 25907, 25916, 25925, 25934, 25943, 25952, 25961, 25970, 25979, 25988, 25997, 26006, 26015, 26024, 26033, 26042, 26051, 26060, 26069, 26078, 26087, 26096, 26105, 1837, 26114, 26123, 26132, 26141, 26150, 26159, 26168, 26177, 26186, 26195, 26204, 26213, 26222, 26231, 26240, 26249, 26258, 26267, 26276, 26285, 26294, 26303, 26312, 26321, 26330, 26339, 26348, 26357, 26366, 26375, 26383, 26391, 26399, 16674, 26407, 26415, 26423, 26431, 26439, 26447, 26455, 26463, 26471, 21617, 26479, 26487, 26495, 26503, 26511, 26519, 26527, 26535, 22007, 26543, 26551, 26559, 26567, 26575, 26583, 26591, 26599, 17795, 26607, 26615, 26623, 26631, 26639, 16702, 26647, 1460, 26655, 26663, 2036, 17899, 26671, 1956, 26679, 26687, 26695, 26703, 16758, 26711, 26719, 26727, 18368, 26735, 26743, 26751, 17314, 26759, 26767, 26775, 26783, 24144, 26791, 26799, 26807, 26815, 26823, 26831, 26839, 26847, 26855, 26863, 26871, 1804, 26879, 26887, 26895, 26903, 26911, 26919, 26927, 26935, 26943, 26951, 26959, 26967, 26975, 26983, 26991, 26999, 27007, 27015, 27023, 27031, 27039, 27047, 27055, 27063, 27071, 27079, 27087, 27095, 27103, 27111, 27119, 27127, 27135, 27143, 27151, 27159, 27167, 21847, 27175, 27183, 27191, 27199, 27207, 27215, 27223, 27231, 27239, 27247, 27255, 24531, 27263, 27271, 27279, 27287, 27295, 27303, 27311, 27319, 27327, 27335, 27343, 27351, 27359, 27367, 27375, 27383, 27391, 27399, 27407, 27415, 27423, 27431, 27439, 27447, 27455, 27463, 27471, 27479, 27487, 27495, 27503, 27511, 27519, 27527, 27535, 27543, 27551, 27559, 27567, 27575, 21157, 27583, 27591, 27599, 27607, 27615, 27623, 27631, 27639, 27647, 27655, 27663, 27671, 27679, 27687, 27695, 27703, 27711, 27719, 27727, 27735, 27743, 27751, 27759, 27767, 27775, 27783, 27791, 27799, 27807, 27815, 27823, 27831, 27839, 27847, 27855, 27863, 27871, 24567, 27879, 27887, 27895, 27903, 27911, 27919, 27927, 27935, 27943, 27951, 27959, 27967, 21256, 27975, 27983, 1923, 27991, 27999, 28007, 28015, 28023, 28031, 28039, 28047, 28055, 28063, 28071, 28079, 28087, 28095, 28103, 28111, 28119, 28127, 28135, 28143, 28151, 28159, 2004, 28167, 28175, 10852, 28183, 28191, 28199, 28207, 28215, 28223, 19196, 28231, 28239, 28247, 28255, 28263, 28271, 28279, 28287, 28295, 28303, 28311, 28319, 28327, 28335, 28343, 28351, 28359, 28367, 28375, 28383, 28391, 28399, 28407, 28415, 28423, 28431, 28439, 19352, 28447, 28455, 28463, 28471, 28479, 28487, 28495, 28503, 28511, 28519, 1699, 28527, 28535, 28543, 28551, 28559, 28567, 28575, 28583, 28591, 28599, 28607, 28615, 28623, 28631, 28639, 28647, 28655, 28663, 28671, 28679, 28687, 28695, 28703, 28711, 28719, 28727, 28735, 28743, 28751, 28759, 28767, 28775, 28783, 28791, 28799, 28807, 28815, 28823, 23187, 28831, 28839, 28847, 28855, 28863, 28871, 28879, 28887, 28894, 28901, 18285, 28908, 28915, 28922, 28929, 28936, 28943, 28950, 28957, 28964, 28971, 28978, 28985, 28992, 28999, 29006, 11036, 29013, 29020, 29027, 29034, 29041, 29048, 29055, 29062, 29069, 29076, 29083, 29090, 29097, 29104, 29111, 29118, 29125, 29132, 29139, 29146, 29153, 29160, 29167, 1499, 29174, 1592, 29181, 29188, 29195, 29202, 29209, 29216, 29223, 29230, 29237, 29244, 29251, 29258, 29265, 29272, 1343, 29279, 29286, 29293, 29300, 29307, 29314, 29321, 29328, 29335, 29342, 29349, 29356, 29363, 29370, 29377, 29384, 29391, 29398, 21246, 29405, 29412, 29419, 29426, 29433, 29440, 29447, 29454, 29461, 29468, 29475, 29482, 29489, 29496, 29503, 29510, 29517, 29524, 29531, 29538, 29545, 29552, 29559, 29566, 29573, 23956, 29580, 29587, 29594, 29601, 29608, 29615, 29622, 29629, 29636, 29643, 29650, 29657, 29664, 29671, 29678, 29685, 29692, 29699, 29706, 29713, 29720, 29727, 29734, 29741, 29748, 29755, 29762, 29769, 29776, 29783, 29790, 29797, 29804, 29811, 29818, 29825, 29832, 29839, 29846, 29853, 29860, 29867, 29874, 29881, 29888, 29895, 29902, 29909, 29916, 29923, 29930, 29937, 29944, 29951, 29958, 29965, 29972, 24145, 29979, 29986, 29993, 30000, 30007, 30014, 30021, 30028, 1736, 30035, 30042, 30049, 30056, 30063, 30070, 30077, 30084, 30091, 30098, 30105, 30112, 30119, 30126, 30133, 30140, 30147, 30154, 30161, 30168, 30175, 30182, 30189, 30196, 30203, 30210, 30217, 30224, 30231, 30238, 30245, 30252, 30259, 30266, 30273, 30280, 30287, 30294, 30301, 30308, 24568, 30315, 30322, 30329, 30336, 30343, 30350, 30357, 30364, 30371, 30378, 30385, 30392, 30399, 30406, 30413, 30420, 30427, 30434, 30441, 30448, 30455, 21191, 30462, 30469, 30476, 30483, 30490, 30497, 30504, 30511, 30518, 27312, 30525, 30532, 30539, 30546, 30553, 30560, 30567, 30574, 30581, 30588, 30595, 30602, 30609, 30616, 30623, 30630, 30637, 30644, 30651, 30658, 30665, 30672, 30679, 30686, 30693, 30700, 30707, 30714, 30721, 30728, 30735, 30742, 30749, 30756, 30763, 30770, 30777, 23348, 30784, 30791, 30798, 30805, 30812, 28376, 30819, 30826, 30833, 30840, 30847, 30854, 30861, 30868, 30875, 30882, 30889, 30896, 26464, 30903, 30910, 30917, 30924, 30931, 30938, 30945, 30952, 30959, 30966, 30973, 30980, 30987, 30994, 31001, 18141, 31008, 31015, 31022, 31029, 31036, 31043, 31050, 31057, 31064, 31071, 24460, 31078, 31085, 31092, 31099, 19065, 31106, 31113, 31120, 31127, 31134, 31141, 31148, 31155, 31162, 31169, 31176, 31183, 31190, 31197, 31204, 31211, 31218, 31225, 31232, 31239, 31246, 24586, 31253, 31260, 23188, 31267, 31274, 31281, 31288, 31295, 31302, 31309, 31316, 31323, 31330, 31337, 31344, 31351, 31357, 31363, 31369, 31375, 31381, 31387, 31393, 31399, 31405, 22259, 31411, 31417, 31423, 31429, 31435, 27049, 31441, 31447, 31345, 31453, 31459, 21739, 31465, 31471, 31477, 31483, 31489, 31495, 31501, 31507, 31513, 21819, 31519, 31525, 31531, 31537, 31543, 31549, 31555, 31561, 31567, 31573, 31579, 31585, 31591, 31597, 31603, 31609, 31615, 31621, 31627, 17576, 22329, 31633, 31639, 31645, 19905, 1169, 31651, 17381, 31657, 31663, 1301, 31669, 31675, 1538, 18562, 31681, 31687, 16732, 31693, 18454, 31699, 1405, 17082, 31705, 31711, 31717, 18166, 31723, 31729, 31735, 31741, 31747, 31753, 26793, 31759, 31765, 31771, 31777, 21699, 31783, 31789, 31795, 31801, 31807, 31813, 31819, 31825, 10962, 1044, 31831, 31837, 31843, 31849, 17563, 31855, 31861, 31867, 31873, 31879, 31885, 31891, 31897, 31903, 31909, 31915, 31921, 31927, 31933, 31939, 31945, 31951, 31957, 31963, 31969, 31975, 31981, 31987, 31993, 31999, 32005, 32011, 32017, 32023, 32029, 32035, 21489, 32041, 32047, 32053, 32059, 32065, 32071, 32077, 32083, 32089, 32095, 24596, 32101, 32107, 32113, 32119, 32125, 18466, 32131, 32137, 32143, 32149, 32155, 32161, 32167, 32173, 32179, 32185, 32191, 32197, 32203, 32209, 32215, 32221, 32227, 21909, 32233, 32239, 32245, 32251, 32257, 32263, 32269, 32275, 32281, 32287, 32293, 32299, 32305, 32311, 32317, 32323, 32329, 32335, 32341, 32347, 32353, 32359, 32365, 32371, 32377, 32383, 32389, 32395, 32401, 32407, 26216, 32413, 32419, 32425, 32431, 32437, 32443, 32449, 32455, 32461, 32467, 32473, 32479, 32485, 32491, 32497, 32503, 32509, 32515, 32521, 32527, 32533, 32539, 32545, 32551, 21159, 32557, 32563, 32569, 32575, 32581, 32587, 32593, 32599, 32605, 32611, 32617, 32623, 32629, 32635, 32641, 32647, 32653, 32659, 21899, 32665, 32671, 32677, 32683, 32689, 32695, 32701, 32707, 32713, 32719, 32725, 32731, 32737, 32743, 32749, 32755, 32761, 32767, 32773, 32779, 32785, 32791, 32797, 32803, 32809, 32815, 32821, 30176, 32827, 32833, 32839, 32845, 32851, 32857, 32863, 32869, 32875, 32881, 32887, 27441, 21789, 32893, 32899, 32905, 32911, 32917, 32923, 32929, 28817, 32935, 32941, 32947, 32953, 32959, 32965, 32971, 32977, 32983, 32989, 32995, 33001, 33007, 33013, 33019, 33025, 33031, 33037, 33043, 33049, 33055, 33061, 33067, 33073, 33079, 33085, 33091, 33097, 33103, 33109, 33115, 33121, 33127, 33133, 33139, 33145, 33151, 33157, 33163, 33169, 33175, 33181, 33187, 33193, 33199, 33205, 33211, 33217, 33223, 33229, 33235, 33241, 33247, 33253, 33259, 33265, 33271, 33277, 33283, 33289, 33295, 33301, 33307, 33313, 33319, 33325, 33331, 33337, 33343, 33349, 33355, 33361, 33367, 33373, 33379, 33385, 33391, 33397, 33403, 33409, 33415, 33421, 33427, 33433, 33439, 33445, 33451, 33457, 33463, 33469, 33475, 33481, 33487, 33493, 33499, 33505, 33511, 33517, 33523, 33529, 33535, 33541, 33547, 33553, 33559, 33565, 33571, 33577, 33583, 33589, 33595, 33601, 33607, 33613, 33619, 33625, 33631, 33637, 33643, 33649, 33655, 33661, 33667, 33673, 33679, 33685, 33691, 33697, 33703, 33709, 33715, 33721, 33727, 33733, 33739, 33745, 33751, 33757, 33763, 33769, 33775, 33781, 33787, 33793, 33799, 33805, 33811, 29679, 33817, 33823, 33829, 33835, 33841, 33847, 33853, 33859, 33865, 33871, 33877, 33883, 33889, 33895, 33901, 33907, 33913, 33919, 33925, 33931, 33937, 33943, 33949, 33955, 33961, 33967, 33973, 33979, 33985, 33991, 33997, 34003, 34009, 34015, 34021, 34027, 34033, 34039, 34045, 34051, 34057, 34063, 34069, 34075, 34081, 34087, 34093, 34099, 34105, 34111, 34117, 34123, 34129, 34135, 34141, 34147, 34153, 34159, 34165, 34171, 34177, 34183, 34189, 34195, 34201, 34207, 34213, 34219, 34225, 34231, 34237, 34243, 34249, 34255, 34261, 34267, 34273, 34279, 34285, 34291, 34297, 34303, 25847, 34309, 34315, 34321, 34327, 34333, 34339, 34345, 34351, 34357, 34363, 34369, 34375, 34381, 34387, 34393, 34399, 34405, 34411, 34417, 34423, 10932, 34429, 34435, 34441, 34447, 34453, 34459, 34465, 34471, 34477, 34483, 34489, 34495, 18502, 34501, 34507, 31240, 34513, 34519, 24605, 34525, 34531, 34537, 34543, 34549, 34555, 34561, 34567, 34573, 34579, 34585, 34591, 34597, 34603, 34609, 34615, 34621, 34627, 34633, 34639, 34645, 34651, 34657, 34663, 34669, 34675, 34681, 34687, 34693, 34699, 23279, 34705, 34711, 34717, 34723, 34729, 34735, 34741, 34747, 34753, 34759, 34765, 34771, 34777, 34783, 34789, 34795, 34801, 34807, 34813, 34819, 34825, 34831, 34837, 34843, 34849, 34854, 34859, 34864, 34869, 23967, 34874, 32672, 34879, 34884, 34889, 17629, 34894, 34899, 34904, 34909, 34914, 34919, 34924, 34929, 34934, 34939, 34944, 34949, 34954, 34959, 23480, 34964, 34969, 32852, 34974, 34979, 34984, 34989, 34994, 34999, 35004, 35009, 35014, 31994, 35019, 35024, 35029, 26091, 35034, 35039, 35044, 35049, 35054, 35059, 35064, 35069, 35074, 35079, 35084, 35089, 35094, 35099, 35104, 1366, 35109, 35114, 35119, 35124, 35129, 35134, 35139, 35144, 35149, 35154, 35159, 35164, 35169, 35174, 35179, 35184, 35189, 35194, 35199, 35204, 35209, 35214, 35219, 35224, 35229, 35234, 35239, 35244, 35249, 35254, 35259, 35264, 31868, 35269, 35274, 35279, 35284, 382, 35289, 35294, 35299, 35304, 35309, 35314, 35319, 35324, 1019, 35329, 35334, 35339, 21670, 35344, 35349, 35354, 31424, 35359, 35364, 35369, 35374, 35379, 35384, 35389, 35394, 35399, 35404, 35409, 35414, 35419, 35424, 35429, 35434, 35439, 17278, 35444, 35449, 35454, 35459, 35464, 35469, 35474, 35479, 35484, 34778, 35489, 30492, 35494, 35499, 35504, 35509, 35514, 35519, 35524, 35529, 34508, 35534, 17642, 35539, 35544, 35549, 35554, 32090, 35559, 35564, 35569, 35574, 35579, 35584, 21127, 35589, 35594, 35599, 35604, 35609, 23460, 35614, 35619, 35624, 35629, 35634, 35639, 35644, 35649, 35654, 35659, 35664, 35669, 35674, 35679, 35684, 35689, 35694, 35699, 35704, 35709, 35714, 35719, 35724, 35729, 35734, 35739, 35744, 35749, 35754, 35759, 35764, 35769, 35774, 35779, 35784, 35789, 21259, 35794, 35799, 35804, 35809, 35814, 27002, 35819, 35824, 35829, 35834, 35839, 35844, 35849, 35854, 35859, 35864, 35869, 35874, 35879, 35884, 35889, 35894, 35899, 35904, 35909, 35914, 34226, 35919, 35924, 35929, 35934, 35939, 35944, 35949, 35954, 35959, 35964, 35969, 35974, 35979, 35984, 33152, 35989, 35994, 29638, 35999, 36004, 36009, 16929, 36014, 36019, 36024, 36029, 28370, 36034, 36039, 36044, 36049, 36054, 36059, 36064, 29554, 36069, 36074, 36079, 36084, 36089, 36094, 36099, 36104, 36109, 36114, 36119, 36124, 36129, 36134, 36139, 36144, 36149, 36154, 36159, 36164, 36169, 36174, 34586, 36179, 36184, 36189, 29862, 36194, 36199, 36204, 36209, 36214, 36219, 36224, 36229, 36234, 36239, 24723, 36244, 36249, 36254, 36259, 36264, 36269, 36274, 36279, 36284, 36289, 23160, 36294, 36299, 36304, 36309, 30450, 36314, 36319, 36324, 36329, 36334, 36339, 26262, 36344, 36349, 36354, 36359, 36364, 36369, 36374, 36379, 36384, 36389, 36394, 36399, 36404, 36409, 36414, 36419, 36424, 36429, 36434, 36439, 36444, 36449, 36454, 36459, 36464, 36469, 36474, 36479, 36484, 36489, 36494, 36499, 32570, 32576, 32582, 36504, 36509, 36514, 36519, 36524, 36529, 36534, 32588, 32594, 32600, 33764, 36539, 36544, 36549, 36554, 36559, 36564, 36569, 36574, 36579, 36584, 36589, 36594, 36599, 36604, 36609, 36614, 36619, 36624, 36629, 36634, 36639, 31850, 36644, 36649, 36654, 36659, 36664, 36669, 36674, 36679, 36684, 36689, 36694, 36699, 36704, 36709, 36714, 36719, 36724, 36729, 36734, 36739, 36744, 36749, 36754, 36759, 36764, 36769, 36774, 36779, 36784, 36789, 36794, 36799, 36804, 36809, 36814, 36819, 36824, 36829, 36834, 36839, 36844, 36849, 36854, 36859, 36864, 32858, 32864, 36869, 36874, 36879, 36884, 36889, 36894, 36899, 36904, 32876, 32882, 36909, 36914, 36919, 36924, 36929, 34748, 34754, 36934, 36939, 36944, 36949, 36954, 36959, 36964, 36969, 36974, 36979, 36984, 36989, 36994, 36999, 37004, 37009, 37014, 37019, 37024, 37029, 37034, 37039, 37044, 37049, 37054, 37059, 37064, 37069, 37074, 37079, 33092, 37084, 33098, 37089, 37094, 16831, 26698, 37099, 33104, 33110, 33116, 33122, 37104, 37109, 37114, 37119, 32714, 37124, 37129, 37134, 37139, 37144, 37149, 37154, 37159, 37164, 37169, 37174, 37179, 37184, 37189, 37194, 37199, 37204, 37209, 37214, 37219, 37224, 37229, 37234, 37239, 37244, 37249, 37254, 37259, 37264, 37269, 37274, 37279, 37284, 37289, 37294, 37299, 37304, 37309, 37314, 37319, 37324, 37329, 37334, 37339, 37344, 37349, 37354, 37359, 37364, 37369, 37374, 37379, 37384, 37389, 37394, 37399, 37404, 37409, 37414, 37419, 32750, 32756, 32762, 34154, 37424, 37429, 37434, 37439, 37444, 37449, 37454, 37459, 37464, 37469, 37474, 37479, 37484, 37489, 37494, 37499, 37504, 37509, 37514, 37519, 37524, 37529, 33380, 33386, 33392, 37534, 37539, 37544, 37549, 37554, 37559, 37564, 37569, 37574, 37579, 37584, 37589, 37594, 37599, 37604, 37609, 33398, 37614, 33404, 33410, 33848, 37619, 37624, 37629, 37634, 37639, 37644, 37649, 37654, 37659, 37664, 37669, 37674, 37679, 37684, 37689, 37694, 37699, 37704, 37709, 37714, 37719, 37724, 37729, 37734, 37739, 1234, 21920, 37744, 37749, 37754, 37759, 37764, 37769, 37774, 37779, 34562, 37784, 37789, 33206, 37794, 33212, 37799, 37804, 37809, 33218, 37814, 33224, 33230, 33236, 37819, 30366, 37824, 37829, 37834, 37839, 37844, 37849, 37854, 37859, 37864, 37869, 37874, 37879, 37884, 37889, 37894, 37899, 37904, 33242, 33248, 37909, 37914, 37919, 37924, 28194, 37929, 37934, 33254, 37939, 33260, 33266, 37944, 37949, 37954, 30744, 37959, 37964, 37969, 37974, 37979, 37984, 37989, 37994, 37999, 38004, 38009, 38014, 38019, 38024, 38029, 38034, 38039, 38044, 38049, 38054, 38059, 31682, 38064, 38069, 38074, 38079, 38084, 38089, 38094, 38099, 38104, 38109, 38114, 33854, 38119, 38124, 38129, 38134, 38139, 38144, 38149, 33860, 33866, 38154, 38159, 38164, 38169, 33278, 33290, 31622, 38174, 38179, 38184, 38189, 38194, 38199, 38204, 38209, 38214, 38219, 38224, 38229, 38234, 38239, 38244, 38249, 38254, 38259, 30961, 38264, 38269, 38274, 38279, 38284, 38289, 38294, 38299, 38304, 38309, 38314, 38319, 38324, 38329, 38334, 38339, 38344, 38349, 38354, 33296, 38359, 38364, 38369, 38374, 38379, 38384, 38389, 38394, 38399, 38404, 38409, 38414, 38419, 38424, 38429, 38434, 38439, 38444, 38449, 38454, 38459, 38464, 38469, 38474, 38479, 38484, 38489, 38494, 38499, 38504, 38509, 38514, 38519, 38524, 38529, 38534, 38539, 38544, 38549, 38554, 38559, 38564, 38569, 38574, 38579, 38584, 38589, 38594, 38599, 38604, 38609, 38614, 38619, 38624, 38629, 38634, 38639, 38644, 38649, 38654, 38659, 38664, 38669, 38674, 38679, 38684, 38689, 38694, 38699, 38704, 38709, 38714, 38719, 38724, 38729, 38734, 38739, 38744, 38749, 38754, 34112, 38759, 38764, 38769, 38774, 38779, 38784, 38789, 38794, 38799, 38804, 38809, 38814, 38819, 38824, 38829, 38834, 38839, 38844, 38849, 38854, 34238, 33890, 38859, 33896, 38864, 38869, 38874, 38879, 38884, 38889, 38894, 38899, 38904, 38909, 38914, 38919, 38924, 38929, 38934, 38939, 38944, 38949, 38954, 38959, 38964, 38969, 38974, 38979, 34448, 34454, 38984, 38989, 38994, 38999, 39004, 24687, 832, 39009, 39014, 39019, 39024, 39029, 39034, 39039, 39044, 39049, 39054, 39059, 39064, 39069, 39074, 39079, 39084, 39089, 39094, 39099, 39104, 39109, 39114, 39119, 39124, 39129, 39134, 39139, 39144, 39149, 34460, 39154, 39159, 39164, 39169, 39174, 39179, 39184, 39189, 39194, 33986, 39199, 39204, 39209, 39214, 39219, 39224, 39229, 39234, 21700, 39239, 39244, 39249, 39254, 39259, 39264, 39269, 30688, 39274, 39279, 39284, 39289, 39294, 39299, 39304, 39309, 39314, 39319, 39324, 39329, 39334, 39339, 39344, 39349, 39354, 39359, 39364, 39369, 39374, 32486, 39379, 31171, 23500, 39384, 39389, 39394, 39399, 39404, 39409, 39414, 39419, 26882, 39424, 39429, 39434, 39439, 39444, 33320, 33326, 33332, 39449, 33350, 33500, 33506, 39454, 39459, 39464, 39469, 39474, 39479, 33908, 33914, 33920, 39484, 39489, 39494, 39499, 39504, 39509, 39514, 39519, 39524, 33926, 39529, 33932, 39534, 39539, 39544, 39549, 39554, 39559, 39564, 39569, 39574, 39579, 39584, 39589, 39594, 39599, 39604, 39609, 39614, 39619, 39624, 39629, 39634, 39639, 39644, 33938, 33944, 39649, 33950, 33956, 33962, 39654, 39659, 39664, 39669, 39674, 39679, 39684, 39689, 39694, 39699, 39704, 39709, 39714, 39719, 39724, 39729, 39734, 39739, 39744, 39748, 39752, 39756, 39760, 39764, 21841, 17890, 39768, 39772, 36180, 39776, 21117, 23101, 32331, 39780, 33561, 39784, 39788, 39792, 25822, 39796, 32967, 39800, 39804, 18300, 39808, 26047, 39812, 39816, 31032, 39820, 31455, 39824, 39828, 39832, 39836, 31791, 39840, 39844, 23191, 16958, 39848, 32853, 39852, 31551, 39856, 39860, 39864, 21751, 36425, 39868, 17487, 39872, 39876, 35570, 39880, 39884, 21238, 27099, 39888, 39892, 39896, 30745, 39900, 39904, 39310, 39325, 39908, 32787, 28946, 35270, 37560, 36185, 39912, 39916, 31081, 35575, 19188, 39920, 36500, 39924, 39928, 39932, 39936, 247, 39940, 39944, 39948, 39952, 39956, 39960, 26326, 39964, 36910, 39968, 39972, 39976, 39980, 36775, 39984, 39988, 39992, 39996, 40000, 40004, 40008, 37535, 40012, 40016, 40020, 40024, 40028, 38260, 40032, 40036, 40040, 40044, 40048, 21971, 34587, 40052, 27203, 40056, 40060, 40064, 32355, 40068, 38370, 36915, 40072, 40076, 40080, 40084, 40088, 38890, 29814, 40092, 40096, 33855, 40100, 30437, 26353, 40104, 39005, 40108, 40112, 36155, 40116, 27971, 40120, 40124, 40128, 40132, 37400, 40136, 40140, 40144, 40148, 39015, 40152, 38270, 38765, 40156, 40160, 40164, 39290, 39300, 40168, 1081, 40172, 1058, 39330, 39335, 39340, 39130, 27139, 40176, 40180, 40184, 40188, 32367, 40192, 38365, 29877, 29884, 40196, 40200, 32385, 40204, 40208, 40212, 31249, 40216, 40220, 40224, 36440, 40228, 30542, 1229, 29450, 40232, 40236, 40240, 40244, 40248, 40252, 40256, 40260, 40264, 40268, 40272, 40276, 40280, 25615, 40284, 40288, 40292, 40296, 40300, 40304, 34389, 30920, 24715, 37775, 40308, 40312, 40316, 40320, 40324, 40328, 40332, 37010, 37015, 40336, 40340, 40344, 40348, 40352, 40356, 40360, 37045, 40364, 29653, 40368, 34563, 40372, 40376, 36605, 40380, 40384, 40388, 40392, 40396, 40400, 32913, 40404, 40408, 40412, 40416, 40420, 40424, 40428, 40432, 40436, 40440, 40444, 36885, 36165, 36170, 37185, 40448, 40452, 40456, 40460, 37245, 40464, 18672, 40468, 40472, 37295, 40476, 40480, 40484, 40488, 40492, 40496, 40500, 27075, 40504, 40508, 40512, 40516, 40520, 40524, 40528, 35670, 40532, 40536, 40540, 40544, 40548, 19753, 40552, 40556, 40560, 40564, 40568, 40572, 40576, 40580, 40584, 33609, 40588, 40592, 40596, 40600, 40604, 40608, 40612, 38275, 902, 40616, 40620, 40624, 39280, 20314, 40628, 24130, 40632, 40636, 40640, 40644, 40648, 40652, 40656, 40660, 40664, 40668, 39295, 40672, 31839, 24832, 29709, 40676, 40680, 28427, 40684, 40688, 27459, 40692, 32001, 40696, 40700, 24076, 40704, 23281, 34197, 40708, 40712, 40716, 40720, 40724, 40728, 40732, 40736, 40740, 40744, 33507, 32361, 40748, 40752, 40756, 40760, 40764, 38385, 40768, 38395, 38425, 40772, 40776, 40780, 39155, 40784, 40788, 40792, 40796, 35580, 40800, 35930, 38485, 39460, 27371, 33783, 24400, 40804, 26299, 40808, 40812, 40816, 36370, 28123, 36380, 40820, 40824, 40828, 40832, 40836, 40840, 40844, 40848, 40852, 36385, 40856, 40860, 36390, 35900, 40864, 36400, 36405, 36410, 40868, 36415, 36420, 36430, 36435, 35490, 36445, 40872, 36450, 38030, 36455, 36460, 40876, 23878, 40880, 40884, 40888, 40892, 40896, 40900, 40904, 40908, 40912, 40916, 29184, 40920, 40924, 40928, 40932, 40936, 40940, 40944, 40948, 40952, 40956, 40960, 40964, 40968, 40972, 40976, 27995, 40980, 40984, 28323, 40988, 36760, 40992, 36765, 28843, 36770, 40996, 41000, 36780, 31683, 41004, 36790, 36795, 36800, 36805, 37485, 41008, 41012, 41016, 38895, 36810, 36820, 41020, 41024, 41028, 36825, 36830, 35565, 36835, 36840, 36845, 41032, 41036, 41040, 41044, 41048, 41052, 41056, 41060, 41064, 25957, 35865, 41068, 41072, 41076, 41080, 41084, 41088, 41092, 41096, 41100, 41104, 41108, 41112, 41116, 41120, 41124, 41128, 41132, 41136, 41140, 41144, 41148, 41152, 41156, 41160, 41164, 41168, 41172, 41176, 41180, 41184, 41188, 41192, 36995, 41196, 37000, 37005, 41200, 41204, 29590, 37020, 41208, 37025, 41212, 41216, 41220, 41224, 37030, 41228, 37035, 37040, 35635, 37050, 41232, 29107, 41236, 35640, 37055, 37060, 37065, 37070, 41240, 41244, 41248, 41252, 35770, 41256, 36575, 19560, 36585, 24652, 28723, 41260, 41264, 36590, 36595, 36600, 33585, 41268, 41272, 41276, 41280, 35445, 21227, 25813, 41284, 41288, 41292, 41296, 41300, 41304, 41308, 41312, 41316, 41320, 41324, 41328, 25885, 36140, 29555, 36615, 36620, 41332, 36625, 31851, 36075, 36080, 36085, 41336, 41340, 41344, 41348, 41352, 41356, 41360, 39480, 34377, 32571, 32493, 32583, 21095, 36310, 41364, 33423, 28763, 39245, 41368, 41372, 41376, 41380, 41384, 35760, 37540, 37545, 37550, 41388, 41392, 37555, 37565, 37570, 37575, 37580, 35765, 37585, 41396, 37590, 38235, 37595, 37600, 41400, 41404, 41408, 25588, 41412, 41416, 37675, 41420, 672, 41424, 41428, 41432, 20248, 41436, 41440, 41444, 41448, 41452, 41456, 41460, 41464, 41468, 41472, 41476, 41480, 18228, 41484, 41488, 41492, 41496, 41500, 41504, 41508, 41512, 41516, 41520, 41524, 41528, 41532, 41536, 41540, 41544, 26344, 37160, 41548, 35610, 37170, 41552, 41556, 37175, 29079, 19643, 41560, 36160, 39255, 41564, 41568, 41572, 36960, 41576, 37195, 37200, 41580, 41584, 37205, 41588, 283, 37210, 37215, 37220, 36090, 37230, 37235, 37240, 37250, 37255, 41592, 32979, 24184, 41596, 37265, 37270, 41600, 41604, 41608, 41612, 41616, 41620, 41624, 41628, 41632, 37275, 41636, 41640, 41644, 41648, 37280, 33555, 37290, 41652, 37300, 37305, 41656, 37310, 37315, 37320, 30549, 37330, 41660, 37335, 41664, 37345, 41668, 33723, 41672, 37350, 16589, 37360, 41676, 41680, 41684, 41688, 41692, 32085, 41696, 32625, 18636, 18156, 41700, 37365, 41704, 37370, 41708, 26859, 41712, 38255, 28619, 22221, 37375, 33141, 37380, 37385, 37390, 41716, 41720, 41724, 41728, 41732, 41736, 37395, 34815, 37405, 41740, 41744, 41748, 41752, 41756, 41760, 37410, 41764, 41768, 37415, 41772, 41776, 41780, 41784, 41788, 41792, 41796, 41800, 34749, 34755, 35390, 34539, 30934, 41804, 41808, 41812, 35480, 41816, 41820, 41824, 34257, 41828, 41832, 41836, 41840, 41844, 39010, 41848, 41852, 41856, 41860, 41864, 41868, 41872, 41876, 41880, 41884, 41888, 41892, 41896, 41900, 41904, 41908, 41912, 41916, 41920, 41924, 41928, 41932, 41936, 41940, 41944, 41948, 41952, 41956, 41960, 41964, 41968, 41972, 41976, 41980, 41984, 41988, 41992, 41996, 42000, 42004, 42008, 42012, 42016, 16832, 42020, 38280, 26627, 42024, 38285, 33081, 38295, 23231, 28139, 42028, 42032, 42036, 42040, 35190, 38790, 38305, 42044, 42048, 42052, 42056, 42060, 42064, 38800, 38310, 38315, 38320, 38325, 42068, 42072, 38330, 38335, 38340, 38345, 42076, 42080, 42084, 28795, 20325, 39030, 42088, 42092, 39035, 39040, 42096, 42100, 42104, 42108, 39045, 42112, 42116, 39050, 39055, 42120, 42124, 39065, 39070, 39075, 42128, 42132, 42136, 42140, 42144, 35680, 42148, 39080, 42152, 39085, 39090, 39095, 39100, 39105, 39110, 42156, 42160, 42164, 42168, 42172, 42176, 42180, 42184, 42188, 42192, 39305, 39120, 42196, 42200, 42204, 42208, 42212, 42216, 42220, 42224, 42228, 42232, 42236, 42240, 1944, 42244, 42248, 42252, 42256, 42260, 42264, 42268, 42272, 42276, 42280, 42284, 42288, 42292, 42296, 42300, 42304, 42308, 42312, 42316, 42320, 39505, 36940, 42324, 22211, 42328, 42332, 36345, 42336, 32589, 32595, 26867, 42340, 27419, 42344, 42348, 42352, 42356, 42360, 42364, 42368, 42372, 42376, 42380, 42384, 42388, 42392, 42396, 42400, 42404, 42408, 42412, 42416, 42420, 42424, 42428, 42432, 42436, 42440, 42444, 42448, 42452, 42456, 42460, 42464, 42468, 37715, 37720, 37450, 37455, 35720, 37460, 35725, 42472, 37465, 37470, 35730, 37725, 37730, 37735, 42476, 42480, 42484, 42488, 42492, 38380, 42496, 35920, 38390, 35925, 38400, 42500, 38405, 38410, 42504, 38415, 38420, 42508, 42512, 42516, 42520, 42524, 38430, 38435, 38440, 39670, 38445, 42528, 38450, 38455, 38460, 38465, 42532, 38470, 38475, 42536, 38480, 42540, 38490, 39165, 38495, 38500, 38505, 38510, 42544, 42548, 42552, 33663, 42556, 42560, 42564, 24140, 42567, 31540, 17813, 23202, 5561, 22212, 4793, 28140, 27100, 24761, 36316, 26612, 21692, 42570, 17488, 40609, 40625, 25760, 42573, 42576, 39857, 5049, 42579, 30452, 25463, 21195, 5305, 32296, 29353, 34708, 29535, 42582, 39913, 42585, 34732, 40521, 19754, 903, 42588, 34114, 32170, 42591, 1408, 36076, 42594, 733, 41349, 30746, 42597, 692, 40517, 21239, 17239, 36606, 25427, 23302, 36081, 19033, 42600, 1132, 42603, 18613, 698, 1027, 6073, 30844, 38601, 41313, 726, 36866, 35866, 17267, 27124, 42606, 4857, 42609, 32452, 1021, 19069, 42612, 23142, 19201, 19974, 32824, 42615, 25688, 42618, 42621, 42624, 42627, 42630, 35386, 26327, 19309, 30648, 32002, 42633, 1193, 33484, 34060, 39921, 33664, 5113, 40837, 18637, 42636, 34678, 28620, 20249, 42639, 42642, 24716, 42645, 42648, 42651, 18157, 21250, 41005, 18397, 42654, 32164, 1172, 22202, 42657, 34774, 297, 42660, 41337, 42663, 33634, 30949, 19561, 40833, 5897, 24203, 23252, 20392, 31152, 24401, 40389, 30193, 42666, 42669, 26420, 41045, 16833, 17280, 40829, 42672, 26964, 35581, 40393, 40397, 42675, 42678, 18565, 29339, 965, 10745, 42681, 42684, 42687, 16763, 42690, 29500, 42693, 34648, 42696, 12, 26492, 42699, 5369, 42702, 39881, 42705, 31636, 28724, 24626, 673, 28820, 42708, 42711, 42714, 42717, 1215, 42720, 42723, 42726, 18661, 42729, 42732, 42735, 42738, 41593, 39506, 42741, 19525, 40841, 42744, 42747, 42750, 42753, 42756, 30473, 29003, 31918, 42759, 6137, 32536, 42762, 42765, 42768, 42771, 34180, 42774, 42777, 42780, 42783, 42786, 42121, 42789, 21591, 1163, 42792, 42795, 42798, 42801, 41065, 42804, 23432, 1059, 284, 42807, 915, 42810, 42813, 42816, 21063, 42819, 42257, 29661, 28524, 18457, 42822, 41077, 42825, 39546, 16530, 39286, 42828, 24185, 41889, 19549, 36381, 42831, 42834, 42837, 42840, 21972, 5337, 5353, 1465, 42843, 42846, 5577, 42849, 42852, 42855, 19644, 6153, 41121, 42858, 42861, 42864, 41713, 351, 42867, 42870, 42873, 42876, 42879, 41225, 22062, 21228, 32194, 42882, 21085, 42885, 978, 42888, 40401, 42891, 33652, 42894, 42897, 42900, 42903, 42906, 42909, 42912, 42915, 42918, 36306, 42921, 42241, 42924, 664, 42927, 32044, 42930, 42933, 42936, 42939, 42942, 42945, 42948, 42951, 42954, 41321, 42957, 42960, 42963, 35831, 42966, 42969, 42972, 32374, 42975, 42978, 42981, 42984, 32596, 42987, 42990, 42993, 1961, 42996, 41853, 42999, 43002, 36331, 43005, 43008, 36711, 43011, 43014, 43017, 43020, 43023, 23789, 43026, 43029, 43032, 29969, 43035, 42137, 43038, 43041, 43044, 32056, 43047, 43050, 17211, 29962, 35641, 952, 43053, 43056, 31384, 43059, 43062, 41341, 40813, 41541, 43065, 43068, 43071, 43074, 37776, 43077, 41797, 50, 1147, 43080, 40498, 23862, 43082, 272, 43084, 34061, 40162, 28976, 35482, 43086, 571, 28906, 27141, 43088, 43090, 811, 32057, 33707, 307, 911, 357, 43092, 37682, 24357, 241, 43094, 42829, 43096, 4, 22233, 926, 948, 29116, 43098, 43100, 19689, 796, 40762, 333, 42706, 710, 88, 41206, 623, 313, 165, 35797, 42643, 32039, 19722, 31367, 43102, 43104, 28005, 43106, 43108, 43110, 20008, 35102, 43112, 27541, 41598, 43114, 39746, 474, 1205, 28766, 51, 98, 5, 14, 308, 171, 102, 70, 57, 9, 34, 273, 363, 804, 149, 348, 42737, 43116, 465, 43117, }; /* code->name phrasebook */ #define phrasebook_shift 8 #define phrasebook_short 231 static unsigned char phrasebook[] = { 0, 242, 69, 236, 186, 65, 238, 76, 65, 83, 57, 242, 158, 57, 240, 248, 57, 237, 124, 236, 190, 36, 236, 47, 37, 236, 47, 238, 77, 249, 4, 57, 242, 84, 235, 243, 213, 189, 239, 144, 27, 244, 173, 27, 121, 27, 114, 27, 153, 27, 163, 27, 168, 27, 169, 27, 179, 27, 176, 27, 178, 242, 81, 237, 123, 206, 57, 242, 61, 57, 196, 57, 239, 126, 65, 237, 127, 253, 220, 9, 5, 1, 64, 9, 5, 1, 199, 9, 5, 1, 203, 9, 5, 1, 187, 9, 5, 1, 70, 9, 5, 1, 204, 9, 5, 1, 194, 9, 5, 1, 164, 9, 5, 1, 69, 9, 5, 1, 200, 9, 5, 1, 205, 9, 5, 1, 148, 9, 5, 1, 171, 9, 5, 1, 183, 9, 5, 1, 78, 9, 5, 1, 198, 9, 5, 1, 209, 9, 5, 1, 135, 9, 5, 1, 159, 9, 5, 1, 190, 9, 5, 1, 84, 9, 5, 1, 186, 9, 5, 1, 201, 9, 5, 1, 170, 9, 5, 1, 181, 9, 5, 1, 202, 36, 30, 110, 240, 219, 239, 144, 37, 30, 110, 157, 240, 203, 253, 113, 244, 176, 244, 201, 240, 203, 9, 3, 1, 64, 9, 3, 1, 199, 9, 3, 1, 203, 9, 3, 1, 187, 9, 3, 1, 70, 9, 3, 1, 204, 9, 3, 1, 194, 9, 3, 1, 164, 9, 3, 1, 69, 9, 3, 1, 200, 9, 3, 1, 205, 9, 3, 1, 148, 9, 3, 1, 171, 9, 3, 1, 183, 9, 3, 1, 78, 9, 3, 1, 198, 9, 3, 1, 209, 9, 3, 1, 135, 9, 3, 1, 159, 9, 3, 1, 190, 9, 3, 1, 84, 9, 3, 1, 186, 9, 3, 1, 201, 9, 3, 1, 170, 9, 3, 1, 181, 9, 3, 1, 202, 36, 244, 175, 110, 55, 244, 176, 37, 244, 175, 110, 180, 239, 190, 242, 69, 239, 116, 236, 186, 65, 249, 196, 57, 245, 163, 57, 239, 147, 57, 254, 78, 57, 242, 173, 143, 242, 5, 57, 150, 238, 195, 57, 239, 216, 241, 71, 237, 136, 235, 237, 42, 160, 238, 76, 65, 141, 57, 249, 119, 240, 241, 238, 52, 57, 166, 242, 156, 57, 238, 45, 57, 236, 181, 114, 236, 181, 153, 244, 196, 240, 203, 247, 93, 57, 241, 74, 57, 242, 65, 227, 239, 117, 236, 181, 121, 239, 47, 241, 71, 237, 136, 235, 190, 42, 160, 238, 76, 65, 242, 83, 239, 123, 253, 101, 240, 147, 242, 83, 239, 123, 253, 101, 244, 217, 242, 83, 239, 123, 244, 171, 239, 67, 239, 116, 239, 126, 65, 9, 5, 1, 119, 2, 158, 9, 5, 1, 119, 2, 116, 9, 5, 1, 119, 2, 236, 180, 9, 5, 1, 119, 2, 180, 9, 5, 1, 119, 2, 150, 9, 5, 1, 119, 2, 249, 9, 47, 9, 5, 1, 253, 163, 9, 5, 1, 255, 36, 2, 239, 117, 9, 5, 1, 144, 2, 158, 9, 5, 1, 144, 2, 116, 9, 5, 1, 144, 2, 236, 180, 9, 5, 1, 144, 2, 150, 9, 5, 1, 197, 2, 158, 9, 5, 1, 197, 2, 116, 9, 5, 1, 197, 2, 236, 180, 9, 5, 1, 197, 2, 150, 9, 5, 1, 249, 77, 9, 5, 1, 255, 28, 2, 180, 9, 5, 1, 109, 2, 158, 9, 5, 1, 109, 2, 116, 9, 5, 1, 109, 2, 236, 180, 9, 5, 1, 109, 2, 180, 9, 5, 1, 109, 2, 150, 235, 191, 57, 9, 5, 1, 109, 2, 122, 9, 5, 1, 115, 2, 158, 9, 5, 1, 115, 2, 116, 9, 5, 1, 115, 2, 236, 180, 9, 5, 1, 115, 2, 150, 9, 5, 1, 255, 35, 2, 116, 9, 5, 1, 242, 189, 9, 3, 1, 245, 5, 159, 9, 3, 1, 119, 2, 158, 9, 3, 1, 119, 2, 116, 9, 3, 1, 119, 2, 236, 180, 9, 3, 1, 119, 2, 180, 9, 3, 1, 119, 2, 150, 9, 3, 1, 119, 2, 249, 9, 47, 9, 3, 1, 253, 163, 9, 3, 1, 255, 36, 2, 239, 117, 9, 3, 1, 144, 2, 158, 9, 3, 1, 144, 2, 116, 9, 3, 1, 144, 2, 236, 180, 9, 3, 1, 144, 2, 150, 9, 3, 1, 197, 2, 158, 9, 3, 1, 197, 2, 116, 9, 3, 1, 197, 2, 236, 180, 9, 3, 1, 197, 2, 150, 9, 3, 1, 249, 77, 9, 3, 1, 255, 28, 2, 180, 9, 3, 1, 109, 2, 158, 9, 3, 1, 109, 2, 116, 9, 3, 1, 109, 2, 236, 180, 9, 3, 1, 109, 2, 180, 9, 3, 1, 109, 2, 150, 239, 156, 57, 9, 3, 1, 109, 2, 122, 9, 3, 1, 115, 2, 158, 9, 3, 1, 115, 2, 116, 9, 3, 1, 115, 2, 236, 180, 9, 3, 1, 115, 2, 150, 9, 3, 1, 255, 35, 2, 116, 9, 3, 1, 242, 189, 9, 3, 1, 255, 35, 2, 150, 9, 5, 1, 119, 2, 166, 9, 3, 1, 119, 2, 166, 9, 5, 1, 119, 2, 212, 9, 3, 1, 119, 2, 212, 9, 5, 1, 119, 2, 240, 216, 9, 3, 1, 119, 2, 240, 216, 9, 5, 1, 255, 36, 2, 116, 9, 3, 1, 255, 36, 2, 116, 9, 5, 1, 255, 36, 2, 236, 180, 9, 3, 1, 255, 36, 2, 236, 180, 9, 5, 1, 255, 36, 2, 49, 47, 9, 3, 1, 255, 36, 2, 49, 47, 9, 5, 1, 255, 36, 2, 193, 9, 3, 1, 255, 36, 2, 193, 9, 5, 1, 255, 34, 2, 193, 9, 3, 1, 255, 34, 2, 193, 9, 5, 1, 255, 34, 2, 122, 9, 3, 1, 255, 34, 2, 122, 9, 5, 1, 144, 2, 166, 9, 3, 1, 144, 2, 166, 9, 5, 1, 144, 2, 212, 9, 3, 1, 144, 2, 212, 9, 5, 1, 144, 2, 49, 47, 9, 3, 1, 144, 2, 49, 47, 9, 5, 1, 144, 2, 240, 216, 9, 3, 1, 144, 2, 240, 216, 9, 5, 1, 144, 2, 193, 9, 3, 1, 144, 2, 193, 9, 5, 1, 255, 32, 2, 236, 180, 9, 3, 1, 255, 32, 2, 236, 180, 9, 5, 1, 255, 32, 2, 212, 9, 3, 1, 255, 32, 2, 212, 9, 5, 1, 255, 32, 2, 49, 47, 9, 3, 1, 255, 32, 2, 49, 47, 9, 5, 1, 255, 32, 2, 239, 117, 9, 3, 1, 255, 32, 2, 239, 117, 9, 5, 1, 255, 37, 2, 236, 180, 9, 3, 1, 255, 37, 2, 236, 180, 9, 5, 1, 255, 37, 2, 122, 9, 3, 1, 255, 37, 2, 122, 9, 5, 1, 197, 2, 180, 9, 3, 1, 197, 2, 180, 9, 5, 1, 197, 2, 166, 9, 3, 1, 197, 2, 166, 9, 5, 1, 197, 2, 212, 9, 3, 1, 197, 2, 212, 9, 5, 1, 197, 2, 240, 216, 9, 3, 1, 197, 2, 240, 216, 9, 5, 1, 197, 2, 49, 47, 9, 3, 1, 240, 228, 69, 9, 5, 17, 254, 45, 9, 3, 17, 254, 45, 9, 5, 1, 255, 45, 2, 236, 180, 9, 3, 1, 255, 45, 2, 236, 180, 9, 5, 1, 255, 38, 2, 239, 117, 9, 3, 1, 255, 38, 2, 239, 117, 9, 3, 1, 251, 170, 9, 5, 1, 255, 31, 2, 116, 9, 3, 1, 255, 31, 2, 116, 9, 5, 1, 255, 31, 2, 239, 117, 9, 3, 1, 255, 31, 2, 239, 117, 9, 5, 1, 255, 31, 2, 193, 9, 3, 1, 255, 31, 2, 193, 9, 5, 1, 255, 31, 2, 242, 65, 227, 9, 3, 1, 255, 31, 2, 242, 65, 227, 9, 5, 1, 255, 31, 2, 122, 9, 3, 1, 255, 31, 2, 122, 9, 5, 1, 255, 28, 2, 116, 9, 3, 1, 255, 28, 2, 116, 9, 5, 1, 255, 28, 2, 239, 117, 9, 3, 1, 255, 28, 2, 239, 117, 9, 5, 1, 255, 28, 2, 193, 9, 3, 1, 255, 28, 2, 193, 9, 3, 1, 255, 28, 240, 143, 254, 216, 236, 190, 9, 5, 1, 249, 66, 9, 3, 1, 249, 66, 9, 5, 1, 109, 2, 166, 9, 3, 1, 109, 2, 166, 9, 5, 1, 109, 2, 212, 9, 3, 1, 109, 2, 212, 9, 5, 1, 109, 2, 42, 116, 9, 3, 1, 109, 2, 42, 116, 9, 5, 17, 253, 142, 9, 3, 17, 253, 142, 9, 5, 1, 255, 30, 2, 116, 9, 3, 1, 255, 30, 2, 116, 9, 5, 1, 255, 30, 2, 239, 117, 9, 3, 1, 255, 30, 2, 239, 117, 9, 5, 1, 255, 30, 2, 193, 9, 3, 1, 255, 30, 2, 193, 9, 5, 1, 255, 29, 2, 116, 9, 3, 1, 255, 29, 2, 116, 9, 5, 1, 255, 29, 2, 236, 180, 9, 3, 1, 255, 29, 2, 236, 180, 9, 5, 1, 255, 29, 2, 239, 117, 9, 3, 1, 255, 29, 2, 239, 117, 9, 5, 1, 255, 29, 2, 193, 9, 3, 1, 255, 29, 2, 193, 9, 5, 1, 255, 33, 2, 239, 117, 9, 3, 1, 255, 33, 2, 239, 117, 9, 5, 1, 255, 33, 2, 193, 9, 3, 1, 255, 33, 2, 193, 9, 5, 1, 255, 33, 2, 122, 9, 3, 1, 255, 33, 2, 122, 9, 5, 1, 115, 2, 180, 9, 3, 1, 115, 2, 180, 9, 5, 1, 115, 2, 166, 9, 3, 1, 115, 2, 166, 9, 5, 1, 115, 2, 212, 9, 3, 1, 115, 2, 212, 9, 5, 1, 115, 2, 249, 9, 47, 9, 3, 1, 115, 2, 249, 9, 47, 9, 5, 1, 115, 2, 42, 116, 9, 3, 1, 115, 2, 42, 116, 9, 5, 1, 115, 2, 240, 216, 9, 3, 1, 115, 2, 240, 216, 9, 5, 1, 255, 40, 2, 236, 180, 9, 3, 1, 255, 40, 2, 236, 180, 9, 5, 1, 255, 35, 2, 236, 180, 9, 3, 1, 255, 35, 2, 236, 180, 9, 5, 1, 255, 35, 2, 150, 9, 5, 1, 255, 27, 2, 116, 9, 3, 1, 255, 27, 2, 116, 9, 5, 1, 255, 27, 2, 49, 47, 9, 3, 1, 255, 27, 2, 49, 47, 9, 5, 1, 255, 27, 2, 193, 9, 3, 1, 255, 27, 2, 193, 9, 3, 1, 165, 159, 9, 3, 1, 255, 41, 2, 122, 9, 5, 1, 255, 41, 2, 128, 9, 5, 1, 255, 41, 2, 241, 8, 9, 3, 1, 255, 41, 2, 241, 8, 9, 5, 1, 249, 5, 169, 9, 3, 1, 249, 5, 169, 9, 5, 1, 249, 0, 78, 9, 5, 1, 255, 36, 2, 128, 9, 3, 1, 255, 36, 2, 128, 9, 5, 1, 241, 93, 187, 9, 5, 1, 255, 34, 2, 128, 9, 5, 1, 255, 34, 2, 241, 8, 9, 3, 1, 255, 34, 2, 241, 8, 9, 3, 1, 242, 60, 242, 87, 9, 5, 1, 224, 70, 9, 5, 1, 242, 164, 9, 5, 1, 249, 0, 70, 9, 5, 1, 255, 42, 2, 128, 9, 3, 1, 255, 42, 2, 128, 9, 5, 1, 255, 32, 2, 128, 9, 5, 1, 242, 75, 9, 3, 1, 254, 44, 9, 5, 1, 244, 191, 9, 5, 1, 197, 2, 122, 9, 5, 1, 255, 38, 2, 128, 9, 3, 1, 255, 38, 2, 128, 9, 3, 1, 255, 31, 2, 143, 9, 3, 1, 243, 200, 2, 122, 9, 5, 1, 242, 60, 171, 9, 5, 1, 255, 28, 2, 36, 128, 9, 3, 1, 255, 28, 2, 165, 37, 249, 83, 9, 5, 1, 109, 2, 242, 65, 180, 9, 5, 1, 109, 2, 244, 210, 9, 3, 1, 109, 2, 244, 210, 9, 5, 1, 254, 62, 9, 3, 1, 254, 62, 9, 5, 1, 255, 46, 2, 128, 9, 3, 1, 255, 46, 2, 128, 9, 1, 254, 80, 9, 5, 1, 249, 5, 114, 9, 3, 1, 249, 5, 114, 9, 5, 1, 249, 67, 9, 1, 224, 254, 38, 245, 28, 9, 3, 1, 255, 33, 2, 241, 233, 128, 9, 5, 1, 255, 33, 2, 128, 9, 3, 1, 255, 33, 2, 128, 9, 5, 1, 255, 33, 2, 238, 100, 128, 9, 5, 1, 115, 2, 244, 210, 9, 3, 1, 115, 2, 244, 210, 9, 5, 1, 239, 127, 9, 5, 1, 255, 44, 2, 128, 9, 5, 1, 255, 35, 2, 128, 9, 3, 1, 255, 35, 2, 128, 9, 5, 1, 255, 27, 2, 122, 9, 3, 1, 255, 27, 2, 122, 9, 5, 1, 249, 221, 9, 5, 1, 253, 206, 238, 156, 9, 3, 1, 253, 206, 238, 156, 9, 3, 1, 253, 206, 2, 244, 182, 9, 1, 225, 2, 122, 9, 5, 1, 249, 5, 168, 9, 3, 1, 249, 5, 168, 9, 1, 239, 116, 240, 211, 249, 71, 2, 122, 9, 1, 245, 224, 9, 1, 243, 91, 242, 140, 9, 1, 241, 197, 242, 140, 9, 1, 239, 249, 242, 140, 9, 1, 238, 100, 242, 140, 9, 5, 1, 254, 231, 2, 193, 9, 5, 1, 255, 34, 2, 3, 1, 255, 27, 2, 193, 9, 3, 1, 254, 231, 2, 193, 9, 5, 1, 254, 53, 9, 5, 1, 255, 31, 2, 3, 1, 200, 9, 3, 1, 254, 53, 9, 5, 1, 254, 57, 9, 5, 1, 255, 28, 2, 3, 1, 200, 9, 3, 1, 254, 57, 9, 5, 1, 119, 2, 193, 9, 3, 1, 119, 2, 193, 9, 5, 1, 197, 2, 193, 9, 3, 1, 197, 2, 193, 9, 5, 1, 109, 2, 193, 9, 3, 1, 109, 2, 193, 9, 5, 1, 115, 2, 193, 9, 3, 1, 115, 2, 193, 9, 5, 1, 115, 2, 238, 81, 18, 166, 9, 3, 1, 115, 2, 238, 81, 18, 166, 9, 5, 1, 115, 2, 238, 81, 18, 116, 9, 3, 1, 115, 2, 238, 81, 18, 116, 9, 5, 1, 115, 2, 238, 81, 18, 193, 9, 3, 1, 115, 2, 238, 81, 18, 193, 9, 5, 1, 115, 2, 238, 81, 18, 158, 9, 3, 1, 115, 2, 238, 81, 18, 158, 9, 3, 1, 242, 60, 70, 9, 5, 1, 119, 2, 238, 81, 18, 166, 9, 3, 1, 119, 2, 238, 81, 18, 166, 9, 5, 1, 119, 2, 49, 53, 18, 166, 9, 3, 1, 119, 2, 49, 53, 18, 166, 9, 5, 1, 254, 221, 2, 166, 9, 3, 1, 254, 221, 2, 166, 9, 5, 1, 255, 32, 2, 122, 9, 3, 1, 255, 32, 2, 122, 9, 5, 1, 255, 32, 2, 193, 9, 3, 1, 255, 32, 2, 193, 9, 5, 1, 255, 38, 2, 193, 9, 3, 1, 255, 38, 2, 193, 9, 5, 1, 109, 2, 240, 216, 9, 3, 1, 109, 2, 240, 216, 9, 5, 1, 109, 2, 242, 234, 18, 166, 9, 3, 1, 109, 2, 242, 234, 18, 166, 9, 5, 1, 253, 206, 2, 193, 9, 3, 1, 253, 206, 2, 193, 9, 3, 1, 255, 45, 2, 193, 9, 5, 1, 254, 35, 9, 5, 1, 255, 34, 2, 3, 1, 202, 9, 3, 1, 254, 35, 9, 5, 1, 255, 32, 2, 116, 9, 3, 1, 255, 32, 2, 116, 9, 5, 1, 242, 225, 9, 5, 1, 245, 224, 9, 5, 1, 255, 28, 2, 158, 9, 3, 1, 255, 28, 2, 158, 9, 5, 1, 119, 2, 249, 9, 53, 18, 116, 9, 3, 1, 119, 2, 249, 9, 53, 18, 116, 9, 5, 1, 254, 221, 2, 116, 9, 3, 1, 254, 221, 2, 116, 9, 5, 1, 109, 2, 242, 114, 18, 116, 9, 3, 1, 109, 2, 242, 114, 18, 116, 9, 5, 1, 119, 2, 42, 158, 9, 3, 1, 119, 2, 42, 158, 9, 5, 1, 119, 2, 239, 116, 212, 9, 3, 1, 119, 2, 239, 116, 212, 9, 5, 1, 144, 2, 42, 158, 9, 3, 1, 144, 2, 42, 158, 9, 5, 1, 144, 2, 239, 116, 212, 9, 3, 1, 144, 2, 239, 116, 212, 9, 5, 1, 197, 2, 42, 158, 9, 3, 1, 197, 2, 42, 158, 9, 5, 1, 197, 2, 239, 116, 212, 9, 3, 1, 197, 2, 239, 116, 212, 9, 5, 1, 109, 2, 42, 158, 9, 3, 1, 109, 2, 42, 158, 9, 5, 1, 109, 2, 239, 116, 212, 9, 3, 1, 109, 2, 239, 116, 212, 9, 5, 1, 255, 30, 2, 42, 158, 9, 3, 1, 255, 30, 2, 42, 158, 9, 5, 1, 255, 30, 2, 239, 116, 212, 9, 3, 1, 255, 30, 2, 239, 116, 212, 9, 5, 1, 115, 2, 42, 158, 9, 3, 1, 115, 2, 42, 158, 9, 5, 1, 115, 2, 239, 116, 212, 9, 3, 1, 115, 2, 239, 116, 212, 9, 5, 1, 255, 29, 2, 244, 192, 45, 9, 3, 1, 255, 29, 2, 244, 192, 45, 9, 5, 1, 255, 33, 2, 244, 192, 45, 9, 3, 1, 255, 33, 2, 244, 192, 45, 9, 5, 1, 245, 227, 9, 3, 1, 245, 227, 9, 5, 1, 255, 37, 2, 193, 9, 3, 1, 255, 37, 2, 193, 9, 5, 1, 255, 28, 2, 165, 37, 249, 83, 9, 5, 1, 253, 247, 9, 3, 1, 253, 247, 9, 5, 1, 255, 27, 2, 128, 9, 3, 1, 255, 27, 2, 128, 9, 5, 1, 119, 2, 49, 47, 9, 3, 1, 119, 2, 49, 47, 9, 5, 1, 144, 2, 239, 117, 9, 3, 1, 144, 2, 239, 117, 9, 5, 1, 109, 2, 238, 81, 18, 166, 9, 3, 1, 109, 2, 238, 81, 18, 166, 9, 5, 1, 109, 2, 229, 18, 166, 9, 3, 1, 109, 2, 229, 18, 166, 9, 5, 1, 109, 2, 49, 47, 9, 3, 1, 109, 2, 49, 47, 9, 5, 1, 109, 2, 49, 53, 18, 166, 9, 3, 1, 109, 2, 49, 53, 18, 166, 9, 5, 1, 255, 35, 2, 166, 9, 3, 1, 255, 35, 2, 166, 9, 3, 1, 242, 60, 64, 9, 3, 1, 242, 79, 9, 3, 1, 242, 60, 242, 79, 9, 3, 1, 255, 41, 2, 128, 9, 3, 1, 249, 0, 78, 9, 3, 1, 255, 36, 2, 244, 226, 9, 3, 1, 255, 34, 2, 244, 182, 9, 3, 1, 255, 34, 2, 128, 9, 3, 1, 224, 70, 9, 3, 1, 242, 164, 9, 3, 1, 245, 41, 2, 128, 9, 3, 1, 249, 0, 70, 9, 3, 1, 224, 249, 0, 70, 9, 3, 1, 224, 249, 0, 144, 2, 128, 9, 3, 1, 242, 77, 224, 249, 0, 70, 9, 3, 1, 240, 228, 255, 45, 2, 122, 9, 3, 1, 255, 32, 2, 128, 9, 3, 1, 71, 194, 9, 1, 3, 5, 194, 9, 3, 1, 242, 75, 9, 3, 1, 252, 117, 244, 210, 9, 3, 1, 242, 60, 164, 9, 3, 1, 255, 37, 2, 128, 9, 3, 1, 251, 64, 2, 128, 9, 3, 1, 197, 2, 122, 9, 3, 1, 244, 191, 9, 1, 3, 5, 69, 9, 3, 1, 255, 31, 2, 242, 65, 180, 9, 3, 1, 255, 31, 2, 246, 21, 9, 3, 1, 255, 31, 2, 238, 100, 128, 9, 3, 1, 247, 59, 9, 3, 1, 242, 60, 171, 9, 3, 1, 242, 60, 255, 39, 2, 165, 249, 83, 9, 3, 1, 255, 39, 2, 128, 9, 3, 1, 255, 28, 2, 36, 128, 9, 3, 1, 255, 28, 2, 238, 100, 128, 9, 1, 3, 5, 183, 9, 3, 1, 242, 138, 78, 9, 1, 3, 5, 253, 142, 9, 3, 1, 242, 77, 242, 72, 9, 3, 1, 249, 30, 9, 3, 1, 242, 60, 135, 9, 3, 1, 242, 60, 255, 30, 2, 165, 249, 83, 9, 3, 1, 242, 60, 255, 30, 2, 128, 9, 3, 1, 255, 30, 2, 165, 249, 83, 9, 3, 1, 255, 30, 2, 244, 182, 9, 3, 1, 255, 30, 2, 238, 139, 9, 3, 1, 224, 255, 30, 2, 238, 139, 9, 1, 3, 5, 135, 9, 1, 3, 5, 239, 116, 135, 9, 3, 1, 255, 29, 2, 128, 9, 3, 1, 249, 67, 9, 3, 1, 240, 228, 255, 45, 2, 242, 114, 18, 128, 9, 3, 1, 245, 196, 224, 249, 67, 9, 3, 1, 254, 38, 2, 244, 226, 9, 3, 1, 242, 60, 190, 9, 3, 1, 255, 33, 2, 238, 100, 128, 9, 3, 1, 115, 143, 9, 3, 1, 239, 127, 9, 3, 1, 255, 44, 2, 128, 9, 3, 1, 242, 60, 186, 9, 3, 1, 242, 60, 201, 9, 3, 1, 242, 60, 181, 9, 1, 3, 5, 181, 9, 3, 1, 255, 27, 2, 238, 100, 128, 9, 3, 1, 255, 27, 2, 244, 226, 9, 3, 1, 249, 221, 9, 3, 1, 253, 206, 2, 244, 226, 9, 1, 240, 211, 189, 9, 1, 237, 117, 242, 116, 238, 9, 9, 1, 239, 116, 240, 211, 189, 9, 1, 239, 87, 203, 9, 1, 239, 205, 242, 140, 9, 1, 3, 5, 199, 9, 3, 1, 242, 77, 249, 0, 70, 9, 1, 3, 5, 255, 32, 2, 128, 9, 1, 3, 5, 164, 9, 3, 1, 255, 45, 2, 236, 7, 9, 3, 1, 242, 60, 205, 9, 1, 3, 5, 148, 9, 3, 1, 255, 47, 2, 128, 9, 1, 240, 211, 249, 71, 2, 122, 9, 1, 224, 240, 211, 249, 71, 2, 122, 9, 3, 1, 254, 231, 239, 152, 9, 3, 1, 250, 216, 239, 152, 9, 3, 1, 254, 231, 240, 253, 2, 244, 226, 9, 3, 1, 255, 24, 239, 152, 9, 3, 1, 252, 201, 239, 152, 9, 3, 1, 255, 23, 240, 253, 2, 244, 226, 9, 3, 1, 251, 2, 239, 152, 9, 3, 1, 255, 11, 239, 152, 9, 3, 1, 255, 12, 239, 152, 9, 1, 239, 205, 236, 224, 9, 1, 240, 8, 236, 224, 147, 1, 3, 164, 147, 1, 3, 255, 37, 2, 128, 147, 1, 3, 200, 147, 1, 3, 135, 147, 1, 3, 242, 60, 135, 147, 1, 3, 242, 60, 255, 30, 2, 128, 147, 1, 3, 5, 239, 116, 135, 147, 1, 3, 201, 147, 1, 3, 181, 147, 1, 242, 107, 147, 1, 42, 242, 107, 147, 1, 242, 60, 242, 84, 147, 1, 236, 190, 147, 1, 224, 242, 84, 147, 1, 37, 136, 244, 183, 147, 1, 36, 136, 244, 183, 147, 1, 240, 211, 189, 147, 1, 224, 240, 211, 189, 147, 1, 36, 237, 116, 147, 1, 37, 237, 116, 147, 1, 75, 237, 116, 147, 1, 79, 237, 116, 147, 1, 157, 240, 203, 193, 147, 1, 55, 244, 176, 147, 1, 166, 147, 1, 244, 196, 240, 203, 147, 1, 244, 201, 240, 203, 147, 1, 253, 113, 55, 244, 176, 147, 1, 253, 113, 166, 147, 1, 253, 113, 244, 201, 240, 203, 147, 1, 253, 113, 244, 196, 240, 203, 147, 1, 237, 144, 242, 81, 147, 1, 136, 237, 144, 242, 81, 147, 1, 241, 13, 37, 136, 244, 183, 147, 1, 241, 13, 36, 136, 244, 183, 147, 1, 75, 244, 184, 147, 1, 79, 244, 184, 147, 1, 249, 4, 57, 147, 1, 244, 197, 57, 212, 49, 47, 249, 9, 47, 240, 216, 3, 180, 42, 244, 196, 240, 203, 147, 1, 244, 59, 128, 147, 1, 244, 234, 240, 203, 147, 1, 3, 242, 75, 147, 1, 3, 148, 147, 1, 3, 159, 147, 1, 3, 170, 147, 1, 3, 224, 240, 211, 189, 147, 1, 238, 7, 249, 5, 143, 147, 1, 249, 10, 249, 5, 143, 147, 1, 254, 145, 249, 5, 143, 147, 1, 253, 113, 249, 5, 143, 147, 1, 239, 11, 249, 5, 143, 147, 1, 254, 79, 238, 119, 249, 5, 65, 147, 1, 250, 112, 238, 119, 249, 5, 65, 147, 1, 240, 195, 147, 1, 236, 179, 147, 1, 42, 236, 190, 48, 244, 201, 240, 203, 48, 244, 196, 240, 203, 48, 157, 240, 203, 48, 180, 48, 166, 48, 238, 98, 48, 212, 48, 49, 47, 48, 150, 48, 248, 255, 47, 48, 249, 9, 47, 48, 42, 244, 196, 240, 203, 48, 193, 48, 55, 217, 47, 48, 42, 55, 217, 47, 48, 42, 244, 201, 240, 203, 48, 236, 49, 48, 239, 116, 212, 48, 242, 60, 244, 192, 47, 48, 244, 192, 47, 48, 224, 244, 192, 47, 48, 244, 192, 53, 184, 48, 244, 201, 230, 45, 48, 244, 196, 230, 45, 48, 36, 249, 35, 45, 48, 37, 249, 35, 45, 48, 36, 160, 47, 48, 244, 210, 48, 36, 136, 249, 9, 45, 48, 75, 249, 35, 45, 48, 79, 249, 35, 45, 48, 249, 4, 25, 45, 48, 244, 197, 25, 45, 48, 237, 80, 248, 255, 45, 48, 238, 100, 248, 255, 45, 48, 49, 45, 48, 238, 81, 45, 48, 249, 9, 45, 48, 244, 192, 45, 48, 239, 117, 48, 240, 216, 48, 55, 217, 45, 48, 242, 153, 45, 48, 239, 116, 42, 250, 138, 45, 48, 245, 15, 45, 48, 157, 230, 45, 48, 244, 194, 45, 48, 239, 116, 244, 194, 45, 48, 229, 45, 48, 242, 101, 45, 48, 253, 113, 244, 176, 48, 42, 253, 113, 244, 176, 48, 229, 239, 131, 48, 207, 242, 114, 239, 131, 48, 165, 242, 114, 239, 131, 48, 207, 240, 230, 239, 131, 48, 165, 240, 230, 239, 131, 48, 37, 136, 249, 9, 45, 48, 239, 116, 242, 153, 45, 48, 30, 45, 48, 242, 2, 45, 48, 255, 43, 47, 48, 55, 180, 48, 42, 238, 98, 48, 244, 201, 249, 5, 65, 48, 244, 196, 249, 5, 65, 48, 26, 236, 43, 48, 26, 239, 186, 48, 26, 238, 85, 242, 70, 48, 26, 211, 48, 242, 153, 47, 48, 242, 61, 25, 45, 48, 42, 55, 217, 45, 48, 36, 160, 45, 48, 141, 229, 47, 48, 238, 14, 47, 48, 242, 93, 80, 139, 47, 48, 36, 37, 59, 45, 48, 210, 59, 45, 48, 240, 82, 241, 22, 48, 42, 180, 48, 42, 239, 116, 212, 48, 42, 63, 59, 45, 48, 9, 3, 1, 64, 48, 9, 3, 1, 70, 48, 9, 3, 1, 69, 48, 9, 3, 1, 78, 48, 9, 3, 1, 84, 48, 9, 3, 1, 203, 48, 9, 3, 1, 187, 48, 9, 3, 1, 164, 48, 9, 3, 1, 171, 48, 9, 3, 1, 135, 48, 9, 3, 1, 190, 48, 9, 3, 1, 186, 48, 9, 3, 1, 170, 26, 151, 57, 26, 149, 151, 57, 26, 211, 26, 239, 126, 65, 26, 242, 70, 26, 238, 85, 242, 70, 26, 5, 1, 162, 2, 242, 70, 26, 254, 82, 241, 83, 26, 5, 1, 240, 204, 2, 242, 70, 26, 5, 1, 182, 2, 242, 70, 26, 5, 1, 228, 2, 242, 70, 26, 5, 1, 240, 210, 2, 242, 70, 26, 5, 1, 240, 199, 2, 242, 70, 26, 5, 1, 172, 2, 242, 70, 26, 3, 1, 228, 2, 238, 85, 18, 242, 70, 26, 5, 1, 242, 79, 26, 5, 1, 244, 198, 26, 5, 1, 242, 75, 26, 5, 1, 242, 87, 26, 5, 1, 239, 133, 26, 5, 1, 244, 204, 26, 5, 1, 249, 42, 26, 5, 1, 242, 97, 26, 5, 1, 244, 191, 26, 5, 1, 242, 95, 26, 5, 1, 242, 96, 26, 5, 1, 253, 114, 26, 5, 1, 253, 112, 26, 5, 1, 253, 135, 26, 5, 1, 239, 137, 26, 5, 1, 253, 116, 26, 5, 1, 249, 32, 26, 5, 1, 242, 73, 26, 5, 1, 249, 43, 26, 5, 1, 239, 127, 26, 5, 1, 249, 30, 26, 5, 1, 249, 23, 26, 5, 1, 249, 31, 26, 5, 1, 242, 72, 26, 5, 1, 228, 2, 237, 133, 26, 5, 1, 240, 199, 2, 237, 133, 26, 3, 1, 162, 2, 242, 70, 26, 3, 1, 240, 204, 2, 242, 70, 26, 3, 1, 182, 2, 242, 70, 26, 3, 1, 228, 2, 242, 70, 26, 3, 1, 240, 199, 2, 238, 85, 18, 242, 70, 26, 3, 1, 242, 79, 26, 3, 1, 244, 198, 26, 3, 1, 242, 75, 26, 3, 1, 242, 87, 26, 3, 1, 239, 133, 26, 3, 1, 244, 204, 26, 3, 1, 249, 42, 26, 3, 1, 242, 97, 26, 3, 1, 244, 191, 26, 3, 1, 242, 95, 26, 3, 1, 242, 96, 26, 3, 1, 253, 114, 26, 3, 1, 253, 112, 26, 3, 1, 253, 135, 26, 3, 1, 239, 137, 26, 3, 1, 253, 116, 26, 3, 1, 249, 32, 26, 3, 1, 29, 242, 73, 26, 3, 1, 242, 73, 26, 3, 1, 249, 43, 26, 3, 1, 239, 127, 26, 3, 1, 249, 30, 26, 3, 1, 249, 23, 26, 3, 1, 249, 31, 26, 3, 1, 242, 72, 26, 3, 1, 228, 2, 237, 133, 26, 3, 1, 240, 199, 2, 237, 133, 26, 3, 1, 240, 210, 2, 242, 70, 26, 3, 1, 240, 199, 2, 242, 70, 26, 3, 1, 172, 2, 242, 70, 26, 250, 155, 90, 26, 244, 203, 90, 26, 240, 199, 2, 248, 255, 90, 26, 240, 199, 2, 244, 196, 18, 248, 255, 90, 26, 240, 199, 2, 238, 81, 18, 248, 255, 90, 26, 253, 212, 90, 26, 254, 224, 90, 26, 254, 15, 90, 26, 1, 241, 39, 242, 128, 26, 3, 1, 241, 39, 242, 128, 26, 1, 241, 32, 26, 3, 1, 241, 32, 26, 1, 239, 213, 26, 3, 1, 239, 213, 26, 1, 242, 128, 26, 3, 1, 242, 128, 26, 1, 242, 243, 26, 3, 1, 242, 243, 242, 85, 5, 1, 245, 183, 242, 85, 3, 1, 245, 183, 242, 85, 5, 1, 249, 223, 242, 85, 3, 1, 249, 223, 242, 85, 5, 1, 245, 123, 242, 85, 3, 1, 245, 123, 242, 85, 5, 1, 245, 109, 242, 85, 3, 1, 245, 109, 242, 85, 5, 1, 241, 56, 242, 85, 3, 1, 241, 56, 242, 85, 5, 1, 242, 252, 242, 85, 3, 1, 242, 252, 242, 85, 5, 1, 249, 213, 242, 85, 3, 1, 249, 213, 26, 244, 228, 90, 26, 253, 168, 90, 26, 242, 180, 248, 76, 90, 26, 1, 250, 118, 26, 5, 244, 203, 90, 26, 242, 180, 240, 204, 90, 26, 224, 242, 180, 240, 204, 90, 31, 5, 1, 254, 233, 2, 158, 31, 5, 1, 254, 46, 31, 5, 1, 249, 97, 31, 5, 1, 249, 237, 31, 5, 1, 238, 164, 253, 181, 31, 5, 1, 249, 76, 31, 5, 1, 231, 233, 69, 31, 5, 1, 253, 139, 31, 5, 1, 253, 239, 31, 5, 1, 249, 106, 31, 5, 1, 249, 111, 31, 5, 1, 245, 212, 31, 5, 1, 250, 2, 31, 5, 1, 197, 2, 158, 31, 5, 1, 207, 84, 31, 5, 1, 245, 79, 31, 5, 1, 64, 31, 5, 1, 253, 191, 31, 5, 1, 253, 214, 31, 5, 1, 249, 78, 31, 5, 1, 253, 152, 31, 5, 1, 253, 181, 31, 5, 1, 249, 74, 31, 5, 1, 253, 189, 31, 5, 1, 69, 31, 5, 1, 207, 69, 31, 5, 1, 208, 31, 5, 1, 253, 223, 31, 5, 1, 253, 224, 31, 5, 1, 253, 166, 31, 5, 1, 78, 31, 5, 1, 253, 143, 31, 5, 1, 253, 205, 31, 5, 1, 253, 225, 31, 5, 1, 253, 151, 31, 5, 1, 84, 31, 5, 1, 253, 222, 31, 5, 1, 253, 88, 31, 5, 1, 249, 64, 31, 5, 1, 249, 44, 31, 5, 1, 249, 7, 31, 5, 1, 242, 249, 31, 5, 1, 249, 241, 57, 31, 5, 1, 245, 225, 31, 5, 1, 249, 119, 57, 31, 5, 1, 70, 31, 5, 1, 253, 124, 31, 5, 1, 216, 31, 3, 1, 64, 31, 3, 1, 253, 191, 31, 3, 1, 253, 214, 31, 3, 1, 249, 78, 31, 3, 1, 253, 152, 31, 3, 1, 253, 181, 31, 3, 1, 249, 74, 31, 3, 1, 253, 189, 31, 3, 1, 69, 31, 3, 1, 207, 69, 31, 3, 1, 208, 31, 3, 1, 253, 223, 31, 3, 1, 253, 224, 31, 3, 1, 253, 166, 31, 3, 1, 78, 31, 3, 1, 253, 143, 31, 3, 1, 253, 205, 31, 3, 1, 253, 225, 31, 3, 1, 253, 151, 31, 3, 1, 84, 31, 3, 1, 253, 222, 31, 3, 1, 253, 88, 31, 3, 1, 249, 64, 31, 3, 1, 249, 44, 31, 3, 1, 249, 7, 31, 3, 1, 242, 249, 31, 3, 1, 249, 241, 57, 31, 3, 1, 245, 225, 31, 3, 1, 249, 119, 57, 31, 3, 1, 70, 31, 3, 1, 253, 124, 31, 3, 1, 216, 31, 3, 1, 254, 233, 2, 158, 31, 3, 1, 254, 46, 31, 3, 1, 249, 97, 31, 3, 1, 249, 237, 31, 3, 1, 238, 164, 253, 181, 31, 3, 1, 249, 76, 31, 3, 1, 231, 233, 69, 31, 3, 1, 253, 139, 31, 3, 1, 253, 239, 31, 3, 1, 249, 106, 31, 3, 1, 249, 111, 31, 3, 1, 245, 212, 31, 3, 1, 250, 2, 31, 3, 1, 197, 2, 158, 31, 3, 1, 207, 84, 31, 3, 1, 245, 79, 31, 5, 1, 242, 72, 31, 3, 1, 242, 72, 31, 5, 1, 250, 113, 31, 3, 1, 250, 113, 31, 5, 1, 239, 157, 70, 31, 3, 1, 239, 157, 70, 31, 5, 1, 242, 147, 249, 58, 31, 3, 1, 242, 147, 249, 58, 31, 5, 1, 239, 157, 242, 147, 249, 58, 31, 3, 1, 239, 157, 242, 147, 249, 58, 31, 5, 1, 253, 202, 249, 58, 31, 3, 1, 253, 202, 249, 58, 31, 5, 1, 239, 157, 253, 202, 249, 58, 31, 3, 1, 239, 157, 253, 202, 249, 58, 31, 5, 1, 250, 4, 31, 3, 1, 250, 4, 31, 5, 1, 249, 31, 31, 3, 1, 249, 31, 31, 5, 1, 245, 86, 31, 3, 1, 245, 86, 31, 5, 1, 239, 219, 31, 3, 1, 239, 219, 31, 5, 1, 241, 60, 2, 42, 244, 201, 240, 203, 31, 3, 1, 241, 60, 2, 42, 244, 201, 240, 203, 31, 5, 1, 254, 74, 31, 3, 1, 254, 74, 31, 5, 1, 245, 174, 242, 72, 31, 3, 1, 245, 174, 242, 72, 31, 5, 1, 172, 2, 242, 190, 31, 3, 1, 172, 2, 242, 190, 31, 5, 1, 254, 17, 31, 3, 1, 254, 17, 31, 5, 1, 242, 128, 31, 3, 1, 242, 128, 31, 238, 133, 57, 48, 31, 242, 190, 48, 31, 235, 182, 48, 31, 130, 238, 152, 48, 31, 138, 238, 152, 48, 31, 241, 21, 238, 133, 57, 48, 31, 240, 117, 57, 31, 5, 1, 207, 197, 2, 244, 182, 31, 3, 1, 207, 197, 2, 244, 182, 31, 5, 1, 239, 233, 57, 31, 3, 1, 239, 233, 57, 31, 5, 1, 254, 245, 2, 244, 232, 31, 3, 1, 254, 245, 2, 244, 232, 31, 5, 1, 253, 208, 2, 241, 89, 31, 3, 1, 253, 208, 2, 241, 89, 31, 5, 1, 253, 208, 2, 122, 31, 3, 1, 253, 208, 2, 122, 31, 5, 1, 253, 208, 2, 242, 65, 128, 31, 3, 1, 253, 208, 2, 242, 65, 128, 31, 5, 1, 253, 217, 2, 237, 112, 31, 3, 1, 253, 217, 2, 237, 112, 31, 5, 1, 254, 238, 2, 237, 112, 31, 3, 1, 254, 238, 2, 237, 112, 31, 5, 1, 254, 218, 2, 237, 112, 31, 3, 1, 254, 218, 2, 237, 112, 31, 5, 1, 254, 218, 2, 55, 122, 31, 3, 1, 254, 218, 2, 55, 122, 31, 5, 1, 254, 218, 2, 122, 31, 3, 1, 254, 218, 2, 122, 31, 5, 1, 241, 42, 208, 31, 3, 1, 241, 42, 208, 31, 5, 1, 254, 215, 2, 237, 112, 31, 3, 1, 254, 215, 2, 237, 112, 31, 5, 17, 254, 215, 249, 78, 31, 3, 17, 254, 215, 249, 78, 31, 5, 1, 254, 229, 2, 242, 65, 128, 31, 3, 1, 254, 229, 2, 242, 65, 128, 31, 5, 1, 238, 91, 253, 88, 31, 3, 1, 238, 91, 253, 88, 31, 5, 1, 254, 246, 2, 237, 112, 31, 3, 1, 254, 246, 2, 237, 112, 31, 5, 1, 254, 237, 2, 237, 112, 31, 3, 1, 254, 237, 2, 237, 112, 31, 5, 1, 239, 175, 84, 31, 3, 1, 239, 175, 84, 31, 5, 1, 239, 175, 115, 2, 122, 31, 3, 1, 239, 175, 115, 2, 122, 31, 5, 1, 254, 248, 2, 237, 112, 31, 3, 1, 254, 248, 2, 237, 112, 31, 5, 17, 254, 237, 249, 64, 31, 3, 17, 254, 237, 249, 64, 31, 5, 1, 253, 164, 2, 237, 112, 31, 3, 1, 253, 164, 2, 237, 112, 31, 5, 1, 253, 164, 2, 55, 122, 31, 3, 1, 253, 164, 2, 55, 122, 31, 5, 1, 245, 184, 31, 3, 1, 245, 184, 31, 5, 1, 238, 91, 249, 44, 31, 3, 1, 238, 91, 249, 44, 31, 5, 1, 238, 91, 253, 164, 2, 237, 112, 31, 3, 1, 238, 91, 253, 164, 2, 237, 112, 31, 1, 239, 57, 31, 5, 1, 253, 217, 2, 212, 31, 3, 1, 253, 217, 2, 212, 31, 5, 1, 254, 218, 2, 128, 31, 3, 1, 254, 218, 2, 128, 31, 5, 1, 254, 241, 2, 244, 182, 31, 3, 1, 254, 241, 2, 244, 182, 31, 5, 1, 254, 215, 2, 128, 31, 3, 1, 254, 215, 2, 128, 31, 5, 1, 254, 215, 2, 244, 182, 31, 3, 1, 254, 215, 2, 244, 182, 31, 5, 1, 237, 160, 249, 44, 31, 3, 1, 237, 160, 249, 44, 31, 5, 1, 254, 220, 2, 244, 182, 31, 3, 1, 254, 220, 2, 244, 182, 31, 5, 1, 119, 2, 212, 31, 3, 1, 119, 2, 212, 31, 5, 1, 119, 2, 150, 31, 3, 1, 119, 2, 150, 31, 5, 17, 119, 253, 181, 31, 3, 17, 119, 253, 181, 31, 5, 1, 254, 233, 2, 212, 31, 3, 1, 254, 233, 2, 212, 31, 5, 1, 242, 164, 31, 3, 1, 242, 164, 31, 5, 1, 245, 41, 2, 150, 31, 3, 1, 245, 41, 2, 150, 31, 5, 1, 253, 217, 2, 150, 31, 3, 1, 253, 217, 2, 150, 31, 5, 1, 254, 238, 2, 150, 31, 3, 1, 254, 238, 2, 150, 31, 5, 1, 238, 91, 249, 76, 31, 3, 1, 238, 91, 249, 76, 31, 5, 1, 197, 2, 166, 31, 3, 1, 197, 2, 166, 31, 5, 1, 197, 2, 150, 31, 3, 1, 197, 2, 150, 31, 5, 1, 109, 2, 150, 31, 3, 1, 109, 2, 150, 31, 5, 1, 242, 138, 78, 31, 3, 1, 242, 138, 78, 31, 5, 1, 242, 138, 109, 2, 150, 31, 3, 1, 242, 138, 109, 2, 150, 31, 5, 1, 144, 2, 150, 31, 3, 1, 144, 2, 150, 31, 5, 1, 115, 2, 166, 31, 3, 1, 115, 2, 166, 31, 5, 1, 115, 2, 150, 31, 3, 1, 115, 2, 150, 31, 5, 1, 115, 2, 42, 116, 31, 3, 1, 115, 2, 42, 116, 31, 5, 1, 253, 164, 2, 150, 31, 3, 1, 253, 164, 2, 150, 31, 5, 1, 250, 114, 2, 150, 31, 3, 1, 250, 114, 2, 150, 31, 5, 1, 249, 21, 253, 152, 31, 3, 1, 249, 21, 253, 152, 31, 5, 1, 249, 21, 249, 97, 31, 3, 1, 249, 21, 249, 97, 31, 5, 1, 249, 21, 250, 128, 31, 3, 1, 249, 21, 250, 128, 31, 5, 1, 249, 21, 245, 80, 31, 3, 1, 249, 21, 245, 80, 31, 5, 1, 249, 21, 249, 106, 31, 3, 1, 249, 21, 249, 106, 31, 5, 1, 249, 21, 249, 111, 31, 3, 1, 249, 21, 249, 111, 31, 5, 1, 249, 21, 250, 73, 31, 3, 1, 249, 21, 250, 73, 31, 5, 1, 249, 21, 250, 88, 31, 3, 1, 249, 21, 250, 88, 87, 5, 1, 249, 187, 87, 5, 1, 249, 191, 87, 5, 1, 249, 236, 87, 5, 1, 253, 93, 87, 5, 1, 249, 133, 87, 5, 1, 253, 129, 87, 5, 1, 254, 9, 87, 5, 1, 254, 11, 87, 5, 1, 76, 87, 5, 1, 249, 74, 87, 5, 1, 249, 138, 87, 5, 1, 245, 132, 87, 5, 1, 249, 179, 87, 5, 1, 253, 115, 87, 5, 1, 249, 254, 87, 5, 1, 253, 140, 87, 5, 1, 253, 118, 87, 5, 1, 245, 95, 87, 5, 1, 245, 68, 87, 5, 1, 249, 148, 87, 5, 1, 253, 139, 87, 5, 1, 249, 112, 87, 5, 1, 249, 7, 87, 5, 1, 253, 215, 87, 5, 1, 249, 11, 87, 5, 1, 249, 155, 87, 5, 1, 245, 117, 87, 5, 1, 253, 92, 87, 5, 1, 250, 68, 87, 5, 1, 250, 105, 87, 5, 1, 245, 204, 87, 5, 1, 249, 159, 87, 5, 1, 253, 178, 87, 5, 1, 245, 51, 87, 5, 1, 245, 161, 87, 5, 1, 249, 140, 87, 5, 1, 254, 60, 87, 5, 1, 249, 101, 87, 147, 1, 36, 136, 244, 183, 87, 236, 190, 87, 239, 215, 65, 87, 236, 186, 65, 87, 242, 84, 87, 239, 126, 65, 87, 236, 60, 65, 87, 3, 1, 249, 187, 87, 3, 1, 249, 191, 87, 3, 1, 249, 236, 87, 3, 1, 253, 93, 87, 3, 1, 249, 133, 87, 3, 1, 253, 129, 87, 3, 1, 254, 9, 87, 3, 1, 254, 11, 87, 3, 1, 76, 87, 3, 1, 249, 74, 87, 3, 1, 249, 138, 87, 3, 1, 245, 132, 87, 3, 1, 249, 179, 87, 3, 1, 253, 115, 87, 3, 1, 249, 254, 87, 3, 1, 253, 140, 87, 3, 1, 253, 118, 87, 3, 1, 245, 95, 87, 3, 1, 245, 68, 87, 3, 1, 249, 148, 87, 3, 1, 253, 139, 87, 3, 1, 249, 112, 87, 3, 1, 249, 7, 87, 3, 1, 253, 215, 87, 3, 1, 249, 11, 87, 3, 1, 249, 155, 87, 3, 1, 245, 117, 87, 3, 1, 253, 92, 87, 3, 1, 250, 68, 87, 3, 1, 250, 105, 87, 3, 1, 245, 204, 87, 3, 1, 249, 159, 87, 3, 1, 253, 178, 87, 3, 1, 245, 51, 87, 3, 1, 245, 161, 87, 3, 1, 249, 140, 87, 3, 1, 254, 60, 87, 3, 1, 249, 101, 87, 3, 17, 254, 100, 245, 51, 87, 213, 189, 87, 240, 241, 61, 230, 240, 70, 61, 230, 242, 186, 61, 230, 237, 95, 61, 230, 245, 232, 244, 47, 61, 230, 245, 232, 243, 121, 61, 230, 242, 37, 61, 230, 244, 57, 61, 230, 244, 158, 61, 230, 241, 235, 61, 230, 244, 156, 61, 230, 244, 114, 61, 230, 241, 57, 61, 230, 243, 125, 241, 218, 61, 230, 237, 157, 61, 230, 244, 46, 247, 238, 61, 230, 241, 84, 241, 173, 61, 230, 244, 27, 61, 230, 243, 232, 61, 230, 239, 44, 61, 230, 241, 211, 61, 230, 243, 220, 241, 190, 61, 230, 243, 82, 61, 230, 244, 45, 61, 230, 241, 84, 241, 246, 61, 230, 248, 189, 254, 88, 248, 196, 61, 230, 252, 56, 61, 230, 246, 250, 61, 230, 246, 103, 61, 230, 244, 165, 61, 167, 243, 215, 240, 200, 61, 244, 180, 244, 78, 61, 244, 180, 245, 24, 242, 186, 61, 244, 180, 245, 24, 242, 162, 61, 244, 180, 245, 24, 241, 30, 61, 244, 180, 242, 222, 61, 244, 180, 244, 125, 61, 244, 180, 242, 186, 61, 244, 180, 242, 162, 61, 244, 180, 241, 30, 61, 244, 180, 242, 223, 61, 244, 180, 241, 247, 61, 244, 180, 242, 176, 112, 242, 181, 61, 244, 180, 243, 221, 61, 236, 191, 243, 213, 61, 244, 180, 245, 1, 61, 236, 191, 244, 24, 61, 244, 180, 249, 54, 227, 61, 244, 180, 254, 22, 227, 61, 236, 191, 254, 184, 244, 25, 61, 167, 156, 227, 61, 1, 244, 224, 61, 1, 250, 154, 61, 1, 243, 134, 61, 1, 242, 204, 61, 1, 253, 125, 61, 1, 250, 102, 61, 1, 244, 159, 61, 1, 251, 66, 61, 1, 252, 202, 61, 1, 249, 183, 61, 1, 29, 249, 81, 61, 1, 249, 81, 61, 1, 242, 179, 61, 1, 29, 249, 147, 61, 1, 249, 147, 61, 1, 29, 249, 152, 61, 1, 249, 152, 61, 1, 241, 253, 61, 1, 245, 57, 61, 1, 29, 253, 143, 61, 1, 253, 143, 61, 1, 29, 243, 14, 61, 1, 243, 14, 61, 1, 252, 95, 61, 1, 245, 170, 61, 1, 245, 6, 61, 1, 250, 86, 61, 17, 241, 10, 42, 250, 102, 61, 17, 241, 10, 254, 24, 249, 183, 61, 17, 241, 10, 42, 249, 183, 61, 236, 191, 241, 57, 61, 236, 191, 237, 157, 10, 242, 84, 10, 237, 123, 10, 239, 126, 65, 10, 1, 242, 221, 10, 1, 67, 2, 244, 237, 47, 10, 1, 67, 2, 125, 47, 10, 1, 253, 162, 2, 125, 47, 10, 1, 67, 2, 125, 45, 10, 1, 50, 2, 125, 47, 10, 1, 244, 224, 10, 1, 249, 190, 10, 1, 191, 240, 110, 10, 1, 252, 199, 10, 1, 248, 122, 10, 1, 245, 115, 10, 1, 251, 56, 10, 1, 245, 120, 10, 1, 250, 205, 10, 1, 248, 121, 10, 1, 249, 159, 10, 1, 245, 231, 10, 1, 245, 42, 10, 1, 244, 76, 10, 1, 252, 152, 10, 1, 250, 203, 10, 1, 250, 82, 10, 1, 253, 58, 10, 1, 250, 135, 10, 1, 243, 133, 10, 240, 176, 10, 1, 249, 101, 10, 1, 250, 53, 10, 1, 249, 81, 10, 1, 251, 182, 10, 1, 245, 140, 10, 1, 245, 152, 10, 1, 251, 62, 10, 1, 249, 124, 10, 1, 67, 239, 189, 10, 1, 249, 91, 10, 239, 12, 10, 238, 197, 10, 239, 35, 10, 243, 106, 10, 243, 81, 10, 243, 183, 10, 242, 9, 10, 243, 6, 10, 243, 208, 47, 10, 125, 47, 10, 125, 45, 236, 46, 27, 244, 173, 236, 46, 27, 121, 236, 46, 27, 114, 236, 46, 27, 153, 236, 46, 27, 163, 236, 46, 27, 168, 236, 46, 27, 169, 236, 46, 27, 179, 236, 46, 27, 176, 236, 46, 27, 178, 10, 240, 248, 57, 10, 241, 51, 237, 114, 10, 238, 133, 237, 114, 10, 249, 48, 240, 218, 244, 178, 10, 1, 240, 228, 249, 190, 10, 1, 240, 228, 250, 53, 10, 1, 236, 181, 244, 224, 10, 1, 67, 244, 144, 10, 1, 67, 2, 249, 57, 125, 47, 10, 1, 67, 2, 249, 57, 125, 45, 10, 1, 249, 10, 242, 221, 10, 1, 249, 10, 125, 244, 224, 10, 1, 249, 10, 125, 249, 124, 10, 1, 115, 2, 125, 47, 10, 1, 249, 10, 125, 249, 91, 10, 1, 248, 145, 10, 1, 242, 41, 10, 1, 246, 19, 10, 1, 191, 2, 244, 183, 10, 1, 191, 2, 244, 171, 248, 253, 53, 237, 121, 10, 1, 249, 155, 10, 1, 244, 112, 10, 1, 243, 42, 10, 1, 81, 2, 125, 47, 10, 1, 81, 2, 225, 248, 253, 55, 47, 10, 1, 247, 203, 10, 1, 246, 118, 10, 1, 81, 2, 244, 171, 248, 253, 47, 10, 1, 244, 111, 10, 1, 240, 177, 10, 1, 246, 83, 10, 1, 253, 180, 2, 244, 183, 10, 1, 253, 180, 2, 49, 45, 10, 1, 253, 180, 2, 49, 244, 188, 18, 3, 250, 82, 10, 1, 243, 79, 10, 1, 241, 136, 10, 1, 250, 230, 10, 1, 253, 180, 2, 244, 171, 248, 253, 53, 237, 121, 10, 1, 253, 180, 2, 249, 28, 248, 253, 47, 10, 1, 248, 26, 10, 1, 253, 105, 2, 3, 186, 10, 1, 253, 105, 2, 244, 183, 10, 1, 253, 105, 2, 49, 45, 10, 1, 253, 105, 2, 3, 255, 44, 45, 10, 1, 253, 105, 2, 49, 244, 188, 18, 49, 47, 10, 1, 253, 105, 2, 225, 248, 253, 47, 10, 1, 251, 119, 10, 1, 253, 105, 2, 249, 28, 248, 253, 47, 10, 1, 214, 2, 49, 244, 188, 18, 49, 47, 10, 1, 214, 2, 244, 171, 248, 253, 45, 10, 1, 214, 2, 244, 171, 248, 253, 244, 188, 18, 244, 171, 248, 253, 47, 10, 1, 253, 108, 2, 225, 248, 253, 45, 10, 1, 253, 108, 2, 244, 171, 248, 253, 47, 10, 1, 253, 122, 2, 244, 171, 248, 253, 47, 10, 1, 253, 117, 2, 244, 171, 248, 253, 47, 10, 1, 240, 228, 249, 101, 10, 1, 253, 111, 2, 49, 247, 99, 45, 10, 1, 253, 111, 2, 49, 45, 10, 1, 252, 251, 10, 1, 253, 111, 2, 244, 171, 248, 253, 45, 10, 1, 244, 29, 10, 1, 253, 120, 2, 49, 47, 10, 1, 253, 120, 2, 244, 171, 248, 253, 47, 10, 1, 243, 187, 10, 1, 248, 110, 249, 81, 10, 1, 253, 87, 2, 244, 183, 10, 1, 253, 87, 2, 49, 47, 10, 1, 253, 244, 10, 1, 253, 87, 2, 244, 171, 248, 253, 45, 10, 1, 251, 23, 10, 1, 253, 194, 2, 244, 183, 10, 1, 243, 245, 10, 1, 253, 194, 2, 225, 248, 253, 45, 10, 1, 246, 162, 10, 1, 253, 194, 2, 244, 171, 248, 253, 47, 10, 1, 155, 2, 3, 186, 10, 1, 155, 2, 49, 47, 10, 1, 155, 2, 244, 171, 248, 253, 47, 10, 1, 155, 2, 244, 171, 248, 253, 45, 10, 1, 177, 2, 49, 45, 10, 1, 177, 241, 177, 10, 1, 244, 61, 10, 1, 177, 2, 244, 183, 10, 1, 177, 2, 244, 171, 248, 253, 47, 10, 1, 188, 236, 97, 10, 1, 244, 240, 2, 49, 47, 10, 1, 188, 2, 50, 47, 10, 1, 188, 245, 99, 10, 1, 188, 249, 79, 2, 125, 47, 10, 1, 191, 241, 26, 245, 99, 10, 1, 253, 162, 2, 244, 183, 10, 1, 240, 217, 253, 142, 10, 1, 253, 142, 10, 1, 84, 10, 1, 253, 124, 10, 1, 240, 217, 253, 124, 10, 1, 253, 162, 2, 225, 248, 253, 47, 10, 1, 253, 214, 10, 1, 244, 227, 249, 91, 10, 1, 50, 2, 244, 182, 10, 1, 50, 2, 3, 186, 10, 1, 253, 162, 2, 49, 47, 10, 1, 70, 10, 1, 50, 2, 244, 171, 248, 253, 45, 10, 1, 50, 241, 110, 10, 1, 50, 242, 139, 2, 125, 47, 10, 213, 189, 10, 1, 253, 163, 10, 3, 249, 10, 17, 253, 108, 2, 155, 2, 67, 239, 189, 10, 3, 249, 10, 17, 253, 120, 2, 155, 2, 67, 239, 189, 10, 3, 249, 10, 43, 46, 12, 10, 3, 249, 10, 155, 244, 224, 10, 3, 249, 10, 245, 115, 10, 3, 249, 10, 244, 171, 244, 215, 10, 3, 249, 10, 245, 42, 10, 253, 127, 137, 245, 250, 10, 245, 45, 137, 254, 181, 254, 241, 246, 178, 10, 3, 249, 10, 241, 4, 244, 173, 10, 3, 249, 10, 242, 44, 236, 226, 244, 173, 10, 3, 249, 10, 240, 228, 251, 61, 137, 245, 120, 10, 3, 249, 10, 43, 35, 12, 10, 3, 253, 113, 245, 42, 10, 3, 249, 10, 243, 207, 10, 3, 249, 124, 10, 3, 249, 91, 10, 3, 249, 10, 249, 91, 10, 3, 249, 10, 245, 152, 10, 245, 162, 137, 241, 252, 10, 244, 216, 242, 100, 253, 113, 189, 10, 244, 216, 242, 100, 249, 10, 189, 10, 241, 4, 249, 10, 249, 71, 2, 243, 113, 241, 46, 10, 3, 253, 113, 245, 140, 239, 141, 236, 46, 27, 244, 173, 239, 141, 236, 46, 27, 121, 239, 141, 236, 46, 27, 114, 239, 141, 236, 46, 27, 153, 239, 141, 236, 46, 27, 163, 239, 141, 236, 46, 27, 168, 239, 141, 236, 46, 27, 169, 239, 141, 236, 46, 27, 179, 239, 141, 236, 46, 27, 176, 239, 141, 236, 46, 27, 178, 10, 1, 215, 2, 49, 45, 10, 1, 253, 107, 2, 49, 45, 10, 1, 244, 190, 2, 49, 45, 10, 25, 243, 1, 237, 124, 10, 25, 243, 1, 236, 156, 249, 148, 118, 253, 127, 137, 238, 41, 118, 236, 210, 213, 189, 118, 238, 129, 213, 189, 118, 236, 210, 242, 81, 118, 238, 129, 242, 81, 118, 146, 242, 81, 118, 244, 214, 242, 166, 244, 172, 118, 244, 214, 242, 166, 184, 118, 236, 210, 244, 214, 242, 166, 244, 172, 118, 238, 129, 244, 214, 242, 166, 184, 118, 236, 90, 118, 239, 184, 241, 226, 118, 239, 184, 238, 32, 118, 239, 184, 236, 245, 118, 236, 60, 65, 118, 1, 242, 195, 118, 1, 236, 181, 242, 195, 118, 1, 246, 24, 118, 1, 243, 122, 118, 1, 246, 134, 238, 141, 118, 1, 241, 133, 118, 1, 240, 228, 243, 80, 245, 172, 118, 1, 253, 125, 118, 1, 249, 124, 118, 1, 245, 231, 118, 1, 246, 173, 118, 1, 248, 120, 118, 1, 252, 203, 238, 141, 118, 1, 248, 202, 118, 1, 253, 48, 253, 125, 118, 1, 247, 27, 118, 1, 241, 196, 118, 1, 251, 235, 118, 1, 249, 152, 118, 1, 239, 234, 118, 1, 29, 239, 234, 118, 1, 70, 118, 1, 253, 143, 118, 1, 224, 253, 143, 118, 1, 244, 68, 118, 1, 248, 0, 118, 1, 245, 172, 118, 1, 245, 6, 118, 1, 252, 197, 118, 242, 184, 47, 118, 242, 184, 45, 118, 242, 184, 241, 18, 118, 242, 194, 47, 118, 242, 194, 45, 118, 242, 194, 241, 18, 118, 245, 169, 47, 118, 245, 169, 45, 118, 242, 118, 245, 234, 236, 182, 118, 242, 118, 245, 234, 239, 251, 118, 245, 106, 47, 118, 245, 106, 45, 118, 237, 65, 241, 18, 118, 245, 82, 47, 118, 245, 82, 45, 118, 244, 67, 118, 239, 216, 227, 118, 238, 51, 118, 239, 77, 118, 225, 55, 248, 253, 47, 118, 225, 55, 248, 253, 45, 118, 244, 171, 248, 253, 47, 118, 244, 171, 248, 253, 45, 118, 241, 2, 217, 47, 118, 241, 2, 217, 45, 118, 243, 233, 118, 240, 4, 161, 1, 249, 68, 161, 1, 238, 59, 161, 1, 244, 2, 161, 1, 249, 115, 161, 1, 249, 188, 161, 1, 238, 28, 161, 1, 243, 181, 161, 1, 243, 28, 161, 1, 244, 136, 161, 1, 243, 216, 161, 1, 243, 104, 161, 1, 241, 138, 161, 1, 245, 8, 161, 1, 243, 198, 161, 1, 243, 120, 161, 1, 238, 10, 161, 1, 244, 72, 161, 1, 238, 198, 161, 1, 239, 114, 161, 1, 239, 101, 161, 1, 249, 180, 161, 1, 239, 60, 161, 1, 239, 34, 161, 1, 237, 180, 161, 1, 248, 143, 161, 1, 245, 107, 161, 1, 247, 29, 161, 1, 242, 33, 161, 1, 250, 123, 161, 1, 242, 11, 161, 1, 241, 251, 161, 1, 241, 132, 161, 1, 76, 161, 1, 253, 190, 161, 1, 245, 241, 161, 1, 241, 176, 161, 1, 244, 44, 161, 1, 244, 143, 161, 239, 246, 161, 237, 171, 161, 240, 88, 161, 238, 2, 161, 240, 190, 161, 238, 38, 161, 240, 63, 161, 238, 8, 161, 240, 128, 161, 238, 37, 161, 243, 6, 161, 1, 249, 150, 72, 25, 236, 49, 72, 25, 238, 90, 72, 25, 239, 148, 72, 1, 64, 72, 1, 253, 95, 72, 1, 69, 72, 1, 253, 96, 72, 1, 84, 72, 1, 253, 104, 72, 1, 152, 135, 72, 1, 152, 148, 72, 1, 242, 110, 70, 72, 1, 207, 70, 72, 1, 70, 72, 1, 253, 106, 72, 1, 242, 110, 78, 72, 1, 207, 78, 72, 1, 78, 72, 1, 253, 109, 72, 1, 208, 72, 1, 249, 24, 72, 1, 253, 100, 72, 1, 249, 36, 72, 1, 249, 13, 72, 1, 253, 115, 72, 1, 249, 11, 72, 1, 253, 118, 72, 1, 249, 45, 72, 1, 249, 38, 72, 1, 249, 22, 72, 1, 244, 195, 72, 1, 249, 27, 72, 1, 244, 200, 72, 1, 249, 37, 72, 1, 253, 91, 72, 1, 249, 19, 72, 1, 253, 93, 72, 1, 249, 40, 72, 1, 253, 94, 72, 1, 245, 150, 72, 1, 253, 90, 72, 1, 249, 29, 72, 1, 253, 110, 72, 1, 249, 39, 72, 1, 221, 72, 1, 216, 72, 1, 253, 92, 72, 1, 249, 50, 72, 1, 253, 103, 72, 1, 249, 49, 72, 1, 245, 27, 72, 1, 253, 161, 72, 1, 249, 7, 72, 1, 249, 34, 72, 1, 253, 97, 72, 1, 253, 88, 72, 25, 242, 149, 72, 25, 238, 117, 72, 38, 25, 253, 95, 72, 38, 25, 69, 72, 38, 25, 253, 96, 72, 38, 25, 84, 72, 38, 25, 253, 104, 72, 38, 25, 152, 135, 72, 38, 25, 152, 253, 130, 72, 38, 25, 242, 110, 70, 72, 38, 25, 207, 70, 72, 38, 25, 70, 72, 38, 25, 253, 106, 72, 38, 25, 242, 110, 78, 72, 38, 25, 207, 78, 72, 38, 25, 78, 72, 38, 25, 253, 109, 72, 25, 240, 220, 72, 253, 245, 72, 242, 188, 25, 242, 43, 72, 242, 188, 25, 238, 170, 72, 244, 201, 240, 203, 72, 244, 196, 240, 203, 72, 1, 253, 213, 72, 1, 245, 124, 72, 1, 245, 97, 72, 1, 253, 129, 72, 1, 243, 84, 72, 1, 249, 160, 72, 1, 253, 153, 72, 1, 249, 184, 72, 1, 152, 253, 130, 72, 1, 152, 253, 146, 72, 38, 25, 152, 148, 72, 38, 25, 152, 253, 146, 72, 242, 205, 72, 42, 242, 205, 72, 27, 244, 173, 72, 27, 121, 72, 27, 114, 72, 27, 153, 72, 27, 163, 72, 27, 168, 72, 27, 169, 72, 27, 179, 72, 27, 176, 72, 27, 178, 72, 236, 60, 57, 91, 25, 236, 49, 91, 25, 238, 90, 91, 25, 239, 148, 91, 1, 64, 91, 1, 253, 95, 91, 1, 69, 91, 1, 253, 96, 91, 1, 84, 91, 1, 253, 104, 91, 1, 152, 135, 91, 1, 152, 148, 91, 1, 70, 91, 1, 253, 106, 91, 1, 78, 91, 1, 253, 109, 91, 1, 208, 91, 1, 249, 24, 91, 1, 253, 100, 91, 1, 249, 36, 91, 1, 249, 13, 91, 1, 253, 115, 91, 1, 249, 11, 91, 1, 253, 118, 91, 1, 249, 45, 91, 1, 249, 38, 91, 1, 249, 22, 91, 1, 244, 195, 91, 1, 249, 27, 91, 1, 244, 200, 91, 1, 249, 37, 91, 1, 253, 91, 91, 1, 249, 19, 91, 1, 253, 93, 91, 1, 249, 40, 91, 1, 253, 94, 91, 1, 253, 90, 91, 1, 249, 29, 91, 1, 253, 110, 91, 1, 249, 39, 91, 1, 221, 91, 1, 216, 91, 1, 253, 92, 91, 1, 253, 103, 91, 1, 249, 7, 91, 1, 249, 34, 91, 1, 253, 97, 91, 1, 253, 88, 91, 25, 242, 149, 91, 38, 25, 253, 95, 91, 38, 25, 69, 91, 38, 25, 253, 96, 91, 38, 25, 84, 91, 38, 25, 253, 104, 91, 38, 25, 152, 135, 91, 38, 25, 152, 253, 130, 91, 38, 25, 70, 91, 38, 25, 253, 106, 91, 38, 25, 78, 91, 38, 25, 253, 109, 91, 25, 240, 220, 91, 254, 230, 242, 106, 65, 91, 1, 249, 50, 91, 1, 249, 160, 91, 1, 249, 184, 91, 1, 152, 253, 130, 91, 1, 152, 253, 146, 91, 38, 25, 152, 148, 91, 38, 25, 152, 253, 146, 91, 27, 244, 173, 91, 27, 121, 91, 27, 114, 91, 27, 153, 91, 27, 163, 91, 27, 168, 91, 27, 169, 91, 27, 179, 91, 27, 176, 91, 27, 178, 91, 1, 254, 253, 2, 242, 65, 238, 109, 91, 1, 254, 253, 2, 149, 238, 109, 91, 245, 40, 65, 91, 245, 40, 57, 91, 239, 147, 238, 103, 121, 91, 239, 147, 238, 103, 114, 91, 239, 147, 238, 103, 153, 91, 239, 147, 238, 103, 163, 91, 239, 147, 238, 103, 253, 101, 251, 190, 249, 166, 253, 173, 236, 95, 91, 239, 147, 237, 0, 239, 162, 91, 241, 59, 113, 25, 243, 44, 113, 1, 64, 113, 1, 253, 95, 113, 1, 69, 113, 1, 253, 96, 113, 1, 84, 113, 1, 253, 104, 113, 1, 253, 126, 113, 1, 253, 106, 113, 1, 253, 119, 113, 1, 253, 109, 113, 1, 208, 113, 1, 249, 24, 113, 1, 253, 100, 113, 1, 249, 36, 113, 1, 249, 13, 113, 1, 253, 115, 113, 1, 249, 11, 113, 1, 253, 118, 113, 1, 249, 45, 113, 1, 249, 38, 113, 1, 249, 22, 113, 1, 244, 195, 113, 1, 249, 27, 113, 1, 244, 200, 113, 1, 249, 37, 113, 1, 253, 91, 113, 1, 249, 19, 113, 1, 253, 93, 113, 1, 249, 40, 113, 1, 253, 94, 113, 1, 253, 90, 113, 1, 249, 29, 113, 1, 253, 110, 113, 1, 249, 39, 113, 1, 221, 113, 1, 216, 113, 1, 253, 92, 113, 1, 253, 103, 113, 1, 249, 49, 113, 1, 253, 161, 113, 1, 249, 7, 113, 1, 253, 97, 113, 1, 253, 88, 113, 25, 242, 149, 113, 38, 25, 253, 95, 113, 38, 25, 69, 113, 38, 25, 253, 96, 113, 38, 25, 84, 113, 38, 25, 253, 104, 113, 38, 25, 253, 126, 113, 38, 25, 253, 106, 113, 38, 25, 253, 119, 113, 38, 25, 253, 109, 113, 25, 240, 220, 113, 1, 245, 124, 113, 1, 245, 97, 113, 1, 253, 129, 113, 1, 249, 50, 113, 1, 253, 153, 113, 27, 244, 173, 113, 27, 121, 113, 27, 114, 113, 27, 153, 113, 27, 163, 113, 27, 168, 113, 27, 169, 113, 27, 179, 113, 27, 176, 113, 27, 178, 113, 244, 121, 113, 243, 25, 113, 251, 114, 113, 252, 244, 113, 255, 6, 244, 19, 106, 25, 236, 49, 106, 25, 238, 90, 106, 25, 239, 148, 106, 1, 64, 106, 1, 253, 95, 106, 1, 69, 106, 1, 253, 96, 106, 1, 84, 106, 1, 253, 104, 106, 1, 152, 135, 106, 38, 242, 110, 70, 106, 1, 70, 106, 1, 253, 106, 106, 38, 242, 110, 78, 106, 1, 78, 106, 1, 253, 109, 106, 1, 208, 106, 1, 249, 24, 106, 1, 253, 100, 106, 1, 249, 36, 106, 1, 249, 13, 106, 1, 253, 115, 106, 1, 249, 11, 106, 1, 253, 118, 106, 1, 249, 45, 106, 1, 249, 38, 106, 1, 249, 22, 106, 1, 244, 195, 106, 1, 249, 27, 106, 1, 244, 200, 106, 1, 249, 37, 106, 1, 253, 91, 106, 1, 249, 19, 106, 1, 253, 93, 106, 1, 249, 40, 106, 1, 253, 94, 106, 1, 253, 90, 106, 1, 249, 29, 106, 1, 253, 110, 106, 1, 249, 39, 106, 1, 221, 106, 1, 216, 106, 1, 253, 92, 106, 1, 253, 103, 106, 1, 249, 49, 106, 1, 253, 161, 106, 1, 249, 7, 106, 1, 249, 34, 106, 1, 253, 97, 106, 1, 253, 88, 106, 25, 242, 149, 106, 25, 238, 117, 106, 38, 25, 253, 95, 106, 38, 25, 69, 106, 38, 25, 253, 96, 106, 38, 25, 84, 106, 38, 25, 253, 104, 106, 38, 25, 152, 135, 106, 38, 25, 152, 253, 130, 106, 38, 25, 242, 110, 70, 106, 38, 25, 70, 106, 38, 25, 253, 106, 106, 38, 25, 242, 110, 78, 106, 38, 25, 78, 106, 38, 25, 253, 109, 106, 25, 240, 220, 106, 253, 245, 106, 1, 152, 253, 130, 106, 27, 244, 173, 106, 27, 121, 106, 27, 114, 106, 27, 153, 106, 27, 163, 106, 27, 168, 106, 27, 169, 106, 27, 179, 106, 27, 176, 106, 27, 178, 105, 25, 236, 49, 105, 25, 238, 90, 105, 25, 239, 148, 105, 1, 64, 105, 1, 253, 95, 105, 1, 69, 105, 1, 253, 96, 105, 1, 84, 105, 1, 253, 104, 105, 1, 152, 135, 105, 1, 152, 148, 105, 1, 70, 105, 1, 253, 106, 105, 1, 78, 105, 1, 253, 109, 105, 1, 208, 105, 1, 249, 24, 105, 1, 253, 100, 105, 1, 249, 36, 105, 1, 249, 13, 105, 1, 253, 115, 105, 1, 249, 11, 105, 1, 253, 118, 105, 1, 249, 45, 105, 1, 249, 38, 105, 1, 249, 22, 105, 1, 244, 195, 105, 1, 249, 27, 105, 1, 244, 200, 105, 1, 249, 37, 105, 1, 253, 91, 105, 1, 249, 19, 105, 1, 253, 93, 105, 1, 249, 40, 105, 1, 253, 94, 105, 1, 253, 90, 105, 1, 249, 29, 105, 1, 253, 110, 105, 1, 249, 39, 105, 1, 221, 105, 1, 216, 105, 1, 253, 92, 105, 1, 253, 103, 105, 1, 249, 49, 105, 1, 249, 7, 105, 1, 249, 34, 105, 1, 253, 97, 105, 1, 253, 88, 105, 25, 242, 149, 105, 25, 238, 117, 105, 38, 25, 253, 95, 105, 38, 25, 69, 105, 38, 25, 253, 96, 105, 38, 25, 84, 105, 38, 25, 253, 104, 105, 38, 25, 152, 135, 105, 38, 25, 70, 105, 38, 25, 253, 106, 105, 38, 25, 78, 105, 38, 25, 253, 109, 105, 25, 240, 220, 105, 254, 227, 242, 106, 65, 105, 254, 230, 242, 106, 65, 105, 1, 249, 50, 105, 1, 249, 160, 105, 1, 249, 184, 105, 1, 152, 253, 130, 105, 1, 152, 253, 146, 105, 27, 244, 173, 105, 27, 121, 105, 27, 114, 105, 27, 153, 105, 27, 163, 105, 27, 168, 105, 27, 169, 105, 27, 179, 105, 27, 176, 105, 27, 178, 105, 241, 59, 142, 25, 238, 90, 142, 25, 239, 148, 142, 1, 64, 142, 1, 253, 95, 142, 1, 69, 142, 1, 253, 96, 142, 1, 84, 142, 1, 253, 104, 142, 1, 70, 142, 1, 253, 126, 142, 1, 253, 106, 142, 1, 78, 142, 1, 253, 119, 142, 1, 253, 109, 142, 1, 208, 142, 1, 249, 13, 142, 1, 253, 115, 142, 1, 253, 118, 142, 1, 249, 38, 142, 1, 249, 22, 142, 1, 249, 37, 142, 1, 253, 91, 142, 1, 253, 94, 142, 1, 245, 150, 142, 1, 253, 90, 142, 1, 221, 142, 1, 216, 142, 1, 253, 92, 142, 1, 249, 50, 142, 1, 253, 103, 142, 1, 249, 49, 142, 1, 245, 27, 142, 1, 253, 161, 142, 1, 249, 34, 142, 1, 253, 97, 142, 1, 253, 88, 142, 38, 25, 253, 95, 142, 38, 25, 69, 142, 38, 25, 253, 96, 142, 38, 25, 84, 142, 38, 25, 253, 104, 142, 38, 25, 70, 142, 38, 25, 253, 126, 142, 38, 25, 253, 106, 142, 38, 25, 78, 142, 38, 25, 253, 119, 142, 38, 25, 253, 109, 142, 25, 240, 220, 142, 254, 230, 242, 106, 65, 142, 27, 121, 142, 27, 114, 142, 27, 153, 142, 27, 163, 142, 27, 168, 142, 27, 169, 142, 27, 179, 142, 27, 176, 142, 27, 178, 142, 83, 249, 18, 142, 83, 253, 101, 239, 150, 142, 83, 253, 101, 238, 104, 104, 25, 236, 49, 104, 25, 238, 90, 104, 25, 239, 148, 104, 1, 64, 104, 1, 253, 95, 104, 1, 69, 104, 1, 253, 96, 104, 1, 84, 104, 1, 253, 104, 104, 1, 152, 135, 104, 1, 152, 148, 104, 1, 70, 104, 1, 253, 126, 104, 1, 253, 106, 104, 1, 78, 104, 1, 253, 119, 104, 1, 253, 109, 104, 1, 208, 104, 1, 249, 24, 104, 1, 253, 100, 104, 1, 249, 36, 104, 1, 249, 13, 104, 1, 253, 115, 104, 1, 249, 11, 104, 1, 253, 118, 104, 1, 249, 45, 104, 1, 249, 38, 104, 1, 249, 22, 104, 1, 244, 195, 104, 1, 249, 27, 104, 1, 244, 200, 104, 1, 249, 37, 104, 1, 253, 91, 104, 1, 249, 19, 104, 1, 253, 93, 104, 1, 249, 40, 104, 1, 253, 94, 104, 1, 253, 90, 104, 1, 249, 29, 104, 1, 253, 110, 104, 1, 249, 39, 104, 1, 221, 104, 1, 216, 104, 1, 253, 92, 104, 1, 249, 50, 104, 1, 253, 103, 104, 1, 249, 49, 104, 1, 253, 161, 104, 1, 249, 7, 104, 1, 249, 34, 104, 1, 253, 97, 104, 1, 253, 88, 104, 38, 25, 253, 95, 104, 38, 25, 69, 104, 38, 25, 253, 96, 104, 38, 25, 84, 104, 38, 25, 253, 104, 104, 38, 25, 152, 135, 104, 38, 25, 152, 253, 130, 104, 38, 25, 70, 104, 38, 25, 253, 126, 104, 38, 25, 253, 106, 104, 38, 25, 78, 104, 38, 25, 253, 119, 104, 38, 25, 253, 109, 104, 25, 240, 220, 104, 242, 106, 65, 104, 254, 227, 242, 106, 65, 104, 1, 152, 253, 130, 104, 1, 152, 253, 146, 104, 27, 244, 173, 104, 27, 121, 104, 27, 114, 104, 27, 153, 104, 27, 163, 104, 27, 168, 104, 27, 169, 104, 27, 179, 104, 27, 176, 104, 27, 178, 102, 25, 238, 90, 102, 25, 239, 148, 102, 1, 64, 102, 1, 253, 95, 102, 1, 69, 102, 1, 253, 96, 102, 1, 84, 102, 1, 253, 104, 102, 1, 152, 135, 102, 1, 152, 148, 102, 1, 70, 102, 1, 253, 126, 102, 1, 253, 106, 102, 1, 78, 102, 1, 253, 119, 102, 1, 253, 109, 102, 1, 208, 102, 1, 249, 24, 102, 1, 253, 100, 102, 1, 249, 36, 102, 1, 249, 13, 102, 1, 253, 115, 102, 1, 249, 11, 102, 1, 253, 118, 102, 1, 249, 45, 102, 1, 249, 38, 102, 1, 249, 22, 102, 1, 244, 195, 102, 1, 249, 27, 102, 1, 244, 200, 102, 1, 249, 37, 102, 1, 253, 91, 102, 1, 249, 19, 102, 1, 253, 93, 102, 1, 249, 40, 102, 1, 253, 94, 102, 1, 253, 90, 102, 1, 249, 29, 102, 1, 253, 110, 102, 1, 249, 39, 102, 1, 221, 102, 1, 216, 102, 1, 253, 92, 102, 1, 249, 50, 102, 1, 253, 103, 102, 1, 249, 49, 102, 1, 253, 161, 102, 1, 249, 7, 102, 1, 249, 34, 102, 1, 253, 97, 102, 1, 253, 88, 102, 38, 25, 253, 95, 102, 38, 25, 69, 102, 38, 25, 253, 96, 102, 38, 25, 84, 102, 38, 25, 253, 104, 102, 38, 25, 152, 135, 102, 38, 25, 152, 253, 130, 102, 38, 25, 70, 102, 38, 25, 253, 126, 102, 38, 25, 253, 106, 102, 38, 25, 78, 102, 38, 25, 253, 119, 102, 38, 25, 253, 109, 102, 25, 240, 220, 102, 242, 106, 65, 102, 254, 227, 242, 106, 65, 102, 1, 253, 153, 102, 1, 152, 253, 130, 102, 1, 152, 253, 146, 102, 27, 244, 173, 102, 27, 121, 102, 27, 114, 102, 27, 153, 102, 27, 163, 102, 27, 168, 102, 27, 169, 102, 27, 179, 102, 27, 176, 102, 27, 178, 107, 25, 238, 90, 107, 25, 239, 148, 107, 1, 64, 107, 1, 253, 95, 107, 1, 69, 107, 1, 253, 96, 107, 1, 84, 107, 1, 253, 104, 107, 1, 152, 135, 107, 1, 152, 148, 107, 1, 70, 107, 1, 253, 126, 107, 1, 253, 106, 107, 1, 78, 107, 1, 253, 119, 107, 1, 253, 109, 107, 1, 208, 107, 1, 249, 24, 107, 1, 253, 100, 107, 1, 249, 36, 107, 1, 249, 13, 107, 1, 253, 115, 107, 1, 249, 11, 107, 1, 253, 118, 107, 1, 249, 45, 107, 1, 249, 38, 107, 1, 249, 22, 107, 1, 244, 195, 107, 1, 249, 27, 107, 1, 244, 200, 107, 1, 249, 37, 107, 1, 253, 91, 107, 1, 249, 19, 107, 1, 253, 93, 107, 1, 249, 40, 107, 1, 253, 94, 107, 1, 253, 90, 107, 1, 249, 29, 107, 1, 253, 110, 107, 1, 249, 39, 107, 1, 221, 107, 1, 216, 107, 1, 253, 92, 107, 1, 249, 50, 107, 1, 253, 103, 107, 1, 249, 49, 107, 1, 245, 27, 107, 1, 253, 161, 107, 1, 249, 7, 107, 1, 249, 34, 107, 1, 253, 97, 107, 1, 253, 88, 107, 38, 25, 253, 95, 107, 38, 25, 69, 107, 38, 25, 253, 96, 107, 38, 25, 84, 107, 38, 25, 253, 104, 107, 38, 25, 152, 135, 107, 38, 25, 70, 107, 38, 25, 253, 126, 107, 38, 25, 253, 106, 107, 38, 25, 78, 107, 38, 25, 253, 119, 107, 38, 25, 253, 109, 107, 25, 240, 220, 107, 254, 230, 242, 106, 65, 107, 1, 152, 253, 130, 107, 1, 152, 253, 146, 107, 27, 244, 173, 107, 27, 121, 107, 27, 114, 107, 27, 153, 107, 27, 163, 107, 27, 168, 107, 27, 169, 107, 27, 179, 107, 27, 176, 107, 27, 178, 103, 25, 236, 243, 103, 25, 238, 72, 103, 1, 241, 106, 103, 1, 239, 245, 103, 1, 239, 247, 103, 1, 238, 168, 103, 1, 241, 188, 103, 1, 240, 90, 103, 1, 242, 46, 103, 1, 240, 191, 103, 1, 239, 33, 103, 1, 238, 21, 103, 1, 239, 29, 103, 1, 238, 16, 103, 1, 241, 156, 103, 1, 240, 64, 103, 1, 239, 248, 103, 1, 241, 232, 103, 1, 240, 132, 103, 1, 240, 1, 103, 1, 237, 115, 239, 221, 103, 1, 236, 189, 239, 221, 103, 1, 237, 115, 239, 183, 103, 1, 236, 189, 239, 183, 103, 1, 241, 189, 236, 219, 103, 1, 241, 5, 239, 183, 103, 1, 237, 115, 239, 206, 103, 1, 236, 189, 239, 206, 103, 1, 237, 115, 239, 185, 103, 1, 236, 189, 239, 185, 103, 1, 241, 34, 236, 219, 103, 1, 241, 34, 240, 158, 236, 146, 103, 1, 241, 5, 239, 185, 103, 1, 237, 115, 238, 163, 103, 1, 236, 189, 238, 163, 103, 1, 237, 115, 238, 118, 103, 1, 236, 189, 238, 118, 103, 1, 238, 123, 239, 226, 103, 1, 241, 5, 238, 118, 103, 1, 237, 115, 239, 241, 103, 1, 236, 189, 239, 241, 103, 1, 237, 115, 239, 179, 103, 1, 236, 189, 239, 179, 103, 1, 241, 16, 239, 226, 103, 1, 241, 5, 239, 179, 103, 1, 237, 115, 239, 227, 103, 1, 236, 189, 239, 227, 103, 1, 237, 115, 239, 177, 103, 1, 236, 189, 239, 177, 103, 1, 240, 112, 103, 1, 250, 136, 239, 177, 103, 1, 240, 197, 103, 1, 240, 150, 103, 1, 241, 16, 239, 223, 103, 1, 240, 192, 103, 1, 241, 34, 239, 194, 103, 1, 238, 123, 239, 194, 103, 1, 241, 16, 239, 194, 103, 1, 240, 85, 103, 1, 238, 123, 239, 223, 103, 1, 240, 72, 103, 25, 237, 172, 103, 38, 25, 236, 199, 103, 38, 25, 245, 26, 236, 211, 103, 38, 25, 249, 62, 236, 211, 103, 38, 25, 245, 26, 238, 146, 103, 38, 25, 249, 62, 238, 146, 103, 38, 25, 245, 26, 237, 161, 103, 38, 25, 249, 62, 237, 161, 103, 38, 25, 235, 251, 103, 38, 25, 239, 222, 103, 38, 25, 249, 62, 239, 222, 103, 38, 25, 247, 38, 246, 104, 103, 38, 25, 241, 23, 254, 14, 236, 199, 103, 38, 25, 241, 23, 254, 14, 249, 62, 236, 199, 103, 38, 25, 241, 23, 254, 14, 236, 62, 103, 38, 25, 236, 62, 103, 38, 25, 249, 62, 235, 251, 103, 38, 25, 249, 62, 236, 62, 103, 236, 191, 237, 73, 95, 92, 254, 249, 251, 141, 95, 92, 253, 198, 247, 30, 95, 92, 253, 198, 243, 189, 95, 92, 253, 198, 243, 190, 95, 92, 253, 198, 247, 33, 95, 92, 253, 198, 240, 148, 95, 92, 254, 156, 252, 20, 95, 92, 253, 237, 246, 45, 95, 92, 253, 237, 243, 63, 95, 92, 253, 237, 243, 61, 95, 92, 254, 225, 253, 159, 95, 92, 253, 237, 246, 52, 95, 92, 255, 0, 248, 194, 95, 92, 254, 240, 243, 59, 95, 92, 139, 244, 26, 95, 92, 253, 188, 245, 47, 95, 92, 253, 188, 237, 76, 95, 92, 253, 188, 240, 139, 95, 92, 254, 243, 252, 12, 95, 92, 254, 240, 250, 212, 95, 92, 139, 252, 194, 95, 92, 253, 188, 244, 119, 95, 92, 253, 188, 242, 34, 95, 92, 253, 188, 244, 118, 95, 92, 254, 243, 253, 112, 95, 92, 255, 3, 241, 108, 95, 92, 255, 20, 252, 70, 95, 92, 253, 230, 244, 36, 95, 92, 254, 232, 253, 153, 95, 92, 253, 230, 247, 243, 95, 92, 254, 232, 250, 251, 95, 92, 253, 230, 240, 157, 95, 92, 255, 15, 221, 95, 92, 255, 0, 253, 41, 95, 92, 255, 21, 252, 137, 95, 92, 253, 170, 95, 92, 254, 234, 245, 131, 95, 92, 253, 229, 95, 92, 255, 26, 248, 169, 95, 92, 254, 225, 248, 51, 95, 92, 254, 225, 248, 47, 95, 92, 254, 225, 252, 178, 95, 92, 254, 222, 251, 74, 95, 92, 254, 234, 243, 65, 95, 92, 109, 249, 75, 95, 92, 254, 222, 241, 222, 95, 92, 238, 40, 95, 92, 249, 33, 64, 95, 92, 253, 147, 239, 25, 95, 92, 249, 33, 253, 95, 95, 92, 249, 33, 253, 234, 95, 92, 249, 33, 69, 95, 92, 249, 33, 253, 96, 95, 92, 249, 33, 253, 253, 95, 92, 249, 33, 252, 236, 95, 92, 249, 33, 84, 95, 92, 249, 33, 253, 104, 95, 92, 240, 138, 95, 239, 147, 13, 245, 251, 95, 92, 249, 33, 70, 95, 92, 249, 33, 253, 163, 95, 92, 249, 33, 78, 95, 92, 249, 33, 254, 227, 240, 108, 95, 92, 249, 33, 254, 227, 239, 45, 95, 92, 236, 142, 95, 92, 239, 46, 95, 92, 238, 30, 95, 92, 253, 147, 254, 37, 95, 92, 253, 147, 249, 55, 95, 92, 253, 147, 252, 216, 95, 92, 253, 147, 238, 189, 95, 92, 236, 173, 95, 92, 239, 51, 95, 92, 239, 112, 95, 92, 240, 76, 95, 27, 244, 173, 95, 27, 121, 95, 27, 114, 95, 27, 153, 95, 27, 163, 95, 27, 168, 95, 27, 169, 95, 27, 179, 95, 27, 176, 95, 27, 178, 95, 92, 236, 241, 95, 92, 241, 192, 132, 1, 253, 155, 132, 1, 253, 198, 244, 231, 132, 1, 253, 198, 249, 72, 132, 1, 249, 110, 132, 1, 253, 178, 132, 1, 254, 225, 249, 72, 132, 1, 249, 84, 132, 1, 253, 193, 132, 1, 76, 132, 1, 253, 188, 244, 231, 132, 1, 253, 188, 249, 72, 132, 1, 253, 136, 132, 1, 253, 221, 132, 1, 253, 187, 132, 1, 253, 230, 244, 231, 132, 1, 254, 232, 249, 72, 132, 1, 253, 230, 249, 72, 132, 1, 254, 232, 244, 231, 132, 1, 253, 141, 132, 1, 253, 123, 132, 1, 254, 234, 245, 131, 132, 1, 254, 234, 247, 68, 132, 1, 253, 138, 132, 1, 254, 225, 244, 231, 132, 1, 254, 222, 244, 231, 132, 1, 78, 132, 1, 254, 222, 249, 72, 132, 238, 96, 132, 38, 25, 64, 132, 38, 25, 253, 147, 249, 139, 132, 38, 25, 253, 95, 132, 38, 25, 253, 234, 132, 38, 25, 69, 132, 38, 25, 253, 96, 132, 38, 25, 181, 132, 38, 25, 254, 26, 132, 38, 25, 84, 132, 38, 25, 253, 104, 132, 38, 25, 253, 147, 251, 165, 132, 238, 157, 25, 253, 184, 132, 238, 157, 25, 249, 84, 132, 38, 25, 70, 132, 38, 25, 254, 36, 132, 38, 25, 78, 132, 38, 25, 254, 2, 132, 38, 25, 253, 106, 132, 254, 249, 253, 103, 132, 249, 5, 253, 147, 254, 37, 132, 249, 5, 253, 147, 249, 55, 132, 249, 5, 253, 147, 253, 174, 132, 249, 5, 253, 147, 241, 122, 132, 236, 87, 65, 132, 238, 36, 132, 27, 244, 173, 132, 27, 121, 132, 27, 114, 132, 27, 153, 132, 27, 163, 132, 27, 168, 132, 27, 169, 132, 27, 179, 132, 27, 176, 132, 27, 178, 132, 254, 222, 253, 136, 132, 254, 222, 253, 141, 41, 4, 253, 245, 41, 167, 249, 80, 253, 175, 253, 199, 239, 105, 64, 41, 167, 249, 80, 253, 175, 253, 199, 254, 28, 250, 64, 250, 150, 221, 41, 167, 249, 80, 253, 175, 253, 199, 254, 28, 249, 80, 244, 242, 221, 41, 167, 46, 253, 175, 253, 199, 251, 224, 221, 41, 167, 241, 48, 253, 175, 253, 199, 252, 160, 221, 41, 167, 244, 225, 253, 175, 253, 199, 250, 45, 250, 70, 221, 41, 167, 253, 175, 253, 199, 244, 242, 250, 70, 221, 41, 167, 248, 53, 244, 223, 41, 167, 246, 33, 253, 175, 249, 107, 41, 167, 250, 162, 252, 163, 253, 175, 249, 107, 41, 167, 236, 24, 243, 15, 41, 167, 238, 200, 244, 242, 243, 53, 41, 167, 244, 223, 41, 167, 249, 154, 244, 223, 41, 167, 244, 242, 244, 223, 41, 167, 249, 154, 244, 242, 244, 223, 41, 167, 254, 179, 250, 185, 244, 98, 244, 223, 41, 167, 250, 63, 251, 45, 244, 223, 41, 167, 244, 225, 245, 54, 245, 3, 255, 14, 165, 249, 61, 41, 167, 249, 80, 243, 15, 41, 239, 224, 25, 250, 184, 242, 121, 41, 239, 224, 25, 251, 192, 242, 121, 41, 236, 61, 25, 252, 162, 251, 28, 245, 235, 242, 121, 41, 236, 61, 25, 243, 23, 253, 90, 41, 236, 61, 25, 248, 55, 242, 40, 41, 25, 249, 53, 249, 98, 245, 92, 41, 25, 249, 53, 249, 98, 242, 219, 41, 25, 249, 53, 249, 98, 245, 102, 41, 25, 249, 53, 254, 16, 245, 92, 41, 25, 249, 53, 254, 16, 242, 219, 41, 25, 249, 53, 249, 98, 249, 53, 251, 252, 41, 27, 244, 173, 41, 27, 121, 41, 27, 114, 41, 27, 153, 41, 27, 163, 41, 27, 168, 41, 27, 169, 41, 27, 179, 41, 27, 176, 41, 27, 178, 41, 27, 136, 121, 41, 27, 136, 114, 41, 27, 136, 153, 41, 27, 136, 163, 41, 27, 136, 168, 41, 27, 136, 169, 41, 27, 136, 179, 41, 27, 136, 176, 41, 27, 136, 178, 41, 27, 136, 244, 173, 41, 167, 246, 32, 242, 121, 41, 167, 250, 27, 245, 65, 254, 59, 253, 69, 41, 167, 244, 225, 245, 54, 245, 3, 249, 130, 254, 56, 249, 61, 41, 167, 250, 27, 245, 65, 252, 161, 242, 121, 41, 167, 253, 164, 249, 107, 41, 167, 254, 73, 243, 24, 41, 167, 254, 43, 245, 3, 245, 104, 41, 167, 254, 43, 245, 3, 245, 103, 41, 167, 254, 29, 245, 121, 245, 104, 41, 167, 254, 29, 245, 121, 245, 103, 41, 25, 254, 208, 243, 16, 41, 25, 254, 139, 243, 16, 41, 1, 208, 41, 1, 249, 24, 41, 1, 253, 100, 41, 1, 249, 36, 41, 1, 249, 13, 41, 1, 253, 115, 41, 1, 249, 11, 41, 1, 253, 118, 41, 1, 249, 38, 41, 1, 249, 22, 41, 1, 244, 195, 41, 1, 249, 27, 41, 1, 244, 200, 41, 1, 249, 37, 41, 1, 253, 91, 41, 1, 249, 19, 41, 1, 253, 93, 41, 1, 249, 40, 41, 1, 253, 94, 41, 1, 253, 90, 41, 1, 249, 29, 41, 1, 253, 110, 41, 1, 249, 39, 41, 1, 221, 41, 1, 249, 56, 41, 1, 245, 211, 41, 1, 249, 100, 41, 1, 245, 78, 41, 1, 253, 98, 41, 1, 249, 52, 41, 1, 253, 129, 41, 1, 254, 27, 41, 1, 216, 41, 1, 253, 92, 41, 1, 253, 103, 41, 1, 249, 7, 41, 1, 249, 34, 41, 1, 253, 97, 41, 1, 253, 88, 41, 1, 64, 41, 1, 245, 127, 41, 1, 237, 134, 253, 92, 41, 38, 25, 253, 95, 41, 38, 25, 69, 41, 38, 25, 253, 96, 41, 38, 25, 84, 41, 38, 25, 253, 104, 41, 38, 25, 152, 135, 41, 38, 25, 152, 253, 130, 41, 38, 25, 152, 148, 41, 38, 25, 152, 253, 146, 41, 38, 25, 70, 41, 38, 25, 253, 126, 41, 38, 25, 78, 41, 38, 25, 253, 119, 41, 25, 252, 128, 255, 22, 254, 155, 253, 144, 41, 25, 250, 64, 246, 17, 41, 38, 25, 224, 69, 41, 38, 25, 224, 253, 96, 41, 25, 254, 59, 254, 212, 254, 152, 253, 93, 41, 25, 254, 183, 247, 55, 41, 167, 240, 83, 41, 167, 241, 234, 41, 25, 254, 132, 242, 121, 41, 25, 250, 112, 242, 121, 41, 25, 254, 131, 254, 73, 249, 61, 41, 25, 251, 223, 249, 61, 41, 25, 254, 42, 254, 91, 239, 232, 41, 25, 254, 42, 254, 141, 239, 232, 41, 185, 1, 208, 41, 185, 1, 249, 24, 41, 185, 1, 253, 100, 41, 185, 1, 249, 36, 41, 185, 1, 249, 13, 41, 185, 1, 253, 115, 41, 185, 1, 249, 11, 41, 185, 1, 253, 118, 41, 185, 1, 249, 38, 41, 185, 1, 249, 22, 41, 185, 1, 244, 195, 41, 185, 1, 249, 27, 41, 185, 1, 244, 200, 41, 185, 1, 249, 37, 41, 185, 1, 253, 91, 41, 185, 1, 249, 19, 41, 185, 1, 253, 93, 41, 185, 1, 249, 40, 41, 185, 1, 253, 94, 41, 185, 1, 253, 90, 41, 185, 1, 249, 29, 41, 185, 1, 253, 110, 41, 185, 1, 249, 39, 41, 185, 1, 221, 41, 185, 1, 249, 56, 41, 185, 1, 245, 211, 41, 185, 1, 249, 100, 41, 185, 1, 245, 78, 41, 185, 1, 253, 98, 41, 185, 1, 249, 52, 41, 185, 1, 253, 129, 41, 185, 1, 254, 27, 41, 185, 1, 216, 41, 185, 1, 253, 92, 41, 185, 1, 253, 103, 41, 185, 1, 249, 7, 41, 185, 1, 249, 34, 41, 185, 1, 253, 97, 41, 185, 1, 253, 88, 41, 185, 1, 64, 41, 185, 1, 245, 127, 41, 185, 1, 237, 134, 253, 98, 41, 185, 1, 237, 134, 216, 41, 185, 1, 237, 134, 253, 92, 41, 254, 250, 254, 254, 249, 24, 41, 254, 250, 254, 254, 254, 125, 249, 130, 254, 56, 249, 61, 41, 236, 54, 25, 82, 245, 60, 41, 236, 54, 25, 117, 245, 60, 41, 236, 54, 25, 250, 176, 248, 118, 41, 236, 54, 25, 252, 157, 243, 22, 41, 13, 250, 228, 253, 192, 41, 13, 254, 69, 252, 127, 41, 13, 247, 237, 246, 135, 41, 13, 254, 69, 254, 180, 250, 63, 246, 160, 41, 13, 250, 45, 253, 90, 41, 13, 253, 137, 253, 192, 41, 13, 253, 137, 254, 239, 249, 154, 241, 11, 41, 13, 253, 137, 254, 239, 251, 46, 241, 11, 41, 13, 253, 137, 254, 239, 249, 130, 241, 11, 41, 25, 249, 53, 254, 16, 245, 102, 108, 1, 208, 108, 1, 249, 24, 108, 1, 253, 100, 108, 1, 249, 36, 108, 1, 249, 13, 108, 1, 253, 115, 108, 1, 249, 11, 108, 1, 253, 118, 108, 1, 249, 45, 108, 1, 249, 38, 108, 1, 247, 179, 108, 1, 249, 22, 108, 1, 244, 195, 108, 1, 249, 27, 108, 1, 244, 200, 108, 1, 249, 37, 108, 1, 253, 91, 108, 1, 249, 19, 108, 1, 253, 93, 108, 1, 249, 40, 108, 1, 253, 94, 108, 1, 253, 90, 108, 1, 249, 29, 108, 1, 253, 110, 108, 1, 249, 39, 108, 1, 221, 108, 1, 216, 108, 1, 253, 92, 108, 1, 253, 103, 108, 1, 253, 98, 108, 1, 253, 97, 108, 1, 253, 88, 108, 1, 249, 49, 108, 1, 64, 108, 1, 69, 108, 1, 253, 96, 108, 1, 84, 108, 1, 253, 104, 108, 1, 70, 108, 1, 78, 108, 1, 253, 109, 108, 38, 25, 253, 95, 108, 38, 25, 69, 108, 38, 25, 253, 96, 108, 38, 25, 84, 108, 38, 25, 253, 104, 108, 38, 25, 70, 108, 38, 25, 253, 106, 108, 25, 238, 90, 108, 25, 49, 45, 108, 25, 239, 148, 108, 25, 240, 220, 108, 27, 244, 173, 108, 27, 121, 108, 27, 114, 108, 27, 153, 108, 27, 163, 108, 27, 168, 108, 27, 169, 108, 27, 179, 108, 27, 176, 108, 27, 178, 108, 25, 242, 147, 239, 174, 108, 25, 239, 174, 108, 13, 239, 42, 108, 13, 237, 181, 108, 13, 234, 68, 108, 13, 239, 23, 108, 1, 249, 7, 108, 1, 249, 34, 108, 1, 152, 135, 108, 1, 152, 253, 130, 108, 1, 152, 148, 108, 1, 152, 253, 146, 108, 38, 25, 152, 135, 108, 38, 25, 152, 253, 130, 108, 38, 25, 152, 148, 108, 38, 25, 152, 253, 146, 101, 5, 1, 253, 235, 101, 5, 1, 249, 189, 101, 5, 1, 249, 227, 101, 5, 1, 249, 216, 101, 5, 1, 253, 166, 101, 5, 1, 250, 106, 101, 5, 1, 250, 124, 101, 5, 1, 250, 83, 101, 5, 1, 253, 227, 101, 5, 1, 249, 139, 101, 5, 1, 250, 7, 101, 5, 1, 249, 146, 101, 5, 1, 250, 25, 101, 5, 1, 253, 246, 101, 5, 1, 250, 40, 101, 5, 1, 245, 233, 101, 5, 1, 250, 60, 101, 5, 1, 250, 67, 101, 5, 1, 250, 84, 101, 5, 1, 254, 75, 101, 5, 1, 245, 159, 101, 5, 1, 245, 122, 101, 5, 1, 245, 96, 101, 5, 1, 250, 55, 101, 5, 1, 245, 6, 101, 5, 1, 245, 69, 101, 5, 1, 249, 61, 101, 5, 1, 249, 247, 101, 5, 1, 249, 197, 101, 5, 1, 245, 67, 101, 5, 1, 250, 111, 101, 5, 1, 245, 116, 101, 5, 1, 249, 239, 101, 5, 1, 253, 125, 101, 5, 1, 249, 137, 101, 5, 1, 253, 132, 101, 5, 1, 249, 240, 101, 5, 1, 249, 245, 101, 1, 253, 235, 101, 1, 249, 189, 101, 1, 249, 227, 101, 1, 249, 216, 101, 1, 253, 166, 101, 1, 250, 106, 101, 1, 250, 124, 101, 1, 250, 83, 101, 1, 253, 227, 101, 1, 249, 139, 101, 1, 250, 7, 101, 1, 249, 146, 101, 1, 250, 25, 101, 1, 253, 246, 101, 1, 250, 40, 101, 1, 245, 233, 101, 1, 250, 60, 101, 1, 250, 67, 101, 1, 250, 84, 101, 1, 254, 75, 101, 1, 245, 159, 101, 1, 245, 122, 101, 1, 245, 96, 101, 1, 250, 55, 101, 1, 245, 6, 101, 1, 245, 69, 101, 1, 249, 61, 101, 1, 249, 247, 101, 1, 249, 197, 101, 1, 245, 67, 101, 1, 250, 111, 101, 1, 245, 116, 101, 1, 249, 239, 101, 1, 253, 125, 101, 1, 249, 137, 101, 1, 253, 132, 101, 1, 249, 240, 101, 1, 249, 245, 101, 1, 253, 226, 101, 1, 254, 209, 101, 1, 243, 98, 101, 238, 113, 237, 114, 20, 88, 240, 242, 20, 88, 236, 59, 20, 88, 242, 131, 20, 88, 240, 244, 20, 88, 236, 72, 20, 88, 242, 134, 20, 88, 242, 129, 20, 88, 242, 133, 20, 88, 236, 209, 20, 88, 244, 230, 20, 88, 237, 138, 20, 88, 242, 126, 20, 88, 242, 122, 20, 88, 236, 207, 20, 88, 239, 155, 20, 88, 239, 158, 20, 88, 239, 166, 20, 88, 239, 161, 20, 88, 242, 125, 20, 88, 235, 254, 20, 88, 236, 233, 20, 88, 235, 246, 20, 88, 236, 148, 20, 88, 235, 208, 20, 88, 236, 79, 20, 88, 236, 234, 20, 88, 236, 57, 20, 88, 235, 221, 20, 88, 236, 64, 20, 88, 235, 194, 20, 88, 235, 255, 20, 88, 236, 154, 20, 88, 236, 0, 20, 88, 236, 198, 20, 88, 231, 248, 20, 88, 231, 249, 20, 88, 232, 9, 20, 88, 234, 57, 20, 88, 232, 8, 20, 88, 236, 77, 20, 88, 235, 226, 20, 88, 235, 205, 20, 88, 235, 204, 20, 88, 235, 195, 20, 88, 231, 240, 20, 88, 236, 70, 20, 88, 236, 230, 20, 88, 236, 71, 20, 88, 236, 231, 20, 88, 237, 98, 20, 88, 236, 206, 20, 88, 232, 2, 20, 88, 235, 185, 20, 88, 237, 97, 20, 88, 236, 229, 20, 88, 236, 33, 20, 88, 236, 34, 20, 88, 236, 36, 20, 88, 236, 35, 20, 88, 237, 96, 20, 88, 236, 6, 20, 88, 231, 252, 20, 88, 232, 18, 20, 88, 231, 237, 20, 88, 239, 191, 20, 88, 235, 253, 20, 88, 236, 23, 20, 88, 236, 136, 20, 88, 236, 137, 20, 88, 237, 68, 20, 88, 235, 218, 20, 88, 236, 208, 20, 88, 236, 135, 20, 88, 235, 216, 20, 88, 235, 220, 20, 88, 235, 219, 20, 88, 238, 134, 20, 88, 236, 88, 20, 88, 235, 214, 20, 88, 231, 243, 20, 88, 232, 6, 20, 88, 231, 234, 20, 88, 232, 19, 20, 88, 235, 213, 20, 88, 232, 20, 20, 88, 231, 242, 20, 88, 235, 203, 20, 88, 232, 14, 20, 88, 236, 232, 20, 88, 236, 73, 20, 88, 240, 255, 20, 129, 240, 255, 20, 129, 64, 20, 129, 253, 163, 20, 129, 216, 20, 129, 249, 181, 20, 129, 254, 10, 20, 129, 70, 20, 129, 249, 182, 20, 129, 253, 200, 20, 129, 78, 20, 129, 253, 98, 20, 129, 249, 175, 20, 129, 253, 142, 20, 129, 253, 123, 20, 129, 84, 20, 129, 249, 177, 20, 129, 253, 132, 20, 129, 253, 145, 20, 129, 253, 124, 20, 129, 254, 12, 20, 129, 253, 139, 20, 129, 69, 20, 129, 250, 132, 20, 129, 250, 133, 20, 129, 248, 186, 20, 129, 244, 151, 20, 129, 246, 123, 20, 129, 246, 124, 20, 129, 243, 100, 20, 129, 244, 154, 20, 129, 244, 155, 20, 129, 247, 231, 20, 129, 252, 53, 20, 129, 247, 232, 20, 129, 252, 54, 20, 129, 252, 55, 20, 129, 243, 19, 20, 129, 241, 91, 20, 129, 242, 57, 20, 129, 248, 195, 20, 129, 245, 226, 20, 129, 252, 234, 20, 129, 248, 159, 20, 129, 240, 189, 20, 129, 248, 160, 20, 129, 252, 235, 20, 129, 248, 198, 20, 129, 244, 157, 20, 129, 248, 199, 20, 129, 241, 92, 20, 129, 243, 20, 20, 129, 248, 200, 20, 129, 245, 228, 20, 129, 246, 126, 20, 129, 243, 102, 20, 129, 248, 190, 20, 129, 251, 104, 20, 129, 246, 247, 20, 129, 251, 105, 20, 129, 251, 106, 20, 129, 246, 246, 20, 129, 240, 87, 20, 129, 242, 197, 20, 129, 238, 174, 20, 129, 239, 255, 20, 129, 239, 254, 20, 129, 237, 99, 20, 99, 240, 242, 20, 99, 236, 59, 20, 99, 236, 63, 20, 99, 242, 131, 20, 99, 236, 65, 20, 99, 236, 66, 20, 99, 240, 244, 20, 99, 242, 134, 20, 99, 235, 247, 20, 99, 236, 67, 20, 99, 236, 68, 20, 99, 236, 204, 20, 99, 235, 197, 20, 99, 235, 196, 20, 99, 236, 57, 20, 99, 242, 129, 20, 99, 242, 133, 20, 99, 236, 198, 20, 99, 244, 230, 20, 99, 237, 138, 20, 99, 242, 126, 20, 99, 242, 122, 20, 99, 239, 155, 20, 99, 239, 158, 20, 99, 239, 166, 20, 99, 239, 161, 20, 99, 242, 125, 20, 99, 236, 26, 20, 99, 231, 244, 20, 99, 235, 254, 20, 99, 235, 246, 20, 99, 236, 220, 20, 99, 235, 201, 20, 99, 235, 224, 20, 99, 235, 208, 20, 99, 236, 39, 20, 99, 231, 250, 20, 99, 236, 79, 20, 99, 236, 1, 20, 99, 231, 246, 20, 99, 236, 234, 20, 99, 231, 245, 20, 99, 232, 10, 20, 99, 232, 4, 20, 99, 232, 0, 20, 99, 231, 239, 20, 99, 234, 60, 20, 99, 235, 206, 20, 99, 235, 227, 20, 99, 231, 251, 20, 99, 236, 27, 20, 99, 236, 144, 20, 99, 236, 64, 20, 99, 236, 216, 20, 99, 234, 55, 20, 99, 235, 200, 20, 99, 235, 223, 20, 99, 236, 143, 20, 99, 235, 194, 20, 99, 236, 155, 20, 99, 235, 204, 20, 99, 236, 153, 20, 99, 235, 195, 20, 99, 236, 70, 20, 99, 236, 71, 20, 99, 236, 231, 20, 99, 236, 206, 20, 99, 239, 191, 20, 99, 235, 253, 20, 99, 231, 253, 20, 99, 236, 208, 20, 99, 235, 217, 20, 99, 238, 134, 20, 99, 235, 210, 20, 99, 232, 5, 20, 99, 235, 203, 20, 99, 232, 14, 20, 99, 236, 132, 20, 99, 236, 134, 20, 99, 236, 131, 20, 99, 236, 133, 20, 99, 236, 73, 24, 4, 253, 88, 24, 4, 253, 197, 24, 4, 253, 154, 24, 4, 249, 68, 24, 4, 249, 242, 24, 4, 253, 125, 24, 4, 253, 140, 24, 4, 253, 103, 24, 4, 253, 229, 24, 4, 253, 211, 24, 4, 250, 6, 24, 4, 250, 8, 24, 4, 253, 210, 24, 4, 253, 184, 24, 4, 249, 145, 24, 4, 251, 68, 24, 4, 251, 72, 24, 4, 251, 70, 24, 4, 245, 107, 24, 4, 246, 174, 24, 4, 251, 69, 24, 4, 251, 71, 24, 4, 246, 175, 24, 4, 221, 24, 4, 253, 114, 24, 4, 253, 156, 24, 4, 250, 17, 24, 4, 250, 18, 24, 4, 253, 167, 24, 4, 253, 141, 24, 4, 249, 149, 24, 4, 252, 189, 24, 4, 252, 193, 24, 4, 252, 191, 24, 4, 248, 112, 24, 4, 248, 113, 24, 4, 252, 190, 24, 4, 252, 192, 24, 4, 248, 114, 24, 4, 253, 92, 24, 4, 253, 170, 24, 4, 253, 169, 24, 4, 249, 115, 24, 4, 250, 62, 24, 4, 253, 150, 24, 4, 253, 144, 24, 4, 252, 144, 24, 4, 253, 97, 24, 4, 253, 172, 24, 4, 253, 158, 24, 4, 250, 66, 24, 4, 249, 117, 24, 4, 253, 171, 24, 4, 253, 159, 24, 4, 249, 163, 24, 4, 249, 7, 24, 4, 249, 162, 24, 4, 249, 118, 24, 4, 245, 180, 24, 4, 245, 182, 24, 4, 249, 70, 24, 4, 249, 85, 24, 4, 245, 43, 24, 4, 253, 213, 24, 4, 254, 19, 24, 4, 253, 249, 24, 4, 249, 157, 24, 4, 252, 85, 24, 4, 254, 67, 24, 4, 254, 18, 24, 4, 252, 108, 24, 4, 252, 110, 24, 4, 248, 14, 24, 4, 248, 15, 24, 4, 252, 109, 24, 4, 252, 86, 24, 4, 252, 90, 24, 4, 252, 88, 24, 4, 248, 1, 24, 4, 248, 2, 24, 4, 252, 87, 24, 4, 252, 89, 24, 4, 248, 3, 24, 4, 248, 5, 24, 4, 244, 48, 24, 4, 244, 49, 24, 4, 248, 4, 24, 4, 253, 110, 24, 4, 253, 192, 24, 4, 253, 236, 24, 4, 249, 188, 24, 4, 249, 128, 24, 4, 253, 191, 24, 4, 253, 221, 24, 4, 250, 169, 24, 4, 253, 161, 24, 4, 253, 255, 24, 4, 254, 25, 24, 4, 252, 247, 24, 4, 249, 174, 24, 4, 253, 214, 24, 4, 253, 215, 24, 4, 253, 8, 24, 4, 253, 91, 24, 4, 253, 160, 24, 4, 253, 174, 24, 4, 250, 80, 24, 4, 249, 164, 24, 4, 253, 151, 24, 4, 76, 24, 4, 249, 172, 24, 4, 253, 115, 24, 4, 254, 32, 24, 4, 254, 5, 24, 4, 249, 194, 24, 4, 250, 180, 24, 4, 254, 4, 24, 4, 253, 178, 24, 4, 249, 132, 24, 4, 254, 204, 24, 4, 254, 206, 24, 4, 253, 135, 24, 4, 253, 23, 24, 4, 253, 24, 24, 4, 254, 205, 24, 4, 254, 77, 24, 4, 253, 34, 24, 4, 253, 36, 24, 4, 248, 183, 24, 4, 248, 184, 24, 4, 253, 35, 24, 4, 253, 94, 24, 4, 253, 112, 24, 4, 253, 148, 24, 4, 249, 150, 24, 4, 250, 26, 24, 4, 253, 157, 24, 4, 253, 136, 24, 4, 249, 153, 24, 4, 249, 38, 24, 4, 250, 34, 24, 4, 250, 33, 24, 4, 247, 201, 24, 4, 247, 202, 24, 4, 252, 47, 24, 4, 249, 84, 24, 4, 247, 213, 24, 4, 240, 211, 64, 24, 4, 240, 211, 84, 24, 4, 240, 211, 69, 24, 4, 240, 211, 253, 95, 24, 4, 240, 211, 253, 126, 24, 4, 240, 211, 70, 24, 4, 240, 211, 78, 24, 4, 240, 211, 253, 98, 24, 4, 208, 24, 4, 253, 183, 24, 4, 253, 182, 24, 4, 249, 252, 24, 4, 251, 146, 24, 4, 253, 134, 24, 4, 253, 155, 24, 4, 249, 141, 24, 4, 249, 143, 24, 4, 244, 254, 24, 4, 247, 44, 24, 4, 249, 142, 24, 4, 251, 176, 24, 4, 251, 180, 24, 4, 251, 178, 24, 4, 247, 45, 24, 4, 247, 46, 24, 4, 251, 177, 24, 4, 251, 179, 24, 4, 247, 47, 24, 4, 247, 49, 24, 4, 243, 195, 24, 4, 243, 196, 24, 4, 247, 48, 24, 4, 253, 98, 24, 4, 253, 216, 24, 4, 253, 145, 24, 4, 249, 123, 24, 4, 250, 109, 24, 4, 253, 132, 24, 4, 253, 138, 24, 4, 237, 117, 64, 24, 4, 237, 117, 84, 24, 4, 237, 117, 69, 24, 4, 237, 117, 253, 95, 24, 4, 237, 117, 253, 126, 24, 4, 237, 117, 70, 24, 4, 237, 117, 78, 24, 4, 253, 129, 24, 4, 253, 233, 24, 4, 253, 218, 24, 4, 250, 123, 24, 4, 249, 126, 24, 4, 253, 189, 24, 4, 253, 190, 24, 4, 253, 76, 24, 4, 249, 52, 24, 4, 250, 127, 24, 4, 250, 125, 24, 4, 248, 209, 24, 4, 245, 53, 24, 4, 249, 74, 24, 4, 250, 126, 24, 4, 248, 224, 24, 4, 216, 24, 4, 253, 124, 24, 4, 253, 139, 24, 4, 249, 180, 24, 4, 249, 125, 24, 4, 253, 200, 24, 4, 253, 123, 24, 4, 253, 93, 24, 4, 253, 204, 24, 4, 253, 165, 24, 4, 250, 202, 24, 4, 249, 96, 24, 4, 253, 152, 24, 4, 253, 193, 24, 4, 250, 236, 24, 4, 249, 27, 24, 4, 249, 212, 24, 4, 249, 210, 24, 4, 246, 82, 24, 4, 246, 87, 24, 4, 249, 209, 24, 4, 249, 211, 24, 4, 246, 101, 24, 4, 253, 118, 24, 4, 253, 241, 24, 4, 253, 228, 24, 4, 251, 117, 24, 4, 249, 104, 24, 4, 253, 239, 24, 4, 253, 240, 24, 4, 251, 135, 24, 4, 253, 100, 24, 4, 253, 196, 24, 4, 253, 209, 24, 4, 249, 136, 24, 4, 249, 229, 24, 4, 253, 207, 24, 4, 253, 195, 24, 4, 251, 52, 24, 4, 251, 54, 24, 4, 246, 167, 24, 4, 246, 168, 24, 4, 251, 53, 24, 4, 249, 231, 24, 4, 249, 235, 24, 4, 249, 233, 24, 4, 246, 136, 24, 4, 246, 140, 24, 4, 249, 232, 24, 4, 249, 234, 24, 4, 249, 19, 24, 4, 250, 87, 24, 4, 249, 73, 24, 4, 245, 8, 24, 4, 245, 9, 24, 4, 249, 63, 24, 4, 249, 55, 24, 4, 248, 126, 24, 4, 249, 11, 24, 4, 249, 131, 24, 4, 249, 23, 24, 4, 246, 44, 24, 4, 244, 246, 24, 4, 249, 44, 24, 4, 249, 94, 24, 4, 246, 60, 24, 4, 249, 29, 24, 4, 252, 63, 24, 4, 249, 30, 24, 4, 247, 242, 24, 4, 247, 244, 24, 4, 250, 43, 24, 4, 250, 44, 24, 4, 247, 245, 24, 4, 249, 56, 24, 4, 249, 171, 24, 4, 249, 169, 24, 4, 248, 140, 24, 4, 245, 210, 24, 4, 249, 64, 24, 4, 249, 170, 24, 4, 248, 142, 24, 4, 252, 229, 24, 4, 252, 233, 24, 4, 252, 231, 24, 4, 248, 157, 24, 4, 248, 158, 24, 4, 252, 230, 24, 4, 252, 232, 24, 4, 253, 153, 24, 4, 254, 41, 24, 4, 253, 226, 24, 4, 249, 222, 24, 4, 250, 255, 24, 4, 254, 40, 24, 4, 254, 13, 24, 4, 251, 18, 24, 4, 253, 90, 24, 4, 253, 231, 24, 4, 253, 116, 24, 4, 250, 39, 24, 4, 249, 114, 24, 4, 253, 143, 24, 4, 253, 187, 24, 4, 249, 156, 24, 4, 252, 145, 24, 4, 251, 248, 24, 4, 251, 19, 24, 238, 73, 24, 213, 189, 24, 242, 84, 24, 237, 123, 24, 242, 81, 24, 241, 243, 242, 81, 24, 239, 126, 65, 24, 238, 113, 237, 114, 24, 27, 121, 24, 27, 114, 24, 27, 153, 24, 27, 163, 24, 27, 168, 24, 27, 169, 24, 27, 179, 24, 27, 176, 24, 27, 178, 24, 83, 249, 18, 24, 83, 240, 239, 24, 83, 241, 7, 24, 83, 242, 213, 24, 83, 242, 144, 24, 83, 244, 85, 24, 83, 240, 162, 24, 83, 241, 152, 24, 83, 241, 69, 24, 83, 239, 150, 24, 83, 253, 250, 238, 104, 96, 1, 64, 96, 1, 70, 96, 1, 69, 96, 1, 78, 96, 1, 84, 96, 1, 186, 96, 1, 253, 100, 96, 1, 208, 96, 1, 253, 207, 96, 1, 253, 209, 96, 1, 253, 195, 96, 1, 253, 196, 96, 1, 254, 109, 96, 1, 253, 88, 96, 1, 253, 125, 96, 1, 253, 154, 96, 1, 253, 140, 96, 1, 253, 197, 96, 1, 254, 44, 96, 1, 253, 103, 96, 1, 253, 210, 96, 1, 253, 211, 96, 1, 253, 184, 96, 1, 253, 229, 96, 1, 254, 137, 96, 1, 221, 96, 1, 253, 167, 96, 1, 253, 156, 96, 1, 253, 141, 96, 1, 253, 114, 96, 1, 253, 94, 96, 1, 249, 244, 96, 1, 251, 253, 96, 1, 253, 157, 96, 1, 253, 148, 96, 1, 253, 136, 96, 1, 253, 112, 96, 1, 254, 58, 96, 1, 252, 99, 96, 1, 252, 100, 96, 1, 252, 101, 96, 1, 250, 58, 96, 1, 250, 59, 96, 1, 252, 106, 96, 1, 253, 97, 96, 1, 159, 96, 1, 253, 171, 96, 1, 253, 158, 96, 1, 253, 159, 96, 1, 253, 172, 96, 1, 254, 72, 96, 1, 253, 93, 96, 1, 253, 91, 96, 1, 253, 152, 96, 1, 253, 151, 96, 1, 253, 165, 96, 1, 253, 174, 96, 1, 253, 193, 96, 1, 253, 204, 96, 1, 254, 99, 96, 1, 249, 214, 96, 1, 250, 89, 96, 1, 250, 90, 96, 1, 250, 91, 96, 1, 250, 92, 96, 1, 250, 93, 96, 1, 252, 212, 96, 1, 249, 56, 96, 1, 249, 64, 96, 1, 249, 169, 96, 1, 249, 170, 96, 1, 249, 171, 96, 1, 252, 217, 96, 1, 253, 98, 96, 1, 253, 132, 96, 1, 253, 145, 96, 1, 253, 138, 96, 1, 253, 216, 96, 1, 254, 203, 96, 1, 216, 96, 1, 253, 200, 96, 1, 253, 139, 96, 1, 253, 123, 96, 1, 253, 124, 96, 1, 254, 210, 14, 15, 70, 14, 15, 250, 134, 14, 15, 69, 14, 15, 253, 96, 14, 15, 78, 14, 15, 253, 119, 14, 15, 242, 98, 253, 119, 14, 15, 44, 253, 126, 14, 15, 44, 69, 14, 15, 64, 14, 15, 253, 95, 14, 15, 253, 132, 14, 15, 94, 253, 132, 14, 15, 253, 145, 14, 15, 94, 253, 145, 14, 15, 250, 110, 14, 15, 94, 250, 110, 14, 15, 253, 138, 14, 15, 94, 253, 138, 14, 15, 249, 178, 14, 15, 94, 249, 178, 14, 15, 240, 212, 249, 178, 14, 15, 253, 98, 14, 15, 94, 253, 98, 14, 15, 249, 123, 14, 15, 94, 249, 123, 14, 15, 240, 212, 249, 123, 14, 15, 253, 106, 14, 15, 242, 98, 201, 14, 15, 240, 211, 189, 14, 15, 29, 116, 14, 15, 29, 158, 14, 15, 29, 242, 80, 136, 244, 183, 14, 15, 29, 253, 121, 136, 244, 183, 14, 15, 29, 37, 136, 244, 183, 14, 15, 29, 244, 183, 14, 15, 29, 42, 116, 14, 15, 29, 42, 207, 55, 239, 240, 14, 15, 29, 242, 65, 227, 14, 15, 29, 207, 146, 122, 14, 15, 29, 244, 212, 14, 15, 29, 79, 244, 184, 14, 15, 253, 166, 14, 15, 253, 227, 14, 15, 253, 246, 14, 15, 253, 235, 14, 15, 253, 143, 14, 15, 247, 236, 14, 15, 253, 116, 14, 15, 252, 66, 14, 15, 253, 187, 14, 15, 250, 47, 14, 15, 242, 98, 250, 47, 14, 15, 44, 249, 242, 14, 15, 44, 253, 154, 14, 15, 253, 90, 14, 15, 250, 39, 14, 15, 250, 49, 14, 15, 94, 250, 49, 14, 15, 250, 50, 14, 15, 94, 250, 50, 14, 15, 245, 164, 14, 15, 94, 245, 164, 14, 15, 250, 51, 14, 15, 94, 250, 51, 14, 15, 245, 165, 14, 15, 94, 245, 165, 14, 15, 249, 156, 14, 15, 94, 249, 156, 14, 15, 245, 38, 14, 15, 94, 245, 38, 14, 15, 242, 98, 245, 38, 14, 15, 198, 14, 15, 94, 198, 14, 15, 44, 164, 14, 15, 253, 151, 14, 15, 248, 115, 14, 15, 253, 174, 14, 15, 252, 208, 14, 15, 76, 14, 15, 249, 167, 14, 15, 242, 98, 249, 167, 14, 15, 44, 249, 96, 14, 15, 44, 253, 165, 14, 15, 253, 91, 14, 15, 250, 80, 14, 15, 250, 99, 14, 15, 94, 250, 99, 14, 15, 250, 100, 14, 15, 94, 250, 100, 14, 15, 245, 215, 14, 15, 94, 245, 215, 14, 15, 114, 14, 15, 94, 114, 14, 15, 245, 216, 14, 15, 94, 245, 216, 14, 15, 249, 172, 14, 15, 94, 249, 172, 14, 15, 245, 49, 14, 15, 94, 245, 49, 14, 15, 240, 212, 245, 49, 14, 15, 190, 14, 15, 250, 95, 14, 15, 250, 96, 14, 15, 250, 97, 14, 15, 249, 22, 14, 15, 253, 134, 14, 15, 247, 26, 14, 15, 253, 182, 14, 15, 251, 156, 14, 15, 253, 155, 14, 15, 250, 3, 14, 15, 242, 98, 250, 3, 14, 15, 208, 14, 15, 249, 252, 14, 15, 249, 142, 14, 15, 94, 249, 142, 14, 15, 249, 143, 14, 15, 94, 249, 143, 14, 15, 245, 128, 14, 15, 94, 245, 128, 14, 15, 250, 5, 14, 15, 94, 250, 5, 14, 15, 245, 129, 14, 15, 94, 245, 129, 14, 15, 249, 141, 14, 15, 94, 249, 141, 14, 15, 244, 254, 14, 15, 94, 244, 254, 14, 15, 240, 212, 244, 254, 14, 15, 205, 14, 15, 254, 52, 14, 15, 236, 58, 249, 140, 14, 15, 236, 58, 251, 155, 14, 15, 236, 58, 251, 164, 14, 15, 236, 58, 251, 140, 14, 15, 254, 4, 14, 15, 246, 39, 14, 15, 254, 5, 14, 15, 250, 188, 14, 15, 253, 178, 14, 15, 249, 200, 14, 15, 242, 98, 249, 200, 14, 15, 253, 115, 14, 15, 249, 194, 14, 15, 249, 203, 14, 15, 94, 249, 203, 14, 15, 249, 204, 14, 15, 94, 249, 204, 14, 15, 245, 73, 14, 15, 94, 245, 73, 14, 15, 249, 205, 14, 15, 94, 249, 205, 14, 15, 245, 74, 14, 15, 94, 245, 74, 14, 15, 249, 132, 14, 15, 94, 249, 132, 14, 15, 245, 19, 14, 15, 94, 245, 19, 14, 15, 240, 212, 245, 19, 14, 15, 203, 14, 15, 242, 90, 253, 251, 14, 15, 253, 167, 14, 15, 247, 75, 14, 15, 253, 156, 14, 15, 251, 232, 14, 15, 253, 141, 14, 15, 250, 19, 14, 15, 242, 98, 250, 19, 14, 15, 221, 14, 15, 250, 17, 14, 15, 250, 22, 14, 15, 94, 250, 22, 14, 15, 250, 23, 14, 15, 94, 250, 23, 14, 15, 245, 144, 14, 15, 94, 245, 144, 14, 15, 250, 24, 14, 15, 94, 250, 24, 14, 15, 245, 145, 14, 15, 94, 245, 145, 14, 15, 249, 149, 14, 15, 94, 249, 149, 14, 15, 245, 31, 14, 15, 94, 245, 31, 14, 15, 240, 212, 245, 31, 14, 15, 171, 14, 15, 94, 171, 14, 15, 254, 144, 14, 15, 237, 148, 171, 14, 15, 242, 90, 171, 14, 15, 253, 157, 14, 15, 247, 107, 14, 15, 253, 148, 14, 15, 252, 23, 14, 15, 253, 136, 14, 15, 250, 30, 14, 15, 242, 98, 250, 30, 14, 15, 253, 94, 14, 15, 249, 150, 14, 15, 250, 32, 14, 15, 94, 250, 32, 14, 15, 249, 153, 14, 15, 94, 249, 153, 14, 15, 245, 32, 14, 15, 94, 245, 32, 14, 15, 240, 212, 245, 32, 14, 15, 183, 14, 15, 44, 253, 244, 14, 15, 254, 157, 14, 15, 253, 210, 14, 15, 247, 50, 14, 15, 253, 211, 14, 15, 251, 196, 14, 15, 253, 184, 14, 15, 250, 12, 14, 15, 242, 98, 250, 12, 14, 15, 253, 103, 14, 15, 250, 6, 14, 15, 250, 13, 14, 15, 94, 250, 13, 14, 15, 250, 14, 14, 15, 94, 250, 14, 14, 15, 245, 137, 14, 15, 94, 245, 137, 14, 15, 250, 15, 14, 15, 94, 250, 15, 14, 15, 245, 138, 14, 15, 94, 245, 138, 14, 15, 249, 145, 14, 15, 94, 249, 145, 14, 15, 245, 136, 14, 15, 94, 245, 136, 14, 15, 148, 14, 15, 94, 148, 14, 15, 98, 148, 14, 15, 253, 171, 14, 15, 248, 49, 14, 15, 253, 158, 14, 15, 252, 165, 14, 15, 253, 159, 14, 15, 250, 74, 14, 15, 242, 98, 250, 74, 14, 15, 253, 97, 14, 15, 250, 66, 14, 15, 250, 77, 14, 15, 94, 250, 77, 14, 15, 250, 78, 14, 15, 94, 250, 78, 14, 15, 245, 198, 14, 15, 94, 245, 198, 14, 15, 250, 79, 14, 15, 94, 250, 79, 14, 15, 245, 199, 14, 15, 94, 245, 199, 14, 15, 249, 163, 14, 15, 94, 249, 163, 14, 15, 245, 46, 14, 15, 94, 245, 46, 14, 15, 240, 212, 245, 46, 14, 15, 159, 14, 15, 237, 148, 159, 14, 15, 254, 187, 14, 15, 238, 82, 159, 14, 15, 238, 35, 254, 182, 14, 15, 240, 212, 252, 169, 14, 15, 240, 212, 252, 151, 14, 15, 240, 212, 248, 83, 14, 15, 240, 212, 248, 106, 14, 15, 240, 212, 248, 79, 14, 15, 240, 212, 248, 54, 14, 15, 249, 70, 14, 15, 249, 118, 14, 15, 248, 61, 14, 15, 249, 85, 14, 15, 248, 62, 14, 15, 249, 7, 14, 15, 245, 180, 14, 15, 245, 189, 14, 15, 94, 245, 189, 14, 15, 245, 190, 14, 15, 94, 245, 190, 14, 15, 242, 254, 14, 15, 94, 242, 254, 14, 15, 245, 191, 14, 15, 94, 245, 191, 14, 15, 242, 255, 14, 15, 94, 242, 255, 14, 15, 245, 43, 14, 15, 94, 245, 43, 14, 15, 242, 253, 14, 15, 94, 242, 253, 14, 15, 254, 21, 14, 15, 253, 200, 14, 15, 248, 187, 14, 15, 253, 139, 14, 15, 253, 43, 14, 15, 253, 123, 14, 15, 250, 117, 14, 15, 242, 98, 250, 117, 14, 15, 216, 14, 15, 249, 180, 14, 15, 250, 120, 14, 15, 94, 250, 120, 14, 15, 250, 121, 14, 15, 94, 250, 121, 14, 15, 245, 229, 14, 15, 94, 245, 229, 14, 15, 250, 122, 14, 15, 94, 250, 122, 14, 15, 245, 230, 14, 15, 94, 245, 230, 14, 15, 250, 119, 14, 15, 94, 250, 119, 14, 15, 245, 52, 14, 15, 94, 245, 52, 14, 15, 240, 212, 245, 52, 14, 15, 181, 14, 15, 237, 178, 181, 14, 15, 94, 181, 14, 15, 242, 90, 253, 139, 14, 15, 253, 150, 14, 15, 244, 50, 253, 150, 14, 15, 94, 253, 210, 14, 15, 248, 17, 14, 15, 253, 169, 14, 15, 252, 125, 14, 15, 253, 144, 14, 15, 252, 129, 14, 15, 94, 253, 184, 14, 15, 253, 92, 14, 15, 249, 115, 14, 15, 94, 253, 103, 14, 15, 245, 175, 14, 15, 94, 245, 175, 14, 15, 135, 14, 15, 94, 135, 14, 15, 98, 135, 14, 15, 254, 40, 14, 15, 246, 128, 14, 15, 253, 226, 14, 15, 251, 6, 14, 15, 254, 13, 14, 15, 251, 12, 14, 15, 253, 153, 14, 15, 249, 222, 14, 15, 245, 90, 14, 15, 94, 245, 90, 14, 15, 204, 14, 15, 249, 63, 14, 15, 242, 182, 249, 63, 14, 15, 249, 73, 14, 15, 242, 182, 249, 73, 14, 15, 245, 48, 14, 15, 242, 182, 245, 48, 14, 15, 249, 55, 14, 15, 245, 202, 14, 15, 249, 19, 14, 15, 245, 8, 14, 15, 243, 10, 14, 15, 94, 243, 10, 14, 15, 253, 251, 14, 15, 248, 146, 14, 15, 248, 147, 14, 15, 245, 213, 14, 15, 244, 195, 14, 15, 252, 218, 14, 15, 252, 226, 14, 15, 252, 227, 14, 15, 252, 228, 14, 15, 252, 225, 14, 15, 240, 229, 253, 125, 14, 15, 240, 229, 253, 154, 14, 15, 240, 229, 251, 73, 14, 15, 240, 229, 253, 140, 14, 15, 240, 229, 251, 89, 14, 15, 240, 229, 253, 88, 14, 15, 240, 229, 249, 68, 14, 15, 240, 229, 164, 14, 15, 241, 225, 164, 14, 15, 254, 111, 14, 15, 247, 255, 14, 15, 253, 249, 14, 15, 250, 56, 14, 15, 254, 18, 14, 15, 252, 96, 14, 15, 253, 213, 14, 15, 249, 157, 14, 15, 209, 14, 15, 245, 206, 14, 15, 245, 207, 14, 15, 245, 208, 14, 15, 245, 205, 14, 15, 94, 253, 150, 14, 15, 94, 253, 169, 14, 15, 94, 253, 144, 14, 15, 94, 253, 92, 14, 15, 243, 242, 14, 15, 252, 19, 14, 15, 247, 152, 14, 15, 249, 110, 14, 15, 247, 153, 14, 15, 249, 13, 14, 15, 247, 144, 14, 15, 253, 244, 14, 15, 252, 31, 14, 15, 242, 90, 249, 70, 14, 15, 242, 90, 249, 118, 14, 15, 242, 90, 249, 85, 14, 15, 242, 90, 249, 7, 14, 15, 237, 131, 249, 63, 14, 15, 237, 131, 249, 73, 14, 15, 237, 131, 249, 55, 14, 15, 237, 131, 249, 19, 14, 15, 237, 131, 253, 251, 14, 15, 250, 9, 14, 15, 247, 62, 14, 15, 250, 10, 14, 15, 247, 63, 14, 15, 249, 144, 14, 15, 247, 60, 14, 15, 254, 134, 14, 15, 240, 231, 249, 63, 14, 15, 240, 231, 249, 73, 14, 15, 240, 231, 245, 48, 14, 15, 240, 231, 249, 55, 14, 15, 240, 231, 245, 202, 14, 15, 240, 231, 249, 19, 14, 15, 240, 231, 245, 8, 14, 15, 240, 231, 253, 251, 14, 15, 241, 95, 199, 14, 15, 238, 82, 70, 14, 15, 238, 82, 69, 14, 15, 238, 82, 78, 14, 15, 238, 82, 64, 14, 15, 238, 82, 253, 132, 14, 15, 238, 82, 253, 145, 14, 15, 238, 82, 253, 138, 14, 15, 238, 82, 253, 98, 14, 15, 238, 82, 253, 157, 14, 15, 238, 82, 253, 148, 14, 15, 238, 82, 253, 136, 14, 15, 238, 82, 253, 94, 14, 15, 238, 82, 253, 134, 14, 15, 238, 82, 253, 182, 14, 15, 238, 82, 253, 155, 14, 15, 238, 82, 208, 14, 15, 242, 90, 253, 125, 14, 15, 242, 90, 253, 154, 14, 15, 242, 90, 253, 140, 14, 15, 242, 90, 253, 88, 14, 15, 44, 251, 36, 14, 15, 44, 251, 35, 14, 15, 44, 249, 78, 14, 15, 44, 246, 153, 14, 15, 44, 251, 34, 14, 15, 44, 249, 36, 14, 15, 44, 253, 170, 14, 15, 44, 253, 144, 14, 15, 44, 253, 150, 14, 15, 44, 250, 62, 14, 15, 44, 253, 169, 14, 15, 44, 253, 92, 14, 15, 44, 253, 216, 14, 15, 44, 253, 138, 14, 15, 44, 253, 132, 14, 15, 44, 250, 109, 14, 15, 44, 253, 145, 14, 15, 44, 253, 98, 14, 15, 44, 251, 99, 14, 15, 44, 251, 98, 14, 15, 44, 251, 96, 14, 15, 44, 246, 235, 14, 15, 44, 251, 97, 14, 15, 44, 251, 95, 14, 15, 44, 250, 87, 14, 15, 44, 249, 55, 14, 15, 44, 249, 63, 14, 15, 44, 245, 9, 14, 15, 44, 249, 73, 14, 15, 44, 249, 19, 14, 15, 44, 252, 219, 14, 15, 44, 250, 97, 14, 15, 44, 250, 95, 14, 15, 44, 248, 144, 14, 15, 44, 250, 96, 14, 15, 44, 249, 22, 14, 15, 44, 253, 231, 14, 15, 44, 253, 187, 14, 15, 44, 253, 143, 14, 15, 44, 249, 114, 14, 15, 44, 253, 116, 14, 15, 44, 253, 90, 14, 15, 44, 198, 14, 15, 44, 253, 196, 14, 15, 44, 253, 195, 14, 15, 44, 253, 207, 14, 15, 44, 249, 229, 14, 15, 44, 253, 209, 14, 15, 44, 253, 100, 14, 15, 44, 251, 152, 14, 15, 44, 250, 0, 14, 15, 44, 249, 255, 14, 15, 44, 247, 32, 14, 15, 44, 251, 151, 14, 15, 44, 249, 24, 14, 15, 44, 251, 163, 14, 15, 44, 251, 162, 14, 15, 44, 251, 160, 14, 15, 44, 247, 37, 14, 15, 44, 251, 161, 14, 15, 44, 251, 159, 14, 15, 44, 254, 51, 14, 15, 44, 253, 112, 14, 15, 44, 253, 136, 14, 15, 44, 253, 157, 14, 15, 44, 250, 26, 14, 15, 44, 253, 148, 14, 15, 44, 253, 94, 14, 15, 44, 253, 114, 14, 15, 44, 253, 141, 14, 15, 44, 253, 167, 14, 15, 44, 250, 18, 14, 15, 44, 253, 156, 14, 15, 44, 221, 14, 15, 44, 253, 124, 14, 15, 44, 253, 123, 14, 15, 44, 253, 200, 14, 15, 44, 249, 125, 14, 15, 44, 253, 139, 14, 15, 44, 216, 14, 15, 44, 253, 241, 14, 15, 242, 90, 253, 241, 14, 15, 44, 253, 240, 14, 15, 44, 253, 239, 14, 15, 44, 249, 104, 14, 15, 44, 253, 228, 14, 15, 242, 90, 253, 228, 14, 15, 44, 253, 118, 14, 15, 44, 249, 250, 14, 15, 44, 249, 249, 14, 15, 44, 251, 127, 14, 15, 44, 247, 5, 14, 15, 44, 249, 248, 14, 15, 44, 251, 126, 14, 15, 44, 253, 229, 14, 15, 44, 253, 184, 14, 15, 44, 253, 210, 14, 15, 44, 250, 8, 14, 15, 44, 253, 211, 14, 15, 44, 253, 103, 14, 15, 44, 250, 224, 14, 15, 44, 250, 223, 14, 15, 44, 250, 221, 14, 15, 44, 246, 111, 14, 15, 44, 250, 222, 14, 15, 44, 249, 214, 14, 15, 44, 251, 194, 14, 15, 44, 250, 10, 14, 15, 44, 251, 193, 14, 15, 44, 247, 61, 14, 15, 44, 250, 9, 14, 15, 44, 249, 144, 14, 15, 44, 248, 134, 14, 15, 44, 245, 208, 14, 15, 44, 245, 206, 14, 15, 44, 244, 122, 14, 15, 44, 245, 207, 14, 15, 44, 245, 205, 14, 15, 44, 250, 93, 14, 15, 44, 250, 92, 14, 15, 44, 250, 90, 14, 15, 44, 248, 133, 14, 15, 44, 250, 91, 14, 15, 44, 250, 89, 14, 15, 44, 253, 233, 14, 15, 44, 253, 190, 14, 15, 44, 253, 189, 14, 15, 44, 249, 126, 14, 15, 44, 253, 218, 14, 15, 44, 253, 129, 14, 15, 44, 202, 14, 15, 44, 46, 202, 14, 15, 44, 250, 240, 14, 15, 44, 250, 239, 14, 15, 44, 249, 76, 14, 15, 44, 246, 119, 14, 15, 44, 250, 238, 14, 15, 44, 249, 100, 14, 15, 44, 253, 172, 14, 15, 44, 253, 159, 14, 15, 44, 253, 171, 14, 15, 44, 249, 117, 14, 15, 44, 253, 158, 14, 15, 44, 253, 97, 14, 15, 44, 249, 162, 14, 15, 44, 249, 85, 14, 15, 44, 249, 70, 14, 15, 44, 245, 182, 14, 15, 44, 249, 118, 14, 15, 44, 249, 7, 14, 15, 44, 254, 21, 14, 15, 44, 249, 171, 14, 15, 44, 249, 170, 14, 15, 44, 249, 64, 14, 15, 44, 245, 210, 14, 15, 44, 249, 169, 14, 15, 44, 249, 56, 14, 15, 44, 249, 131, 14, 15, 44, 249, 94, 14, 15, 44, 249, 44, 14, 15, 44, 244, 246, 14, 15, 44, 249, 23, 14, 15, 44, 249, 11, 14, 15, 44, 248, 152, 14, 15, 44, 248, 151, 14, 15, 44, 248, 149, 14, 15, 44, 244, 126, 14, 15, 44, 248, 150, 14, 15, 44, 248, 148, 14, 15, 254, 31, 57, 14, 15, 213, 189, 14, 15, 250, 54, 14, 15, 247, 145, 14, 15, 247, 177, 14, 15, 244, 0, 14, 15, 247, 178, 14, 15, 244, 1, 14, 15, 247, 176, 14, 15, 243, 255, 244, 174, 248, 81, 65, 244, 174, 1, 243, 43, 244, 174, 1, 247, 69, 244, 174, 1, 243, 107, 244, 174, 1, 248, 50, 244, 174, 1, 247, 160, 244, 174, 1, 248, 161, 244, 174, 1, 246, 80, 244, 174, 1, 244, 120, 244, 174, 1, 246, 73, 244, 174, 1, 243, 58, 244, 174, 1, 247, 101, 244, 174, 1, 246, 159, 244, 174, 1, 240, 125, 244, 174, 1, 242, 22, 244, 174, 1, 248, 42, 244, 174, 1, 245, 239, 244, 174, 1, 250, 38, 244, 174, 1, 254, 198, 244, 174, 1, 240, 62, 244, 174, 1, 240, 93, 244, 174, 1, 240, 61, 244, 174, 1, 253, 186, 244, 174, 1, 239, 106, 244, 174, 1, 246, 249, 244, 174, 1, 236, 127, 244, 174, 1, 244, 30, 244, 174, 241, 54, 65, 244, 174, 224, 241, 54, 65, 100, 1, 251, 1, 251, 3, 255, 7, 204, 100, 1, 186, 100, 1, 252, 245, 255, 25, 84, 100, 1, 254, 80, 100, 1, 181, 100, 1, 201, 100, 1, 240, 182, 248, 125, 242, 189, 100, 1, 249, 77, 100, 1, 245, 247, 64, 100, 1, 255, 18, 78, 100, 1, 255, 1, 64, 100, 1, 245, 237, 100, 1, 235, 178, 78, 100, 1, 235, 228, 78, 100, 1, 78, 100, 1, 253, 142, 100, 1, 253, 246, 100, 1, 248, 18, 254, 20, 252, 120, 135, 100, 1, 243, 185, 100, 1, 250, 181, 100, 1, 251, 144, 205, 100, 1, 194, 100, 1, 249, 66, 100, 1, 251, 29, 251, 55, 194, 100, 1, 251, 25, 100, 1, 248, 175, 253, 22, 201, 100, 1, 243, 140, 164, 100, 1, 246, 169, 164, 100, 1, 231, 254, 164, 100, 1, 232, 11, 164, 100, 1, 243, 235, 254, 162, 252, 0, 183, 100, 1, 235, 184, 183, 100, 1, 239, 5, 100, 1, 251, 115, 255, 10, 254, 118, 69, 100, 1, 70, 100, 1, 247, 1, 200, 100, 1, 251, 30, 100, 1, 235, 222, 253, 163, 100, 1, 236, 32, 64, 100, 1, 251, 116, 250, 245, 100, 1, 244, 33, 244, 32, 198, 100, 1, 245, 243, 243, 101, 100, 1, 244, 94, 159, 100, 1, 248, 75, 235, 179, 159, 100, 1, 235, 229, 159, 100, 1, 203, 100, 1, 202, 100, 1, 248, 132, 254, 193, 254, 195, 190, 100, 1, 235, 230, 190, 100, 1, 187, 100, 1, 240, 7, 246, 23, 241, 115, 199, 100, 1, 232, 1, 199, 100, 1, 239, 6, 100, 1, 241, 228, 100, 1, 246, 121, 255, 5, 70, 100, 1, 243, 212, 254, 55, 171, 100, 1, 234, 54, 171, 100, 1, 235, 183, 171, 100, 1, 243, 201, 251, 181, 251, 203, 148, 100, 1, 239, 4, 100, 1, 241, 185, 100, 1, 251, 111, 100, 1, 246, 78, 250, 204, 187, 100, 1, 241, 231, 246, 125, 78, 100, 1, 249, 218, 100, 1, 251, 113, 100, 1, 240, 22, 100, 1, 246, 40, 100, 1, 243, 57, 100, 1, 248, 103, 100, 1, 235, 180, 100, 1, 235, 231, 100, 1, 236, 22, 100, 1, 209, 100, 1, 170, 100, 242, 66, 236, 52, 100, 240, 120, 236, 52, 100, 244, 234, 236, 52, 100, 243, 34, 90, 100, 240, 187, 90, 100, 240, 6, 90, 240, 209, 1, 64, 240, 209, 1, 69, 240, 209, 1, 84, 240, 209, 1, 208, 240, 209, 1, 253, 100, 240, 209, 1, 249, 13, 240, 209, 1, 253, 91, 240, 209, 1, 253, 93, 240, 209, 1, 253, 94, 240, 209, 1, 253, 90, 240, 209, 1, 253, 110, 240, 209, 1, 221, 240, 209, 1, 216, 240, 209, 1, 253, 103, 240, 209, 1, 253, 98, 240, 209, 1, 253, 97, 240, 209, 1, 253, 88, 240, 209, 38, 25, 69, 240, 209, 38, 25, 84, 240, 209, 25, 240, 220, 240, 206, 1, 64, 240, 206, 1, 69, 240, 206, 1, 84, 240, 206, 1, 208, 240, 206, 1, 253, 100, 240, 206, 1, 249, 13, 240, 206, 1, 253, 91, 240, 206, 1, 253, 93, 240, 206, 1, 253, 94, 240, 206, 1, 253, 90, 240, 206, 1, 253, 110, 240, 206, 1, 221, 240, 206, 1, 216, 240, 206, 1, 253, 92, 240, 206, 1, 253, 103, 240, 206, 1, 253, 98, 240, 206, 1, 253, 97, 240, 206, 1, 253, 88, 240, 206, 38, 25, 69, 240, 206, 38, 25, 84, 240, 206, 25, 239, 58, 237, 162, 242, 66, 236, 52, 237, 162, 42, 236, 52, 244, 179, 1, 64, 244, 179, 1, 69, 244, 179, 1, 84, 244, 179, 1, 208, 244, 179, 1, 253, 100, 244, 179, 1, 249, 13, 244, 179, 1, 253, 91, 244, 179, 1, 253, 93, 244, 179, 1, 253, 94, 244, 179, 1, 253, 90, 244, 179, 1, 253, 110, 244, 179, 1, 221, 244, 179, 1, 216, 244, 179, 1, 253, 92, 244, 179, 1, 253, 103, 244, 179, 1, 253, 98, 244, 179, 1, 253, 97, 244, 179, 1, 253, 88, 244, 179, 38, 25, 69, 244, 179, 38, 25, 84, 239, 122, 1, 64, 239, 122, 1, 69, 239, 122, 1, 84, 239, 122, 1, 208, 239, 122, 1, 253, 100, 239, 122, 1, 249, 13, 239, 122, 1, 253, 91, 239, 122, 1, 253, 93, 239, 122, 1, 253, 94, 239, 122, 1, 253, 90, 239, 122, 1, 253, 110, 239, 122, 1, 221, 239, 122, 1, 216, 239, 122, 1, 253, 103, 239, 122, 1, 253, 98, 239, 122, 1, 253, 97, 239, 122, 38, 25, 69, 239, 122, 38, 25, 84, 74, 1, 208, 74, 1, 249, 24, 74, 1, 253, 155, 74, 1, 250, 0, 74, 1, 249, 110, 74, 1, 253, 115, 74, 1, 249, 11, 74, 1, 253, 178, 74, 1, 249, 94, 74, 1, 249, 84, 74, 1, 253, 93, 74, 1, 244, 195, 74, 1, 253, 193, 74, 1, 245, 213, 74, 1, 252, 32, 74, 1, 253, 91, 74, 1, 249, 19, 74, 1, 76, 74, 1, 249, 55, 74, 1, 253, 136, 74, 1, 253, 110, 74, 1, 249, 29, 74, 1, 253, 187, 74, 1, 250, 44, 74, 1, 253, 141, 74, 1, 253, 123, 74, 1, 253, 144, 74, 1, 253, 184, 74, 1, 253, 215, 74, 1, 249, 7, 74, 1, 250, 76, 74, 1, 253, 97, 74, 1, 253, 88, 74, 1, 253, 103, 74, 1, 253, 213, 74, 236, 183, 38, 252, 83, 74, 236, 183, 38, 249, 157, 74, 236, 183, 38, 253, 249, 74, 236, 183, 38, 250, 56, 74, 236, 183, 38, 254, 19, 74, 236, 183, 38, 252, 102, 74, 236, 183, 38, 250, 59, 74, 236, 183, 38, 248, 13, 74, 236, 183, 38, 254, 70, 74, 236, 183, 38, 252, 150, 74, 236, 183, 38, 254, 54, 74, 236, 183, 38, 251, 216, 74, 236, 183, 38, 254, 67, 74, 236, 183, 38, 250, 54, 74, 236, 183, 38, 254, 68, 249, 173, 121, 74, 236, 183, 38, 254, 68, 249, 173, 114, 74, 236, 183, 38, 252, 84, 74, 38, 239, 217, 254, 84, 74, 38, 239, 217, 253, 95, 74, 38, 25, 253, 95, 74, 38, 25, 69, 74, 38, 25, 253, 96, 74, 38, 25, 181, 74, 38, 25, 254, 26, 74, 38, 25, 84, 74, 38, 25, 253, 104, 74, 38, 25, 254, 196, 74, 38, 25, 253, 142, 74, 38, 25, 216, 74, 38, 25, 253, 181, 74, 38, 25, 70, 74, 38, 25, 253, 163, 74, 38, 25, 253, 106, 74, 38, 25, 253, 119, 74, 38, 25, 253, 109, 74, 25, 240, 126, 74, 25, 240, 151, 74, 25, 235, 234, 74, 25, 236, 145, 74, 25, 240, 186, 74, 25, 241, 109, 74, 25, 244, 62, 74, 25, 236, 175, 74, 25, 240, 97, 74, 25, 243, 27, 74, 25, 244, 70, 241, 254, 74, 25, 242, 52, 74, 25, 243, 72, 74, 25, 236, 248, 74, 25, 247, 31, 74, 25, 236, 247, 74, 25, 243, 55, 254, 169, 247, 43, 74, 25, 254, 133, 249, 167, 74, 25, 241, 113, 74, 25, 244, 35, 247, 100, 74, 25, 240, 101, 74, 239, 147, 13, 248, 22, 74, 25, 235, 211, 74, 27, 244, 173, 74, 27, 121, 74, 27, 114, 74, 27, 153, 74, 27, 163, 74, 27, 168, 74, 27, 169, 74, 27, 179, 74, 27, 176, 74, 27, 178, 51, 243, 45, 51, 238, 96, 51, 242, 84, 51, 213, 189, 51, 242, 81, 51, 249, 28, 244, 215, 51, 249, 1, 249, 119, 240, 241, 51, 249, 8, 4, 240, 9, 241, 205, 51, 242, 68, 242, 84, 51, 242, 68, 213, 189, 51, 241, 221, 51, 249, 135, 238, 79, 239, 195, 121, 51, 249, 135, 238, 79, 239, 195, 114, 51, 249, 135, 238, 79, 239, 195, 153, 51, 38, 237, 114, 51, 27, 244, 173, 51, 27, 121, 51, 27, 114, 51, 27, 153, 51, 27, 163, 51, 27, 168, 51, 27, 169, 51, 27, 179, 51, 27, 176, 51, 27, 178, 51, 1, 64, 51, 1, 70, 51, 1, 69, 51, 1, 78, 51, 1, 84, 51, 1, 253, 142, 51, 1, 253, 253, 51, 1, 253, 126, 51, 1, 253, 94, 51, 1, 249, 75, 51, 1, 253, 110, 51, 1, 253, 90, 51, 1, 253, 213, 51, 1, 253, 100, 51, 1, 221, 51, 1, 253, 103, 51, 1, 253, 97, 51, 1, 249, 7, 51, 1, 253, 91, 51, 1, 253, 93, 51, 1, 249, 11, 51, 1, 253, 118, 51, 1, 216, 51, 1, 253, 92, 51, 1, 253, 98, 51, 1, 253, 153, 51, 1, 208, 51, 1, 249, 24, 51, 1, 249, 56, 51, 1, 253, 129, 51, 1, 249, 68, 51, 1, 253, 72, 51, 1, 249, 144, 51, 1, 250, 125, 51, 1, 249, 23, 51, 1, 249, 1, 165, 38, 57, 51, 1, 249, 1, 70, 51, 1, 249, 1, 69, 51, 1, 249, 1, 78, 51, 1, 249, 1, 84, 51, 1, 249, 1, 253, 142, 51, 1, 249, 1, 253, 253, 51, 1, 249, 1, 249, 75, 51, 1, 249, 1, 253, 110, 51, 1, 249, 1, 253, 90, 51, 1, 249, 1, 253, 213, 51, 1, 249, 1, 253, 100, 51, 1, 249, 1, 221, 51, 1, 249, 1, 253, 91, 51, 1, 249, 1, 253, 93, 51, 1, 249, 1, 249, 11, 51, 1, 249, 1, 253, 118, 51, 1, 249, 1, 249, 56, 51, 1, 249, 1, 216, 51, 1, 249, 1, 253, 98, 51, 1, 249, 1, 208, 51, 1, 249, 1, 249, 136, 51, 1, 249, 1, 249, 68, 51, 1, 249, 1, 251, 121, 51, 1, 249, 1, 252, 21, 51, 1, 249, 1, 249, 100, 51, 1, 249, 8, 70, 51, 1, 249, 8, 69, 51, 1, 249, 8, 254, 122, 51, 1, 249, 8, 253, 253, 51, 1, 249, 8, 84, 51, 1, 249, 8, 249, 75, 51, 1, 249, 8, 208, 51, 1, 249, 8, 253, 100, 51, 1, 249, 8, 253, 88, 51, 1, 249, 8, 253, 90, 51, 1, 249, 8, 249, 7, 51, 1, 249, 8, 253, 91, 51, 1, 249, 8, 253, 93, 51, 1, 249, 8, 253, 118, 51, 1, 249, 8, 253, 153, 51, 1, 249, 8, 249, 136, 51, 1, 249, 8, 249, 68, 51, 1, 249, 8, 249, 56, 51, 1, 249, 8, 253, 129, 51, 1, 249, 8, 249, 115, 51, 1, 249, 8, 249, 11, 51, 1, 249, 8, 249, 52, 51, 1, 242, 68, 69, 51, 1, 242, 68, 208, 51, 1, 242, 68, 253, 92, 51, 1, 242, 68, 253, 153, 51, 1, 242, 68, 249, 52, 51, 1, 192, 195, 239, 252, 121, 51, 1, 192, 195, 242, 53, 121, 51, 1, 192, 195, 241, 134, 51, 1, 192, 195, 239, 244, 51, 1, 192, 195, 239, 116, 239, 244, 51, 1, 192, 195, 241, 40, 51, 1, 192, 195, 244, 171, 241, 40, 51, 1, 192, 195, 64, 51, 1, 192, 195, 69, 51, 1, 192, 195, 208, 51, 1, 192, 195, 249, 13, 51, 1, 192, 195, 253, 115, 51, 1, 192, 195, 249, 22, 51, 1, 192, 195, 244, 195, 51, 1, 192, 195, 249, 27, 51, 1, 192, 195, 249, 37, 51, 1, 192, 195, 253, 91, 51, 1, 192, 195, 253, 93, 51, 1, 192, 195, 253, 90, 51, 1, 192, 195, 249, 29, 51, 1, 192, 195, 249, 34, 51, 1, 192, 195, 249, 52, 51, 1, 192, 195, 253, 129, 51, 1, 192, 195, 253, 219, 51, 1, 249, 1, 192, 195, 253, 91, 51, 1, 249, 1, 192, 195, 249, 52, 51, 1, 242, 68, 192, 195, 249, 36, 51, 1, 242, 68, 192, 195, 249, 13, 51, 1, 242, 68, 192, 195, 253, 115, 51, 1, 242, 68, 192, 195, 249, 45, 51, 1, 242, 68, 192, 195, 249, 22, 51, 1, 242, 68, 192, 195, 244, 200, 51, 1, 242, 68, 192, 195, 253, 91, 51, 1, 242, 68, 192, 195, 249, 40, 51, 1, 242, 68, 192, 195, 249, 34, 51, 1, 242, 68, 192, 195, 250, 199, 51, 1, 242, 68, 192, 195, 249, 52, 51, 1, 242, 68, 192, 195, 253, 129, 51, 1, 192, 195, 136, 84, 51, 1, 192, 195, 136, 216, 51, 1, 242, 68, 192, 195, 249, 39, 51, 1, 192, 195, 240, 23, 9, 5, 1, 119, 2, 249, 9, 45, 9, 3, 1, 119, 2, 249, 9, 45, 9, 5, 1, 255, 41, 2, 49, 47, 9, 3, 1, 255, 41, 2, 49, 47, 9, 5, 1, 255, 41, 2, 49, 45, 9, 3, 1, 255, 41, 2, 49, 45, 9, 5, 1, 255, 41, 2, 217, 45, 9, 3, 1, 255, 41, 2, 217, 45, 9, 5, 1, 255, 36, 2, 240, 250, 18, 116, 9, 3, 1, 255, 36, 2, 240, 250, 18, 116, 9, 5, 1, 255, 34, 2, 49, 47, 9, 3, 1, 255, 34, 2, 49, 47, 9, 5, 1, 255, 34, 2, 49, 45, 9, 3, 1, 255, 34, 2, 49, 45, 9, 5, 1, 255, 34, 2, 217, 45, 9, 3, 1, 255, 34, 2, 217, 45, 9, 5, 1, 255, 34, 2, 239, 117, 9, 3, 1, 255, 34, 2, 239, 117, 9, 5, 1, 255, 34, 2, 157, 45, 9, 3, 1, 255, 34, 2, 157, 45, 9, 5, 1, 144, 2, 242, 101, 18, 158, 9, 3, 1, 144, 2, 242, 101, 18, 158, 9, 5, 1, 144, 2, 242, 101, 18, 116, 9, 3, 1, 144, 2, 242, 101, 18, 116, 9, 5, 1, 144, 2, 157, 45, 9, 3, 1, 144, 2, 157, 45, 9, 5, 1, 144, 2, 229, 45, 9, 3, 1, 144, 2, 229, 45, 9, 5, 1, 144, 2, 240, 250, 18, 212, 9, 3, 1, 144, 2, 240, 250, 18, 212, 9, 5, 1, 255, 42, 2, 49, 47, 9, 3, 1, 255, 42, 2, 49, 47, 9, 5, 1, 255, 32, 2, 166, 9, 3, 1, 255, 32, 2, 166, 9, 5, 1, 255, 37, 2, 49, 47, 9, 3, 1, 255, 37, 2, 49, 47, 9, 5, 1, 255, 37, 2, 49, 45, 9, 3, 1, 255, 37, 2, 49, 45, 9, 5, 1, 255, 37, 2, 150, 9, 3, 1, 255, 37, 2, 150, 9, 5, 1, 255, 37, 2, 239, 117, 9, 3, 1, 255, 37, 2, 239, 117, 9, 5, 1, 255, 37, 2, 244, 194, 45, 9, 3, 1, 255, 37, 2, 244, 194, 45, 9, 5, 1, 197, 2, 229, 45, 9, 3, 1, 197, 2, 229, 45, 9, 5, 1, 197, 2, 238, 81, 18, 116, 9, 3, 1, 197, 2, 238, 81, 18, 116, 9, 5, 1, 255, 38, 2, 116, 9, 3, 1, 255, 38, 2, 116, 9, 5, 1, 255, 38, 2, 49, 45, 9, 3, 1, 255, 38, 2, 49, 45, 9, 5, 1, 255, 38, 2, 217, 45, 9, 3, 1, 255, 38, 2, 217, 45, 9, 5, 1, 255, 31, 2, 49, 45, 9, 3, 1, 255, 31, 2, 49, 45, 9, 5, 1, 255, 31, 2, 49, 244, 188, 18, 166, 9, 3, 1, 255, 31, 2, 49, 244, 188, 18, 166, 9, 5, 1, 255, 31, 2, 217, 45, 9, 3, 1, 255, 31, 2, 217, 45, 9, 5, 1, 255, 31, 2, 157, 45, 9, 3, 1, 255, 31, 2, 157, 45, 9, 5, 1, 255, 39, 2, 116, 9, 3, 1, 255, 39, 2, 116, 9, 5, 1, 255, 39, 2, 49, 47, 9, 3, 1, 255, 39, 2, 49, 47, 9, 5, 1, 255, 39, 2, 49, 45, 9, 3, 1, 255, 39, 2, 49, 45, 9, 5, 1, 255, 28, 2, 49, 47, 9, 3, 1, 255, 28, 2, 49, 47, 9, 5, 1, 255, 28, 2, 49, 45, 9, 3, 1, 255, 28, 2, 49, 45, 9, 5, 1, 255, 28, 2, 217, 45, 9, 3, 1, 255, 28, 2, 217, 45, 9, 5, 1, 255, 28, 2, 157, 45, 9, 3, 1, 255, 28, 2, 157, 45, 9, 5, 1, 109, 2, 229, 18, 116, 9, 3, 1, 109, 2, 229, 18, 116, 9, 5, 1, 109, 2, 229, 18, 150, 9, 3, 1, 109, 2, 229, 18, 150, 9, 5, 1, 109, 2, 242, 101, 18, 158, 9, 3, 1, 109, 2, 242, 101, 18, 158, 9, 5, 1, 109, 2, 242, 101, 18, 116, 9, 3, 1, 109, 2, 242, 101, 18, 116, 9, 5, 1, 255, 46, 2, 116, 9, 3, 1, 255, 46, 2, 116, 9, 5, 1, 255, 46, 2, 49, 47, 9, 3, 1, 255, 46, 2, 49, 47, 9, 5, 1, 255, 30, 2, 49, 47, 9, 3, 1, 255, 30, 2, 49, 47, 9, 5, 1, 255, 30, 2, 49, 45, 9, 3, 1, 255, 30, 2, 49, 45, 9, 5, 1, 255, 30, 2, 49, 244, 188, 18, 166, 9, 3, 1, 255, 30, 2, 49, 244, 188, 18, 166, 9, 5, 1, 255, 30, 2, 217, 45, 9, 3, 1, 255, 30, 2, 217, 45, 9, 5, 1, 255, 29, 2, 49, 47, 9, 3, 1, 255, 29, 2, 49, 47, 9, 5, 1, 255, 29, 2, 49, 45, 9, 3, 1, 255, 29, 2, 49, 45, 9, 5, 1, 255, 29, 2, 244, 196, 18, 49, 47, 9, 3, 1, 255, 29, 2, 244, 196, 18, 49, 47, 9, 5, 1, 255, 29, 2, 245, 15, 18, 49, 47, 9, 3, 1, 255, 29, 2, 245, 15, 18, 49, 47, 9, 5, 1, 255, 29, 2, 49, 244, 188, 18, 49, 47, 9, 3, 1, 255, 29, 2, 49, 244, 188, 18, 49, 47, 9, 5, 1, 255, 33, 2, 49, 47, 9, 3, 1, 255, 33, 2, 49, 47, 9, 5, 1, 255, 33, 2, 49, 45, 9, 3, 1, 255, 33, 2, 49, 45, 9, 5, 1, 255, 33, 2, 217, 45, 9, 3, 1, 255, 33, 2, 217, 45, 9, 5, 1, 255, 33, 2, 157, 45, 9, 3, 1, 255, 33, 2, 157, 45, 9, 5, 1, 115, 2, 238, 81, 45, 9, 3, 1, 115, 2, 238, 81, 45, 9, 5, 1, 115, 2, 229, 45, 9, 3, 1, 115, 2, 229, 45, 9, 5, 1, 115, 2, 157, 45, 9, 3, 1, 115, 2, 157, 45, 9, 5, 1, 115, 2, 229, 18, 116, 9, 3, 1, 115, 2, 229, 18, 116, 9, 5, 1, 115, 2, 242, 101, 18, 150, 9, 3, 1, 115, 2, 242, 101, 18, 150, 9, 5, 1, 255, 44, 2, 180, 9, 3, 1, 255, 44, 2, 180, 9, 5, 1, 255, 44, 2, 49, 45, 9, 3, 1, 255, 44, 2, 49, 45, 9, 5, 1, 255, 40, 2, 158, 9, 3, 1, 255, 40, 2, 158, 9, 5, 1, 255, 40, 2, 116, 9, 3, 1, 255, 40, 2, 116, 9, 5, 1, 255, 40, 2, 150, 9, 3, 1, 255, 40, 2, 150, 9, 5, 1, 255, 40, 2, 49, 47, 9, 3, 1, 255, 40, 2, 49, 47, 9, 5, 1, 255, 40, 2, 49, 45, 9, 3, 1, 255, 40, 2, 49, 45, 9, 5, 1, 255, 43, 2, 49, 47, 9, 3, 1, 255, 43, 2, 49, 47, 9, 5, 1, 255, 43, 2, 150, 9, 3, 1, 255, 43, 2, 150, 9, 5, 1, 255, 35, 2, 49, 47, 9, 3, 1, 255, 35, 2, 49, 47, 9, 5, 1, 255, 27, 2, 236, 180, 9, 3, 1, 255, 27, 2, 236, 180, 9, 5, 1, 255, 27, 2, 49, 45, 9, 3, 1, 255, 27, 2, 49, 45, 9, 5, 1, 255, 27, 2, 217, 45, 9, 3, 1, 255, 27, 2, 217, 45, 9, 3, 1, 255, 37, 2, 217, 45, 9, 3, 1, 255, 33, 2, 150, 9, 3, 1, 255, 40, 2, 249, 9, 47, 9, 3, 1, 255, 35, 2, 249, 9, 47, 9, 3, 1, 119, 2, 37, 136, 244, 183, 9, 3, 1, 165, 255, 29, 2, 49, 47, 9, 5, 1, 119, 2, 49, 45, 9, 3, 1, 119, 2, 49, 45, 9, 5, 1, 119, 2, 248, 255, 47, 9, 3, 1, 119, 2, 248, 255, 47, 9, 5, 1, 119, 2, 157, 18, 116, 9, 3, 1, 119, 2, 157, 18, 116, 9, 5, 1, 119, 2, 157, 18, 158, 9, 3, 1, 119, 2, 157, 18, 158, 9, 5, 1, 119, 2, 157, 18, 248, 255, 47, 9, 3, 1, 119, 2, 157, 18, 248, 255, 47, 9, 5, 1, 119, 2, 157, 18, 180, 9, 3, 1, 119, 2, 157, 18, 180, 9, 5, 1, 119, 2, 157, 18, 49, 45, 9, 3, 1, 119, 2, 157, 18, 49, 45, 9, 5, 1, 119, 2, 244, 194, 18, 116, 9, 3, 1, 119, 2, 244, 194, 18, 116, 9, 5, 1, 119, 2, 244, 194, 18, 158, 9, 3, 1, 119, 2, 244, 194, 18, 158, 9, 5, 1, 119, 2, 244, 194, 18, 248, 255, 47, 9, 3, 1, 119, 2, 244, 194, 18, 248, 255, 47, 9, 5, 1, 119, 2, 244, 194, 18, 180, 9, 3, 1, 119, 2, 244, 194, 18, 180, 9, 5, 1, 119, 2, 244, 194, 18, 49, 45, 9, 3, 1, 119, 2, 244, 194, 18, 49, 45, 9, 5, 1, 144, 2, 49, 45, 9, 3, 1, 144, 2, 49, 45, 9, 5, 1, 144, 2, 248, 255, 47, 9, 3, 1, 144, 2, 248, 255, 47, 9, 5, 1, 144, 2, 180, 9, 3, 1, 144, 2, 180, 9, 5, 1, 144, 2, 157, 18, 116, 9, 3, 1, 144, 2, 157, 18, 116, 9, 5, 1, 144, 2, 157, 18, 158, 9, 3, 1, 144, 2, 157, 18, 158, 9, 5, 1, 144, 2, 157, 18, 248, 255, 47, 9, 3, 1, 144, 2, 157, 18, 248, 255, 47, 9, 5, 1, 144, 2, 157, 18, 180, 9, 3, 1, 144, 2, 157, 18, 180, 9, 5, 1, 144, 2, 157, 18, 49, 45, 9, 3, 1, 144, 2, 157, 18, 49, 45, 9, 5, 1, 197, 2, 248, 255, 47, 9, 3, 1, 197, 2, 248, 255, 47, 9, 5, 1, 197, 2, 49, 45, 9, 3, 1, 197, 2, 49, 45, 9, 5, 1, 109, 2, 49, 45, 9, 3, 1, 109, 2, 49, 45, 9, 5, 1, 109, 2, 248, 255, 47, 9, 3, 1, 109, 2, 248, 255, 47, 9, 5, 1, 109, 2, 157, 18, 116, 9, 3, 1, 109, 2, 157, 18, 116, 9, 5, 1, 109, 2, 157, 18, 158, 9, 3, 1, 109, 2, 157, 18, 158, 9, 5, 1, 109, 2, 157, 18, 248, 255, 47, 9, 3, 1, 109, 2, 157, 18, 248, 255, 47, 9, 5, 1, 109, 2, 157, 18, 180, 9, 3, 1, 109, 2, 157, 18, 180, 9, 5, 1, 109, 2, 157, 18, 49, 45, 9, 3, 1, 109, 2, 157, 18, 49, 45, 9, 5, 1, 109, 2, 249, 12, 18, 116, 9, 3, 1, 109, 2, 249, 12, 18, 116, 9, 5, 1, 109, 2, 249, 12, 18, 158, 9, 3, 1, 109, 2, 249, 12, 18, 158, 9, 5, 1, 109, 2, 249, 12, 18, 248, 255, 47, 9, 3, 1, 109, 2, 249, 12, 18, 248, 255, 47, 9, 5, 1, 109, 2, 249, 12, 18, 180, 9, 3, 1, 109, 2, 249, 12, 18, 180, 9, 5, 1, 109, 2, 249, 12, 18, 49, 45, 9, 3, 1, 109, 2, 249, 12, 18, 49, 45, 9, 5, 1, 115, 2, 49, 45, 9, 3, 1, 115, 2, 49, 45, 9, 5, 1, 115, 2, 248, 255, 47, 9, 3, 1, 115, 2, 248, 255, 47, 9, 5, 1, 115, 2, 249, 12, 18, 116, 9, 3, 1, 115, 2, 249, 12, 18, 116, 9, 5, 1, 115, 2, 249, 12, 18, 158, 9, 3, 1, 115, 2, 249, 12, 18, 158, 9, 5, 1, 115, 2, 249, 12, 18, 248, 255, 47, 9, 3, 1, 115, 2, 249, 12, 18, 248, 255, 47, 9, 5, 1, 115, 2, 249, 12, 18, 180, 9, 3, 1, 115, 2, 249, 12, 18, 180, 9, 5, 1, 115, 2, 249, 12, 18, 49, 45, 9, 3, 1, 115, 2, 249, 12, 18, 49, 45, 9, 5, 1, 255, 35, 2, 158, 9, 3, 1, 255, 35, 2, 158, 9, 5, 1, 255, 35, 2, 49, 45, 9, 3, 1, 255, 35, 2, 49, 45, 9, 5, 1, 255, 35, 2, 248, 255, 47, 9, 3, 1, 255, 35, 2, 248, 255, 47, 9, 5, 1, 255, 35, 2, 180, 9, 3, 1, 255, 35, 2, 180, 26, 3, 1, 162, 2, 242, 78, 26, 3, 1, 162, 2, 242, 74, 26, 3, 1, 162, 2, 138, 18, 174, 26, 3, 1, 162, 2, 130, 18, 174, 26, 3, 1, 162, 2, 138, 18, 173, 26, 3, 1, 162, 2, 130, 18, 173, 26, 3, 1, 162, 2, 138, 18, 236, 43, 26, 3, 1, 162, 2, 130, 18, 236, 43, 26, 5, 1, 162, 2, 242, 78, 26, 5, 1, 162, 2, 242, 74, 26, 5, 1, 162, 2, 138, 18, 174, 26, 5, 1, 162, 2, 130, 18, 174, 26, 5, 1, 162, 2, 138, 18, 173, 26, 5, 1, 162, 2, 130, 18, 173, 26, 5, 1, 162, 2, 138, 18, 236, 43, 26, 5, 1, 162, 2, 130, 18, 236, 43, 26, 3, 1, 240, 204, 2, 242, 78, 26, 3, 1, 240, 204, 2, 242, 74, 26, 3, 1, 240, 204, 2, 138, 18, 174, 26, 3, 1, 240, 204, 2, 130, 18, 174, 26, 3, 1, 240, 204, 2, 138, 18, 173, 26, 3, 1, 240, 204, 2, 130, 18, 173, 26, 5, 1, 240, 204, 2, 242, 78, 26, 5, 1, 240, 204, 2, 242, 74, 26, 5, 1, 240, 204, 2, 138, 18, 174, 26, 5, 1, 240, 204, 2, 130, 18, 174, 26, 5, 1, 240, 204, 2, 138, 18, 173, 26, 5, 1, 240, 204, 2, 130, 18, 173, 26, 3, 1, 182, 2, 242, 78, 26, 3, 1, 182, 2, 242, 74, 26, 3, 1, 182, 2, 138, 18, 174, 26, 3, 1, 182, 2, 130, 18, 174, 26, 3, 1, 182, 2, 138, 18, 173, 26, 3, 1, 182, 2, 130, 18, 173, 26, 3, 1, 182, 2, 138, 18, 236, 43, 26, 3, 1, 182, 2, 130, 18, 236, 43, 26, 5, 1, 182, 2, 242, 78, 26, 5, 1, 182, 2, 242, 74, 26, 5, 1, 182, 2, 138, 18, 174, 26, 5, 1, 182, 2, 130, 18, 174, 26, 5, 1, 182, 2, 138, 18, 173, 26, 5, 1, 182, 2, 130, 18, 173, 26, 5, 1, 182, 2, 138, 18, 236, 43, 26, 5, 1, 182, 2, 130, 18, 236, 43, 26, 3, 1, 228, 2, 242, 78, 26, 3, 1, 228, 2, 242, 74, 26, 3, 1, 228, 2, 138, 18, 174, 26, 3, 1, 228, 2, 130, 18, 174, 26, 3, 1, 228, 2, 138, 18, 173, 26, 3, 1, 228, 2, 130, 18, 173, 26, 3, 1, 228, 2, 138, 18, 236, 43, 26, 3, 1, 228, 2, 130, 18, 236, 43, 26, 5, 1, 228, 2, 242, 78, 26, 5, 1, 228, 2, 242, 74, 26, 5, 1, 228, 2, 138, 18, 174, 26, 5, 1, 228, 2, 130, 18, 174, 26, 5, 1, 228, 2, 138, 18, 173, 26, 5, 1, 228, 2, 130, 18, 173, 26, 5, 1, 228, 2, 138, 18, 236, 43, 26, 5, 1, 228, 2, 130, 18, 236, 43, 26, 3, 1, 240, 210, 2, 242, 78, 26, 3, 1, 240, 210, 2, 242, 74, 26, 3, 1, 240, 210, 2, 138, 18, 174, 26, 3, 1, 240, 210, 2, 130, 18, 174, 26, 3, 1, 240, 210, 2, 138, 18, 173, 26, 3, 1, 240, 210, 2, 130, 18, 173, 26, 5, 1, 240, 210, 2, 242, 78, 26, 5, 1, 240, 210, 2, 242, 74, 26, 5, 1, 240, 210, 2, 138, 18, 174, 26, 5, 1, 240, 210, 2, 130, 18, 174, 26, 5, 1, 240, 210, 2, 138, 18, 173, 26, 5, 1, 240, 210, 2, 130, 18, 173, 26, 3, 1, 240, 199, 2, 242, 78, 26, 3, 1, 240, 199, 2, 242, 74, 26, 3, 1, 240, 199, 2, 138, 18, 174, 26, 3, 1, 240, 199, 2, 130, 18, 174, 26, 3, 1, 240, 199, 2, 138, 18, 173, 26, 3, 1, 240, 199, 2, 130, 18, 173, 26, 3, 1, 240, 199, 2, 138, 18, 236, 43, 26, 3, 1, 240, 199, 2, 130, 18, 236, 43, 26, 5, 1, 240, 199, 2, 242, 74, 26, 5, 1, 240, 199, 2, 130, 18, 174, 26, 5, 1, 240, 199, 2, 130, 18, 173, 26, 5, 1, 240, 199, 2, 130, 18, 236, 43, 26, 3, 1, 172, 2, 242, 78, 26, 3, 1, 172, 2, 242, 74, 26, 3, 1, 172, 2, 138, 18, 174, 26, 3, 1, 172, 2, 130, 18, 174, 26, 3, 1, 172, 2, 138, 18, 173, 26, 3, 1, 172, 2, 130, 18, 173, 26, 3, 1, 172, 2, 138, 18, 236, 43, 26, 3, 1, 172, 2, 130, 18, 236, 43, 26, 5, 1, 172, 2, 242, 78, 26, 5, 1, 172, 2, 242, 74, 26, 5, 1, 172, 2, 138, 18, 174, 26, 5, 1, 172, 2, 130, 18, 174, 26, 5, 1, 172, 2, 138, 18, 173, 26, 5, 1, 172, 2, 130, 18, 173, 26, 5, 1, 172, 2, 138, 18, 236, 43, 26, 5, 1, 172, 2, 130, 18, 236, 43, 26, 3, 1, 162, 2, 174, 26, 3, 1, 162, 2, 173, 26, 3, 1, 240, 204, 2, 174, 26, 3, 1, 240, 204, 2, 173, 26, 3, 1, 182, 2, 174, 26, 3, 1, 182, 2, 173, 26, 3, 1, 228, 2, 174, 26, 3, 1, 228, 2, 173, 26, 3, 1, 240, 210, 2, 174, 26, 3, 1, 240, 210, 2, 173, 26, 3, 1, 240, 199, 2, 174, 26, 3, 1, 240, 199, 2, 173, 26, 3, 1, 172, 2, 174, 26, 3, 1, 172, 2, 173, 26, 3, 1, 162, 2, 138, 18, 211, 26, 3, 1, 162, 2, 130, 18, 211, 26, 3, 1, 162, 2, 138, 18, 244, 193, 18, 211, 26, 3, 1, 162, 2, 130, 18, 244, 193, 18, 211, 26, 3, 1, 162, 2, 138, 18, 249, 26, 18, 211, 26, 3, 1, 162, 2, 130, 18, 249, 26, 18, 211, 26, 3, 1, 162, 2, 138, 18, 236, 184, 18, 211, 26, 3, 1, 162, 2, 130, 18, 236, 184, 18, 211, 26, 5, 1, 162, 2, 138, 18, 234, 62, 26, 5, 1, 162, 2, 130, 18, 234, 62, 26, 5, 1, 162, 2, 138, 18, 244, 193, 18, 234, 62, 26, 5, 1, 162, 2, 130, 18, 244, 193, 18, 234, 62, 26, 5, 1, 162, 2, 138, 18, 249, 26, 18, 234, 62, 26, 5, 1, 162, 2, 130, 18, 249, 26, 18, 234, 62, 26, 5, 1, 162, 2, 138, 18, 236, 184, 18, 234, 62, 26, 5, 1, 162, 2, 130, 18, 236, 184, 18, 234, 62, 26, 3, 1, 182, 2, 138, 18, 211, 26, 3, 1, 182, 2, 130, 18, 211, 26, 3, 1, 182, 2, 138, 18, 244, 193, 18, 211, 26, 3, 1, 182, 2, 130, 18, 244, 193, 18, 211, 26, 3, 1, 182, 2, 138, 18, 249, 26, 18, 211, 26, 3, 1, 182, 2, 130, 18, 249, 26, 18, 211, 26, 3, 1, 182, 2, 138, 18, 236, 184, 18, 211, 26, 3, 1, 182, 2, 130, 18, 236, 184, 18, 211, 26, 5, 1, 182, 2, 138, 18, 234, 62, 26, 5, 1, 182, 2, 130, 18, 234, 62, 26, 5, 1, 182, 2, 138, 18, 244, 193, 18, 234, 62, 26, 5, 1, 182, 2, 130, 18, 244, 193, 18, 234, 62, 26, 5, 1, 182, 2, 138, 18, 249, 26, 18, 234, 62, 26, 5, 1, 182, 2, 130, 18, 249, 26, 18, 234, 62, 26, 5, 1, 182, 2, 138, 18, 236, 184, 18, 234, 62, 26, 5, 1, 182, 2, 130, 18, 236, 184, 18, 234, 62, 26, 3, 1, 172, 2, 138, 18, 211, 26, 3, 1, 172, 2, 130, 18, 211, 26, 3, 1, 172, 2, 138, 18, 244, 193, 18, 211, 26, 3, 1, 172, 2, 130, 18, 244, 193, 18, 211, 26, 3, 1, 172, 2, 138, 18, 249, 26, 18, 211, 26, 3, 1, 172, 2, 130, 18, 249, 26, 18, 211, 26, 3, 1, 172, 2, 138, 18, 236, 184, 18, 211, 26, 3, 1, 172, 2, 130, 18, 236, 184, 18, 211, 26, 5, 1, 172, 2, 138, 18, 234, 62, 26, 5, 1, 172, 2, 130, 18, 234, 62, 26, 5, 1, 172, 2, 138, 18, 244, 193, 18, 234, 62, 26, 5, 1, 172, 2, 130, 18, 244, 193, 18, 234, 62, 26, 5, 1, 172, 2, 138, 18, 249, 26, 18, 234, 62, 26, 5, 1, 172, 2, 130, 18, 249, 26, 18, 234, 62, 26, 5, 1, 172, 2, 138, 18, 236, 184, 18, 234, 62, 26, 5, 1, 172, 2, 130, 18, 236, 184, 18, 234, 62, 26, 3, 1, 162, 2, 240, 245, 26, 3, 1, 162, 2, 166, 26, 3, 1, 162, 2, 244, 193, 18, 211, 26, 3, 1, 162, 2, 211, 26, 3, 1, 162, 2, 249, 26, 18, 211, 26, 3, 1, 162, 2, 236, 43, 26, 3, 1, 162, 2, 236, 184, 18, 211, 26, 5, 1, 162, 2, 240, 245, 26, 5, 1, 162, 2, 166, 26, 5, 1, 162, 2, 174, 26, 5, 1, 162, 2, 173, 26, 5, 1, 162, 2, 234, 62, 26, 239, 186, 26, 234, 62, 26, 242, 78, 26, 236, 43, 26, 238, 85, 18, 236, 43, 26, 3, 1, 182, 2, 244, 193, 18, 211, 26, 3, 1, 182, 2, 211, 26, 3, 1, 182, 2, 249, 26, 18, 211, 26, 3, 1, 182, 2, 236, 43, 26, 3, 1, 182, 2, 236, 184, 18, 211, 26, 5, 1, 240, 204, 2, 174, 26, 5, 1, 240, 204, 2, 173, 26, 5, 1, 182, 2, 174, 26, 5, 1, 182, 2, 173, 26, 5, 1, 182, 2, 234, 62, 26, 138, 18, 174, 26, 138, 18, 173, 26, 138, 18, 236, 43, 26, 3, 1, 228, 2, 240, 245, 26, 3, 1, 228, 2, 166, 26, 3, 1, 228, 2, 238, 85, 18, 174, 26, 3, 1, 228, 2, 238, 85, 18, 173, 26, 3, 1, 228, 2, 236, 43, 26, 3, 1, 228, 2, 238, 85, 18, 236, 43, 26, 5, 1, 228, 2, 240, 245, 26, 5, 1, 228, 2, 166, 26, 5, 1, 228, 2, 174, 26, 5, 1, 228, 2, 173, 26, 130, 18, 174, 26, 130, 18, 173, 26, 130, 18, 236, 43, 26, 3, 1, 240, 199, 2, 240, 245, 26, 3, 1, 240, 199, 2, 166, 26, 3, 1, 240, 199, 2, 238, 85, 18, 174, 26, 3, 1, 240, 199, 2, 238, 85, 18, 173, 26, 3, 1, 253, 168, 2, 242, 78, 26, 3, 1, 253, 168, 2, 242, 74, 26, 3, 1, 240, 199, 2, 236, 43, 26, 3, 1, 240, 199, 2, 238, 85, 18, 236, 43, 26, 5, 1, 240, 199, 2, 240, 245, 26, 5, 1, 240, 199, 2, 166, 26, 5, 1, 240, 199, 2, 174, 26, 5, 1, 240, 199, 2, 173, 26, 5, 1, 253, 168, 2, 242, 74, 26, 238, 85, 18, 174, 26, 238, 85, 18, 173, 26, 174, 26, 3, 1, 172, 2, 244, 193, 18, 211, 26, 3, 1, 172, 2, 211, 26, 3, 1, 172, 2, 249, 26, 18, 211, 26, 3, 1, 172, 2, 236, 43, 26, 3, 1, 172, 2, 236, 184, 18, 211, 26, 5, 1, 240, 210, 2, 174, 26, 5, 1, 240, 210, 2, 173, 26, 5, 1, 172, 2, 174, 26, 5, 1, 172, 2, 173, 26, 5, 1, 172, 2, 234, 62, 26, 173, 26, 242, 74, 254, 215, 244, 238, 254, 220, 244, 238, 254, 215, 242, 69, 254, 220, 242, 69, 236, 174, 242, 69, 237, 63, 242, 69, 238, 61, 242, 69, 242, 211, 242, 69, 236, 191, 242, 69, 252, 206, 242, 69, 251, 57, 242, 69, 249, 127, 245, 12, 242, 69, 249, 127, 245, 12, 237, 77, 249, 127, 245, 12, 241, 22, 235, 245, 65, 235, 248, 65, 240, 241, 236, 149, 240, 241, 242, 211, 244, 189, 254, 215, 244, 189, 254, 220, 244, 189, 146, 143, 42, 55, 244, 176, 42, 253, 113, 244, 176, 36, 242, 66, 238, 76, 65, 37, 242, 66, 238, 76, 65, 242, 66, 245, 135, 238, 76, 65, 242, 66, 234, 67, 238, 76, 65, 36, 42, 238, 76, 65, 37, 42, 238, 76, 65, 42, 245, 135, 238, 76, 65, 42, 234, 67, 238, 76, 65, 241, 50, 42, 241, 50, 240, 215, 237, 144, 240, 215, 253, 101, 49, 241, 25, 225, 49, 241, 25, 146, 238, 96, 237, 67, 242, 239, 217, 237, 114, 238, 113, 237, 114, 235, 245, 237, 154, 235, 248, 237, 154, 254, 171, 237, 1, 237, 62, 235, 245, 238, 148, 235, 248, 238, 148, 243, 234, 239, 190, 242, 69, 254, 66, 247, 96, 57, 254, 66, 253, 250, 239, 243, 57, 242, 107, 42, 242, 107, 242, 59, 242, 107, 224, 242, 107, 224, 42, 242, 107, 224, 242, 59, 242, 107, 242, 174, 242, 66, 235, 237, 160, 238, 76, 65, 242, 66, 235, 190, 160, 238, 76, 65, 239, 72, 65, 42, 236, 186, 65, 236, 140, 238, 98, 239, 109, 92, 249, 89, 244, 225, 238, 144, 242, 239, 238, 180, 243, 171, 240, 215, 239, 123, 242, 91, 36, 30, 226, 2, 242, 242, 37, 30, 226, 2, 242, 242, 42, 239, 126, 65, 239, 126, 236, 186, 65, 236, 186, 239, 126, 65, 240, 184, 25, 254, 11, 224, 241, 74, 57, 86, 126, 240, 215, 86, 63, 240, 215, 253, 113, 238, 77, 224, 237, 123, 246, 71, 253, 131, 225, 238, 179, 241, 96, 237, 108, 237, 127, 244, 197, 57, 238, 94, 242, 107, 242, 82, 8, 242, 69, 253, 19, 241, 22, 240, 80, 236, 85, 238, 145, 242, 167, 238, 145, 237, 114, 241, 58, 238, 161, 238, 160, 239, 199, 238, 161, 238, 160, 241, 58, 10, 249, 3, 239, 235, 239, 199, 10, 249, 3, 239, 235, 240, 121, 27, 241, 77, 241, 223, 27, 241, 77, 236, 181, 244, 173, 236, 181, 9, 3, 1, 69, 236, 181, 163, 236, 181, 168, 236, 181, 169, 236, 181, 179, 236, 181, 176, 236, 181, 178, 236, 181, 249, 4, 57, 236, 181, 242, 119, 236, 181, 242, 61, 57, 236, 181, 36, 236, 47, 236, 181, 37, 236, 47, 236, 181, 9, 3, 1, 183, 238, 83, 244, 173, 238, 83, 121, 238, 83, 114, 238, 83, 153, 238, 83, 163, 238, 83, 168, 238, 83, 169, 238, 83, 179, 238, 83, 176, 238, 83, 178, 238, 83, 249, 4, 57, 238, 83, 242, 119, 238, 83, 242, 61, 57, 238, 83, 36, 236, 47, 238, 83, 37, 236, 47, 236, 20, 57, 244, 214, 57, 240, 20, 57, 243, 118, 246, 132, 57, 251, 199, 57, 251, 234, 57, 247, 108, 57, 244, 34, 57, 245, 40, 57, 254, 76, 57, 254, 153, 244, 77, 57, 250, 225, 57, 250, 248, 57, 254, 126, 57, 244, 127, 57, 241, 150, 57, 243, 126, 247, 240, 57, 252, 62, 57, 48, 36, 154, 47, 48, 37, 154, 47, 48, 165, 55, 217, 239, 131, 48, 207, 55, 217, 239, 131, 48, 235, 236, 59, 47, 48, 238, 87, 59, 47, 48, 36, 59, 47, 48, 37, 59, 47, 48, 249, 9, 239, 131, 48, 238, 87, 249, 9, 239, 131, 48, 235, 236, 249, 9, 239, 131, 48, 244, 171, 248, 253, 47, 48, 249, 28, 248, 253, 47, 48, 238, 97, 240, 200, 48, 238, 97, 240, 207, 48, 238, 97, 239, 132, 48, 238, 97, 175, 237, 132, 48, 36, 37, 59, 47, 48, 238, 97, 242, 0, 48, 238, 97, 241, 191, 48, 238, 97, 244, 135, 239, 119, 219, 48, 240, 219, 240, 230, 239, 131, 48, 42, 55, 242, 114, 239, 131, 48, 241, 98, 90, 48, 242, 59, 239, 108, 48, 249, 51, 242, 153, 47, 48, 126, 59, 239, 131, 241, 37, 253, 128, 238, 167, 139, 253, 173, 240, 172, 120, 5, 203, 242, 156, 240, 14, 242, 100, 217, 90, 250, 177, 253, 128, 250, 174, 252, 237, 246, 127, 238, 136, 240, 160, 242, 156, 237, 61, 71, 3, 194, 71, 5, 164, 236, 51, 5, 164, 120, 5, 164, 242, 238, 238, 136, 242, 238, 240, 17, 249, 25, 225, 253, 116, 71, 5, 69, 236, 51, 5, 69, 71, 5, 148, 71, 3, 148, 255, 31, 255, 41, 253, 99, 90, 120, 5, 183, 244, 7, 57, 244, 205, 239, 70, 237, 183, 71, 5, 198, 120, 5, 198, 120, 5, 209, 71, 5, 135, 236, 51, 5, 135, 120, 5, 135, 236, 157, 248, 116, 239, 75, 242, 8, 65, 238, 132, 57, 248, 136, 167, 57, 239, 110, 120, 5, 202, 247, 235, 57, 254, 61, 57, 239, 116, 254, 61, 57, 236, 51, 5, 202, 242, 60, 26, 3, 1, 244, 191, 243, 188, 57, 239, 250, 57, 71, 5, 199, 236, 51, 5, 203, 239, 9, 90, 71, 3, 70, 71, 5, 70, 71, 5, 204, 242, 60, 5, 204, 71, 5, 171, 71, 3, 78, 67, 90, 254, 3, 90, 245, 98, 90, 245, 76, 90, 237, 71, 242, 16, 241, 3, 5, 209, 120, 3, 242, 75, 120, 5, 242, 75, 120, 5, 253, 116, 120, 244, 186, 237, 164, 242, 60, 23, 5, 194, 242, 60, 23, 5, 148, 224, 23, 5, 148, 242, 60, 23, 5, 181, 120, 21, 5, 187, 120, 21, 3, 187, 120, 21, 3, 70, 120, 21, 3, 69, 120, 21, 3, 200, 240, 146, 244, 176, 242, 60, 237, 124, 242, 83, 239, 123, 253, 101, 244, 116, 242, 83, 239, 123, 225, 242, 35, 242, 83, 239, 123, 253, 101, 243, 111, 242, 83, 239, 123, 225, 241, 20, 242, 83, 239, 123, 244, 171, 241, 20, 242, 83, 239, 123, 249, 28, 241, 20, 242, 83, 239, 123, 253, 101, 244, 84, 242, 83, 239, 123, 249, 48, 242, 14, 242, 83, 239, 123, 253, 101, 241, 151, 242, 83, 239, 123, 244, 171, 239, 181, 242, 83, 239, 123, 249, 48, 239, 181, 242, 83, 239, 123, 245, 4, 239, 181, 239, 123, 238, 103, 121, 218, 151, 121, 218, 151, 114, 218, 151, 153, 218, 151, 163, 218, 151, 168, 218, 151, 169, 218, 151, 179, 218, 151, 176, 218, 151, 178, 218, 151, 249, 18, 218, 151, 240, 234, 218, 151, 240, 238, 218, 151, 242, 144, 218, 151, 253, 101, 239, 150, 218, 151, 249, 48, 239, 150, 218, 151, 253, 101, 238, 104, 3, 218, 151, 121, 3, 218, 151, 114, 3, 218, 151, 153, 3, 218, 151, 163, 3, 218, 151, 168, 3, 218, 151, 169, 3, 218, 151, 179, 3, 218, 151, 176, 3, 218, 151, 178, 3, 218, 151, 249, 18, 3, 218, 151, 240, 234, 3, 218, 151, 240, 238, 3, 218, 151, 242, 144, 3, 218, 151, 253, 101, 239, 150, 3, 218, 151, 249, 48, 239, 150, 3, 218, 151, 253, 101, 238, 104, 218, 151, 253, 101, 239, 243, 255, 36, 187, 218, 151, 249, 48, 238, 104, 218, 151, 253, 250, 238, 104, 218, 151, 224, 253, 101, 239, 150, 126, 52, 210, 52, 63, 52, 220, 52, 36, 37, 52, 75, 79, 52, 244, 177, 249, 17, 52, 244, 177, 249, 2, 52, 244, 181, 249, 2, 52, 244, 181, 249, 17, 52, 126, 59, 2, 122, 63, 59, 2, 122, 126, 249, 90, 52, 63, 249, 90, 52, 126, 225, 242, 159, 52, 210, 225, 242, 159, 52, 63, 225, 242, 159, 52, 220, 225, 242, 159, 52, 126, 59, 2, 244, 182, 63, 59, 2, 244, 182, 126, 59, 248, 254, 143, 210, 59, 248, 254, 143, 63, 59, 248, 254, 143, 220, 59, 248, 254, 143, 75, 79, 59, 2, 245, 253, 126, 59, 2, 128, 63, 59, 2, 128, 126, 59, 2, 245, 28, 63, 59, 2, 245, 28, 36, 37, 249, 90, 52, 36, 37, 59, 2, 122, 220, 242, 193, 52, 210, 59, 2, 253, 252, 237, 125, 210, 59, 2, 253, 252, 236, 195, 220, 59, 2, 253, 252, 237, 125, 220, 59, 2, 253, 252, 236, 195, 63, 59, 2, 242, 86, 237, 121, 220, 59, 2, 242, 86, 237, 125, 235, 236, 253, 121, 237, 163, 52, 238, 87, 253, 121, 237, 163, 52, 244, 177, 249, 17, 59, 139, 165, 143, 126, 59, 139, 253, 99, 249, 25, 63, 59, 139, 143, 235, 236, 249, 0, 175, 52, 238, 87, 249, 0, 175, 52, 126, 154, 2, 133, 239, 176, 126, 154, 2, 133, 237, 121, 210, 154, 2, 133, 236, 195, 210, 154, 2, 133, 237, 125, 63, 154, 2, 133, 239, 176, 63, 154, 2, 133, 237, 121, 220, 154, 2, 133, 236, 195, 220, 154, 2, 133, 237, 125, 63, 59, 249, 25, 126, 52, 210, 59, 126, 137, 220, 52, 126, 59, 249, 25, 63, 52, 126, 242, 161, 240, 246, 210, 242, 161, 240, 246, 63, 242, 161, 240, 246, 220, 242, 161, 240, 246, 126, 154, 249, 25, 63, 239, 142, 63, 154, 249, 25, 126, 239, 142, 126, 42, 59, 2, 122, 36, 37, 42, 59, 2, 122, 63, 42, 59, 2, 122, 126, 42, 52, 210, 42, 52, 63, 42, 52, 220, 42, 52, 36, 37, 42, 52, 75, 79, 42, 52, 244, 177, 249, 17, 42, 52, 244, 177, 249, 2, 42, 52, 244, 181, 249, 2, 42, 52, 244, 181, 249, 17, 42, 52, 126, 242, 59, 52, 63, 242, 59, 52, 126, 239, 196, 52, 63, 239, 196, 52, 210, 59, 2, 42, 122, 220, 59, 2, 42, 122, 126, 242, 105, 52, 210, 242, 105, 52, 63, 242, 105, 52, 220, 242, 105, 52, 126, 59, 139, 143, 63, 59, 139, 143, 126, 58, 52, 210, 58, 52, 63, 58, 52, 220, 58, 52, 210, 58, 59, 248, 254, 143, 210, 58, 59, 254, 236, 238, 150, 210, 58, 59, 254, 236, 239, 228, 2, 146, 143, 210, 58, 59, 254, 236, 239, 228, 2, 55, 143, 210, 58, 42, 52, 210, 58, 42, 59, 254, 236, 238, 150, 63, 58, 59, 248, 254, 248, 170, 244, 177, 249, 17, 59, 139, 240, 213, 244, 181, 249, 2, 59, 139, 240, 213, 75, 79, 58, 52, 37, 59, 2, 3, 240, 200, 220, 59, 126, 137, 210, 52, 244, 171, 63, 240, 246, 126, 59, 2, 55, 122, 63, 59, 2, 55, 122, 36, 37, 59, 2, 55, 122, 126, 59, 2, 42, 55, 122, 63, 59, 2, 42, 55, 122, 36, 37, 59, 2, 42, 55, 122, 126, 236, 203, 52, 63, 236, 203, 52, 36, 37, 236, 203, 52, 54, 249, 185, 236, 251, 240, 243, 235, 240, 245, 201, 241, 155, 245, 201, 249, 41, 141, 243, 103, 244, 216, 250, 69, 238, 19, 242, 130, 240, 214, 253, 128, 141, 255, 2, 240, 214, 253, 128, 3, 240, 214, 253, 128, 239, 146, 254, 217, 241, 27, 249, 41, 141, 241, 14, 254, 217, 241, 27, 3, 239, 146, 254, 217, 241, 27, 253, 127, 137, 244, 42, 244, 186, 239, 138, 244, 186, 237, 152, 244, 186, 237, 164, 244, 197, 57, 236, 28, 57, 49, 244, 212, 239, 156, 242, 91, 253, 232, 242, 119, 239, 203, 223, 249, 9, 223, 243, 54, 223, 30, 245, 39, 250, 194, 245, 39, 242, 214, 245, 39, 236, 158, 76, 238, 121, 37, 242, 117, 242, 117, 239, 136, 242, 117, 238, 128, 242, 117, 240, 31, 249, 41, 141, 241, 52, 239, 160, 76, 141, 239, 160, 76, 240, 202, 249, 46, 240, 202, 253, 186, 235, 238, 242, 109, 238, 86, 42, 238, 86, 242, 59, 238, 86, 241, 15, 238, 86, 242, 27, 238, 86, 244, 142, 238, 86, 238, 87, 238, 86, 238, 87, 241, 15, 238, 86, 235, 236, 241, 15, 238, 86, 238, 67, 240, 5, 244, 53, 236, 225, 49, 242, 119, 241, 154, 239, 24, 236, 225, 237, 66, 229, 223, 224, 180, 239, 116, 251, 187, 159, 252, 166, 245, 11, 244, 149, 239, 138, 141, 180, 244, 197, 180, 235, 199, 80, 76, 141, 235, 199, 80, 76, 235, 239, 80, 76, 235, 239, 253, 177, 141, 239, 200, 80, 76, 240, 223, 235, 239, 253, 137, 239, 200, 80, 76, 242, 93, 80, 76, 141, 242, 93, 80, 76, 242, 93, 80, 112, 80, 76, 242, 59, 180, 254, 1, 80, 76, 237, 113, 76, 235, 252, 237, 113, 76, 237, 187, 239, 204, 237, 174, 253, 173, 243, 204, 235, 252, 80, 76, 235, 239, 80, 139, 112, 253, 173, 244, 211, 253, 128, 244, 211, 137, 112, 235, 239, 80, 76, 244, 214, 240, 254, 242, 61, 242, 81, 249, 9, 254, 214, 80, 76, 249, 9, 80, 76, 236, 253, 76, 238, 5, 237, 60, 76, 249, 86, 240, 254, 245, 20, 80, 76, 80, 139, 254, 216, 236, 255, 239, 136, 254, 30, 238, 50, 80, 76, 141, 80, 76, 238, 111, 76, 141, 238, 111, 76, 240, 171, 237, 113, 76, 206, 112, 80, 76, 196, 112, 80, 76, 206, 249, 25, 80, 76, 196, 249, 25, 80, 76, 206, 253, 177, 141, 80, 76, 196, 253, 177, 141, 80, 76, 249, 108, 237, 110, 249, 108, 235, 235, 239, 204, 141, 237, 113, 76, 141, 237, 110, 141, 235, 235, 240, 223, 206, 253, 137, 80, 76, 240, 223, 196, 253, 137, 80, 76, 206, 112, 237, 113, 76, 196, 112, 237, 113, 76, 240, 223, 206, 253, 137, 237, 113, 76, 240, 223, 196, 253, 137, 237, 113, 76, 206, 112, 235, 235, 196, 112, 237, 110, 240, 223, 206, 253, 137, 235, 235, 240, 223, 196, 253, 137, 237, 110, 238, 126, 238, 130, 239, 143, 112, 80, 76, 239, 145, 112, 80, 76, 239, 143, 112, 237, 113, 76, 239, 145, 112, 237, 113, 76, 249, 41, 141, 240, 142, 249, 41, 141, 240, 173, 242, 76, 253, 128, 239, 121, 253, 128, 141, 119, 242, 76, 253, 128, 141, 119, 239, 121, 253, 128, 242, 76, 137, 112, 80, 76, 239, 121, 137, 112, 80, 76, 240, 223, 119, 242, 76, 137, 253, 137, 80, 76, 240, 223, 119, 239, 121, 137, 253, 137, 80, 76, 242, 76, 137, 2, 141, 80, 76, 239, 121, 137, 2, 141, 80, 76, 239, 50, 239, 225, 235, 181, 239, 225, 242, 109, 30, 244, 211, 253, 128, 30, 239, 169, 253, 128, 30, 244, 211, 137, 112, 80, 76, 30, 239, 169, 137, 112, 80, 76, 30, 249, 195, 30, 249, 202, 28, 244, 212, 28, 242, 119, 28, 242, 167, 28, 239, 156, 242, 91, 28, 49, 223, 28, 249, 9, 223, 28, 239, 203, 223, 28, 240, 254, 28, 244, 189, 240, 227, 244, 212, 240, 227, 242, 119, 240, 227, 242, 167, 240, 227, 49, 223, 37, 244, 184, 36, 244, 184, 79, 244, 184, 75, 244, 184, 237, 175, 241, 216, 245, 209, 241, 172, 242, 59, 55, 253, 99, 37, 237, 119, 42, 55, 253, 99, 42, 37, 237, 119, 249, 41, 141, 244, 43, 141, 245, 209, 249, 41, 141, 243, 116, 241, 68, 42, 55, 253, 99, 42, 37, 237, 119, 239, 143, 245, 217, 238, 114, 239, 145, 245, 217, 238, 114, 242, 103, 239, 164, 253, 128, 239, 146, 254, 217, 242, 103, 238, 159, 242, 103, 239, 164, 137, 112, 80, 76, 239, 146, 254, 217, 242, 103, 239, 164, 112, 80, 76, 239, 169, 253, 128, 244, 211, 253, 128, 238, 122, 239, 27, 238, 193, 241, 207, 236, 139, 253, 30, 247, 109, 252, 34, 37, 160, 2, 249, 65, 37, 219, 244, 186, 240, 202, 249, 46, 244, 186, 240, 202, 253, 186, 244, 186, 235, 238, 244, 186, 242, 109, 240, 221, 223, 49, 223, 249, 86, 223, 239, 156, 242, 167, 241, 45, 36, 242, 103, 242, 210, 237, 128, 239, 138, 37, 242, 103, 242, 210, 237, 128, 239, 138, 36, 237, 128, 239, 138, 37, 237, 128, 239, 138, 224, 229, 240, 254, 244, 175, 240, 202, 253, 186, 244, 175, 240, 202, 249, 46, 42, 240, 237, 42, 238, 116, 42, 235, 238, 42, 242, 109, 238, 43, 80, 18, 239, 160, 76, 206, 2, 227, 196, 2, 227, 250, 104, 249, 108, 237, 110, 250, 104, 249, 108, 235, 235, 206, 80, 139, 112, 235, 235, 196, 80, 139, 112, 237, 110, 80, 139, 112, 237, 110, 80, 139, 112, 235, 235, 80, 139, 112, 238, 126, 80, 139, 112, 238, 130, 249, 41, 141, 241, 242, 112, 242, 88, 249, 41, 141, 242, 26, 112, 242, 88, 141, 30, 244, 211, 137, 112, 80, 76, 141, 30, 239, 169, 137, 112, 80, 76, 30, 244, 211, 137, 112, 141, 80, 76, 30, 239, 169, 137, 112, 141, 80, 76, 206, 253, 177, 141, 237, 113, 76, 196, 253, 177, 141, 237, 113, 76, 239, 143, 253, 177, 141, 237, 113, 76, 239, 145, 253, 177, 141, 237, 113, 76, 141, 242, 103, 239, 164, 253, 128, 249, 41, 141, 241, 14, 254, 217, 242, 103, 238, 159, 141, 242, 103, 239, 164, 137, 112, 80, 76, 249, 41, 141, 241, 14, 254, 217, 242, 103, 239, 164, 112, 242, 88, 55, 238, 96, 241, 213, 146, 238, 96, 75, 37, 239, 125, 238, 96, 79, 37, 239, 125, 238, 96, 240, 214, 137, 2, 165, 146, 122, 240, 214, 137, 2, 55, 253, 99, 254, 228, 253, 127, 137, 146, 122, 3, 240, 214, 137, 2, 55, 253, 99, 254, 228, 253, 127, 137, 146, 122, 240, 214, 137, 2, 49, 47, 240, 214, 137, 2, 239, 130, 3, 240, 214, 137, 2, 239, 130, 240, 214, 137, 2, 238, 75, 240, 214, 137, 2, 225, 146, 239, 240, 239, 146, 2, 165, 146, 122, 239, 146, 2, 55, 253, 99, 254, 228, 253, 127, 137, 146, 122, 3, 239, 146, 2, 55, 253, 99, 254, 228, 253, 127, 137, 146, 122, 239, 146, 2, 239, 130, 3, 239, 146, 2, 239, 130, 255, 27, 239, 129, 254, 87, 237, 75, 240, 25, 57, 240, 67, 52, 243, 163, 75, 237, 116, 79, 237, 116, 237, 82, 236, 152, 249, 57, 244, 176, 36, 239, 207, 37, 239, 207, 36, 242, 212, 37, 242, 212, 242, 80, 37, 244, 247, 242, 80, 36, 244, 247, 253, 121, 37, 244, 247, 253, 121, 36, 244, 247, 224, 141, 57, 30, 239, 188, 249, 65, 240, 161, 242, 6, 238, 132, 239, 69, 240, 141, 237, 136, 240, 193, 240, 207, 245, 162, 137, 240, 92, 57, 242, 60, 141, 57, 244, 145, 237, 140, 253, 121, 36, 240, 213, 253, 121, 37, 240, 213, 242, 80, 36, 240, 213, 242, 80, 37, 240, 213, 253, 121, 136, 238, 86, 242, 80, 136, 238, 86, 243, 119, 244, 90, 75, 238, 177, 241, 112, 225, 146, 245, 252, 244, 20, 251, 150, 245, 81, 139, 253, 173, 184, 255, 43, 254, 214, 119, 239, 71, 249, 47, 239, 37, 235, 237, 160, 110, 235, 190, 160, 110, 245, 81, 139, 253, 173, 244, 172, 241, 111, 244, 183, 236, 8, 254, 1, 234, 69, 239, 99, 248, 135, 241, 250, 238, 203, 241, 230, 241, 129, 244, 110, 244, 88, 236, 92, 236, 93, 123, 124, 13, 241, 183, 123, 124, 13, 244, 99, 244, 238, 123, 124, 13, 249, 14, 242, 88, 123, 124, 13, 249, 14, 241, 52, 123, 124, 13, 249, 14, 239, 132, 123, 124, 13, 249, 14, 249, 69, 123, 124, 13, 249, 14, 240, 200, 123, 124, 13, 175, 242, 150, 123, 124, 13, 175, 249, 69, 123, 124, 13, 248, 80, 143, 123, 124, 13, 238, 181, 143, 123, 124, 13, 249, 14, 242, 91, 123, 124, 13, 249, 14, 237, 132, 123, 124, 13, 249, 14, 237, 110, 123, 124, 13, 249, 14, 235, 235, 123, 124, 13, 126, 245, 10, 123, 124, 13, 63, 245, 10, 123, 124, 13, 249, 14, 126, 52, 123, 124, 13, 249, 14, 63, 52, 123, 124, 13, 175, 237, 132, 123, 124, 13, 79, 249, 35, 238, 75, 123, 124, 13, 245, 20, 242, 150, 123, 124, 13, 249, 14, 79, 242, 174, 123, 124, 13, 249, 14, 242, 87, 123, 124, 13, 79, 249, 35, 249, 69, 123, 124, 13, 210, 245, 10, 123, 124, 13, 249, 14, 210, 52, 123, 124, 13, 75, 249, 35, 239, 130, 123, 124, 13, 254, 6, 242, 150, 123, 124, 13, 249, 14, 75, 242, 174, 123, 124, 13, 249, 14, 250, 213, 123, 124, 13, 75, 249, 35, 249, 69, 123, 124, 13, 220, 245, 10, 123, 124, 13, 249, 14, 220, 52, 123, 124, 13, 245, 166, 238, 75, 123, 124, 13, 245, 20, 238, 75, 123, 124, 13, 240, 221, 238, 75, 123, 124, 13, 254, 48, 238, 75, 123, 124, 13, 175, 238, 75, 123, 124, 13, 75, 249, 161, 249, 69, 123, 124, 13, 245, 166, 244, 238, 123, 124, 13, 175, 244, 178, 123, 124, 13, 249, 14, 242, 81, 123, 124, 13, 75, 249, 35, 150, 123, 124, 13, 254, 6, 150, 123, 124, 13, 249, 86, 150, 123, 124, 13, 254, 48, 150, 123, 124, 13, 175, 150, 123, 124, 13, 79, 249, 161, 242, 150, 123, 124, 13, 36, 249, 161, 242, 150, 123, 124, 13, 229, 150, 123, 124, 13, 196, 150, 123, 124, 13, 244, 192, 143, 123, 124, 13, 254, 6, 180, 123, 124, 13, 244, 164, 123, 124, 13, 248, 105, 180, 123, 124, 13, 239, 82, 238, 75, 123, 124, 13, 249, 14, 141, 242, 88, 123, 124, 13, 249, 14, 239, 68, 123, 124, 13, 79, 244, 225, 180, 123, 124, 13, 75, 244, 225, 180, 123, 124, 13, 244, 191, 123, 124, 13, 249, 32, 123, 124, 13, 242, 72, 123, 124, 13, 162, 238, 75, 123, 124, 13, 240, 204, 238, 75, 123, 124, 13, 228, 238, 75, 123, 124, 13, 172, 238, 75, 123, 124, 13, 242, 79, 141, 245, 16, 65, 37, 160, 2, 220, 242, 193, 52, 238, 60, 249, 0, 249, 47, 250, 151, 90, 55, 217, 2, 242, 65, 227, 238, 144, 90, 237, 182, 238, 165, 90, 236, 11, 238, 165, 90, 239, 215, 90, 236, 252, 90, 58, 30, 2, 242, 100, 55, 244, 176, 246, 122, 90, 236, 200, 254, 49, 90, 251, 63, 90, 28, 146, 253, 99, 2, 244, 3, 28, 239, 118, 244, 185, 242, 173, 175, 2, 239, 52, 52, 252, 238, 90, 238, 34, 90, 238, 15, 90, 231, 241, 243, 139, 90, 231, 241, 243, 197, 90, 231, 232, 90, 231, 235, 90, 243, 92, 241, 131, 13, 249, 3, 114, 232, 12, 90, 123, 124, 13, 244, 238, 241, 51, 238, 158, 254, 49, 90, 240, 144, 245, 156, 252, 16, 245, 156, 247, 250, 242, 244, 90, 246, 70, 242, 244, 90, 36, 236, 187, 156, 128, 36, 236, 187, 237, 122, 36, 236, 187, 149, 128, 37, 236, 187, 156, 128, 37, 236, 187, 237, 122, 37, 236, 187, 149, 128, 36, 30, 226, 156, 240, 213, 36, 30, 226, 237, 122, 36, 30, 226, 149, 240, 213, 37, 30, 226, 156, 240, 213, 37, 30, 226, 237, 122, 37, 30, 226, 149, 240, 213, 36, 244, 175, 226, 156, 128, 36, 244, 175, 226, 242, 65, 242, 163, 36, 244, 175, 226, 149, 128, 244, 175, 226, 237, 122, 37, 244, 175, 226, 156, 128, 37, 244, 175, 226, 242, 65, 242, 163, 37, 244, 175, 226, 149, 128, 239, 135, 237, 122, 146, 217, 237, 122, 156, 36, 112, 149, 37, 244, 175, 226, 239, 174, 156, 37, 112, 149, 36, 244, 175, 226, 239, 174, 238, 131, 249, 168, 238, 131, 241, 12, 253, 121, 30, 110, 242, 80, 30, 110, 242, 80, 30, 226, 249, 25, 253, 121, 30, 110, 22, 13, 241, 12, 36, 55, 56, 244, 176, 37, 55, 56, 244, 176, 146, 249, 116, 241, 198, 146, 249, 116, 241, 199, 146, 249, 116, 241, 200, 146, 249, 116, 241, 201, 238, 84, 13, 117, 55, 18, 253, 121, 184, 238, 84, 13, 117, 55, 18, 242, 80, 184, 238, 84, 13, 117, 55, 2, 240, 200, 238, 84, 13, 117, 79, 18, 146, 2, 240, 200, 238, 84, 13, 117, 75, 18, 146, 2, 240, 200, 238, 84, 13, 117, 55, 2, 219, 238, 84, 13, 117, 79, 18, 146, 2, 219, 238, 84, 13, 117, 75, 18, 146, 2, 219, 238, 84, 13, 117, 55, 18, 245, 11, 238, 84, 13, 117, 79, 18, 146, 2, 245, 11, 238, 84, 13, 117, 75, 18, 146, 2, 245, 11, 238, 84, 13, 117, 79, 18, 236, 182, 238, 84, 13, 117, 75, 18, 236, 182, 238, 84, 13, 117, 55, 18, 253, 121, 244, 172, 238, 84, 13, 117, 55, 18, 242, 80, 244, 172, 30, 245, 22, 244, 56, 90, 13, 54, 247, 197, 13, 54, 245, 45, 137, 240, 86, 13, 54, 245, 45, 137, 245, 200, 13, 54, 253, 127, 137, 245, 200, 13, 54, 253, 127, 137, 236, 40, 13, 54, 240, 68, 13, 54, 236, 74, 13, 54, 246, 20, 13, 54, 237, 177, 13, 54, 146, 236, 235, 13, 54, 217, 245, 83, 13, 54, 55, 236, 235, 13, 54, 249, 3, 245, 83, 13, 54, 240, 13, 241, 249, 13, 54, 245, 185, 252, 58, 13, 54, 245, 185, 253, 227, 13, 54, 250, 210, 251, 197, 241, 53, 13, 54, 242, 157, 240, 251, 121, 13, 54, 242, 157, 240, 251, 114, 13, 54, 242, 157, 240, 251, 153, 13, 54, 242, 157, 240, 251, 163, 13, 54, 239, 115, 236, 74, 13, 54, 237, 102, 246, 248, 13, 54, 253, 127, 137, 236, 176, 242, 67, 13, 54, 241, 120, 13, 54, 253, 127, 137, 241, 209, 13, 54, 237, 101, 13, 54, 241, 53, 13, 54, 251, 7, 237, 114, 13, 54, 246, 161, 237, 114, 13, 54, 244, 55, 237, 114, 13, 54, 252, 239, 237, 114, 13, 54, 242, 69, 13, 54, 241, 137, 246, 29, 90, 249, 0, 249, 47, 13, 54, 240, 124, 13, 54, 243, 90, 249, 3, 114, 13, 54, 238, 65, 249, 3, 114, 253, 149, 128, 253, 149, 243, 60, 253, 149, 245, 88, 253, 149, 239, 116, 245, 88, 253, 149, 250, 152, 241, 119, 253, 149, 254, 89, 249, 89, 253, 149, 243, 49, 250, 140, 234, 72, 253, 149, 243, 29, 137, 242, 201, 253, 149, 244, 189, 253, 149, 240, 21, 241, 37, 241, 224, 253, 149, 42, 237, 132, 28, 27, 121, 28, 27, 114, 28, 27, 153, 28, 27, 163, 28, 27, 168, 28, 27, 169, 28, 27, 179, 28, 27, 176, 28, 27, 178, 28, 83, 249, 18, 28, 83, 240, 234, 28, 83, 240, 238, 28, 83, 238, 108, 28, 83, 238, 106, 28, 83, 239, 167, 28, 83, 239, 162, 28, 83, 237, 129, 28, 83, 238, 105, 28, 83, 238, 107, 28, 83, 240, 239, 68, 27, 121, 68, 27, 114, 68, 27, 153, 68, 27, 163, 68, 27, 168, 68, 27, 169, 68, 27, 179, 68, 27, 176, 68, 27, 178, 68, 83, 249, 18, 68, 83, 240, 234, 68, 83, 240, 238, 68, 83, 238, 108, 68, 83, 238, 106, 68, 83, 239, 167, 68, 83, 239, 162, 68, 83, 237, 129, 68, 83, 238, 105, 68, 83, 238, 107, 68, 83, 240, 239, 27, 253, 101, 213, 189, 27, 225, 213, 189, 27, 244, 171, 213, 189, 27, 249, 28, 213, 189, 27, 249, 48, 213, 189, 27, 254, 23, 213, 189, 27, 245, 4, 213, 189, 27, 244, 207, 213, 189, 27, 250, 29, 213, 189, 83, 253, 250, 213, 189, 83, 243, 97, 213, 189, 83, 243, 17, 213, 189, 83, 240, 180, 213, 189, 83, 240, 78, 213, 189, 83, 241, 166, 213, 189, 83, 241, 78, 213, 189, 83, 239, 83, 213, 189, 83, 240, 65, 213, 189, 83, 240, 127, 213, 189, 83, 242, 104, 213, 189, 68, 9, 3, 1, 64, 68, 9, 3, 1, 199, 68, 9, 3, 1, 203, 68, 9, 3, 1, 187, 68, 9, 3, 1, 70, 68, 9, 3, 1, 204, 68, 9, 3, 1, 194, 68, 9, 3, 1, 164, 68, 9, 3, 1, 69, 68, 9, 3, 1, 200, 68, 9, 3, 1, 205, 68, 9, 3, 1, 148, 68, 9, 3, 1, 171, 68, 9, 3, 1, 183, 68, 9, 3, 1, 78, 68, 9, 3, 1, 198, 68, 9, 3, 1, 209, 68, 9, 3, 1, 135, 68, 9, 3, 1, 159, 68, 9, 3, 1, 190, 68, 9, 3, 1, 84, 68, 9, 3, 1, 186, 68, 9, 3, 1, 201, 68, 9, 3, 1, 170, 68, 9, 3, 1, 181, 68, 9, 3, 1, 202, 28, 9, 5, 1, 64, 28, 9, 5, 1, 199, 28, 9, 5, 1, 203, 28, 9, 5, 1, 187, 28, 9, 5, 1, 70, 28, 9, 5, 1, 204, 28, 9, 5, 1, 194, 28, 9, 5, 1, 164, 28, 9, 5, 1, 69, 28, 9, 5, 1, 200, 28, 9, 5, 1, 205, 28, 9, 5, 1, 148, 28, 9, 5, 1, 171, 28, 9, 5, 1, 183, 28, 9, 5, 1, 78, 28, 9, 5, 1, 198, 28, 9, 5, 1, 209, 28, 9, 5, 1, 135, 28, 9, 5, 1, 159, 28, 9, 5, 1, 190, 28, 9, 5, 1, 84, 28, 9, 5, 1, 186, 28, 9, 5, 1, 201, 28, 9, 5, 1, 170, 28, 9, 5, 1, 181, 28, 9, 5, 1, 202, 28, 9, 3, 1, 64, 28, 9, 3, 1, 199, 28, 9, 3, 1, 203, 28, 9, 3, 1, 187, 28, 9, 3, 1, 70, 28, 9, 3, 1, 204, 28, 9, 3, 1, 194, 28, 9, 3, 1, 164, 28, 9, 3, 1, 69, 28, 9, 3, 1, 200, 28, 9, 3, 1, 205, 28, 9, 3, 1, 148, 28, 9, 3, 1, 171, 28, 9, 3, 1, 183, 28, 9, 3, 1, 78, 28, 9, 3, 1, 198, 28, 9, 3, 1, 209, 28, 9, 3, 1, 135, 28, 9, 3, 1, 159, 28, 9, 3, 1, 190, 28, 9, 3, 1, 84, 28, 9, 3, 1, 186, 28, 9, 3, 1, 201, 28, 9, 3, 1, 170, 28, 9, 3, 1, 181, 28, 9, 3, 1, 202, 28, 27, 244, 173, 239, 115, 28, 83, 240, 234, 239, 115, 28, 83, 240, 238, 239, 115, 28, 83, 238, 108, 239, 115, 28, 83, 238, 106, 239, 115, 28, 83, 239, 167, 239, 115, 28, 83, 239, 162, 239, 115, 28, 83, 237, 129, 239, 115, 28, 83, 238, 105, 239, 115, 28, 83, 238, 107, 239, 115, 28, 83, 240, 239, 42, 28, 27, 121, 42, 28, 27, 114, 42, 28, 27, 153, 42, 28, 27, 163, 42, 28, 27, 168, 42, 28, 27, 169, 42, 28, 27, 179, 42, 28, 27, 176, 42, 28, 27, 178, 42, 28, 83, 249, 18, 56, 60, 117, 236, 182, 56, 60, 82, 236, 182, 56, 60, 117, 238, 88, 56, 60, 82, 238, 88, 56, 60, 117, 242, 59, 249, 15, 236, 182, 56, 60, 82, 242, 59, 249, 15, 236, 182, 56, 60, 117, 242, 59, 249, 15, 238, 88, 56, 60, 82, 242, 59, 249, 15, 238, 88, 56, 60, 117, 238, 94, 249, 15, 236, 182, 56, 60, 82, 238, 94, 249, 15, 236, 182, 56, 60, 117, 238, 94, 249, 15, 238, 88, 56, 60, 82, 238, 94, 249, 15, 238, 88, 56, 60, 117, 79, 18, 184, 56, 60, 79, 117, 18, 37, 242, 64, 56, 60, 79, 82, 18, 37, 242, 63, 56, 60, 82, 79, 18, 184, 56, 60, 117, 79, 18, 244, 172, 56, 60, 79, 117, 18, 36, 242, 64, 56, 60, 79, 82, 18, 36, 242, 63, 56, 60, 82, 79, 18, 244, 172, 56, 60, 117, 75, 18, 184, 56, 60, 75, 117, 18, 37, 242, 64, 56, 60, 75, 82, 18, 37, 242, 63, 56, 60, 82, 75, 18, 184, 56, 60, 117, 75, 18, 244, 172, 56, 60, 75, 117, 18, 36, 242, 64, 56, 60, 75, 82, 18, 36, 242, 63, 56, 60, 82, 75, 18, 244, 172, 56, 60, 117, 55, 18, 184, 56, 60, 55, 117, 18, 37, 242, 64, 56, 60, 75, 82, 18, 37, 79, 242, 63, 56, 60, 79, 82, 18, 37, 75, 242, 63, 56, 60, 55, 82, 18, 37, 242, 63, 56, 60, 79, 117, 18, 37, 75, 242, 64, 56, 60, 75, 117, 18, 37, 79, 242, 64, 56, 60, 82, 55, 18, 184, 56, 60, 117, 55, 18, 244, 172, 56, 60, 55, 117, 18, 36, 242, 64, 56, 60, 75, 82, 18, 36, 79, 242, 63, 56, 60, 79, 82, 18, 36, 75, 242, 63, 56, 60, 55, 82, 18, 36, 242, 63, 56, 60, 79, 117, 18, 36, 75, 242, 64, 56, 60, 75, 117, 18, 36, 79, 242, 64, 56, 60, 82, 55, 18, 244, 172, 56, 60, 117, 79, 18, 236, 182, 56, 60, 36, 82, 18, 37, 79, 242, 63, 56, 60, 37, 82, 18, 36, 79, 242, 63, 56, 60, 79, 117, 18, 146, 242, 64, 56, 60, 79, 82, 18, 146, 242, 63, 56, 60, 37, 117, 18, 36, 79, 242, 64, 56, 60, 36, 117, 18, 37, 79, 242, 64, 56, 60, 82, 79, 18, 236, 182, 56, 60, 117, 75, 18, 236, 182, 56, 60, 36, 82, 18, 37, 75, 242, 63, 56, 60, 37, 82, 18, 36, 75, 242, 63, 56, 60, 75, 117, 18, 146, 242, 64, 56, 60, 75, 82, 18, 146, 242, 63, 56, 60, 37, 117, 18, 36, 75, 242, 64, 56, 60, 36, 117, 18, 37, 75, 242, 64, 56, 60, 82, 75, 18, 236, 182, 56, 60, 117, 55, 18, 236, 182, 56, 60, 36, 82, 18, 37, 55, 242, 63, 56, 60, 37, 82, 18, 36, 55, 242, 63, 56, 60, 55, 117, 18, 146, 242, 64, 56, 60, 75, 82, 18, 79, 146, 242, 63, 56, 60, 79, 82, 18, 75, 146, 242, 63, 56, 60, 55, 82, 18, 146, 242, 63, 56, 60, 36, 75, 82, 18, 37, 79, 242, 63, 56, 60, 37, 75, 82, 18, 36, 79, 242, 63, 56, 60, 36, 79, 82, 18, 37, 75, 242, 63, 56, 60, 37, 79, 82, 18, 36, 75, 242, 63, 56, 60, 79, 117, 18, 75, 146, 242, 64, 56, 60, 75, 117, 18, 79, 146, 242, 64, 56, 60, 37, 117, 18, 36, 55, 242, 64, 56, 60, 36, 117, 18, 37, 55, 242, 64, 56, 60, 82, 55, 18, 236, 182, 56, 60, 117, 42, 249, 15, 236, 182, 56, 60, 82, 42, 249, 15, 236, 182, 56, 60, 117, 42, 249, 15, 238, 88, 56, 60, 82, 42, 249, 15, 238, 88, 56, 60, 42, 236, 182, 56, 60, 42, 238, 88, 56, 60, 79, 242, 66, 18, 37, 240, 222, 56, 60, 79, 42, 18, 37, 240, 226, 56, 60, 42, 79, 18, 184, 56, 60, 79, 242, 66, 18, 36, 240, 222, 56, 60, 79, 42, 18, 36, 240, 226, 56, 60, 42, 79, 18, 244, 172, 56, 60, 75, 242, 66, 18, 37, 240, 222, 56, 60, 75, 42, 18, 37, 240, 226, 56, 60, 42, 75, 18, 184, 56, 60, 75, 242, 66, 18, 36, 240, 222, 56, 60, 75, 42, 18, 36, 240, 226, 56, 60, 42, 75, 18, 244, 172, 56, 60, 55, 242, 66, 18, 37, 240, 222, 56, 60, 55, 42, 18, 37, 240, 226, 56, 60, 42, 55, 18, 184, 56, 60, 55, 242, 66, 18, 36, 240, 222, 56, 60, 55, 42, 18, 36, 240, 226, 56, 60, 42, 55, 18, 244, 172, 56, 60, 79, 242, 66, 18, 146, 240, 222, 56, 60, 79, 42, 18, 146, 240, 226, 56, 60, 42, 79, 18, 236, 182, 56, 60, 75, 242, 66, 18, 146, 240, 222, 56, 60, 75, 42, 18, 146, 240, 226, 56, 60, 42, 75, 18, 236, 182, 56, 60, 55, 242, 66, 18, 146, 240, 222, 56, 60, 55, 42, 18, 146, 240, 226, 56, 60, 42, 55, 18, 236, 182, 56, 60, 117, 253, 133, 79, 18, 184, 56, 60, 117, 253, 133, 79, 18, 244, 172, 56, 60, 117, 253, 133, 75, 18, 244, 172, 56, 60, 117, 253, 133, 75, 18, 184, 56, 60, 117, 239, 125, 156, 37, 139, 149, 244, 172, 56, 60, 117, 239, 125, 156, 36, 139, 149, 184, 56, 60, 117, 239, 125, 242, 94, 56, 60, 117, 244, 172, 56, 60, 117, 253, 131, 56, 60, 117, 184, 56, 60, 117, 244, 185, 56, 60, 82, 244, 172, 56, 60, 82, 253, 131, 56, 60, 82, 184, 56, 60, 82, 244, 185, 56, 60, 117, 36, 18, 82, 184, 56, 60, 117, 75, 18, 82, 244, 185, 56, 60, 82, 36, 18, 117, 184, 56, 60, 82, 75, 18, 117, 244, 185, 156, 136, 242, 67, 149, 253, 101, 242, 111, 242, 67, 149, 253, 101, 240, 224, 242, 67, 149, 244, 171, 240, 240, 242, 67, 149, 136, 242, 67, 149, 249, 48, 240, 240, 242, 67, 149, 244, 171, 239, 231, 242, 67, 149, 245, 4, 240, 240, 242, 67, 213, 242, 67, 36, 245, 4, 240, 240, 242, 67, 36, 244, 171, 239, 231, 242, 67, 36, 249, 48, 240, 240, 242, 67, 36, 136, 242, 67, 36, 244, 171, 240, 240, 242, 67, 36, 253, 101, 240, 224, 242, 67, 36, 253, 101, 242, 111, 242, 67, 37, 136, 242, 67, 117, 242, 187, 242, 82, 242, 187, 250, 208, 242, 187, 156, 253, 101, 242, 111, 242, 67, 37, 253, 101, 242, 111, 242, 67, 239, 124, 149, 244, 172, 239, 124, 149, 184, 239, 124, 156, 244, 172, 239, 124, 156, 36, 18, 149, 36, 18, 149, 184, 239, 124, 156, 36, 18, 149, 184, 239, 124, 156, 36, 18, 156, 37, 18, 149, 244, 172, 239, 124, 156, 36, 18, 156, 37, 18, 149, 184, 239, 124, 156, 184, 239, 124, 156, 37, 18, 149, 244, 172, 239, 124, 156, 37, 18, 149, 36, 18, 149, 184, 86, 240, 207, 58, 240, 207, 58, 30, 2, 241, 4, 240, 18, 58, 30, 237, 151, 86, 3, 240, 207, 30, 2, 146, 244, 220, 30, 2, 55, 244, 220, 30, 2, 238, 39, 237, 153, 244, 220, 30, 2, 156, 36, 139, 149, 37, 244, 220, 30, 2, 156, 37, 139, 149, 36, 244, 220, 30, 2, 239, 125, 237, 153, 244, 220, 86, 3, 240, 207, 58, 3, 240, 207, 86, 237, 137, 58, 237, 137, 86, 55, 237, 137, 58, 55, 237, 137, 86, 235, 202, 58, 235, 202, 86, 236, 192, 219, 58, 236, 192, 219, 86, 236, 192, 3, 219, 58, 236, 192, 3, 219, 86, 235, 190, 219, 58, 235, 190, 219, 86, 235, 190, 3, 219, 58, 235, 190, 3, 219, 86, 235, 190, 239, 173, 58, 235, 190, 239, 173, 86, 235, 241, 219, 58, 235, 241, 219, 86, 235, 241, 3, 219, 58, 235, 241, 3, 219, 86, 235, 237, 219, 58, 235, 237, 219, 86, 235, 237, 3, 219, 58, 235, 237, 3, 219, 86, 235, 237, 239, 173, 58, 235, 237, 239, 173, 86, 239, 132, 58, 239, 132, 58, 240, 221, 237, 151, 86, 3, 239, 132, 240, 75, 239, 188, 58, 240, 200, 242, 118, 240, 200, 175, 2, 55, 244, 220, 238, 184, 86, 240, 200, 175, 2, 36, 136, 231, 231, 175, 2, 37, 136, 231, 231, 175, 2, 149, 136, 231, 231, 175, 2, 156, 136, 231, 231, 175, 2, 156, 37, 239, 124, 231, 231, 175, 2, 254, 1, 253, 177, 156, 36, 239, 124, 231, 231, 36, 136, 86, 240, 200, 37, 136, 86, 240, 200, 241, 0, 240, 215, 241, 0, 58, 240, 200, 156, 136, 241, 0, 58, 240, 200, 149, 136, 241, 0, 58, 240, 200, 156, 36, 239, 124, 239, 170, 249, 65, 156, 37, 239, 124, 239, 170, 249, 65, 149, 37, 239, 124, 239, 170, 249, 65, 149, 36, 239, 124, 239, 170, 249, 65, 156, 136, 240, 200, 149, 136, 240, 200, 86, 149, 37, 219, 86, 149, 36, 219, 86, 156, 36, 219, 86, 156, 37, 219, 58, 240, 215, 30, 2, 36, 136, 231, 231, 30, 2, 37, 136, 231, 231, 30, 2, 156, 36, 239, 125, 136, 231, 231, 30, 2, 149, 37, 239, 125, 136, 231, 231, 58, 30, 2, 55, 238, 183, 244, 176, 58, 236, 192, 239, 118, 2, 227, 236, 192, 239, 118, 2, 36, 136, 231, 231, 236, 192, 239, 118, 2, 37, 136, 231, 231, 244, 222, 240, 200, 58, 30, 2, 156, 36, 238, 93, 58, 30, 2, 149, 36, 238, 93, 58, 30, 2, 149, 37, 238, 93, 58, 30, 2, 156, 37, 238, 93, 58, 175, 2, 156, 36, 238, 93, 58, 175, 2, 149, 36, 238, 93, 58, 175, 2, 149, 37, 238, 93, 58, 175, 2, 156, 37, 238, 93, 156, 36, 219, 156, 37, 219, 149, 36, 219, 58, 242, 82, 240, 207, 86, 242, 82, 240, 207, 58, 242, 82, 3, 240, 207, 86, 242, 82, 3, 240, 207, 149, 37, 219, 86, 254, 71, 2, 245, 168, 243, 71, 239, 107, 240, 166, 243, 74, 86, 244, 178, 58, 244, 178, 238, 29, 236, 38, 249, 87, 238, 178, 245, 151, 237, 186, 245, 151, 236, 89, 237, 79, 86, 237, 166, 58, 237, 166, 242, 137, 249, 47, 242, 137, 56, 2, 242, 201, 242, 137, 56, 2, 170, 240, 156, 58, 245, 186, 242, 163, 86, 245, 186, 242, 163, 224, 241, 3, 242, 177, 244, 218, 240, 215, 86, 36, 239, 119, 242, 127, 86, 37, 239, 119, 242, 127, 58, 36, 239, 119, 242, 127, 58, 75, 239, 119, 242, 127, 58, 37, 239, 119, 242, 127, 58, 79, 239, 119, 242, 127, 248, 78, 18, 236, 254, 241, 123, 57, 237, 83, 57, 238, 182, 57, 238, 186, 245, 246, 240, 133, 242, 94, 254, 31, 249, 32, 244, 234, 137, 239, 43, 244, 234, 137, 238, 22, 249, 86, 18, 238, 196, 244, 227, 90, 254, 81, 242, 10, 243, 142, 18, 242, 13, 247, 239, 90, 254, 79, 248, 188, 240, 232, 54, 241, 179, 240, 232, 54, 247, 52, 240, 232, 54, 244, 236, 240, 232, 54, 240, 181, 240, 232, 54, 245, 50, 240, 232, 54, 242, 169, 240, 232, 54, 238, 147, 240, 232, 54, 242, 142, 248, 172, 137, 241, 139, 58, 240, 79, 244, 235, 58, 241, 81, 244, 235, 86, 241, 81, 244, 235, 58, 254, 71, 2, 245, 168, 245, 84, 240, 224, 244, 229, 251, 184, 240, 224, 244, 229, 240, 115, 243, 108, 57, 242, 142, 251, 217, 57, 240, 96, 241, 255, 242, 45, 240, 123, 244, 38, 243, 33, 242, 31, 241, 174, 241, 121, 251, 188, 244, 141, 243, 203, 239, 81, 236, 162, 237, 179, 238, 173, 241, 240, 58, 244, 199, 245, 125, 58, 244, 199, 242, 241, 58, 244, 199, 245, 173, 58, 244, 199, 241, 44, 58, 244, 199, 241, 63, 58, 244, 199, 245, 158, 86, 244, 199, 245, 125, 86, 244, 199, 242, 241, 86, 244, 199, 245, 173, 86, 244, 199, 241, 44, 86, 244, 199, 241, 63, 86, 244, 199, 245, 158, 86, 245, 195, 244, 219, 58, 244, 218, 244, 219, 58, 240, 221, 244, 219, 86, 249, 199, 244, 219, 58, 245, 195, 244, 219, 86, 244, 218, 244, 219, 86, 240, 221, 244, 219, 58, 249, 199, 244, 219, 254, 112, 240, 167, 240, 224, 244, 208, 242, 111, 244, 208, 242, 198, 242, 111, 242, 233, 242, 198, 238, 127, 242, 233, 245, 30, 249, 134, 57, 245, 30, 241, 28, 57, 245, 30, 245, 5, 57, 249, 17, 118, 242, 94, 249, 2, 118, 242, 94, 238, 166, 238, 89, 90, 238, 89, 13, 54, 244, 128, 238, 99, 238, 89, 13, 54, 244, 129, 238, 99, 238, 89, 13, 54, 244, 130, 238, 99, 238, 89, 13, 54, 244, 131, 238, 99, 238, 89, 13, 54, 244, 132, 238, 99, 238, 89, 13, 54, 244, 133, 238, 99, 238, 89, 13, 54, 244, 134, 238, 99, 238, 89, 13, 54, 241, 175, 238, 31, 86, 238, 166, 238, 89, 90, 240, 152, 245, 157, 90, 231, 255, 245, 157, 90, 253, 203, 241, 157, 253, 203, 241, 158, 253, 203, 241, 159, 253, 203, 241, 160, 253, 203, 241, 161, 253, 203, 241, 162, 58, 175, 2, 49, 184, 58, 175, 2, 225, 244, 215, 86, 175, 2, 58, 49, 184, 86, 175, 2, 225, 58, 244, 215, 156, 245, 61, 238, 115, 86, 238, 115, 149, 245, 61, 238, 115, 58, 238, 115, 238, 132, 240, 105, 57, 252, 196, 243, 95, 238, 169, 239, 7, 242, 51, 244, 250, 242, 55, 244, 250, 149, 37, 241, 29, 241, 29, 156, 37, 241, 29, 58, 250, 28, 86, 250, 28, 245, 16, 65, 82, 245, 16, 65, 235, 191, 170, 82, 235, 191, 170, 242, 137, 170, 82, 242, 137, 170, 239, 159, 26, 242, 94, 82, 26, 242, 94, 249, 0, 242, 100, 242, 94, 82, 249, 0, 242, 100, 242, 94, 9, 242, 94, 239, 153, 58, 9, 242, 94, 239, 159, 9, 242, 94, 241, 204, 242, 94, 249, 86, 137, 243, 83, 249, 28, 234, 63, 238, 77, 249, 28, 235, 193, 238, 77, 82, 249, 28, 235, 193, 238, 77, 249, 28, 236, 250, 238, 77, 86, 249, 28, 240, 218, 244, 178, 58, 249, 28, 240, 218, 244, 178, 242, 188, 239, 159, 58, 244, 178, 28, 58, 244, 178, 249, 0, 242, 100, 86, 244, 178, 86, 242, 100, 58, 244, 178, 239, 159, 86, 244, 178, 82, 239, 159, 86, 244, 178, 239, 192, 244, 178, 239, 153, 58, 244, 178, 82, 238, 77, 249, 0, 242, 100, 238, 77, 244, 207, 244, 96, 238, 77, 244, 207, 240, 218, 86, 244, 178, 244, 207, 240, 218, 239, 192, 244, 178, 254, 23, 240, 218, 86, 244, 178, 244, 207, 240, 218, 236, 227, 86, 244, 178, 82, 244, 207, 240, 218, 236, 227, 86, 244, 178, 243, 17, 240, 218, 86, 244, 178, 241, 78, 240, 218, 238, 77, 234, 63, 238, 77, 249, 0, 242, 100, 234, 63, 238, 77, 82, 234, 63, 238, 77, 254, 23, 239, 230, 86, 18, 58, 238, 110, 86, 238, 110, 58, 238, 110, 244, 207, 239, 230, 239, 159, 86, 238, 110, 28, 249, 0, 242, 100, 244, 207, 240, 218, 244, 178, 82, 234, 63, 239, 192, 238, 77, 237, 143, 248, 129, 238, 69, 237, 143, 82, 241, 124, 237, 143, 239, 237, 82, 239, 237, 235, 193, 238, 77, 244, 207, 234, 63, 238, 154, 238, 77, 82, 244, 207, 234, 63, 238, 154, 238, 77, 239, 153, 58, 240, 200, 149, 37, 235, 250, 58, 240, 207, 156, 37, 235, 250, 58, 240, 207, 149, 37, 239, 153, 58, 240, 207, 156, 37, 239, 153, 58, 240, 207, 86, 240, 221, 244, 197, 58, 170, 117, 55, 143, 242, 82, 55, 143, 82, 55, 143, 82, 242, 66, 242, 60, 244, 192, 238, 76, 167, 238, 78, 82, 242, 66, 244, 192, 238, 76, 167, 238, 78, 82, 42, 242, 60, 244, 192, 238, 76, 167, 238, 78, 82, 42, 244, 192, 238, 76, 167, 238, 78, 242, 141, 252, 177, 238, 113, 25, 238, 78, 82, 236, 186, 167, 238, 78, 82, 244, 218, 236, 186, 167, 238, 78, 82, 86, 242, 178, 241, 3, 82, 86, 244, 218, 240, 215, 242, 177, 242, 178, 241, 3, 242, 177, 244, 218, 240, 215, 242, 82, 36, 236, 187, 238, 78, 242, 82, 37, 236, 187, 238, 78, 242, 82, 238, 140, 36, 236, 187, 238, 78, 242, 82, 238, 140, 37, 236, 187, 238, 78, 242, 82, 235, 237, 160, 226, 238, 78, 242, 82, 235, 190, 160, 226, 238, 78, 82, 235, 237, 160, 238, 76, 167, 238, 78, 82, 235, 190, 160, 238, 76, 167, 238, 78, 82, 235, 237, 160, 226, 238, 78, 82, 235, 190, 160, 226, 238, 78, 117, 36, 239, 139, 244, 202, 226, 238, 78, 117, 37, 239, 139, 244, 202, 226, 238, 78, 242, 82, 36, 244, 175, 226, 238, 78, 242, 82, 37, 244, 175, 226, 238, 78, 240, 201, 239, 115, 28, 27, 121, 240, 201, 239, 115, 28, 27, 114, 240, 201, 239, 115, 28, 27, 153, 240, 201, 239, 115, 28, 27, 163, 240, 201, 239, 115, 28, 27, 168, 240, 201, 239, 115, 28, 27, 169, 240, 201, 239, 115, 28, 27, 179, 240, 201, 239, 115, 28, 27, 176, 240, 201, 239, 115, 28, 27, 178, 240, 201, 239, 115, 28, 83, 249, 18, 240, 201, 28, 23, 27, 121, 240, 201, 28, 23, 27, 114, 240, 201, 28, 23, 27, 153, 240, 201, 28, 23, 27, 163, 240, 201, 28, 23, 27, 168, 240, 201, 28, 23, 27, 169, 240, 201, 28, 23, 27, 179, 240, 201, 28, 23, 27, 176, 240, 201, 28, 23, 27, 178, 240, 201, 28, 23, 83, 249, 18, 240, 201, 239, 115, 28, 23, 27, 121, 240, 201, 239, 115, 28, 23, 27, 114, 240, 201, 239, 115, 28, 23, 27, 153, 240, 201, 239, 115, 28, 23, 27, 163, 240, 201, 239, 115, 28, 23, 27, 168, 240, 201, 239, 115, 28, 23, 27, 169, 240, 201, 239, 115, 28, 23, 27, 179, 240, 201, 239, 115, 28, 23, 27, 176, 240, 201, 239, 115, 28, 23, 27, 178, 240, 201, 239, 115, 28, 23, 83, 249, 18, 82, 237, 109, 63, 52, 82, 244, 181, 249, 2, 52, 82, 63, 52, 82, 244, 177, 249, 2, 52, 240, 60, 244, 180, 63, 52, 82, 236, 161, 63, 52, 234, 65, 63, 52, 82, 234, 65, 63, 52, 242, 105, 234, 65, 63, 52, 82, 242, 105, 234, 65, 63, 52, 86, 63, 52, 241, 88, 237, 105, 63, 237, 116, 241, 88, 235, 212, 63, 237, 116, 86, 63, 237, 116, 82, 86, 242, 141, 220, 18, 63, 52, 82, 86, 242, 141, 210, 18, 63, 52, 245, 196, 86, 63, 52, 82, 234, 70, 86, 63, 52, 236, 159, 58, 63, 52, 237, 74, 58, 63, 52, 236, 246, 239, 153, 58, 63, 52, 236, 129, 239, 153, 58, 63, 52, 82, 149, 235, 192, 58, 63, 52, 82, 156, 235, 192, 58, 63, 52, 241, 70, 149, 235, 192, 58, 63, 52, 241, 70, 156, 235, 192, 58, 63, 52, 28, 82, 58, 63, 52, 235, 189, 63, 52, 234, 64, 244, 181, 249, 2, 52, 234, 64, 63, 52, 234, 64, 244, 177, 249, 2, 52, 82, 234, 64, 244, 181, 249, 2, 52, 82, 234, 64, 63, 52, 82, 234, 64, 244, 177, 249, 2, 52, 235, 186, 63, 52, 82, 234, 61, 63, 52, 236, 83, 63, 52, 82, 236, 83, 63, 52, 236, 29, 63, 52, 58, 240, 221, 2, 241, 13, 227, 18, 2, 227, 240, 214, 137, 240, 236, 239, 176, 149, 37, 242, 86, 2, 227, 156, 36, 242, 86, 2, 227, 36, 245, 33, 244, 251, 37, 245, 33, 244, 251, 213, 245, 33, 244, 251, 244, 222, 75, 244, 184, 244, 222, 79, 244, 184, 36, 18, 37, 42, 237, 119, 36, 18, 37, 244, 184, 36, 238, 122, 165, 37, 244, 184, 165, 36, 244, 184, 75, 249, 35, 2, 175, 47, 241, 203, 241, 17, 254, 216, 146, 248, 43, 58, 235, 244, 239, 132, 58, 235, 244, 240, 221, 2, 126, 244, 232, 58, 235, 244, 240, 221, 2, 63, 244, 232, 58, 30, 2, 126, 244, 232, 58, 30, 2, 63, 244, 232, 8, 36, 58, 30, 110, 8, 37, 58, 30, 110, 8, 36, 160, 110, 8, 37, 160, 110, 8, 36, 42, 160, 110, 8, 37, 42, 160, 110, 210, 238, 94, 52, 220, 238, 94, 52, 235, 236, 242, 215, 175, 52, 238, 87, 242, 215, 175, 52, 37, 59, 2, 28, 244, 212, 165, 126, 52, 165, 63, 52, 165, 36, 37, 52, 165, 126, 42, 52, 165, 63, 42, 52, 165, 36, 37, 42, 52, 165, 126, 59, 248, 254, 143, 165, 63, 59, 248, 254, 143, 165, 126, 42, 59, 248, 254, 143, 165, 63, 42, 59, 248, 254, 143, 165, 63, 239, 196, 52, 32, 33, 243, 46, 32, 33, 241, 142, 32, 33, 241, 143, 32, 33, 240, 32, 32, 33, 241, 144, 32, 33, 240, 33, 32, 33, 240, 39, 32, 33, 238, 204, 32, 33, 241, 145, 32, 33, 240, 34, 32, 33, 240, 40, 32, 33, 238, 205, 32, 33, 240, 45, 32, 33, 238, 210, 32, 33, 238, 225, 32, 33, 237, 188, 32, 33, 241, 146, 32, 33, 240, 35, 32, 33, 240, 41, 32, 33, 238, 206, 32, 33, 240, 46, 32, 33, 238, 211, 32, 33, 238, 226, 32, 33, 237, 189, 32, 33, 240, 50, 32, 33, 238, 215, 32, 33, 238, 230, 32, 33, 237, 193, 32, 33, 238, 240, 32, 33, 237, 203, 32, 33, 237, 223, 32, 33, 237, 2, 32, 33, 241, 147, 32, 33, 240, 36, 32, 33, 240, 42, 32, 33, 238, 207, 32, 33, 240, 47, 32, 33, 238, 212, 32, 33, 238, 227, 32, 33, 237, 190, 32, 33, 240, 51, 32, 33, 238, 216, 32, 33, 238, 231, 32, 33, 237, 194, 32, 33, 238, 241, 32, 33, 237, 204, 32, 33, 237, 224, 32, 33, 237, 3, 32, 33, 240, 54, 32, 33, 238, 219, 32, 33, 238, 234, 32, 33, 237, 197, 32, 33, 238, 244, 32, 33, 237, 207, 32, 33, 237, 227, 32, 33, 237, 6, 32, 33, 238, 250, 32, 33, 237, 213, 32, 33, 237, 233, 32, 33, 237, 12, 32, 33, 237, 243, 32, 33, 237, 22, 32, 33, 237, 37, 32, 33, 236, 98, 32, 33, 241, 148, 32, 33, 240, 37, 32, 33, 240, 43, 32, 33, 238, 208, 32, 33, 240, 48, 32, 33, 238, 213, 32, 33, 238, 228, 32, 33, 237, 191, 32, 33, 240, 52, 32, 33, 238, 217, 32, 33, 238, 232, 32, 33, 237, 195, 32, 33, 238, 242, 32, 33, 237, 205, 32, 33, 237, 225, 32, 33, 237, 4, 32, 33, 240, 55, 32, 33, 238, 220, 32, 33, 238, 235, 32, 33, 237, 198, 32, 33, 238, 245, 32, 33, 237, 208, 32, 33, 237, 228, 32, 33, 237, 7, 32, 33, 238, 251, 32, 33, 237, 214, 32, 33, 237, 234, 32, 33, 237, 13, 32, 33, 237, 244, 32, 33, 237, 23, 32, 33, 237, 38, 32, 33, 236, 99, 32, 33, 240, 57, 32, 33, 238, 222, 32, 33, 238, 237, 32, 33, 237, 200, 32, 33, 238, 247, 32, 33, 237, 210, 32, 33, 237, 230, 32, 33, 237, 9, 32, 33, 238, 253, 32, 33, 237, 216, 32, 33, 237, 236, 32, 33, 237, 15, 32, 33, 237, 246, 32, 33, 237, 25, 32, 33, 237, 40, 32, 33, 236, 101, 32, 33, 239, 0, 32, 33, 237, 219, 32, 33, 237, 239, 32, 33, 237, 18, 32, 33, 237, 249, 32, 33, 237, 28, 32, 33, 237, 43, 32, 33, 236, 104, 32, 33, 237, 253, 32, 33, 237, 32, 32, 33, 237, 47, 32, 33, 236, 108, 32, 33, 237, 52, 32, 33, 236, 113, 32, 33, 236, 119, 32, 33, 236, 12, 32, 33, 241, 149, 32, 33, 240, 38, 32, 33, 240, 44, 32, 33, 238, 209, 32, 33, 240, 49, 32, 33, 238, 214, 32, 33, 238, 229, 32, 33, 237, 192, 32, 33, 240, 53, 32, 33, 238, 218, 32, 33, 238, 233, 32, 33, 237, 196, 32, 33, 238, 243, 32, 33, 237, 206, 32, 33, 237, 226, 32, 33, 237, 5, 32, 33, 240, 56, 32, 33, 238, 221, 32, 33, 238, 236, 32, 33, 237, 199, 32, 33, 238, 246, 32, 33, 237, 209, 32, 33, 237, 229, 32, 33, 237, 8, 32, 33, 238, 252, 32, 33, 237, 215, 32, 33, 237, 235, 32, 33, 237, 14, 32, 33, 237, 245, 32, 33, 237, 24, 32, 33, 237, 39, 32, 33, 236, 100, 32, 33, 240, 58, 32, 33, 238, 223, 32, 33, 238, 238, 32, 33, 237, 201, 32, 33, 238, 248, 32, 33, 237, 211, 32, 33, 237, 231, 32, 33, 237, 10, 32, 33, 238, 254, 32, 33, 237, 217, 32, 33, 237, 237, 32, 33, 237, 16, 32, 33, 237, 247, 32, 33, 237, 26, 32, 33, 237, 41, 32, 33, 236, 102, 32, 33, 239, 1, 32, 33, 237, 220, 32, 33, 237, 240, 32, 33, 237, 19, 32, 33, 237, 250, 32, 33, 237, 29, 32, 33, 237, 44, 32, 33, 236, 105, 32, 33, 237, 254, 32, 33, 237, 33, 32, 33, 237, 48, 32, 33, 236, 109, 32, 33, 237, 53, 32, 33, 236, 114, 32, 33, 236, 120, 32, 33, 236, 13, 32, 33, 240, 59, 32, 33, 238, 224, 32, 33, 238, 239, 32, 33, 237, 202, 32, 33, 238, 249, 32, 33, 237, 212, 32, 33, 237, 232, 32, 33, 237, 11, 32, 33, 238, 255, 32, 33, 237, 218, 32, 33, 237, 238, 32, 33, 237, 17, 32, 33, 237, 248, 32, 33, 237, 27, 32, 33, 237, 42, 32, 33, 236, 103, 32, 33, 239, 2, 32, 33, 237, 221, 32, 33, 237, 241, 32, 33, 237, 20, 32, 33, 237, 251, 32, 33, 237, 30, 32, 33, 237, 45, 32, 33, 236, 106, 32, 33, 237, 255, 32, 33, 237, 34, 32, 33, 237, 49, 32, 33, 236, 110, 32, 33, 237, 54, 32, 33, 236, 115, 32, 33, 236, 121, 32, 33, 236, 14, 32, 33, 239, 3, 32, 33, 237, 222, 32, 33, 237, 242, 32, 33, 237, 21, 32, 33, 237, 252, 32, 33, 237, 31, 32, 33, 237, 46, 32, 33, 236, 107, 32, 33, 238, 0, 32, 33, 237, 35, 32, 33, 237, 50, 32, 33, 236, 111, 32, 33, 237, 55, 32, 33, 236, 116, 32, 33, 236, 122, 32, 33, 236, 15, 32, 33, 238, 1, 32, 33, 237, 36, 32, 33, 237, 51, 32, 33, 236, 112, 32, 33, 237, 56, 32, 33, 236, 117, 32, 33, 236, 123, 32, 33, 236, 16, 32, 33, 237, 57, 32, 33, 236, 118, 32, 33, 236, 124, 32, 33, 236, 17, 32, 33, 236, 125, 32, 33, 236, 18, 32, 33, 236, 19, 32, 33, 235, 215, 63, 237, 120, 59, 2, 55, 122, 63, 237, 120, 59, 2, 42, 55, 122, 126, 42, 59, 2, 55, 122, 63, 42, 59, 2, 55, 122, 36, 37, 42, 59, 2, 55, 122, 63, 237, 120, 59, 248, 254, 143, 126, 42, 59, 248, 254, 143, 63, 42, 59, 248, 254, 143, 220, 59, 2, 146, 122, 210, 59, 2, 146, 122, 210, 242, 59, 52, 220, 242, 59, 52, 126, 42, 249, 15, 52, 63, 42, 249, 15, 52, 126, 242, 59, 249, 15, 52, 63, 242, 59, 249, 15, 52, 63, 237, 120, 242, 59, 249, 15, 52, 63, 59, 2, 242, 118, 244, 239, 210, 59, 139, 143, 220, 59, 139, 143, 63, 59, 2, 249, 88, 2, 55, 122, 63, 59, 2, 249, 88, 2, 42, 55, 122, 63, 237, 120, 59, 2, 244, 182, 63, 237, 120, 59, 2, 249, 88, 2, 55, 122, 63, 237, 120, 59, 2, 249, 88, 2, 42, 55, 122, 126, 236, 196, 63, 236, 196, 126, 42, 236, 196, 63, 42, 236, 196, 126, 59, 139, 86, 239, 132, 63, 59, 139, 86, 239, 132, 126, 59, 248, 254, 253, 99, 139, 86, 239, 132, 63, 59, 248, 254, 253, 99, 139, 86, 239, 132, 244, 177, 249, 17, 18, 244, 181, 249, 2, 52, 244, 177, 249, 2, 18, 244, 181, 249, 17, 52, 244, 177, 249, 17, 59, 2, 128, 244, 177, 249, 2, 59, 2, 128, 244, 181, 249, 2, 59, 2, 128, 244, 181, 249, 17, 59, 2, 128, 244, 177, 249, 17, 59, 18, 244, 177, 249, 2, 52, 244, 177, 249, 2, 59, 18, 244, 181, 249, 2, 52, 244, 181, 249, 2, 59, 18, 244, 181, 249, 17, 52, 244, 181, 249, 17, 59, 18, 244, 177, 249, 17, 52, 242, 120, 239, 125, 239, 149, 240, 247, 238, 109, 240, 247, 239, 125, 239, 149, 242, 120, 238, 109, 244, 181, 249, 2, 59, 239, 149, 244, 177, 249, 2, 52, 244, 177, 249, 2, 59, 239, 149, 244, 181, 249, 2, 52, 240, 247, 239, 125, 239, 149, 244, 177, 249, 2, 52, 242, 120, 239, 125, 239, 149, 244, 181, 249, 2, 52, 244, 177, 249, 2, 59, 239, 149, 244, 177, 249, 17, 52, 244, 177, 249, 17, 59, 239, 149, 244, 177, 249, 2, 52, 249, 90, 59, 239, 119, 240, 30, 184, 59, 239, 119, 63, 249, 120, 240, 252, 239, 176, 59, 239, 119, 63, 249, 120, 240, 252, 237, 121, 59, 239, 119, 220, 249, 120, 240, 252, 237, 125, 59, 239, 119, 220, 249, 120, 240, 252, 236, 195, 238, 56, 253, 133, 238, 87, 52, 239, 41, 253, 133, 235, 236, 52, 253, 121, 253, 133, 235, 236, 52, 242, 80, 253, 133, 235, 236, 52, 253, 121, 253, 133, 238, 87, 59, 2, 242, 119, 253, 121, 253, 133, 235, 236, 59, 2, 244, 212, 149, 37, 236, 69, 238, 87, 52, 149, 36, 236, 69, 235, 236, 52, 235, 236, 242, 77, 175, 52, 238, 87, 242, 77, 175, 52, 63, 59, 53, 207, 126, 52, 126, 59, 53, 207, 63, 52, 207, 63, 59, 53, 126, 52, 63, 59, 2, 249, 4, 45, 126, 59, 2, 249, 4, 45, 63, 59, 240, 249, 170, 36, 37, 59, 240, 249, 3, 240, 200, 210, 237, 120, 59, 248, 254, 3, 240, 200, 36, 133, 75, 37, 133, 79, 239, 142, 36, 133, 79, 37, 133, 75, 239, 142, 75, 133, 37, 79, 133, 36, 239, 142, 75, 133, 36, 79, 133, 37, 239, 142, 36, 133, 75, 37, 133, 75, 239, 142, 75, 133, 37, 79, 133, 37, 239, 142, 36, 133, 79, 37, 133, 79, 239, 142, 75, 133, 36, 79, 133, 36, 239, 142, 126, 154, 2, 133, 75, 139, 143, 63, 154, 2, 133, 75, 139, 143, 210, 154, 2, 133, 37, 139, 143, 220, 154, 2, 133, 37, 139, 143, 126, 154, 2, 133, 79, 139, 143, 63, 154, 2, 133, 79, 139, 143, 210, 154, 2, 133, 36, 139, 143, 220, 154, 2, 133, 36, 139, 143, 126, 154, 2, 133, 75, 248, 254, 143, 63, 154, 2, 133, 75, 248, 254, 143, 210, 154, 2, 133, 37, 248, 254, 143, 220, 154, 2, 133, 37, 248, 254, 143, 126, 154, 2, 133, 79, 248, 254, 143, 63, 154, 2, 133, 79, 248, 254, 143, 210, 154, 2, 133, 36, 248, 254, 143, 220, 154, 2, 133, 36, 248, 254, 143, 126, 154, 2, 133, 75, 53, 126, 154, 2, 133, 244, 185, 210, 154, 2, 133, 36, 242, 99, 210, 154, 2, 133, 184, 63, 154, 2, 133, 75, 53, 63, 154, 2, 133, 244, 185, 220, 154, 2, 133, 36, 242, 99, 220, 154, 2, 133, 184, 126, 154, 2, 133, 75, 53, 63, 154, 2, 133, 253, 131, 126, 154, 2, 133, 79, 53, 63, 154, 2, 133, 244, 185, 63, 154, 2, 133, 75, 53, 126, 154, 2, 133, 253, 131, 63, 154, 2, 133, 79, 53, 126, 154, 2, 133, 244, 185, 126, 154, 2, 133, 75, 53, 165, 244, 189, 126, 154, 2, 133, 79, 244, 188, 165, 244, 189, 63, 154, 2, 133, 75, 53, 165, 244, 189, 63, 154, 2, 133, 79, 244, 188, 165, 244, 189, 210, 154, 2, 133, 36, 242, 99, 220, 154, 2, 133, 184, 220, 154, 2, 133, 36, 242, 99, 210, 154, 2, 133, 184, 37, 42, 59, 2, 241, 4, 245, 25, 242, 61, 25, 53, 63, 52, 229, 239, 168, 53, 63, 52, 126, 59, 53, 229, 223, 63, 59, 53, 229, 223, 63, 59, 53, 242, 93, 80, 76, 206, 53, 126, 52, 126, 59, 240, 249, 237, 110, 196, 53, 63, 52, 242, 76, 53, 63, 52, 126, 59, 240, 249, 240, 237, 239, 121, 53, 126, 52, 36, 249, 102, 244, 182, 37, 249, 102, 244, 182, 75, 249, 102, 244, 182, 79, 249, 102, 244, 182, 242, 59, 55, 253, 99, 237, 185, 255, 27, 239, 129, 248, 82, 255, 27, 239, 129, 249, 173, 242, 81, 36, 58, 244, 175, 110, 37, 58, 244, 175, 110, 36, 58, 236, 47, 37, 58, 236, 47, 255, 27, 239, 129, 36, 244, 211, 110, 255, 27, 239, 129, 37, 244, 211, 110, 255, 27, 239, 129, 36, 241, 43, 110, 255, 27, 239, 129, 37, 241, 43, 110, 36, 30, 226, 2, 238, 75, 37, 30, 226, 2, 238, 75, 36, 30, 226, 2, 249, 121, 254, 214, 253, 121, 240, 213, 37, 30, 226, 2, 249, 121, 254, 214, 242, 80, 240, 213, 36, 30, 226, 2, 249, 121, 254, 214, 242, 80, 240, 213, 37, 30, 226, 2, 249, 121, 254, 214, 253, 121, 240, 213, 36, 160, 226, 2, 227, 37, 160, 226, 2, 227, 36, 253, 133, 206, 110, 37, 253, 133, 196, 110, 42, 36, 253, 133, 196, 110, 42, 37, 253, 133, 206, 110, 36, 86, 239, 139, 244, 202, 110, 37, 86, 239, 139, 244, 202, 110, 242, 118, 242, 143, 55, 242, 193, 244, 176, 239, 136, 160, 240, 236, 244, 172, 37, 160, 242, 49, 2, 240, 207, 239, 136, 37, 160, 2, 227, 160, 2, 255, 29, 240, 235, 244, 196, 242, 117, 238, 128, 160, 240, 236, 244, 172, 238, 128, 160, 240, 236, 253, 131, 242, 60, 242, 117, 224, 242, 117, 160, 2, 238, 75, 224, 160, 2, 238, 75, 241, 2, 160, 240, 236, 253, 131, 241, 2, 160, 240, 236, 244, 185, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 75, 18, 184, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 75, 18, 244, 172, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 79, 18, 184, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 79, 18, 244, 172, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 37, 18, 253, 131, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 36, 18, 253, 131, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 37, 18, 244, 185, 239, 136, 160, 2, 249, 0, 253, 176, 242, 112, 254, 214, 59, 239, 119, 36, 18, 244, 185, 224, 244, 216, 250, 69, 244, 216, 253, 232, 2, 239, 130, 244, 216, 253, 232, 2, 3, 175, 47, 244, 216, 253, 232, 2, 37, 59, 47, 244, 216, 253, 232, 2, 36, 59, 47, 175, 2, 146, 143, 28, 55, 143, 28, 238, 124, 28, 240, 219, 239, 144, 28, 235, 225, 175, 241, 17, 254, 216, 146, 253, 99, 18, 253, 121, 136, 241, 17, 254, 216, 55, 143, 175, 2, 236, 171, 170, 28, 231, 236, 239, 156, 57, 75, 59, 240, 249, 240, 200, 28, 58, 240, 215, 28, 240, 215, 28, 237, 110, 28, 235, 235, 175, 2, 3, 175, 139, 253, 173, 184, 175, 2, 225, 146, 242, 24, 139, 253, 173, 184, 240, 227, 242, 120, 239, 125, 242, 91, 240, 227, 240, 247, 239, 125, 242, 91, 240, 227, 238, 77, 240, 227, 3, 240, 200, 240, 227, 240, 207, 225, 242, 160, 240, 168, 239, 118, 2, 49, 47, 239, 118, 2, 238, 75, 255, 29, 254, 214, 219, 239, 118, 2, 242, 246, 254, 228, 241, 12, 37, 239, 118, 53, 36, 219, 36, 239, 118, 242, 99, 55, 143, 55, 253, 99, 242, 99, 37, 219, 242, 200, 2, 36, 136, 231, 231, 242, 200, 2, 37, 136, 231, 231, 86, 241, 45, 244, 241, 2, 36, 136, 231, 231, 244, 241, 2, 37, 136, 231, 231, 58, 237, 140, 86, 237, 140, 36, 242, 170, 242, 143, 37, 242, 170, 242, 143, 36, 42, 242, 170, 242, 143, 37, 42, 242, 170, 242, 143, 238, 18, 238, 121, 254, 192, 249, 25, 238, 121, 240, 91, 241, 68, 2, 55, 143, 236, 126, 238, 122, 30, 2, 238, 194, 240, 134, 239, 32, 254, 85, 242, 12, 239, 138, 242, 61, 25, 18, 240, 205, 238, 124, 242, 61, 25, 18, 240, 205, 239, 160, 2, 229, 47, 238, 111, 139, 18, 240, 205, 238, 124, 243, 136, 244, 104, 235, 233, 235, 241, 239, 118, 2, 36, 136, 231, 231, 235, 241, 239, 118, 2, 37, 136, 231, 231, 86, 240, 221, 2, 79, 52, 86, 239, 188, 58, 175, 2, 79, 52, 86, 175, 2, 79, 52, 236, 50, 58, 240, 207, 236, 50, 86, 240, 207, 236, 50, 58, 239, 132, 236, 50, 86, 239, 132, 236, 50, 58, 240, 200, 236, 50, 86, 240, 200, 236, 31, 240, 219, 240, 230, 223, 240, 230, 2, 239, 130, 240, 219, 240, 230, 2, 146, 122, 253, 202, 239, 144, 253, 202, 240, 219, 239, 144, 42, 244, 212, 242, 59, 244, 212, 235, 237, 242, 141, 160, 110, 235, 190, 242, 141, 160, 110, 248, 131, 247, 97, 244, 186, 28, 49, 223, 244, 186, 28, 249, 4, 223, 244, 186, 28, 244, 241, 223, 244, 186, 244, 206, 239, 168, 2, 227, 244, 186, 244, 206, 239, 168, 2, 244, 212, 244, 186, 30, 236, 48, 223, 244, 186, 30, 244, 206, 223, 225, 240, 202, 18, 223, 225, 240, 202, 112, 223, 244, 186, 244, 241, 223, 243, 229, 225, 252, 179, 238, 131, 2, 238, 86, 238, 94, 239, 135, 223, 243, 114, 250, 41, 238, 86, 239, 135, 2, 42, 122, 239, 135, 241, 105, 2, 242, 91, 236, 249, 239, 22, 235, 236, 236, 138, 217, 236, 201, 2, 236, 226, 250, 42, 242, 171, 245, 36, 217, 236, 201, 2, 236, 69, 250, 42, 242, 171, 245, 36, 217, 236, 201, 141, 239, 31, 253, 173, 245, 36, 239, 135, 242, 171, 119, 244, 180, 223, 238, 49, 239, 135, 223, 239, 135, 2, 126, 59, 2, 128, 239, 135, 2, 244, 241, 57, 239, 135, 2, 235, 238, 239, 135, 2, 242, 109, 239, 135, 2, 239, 130, 239, 135, 2, 238, 75, 244, 251, 244, 222, 36, 239, 118, 223, 255, 27, 239, 129, 242, 185, 236, 75, 255, 27, 239, 129, 242, 185, 241, 239, 255, 27, 239, 129, 242, 185, 237, 81, 249, 4, 25, 2, 3, 175, 47, 249, 4, 25, 2, 157, 230, 47, 249, 4, 25, 2, 229, 47, 249, 4, 25, 2, 49, 45, 249, 4, 25, 2, 229, 45, 249, 4, 25, 2, 238, 83, 114, 249, 4, 25, 2, 86, 219, 244, 197, 25, 2, 244, 192, 47, 244, 197, 25, 2, 49, 45, 244, 197, 25, 2, 240, 247, 244, 215, 244, 197, 25, 2, 242, 120, 244, 215, 249, 4, 25, 254, 214, 36, 136, 240, 200, 249, 4, 25, 254, 214, 37, 136, 240, 200, 244, 139, 112, 244, 234, 239, 138, 235, 191, 25, 2, 49, 47, 235, 191, 25, 2, 238, 75, 237, 128, 241, 244, 2, 242, 80, 241, 128, 245, 193, 239, 138, 235, 191, 25, 254, 214, 36, 136, 240, 200, 235, 191, 25, 254, 214, 37, 136, 240, 200, 28, 235, 191, 25, 2, 157, 240, 203, 235, 191, 25, 254, 214, 42, 240, 200, 28, 239, 156, 57, 249, 4, 25, 254, 214, 219, 244, 197, 25, 254, 214, 219, 235, 191, 25, 254, 214, 219, 239, 218, 239, 138, 239, 76, 239, 218, 239, 138, 255, 27, 239, 129, 238, 53, 236, 75, 236, 84, 112, 237, 152, 236, 48, 2, 227, 244, 206, 2, 244, 197, 57, 244, 206, 2, 239, 130, 236, 48, 2, 239, 130, 236, 48, 2, 240, 202, 249, 46, 244, 206, 2, 240, 202, 253, 186, 244, 206, 53, 235, 238, 236, 48, 53, 242, 109, 244, 206, 53, 253, 99, 53, 235, 238, 236, 48, 53, 253, 99, 53, 242, 109, 244, 206, 242, 99, 18, 242, 160, 2, 242, 109, 236, 48, 242, 99, 18, 242, 160, 2, 235, 238, 242, 77, 244, 206, 2, 241, 76, 242, 77, 236, 48, 2, 241, 76, 42, 30, 235, 238, 42, 30, 242, 109, 242, 77, 244, 206, 2, 242, 246, 18, 245, 193, 239, 138, 240, 202, 18, 2, 49, 47, 240, 202, 112, 2, 49, 47, 42, 240, 202, 249, 46, 42, 240, 202, 253, 186, 225, 236, 76, 240, 202, 249, 46, 225, 236, 76, 240, 202, 253, 186, 241, 79, 244, 222, 253, 186, 241, 79, 244, 222, 249, 46, 240, 202, 112, 236, 221, 240, 202, 249, 46, 240, 202, 18, 2, 242, 65, 244, 239, 240, 202, 112, 2, 242, 65, 244, 239, 240, 202, 18, 2, 146, 244, 189, 240, 202, 112, 2, 146, 244, 189, 240, 202, 18, 2, 42, 239, 130, 240, 202, 18, 2, 238, 75, 240, 202, 18, 2, 42, 238, 75, 3, 254, 199, 2, 238, 75, 240, 202, 112, 2, 42, 239, 130, 240, 202, 112, 2, 42, 238, 75, 255, 27, 239, 129, 243, 94, 232, 15, 255, 27, 239, 129, 248, 19, 232, 15, 242, 61, 25, 2, 49, 45, 238, 111, 2, 49, 47, 242, 59, 146, 253, 99, 2, 42, 55, 122, 242, 59, 146, 253, 99, 2, 242, 59, 55, 122, 229, 239, 168, 2, 49, 47, 229, 239, 168, 2, 242, 120, 244, 215, 240, 225, 244, 197, 240, 163, 238, 192, 2, 49, 47, 242, 61, 2, 238, 77, 242, 93, 80, 139, 2, 157, 240, 203, 235, 239, 80, 112, 80, 76, 242, 61, 25, 53, 249, 4, 57, 249, 4, 25, 53, 242, 61, 57, 242, 61, 25, 53, 229, 223, 42, 244, 214, 242, 88, 225, 236, 212, 242, 61, 243, 0, 244, 171, 236, 212, 242, 61, 243, 0, 242, 61, 25, 2, 225, 248, 253, 53, 18, 225, 248, 253, 45, 237, 113, 2, 249, 28, 248, 253, 47, 206, 2, 175, 240, 235, 196, 2, 175, 240, 235, 206, 2, 239, 126, 167, 47, 196, 2, 239, 126, 167, 47, 206, 112, 240, 205, 80, 76, 196, 112, 240, 205, 80, 76, 206, 112, 240, 205, 80, 139, 2, 49, 240, 235, 196, 112, 240, 205, 80, 139, 2, 49, 240, 235, 206, 112, 240, 205, 80, 139, 2, 49, 47, 196, 112, 240, 205, 80, 139, 2, 49, 47, 206, 112, 240, 205, 80, 139, 2, 49, 53, 184, 196, 112, 240, 205, 80, 139, 2, 49, 53, 244, 172, 206, 112, 236, 53, 196, 112, 236, 53, 206, 18, 236, 193, 141, 80, 76, 196, 18, 236, 193, 141, 80, 76, 206, 18, 141, 236, 53, 196, 18, 141, 236, 53, 206, 53, 236, 188, 80, 53, 235, 235, 196, 53, 236, 188, 80, 53, 237, 110, 206, 53, 240, 225, 112, 242, 88, 196, 53, 240, 225, 112, 242, 88, 206, 53, 240, 225, 53, 235, 235, 196, 53, 240, 225, 53, 237, 110, 206, 53, 196, 53, 236, 188, 242, 88, 196, 53, 206, 53, 236, 188, 242, 88, 206, 53, 240, 205, 80, 53, 196, 53, 240, 205, 242, 88, 196, 53, 240, 205, 80, 53, 206, 53, 240, 205, 242, 88, 240, 205, 80, 139, 112, 237, 110, 240, 205, 80, 139, 112, 235, 235, 240, 205, 80, 139, 112, 206, 2, 49, 240, 235, 240, 205, 80, 139, 112, 196, 2, 49, 240, 235, 236, 188, 80, 139, 112, 237, 110, 236, 188, 80, 139, 112, 235, 235, 236, 188, 240, 205, 80, 139, 112, 237, 110, 236, 188, 240, 205, 80, 139, 112, 235, 235, 240, 225, 112, 237, 110, 240, 225, 112, 235, 235, 240, 225, 53, 206, 53, 242, 61, 57, 240, 225, 53, 196, 53, 242, 61, 57, 42, 242, 148, 237, 110, 42, 242, 148, 235, 235, 42, 242, 148, 206, 2, 238, 75, 196, 236, 221, 237, 110, 196, 242, 99, 237, 110, 206, 242, 77, 254, 216, 242, 203, 196, 242, 77, 254, 216, 242, 203, 206, 242, 77, 254, 216, 245, 72, 53, 240, 205, 242, 88, 196, 242, 77, 254, 216, 245, 72, 53, 240, 205, 242, 88, 241, 80, 245, 47, 242, 230, 245, 47, 241, 80, 249, 166, 112, 80, 76, 242, 230, 249, 166, 112, 80, 76, 242, 61, 25, 2, 246, 34, 47, 239, 143, 53, 236, 193, 242, 61, 57, 239, 145, 53, 236, 193, 242, 61, 57, 239, 143, 53, 236, 193, 141, 80, 76, 239, 145, 53, 236, 193, 141, 80, 76, 239, 143, 53, 242, 61, 57, 239, 145, 53, 242, 61, 57, 239, 143, 53, 141, 80, 76, 239, 145, 53, 141, 80, 76, 239, 143, 53, 242, 93, 80, 76, 239, 145, 53, 242, 93, 80, 76, 239, 143, 53, 141, 242, 93, 80, 76, 239, 145, 53, 141, 242, 93, 80, 76, 42, 238, 126, 42, 238, 130, 242, 76, 2, 227, 239, 121, 2, 227, 242, 76, 2, 249, 4, 25, 45, 239, 121, 2, 249, 4, 25, 45, 242, 76, 2, 235, 191, 25, 45, 239, 121, 2, 235, 191, 25, 45, 242, 76, 137, 112, 80, 139, 2, 49, 47, 239, 121, 137, 112, 80, 139, 2, 49, 47, 242, 76, 137, 53, 242, 61, 57, 239, 121, 137, 53, 242, 61, 57, 242, 76, 137, 53, 229, 223, 239, 121, 137, 53, 229, 223, 242, 76, 137, 53, 242, 93, 80, 76, 239, 121, 137, 53, 242, 93, 80, 76, 242, 76, 137, 53, 141, 80, 76, 239, 121, 137, 53, 141, 80, 76, 30, 36, 249, 0, 56, 223, 30, 37, 249, 0, 56, 223, 242, 77, 240, 237, 242, 77, 238, 116, 242, 77, 242, 76, 112, 80, 76, 242, 77, 239, 121, 112, 80, 76, 242, 76, 53, 238, 116, 239, 121, 53, 240, 237, 242, 76, 53, 240, 237, 239, 121, 53, 238, 116, 239, 121, 242, 99, 240, 237, 239, 121, 242, 99, 18, 242, 160, 254, 216, 249, 15, 2, 240, 237, 240, 214, 137, 240, 236, 237, 121, 239, 62, 2, 254, 190, 249, 168, 237, 106, 235, 238, 240, 77, 237, 78, 207, 36, 244, 184, 207, 79, 244, 184, 207, 75, 244, 184, 236, 30, 2, 159, 55, 253, 99, 242, 59, 37, 237, 119, 42, 55, 253, 99, 36, 237, 119, 55, 253, 99, 42, 36, 237, 119, 42, 55, 253, 99, 42, 36, 237, 119, 165, 249, 15, 248, 254, 36, 243, 219, 137, 42, 238, 88, 207, 79, 249, 35, 2, 239, 130, 207, 75, 249, 35, 2, 238, 75, 207, 75, 249, 35, 53, 207, 79, 244, 184, 42, 79, 244, 184, 42, 75, 244, 184, 42, 242, 114, 141, 57, 224, 42, 242, 114, 141, 57, 249, 41, 141, 243, 93, 2, 224, 240, 122, 242, 91, 55, 217, 2, 175, 47, 55, 217, 2, 175, 45, 79, 249, 35, 2, 175, 45, 239, 160, 2, 146, 122, 239, 160, 2, 229, 223, 242, 59, 55, 253, 99, 242, 199, 238, 114, 242, 59, 55, 253, 99, 2, 146, 122, 242, 59, 244, 214, 223, 242, 59, 242, 148, 237, 110, 242, 59, 242, 148, 235, 235, 236, 188, 240, 205, 206, 112, 80, 76, 236, 188, 240, 205, 196, 112, 80, 76, 242, 59, 240, 230, 242, 199, 238, 114, 244, 222, 242, 59, 55, 253, 99, 223, 42, 240, 230, 223, 58, 55, 143, 244, 186, 58, 55, 143, 7, 22, 241, 248, 7, 22, 242, 175, 7, 22, 242, 165, 121, 7, 22, 242, 165, 114, 7, 22, 242, 165, 153, 7, 22, 241, 237, 7, 22, 249, 47, 7, 22, 243, 7, 7, 22, 245, 126, 121, 7, 22, 245, 126, 114, 7, 22, 236, 213, 7, 22, 245, 178, 7, 22, 3, 121, 7, 22, 3, 114, 7, 22, 249, 105, 121, 7, 22, 249, 105, 114, 7, 22, 249, 105, 153, 7, 22, 249, 105, 163, 7, 22, 244, 91, 7, 22, 241, 87, 7, 22, 245, 194, 121, 7, 22, 245, 194, 114, 7, 22, 244, 218, 121, 7, 22, 244, 218, 114, 7, 22, 244, 250, 7, 22, 249, 158, 7, 22, 243, 64, 7, 22, 249, 87, 7, 22, 244, 229, 7, 22, 242, 207, 7, 22, 241, 217, 7, 22, 238, 190, 7, 22, 245, 220, 121, 7, 22, 245, 220, 114, 7, 22, 244, 236, 7, 22, 254, 65, 121, 7, 22, 254, 65, 114, 7, 22, 237, 130, 136, 250, 94, 243, 13, 7, 22, 249, 201, 7, 22, 249, 215, 7, 22, 245, 114, 7, 22, 249, 192, 137, 242, 202, 7, 22, 249, 220, 7, 22, 243, 3, 121, 7, 22, 243, 3, 114, 7, 22, 241, 41, 7, 22, 245, 44, 7, 22, 236, 44, 245, 44, 7, 22, 253, 243, 121, 7, 22, 253, 243, 114, 7, 22, 253, 243, 153, 7, 22, 253, 243, 163, 7, 22, 247, 77, 7, 22, 242, 250, 7, 22, 252, 116, 7, 22, 250, 249, 7, 22, 250, 37, 7, 22, 245, 64, 121, 7, 22, 245, 64, 114, 7, 22, 245, 139, 7, 22, 241, 67, 7, 22, 245, 23, 121, 7, 22, 245, 23, 114, 7, 22, 245, 23, 153, 7, 22, 243, 11, 7, 22, 239, 210, 7, 22, 249, 17, 121, 7, 22, 249, 17, 114, 7, 22, 236, 44, 249, 117, 7, 22, 237, 130, 244, 210, 7, 22, 244, 210, 7, 22, 236, 44, 241, 82, 7, 22, 236, 44, 242, 251, 7, 22, 245, 22, 7, 22, 236, 44, 245, 66, 7, 22, 237, 130, 245, 218, 7, 22, 249, 176, 121, 7, 22, 249, 176, 114, 7, 22, 245, 70, 7, 22, 236, 44, 245, 100, 7, 22, 165, 121, 7, 22, 165, 114, 7, 22, 236, 44, 245, 133, 7, 22, 236, 44, 245, 91, 7, 22, 245, 143, 121, 7, 22, 245, 143, 114, 7, 22, 245, 167, 7, 22, 245, 62, 7, 22, 236, 44, 243, 8, 239, 187, 7, 22, 236, 44, 245, 130, 7, 22, 236, 44, 245, 50, 7, 22, 236, 44, 249, 224, 7, 22, 254, 8, 121, 7, 22, 254, 8, 114, 7, 22, 254, 8, 153, 7, 22, 236, 44, 249, 219, 7, 22, 245, 25, 7, 22, 236, 44, 242, 224, 7, 22, 245, 63, 7, 22, 242, 217, 7, 22, 236, 44, 245, 85, 7, 22, 236, 44, 245, 14, 7, 22, 236, 44, 245, 177, 7, 22, 237, 130, 243, 18, 7, 22, 237, 130, 241, 90, 7, 22, 236, 44, 245, 89, 7, 22, 236, 56, 245, 21, 7, 22, 236, 44, 245, 21, 7, 22, 236, 56, 242, 191, 7, 22, 236, 44, 242, 191, 7, 22, 236, 56, 241, 19, 7, 22, 236, 44, 241, 19, 7, 22, 241, 9, 7, 22, 236, 56, 241, 9, 7, 22, 236, 44, 241, 9, 40, 22, 121, 40, 22, 244, 176, 40, 22, 227, 40, 22, 242, 91, 40, 22, 242, 3, 40, 22, 128, 40, 22, 114, 40, 22, 251, 195, 40, 22, 249, 146, 40, 22, 247, 57, 40, 22, 243, 99, 40, 22, 176, 40, 22, 79, 249, 47, 40, 22, 243, 76, 40, 22, 251, 107, 40, 22, 243, 7, 40, 22, 249, 0, 249, 47, 40, 22, 243, 191, 40, 22, 244, 40, 40, 22, 248, 174, 40, 22, 244, 97, 40, 22, 37, 249, 0, 249, 47, 40, 22, 243, 145, 237, 139, 40, 22, 249, 18, 40, 22, 236, 213, 40, 22, 245, 178, 40, 22, 242, 175, 40, 22, 240, 145, 40, 22, 243, 26, 40, 22, 243, 231, 40, 22, 237, 139, 40, 22, 242, 142, 40, 22, 240, 159, 40, 22, 253, 195, 40, 22, 255, 8, 242, 15, 40, 22, 240, 71, 40, 22, 250, 158, 40, 22, 244, 148, 40, 22, 243, 62, 40, 22, 248, 24, 40, 22, 246, 251, 40, 22, 243, 2, 40, 22, 247, 53, 40, 22, 241, 130, 40, 22, 242, 19, 40, 22, 238, 147, 40, 22, 244, 60, 40, 22, 248, 173, 40, 22, 240, 131, 40, 22, 242, 42, 40, 22, 250, 229, 40, 22, 207, 241, 87, 40, 22, 242, 118, 242, 175, 40, 22, 165, 242, 23, 40, 22, 225, 243, 143, 40, 22, 244, 79, 40, 22, 249, 129, 40, 22, 244, 92, 40, 22, 240, 10, 40, 22, 248, 104, 40, 22, 242, 178, 40, 22, 240, 84, 40, 22, 246, 113, 40, 22, 244, 250, 40, 22, 241, 117, 40, 22, 249, 158, 40, 22, 242, 1, 40, 22, 241, 141, 40, 22, 250, 139, 40, 22, 240, 207, 40, 22, 249, 151, 40, 22, 249, 87, 40, 22, 252, 156, 40, 22, 244, 229, 40, 22, 248, 137, 40, 22, 247, 51, 40, 22, 189, 40, 22, 242, 207, 40, 22, 242, 54, 40, 22, 254, 240, 249, 151, 40, 22, 240, 16, 40, 22, 249, 225, 40, 22, 246, 68, 40, 22, 244, 105, 40, 22, 242, 169, 40, 22, 244, 236, 40, 22, 246, 69, 40, 22, 241, 163, 40, 22, 42, 170, 40, 22, 136, 250, 94, 243, 13, 40, 22, 244, 87, 40, 22, 246, 129, 40, 22, 249, 201, 40, 22, 249, 215, 40, 22, 239, 64, 40, 22, 245, 114, 40, 22, 243, 218, 40, 22, 248, 130, 40, 22, 244, 107, 40, 22, 247, 67, 40, 22, 252, 246, 40, 22, 243, 110, 40, 22, 249, 192, 137, 242, 202, 40, 22, 239, 84, 40, 22, 242, 118, 248, 119, 40, 22, 242, 92, 40, 22, 248, 77, 40, 22, 246, 109, 40, 22, 249, 220, 40, 22, 244, 95, 40, 22, 52, 40, 22, 244, 106, 40, 22, 242, 18, 40, 22, 244, 123, 40, 22, 243, 137, 40, 22, 246, 43, 40, 22, 244, 103, 40, 22, 241, 41, 40, 22, 248, 21, 40, 22, 245, 44, 40, 22, 251, 118, 40, 22, 252, 14, 40, 22, 242, 250, 40, 22, 240, 73, 40, 22, 250, 37, 40, 22, 249, 46, 40, 22, 247, 249, 40, 22, 249, 218, 40, 22, 243, 52, 40, 22, 245, 139, 40, 22, 239, 49, 40, 22, 245, 179, 40, 22, 241, 101, 40, 22, 241, 67, 40, 22, 241, 36, 40, 22, 241, 229, 40, 22, 246, 30, 40, 22, 239, 86, 40, 22, 243, 73, 40, 22, 243, 138, 40, 22, 243, 11, 40, 22, 241, 187, 40, 22, 243, 47, 40, 22, 249, 176, 237, 139, 40, 22, 239, 210, 40, 22, 248, 171, 40, 22, 249, 117, 40, 22, 244, 210, 40, 22, 241, 82, 40, 22, 242, 47, 40, 22, 246, 18, 40, 22, 252, 65, 40, 22, 241, 107, 40, 22, 242, 251, 40, 22, 252, 119, 40, 22, 252, 138, 40, 22, 245, 22, 40, 22, 246, 31, 40, 22, 245, 66, 40, 22, 241, 114, 40, 22, 240, 119, 40, 22, 245, 218, 40, 22, 245, 70, 40, 22, 245, 222, 40, 22, 236, 96, 40, 22, 240, 194, 40, 22, 245, 100, 40, 22, 245, 133, 40, 22, 245, 91, 40, 22, 243, 230, 40, 22, 244, 86, 40, 22, 207, 244, 109, 245, 14, 40, 22, 245, 167, 40, 22, 245, 62, 40, 22, 244, 150, 40, 22, 244, 235, 40, 22, 239, 187, 40, 22, 243, 8, 239, 187, 40, 22, 247, 56, 40, 22, 244, 93, 40, 22, 245, 130, 40, 22, 245, 50, 40, 22, 249, 224, 40, 22, 249, 219, 40, 22, 245, 25, 40, 22, 239, 21, 40, 22, 242, 224, 40, 22, 245, 63, 40, 22, 248, 117, 40, 22, 246, 171, 40, 22, 243, 112, 40, 22, 237, 84, 245, 222, 40, 22, 238, 187, 40, 22, 242, 217, 40, 22, 245, 85, 40, 22, 245, 14, 40, 22, 245, 177, 40, 22, 246, 102, 40, 22, 243, 18, 40, 22, 246, 172, 40, 22, 241, 90, 40, 22, 241, 214, 40, 22, 231, 231, 40, 22, 237, 59, 40, 22, 245, 89, 40, 22, 242, 39, 40, 22, 246, 115, 40, 22, 250, 61, 40, 22, 247, 180, 40, 22, 245, 21, 40, 22, 242, 191, 40, 22, 241, 19, 40, 22, 241, 9, 40, 22, 243, 115, 66, 236, 185, 92, 36, 139, 184, 66, 236, 185, 92, 53, 139, 45, 66, 236, 185, 92, 36, 139, 242, 65, 18, 184, 66, 236, 185, 92, 53, 139, 242, 65, 18, 45, 66, 236, 185, 92, 213, 239, 98, 66, 236, 185, 92, 239, 165, 248, 254, 47, 66, 236, 185, 92, 239, 165, 248, 254, 45, 66, 236, 185, 92, 239, 165, 248, 254, 244, 172, 66, 236, 185, 92, 239, 165, 248, 254, 156, 244, 172, 66, 236, 185, 92, 239, 165, 248, 254, 156, 184, 66, 236, 185, 92, 239, 165, 248, 254, 149, 244, 172, 66, 236, 185, 92, 239, 54, 66, 242, 69, 66, 242, 84, 66, 213, 189, 246, 110, 65, 240, 95, 238, 20, 239, 239, 90, 66, 238, 101, 65, 66, 241, 48, 65, 66, 83, 244, 173, 36, 160, 110, 37, 160, 110, 36, 42, 160, 110, 37, 42, 160, 110, 36, 242, 86, 110, 37, 242, 86, 110, 36, 58, 242, 86, 110, 37, 58, 242, 86, 110, 36, 86, 237, 126, 110, 37, 86, 237, 126, 110, 242, 183, 65, 251, 32, 65, 36, 239, 139, 244, 202, 110, 37, 239, 139, 244, 202, 110, 36, 58, 237, 126, 110, 37, 58, 237, 126, 110, 36, 58, 239, 139, 244, 202, 110, 37, 58, 239, 139, 244, 202, 110, 36, 58, 30, 110, 37, 58, 30, 110, 249, 90, 244, 189, 224, 42, 245, 37, 238, 76, 65, 42, 245, 37, 238, 76, 65, 253, 113, 42, 245, 37, 238, 76, 65, 242, 183, 167, 244, 235, 239, 134, 151, 121, 239, 134, 151, 114, 239, 134, 151, 153, 239, 134, 151, 163, 239, 134, 151, 168, 239, 134, 151, 169, 239, 134, 151, 179, 239, 134, 151, 176, 239, 134, 151, 178, 66, 247, 58, 249, 5, 65, 66, 242, 120, 249, 5, 65, 66, 238, 119, 249, 5, 65, 66, 240, 69, 249, 5, 65, 20, 242, 66, 49, 249, 5, 65, 20, 42, 49, 249, 5, 65, 249, 57, 244, 189, 55, 249, 82, 242, 113, 65, 55, 249, 82, 242, 113, 2, 242, 116, 244, 205, 65, 55, 249, 82, 242, 113, 167, 156, 244, 217, 55, 249, 82, 242, 113, 2, 242, 116, 244, 205, 167, 156, 244, 217, 55, 249, 82, 242, 113, 167, 149, 244, 217, 28, 242, 183, 65, 66, 127, 217, 251, 0, 238, 158, 90, 239, 134, 151, 249, 18, 239, 134, 151, 240, 239, 239, 134, 151, 241, 7, 55, 66, 238, 101, 65, 251, 219, 65, 250, 41, 236, 240, 65, 66, 238, 79, 237, 136, 66, 136, 251, 8, 242, 69, 93, 1, 3, 64, 93, 1, 64, 93, 1, 3, 69, 93, 1, 69, 93, 1, 3, 84, 93, 1, 84, 93, 1, 3, 70, 93, 1, 70, 93, 1, 3, 78, 93, 1, 78, 93, 1, 208, 93, 1, 253, 100, 93, 1, 253, 182, 93, 1, 253, 209, 93, 1, 253, 183, 93, 1, 253, 196, 93, 1, 253, 134, 93, 1, 253, 207, 93, 1, 253, 155, 93, 1, 253, 195, 93, 1, 253, 97, 93, 1, 253, 129, 93, 1, 253, 158, 93, 1, 253, 218, 93, 1, 253, 172, 93, 1, 253, 233, 93, 1, 253, 171, 93, 1, 253, 189, 93, 1, 253, 159, 93, 1, 253, 190, 93, 1, 253, 91, 93, 1, 253, 93, 93, 1, 253, 174, 93, 1, 253, 165, 93, 1, 3, 253, 160, 93, 1, 253, 160, 93, 1, 253, 204, 93, 1, 253, 151, 93, 1, 253, 152, 93, 1, 76, 93, 1, 253, 193, 93, 1, 253, 94, 93, 1, 253, 148, 93, 1, 253, 112, 93, 1, 253, 157, 93, 1, 253, 136, 93, 1, 253, 88, 93, 1, 253, 110, 93, 1, 253, 90, 93, 1, 253, 154, 93, 1, 253, 236, 93, 1, 253, 116, 93, 1, 253, 197, 93, 1, 253, 192, 93, 1, 253, 231, 93, 1, 253, 125, 93, 1, 253, 191, 93, 1, 253, 143, 93, 1, 253, 140, 93, 1, 253, 221, 93, 1, 253, 187, 93, 1, 221, 93, 1, 253, 156, 93, 1, 253, 114, 93, 1, 253, 167, 93, 1, 253, 141, 93, 1, 3, 216, 93, 1, 216, 93, 1, 3, 253, 124, 93, 1, 253, 124, 93, 1, 3, 253, 123, 93, 1, 253, 123, 93, 1, 253, 92, 93, 1, 253, 169, 93, 1, 253, 170, 93, 1, 253, 150, 93, 1, 253, 144, 93, 1, 3, 253, 98, 93, 1, 253, 98, 93, 1, 253, 145, 93, 1, 253, 132, 93, 1, 253, 138, 93, 1, 183, 93, 1, 253, 255, 93, 1, 3, 208, 93, 1, 3, 253, 134, 48, 232, 3, 242, 116, 244, 205, 65, 48, 232, 3, 236, 205, 244, 205, 65, 232, 3, 242, 116, 244, 205, 65, 232, 3, 236, 205, 244, 205, 65, 93, 238, 101, 65, 93, 242, 116, 238, 101, 65, 93, 240, 253, 248, 197, 232, 3, 42, 240, 241, 39, 1, 3, 64, 39, 1, 64, 39, 1, 3, 69, 39, 1, 69, 39, 1, 3, 84, 39, 1, 84, 39, 1, 3, 70, 39, 1, 70, 39, 1, 3, 78, 39, 1, 78, 39, 1, 208, 39, 1, 253, 100, 39, 1, 253, 182, 39, 1, 253, 209, 39, 1, 253, 183, 39, 1, 253, 196, 39, 1, 253, 134, 39, 1, 253, 207, 39, 1, 253, 155, 39, 1, 253, 195, 39, 1, 253, 97, 39, 1, 253, 129, 39, 1, 253, 158, 39, 1, 253, 218, 39, 1, 253, 172, 39, 1, 253, 233, 39, 1, 253, 171, 39, 1, 253, 189, 39, 1, 253, 159, 39, 1, 253, 190, 39, 1, 253, 91, 39, 1, 253, 93, 39, 1, 253, 174, 39, 1, 253, 165, 39, 1, 3, 253, 160, 39, 1, 253, 160, 39, 1, 253, 204, 39, 1, 253, 151, 39, 1, 253, 152, 39, 1, 76, 39, 1, 253, 193, 39, 1, 253, 94, 39, 1, 253, 148, 39, 1, 253, 112, 39, 1, 253, 157, 39, 1, 253, 136, 39, 1, 253, 88, 39, 1, 253, 110, 39, 1, 253, 90, 39, 1, 253, 154, 39, 1, 253, 236, 39, 1, 253, 116, 39, 1, 253, 197, 39, 1, 253, 192, 39, 1, 253, 231, 39, 1, 253, 125, 39, 1, 253, 191, 39, 1, 253, 143, 39, 1, 253, 140, 39, 1, 253, 221, 39, 1, 253, 187, 39, 1, 221, 39, 1, 253, 156, 39, 1, 253, 114, 39, 1, 253, 167, 39, 1, 253, 141, 39, 1, 3, 216, 39, 1, 216, 39, 1, 3, 253, 124, 39, 1, 253, 124, 39, 1, 3, 253, 123, 39, 1, 253, 123, 39, 1, 253, 92, 39, 1, 253, 169, 39, 1, 253, 170, 39, 1, 253, 150, 39, 1, 253, 144, 39, 1, 3, 253, 98, 39, 1, 253, 98, 39, 1, 253, 145, 39, 1, 253, 132, 39, 1, 253, 138, 39, 1, 183, 39, 1, 253, 255, 39, 1, 3, 208, 39, 1, 3, 253, 134, 39, 1, 253, 161, 39, 1, 254, 25, 39, 1, 253, 214, 39, 1, 253, 215, 39, 242, 65, 227, 232, 3, 238, 153, 244, 205, 65, 39, 238, 101, 65, 39, 242, 116, 238, 101, 65, 39, 240, 253, 247, 39, 134, 1, 199, 134, 1, 198, 134, 1, 171, 134, 1, 204, 134, 1, 187, 134, 1, 190, 134, 1, 183, 134, 1, 148, 134, 1, 194, 134, 1, 205, 134, 1, 164, 134, 1, 200, 134, 1, 209, 134, 1, 170, 134, 1, 254, 211, 134, 1, 254, 94, 134, 1, 254, 21, 134, 1, 135, 134, 1, 202, 134, 1, 203, 134, 1, 159, 134, 1, 64, 134, 1, 78, 134, 1, 70, 134, 1, 254, 9, 134, 1, 253, 106, 134, 1, 254, 36, 134, 1, 253, 109, 134, 1, 253, 247, 134, 1, 253, 235, 134, 1, 253, 166, 134, 1, 249, 75, 134, 1, 249, 66, 134, 1, 253, 205, 134, 1, 69, 134, 1, 84, 134, 1, 254, 120, 134, 1, 186, 134, 1, 253, 244, 134, 1, 254, 108, 20, 1, 240, 242, 20, 1, 236, 59, 20, 1, 236, 63, 20, 1, 242, 131, 20, 1, 236, 65, 20, 1, 236, 66, 20, 1, 240, 244, 20, 1, 236, 72, 20, 1, 242, 134, 20, 1, 235, 247, 20, 1, 236, 67, 20, 1, 236, 68, 20, 1, 236, 204, 20, 1, 235, 197, 20, 1, 235, 196, 20, 1, 236, 57, 20, 1, 242, 129, 20, 1, 242, 133, 20, 1, 236, 209, 20, 1, 236, 198, 20, 1, 244, 230, 20, 1, 237, 138, 20, 1, 242, 126, 20, 1, 242, 122, 20, 1, 236, 207, 20, 1, 239, 155, 20, 1, 239, 158, 20, 1, 239, 166, 20, 1, 239, 161, 20, 1, 242, 125, 20, 1, 64, 20, 1, 253, 163, 20, 1, 216, 20, 1, 249, 181, 20, 1, 254, 10, 20, 1, 70, 20, 1, 249, 182, 20, 1, 253, 200, 20, 1, 78, 20, 1, 253, 98, 20, 1, 249, 175, 20, 1, 253, 142, 20, 1, 253, 123, 20, 1, 84, 20, 1, 249, 177, 20, 1, 253, 132, 20, 1, 253, 145, 20, 1, 253, 124, 20, 1, 254, 12, 20, 1, 253, 139, 20, 1, 69, 20, 240, 255, 20, 1, 236, 233, 20, 1, 235, 246, 20, 1, 236, 220, 20, 1, 235, 201, 20, 1, 231, 250, 20, 1, 236, 1, 20, 1, 232, 4, 20, 1, 235, 206, 20, 1, 231, 251, 20, 1, 236, 64, 20, 1, 236, 216, 20, 1, 235, 200, 20, 1, 235, 194, 20, 1, 235, 255, 20, 1, 236, 0, 20, 1, 231, 248, 20, 1, 231, 249, 20, 1, 236, 77, 20, 1, 235, 205, 20, 1, 235, 195, 20, 1, 231, 240, 20, 1, 236, 70, 20, 1, 236, 230, 20, 1, 236, 71, 20, 1, 236, 206, 20, 1, 236, 229, 20, 1, 239, 191, 20, 1, 236, 208, 20, 1, 238, 134, 20, 1, 235, 210, 20, 1, 232, 5, 20, 1, 232, 14, 20, 1, 236, 232, 20, 1, 236, 73, 20, 1, 243, 19, 20, 1, 241, 91, 20, 1, 245, 226, 20, 1, 241, 92, 20, 1, 243, 20, 20, 1, 245, 228, 20, 1, 242, 197, 20, 1, 241, 100, 66, 237, 111, 241, 202, 65, 66, 237, 111, 240, 219, 65, 66, 237, 111, 253, 101, 65, 66, 237, 111, 225, 65, 66, 237, 111, 244, 171, 65, 66, 237, 111, 249, 28, 65, 66, 237, 111, 253, 121, 65, 66, 237, 111, 242, 65, 65, 66, 237, 111, 242, 80, 65, 66, 237, 111, 245, 84, 65, 66, 237, 111, 242, 165, 65, 66, 237, 111, 248, 124, 65, 66, 237, 111, 242, 214, 65, 66, 237, 111, 243, 144, 65, 66, 237, 111, 246, 120, 65, 66, 237, 111, 254, 55, 65, 134, 1, 253, 192, 134, 1, 253, 218, 134, 1, 253, 228, 134, 1, 253, 196, 134, 1, 253, 126, 134, 1, 250, 243, 134, 1, 253, 119, 134, 1, 250, 38, 134, 1, 254, 117, 134, 1, 250, 137, 134, 1, 251, 112, 134, 1, 252, 240, 134, 1, 254, 115, 134, 1, 252, 18, 134, 1, 245, 240, 134, 1, 245, 249, 134, 1, 253, 234, 134, 1, 253, 245, 134, 1, 252, 57, 134, 1, 246, 252, 134, 29, 1, 198, 134, 29, 1, 190, 134, 29, 1, 205, 134, 29, 1, 164, 39, 1, 3, 253, 183, 39, 1, 3, 253, 158, 39, 1, 3, 253, 172, 39, 1, 3, 76, 39, 1, 3, 253, 112, 39, 1, 3, 253, 88, 39, 1, 3, 253, 154, 39, 1, 3, 253, 197, 39, 1, 3, 253, 125, 39, 1, 3, 253, 140, 39, 1, 3, 253, 114, 39, 1, 3, 253, 92, 39, 1, 3, 253, 169, 39, 1, 3, 253, 170, 39, 1, 3, 253, 150, 39, 1, 3, 253, 144, 68, 20, 240, 242, 68, 20, 242, 131, 68, 20, 240, 244, 68, 20, 242, 134, 68, 20, 242, 129, 68, 20, 242, 133, 68, 20, 244, 230, 68, 20, 242, 126, 68, 20, 242, 122, 68, 20, 239, 155, 68, 20, 239, 158, 68, 20, 239, 166, 68, 20, 239, 161, 68, 20, 242, 125, 68, 20, 242, 227, 64, 68, 20, 245, 149, 64, 68, 20, 243, 12, 64, 68, 20, 245, 171, 64, 68, 20, 245, 142, 64, 68, 20, 245, 160, 64, 68, 20, 250, 72, 64, 68, 20, 245, 113, 64, 68, 20, 245, 18, 64, 68, 20, 241, 47, 64, 68, 20, 241, 61, 64, 68, 20, 241, 86, 64, 68, 20, 241, 72, 64, 68, 20, 245, 108, 64, 68, 20, 245, 18, 84, 68, 97, 121, 68, 97, 114, 68, 97, 153, 68, 97, 163, 68, 97, 168, 68, 97, 169, 68, 97, 179, 68, 97, 176, 68, 97, 178, 68, 97, 249, 18, 68, 97, 244, 229, 68, 97, 244, 236, 68, 97, 242, 169, 68, 97, 245, 223, 68, 97, 242, 231, 68, 97, 242, 142, 68, 97, 249, 87, 68, 97, 243, 4, 68, 97, 245, 105, 68, 97, 239, 236, 68, 97, 245, 146, 68, 97, 239, 238, 68, 97, 237, 155, 68, 97, 234, 66, 68, 97, 242, 229, 68, 97, 238, 54, 68, 97, 246, 41, 68, 97, 243, 5, 68, 97, 237, 165, 68, 97, 236, 214, 68, 97, 238, 155, 68, 97, 238, 135, 68, 97, 239, 14, 68, 97, 244, 187, 68, 97, 245, 179, 68, 97, 244, 54, 28, 83, 242, 104, 121, 28, 83, 242, 104, 114, 28, 83, 242, 104, 153, 28, 83, 242, 104, 163, 28, 83, 242, 104, 168, 28, 83, 242, 104, 169, 28, 83, 242, 104, 179, 28, 83, 242, 104, 176, 28, 83, 242, 104, 178, 28, 83, 241, 7, 28, 83, 242, 108, 121, 28, 83, 242, 108, 114, 28, 83, 242, 108, 153, 28, 83, 242, 108, 163, 28, 83, 242, 108, 168, 28, 20, 240, 242, 28, 20, 242, 131, 28, 20, 240, 244, 28, 20, 242, 134, 28, 20, 242, 129, 28, 20, 242, 133, 28, 20, 244, 230, 28, 20, 242, 126, 28, 20, 242, 122, 28, 20, 239, 155, 28, 20, 239, 158, 28, 20, 239, 166, 28, 20, 239, 161, 28, 20, 242, 125, 28, 20, 242, 227, 64, 28, 20, 245, 149, 64, 28, 20, 243, 12, 64, 28, 20, 245, 171, 64, 28, 20, 245, 142, 64, 28, 20, 245, 160, 64, 28, 20, 250, 72, 64, 28, 20, 245, 113, 64, 28, 20, 245, 18, 64, 28, 20, 241, 47, 64, 28, 20, 241, 61, 64, 28, 20, 241, 86, 64, 28, 20, 241, 72, 64, 28, 20, 245, 108, 64, 243, 193, 239, 239, 90, 28, 97, 121, 28, 97, 114, 28, 97, 153, 28, 97, 163, 28, 97, 168, 28, 97, 169, 28, 97, 179, 28, 97, 176, 28, 97, 178, 28, 97, 249, 18, 28, 97, 244, 229, 28, 97, 244, 236, 28, 97, 242, 169, 28, 97, 245, 223, 28, 97, 242, 231, 28, 97, 242, 142, 28, 97, 249, 87, 28, 97, 243, 4, 28, 97, 245, 105, 28, 97, 239, 236, 28, 97, 245, 146, 28, 97, 239, 238, 28, 97, 237, 155, 28, 97, 234, 66, 28, 97, 242, 229, 28, 97, 242, 4, 28, 97, 247, 76, 28, 97, 241, 164, 28, 97, 239, 97, 28, 97, 238, 6, 28, 97, 244, 41, 28, 97, 237, 176, 28, 97, 246, 255, 28, 97, 244, 187, 28, 97, 246, 74, 28, 97, 240, 19, 28, 97, 246, 177, 28, 97, 241, 46, 28, 97, 251, 206, 28, 97, 244, 172, 28, 97, 184, 28, 97, 239, 48, 28, 97, 239, 73, 28, 97, 243, 5, 28, 97, 237, 165, 28, 97, 236, 214, 28, 97, 238, 155, 28, 97, 238, 135, 28, 97, 243, 248, 28, 83, 242, 108, 169, 28, 83, 242, 108, 179, 28, 83, 242, 108, 176, 28, 83, 242, 108, 178, 28, 83, 242, 213, 28, 83, 244, 209, 121, 28, 83, 244, 209, 114, 28, 83, 244, 209, 153, 28, 83, 244, 209, 163, 28, 83, 244, 209, 168, 28, 83, 244, 209, 169, 28, 83, 244, 209, 179, 28, 83, 244, 209, 176, 28, 83, 244, 209, 178, 28, 83, 242, 144, 66, 127, 13, 54, 240, 94, 66, 127, 13, 54, 239, 13, 66, 127, 13, 54, 243, 214, 66, 127, 13, 54, 243, 31, 66, 127, 13, 54, 251, 222, 66, 127, 13, 54, 247, 20, 66, 127, 13, 54, 247, 19, 66, 127, 13, 54, 241, 104, 66, 127, 13, 54, 238, 58, 66, 127, 13, 54, 240, 129, 66, 127, 13, 54, 239, 53, 66, 127, 13, 54, 238, 199, 28, 39, 64, 28, 39, 69, 28, 39, 84, 28, 39, 70, 28, 39, 78, 28, 39, 208, 28, 39, 253, 182, 28, 39, 253, 183, 28, 39, 253, 134, 28, 39, 253, 155, 28, 39, 253, 97, 28, 39, 253, 158, 28, 39, 253, 172, 28, 39, 253, 171, 28, 39, 253, 159, 28, 39, 253, 91, 28, 39, 253, 174, 28, 39, 253, 160, 28, 39, 253, 151, 28, 39, 76, 28, 39, 253, 94, 28, 39, 253, 148, 28, 39, 253, 112, 28, 39, 253, 157, 28, 39, 253, 136, 28, 39, 253, 88, 28, 39, 253, 154, 28, 39, 253, 197, 28, 39, 253, 125, 28, 39, 253, 140, 28, 39, 221, 28, 39, 253, 156, 28, 39, 253, 114, 28, 39, 253, 167, 28, 39, 253, 141, 28, 39, 216, 28, 39, 253, 124, 28, 39, 253, 123, 28, 39, 253, 92, 28, 39, 253, 169, 28, 39, 253, 170, 28, 39, 253, 150, 28, 39, 253, 144, 28, 39, 253, 98, 28, 39, 253, 145, 28, 39, 253, 132, 28, 39, 253, 138, 30, 241, 99, 30, 241, 103, 30, 243, 30, 30, 245, 236, 30, 241, 186, 30, 246, 253, 30, 252, 241, 30, 239, 10, 30, 243, 96, 30, 247, 233, 30, 247, 234, 30, 243, 182, 30, 240, 98, 30, 240, 99, 30, 243, 124, 30, 243, 123, 30, 246, 158, 30, 243, 135, 30, 241, 195, 30, 240, 81, 30, 247, 36, 30, 237, 72, 30, 236, 141, 30, 238, 25, 30, 241, 178, 30, 238, 12, 30, 238, 27, 30, 240, 102, 30, 243, 186, 30, 241, 194, 30, 243, 192, 30, 240, 155, 30, 239, 78, 30, 240, 164, 30, 244, 74, 30, 244, 75, 30, 243, 78, 30, 246, 105, 30, 246, 114, 30, 252, 213, 30, 247, 110, 30, 244, 4, 30, 243, 141, 30, 239, 55, 30, 244, 23, 30, 240, 2, 30, 238, 42, 30, 241, 238, 30, 247, 248, 30, 246, 28, 30, 239, 28, 30, 241, 182, 30, 238, 185, 30, 243, 164, 30, 238, 13, 30, 247, 241, 30, 241, 236, 30, 241, 181, 30, 244, 31, 30, 244, 28, 30, 243, 41, 30, 241, 241, 30, 241, 116, 30, 251, 88, 30, 244, 39, 30, 243, 162, 30, 246, 231, 30, 240, 107, 30, 243, 210, 30, 243, 209, 30, 241, 206, 30, 240, 109, 30, 240, 116, 30, 247, 98, 30, 238, 33, 30, 245, 29, 30, 240, 114, 30, 240, 113, 30, 244, 152, 30, 244, 153, 30, 248, 201, 30, 240, 153, 30, 248, 23, 30, 244, 66, 30, 240, 154, 30, 248, 20, 30, 239, 74, 30, 244, 146, 66, 127, 13, 54, 249, 6, 244, 173, 66, 127, 13, 54, 249, 6, 121, 66, 127, 13, 54, 249, 6, 114, 66, 127, 13, 54, 249, 6, 153, 66, 127, 13, 54, 249, 6, 163, 66, 127, 13, 54, 249, 6, 168, 66, 127, 13, 54, 249, 6, 169, 66, 127, 13, 54, 249, 6, 179, 66, 127, 13, 54, 249, 6, 176, 66, 127, 13, 54, 249, 6, 178, 66, 127, 13, 54, 249, 6, 249, 18, 66, 127, 13, 54, 249, 6, 240, 234, 66, 127, 13, 54, 249, 6, 240, 238, 66, 127, 13, 54, 249, 6, 238, 108, 66, 127, 13, 54, 249, 6, 238, 106, 66, 127, 13, 54, 249, 6, 239, 167, 66, 127, 13, 54, 249, 6, 239, 162, 66, 127, 13, 54, 249, 6, 237, 129, 66, 127, 13, 54, 249, 6, 238, 105, 66, 127, 13, 54, 249, 6, 238, 107, 66, 127, 13, 54, 249, 6, 240, 239, 66, 127, 13, 54, 249, 6, 236, 238, 66, 127, 13, 54, 249, 6, 236, 239, 66, 127, 13, 54, 249, 6, 236, 4, 66, 127, 13, 54, 249, 6, 236, 82, 30, 251, 93, 30, 253, 93, 30, 253, 109, 30, 143, 30, 254, 163, 30, 254, 165, 30, 253, 238, 249, 109, 241, 180, 30, 253, 238, 249, 109, 242, 29, 30, 253, 238, 249, 109, 240, 175, 30, 253, 238, 249, 109, 243, 217, 30, 236, 91, 30, 255, 19, 245, 245, 30, 253, 94, 30, 254, 219, 64, 30, 221, 30, 208, 30, 254, 124, 30, 254, 140, 30, 254, 106, 30, 250, 175, 30, 247, 28, 30, 254, 167, 30, 254, 154, 30, 254, 219, 204, 30, 254, 219, 194, 30, 254, 143, 30, 254, 50, 30, 254, 114, 30, 251, 153, 30, 251, 230, 30, 251, 37, 30, 252, 207, 30, 254, 219, 148, 30, 254, 146, 30, 254, 98, 30, 254, 127, 30, 254, 104, 30, 254, 158, 30, 254, 219, 171, 30, 254, 147, 30, 254, 95, 30, 254, 128, 30, 254, 251, 239, 163, 30, 254, 244, 239, 163, 30, 255, 39, 239, 163, 30, 254, 242, 239, 163, 30, 254, 251, 242, 155, 30, 254, 244, 242, 155, 30, 255, 39, 242, 155, 30, 254, 242, 242, 155, 30, 255, 39, 249, 25, 159, 30, 255, 39, 249, 25, 255, 29, 239, 163, 30, 253, 90, 30, 251, 169, 30, 251, 242, 30, 251, 44, 30, 252, 115, 30, 254, 20, 249, 25, 159, 30, 254, 20, 249, 25, 255, 29, 239, 163, 30, 254, 173, 30, 254, 159, 30, 254, 219, 159, 30, 254, 148, 30, 254, 174, 30, 254, 58, 30, 254, 219, 186, 30, 254, 149, 30, 254, 130, 30, 255, 16, 245, 29, 30, 254, 175, 30, 254, 161, 30, 254, 219, 201, 30, 254, 150, 30, 254, 52, 30, 255, 17, 245, 29, 30, 255, 38, 250, 35, 30, 255, 39, 250, 35, 30, 253, 234, 30, 254, 90, 30, 254, 92, 30, 254, 93, 30, 255, 36, 249, 25, 254, 50, 30, 253, 178, 30, 254, 97, 30, 254, 110, 30, 253, 88, 30, 254, 113, 30, 253, 227, 30, 254, 51, 30, 254, 242, 240, 12, 30, 254, 129, 30, 254, 135, 30, 254, 136, 30, 251, 202, 30, 254, 138, 30, 255, 13, 243, 2, 30, 251, 233, 30, 251, 239, 30, 254, 168, 30, 254, 170, 30, 252, 74, 30, 254, 172, 30, 254, 185, 30, 254, 72, 30, 254, 202, 66, 127, 13, 54, 253, 89, 121, 66, 127, 13, 54, 253, 89, 114, 66, 127, 13, 54, 253, 89, 153, 66, 127, 13, 54, 253, 89, 163, 66, 127, 13, 54, 253, 89, 168, 66, 127, 13, 54, 253, 89, 169, 66, 127, 13, 54, 253, 89, 179, 66, 127, 13, 54, 253, 89, 176, 66, 127, 13, 54, 253, 89, 178, 66, 127, 13, 54, 253, 89, 249, 18, 66, 127, 13, 54, 253, 89, 240, 234, 66, 127, 13, 54, 253, 89, 240, 238, 66, 127, 13, 54, 253, 89, 238, 108, 66, 127, 13, 54, 253, 89, 238, 106, 66, 127, 13, 54, 253, 89, 239, 167, 66, 127, 13, 54, 253, 89, 239, 162, 66, 127, 13, 54, 253, 89, 237, 129, 66, 127, 13, 54, 253, 89, 238, 105, 66, 127, 13, 54, 253, 89, 238, 107, 66, 127, 13, 54, 253, 89, 240, 239, 66, 127, 13, 54, 253, 89, 236, 238, 66, 127, 13, 54, 253, 89, 236, 239, 66, 127, 13, 54, 253, 89, 236, 4, 66, 127, 13, 54, 253, 89, 236, 82, 66, 127, 13, 54, 253, 89, 236, 177, 66, 127, 13, 54, 253, 89, 237, 107, 66, 127, 13, 54, 253, 89, 236, 42, 66, 127, 13, 54, 253, 89, 236, 41, 66, 127, 13, 54, 253, 89, 236, 178, 66, 127, 13, 54, 253, 89, 241, 7, 66, 127, 13, 54, 253, 89, 237, 104, 6, 4, 254, 119, 6, 4, 254, 121, 6, 4, 69, 6, 4, 254, 116, 6, 4, 251, 109, 6, 4, 251, 110, 6, 4, 253, 181, 6, 4, 251, 108, 6, 4, 253, 220, 6, 4, 254, 86, 6, 4, 64, 6, 4, 254, 83, 6, 4, 252, 243, 6, 4, 254, 197, 6, 4, 252, 242, 6, 4, 254, 17, 6, 4, 254, 164, 6, 4, 78, 6, 4, 254, 63, 6, 4, 254, 101, 6, 4, 70, 6, 4, 253, 216, 6, 4, 250, 160, 6, 4, 250, 161, 6, 4, 253, 236, 6, 4, 250, 159, 6, 4, 246, 26, 6, 4, 246, 27, 6, 4, 250, 157, 6, 4, 246, 25, 6, 4, 250, 142, 6, 4, 250, 143, 6, 4, 253, 110, 6, 4, 250, 141, 6, 4, 246, 36, 6, 4, 250, 165, 6, 4, 246, 35, 6, 4, 250, 164, 6, 4, 249, 47, 6, 4, 253, 221, 6, 4, 250, 163, 6, 4, 250, 156, 6, 4, 253, 191, 6, 4, 250, 153, 6, 4, 250, 167, 6, 4, 250, 168, 6, 4, 253, 192, 6, 4, 250, 166, 6, 4, 246, 37, 6, 4, 249, 193, 6, 4, 250, 172, 6, 4, 250, 173, 6, 4, 254, 30, 6, 4, 250, 170, 6, 4, 246, 38, 6, 4, 250, 171, 6, 4, 252, 68, 6, 4, 252, 69, 6, 4, 253, 116, 6, 4, 252, 67, 6, 4, 247, 247, 6, 4, 252, 64, 6, 4, 247, 246, 6, 4, 252, 60, 6, 4, 252, 61, 6, 4, 253, 90, 6, 4, 252, 59, 6, 4, 247, 252, 6, 4, 252, 75, 6, 4, 247, 251, 6, 4, 252, 72, 6, 4, 252, 73, 6, 4, 253, 187, 6, 4, 252, 71, 6, 4, 250, 48, 6, 4, 252, 78, 6, 4, 253, 231, 6, 4, 252, 76, 6, 4, 247, 253, 6, 4, 252, 77, 6, 4, 250, 52, 6, 4, 252, 81, 6, 4, 254, 176, 6, 4, 252, 79, 6, 4, 247, 254, 6, 4, 252, 80, 6, 4, 246, 5, 6, 4, 246, 6, 6, 4, 250, 146, 6, 4, 246, 4, 6, 4, 243, 36, 6, 4, 243, 37, 6, 4, 246, 3, 6, 4, 243, 35, 6, 4, 245, 255, 6, 4, 246, 0, 6, 4, 250, 144, 6, 4, 245, 254, 6, 4, 243, 39, 6, 4, 246, 10, 6, 4, 243, 38, 6, 4, 246, 8, 6, 4, 246, 9, 6, 4, 250, 147, 6, 4, 246, 7, 6, 4, 246, 2, 6, 4, 250, 145, 6, 4, 246, 1, 6, 4, 245, 58, 6, 4, 246, 13, 6, 4, 250, 148, 6, 4, 246, 11, 6, 4, 243, 40, 6, 4, 246, 12, 6, 4, 246, 15, 6, 4, 246, 16, 6, 4, 250, 149, 6, 4, 246, 14, 6, 4, 247, 115, 6, 4, 247, 116, 6, 4, 252, 3, 6, 4, 247, 114, 6, 4, 243, 237, 6, 4, 245, 148, 6, 4, 243, 236, 6, 4, 247, 112, 6, 4, 247, 113, 6, 4, 252, 2, 6, 4, 247, 111, 6, 4, 247, 118, 6, 4, 247, 119, 6, 4, 252, 4, 6, 4, 247, 117, 6, 4, 247, 122, 6, 4, 247, 123, 6, 4, 252, 5, 6, 4, 247, 120, 6, 4, 243, 238, 6, 4, 247, 121, 6, 4, 247, 126, 6, 4, 247, 127, 6, 4, 252, 6, 6, 4, 247, 124, 6, 4, 243, 239, 6, 4, 247, 125, 6, 4, 246, 204, 6, 4, 246, 205, 6, 4, 251, 83, 6, 4, 246, 203, 6, 4, 243, 153, 6, 4, 246, 202, 6, 4, 243, 152, 6, 4, 246, 200, 6, 4, 246, 201, 6, 4, 251, 82, 6, 4, 246, 199, 6, 4, 243, 155, 6, 4, 246, 209, 6, 4, 243, 154, 6, 4, 246, 207, 6, 4, 246, 208, 6, 4, 249, 243, 6, 4, 246, 206, 6, 4, 246, 212, 6, 4, 246, 213, 6, 4, 251, 84, 6, 4, 246, 210, 6, 4, 243, 156, 6, 4, 246, 211, 6, 4, 246, 216, 6, 4, 251, 85, 6, 4, 246, 214, 6, 4, 243, 157, 6, 4, 246, 215, 6, 4, 251, 237, 6, 4, 251, 238, 6, 4, 253, 156, 6, 4, 251, 236, 6, 4, 247, 95, 6, 4, 251, 231, 6, 4, 247, 94, 6, 4, 251, 220, 6, 4, 251, 221, 6, 4, 221, 6, 4, 251, 218, 6, 4, 247, 104, 6, 4, 247, 105, 6, 4, 251, 243, 6, 4, 247, 103, 6, 4, 251, 240, 6, 4, 251, 241, 6, 4, 253, 141, 6, 4, 250, 21, 6, 4, 251, 226, 6, 4, 253, 167, 6, 4, 251, 246, 6, 4, 251, 247, 6, 4, 253, 114, 6, 4, 251, 244, 6, 4, 247, 106, 6, 4, 251, 245, 6, 4, 251, 250, 6, 4, 251, 251, 6, 4, 254, 151, 6, 4, 251, 249, 6, 4, 251, 10, 6, 4, 251, 11, 6, 4, 253, 226, 6, 4, 251, 9, 6, 4, 250, 253, 6, 4, 250, 254, 6, 4, 253, 153, 6, 4, 250, 252, 6, 4, 251, 14, 6, 4, 254, 13, 6, 4, 251, 13, 6, 4, 251, 16, 6, 4, 251, 17, 6, 4, 254, 41, 6, 4, 251, 15, 6, 4, 246, 133, 6, 4, 249, 225, 6, 4, 251, 21, 6, 4, 251, 22, 6, 4, 254, 105, 6, 4, 251, 20, 6, 4, 252, 255, 6, 4, 253, 0, 6, 4, 254, 25, 6, 4, 252, 254, 6, 4, 248, 165, 6, 4, 248, 166, 6, 4, 252, 253, 6, 4, 248, 164, 6, 4, 252, 249, 6, 4, 252, 250, 6, 4, 253, 161, 6, 4, 252, 248, 6, 4, 253, 3, 6, 4, 253, 4, 6, 4, 253, 215, 6, 4, 253, 2, 6, 4, 252, 252, 6, 4, 250, 103, 6, 4, 253, 6, 6, 4, 253, 7, 6, 4, 253, 255, 6, 4, 253, 5, 6, 4, 248, 167, 6, 4, 250, 108, 6, 4, 253, 11, 6, 4, 253, 12, 6, 4, 254, 201, 6, 4, 253, 9, 6, 4, 248, 168, 6, 4, 253, 10, 6, 4, 250, 219, 6, 4, 250, 220, 6, 4, 253, 165, 6, 4, 250, 218, 6, 4, 246, 107, 6, 4, 250, 217, 6, 4, 246, 106, 6, 4, 250, 209, 6, 4, 250, 211, 6, 4, 253, 93, 6, 4, 250, 207, 6, 4, 246, 116, 6, 4, 250, 231, 6, 4, 227, 6, 4, 250, 227, 6, 4, 253, 193, 6, 4, 250, 226, 6, 4, 250, 215, 6, 4, 253, 152, 6, 4, 250, 214, 6, 4, 250, 234, 6, 4, 250, 235, 6, 4, 253, 204, 6, 4, 250, 232, 6, 4, 246, 117, 6, 4, 250, 233, 6, 4, 252, 210, 6, 4, 252, 211, 6, 4, 253, 174, 6, 4, 252, 209, 6, 4, 248, 128, 6, 4, 249, 89, 6, 4, 248, 127, 6, 4, 250, 85, 6, 4, 252, 198, 6, 4, 253, 91, 6, 4, 252, 195, 6, 4, 248, 154, 6, 4, 248, 155, 6, 4, 252, 220, 6, 4, 248, 153, 6, 4, 252, 214, 6, 4, 252, 215, 6, 4, 76, 6, 4, 249, 168, 6, 4, 252, 204, 6, 4, 253, 151, 6, 4, 252, 200, 6, 4, 252, 223, 6, 4, 252, 224, 6, 4, 253, 160, 6, 4, 252, 221, 6, 4, 248, 156, 6, 4, 252, 222, 6, 4, 246, 92, 6, 4, 246, 93, 6, 4, 249, 210, 6, 4, 246, 91, 6, 4, 243, 86, 6, 4, 246, 90, 6, 4, 243, 85, 6, 4, 246, 85, 6, 4, 246, 86, 6, 4, 249, 27, 6, 4, 246, 84, 6, 4, 243, 88, 6, 4, 246, 97, 6, 4, 243, 87, 6, 4, 246, 95, 6, 4, 246, 96, 6, 4, 249, 211, 6, 4, 246, 94, 6, 4, 246, 89, 6, 4, 249, 209, 6, 4, 246, 88, 6, 4, 246, 99, 6, 4, 246, 100, 6, 4, 249, 212, 6, 4, 246, 98, 6, 4, 243, 89, 6, 4, 245, 77, 6, 4, 247, 135, 6, 4, 247, 136, 6, 4, 252, 9, 6, 4, 247, 134, 6, 4, 243, 240, 6, 4, 247, 133, 6, 4, 247, 129, 6, 4, 247, 130, 6, 4, 252, 7, 6, 4, 247, 128, 6, 4, 247, 138, 6, 4, 247, 139, 6, 4, 252, 10, 6, 4, 247, 137, 6, 4, 247, 132, 6, 4, 252, 8, 6, 4, 247, 131, 6, 4, 247, 142, 6, 4, 247, 143, 6, 4, 252, 11, 6, 4, 247, 140, 6, 4, 243, 241, 6, 4, 247, 141, 6, 4, 246, 224, 6, 4, 246, 225, 6, 4, 251, 87, 6, 4, 246, 223, 6, 4, 243, 159, 6, 4, 243, 160, 6, 4, 246, 222, 6, 4, 243, 158, 6, 4, 246, 218, 6, 4, 246, 219, 6, 4, 249, 244, 6, 4, 246, 217, 6, 4, 243, 161, 6, 4, 246, 229, 6, 4, 246, 227, 6, 4, 246, 228, 6, 4, 246, 226, 6, 4, 246, 221, 6, 4, 251, 86, 6, 4, 246, 220, 6, 4, 246, 230, 6, 4, 252, 25, 6, 4, 252, 26, 6, 4, 253, 148, 6, 4, 252, 24, 6, 4, 247, 159, 6, 4, 252, 22, 6, 4, 247, 158, 6, 4, 252, 1, 6, 4, 253, 94, 6, 4, 251, 255, 6, 4, 247, 199, 6, 4, 252, 42, 6, 4, 247, 198, 6, 4, 249, 151, 6, 4, 252, 35, 6, 4, 253, 136, 6, 4, 252, 33, 6, 4, 252, 15, 6, 4, 253, 157, 6, 4, 252, 13, 6, 4, 252, 45, 6, 4, 252, 46, 6, 4, 253, 112, 6, 4, 252, 43, 6, 4, 247, 200, 6, 4, 252, 44, 6, 4, 246, 186, 6, 4, 246, 187, 6, 4, 251, 78, 6, 4, 246, 185, 6, 4, 243, 147, 6, 4, 246, 184, 6, 4, 243, 146, 6, 4, 246, 180, 6, 4, 246, 181, 6, 4, 251, 76, 6, 4, 246, 179, 6, 4, 243, 149, 6, 4, 246, 190, 6, 4, 243, 148, 6, 4, 246, 189, 6, 4, 251, 79, 6, 4, 246, 188, 6, 4, 246, 183, 6, 4, 251, 77, 6, 4, 246, 182, 6, 4, 246, 193, 6, 4, 246, 194, 6, 4, 251, 80, 6, 4, 246, 191, 6, 4, 243, 150, 6, 4, 246, 192, 6, 4, 246, 197, 6, 4, 246, 198, 6, 4, 251, 81, 6, 4, 246, 195, 6, 4, 243, 151, 6, 4, 246, 196, 6, 4, 251, 200, 6, 4, 251, 201, 6, 4, 253, 211, 6, 4, 251, 198, 6, 4, 247, 65, 6, 4, 247, 66, 6, 4, 250, 11, 6, 4, 247, 64, 6, 4, 251, 185, 6, 4, 251, 186, 6, 4, 253, 103, 6, 4, 251, 183, 6, 4, 247, 71, 6, 4, 247, 72, 6, 4, 251, 208, 6, 4, 247, 70, 6, 4, 251, 205, 6, 4, 251, 207, 6, 4, 253, 184, 6, 4, 251, 204, 6, 4, 251, 191, 6, 4, 253, 210, 6, 4, 251, 189, 6, 4, 251, 211, 6, 4, 251, 212, 6, 4, 253, 229, 6, 4, 251, 209, 6, 4, 247, 73, 6, 4, 251, 210, 6, 4, 251, 214, 6, 4, 251, 215, 6, 4, 254, 54, 6, 4, 251, 213, 6, 4, 247, 74, 6, 4, 250, 16, 6, 4, 251, 40, 6, 4, 251, 41, 6, 4, 253, 209, 6, 4, 251, 39, 6, 4, 246, 156, 6, 4, 246, 157, 6, 4, 251, 38, 6, 4, 246, 155, 6, 4, 251, 26, 6, 4, 251, 27, 6, 4, 253, 100, 6, 4, 251, 24, 6, 4, 246, 164, 6, 4, 246, 165, 6, 4, 251, 47, 6, 4, 246, 163, 6, 4, 249, 238, 6, 4, 251, 43, 6, 4, 253, 195, 6, 4, 251, 42, 6, 4, 251, 31, 6, 4, 251, 33, 6, 4, 253, 207, 6, 4, 249, 230, 6, 4, 251, 50, 6, 4, 251, 51, 6, 4, 253, 196, 6, 4, 251, 48, 6, 4, 246, 166, 6, 4, 251, 49, 6, 4, 250, 1, 6, 4, 251, 158, 6, 4, 253, 182, 6, 4, 251, 157, 6, 4, 247, 35, 6, 4, 251, 154, 6, 4, 247, 34, 6, 4, 251, 143, 6, 4, 251, 145, 6, 4, 208, 6, 4, 251, 142, 6, 4, 247, 41, 6, 4, 251, 171, 6, 4, 247, 40, 6, 4, 251, 167, 6, 4, 251, 168, 6, 4, 253, 155, 6, 4, 251, 166, 6, 4, 251, 148, 6, 4, 251, 149, 6, 4, 253, 134, 6, 4, 251, 147, 6, 4, 251, 174, 6, 4, 251, 175, 6, 4, 253, 183, 6, 4, 251, 172, 6, 4, 247, 42, 6, 4, 251, 173, 6, 4, 246, 145, 6, 4, 246, 146, 6, 4, 249, 233, 6, 4, 243, 128, 6, 4, 246, 144, 6, 4, 243, 127, 6, 4, 246, 138, 6, 4, 246, 139, 6, 4, 249, 231, 6, 4, 246, 137, 6, 4, 243, 130, 6, 4, 243, 131, 6, 4, 245, 94, 6, 4, 243, 129, 6, 4, 246, 147, 6, 4, 246, 148, 6, 4, 249, 234, 6, 4, 245, 93, 6, 4, 246, 142, 6, 4, 246, 143, 6, 4, 249, 232, 6, 4, 246, 141, 6, 4, 246, 151, 6, 4, 246, 152, 6, 4, 249, 235, 6, 4, 246, 149, 6, 4, 243, 132, 6, 4, 246, 150, 6, 4, 243, 223, 6, 4, 247, 84, 6, 4, 247, 80, 6, 4, 247, 81, 6, 4, 251, 227, 6, 4, 247, 79, 6, 4, 243, 225, 6, 4, 247, 88, 6, 4, 243, 224, 6, 4, 247, 86, 6, 4, 247, 87, 6, 4, 249, 107, 6, 4, 247, 85, 6, 4, 247, 83, 6, 4, 251, 228, 6, 4, 247, 82, 6, 4, 247, 91, 6, 4, 247, 92, 6, 4, 251, 229, 6, 4, 247, 89, 6, 4, 243, 226, 6, 4, 247, 90, 6, 4, 245, 110, 6, 4, 246, 243, 6, 4, 251, 102, 6, 4, 246, 242, 6, 4, 243, 166, 6, 4, 243, 167, 6, 4, 246, 241, 6, 4, 243, 165, 6, 4, 246, 237, 6, 4, 246, 238, 6, 4, 251, 100, 6, 4, 246, 236, 6, 4, 243, 169, 6, 4, 243, 170, 6, 4, 245, 112, 6, 4, 243, 168, 6, 4, 246, 244, 6, 4, 246, 245, 6, 4, 251, 103, 6, 4, 245, 111, 6, 4, 246, 240, 6, 4, 251, 101, 6, 4, 246, 239, 6, 4, 243, 244, 6, 4, 247, 151, 6, 4, 243, 243, 6, 4, 247, 147, 6, 4, 247, 148, 6, 4, 249, 13, 6, 4, 247, 146, 6, 4, 243, 246, 6, 4, 243, 247, 6, 4, 247, 157, 6, 4, 247, 155, 6, 4, 247, 156, 6, 4, 249, 110, 6, 4, 247, 154, 6, 4, 247, 150, 6, 4, 252, 17, 6, 4, 247, 149, 6, 4, 251, 75, 6, 4, 246, 176, 6, 4, 249, 137, 6, 4, 251, 59, 6, 4, 251, 60, 6, 4, 253, 88, 6, 4, 251, 58, 6, 4, 246, 233, 6, 4, 246, 234, 6, 4, 251, 94, 6, 4, 246, 232, 6, 4, 251, 91, 6, 4, 251, 92, 6, 4, 253, 140, 6, 4, 251, 90, 6, 4, 251, 67, 6, 4, 253, 125, 6, 4, 251, 65, 6, 4, 253, 14, 6, 4, 253, 15, 6, 4, 253, 98, 6, 4, 253, 13, 6, 4, 248, 177, 6, 4, 253, 21, 6, 4, 248, 176, 6, 4, 253, 20, 6, 4, 253, 138, 6, 4, 253, 18, 6, 4, 253, 17, 6, 4, 253, 132, 6, 4, 253, 16, 6, 4, 253, 67, 6, 4, 253, 68, 6, 4, 253, 218, 6, 4, 253, 66, 6, 4, 248, 230, 6, 4, 253, 65, 6, 4, 248, 229, 6, 4, 253, 60, 6, 4, 253, 61, 6, 4, 253, 129, 6, 4, 253, 59, 6, 4, 248, 232, 6, 4, 253, 73, 6, 4, 248, 231, 6, 4, 250, 129, 6, 4, 253, 71, 6, 4, 253, 190, 6, 4, 253, 70, 6, 4, 253, 63, 6, 4, 253, 189, 6, 4, 253, 62, 6, 4, 253, 74, 6, 4, 253, 75, 6, 4, 253, 233, 6, 4, 250, 130, 6, 4, 248, 233, 6, 4, 250, 131, 6, 4, 253, 79, 6, 4, 253, 80, 6, 4, 254, 213, 6, 4, 253, 77, 6, 4, 248, 234, 6, 4, 253, 78, 6, 4, 250, 189, 6, 4, 250, 190, 6, 4, 254, 5, 6, 4, 249, 198, 6, 4, 246, 66, 6, 4, 246, 67, 6, 4, 250, 187, 6, 4, 246, 65, 6, 4, 250, 178, 6, 4, 250, 179, 6, 4, 253, 115, 6, 4, 249, 195, 6, 4, 246, 75, 6, 4, 250, 195, 6, 4, 245, 71, 6, 4, 250, 192, 6, 4, 250, 193, 6, 4, 253, 178, 6, 4, 250, 191, 6, 4, 250, 183, 6, 4, 254, 4, 6, 4, 250, 182, 6, 4, 250, 197, 6, 4, 250, 198, 6, 4, 254, 32, 6, 4, 249, 202, 6, 4, 246, 76, 6, 4, 250, 196, 6, 4, 249, 207, 6, 4, 250, 201, 6, 4, 254, 33, 6, 4, 249, 206, 6, 4, 246, 77, 6, 4, 250, 200, 6, 4, 248, 242, 6, 4, 248, 243, 6, 4, 253, 83, 6, 4, 248, 241, 6, 4, 243, 21, 6, 4, 244, 168, 6, 4, 248, 240, 6, 4, 244, 167, 6, 4, 248, 236, 6, 4, 248, 237, 6, 4, 253, 81, 6, 4, 248, 235, 6, 4, 248, 245, 6, 4, 253, 84, 6, 4, 248, 244, 6, 4, 248, 239, 6, 4, 253, 82, 6, 4, 248, 238, 6, 4, 248, 248, 6, 4, 253, 85, 6, 4, 248, 246, 6, 4, 244, 169, 6, 4, 248, 247, 6, 4, 248, 251, 6, 4, 248, 252, 6, 4, 253, 86, 6, 4, 248, 249, 6, 4, 244, 170, 6, 4, 248, 250, 6, 4, 247, 220, 6, 4, 247, 221, 6, 4, 252, 50, 6, 4, 247, 219, 6, 4, 244, 14, 6, 4, 247, 218, 6, 4, 244, 13, 6, 4, 247, 215, 6, 4, 247, 216, 6, 4, 252, 48, 6, 4, 247, 214, 6, 4, 244, 15, 6, 4, 247, 224, 6, 4, 247, 223, 6, 4, 247, 222, 6, 4, 247, 217, 6, 4, 252, 49, 6, 4, 247, 226, 6, 4, 252, 51, 6, 4, 245, 155, 6, 4, 244, 16, 6, 4, 247, 225, 6, 4, 247, 229, 6, 4, 247, 230, 6, 4, 252, 52, 6, 4, 247, 227, 6, 4, 244, 17, 6, 4, 247, 228, 6, 4, 252, 168, 6, 4, 169, 6, 4, 253, 158, 6, 4, 252, 167, 6, 4, 248, 74, 6, 4, 252, 164, 6, 4, 248, 73, 6, 4, 252, 154, 6, 4, 252, 155, 6, 4, 253, 97, 6, 4, 252, 153, 6, 4, 248, 108, 6, 4, 252, 180, 6, 4, 248, 107, 6, 4, 252, 172, 6, 4, 252, 173, 6, 4, 253, 159, 6, 4, 252, 171, 6, 4, 252, 159, 6, 4, 253, 171, 6, 4, 252, 158, 6, 4, 252, 183, 6, 4, 252, 184, 6, 4, 253, 172, 6, 4, 252, 181, 6, 4, 248, 109, 6, 4, 252, 182, 6, 4, 252, 187, 6, 4, 252, 188, 6, 4, 254, 188, 6, 4, 252, 185, 6, 4, 248, 111, 6, 4, 252, 186, 6, 4, 248, 91, 6, 4, 248, 92, 6, 4, 250, 75, 6, 4, 248, 90, 6, 4, 244, 101, 6, 4, 248, 89, 6, 4, 244, 100, 6, 4, 248, 85, 6, 4, 248, 86, 6, 4, 249, 34, 6, 4, 248, 84, 6, 4, 248, 94, 6, 4, 248, 95, 6, 4, 250, 76, 6, 4, 248, 93, 6, 4, 248, 88, 6, 4, 252, 174, 6, 4, 248, 87, 6, 4, 248, 97, 6, 4, 248, 98, 6, 4, 252, 175, 6, 4, 248, 96, 6, 4, 248, 101, 6, 4, 248, 102, 6, 4, 252, 176, 6, 4, 248, 99, 6, 4, 244, 102, 6, 4, 248, 100, 6, 4, 248, 211, 6, 4, 248, 212, 6, 4, 249, 52, 6, 4, 248, 210, 6, 4, 244, 161, 6, 4, 248, 219, 6, 4, 244, 160, 6, 4, 248, 217, 6, 4, 248, 218, 6, 4, 250, 126, 6, 4, 248, 216, 6, 4, 248, 214, 6, 4, 248, 215, 6, 4, 249, 74, 6, 4, 248, 213, 6, 4, 248, 222, 6, 4, 248, 223, 6, 4, 250, 127, 6, 4, 248, 220, 6, 4, 244, 162, 6, 4, 248, 221, 6, 4, 248, 227, 6, 4, 248, 228, 6, 4, 253, 64, 6, 4, 248, 225, 6, 4, 244, 163, 6, 4, 248, 226, 6, 4, 246, 47, 6, 4, 246, 48, 6, 4, 249, 11, 6, 4, 246, 46, 6, 4, 243, 67, 6, 4, 243, 68, 6, 4, 246, 56, 6, 4, 243, 66, 6, 4, 246, 54, 6, 4, 246, 55, 6, 4, 249, 94, 6, 4, 246, 53, 6, 4, 246, 50, 6, 4, 246, 51, 6, 4, 249, 44, 6, 4, 246, 49, 6, 4, 246, 59, 6, 4, 249, 131, 6, 4, 246, 57, 6, 4, 243, 69, 6, 4, 246, 58, 6, 4, 246, 63, 6, 4, 246, 64, 6, 4, 250, 186, 6, 4, 246, 61, 6, 4, 243, 70, 6, 4, 246, 62, 6, 4, 248, 25, 6, 4, 249, 50, 6, 4, 244, 63, 6, 4, 248, 33, 6, 4, 248, 31, 6, 4, 248, 32, 6, 4, 252, 134, 6, 4, 248, 30, 6, 4, 248, 28, 6, 4, 248, 29, 6, 4, 252, 133, 6, 4, 248, 27, 6, 4, 248, 36, 6, 4, 248, 37, 6, 4, 252, 135, 6, 4, 248, 34, 6, 4, 244, 64, 6, 4, 248, 35, 6, 4, 248, 40, 6, 4, 248, 41, 6, 4, 252, 136, 6, 4, 248, 38, 6, 4, 244, 65, 6, 4, 248, 39, 6, 4, 247, 182, 6, 4, 247, 183, 6, 4, 252, 36, 6, 4, 247, 181, 6, 4, 247, 188, 6, 4, 252, 38, 6, 4, 247, 187, 6, 4, 247, 185, 6, 4, 247, 186, 6, 4, 252, 37, 6, 4, 247, 184, 6, 4, 247, 191, 6, 4, 247, 192, 6, 4, 252, 39, 6, 4, 247, 189, 6, 4, 244, 5, 6, 4, 247, 190, 6, 4, 247, 195, 6, 4, 247, 196, 6, 4, 252, 40, 6, 4, 247, 193, 6, 4, 244, 6, 6, 4, 247, 194, 6, 4, 245, 181, 6, 4, 248, 57, 6, 4, 249, 7, 6, 4, 248, 56, 6, 4, 244, 81, 6, 4, 248, 65, 6, 4, 244, 80, 6, 4, 248, 63, 6, 4, 248, 64, 6, 4, 249, 85, 6, 4, 245, 187, 6, 4, 248, 59, 6, 4, 248, 60, 6, 4, 249, 70, 6, 4, 248, 58, 6, 4, 248, 67, 6, 4, 248, 68, 6, 4, 249, 162, 6, 4, 248, 66, 6, 4, 244, 82, 6, 4, 245, 188, 6, 4, 248, 71, 6, 4, 248, 72, 6, 4, 250, 71, 6, 4, 248, 69, 6, 4, 244, 83, 6, 4, 248, 70, 6, 4, 250, 61, 6, 4, 252, 118, 6, 4, 253, 92, 6, 4, 249, 158, 6, 4, 248, 45, 6, 4, 252, 139, 6, 4, 248, 44, 6, 4, 252, 131, 6, 4, 252, 132, 6, 4, 253, 144, 6, 4, 252, 130, 6, 4, 252, 123, 6, 4, 253, 150, 6, 4, 252, 121, 6, 4, 252, 142, 6, 4, 252, 143, 6, 4, 253, 170, 6, 4, 252, 140, 6, 4, 248, 46, 6, 4, 252, 141, 6, 4, 252, 148, 6, 4, 252, 149, 6, 4, 254, 70, 6, 4, 252, 146, 6, 4, 248, 48, 6, 4, 252, 147, 6, 4, 251, 124, 6, 4, 251, 125, 6, 4, 253, 228, 6, 4, 251, 123, 6, 4, 247, 3, 6, 4, 247, 4, 6, 4, 251, 122, 6, 4, 247, 2, 6, 4, 247, 22, 6, 4, 247, 23, 6, 4, 251, 130, 6, 4, 247, 21, 6, 4, 249, 69, 6, 4, 251, 129, 6, 4, 253, 240, 6, 4, 251, 128, 6, 4, 251, 133, 6, 4, 251, 134, 6, 4, 253, 241, 6, 4, 251, 131, 6, 4, 247, 24, 6, 4, 251, 132, 6, 4, 251, 138, 6, 4, 251, 139, 6, 4, 254, 123, 6, 4, 251, 136, 6, 4, 247, 25, 6, 4, 251, 137, 6, 4, 252, 93, 6, 4, 252, 94, 6, 4, 253, 249, 6, 4, 252, 92, 6, 4, 248, 7, 6, 4, 248, 8, 6, 4, 252, 91, 6, 4, 248, 6, 6, 4, 248, 10, 6, 4, 248, 11, 6, 4, 250, 58, 6, 4, 248, 9, 6, 4, 250, 57, 6, 4, 252, 98, 6, 4, 254, 18, 6, 4, 252, 97, 6, 4, 252, 105, 6, 4, 252, 107, 6, 4, 254, 19, 6, 4, 252, 103, 6, 4, 248, 12, 6, 4, 252, 104, 6, 4, 252, 113, 6, 4, 252, 114, 6, 4, 254, 178, 6, 4, 252, 111, 6, 4, 248, 16, 6, 4, 252, 112, 6, 4, 247, 7, 6, 4, 247, 8, 6, 4, 249, 248, 6, 4, 247, 6, 6, 4, 243, 176, 6, 4, 243, 177, 6, 4, 245, 118, 6, 4, 243, 175, 6, 4, 243, 179, 6, 4, 247, 12, 6, 4, 243, 178, 6, 4, 247, 10, 6, 4, 247, 11, 6, 4, 249, 249, 6, 4, 247, 9, 6, 4, 245, 119, 6, 4, 247, 15, 6, 4, 249, 250, 6, 4, 247, 13, 6, 4, 243, 180, 6, 4, 247, 14, 6, 4, 247, 17, 6, 4, 247, 18, 6, 4, 249, 251, 6, 4, 247, 16, 6, 4, 247, 163, 6, 4, 247, 164, 6, 4, 252, 27, 6, 4, 247, 162, 6, 4, 243, 250, 6, 4, 243, 251, 6, 4, 247, 161, 6, 4, 243, 249, 6, 4, 243, 252, 6, 4, 247, 168, 6, 4, 247, 166, 6, 4, 247, 167, 6, 4, 252, 28, 6, 4, 247, 165, 6, 4, 247, 171, 6, 4, 252, 29, 6, 4, 247, 169, 6, 4, 243, 253, 6, 4, 247, 170, 6, 4, 247, 174, 6, 4, 247, 175, 6, 4, 252, 30, 6, 4, 247, 172, 6, 4, 243, 254, 6, 4, 247, 173, 6, 4, 247, 205, 6, 4, 247, 206, 6, 4, 250, 33, 6, 4, 245, 153, 6, 4, 244, 9, 6, 4, 244, 10, 6, 4, 247, 204, 6, 4, 244, 8, 6, 4, 244, 12, 6, 4, 247, 209, 6, 4, 244, 11, 6, 4, 247, 207, 6, 4, 247, 208, 6, 4, 249, 84, 6, 4, 245, 154, 6, 4, 247, 211, 6, 4, 247, 212, 6, 4, 250, 34, 6, 4, 247, 210, 6, 4, 253, 27, 6, 4, 253, 28, 6, 4, 253, 135, 6, 4, 253, 26, 6, 4, 248, 179, 6, 4, 248, 180, 6, 4, 253, 25, 6, 4, 248, 178, 6, 4, 248, 182, 6, 4, 253, 33, 6, 4, 253, 31, 6, 4, 253, 32, 6, 4, 254, 77, 6, 4, 253, 29, 6, 4, 253, 39, 6, 4, 253, 40, 6, 4, 254, 207, 6, 4, 253, 37, 6, 4, 248, 185, 6, 4, 253, 38, 6, 4, 250, 116, 6, 4, 253, 45, 6, 4, 253, 139, 6, 4, 253, 44, 6, 4, 248, 192, 6, 4, 248, 193, 6, 4, 253, 42, 6, 4, 248, 191, 6, 4, 248, 204, 6, 4, 248, 205, 6, 4, 253, 49, 6, 4, 248, 203, 6, 4, 250, 118, 6, 4, 253, 47, 6, 4, 253, 123, 6, 4, 253, 46, 6, 4, 253, 52, 6, 4, 253, 53, 6, 4, 253, 124, 6, 4, 253, 50, 6, 4, 248, 206, 6, 4, 253, 51, 6, 4, 253, 56, 6, 4, 253, 57, 6, 4, 254, 26, 6, 4, 253, 54, 6, 4, 248, 207, 6, 4, 253, 55, 6, 22, 250, 57, 6, 22, 253, 211, 6, 22, 250, 1, 6, 22, 245, 153, 6, 22, 249, 206, 6, 22, 250, 75, 6, 22, 245, 93, 6, 22, 249, 230, 6, 22, 253, 156, 6, 22, 245, 110, 6, 22, 250, 16, 6, 22, 245, 58, 6, 22, 250, 21, 6, 22, 253, 123, 6, 22, 250, 48, 6, 22, 245, 112, 6, 22, 250, 85, 6, 22, 253, 100, 6, 22, 250, 130, 6, 22, 249, 207, 6, 22, 245, 77, 6, 22, 249, 193, 6, 22, 245, 94, 6, 22, 245, 154, 6, 22, 253, 160, 6, 22, 254, 63, 6, 22, 245, 119, 6, 22, 250, 129, 6, 22, 250, 52, 6, 22, 249, 243, 6, 22, 250, 116, 6, 22, 250, 108, 6, 22, 250, 71, 6, 22, 250, 103, 6, 22, 253, 129, 6, 22, 253, 240, 6, 22, 245, 155, 6, 22, 249, 251, 6, 22, 249, 238, 6, 22, 245, 118, 6, 22, 253, 138, 6, 22, 253, 204, 6, 22, 245, 188, 6, 22, 250, 11, 6, 22, 254, 33, 6, 22, 245, 71, 6, 22, 249, 198, 6, 22, 245, 111, 6, 22, 245, 181, 6, 22, 250, 131, 6, 22, 245, 187, 6, 22, 249, 44, 6, 22, 243, 21, 6, 22, 245, 148, 6, 22, 253, 134, 7, 11, 234, 73, 7, 11, 234, 74, 7, 11, 234, 75, 7, 11, 234, 76, 7, 11, 234, 77, 7, 11, 234, 78, 7, 11, 234, 79, 7, 11, 234, 80, 7, 11, 234, 81, 7, 11, 234, 82, 7, 11, 234, 83, 7, 11, 234, 84, 7, 11, 234, 85, 7, 11, 234, 86, 7, 11, 234, 87, 7, 11, 234, 88, 7, 11, 234, 89, 7, 11, 234, 90, 7, 11, 234, 91, 7, 11, 234, 92, 7, 11, 234, 93, 7, 11, 234, 94, 7, 11, 234, 95, 7, 11, 234, 96, 7, 11, 234, 97, 7, 11, 234, 98, 7, 11, 234, 99, 7, 11, 234, 100, 7, 11, 234, 101, 7, 11, 234, 102, 7, 11, 234, 103, 7, 11, 234, 104, 7, 11, 234, 105, 7, 11, 234, 106, 7, 11, 234, 107, 7, 11, 234, 108, 7, 11, 234, 109, 7, 11, 234, 110, 7, 11, 234, 111, 7, 11, 234, 112, 7, 11, 234, 113, 7, 11, 234, 114, 7, 11, 234, 115, 7, 11, 234, 116, 7, 11, 234, 117, 7, 11, 234, 118, 7, 11, 234, 119, 7, 11, 234, 120, 7, 11, 234, 121, 7, 11, 234, 122, 7, 11, 234, 123, 7, 11, 234, 124, 7, 11, 234, 125, 7, 11, 234, 126, 7, 11, 234, 127, 7, 11, 234, 128, 7, 11, 234, 129, 7, 11, 234, 130, 7, 11, 234, 131, 7, 11, 234, 132, 7, 11, 234, 133, 7, 11, 234, 134, 7, 11, 234, 135, 7, 11, 234, 136, 7, 11, 234, 137, 7, 11, 234, 138, 7, 11, 234, 139, 7, 11, 234, 140, 7, 11, 234, 141, 7, 11, 234, 142, 7, 11, 234, 143, 7, 11, 234, 144, 7, 11, 234, 145, 7, 11, 234, 146, 7, 11, 234, 147, 7, 11, 234, 148, 7, 11, 234, 149, 7, 11, 234, 150, 7, 11, 234, 151, 7, 11, 234, 152, 7, 11, 234, 153, 7, 11, 234, 154, 7, 11, 234, 155, 7, 11, 234, 156, 7, 11, 234, 157, 7, 11, 234, 158, 7, 11, 234, 159, 7, 11, 234, 160, 7, 11, 234, 161, 7, 11, 234, 162, 7, 11, 234, 163, 7, 11, 234, 164, 7, 11, 234, 165, 7, 11, 234, 166, 7, 11, 234, 167, 7, 11, 234, 168, 7, 11, 234, 169, 7, 11, 234, 170, 7, 11, 234, 171, 7, 11, 234, 172, 7, 11, 234, 173, 7, 11, 234, 174, 7, 11, 234, 175, 7, 11, 234, 176, 7, 11, 234, 177, 7, 11, 234, 178, 7, 11, 234, 179, 7, 11, 234, 180, 7, 11, 234, 181, 7, 11, 234, 182, 7, 11, 234, 183, 7, 11, 234, 184, 7, 11, 234, 185, 7, 11, 234, 186, 7, 11, 234, 187, 7, 11, 234, 188, 7, 11, 234, 189, 7, 11, 234, 190, 7, 11, 234, 191, 7, 11, 234, 192, 7, 11, 234, 193, 7, 11, 234, 194, 7, 11, 234, 195, 7, 11, 234, 196, 7, 11, 234, 197, 7, 11, 234, 198, 7, 11, 234, 199, 7, 11, 234, 200, 7, 11, 234, 201, 7, 11, 234, 202, 7, 11, 234, 203, 7, 11, 234, 204, 7, 11, 234, 205, 7, 11, 234, 206, 7, 11, 234, 207, 7, 11, 234, 208, 7, 11, 234, 209, 7, 11, 234, 210, 7, 11, 234, 211, 7, 11, 234, 212, 7, 11, 234, 213, 7, 11, 234, 214, 7, 11, 234, 215, 7, 11, 234, 216, 7, 11, 234, 217, 7, 11, 234, 218, 7, 11, 234, 219, 7, 11, 234, 220, 7, 11, 234, 221, 7, 11, 234, 222, 7, 11, 234, 223, 7, 11, 234, 224, 7, 11, 234, 225, 7, 11, 234, 226, 7, 11, 234, 227, 7, 11, 234, 228, 7, 11, 234, 229, 7, 11, 234, 230, 7, 11, 234, 231, 7, 11, 234, 232, 7, 11, 234, 233, 7, 11, 234, 234, 7, 11, 234, 235, 7, 11, 234, 236, 7, 11, 234, 237, 7, 11, 234, 238, 7, 11, 234, 239, 7, 11, 234, 240, 7, 11, 234, 241, 7, 11, 234, 242, 7, 11, 234, 243, 7, 11, 234, 244, 7, 11, 234, 245, 7, 11, 234, 246, 7, 11, 234, 247, 7, 11, 234, 248, 7, 11, 234, 249, 7, 11, 234, 250, 7, 11, 234, 251, 7, 11, 234, 252, 7, 11, 234, 253, 7, 11, 234, 254, 7, 11, 234, 255, 7, 11, 235, 0, 7, 11, 235, 1, 7, 11, 235, 2, 7, 11, 235, 3, 7, 11, 235, 4, 7, 11, 235, 5, 7, 11, 235, 6, 7, 11, 235, 7, 7, 11, 235, 8, 7, 11, 235, 9, 7, 11, 235, 10, 7, 11, 235, 11, 7, 11, 235, 12, 7, 11, 235, 13, 7, 11, 235, 14, 7, 11, 235, 15, 7, 11, 235, 16, 7, 11, 235, 17, 7, 11, 235, 18, 7, 11, 235, 19, 7, 11, 235, 20, 7, 11, 235, 21, 7, 11, 235, 22, 7, 11, 235, 23, 7, 11, 235, 24, 7, 11, 235, 25, 7, 11, 235, 26, 7, 11, 235, 27, 7, 11, 235, 28, 7, 11, 235, 29, 7, 11, 235, 30, 7, 11, 235, 31, 7, 11, 235, 32, 7, 11, 235, 33, 7, 11, 235, 34, 7, 11, 235, 35, 7, 11, 235, 36, 7, 11, 235, 37, 7, 11, 235, 38, 7, 11, 235, 39, 7, 11, 235, 40, 7, 11, 235, 41, 7, 11, 235, 42, 7, 11, 235, 43, 7, 11, 235, 44, 7, 11, 235, 45, 7, 11, 235, 46, 7, 11, 235, 47, 7, 11, 235, 48, 7, 11, 235, 49, 7, 11, 235, 50, 7, 11, 235, 51, 7, 11, 235, 52, 7, 11, 235, 53, 7, 11, 235, 54, 7, 11, 235, 55, 7, 11, 235, 56, 7, 11, 235, 57, 7, 11, 235, 58, 7, 11, 235, 59, 7, 11, 235, 60, 7, 11, 235, 61, 7, 11, 235, 62, 7, 11, 235, 63, 7, 11, 235, 64, 7, 11, 235, 65, 7, 11, 235, 66, 7, 11, 235, 67, 7, 11, 235, 68, 7, 11, 235, 69, 7, 11, 235, 70, 7, 11, 235, 71, 7, 11, 235, 72, 7, 11, 235, 73, 7, 11, 235, 74, 7, 11, 235, 75, 7, 11, 235, 76, 7, 11, 235, 77, 7, 11, 235, 78, 7, 11, 235, 79, 7, 11, 235, 80, 7, 11, 235, 81, 7, 11, 235, 82, 7, 11, 235, 83, 7, 11, 235, 84, 7, 11, 235, 85, 7, 11, 235, 86, 7, 11, 235, 87, 7, 11, 235, 88, 7, 11, 235, 89, 7, 11, 235, 90, 7, 11, 235, 91, 7, 11, 235, 92, 7, 11, 235, 93, 7, 11, 235, 94, 7, 11, 235, 95, 7, 11, 235, 96, 7, 11, 235, 97, 7, 11, 235, 98, 7, 11, 235, 99, 7, 11, 235, 100, 7, 11, 235, 101, 7, 11, 235, 102, 7, 11, 235, 103, 7, 11, 235, 104, 7, 11, 235, 105, 7, 11, 235, 106, 7, 11, 235, 107, 7, 11, 235, 108, 7, 11, 235, 109, 7, 11, 235, 110, 7, 11, 235, 111, 7, 11, 235, 112, 7, 11, 235, 113, 7, 11, 235, 114, 7, 11, 235, 115, 7, 11, 235, 116, 7, 11, 235, 117, 7, 11, 235, 118, 7, 11, 235, 119, 7, 11, 235, 120, 7, 11, 235, 121, 7, 11, 235, 122, 7, 11, 235, 123, 7, 11, 235, 124, 7, 11, 235, 125, 7, 11, 235, 126, 7, 11, 235, 127, 7, 11, 235, 128, 7, 11, 235, 129, 7, 11, 235, 130, 7, 11, 235, 131, 7, 11, 235, 132, 7, 11, 235, 133, 7, 11, 235, 134, 7, 11, 235, 135, 7, 11, 235, 136, 7, 11, 235, 137, 7, 11, 235, 138, 7, 11, 235, 139, 7, 11, 235, 140, 7, 11, 235, 141, 7, 11, 235, 142, 7, 11, 235, 143, 7, 11, 235, 144, 7, 11, 235, 145, 7, 11, 235, 146, 7, 11, 235, 147, 7, 11, 235, 148, 7, 11, 235, 149, 7, 11, 235, 150, 7, 11, 235, 151, 7, 11, 235, 152, 7, 11, 235, 153, 7, 11, 235, 154, 7, 11, 235, 155, 7, 11, 235, 156, 7, 11, 235, 157, 7, 11, 235, 158, 7, 11, 235, 159, 7, 11, 235, 160, 7, 11, 235, 161, 7, 11, 235, 162, 7, 11, 235, 163, 7, 11, 235, 164, 7, 11, 235, 165, 7, 11, 235, 166, 7, 11, 235, 167, 7, 11, 235, 168, 7, 11, 235, 169, 7, 11, 235, 170, 7, 11, 235, 171, 7, 11, 235, 172, 7, 11, 235, 173, 7, 11, 235, 174, 7, 11, 235, 175, 7, 11, 235, 176, 7, 11, 235, 177, 9, 3, 17, 254, 102, 9, 3, 17, 253, 226, 9, 3, 17, 254, 103, 9, 3, 17, 251, 4, 9, 3, 17, 251, 5, 9, 3, 17, 165, 255, 29, 190, 9, 3, 17, 254, 186, 87, 3, 17, 253, 242, 249, 112, 87, 3, 17, 253, 242, 249, 133, 87, 3, 17, 253, 242, 249, 138, 87, 3, 17, 254, 200, 249, 112, 87, 3, 17, 253, 242, 249, 179, 61, 1, 254, 0, 2, 242, 222, 61, 244, 180, 236, 25, 242, 50, 61, 17, 241, 10, 254, 0, 254, 0, 242, 162, 61, 1, 236, 200, 245, 57, 61, 1, 249, 51, 244, 224, 61, 1, 249, 51, 242, 204, 61, 1, 249, 51, 253, 125, 61, 1, 249, 51, 249, 81, 61, 1, 249, 51, 242, 179, 61, 1, 249, 51, 29, 249, 147, 61, 1, 249, 51, 245, 170, 61, 1, 249, 51, 250, 86, 61, 1, 236, 200, 249, 4, 57, 61, 1, 249, 54, 2, 249, 54, 227, 61, 1, 249, 54, 2, 254, 22, 227, 61, 1, 249, 54, 2, 242, 176, 18, 249, 54, 227, 61, 1, 249, 54, 2, 242, 176, 18, 254, 22, 227, 61, 1, 67, 2, 242, 162, 61, 1, 67, 2, 241, 30, 61, 1, 67, 2, 242, 181, 61, 1, 254, 3, 2, 240, 208, 61, 1, 245, 98, 2, 240, 208, 61, 1, 245, 76, 2, 240, 208, 61, 1, 255, 9, 2, 242, 181, 61, 1, 254, 24, 2, 240, 208, 61, 1, 248, 208, 2, 240, 208, 61, 1, 254, 191, 2, 240, 208, 61, 1, 254, 0, 2, 240, 208, 61, 1, 29, 253, 87, 2, 240, 208, 61, 1, 253, 87, 2, 240, 208, 61, 1, 247, 54, 2, 240, 208, 61, 1, 254, 142, 2, 240, 208, 61, 1, 254, 160, 2, 240, 208, 61, 1, 244, 69, 2, 240, 208, 61, 1, 29, 254, 229, 2, 240, 208, 61, 1, 254, 229, 2, 240, 208, 61, 1, 248, 141, 2, 240, 208, 61, 1, 254, 177, 2, 240, 208, 61, 1, 252, 122, 2, 240, 208, 61, 1, 249, 54, 2, 240, 208, 61, 1, 254, 189, 2, 240, 208, 61, 1, 254, 24, 2, 242, 223, 61, 1, 254, 3, 2, 245, 1, 61, 1, 253, 87, 2, 245, 1, 61, 1, 254, 229, 2, 245, 1, 61, 17, 67, 242, 179, 10, 1, 67, 245, 219, 35, 12, 10, 1, 67, 245, 219, 29, 12, 10, 1, 249, 93, 35, 12, 10, 1, 249, 93, 29, 12, 10, 1, 249, 93, 46, 12, 10, 1, 249, 93, 98, 12, 10, 1, 253, 248, 35, 12, 10, 1, 253, 248, 29, 12, 10, 1, 253, 248, 46, 12, 10, 1, 253, 248, 98, 12, 10, 1, 244, 245, 35, 12, 10, 1, 244, 245, 29, 12, 10, 1, 244, 245, 46, 12, 10, 1, 244, 245, 98, 12, 10, 1, 242, 168, 35, 12, 10, 1, 242, 168, 29, 12, 10, 1, 242, 168, 46, 12, 10, 1, 242, 168, 98, 12, 10, 1, 245, 7, 35, 12, 10, 1, 245, 7, 29, 12, 10, 1, 245, 7, 46, 12, 10, 1, 245, 7, 98, 12, 10, 1, 249, 122, 35, 12, 10, 1, 249, 122, 29, 12, 10, 1, 249, 122, 46, 12, 10, 1, 249, 122, 98, 12, 10, 1, 253, 254, 35, 12, 10, 1, 253, 254, 29, 12, 10, 1, 253, 254, 46, 12, 10, 1, 253, 254, 98, 12, 10, 1, 245, 0, 35, 12, 10, 1, 245, 0, 29, 12, 10, 1, 245, 0, 46, 12, 10, 1, 245, 0, 98, 12, 10, 1, 249, 99, 35, 12, 10, 1, 249, 99, 29, 12, 10, 1, 249, 99, 46, 12, 10, 1, 249, 99, 98, 12, 10, 1, 249, 113, 35, 12, 10, 1, 249, 113, 29, 12, 10, 1, 249, 113, 46, 12, 10, 1, 249, 113, 98, 12, 10, 1, 244, 240, 35, 12, 10, 1, 244, 240, 29, 12, 10, 1, 244, 240, 46, 12, 10, 1, 244, 240, 98, 12, 10, 1, 241, 6, 35, 12, 10, 1, 241, 6, 29, 12, 10, 1, 241, 6, 46, 12, 10, 1, 241, 6, 98, 12, 10, 1, 242, 206, 35, 12, 10, 1, 242, 206, 29, 12, 10, 1, 245, 75, 35, 12, 10, 1, 245, 75, 29, 12, 10, 1, 254, 34, 35, 12, 10, 1, 254, 34, 29, 12, 10, 1, 249, 208, 35, 12, 10, 1, 249, 208, 29, 12, 10, 1, 254, 47, 35, 12, 10, 1, 254, 47, 29, 12, 10, 1, 250, 65, 35, 12, 10, 1, 250, 65, 29, 12, 10, 1, 244, 253, 35, 12, 10, 1, 244, 253, 29, 12, 10, 1, 244, 253, 46, 12, 10, 1, 244, 253, 98, 12, 10, 1, 253, 194, 35, 12, 10, 1, 253, 194, 29, 12, 10, 1, 253, 194, 46, 12, 10, 1, 253, 194, 98, 12, 10, 1, 249, 103, 35, 12, 10, 1, 249, 103, 29, 12, 10, 1, 249, 103, 46, 12, 10, 1, 249, 103, 98, 12, 10, 1, 244, 255, 35, 12, 10, 1, 244, 255, 29, 12, 10, 1, 244, 255, 46, 12, 10, 1, 244, 255, 98, 12, 10, 1, 177, 242, 218, 35, 12, 10, 1, 177, 242, 218, 29, 12, 10, 1, 245, 2, 35, 12, 10, 1, 245, 2, 29, 12, 10, 1, 245, 2, 46, 12, 10, 1, 245, 2, 98, 12, 10, 1, 188, 2, 50, 53, 35, 12, 10, 1, 188, 2, 50, 53, 29, 12, 10, 1, 188, 249, 79, 35, 12, 10, 1, 188, 249, 79, 29, 12, 10, 1, 188, 249, 79, 46, 12, 10, 1, 188, 249, 79, 98, 12, 10, 1, 188, 236, 197, 35, 12, 10, 1, 188, 236, 197, 29, 12, 10, 1, 188, 236, 197, 46, 12, 10, 1, 188, 236, 197, 98, 12, 10, 1, 50, 242, 139, 35, 12, 10, 1, 50, 242, 139, 29, 12, 10, 1, 50, 242, 139, 2, 125, 53, 35, 12, 10, 1, 50, 242, 139, 2, 125, 53, 29, 12, 10, 1, 254, 235, 35, 12, 10, 1, 254, 235, 29, 12, 10, 1, 254, 235, 46, 12, 10, 1, 254, 235, 98, 12, 10, 1, 115, 35, 12, 10, 1, 115, 29, 12, 10, 1, 254, 223, 35, 12, 10, 1, 254, 223, 29, 12, 10, 1, 254, 226, 35, 12, 10, 1, 254, 226, 29, 12, 10, 1, 115, 2, 125, 53, 35, 12, 10, 1, 254, 255, 35, 12, 10, 1, 254, 255, 29, 12, 10, 1, 240, 217, 254, 223, 35, 12, 10, 1, 240, 217, 254, 223, 29, 12, 10, 1, 240, 217, 254, 226, 35, 12, 10, 1, 240, 217, 254, 226, 29, 12, 10, 1, 144, 35, 12, 10, 1, 144, 29, 12, 10, 1, 144, 46, 12, 10, 1, 144, 98, 12, 10, 1, 242, 151, 242, 226, 240, 217, 67, 131, 46, 12, 10, 1, 242, 151, 242, 226, 240, 217, 67, 131, 98, 12, 10, 17, 50, 2, 125, 53, 2, 67, 35, 12, 10, 17, 50, 2, 125, 53, 2, 67, 29, 12, 10, 17, 50, 2, 125, 53, 2, 254, 221, 35, 12, 10, 17, 50, 2, 125, 53, 2, 254, 221, 29, 12, 10, 17, 50, 2, 125, 53, 2, 253, 162, 35, 12, 10, 17, 50, 2, 125, 53, 2, 253, 162, 29, 12, 10, 17, 50, 2, 125, 53, 2, 115, 35, 12, 10, 17, 50, 2, 125, 53, 2, 115, 29, 12, 10, 17, 50, 2, 125, 53, 2, 254, 223, 35, 12, 10, 17, 50, 2, 125, 53, 2, 254, 223, 29, 12, 10, 17, 50, 2, 125, 53, 2, 254, 226, 35, 12, 10, 17, 50, 2, 125, 53, 2, 254, 226, 29, 12, 10, 17, 50, 2, 125, 53, 2, 144, 35, 12, 10, 17, 50, 2, 125, 53, 2, 144, 29, 12, 10, 17, 50, 2, 125, 53, 2, 144, 46, 12, 10, 17, 242, 151, 240, 217, 50, 2, 125, 53, 2, 67, 131, 35, 12, 10, 17, 242, 151, 240, 217, 50, 2, 125, 53, 2, 67, 131, 29, 12, 10, 17, 242, 151, 240, 217, 50, 2, 125, 53, 2, 67, 131, 46, 12, 10, 1, 244, 227, 50, 35, 12, 10, 1, 244, 227, 50, 29, 12, 10, 1, 244, 227, 50, 46, 12, 10, 1, 244, 227, 50, 98, 12, 10, 17, 50, 2, 125, 53, 2, 89, 35, 12, 10, 17, 50, 2, 125, 53, 2, 81, 35, 12, 10, 17, 50, 2, 125, 53, 2, 43, 35, 12, 10, 17, 50, 2, 125, 53, 2, 67, 131, 35, 12, 10, 17, 50, 2, 125, 53, 2, 50, 35, 12, 10, 17, 253, 102, 2, 89, 35, 12, 10, 17, 253, 102, 2, 81, 35, 12, 10, 17, 253, 102, 2, 145, 35, 12, 10, 17, 253, 102, 2, 43, 35, 12, 10, 17, 253, 102, 2, 67, 131, 35, 12, 10, 17, 253, 102, 2, 50, 35, 12, 10, 17, 191, 2, 89, 35, 12, 10, 17, 191, 2, 81, 35, 12, 10, 17, 191, 2, 145, 35, 12, 10, 17, 191, 2, 43, 35, 12, 10, 17, 191, 2, 67, 131, 35, 12, 10, 17, 191, 2, 50, 35, 12, 10, 17, 249, 20, 2, 89, 35, 12, 10, 17, 249, 20, 2, 43, 35, 12, 10, 17, 249, 20, 2, 67, 131, 35, 12, 10, 17, 249, 20, 2, 50, 35, 12, 10, 17, 89, 2, 81, 35, 12, 10, 17, 89, 2, 43, 35, 12, 10, 17, 81, 2, 89, 35, 12, 10, 17, 81, 2, 43, 35, 12, 10, 17, 145, 2, 89, 35, 12, 10, 17, 145, 2, 81, 35, 12, 10, 17, 145, 2, 43, 35, 12, 10, 17, 214, 2, 89, 35, 12, 10, 17, 214, 2, 81, 35, 12, 10, 17, 214, 2, 145, 35, 12, 10, 17, 214, 2, 43, 35, 12, 10, 17, 253, 108, 2, 81, 35, 12, 10, 17, 253, 108, 2, 43, 35, 12, 10, 17, 253, 107, 2, 89, 35, 12, 10, 17, 253, 107, 2, 81, 35, 12, 10, 17, 253, 107, 2, 145, 35, 12, 10, 17, 253, 107, 2, 43, 35, 12, 10, 17, 253, 122, 2, 81, 35, 12, 10, 17, 253, 122, 2, 43, 35, 12, 10, 17, 253, 201, 2, 43, 35, 12, 10, 17, 253, 117, 2, 89, 35, 12, 10, 17, 253, 117, 2, 43, 35, 12, 10, 17, 244, 190, 2, 89, 35, 12, 10, 17, 244, 190, 2, 43, 35, 12, 10, 17, 253, 111, 2, 89, 35, 12, 10, 17, 253, 111, 2, 81, 35, 12, 10, 17, 253, 111, 2, 145, 35, 12, 10, 17, 253, 111, 2, 43, 35, 12, 10, 17, 253, 111, 2, 67, 131, 35, 12, 10, 17, 253, 111, 2, 50, 35, 12, 10, 17, 253, 120, 2, 81, 35, 12, 10, 17, 253, 120, 2, 43, 35, 12, 10, 17, 253, 120, 2, 67, 131, 35, 12, 10, 17, 253, 120, 2, 50, 35, 12, 10, 17, 253, 87, 2, 67, 35, 12, 10, 17, 253, 87, 2, 89, 35, 12, 10, 17, 253, 87, 2, 81, 35, 12, 10, 17, 253, 87, 2, 145, 35, 12, 10, 17, 253, 87, 2, 155, 35, 12, 10, 17, 253, 87, 2, 43, 35, 12, 10, 17, 253, 87, 2, 67, 131, 35, 12, 10, 17, 253, 87, 2, 50, 35, 12, 10, 17, 155, 2, 89, 35, 12, 10, 17, 155, 2, 81, 35, 12, 10, 17, 155, 2, 145, 35, 12, 10, 17, 155, 2, 43, 35, 12, 10, 17, 155, 2, 67, 131, 35, 12, 10, 17, 155, 2, 50, 35, 12, 10, 17, 43, 2, 89, 35, 12, 10, 17, 43, 2, 81, 35, 12, 10, 17, 43, 2, 145, 35, 12, 10, 17, 43, 2, 43, 35, 12, 10, 17, 43, 2, 67, 131, 35, 12, 10, 17, 43, 2, 50, 35, 12, 10, 17, 177, 2, 89, 35, 12, 10, 17, 177, 2, 81, 35, 12, 10, 17, 177, 2, 145, 35, 12, 10, 17, 177, 2, 43, 35, 12, 10, 17, 177, 2, 67, 131, 35, 12, 10, 17, 177, 2, 50, 35, 12, 10, 17, 188, 2, 89, 35, 12, 10, 17, 188, 2, 43, 35, 12, 10, 17, 188, 2, 67, 131, 35, 12, 10, 17, 188, 2, 50, 35, 12, 10, 17, 50, 2, 89, 35, 12, 10, 17, 50, 2, 81, 35, 12, 10, 17, 50, 2, 145, 35, 12, 10, 17, 50, 2, 43, 35, 12, 10, 17, 50, 2, 67, 131, 35, 12, 10, 17, 50, 2, 50, 35, 12, 10, 17, 249, 165, 2, 236, 181, 67, 35, 12, 10, 17, 253, 105, 2, 236, 181, 67, 35, 12, 10, 17, 67, 131, 2, 236, 181, 67, 35, 12, 10, 17, 242, 102, 2, 239, 211, 35, 12, 10, 17, 242, 102, 2, 239, 220, 35, 12, 10, 17, 242, 102, 2, 244, 249, 35, 12, 10, 17, 242, 102, 2, 244, 248, 35, 12, 10, 17, 242, 102, 2, 244, 252, 35, 12, 10, 17, 242, 102, 2, 236, 181, 67, 35, 12, 10, 17, 50, 2, 125, 53, 2, 253, 105, 29, 12, 10, 17, 50, 2, 125, 53, 2, 249, 59, 29, 12, 10, 17, 50, 2, 125, 53, 2, 43, 29, 12, 10, 17, 50, 2, 125, 53, 2, 177, 29, 12, 10, 17, 50, 2, 125, 53, 2, 67, 131, 29, 12, 10, 17, 50, 2, 125, 53, 2, 50, 29, 12, 10, 17, 253, 102, 2, 253, 105, 29, 12, 10, 17, 253, 102, 2, 249, 59, 29, 12, 10, 17, 253, 102, 2, 43, 29, 12, 10, 17, 253, 102, 2, 177, 29, 12, 10, 17, 253, 102, 2, 67, 131, 29, 12, 10, 17, 253, 102, 2, 50, 29, 12, 10, 17, 191, 2, 253, 105, 29, 12, 10, 17, 191, 2, 249, 59, 29, 12, 10, 17, 191, 2, 43, 29, 12, 10, 17, 191, 2, 177, 29, 12, 10, 17, 191, 2, 67, 131, 29, 12, 10, 17, 191, 2, 50, 29, 12, 10, 17, 249, 20, 2, 253, 105, 29, 12, 10, 17, 249, 20, 2, 249, 59, 29, 12, 10, 17, 249, 20, 2, 43, 29, 12, 10, 17, 249, 20, 2, 177, 29, 12, 10, 17, 249, 20, 2, 67, 131, 29, 12, 10, 17, 249, 20, 2, 50, 29, 12, 10, 17, 253, 111, 2, 67, 131, 29, 12, 10, 17, 253, 111, 2, 50, 29, 12, 10, 17, 253, 120, 2, 67, 131, 29, 12, 10, 17, 253, 120, 2, 50, 29, 12, 10, 17, 253, 87, 2, 67, 29, 12, 10, 17, 253, 87, 2, 155, 29, 12, 10, 17, 253, 87, 2, 43, 29, 12, 10, 17, 253, 87, 2, 67, 131, 29, 12, 10, 17, 253, 87, 2, 50, 29, 12, 10, 17, 155, 2, 43, 29, 12, 10, 17, 155, 2, 67, 131, 29, 12, 10, 17, 155, 2, 50, 29, 12, 10, 17, 43, 2, 67, 29, 12, 10, 17, 43, 2, 43, 29, 12, 10, 17, 177, 2, 253, 105, 29, 12, 10, 17, 177, 2, 249, 59, 29, 12, 10, 17, 177, 2, 43, 29, 12, 10, 17, 177, 2, 177, 29, 12, 10, 17, 177, 2, 67, 131, 29, 12, 10, 17, 177, 2, 50, 29, 12, 10, 17, 67, 131, 2, 236, 181, 67, 29, 12, 10, 17, 50, 2, 253, 105, 29, 12, 10, 17, 50, 2, 249, 59, 29, 12, 10, 17, 50, 2, 43, 29, 12, 10, 17, 50, 2, 177, 29, 12, 10, 17, 50, 2, 67, 131, 29, 12, 10, 17, 50, 2, 50, 29, 12, 10, 17, 50, 2, 125, 53, 2, 89, 46, 12, 10, 17, 50, 2, 125, 53, 2, 81, 46, 12, 10, 17, 50, 2, 125, 53, 2, 145, 46, 12, 10, 17, 50, 2, 125, 53, 2, 43, 46, 12, 10, 17, 50, 2, 125, 53, 2, 188, 46, 12, 10, 17, 253, 102, 2, 89, 46, 12, 10, 17, 253, 102, 2, 81, 46, 12, 10, 17, 253, 102, 2, 145, 46, 12, 10, 17, 253, 102, 2, 43, 46, 12, 10, 17, 253, 102, 2, 188, 46, 12, 10, 17, 191, 2, 89, 46, 12, 10, 17, 191, 2, 81, 46, 12, 10, 17, 191, 2, 145, 46, 12, 10, 17, 191, 2, 43, 46, 12, 10, 17, 191, 2, 188, 46, 12, 10, 17, 249, 20, 2, 43, 46, 12, 10, 17, 89, 2, 81, 46, 12, 10, 17, 89, 2, 43, 46, 12, 10, 17, 81, 2, 89, 46, 12, 10, 17, 81, 2, 43, 46, 12, 10, 17, 145, 2, 89, 46, 12, 10, 17, 145, 2, 43, 46, 12, 10, 17, 214, 2, 89, 46, 12, 10, 17, 214, 2, 81, 46, 12, 10, 17, 214, 2, 145, 46, 12, 10, 17, 214, 2, 43, 46, 12, 10, 17, 253, 108, 2, 81, 46, 12, 10, 17, 253, 108, 2, 145, 46, 12, 10, 17, 253, 108, 2, 43, 46, 12, 10, 17, 253, 107, 2, 89, 46, 12, 10, 17, 253, 107, 2, 81, 46, 12, 10, 17, 253, 107, 2, 145, 46, 12, 10, 17, 253, 107, 2, 43, 46, 12, 10, 17, 253, 122, 2, 81, 46, 12, 10, 17, 253, 201, 2, 43, 46, 12, 10, 17, 253, 117, 2, 89, 46, 12, 10, 17, 253, 117, 2, 43, 46, 12, 10, 17, 244, 190, 2, 89, 46, 12, 10, 17, 244, 190, 2, 43, 46, 12, 10, 17, 253, 111, 2, 89, 46, 12, 10, 17, 253, 111, 2, 81, 46, 12, 10, 17, 253, 111, 2, 145, 46, 12, 10, 17, 253, 111, 2, 43, 46, 12, 10, 17, 253, 120, 2, 81, 46, 12, 10, 17, 253, 120, 2, 43, 46, 12, 10, 17, 253, 87, 2, 89, 46, 12, 10, 17, 253, 87, 2, 81, 46, 12, 10, 17, 253, 87, 2, 145, 46, 12, 10, 17, 253, 87, 2, 155, 46, 12, 10, 17, 253, 87, 2, 43, 46, 12, 10, 17, 155, 2, 89, 46, 12, 10, 17, 155, 2, 81, 46, 12, 10, 17, 155, 2, 145, 46, 12, 10, 17, 155, 2, 43, 46, 12, 10, 17, 155, 2, 188, 46, 12, 10, 17, 43, 2, 89, 46, 12, 10, 17, 43, 2, 81, 46, 12, 10, 17, 43, 2, 145, 46, 12, 10, 17, 43, 2, 43, 46, 12, 10, 17, 177, 2, 89, 46, 12, 10, 17, 177, 2, 81, 46, 12, 10, 17, 177, 2, 145, 46, 12, 10, 17, 177, 2, 43, 46, 12, 10, 17, 177, 2, 188, 46, 12, 10, 17, 188, 2, 89, 46, 12, 10, 17, 188, 2, 43, 46, 12, 10, 17, 188, 2, 236, 181, 67, 46, 12, 10, 17, 50, 2, 89, 46, 12, 10, 17, 50, 2, 81, 46, 12, 10, 17, 50, 2, 145, 46, 12, 10, 17, 50, 2, 43, 46, 12, 10, 17, 50, 2, 188, 46, 12, 10, 17, 50, 2, 125, 53, 2, 43, 98, 12, 10, 17, 50, 2, 125, 53, 2, 188, 98, 12, 10, 17, 253, 102, 2, 43, 98, 12, 10, 17, 253, 102, 2, 188, 98, 12, 10, 17, 191, 2, 43, 98, 12, 10, 17, 191, 2, 188, 98, 12, 10, 17, 249, 20, 2, 43, 98, 12, 10, 17, 249, 20, 2, 188, 98, 12, 10, 17, 214, 2, 43, 98, 12, 10, 17, 214, 2, 188, 98, 12, 10, 17, 215, 2, 43, 98, 12, 10, 17, 215, 2, 188, 98, 12, 10, 17, 253, 87, 2, 155, 98, 12, 10, 17, 253, 87, 2, 43, 98, 12, 10, 17, 155, 2, 43, 98, 12, 10, 17, 177, 2, 43, 98, 12, 10, 17, 177, 2, 188, 98, 12, 10, 17, 50, 2, 43, 98, 12, 10, 17, 50, 2, 188, 98, 12, 10, 17, 242, 102, 2, 244, 249, 98, 12, 10, 17, 242, 102, 2, 244, 248, 98, 12, 10, 17, 242, 102, 2, 244, 252, 98, 12, 10, 17, 253, 122, 2, 67, 131, 35, 12, 10, 17, 253, 122, 2, 50, 35, 12, 10, 17, 253, 117, 2, 67, 131, 35, 12, 10, 17, 253, 117, 2, 50, 35, 12, 10, 17, 244, 190, 2, 67, 131, 35, 12, 10, 17, 244, 190, 2, 50, 35, 12, 10, 17, 214, 2, 67, 131, 35, 12, 10, 17, 214, 2, 50, 35, 12, 10, 17, 215, 2, 67, 131, 35, 12, 10, 17, 215, 2, 50, 35, 12, 10, 17, 81, 2, 67, 131, 35, 12, 10, 17, 81, 2, 50, 35, 12, 10, 17, 89, 2, 67, 131, 35, 12, 10, 17, 89, 2, 50, 35, 12, 10, 17, 145, 2, 67, 131, 35, 12, 10, 17, 145, 2, 50, 35, 12, 10, 17, 253, 108, 2, 67, 131, 35, 12, 10, 17, 253, 108, 2, 50, 35, 12, 10, 17, 253, 107, 2, 67, 131, 35, 12, 10, 17, 253, 107, 2, 50, 35, 12, 10, 17, 215, 2, 89, 35, 12, 10, 17, 215, 2, 81, 35, 12, 10, 17, 215, 2, 145, 35, 12, 10, 17, 215, 2, 43, 35, 12, 10, 17, 215, 2, 253, 105, 35, 12, 10, 17, 214, 2, 253, 105, 35, 12, 10, 17, 253, 108, 2, 253, 105, 35, 12, 10, 17, 253, 107, 2, 253, 105, 35, 12, 10, 17, 253, 122, 2, 67, 131, 29, 12, 10, 17, 253, 122, 2, 50, 29, 12, 10, 17, 253, 117, 2, 67, 131, 29, 12, 10, 17, 253, 117, 2, 50, 29, 12, 10, 17, 244, 190, 2, 67, 131, 29, 12, 10, 17, 244, 190, 2, 50, 29, 12, 10, 17, 214, 2, 67, 131, 29, 12, 10, 17, 214, 2, 50, 29, 12, 10, 17, 215, 2, 67, 131, 29, 12, 10, 17, 215, 2, 50, 29, 12, 10, 17, 81, 2, 67, 131, 29, 12, 10, 17, 81, 2, 50, 29, 12, 10, 17, 89, 2, 67, 131, 29, 12, 10, 17, 89, 2, 50, 29, 12, 10, 17, 145, 2, 67, 131, 29, 12, 10, 17, 145, 2, 50, 29, 12, 10, 17, 253, 108, 2, 67, 131, 29, 12, 10, 17, 253, 108, 2, 50, 29, 12, 10, 17, 253, 107, 2, 67, 131, 29, 12, 10, 17, 253, 107, 2, 50, 29, 12, 10, 17, 215, 2, 89, 29, 12, 10, 17, 215, 2, 81, 29, 12, 10, 17, 215, 2, 145, 29, 12, 10, 17, 215, 2, 43, 29, 12, 10, 17, 215, 2, 253, 105, 29, 12, 10, 17, 214, 2, 253, 105, 29, 12, 10, 17, 253, 108, 2, 253, 105, 29, 12, 10, 17, 253, 107, 2, 253, 105, 29, 12, 10, 17, 215, 2, 89, 46, 12, 10, 17, 215, 2, 81, 46, 12, 10, 17, 215, 2, 145, 46, 12, 10, 17, 215, 2, 43, 46, 12, 10, 17, 214, 2, 188, 46, 12, 10, 17, 215, 2, 188, 46, 12, 10, 17, 253, 122, 2, 43, 46, 12, 10, 17, 214, 2, 89, 98, 12, 10, 17, 214, 2, 81, 98, 12, 10, 17, 214, 2, 145, 98, 12, 10, 17, 215, 2, 89, 98, 12, 10, 17, 215, 2, 81, 98, 12, 10, 17, 215, 2, 145, 98, 12, 10, 17, 253, 122, 2, 43, 98, 12, 10, 17, 253, 201, 2, 43, 98, 12, 10, 17, 67, 2, 239, 172, 29, 12, 10, 17, 67, 2, 239, 172, 35, 12, 242, 236, 36, 236, 47, 242, 236, 37, 236, 47, 10, 17, 191, 2, 89, 2, 43, 46, 12, 10, 17, 191, 2, 81, 2, 89, 29, 12, 10, 17, 191, 2, 81, 2, 89, 46, 12, 10, 17, 191, 2, 81, 2, 43, 46, 12, 10, 17, 191, 2, 145, 2, 43, 46, 12, 10, 17, 191, 2, 43, 2, 89, 46, 12, 10, 17, 191, 2, 43, 2, 81, 46, 12, 10, 17, 191, 2, 43, 2, 145, 46, 12, 10, 17, 89, 2, 43, 2, 81, 29, 12, 10, 17, 89, 2, 43, 2, 81, 46, 12, 10, 17, 81, 2, 43, 2, 50, 29, 12, 10, 17, 81, 2, 43, 2, 67, 131, 29, 12, 10, 17, 214, 2, 81, 2, 89, 46, 12, 10, 17, 214, 2, 89, 2, 81, 46, 12, 10, 17, 214, 2, 89, 2, 67, 131, 29, 12, 10, 17, 214, 2, 43, 2, 81, 29, 12, 10, 17, 214, 2, 43, 2, 81, 46, 12, 10, 17, 214, 2, 43, 2, 89, 46, 12, 10, 17, 214, 2, 43, 2, 43, 29, 12, 10, 17, 214, 2, 43, 2, 43, 46, 12, 10, 17, 253, 108, 2, 81, 2, 81, 29, 12, 10, 17, 253, 108, 2, 81, 2, 81, 46, 12, 10, 17, 253, 108, 2, 43, 2, 43, 29, 12, 10, 17, 215, 2, 81, 2, 43, 29, 12, 10, 17, 215, 2, 81, 2, 43, 46, 12, 10, 17, 215, 2, 89, 2, 50, 29, 12, 10, 17, 215, 2, 43, 2, 145, 29, 12, 10, 17, 215, 2, 43, 2, 145, 46, 12, 10, 17, 215, 2, 43, 2, 43, 29, 12, 10, 17, 215, 2, 43, 2, 43, 46, 12, 10, 17, 253, 107, 2, 81, 2, 67, 131, 29, 12, 10, 17, 253, 107, 2, 145, 2, 43, 29, 12, 10, 17, 253, 107, 2, 145, 2, 43, 46, 12, 10, 17, 253, 122, 2, 43, 2, 81, 29, 12, 10, 17, 253, 122, 2, 43, 2, 81, 46, 12, 10, 17, 253, 122, 2, 43, 2, 43, 46, 12, 10, 17, 253, 122, 2, 43, 2, 50, 29, 12, 10, 17, 253, 117, 2, 89, 2, 43, 29, 12, 10, 17, 253, 117, 2, 43, 2, 43, 29, 12, 10, 17, 253, 117, 2, 43, 2, 43, 46, 12, 10, 17, 253, 117, 2, 43, 2, 67, 131, 29, 12, 10, 17, 244, 190, 2, 43, 2, 43, 29, 12, 10, 17, 244, 190, 2, 43, 2, 50, 29, 12, 10, 17, 244, 190, 2, 43, 2, 67, 131, 29, 12, 10, 17, 253, 111, 2, 145, 2, 43, 29, 12, 10, 17, 253, 111, 2, 145, 2, 43, 46, 12, 10, 17, 253, 120, 2, 43, 2, 81, 29, 12, 10, 17, 253, 120, 2, 43, 2, 43, 29, 12, 10, 17, 155, 2, 81, 2, 43, 29, 12, 10, 17, 155, 2, 81, 2, 50, 29, 12, 10, 17, 155, 2, 81, 2, 67, 131, 29, 12, 10, 17, 155, 2, 89, 2, 89, 46, 12, 10, 17, 155, 2, 89, 2, 89, 29, 12, 10, 17, 155, 2, 145, 2, 43, 29, 12, 10, 17, 155, 2, 145, 2, 43, 46, 12, 10, 17, 155, 2, 43, 2, 81, 29, 12, 10, 17, 155, 2, 43, 2, 81, 46, 12, 10, 17, 43, 2, 81, 2, 89, 46, 12, 10, 17, 43, 2, 81, 2, 43, 46, 12, 10, 17, 43, 2, 81, 2, 50, 29, 12, 10, 17, 43, 2, 89, 2, 81, 46, 12, 10, 17, 43, 2, 89, 2, 43, 46, 12, 10, 17, 43, 2, 145, 2, 89, 46, 12, 10, 17, 43, 2, 145, 2, 43, 46, 12, 10, 17, 43, 2, 89, 2, 145, 46, 12, 10, 17, 188, 2, 43, 2, 89, 46, 12, 10, 17, 188, 2, 43, 2, 43, 46, 12, 10, 17, 177, 2, 81, 2, 43, 46, 12, 10, 17, 177, 2, 81, 2, 67, 131, 29, 12, 10, 17, 177, 2, 89, 2, 43, 29, 12, 10, 17, 177, 2, 89, 2, 43, 46, 12, 10, 17, 177, 2, 89, 2, 67, 131, 29, 12, 10, 17, 177, 2, 43, 2, 50, 29, 12, 10, 17, 177, 2, 43, 2, 67, 131, 29, 12, 10, 17, 50, 2, 43, 2, 43, 29, 12, 10, 17, 50, 2, 43, 2, 43, 46, 12, 10, 17, 253, 102, 2, 145, 2, 50, 29, 12, 10, 17, 191, 2, 89, 2, 50, 29, 12, 10, 17, 191, 2, 89, 2, 67, 131, 29, 12, 10, 17, 191, 2, 145, 2, 50, 29, 12, 10, 17, 191, 2, 145, 2, 67, 131, 29, 12, 10, 17, 191, 2, 43, 2, 50, 29, 12, 10, 17, 191, 2, 43, 2, 67, 131, 29, 12, 10, 17, 89, 2, 43, 2, 50, 29, 12, 10, 17, 89, 2, 81, 2, 67, 131, 29, 12, 10, 17, 89, 2, 43, 2, 67, 131, 29, 12, 10, 17, 214, 2, 145, 2, 67, 131, 29, 12, 10, 17, 253, 108, 2, 81, 2, 50, 29, 12, 10, 17, 215, 2, 81, 2, 50, 29, 12, 10, 17, 253, 107, 2, 81, 2, 50, 29, 12, 10, 17, 155, 2, 89, 2, 50, 29, 12, 10, 17, 155, 2, 43, 2, 50, 29, 12, 10, 17, 50, 2, 81, 2, 50, 29, 12, 10, 17, 50, 2, 89, 2, 50, 29, 12, 10, 17, 50, 2, 43, 2, 50, 29, 12, 10, 17, 43, 2, 43, 2, 50, 29, 12, 10, 17, 253, 120, 2, 43, 2, 50, 29, 12, 10, 17, 177, 2, 81, 2, 50, 29, 12, 10, 17, 253, 120, 2, 43, 2, 81, 46, 12, 10, 17, 155, 2, 81, 2, 43, 46, 12, 10, 17, 253, 117, 2, 43, 2, 50, 29, 12, 10, 17, 253, 87, 2, 43, 2, 50, 29, 12, 10, 17, 177, 2, 89, 2, 81, 46, 12, 10, 17, 43, 2, 145, 2, 50, 29, 12, 10, 17, 155, 2, 89, 2, 43, 46, 12, 10, 17, 253, 87, 2, 43, 2, 43, 29, 12, 10, 17, 155, 2, 89, 2, 43, 29, 12, 10, 17, 177, 2, 89, 2, 81, 29, 12, 10, 17, 89, 2, 81, 2, 50, 29, 12, 10, 17, 81, 2, 89, 2, 50, 29, 12, 10, 17, 43, 2, 89, 2, 50, 29, 12, 10, 17, 253, 111, 2, 43, 2, 50, 29, 12, 10, 17, 253, 102, 2, 81, 2, 50, 29, 12, 10, 17, 253, 87, 2, 43, 2, 43, 46, 12, 10, 17, 253, 117, 2, 89, 2, 43, 46, 12, 10, 17, 253, 108, 2, 43, 2, 43, 46, 12, 10, 17, 214, 2, 145, 2, 50, 29, 12, 10, 17, 177, 2, 89, 2, 50, 29, 12, 10, 17, 245, 176, 250, 101, 254, 217, 241, 64, 249, 71, 25, 35, 12, 10, 17, 252, 82, 250, 101, 254, 217, 241, 64, 249, 71, 25, 35, 12, 10, 17, 245, 244, 35, 12, 10, 17, 245, 242, 35, 12, 10, 17, 240, 118, 35, 12, 10, 17, 248, 52, 35, 12, 10, 17, 244, 52, 35, 12, 10, 17, 242, 196, 35, 12, 10, 17, 240, 196, 35, 12, 10, 17, 245, 176, 35, 12, 10, 17, 237, 85, 242, 196, 239, 111, 10, 17, 234, 51, 252, 124, 57, 238, 79, 237, 86, 238, 79, 237, 87, 238, 79, 237, 88, 238, 79, 237, 89, 238, 79, 237, 90, 238, 79, 237, 91, 238, 79, 237, 92, 238, 79, 237, 93, 238, 79, 237, 94, 238, 79, 236, 163, 238, 79, 236, 164, 238, 79, 236, 165, 238, 79, 236, 166, 238, 79, 236, 167, 238, 79, 236, 168, 238, 79, 236, 169, 48, 17, 36, 244, 217, 48, 17, 37, 244, 217, 48, 42, 229, 36, 244, 217, 48, 42, 229, 37, 244, 217, 236, 45, 249, 3, 54, 55, 225, 49, 241, 25, 236, 45, 249, 3, 54, 55, 254, 220, 244, 189, 236, 45, 249, 3, 54, 55, 254, 215, 244, 189, 236, 45, 249, 3, 54, 55, 253, 113, 244, 176, 236, 45, 249, 3, 54, 55, 249, 57, 253, 113, 244, 176, 236, 45, 249, 3, 54, 55, 36, 236, 47, 236, 45, 249, 3, 54, 55, 37, 236, 47, 236, 45, 249, 3, 54, 55, 36, 244, 175, 110, 236, 45, 249, 3, 54, 55, 37, 244, 175, 110, 236, 45, 249, 3, 54, 55, 36, 239, 139, 244, 202, 110, 236, 45, 249, 3, 54, 55, 37, 239, 139, 244, 202, 110, 236, 45, 249, 3, 54, 55, 36, 86, 237, 126, 110, 236, 45, 249, 3, 54, 55, 37, 86, 237, 126, 110, 236, 45, 249, 3, 54, 55, 36, 42, 160, 110, 236, 45, 249, 3, 54, 55, 37, 42, 160, 110, 236, 45, 249, 3, 54, 55, 36, 160, 110, 236, 45, 249, 3, 54, 55, 37, 160, 110, 236, 45, 249, 3, 54, 55, 36, 242, 86, 110, 236, 45, 249, 3, 54, 55, 37, 242, 86, 110, 236, 45, 249, 3, 54, 55, 36, 58, 242, 86, 110, 236, 45, 249, 3, 54, 55, 37, 58, 242, 86, 110, 242, 247, 227, 58, 242, 247, 227, 242, 105, 238, 98, 237, 149, 238, 98, 249, 57, 238, 98, 42, 249, 57, 238, 98, 242, 105, 253, 113, 244, 176, 237, 149, 253, 113, 244, 176, 249, 57, 253, 113, 244, 176, 3, 242, 84, 3, 66, 242, 84, 3, 213, 189, 3, 237, 123, 3, 242, 81, 3, 239, 126, 65, 3, 236, 186, 65, 3, 254, 220, 244, 189, 3, 36, 236, 47, 3, 37, 236, 47, 3, 36, 244, 175, 110, 3, 37, 244, 175, 110, 3, 36, 239, 139, 244, 202, 110, 3, 37, 239, 139, 244, 202, 110, 3, 83, 57, 3, 237, 124, 3, 238, 77, 3, 249, 4, 57, 3, 235, 243, 3, 206, 57, 3, 196, 57, 3, 242, 61, 57, 3, 240, 219, 239, 144, 3, 242, 158, 57, 3, 240, 248, 57, 3, 237, 127, 253, 220, 10, 239, 172, 35, 12, 10, 242, 30, 2, 239, 172, 47, 10, 239, 211, 35, 12, 10, 249, 88, 239, 20, 10, 239, 220, 35, 12, 10, 244, 249, 35, 12, 10, 244, 249, 98, 12, 10, 244, 248, 35, 12, 10, 244, 248, 98, 12, 10, 244, 252, 35, 12, 10, 244, 252, 98, 12, 10, 242, 102, 35, 12, 10, 242, 102, 98, 12, 10, 245, 197, 35, 12, 10, 245, 197, 98, 12, 10, 1, 125, 35, 12, 10, 1, 67, 2, 244, 237, 53, 35, 12, 10, 1, 67, 2, 244, 237, 53, 29, 12, 10, 1, 67, 2, 125, 53, 35, 12, 10, 1, 67, 2, 125, 53, 29, 12, 10, 1, 253, 162, 2, 125, 53, 35, 12, 10, 1, 253, 162, 2, 125, 53, 29, 12, 10, 1, 67, 2, 125, 244, 188, 35, 12, 10, 1, 67, 2, 125, 244, 188, 29, 12, 10, 1, 50, 2, 125, 53, 35, 12, 10, 1, 50, 2, 125, 53, 29, 12, 10, 1, 50, 2, 125, 53, 46, 12, 10, 1, 50, 2, 125, 53, 98, 12, 10, 1, 67, 35, 12, 10, 1, 67, 29, 12, 10, 1, 253, 102, 35, 12, 10, 1, 253, 102, 29, 12, 10, 1, 253, 102, 46, 12, 10, 1, 253, 102, 98, 12, 10, 1, 191, 241, 26, 35, 12, 10, 1, 191, 241, 26, 29, 12, 10, 1, 191, 35, 12, 10, 1, 191, 29, 12, 10, 1, 191, 46, 12, 10, 1, 191, 98, 12, 10, 1, 249, 20, 35, 12, 10, 1, 249, 20, 29, 12, 10, 1, 249, 20, 46, 12, 10, 1, 249, 20, 98, 12, 10, 1, 89, 35, 12, 10, 1, 89, 29, 12, 10, 1, 89, 46, 12, 10, 1, 89, 98, 12, 10, 1, 81, 35, 12, 10, 1, 81, 29, 12, 10, 1, 81, 46, 12, 10, 1, 81, 98, 12, 10, 1, 145, 35, 12, 10, 1, 145, 29, 12, 10, 1, 145, 46, 12, 10, 1, 145, 98, 12, 10, 1, 253, 180, 35, 12, 10, 1, 253, 180, 29, 12, 10, 1, 249, 165, 35, 12, 10, 1, 249, 165, 29, 12, 10, 1, 253, 105, 35, 12, 10, 1, 253, 105, 29, 12, 10, 1, 249, 59, 35, 12, 10, 1, 249, 59, 29, 12, 10, 1, 214, 35, 12, 10, 1, 214, 29, 12, 10, 1, 214, 46, 12, 10, 1, 214, 98, 12, 10, 1, 215, 35, 12, 10, 1, 215, 29, 12, 10, 1, 215, 46, 12, 10, 1, 215, 98, 12, 10, 1, 253, 108, 35, 12, 10, 1, 253, 108, 29, 12, 10, 1, 253, 108, 46, 12, 10, 1, 253, 108, 98, 12, 10, 1, 253, 107, 35, 12, 10, 1, 253, 107, 29, 12, 10, 1, 253, 107, 46, 12, 10, 1, 253, 107, 98, 12, 10, 1, 253, 122, 35, 12, 10, 1, 253, 122, 29, 12, 10, 1, 253, 122, 46, 12, 10, 1, 253, 122, 98, 12, 10, 1, 253, 201, 35, 12, 10, 1, 253, 201, 29, 12, 10, 1, 253, 201, 46, 12, 10, 1, 253, 201, 98, 12, 10, 1, 253, 117, 35, 12, 10, 1, 253, 117, 29, 12, 10, 1, 253, 117, 46, 12, 10, 1, 253, 117, 98, 12, 10, 1, 244, 190, 35, 12, 10, 1, 244, 190, 29, 12, 10, 1, 244, 190, 46, 12, 10, 1, 244, 190, 98, 12, 10, 1, 253, 111, 35, 12, 10, 1, 253, 111, 29, 12, 10, 1, 253, 111, 46, 12, 10, 1, 253, 111, 98, 12, 10, 1, 253, 120, 35, 12, 10, 1, 253, 120, 29, 12, 10, 1, 253, 120, 46, 12, 10, 1, 253, 120, 98, 12, 10, 1, 253, 87, 35, 12, 10, 1, 253, 87, 29, 12, 10, 1, 253, 87, 46, 12, 10, 1, 253, 87, 98, 12, 10, 1, 155, 35, 12, 10, 1, 155, 29, 12, 10, 1, 155, 46, 12, 10, 1, 155, 98, 12, 10, 1, 43, 35, 12, 10, 1, 43, 29, 12, 10, 1, 43, 46, 12, 10, 1, 43, 98, 12, 10, 1, 177, 35, 12, 10, 1, 177, 29, 12, 10, 1, 177, 46, 12, 10, 1, 177, 98, 12, 10, 1, 188, 35, 12, 10, 1, 188, 29, 12, 10, 1, 188, 46, 12, 10, 1, 188, 98, 12, 10, 1, 253, 162, 35, 12, 10, 1, 253, 162, 29, 12, 10, 1, 67, 131, 35, 12, 10, 1, 67, 131, 29, 12, 10, 1, 50, 35, 12, 10, 1, 50, 29, 12, 10, 1, 50, 46, 12, 10, 1, 50, 98, 12, 10, 17, 155, 2, 67, 2, 244, 237, 53, 35, 12, 10, 17, 155, 2, 67, 2, 244, 237, 53, 29, 12, 10, 17, 155, 2, 67, 2, 125, 53, 35, 12, 10, 17, 155, 2, 67, 2, 125, 53, 29, 12, 10, 17, 155, 2, 67, 2, 125, 244, 188, 35, 12, 10, 17, 155, 2, 67, 2, 125, 244, 188, 29, 12, 10, 17, 155, 2, 67, 35, 12, 10, 17, 155, 2, 67, 29, 12, 249, 127, 245, 12, 239, 190, 242, 69, 73, 236, 186, 65, 73, 238, 76, 65, 73, 83, 57, 73, 242, 158, 57, 73, 240, 248, 57, 73, 237, 124, 73, 236, 190, 73, 36, 236, 47, 73, 37, 236, 47, 73, 238, 77, 73, 249, 4, 57, 73, 242, 84, 73, 235, 243, 73, 213, 189, 73, 239, 144, 73, 27, 244, 173, 73, 27, 121, 73, 27, 114, 73, 27, 153, 73, 27, 163, 73, 27, 168, 73, 27, 169, 73, 27, 179, 73, 27, 176, 73, 27, 178, 73, 242, 81, 73, 237, 123, 73, 206, 57, 73, 242, 61, 57, 73, 196, 57, 73, 239, 126, 65, 73, 237, 127, 253, 220, 73, 9, 5, 1, 64, 73, 9, 5, 1, 199, 73, 9, 5, 1, 203, 73, 9, 5, 1, 187, 73, 9, 5, 1, 70, 73, 9, 5, 1, 204, 73, 9, 5, 1, 194, 73, 9, 5, 1, 164, 73, 9, 5, 1, 69, 73, 9, 5, 1, 200, 73, 9, 5, 1, 205, 73, 9, 5, 1, 148, 73, 9, 5, 1, 171, 73, 9, 5, 1, 183, 73, 9, 5, 1, 78, 73, 9, 5, 1, 198, 73, 9, 5, 1, 209, 73, 9, 5, 1, 135, 73, 9, 5, 1, 159, 73, 9, 5, 1, 190, 73, 9, 5, 1, 84, 73, 9, 5, 1, 186, 73, 9, 5, 1, 201, 73, 9, 5, 1, 170, 73, 9, 5, 1, 181, 73, 9, 5, 1, 202, 73, 36, 30, 110, 73, 240, 219, 239, 144, 73, 37, 30, 110, 73, 157, 240, 203, 73, 253, 113, 244, 176, 73, 244, 201, 240, 203, 73, 9, 3, 1, 64, 73, 9, 3, 1, 199, 73, 9, 3, 1, 203, 73, 9, 3, 1, 187, 73, 9, 3, 1, 70, 73, 9, 3, 1, 204, 73, 9, 3, 1, 194, 73, 9, 3, 1, 164, 73, 9, 3, 1, 69, 73, 9, 3, 1, 200, 73, 9, 3, 1, 205, 73, 9, 3, 1, 148, 73, 9, 3, 1, 171, 73, 9, 3, 1, 183, 73, 9, 3, 1, 78, 73, 9, 3, 1, 198, 73, 9, 3, 1, 209, 73, 9, 3, 1, 135, 73, 9, 3, 1, 159, 73, 9, 3, 1, 190, 73, 9, 3, 1, 84, 73, 9, 3, 1, 186, 73, 9, 3, 1, 201, 73, 9, 3, 1, 170, 73, 9, 3, 1, 181, 73, 9, 3, 1, 202, 73, 36, 244, 175, 110, 73, 55, 244, 176, 73, 37, 244, 175, 110, 73, 180, 73, 36, 58, 236, 47, 73, 37, 58, 236, 47, 62, 66, 213, 189, 62, 36, 242, 86, 110, 62, 37, 242, 86, 110, 62, 66, 242, 84, 62, 39, 242, 65, 227, 62, 39, 1, 253, 138, 62, 39, 1, 3, 64, 62, 39, 1, 3, 69, 62, 39, 1, 3, 84, 62, 39, 1, 3, 70, 62, 39, 1, 3, 78, 62, 39, 1, 3, 216, 62, 39, 1, 3, 253, 124, 62, 39, 1, 3, 253, 123, 62, 39, 1, 3, 253, 160, 62, 232, 3, 238, 153, 244, 205, 65, 62, 39, 1, 64, 62, 39, 1, 69, 62, 39, 1, 84, 62, 39, 1, 70, 62, 39, 1, 78, 62, 39, 1, 208, 62, 39, 1, 253, 182, 62, 39, 1, 253, 183, 62, 39, 1, 253, 134, 62, 39, 1, 253, 155, 62, 39, 1, 253, 97, 62, 39, 1, 253, 158, 62, 39, 1, 253, 172, 62, 39, 1, 253, 171, 62, 39, 1, 253, 159, 62, 39, 1, 253, 91, 62, 39, 1, 253, 174, 62, 39, 1, 253, 160, 62, 39, 1, 253, 151, 62, 39, 1, 76, 62, 39, 1, 253, 94, 62, 39, 1, 253, 148, 62, 39, 1, 253, 112, 62, 39, 1, 253, 157, 62, 39, 1, 253, 136, 62, 39, 1, 253, 88, 62, 39, 1, 253, 154, 62, 39, 1, 253, 197, 62, 39, 1, 253, 125, 62, 39, 1, 253, 140, 62, 39, 1, 221, 62, 39, 1, 253, 156, 62, 39, 1, 253, 114, 62, 39, 1, 253, 167, 62, 39, 1, 253, 141, 62, 39, 1, 216, 62, 39, 1, 253, 124, 62, 39, 1, 253, 123, 62, 39, 1, 253, 92, 62, 39, 1, 253, 169, 62, 39, 1, 253, 170, 62, 39, 1, 253, 150, 62, 39, 1, 253, 144, 62, 39, 1, 253, 98, 62, 39, 1, 183, 62, 39, 242, 116, 244, 205, 65, 62, 39, 236, 205, 244, 205, 65, 62, 20, 240, 255, 62, 20, 1, 240, 242, 62, 20, 1, 236, 59, 62, 20, 1, 236, 63, 62, 20, 1, 242, 131, 62, 20, 1, 236, 65, 62, 20, 1, 236, 66, 62, 20, 1, 240, 244, 62, 20, 1, 236, 72, 62, 20, 1, 242, 134, 62, 20, 1, 235, 247, 62, 20, 1, 236, 67, 62, 20, 1, 236, 68, 62, 20, 1, 236, 204, 62, 20, 1, 235, 197, 62, 20, 1, 235, 196, 62, 20, 1, 236, 57, 62, 20, 1, 242, 129, 62, 20, 1, 242, 133, 62, 20, 1, 236, 209, 62, 20, 1, 236, 198, 62, 20, 1, 244, 230, 62, 20, 1, 237, 138, 62, 20, 1, 242, 126, 62, 20, 1, 242, 122, 62, 20, 1, 236, 207, 62, 20, 1, 239, 155, 62, 20, 1, 239, 158, 62, 20, 1, 239, 166, 62, 20, 1, 239, 161, 62, 20, 1, 242, 125, 62, 20, 1, 64, 62, 20, 1, 253, 163, 62, 20, 1, 216, 62, 20, 1, 249, 181, 62, 20, 1, 254, 10, 62, 20, 1, 70, 62, 20, 1, 249, 182, 62, 20, 1, 253, 200, 62, 20, 1, 78, 62, 20, 1, 253, 98, 62, 20, 1, 249, 175, 62, 20, 1, 253, 142, 62, 20, 1, 253, 123, 62, 20, 1, 84, 62, 20, 1, 249, 177, 62, 20, 1, 253, 132, 62, 20, 1, 253, 145, 62, 20, 1, 253, 124, 62, 20, 1, 254, 12, 62, 20, 1, 253, 139, 62, 20, 1, 69, 73, 249, 196, 57, 73, 245, 163, 57, 73, 141, 57, 73, 166, 73, 242, 173, 143, 73, 254, 78, 57, 73, 254, 76, 57, 62, 246, 131, 117, 238, 88, 62, 126, 52, 62, 210, 52, 62, 63, 52, 62, 220, 52, 62, 86, 240, 207, 62, 58, 240, 200, 236, 202, 237, 111, 241, 97, 236, 202, 237, 111, 237, 114, 236, 202, 237, 111, 237, 103, 244, 18, 236, 228, 237, 150, 236, 228, 237, 150, 222, 21, 1, 64, 222, 21, 1, 253, 191, 222, 21, 1, 253, 134, 222, 21, 1, 253, 152, 222, 21, 1, 70, 222, 21, 1, 253, 214, 222, 21, 1, 253, 189, 222, 21, 1, 253, 125, 222, 21, 1, 249, 63, 222, 21, 1, 69, 222, 21, 1, 208, 222, 21, 1, 253, 223, 222, 21, 1, 253, 224, 222, 21, 1, 253, 166, 222, 21, 1, 249, 67, 222, 21, 1, 78, 222, 21, 1, 253, 143, 222, 21, 1, 249, 70, 222, 21, 1, 253, 183, 222, 21, 1, 253, 205, 222, 21, 1, 253, 225, 222, 21, 1, 253, 151, 222, 21, 1, 84, 222, 21, 1, 250, 242, 222, 21, 1, 250, 43, 222, 21, 1, 249, 255, 222, 21, 1, 253, 222, 222, 21, 1, 250, 246, 222, 21, 1, 249, 44, 222, 21, 1, 253, 96, 222, 21, 1, 253, 104, 222, 21, 151, 121, 222, 21, 151, 168, 222, 21, 151, 249, 18, 222, 21, 151, 242, 144, 242, 62, 1, 245, 238, 242, 62, 1, 240, 3, 242, 62, 1, 246, 154, 242, 62, 1, 246, 79, 242, 62, 1, 241, 94, 242, 62, 1, 239, 66, 242, 62, 1, 247, 0, 242, 62, 1, 246, 170, 242, 62, 1, 242, 36, 242, 62, 1, 250, 241, 242, 62, 1, 243, 194, 242, 62, 1, 243, 199, 242, 62, 1, 243, 211, 242, 62, 1, 241, 219, 242, 62, 1, 251, 120, 242, 62, 1, 248, 162, 242, 62, 1, 239, 56, 242, 62, 1, 241, 69, 242, 62, 1, 244, 51, 242, 62, 1, 244, 71, 242, 62, 1, 244, 113, 242, 62, 1, 244, 147, 242, 62, 1, 243, 105, 242, 62, 1, 243, 173, 242, 62, 1, 242, 225, 242, 62, 1, 244, 21, 242, 62, 1, 250, 29, 239, 150, 111, 5, 1, 165, 69, 111, 5, 1, 165, 70, 111, 5, 1, 165, 64, 111, 5, 1, 165, 253, 219, 111, 5, 1, 165, 78, 111, 5, 1, 165, 253, 119, 111, 5, 1, 207, 69, 111, 5, 1, 207, 70, 111, 5, 1, 207, 64, 111, 5, 1, 207, 253, 219, 111, 5, 1, 207, 78, 111, 5, 1, 207, 253, 119, 111, 5, 1, 254, 2, 111, 5, 1, 254, 64, 111, 5, 1, 253, 216, 111, 5, 1, 249, 125, 111, 5, 1, 164, 111, 5, 1, 249, 114, 111, 5, 1, 249, 128, 111, 5, 1, 249, 164, 111, 5, 1, 249, 96, 111, 5, 1, 244, 246, 111, 5, 1, 249, 104, 111, 5, 1, 249, 253, 111, 5, 1, 249, 228, 111, 5, 1, 253, 222, 111, 5, 1, 249, 174, 111, 5, 1, 249, 77, 111, 5, 1, 245, 9, 111, 5, 1, 253, 225, 111, 5, 1, 249, 126, 111, 5, 1, 249, 67, 111, 5, 1, 245, 53, 111, 5, 1, 253, 205, 111, 5, 1, 253, 223, 111, 5, 1, 253, 224, 111, 5, 1, 253, 166, 111, 5, 1, 249, 66, 111, 3, 1, 165, 69, 111, 3, 1, 165, 70, 111, 3, 1, 165, 64, 111, 3, 1, 165, 253, 219, 111, 3, 1, 165, 78, 111, 3, 1, 165, 253, 119, 111, 3, 1, 207, 69, 111, 3, 1, 207, 70, 111, 3, 1, 207, 64, 111, 3, 1, 207, 253, 219, 111, 3, 1, 207, 78, 111, 3, 1, 207, 253, 119, 111, 3, 1, 254, 2, 111, 3, 1, 254, 64, 111, 3, 1, 253, 216, 111, 3, 1, 249, 125, 111, 3, 1, 164, 111, 3, 1, 249, 114, 111, 3, 1, 249, 128, 111, 3, 1, 249, 164, 111, 3, 1, 249, 96, 111, 3, 1, 244, 246, 111, 3, 1, 249, 104, 111, 3, 1, 249, 253, 111, 3, 1, 249, 228, 111, 3, 1, 253, 222, 111, 3, 1, 249, 174, 111, 3, 1, 249, 77, 111, 3, 1, 245, 9, 111, 3, 1, 253, 225, 111, 3, 1, 249, 126, 111, 3, 1, 249, 67, 111, 3, 1, 245, 53, 111, 3, 1, 253, 205, 111, 3, 1, 253, 223, 111, 3, 1, 253, 224, 111, 3, 1, 253, 166, 111, 3, 1, 249, 66, 34, 19, 13, 242, 78, 34, 19, 13, 241, 135, 34, 19, 13, 236, 43, 34, 19, 13, 245, 34, 236, 55, 34, 19, 13, 245, 34, 242, 124, 34, 19, 13, 242, 192, 236, 55, 34, 19, 13, 242, 192, 242, 124, 34, 19, 13, 239, 36, 34, 19, 13, 238, 66, 34, 19, 13, 236, 151, 34, 19, 13, 238, 74, 34, 19, 13, 239, 113, 242, 124, 34, 19, 13, 239, 40, 34, 19, 13, 245, 55, 236, 55, 34, 19, 13, 254, 39, 236, 55, 34, 19, 13, 241, 83, 34, 19, 13, 238, 24, 34, 19, 13, 236, 244, 34, 19, 13, 237, 146, 242, 124, 34, 19, 13, 240, 174, 34, 19, 13, 244, 117, 34, 19, 13, 242, 235, 238, 80, 34, 19, 13, 242, 145, 238, 80, 34, 19, 13, 241, 245, 34, 19, 13, 238, 188, 34, 19, 13, 244, 138, 34, 19, 13, 249, 246, 238, 80, 34, 19, 13, 241, 1, 238, 80, 34, 19, 13, 238, 112, 238, 80, 34, 19, 13, 239, 79, 34, 19, 13, 239, 59, 34, 19, 13, 242, 20, 238, 171, 34, 19, 13, 244, 22, 238, 80, 34, 19, 13, 242, 48, 238, 80, 34, 19, 13, 239, 201, 238, 80, 34, 19, 13, 238, 172, 34, 19, 13, 241, 62, 34, 19, 13, 244, 58, 34, 19, 13, 242, 237, 238, 80, 34, 19, 13, 240, 183, 34, 19, 13, 236, 5, 34, 19, 13, 242, 7, 34, 19, 13, 241, 33, 238, 80, 34, 19, 13, 241, 33, 251, 225, 240, 170, 34, 19, 13, 238, 149, 238, 80, 34, 19, 13, 244, 115, 34, 19, 13, 243, 202, 34, 19, 13, 250, 237, 34, 19, 13, 248, 138, 34, 19, 13, 240, 179, 34, 19, 13, 238, 26, 34, 19, 13, 245, 55, 254, 39, 249, 16, 34, 19, 13, 242, 71, 238, 80, 34, 19, 13, 238, 17, 34, 19, 13, 239, 198, 238, 80, 34, 19, 13, 243, 184, 239, 104, 34, 19, 13, 239, 61, 34, 19, 13, 238, 48, 34, 19, 13, 239, 38, 34, 19, 13, 239, 208, 238, 80, 34, 19, 13, 240, 149, 34, 19, 13, 236, 222, 238, 80, 34, 19, 13, 236, 223, 238, 80, 34, 19, 13, 240, 89, 34, 19, 13, 245, 147, 34, 19, 13, 240, 136, 34, 19, 13, 240, 100, 245, 13, 34, 19, 13, 239, 198, 245, 13, 34, 19, 13, 236, 37, 34, 19, 13, 236, 21, 34, 19, 13, 249, 246, 249, 16, 34, 19, 13, 242, 235, 249, 16, 34, 19, 13, 245, 34, 249, 16, 34, 19, 13, 240, 137, 34, 19, 13, 239, 39, 34, 19, 13, 234, 56, 34, 19, 13, 234, 52, 34, 19, 13, 240, 135, 249, 16, 34, 19, 13, 238, 112, 253, 185, 249, 60, 34, 19, 13, 241, 1, 253, 185, 249, 60, 34, 19, 13, 242, 58, 34, 19, 13, 237, 146, 249, 16, 34, 19, 13, 237, 145, 239, 100, 249, 16, 34, 19, 13, 240, 198, 34, 19, 13, 234, 53, 34, 19, 13, 240, 66, 34, 19, 13, 240, 15, 34, 19, 13, 243, 228, 246, 254, 34, 19, 13, 242, 192, 249, 16, 34, 19, 13, 242, 237, 249, 16, 34, 19, 13, 239, 65, 249, 16, 34, 19, 13, 241, 227, 34, 19, 13, 236, 242, 34, 19, 13, 240, 106, 34, 19, 13, 236, 223, 249, 16, 34, 19, 13, 236, 222, 249, 16, 34, 19, 13, 242, 209, 236, 150, 34, 19, 13, 240, 103, 34, 19, 13, 232, 17, 34, 19, 13, 239, 198, 249, 16, 34, 19, 13, 237, 58, 34, 19, 13, 241, 33, 249, 16, 34, 19, 13, 244, 108, 34, 19, 13, 239, 208, 249, 16, 34, 19, 13, 239, 8, 34, 19, 13, 244, 73, 249, 16, 34, 19, 13, 248, 181, 241, 62, 34, 19, 13, 232, 13, 34, 19, 13, 234, 58, 34, 19, 13, 235, 187, 34, 19, 13, 231, 247, 34, 19, 13, 231, 238, 34, 19, 13, 235, 188, 34, 19, 13, 234, 59, 34, 19, 13, 234, 71, 34, 19, 13, 235, 198, 34, 19, 13, 242, 209, 235, 198, 34, 19, 13, 238, 149, 249, 16, 34, 19, 13, 236, 237, 250, 247, 34, 19, 13, 236, 237, 250, 250, 34, 19, 13, 248, 123, 241, 38, 34, 19, 13, 252, 205, 254, 15, 239, 253, 34, 19, 13, 238, 23, 34, 19, 13, 238, 4, 34, 19, 13, 250, 115, 244, 221, 34, 19, 13, 250, 115, 249, 60, 34, 19, 13, 240, 169, 34, 19, 13, 242, 228, 249, 60, 34, 19, 13, 246, 108, 238, 80, 34, 19, 13, 241, 24, 238, 80, 34, 19, 13, 241, 24, 245, 13, 34, 19, 13, 241, 24, 249, 16, 34, 19, 13, 239, 201, 249, 16, 34, 19, 13, 245, 248, 34, 19, 13, 242, 124, 34, 19, 13, 242, 38, 34, 19, 13, 239, 102, 34, 19, 13, 239, 186, 34, 19, 13, 242, 146, 250, 244, 239, 209, 34, 19, 13, 242, 146, 254, 7, 239, 178, 34, 19, 13, 242, 146, 248, 139, 239, 178, 34, 19, 13, 242, 146, 240, 178, 239, 178, 34, 19, 13, 242, 146, 241, 184, 239, 209, 34, 19, 13, 242, 145, 253, 185, 249, 60, 34, 19, 13, 242, 145, 235, 242, 238, 176, 34, 19, 13, 242, 145, 235, 242, 242, 208, 34, 19, 13, 238, 202, 34, 19, 13, 239, 180, 235, 242, 239, 202, 244, 221, 34, 19, 13, 239, 180, 235, 242, 239, 202, 249, 60, 34, 19, 13, 239, 180, 235, 242, 242, 208, 34, 19, 13, 238, 71, 34, 19, 13, 243, 32, 34, 19, 13, 237, 69, 34, 19, 13, 240, 26, 34, 19, 13, 244, 213, 250, 46, 245, 56, 34, 19, 13, 244, 213, 238, 175, 34, 19, 13, 244, 213, 245, 56, 34, 19, 13, 244, 213, 241, 212, 34, 19, 13, 244, 213, 247, 78, 34, 19, 13, 244, 213, 242, 220, 34, 19, 13, 244, 213, 238, 11, 34, 19, 13, 244, 213, 250, 46, 242, 220, 34, 19, 13, 239, 128, 242, 240, 242, 89, 34, 19, 13, 239, 128, 249, 186, 242, 240, 242, 89, 34, 19, 13, 239, 128, 239, 212, 242, 89, 34, 19, 13, 239, 128, 249, 186, 239, 212, 242, 89, 34, 19, 13, 239, 128, 244, 124, 242, 89, 34, 19, 13, 239, 128, 238, 70, 34, 19, 13, 239, 128, 239, 197, 242, 89, 34, 19, 13, 239, 128, 239, 197, 241, 65, 242, 89, 34, 19, 13, 239, 128, 241, 65, 242, 89, 34, 19, 13, 239, 128, 241, 75, 242, 89, 34, 19, 13, 243, 174, 243, 9, 237, 159, 34, 19, 13, 237, 145, 243, 9, 237, 159, 34, 19, 13, 238, 120, 236, 172, 34, 19, 13, 238, 120, 236, 217, 34, 19, 13, 238, 120, 238, 137, 34, 19, 13, 239, 128, 248, 163, 242, 89, 34, 19, 13, 239, 128, 238, 47, 242, 89, 34, 19, 13, 239, 128, 241, 75, 239, 197, 242, 89, 34, 19, 13, 237, 158, 255, 28, 241, 38, 34, 19, 13, 237, 158, 255, 28, 240, 29, 34, 19, 13, 241, 153, 254, 15, 242, 71, 250, 107, 34, 19, 13, 239, 30, 34, 19, 13, 237, 70, 34, 19, 13, 242, 71, 240, 0, 240, 24, 243, 172, 34, 19, 13, 242, 71, 238, 95, 253, 90, 34, 19, 13, 242, 71, 238, 95, 245, 147, 34, 19, 13, 242, 71, 251, 254, 242, 89, 34, 19, 13, 242, 71, 238, 95, 253, 165, 34, 19, 13, 242, 71, 241, 31, 240, 27, 253, 165, 34, 19, 13, 242, 71, 238, 95, 253, 134, 34, 19, 13, 242, 71, 238, 95, 253, 190, 34, 19, 13, 242, 71, 238, 95, 254, 252, 244, 221, 34, 19, 13, 242, 71, 238, 95, 254, 252, 249, 60, 34, 19, 13, 242, 71, 241, 66, 242, 154, 238, 137, 34, 19, 13, 242, 71, 241, 66, 242, 154, 236, 217, 34, 19, 13, 243, 109, 241, 31, 242, 154, 244, 137, 34, 19, 13, 242, 71, 241, 31, 242, 154, 242, 28, 34, 19, 13, 242, 71, 241, 220, 34, 19, 13, 245, 17, 244, 166, 34, 19, 13, 245, 17, 241, 193, 34, 19, 13, 245, 17, 242, 17, 34, 19, 13, 242, 71, 197, 242, 136, 235, 207, 34, 19, 13, 242, 71, 238, 3, 237, 173, 34, 19, 13, 242, 136, 236, 81, 34, 19, 13, 242, 123, 236, 81, 34, 19, 13, 242, 123, 235, 207, 34, 19, 13, 242, 123, 249, 92, 254, 7, 238, 92, 34, 19, 13, 242, 123, 236, 218, 241, 85, 238, 92, 34, 19, 13, 242, 123, 238, 138, 254, 247, 238, 92, 34, 19, 13, 242, 123, 237, 170, 250, 36, 238, 92, 34, 19, 13, 242, 136, 249, 92, 254, 7, 238, 92, 34, 19, 13, 242, 136, 236, 218, 241, 85, 238, 92, 34, 19, 13, 242, 136, 238, 138, 254, 247, 238, 92, 34, 19, 13, 242, 136, 237, 170, 250, 36, 238, 92, 34, 19, 13, 242, 216, 241, 140, 34, 19, 13, 242, 216, 242, 56, 34, 19, 13, 239, 171, 249, 92, 243, 227, 34, 19, 13, 239, 171, 249, 92, 241, 210, 34, 19, 13, 239, 171, 242, 124, 34, 19, 13, 239, 171, 239, 242, 34, 19, 13, 239, 151, 239, 242, 34, 19, 13, 239, 151, 241, 35, 239, 214, 34, 19, 13, 239, 151, 241, 35, 238, 162, 34, 19, 13, 239, 151, 241, 35, 236, 236, 34, 19, 13, 239, 151, 241, 102, 34, 19, 13, 239, 151, 242, 172, 239, 214, 34, 19, 13, 239, 151, 242, 172, 238, 162, 34, 19, 13, 239, 151, 242, 172, 236, 236, 34, 19, 13, 240, 28, 254, 107, 34, 19, 13, 238, 201, 253, 247, 34, 19, 13, 241, 32, 34, 19, 13, 240, 233, 253, 90, 34, 19, 13, 240, 233, 250, 107, 34, 19, 13, 240, 233, 253, 100, 34, 19, 13, 240, 233, 253, 165, 34, 19, 13, 240, 233, 253, 134, 34, 19, 13, 240, 233, 253, 190, 34, 19, 13, 240, 233, 253, 148, 34, 19, 13, 238, 112, 253, 185, 245, 141, 34, 19, 13, 241, 1, 253, 185, 245, 141, 34, 19, 13, 238, 112, 253, 185, 244, 221, 34, 19, 13, 241, 1, 253, 185, 244, 221, 34, 19, 13, 242, 228, 244, 221, 34, 19, 13, 242, 145, 253, 185, 244, 221, 19, 13, 242, 66, 239, 154, 19, 13, 42, 239, 154, 19, 13, 29, 239, 154, 19, 13, 240, 219, 29, 239, 154, 19, 13, 242, 105, 239, 154, 19, 13, 207, 239, 154, 19, 13, 36, 242, 113, 57, 19, 13, 37, 242, 113, 57, 19, 13, 242, 113, 244, 215, 19, 13, 253, 180, 242, 245, 19, 13, 255, 4, 246, 42, 19, 13, 242, 245, 19, 13, 246, 72, 19, 13, 239, 193, 239, 15, 19, 13, 239, 193, 239, 16, 19, 13, 239, 193, 239, 17, 19, 13, 240, 74, 19, 13, 241, 165, 45, 19, 13, 243, 50, 65, 19, 13, 240, 11, 19, 13, 243, 48, 19, 13, 110, 19, 13, 240, 130, 242, 135, 19, 13, 240, 188, 242, 135, 19, 13, 238, 68, 242, 135, 19, 13, 239, 19, 242, 135, 19, 13, 239, 18, 242, 135, 19, 13, 240, 165, 242, 135, 19, 13, 238, 62, 237, 156, 19, 13, 237, 64, 237, 156, 19, 13, 255, 32, 244, 233, 19, 13, 255, 32, 249, 95, 242, 132, 244, 243, 19, 13, 255, 32, 249, 95, 242, 132, 242, 152, 19, 13, 255, 36, 244, 233, 19, 13, 255, 42, 244, 233, 19, 13, 255, 42, 249, 95, 242, 132, 244, 243, 19, 13, 255, 42, 249, 95, 242, 132, 242, 152, 19, 13, 249, 217, 241, 125, 19, 13, 249, 217, 241, 126, 19, 13, 42, 242, 248, 19, 13, 42, 245, 87, 19, 13, 249, 134, 253, 131, 19, 13, 249, 134, 244, 185, 19, 13, 241, 28, 253, 131, 19, 13, 241, 28, 244, 185, 19, 13, 245, 5, 253, 131, 19, 13, 245, 5, 244, 185, 19, 13, 240, 224, 249, 5, 242, 248, 19, 13, 240, 224, 249, 5, 245, 87, 19, 13, 243, 75, 245, 203, 19, 13, 254, 96, 245, 203, 19, 13, 242, 132, 244, 243, 19, 13, 242, 132, 242, 152, 19, 13, 236, 78, 244, 243, 19, 13, 236, 78, 242, 152, 19, 13, 247, 102, 244, 187, 19, 13, 245, 221, 244, 187, 19, 13, 136, 244, 187, 19, 13, 240, 224, 244, 187, 19, 13, 242, 111, 244, 187, 19, 13, 238, 127, 244, 187, 19, 13, 236, 2, 244, 187, 19, 13, 236, 80, 244, 187, 19, 13, 253, 101, 241, 21, 236, 3, 244, 187, 19, 13, 255, 43, 238, 102, 19, 13, 249, 4, 238, 102, 19, 13, 175, 255, 43, 238, 102, 19, 13, 30, 239, 120, 242, 92, 19, 13, 30, 239, 120, 231, 231, 19, 13, 239, 118, 239, 120, 75, 242, 92, 19, 13, 239, 118, 239, 120, 75, 231, 231, 19, 13, 239, 118, 239, 120, 36, 242, 92, 19, 13, 239, 118, 239, 120, 36, 231, 231, 19, 13, 239, 118, 239, 120, 37, 242, 92, 19, 13, 239, 118, 239, 120, 37, 231, 231, 19, 13, 239, 118, 239, 120, 79, 242, 92, 19, 13, 239, 118, 239, 120, 79, 231, 231, 19, 13, 239, 118, 239, 120, 75, 37, 242, 92, 19, 13, 239, 118, 239, 120, 75, 37, 231, 231, 19, 13, 250, 20, 239, 120, 242, 92, 19, 13, 250, 20, 239, 120, 231, 231, 19, 13, 235, 209, 239, 120, 79, 242, 92, 19, 13, 235, 209, 239, 120, 79, 231, 231, 19, 13, 236, 187, 238, 102, 19, 13, 253, 1, 238, 102, 19, 13, 239, 120, 231, 231, 19, 13, 252, 41, 238, 102, 19, 13, 241, 49, 239, 120, 242, 92, 19, 13, 241, 49, 239, 120, 231, 231, 19, 13, 212, 19, 13, 245, 221, 244, 208, 19, 13, 136, 244, 208, 19, 13, 240, 224, 244, 208, 19, 13, 242, 111, 244, 208, 19, 13, 238, 127, 244, 208, 19, 13, 236, 2, 244, 208, 19, 13, 236, 80, 244, 208, 19, 13, 253, 101, 241, 21, 236, 3, 244, 208, 19, 13, 48, 244, 239, 19, 13, 48, 236, 170, 244, 239, 19, 13, 48, 237, 167, 19, 13, 48, 237, 168, 19, 13, 48, 237, 169, 19, 13, 239, 182, 237, 167, 19, 13, 239, 182, 237, 168, 19, 13, 239, 182, 237, 169, 19, 13, 48, 236, 86, 227, 19, 13, 48, 241, 167, 19, 13, 48, 241, 168, 19, 13, 48, 241, 169, 19, 13, 48, 241, 170, 19, 13, 48, 241, 171, 19, 13, 244, 244, 245, 59, 19, 13, 253, 127, 245, 59, 19, 13, 244, 244, 249, 89, 19, 13, 253, 127, 249, 89, 19, 13, 244, 244, 245, 192, 19, 13, 253, 127, 245, 192, 19, 13, 244, 244, 241, 73, 19, 13, 253, 127, 241, 73, 19, 13, 48, 240, 203, 19, 13, 48, 239, 85, 19, 13, 48, 242, 32, 19, 13, 48, 235, 232, 19, 13, 48, 240, 111, 19, 13, 48, 232, 7, 19, 13, 48, 232, 16, 19, 13, 48, 243, 206, 19, 13, 237, 147, 253, 131, 19, 13, 237, 147, 244, 185, 19, 13, 48, 246, 112, 19, 13, 48, 252, 126, 19, 13, 48, 246, 130, 19, 13, 48, 244, 89, 19, 13, 48, 246, 22, 19, 13, 48, 42, 241, 36, 19, 13, 48, 242, 59, 241, 36, 19, 13, 236, 160, 19, 13, 242, 25, 19, 13, 202, 19, 13, 244, 37, 19, 13, 243, 222, 19, 13, 243, 117, 19, 13, 237, 184, 19, 13, 236, 94, 19, 13, 245, 101, 250, 31, 242, 91, 19, 13, 245, 101, 250, 31, 254, 243, 242, 91, 19, 13, 254, 194, 19, 13, 245, 214, 19, 13, 239, 116, 245, 214, 19, 13, 250, 98, 242, 91, 19, 13, 250, 98, 253, 131, 19, 13, 239, 140, 239, 88, 19, 13, 239, 140, 239, 89, 19, 13, 239, 140, 239, 90, 19, 13, 239, 140, 239, 91, 19, 13, 239, 140, 239, 92, 19, 13, 239, 140, 239, 93, 19, 13, 239, 140, 239, 94, 19, 13, 239, 140, 239, 95, 19, 13, 239, 140, 239, 96, 19, 13, 239, 140, 238, 63, 19, 13, 239, 140, 238, 64, 19, 13, 236, 130, 19, 13, 236, 147, 19, 13, 253, 127, 137, 242, 21, 19, 13, 242, 156, 242, 91, 19, 13, 48, 79, 249, 129, 19, 13, 48, 75, 249, 129, 19, 13, 48, 239, 26, 19, 13, 48, 252, 170, 238, 44, 19, 13, 245, 35, 65, 19, 13, 245, 35, 75, 65, 19, 13, 136, 245, 35, 65, 19, 13, 238, 142, 253, 131, 19, 13, 238, 142, 244, 185, 19, 13, 2, 236, 128, 19, 13, 246, 81, 19, 13, 250, 206, 249, 185, 19, 13, 241, 208, 19, 13, 243, 205, 19, 13, 241, 118, 19, 13, 237, 141, 242, 92, 19, 13, 237, 141, 231, 231, 19, 13, 241, 215, 19, 13, 242, 232, 231, 231, 19, 13, 237, 142, 242, 92, 19, 13, 237, 142, 231, 231, 19, 13, 249, 226, 242, 92, 19, 13, 249, 226, 231, 231, 19, 13, 245, 134, 239, 229, 244, 187, 19, 13, 245, 134, 237, 135, 244, 187, 19, 13, 243, 51, 244, 187, 19, 13, 237, 141, 244, 187, 19, 13, 242, 232, 244, 187, 19, 13, 237, 142, 244, 187, 19, 13, 242, 115, 238, 125, 253, 179, 237, 118, 238, 151, 19, 13, 242, 115, 238, 125, 253, 179, 237, 118, 236, 215, 19, 13, 242, 115, 238, 125, 253, 179, 237, 118, 239, 229, 235, 249, 19, 13, 242, 115, 236, 194, 253, 179, 237, 118, 238, 151, 19, 13, 242, 115, 236, 194, 253, 179, 237, 118, 236, 215, 19, 13, 242, 115, 236, 194, 253, 179, 237, 118, 237, 135, 235, 249, 19, 13, 242, 115, 236, 194, 253, 179, 237, 118, 237, 135, 236, 9, 19, 13, 242, 115, 236, 194, 253, 179, 237, 118, 237, 135, 236, 10, 19, 13, 243, 77, 19, 13, 238, 143, 255, 36, 244, 233, 19, 13, 238, 143, 255, 42, 244, 233, 19, 13, 30, 199, 19, 13, 244, 140, 19, 13, 240, 140, 19, 13, 241, 127, 19, 13, 238, 57, 19, 13, 238, 191, 19, 13, 239, 103, 19, 13, 238, 46, 19, 13, 239, 63, 241, 55, 19, 13, 239, 80, 241, 55, 19, 13, 240, 185, 238, 55, 19, 13, 254, 166, 237, 100, 8, 16, 5, 64, 8, 16, 5, 199, 8, 16, 5, 203, 8, 16, 5, 187, 8, 16, 5, 70, 8, 16, 5, 204, 8, 16, 5, 194, 8, 16, 5, 164, 8, 16, 5, 69, 8, 16, 5, 200, 8, 16, 5, 205, 8, 16, 5, 148, 8, 16, 5, 171, 8, 16, 5, 183, 8, 16, 5, 78, 8, 16, 5, 198, 8, 16, 5, 209, 8, 16, 5, 135, 8, 16, 5, 159, 8, 16, 5, 190, 8, 16, 5, 84, 8, 16, 5, 186, 8, 16, 5, 201, 8, 16, 5, 170, 8, 16, 5, 181, 8, 16, 5, 202, 8, 16, 3, 64, 8, 16, 3, 199, 8, 16, 3, 203, 8, 16, 3, 187, 8, 16, 3, 70, 8, 16, 3, 204, 8, 16, 3, 194, 8, 16, 3, 164, 8, 16, 3, 69, 8, 16, 3, 200, 8, 16, 3, 205, 8, 16, 3, 148, 8, 16, 3, 171, 8, 16, 3, 183, 8, 16, 3, 78, 8, 16, 3, 198, 8, 16, 3, 209, 8, 16, 3, 135, 8, 16, 3, 159, 8, 16, 3, 190, 8, 16, 3, 84, 8, 16, 3, 186, 8, 16, 3, 201, 8, 16, 3, 170, 8, 16, 3, 181, 8, 16, 3, 202, 8, 21, 5, 64, 8, 21, 5, 199, 8, 21, 5, 203, 8, 21, 5, 187, 8, 21, 5, 70, 8, 21, 5, 204, 8, 21, 5, 194, 8, 21, 5, 164, 8, 21, 5, 69, 8, 21, 5, 200, 8, 21, 5, 205, 8, 21, 5, 148, 8, 21, 5, 171, 8, 21, 5, 183, 8, 21, 5, 78, 8, 21, 5, 198, 8, 21, 5, 209, 8, 21, 5, 135, 8, 21, 5, 159, 8, 21, 5, 190, 8, 21, 5, 84, 8, 21, 5, 186, 8, 21, 5, 201, 8, 21, 5, 170, 8, 21, 5, 181, 8, 21, 5, 202, 8, 21, 3, 64, 8, 21, 3, 199, 8, 21, 3, 203, 8, 21, 3, 187, 8, 21, 3, 70, 8, 21, 3, 204, 8, 21, 3, 194, 8, 21, 3, 69, 8, 21, 3, 200, 8, 21, 3, 205, 8, 21, 3, 148, 8, 21, 3, 171, 8, 21, 3, 183, 8, 21, 3, 78, 8, 21, 3, 198, 8, 21, 3, 209, 8, 21, 3, 135, 8, 21, 3, 159, 8, 21, 3, 190, 8, 21, 3, 84, 8, 21, 3, 186, 8, 21, 3, 201, 8, 21, 3, 170, 8, 21, 3, 181, 8, 21, 3, 202, 8, 16, 21, 5, 64, 8, 16, 21, 5, 199, 8, 16, 21, 5, 203, 8, 16, 21, 5, 187, 8, 16, 21, 5, 70, 8, 16, 21, 5, 204, 8, 16, 21, 5, 194, 8, 16, 21, 5, 164, 8, 16, 21, 5, 69, 8, 16, 21, 5, 200, 8, 16, 21, 5, 205, 8, 16, 21, 5, 148, 8, 16, 21, 5, 171, 8, 16, 21, 5, 183, 8, 16, 21, 5, 78, 8, 16, 21, 5, 198, 8, 16, 21, 5, 209, 8, 16, 21, 5, 135, 8, 16, 21, 5, 159, 8, 16, 21, 5, 190, 8, 16, 21, 5, 84, 8, 16, 21, 5, 186, 8, 16, 21, 5, 201, 8, 16, 21, 5, 170, 8, 16, 21, 5, 181, 8, 16, 21, 5, 202, 8, 16, 21, 3, 64, 8, 16, 21, 3, 199, 8, 16, 21, 3, 203, 8, 16, 21, 3, 187, 8, 16, 21, 3, 70, 8, 16, 21, 3, 204, 8, 16, 21, 3, 194, 8, 16, 21, 3, 164, 8, 16, 21, 3, 69, 8, 16, 21, 3, 200, 8, 16, 21, 3, 205, 8, 16, 21, 3, 148, 8, 16, 21, 3, 171, 8, 16, 21, 3, 183, 8, 16, 21, 3, 78, 8, 16, 21, 3, 198, 8, 16, 21, 3, 209, 8, 16, 21, 3, 135, 8, 16, 21, 3, 159, 8, 16, 21, 3, 190, 8, 16, 21, 3, 84, 8, 16, 21, 3, 186, 8, 16, 21, 3, 201, 8, 16, 21, 3, 170, 8, 16, 21, 3, 181, 8, 16, 21, 3, 202, 8, 71, 5, 64, 8, 71, 5, 203, 8, 71, 5, 187, 8, 71, 5, 194, 8, 71, 5, 200, 8, 71, 5, 205, 8, 71, 5, 183, 8, 71, 5, 78, 8, 71, 5, 198, 8, 71, 5, 209, 8, 71, 5, 159, 8, 71, 5, 190, 8, 71, 5, 84, 8, 71, 5, 186, 8, 71, 5, 201, 8, 71, 5, 170, 8, 71, 5, 181, 8, 71, 5, 202, 8, 71, 3, 64, 8, 71, 3, 199, 8, 71, 3, 203, 8, 71, 3, 187, 8, 71, 3, 204, 8, 71, 3, 164, 8, 71, 3, 69, 8, 71, 3, 200, 8, 71, 3, 205, 8, 71, 3, 171, 8, 71, 3, 183, 8, 71, 3, 198, 8, 71, 3, 209, 8, 71, 3, 135, 8, 71, 3, 159, 8, 71, 3, 190, 8, 71, 3, 84, 8, 71, 3, 186, 8, 71, 3, 201, 8, 71, 3, 170, 8, 71, 3, 181, 8, 71, 3, 202, 8, 16, 71, 5, 64, 8, 16, 71, 5, 199, 8, 16, 71, 5, 203, 8, 16, 71, 5, 187, 8, 16, 71, 5, 70, 8, 16, 71, 5, 204, 8, 16, 71, 5, 194, 8, 16, 71, 5, 164, 8, 16, 71, 5, 69, 8, 16, 71, 5, 200, 8, 16, 71, 5, 205, 8, 16, 71, 5, 148, 8, 16, 71, 5, 171, 8, 16, 71, 5, 183, 8, 16, 71, 5, 78, 8, 16, 71, 5, 198, 8, 16, 71, 5, 209, 8, 16, 71, 5, 135, 8, 16, 71, 5, 159, 8, 16, 71, 5, 190, 8, 16, 71, 5, 84, 8, 16, 71, 5, 186, 8, 16, 71, 5, 201, 8, 16, 71, 5, 170, 8, 16, 71, 5, 181, 8, 16, 71, 5, 202, 8, 16, 71, 3, 64, 8, 16, 71, 3, 199, 8, 16, 71, 3, 203, 8, 16, 71, 3, 187, 8, 16, 71, 3, 70, 8, 16, 71, 3, 204, 8, 16, 71, 3, 194, 8, 16, 71, 3, 164, 8, 16, 71, 3, 69, 8, 16, 71, 3, 200, 8, 16, 71, 3, 205, 8, 16, 71, 3, 148, 8, 16, 71, 3, 171, 8, 16, 71, 3, 183, 8, 16, 71, 3, 78, 8, 16, 71, 3, 198, 8, 16, 71, 3, 209, 8, 16, 71, 3, 135, 8, 16, 71, 3, 159, 8, 16, 71, 3, 190, 8, 16, 71, 3, 84, 8, 16, 71, 3, 186, 8, 16, 71, 3, 201, 8, 16, 71, 3, 170, 8, 16, 71, 3, 181, 8, 16, 71, 3, 202, 8, 77, 5, 64, 8, 77, 5, 199, 8, 77, 5, 187, 8, 77, 5, 70, 8, 77, 5, 204, 8, 77, 5, 194, 8, 77, 5, 200, 8, 77, 5, 205, 8, 77, 5, 148, 8, 77, 5, 171, 8, 77, 5, 183, 8, 77, 5, 78, 8, 77, 5, 198, 8, 77, 5, 209, 8, 77, 5, 159, 8, 77, 5, 190, 8, 77, 5, 84, 8, 77, 5, 186, 8, 77, 5, 201, 8, 77, 5, 170, 8, 77, 5, 181, 8, 77, 3, 64, 8, 77, 3, 199, 8, 77, 3, 203, 8, 77, 3, 187, 8, 77, 3, 70, 8, 77, 3, 204, 8, 77, 3, 194, 8, 77, 3, 164, 8, 77, 3, 69, 8, 77, 3, 200, 8, 77, 3, 205, 8, 77, 3, 148, 8, 77, 3, 171, 8, 77, 3, 183, 8, 77, 3, 78, 8, 77, 3, 198, 8, 77, 3, 209, 8, 77, 3, 135, 8, 77, 3, 159, 8, 77, 3, 190, 8, 77, 3, 84, 8, 77, 3, 186, 8, 77, 3, 201, 8, 77, 3, 170, 8, 77, 3, 181, 8, 77, 3, 202, 8, 120, 5, 64, 8, 120, 5, 199, 8, 120, 5, 187, 8, 120, 5, 70, 8, 120, 5, 204, 8, 120, 5, 194, 8, 120, 5, 69, 8, 120, 5, 200, 8, 120, 5, 205, 8, 120, 5, 148, 8, 120, 5, 171, 8, 120, 5, 78, 8, 120, 5, 159, 8, 120, 5, 190, 8, 120, 5, 84, 8, 120, 5, 186, 8, 120, 5, 201, 8, 120, 5, 170, 8, 120, 5, 181, 8, 120, 3, 64, 8, 120, 3, 199, 8, 120, 3, 203, 8, 120, 3, 187, 8, 120, 3, 70, 8, 120, 3, 204, 8, 120, 3, 194, 8, 120, 3, 164, 8, 120, 3, 69, 8, 120, 3, 200, 8, 120, 3, 205, 8, 120, 3, 148, 8, 120, 3, 171, 8, 120, 3, 183, 8, 120, 3, 78, 8, 120, 3, 198, 8, 120, 3, 209, 8, 120, 3, 135, 8, 120, 3, 159, 8, 120, 3, 190, 8, 120, 3, 84, 8, 120, 3, 186, 8, 120, 3, 201, 8, 120, 3, 170, 8, 120, 3, 181, 8, 120, 3, 202, 8, 16, 77, 5, 64, 8, 16, 77, 5, 199, 8, 16, 77, 5, 203, 8, 16, 77, 5, 187, 8, 16, 77, 5, 70, 8, 16, 77, 5, 204, 8, 16, 77, 5, 194, 8, 16, 77, 5, 164, 8, 16, 77, 5, 69, 8, 16, 77, 5, 200, 8, 16, 77, 5, 205, 8, 16, 77, 5, 148, 8, 16, 77, 5, 171, 8, 16, 77, 5, 183, 8, 16, 77, 5, 78, 8, 16, 77, 5, 198, 8, 16, 77, 5, 209, 8, 16, 77, 5, 135, 8, 16, 77, 5, 159, 8, 16, 77, 5, 190, 8, 16, 77, 5, 84, 8, 16, 77, 5, 186, 8, 16, 77, 5, 201, 8, 16, 77, 5, 170, 8, 16, 77, 5, 181, 8, 16, 77, 5, 202, 8, 16, 77, 3, 64, 8, 16, 77, 3, 199, 8, 16, 77, 3, 203, 8, 16, 77, 3, 187, 8, 16, 77, 3, 70, 8, 16, 77, 3, 204, 8, 16, 77, 3, 194, 8, 16, 77, 3, 164, 8, 16, 77, 3, 69, 8, 16, 77, 3, 200, 8, 16, 77, 3, 205, 8, 16, 77, 3, 148, 8, 16, 77, 3, 171, 8, 16, 77, 3, 183, 8, 16, 77, 3, 78, 8, 16, 77, 3, 198, 8, 16, 77, 3, 209, 8, 16, 77, 3, 135, 8, 16, 77, 3, 159, 8, 16, 77, 3, 190, 8, 16, 77, 3, 84, 8, 16, 77, 3, 186, 8, 16, 77, 3, 201, 8, 16, 77, 3, 170, 8, 16, 77, 3, 181, 8, 16, 77, 3, 202, 8, 23, 5, 64, 8, 23, 5, 199, 8, 23, 5, 203, 8, 23, 5, 187, 8, 23, 5, 70, 8, 23, 5, 204, 8, 23, 5, 194, 8, 23, 5, 164, 8, 23, 5, 69, 8, 23, 5, 200, 8, 23, 5, 205, 8, 23, 5, 148, 8, 23, 5, 171, 8, 23, 5, 183, 8, 23, 5, 78, 8, 23, 5, 198, 8, 23, 5, 209, 8, 23, 5, 135, 8, 23, 5, 159, 8, 23, 5, 190, 8, 23, 5, 84, 8, 23, 5, 186, 8, 23, 5, 201, 8, 23, 5, 170, 8, 23, 5, 181, 8, 23, 5, 202, 8, 23, 3, 64, 8, 23, 3, 199, 8, 23, 3, 203, 8, 23, 3, 187, 8, 23, 3, 70, 8, 23, 3, 204, 8, 23, 3, 194, 8, 23, 3, 164, 8, 23, 3, 69, 8, 23, 3, 200, 8, 23, 3, 205, 8, 23, 3, 148, 8, 23, 3, 171, 8, 23, 3, 183, 8, 23, 3, 78, 8, 23, 3, 198, 8, 23, 3, 209, 8, 23, 3, 135, 8, 23, 3, 159, 8, 23, 3, 190, 8, 23, 3, 84, 8, 23, 3, 186, 8, 23, 3, 201, 8, 23, 3, 170, 8, 23, 3, 181, 8, 23, 3, 202, 8, 23, 16, 5, 64, 8, 23, 16, 5, 199, 8, 23, 16, 5, 203, 8, 23, 16, 5, 187, 8, 23, 16, 5, 70, 8, 23, 16, 5, 204, 8, 23, 16, 5, 194, 8, 23, 16, 5, 164, 8, 23, 16, 5, 69, 8, 23, 16, 5, 200, 8, 23, 16, 5, 205, 8, 23, 16, 5, 148, 8, 23, 16, 5, 171, 8, 23, 16, 5, 183, 8, 23, 16, 5, 78, 8, 23, 16, 5, 198, 8, 23, 16, 5, 209, 8, 23, 16, 5, 135, 8, 23, 16, 5, 159, 8, 23, 16, 5, 190, 8, 23, 16, 5, 84, 8, 23, 16, 5, 186, 8, 23, 16, 5, 201, 8, 23, 16, 5, 170, 8, 23, 16, 5, 181, 8, 23, 16, 5, 202, 8, 23, 16, 3, 64, 8, 23, 16, 3, 199, 8, 23, 16, 3, 203, 8, 23, 16, 3, 187, 8, 23, 16, 3, 70, 8, 23, 16, 3, 204, 8, 23, 16, 3, 194, 8, 23, 16, 3, 164, 8, 23, 16, 3, 69, 8, 23, 16, 3, 200, 8, 23, 16, 3, 205, 8, 23, 16, 3, 148, 8, 23, 16, 3, 171, 8, 23, 16, 3, 183, 8, 23, 16, 3, 78, 8, 23, 16, 3, 198, 8, 23, 16, 3, 209, 8, 23, 16, 3, 135, 8, 23, 16, 3, 159, 8, 23, 16, 3, 190, 8, 23, 16, 3, 84, 8, 23, 16, 3, 186, 8, 23, 16, 3, 201, 8, 23, 16, 3, 170, 8, 23, 16, 3, 181, 8, 23, 16, 3, 202, 8, 23, 21, 5, 64, 8, 23, 21, 5, 199, 8, 23, 21, 5, 203, 8, 23, 21, 5, 187, 8, 23, 21, 5, 70, 8, 23, 21, 5, 204, 8, 23, 21, 5, 194, 8, 23, 21, 5, 164, 8, 23, 21, 5, 69, 8, 23, 21, 5, 200, 8, 23, 21, 5, 205, 8, 23, 21, 5, 148, 8, 23, 21, 5, 171, 8, 23, 21, 5, 183, 8, 23, 21, 5, 78, 8, 23, 21, 5, 198, 8, 23, 21, 5, 209, 8, 23, 21, 5, 135, 8, 23, 21, 5, 159, 8, 23, 21, 5, 190, 8, 23, 21, 5, 84, 8, 23, 21, 5, 186, 8, 23, 21, 5, 201, 8, 23, 21, 5, 170, 8, 23, 21, 5, 181, 8, 23, 21, 5, 202, 8, 23, 21, 3, 64, 8, 23, 21, 3, 199, 8, 23, 21, 3, 203, 8, 23, 21, 3, 187, 8, 23, 21, 3, 70, 8, 23, 21, 3, 204, 8, 23, 21, 3, 194, 8, 23, 21, 3, 164, 8, 23, 21, 3, 69, 8, 23, 21, 3, 200, 8, 23, 21, 3, 205, 8, 23, 21, 3, 148, 8, 23, 21, 3, 171, 8, 23, 21, 3, 183, 8, 23, 21, 3, 78, 8, 23, 21, 3, 198, 8, 23, 21, 3, 209, 8, 23, 21, 3, 135, 8, 23, 21, 3, 159, 8, 23, 21, 3, 190, 8, 23, 21, 3, 84, 8, 23, 21, 3, 186, 8, 23, 21, 3, 201, 8, 23, 21, 3, 170, 8, 23, 21, 3, 181, 8, 23, 21, 3, 202, 8, 23, 16, 21, 5, 64, 8, 23, 16, 21, 5, 199, 8, 23, 16, 21, 5, 203, 8, 23, 16, 21, 5, 187, 8, 23, 16, 21, 5, 70, 8, 23, 16, 21, 5, 204, 8, 23, 16, 21, 5, 194, 8, 23, 16, 21, 5, 164, 8, 23, 16, 21, 5, 69, 8, 23, 16, 21, 5, 200, 8, 23, 16, 21, 5, 205, 8, 23, 16, 21, 5, 148, 8, 23, 16, 21, 5, 171, 8, 23, 16, 21, 5, 183, 8, 23, 16, 21, 5, 78, 8, 23, 16, 21, 5, 198, 8, 23, 16, 21, 5, 209, 8, 23, 16, 21, 5, 135, 8, 23, 16, 21, 5, 159, 8, 23, 16, 21, 5, 190, 8, 23, 16, 21, 5, 84, 8, 23, 16, 21, 5, 186, 8, 23, 16, 21, 5, 201, 8, 23, 16, 21, 5, 170, 8, 23, 16, 21, 5, 181, 8, 23, 16, 21, 5, 202, 8, 23, 16, 21, 3, 64, 8, 23, 16, 21, 3, 199, 8, 23, 16, 21, 3, 203, 8, 23, 16, 21, 3, 187, 8, 23, 16, 21, 3, 70, 8, 23, 16, 21, 3, 204, 8, 23, 16, 21, 3, 194, 8, 23, 16, 21, 3, 164, 8, 23, 16, 21, 3, 69, 8, 23, 16, 21, 3, 200, 8, 23, 16, 21, 3, 205, 8, 23, 16, 21, 3, 148, 8, 23, 16, 21, 3, 171, 8, 23, 16, 21, 3, 183, 8, 23, 16, 21, 3, 78, 8, 23, 16, 21, 3, 198, 8, 23, 16, 21, 3, 209, 8, 23, 16, 21, 3, 135, 8, 23, 16, 21, 3, 159, 8, 23, 16, 21, 3, 190, 8, 23, 16, 21, 3, 84, 8, 23, 16, 21, 3, 186, 8, 23, 16, 21, 3, 201, 8, 23, 16, 21, 3, 170, 8, 23, 16, 21, 3, 181, 8, 23, 16, 21, 3, 202, 8, 140, 5, 64, 8, 140, 5, 199, 8, 140, 5, 203, 8, 140, 5, 187, 8, 140, 5, 70, 8, 140, 5, 204, 8, 140, 5, 194, 8, 140, 5, 164, 8, 140, 5, 69, 8, 140, 5, 200, 8, 140, 5, 205, 8, 140, 5, 148, 8, 140, 5, 171, 8, 140, 5, 183, 8, 140, 5, 78, 8, 140, 5, 198, 8, 140, 5, 209, 8, 140, 5, 135, 8, 140, 5, 159, 8, 140, 5, 190, 8, 140, 5, 84, 8, 140, 5, 186, 8, 140, 5, 201, 8, 140, 5, 170, 8, 140, 5, 181, 8, 140, 5, 202, 8, 140, 3, 64, 8, 140, 3, 199, 8, 140, 3, 203, 8, 140, 3, 187, 8, 140, 3, 70, 8, 140, 3, 204, 8, 140, 3, 194, 8, 140, 3, 164, 8, 140, 3, 69, 8, 140, 3, 200, 8, 140, 3, 205, 8, 140, 3, 148, 8, 140, 3, 171, 8, 140, 3, 183, 8, 140, 3, 78, 8, 140, 3, 198, 8, 140, 3, 209, 8, 140, 3, 135, 8, 140, 3, 159, 8, 140, 3, 190, 8, 140, 3, 84, 8, 140, 3, 186, 8, 140, 3, 201, 8, 140, 3, 170, 8, 140, 3, 181, 8, 140, 3, 202, 8, 16, 5, 242, 79, 8, 16, 5, 244, 198, 8, 16, 5, 242, 75, 8, 16, 5, 242, 87, 8, 16, 5, 239, 133, 8, 16, 5, 244, 204, 8, 16, 5, 249, 42, 8, 16, 5, 242, 97, 8, 16, 5, 244, 191, 8, 16, 5, 242, 95, 8, 16, 5, 242, 96, 8, 16, 5, 253, 114, 8, 16, 5, 253, 112, 8, 16, 5, 253, 135, 8, 16, 5, 239, 137, 8, 16, 5, 253, 116, 8, 16, 5, 249, 32, 8, 16, 5, 244, 203, 90, 8, 16, 5, 242, 73, 8, 16, 5, 249, 43, 8, 16, 5, 239, 127, 8, 16, 5, 249, 30, 8, 16, 5, 249, 23, 8, 16, 5, 249, 31, 8, 16, 5, 242, 72, 8, 16, 242, 130, 8, 16, 3, 242, 79, 8, 16, 3, 244, 198, 8, 16, 3, 242, 75, 8, 16, 3, 242, 87, 8, 16, 3, 239, 133, 8, 16, 3, 244, 204, 8, 16, 3, 249, 42, 8, 16, 3, 242, 97, 8, 16, 3, 244, 191, 8, 16, 3, 242, 95, 8, 16, 3, 242, 96, 8, 16, 3, 253, 114, 8, 16, 3, 253, 112, 8, 16, 3, 253, 135, 8, 16, 3, 239, 137, 8, 16, 3, 253, 116, 8, 16, 3, 249, 32, 8, 16, 3, 29, 242, 73, 8, 16, 3, 242, 73, 8, 16, 3, 249, 43, 8, 16, 3, 239, 127, 8, 16, 3, 249, 30, 8, 16, 3, 249, 23, 8, 16, 3, 249, 31, 8, 16, 3, 242, 72, 8, 16, 240, 243, 235, 240, 8, 16, 240, 204, 90, 8, 16, 244, 203, 90, 8, 16, 244, 228, 90, 8, 16, 253, 212, 90, 8, 16, 253, 168, 90, 8, 16, 254, 224, 90, 8, 21, 5, 242, 79, 8, 21, 5, 244, 198, 8, 21, 5, 242, 75, 8, 21, 5, 242, 87, 8, 21, 5, 239, 133, 8, 21, 5, 244, 204, 8, 21, 5, 249, 42, 8, 21, 5, 242, 97, 8, 21, 5, 244, 191, 8, 21, 5, 242, 95, 8, 21, 5, 242, 96, 8, 21, 5, 253, 114, 8, 21, 5, 253, 112, 8, 21, 5, 253, 135, 8, 21, 5, 239, 137, 8, 21, 5, 253, 116, 8, 21, 5, 249, 32, 8, 21, 5, 244, 203, 90, 8, 21, 5, 242, 73, 8, 21, 5, 249, 43, 8, 21, 5, 239, 127, 8, 21, 5, 249, 30, 8, 21, 5, 249, 23, 8, 21, 5, 249, 31, 8, 21, 5, 242, 72, 8, 21, 242, 130, 8, 21, 3, 242, 79, 8, 21, 3, 244, 198, 8, 21, 3, 242, 75, 8, 21, 3, 242, 87, 8, 21, 3, 239, 133, 8, 21, 3, 244, 204, 8, 21, 3, 249, 42, 8, 21, 3, 242, 97, 8, 21, 3, 244, 191, 8, 21, 3, 242, 95, 8, 21, 3, 242, 96, 8, 21, 3, 253, 114, 8, 21, 3, 253, 112, 8, 21, 3, 253, 135, 8, 21, 3, 239, 137, 8, 21, 3, 253, 116, 8, 21, 3, 249, 32, 8, 21, 3, 29, 242, 73, 8, 21, 3, 242, 73, 8, 21, 3, 249, 43, 8, 21, 3, 239, 127, 8, 21, 3, 249, 30, 8, 21, 3, 249, 23, 8, 21, 3, 249, 31, 8, 21, 3, 242, 72, 8, 21, 240, 243, 235, 240, 8, 21, 240, 204, 90, 8, 21, 244, 203, 90, 8, 21, 244, 228, 90, 8, 21, 253, 212, 90, 8, 21, 253, 168, 90, 8, 21, 254, 224, 90, 8, 16, 21, 5, 242, 79, 8, 16, 21, 5, 244, 198, 8, 16, 21, 5, 242, 75, 8, 16, 21, 5, 242, 87, 8, 16, 21, 5, 239, 133, 8, 16, 21, 5, 244, 204, 8, 16, 21, 5, 249, 42, 8, 16, 21, 5, 242, 97, 8, 16, 21, 5, 244, 191, 8, 16, 21, 5, 242, 95, 8, 16, 21, 5, 242, 96, 8, 16, 21, 5, 253, 114, 8, 16, 21, 5, 253, 112, 8, 16, 21, 5, 253, 135, 8, 16, 21, 5, 239, 137, 8, 16, 21, 5, 253, 116, 8, 16, 21, 5, 249, 32, 8, 16, 21, 5, 244, 203, 90, 8, 16, 21, 5, 242, 73, 8, 16, 21, 5, 249, 43, 8, 16, 21, 5, 239, 127, 8, 16, 21, 5, 249, 30, 8, 16, 21, 5, 249, 23, 8, 16, 21, 5, 249, 31, 8, 16, 21, 5, 242, 72, 8, 16, 21, 242, 130, 8, 16, 21, 3, 242, 79, 8, 16, 21, 3, 244, 198, 8, 16, 21, 3, 242, 75, 8, 16, 21, 3, 242, 87, 8, 16, 21, 3, 239, 133, 8, 16, 21, 3, 244, 204, 8, 16, 21, 3, 249, 42, 8, 16, 21, 3, 242, 97, 8, 16, 21, 3, 244, 191, 8, 16, 21, 3, 242, 95, 8, 16, 21, 3, 242, 96, 8, 16, 21, 3, 253, 114, 8, 16, 21, 3, 253, 112, 8, 16, 21, 3, 253, 135, 8, 16, 21, 3, 239, 137, 8, 16, 21, 3, 253, 116, 8, 16, 21, 3, 249, 32, 8, 16, 21, 3, 29, 242, 73, 8, 16, 21, 3, 242, 73, 8, 16, 21, 3, 249, 43, 8, 16, 21, 3, 239, 127, 8, 16, 21, 3, 249, 30, 8, 16, 21, 3, 249, 23, 8, 16, 21, 3, 249, 31, 8, 16, 21, 3, 242, 72, 8, 16, 21, 240, 243, 235, 240, 8, 16, 21, 240, 204, 90, 8, 16, 21, 244, 203, 90, 8, 16, 21, 244, 228, 90, 8, 16, 21, 253, 212, 90, 8, 16, 21, 253, 168, 90, 8, 16, 21, 254, 224, 90, 8, 23, 16, 5, 242, 79, 8, 23, 16, 5, 244, 198, 8, 23, 16, 5, 242, 75, 8, 23, 16, 5, 242, 87, 8, 23, 16, 5, 239, 133, 8, 23, 16, 5, 244, 204, 8, 23, 16, 5, 249, 42, 8, 23, 16, 5, 242, 97, 8, 23, 16, 5, 244, 191, 8, 23, 16, 5, 242, 95, 8, 23, 16, 5, 242, 96, 8, 23, 16, 5, 253, 114, 8, 23, 16, 5, 253, 112, 8, 23, 16, 5, 253, 135, 8, 23, 16, 5, 239, 137, 8, 23, 16, 5, 253, 116, 8, 23, 16, 5, 249, 32, 8, 23, 16, 5, 244, 203, 90, 8, 23, 16, 5, 242, 73, 8, 23, 16, 5, 249, 43, 8, 23, 16, 5, 239, 127, 8, 23, 16, 5, 249, 30, 8, 23, 16, 5, 249, 23, 8, 23, 16, 5, 249, 31, 8, 23, 16, 5, 242, 72, 8, 23, 16, 242, 130, 8, 23, 16, 3, 242, 79, 8, 23, 16, 3, 244, 198, 8, 23, 16, 3, 242, 75, 8, 23, 16, 3, 242, 87, 8, 23, 16, 3, 239, 133, 8, 23, 16, 3, 244, 204, 8, 23, 16, 3, 249, 42, 8, 23, 16, 3, 242, 97, 8, 23, 16, 3, 244, 191, 8, 23, 16, 3, 242, 95, 8, 23, 16, 3, 242, 96, 8, 23, 16, 3, 253, 114, 8, 23, 16, 3, 253, 112, 8, 23, 16, 3, 253, 135, 8, 23, 16, 3, 239, 137, 8, 23, 16, 3, 253, 116, 8, 23, 16, 3, 249, 32, 8, 23, 16, 3, 29, 242, 73, 8, 23, 16, 3, 242, 73, 8, 23, 16, 3, 249, 43, 8, 23, 16, 3, 239, 127, 8, 23, 16, 3, 249, 30, 8, 23, 16, 3, 249, 23, 8, 23, 16, 3, 249, 31, 8, 23, 16, 3, 242, 72, 8, 23, 16, 240, 243, 235, 240, 8, 23, 16, 240, 204, 90, 8, 23, 16, 244, 203, 90, 8, 23, 16, 244, 228, 90, 8, 23, 16, 253, 212, 90, 8, 23, 16, 253, 168, 90, 8, 23, 16, 254, 224, 90, 8, 23, 16, 21, 5, 242, 79, 8, 23, 16, 21, 5, 244, 198, 8, 23, 16, 21, 5, 242, 75, 8, 23, 16, 21, 5, 242, 87, 8, 23, 16, 21, 5, 239, 133, 8, 23, 16, 21, 5, 244, 204, 8, 23, 16, 21, 5, 249, 42, 8, 23, 16, 21, 5, 242, 97, 8, 23, 16, 21, 5, 244, 191, 8, 23, 16, 21, 5, 242, 95, 8, 23, 16, 21, 5, 242, 96, 8, 23, 16, 21, 5, 253, 114, 8, 23, 16, 21, 5, 253, 112, 8, 23, 16, 21, 5, 253, 135, 8, 23, 16, 21, 5, 239, 137, 8, 23, 16, 21, 5, 253, 116, 8, 23, 16, 21, 5, 249, 32, 8, 23, 16, 21, 5, 244, 203, 90, 8, 23, 16, 21, 5, 242, 73, 8, 23, 16, 21, 5, 249, 43, 8, 23, 16, 21, 5, 239, 127, 8, 23, 16, 21, 5, 249, 30, 8, 23, 16, 21, 5, 249, 23, 8, 23, 16, 21, 5, 249, 31, 8, 23, 16, 21, 5, 242, 72, 8, 23, 16, 21, 242, 130, 8, 23, 16, 21, 3, 242, 79, 8, 23, 16, 21, 3, 244, 198, 8, 23, 16, 21, 3, 242, 75, 8, 23, 16, 21, 3, 242, 87, 8, 23, 16, 21, 3, 239, 133, 8, 23, 16, 21, 3, 244, 204, 8, 23, 16, 21, 3, 249, 42, 8, 23, 16, 21, 3, 242, 97, 8, 23, 16, 21, 3, 244, 191, 8, 23, 16, 21, 3, 242, 95, 8, 23, 16, 21, 3, 242, 96, 8, 23, 16, 21, 3, 253, 114, 8, 23, 16, 21, 3, 253, 112, 8, 23, 16, 21, 3, 253, 135, 8, 23, 16, 21, 3, 239, 137, 8, 23, 16, 21, 3, 253, 116, 8, 23, 16, 21, 3, 249, 32, 8, 23, 16, 21, 3, 29, 242, 73, 8, 23, 16, 21, 3, 242, 73, 8, 23, 16, 21, 3, 249, 43, 8, 23, 16, 21, 3, 239, 127, 8, 23, 16, 21, 3, 249, 30, 8, 23, 16, 21, 3, 249, 23, 8, 23, 16, 21, 3, 249, 31, 8, 23, 16, 21, 3, 242, 72, 8, 23, 16, 21, 240, 243, 235, 240, 8, 23, 16, 21, 240, 204, 90, 8, 23, 16, 21, 244, 203, 90, 8, 23, 16, 21, 244, 228, 90, 8, 23, 16, 21, 253, 212, 90, 8, 23, 16, 21, 253, 168, 90, 8, 23, 16, 21, 254, 224, 90, 8, 16, 27, 244, 173, 8, 16, 27, 121, 8, 16, 27, 114, 8, 16, 27, 153, 8, 16, 27, 163, 8, 16, 27, 168, 8, 16, 27, 169, 8, 16, 27, 179, 8, 16, 27, 176, 8, 16, 27, 178, 8, 120, 27, 244, 173, 8, 120, 27, 121, 8, 120, 27, 114, 8, 120, 27, 153, 8, 120, 27, 163, 8, 120, 27, 168, 8, 120, 27, 169, 8, 120, 27, 179, 8, 120, 27, 176, 8, 120, 27, 178, 8, 23, 27, 244, 173, 8, 23, 27, 121, 8, 23, 27, 114, 8, 23, 27, 153, 8, 23, 27, 163, 8, 23, 27, 168, 8, 23, 27, 169, 8, 23, 27, 179, 8, 23, 27, 176, 8, 23, 27, 178, 8, 23, 16, 27, 244, 173, 8, 23, 16, 27, 121, 8, 23, 16, 27, 114, 8, 23, 16, 27, 153, 8, 23, 16, 27, 163, 8, 23, 16, 27, 168, 8, 23, 16, 27, 169, 8, 23, 16, 27, 179, 8, 23, 16, 27, 176, 8, 23, 16, 27, 178, 8, 140, 27, 244, 173, 8, 140, 27, 121, 8, 140, 27, 114, 8, 140, 27, 153, 8, 140, 27, 163, 8, 140, 27, 168, 8, 140, 27, 169, 8, 140, 27, 179, 8, 140, 27, 176, 8, 140, 27, 178, 7, 11, 232, 21, 7, 11, 232, 22, 7, 11, 232, 23, 7, 11, 232, 24, 7, 11, 232, 25, 7, 11, 232, 26, 7, 11, 232, 27, 7, 11, 232, 28, 7, 11, 232, 29, 7, 11, 232, 30, 7, 11, 232, 31, 7, 11, 232, 32, 7, 11, 232, 33, 7, 11, 232, 34, 7, 11, 232, 35, 7, 11, 232, 36, 7, 11, 232, 37, 7, 11, 232, 38, 7, 11, 232, 39, 7, 11, 232, 40, 7, 11, 232, 41, 7, 11, 232, 42, 7, 11, 232, 43, 7, 11, 232, 44, 7, 11, 232, 45, 7, 11, 232, 46, 7, 11, 232, 47, 7, 11, 232, 48, 7, 11, 232, 49, 7, 11, 232, 50, 7, 11, 232, 51, 7, 11, 232, 52, 7, 11, 232, 53, 7, 11, 232, 54, 7, 11, 232, 55, 7, 11, 232, 56, 7, 11, 232, 57, 7, 11, 232, 58, 7, 11, 232, 59, 7, 11, 232, 60, 7, 11, 232, 61, 7, 11, 232, 62, 7, 11, 232, 63, 7, 11, 232, 64, 7, 11, 232, 65, 7, 11, 232, 66, 7, 11, 232, 67, 7, 11, 232, 68, 7, 11, 232, 69, 7, 11, 232, 70, 7, 11, 232, 71, 7, 11, 232, 72, 7, 11, 232, 73, 7, 11, 232, 74, 7, 11, 232, 75, 7, 11, 232, 76, 7, 11, 232, 77, 7, 11, 232, 78, 7, 11, 232, 79, 7, 11, 232, 80, 7, 11, 232, 81, 7, 11, 232, 82, 7, 11, 232, 83, 7, 11, 232, 84, 7, 11, 232, 85, 7, 11, 232, 86, 7, 11, 232, 87, 7, 11, 232, 88, 7, 11, 232, 89, 7, 11, 232, 90, 7, 11, 232, 91, 7, 11, 232, 92, 7, 11, 232, 93, 7, 11, 232, 94, 7, 11, 232, 95, 7, 11, 232, 96, 7, 11, 232, 97, 7, 11, 232, 98, 7, 11, 232, 99, 7, 11, 232, 100, 7, 11, 232, 101, 7, 11, 232, 102, 7, 11, 232, 103, 7, 11, 232, 104, 7, 11, 232, 105, 7, 11, 232, 106, 7, 11, 232, 107, 7, 11, 232, 108, 7, 11, 232, 109, 7, 11, 232, 110, 7, 11, 232, 111, 7, 11, 232, 112, 7, 11, 232, 113, 7, 11, 232, 114, 7, 11, 232, 115, 7, 11, 232, 116, 7, 11, 232, 117, 7, 11, 232, 118, 7, 11, 232, 119, 7, 11, 232, 120, 7, 11, 232, 121, 7, 11, 232, 122, 7, 11, 232, 123, 7, 11, 232, 124, 7, 11, 232, 125, 7, 11, 232, 126, 7, 11, 232, 127, 7, 11, 232, 128, 7, 11, 232, 129, 7, 11, 232, 130, 7, 11, 232, 131, 7, 11, 232, 132, 7, 11, 232, 133, 7, 11, 232, 134, 7, 11, 232, 135, 7, 11, 232, 136, 7, 11, 232, 137, 7, 11, 232, 138, 7, 11, 232, 139, 7, 11, 232, 140, 7, 11, 232, 141, 7, 11, 232, 142, 7, 11, 232, 143, 7, 11, 232, 144, 7, 11, 232, 145, 7, 11, 232, 146, 7, 11, 232, 147, 7, 11, 232, 148, 7, 11, 232, 149, 7, 11, 232, 150, 7, 11, 232, 151, 7, 11, 232, 152, 7, 11, 232, 153, 7, 11, 232, 154, 7, 11, 232, 155, 7, 11, 232, 156, 7, 11, 232, 157, 7, 11, 232, 158, 7, 11, 232, 159, 7, 11, 232, 160, 7, 11, 232, 161, 7, 11, 232, 162, 7, 11, 232, 163, 7, 11, 232, 164, 7, 11, 232, 165, 7, 11, 232, 166, 7, 11, 232, 167, 7, 11, 232, 168, 7, 11, 232, 169, 7, 11, 232, 170, 7, 11, 232, 171, 7, 11, 232, 172, 7, 11, 232, 173, 7, 11, 232, 174, 7, 11, 232, 175, 7, 11, 232, 176, 7, 11, 232, 177, 7, 11, 232, 178, 7, 11, 232, 179, 7, 11, 232, 180, 7, 11, 232, 181, 7, 11, 232, 182, 7, 11, 232, 183, 7, 11, 232, 184, 7, 11, 232, 185, 7, 11, 232, 186, 7, 11, 232, 187, 7, 11, 232, 188, 7, 11, 232, 189, 7, 11, 232, 190, 7, 11, 232, 191, 7, 11, 232, 192, 7, 11, 232, 193, 7, 11, 232, 194, 7, 11, 232, 195, 7, 11, 232, 196, 7, 11, 232, 197, 7, 11, 232, 198, 7, 11, 232, 199, 7, 11, 232, 200, 7, 11, 232, 201, 7, 11, 232, 202, 7, 11, 232, 203, 7, 11, 232, 204, 7, 11, 232, 205, 7, 11, 232, 206, 7, 11, 232, 207, 7, 11, 232, 208, 7, 11, 232, 209, 7, 11, 232, 210, 7, 11, 232, 211, 7, 11, 232, 212, 7, 11, 232, 213, 7, 11, 232, 214, 7, 11, 232, 215, 7, 11, 232, 216, 7, 11, 232, 217, 7, 11, 232, 218, 7, 11, 232, 219, 7, 11, 232, 220, 7, 11, 232, 221, 7, 11, 232, 222, 7, 11, 232, 223, 7, 11, 232, 224, 7, 11, 232, 225, 7, 11, 232, 226, 7, 11, 232, 227, 7, 11, 232, 228, 7, 11, 232, 229, 7, 11, 232, 230, 7, 11, 232, 231, 7, 11, 232, 232, 7, 11, 232, 233, 7, 11, 232, 234, 7, 11, 232, 235, 7, 11, 232, 236, 7, 11, 232, 237, 7, 11, 232, 238, 7, 11, 232, 239, 7, 11, 232, 240, 7, 11, 232, 241, 7, 11, 232, 242, 7, 11, 232, 243, 7, 11, 232, 244, 7, 11, 232, 245, 7, 11, 232, 246, 7, 11, 232, 247, 7, 11, 232, 248, 7, 11, 232, 249, 7, 11, 232, 250, 7, 11, 232, 251, 7, 11, 232, 252, 7, 11, 232, 253, 7, 11, 232, 254, 7, 11, 232, 255, 7, 11, 233, 0, 7, 11, 233, 1, 7, 11, 233, 2, 7, 11, 233, 3, 7, 11, 233, 4, 7, 11, 233, 5, 7, 11, 233, 6, 7, 11, 233, 7, 7, 11, 233, 8, 7, 11, 233, 9, 7, 11, 233, 10, 7, 11, 233, 11, 7, 11, 233, 12, 7, 11, 233, 13, 7, 11, 233, 14, 7, 11, 233, 15, 7, 11, 233, 16, 7, 11, 233, 17, 7, 11, 233, 18, 7, 11, 233, 19, 7, 11, 233, 20, 7, 11, 233, 21, 7, 11, 233, 22, 7, 11, 233, 23, 7, 11, 233, 24, 7, 11, 233, 25, 7, 11, 233, 26, 7, 11, 233, 27, 7, 11, 233, 28, 7, 11, 233, 29, 7, 11, 233, 30, 7, 11, 233, 31, 7, 11, 233, 32, 7, 11, 233, 33, 7, 11, 233, 34, 7, 11, 233, 35, 7, 11, 233, 36, 7, 11, 233, 37, 7, 11, 233, 38, 7, 11, 233, 39, 7, 11, 233, 40, 7, 11, 233, 41, 7, 11, 233, 42, 7, 11, 233, 43, 7, 11, 233, 44, 7, 11, 233, 45, 7, 11, 233, 46, 7, 11, 233, 47, 7, 11, 233, 48, 7, 11, 233, 49, 7, 11, 233, 50, 7, 11, 233, 51, 7, 11, 233, 52, 7, 11, 233, 53, 7, 11, 233, 54, 7, 11, 233, 55, 7, 11, 233, 56, 7, 11, 233, 57, 7, 11, 233, 58, 7, 11, 233, 59, 7, 11, 233, 60, 7, 11, 233, 61, 7, 11, 233, 62, 7, 11, 233, 63, 7, 11, 233, 64, 7, 11, 233, 65, 7, 11, 233, 66, 7, 11, 233, 67, 7, 11, 233, 68, 7, 11, 233, 69, 7, 11, 233, 70, 7, 11, 233, 71, 7, 11, 233, 72, 7, 11, 233, 73, 7, 11, 233, 74, 7, 11, 233, 75, 7, 11, 233, 76, 7, 11, 233, 77, 7, 11, 233, 78, 7, 11, 233, 79, 7, 11, 233, 80, 7, 11, 233, 81, 7, 11, 233, 82, 7, 11, 233, 83, 7, 11, 233, 84, 7, 11, 233, 85, 7, 11, 233, 86, 7, 11, 233, 87, 7, 11, 233, 88, 7, 11, 233, 89, 7, 11, 233, 90, 7, 11, 233, 91, 7, 11, 233, 92, 7, 11, 233, 93, 7, 11, 233, 94, 7, 11, 233, 95, 7, 11, 233, 96, 7, 11, 233, 97, 7, 11, 233, 98, 7, 11, 233, 99, 7, 11, 233, 100, 7, 11, 233, 101, 7, 11, 233, 102, 7, 11, 233, 103, 7, 11, 233, 104, 7, 11, 233, 105, 7, 11, 233, 106, 7, 11, 233, 107, 7, 11, 233, 108, 7, 11, 233, 109, 7, 11, 233, 110, 7, 11, 233, 111, 7, 11, 233, 112, 7, 11, 233, 113, 7, 11, 233, 114, 7, 11, 233, 115, 7, 11, 233, 116, 7, 11, 233, 117, 7, 11, 233, 118, 7, 11, 233, 119, 7, 11, 233, 120, 7, 11, 233, 121, 7, 11, 233, 122, 7, 11, 233, 123, 7, 11, 233, 124, 7, 11, 233, 125, 7, 11, 233, 126, 7, 11, 233, 127, 7, 11, 233, 128, 7, 11, 233, 129, 7, 11, 233, 130, 7, 11, 233, 131, 7, 11, 233, 132, 7, 11, 233, 133, 7, 11, 233, 134, 7, 11, 233, 135, 7, 11, 233, 136, 7, 11, 233, 137, 7, 11, 233, 138, 7, 11, 233, 139, 7, 11, 233, 140, 7, 11, 233, 141, 7, 11, 233, 142, 7, 11, 233, 143, 7, 11, 233, 144, 7, 11, 233, 145, 7, 11, 233, 146, 7, 11, 233, 147, 7, 11, 233, 148, 7, 11, 233, 149, 7, 11, 233, 150, 7, 11, 233, 151, 7, 11, 233, 152, 7, 11, 233, 153, 7, 11, 233, 154, 7, 11, 233, 155, 7, 11, 233, 156, 7, 11, 233, 157, 7, 11, 233, 158, 7, 11, 233, 159, 7, 11, 233, 160, 7, 11, 233, 161, 7, 11, 233, 162, 7, 11, 233, 163, 7, 11, 233, 164, 7, 11, 233, 165, 7, 11, 233, 166, 7, 11, 233, 167, 7, 11, 233, 168, 7, 11, 233, 169, 7, 11, 233, 170, 7, 11, 233, 171, 7, 11, 233, 172, 7, 11, 233, 173, 7, 11, 233, 174, 7, 11, 233, 175, 7, 11, 233, 176, 7, 11, 233, 177, 7, 11, 233, 178, 7, 11, 233, 179, 7, 11, 233, 180, 7, 11, 233, 181, 7, 11, 233, 182, 7, 11, 233, 183, 7, 11, 233, 184, 7, 11, 233, 185, 7, 11, 233, 186, 7, 11, 233, 187, 7, 11, 233, 188, 7, 11, 233, 189, 7, 11, 233, 190, 7, 11, 233, 191, 7, 11, 233, 192, 7, 11, 233, 193, 7, 11, 233, 194, 7, 11, 233, 195, 7, 11, 233, 196, 7, 11, 233, 197, 7, 11, 233, 198, 7, 11, 233, 199, 7, 11, 233, 200, 7, 11, 233, 201, 7, 11, 233, 202, 7, 11, 233, 203, 7, 11, 233, 204, 7, 11, 233, 205, 7, 11, 233, 206, 7, 11, 233, 207, 7, 11, 233, 208, 7, 11, 233, 209, 7, 11, 233, 210, 7, 11, 233, 211, 7, 11, 233, 212, 7, 11, 233, 213, 7, 11, 233, 214, 7, 11, 233, 215, 7, 11, 233, 216, 7, 11, 233, 217, 7, 11, 233, 218, 7, 11, 233, 219, 7, 11, 233, 220, 7, 11, 233, 221, 7, 11, 233, 222, 7, 11, 233, 223, 7, 11, 233, 224, 7, 11, 233, 225, 7, 11, 233, 226, 7, 11, 233, 227, 7, 11, 233, 228, 7, 11, 233, 229, 7, 11, 233, 230, 7, 11, 233, 231, 7, 11, 233, 232, 7, 11, 233, 233, 7, 11, 233, 234, 7, 11, 233, 235, 7, 11, 233, 236, 7, 11, 233, 237, 7, 11, 233, 238, 7, 11, 233, 239, 7, 11, 233, 240, 7, 11, 233, 241, 7, 11, 233, 242, 7, 11, 233, 243, 7, 11, 233, 244, 7, 11, 233, 245, 7, 11, 233, 246, 7, 11, 233, 247, 7, 11, 233, 248, 7, 11, 233, 249, 7, 11, 233, 250, 7, 11, 233, 251, 7, 11, 233, 252, 7, 11, 233, 253, 7, 11, 233, 254, 7, 11, 233, 255, 7, 11, 234, 0, 7, 11, 234, 1, 7, 11, 234, 2, 7, 11, 234, 3, 7, 11, 234, 4, 7, 11, 234, 5, 7, 11, 234, 6, 7, 11, 234, 7, 7, 11, 234, 8, 7, 11, 234, 9, 7, 11, 234, 10, 7, 11, 234, 11, 7, 11, 234, 12, 7, 11, 234, 13, 7, 11, 234, 14, 7, 11, 234, 15, 7, 11, 234, 16, 7, 11, 234, 17, 7, 11, 234, 18, 7, 11, 234, 19, 7, 11, 234, 20, 7, 11, 234, 21, 7, 11, 234, 22, 7, 11, 234, 23, 7, 11, 234, 24, 7, 11, 234, 25, 7, 11, 234, 26, 7, 11, 234, 27, 7, 11, 234, 28, 7, 11, 234, 29, 7, 11, 234, 30, 7, 11, 234, 31, 7, 11, 234, 32, 7, 11, 234, 33, 7, 11, 234, 34, 7, 11, 234, 35, 7, 11, 234, 36, 7, 11, 234, 37, 7, 11, 234, 38, 7, 11, 234, 39, 7, 11, 234, 40, 7, 11, 234, 41, 7, 11, 234, 42, 7, 11, 234, 43, 7, 11, 234, 44, 7, 11, 234, 45, 7, 11, 234, 46, 7, 11, 234, 47, 7, 11, 234, 48, 7, 11, 234, 49, 7, 11, 234, 50, 240, 104, 250, 81, 85, 242, 69, 85, 236, 186, 65, 85, 238, 76, 65, 85, 83, 57, 85, 242, 158, 57, 85, 240, 248, 57, 85, 237, 124, 85, 236, 190, 85, 36, 236, 47, 85, 37, 236, 47, 85, 238, 77, 85, 249, 4, 57, 85, 242, 84, 85, 235, 243, 85, 213, 189, 85, 239, 144, 85, 27, 244, 173, 85, 27, 121, 85, 27, 114, 85, 27, 153, 85, 27, 163, 85, 27, 168, 85, 27, 169, 85, 27, 179, 85, 27, 176, 85, 27, 178, 85, 242, 81, 85, 237, 123, 85, 206, 57, 85, 242, 61, 57, 85, 196, 57, 85, 239, 126, 65, 85, 237, 127, 253, 220, 85, 9, 5, 1, 64, 85, 9, 5, 1, 199, 85, 9, 5, 1, 203, 85, 9, 5, 1, 187, 85, 9, 5, 1, 70, 85, 9, 5, 1, 204, 85, 9, 5, 1, 194, 85, 9, 5, 1, 164, 85, 9, 5, 1, 69, 85, 9, 5, 1, 200, 85, 9, 5, 1, 205, 85, 9, 5, 1, 148, 85, 9, 5, 1, 171, 85, 9, 5, 1, 183, 85, 9, 5, 1, 78, 85, 9, 5, 1, 198, 85, 9, 5, 1, 209, 85, 9, 5, 1, 135, 85, 9, 5, 1, 159, 85, 9, 5, 1, 190, 85, 9, 5, 1, 84, 85, 9, 5, 1, 186, 85, 9, 5, 1, 201, 85, 9, 5, 1, 170, 85, 9, 5, 1, 181, 85, 9, 5, 1, 202, 85, 36, 30, 110, 85, 240, 219, 239, 144, 85, 37, 30, 110, 85, 157, 240, 203, 85, 253, 113, 244, 176, 85, 244, 201, 240, 203, 85, 9, 3, 1, 64, 85, 9, 3, 1, 199, 85, 9, 3, 1, 203, 85, 9, 3, 1, 187, 85, 9, 3, 1, 70, 85, 9, 3, 1, 204, 85, 9, 3, 1, 194, 85, 9, 3, 1, 164, 85, 9, 3, 1, 69, 85, 9, 3, 1, 200, 85, 9, 3, 1, 205, 85, 9, 3, 1, 148, 85, 9, 3, 1, 171, 85, 9, 3, 1, 183, 85, 9, 3, 1, 78, 85, 9, 3, 1, 198, 85, 9, 3, 1, 209, 85, 9, 3, 1, 135, 85, 9, 3, 1, 159, 85, 9, 3, 1, 190, 85, 9, 3, 1, 84, 85, 9, 3, 1, 186, 85, 9, 3, 1, 201, 85, 9, 3, 1, 170, 85, 9, 3, 1, 181, 85, 9, 3, 1, 202, 85, 36, 244, 175, 110, 85, 55, 244, 176, 85, 37, 244, 175, 110, 85, 180, 243, 56, 250, 81, }; static unsigned char phrasebook_offset1[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 8, 8, 8, 8, 8, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 8, 8, 8, 38, 39, 40, 41, 42, 43, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 44, 45, 46, 47, 48, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 49, 50, 51, 52, 53, 54, 55, 8, 8, 8, 56, 57, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 58, 59, 8, 8, 60, 61, 62, 63, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 64, 65, 66, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 67, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, }; static unsigned int phrasebook_offset2[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 3, 6, 9, 11, 14, 17, 19, 21, 24, 27, 29, 32, 34, 36, 38, 40, 43, 45, 47, 49, 51, 53, 55, 57, 59, 61, 63, 65, 67, 70, 72, 75, 79, 83, 87, 91, 95, 99, 103, 107, 111, 115, 119, 123, 127, 131, 135, 139, 143, 147, 151, 155, 159, 163, 167, 171, 175, 179, 183, 186, 190, 193, 196, 200, 204, 208, 212, 216, 220, 224, 228, 232, 236, 240, 244, 248, 252, 256, 260, 264, 268, 272, 276, 280, 284, 288, 292, 296, 300, 304, 308, 312, 315, 319, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 320, 324, 329, 332, 335, 338, 341, 344, 347, 348, 351, 357, 364, 366, 370, 373, 374, 377, 380, 383, 386, 390, 393, 396, 399, 401, 404, 410, 417, 425, 433, 441, 446, 452, 458, 465, 471, 477, 485, 490, 498, 504, 510, 517, 523, 529, 535, 542, 548, 553, 560, 566, 572, 579, 585, 591, 594, 600, 606, 612, 619, 625, 632, 637, 643, 649, 655, 662, 668, 674, 682, 687, 695, 701, 707, 714, 720, 726, 732, 739, 745, 750, 757, 763, 769, 776, 782, 788, 791, 797, 803, 809, 816, 822, 829, 834, 841, 847, 853, 859, 865, 872, 879, 886, 893, 901, 909, 917, 925, 932, 939, 946, 953, 960, 967, 973, 979, 985, 991, 998, 1005, 1012, 1019, 1025, 1031, 1039, 1047, 1054, 1061, 1069, 1077, 1085, 1093, 1101, 1109, 1116, 1123, 1129, 1135, 1141, 1147, 1153, 1159, 1166, 1173, 1180, 1186, 1191, 1196, 1204, 1212, 1220, 1228, 1233, 1240, 1247, 1255, 1263, 1270, 1277, 1286, 1295, 1302, 1309, 1316, 1323, 1331, 1339, 1346, 1353, 1364, 1369, 1374, 1380, 1386, 1392, 1398, 1405, 1412, 1417, 1422, 1429, 1436, 1444, 1452, 1459, 1466, 1473, 1480, 1488, 1496, 1504, 1512, 1519, 1526, 1534, 1542, 1549, 1556, 1563, 1570, 1576, 1582, 1588, 1594, 1600, 1606, 1614, 1622, 1629, 1636, 1643, 1650, 1658, 1666, 1674, 1682, 1689, 1696, 1703, 1711, 1719, 1726, 1733, 1738, 1745, 1752, 1760, 1768, 1774, 1780, 1786, 1793, 1800, 1806, 1813, 1821, 1829, 1836, 1841, 1846, 1852, 1859, 1866, 1873, 1878, 1883, 1888, 1894, 1901, 1908, 1915, 1922, 1928, 1936, 1946, 1954, 1961, 1968, 1973, 1978, 1985, 1992, 1996, 2002, 2008, 2013, 2020, 2029, 2036, 2043, 2052, 2059, 2066, 2071, 2078, 2085, 2092, 2099, 2106, 2111, 2118, 2125, 2133, 2138, 2144, 2150, 2160, 2164, 2170, 2176, 2182, 2188, 2195, 2207, 2214, 2219, 2228, 2233, 2238, 2247, 2252, 2258, 2264, 2270, 2276, 2282, 2288, 2294, 2300, 2309, 2318, 2327, 2336, 2345, 2354, 2363, 2372, 2378, 2387, 2396, 2405, 2414, 2421, 2428, 2435, 2442, 2449, 2456, 2463, 2470, 2477, 2484, 2493, 2502, 2509, 2516, 2523, 2528, 2537, 2542, 2549, 2556, 2561, 2566, 2573, 2580, 2590, 2600, 2607, 2614, 2623, 2632, 2639, 2646, 2654, 2662, 2669, 2676, 2684, 2692, 2699, 2706, 2714, 2722, 2729, 2736, 2744, 2752, 2760, 2768, 2777, 2786, 2793, 2800, 2808, 2816, 2825, 2834, 2843, 2852, 2857, 2862, 2869, 2876, 0, 2886, 2891, 2896, 2903, 2910, 2917, 2924, 2931, 2938, 2947, 2956, 2964, 2972, 2979, 2986, 2995, 3004, 3011, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3018, 3024, 3029, 3036, 3043, 3049, 3057, 3065, 3072, 3077, 3082, 3089, 3095, 3102, 3111, 3120, 3129, 3136, 3141, 3146, 3151, 3158, 3164, 3171, 3178, 3184, 3189, 3194, 3203, 3211, 3220, 3225, 3231, 3242, 3249, 3257, 3266, 3271, 3277, 3283, 3290, 3295, 3301, 3312, 3321, 3330, 3338, 3346, 3355, 3360, 3367, 3374, 3379, 3391, 3399, 3407, 3413, 3422, 3427, 3432, 3439, 3445, 3451, 3457, 3462, 3471, 3479, 3484, 3492, 3497, 3505, 3512, 3517, 3523, 3528, 3536, 3544, 3549, 3557, 3563, 3568, 3575, 3583, 3592, 3599, 3606, 3616, 3623, 3630, 3640, 3647, 3654, 3661, 3667, 0, 0, 3673, 3677, 3684, 3688, 3692, 3698, 3707, 3714, 3718, 3722, 3726, 3731, 3737, 3741, 3746, 3752, 3758, 3763, 3769, 3774, 3779, 3784, 3789, 3794, 3795, 3800, 3803, 3809, 3815, 3822, 3827, 3835, 3843, 3849, 3856, 3864, 3872, 3877, 3882, 3887, 3892, 3893, 3895, 3898, 3900, 3902, 3907, 3912, 3918, 3923, 3927, 3931, 3935, 3942, 3949, 3956, 3963, 3970, 3977, 3986, 3995, 3999, 4003, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4008, 4013, 4018, 4022, 4024, 4026, 4029, 4031, 4034, 4036, 4040, 4044, 4050, 4052, 4056, 4061, 4067, 4070, 4074, 4080, 4084, 4089, 4094, 4099, 4104, 4109, 4114, 4118, 4121, 4127, 4132, 4137, 4142, 4147, 4153, 4159, 4162, 4166, 4170, 4174, 4177, 4180, 4184, 4188, 4195, 4199, 4203, 4207, 4213, 4216, 4220, 4225, 4231, 4235, 4241, 4247, 4253, 4259, 4265, 4271, 4274, 4278, 4282, 4285, 4289, 4295, 4301, 4305, 4309, 4315, 4318, 4322, 4327, 4332, 4336, 4340, 4344, 4350, 4355, 4359, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4364, 4367, 4372, 4377, 4382, 4387, 4392, 4397, 4402, 4407, 4412, 4417, 4422, 4427, 4432, 4437, 0, 0, 0, 0, 4442, 4445, 0, 0, 0, 0, 4449, 0, 0, 0, 4451, 0, 0, 0, 0, 0, 4455, 4458, 4463, 4470, 4475, 4483, 4490, 0, 4497, 0, 4505, 4513, 4520, 4530, 4535, 4540, 4545, 4550, 4555, 4560, 4565, 4570, 4575, 4580, 4585, 4590, 4595, 4600, 4605, 4610, 0, 4615, 4620, 4625, 4630, 4635, 4640, 4645, 4650, 4657, 4665, 4672, 4680, 4687, 4694, 4705, 4710, 4715, 4720, 4725, 4730, 4735, 4740, 4745, 4750, 4755, 4760, 4765, 4770, 4775, 4780, 4785, 4790, 4796, 4801, 4806, 4811, 4816, 4821, 4826, 4831, 4838, 4846, 4854, 4862, 0, 4869, 4873, 4877, 4884, 4894, 4904, 4908, 4912, 4916, 4922, 4929, 4933, 4938, 4942, 4947, 4951, 4956, 4960, 4965, 4971, 4977, 4983, 4989, 4995, 5001, 5007, 5013, 5019, 5025, 5031, 5037, 5043, 5049, 5053, 5057, 5063, 5067, 5072, 5078, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5085, 5092, 5097, 5102, 5107, 5114, 5119, 5125, 5130, 5135, 5140, 5145, 5150, 5155, 5161, 5166, 5171, 5175, 5180, 5185, 5190, 5195, 5200, 5205, 5210, 5214, 5219, 5223, 5228, 5233, 5238, 5242, 5247, 5252, 5257, 5262, 5266, 5271, 5276, 5281, 5286, 5291, 5296, 5302, 5307, 5313, 5317, 5322, 5326, 5330, 5335, 5340, 5345, 5350, 5355, 5360, 5365, 5369, 5374, 5378, 5383, 5388, 5393, 5397, 5402, 5407, 5412, 5417, 5421, 5426, 5431, 5436, 5441, 5446, 5451, 5457, 5462, 5468, 5472, 5477, 5481, 5488, 5493, 5498, 5503, 5510, 5515, 5521, 5526, 5531, 5536, 5541, 5546, 5551, 5557, 5562, 5567, 5572, 5577, 5582, 5587, 5593, 5599, 5606, 5613, 5622, 5631, 5638, 5645, 5654, 5663, 5668, 5673, 5678, 5683, 5688, 5693, 5698, 5703, 5714, 5725, 5730, 5735, 5742, 5749, 5756, 5763, 5768, 5773, 5778, 5783, 5787, 5791, 5795, 5800, 0, 5805, 5812, 5817, 5825, 5833, 5839, 5845, 5853, 5861, 5869, 5877, 5884, 5891, 5900, 5909, 5917, 5925, 5933, 5941, 5949, 5957, 5965, 5973, 5980, 5987, 5993, 5999, 6007, 6015, 6022, 6029, 6038, 6047, 6054, 6061, 6069, 6077, 6085, 6093, 6099, 6105, 6113, 6121, 6129, 6137, 6144, 6151, 6159, 6167, 6175, 6183, 6188, 6193, 6200, 6207, 6217, 6227, 6231, 6238, 6245, 6252, 6259, 6267, 6275, 6282, 6289, 6297, 6305, 6312, 6319, 6327, 0, 6335, 6341, 6347, 6353, 6359, 6365, 6371, 6378, 6385, 6390, 6395, 6402, 6409, 6416, 6423, 6430, 6437, 6444, 6451, 6457, 6463, 6469, 6475, 6481, 6487, 6493, 6499, 6507, 6515, 6521, 6527, 6533, 6539, 6545, 6551, 6558, 6565, 6572, 0, 0, 6579, 6586, 0, 0, 0, 0, 0, 0, 6593, 6600, 6607, 6614, 6621, 6628, 6635, 6642, 6649, 6656, 6663, 6670, 6677, 6684, 6691, 6698, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6705, 6710, 6715, 6720, 6725, 6730, 6735, 6740, 6745, 6749, 6754, 6759, 6764, 6769, 6774, 6779, 6784, 6789, 6794, 6799, 6804, 6809, 6814, 6819, 6824, 6829, 6834, 6839, 6844, 6849, 6854, 6859, 6864, 6869, 6874, 6879, 6884, 6889, 0, 0, 6894, 6901, 6904, 6908, 6912, 6915, 6919, 0, 6923, 6928, 6933, 6938, 6943, 6948, 6953, 6958, 6963, 6967, 6972, 6977, 6982, 6987, 6992, 6997, 7002, 7007, 7012, 7017, 7022, 7027, 7032, 7037, 7042, 7047, 7052, 7057, 7062, 7067, 7072, 7077, 7082, 7087, 7092, 7097, 7102, 7107, 7112, 0, 7119, 7122, 0, 0, 0, 0, 0, 0, 7125, 7129, 7133, 7137, 7143, 7149, 7153, 7157, 7161, 7165, 7169, 7173, 7177, 7183, 7187, 7193, 7199, 0, 7203, 7207, 7211, 7215, 7221, 7225, 7229, 7235, 7243, 7247, 7251, 7255, 7259, 7265, 7270, 7277, 7284, 7291, 7296, 7301, 7306, 7311, 7316, 0, 7321, 7326, 7334, 7339, 7344, 7349, 7354, 7360, 7366, 7373, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7377, 7381, 7385, 7389, 7393, 7397, 7401, 7405, 7409, 7413, 7417, 7422, 7426, 7430, 7435, 7439, 7444, 7448, 7452, 7456, 7461, 7465, 7470, 7474, 7478, 7482, 7486, 0, 0, 0, 0, 0, 7490, 7497, 7505, 7512, 7517, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7522, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7525, 0, 0, 0, 7528, 0, 7532, 7536, 7543, 7549, 7556, 7562, 7568, 7572, 7576, 7581, 7585, 7589, 7593, 7597, 7601, 7605, 7609, 7613, 7617, 7621, 7625, 7629, 7633, 7637, 7641, 7645, 0, 0, 0, 0, 0, 7649, 7652, 7656, 7660, 7664, 7668, 7672, 7676, 7680, 7684, 7689, 7693, 7696, 7699, 7702, 7705, 7708, 7711, 7714, 7717, 7721, 7724, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7727, 7732, 7736, 7740, 7744, 7748, 7752, 7756, 7760, 7764, 7768, 7772, 7777, 7782, 7789, 7795, 7801, 7807, 7812, 7820, 7828, 7834, 7841, 7848, 7854, 7861, 7865, 7869, 7873, 7879, 7890, 7894, 7898, 7902, 7908, 7917, 7921, 7925, 7934, 7938, 7942, 7946, 7953, 7960, 7972, 7976, 7980, 7984, 7996, 8006, 8010, 8017, 8024, 8031, 8040, 8051, 8060, 8064, 8074, 8084, 8093, 8109, 8118, 8128, 8138, 8148, 8154, 8163, 8170, 8174, 8184, 8188, 8195, 8205, 8209, 8215, 8222, 8229, 8233, 8243, 8247, 8254, 8258, 8267, 8271, 8281, 8287, 8293, 8302, 8311, 8317, 8322, 8326, 8332, 8341, 8346, 8353, 8359, 8364, 8372, 8379, 8386, 8392, 8396, 8399, 8403, 8409, 8418, 8422, 8428, 8434, 8440, 8447, 8450, 8459, 8464, 8472, 8475, 8479, 8492, 8505, 8512, 8519, 8525, 8533, 8539, 8545, 8555, 8563, 8573, 8584, 8591, 8597, 8603, 8607, 8611, 8617, 8623, 8629, 8637, 8645, 8657, 0, 0, 8663, 8670, 8676, 8682, 8688, 8694, 8700, 8706, 8712, 8718, 8724, 8730, 8737, 8744, 8750, 0, 8758, 8764, 8769, 8774, 8779, 8784, 8788, 8795, 8801, 8810, 8818, 8821, 8826, 8831, 0, 8836, 8840, 8844, 8850, 8854, 8858, 8864, 8868, 8876, 8880, 8884, 8888, 8892, 8896, 8902, 8906, 8912, 8916, 8920, 8924, 8928, 8932, 8937, 8940, 8944, 8949, 8953, 8957, 8961, 8965, 0, 0, 0, 8969, 8973, 8977, 8982, 8986, 8990, 8995, 8999, 9003, 9010, 9017, 9021, 9025, 9030, 9034, 9038, 9041, 9045, 9048, 9051, 9057, 9063, 9069, 9075, 9080, 9085, 9088, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9091, 9095, 9099, 9103, 9107, 9111, 9115, 9119, 9123, 9127, 9131, 9135, 9139, 9143, 9147, 9151, 9155, 9159, 9163, 9167, 9171, 9175, 9179, 9183, 9187, 9191, 9195, 9199, 9203, 9207, 9211, 9215, 9219, 9222, 9226, 9230, 9234, 9238, 9242, 9245, 9248, 9251, 9254, 9257, 9260, 9263, 9266, 9269, 9272, 9275, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9279, 9283, 9287, 0, 9291, 9294, 9298, 9301, 9305, 9308, 9312, 9316, 9320, 9325, 9329, 9332, 9336, 9341, 9345, 9348, 9352, 9355, 9359, 9363, 9367, 9371, 9375, 9379, 9383, 9387, 9391, 9395, 9399, 9403, 9407, 9411, 9415, 9419, 9423, 9427, 9431, 9435, 9439, 9443, 9447, 9451, 9454, 9457, 9461, 9465, 9469, 9473, 9477, 9481, 9485, 9489, 9493, 0, 0, 9497, 9501, 9505, 9510, 9514, 9519, 9523, 9528, 9533, 9539, 9545, 9550, 9554, 9559, 9565, 9570, 9574, 9579, 0, 0, 9583, 9586, 9592, 9598, 9603, 0, 0, 0, 9608, 9612, 9616, 9620, 9624, 9628, 9632, 9636, 9640, 9645, 9650, 9655, 9661, 9664, 9668, 9672, 9675, 9678, 9681, 9684, 9687, 9690, 9693, 9696, 9699, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9703, 9707, 9711, 0, 9715, 9718, 9722, 9725, 9729, 9732, 9736, 9740, 0, 0, 9744, 9747, 0, 0, 9751, 9754, 9758, 9761, 9765, 9769, 9773, 9777, 9781, 9785, 9789, 9793, 9797, 9801, 9805, 9809, 9813, 9817, 9821, 9825, 9829, 9833, 0, 9837, 9841, 9845, 9849, 9853, 9856, 9859, 0, 9863, 0, 0, 0, 9867, 9871, 9875, 9879, 0, 0, 9883, 0, 9887, 9892, 9896, 9901, 9905, 9910, 9915, 0, 0, 9921, 9925, 0, 0, 9930, 9934, 9939, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9943, 0, 0, 0, 0, 9949, 9953, 0, 9957, 9961, 9966, 9971, 9976, 0, 0, 9982, 9986, 9989, 9992, 9995, 9998, 10001, 10004, 10007, 10010, 10013, 10022, 10030, 10034, 10038, 10044, 10050, 10056, 10062, 10077, 10084, 0, 0, 0, 0, 0, 0, 0, 10087, 0, 0, 10091, 10094, 10098, 10101, 10105, 10108, 0, 0, 0, 0, 10112, 10116, 0, 0, 10120, 10124, 10128, 10131, 10135, 10139, 10143, 10147, 10151, 10155, 10159, 10163, 10167, 10171, 10175, 10179, 10183, 10187, 10191, 10195, 10199, 10203, 0, 10207, 10211, 10215, 10219, 10223, 10226, 10229, 0, 10233, 10237, 0, 10241, 10245, 0, 10249, 10253, 0, 0, 10257, 0, 10261, 10266, 10270, 10275, 10279, 0, 0, 0, 0, 10284, 10289, 0, 0, 10294, 10299, 10304, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10308, 10312, 10316, 10320, 0, 10324, 0, 0, 0, 0, 0, 0, 0, 10328, 10332, 10335, 10338, 10341, 10344, 10347, 10350, 10353, 10356, 10359, 10362, 10365, 10368, 10371, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10376, 10380, 10384, 0, 10388, 10391, 10395, 10398, 10402, 10405, 10409, 0, 10413, 0, 10418, 10421, 10425, 0, 10430, 10433, 10437, 10440, 10444, 10448, 10452, 10456, 10460, 10464, 10468, 10472, 10476, 10480, 10484, 10488, 10492, 10496, 10500, 10504, 10508, 10512, 0, 10516, 10520, 10524, 10528, 10532, 10535, 10538, 0, 10542, 10546, 0, 10550, 10554, 10558, 10562, 10566, 0, 0, 10570, 10574, 10578, 10583, 10587, 10592, 10596, 10601, 10606, 10612, 0, 10618, 10622, 10627, 0, 10633, 10637, 10642, 0, 0, 10646, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10649, 0, 0, 0, 0, 0, 10654, 10658, 10661, 10664, 10667, 10670, 10673, 10676, 10679, 10682, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10685, 10689, 10693, 0, 10697, 10700, 10704, 10707, 10711, 10714, 10718, 10722, 0, 0, 10726, 10729, 0, 0, 10733, 10736, 10740, 10743, 10747, 10751, 10755, 10759, 10763, 10767, 10771, 10775, 10779, 10783, 10787, 10791, 10795, 10799, 10803, 10807, 10811, 10815, 0, 10819, 10823, 10827, 10831, 10835, 10838, 10841, 0, 10845, 10849, 0, 0, 10853, 10857, 10861, 10865, 0, 0, 10869, 10873, 10877, 10882, 10886, 10891, 10895, 10900, 0, 0, 0, 10905, 10909, 0, 0, 10914, 10918, 10923, 0, 0, 0, 0, 0, 0, 0, 0, 10927, 10933, 0, 0, 0, 0, 10939, 10943, 0, 10947, 10951, 10956, 0, 0, 0, 0, 10961, 10965, 10968, 10971, 10974, 10977, 10980, 10983, 10986, 10989, 10992, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 10995, 10999, 0, 11003, 11006, 11010, 11013, 11017, 11020, 0, 0, 0, 11024, 11027, 11031, 0, 11035, 11038, 11042, 11046, 0, 0, 0, 11049, 11053, 0, 11057, 0, 11061, 11065, 0, 0, 0, 11069, 11073, 0, 0, 0, 11077, 11081, 11085, 0, 0, 0, 11089, 11092, 11095, 11099, 11103, 11107, 11111, 11115, 0, 11119, 11123, 11127, 0, 0, 0, 0, 11131, 11136, 11140, 11145, 11149, 0, 0, 0, 11154, 11158, 11163, 0, 11168, 11172, 11177, 11182, 0, 0, 0, 0, 0, 0, 0, 0, 0, 11186, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 11192, 11195, 11198, 11201, 11204, 11207, 11210, 11213, 11216, 11219, 11223, 11229, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 11235, 11239, 11243, 0, 11247, 11250, 11254, 11257, 11261, 11264, 11268, 11272, 0, 11276, 11279, 11283, 0, 11287, 11290, 11294, 11298, 11301, 11305, 11309, 11313, 11317, 11321, 11325, 11329, 11333, 11337, 11341, 11345, 11349, 11353, 11357, 11361, 11365, 11369, 11373, 0, 11377, 11381, 11385, 11389, 11393, 11396, 11399, 11403, 11407, 11411, 0, 11415, 11419, 11423, 11427, 11431, 0, 0, 0, 0, 11435, 11440, 11444, 11449, 11453, 11458, 11463, 0, 11469, 11473, 11478, 0, 11483, 11487, 11492, 11497, 0, 0, 0, 0, 0, 0, 0, 11501, 11505, 0, 0, 0, 0, 0, 0, 0, 0, 0, 11511, 11516, 0, 0, 0, 0, 11521, 11525, 11528, 11531, 11534, 11537, 11540, 11543, 11546, 11549, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 11552, 11556, 0, 11560, 11563, 11567, 11570, 11574, 11577, 11581, 11585, 0, 11589, 11592, 11596, 0, 11600, 11603, 11607, 11611, 11614, 11618, 11622, 11626, 11630, 11634, 11638, 11642, 11646, 11650, 11654, 11658, 11662, 11666, 11670, 11674, 11678, 11682, 11686, 0, 11690, 11694, 11698, 11702, 11706, 11709, 11712, 11716, 11720, 11724, 0, 11728, 11732, 11736, 11740, 11744, 0, 0, 0, 0, 11748, 11753, 11757, 11762, 11766, 11771, 11776, 0, 11782, 11786, 11791, 0, 11796, 11800, 11805, 11810, 0, 0, 0, 0, 0, 0, 0, 11814, 11818, 0, 0, 0, 0, 0, 0, 0, 11824, 0, 11828, 11833, 0, 0, 0, 0, 11838, 11842, 11845, 11848, 11851, 11854, 11857, 11860, 11863, 11866, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 11869, 11873, 0, 11877, 11880, 11884, 11887, 11891, 11894, 11898, 11902, 0, 11906, 11909, 11913, 0, 11917, 11920, 11924, 11928, 11931, 11935, 11939, 11943, 11947, 11951, 11955, 11959, 11963, 11967, 11971, 11975, 11979, 11983, 11987, 11991, 11995, 11999, 12003, 0, 12007, 12011, 12015, 12019, 12023, 12026, 12029, 12033, 12037, 12041, 12045, 12049, 12053, 12057, 12061, 12065, 0, 0, 0, 0, 12069, 12074, 12078, 12083, 12087, 12092, 0, 0, 12097, 12101, 12106, 0, 12111, 12115, 12120, 12125, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12129, 0, 0, 0, 0, 0, 0, 0, 0, 12135, 12140, 0, 0, 0, 0, 12145, 12149, 12152, 12155, 12158, 12161, 12164, 12167, 12170, 12173, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12176, 12180, 0, 12184, 12188, 12192, 12196, 12200, 12204, 12208, 12212, 12216, 12220, 12224, 12228, 12232, 12236, 12240, 12244, 12248, 12252, 0, 0, 0, 12256, 12262, 12268, 12274, 12280, 12286, 12292, 12298, 12304, 12310, 12316, 12322, 12330, 12336, 12342, 12348, 12354, 12360, 12366, 12372, 12378, 12384, 12390, 12396, 0, 12402, 12408, 12414, 12420, 12426, 12432, 12436, 12442, 12446, 0, 12450, 0, 0, 12456, 12460, 12466, 12472, 12478, 12482, 12488, 0, 0, 0, 12492, 0, 0, 0, 0, 12496, 12501, 12508, 12515, 12522, 12529, 0, 12536, 0, 12543, 12548, 12553, 12560, 12567, 12576, 12587, 12596, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12601, 12608, 12615, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12620, 12626, 12632, 12638, 12644, 12650, 12656, 12662, 12668, 12674, 12680, 12686, 12692, 12698, 12704, 12709, 12715, 12721, 12727, 12733, 12739, 12744, 12750, 12756, 12762, 12768, 12774, 12780, 12786, 12792, 12798, 12804, 12810, 12815, 12821, 12827, 12831, 12837, 12841, 12847, 12853, 12859, 12865, 12871, 12877, 12882, 12888, 12892, 12897, 12903, 12909, 12915, 12920, 12926, 12932, 12938, 12943, 12949, 0, 0, 0, 0, 12953, 12959, 12964, 12970, 12975, 12983, 12991, 12995, 12999, 13003, 13009, 13015, 13021, 13027, 13031, 13035, 13039, 13043, 13047, 13050, 13053, 13056, 13059, 13062, 13065, 13068, 13071, 13074, 13078, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 13082, 13086, 0, 13092, 0, 0, 13098, 13102, 0, 13106, 0, 0, 13112, 0, 0, 0, 0, 0, 0, 13116, 13120, 13123, 13129, 0, 13135, 13139, 13143, 13147, 13153, 13159, 13165, 0, 13171, 13175, 13179, 0, 13185, 0, 13191, 0, 0, 13195, 13201, 0, 13207, 13210, 13216, 13219, 13223, 13230, 13235, 13240, 13244, 13249, 13253, 13258, 13262, 0, 13267, 13274, 13280, 0, 0, 13286, 13290, 13295, 13299, 13304, 0, 13309, 0, 13314, 13321, 13328, 13335, 13342, 13346, 0, 0, 13349, 13353, 13356, 13359, 13362, 13365, 13368, 13371, 13374, 13377, 0, 0, 13380, 13385, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 13390, 13394, 13405, 13420, 13435, 13445, 13456, 13469, 13480, 13486, 13494, 13504, 13510, 13518, 13522, 13528, 13534, 13542, 13552, 13560, 13573, 13579, 13587, 13595, 13607, 13615, 13623, 13631, 13639, 13647, 13655, 13663, 13673, 13677, 13680, 13683, 13686, 13689, 13692, 13695, 13698, 13701, 13704, 13708, 13712, 13716, 13720, 13724, 13728, 13732, 13736, 13740, 13745, 13751, 13761, 13775, 13785, 13791, 13797, 13805, 13813, 13821, 13829, 13835, 13841, 13844, 13848, 13852, 13856, 13860, 13864, 13868, 0, 13872, 13876, 13880, 13884, 13888, 13892, 13896, 13900, 13904, 13908, 13912, 13916, 13920, 13924, 13928, 13932, 13935, 13939, 13943, 13947, 13951, 13955, 13959, 13963, 13967, 13970, 13974, 13978, 13982, 13986, 13990, 13994, 13997, 14001, 0, 0, 0, 0, 0, 0, 14007, 14012, 14016, 14021, 14025, 14030, 14035, 14041, 14046, 14052, 14056, 14061, 14065, 14070, 14080, 14086, 14091, 14097, 14107, 14113, 14117, 14121, 14127, 14133, 14141, 14147, 14155, 0, 0, 0, 0, 14163, 14167, 14172, 14177, 14182, 14187, 14192, 14197, 0, 14202, 14207, 14212, 14217, 14222, 14227, 14232, 14237, 14242, 14247, 14252, 14257, 14262, 14267, 14272, 14277, 14281, 14286, 14291, 14296, 14301, 14306, 14311, 14316, 14321, 14325, 14330, 14335, 14340, 14345, 14350, 14355, 14359, 14364, 14371, 14377, 0, 14384, 14391, 14404, 14411, 14418, 14426, 14434, 14440, 14446, 14452, 14462, 14468, 14474, 14484, 14494, 0, 0, 14504, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 14512, 14515, 14519, 14523, 14527, 14531, 14535, 14539, 14543, 14547, 14551, 14555, 14559, 14563, 14567, 14571, 14575, 14579, 14583, 14587, 14591, 14595, 14599, 14603, 14607, 14611, 14614, 14617, 14621, 14625, 14629, 14633, 14637, 14641, 0, 14644, 14647, 14651, 14654, 14658, 0, 14661, 14664, 0, 14668, 14673, 14677, 14682, 14686, 14691, 14695, 0, 0, 0, 14700, 14704, 14708, 14712, 0, 0, 0, 0, 0, 0, 14716, 14720, 14723, 14726, 14729, 14732, 14735, 14738, 14741, 14744, 14747, 14753, 14757, 14761, 14765, 14769, 14773, 14777, 14781, 14785, 14790, 14794, 14799, 14804, 14810, 14815, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 14821, 14826, 14831, 14836, 14841, 14846, 14851, 14856, 14861, 14866, 14871, 14876, 14881, 14886, 14891, 14896, 14901, 14906, 14911, 14916, 14921, 14926, 14931, 14936, 14941, 14946, 14951, 14956, 14961, 14966, 14971, 14976, 14981, 14986, 14991, 14996, 15001, 15006, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 15011, 15015, 15019, 15023, 15027, 15031, 15035, 15039, 15043, 15047, 15051, 15055, 15059, 15063, 15067, 15071, 15075, 15079, 15083, 15087, 15091, 15095, 15099, 15103, 15107, 15111, 15115, 15119, 15123, 15127, 15131, 15135, 15139, 15143, 15147, 15151, 15155, 15159, 15163, 15167, 15171, 0, 0, 15175, 0, 0, 0, 0, 15180, 15184, 15188, 15192, 15196, 15200, 15204, 15208, 15212, 15216, 15220, 15224, 15228, 15232, 15236, 15240, 15244, 15248, 15252, 15256, 15260, 15264, 15268, 15272, 15276, 15280, 15284, 15288, 15292, 15296, 15300, 15304, 15308, 15312, 15316, 15320, 15324, 15328, 15332, 15336, 15340, 15344, 15348, 15352, 15356, 15360, 15364, 15368, 15372, 15376, 15380, 15384, 15388, 15392, 15396, 15400, 15404, 15408, 15412, 15416, 15420, 15424, 15428, 15432, 15436, 15440, 15444, 15448, 15452, 15456, 15460, 15464, 15468, 15472, 15476, 15480, 15484, 15488, 15492, 15496, 15500, 15504, 15508, 15512, 15516, 15520, 15524, 15528, 15532, 15536, 0, 0, 0, 0, 0, 15540, 15544, 15548, 15551, 15555, 15558, 15562, 15566, 15569, 15573, 15577, 15580, 15584, 15588, 15592, 15596, 15599, 15603, 15607, 15611, 15615, 15619, 15623, 15626, 15630, 15634, 15638, 15642, 15646, 15650, 15654, 15658, 15662, 15666, 15670, 15674, 15678, 15682, 15686, 15690, 15694, 15698, 15702, 15706, 15710, 15714, 15718, 15722, 15726, 15730, 15734, 15738, 15742, 15746, 15750, 15754, 15758, 15762, 15766, 15770, 15774, 15778, 15782, 15786, 15790, 15794, 15798, 15802, 0, 0, 0, 0, 0, 15806, 15810, 15814, 15818, 15822, 15826, 15830, 15834, 15838, 15842, 15846, 15850, 15854, 15858, 15862, 15866, 15870, 15874, 15878, 15882, 15886, 15890, 15894, 15898, 15902, 15906, 15910, 15914, 15918, 15922, 15926, 15930, 15934, 15938, 15942, 15946, 15950, 15954, 15958, 15962, 15966, 15970, 15974, 15978, 15982, 15986, 15990, 15994, 15998, 16002, 16006, 16010, 16014, 16018, 16022, 16026, 16030, 16034, 16038, 16042, 16046, 16050, 16054, 16058, 16062, 16066, 16070, 16074, 16078, 16082, 16086, 16090, 16094, 16098, 16102, 16106, 16110, 16114, 16118, 16122, 16126, 16130, 0, 0, 0, 0, 0, 0, 16134, 16138, 16142, 16146, 16150, 16154, 16158, 0, 16162, 16166, 16170, 16174, 16178, 16182, 16186, 16190, 16194, 16198, 16202, 16206, 16210, 16214, 16218, 16222, 16226, 16229, 16233, 16237, 16241, 16245, 16249, 16253, 16257, 16261, 16265, 16269, 16273, 16277, 16281, 16285, 16289, 16293, 16297, 16301, 16305, 16309, 16313, 16317, 16321, 16325, 16329, 16333, 16337, 16341, 16345, 16349, 16353, 16357, 16361, 16365, 16369, 16373, 16377, 16381, 16385, 16389, 16393, 16397, 16401, 16405, 16409, 0, 16413, 0, 16417, 16421, 16425, 16429, 0, 0, 16433, 16437, 16441, 16445, 16449, 16453, 16457, 0, 16461, 0, 16465, 16469, 16473, 16477, 0, 0, 16481, 16485, 16489, 16493, 16497, 16501, 16505, 16509, 16513, 16517, 16521, 16525, 16529, 16533, 16537, 16541, 16545, 16549, 16553, 16557, 16561, 16565, 16569, 16572, 16576, 16580, 16584, 16588, 16592, 16596, 16600, 16604, 16608, 16612, 16616, 16620, 16624, 16628, 16632, 0, 16636, 0, 16640, 16644, 16648, 16652, 0, 0, 16656, 16660, 16664, 16668, 16672, 16676, 16680, 16684, 16688, 16692, 16696, 16700, 16704, 16708, 16712, 16716, 16720, 16725, 16730, 16735, 16741, 16747, 16752, 16757, 16763, 16766, 16770, 16774, 16778, 16782, 16786, 0, 16790, 0, 16794, 16798, 16802, 16806, 0, 0, 16810, 16814, 16818, 16822, 16826, 16830, 16834, 0, 16838, 0, 16842, 16846, 16850, 16854, 0, 0, 16858, 16862, 16866, 16870, 16874, 16878, 16882, 0, 16886, 16891, 16896, 16901, 16907, 16913, 16918, 0, 16923, 16927, 16931, 16935, 16939, 16943, 16947, 16951, 16955, 16959, 16963, 16967, 16971, 16975, 16979, 16983, 16987, 16990, 16994, 16998, 17002, 17006, 17010, 0, 17014, 17018, 17022, 17026, 17030, 17034, 17038, 17042, 17046, 17050, 17054, 17058, 17062, 17066, 17070, 17074, 17078, 17082, 17086, 17090, 17094, 17098, 17102, 17106, 17110, 17114, 17118, 17122, 17126, 17130, 17134, 0, 17138, 0, 17142, 17146, 17150, 17154, 0, 0, 17158, 17162, 17166, 17170, 17174, 17178, 17182, 0, 17186, 17190, 17194, 17198, 17202, 17206, 17210, 17214, 17218, 17222, 17226, 17230, 17234, 17238, 17242, 17246, 17250, 17254, 17258, 17262, 17266, 17270, 17274, 17278, 17282, 17286, 17290, 17294, 17298, 17302, 17306, 17310, 17314, 17318, 17322, 17326, 17330, 17334, 17338, 0, 17342, 17346, 17350, 17354, 17358, 17362, 17366, 17370, 17374, 17378, 17382, 17386, 17390, 17394, 17398, 17402, 17406, 17410, 17414, 0, 0, 0, 0, 0, 0, 17418, 17421, 17424, 17427, 17430, 17433, 17438, 17442, 17447, 17450, 17453, 17456, 17459, 17462, 17465, 17468, 17471, 17474, 17478, 17482, 17486, 17490, 17494, 17498, 17502, 17506, 17510, 17514, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 17520, 17523, 17526, 17529, 17532, 17535, 17538, 17542, 17545, 17549, 17553, 17557, 17561, 17565, 17569, 17573, 17577, 17581, 17585, 17589, 17593, 17597, 17601, 17605, 17609, 17613, 17616, 17620, 17624, 17628, 17632, 17636, 17640, 17644, 17648, 17652, 17656, 17660, 17664, 17668, 17672, 17676, 17680, 17684, 17688, 17692, 17695, 17699, 17703, 17707, 17711, 17715, 17719, 17723, 17727, 17731, 17735, 17739, 17743, 17747, 17751, 17755, 17759, 17763, 17767, 17771, 17775, 17779, 17783, 17787, 17791, 17795, 17799, 17803, 17807, 17811, 17815, 17819, 17823, 17827, 17830, 17834, 17838, 17842, 17846, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 17850, 17853, 17857, 17860, 17864, 17867, 17871, 17877, 17882, 17886, 17889, 17893, 17897, 17902, 17906, 17911, 17915, 17920, 17924, 17929, 17933, 17938, 17944, 17948, 17953, 17957, 17962, 17968, 17972, 17977, 17982, 17986, 17990, 17998, 18006, 18013, 18018, 18023, 18031, 18037, 18043, 18048, 18054, 18058, 18062, 18066, 18070, 18074, 18078, 18082, 18086, 18090, 18094, 18100, 18105, 18110, 18114, 18118, 18122, 18127, 18131, 18136, 18140, 18145, 18149, 18154, 18158, 18163, 18167, 18172, 18176, 18181, 18187, 18190, 18194, 18198, 18202, 18206, 18210, 18214, 18217, 18221, 18227, 18232, 18237, 18241, 18245, 18249, 18254, 18258, 18263, 18267, 18272, 18275, 18279, 18283, 18288, 18292, 18297, 18301, 18306, 18312, 18315, 18319, 18323, 18327, 18331, 18335, 18339, 18343, 18347, 18351, 18355, 18361, 18364, 18368, 18372, 18377, 18381, 18386, 18390, 18395, 18399, 18404, 18408, 18413, 18417, 18422, 18426, 18431, 18437, 18440, 18444, 18450, 18456, 18462, 18468, 18472, 18476, 18480, 18484, 18488, 18492, 18498, 18502, 18506, 18510, 18515, 18519, 18524, 18528, 18533, 18537, 18542, 18546, 18551, 18555, 18560, 18564, 18569, 18575, 18578, 18584, 18588, 18592, 18596, 18600, 18604, 18608, 18614, 18617, 18621, 18625, 18630, 18634, 18639, 18643, 18648, 18652, 18657, 18661, 18666, 18670, 18675, 18679, 18684, 18690, 18693, 18697, 18701, 18706, 18711, 18715, 18719, 18723, 18727, 18731, 18735, 18741, 18745, 18749, 18753, 18758, 18762, 18767, 18771, 18776, 18782, 18785, 18790, 18794, 18798, 18802, 18806, 18810, 18814, 18818, 18824, 18828, 18832, 18836, 18841, 18845, 18850, 18854, 18859, 18863, 18868, 18872, 18877, 18881, 18886, 18890, 18895, 18898, 18902, 18906, 18910, 18914, 18918, 18922, 18926, 18930, 18936, 18940, 18944, 18948, 18953, 18957, 18962, 18966, 18971, 18975, 18980, 18984, 18989, 18993, 18998, 19002, 19007, 19013, 19016, 19021, 19025, 19030, 19036, 19042, 19048, 19054, 19060, 19066, 19072, 19076, 19080, 19084, 19088, 19092, 19096, 19100, 19104, 19109, 19113, 19118, 19122, 19127, 19131, 19136, 19140, 19145, 19149, 19154, 19158, 19163, 19167, 19171, 19175, 19179, 19183, 19187, 19191, 19197, 19200, 19204, 19208, 19213, 19217, 19222, 19226, 19231, 19235, 19240, 19244, 19249, 19253, 19258, 19262, 19267, 19273, 19276, 19281, 19285, 19291, 19295, 19301, 19306, 19310, 19314, 19318, 19322, 19326, 19331, 19335, 19339, 19344, 19348, 19353, 19356, 19360, 19364, 19368, 19372, 19376, 19380, 19384, 19388, 19392, 19396, 19400, 19405, 19408, 19412, 19418, 19422, 19428, 19432, 19438, 19442, 19446, 19450, 19454, 19458, 19463, 19467, 19471, 19475, 19479, 19483, 19487, 19491, 19495, 19499, 19503, 19509, 19515, 19521, 19527, 19533, 19539, 19545, 19550, 19555, 19559, 19563, 19567, 19571, 19575, 19579, 19583, 19587, 19590, 19594, 19598, 19602, 19606, 19611, 19616, 19621, 19626, 19630, 19634, 19638, 19642, 19646, 19650, 19654, 19658, 19662, 19668, 19674, 19680, 19686, 19692, 19698, 19704, 19710, 19716, 19720, 19724, 19728, 19732, 19736, 19740, 19744, 19750, 19756, 19762, 19768, 19774, 19780, 19786, 19792, 19797, 19802, 19807, 19812, 19817, 19823, 19829, 19835, 19841, 19847, 19853, 19859, 19865, 19871, 19877, 19883, 19888, 19894, 19900, 19906, 19912, 19917, 19922, 19927, 19932, 19937, 19942, 19947, 19952, 19957, 19962, 19967, 19972, 19977, 19982, 19987, 19992, 19997, 20002, 20007, 20012, 20017, 20022, 20027, 20032, 20037, 20042, 20047, 20052, 20057, 20062, 20067, 20072, 20077, 20082, 20087, 20092, 20097, 20102, 20107, 20112, 20117, 20122, 20126, 20131, 20136, 20141, 20146, 20151, 20156, 20161, 20166, 20171, 20176, 20181, 20186, 20191, 20196, 20201, 20206, 20211, 20216, 20221, 20226, 20231, 20236, 20241, 20246, 20251, 20256, 20261, 20266, 20271, 20276, 20280, 20285, 20290, 20295, 20300, 20305, 20309, 20314, 20320, 20325, 20330, 20335, 20340, 20346, 20351, 20356, 20361, 20366, 20371, 20376, 20381, 20386, 20391, 20396, 20401, 20406, 20411, 20416, 20421, 20426, 20431, 20436, 20441, 20446, 20451, 20456, 20461, 20466, 20471, 20476, 20481, 20486, 20491, 20496, 20501, 20506, 20511, 20516, 20521, 20526, 20531, 20536, 20541, 20546, 20551, 20556, 20561, 20565, 20570, 20575, 20580, 20585, 20590, 20595, 20600, 20605, 20610, 20615, 20620, 20625, 20630, 20635, 20640, 20645, 20650, 20655, 20660, 20665, 20670, 20675, 20680, 20685, 20690, 20695, 20700, 20705, 20710, 20715, 20720, 20725, 20730, 20735, 20740, 20745, 20750, 20755, 20760, 20764, 20768, 20772, 20776, 20780, 20784, 20788, 20792, 0, 0, 0, 0, 0, 0, 0, 0, 0, 20796, 20801, 20806, 20811, 20816, 20821, 20826, 20831, 20836, 20841, 20846, 20851, 20856, 20861, 20866, 20871, 20876, 20881, 20886, 20891, 20896, 20901, 20906, 20911, 20916, 20921, 20926, 20931, 20936, 0, 0, 0, 20942, 20951, 20954, 20961, 20965, 20968, 20971, 20979, 20983, 20988, 20993, 20998, 21002, 21007, 21012, 21015, 21019, 21023, 21032, 21036, 21040, 21045, 21048, 21052, 21059, 21063, 21070, 21075, 21080, 21085, 21090, 21099, 21104, 21108, 21117, 21120, 21125, 21129, 21135, 21140, 21146, 21153, 21159, 21164, 21171, 21176, 21179, 21182, 21191, 21196, 21199, 21208, 21213, 21217, 21221, 21228, 21235, 21240, 21245, 21254, 21258, 21262, 21266, 21273, 21280, 21284, 21288, 21292, 21296, 21300, 21304, 21308, 21312, 21316, 21319, 21322, 21327, 21332, 21337, 21341, 21345, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21349, 21353, 21357, 21361, 21365, 21370, 21375, 21380, 21385, 21390, 21395, 21400, 21404, 0, 21408, 21413, 21418, 21423, 21428, 21433, 21438, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21443, 21447, 21451, 21455, 21459, 21464, 21469, 21474, 21479, 21484, 21489, 21494, 21498, 21502, 21507, 21512, 21517, 21522, 21527, 21532, 21537, 21542, 21548, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21553, 21557, 21561, 21565, 21569, 21574, 21579, 21584, 21589, 21594, 21599, 21604, 21608, 21612, 21617, 21622, 21627, 21632, 21637, 21642, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21647, 21651, 21655, 21659, 21663, 21668, 21673, 21678, 21683, 21688, 21693, 21698, 21702, 0, 21706, 21711, 21716, 0, 21721, 21726, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21731, 21734, 21738, 21742, 21746, 21750, 21754, 21758, 21762, 21766, 21770, 21774, 21778, 21782, 21786, 21790, 21794, 21798, 21801, 21805, 21809, 21813, 21817, 21821, 21825, 21829, 21833, 21837, 21841, 21845, 21849, 21853, 21857, 21861, 21865, 21869, 21875, 21881, 21887, 21893, 21899, 21905, 21911, 21917, 21923, 21929, 21935, 21941, 21947, 21953, 21962, 21971, 21977, 21983, 21989, 21994, 21998, 22003, 22007, 22012, 22016, 22021, 22026, 22031, 22035, 22040, 22044, 22049, 22054, 22059, 22064, 22068, 22072, 22076, 22080, 22084, 22088, 22092, 22096, 22100, 22104, 22110, 22114, 22118, 22122, 22126, 22130, 22138, 22144, 22148, 22154, 22158, 22164, 0, 0, 0, 22168, 22172, 22175, 22178, 22181, 22184, 22187, 22190, 22193, 22196, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 22199, 22202, 22205, 22208, 22211, 22214, 22219, 22226, 22234, 22239, 22244, 22247, 22255, 22263, 22271, 0, 22275, 22279, 22282, 22285, 22288, 22291, 22294, 22297, 22300, 22303, 0, 0, 0, 0, 0, 0, 22306, 22309, 22312, 22315, 22318, 22321, 22325, 22329, 22333, 22337, 22341, 22345, 22349, 22353, 22357, 22360, 22364, 22368, 22372, 22376, 22380, 22384, 22388, 22391, 22395, 22399, 22403, 22406, 22410, 22414, 22418, 22422, 22426, 22430, 22434, 22438, 22445, 22450, 22455, 22460, 22465, 22471, 22477, 22483, 22489, 22495, 22501, 22507, 22512, 22518, 22524, 22530, 22536, 22542, 22547, 22553, 22558, 22564, 22570, 22576, 22582, 22588, 22593, 22598, 22604, 22610, 22615, 22621, 22626, 22632, 22638, 22644, 22650, 22656, 22662, 22668, 22674, 22680, 22686, 22692, 22698, 22704, 22710, 22716, 22721, 22726, 22732, 22738, 0, 0, 0, 0, 0, 0, 0, 0, 22744, 22751, 22758, 22764, 22770, 22778, 22784, 22792, 22797, 22802, 22807, 22813, 22819, 22825, 22831, 22837, 22843, 22849, 22855, 22861, 22867, 22873, 22879, 22885, 22891, 22899, 22907, 22915, 22923, 22931, 22939, 22947, 22955, 22963, 22971, 22979, 22987, 22995, 23003, 23009, 23015, 23023, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23029, 23037, 23045, 23053, 23061, 23069, 23077, 23085, 23093, 23103, 23113, 23121, 23129, 23137, 23145, 23153, 23161, 23169, 23177, 23185, 23193, 23202, 23211, 23220, 23229, 23236, 23243, 23250, 23257, 23266, 23275, 23283, 23291, 23298, 23305, 23313, 23321, 23329, 23337, 23344, 23351, 23359, 23367, 23376, 23385, 23392, 23399, 23408, 23417, 23424, 23431, 23439, 23447, 23455, 23463, 23471, 23479, 23490, 23501, 23509, 23517, 23525, 23533, 23540, 23547, 23555, 23563, 23571, 23579, 23587, 23595, 23603, 23611, 23619, 23627, 23635, 23643, 23651, 23659, 23667, 23675, 23684, 23693, 23702, 23711, 23718, 23725, 23733, 23741, 23749, 23757, 23765, 23773, 23784, 23795, 23803, 23811, 23819, 23827, 23835, 23843, 23854, 23865, 23876, 23887, 23899, 23911, 23919, 23927, 23935, 23943, 23951, 23959, 23967, 23975, 23983, 23991, 23998, 24005, 24012, 24019, 24027, 24035, 24044, 24053, 24060, 24067, 24075, 24083, 24090, 24097, 24104, 24111, 24118, 24125, 24133, 24141, 24149, 24157, 24165, 24173, 24180, 24187, 24195, 24203, 24211, 24219, 24227, 24235, 24243, 24251, 24259, 24266, 24275, 24284, 24293, 0, 0, 0, 0, 24302, 24309, 24316, 24324, 24332, 24340, 24348, 24356, 24364, 24374, 24384, 24392, 24400, 24409, 24418, 24427, 24436, 24445, 24454, 24465, 24476, 24485, 24494, 24504, 24514, 24521, 24528, 24536, 24544, 24550, 24556, 24564, 24572, 24580, 24588, 24598, 24608, 24616, 24624, 24633, 24642, 24650, 24658, 24665, 24672, 24679, 24686, 24694, 24702, 24710, 24718, 24726, 24734, 24744, 24754, 24762, 24770, 24779, 24788, 24797, 24806, 24815, 24824, 24835, 24846, 24855, 24864, 24874, 24884, 24891, 24898, 24906, 24914, 24923, 24932, 24941, 24950, 24961, 24972, 24981, 24990, 25000, 25010, 25017, 25024, 25032, 25040, 25049, 25058, 25065, 0, 0, 0, 0, 0, 0, 25072, 25079, 25086, 25094, 25102, 25110, 25118, 25127, 25136, 25143, 25150, 25158, 25166, 25174, 25182, 25191, 25200, 25208, 25216, 25225, 25234, 25243, 0, 0, 25252, 25260, 25268, 25277, 25286, 25295, 0, 0, 25304, 25311, 25318, 25326, 25334, 25342, 25350, 25359, 25368, 25375, 25382, 25390, 25398, 25406, 25414, 25423, 25432, 25439, 25446, 25454, 25462, 25470, 25478, 25487, 25496, 25503, 25510, 25518, 25526, 25534, 25542, 25551, 25560, 25568, 25576, 25585, 25594, 25603, 0, 0, 25612, 25620, 25628, 25637, 25646, 25655, 0, 0, 25664, 25672, 25680, 25689, 25698, 25707, 25716, 25726, 0, 25736, 0, 25744, 0, 25753, 0, 25762, 25772, 25779, 25786, 25794, 25802, 25810, 25818, 25827, 25836, 25843, 25850, 25858, 25866, 25874, 25882, 25891, 25900, 25906, 25912, 25919, 25926, 25932, 25938, 25944, 25950, 25957, 25964, 25971, 25978, 25984, 0, 0, 25990, 25998, 26006, 26017, 26028, 26039, 26050, 26061, 26072, 26081, 26090, 26102, 26114, 26126, 26138, 26150, 26162, 26170, 26178, 26189, 26200, 26211, 26222, 26233, 26244, 26253, 26262, 26274, 26286, 26298, 26310, 26322, 26334, 26342, 26350, 26361, 26372, 26383, 26394, 26405, 26416, 26425, 26434, 26446, 26458, 26470, 26482, 26494, 26506, 26513, 26519, 26528, 26534, 0, 26543, 26550, 26559, 26566, 26572, 26578, 26584, 26591, 26594, 26597, 26600, 26603, 26609, 26618, 26624, 0, 26633, 26640, 26649, 26656, 26663, 26669, 26675, 26682, 26686, 26690, 26695, 26702, 26708, 26717, 0, 0, 26726, 26733, 26743, 26750, 26756, 26762, 0, 26768, 26772, 26776, 26781, 26789, 26796, 26806, 26816, 26824, 26832, 26840, 26851, 26859, 26866, 26873, 26880, 26888, 26893, 26898, 0, 0, 26900, 26909, 26915, 0, 26924, 26931, 26940, 26947, 26954, 26960, 26966, 26973, 26975, 0, 26978, 26982, 26986, 26990, 26994, 26998, 27002, 27006, 27010, 27014, 27018, 27022, 27028, 27034, 27040, 27043, 27046, 27048, 27052, 27056, 27060, 27064, 27066, 27070, 27075, 27081, 27087, 27094, 27101, 27106, 27111, 27117, 27123, 27125, 27128, 27130, 27134, 27139, 27143, 27146, 27150, 27153, 27157, 27161, 27165, 27171, 27175, 27179, 27185, 27190, 27197, 27199, 27202, 27206, 27209, 27213, 27218, 27220, 27228, 27236, 27239, 27243, 27245, 27247, 27249, 27252, 27258, 27260, 27264, 27268, 27274, 27280, 27284, 27289, 27294, 27299, 27303, 27307, 27311, 27315, 27318, 27322, 27329, 0, 0, 0, 0, 27334, 0, 0, 0, 0, 0, 0, 0, 27338, 27343, 27347, 27351, 27355, 0, 0, 0, 0, 0, 0, 27359, 27365, 27371, 27378, 27385, 27390, 27395, 27399, 0, 0, 27405, 27408, 27411, 27414, 27417, 27420, 27423, 27428, 27432, 27437, 27442, 27447, 27453, 27457, 27460, 27463, 27466, 27469, 27472, 27475, 27478, 27481, 27484, 27489, 27493, 27498, 27503, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 27508, 27511, 27514, 27517, 27522, 27525, 27528, 27531, 27534, 27537, 27540, 27545, 27548, 27551, 27554, 27557, 27560, 27565, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 27568, 27572, 27576, 27582, 27588, 27593, 27598, 27602, 27606, 27611, 27618, 27625, 27631, 27637, 27642, 27647, 27652, 27658, 27663, 27668, 27673, 27681, 27688, 27695, 27699, 27704, 27710, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 27715, 27719, 27726, 27729, 27733, 27737, 27741, 27745, 27749, 27751, 27755, 27758, 27761, 27765, 27768, 27772, 27781, 27784, 27788, 27791, 27794, 27801, 27804, 27807, 27813, 27816, 27819, 27822, 27825, 27829, 27832, 27836, 27838, 27841, 27844, 27848, 27850, 27853, 27856, 27859, 27864, 27868, 27875, 27878, 27881, 27884, 27888, 27891, 27894, 27897, 27900, 27904, 27907, 27910, 27912, 27915, 27918, 27921, 27925, 0, 0, 27929, 27933, 27937, 27941, 27946, 27951, 27956, 27960, 27965, 27969, 27973, 27977, 27981, 27985, 27989, 0, 0, 0, 0, 0, 0, 0, 27993, 28001, 28008, 28016, 28023, 28031, 28039, 28047, 28055, 28063, 28071, 28079, 28087, 28092, 28095, 28098, 28101, 28104, 28107, 28110, 28113, 28116, 28119, 28123, 28127, 28131, 28135, 28141, 28147, 28153, 28157, 28161, 28165, 28169, 28173, 28177, 28181, 28185, 28189, 28194, 28199, 28204, 28209, 28216, 28223, 28230, 28239, 28245, 28251, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 28258, 28260, 28262, 28264, 28266, 28269, 28272, 28277, 28282, 28287, 28292, 28296, 28300, 28304, 28308, 28313, 28318, 28323, 28328, 28333, 28338, 28343, 28348, 28353, 28358, 28364, 28368, 28372, 28377, 28382, 28387, 28392, 28396, 28403, 28410, 28417, 28424, 28431, 28438, 28445, 28452, 28460, 28471, 28477, 28483, 28489, 28495, 28501, 28507, 28513, 28519, 28525, 28531, 28537, 28543, 28549, 28554, 28559, 28564, 28569, 28576, 28583, 28588, 28594, 28599, 28602, 28605, 28608, 28611, 28615, 28619, 28625, 28631, 28637, 28643, 28647, 28651, 28655, 28659, 28664, 28669, 28673, 28677, 28681, 28685, 28689, 28693, 28696, 28699, 28702, 28705, 28711, 28718, 28728, 28738, 28742, 28750, 28757, 28765, 28773, 28777, 28783, 28789, 28794, 28799, 28804, 28810, 28816, 28822, 28829, 28833, 28837, 28842, 28845, 28847, 28851, 28855, 28862, 28866, 28868, 28870, 28874, 28881, 28886, 28892, 28901, 28908, 28913, 28917, 28921, 28925, 28928, 28931, 28934, 28938, 28942, 28945, 28948, 28951, 28954, 28958, 28962, 28965, 28967, 28970, 28972, 28976, 28980, 28982, 28987, 28990, 28994, 28998, 29002, 29004, 29006, 29008, 29011, 29015, 29019, 29023, 29027, 29031, 29037, 29043, 29045, 29047, 29049, 29051, 29054, 29056, 29060, 29062, 29064, 29066, 29071, 29075, 29079, 29081, 29084, 29088, 29093, 29097, 29106, 29116, 29120, 29125, 29131, 29134, 29138, 29141, 29146, 29150, 29156, 29160, 29171, 29179, 29183, 29187, 29193, 29197, 29200, 29202, 29205, 29209, 29213, 29219, 29223, 29227, 29230, 29233, 29237, 29242, 29246, 29250, 29255, 29260, 29266, 29272, 29276, 29280, 29282, 29286, 29289, 29292, 29299, 29306, 29311, 29316, 29324, 29332, 29336, 29340, 29347, 29354, 29356, 29358, 29363, 29368, 29374, 29380, 29385, 29390, 29394, 29398, 29404, 29410, 29416, 29422, 29432, 29442, 29449, 29456, 29458, 29462, 29466, 29471, 29476, 29483, 29490, 29493, 29496, 29499, 29502, 29505, 29510, 29513, 29517, 29521, 29524, 29527, 29531, 29535, 29539, 29543, 29546, 29549, 29552, 29555, 29557, 29559, 29561, 29563, 29571, 29579, 29584, 29587, 29592, 29602, 29608, 29614, 29620, 29628, 29636, 29647, 29651, 29655, 29657, 29663, 29665, 29667, 29669, 29671, 29676, 29678, 29684, 29690, 29694, 29698, 29701, 29703, 29706, 29710, 29712, 29721, 29730, 29735, 29740, 29744, 29750, 29756, 29759, 29762, 29765, 29768, 29770, 29775, 29778, 29781, 29787, 29793, 29799, 29805, 29810, 29815, 29820, 29825, 29833, 29841, 29849, 29857, 29865, 29873, 29880, 29887, 29895, 29903, 29910, 29921, 29930, 29944, 29947, 29952, 29958, 29964, 29971, 29985, 30000, 30006, 30012, 30019, 30025, 30033, 30039, 30052, 30066, 30071, 30077, 30085, 30088, 30091, 30093, 30096, 30099, 30101, 30103, 30107, 30110, 30113, 30116, 30119, 30124, 30129, 30134, 30139, 30142, 30145, 30147, 30149, 30151, 30155, 30159, 30163, 30169, 30173, 30175, 30177, 30182, 30187, 30192, 30197, 30202, 30207, 30209, 30211, 30220, 30224, 30230, 30239, 30241, 30245, 30249, 30256, 30260, 30262, 30266, 30268, 30272, 30276, 30280, 30282, 30284, 30286, 30291, 30298, 30305, 30312, 30319, 30326, 30333, 30339, 30345, 30351, 30357, 30364, 30371, 30378, 30385, 30391, 30397, 30404, 30411, 30417, 30425, 30432, 30440, 30447, 30455, 30461, 30468, 30476, 30483, 30491, 30498, 30506, 30512, 30519, 30526, 30533, 30540, 30547, 30553, 30561, 30568, 30574, 30581, 30588, 30594, 30600, 30606, 30611, 30619, 30627, 30632, 30637, 30643, 30649, 30654, 30660, 30667, 30675, 30682, 30689, 30696, 30701, 30706, 30711, 30717, 30724, 30730, 30736, 30741, 30745, 30752, 30758, 30761, 30767, 30770, 30775, 30780, 30783, 30786, 30794, 30797, 30802, 30805, 30812, 30817, 30824, 30827, 30830, 30833, 30838, 30843, 30846, 30849, 30857, 30860, 30865, 30872, 30876, 30880, 30885, 30890, 30895, 30900, 30905, 30910, 30915, 30920, 30926, 30931, 30937, 30943, 30948, 30954, 30960, 30968, 30974, 30979, 30985, 30993, 30999, 31003, 31007, 31017, 31027, 31031, 31035, 31039, 31043, 31053, 31057, 31062, 31067, 31072, 31077, 31082, 31087, 31096, 31105, 31113, 31123, 31133, 31140, 31149, 31158, 31166, 31176, 31186, 31194, 31202, 31212, 31222, 31225, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 31228, 31232, 31239, 31246, 31253, 31260, 31264, 31268, 31272, 31276, 31281, 31286, 31291, 31297, 31303, 31309, 31315, 31323, 31330, 31337, 31344, 31351, 31357, 31363, 31372, 31376, 31383, 31387, 31391, 31397, 31403, 31409, 31415, 31419, 31423, 31426, 31430, 31434, 31441, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 31448, 31451, 31455, 31459, 31465, 31471, 31477, 31485, 31492, 31496, 31504, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 31509, 31512, 31515, 31518, 31521, 31524, 31527, 31530, 31533, 31536, 31540, 31544, 31548, 31552, 31556, 31560, 31564, 31568, 31572, 31576, 31580, 31583, 31586, 31589, 31592, 31595, 31598, 31601, 31604, 31607, 31611, 31615, 31619, 31623, 31627, 31631, 31635, 31639, 31643, 31647, 31651, 31656, 31660, 31665, 31670, 31675, 31680, 31685, 31690, 31695, 31700, 31705, 31710, 31715, 31720, 31725, 31730, 31735, 31740, 31745, 31750, 31755, 31760, 31765, 31770, 31775, 31780, 31785, 31790, 31795, 31800, 31805, 31810, 31815, 31820, 31825, 31830, 31835, 31840, 31845, 31850, 31855, 31860, 31865, 31870, 31875, 31880, 31885, 31890, 31895, 31900, 31905, 31910, 31915, 31920, 31925, 31930, 31935, 31940, 31945, 31950, 31955, 31960, 31965, 31970, 31975, 31980, 31985, 31990, 31995, 32000, 32005, 32010, 32015, 32020, 32025, 32030, 32035, 32040, 32045, 32050, 32055, 32060, 32065, 32070, 32075, 32080, 32085, 32090, 32095, 32100, 32105, 32110, 32115, 32120, 32125, 32130, 32135, 32140, 32144, 32150, 32156, 32162, 32168, 32174, 32180, 32186, 32192, 32198, 32204, 32208, 32212, 32216, 32220, 32224, 32228, 32232, 32236, 32240, 0, 32245, 32250, 32255, 32260, 32265, 32274, 32283, 32292, 32301, 32310, 32319, 32328, 32337, 32343, 32351, 32359, 32365, 32372, 32380, 32388, 32395, 32401, 32409, 32417, 32423, 32430, 32438, 32446, 32453, 32459, 32467, 32476, 32485, 32493, 32502, 32511, 32517, 32524, 32532, 32541, 32550, 32558, 32567, 32576, 32583, 32590, 32599, 32608, 32616, 32624, 32633, 32642, 32649, 32656, 32665, 32674, 32682, 32690, 32699, 32708, 32715, 32722, 32731, 32740, 32748, 32757, 32766, 32774, 32784, 32794, 32804, 32814, 32823, 32832, 32841, 32850, 32857, 32865, 32873, 32881, 32889, 32894, 32899, 32908, 32916, 32922, 32931, 32939, 32946, 32955, 32963, 32969, 32978, 32986, 32993, 33002, 33010, 33016, 33025, 33033, 33040, 33049, 33057, 33064, 33073, 33081, 33088, 33097, 33105, 33112, 33120, 33129, 33138, 33146, 33157, 33167, 33174, 33179, 33184, 33188, 33193, 33198, 33203, 33207, 33212, 33219, 33227, 33234, 33242, 33246, 33253, 33260, 33267, 33271, 33278, 33285, 33292, 33295, 33302, 33309, 33316, 33320, 33327, 33334, 33341, 33345, 33348, 33352, 33356, 33363, 33370, 33375, 33379, 33384, 33394, 33401, 33412, 33422, 33426, 33434, 33444, 33447, 33450, 33457, 33465, 33470, 33475, 33483, 33492, 33501, 33509, 33513, 33517, 33520, 33523, 33527, 33531, 33534, 33537, 33541, 33545, 33550, 33555, 33559, 33563, 33568, 33573, 33578, 33583, 33587, 33591, 33596, 33601, 33605, 33609, 33614, 33619, 33624, 33629, 33632, 33635, 33644, 33646, 33648, 33651, 33655, 33660, 33662, 33665, 33671, 33677, 33683, 33689, 33697, 33709, 33714, 33719, 33723, 33728, 33735, 33742, 33750, 33758, 33766, 33774, 33778, 33782, 33786, 33790, 33794, 33798, 33801, 33807, 33813, 33822, 33831, 33839, 33846, 33855, 33864, 33868, 33875, 33882, 33889, 33896, 33903, 33910, 33917, 33924, 33927, 33930, 33933, 33938, 33943, 33949, 33955, 33958, 33964, 33966, 33968, 33970, 33972, 33975, 33978, 33980, 33982, 33984, 33988, 33992, 33994, 33996, 33999, 34002, 34006, 34012, 34017, 0, 0, 34019, 34024, 0, 34029, 34038, 34044, 34050, 34056, 34062, 34068, 34074, 34079, 34082, 34085, 34088, 34090, 34092, 34096, 34100, 34105, 34110, 34115, 34118, 34122, 34127, 34130, 34134, 34139, 34144, 34149, 34154, 34159, 34164, 34169, 34174, 34179, 34184, 34189, 34194, 34200, 34206, 34212, 34214, 34217, 34219, 34222, 34224, 34226, 34228, 34230, 34232, 34234, 34236, 34238, 34240, 34242, 34244, 34246, 34248, 34250, 34252, 34254, 34256, 34261, 34266, 34271, 34276, 34281, 34286, 34291, 34296, 34301, 34306, 34311, 34316, 34321, 34326, 34331, 34336, 34341, 34346, 34351, 34356, 34360, 34364, 34368, 34374, 34380, 34385, 34390, 34395, 34400, 34405, 34410, 34418, 34426, 34434, 34442, 34450, 34458, 34466, 34474, 34480, 34485, 0, 0, 34490, 34494, 34498, 34502, 34506, 34510, 34514, 34519, 34525, 34531, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 34538, 34543, 34546, 34551, 0, 34554, 34559, 34563, 34565, 0, 0, 34567, 34571, 34575, 34579, 34581, 34585, 34588, 34591, 34594, 34598, 34601, 34605, 34608, 34612, 34617, 34621, 34627, 34634, 34637, 34643, 34648, 34652, 34657, 34663, 34669, 34676, 34682, 34689, 0, 34696, 34703, 34707, 34714, 34720, 34725, 34731, 34735, 34740, 34743, 34749, 34755, 34762, 34770, 34777, 34786, 34796, 34803, 34809, 34813, 34821, 34826, 34835, 34838, 34841, 34850, 34861, 34868, 34870, 34876, 34881, 34883, 34886, 34890, 34898, 0, 34907, 0, 34912, 34919, 34926, 34933, 0, 0, 0, 34940, 0, 34947, 34950, 34954, 34957, 34969, 34979, 34990, 0, 0, 34999, 35008, 35014, 35022, 35026, 35034, 35038, 35046, 35053, 35060, 35069, 35078, 35086, 35094, 35103, 35112, 35119, 35126, 35135, 35144, 35152, 35160, 35167, 35174, 35181, 35188, 35195, 35202, 35209, 35216, 35223, 35231, 35237, 35243, 35249, 35255, 35261, 35267, 35273, 35279, 35285, 35292, 35300, 35308, 35316, 35324, 35332, 35340, 35348, 35356, 35364, 35373, 0, 0, 0, 35378, 35384, 35387, 35393, 35399, 35404, 35408, 35413, 35419, 35426, 35429, 35436, 35443, 35447, 35455, 35463, 35468, 35474, 35479, 35484, 35491, 35498, 35505, 35512, 0, 35520, 35528, 35533, 35537, 35544, 35548, 35555, 35563, 35568, 35576, 35580, 35585, 35589, 35594, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 35598, 35605, 35608, 35615, 35621, 35627, 35632, 35637, 35642, 35647, 35652, 35658, 35663, 35666, 35670, 35674, 35680, 35689, 35694, 35703, 35712, 35718, 35724, 35729, 35734, 35738, 35742, 35747, 0, 0, 0, 0, 35752, 35756, 35760, 35766, 35772, 35778, 35781, 35784, 35788, 35792, 35796, 35801, 35807, 35813, 35820, 35827, 35832, 35836, 35840, 35844, 35848, 35852, 35856, 35860, 35864, 35868, 35872, 35876, 35880, 35884, 35888, 35892, 35896, 35900, 35904, 35908, 35912, 35916, 35920, 35924, 35928, 35932, 35936, 35940, 35944, 35948, 35952, 35956, 35960, 35964, 35968, 35972, 35976, 35980, 35984, 35988, 35992, 35996, 36000, 36004, 36008, 36012, 36016, 36020, 36024, 36028, 36032, 36036, 36040, 36044, 36048, 36052, 36056, 36060, 36064, 36068, 36072, 36076, 36080, 36084, 36088, 36092, 36096, 36100, 36104, 36108, 36112, 36116, 36120, 36124, 36128, 36132, 36136, 36140, 36144, 36148, 36152, 36156, 36160, 36164, 36168, 36172, 36176, 36180, 36184, 36188, 36192, 36196, 36200, 36204, 36208, 36212, 36216, 36220, 36224, 36228, 36232, 36236, 36240, 36244, 36248, 36252, 36256, 36260, 36264, 36268, 36272, 36276, 36280, 36284, 36288, 36292, 36296, 36300, 36304, 36308, 36312, 36316, 36320, 36324, 36328, 36332, 36336, 36340, 36344, 36348, 36352, 36356, 36360, 36364, 36368, 36372, 36376, 36380, 36384, 36388, 36392, 36396, 36400, 36404, 36408, 36412, 36416, 36420, 36424, 36428, 36432, 36436, 36440, 36444, 36448, 36452, 36456, 36460, 36464, 36468, 36472, 36476, 36480, 36484, 36488, 36492, 36496, 36500, 36504, 36508, 36512, 36516, 36520, 36524, 36528, 36532, 36536, 36540, 36544, 36548, 36552, 36556, 36560, 36564, 36568, 36572, 36576, 36580, 36584, 36588, 36592, 36596, 36600, 36604, 36608, 36612, 36616, 36620, 36624, 36628, 36632, 36636, 36640, 36644, 36648, 36652, 36656, 36660, 36664, 36668, 36672, 36676, 36680, 36684, 36688, 36692, 36696, 36700, 36704, 36708, 36712, 36716, 36720, 36724, 36728, 36732, 36736, 36740, 36744, 36748, 36752, 36756, 36760, 36764, 36768, 36772, 36776, 36780, 36784, 36788, 36792, 36796, 36800, 36804, 36808, 36812, 36816, 36820, 36824, 36828, 36832, 36836, 36840, 36844, 36848, 36852, 36856, 36863, 36871, 36877, 36883, 36890, 36897, 36903, 36909, 36914, 36919, 36923, 36927, 36932, 36937, 36943, 36949, 36957, 36964, 36968, 36972, 36980, 36989, 36996, 37006, 37017, 37020, 37023, 37027, 37031, 37037, 37043, 37053, 37063, 37073, 37083, 37090, 37097, 37104, 37111, 37122, 37133, 37144, 37155, 37165, 37175, 37187, 37199, 37210, 37221, 37233, 37245, 37253, 37263, 37273, 37283, 37293, 37300, 37307, 37314, 37321, 37331, 37341, 37348, 37355, 37361, 37367, 37373, 37379, 37385, 37391, 37397, 37402, 37410, 37419, 37427, 37435, 37443, 37451, 37459, 37467, 37475, 37483, 37490, 37497, 37504, 37511, 37518, 37525, 37532, 37539, 37547, 37555, 37563, 37571, 37579, 37587, 37595, 37603, 37615, 37627, 37639, 37651, 37663, 37675, 37687, 37699, 37708, 37718, 37727, 37737, 37749, 37761, 37769, 37775, 37781, 37786, 37791, 37798, 37802, 37808, 37812, 37817, 37823, 37828, 37833, 37838, 37843, 37848, 37855, 37861, 37869, 37874, 37879, 37883, 37887, 37895, 37903, 37911, 37919, 37925, 37931, 37943, 37955, 37967, 37979, 37984, 37989, 37994, 37999, 38005, 38011, 38018, 38025, 38029, 38034, 38041, 38048, 38054, 38060, 38064, 38071, 38078, 38082, 38085, 38089, 38094, 38101, 38108, 38126, 38145, 38163, 38182, 38201, 38220, 38239, 38258, 38263, 38270, 38278, 38286, 38294, 38298, 38301, 38304, 38309, 38312, 38330, 38335, 38341, 38347, 38351, 38354, 38357, 38360, 38368, 38378, 38386, 38394, 38398, 38403, 38407, 38412, 38417, 38422, 38427, 38436, 38442, 38449, 38456, 38463, 38470, 38473, 38480, 38487, 38490, 38493, 38498, 38503, 38509, 38515, 38519, 38525, 38532, 38536, 38542, 38546, 38550, 38558, 38569, 38577, 38581, 38583, 38592, 38601, 38607, 38610, 38615, 38620, 38625, 38630, 38635, 38640, 38645, 38650, 38652, 38657, 38662, 38669, 38673, 38679, 38682, 38686, 38692, 38698, 38700, 38702, 38707, 38713, 38719, 38727, 38736, 38742, 38748, 38753, 38758, 38763, 38768, 38773, 38778, 38784, 38789, 38796, 38800, 38804, 38816, 38828, 38838, 38846, 38851, 38858, 38864, 38869, 38874, 38879, 38884, 38886, 38892, 38900, 38908, 38916, 38923, 38930, 38936, 38942, 38948, 38955, 38961, 38968, 38974, 38982, 38990, 38999, 39008, 39015, 39021, 39027, 39036, 39040, 39049, 39058, 39066, 39074, 39078, 39084, 39090, 39096, 39100, 39106, 39114, 39119, 39123, 39129, 39134, 39139, 39146, 39153, 39158, 39163, 39171, 39179, 39189, 39199, 39206, 39213, 39217, 39221, 39233, 39239, 39245, 39250, 39255, 39262, 39269, 39275, 39281, 39290, 39298, 39306, 39313, 39320, 39327, 39333, 39340, 39346, 39353, 39360, 39368, 39376, 39382, 39387, 39396, 39406, 39412, 39420, 39426, 39431, 39436, 39444, 39450, 39457, 39464, 39470, 39475, 39482, 39490, 39503, 39511, 39516, 39521, 39527, 39533, 39539, 39545, 39555, 39565, 39574, 39583, 39593, 39604, 39608, 39612, 39619, 39626, 39631, 39636, 39644, 39652, 39659, 39666, 39673, 39680, 39688, 39696, 39708, 39720, 39727, 39734, 39744, 39754, 39761, 39768, 39777, 39786, 39791, 39796, 39804, 39812, 39817, 39822, 39829, 39834, 39839, 39846, 39853, 39865, 39877, 39881, 39885, 39892, 39899, 39906, 39914, 39922, 39930, 39938, 39944, 39950, 39956, 39962, 39969, 39976, 39984, 39992, 39995, 39998, 40002, 40006, 40013, 40020, 40027, 40034, 40043, 40052, 40059, 40066, 40072, 40078, 40086, 40094, 40101, 40108, 40114, 40120, 40124, 40128, 40135, 40142, 40147, 40152, 40157, 40162, 40168, 40182, 40189, 40196, 40200, 40202, 40204, 40208, 40212, 40216, 40220, 40228, 40235, 40242, 40250, 40262, 40269, 40276, 40285, 40289, 40293, 40298, 40304, 40315, 40320, 40325, 40331, 40336, 40341, 40350, 40358, 40363, 40369, 40375, 40383, 40391, 40399, 40407, 40411, 40414, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 40419, 40423, 40427, 40432, 40437, 40442, 40446, 40450, 40454, 40459, 40464, 40468, 40472, 40476, 40480, 40485, 40490, 40495, 40500, 40504, 40508, 40513, 40518, 40523, 40528, 40532, 0, 40536, 40540, 40544, 40548, 40552, 40556, 40560, 40565, 40570, 40574, 40579, 40584, 40593, 40597, 40601, 40605, 40612, 40616, 40621, 40626, 40630, 40634, 40640, 40645, 40650, 40655, 40660, 40664, 40668, 40672, 40676, 40680, 40685, 40690, 40694, 40698, 40703, 40708, 40713, 40717, 40721, 40726, 40731, 40737, 40743, 40747, 40753, 40759, 40763, 40769, 40775, 40780, 40785, 40789, 40795, 40799, 40803, 40809, 40815, 40820, 40825, 40829, 40833, 40841, 40847, 40853, 40859, 40864, 40869, 40874, 40880, 40884, 40890, 40894, 40898, 40904, 40910, 40916, 40922, 40928, 40934, 40940, 40946, 40952, 40958, 40964, 40970, 40974, 40980, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 40986, 40989, 40993, 40996, 41000, 41004, 41007, 41010, 41014, 41018, 41022, 41026, 41029, 41034, 41038, 41042, 41046, 41052, 41056, 41060, 41064, 41068, 41075, 41081, 41085, 41089, 41093, 41097, 41101, 41105, 41109, 41113, 41117, 41121, 41125, 41131, 41135, 41139, 41143, 41147, 41151, 41155, 41159, 41163, 41167, 41171, 41175, 41179, 41183, 41187, 41191, 41195, 41200, 41206, 41211, 41216, 41220, 41224, 41228, 41232, 41236, 41240, 41244, 41248, 41252, 41256, 41260, 41264, 41268, 41272, 41276, 41280, 41284, 41288, 41292, 41296, 41300, 41303, 41307, 41311, 41317, 41321, 41325, 41329, 41333, 41337, 41341, 41345, 41349, 41353, 41360, 41364, 41368, 41372, 41376, 41380, 41384, 41388, 41392, 41396, 41400, 41404, 41408, 41415, 41419, 41425, 41429, 41433, 41437, 41441, 41445, 41448, 41452, 41456, 41460, 41464, 41468, 41472, 41476, 41480, 41484, 41488, 41492, 41496, 41500, 41504, 41508, 41512, 41516, 41520, 41524, 41528, 41532, 41536, 41540, 41544, 41548, 41552, 41556, 41560, 41564, 41568, 41572, 41576, 41582, 41586, 41590, 41594, 41598, 41602, 41606, 41610, 41614, 41618, 41622, 41626, 41630, 41634, 41638, 41642, 41646, 41650, 41654, 41658, 41662, 41666, 41670, 41674, 41678, 41682, 41686, 41690, 41697, 41701, 41705, 41709, 41713, 41717, 41723, 41727, 41731, 41735, 41739, 41743, 41747, 41751, 41755, 41759, 41763, 41767, 41771, 41775, 41781, 41785, 41789, 41793, 41797, 41801, 41805, 41809, 41813, 41817, 41821, 41825, 41829, 41833, 41837, 41841, 41845, 41849, 41853, 41857, 41861, 41865, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 41869, 41876, 41883, 41893, 41903, 41910, 41919, 41928, 41938, 41949, 41959, 41970, 0, 0, 0, 0, 41976, 41979, 41982, 41985, 41988, 41995, 41999, 42003, 42007, 42010, 42013, 42017, 42021, 42025, 42029, 42034, 42039, 42044, 42049, 42052, 42055, 42061, 42067, 42072, 42077, 42084, 42091, 42095, 42099, 42103, 42110, 42116, 42124, 42129, 42133, 42137, 42141, 42145, 42149, 42153, 42157, 42161, 42165, 42171, 42177, 42183, 42189, 42196, 42202, 42206, 42212, 42223, 42232, 42246, 42255, 42259, 42267, 42272, 42277, 42282, 42287, 42290, 42295, 42300, 0, 42306, 42310, 42313, 42317, 42320, 42324, 42327, 42331, 42334, 42338, 42341, 42344, 42348, 42352, 42356, 42360, 42364, 42368, 42372, 42376, 42380, 42384, 42388, 42392, 42396, 42400, 42404, 42408, 42412, 42416, 42420, 42424, 42428, 42432, 42436, 42441, 42445, 42449, 42453, 42457, 42460, 42464, 42468, 42472, 42476, 42480, 42484, 42488, 42492, 42496, 42500, 42504, 42508, 42512, 42516, 42520, 42524, 42528, 42532, 42536, 42540, 42544, 42547, 42551, 42555, 42559, 42563, 42567, 42570, 42575, 42579, 42584, 42588, 42592, 42596, 42600, 42604, 42608, 42613, 42617, 42621, 42625, 42629, 42632, 42636, 42640, 0, 0, 42645, 42653, 42661, 42668, 42675, 42679, 42685, 42690, 42695, 42699, 42702, 42706, 42709, 42713, 42716, 42720, 42723, 42727, 42730, 42733, 42737, 42741, 42745, 42749, 42753, 42757, 42761, 42765, 42769, 42773, 42777, 42781, 42785, 42789, 42793, 42797, 42801, 42805, 42809, 42813, 42817, 42821, 42825, 42830, 42834, 42838, 42842, 42846, 42849, 42853, 42857, 42861, 42865, 42869, 42873, 42877, 42881, 42885, 42889, 42893, 42897, 42901, 42905, 42909, 42913, 42917, 42921, 42925, 42929, 42933, 42936, 42940, 42944, 42948, 42952, 42956, 42959, 42964, 42968, 42973, 42977, 42981, 42985, 42989, 42993, 42997, 43002, 43006, 43010, 43014, 43018, 43021, 43025, 43029, 43034, 43038, 43042, 43046, 43050, 43054, 43061, 43065, 43071, 0, 0, 0, 0, 0, 43076, 43079, 43082, 43085, 43088, 43091, 43094, 43097, 43100, 43103, 43106, 43109, 43112, 43115, 43118, 43122, 43126, 43130, 43133, 43136, 43139, 43142, 43145, 43148, 43151, 43155, 43159, 43163, 43167, 43171, 43175, 43179, 43183, 43187, 43191, 43194, 43197, 43201, 43204, 43208, 0, 0, 0, 0, 43212, 43216, 43220, 43224, 43228, 43232, 43236, 43240, 43244, 43248, 43252, 43256, 43260, 43264, 43268, 43272, 43276, 43280, 43284, 43288, 43292, 43296, 43300, 43304, 43308, 43312, 43316, 43320, 43324, 43328, 43332, 43335, 43339, 43342, 43346, 43350, 43353, 43357, 43361, 43364, 43368, 43372, 43376, 43380, 43383, 43387, 43391, 43395, 43399, 43403, 43407, 43410, 43413, 43417, 43421, 43425, 43429, 43433, 43437, 43441, 43445, 43449, 43453, 43457, 43461, 43465, 43469, 43473, 43477, 43481, 43485, 43489, 43493, 43497, 43501, 43505, 43509, 43513, 43517, 43521, 43525, 43529, 43533, 43537, 43541, 43545, 43549, 43553, 43557, 43561, 43565, 43569, 43573, 43577, 0, 43581, 43587, 43593, 43599, 43604, 43610, 43616, 43622, 43628, 43634, 43640, 43646, 43652, 43658, 43664, 43670, 43676, 43680, 43684, 43688, 43692, 43696, 43700, 43704, 43708, 43712, 43716, 43720, 43724, 43728, 43732, 43736, 43740, 43744, 43748, 43752, 43756, 43760, 43764, 43768, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 43772, 43777, 43782, 43787, 43791, 43796, 43801, 43806, 43811, 43816, 43821, 43826, 43831, 43836, 43841, 43846, 43851, 43855, 43859, 43863, 43867, 43871, 43875, 43879, 43883, 43887, 43891, 43895, 43899, 43903, 43907, 43912, 43917, 43922, 43927, 43932, 43937, 43942, 43947, 43952, 43957, 43962, 43967, 43972, 43977, 0, 0, 0, 43982, 43985, 43988, 43991, 43994, 43997, 44000, 44003, 44006, 44009, 44013, 44017, 44021, 44025, 44029, 44033, 44037, 44041, 44045, 44049, 44053, 44057, 44061, 44065, 44069, 44073, 44077, 44081, 44085, 44089, 44093, 44097, 44101, 44105, 44109, 44113, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 44117, 44122, 44127, 44132, 44137, 44142, 44147, 44152, 44157, 44162, 44166, 44171, 44176, 44181, 44186, 44191, 44195, 44199, 44203, 44207, 44211, 44215, 44219, 44223, 44227, 44231, 44235, 44239, 44243, 44247, 44252, 44257, 44262, 44267, 44272, 44277, 44282, 44287, 44292, 44297, 44302, 44307, 44312, 0, 0, 0, 44317, 44322, 44325, 44328, 44331, 44334, 44337, 44340, 44343, 44346, 44349, 44353, 44357, 44361, 44365, 44369, 44373, 44377, 44381, 44385, 44389, 44393, 44397, 44401, 44405, 44409, 44413, 44417, 44421, 44425, 44429, 44433, 44437, 44441, 44445, 44449, 44453, 44457, 44461, 44465, 44469, 44473, 44476, 44480, 44484, 44488, 44492, 44496, 44500, 44504, 44508, 44513, 44518, 44523, 44528, 44532, 44537, 44542, 44547, 44552, 44557, 44562, 44567, 44572, 44577, 44581, 44587, 44593, 44599, 44605, 44611, 44617, 44623, 44629, 44635, 44641, 44647, 0, 0, 0, 0, 44653, 44656, 44659, 44662, 44665, 44668, 44671, 44675, 44679, 44683, 44687, 44691, 44695, 44699, 44703, 44707, 44711, 44715, 44719, 44723, 44726, 44730, 44734, 44738, 44742, 44746, 44750, 44754, 44758, 44762, 44766, 44769, 44773, 44777, 44781, 44785, 44788, 44792, 44796, 44800, 44804, 44808, 44812, 44816, 44820, 44824, 44828, 0, 44832, 44835, 44838, 44841, 44844, 44847, 44850, 44853, 44856, 44859, 44862, 44865, 44868, 44871, 44874, 44877, 44880, 44883, 44886, 44889, 44892, 44895, 44898, 44901, 44904, 44907, 44910, 44913, 44916, 44919, 44922, 44925, 44928, 44931, 44934, 44937, 44940, 44943, 44946, 44949, 44952, 44955, 44958, 44961, 44964, 44967, 44970, 44973, 44976, 44979, 44982, 44985, 44988, 44991, 44994, 44997, 45000, 45003, 45006, 45009, 45012, 45015, 45018, 45021, 45024, 45027, 45030, 45033, 45036, 45039, 45042, 45045, 45048, 45051, 45054, 45057, 45060, 45063, 45066, 45069, 45072, 45075, 45078, 45081, 45084, 45087, 45090, 45093, 45096, 45104, 45111, 45118, 45125, 45132, 45139, 45146, 45153, 45160, 45167, 45175, 45183, 45191, 45199, 45207, 45215, 45223, 45231, 45239, 45247, 45255, 45263, 45271, 45279, 45287, 45290, 45293, 45296, 45298, 45301, 0, 0, 0, 0, 45304, 45311, 45318, 45325, 45332, 45335, 45340, 45343, 45347, 45349, 45351, 45354, 45357, 45360, 45363, 45366, 45369, 45372, 45376, 45380, 45383, 45386, 45389, 45392, 45395, 45398, 45401, 45405, 45408, 45411, 45414, 45417, 45420, 45424, 45427, 45430, 45433, 45438, 45443, 45448, 45453, 45458, 45463, 45468, 45473, 45479, 45488, 45491, 45494, 45497, 45500, 45503, 45509, 45518, 45521, 45524, 45528, 45531, 45534, 45537, 45541, 45544, 45547, 45552, 45555, 45558, 45562, 45565, 45568, 45573, 45578, 45583, 45586, 45589, 45592, 45595, 45602, 45605, 45608, 45611, 45614, 45617, 45620, 45623, 45628, 45631, 45634, 45637, 45640, 45643, 45648, 45651, 45654, 45657, 45660, 45663, 45666, 45669, 45672, 0, 0, 45675, 45682, 45689, 45696, 45703, 45710, 45717, 45724, 45731, 45738, 45746, 45754, 45762, 45770, 45778, 45786, 45794, 45802, 45810, 45818, 45826, 45834, 45842, 45850, 45858, 45866, 45874, 45882, 45890, 45898, 45906, 0, 45914, 45918, 45922, 45925, 45929, 45933, 45937, 45941, 45945, 45949, 45953, 45956, 45960, 45964, 45968, 45972, 45976, 45980, 45983, 45987, 45991, 45994, 45998, 46002, 46006, 46010, 46014, 46018, 46022, 46026, 46030, 46034, 46038, 46042, 46046, 46050, 46054, 46058, 46062, 46066, 46070, 46074, 46078, 46082, 46086, 46090, 46094, 46098, 46102, 46106, 46110, 46114, 46118, 46122, 46126, 46130, 46134, 46138, 46142, 46146, 46150, 46154, 46158, 46162, 46166, 46170, 46174, 46178, 46182, 46186, 46190, 46194, 46198, 46202, 46206, 46210, 46214, 46218, 46222, 46226, 46230, 46234, 46238, 46242, 46246, 46250, 46254, 46258, 46262, 46266, 46270, 46274, 46278, 46282, 46286, 46290, 46294, 46298, 46302, 46306, 46310, 46314, 46318, 46322, 46326, 46330, 46334, 46338, 46342, 46346, 46350, 46354, 46358, 46362, 46366, 46370, 46374, 46378, 46382, 46386, 46390, 46394, 46398, 46402, 46406, 46410, 46414, 46418, 46422, 46426, 46430, 46434, 46438, 46442, 46446, 46450, 46454, 46458, 46462, 46466, 46470, 46474, 46478, 46482, 46486, 46490, 46494, 46498, 46502, 46506, 46510, 46514, 46518, 46522, 46526, 46530, 46534, 46538, 46542, 46546, 46550, 46554, 46558, 46562, 46566, 46570, 46574, 46578, 46582, 46586, 46590, 46594, 46598, 46602, 46606, 46610, 46614, 46618, 46622, 46626, 46630, 46634, 46638, 46642, 46645, 46649, 46653, 46657, 46661, 46665, 46669, 46673, 46677, 46681, 46685, 46689, 46693, 46697, 46701, 46705, 46709, 46713, 46717, 46721, 46725, 46729, 46733, 46737, 46741, 46745, 46749, 46753, 46757, 46761, 46765, 46769, 46773, 46777, 46781, 46785, 46789, 46793, 46797, 46801, 46805, 46809, 46813, 46817, 46821, 46825, 46829, 46833, 46837, 46841, 46845, 46849, 46853, 46857, 46861, 46865, 46869, 46873, 46877, 46881, 46885, 46889, 46893, 46897, 46901, 46905, 46909, 46913, 46917, 46921, 46925, 46929, 46933, 46937, 46941, 46945, 46949, 46953, 46957, 46961, 46965, 46969, 46973, 46977, 46981, 46985, 46988, 46992, 46996, 47000, 47004, 47008, 47012, 47016, 47020, 47024, 47028, 47032, 47036, 47040, 47044, 47048, 47052, 47056, 47060, 47064, 47068, 47072, 47076, 47080, 47084, 47088, 47092, 47096, 47100, 47104, 47107, 47111, 47115, 47119, 47123, 47127, 47131, 47135, 47139, 47143, 47147, 47151, 47155, 47159, 47163, 47167, 47171, 47175, 47179, 47183, 47187, 47191, 47195, 47199, 47203, 47207, 47211, 47215, 47219, 47223, 47227, 47231, 47235, 47239, 47243, 47247, 47251, 47255, 47259, 47263, 47267, 47271, 47275, 47279, 47283, 47287, 47291, 47295, 47299, 47303, 47307, 47311, 47315, 47319, 47323, 47327, 47331, 47335, 47339, 47343, 47347, 47351, 47355, 47359, 47363, 47367, 47371, 47375, 47379, 47383, 47387, 47391, 47395, 47399, 47403, 47407, 47411, 47415, 47419, 47423, 47427, 47431, 47435, 47439, 47443, 47447, 47451, 47455, 47459, 47463, 47467, 47471, 47475, 47479, 47483, 47487, 47491, 47495, 47499, 47503, 47507, 47511, 47515, 47519, 47523, 47527, 47531, 47535, 47539, 47543, 47547, 47551, 47555, 47559, 47563, 47567, 47571, 47575, 47579, 47583, 47587, 47591, 47595, 47599, 47603, 47607, 47611, 47615, 47619, 47623, 47627, 47631, 47635, 47639, 47643, 47647, 47651, 47655, 47659, 47663, 47667, 47671, 47675, 47679, 47683, 47687, 47691, 47695, 47699, 47703, 47707, 47711, 47715, 47719, 47723, 47727, 47731, 47735, 47739, 47743, 47747, 47751, 47755, 47759, 47763, 47767, 47771, 47775, 47779, 47783, 47787, 47791, 47795, 47799, 47803, 47807, 47811, 47815, 47819, 47823, 47827, 47831, 47835, 47839, 47843, 47847, 47851, 47855, 47859, 47863, 47867, 47871, 47875, 47879, 47883, 47887, 47891, 47895, 47899, 47903, 47907, 47911, 47915, 47919, 47923, 47927, 47931, 47935, 47939, 47943, 47947, 47951, 47955, 47959, 47962, 47966, 47970, 47974, 47978, 47982, 47986, 47990, 47994, 47998, 48002, 48006, 48010, 48014, 48018, 48022, 48026, 48030, 48034, 48038, 48042, 48046, 48050, 48054, 48058, 48062, 48066, 48070, 48074, 48078, 48082, 48086, 48090, 48094, 48098, 48102, 48106, 48110, 48114, 48118, 48122, 48126, 48130, 48134, 48138, 48142, 48146, 48150, 48154, 48158, 48162, 48166, 48170, 48174, 48178, 48182, 48186, 48190, 48194, 48198, 48202, 48206, 48210, 48214, 48218, 48222, 48226, 48230, 48234, 48238, 48242, 48246, 48250, 48254, 48258, 48262, 48266, 48270, 48274, 48278, 48282, 48286, 48290, 48294, 48298, 48302, 48306, 48310, 48314, 48318, 48322, 48326, 48330, 48334, 48338, 48342, 48346, 48350, 48354, 48358, 48362, 48366, 48370, 48374, 48378, 48382, 48386, 48390, 48394, 48398, 48402, 48406, 48410, 48414, 48418, 48422, 48426, 48430, 48434, 48438, 48442, 48446, 48450, 48454, 48458, 48462, 48466, 48470, 48474, 48478, 48482, 48486, 48490, 48494, 48498, 48502, 48506, 48510, 48514, 48518, 48522, 48526, 48530, 48534, 48538, 48542, 48546, 48550, 48554, 48558, 48562, 48566, 48570, 48574, 48578, 48582, 48586, 48590, 48594, 48598, 48602, 48606, 48610, 48614, 48618, 48622, 48626, 48630, 48634, 48638, 48642, 48646, 48650, 48654, 48658, 48662, 48666, 48670, 48674, 48678, 48682, 48686, 48690, 48694, 48698, 48702, 48706, 48710, 48714, 48718, 48722, 48726, 48730, 48734, 48738, 48742, 48746, 48750, 48754, 48758, 48762, 48766, 48770, 48774, 48778, 48782, 48786, 48790, 48794, 48798, 48802, 48806, 48810, 48814, 48818, 48822, 48826, 48830, 48834, 48838, 48842, 48846, 48850, 48854, 48858, 48862, 48866, 48870, 48874, 48878, 48882, 48886, 48890, 48894, 48898, 48902, 48906, 48910, 48914, 48918, 48922, 48926, 48930, 48934, 48938, 48942, 48946, 48950, 48954, 48958, 48962, 48966, 48970, 48974, 48978, 48982, 48986, 48990, 48994, 48998, 49002, 49006, 49010, 49014, 49018, 49021, 49025, 49029, 49033, 49037, 49041, 49045, 49049, 49053, 49057, 49061, 49065, 49069, 49073, 49077, 49081, 49085, 49089, 49093, 49097, 49101, 49105, 49109, 49113, 49117, 49121, 49125, 49129, 49133, 49137, 49141, 49145, 49149, 49153, 49157, 49161, 49165, 49169, 49173, 49177, 49181, 49185, 49189, 49193, 49197, 49201, 49205, 49209, 49213, 49217, 49221, 49225, 49229, 49233, 49237, 49241, 49245, 49249, 49253, 49257, 49261, 49265, 49269, 49273, 49277, 49281, 49285, 49289, 49293, 49297, 49301, 49305, 49309, 49313, 49317, 49321, 49325, 49329, 49333, 49337, 49341, 49345, 49349, 49353, 49357, 49361, 49365, 49369, 49373, 49377, 49381, 49385, 49389, 49393, 49397, 49401, 49405, 49409, 49413, 49417, 49421, 49425, 49429, 49433, 49437, 49441, 49445, 49449, 49453, 49457, 49461, 49465, 49469, 49473, 49477, 49481, 49485, 49489, 49493, 49497, 49501, 49505, 49509, 49513, 49517, 49521, 49525, 49529, 49533, 49537, 49541, 49545, 49549, 49553, 49557, 49561, 49565, 49569, 49573, 49577, 49581, 49585, 49589, 49593, 49597, 49601, 49605, 49609, 49613, 49617, 49621, 49625, 49629, 49633, 49637, 49641, 49645, 49649, 49653, 49657, 49661, 49665, 49669, 49673, 49677, 49681, 49685, 49689, 49693, 49697, 49701, 49705, 49709, 49713, 49717, 49721, 49725, 49729, 49733, 49737, 49741, 49745, 49749, 49753, 49757, 49761, 49765, 49769, 49773, 49777, 49781, 49785, 49789, 49793, 49797, 49801, 49805, 49809, 49813, 49817, 49821, 49825, 49829, 49833, 49837, 49841, 49845, 49849, 49853, 49857, 49861, 49865, 49869, 49873, 49877, 49881, 49885, 49889, 49893, 49897, 49901, 49905, 49909, 49913, 49917, 49921, 49925, 49929, 49933, 49937, 49941, 49945, 49949, 49953, 49957, 49961, 49965, 49969, 49973, 49977, 49981, 49985, 49989, 49993, 49997, 50001, 50005, 50009, 50013, 50017, 50021, 50025, 50029, 50033, 50037, 50041, 50045, 50049, 50053, 50057, 50061, 50065, 50069, 50073, 50077, 50081, 50085, 50089, 50093, 50097, 50101, 50105, 50109, 50113, 50117, 50121, 50125, 50129, 50133, 50137, 50141, 50145, 50149, 50153, 50157, 50161, 50165, 50169, 50173, 50177, 50181, 50185, 50189, 50193, 50197, 50201, 50205, 50209, 50213, 50217, 50221, 50225, 50229, 50233, 50237, 50241, 50245, 50249, 50253, 50257, 50261, 50265, 50269, 50273, 50277, 50281, 50285, 50289, 50293, 50297, 50301, 50305, 50309, 50313, 50317, 50321, 50325, 50329, 50333, 50337, 50341, 50345, 50349, 50353, 50357, 50361, 50365, 50369, 50373, 50377, 50381, 50385, 50389, 50393, 50397, 50401, 50405, 50409, 50413, 50417, 50421, 50425, 50429, 50433, 50437, 50441, 50445, 50449, 50453, 50457, 50461, 50465, 50469, 50473, 50477, 50481, 50485, 50489, 50493, 50497, 50501, 50505, 50509, 50513, 50517, 50521, 50525, 50529, 50533, 50537, 50541, 50545, 50549, 50553, 50557, 50561, 0, 0, 0, 50565, 50569, 50573, 50577, 50581, 50585, 50589, 50593, 50597, 50601, 50605, 50609, 50613, 50617, 50621, 50625, 50629, 50633, 50637, 50641, 50645, 50649, 50653, 50657, 50661, 50665, 50669, 50673, 50677, 50681, 50685, 50689, 50693, 50697, 50701, 50705, 50709, 50713, 50717, 50721, 50725, 50729, 50733, 50737, 50741, 50745, 50749, 50753, 50757, 50761, 50765, 50769, 50773, 50777, 50781, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 50785, 50789, 50793, 50797, 50801, 50805, 50809, 50813, 50817, 50821, 50825, 50829, 50833, 50837, 50841, 50845, 50849, 50853, 50857, 50861, 50865, 50869, 50873, 50877, 50881, 50885, 50889, 50893, 50897, 50901, 50905, 50909, 50913, 50917, 50921, 50925, 50929, 50933, 50937, 50941, 50945, 50949, 50953, 50957, 50961, 50965, 50969, 50973, 50977, 50981, 50985, 50989, 50993, 50997, 51001, 51005, 51009, 51013, 51017, 51021, 51025, 51029, 51033, 51037, 51041, 51045, 51049, 51053, 51057, 51061, 51065, 51069, 51073, 51077, 51081, 51085, 51089, 51093, 51097, 51101, 51105, 51109, 51113, 51117, 51121, 51125, 51129, 51133, 51137, 51141, 51145, 51149, 51153, 51157, 51161, 51165, 51169, 51173, 51177, 51181, 51185, 51189, 51193, 51197, 51201, 51205, 51209, 51213, 51217, 51221, 51225, 51229, 51233, 51237, 51241, 51245, 51249, 51253, 51257, 51261, 51265, 51269, 51273, 51277, 51281, 51285, 51289, 51293, 51297, 51301, 51305, 51309, 51313, 51317, 51321, 51325, 51329, 51333, 51337, 51341, 51345, 51349, 51353, 51357, 51361, 51365, 51369, 51373, 51377, 51381, 51385, 51389, 51393, 51397, 51401, 51405, 51409, 51413, 51417, 51421, 51425, 51429, 51433, 51437, 51441, 51445, 51449, 51453, 51457, 51461, 51465, 51469, 51473, 51477, 51481, 51485, 51489, 51493, 51497, 51501, 51505, 51509, 51513, 51517, 51521, 51525, 51529, 51533, 51537, 51541, 51545, 51549, 51553, 51557, 51561, 51565, 51569, 51573, 51577, 51581, 51585, 51589, 51593, 51597, 51601, 51605, 51609, 51613, 51617, 51621, 51625, 51629, 51633, 51637, 51641, 51645, 51649, 51653, 51657, 51661, 51665, 51669, 51673, 51677, 51681, 51685, 51689, 51693, 51697, 51701, 51705, 51709, 51713, 51717, 51721, 51725, 51729, 51733, 51737, 51741, 51745, 51749, 51753, 51757, 51761, 51765, 51769, 51773, 51777, 51781, 51785, 51789, 51793, 51797, 51801, 51805, 51809, 51813, 51817, 51821, 51825, 51829, 51833, 51837, 51841, 51845, 51849, 51853, 51857, 51861, 51865, 51869, 51873, 51877, 51881, 51885, 51889, 51893, 51897, 51901, 51905, 51909, 51913, 51917, 51921, 51925, 51929, 51933, 51937, 51941, 51945, 51949, 51953, 51957, 51961, 51965, 51969, 51973, 51977, 51981, 51985, 51989, 0, 0, 51993, 51997, 52001, 52005, 52009, 52013, 52017, 52021, 52025, 52029, 52033, 52037, 52041, 52045, 52049, 52053, 52057, 52061, 52065, 52069, 52073, 52077, 52081, 52085, 52089, 52093, 52097, 52101, 52105, 52109, 52113, 52117, 52121, 52125, 52129, 52133, 52137, 52141, 52145, 52149, 52153, 52157, 52161, 52165, 52169, 52173, 52177, 52181, 52185, 52189, 52193, 52197, 52201, 52205, 52209, 52213, 52217, 52221, 52225, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 52229, 52234, 52239, 52244, 52249, 52254, 52261, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 52266, 52273, 52280, 52287, 52294, 0, 0, 0, 0, 0, 52301, 52308, 52315, 52325, 52331, 52337, 52343, 52349, 52355, 52361, 52368, 52374, 52380, 52387, 52395, 52403, 52414, 52425, 52431, 52437, 52443, 52450, 52457, 52464, 52471, 52478, 0, 52485, 52492, 52499, 52507, 52514, 0, 52521, 0, 52528, 52535, 0, 52542, 52550, 0, 52557, 52564, 52571, 52578, 52585, 52592, 52599, 52606, 52613, 52620, 52625, 52632, 52639, 52645, 52651, 52657, 52663, 52669, 52675, 52681, 52687, 52693, 52699, 52705, 52711, 52717, 52723, 52729, 52735, 52741, 52747, 52753, 52759, 52765, 52771, 52777, 52783, 52789, 52795, 52801, 52807, 52813, 52819, 52825, 52831, 52837, 52843, 52849, 52855, 52861, 52867, 52873, 52879, 52885, 52891, 52897, 52903, 52909, 52915, 52921, 52927, 52933, 52939, 52945, 52951, 52957, 52963, 52969, 52975, 52981, 52987, 52993, 52999, 53005, 53011, 53017, 53023, 53029, 53035, 53041, 53047, 53053, 53059, 53065, 53071, 53077, 53083, 53089, 53095, 53102, 53109, 53115, 53121, 53127, 53133, 53141, 53149, 53156, 53163, 53170, 53177, 53184, 53191, 53198, 53205, 53212, 53219, 53229, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 53239, 53245, 53251, 53257, 53263, 53268, 53273, 53279, 53285, 53291, 53297, 53305, 53311, 53317, 53325, 53333, 53341, 53349, 53354, 53359, 53364, 53369, 53381, 53393, 53403, 53413, 53424, 53435, 53446, 53457, 53467, 53477, 53488, 53499, 53510, 53521, 53531, 53541, 53551, 53566, 53581, 53596, 53603, 53610, 53617, 53624, 53634, 53644, 53654, 53665, 53675, 53683, 53691, 53699, 53707, 53716, 53724, 53731, 53738, 53745, 53752, 53760, 53767, 53775, 53783, 53792, 53800, 53807, 53814, 53821, 53828, 53835, 53842, 53849, 53856, 53863, 53870, 53877, 53885, 53893, 53901, 53909, 53917, 53925, 53933, 53941, 53949, 53957, 53965, 53973, 53981, 53989, 53997, 54005, 54013, 54022, 54030, 54038, 54046, 54055, 54063, 54071, 54079, 54087, 54095, 54103, 54111, 54120, 54128, 54135, 54142, 54149, 54156, 54164, 54171, 54178, 54185, 54192, 54199, 54207, 54214, 54221, 54228, 54235, 54242, 54250, 54257, 54264, 54271, 54279, 54286, 54293, 54300, 54307, 54314, 54322, 54329, 54339, 54349, 54359, 54368, 54377, 54386, 54395, 54404, 54414, 54425, 54436, 54446, 54456, 54467, 54477, 54486, 54495, 54503, 54511, 54520, 54528, 54536, 54544, 54551, 54558, 54566, 54573, 54582, 54591, 54599, 54607, 54616, 54624, 54633, 54641, 54650, 54658, 54666, 54674, 54682, 54691, 54699, 54706, 54714, 54721, 54728, 54735, 54743, 54751, 54758, 54765, 54773, 54780, 54790, 54798, 54806, 54813, 54820, 54828, 54835, 54845, 54855, 54865, 54875, 54885, 54893, 54901, 54909, 54917, 54925, 54932, 54939, 54946, 54953, 54960, 54968, 54975, 54982, 54989, 54996, 55003, 55010, 55017, 55024, 55031, 55038, 55046, 55054, 55062, 55070, 55078, 55086, 55094, 55102, 55110, 55118, 55126, 55134, 55142, 55150, 55158, 55166, 55174, 55182, 55190, 55198, 55206, 55214, 55222, 55230, 55237, 55244, 55251, 55258, 55265, 55272, 55279, 55286, 55293, 55300, 55307, 55314, 55321, 55328, 55335, 55342, 55351, 55358, 55365, 55372, 55379, 55386, 55396, 55406, 55414, 55422, 55429, 55436, 55444, 55452, 55459, 55466, 55473, 55480, 55488, 55496, 55503, 55510, 55517, 55524, 55531, 55540, 55549, 55558, 55567, 55575, 55584, 55592, 55601, 55609, 55617, 55624, 55632, 55639, 55647, 55654, 55662, 55669, 55677, 55684, 55693, 55701, 55710, 55718, 55725, 55732, 55739, 55746, 55754, 55762, 55771, 55780, 55789, 55797, 55806, 55814, 55823, 55831, 55839, 55846, 55854, 55861, 55869, 55876, 55884, 55891, 55899, 55906, 55915, 55923, 55932, 55940, 55947, 55954, 55961, 55968, 55976, 55984, 55993, 56002, 56009, 56016, 56023, 56030, 56037, 56044, 56052, 56059, 56066, 56073, 56080, 56087, 56094, 56102, 56110, 56118, 56126, 56131, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 56136, 56145, 56154, 56163, 56172, 56181, 56190, 56199, 56208, 56217, 56226, 56235, 56245, 56254, 56263, 56273, 56282, 56291, 56300, 56309, 56318, 56328, 56338, 56348, 56357, 56366, 56375, 56384, 56393, 56402, 56411, 56422, 56432, 56442, 56452, 56462, 56472, 56482, 56492, 56502, 56512, 56523, 56533, 56543, 56554, 56564, 56574, 56584, 56594, 56603, 56612, 56622, 56631, 56640, 56649, 56658, 56667, 56676, 56685, 56694, 56703, 56712, 56721, 56730, 0, 0, 56739, 56748, 56757, 56766, 56775, 56785, 56794, 56803, 56813, 56822, 56832, 56841, 56850, 56860, 56869, 56879, 56888, 56898, 56907, 56917, 56926, 56936, 56946, 56956, 56966, 56975, 56985, 56994, 57003, 57012, 57021, 57030, 57039, 57049, 57058, 57068, 57077, 57087, 57097, 57106, 57115, 57124, 57134, 57143, 57152, 57161, 57170, 57179, 57189, 57199, 57209, 57219, 57229, 57238, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 57247, 57262, 57277, 57283, 57289, 57295, 57301, 57307, 57313, 57319, 57325, 57333, 57337, 0, 0, 0, 57340, 57344, 57348, 57352, 57356, 57360, 57364, 57368, 57372, 57376, 57380, 57384, 57388, 57392, 57396, 57400, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 57404, 57409, 57414, 57420, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 57426, 57436, 57446, 57456, 57466, 57478, 57487, 57496, 57506, 57516, 57528, 57540, 57551, 57562, 57572, 57582, 57591, 57600, 57610, 57620, 57631, 57642, 57645, 0, 0, 57649, 57653, 57657, 57661, 57666, 57672, 57678, 57684, 57687, 57691, 0, 57694, 57697, 57700, 57704, 57708, 57713, 57717, 57721, 57726, 57731, 57738, 57745, 57748, 57751, 57754, 57758, 57761, 57764, 57767, 0, 57771, 57776, 57780, 57784, 0, 0, 0, 0, 57789, 57794, 57801, 57806, 57811, 0, 57816, 57821, 57826, 57831, 57836, 57841, 57846, 57851, 57856, 57861, 57866, 57871, 57880, 57889, 57897, 57905, 57914, 57923, 57932, 57941, 57949, 57957, 57965, 57973, 57978, 57983, 57989, 57995, 58001, 58007, 58014, 58021, 58026, 58031, 58036, 58041, 58047, 58053, 58059, 58065, 58070, 58075, 58080, 58085, 58090, 58095, 58100, 58105, 58110, 58115, 58120, 58125, 58131, 58137, 58143, 58149, 58155, 58161, 58167, 58173, 58178, 58183, 58188, 58193, 58198, 58203, 58208, 58213, 58219, 58225, 58231, 58237, 58243, 58249, 58255, 58261, 58267, 58273, 58279, 58285, 58291, 58297, 58303, 58309, 58315, 58321, 58327, 58333, 58339, 58345, 58351, 58357, 58363, 58369, 58375, 58381, 58387, 58393, 58399, 58405, 58411, 58417, 58423, 58429, 58434, 58439, 58444, 58449, 58454, 58459, 58464, 58469, 58474, 58479, 58484, 58489, 58494, 58499, 58504, 58509, 58515, 58521, 58527, 58533, 58538, 58543, 58548, 58553, 58564, 58575, 58585, 58595, 58606, 58617, 58624, 0, 0, 58631, 0, 58639, 58643, 58647, 58650, 58654, 58658, 58661, 58664, 58668, 58672, 58675, 58679, 58682, 58685, 58688, 58691, 58695, 58698, 58701, 58704, 58707, 58710, 58713, 58716, 58719, 58722, 58725, 58728, 58731, 58735, 58738, 58742, 58747, 58752, 58757, 58762, 58767, 58772, 58777, 58782, 58787, 58792, 58797, 58802, 58807, 58812, 58817, 58822, 58827, 58832, 58837, 58842, 58847, 58852, 58857, 58862, 58867, 58872, 58877, 58881, 58886, 58890, 58894, 58899, 58904, 58909, 58914, 58919, 58924, 58929, 58934, 58939, 58944, 58949, 58954, 58959, 58964, 58969, 58974, 58979, 58984, 58989, 58994, 58999, 59004, 59009, 59014, 59019, 59024, 59029, 59034, 59039, 59043, 59048, 59050, 59055, 59060, 59064, 59069, 59074, 59078, 59083, 59088, 59093, 59098, 59103, 59108, 59113, 59118, 59124, 59130, 59136, 59144, 59148, 59152, 59156, 59160, 59164, 59168, 59173, 59178, 59183, 59188, 59193, 59198, 59203, 59208, 59213, 59218, 59223, 59228, 59233, 59237, 59242, 59247, 59252, 59257, 59262, 59267, 59272, 59277, 59282, 59287, 59291, 59296, 59301, 59306, 59311, 59315, 59320, 59325, 59330, 59335, 59340, 59345, 59350, 59355, 59359, 59366, 59373, 59377, 59382, 59387, 59392, 59397, 59402, 59407, 59412, 59417, 59422, 59427, 59432, 59437, 59442, 59447, 59452, 59457, 59462, 59467, 59472, 59477, 59482, 59487, 59492, 59497, 59502, 59507, 59512, 59517, 59522, 0, 0, 0, 59527, 59531, 59536, 59540, 59545, 59550, 0, 0, 59554, 59559, 59564, 59568, 59573, 59578, 0, 0, 59583, 59588, 59592, 59597, 59602, 59607, 0, 0, 59612, 59617, 59622, 0, 0, 0, 59626, 59630, 59634, 59637, 59639, 59643, 59647, 0, 59651, 59657, 59660, 59663, 59666, 59669, 59673, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 59677, 59683, 59689, 59695, 59701, 0, 0, 59705, 59709, 59714, 59719, 59724, 59728, 59733, 59738, 59743, 59748, 59752, 59756, 59761, 59766, 59771, 59776, 59780, 59785, 59790, 59795, 59800, 59805, 59810, 59814, 59819, 59824, 59829, 59834, 59839, 59844, 59849, 0, 59854, 59858, 59862, 59867, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 59872, 59877, 59882, 59887, 59892, 59897, 59902, 59907, 59912, 59917, 59922, 59927, 59932, 59937, 59942, 59947, 59952, 59957, 59962, 59967, 59972, 59977, 59982, 59987, 59992, 59997, 60002, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 60009, 60014, 60019, 60024, 60030, 60035, 60041, 60046, 60051, 60056, 60062, 60067, 60073, 60078, 60083, 60088, 60093, 60097, 60102, 60107, 60112, 60117, 60122, 60127, 60132, 60137, 60142, 60147, 60152, 60157, 60162, 60167, 60172, 60177, 60182, 60187, 60192, 60197, 0, 0, 60202, 60207, 60212, 60217, 60223, 60228, 60234, 60239, 60244, 60249, 60255, 60260, 60266, 60271, 60276, 60281, 60286, 60290, 60295, 60300, 60305, 60310, 60315, 60320, 60325, 60330, 60335, 60340, 60345, 60350, 60355, 60360, 60365, 60370, 60375, 60380, 60385, 60390, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 60395, 60400, 60405, 60410, 60417, 60424, 60431, 60438, 60443, 60448, 60453, 60458, 60465, 60470, 60477, 60484, 60489, 60494, 60499, 60506, 60511, 60516, 60523, 60530, 60535, 60540, 60545, 60552, 60559, 60566, 60571, 60576, 60583, 60590, 60597, 60604, 60609, 60614, 60619, 60626, 60631, 60636, 60641, 60648, 60657, 60664, 60669, 60674, 60679, 60684, 60689, 60694, 60703, 60710, 60715, 60722, 60729, 60734, 60739, 60744, 60751, 60756, 60763, 60770, 60775, 60780, 60785, 60792, 60799, 60804, 60809, 60816, 60823, 60830, 60835, 60840, 60845, 60850, 60857, 60866, 60875, 60880, 60887, 60896, 60901, 60906, 60911, 60916, 60923, 60930, 60937, 60944, 60949, 60954, 60959, 60966, 60973, 60980, 60985, 60990, 60997, 61002, 61009, 61014, 61021, 61026, 61033, 61040, 61045, 61050, 61055, 61060, 61065, 61070, 61075, 61080, 61085, 61092, 61099, 61106, 61113, 61120, 61129, 61134, 61139, 61146, 61153, 61158, 61165, 61172, 61179, 61186, 61193, 61200, 61205, 61210, 61215, 61220, 61225, 61234, 61243, 61252, 61261, 61270, 61279, 61288, 61297, 61302, 61313, 61324, 61333, 61338, 61343, 61348, 61353, 61362, 61369, 61376, 61383, 61390, 61397, 61404, 61413, 61422, 61433, 61442, 61453, 61462, 61469, 61478, 61489, 61498, 61507, 61516, 61525, 61532, 61539, 61546, 61555, 61564, 61575, 61584, 61593, 61604, 61609, 61614, 61625, 61634, 61643, 61652, 61661, 61672, 61681, 61690, 61701, 61712, 61723, 61734, 61745, 61756, 61763, 61770, 61777, 61784, 61794, 61803, 61810, 61817, 61824, 61835, 61846, 61857, 61868, 61879, 61890, 61901, 61912, 61919, 61926, 61935, 61944, 61951, 61958, 61965, 61974, 61983, 61992, 61999, 62008, 62017, 62026, 62033, 62040, 62045, 62052, 62059, 62066, 62073, 62080, 62087, 62094, 62103, 62112, 62121, 62130, 62137, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 62146, 62152, 62157, 62162, 62169, 62175, 62180, 62186, 62192, 62198, 62204, 62210, 62214, 62218, 62224, 62230, 62236, 62240, 62245, 62250, 62254, 62258, 62261, 62267, 62273, 62279, 62285, 62291, 62297, 62303, 62309, 62315, 62325, 62335, 62341, 62347, 62357, 62367, 62373, 0, 0, 0, 62379, 62384, 62389, 62395, 62401, 62407, 62413, 62419, 62425, 62433, 62441, 62447, 62453, 62459, 62465, 62471, 62477, 62483, 62489, 62494, 62500, 62506, 62512, 62518, 62524, 62534, 62540, 62546, 62553, 62560, 62567, 62576, 62585, 62594, 62603, 62612, 62621, 62630, 62639, 62649, 62659, 62667, 62675, 62684, 62693, 62699, 62705, 62711, 62717, 62725, 62733, 62736, 62742, 62747, 62753, 62759, 62765, 62771, 62777, 62787, 62792, 62799, 62804, 62809, 62814, 62820, 62826, 62832, 62838, 62843, 62848, 62853, 62858, 62863, 62869, 62875, 62881, 62887, 62893, 62899, 62905, 62911, 62916, 62921, 62926, 62931, 62936, 62941, 62946, 62951, 62957, 62963, 62968, 62973, 62978, 62983, 62988, 62994, 63001, 63005, 63009, 63012, 63016, 63020, 63024, 63028, 63032, 63040, 63050, 63054, 63058, 63064, 63070, 63076, 63082, 63088, 63094, 63100, 63106, 63112, 63118, 63124, 63130, 63136, 63142, 63146, 63150, 63157, 63163, 63169, 63175, 63180, 63187, 63192, 63198, 63204, 63210, 63216, 63221, 63225, 63231, 63235, 63239, 63243, 63249, 63255, 63259, 63265, 63271, 63277, 63283, 63289, 63297, 63305, 63311, 63317, 63323, 63329, 63341, 63353, 63367, 63379, 63391, 63405, 63419, 63433, 63437, 63445, 63453, 63457, 63461, 63465, 63469, 63473, 63477, 63481, 63485, 63491, 63497, 63503, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 63509, 63513, 63517, 63521, 63525, 63529, 63533, 63537, 63541, 63545, 63549, 63553, 63557, 63561, 63565, 63569, 63573, 63577, 63581, 63585, 63589, 63593, 63597, 63601, 63605, 63609, 63613, 63617, 63621, 63625, 63629, 63633, 63637, 63641, 63645, 63649, 63653, 63657, 63661, 63665, 63669, 63673, 63677, 63681, 63685, 63689, 63693, 63697, 63701, 63705, 63709, 63713, 63717, 63721, 63725, 63729, 63733, 63737, 63741, 63745, 63749, 63753, 63757, 63761, 63765, 63769, 63773, 63777, 63781, 63785, 63789, 63793, 63797, 63801, 63805, 63809, 63813, 63817, 63821, 63825, 63829, 63833, 63837, 63841, 63845, 0, 63849, 63853, 63857, 63861, 63865, 63869, 63873, 63877, 63881, 63885, 63889, 63893, 63897, 63901, 63905, 63909, 63913, 63917, 63921, 63926, 63931, 63936, 63941, 63946, 63951, 63956, 63961, 63966, 63971, 63976, 63981, 63986, 63991, 63996, 64001, 64006, 64011, 64016, 64021, 64026, 64031, 64036, 64041, 64046, 64051, 64056, 64061, 64066, 64071, 64076, 64081, 64086, 64091, 64096, 64101, 64106, 64111, 64116, 64121, 64126, 64131, 64136, 64141, 64146, 64151, 64156, 64161, 64166, 64171, 64176, 64181, 0, 64185, 64189, 0, 0, 64193, 0, 0, 64197, 64201, 0, 0, 64205, 64209, 64213, 64217, 0, 64221, 64225, 64229, 64233, 64237, 64241, 64245, 64249, 64253, 64257, 64261, 64265, 0, 64269, 0, 64273, 64277, 64281, 64285, 0, 64289, 64293, 0, 64297, 64301, 64305, 64309, 64313, 64317, 64321, 64325, 64329, 64333, 64337, 64341, 64346, 64351, 64356, 64361, 64366, 64371, 64376, 64381, 64386, 64391, 64396, 64401, 64406, 64411, 64416, 64421, 64426, 64431, 64436, 64441, 64446, 64451, 64456, 64461, 64466, 64471, 64476, 64481, 64486, 64491, 64496, 64501, 64506, 64511, 64516, 64521, 64526, 64531, 64536, 64541, 64546, 64551, 64556, 64561, 64566, 64571, 64576, 64581, 64586, 64591, 64596, 64601, 64605, 0, 64609, 64613, 64617, 64621, 0, 0, 64625, 64629, 64633, 64637, 64641, 64645, 64649, 64653, 0, 64657, 64661, 64665, 64669, 64673, 64677, 64681, 0, 64685, 64689, 64693, 64697, 64701, 64705, 64709, 64713, 64717, 64721, 64725, 64729, 64733, 64737, 64741, 64745, 64749, 64753, 64757, 64761, 64765, 64769, 64773, 64777, 64781, 64785, 64789, 64793, 0, 64797, 64801, 64805, 64809, 0, 64813, 64817, 64821, 64825, 64829, 0, 64833, 0, 0, 0, 64837, 64841, 64845, 64849, 64853, 64857, 64861, 0, 64865, 64869, 64873, 64877, 64881, 64885, 64889, 64893, 64897, 64901, 64905, 64909, 64913, 64917, 64921, 64925, 64929, 64933, 64937, 64941, 64945, 64949, 64953, 64957, 64961, 64965, 64969, 64974, 64979, 64984, 64989, 64994, 64999, 65004, 65009, 65014, 65019, 65024, 65029, 65034, 65039, 65044, 65049, 65054, 65059, 65064, 65069, 65074, 65079, 65084, 65089, 65094, 65099, 65104, 65109, 65114, 65119, 65124, 65129, 65134, 65139, 65144, 65149, 65154, 65159, 65164, 65169, 65174, 65179, 65184, 65189, 65194, 65199, 65204, 65209, 65214, 65219, 65224, 65229, 65233, 65237, 65241, 65245, 65249, 65253, 65257, 65261, 65265, 65269, 65273, 65277, 65281, 65285, 65289, 65293, 65297, 65301, 65305, 65309, 65313, 65317, 65321, 65325, 65329, 65333, 65337, 65341, 65345, 65349, 65353, 65357, 65361, 65365, 65369, 65373, 65377, 65381, 65385, 65389, 65393, 65397, 65401, 65405, 65409, 65413, 65417, 65421, 65425, 65429, 65433, 65437, 65442, 65447, 65452, 65457, 65462, 65467, 65472, 65477, 65482, 65487, 65492, 65497, 65502, 65507, 65512, 65517, 65522, 65527, 65532, 65537, 65542, 65547, 65552, 65557, 65562, 65567, 65572, 65577, 65582, 65587, 65592, 65597, 65602, 65607, 65612, 65617, 65622, 65627, 65632, 65637, 65642, 65647, 65652, 65657, 65662, 65667, 65672, 65677, 65682, 65687, 65692, 65697, 65702, 65707, 65712, 65717, 65722, 65727, 65732, 65737, 65742, 65747, 65752, 65757, 65762, 65767, 65772, 65777, 65782, 65787, 65792, 65797, 65802, 65807, 65812, 65817, 65822, 65827, 65832, 65837, 65842, 65847, 65852, 65857, 65862, 65867, 65872, 65877, 65882, 65887, 65892, 65897, 65902, 65907, 65912, 65917, 65922, 65927, 65932, 65937, 65942, 65947, 65952, 65957, 65963, 65969, 65975, 65981, 65987, 65993, 65999, 66005, 66011, 66017, 66023, 66029, 66035, 66041, 66047, 66053, 66059, 66065, 66071, 66077, 66083, 66089, 66095, 66101, 66107, 66113, 66119, 66125, 66131, 66137, 66143, 66149, 66155, 66161, 66167, 66173, 66179, 66185, 66191, 66197, 66203, 66209, 66215, 66221, 66227, 66233, 66239, 66245, 66251, 66257, 66263, 66269, 66273, 66277, 66281, 66285, 66289, 66293, 66297, 66301, 66305, 66309, 66313, 66317, 66321, 66325, 66329, 66333, 66337, 66341, 66345, 66349, 66353, 66357, 66361, 66365, 66369, 66373, 66377, 66381, 66385, 66389, 66393, 66397, 66401, 66405, 66409, 66413, 66417, 66421, 66425, 66429, 66433, 66437, 66441, 66445, 66449, 66453, 66457, 66461, 66465, 66469, 66473, 0, 0, 0, 0, 66477, 66482, 66487, 66492, 66497, 66502, 66507, 66512, 66517, 66522, 66527, 66532, 66537, 66542, 66547, 66552, 66557, 66562, 66568, 66573, 66578, 66583, 66588, 66593, 66598, 66603, 66607, 66612, 66617, 66622, 66627, 66632, 66637, 66642, 66647, 66652, 66657, 66662, 66667, 66672, 66677, 66682, 66687, 66692, 66698, 66703, 66708, 66713, 66718, 66723, 66728, 66733, 66739, 66744, 66749, 66754, 66759, 66764, 66769, 66774, 66779, 66784, 66789, 66794, 66799, 66804, 66809, 66814, 66819, 66824, 66829, 66834, 66839, 66844, 66849, 66854, 66860, 66865, 66870, 66875, 66880, 66885, 66890, 66895, 66899, 66904, 66909, 66914, 66919, 66924, 66929, 66934, 66939, 66944, 66949, 66954, 66959, 66964, 66969, 66974, 66979, 66984, 66990, 66995, 67000, 67005, 67010, 67015, 67020, 67025, 67031, 67036, 67041, 67046, 67051, 67056, 67061, 67067, 67073, 67079, 67085, 67091, 67097, 67103, 67109, 67115, 67121, 67127, 67133, 67139, 67145, 67151, 67157, 67163, 67170, 67176, 67182, 67188, 67194, 67200, 67206, 67212, 67217, 67223, 67229, 67235, 67241, 67247, 67253, 67259, 67265, 67271, 67277, 67283, 67289, 67295, 67301, 67307, 67313, 67319, 67326, 67332, 67338, 67344, 67350, 67356, 67362, 67368, 67375, 67381, 67387, 67393, 67399, 67405, 67411, 67417, 67423, 67429, 67435, 67441, 67447, 67453, 67459, 67465, 67471, 67477, 67483, 67489, 67495, 67501, 67507, 67513, 67520, 67526, 67532, 67538, 67544, 67550, 67556, 67562, 67567, 67573, 67579, 67585, 67591, 67597, 67603, 67609, 67615, 67621, 67627, 67633, 67639, 67645, 67651, 67657, 67663, 67669, 67676, 67682, 67688, 67694, 67700, 67706, 67712, 67718, 67725, 67731, 67737, 67743, 67749, 67755, 67761, 67768, 67775, 67782, 67789, 67796, 67803, 67810, 67817, 67824, 67831, 67838, 67845, 67852, 67859, 67866, 67873, 67880, 67888, 67895, 67902, 67909, 67916, 67923, 67930, 67937, 67943, 67950, 67957, 67964, 67971, 67978, 67985, 67992, 67999, 68006, 68013, 68020, 68027, 68034, 68041, 68048, 68055, 68062, 68070, 68077, 68084, 68091, 68098, 68105, 68112, 68119, 68127, 68134, 68141, 68148, 68155, 68162, 0, 0, 0, 0, 68169, 68174, 68178, 68182, 68186, 68190, 68194, 68198, 68202, 68206, 68210, 68215, 68219, 68223, 68227, 68231, 68235, 68239, 68243, 68247, 68251, 68256, 68260, 68264, 68268, 68272, 68276, 68280, 68284, 68288, 68292, 68298, 68303, 68308, 68313, 68318, 68323, 68328, 68333, 68338, 68343, 68348, 68352, 68356, 68360, 68364, 68368, 68372, 68376, 68380, 68384, 68388, 68392, 68396, 68400, 68404, 68408, 68412, 68416, 68420, 68424, 68428, 68432, 68436, 68440, 68444, 68448, 68452, 68456, 68460, 68464, 68468, 68472, 68476, 68480, 68484, 68488, 68492, 68496, 68500, 68504, 68508, 68512, 68516, 68520, 68524, 68528, 68532, 68536, 68540, 68544, 68548, 68552, 68556, 68560, 68564, 68568, 68572, 68576, 68580, 68584, 68588, 68592, 68596, 68600, 68604, 68608, 68612, 68616, 68620, 68624, 68628, 68632, 68636, 68640, 68644, 68648, 68652, 68656, 68660, 68664, 68668, 68672, 68676, 68680, 68684, 68688, 68692, 68696, 68700, 68704, 68708, 68712, 68716, 68720, 68724, 68728, 68732, 68736, 68740, 68744, 68748, 68752, 68756, 68760, 68764, 68768, 68772, 68776, 68780, 68784, 68788, 68792, 68796, 68800, 68804, 68808, 68812, 68816, 68820, 68824, 68828, 68832, 68836, 68840, 68844, 68848, 68852, 68856, 68860, 68864, 68868, 68872, 68876, 68880, 68884, 68888, 68892, 68896, 68900, 68904, 68908, 68912, 68916, 68920, 68924, 68928, 68932, 68936, 68940, 68944, 68948, 68952, 68956, 68960, 68964, 68968, 68972, 68976, 68980, 68984, 68988, 68992, 68996, 69000, 69004, 69008, 69012, 69016, 69020, 69024, 69028, 69032, 69036, 69040, 69044, 69048, 69052, 69056, 69060, 69064, 69068, 69072, 69076, 69080, 69084, 69088, 69092, 69096, 69100, 69104, 69108, 69112, 69116, 69120, 69124, 69128, 69132, 69136, 69140, 69144, 69148, 69152, 69156, 69160, 69164, 69168, 69172, 69176, 69180, 69184, 69188, 69192, 69196, 69200, 69204, 69208, 69212, 69216, 69220, 69224, 69228, 69232, 69236, 69240, 69244, 69248, 69252, 69256, 69260, 69264, 69268, 69272, 69276, 69280, 69284, 69288, 69292, 69296, 69300, 69304, 69308, 69312, 69316, 69320, 69324, 69328, 69332, 69336, 69340, 69344, 69348, 69352, 69356, 69360, 69364, 69368, 69372, 69376, 69380, 69384, 69388, 69392, 69396, 69400, 69404, 69408, 69412, 69416, 69420, 69424, 69428, 69432, 69436, 69440, 69444, 69448, 69452, 69456, 69460, 69464, 69468, 69472, 69476, 69480, 69484, 69488, 69492, 69496, 69500, 69504, 69508, 69512, 69516, 69520, 69524, 69528, 69532, 69536, 69540, 69544, 69548, 69552, 69556, 69560, 69564, 69568, 69572, 69576, 69580, 69584, 69588, 69592, 69596, 69600, 69604, 69608, 69612, 69616, 69620, 69624, 69628, 69632, 69636, 69640, 69644, 69648, 69652, 69656, 69660, 69664, 69668, 69672, 69676, 69680, 69684, 69688, 69692, 69696, 69700, 69704, 69708, 69712, 69716, 69720, 69724, 69728, 69732, 69736, 69740, 69744, 69748, 69752, 69756, 69760, 69764, 69768, 69772, 69776, 69780, 69784, 69788, 69792, 69796, 69800, 69804, 69808, 69812, 69816, 69820, 69824, 69828, 69832, 69836, 69840, 69844, 69848, 69852, 69856, 69860, 69864, 69868, 69872, 69876, 69880, 69884, 69888, 69892, 69896, 69900, 69904, 69908, 69912, 69916, 69920, 69924, 69928, 69932, 69936, 69940, 69944, 69948, 69952, 69956, 69960, 69964, 69968, 69972, 69976, 69980, 69984, 69988, 69992, 69996, 70000, 70004, 70008, 70012, 70016, 70020, 70024, 70028, 70032, 70036, 70040, 70044, 70048, 70052, 70056, 70060, 70064, 70068, 70072, 70076, 70080, 70084, 70088, 70092, 70096, 70100, 70104, 70108, 70112, 70116, 70120, 70124, 70128, 70132, 70136, 70140, 70144, 70148, 70152, 70156, 70160, 70164, 70168, 70172, 70176, 70180, 70184, 70188, 70192, 70196, 70200, 70204, 70208, 70212, 70216, 70220, 70224, 70228, 70232, 70236, 70240, 70244, 70248, 70252, 70256, 70260, 70264, 70268, 70272, 70276, 70280, 70284, 70288, 70292, 70296, 70300, 70304, 70308, 70312, 70316, 70320, 70324, 70328, 70332, 70336, 70340, 70344, 70348, 70352, 70356, 70360, 70364, 70368, 70372, 70376, 70380, 70384, 70388, 70392, 70396, 70400, 70404, 70408, 70412, 70416, 70420, 70424, 70428, 70432, 70436, 70440, 70444, 70448, 70452, 70456, 70460, 70464, 70468, 70472, 70476, 70480, 70484, 70488, 70492, 70496, 70500, 70504, 70508, 70512, 70516, 70520, 70524, 70528, 70532, 70536, 70540, 70544, 70548, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 70552, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 70556, 70559, 70563, 70567, 70570, 70574, 70578, 70581, 70584, 70588, 70592, 70595, 70599, 70602, 70605, 70608, 70611, 70615, 70618, 70621, 70624, 70627, 70630, 70633, 70636, 70639, 70642, 70645, 70648, 70651, 70655, 70658, 70662, 70667, 70672, 70677, 70682, 70687, 70692, 70697, 70702, 70707, 70712, 70717, 70722, 70727, 70732, 70737, 70742, 70747, 70752, 70757, 70762, 70767, 70772, 70777, 70782, 70787, 70792, 70797, 70801, 70806, 70810, 70814, 70819, 70824, 70829, 70834, 70839, 70844, 70849, 70854, 70859, 70864, 70869, 70874, 70879, 70884, 70889, 70894, 70899, 70904, 70909, 70914, 70919, 70924, 70929, 70934, 70939, 70944, 70949, 70954, 70959, 70963, 70968, 70970, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; /* name->code dictionary */ static unsigned int code_hash[] = { 0, 4851, 118860, 0, 0, 66306, 7929, 64584, 9518, 64710, 0, 42166, 0, 1097, 0, 12064, 41730, 596, 8570, 0, 120216, 8651, 41728, 41721, 41835, 12995, 41202, 1373, 0, 13110, 5816, 119067, 64810, 1000, 0, 11951, 41140, 1209, 9717, 0, 0, 1073, 0, 65470, 41138, 8851, 0, 0, 12167, 1115, 8874, 9794, 194660, 0, 0, 12237, 3966, 41603, 8308, 9290, 120763, 41600, 9231, 120183, 2959, 1457, 3535, 0, 42179, 63860, 41538, 12927, 8618, 42175, 3404, 64661, 5148, 41737, 1759, 0, 119974, 0, 118949, 12290, 66577, 120019, 9860, 12312, 10151, 8205, 0, 5131, 0, 9627, 0, 9834, 3055, 9852, 1944, 1248, 10148, 63884, 119990, 119991, 12701, 119204, 12235, 603, 0, 65327, 119998, 65305, 120000, 3350, 66576, 64318, 0, 8154, 3390, 120007, 41817, 119956, 64603, 66328, 120012, 120013, 3400, 120015, 6041, 65020, 41899, 119879, 8002, 8562, 4364, 0, 4043, 8712, 119988, 7813, 119117, 120759, 10124, 11966, 8601, 6069, 10143, 4814, 12041, 1418, 10885, 12673, 0, 0, 9660, 2764, 13012, 4571, 5704, 0, 119946, 12078, 2970, 5457, 5440, 8857, 0, 0, 2843, 5355, 41599, 118883, 119175, 5194, 12950, 0, 3486, 65324, 194602, 10123, 65167, 0, 10717, 64570, 2637, 64629, 8460, 10682, 8476, 10602, 800, 0, 120583, 194632, 7799, 64930, 0, 8465, 12289, 0, 2384, 13172, 13119, 8488, 5412, 10906, 1353, 0, 41351, 41823, 5828, 8206, 120674, 8933, 1601, 9072, 5867, 13302, 12458, 0, 8090, 5418, 12452, 0, 9483, 3351, 917544, 64510, 10817, 0, 41539, 2750, 0, 556, 41855, 41246, 0, 12213, 0, 2760, 10620, 0, 12210, 120743, 0, 5498, 9998, 41536, 0, 0, 9242, 3459, 8997, 0, 0, 194888, 0, 0, 4839, 12604, 0, 4435, 119016, 4975, 4635, 295, 120026, 195039, 6050, 64898, 0, 7688, 0, 63903, 9036, 63901, 0, 3971, 118975, 0, 2952, 917618, 6287, 8031, 2725, 63899, 63898, 5482, 667, 12332, 1177, 6086, 12322, 12069, 5172, 41617, 64102, 7859, 1945, 64099, 9815, 10453, 63883, 63882, 7997, 8555, 63878, 63877, 8705, 64097, 64096, 9571, 528, 0, 0, 12132, 41723, 63875, 41578, 63873, 63855, 63854, 41913, 9056, 0, 6188, 64593, 6155, 10806, 446, 41911, 64065, 41318, 63850, 63, 64069, 63846, 2972, 9455, 63843, 64064, 63849, 63848, 63847, 1176, 0, 8302, 9577, 63842, 4178, 13208, 13188, 10948, 10041, 8105, 4333, 0, 118983, 1105, 4180, 5388, 12094, 120165, 0, 7714, 63890, 63889, 7768, 5538, 9987, 0, 118932, 1678, 917611, 552, 9560, 64077, 10785, 8996, 12280, 4471, 119112, 9159, 10171, 63861, 10486, 5540, 63858, 63865, 281, 63863, 12075, 42041, 0, 5174, 0, 63857, 1388, 3123, 0, 1077, 13272, 8408, 64704, 194821, 0, 9223, 0, 65318, 0, 194822, 42105, 1116, 13274, 194972, 3663, 0, 1112, 119122, 8686, 8881, 5334, 42108, 0, 64092, 64091, 9322, 0, 120595, 64095, 5327, 8111, 63870, 63869, 3478, 63867, 6199, 2903, 0, 3001, 1158, 8745, 64081, 4741, 63866, 4737, 4370, 4846, 0, 4742, 41335, 4118, 1797, 64600, 805, 120130, 46, 65101, 8760, 298, 118987, 12212, 120123, 65174, 63836, 32, 5965, 0, 0, 12225, 3665, 63837, 64793, 65330, 41336, 4305, 66360, 8083, 0, 119938, 63821, 4412, 63819, 63818, 12244, 5227, 9047, 12702, 4181, 4752, 63975, 4634, 560, 5643, 8226, 6181, 63812, 41181, 63810, 63790, 3639, 63815, 10122, 63813, 6047, 7937, 63974, 780, 206, 0, 4936, 65147, 1098, 63930, 0, 1093, 41729, 3016, 4869, 63932, 917554, 63929, 3546, 1605, 0, 6182, 0, 65058, 8400, 41533, 63920, 0, 5471, 2984, 5314, 9287, 5473, 44, 0, 195075, 13169, 5290, 5283, 1695, 63827, 1088, 5961, 8304, 1084, 1085, 63829, 1083, 10131, 5576, 0, 64405, 4263, 1092, 4754, 8947, 5252, 0, 65253, 64938, 0, 7908, 120622, 120719, 120673, 0, 2965, 0, 8808, 0, 1089, 7761, 41641, 42119, 12355, 65204, 940, 5787, 9992, 63938, 5057, 64679, 12463, 2994, 5054, 41694, 0, 9664, 41026, 1437, 9399, 658, 3497, 12920, 0, 660, 5060, 666, 9022, 5532, 118951, 5533, 5059, 4727, 6118, 222, 979, 3884, 12459, 65154, 5773, 978, 120748, 120690, 41619, 10239, 12465, 0, 194863, 64411, 63946, 1707, 0, 12461, 63895, 63949, 63948, 63947, 3376, 6038, 63943, 63942, 63894, 65323, 0, 65508, 7776, 64278, 2379, 8703, 917591, 64668, 801, 8125, 1690, 63919, 63918, 63917, 2369, 0, 12844, 0, 119235, 5486, 2334, 64893, 4463, 5483, 10207, 0, 2367, 5484, 63909, 264, 2375, 8060, 6194, 5485, 1844, 119084, 9061, 5534, 10672, 4502, 0, 253, 0, 1823, 8800, 10746, 64470, 0, 11957, 6192, 0, 0, 118942, 0, 725, 4550, 13257, 120800, 118944, 12892, 0, 0, 41775, 8413, 0, 0, 5693, 10397, 0, 13209, 5074, 5073, 0, 8983, 0, 119183, 66586, 5072, 63982, 6198, 12478, 917609, 196, 66608, 3111, 64725, 4929, 12445, 0, 0, 0, 66606, 64942, 1076, 0, 1436, 4934, 64415, 41323, 9758, 0, 12807, 63907, 63906, 4548, 4329, 6113, 4979, 3048, 4423, 41320, 0, 10515, 6218, 8971, 5071, 0, 3642, 1430, 5070, 10042, 120606, 3987, 5068, 120483, 3255, 3493, 0, 8905, 10735, 120217, 41635, 3378, 4531, 1245, 9105, 66311, 4921, 4481, 3771, 194649, 2710, 41693, 0, 41724, 64709, 41682, 41690, 120790, 4922, 325, 992, 0, 4925, 10914, 0, 9526, 4920, 65262, 948, 10783, 120208, 4930, 917570, 4462, 194855, 4933, 5339, 6115, 120210, 4928, 917603, 4457, 0, 65290, 42163, 722, 5684, 8678, 12637, 0, 5689, 8753, 1509, 120617, 5468, 9511, 195043, 65183, 1672, 6205, 5832, 6310, 5686, 0, 120818, 0, 0, 0, 50, 0, 41607, 120115, 1679, 120116, 10759, 120113, 0, 3183, 13259, 4448, 119225, 401, 119139, 120109, 64763, 5761, 342, 8553, 1151, 8143, 0, 11983, 64384, 624, 120715, 65500, 0, 5078, 12501, 5656, 0, 5076, 118870, 8812, 0, 41601, 685, 9025, 1524, 8003, 194714, 5539, 8087, 12971, 120101, 120094, 1252, 0, 194612, 4636, 0, 118985, 8053, 9732, 0, 5080, 13121, 5036, 5035, 120590, 12277, 119187, 195042, 8074, 275, 13084, 194594, 8741, 4432, 120610, 5033, 120668, 64605, 4836, 3888, 473, 0, 8502, 120250, 120681, 1087, 12499, 0, 63844, 12496, 3601, 1922, 194626, 64965, 65422, 12502, 194624, 12505, 66321, 0, 9489, 0, 3432, 4384, 917548, 6094, 0, 8815, 13295, 64753, 0, 1676, 1154, 3857, 1205, 5030, 0, 13100, 12958, 10519, 9622, 0, 64723, 4421, 10592, 0, 495, 0, 10544, 7983, 118882, 10749, 119835, 8494, 13297, 10979, 41710, 947, 0, 437, 41709, 10969, 119935, 119934, 9465, 13290, 4795, 119930, 64306, 8826, 120181, 41714, 120611, 8626, 4590, 4711, 120769, 120195, 2739, 119918, 8044, 40964, 251, 12686, 7895, 4395, 119927, 119926, 119929, 1779, 8146, 119922, 41543, 5325, 642, 120753, 8880, 7685, 194653, 0, 6234, 13229, 625, 8187, 9990, 1113, 194643, 7915, 1104, 120176, 8179, 10655, 0, 9316, 10980, 2489, 1082, 8150, 1359, 194645, 0, 0, 0, 5042, 5041, 0, 12084, 8049, 41548, 0, 40962, 0, 0, 4761, 10506, 4766, 1616, 1273, 0, 8795, 118876, 0, 63957, 9232, 1138, 10483, 12677, 41545, 12881, 3239, 0, 0, 66614, 194582, 42128, 3484, 64545, 194801, 12620, 8503, 5122, 41527, 5040, 4924, 194913, 0, 120535, 0, 5039, 41926, 8303, 0, 5038, 0, 10003, 0, 917543, 120586, 1686, 0, 9359, 66609, 3664, 0, 8238, 64299, 0, 0, 3863, 126, 4835, 0, 0, 13245, 4309, 7744, 194569, 119902, 194568, 13184, 0, 0, 12222, 8136, 194987, 711, 1633, 0, 0, 4762, 1103, 194561, 12281, 4765, 41331, 1006, 13040, 4760, 9461, 8201, 10871, 0, 1102, 5031, 118904, 194664, 0, 64636, 13042, 337, 194781, 0, 119184, 12279, 1111, 120309, 194636, 4707, 194635, 5511, 7883, 8822, 7880, 4522, 8255, 5512, 13010, 119232, 66378, 64313, 194667, 5906, 1119, 120233, 13038, 120639, 2455, 64734, 13008, 41652, 4385, 12492, 12821, 8714, 64775, 119161, 13009, 160, 0, 0, 64262, 5052, 64031, 5821, 6186, 41792, 0, 5051, 0, 1429, 64573, 5050, 302, 388, 12058, 735, 0, 1079, 3867, 5708, 12726, 0, 9117, 5706, 10679, 5513, 8791, 4005, 0, 5510, 10991, 0, 65458, 2470, 917581, 41399, 1925, 194805, 917577, 917576, 917571, 5048, 5047, 41532, 10058, 0, 917569, 9070, 0, 3339, 8089, 1106, 639, 120456, 63967, 3340, 3109, 3653, 4599, 10799, 917583, 10605, 917585, 1476, 648, 1754, 11001, 3233, 864, 41782, 10164, 8972, 0, 3530, 9750, 0, 13240, 41781, 5192, 4338, 5046, 8512, 63770, 13199, 8967, 1236, 5045, 12012, 13189, 7986, 5044, 120556, 9006, 13128, 5043, 9553, 1590, 63777, 63776, 9669, 12341, 8654, 8402, 63779, 1583, 4740, 13260, 3586, 13276, 0, 120306, 0, 194661, 41523, 13296, 517, 12922, 120140, 194658, 41528, 123, 65454, 12393, 63807, 41997, 10531, 7784, 13271, 1334, 120445, 4479, 1126, 119004, 120663, 0, 8520, 3925, 0, 8069, 4357, 42154, 489, 120450, 120440, 8848, 63786, 8450, 120434, 11926, 41557, 1145, 63788, 7910, 63785, 63784, 10456, 8711, 6183, 8183, 120741, 8928, 0, 7952, 0, 125, 9235, 64861, 0, 12689, 0, 10779, 10990, 3523, 1074, 13258, 9536, 8477, 0, 4427, 10517, 63757, 7726, 12217, 41802, 267, 1349, 10713, 1371, 120293, 195070, 2458, 63753, 6201, 41084, 41074, 4266, 10652, 41612, 41077, 3402, 9050, 3398, 8140, 42084, 6260, 3391, 41075, 2476, 41956, 11988, 3898, 10625, 10201, 10988, 13017, 63794, 10367, 12521, 10431, 13014, 13013, 1068, 194806, 12523, 12945, 12524, 12438, 7950, 10804, 13233, 12082, 4386, 9053, 12473, 2793, 12475, 704, 0, 6195, 9530, 12238, 12232, 0, 194944, 5681, 12629, 4595, 63760, 792, 0, 64803, 0, 8742, 0, 64947, 65448, 63744, 12948, 64787, 195002, 63748, 1693, 63746, 63745, 5055, 0, 4287, 1090, 4902, 1131, 41180, 194721, 4558, 1816, 9523, 41712, 168, 0, 4898, 64298, 6157, 63775, 4901, 1821, 13191, 12170, 3500, 3139, 791, 9162, 12485, 10306, 119001, 194945, 0, 64433, 8354, 10033, 941, 0, 64422, 120185, 0, 8234, 64559, 8228, 8424, 10246, 194996, 12811, 194998, 3946, 195000, 8057, 0, 673, 194854, 64357, 0, 0, 9547, 288, 64296, 194976, 2448, 10025, 194981, 2918, 2452, 65300, 41529, 8729, 64726, 2790, 7845, 3793, 0, 4408, 4122, 0, 41535, 8723, 65178, 10087, 0, 731, 42109, 12923, 2438, 64855, 65396, 0, 1175, 13256, 1282, 373, 119172, 5396, 8653, 8557, 7723, 0, 3330, 0, 41952, 0, 5273, 8248, 5269, 3304, 5202, 2404, 5267, 0, 0, 0, 5277, 12963, 5371, 6189, 4125, 1826, 12133, 65241, 118873, 8785, 917589, 0, 64643, 9035, 3864, 13185, 4631, 3879, 118785, 0, 4166, 164, 0, 0, 64484, 0, 10212, 5384, 41882, 0, 64346, 0, 120098, 0, 41388, 0, 12005, 12666, 41387, 13207, 8706, 5552, 10172, 700, 5929, 5553, 12978, 194610, 5356, 12906, 8563, 41888, 3180, 0, 0, 5554, 971, 12344, 8724, 0, 13201, 63874, 0, 2866, 8517, 12446, 13190, 64632, 120227, 5555, 10045, 12882, 13275, 120672, 41522, 13206, 9143, 194957, 41525, 120539, 195069, 656, 194614, 65037, 4577, 12229, 8715, 0, 0, 120261, 4269, 64813, 119163, 41609, 10476, 950, 0, 3932, 41450, 0, 0, 0, 120014, 11974, 118884, 369, 119096, 41784, 119099, 5097, 194869, 9848, 0, 10381, 4796, 10317, 3651, 10285, 194616, 10269, 5102, 5101, 120511, 9064, 8138, 120455, 404, 5100, 1439, 12093, 1247, 8092, 195064, 5099, 1831, 1441, 4793, 3842, 650, 0, 746, 120784, 195041, 41453, 12018, 9031, 12182, 120305, 9078, 8545, 4422, 4708, 3799, 3268, 0, 9118, 119127, 2676, 7750, 4374, 195052, 6190, 1364, 195053, 8038, 195055, 9857, 0, 9858, 195033, 66585, 12129, 13174, 8481, 12412, 6202, 64380, 10920, 10872, 2365, 7841, 195038, 5108, 5107, 0, 13210, 6176, 195093, 5541, 41785, 41171, 12613, 5284, 4372, 207, 0, 4275, 120171, 0, 119147, 0, 12965, 384, 5103, 10404, 10340, 10702, 0, 488, 13236, 12937, 10017, 9733, 13187, 10014, 11982, 41373, 13198, 5203, 120517, 13232, 5106, 349, 4863, 41371, 13194, 41367, 5105, 13133, 12861, 4398, 5104, 5672, 304, 1096, 0, 0, 932, 12441, 0, 238, 195008, 4318, 10452, 195013, 8032, 13243, 13237, 12719, 194884, 119059, 64814, 64884, 119872, 10670, 8597, 1178, 64017, 9864, 13195, 8803, 309, 0, 8151, 10858, 64961, 7722, 12553, 10459, 12568, 64824, 12549, 66590, 12570, 9712, 41417, 41496, 0, 65165, 4965, 0, 10538, 0, 41401, 0, 0, 6191, 6261, 0, 0, 11965, 1957, 10420, 982, 2756, 9370, 2720, 12357, 119260, 2925, 118817, 13056, 3222, 13212, 10116, 41644, 10105, 10624, 41581, 10834, 118793, 64407, 5242, 41963, 64476, 1694, 8216, 10814, 0, 7781, 6306, 64568, 0, 120738, 12077, 42057, 41444, 0, 120325, 64799, 3475, 66566, 2479, 9709, 3632, 120322, 10698, 0, 3648, 3907, 194963, 194962, 3636, 40979, 2979, 8837, 65229, 1843, 3936, 0, 0, 41347, 65119, 13235, 3640, 41248, 120579, 4379, 13239, 12692, 7969, 120120, 66353, 194951, 118908, 120509, 41846, 2529, 734, 10808, 65146, 42083, 194955, 194954, 42055, 1846, 66367, 12181, 9634, 120310, 9988, 12991, 1670, 5740, 120317, 10072, 5379, 120318, 41163, 41157, 785, 8236, 194942, 9027, 63897, 13267, 64383, 64688, 925, 0, 120541, 41773, 41071, 9586, 120312, 41984, 9217, 6151, 12110, 0, 194901, 64580, 4016, 13265, 13264, 381, 12936, 6100, 42077, 120768, 5808, 5184, 8200, 12967, 10810, 5612, 4583, 0, 5860, 120506, 64575, 0, 812, 3615, 65284, 5178, 194929, 119015, 9825, 5188, 9698, 7814, 194935, 10692, 1166, 64429, 41921, 924, 9756, 12359, 119258, 0, 2442, 10703, 194940, 194939, 8012, 5674, 0, 0, 12361, 5677, 0, 0, 40972, 12453, 41920, 5673, 0, 5676, 8542, 12694, 118978, 2468, 1294, 41294, 3336, 3883, 64388, 1727, 194991, 0, 3605, 120638, 0, 12034, 8718, 3550, 736, 7806, 4505, 2715, 806, 5826, 41884, 5813, 0, 65391, 5841, 5837, 64731, 66325, 3105, 2405, 5838, 5796, 0, 65259, 5793, 5735, 5866, 5797, 1432, 5865, 12143, 7956, 598, 0, 41886, 2480, 0, 66334, 9037, 5671, 5537, 0, 0, 10932, 0, 1211, 847, 120615, 9529, 118832, 12318, 194601, 0, 5645, 10622, 41391, 194967, 120033, 64597, 0, 5650, 120039, 119102, 64864, 194968, 9624, 0, 0, 0, 2748, 3589, 0, 4035, 10297, 0, 4265, 194969, 3977, 65344, 12051, 836, 5698, 2488, 194634, 4582, 120713, 5644, 10292, 66627, 8046, 0, 10550, 120081, 65116, 119206, 120022, 65120, 1374, 64878, 119014, 41013, 10568, 41374, 4030, 41010, 0, 41015, 120516, 65325, 400, 12597, 120621, 0, 120593, 41375, 5659, 64827, 4759, 118906, 390, 10266, 41349, 1170, 3473, 7718, 118962, 1609, 902, 0, 0, 66352, 0, 8122, 5712, 0, 8004, 3861, 9540, 10278, 2554, 5158, 5714, 41136, 194970, 64351, 807, 0, 194691, 64677, 976, 0, 6146, 65518, 771, 10954, 41356, 9673, 13168, 0, 41143, 8676, 7904, 5579, 953, 451, 194585, 5578, 12635, 0, 9724, 0, 0, 9524, 120794, 118789, 1440, 3379, 10310, 120016, 120722, 471, 0, 0, 3795, 120220, 12586, 10701, 0, 41060, 10094, 64900, 194959, 10857, 2474, 120640, 9590, 93, 10615, 10213, 8128, 12551, 10049, 8171, 3544, 0, 6017, 65311, 383, 120223, 13306, 10533, 7870, 0, 5187, 120711, 1456, 0, 42164, 0, 194702, 5232, 0, 41009, 2472, 41005, 120699, 8710, 6019, 4256, 120776, 4980, 8860, 9640, 10028, 12845, 119114, 13182, 65121, 120685, 0, 10631, 65126, 7972, 118928, 8066, 0, 7900, 8316, 0, 120213, 120555, 0, 120830, 0, 10347, 445, 120566, 0, 12931, 0, 8330, 0, 0, 0, 64366, 64369, 8814, 3902, 64607, 1770, 0, 12836, 0, 64552, 0, 4584, 9684, 0, 0, 10866, 0, 1118, 0, 0, 9349, 1081, 120464, 0, 8162, 9342, 5996, 0, 4903, 64332, 41386, 5162, 41007, 1330, 64486, 40995, 12209, 12047, 41384, 0, 0, 1848, 4334, 120334, 41975, 64777, 10674, 5522, 0, 61, 120157, 0, 3633, 917582, 65162, 41234, 12089, 118800, 9771, 120333, 13251, 41959, 64749, 6262, 2784, 0, 9334, 8126, 0, 64967, 7975, 441, 194591, 0, 66621, 4884, 40999, 120269, 0, 66314, 6313, 10890, 0, 119090, 8324, 7855, 2345, 0, 463, 64737, 0, 0, 3117, 5460, 0, 1193, 10056, 1148, 12396, 13252, 7829, 42173, 0, 7743, 0, 13248, 5499, 120549, 120557, 9034, 6039, 0, 5663, 119182, 41018, 0, 10338, 2482, 1471, 195027, 120079, 66370, 12378, 41966, 41970, 0, 12374, 10903, 9592, 0, 911, 2460, 120499, 11944, 12376, 41032, 40996, 120614, 12380, 5520, 64473, 10869, 5870, 64670, 13310, 2603, 12326, 539, 0, 65180, 0, 3853, 41327, 64901, 120796, 0, 10722, 0, 8659, 0, 12474, 0, 5857, 65342, 2478, 119120, 4162, 7942, 4260, 12953, 119245, 120090, 12470, 0, 0, 2742, 12476, 5439, 10946, 9101, 12472, 0, 12302, 3018, 12942, 5748, 194895, 10773, 6161, 0, 8796, 0, 194583, 118986, 8519, 13146, 119954, 42053, 9422, 10333, 2882, 4366, 0, 12843, 4520, 0, 0, 10648, 0, 4014, 12842, 0, 12015, 13117, 0, 3893, 66362, 5810, 0, 0, 42147, 64747, 13292, 0, 12938, 10427, 9154, 3844, 63934, 9755, 1110, 65239, 10892, 8231, 10775, 0, 41968, 783, 12161, 3591, 41969, 0, 2453, 8518, 3620, 119181, 12443, 4556, 10349, 10413, 0, 41159, 3202, 119097, 10510, 4382, 0, 0, 10842, 41265, 120088, 8902, 0, 1840, 41751, 12891, 0, 4883, 285, 4723, 41917, 9788, 4459, 66635, 1634, 41958, 9155, 240, 9786, 65082, 41919, 8579, 9743, 7981, 13134, 118878, 4508, 64883, 41999, 120231, 120664, 118885, 63887, 3081, 63886, 120080, 0, 0, 10445, 41720, 0, 0, 2614, 9024, 64620, 1729, 0, 64289, 65221, 0, 65466, 64852, 64509, 120235, 63916, 194984, 41203, 0, 41879, 0, 4121, 12957, 884, 41214, 63879, 4943, 5150, 0, 5278, 7773, 643, 3086, 118912, 64652, 120068, 58, 0, 6167, 120083, 63872, 8491, 0, 0, 41495, 3624, 0, 0, 64655, 2721, 9616, 63988, 41955, 41321, 10500, 10440, 9611, 4264, 120077, 0, 7738, 63986, 63985, 12638, 0, 3435, 3094, 12916, 9754, 66376, 4437, 41292, 8899, 0, 42058, 9517, 65143, 0, 65360, 0, 119047, 63956, 4306, 41380, 11995, 63960, 9591, 63958, 10217, 118845, 120657, 120578, 12456, 2723, 0, 5088, 5086, 0, 0, 7752, 41378, 2880, 0, 0, 2872, 1386, 65034, 3498, 4378, 65039, 4270, 12392, 65036, 7853, 0, 12101, 5822, 5230, 0, 710, 0, 12390, 1666, 8161, 371, 12013, 63891, 42092, 119103, 415, 63851, 63892, 63962, 42096, 5183, 3362, 12377, 7924, 2927, 4324, 63961, 4472, 1244, 331, 0, 12683, 10662, 64678, 4756, 195017, 119021, 10730, 7691, 10331, 0, 41964, 6238, 8938, 8628, 6043, 0, 64895, 1604, 9565, 10539, 120814, 41220, 13032, 120791, 194575, 10032, 8750, 12373, 63828, 11992, 1351, 0, 8698, 12190, 3622, 1930, 194573, 9621, 12427, 63981, 4967, 13031, 1966, 2330, 0, 3657, 0, 65202, 6000, 4347, 4416, 42098, 13180, 10694, 8099, 402, 41916, 13147, 0, 42100, 12429, 9695, 41757, 41281, 3515, 5170, 65261, 41755, 676, 6259, 41742, 0, 41870, 0, 3536, 0, 41305, 63902, 6162, 10532, 0, 10113, 41829, 120545, 5159, 12422, 41832, 439, 0, 194948, 12316, 12481, 2325, 40970, 41830, 194947, 0, 5145, 12486, 65018, 194723, 5409, 8976, 0, 12336, 4135, 9685, 341, 2727, 4129, 3539, 66616, 0, 41736, 7913, 5405, 63859, 4131, 41267, 64721, 63871, 4133, 63864, 210, 4600, 64690, 3254, 4137, 120608, 0, 119062, 0, 0, 4591, 65077, 118982, 0, 3355, 9508, 3393, 561, 12159, 195, 64261, 3377, 12497, 41269, 0, 13135, 0, 8368, 119224, 41499, 0, 0, 0, 41498, 0, 1379, 246, 12603, 0, 3788, 2924, 64587, 12812, 8728, 64906, 119213, 8917, 0, 301, 64765, 3969, 64964, 9575, 64562, 0, 9652, 0, 64590, 42086, 0, 0, 13163, 0, 41877, 120443, 3182, 327, 0, 9042, 120298, 0, 42169, 4755, 0, 119882, 13223, 12431, 8668, 12434, 608, 600, 5999, 1219, 3934, 9494, 0, 0, 1726, 0, 64686, 8212, 12115, 0, 13160, 7759, 65363, 485, 0, 65291, 9828, 927, 42102, 194979, 12436, 9351, 7778, 64379, 0, 0, 10126, 1208, 0, 64757, 9337, 64362, 0, 64535, 120735, 9021, 0, 0, 0, 119237, 5411, 0, 9648, 64617, 63834, 9150, 63835, 1117, 13037, 2594, 63809, 10691, 12052, 10643, 41503, 65212, 64536, 2546, 119216, 213, 65309, 10554, 3972, 0, 194678, 65442, 194677, 12416, 11914, 5452, 8230, 0, 41951, 12418, 42049, 3882, 8532, 2713, 1573, 9650, 42136, 4596, 66339, 1406, 194682, 40990, 194593, 12414, 8287, 4143, 194687, 10489, 1143, 4141, 9682, 12415, 1508, 64515, 8779, 10569, 8725, 120783, 65264, 64487, 119064, 4145, 194761, 194794, 66613, 0, 8027, 120192, 0, 9550, 0, 0, 194799, 120189, 64070, 10740, 195020, 64816, 10998, 66333, 12955, 0, 2888, 0, 0, 7715, 3881, 41487, 12118, 194778, 2878, 5390, 0, 3009, 41476, 41489, 63765, 3007, 1448, 2975, 10429, 3889, 8521, 5083, 5082, 0, 5235, 803, 194966, 3014, 5081, 8986, 11002, 10632, 11934, 0, 1332, 64802, 3929, 4597, 65532, 64767, 9107, 5191, 9288, 9657, 2892, 10577, 6031, 555, 120188, 0, 194927, 12367, 42170, 13151, 0, 629, 1924, 0, 12037, 0, 5858, 8462, 8005, 12365, 1784, 1361, 118939, 12369, 7905, 120041, 5077, 194668, 10880, 63927, 5075, 194973, 9371, 65075, 41193, 11007, 0, 10997, 0, 1342, 0, 0, 3434, 4843, 4506, 0, 5266, 0, 5272, 4482, 4507, 9578, 63923, 66319, 7979, 64381, 9831, 64417, 0, 461, 9803, 41972, 4504, 444, 0, 9127, 5276, 64522, 0, 120179, 0, 64911, 12848, 5177, 41324, 12055, 8722, 120805, 1197, 65512, 1149, 4114, 409, 4383, 8900, 8948, 7684, 3492, 721, 41191, 9108, 0, 0, 11954, 119191, 118819, 40963, 3099, 0, 65088, 0, 119834, 12587, 194703, 0, 12036, 0, 65123, 41576, 8152, 120721, 64428, 12227, 8578, 5995, 12828, 41575, 2922, 63950, 63944, 120643, 0, 2670, 4167, 0, 65009, 120025, 65173, 118958, 13023, 938, 0, 0, 0, 9721, 0, 41017, 9606, 12413, 4024, 41063, 0, 12334, 0, 4153, 11911, 10793, 5250, 12407, 3395, 4404, 0, 12401, 42007, 5775, 42005, 194739, 119251, 0, 12205, 1344, 8870, 194744, 4940, 4735, 7683, 1167, 12822, 4983, 0, 63939, 64907, 0, 0, 0, 63896, 0, 12039, 10559, 11956, 119841, 118892, 9472, 4282, 11929, 0, 12816, 9596, 0, 12710, 0, 12721, 4101, 0, 0, 5992, 119840, 0, 120280, 1004, 9632, 120602, 0, 0, 12627, 10953, 0, 6290, 0, 0, 0, 9491, 9686, 5890, 0, 65232, 12712, 0, 194748, 10718, 13154, 3461, 9139, 64756, 0, 119151, 0, 0, 13227, 12585, 10565, 119152, 12177, 41708, 12860, 41098, 10015, 10838, 4900, 10352, 0, 10061, 5903, 4119, 5140, 209, 64002, 41704, 9702, 119100, 41132, 9245, 13048, 4927, 4138, 41093, 65286, 0, 2410, 993, 194975, 13054, 12394, 0, 0, 0, 12685, 120011, 119040, 10781, 41230, 0, 0, 1680, 10507, 118809, 10659, 3600, 13049, 120027, 1336, 41518, 0, 5896, 119838, 5993, 2819, 64820, 12706, 12966, 41134, 120581, 63915, 0, 8184, 272, 1363, 8793, 8411, 63908, 41502, 3077, 983, 0, 1512, 0, 1190, 4109, 1335, 841, 5888, 41358, 9836, 9544, 120820, 41481, 8313, 7832, 118954, 3090, 2409, 817, 1664, 1850, 120757, 3079, 4731, 10118, 66629, 64541, 12033, 1255, 12386, 9247, 64350, 66633, 12389, 66610, 0, 41996, 63990, 64936, 5864, 1147, 63992, 5835, 5328, 66625, 5480, 7858, 41990, 4116, 12391, 66634, 1094, 194, 12384, 0, 8180, 41686, 12313, 0, 63904, 195018, 6114, 10898, 0, 64578, 8247, 507, 91, 0, 10695, 0, 12070, 0, 10036, 7857, 6067, 774, 119829, 2744, 119815, 5994, 12539, 41857, 64321, 8359, 119820, 6028, 119819, 13167, 0, 7719, 119875, 2486, 7893, 41059, 162, 5436, 0, 119809, 9687, 64956, 6304, 119078, 6051, 0, 5262, 5904, 0, 12681, 0, 0, 12406, 12219, 3652, 10537, 0, 10492, 64550, 0, 279, 0, 119978, 64619, 12403, 1489, 195016, 4132, 4899, 3899, 1007, 42124, 4976, 2343, 4103, 0, 0, 10750, 1345, 0, 120801, 12859, 8956, 4098, 65267, 5861, 0, 11999, 12151, 64804, 0, 12645, 5146, 0, 0, 0, 41094, 492, 8685, 12974, 0, 118865, 41551, 5147, 2582, 0, 64538, 0, 1928, 0, 9594, 5991, 13304, 0, 2527, 0, 197, 2799, 8241, 0, 119810, 120199, 0, 64958, 0, 5524, 194809, 10138, 119808, 0, 8897, 119072, 41553, 8357, 4124, 1799, 65371, 42148, 0, 12954, 194688, 65340, 1123, 963, 2434, 10120, 12405, 195015, 0, 398, 392, 9723, 7894, 119011, 7945, 64935, 4402, 10896, 12402, 119106, 41880, 8414, 12408, 120554, 0, 406, 0, 9164, 12411, 0, 4560, 8554, 4961, 0, 1575, 64682, 5438, 165, 9993, 41467, 63953, 8064, 9093, 9599, 9147, 0, 0, 4987, 9148, 2399, 4096, 53, 10944, 12368, 65435, 195011, 8178, 64598, 3367, 12910, 10884, 727, 65272, 0, 5805, 1947, 0, 195022, 42176, 12370, 120397, 1705, 9331, 8898, 0, 12372, 120642, 195023, 8017, 65287, 8813, 12366, 10963, 6066, 1329, 4909, 3052, 9220, 120696, 4904, 120274, 10803, 1365, 9253, 0, 41264, 0, 120712, 0, 119814, 1499, 0, 8055, 0, 8740, 5398, 63964, 120419, 8924, 0, 5988, 3660, 12017, 64646, 9476, 8788, 1357, 42113, 0, 3629, 8774, 42114, 0, 3628, 120172, 0, 1933, 3469, 1567, 42116, 11969, 64809, 2928, 4905, 2487, 4910, 3121, 1804, 3311, 194916, 9114, 0, 12083, 9315, 4822, 4906, 3852, 2847, 0, 3236, 0, 1251, 7777, 41852, 7951, 1198, 9132, 0, 12274, 510, 10259, 9865, 0, 4561, 6018, 1398, 0, 12276, 120683, 41569, 0, 120750, 8167, 12127, 41932, 840, 120300, 2443, 10918, 10410, 0, 1001, 9241, 1927, 333, 41930, 0, 8144, 8034, 119833, 0, 118828, 0, 12867, 0, 8260, 7769, 64910, 12621, 65364, 8904, 518, 4764, 0, 41168, 13204, 4387, 4127, 10530, 65369, 0, 120724, 41044, 0, 0, 9358, 0, 42078, 5136, 1968, 0, 0, 1337, 10581, 0, 4533, 796, 195001, 0, 0, 12038, 120649, 12664, 0, 65461, 9798, 6120, 478, 1948, 119007, 10962, 952, 6016, 0, 0, 9512, 4276, 1206, 3619, 41638, 0, 3843, 8142, 8853, 3361, 41795, 490, 10715, 3436, 0, 63841, 12817, 9847, 12348, 3930, 12854, 0, 6154, 9551, 65354, 65346, 784, 65357, 334, 64797, 1453, 65356, 8940, 120329, 8500, 10428, 10364, 64715, 778, 4317, 10004, 7989, 64676, 3227, 120238, 194654, 120782, 0, 10855, 13102, 41702, 10309, 9718, 10277, 194958, 120308, 41624, 5415, 9613, 9001, 4526, 3462, 65215, 64520, 41020, 0, 120042, 42056, 9759, 64957, 3963, 120304, 8114, 1469, 65445, 65381, 194709, 4988, 0, 118956, 9598, 904, 352, 0, 1451, 1356, 8453, 4134, 0, 0, 1619, 9703, 41745, 0, 8575, 119180, 1201, 64732, 12846, 0, 41860, 11919, 64962, 41550, 5289, 13144, 8511, 9460, 823, 9675, 12305, 5940, 226, 2649, 12387, 1253, 0, 0, 500, 64521, 9081, 1658, 11936, 64735, 120705, 64660, 63845, 64784, 9785, 42123, 64783, 194619, 0, 5152, 8935, 41754, 119101, 5304, 0, 616, 4323, 64666, 4684, 0, 120613, 194912, 65339, 10560, 6048, 4763, 4112, 118935, 10870, 5260, 9821, 65129, 326, 9681, 4475, 0, 10771, 2876, 194915, 194833, 6035, 41398, 41192, 9802, 13261, 194880, 453, 41396, 917564, 13159, 12140, 9572, 65274, 10392, 10328, 40998, 7704, 917542, 194886, 9800, 4123, 0, 42103, 41000, 7854, 119239, 0, 10977, 64061, 10344, 9808, 64014, 5394, 4126, 12800, 9521, 9589, 64755, 194917, 4425, 194897, 10464, 63802, 64769, 1288, 0, 64016, 64024, 12173, 679, 64012, 194893, 5850, 12049, 118937, 10796, 4474, 10742, 10693, 64006, 1587, 64005, 0, 120519, 65490, 1369, 12134, 119050, 7927, 0, 1139, 64030, 64026, 64029, 8970, 64948, 4430, 0, 10774, 4514, 0, 12421, 8194, 0, 1852, 3057, 65483, 8893, 64032, 12542, 12973, 65341, 120497, 0, 7925, 12423, 10475, 0, 3496, 1352, 10933, 7707, 9102, 627, 42034, 6158, 8327, 64497, 0, 6040, 917592, 10129, 64863, 9336, 65451, 5730, 7844, 7798, 64474, 64259, 1682, 64290, 7820, 119049, 12951, 194906, 7746, 1492, 0, 8288, 12563, 10728, 5127, 120163, 65509, 5495, 4273, 118922, 9644, 10849, 1833, 2999, 120612, 64373, 194622, 185, 65085, 6023, 169, 5497, 64611, 8085, 0, 194850, 194789, 8224, 119010, 1949, 4117, 7847, 120489, 119982, 5321, 0, 120534, 9313, 2589, 64408, 1689, 7802, 4683, 120502, 120716, 64667, 0, 1184, 0, 815, 8273, 0, 6049, 120530, 4027, 834, 0, 1803, 64683, 1503, 8995, 0, 0, 5731, 1381, 2387, 0, 12430, 8289, 10981, 12654, 2881, 65514, 917600, 9601, 332, 9668, 9766, 5142, 2407, 119221, 0, 6036, 64881, 4026, 8645, 64789, 2887, 119832, 3526, 6298, 119136, 64475, 4833, 1834, 195095, 8572, 6021, 10940, 65249, 119848, 8662, 119207, 0, 2652, 10959, 119849, 10784, 120720, 0, 166, 0, 8635, 9706, 10623, 408, 1828, 0, 13298, 0, 8531, 8168, 6280, 12324, 8811, 10639, 0, 4832, 64557, 41643, 6279, 12508, 8713, 10690, 9161, 41645, 1620, 0, 646, 0, 195091, 42129, 609, 119858, 3472, 8697, 41086, 0, 4343, 6212, 0, 0, 5809, 1950, 239, 119828, 637, 120048, 41592, 119855, 917539, 120449, 0, 3247, 120754, 12985, 12696, 119854, 0, 119827, 12929, 10983, 712, 120291, 0, 41567, 0, 0, 0, 119852, 120793, 119137, 1506, 41565, 0, 4509, 0, 12651, 12216, 64628, 40988, 11961, 120626, 41727, 7803, 64341, 2396, 42036, 118844, 0, 120264, 355, 9719, 3886, 9814, 63912, 0, 65444, 996, 42075, 64880, 917578, 65199, 194810, 8655, 8222, 0, 7939, 10342, 917574, 3178, 917590, 0, 5907, 42071, 3976, 0, 42161, 0, 5833, 12561, 12555, 5969, 5699, 12562, 12550, 9488, 40982, 8489, 0, 1488, 0, 13149, 0, 9799, 5265, 66612, 1563, 119091, 9619, 12464, 0, 917557, 119842, 64508, 5803, 7797, 6070, 10006, 64919, 465, 6082, 13078, 9692, 194745, 12567, 8116, 795, 0, 7843, 12462, 3607, 12715, 10046, 9612, 42153, 8218, 9485, 120811, 0, 12468, 8607, 1008, 65322, 3306, 120321, 65138, 6057, 508, 0, 1766, 119074, 11996, 1820, 4547, 0, 638, 6083, 120265, 12308, 0, 2305, 0, 0, 9470, 6056, 10878, 65236, 4818, 6085, 0, 65207, 3915, 41634, 5382, 41639, 0, 6235, 119060, 4028, 1787, 42180, 41979, 0, 3249, 1768, 1130, 12328, 501, 42016, 10601, 195087, 917629, 65294, 7742, 0, 13280, 41922, 10747, 118925, 5310, 9475, 0, 120810, 8959, 5526, 119085, 0, 0, 8568, 119818, 65155, 64939, 5403, 0, 41703, 64926, 1771, 12460, 8936, 120631, 119023, 0, 10760, 119115, 9158, 0, 120259, 0, 120582, 5410, 5783, 10365, 8403, 5400, 120526, 120295, 5027, 9326, 10491, 0, 4831, 120698, 5028, 5587, 0, 0, 5026, 4923, 65086, 8981, 12382, 8931, 120755, 1415, 8866, 0, 65513, 10461, 12103, 0, 8642, 5029, 64788, 1580, 3598, 0, 41070, 10053, 0, 0, 120258, 6026, 41515, 0, 64592, 1716, 1461, 910, 11907, 620, 41001, 3658, 41541, 120107, 120332, 64758, 5024, 12888, 41003, 118811, 5025, 120767, 41514, 0, 5703, 119124, 41517, 41504, 41519, 0, 40989, 119160, 5849, 623, 781, 670, 10660, 5769, 613, 6105, 120774, 477, 1268, 65275, 8906, 592, 1578, 2636, 64404, 10815, 917602, 8225, 194928, 654, 0, 653, 652, 7721, 647, 7869, 633, 120224, 42152, 64361, 12480, 6119, 829, 39, 12487, 0, 120529, 0, 12482, 0, 12489, 9667, 391, 5550, 0, 482, 0, 1203, 0, 1813, 64544, 41311, 9503, 120623, 2877, 120249, 120758, 1675, 4939, 5315, 0, 66567, 10070, 10595, 65443, 4576, 0, 64304, 120241, 4277, 40997, 4039, 0, 64472, 368, 13036, 3960, 65460, 119073, 120247, 120244, 0, 3958, 0, 1849, 194564, 270, 13086, 10714, 194650, 42064, 11959, 0, 64657, 41608, 3618, 120240, 9069, 6273, 5156, 364, 9595, 929, 119980, 42035, 707, 41155, 41725, 8691, 0, 224, 41662, 0, 9332, 4966, 0, 0, 4578, 64513, 3841, 0, 0, 10732, 13074, 9580, 4972, 9356, 0, 2909, 118847, 1286, 10166, 8682, 12147, 10203, 9608, 12815, 7730, 11962, 41540, 12507, 1196, 0, 0, 777, 10020, 4375, 41372, 41924, 525, 12198, 0, 8763, 0, 41628, 533, 11931, 8658, 0, 41520, 2705, 65010, 13126, 9838, 4377, 8559, 7765, 120234, 63780, 13193, 2701, 119051, 8679, 5767, 1576, 7735, 9809, 8353, 63747, 41960, 63772, 0, 10889, 1748, 7757, 65265, 120226, 12803, 0, 2718, 4168, 0, 13308, 63764, 63787, 1179, 4440, 0, 7694, 363, 8896, 63768, 3485, 12987, 41701, 64908, 120826, 0, 1591, 42168, 64625, 10192, 0, 119192, 13053, 10013, 5630, 0, 0, 9492, 10390, 13083, 12833, 5543, 120609, 1640, 12495, 630, 0, 3138, 10996, 41127, 1043, 0, 12498, 10090, 0, 0, 313, 0, 8615, 120746, 41878, 493, 41426, 5750, 1717, 9417, 479, 9405, 120771, 0, 9398, 9403, 3520, 8426, 12490, 64315, 65185, 0, 12493, 5815, 10707, 1002, 12491, 0, 12934, 631, 120146, 64922, 13161, 41303, 0, 10546, 120147, 118901, 13305, 0, 2797, 13107, 120095, 306, 714, 3058, 0, 0, 917555, 119961, 194824, 0, 12644, 0, 0, 194815, 7909, 9157, 4569, 63758, 63805, 0, 63804, 40986, 180, 244, 0, 12898, 12494, 12674, 8244, 362, 0, 118967, 8037, 0, 0, 120680, 4882, 5185, 0, 5521, 4885, 5519, 42155, 10302, 4880, 10104, 1027, 1360, 248, 12424, 10523, 1446, 4319, 41646, 991, 5189, 63754, 10494, 120527, 1722, 5581, 120151, 470, 118965, 65271, 5523, 0, 64527, 4579, 0, 9549, 12511, 10549, 12514, 9661, 0, 12000, 9602, 8623, 0, 0, 0, 0, 12512, 41341, 13041, 6150, 9846, 659, 6098, 0, 1174, 10334, 0, 8311, 12510, 63856, 13039, 0, 12513, 9284, 12471, 0, 12330, 0, 63853, 0, 2323, 65288, 2319, 6293, 12477, 0, 2311, 194867, 4415, 237, 6281, 0, 0, 9010, 2309, 7897, 8173, 64894, 12469, 0, 118979, 1736, 10609, 3894, 12228, 9397, 10987, 3383, 9396, 9393, 693, 9130, 314, 9389, 6209, 9387, 9388, 4932, 9386, 9383, 5332, 12204, 9285, 10436, 8185, 41808, 1751, 273, 8165, 13166, 2313, 65449, 7948, 9236, 8544, 4528, 2584, 6301, 119185, 6289, 10484, 9463, 0, 9339, 10922, 3757, 3147, 195092, 12420, 10421, 120488, 2310, 64389, 2326, 9382, 2565, 9380, 9377, 7921, 9375, 9376, 1683, 9374, 2567, 8596, 12444, 4044, 41274, 12527, 8210, 120756, 8334, 474, 12331, 0, 42032, 8744, 726, 9839, 120313, 0, 0, 41276, 42030, 10467, 12522, 9835, 0, 4951, 634, 12275, 10895, 65492, 274, 120236, 1858, 4744, 4746, 0, 9548, 120596, 403, 120117, 12503, 9610, 8068, 8197, 63996, 699, 120634, 41665, 1819, 10496, 0, 42182, 0, 13262, 0, 41667, 12506, 194835, 1923, 0, 12500, 118849, 12509, 64393, 194755, 120692, 10589, 64279, 41047, 2996, 1937, 194716, 917505, 8084, 4047, 3608, 63840, 65016, 1107, 194718, 9076, 8862, 120636, 293, 194841, 64766, 64791, 41827, 13222, 65416, 10579, 8560, 10463, 63994, 118835, 4803, 9043, 1739, 1941, 498, 64471, 1713, 0, 12529, 8042, 0, 2344, 12528, 6297, 2414, 0, 0, 3231, 0, 12200, 0, 65156, 12530, 2537, 969, 41429, 12658, 13034, 6165, 13035, 0, 41433, 4719, 469, 119240, 4363, 5211, 8914, 0, 119948, 1772, 1435, 64876, 2969, 6046, 64812, 6208, 64101, 5746, 12215, 0, 4931, 1951, 8612, 917599, 9607, 0, 338, 0, 5061, 10675, 41106, 10767, 1491, 8115, 0, 11941, 41061, 8227, 8270, 1218, 0, 41993, 41509, 0, 63808, 12889, 120603, 41108, 4486, 41995, 1075, 1958, 10925, 41992, 41506, 0, 0, 120326, 10257, 0, 10273, 120327, 7692, 12669, 8008, 120320, 330, 8566, 65083, 9046, 41117, 41126, 12532, 0, 120114, 3508, 7794, 0, 0, 9645, 65026, 10770, 3669, 3968, 65028, 0, 13028, 194890, 12537, 194802, 120112, 0, 12536, 2350, 13029, 66320, 0, 12116, 13030, 118980, 4527, 1588, 12538, 8409, 119026, 10683, 65398, 787, 9502, 4948, 12484, 4032, 118940, 41654, 65399, 6207, 0, 6117, 65401, 8412, 65247, 194842, 8734, 644, 9769, 41657, 10149, 3659, 9533, 184, 9853, 10827, 12488, 65382, 10502, 41556, 12623, 65474, 2354, 0, 8220, 118856, 6295, 901, 41510, 7953, 118826, 5157, 4020, 63811, 11927, 66584, 64818, 0, 41687, 64303, 0, 63816, 0, 0, 119868, 65198, 0, 0, 118930, 64094, 118926, 7877, 2352, 0, 120726, 64576, 13299, 1407, 10911, 0, 13026, 0, 7941, 0, 8362, 8903, 9777, 0, 10399, 5869, 8636, 0, 1343, 0, 12649, 9325, 13025, 6283, 64499, 12643, 0, 0, 13027, 8543, 10051, 9216, 8263, 13019, 41258, 8625, 194754, 13021, 10477, 3136, 8733, 120742, 8315, 13022, 10196, 64588, 0, 6152, 0, 5477, 917566, 10112, 194763, 13020, 194765, 8675, 194767, 194766, 119870, 0, 10978, 8029, 6091, 120350, 4485, 3335, 118886, 3590, 9776, 41397, 66578, 5215, 194750, 3333, 1632, 63900, 3588, 3342, 9341, 5363, 917559, 12725, 120564, 0, 64076, 223, 64079, 1611, 13246, 13018, 120319, 63792, 65245, 3337, 1171, 194605, 194587, 0, 1805, 8772, 41423, 119241, 11945, 8708, 13046, 8838, 425, 4025, 10709, 41868, 0, 2392, 13047, 4530, 120105, 10617, 1213, 119233, 120103, 797, 118814, 7888, 13050, 194742, 64387, 4115, 0, 194735, 0, 3277, 8929, 4947, 41055, 0, 64276, 426, 194724, 13045, 8251, 10136, 7751, 194727, 9726, 119253, 1224, 12806, 8768, 13044, 0, 1764, 3101, 119817, 8480, 1078, 9757, 65439, 41057, 120167, 0, 8663, 9312, 4413, 4539, 3787, 42160, 9222, 0, 9165, 1572, 9092, 12593, 41961, 2346, 12724, 8958, 0, 9646, 3773, 41825, 1293, 7947, 12003, 120228, 13043, 8056, 2454, 5349, 208, 0, 120168, 64849, 120525, 8816, 10699, 10840, 0, 7825, 5661, 0, 12595, 3603, 41109, 2398, 3548, 1157, 64903, 8638, 0, 0, 3115, 0, 0, 118787, 8235, 4405, 10086, 4876, 0, 0, 119256, 65430, 64493, 6079, 12646, 10764, 8158, 41561, 41472, 998, 13051, 13105, 3143, 194674, 194673, 41559, 8509, 7882, 13052, 118948, 5665, 530, 119071, 41986, 0, 12002, 64526, 5742, 5664, 4692, 8979, 12310, 4007, 63970, 194686, 7896, 1121, 119168, 3382, 63959, 66373, 13231, 0, 64874, 4732, 6311, 0, 12004, 63976, 8627, 63977, 10110, 194671, 41705, 0, 42028, 64327, 10509, 2795, 63979, 65308, 0, 0, 6275, 917573, 41699, 120324, 194655, 3229, 65517, 63952, 41133, 0, 5407, 12823, 2331, 41678, 42026, 12156, 2336, 119046, 0, 120323, 0, 0, 1921, 120003, 194642, 0, 822, 65529, 12691, 4284, 194657, 194648, 194659, 12841, 9229, 10956, 41255, 12607, 5311, 1795, 965, 3521, 10587, 5774, 8325, 0, 65403, 0, 1854, 10794, 119250, 10057, 6294, 3144, 64780, 5280, 65019, 4344, 12905, 41610, 6076, 748, 12385, 768, 535, 442, 12375, 194652, 194629, 10556, 2475, 12388, 4889, 8968, 6071, 3593, 64093, 4804, 2342, 0, 1800, 0, 4894, 467, 4890, 120803, 194800, 120707, 4893, 8421, 12433, 10666, 4888, 502, 64080, 64615, 41490, 0, 12043, 10119, 316, 0, 10230, 65191, 64087, 64924, 64086, 64746, 2332, 4860, 412, 194567, 11997, 12432, 9583, 8058, 5546, 8019, 917553, 66561, 63750, 12203, 5544, 2355, 8913, 120390, 4875, 10613, 120381, 12137, 5548, 9344, 6250, 7944, 120395, 13104, 6077, 12383, 65452, 120405, 0, 3134, 0, 120775, 4669, 0, 0, 0, 3050, 63839, 10319, 119075, 10383, 118842, 4592, 120694, 10809, 0, 4691, 0, 9345, 621, 0, 120055, 4918, 10734, 120032, 64631, 0, 7804, 0, 10811, 8457, 10545, 4914, 10271, 3786, 8886, 4917, 0, 64914, 7923, 3716, 5464, 9996, 118893, 2361, 7971, 8195, 0, 9566, 7682, 3722, 8086, 41707, 10845, 8319, 2312, 40977, 10050, 10874, 8305, 8859, 41458, 40980, 65110, 13202, 0, 12582, 9119, 0, 7920, 41521, 4021, 6288, 7985, 0, 5653, 120063, 10891, 7698, 5658, 410, 41552, 1802, 120789, 4913, 0, 41659, 41671, 1827, 0, 64396, 41668, 9077, 2327, 8810, 12959, 120372, 12705, 3860, 10756, 9239, 8821, 6153, 2867, 120364, 42158, 698, 120359, 8749, 10356, 12698, 64858, 361, 12641, 845, 194599, 41560, 11970, 4562, 63756, 2926, 194639, 4099, 194692, 194695, 7936, 194697, 611, 0, 4716, 118891, 0, 120528, 7686, 120568, 0, 194700, 120543, 118875, 194701, 6291, 5462, 10823, 41669, 9734, 65455, 9071, 4655, 4151, 0, 0, 0, 839, 42162, 7695, 8769, 65246, 10737, 119194, 4859, 64467, 65504, 4826, 118998, 41090, 0, 12172, 120387, 0, 0, 120345, 12576, 7842, 12839, 0, 804, 2699, 0, 10542, 2985, 119222, 194596, 8271, 10091, 0, 9468, 0, 9827, 64106, 0, 286, 12323, 118830, 66592, 0, 0, 1425, 35, 119229, 65084, 0, 41210, 64432, 8482, 0, 6090, 5032, 7812, 10534, 195035, 664, 194633, 5034, 4272, 65211, 40967, 40965, 42024, 12704, 13294, 66589, 64869, 6032, 120367, 9129, 119867, 0, 120166, 0, 194813, 5244, 120169, 120170, 41161, 5518, 4174, 10993, 8189, 968, 120161, 1169, 434, 41437, 66573, 6034, 41164, 64744, 12574, 118867, 0, 524, 0, 118934, 788, 0, 12679, 64506, 64528, 1663, 10419, 0, 41227, 120398, 12346, 12855, 64848, 120399, 10415, 41562, 0, 120432, 118850, 119141, 0, 0, 194662, 959, 8885, 12564, 64333, 120339, 9469, 5195, 5445, 9355, 64323, 42151, 4644, 8989, 221, 310, 41253, 41564, 8010, 120396, 4962, 63766, 8855, 10054, 120413, 120618, 0, 9012, 120415, 12088, 41002, 13215, 120287, 10451, 64260, 374, 120153, 816, 64634, 120148, 120054, 41934, 3873, 8367, 0, 64608, 4715, 6101, 11987, 41936, 0, 64511, 12723, 65089, 0, 307, 120416, 9585, 5374, 120178, 1462, 10235, 0, 194670, 0, 12119, 120498, 13024, 1929, 120426, 12142, 120425, 12236, 41419, 194618, 120427, 12982, 64374, 5378, 194666, 64295, 41421, 0, 741, 10083, 0, 120662, 821, 0, 2498, 5800, 10755, 2992, 1760, 8124, 4469, 2324, 828, 3611, 194865, 0, 1185, 194728, 531, 0, 10628, 194683, 0, 7999, 8204, 3614, 2827, 9696, 10942, 7713, 2348, 4354, 10904, 4380, 194608, 7833, 10573, 5320, 41240, 194611, 3000, 10301, 1810, 3673, 5137, 9525, 64569, 194849, 118861, 0, 120821, 10121, 64940, 194592, 120406, 12824, 13066, 4748, 7970, 120630, 12608, 194600, 5871, 41160, 9700, 12580, 0, 120777, 119811, 3967, 7898, 13137, 8775, 64560, 12713, 2963, 9090, 8410, 4454, 723, 1734, 966, 4449, 0, 64594, 2456, 231, 2320, 194589, 339, 4968, 194590, 63752, 8075, 1230, 120795, 8047, 3597, 9761, 10584, 41542, 65404, 1290, 66358, 8352, 0, 5687, 120505, 3840, 1584, 0, 6045, 0, 10498, 9704, 0, 120338, 119869, 119992, 12311, 8660, 0, 8365, 8643, 0, 0, 4483, 1709, 64399, 9780, 6080, 13092, 120044, 1746, 6072, 8667, 12121, 194579, 13140, 194581, 194584, 2531, 4480, 120765, 0, 1226, 1259, 0, 10394, 0, 10897, 194560, 605, 120164, 641, 5219, 12342, 64100, 41500, 41129, 311, 12283, 6221, 9075, 120358, 5466, 10877, 118868, 64885, 120737, 4535, 2667, 4271, 65406, 0, 345, 41410, 10829, 41198, 0, 41407, 64104, 5037, 41131, 1776, 8422, 41201, 64103, 41508, 4660, 323, 0, 0, 64338, 1295, 0, 4625, 8323, 4630, 247, 0, 0, 12338, 4651, 2668, 12080, 0, 64574, 11933, 2519, 0, 41903, 41079, 5053, 194787, 5049, 0, 65459, 706, 7754, 7727, 8738, 4031, 6278, 0, 9672, 649, 5514, 118920, 0, 10280, 12670, 1013, 41218, 0, 705, 41591, 8755, 0, 1183, 65252, 8268, 917549, 0, 8157, 9736, 64503, 65418, 118921, 4747, 0, 194843, 11913, 4718, 0, 10837, 5141, 10614, 0, 7962, 12211, 9837, 0, 64722, 119008, 5719, 119977, 9773, 119068, 0, 1857, 119921, 4626, 8464, 8472, 0, 4629, 8499, 6059, 0, 4624, 7818, 8535, 119914, 65179, 7805, 64805, 64811, 12242, 41011, 194905, 0, 10558, 0, 0, 0, 8492, 0, 8459, 0, 1788, 1579, 10766, 0, 0, 8048, 9543, 9028, 120522, 119177, 0, 41455, 1285, 64882, 194620, 10092, 8684, 12640, 6102, 0, 5298, 12625, 5294, 0, 42013, 3940, 41597, 119917, 0, 9816, 8665, 0, 12073, 12630, 1653, 64669, 10153, 0, 6166, 118791, 119913, 0, 5292, 0, 0, 1939, 913, 3970, 64599, 12455, 1793, 0, 120162, 0, 7878, 8211, 65263, 0, 0, 118910, 0, 119125, 3514, 13219, 9569, 10865, 120645, 5263, 13286, 0, 5500, 10022, 65387, 118831, 65384, 5322, 980, 66354, 10008, 5324, 0, 3784, 41614, 64751, 6230, 0, 63885, 10085, 3360, 8098, 41616, 0, 41734, 10096, 41613, 8072, 120299, 0, 41821, 1249, 7783, 41731, 12032, 8237, 0, 64899, 12395, 41149, 12818, 120565, 10462, 41150, 194574, 9795, 119057, 194609, 13213, 0, 0, 41152, 194679, 9249, 12518, 7808, 1829, 194780, 41811, 4358, 65315, 10831, 0, 0, 0, 64354, 1710, 0, 10168, 120597, 9781, 49, 194613, 194953, 6258, 8269, 120594, 9741, 0, 5649, 194617, 315, 12813, 1643, 194615, 12397, 3470, 8884, 65175, 41099, 65314, 120008, 1378, 65163, 1072, 120647, 118802, 0, 0, 0, 120002, 0, 1080, 120411, 8787, 194828, 1101, 41618, 0, 8405, 0, 12632, 1086, 10968, 42088, 7680, 8847, 10805, 120714, 12639, 3380, 8123, 1091, 6121, 7977, 4501, 12665, 8119, 12998, 66309, 0, 1494, 0, 3127, 0, 64945, 12930, 1394, 119230, 0, 12363, 5345, 9789, 0, 9527, 120659, 64582, 12977, 12309, 42090, 8022, 10635, 12939, 12404, 65168, 42003, 2495, 5848, 8726, 5570, 2587, 12410, 41722, 1012, 8100, 7890, 120296, 0, 10649, 5569, 6229, 1593, 65319, 6063, 619, 0, 65080, 6053, 194598, 4120, 65337, 64727, 9160, 0, 119214, 0, 9366, 9016, 42006, 6055, 3870, 4279, 2500, 10757, 1507, 8497, 8602, 65320, 41991, 65334, 65333, 65332, 65331, 42059, 42061, 9080, 120099, 9128, 64480, 5571, 3674, 9740, 9121, 4371, 5798, 10408, 42085, 10107, 4106, 41989, 65313, 42074, 63999, 41228, 0, 10233, 13098, 120423, 41239, 0, 0, 8182, 0, 119831, 0, 11947, 0, 5847, 1505, 9131, 0, 12606, 12695, 41988, 41250, 12175, 0, 64075, 120739, 7809, 0, 0, 562, 8120, 120701, 0, 13033, 64738, 3219, 120532, 10664, 1366, 1037, 194747, 4551, 0, 118945, 0, 10637, 4568, 549, 1570, 10478, 2835, 12517, 557, 9457, 5952, 64649, 41056, 12519, 41004, 0, 2825, 66636, 10825, 8079, 2821, 41046, 0, 195065, 12111, 3927, 13071, 12515, 452, 5271, 5492, 64718, 2831, 10604, 10144, 41706, 5212, 5493, 41120, 8916, 0, 9747, 12019, 41332, 1618, 12333, 917584, 1668, 10430, 0, 5853, 1187, 10363, 118990, 12956, 0, 119107, 0, 3240, 12060, 12194, 120100, 41631, 41065, 5323, 8166, 4557, 0, 2707, 8309, 0, 65297, 41052, 0, 2697, 8752, 194689, 4912, 2695, 65172, 0, 119223, 8864, 0, 64798, 10736, 2693, 12125, 41124, 0, 1164, 0, 0, 1035, 41067, 120219, 7881, 701, 12178, 3489, 0, 12340, 120751, 5248, 12218, 120538, 6303, 3796, 41123, 0, 3994, 120283, 10457, 9991, 41128, 64485, 5792, 120282, 64857, 42171, 2855, 7994, 64762, 6104, 0, 0, 9340, 10654, 1589, 119226, 296, 3246, 7906, 2879, 41981, 41620, 0, 7815, 120797, 120482, 0, 0, 10585, 12579, 1496, 747, 12708, 942, 2378, 10960, 119830, 5299, 0, 9320, 5449, 1232, 8139, 6216, 41431, 0, 65373, 5295, 66624, 0, 1223, 1642, 174, 120824, 12158, 4161, 2374, 120546, 8475, 3212, 66313, 3211, 194576, 5286, 0, 0, 917546, 9728, 3846, 8070, 5536, 0, 7705, 11942, 0, 12136, 3309, 0, 66377, 41491, 0, 4986, 12189, 41653, 1280, 1241, 917537, 4257, 8496, 0, 6220, 9004, 65411, 194580, 41513, 41650, 0, 194578, 194878, 12914, 120740, 0, 12797, 6078, 10237, 0, 1475, 119118, 11979, 6084, 118900, 41064, 41062, 9635, 12600, 3256, 41236, 42076, 0, 0, 119866, 8727, 65304, 64866, 41237, 64073, 64867, 10562, 118947, 65329, 64071, 10640, 3248, 2613, 119865, 9015, 0, 66568, 3635, 64337, 41651, 41241, 64944, 3494, 0, 0, 10588, 0, 0, 0, 0, 635, 0, 194797, 0, 65312, 5447, 0, 0, 64382, 4010, 7984, 8600, 41915, 120139, 4176, 41105, 5812, 119933, 6232, 0, 0, 194588, 318, 5302, 0, 0, 4335, 3649, 3941, 42145, 41110, 3634, 64892, 9113, 1954, 12155, 7866, 0, 0, 42146, 120134, 120138, 120129, 2849, 120128, 0, 7938, 12960, 1761, 4586, 65379, 350, 10930, 119936, 509, 0, 0, 0, 0, 542, 5133, 41680, 0, 9500, 0, 1514, 64741, 0, 5453, 65533, 64921, 0, 2496, 8493, 944, 9368, 3890, 12168, 1438, 8817, 120592, 10818, 41947, 1220, 120828, 63931, 1194, 3242, 1571, 9555, 8598, 0, 6169, 943, 41946, 2798, 312, 0, 41980, 119025, 120717, 8877, 269, 3495, 6272, 9617, 1460, 8988, 120660, 4891, 0, 10862, 0, 41119, 41416, 0, 4173, 0, 194637, 0, 12895, 64955, 41418, 0, 119022, 120286, 41415, 6296, 9582, 193, 12188, 0, 64680, 41122, 1730, 2457, 4493, 2314, 10469, 1362, 9822, 7703, 8840, 5807, 0, 120451, 8534, 0, 4426, 0, 0, 120209, 119123, 7874, 8681, 5220, 120281, 13136, 119825, 2416, 3310, 10972, 118881, 379, 119215, 13220, 0, 0, 3223, 5517, 1284, 8041, 4549, 120475, 5240, 9811, 10012, 3096, 120275, 0, 0, 8515, 8688, 12866, 0, 3294, 9501, 0, 1272, 65485, 64514, 64654, 120035, 65210, 1467, 10158, 10040, 5288, 9519, 41861, 8132, 64090, 118899, 12193, 66615, 65493, 3215, 0, 7710, 1610, 120271, 0, 63881, 0, 0, 5181, 5275, 0, 228, 8637, 1501, 120476, 3789, 5179, 0, 6225, 118927, 0, 1725, 66603, 8196, 9352, 12042, 0, 0, 9537, 3961, 5762, 1967, 2605, 4500, 64561, 8104, 4981, 917545, 3405, 0, 63876, 10414, 13001, 8141, 9559, 2600, 41649, 41647, 64851, 0, 3237, 8631, 2545, 10466, 8541, 0, 0, 41866, 0, 120430, 64517, 10127, 0, 1650, 262, 1637, 10958, 7901, 3238, 41945, 0, 41941, 3308, 65158, 10860, 8614, 65220, 41493, 120624, 41943, 10762, 0, 45, 0, 0, 8106, 4128, 10065, 64083, 4494, 0, 4012, 10395, 0, 9084, 4537, 8737, 64089, 11004, 695, 739, 696, 7912, 2620, 64398, 195044, 9227, 0, 179, 5098, 691, 738, 2853, 0, 118813, 3868, 688, 0, 690, 2548, 737, 974, 64084, 119837, 10854, 119839, 10034, 3985, 8783, 118838, 9362, 0, 0, 4682, 118869, 12809, 8082, 4685, 3158, 10879, 4389, 4680, 923, 41863, 3851, 292, 13002, 119845, 119844, 3221, 1763, 64468, 4612, 119851, 119850, 12999, 41219, 12349, 64644, 10782, 3637, 12996, 0, 11949, 63922, 10594, 3228, 41826, 64624, 0, 10967, 2731, 0, 9651, 651, 3891, 7696, 0, 2337, 1735, 0, 0, 4177, 195098, 9089, 66312, 64695, 120580, 64500, 1860, 2654, 0, 1856, 12240, 8599, 195049, 66356, 118999, 3458, 3208, 12975, 8498, 119121, 8949, 8758, 9450, 194859, 1569, 63888, 12534, 12124, 7690, 119254, 12533, 917551, 7740, 4543, 41471, 0, 64674, 0, 0, 0, 11980, 0, 41544, 41689, 63789, 12282, 64909, 13064, 63893, 64556, 8850, 9238, 0, 8561, 4573, 0, 0, 12791, 120605, 0, 0, 120744, 8778, 10630, 12900, 0, 10950, 8314, 194936, 12790, 8804, 65092, 66607, 12792, 120435, 42018, 1744, 12789, 10366, 12317, 41310, 0, 13164, 10723, 967, 120253, 64546, 12690, 120454, 3257, 0, 9862, 1845, 2974, 10446, 41848, 0, 278, 10580, 10089, 870, 0, 3499, 8609, 42149, 876, 871, 877, 6002, 878, 42015, 879, 0, 4563, 65176, 41308, 0, 65306, 867, 9520, 872, 8646, 868, 873, 0, 0, 869, 874, 195048, 1940, 875, 790, 220, 65193, 194845, 10678, 10044, 194877, 5429, 13082, 0, 917541, 5707, 10393, 0, 120267, 42067, 41890, 5433, 10657, 7911, 0, 3742, 9775, 3959, 0, 5425, 4977, 2467, 5317, 5423, 4611, 120553, 8040, 5069, 9679, 4182, 0, 4676, 120501, 41073, 4418, 4184, 4628, 10208, 12989, 118784, 917540, 1851, 12186, 120601, 11908, 120254, 9360, 9083, 0, 41764, 194565, 12837, 8829, 7711, 64423, 119218, 194777, 120260, 118855, 8809, 64371, 365, 12056, 41382, 0, 0, 65395, 42080, 195040, 5516, 2845, 7717, 4588, 41717, 63830, 544, 12045, 2433, 0, 5515, 3352, 0, 64377, 65437, 793, 65194, 0, 305, 0, 119002, 842, 120576, 8208, 0, 41695, 1647, 118877, 5608, 63824, 917625, 818, 5337, 917622, 917621, 120531, 9638, 8061, 8735, 12483, 120468, 13003, 119140, 10973, 66359, 1372, 118858, 917608, 4969, 1254, 917605, 989, 64257, 118862, 65228, 6060, 0, 4326, 2840, 64601, 13068, 0, 65242, 3245, 9068, 119069, 949, 0, 0, 6148, 8605, 2651, 0, 0, 0, 0, 0, 65106, 120418, 0, 0, 41796, 1269, 195028, 63868, 41777, 64372, 5144, 3226, 655, 120467, 4431, 4331, 8777, 3285, 41834, 5279, 0, 10336, 8312, 0, 12091, 671, 250, 0, 618, 668, 610, 65195, 0, 1152, 5256, 640, 41229, 12207, 1067, 255, 3905, 917593, 9493, 120466, 41014, 10795, 0, 0, 120728, 0, 10653, 41272, 0, 13287, 0, 65166, 9019, 0, 0, 120695, 987, 64410, 5527, 2768, 10684, 3365, 5135, 0, 12796, 11953, 0, 0, 5139, 346, 119144, 6305, 12609, 4675, 5168, 5530, 5210, 0, 4627, 8253, 5208, 1136, 65433, 120587, 5218, 7976, 118864, 65285, 3244, 5529, 0, 0, 0, 5432, 64258, 4041, 8784, 2357, 0, 5528, 229, 42140, 119884, 0, 0, 119881, 119880, 119197, 4000, 119877, 119876, 665, 119045, 3206, 7770, 7884, 64853, 0, 118916, 0, 211, 2509, 7790, 10470, 7861, 3220, 10791, 64050, 450, 8951, 5214, 10432, 8118, 5450, 10768, 1233, 4661, 5852, 0, 66338, 41865, 1708, 13293, 40985, 2623, 10927, 1701, 0, 2388, 4698, 41761, 1066, 8361, 4701, 41758, 5444, 2617, 64889, 8267, 119863, 119089, 0, 0, 120633, 2625, 8801, 3053, 4340, 120412, 3631, 10955, 7850, 120292, 8416, 917607, 120203, 65507, 194803, 12660, 8232, 65434, 194807, 194713, 41069, 194808, 0, 12099, 4310, 4336, 6252, 713, 41068, 7990, 3990, 194811, 65113, 64638, 65243, 13145, 4489, 194791, 42138, 1030, 5358, 64577, 9513, 10370, 9357, 194764, 1773, 10250, 10258, 2712, 1635, 7745, 1410, 0, 0, 94, 194965, 120149, 194731, 8908, 559, 120421, 12862, 0, 10752, 4892, 10876, 64537, 41307, 8732, 120336, 5777, 1757, 9539, 4696, 2586, 65248, 8945, 8466, 3641, 5419, 41803, 42062, 0, 0, 120344, 3668, 120823, 8610, 12226, 0, 194949, 2340, 936, 13289, 64478, 120436, 1459, 0, 10499, 2962, 0, 2321, 1504, 10465, 41312, 8921, 195025, 120206, 195026, 64525, 41901, 63814, 4113, 2949, 2372, 336, 194774, 2958, 12152, 5348, 682, 2395, 120061, 13291, 64743, 10593, 1703, 4013, 194779, 8033, 120064, 65152, 9810, 10198, 4150, 12970, 8318, 41790, 10109, 41893, 2360, 41794, 12858, 0, 3999, 3777, 118946, 1965, 9796, 2411, 194950, 799, 0, 10276, 10308, 10372, 63832, 8501, 63833, 2317, 10260, 41317, 120513, 5417, 0, 10384, 0, 9353, 0, 7753, 2351, 10641, 64489, 41314, 0, 119812, 0, 119236, 230, 65431, 12009, 0, 4855, 4165, 8746, 5441, 9654, 10288, 10320, 0, 10596, 0, 0, 4784, 0, 13270, 7786, 10098, 41147, 194570, 63769, 680, 6274, 10312, 1181, 0, 3174, 13127, 0, 64822, 41887, 0, 4862, 9735, 120709, 0, 917604, 3914, 41037, 10828, 9065, 12961, 41039, 119173, 0, 6231, 289, 65302, 4694, 64504, 4690, 0, 118955, 0, 4693, 65257, 40987, 4667, 4688, 0, 8828, 0, 0, 1246, 3110, 64705, 12197, 41008, 4749, 0, 0, 921, 218, 0, 1520, 242, 4786, 41700, 8217, 8932, 64653, 7834, 10088, 0, 0, 64681, 5313, 951, 8888, 64534, 4816, 0, 0, 4009, 194694, 0, 120562, 41549, 195031, 64860, 119138, 119900, 4689, 119888, 0, 120158, 119209, 120159, 1646, 120156, 119891, 4040, 194734, 65118, 119889, 2579, 119905, 3177, 8207, 9099, 4107, 0, 119894, 662, 120706, 9244, 0, 63781, 10084, 0, 0, 118840, 194858, 41929, 3399, 9851, 120442, 8739, 9059, 0, 7687, 64637, 8854, 40993, 52, 13241, 0, 0, 120444, 1777, 9151, 1137, 0, 749, 120809, 120584, 5385, 3978, 917594, 0, 0, 5989, 0, 10170, 65013, 0, 41685, 64702, 120438, 8425, 41684, 0, 519, 10369, 64547, 1585, 195030, 10249, 422, 1500, 10305, 986, 0, 3666, 5781, 5599, 3098, 2494, 120202, 4861, 0, 64334, 194712, 0, 0, 41221, 65102, 8961, 252, 10243, 10245, 63936, 0, 120452, 194707, 63751, 9478, 2508, 9060, 917630, 202, 10761, 120747, 1242, 12899, 120447, 194705, 63940, 64533, 0, 9593, 10543, 2403, 12979, 64609, 0, 65260, 2504, 9784, 41024, 7764, 64701, 9514, 120825, 5859, 119259, 2858, 8298, 0, 120700, 65478, 9691, 4971, 12992, 2753, 1936, 0, 8456, 2751, 12662, 2763, 8953, 42104, 10731, 7774, 4780, 9792, 63991, 0, 194871, 0, 120764, 2856, 10019, 47, 63989, 2823, 4365, 120629, 0, 3647, 7899, 2602, 8417, 119903, 0, 41135, 120437, 4033, 118854, 194848, 172, 194720, 212, 41137, 12350, 12320, 118808, 64623, 0, 8257, 8915, 2759, 945, 3732, 120230, 0, 5344, 194851, 1291, 0, 9062, 119252, 9531, 13155, 8505, 64479, 12062, 119018, 64703, 65487, 0, 10900, 41531, 1263, 3720, 12048, 63935, 64292, 41524, 64692, 12652, 6099, 41534, 0, 63933, 64426, 299, 0, 119892, 63951, 3524, 64785, 8831, 0, 8674, 3075, 0, 8245, 0, 12624, 0, 1673, 4811, 63928, 5845, 9338, 6243, 65414, 2581, 4001, 0, 9820, 64098, 12187, 5551, 0, 5984, 0, 195073, 4393, 10566, 120407, 8680, 0, 194726, 2588, 5422, 0, 0, 3491, 2471, 0, 2883, 2749, 63921, 0, 10913, 0, 194725, 119134, 675, 120551, 63924, 0, 41287, 6219, 63926, 0, 41232, 9329, 63925, 41153, 219, 63945, 41330, 692, 65200, 0, 9240, 3181, 9688, 0, 1222, 66369, 8262, 119155, 64530, 0, 64610, 3092, 12092, 9615, 64808, 120691, 8013, 0, 0, 195019, 8895, 5253, 0, 5458, 0, 922, 118805, 0, 65111, 0, 3218, 12618, 63997, 120469, 63831, 8962, 8569, 9641, 11932, 12202, 3214, 120461, 9604, 12053, 3207, 120465, 63826, 118941, 64392, 120141, 63825, 2844, 3205, 41974, 41286, 12139, 66588, 64708, 0, 3358, 2606, 0, 3104, 2608, 0, 1173, 0, 5308, 195007, 290, 0, 194937, 2862, 2792, 64498, 66371, 378, 2610, 66591, 65079, 0, 65372, 0, 37, 0, 0, 1814, 120479, 3209, 118843, 0, 10638, 9768, 64648, 0, 66372, 0, 2591, 2837, 4341, 41403, 64105, 0, 5233, 65270, 64792, 195090, 3570, 9112, 0, 40991, 9490, 63761, 1685, 595, 64856, 194730, 1292, 6222, 120142, 3654, 120552, 9637, 0, 2535, 41293, 0, 10656, 194983, 3243, 9014, 5606, 63762, 538, 11006, 5602, 7807, 8073, 0, 10629, 8203, 0, 3056, 8458, 41778, 8495, 8762, 10508, 917552, 779, 9818, 64367, 2465, 3463, 8193, 0, 9730, 8695, 4738, 0, 5811, 12345, 64904, 0, 504, 0, 10899, 8982, 0, 0, 0, 782, 4867, 10883, 1262, 64771, 732, 3737, 917614, 1548, 0, 120589, 1832, 5604, 5611, 41141, 0, 4376, 64612, 11991, 3745, 41738, 119928, 1502, 0, 0, 3869, 11937, 5702, 3655, 1783, 0, 5728, 195086, 13285, 120521, 11918, 9603, 5724, 5254, 5727, 7724, 0, 119901, 5723, 5129, 194898, 0, 10597, 9033, 5614, 5893, 6223, 12303, 42073, 0, 120702, 0, 119862, 4792, 0, 1964, 0, 41950, 12146, 0, 120648, 66570, 195082, 894, 300, 194595, 10037, 120675, 195085, 0, 9783, 2562, 2607, 64740, 64830, 0, 0, 0, 119861, 64056, 13062, 64946, 5096, 5095, 2863, 3424, 0, 10454, 118801, 5094, 10093, 4369, 13156, 12306, 5401, 5093, 119909, 194597, 65251, 5092, 526, 0, 41295, 5091, 176, 41691, 8985, 4104, 119911, 6285, 1215, 11985, 5744, 12272, 9832, 0, 3713, 13218, 0, 0, 8980, 118988, 12293, 8844, 13106, 41505, 42082, 4278, 1737, 8987, 12917, 0, 9074, 917560, 9335, 12850, 118991, 8113, 10339, 5255, 1786, 661, 0, 5475, 0, 41854, 120620, 0, 12419, 1160, 1267, 119238, 41217, 0, 10018, 360, 194792, 3621, 64662, 5863, 3137, 0, 12108, 12928, 41216, 1228, 2616, 119190, 64401, 65234, 10745, 1714, 3135, 0, 0, 0, 3142, 0, 0, 10819, 917565, 0, 0, 64, 1470, 194566, 10291, 6227, 2826, 41749, 0, 119864, 6163, 9708, 13250, 0, 42011, 0, 8603, 12206, 5839, 1702, 1240, 41461, 6286, 194995, 5834, 0, 3858, 0, 1765, 12086, 42001, 1600, 64309, 0, 0, 8401, 120786, 42014, 9282, 8882, 118929, 10479, 2570, 2852, 5367, 4601, 194941, 0, 1234, 9678, 13115, 66310, 12667, 0, 41973, 10147, 12935, 0, 0, 118829, 0, 8163, 41716, 12727, 194816, 120533, 41289, 0, 13129, 2864, 8977, 602, 10435, 9395, 41675, 120340, 2765, 64540, 41279, 120414, 119246, 0, 0, 0, 119220, 10887, 65206, 118963, 64920, 66593, 63914, 12150, 263, 194563, 41288, 0, 9633, 10886, 119042, 7831, 12067, 0, 0, 0, 8076, 118827, 8290, 8291, 0, 0, 0, 2596, 10852, 63911, 13113, 0, 42019, 2393, 8766, 9087, 750, 0, 41574, 10163, 120654, 63913, 10441, 5954, 64931, 4314, 194675, 198, 0, 730, 41441, 7819, 194826, 0, 13165, 1720, 63905, 8619, 678, 8240, 118960, 194852, 3751, 0, 0, 4262, 1798, 709, 0, 1354, 10778, 13152, 0, 3892, 8137, 10449, 0, 0, 41470, 245, 41045, 41719, 41233, 64801, 0, 497, 12100, 5953, 0, 7796, 41235, 0, 42045, 9804, 8449, 432, 1281, 64355, 65393, 64339, 10677, 604, 41097, 9120, 1859, 0, 10460, 3425, 0, 0, 2836, 8797, 8490, 9052, 64888, 0, 2356, 95, 64786, 1738, 0, 0, 2832, 64640, 9670, 6096, 0, 64918, 65151, 10063, 2822, 12199, 4436, 0, 2566, 11971, 12090, 64872, 1065, 1331, 0, 0, 2576, 0, 41142, 5090, 5089, 120263, 9505, 119109, 514, 41692, 319, 2921, 0, 9477, 5772, 12968, 5087, 118822, 917567, 96, 2580, 0, 10522, 41223, 5085, 1463, 41342, 0, 5293, 0, 0, 3733, 3772, 13090, 12054, 64496, 41254, 64300, 12575, 13091, 0, 0, 9680, 0, 0, 41413, 64419, 118953, 0, 0, 118923, 0, 0, 10939, 6106, 0, 41271, 1132, 0, 4534, 41270, 0, 9224, 195099, 0, 64761, 0, 3671, 8510, 0, 0, 41275, 0, 0, 10807, 7963, 42012, 0, 0, 65227, 6187, 13109, 3854, 41479, 13141, 9715, 0, 8258, 0, 4185, 41334, 65148, 8871, 42, 0, 0, 4102, 0, 9029, 118995, 0, 2353, 6308, 41604, 11958, 2611, 119186, 41021, 0, 194631, 66336, 8045, 120428, 12946, 4484, 8747, 118976, 12826, 65233, 5557, 41224, 9737, 13216, 3747, 9467, 5291, 8878, 1691, 41226, 0, 12107, 10146, 10905, 9086, 64566, 697, 0, 628, 0, 12594, 0, 10468, 4546, 7731, 65256, 12010, 0, 0, 3805, 0, 64293, 0, 9844, 0, 6307, 118950, 0, 0, 12166, 64697, 10516, 194706, 10152, 12648, 10354, 0, 9532, 5785, 41309, 9764, 41316, 120160, 0, 13230, 41299, 5559, 0, 8704, 2397, 5556, 0, 66368, 13122, 9011, 191, 9630, 41837, 42040, 5506, 0, 0, 64850, 41072, 12598, 8845, 41577, 194790, 10002, 8889, 119113, 42141, 41570, 41838, 683, 396, 41580, 12526, 0, 12901, 12351, 65115, 343, 66597, 194680, 41360, 0, 10481, 4559, 0, 1956, 118857, 0, 0, 1724, 1210, 120066, 9412, 3739, 6263, 0, 0, 3964, 8984, 38, 8533, 9234, 10947, 65073, 13063, 0, 1778, 3956, 65091, 42070, 42069, 119846, 8743, 8369, 118807, 10941, 12467, 0, 5547, 66618, 0, 0, 8175, 0, 284, 8108, 934, 5696, 0, 173, 0, 8652, 0, 120670, 1750, 0, 4394, 65056, 1807, 9354, 0, 0, 5889, 63783, 0, 64714, 917624, 0, 12162, 12120, 41087, 1721, 7767, 7891, 120446, 10563, 2583, 4512, 63973, 2462, 7693, 64294, 10434, 3855, 8107, 41337, 63972, 4952, 65413, 0, 5504, 41340, 3975, 0, 0, 65420, 12672, 3798, 2703, 0, 64347, 0, 9774, 41847, 1127, 455, 41095, 3962, 10100, 3483, 41101, 3954, 41091, 4513, 9104, 3503, 65375, 41298, 1468, 65386, 1864, 41851, 0, 41446, 2540, 7736, 41080, 41849, 917619, 4320, 3224, 12909, 9705, 64684, 8604, 195006, 1510, 11978, 6149, 3887, 194882, 1411, 2824, 194708, 10106, 8770, 1403, 0, 1347, 9631, 8671, 0, 4283, 0, 194785, 8640, 13124, 258, 1654, 41408, 8858, 0, 42139, 3741, 0, 4042, 4581, 2873, 119029, 0, 0, 8549, 10861, 0, 41673, 64829, 1733, 4392, 2568, 10786, 63983, 0, 376, 41486, 9221, 64871, 119907, 8823, 41222, 12857, 6217, 7965, 4896, 0, 10154, 0, 41350, 8301, 0, 0, 1684, 64501, 10974, 458, 41199, 0, 0, 195046, 11916, 340, 194980, 12298, 10864, 0, 12288, 0, 4388, 1493, 10521, 0, 4097, 0, 13080, 65203, 195051, 41642, 6030, 8059, 3210, 13131, 120190, 917597, 0, 8794, 41278, 41629, 12154, 0, 10043, 64658, 1186, 41571, 41297, 617, 9464, 0, 3675, 5207, 63955, 5213, 118896, 833, 41348, 41568, 0, 3253, 63954, 41088, 8630, 6062, 0, 5596, 5545, 194982, 933, 1341, 9842, 5217, 0, 8942, 64800, 0, 0, 41615, 2635, 0, 194768, 41632, 120152, 0, 7835, 41622, 9002, 0, 194770, 64558, 0, 9716, 0, 9805, 5990, 900, 5784, 194775, 9317, 0, 3612, 4011, 64376, 41953, 5389, 7864, 0, 65336, 2839, 5600, 3903, 0, 10447, 3749, 1207, 9319, 0, 3501, 0, 119142, 4403, 0, 1124, 5597, 195009, 0, 9321, 4429, 917606, 0, 194572, 1719, 64873, 546, 9671, 1125, 4399, 9542, 472, 7716, 8452, 5488, 65223, 42025, 0, 5491, 3602, 8328, 41182, 2604, 41949, 5490, 41183, 5489, 8522, 10287, 684, 6300, 0, 2854, 0, 4390, 454, 7823, 194784, 195061, 0, 195062, 0, 0, 64572, 8478, 194788, 2394, 2575, 3415, 3746, 0, 8648, 0, 65421, 65505, 119092, 11989, 65142, 418, 118810, 917616, 10295, 8249, 10391, 41752, 4565, 8641, 41449, 2598, 513, 0, 41475, 8656, 0, 1024, 65008, 7961, 0, 8941, 917563, 4554, 0, 9023, 40973, 194977, 12126, 10964, 0, 63799, 9509, 0, 1036, 65114, 0, 1723, 0, 9049, 41185, 41579, 2444, 41200, 10705, 41447, 194795, 65224, 0, 740, 63963, 917613, 118874, 194986, 5300, 10407, 9459, 0, 0, 195060, 7856, 8121, 10438, 12050, 41698, 2860, 12157, 5238, 0, 5690, 5743, 10424, 12065, 0, 13095, 0, 0, 8875, 8694, 9506, 13254, 5575, 12847, 2413, 118917, 0, 962, 12176, 1122, 317, 9040, 119116, 1582, 0, 1920, 41477, 10173, 827, 10801, 0, 118798, 0, 5223, 496, 10439, 4313, 5226, 12602, 7860, 120627, 906, 7758, 2842, 10215, 5224, 5487, 798, 5692, 12801, 8406, 1153, 5695, 41711, 64627, 8054, 12626, 120131, 5691, 287, 866, 233, 4642, 66574, 0, 0, 0, 65140, 42089, 8830, 9008, 0, 10524, 41175, 42079, 65423, 119065, 5296, 0, 0, 10663, 0, 3302, 0, 0, 0, 0, 0, 0, 0, 42093, 3920, 8690, 120036, 0, 12122, 4580, 41967, 6116, 1785, 41965, 120635, 3021, 42004, 5138, 0, 0, 41998, 41867, 4540, 41179, 194804, 6200, 63796, 5134, 42021, 322, 4643, 5132, 42010, 194988, 64589, 5143, 64875, 8790, 0, 194796, 64604, 9365, 8869, 0, 64400, 42060, 0, 64887, 194814, 64941, 10270, 10286, 10318, 10382, 0, 4110, 0, 41530, 10929, 64277, 3234, 120607, 13058, 8617, 41982, 6025, 120736, 12805, 8767, 0, 0, 9597, 41283, 5201, 0, 6215, 12714, 6214, 13101, 65282, 120490, 65268, 120504, 120045, 194681, 187, 0, 10059, 10511, 4963, 9767, 789, 1749, 8964, 0, 194577, 320, 41948, 41833, 195047, 3049, 41139, 9787, 9449, 10081, 10528, 42121, 118894, 0, 7954, 5549, 0, 195071, 8485, 4671, 1189, 905, 480, 10985, 10240, 10610, 5414, 8647, 1745, 4286, 5421, 5427, 9554, 0, 0, 65465, 41507, 8806, 42047, 9442, 6213, 9443, 9436, 7867, 64720, 6236, 42052, 0, 2406, 0, 12851, 4566, 348, 5474, 3801, 3103, 10406, 5246, 5236, 64395, 0, 5200, 64305, 41739, 41733, 64518, 10931, 13181, 41402, 395, 5391, 5198, 8786, 9428, 41259, 5196, 0, 2691, 42009, 5205, 41244, 5562, 0, 118973, 41262, 66364, 64421, 0, 41251, 9126, 435, 3979, 12014, 12893, 8093, 9079, 3203, 192, 120785, 3385, 41266, 64430, 5383, 10294, 10326, 0, 5738, 9574, 2666, 0, 5361, 831, 419, 8256, 10716, 7872, 64583, 194758, 1260, 3149, 5359, 7766, 0, 7914, 5357, 916, 769, 2624, 5364, 64739, 120599, 5563, 547, 1943, 41188, 5560, 41212, 487, 0, 4497, 3754, 0, 0, 9039, 10619, 41776, 0, 8716, 120126, 40983, 64072, 41516, 0, 119044, 0, 41376, 0, 3232, 12185, 0, 120632, 0, 120458, 41889, 0, 8634, 1161, 41895, 118804, 9701, 8622, 120215, 0, 0, 120588, 669, 5679, 41362, 120125, 118961, 11921, 42087, 5678, 0, 0, 41364, 460, 0, 41352, 41361, 195101, 41366, 0, 3356, 6178, 917, 0, 119915, 64068, 7782, 9044, 4974, 677, 119916, 0, 119932, 41912, 1216, 12504, 11952, 3349, 195097, 12296, 8927, 4739, 3738, 5802, 194997, 5683, 10368, 0, 491, 0, 120503, 0, 0, 5682, 6206, 8670, 0, 5680, 917568, 10001, 41881, 118823, 1449, 10241, 3768, 65255, 3776, 9095, 7741, 12684, 41885, 1046, 0, 5567, 2717, 4620, 5171, 5564, 64571, 41908, 41786, 5565, 12819, 12578, 194992, 194771, 5169, 5566, 3465, 64694, 3175, 11904, 120065, 120804, 5176, 5942, 8468, 4871, 10361, 10425, 119210, 118952, 64729, 1128, 194722, 10548, 64664, 10647, 9408, 9409, 9410, 457, 3662, 9413, 1934, 9415, 9416, 8802, 9418, 8909, 9420, 9421, 5897, 9423, 5165, 5126, 41385, 8043, 8950, 194562, 8955, 3374, 9400, 9401, 9402, 8939, 9404, 3507, 9406, 9407, 0, 65515, 9499, 10035, 183, 65078, 2631, 0, 10636, 41130, 0, 3996, 120650, 64675, 1667, 41584, 65486, 41582, 0, 4332, 64825, 10741, 10726, 12912, 41125, 5899, 8101, 3610, 12085, 41748, 0, 955, 120092, 5340, 5350, 41058, 5446, 64549, 10875, 64796, 5442, 120424, 0, 9782, 5451, 12896, 3616, 0, 0, 3874, 7708, 64370, 10859, 0, 10345, 10409, 0, 11909, 120591, 120303, 41038, 0, 194733, 4447, 8536, 120708, 917586, 0, 194732, 724, 42048, 1455, 205, 0, 10351, 64618, 0, 4175, 12307, 0, 120380, 939, 41355, 5505, 119154, 5503, 8021, 0, 119150, 9819, 41357, 8011, 6088, 5507, 12044, 190, 0, 10026, 4356, 8188, 1191, 0, 4417, 10329, 5476, 8991, 0, 7827, 0, 5829, 8550, 0, 5592, 2919, 64925, 2675, 5595, 0, 7918, 4367, 0, 0, 5478, 1728, 5594, 120710, 178, 12972, 5590, 10727, 13067, 118909, 65254, 0, 9731, 0, 64633, 0, 12113, 13065, 118863, 9252, 12278, 4652, 0, 66563, 194879, 0, 0, 12887, 10551, 10710, 0, 0, 0, 120570, 41804, 5199, 9497, 1120, 120471, 8333, 1444, 9486, 120808, 13142, 4538, 194830, 5285, 6177, 5894, 0, 11910, 13224, 0, 8963, 4034, 13162, 65389, 3334, 64003, 41747, 10708, 194571, 8677, 120734, 1651, 9350, 8861, 0, 8836, 1142, 0, 4396, 10928, 0, 8922, 8856, 66611, 4002, 0, 10442, 10676, 3344, 120402, 64963, 10813, 2592, 12853, 120242, 120243, 3438, 119912, 7871, 120239, 65516, 12321, 120391, 118890, 120389, 10007, 120246, 9588, 120248, 4700, 66366, 41994, 120051, 8661, 120365, 66572, 0, 120401, 4973, 5573, 12588, 9629, 40981, 119873, 118981, 7993, 64328, 42002, 64754, 41766, 8825, 13016, 0, 0, 10346, 6107, 0, 9243, 2464, 0, 6108, 3372, 335, 6247, 64689, 438, 4510, 5765, 8721, 119878, 4036, 6092, 12840, 120229, 8876, 10303, 8096, 10284, 3354, 10268, 0, 9289, 8689, 10316, 3876, 10335, 0, 42044, 0, 0, 0, 8050, 120030, 0, 64591, 0, 120053, 0, 843, 120495, 194829, 120770, 0, 10117, 66560, 41902, 118871, 6312, 215, 1963, 118889, 64494, 1953, 9579, 41938, 1256, 3910, 13015, 6242, 41329, 9662, 41257, 41900, 3366, 10700, 8805, 1742, 5542, 9333, 8202, 120459, 120232, 41611, 0, 0, 120385, 499, 118846, 8593, 0, 0, 41169, 1712, 5932, 8097, 41762, 12292, 194685, 11967, 11963, 65296, 41243, 118957, 5662, 416, 9458, 64687, 0, 0, 194844, 10984, 64386, 64672, 0, 0, 0, 41172, 0, 66355, 120669, 41937, 194825, 12540, 65446, 3804, 41760, 5794, 201, 2662, 9419, 64579, 8254, 41726, 10975, 0, 120625, 65131, 9507, 4108, 3880, 8023, 1200, 12243, 0, 5282, 0, 0, 65032, 5891, 65031, 3343, 1636, 195057, 65029, 65024, 3896, 195056, 9674, 2947, 99, 98, 97, 120571, 64414, 13059, 8221, 64085, 3381, 0, 7892, 0, 10777, 0, 65310, 3913, 0, 0, 64959, 8039, 1265, 4316, 6309, 118815, 12969, 12596, 66595, 66596, 41939, 5593, 195059, 5998, 9163, 12300, 6061, 64854, 119, 118, 117, 116, 8930, 122, 121, 120, 111, 110, 109, 108, 115, 114, 113, 112, 103, 102, 101, 100, 107, 106, 105, 104, 41793, 917572, 534, 120515, 0, 42027, 12114, 0, 917579, 0, 194698, 6020, 12716, 10561, 10075, 475, 118888, 13266, 9144, 120383, 917580, 195088, 194741, 10645, 1212, 5079, 0, 8134, 8483, 2913, 10330, 4908, 1866, 1639, 119189, 0, 8923, 1645, 12059, 64505, 0, 194873, 0, 4817, 5935, 1250, 0, 8174, 9600, 9856, 9859, 7916, 9861, 5343, 5258, 4328, 41206, 64794, 10882, 405, 0, 4659, 195045, 657, 12610, 4970, 4461, 1134, 41170, 1454, 41242, 65130, 4468, 5987, 195079, 9762, 4456, 5206, 10720, 0, 10480, 41718, 5818, 0, 8264, 10229, 260, 645, 195054, 10687, 118837, 4821, 4466, 120500, 5824, 984, 0, 10688, 5851, 5705, 7729, 41406, 10591, 41797, 119983, 65438, 119985, 119984, 119979, 41404, 1165, 7879, 4451, 13087, 0, 195067, 119987, 119986, 41909, 118902, 2791, 9363, 9552, 3375, 0, 5900, 12997, 7889, 2722, 0, 13173, 2381, 12883, 10994, 10529, 12437, 194756, 8644, 63791, 12425, 10661, 10856, 9614, 0, 41478, 0, 10064, 10901, 10748, 120542, 11005, 4868, 119162, 1952, 0, 8455, 10082, 0, 8467, 12577, 194760, 5182, 12183, 6145, 119188, 64929, 4465, 42120, 12135, 5732, 4464, 7728, 3922, 977, 4458, 0, 195068, 64770, 120772, 3353, 344, 0, 41626, 1395, 64635, 120089, 5776, 8558, 786, 65153, 0, 64340, 120082, 10202, 120084, 41027, 120086, 10132, 64413, 120087, 120074, 119119, 120059, 0, 120078, 63862, 41896, 8657, 0, 8594, 10204, 0, 120477, 120069, 120072, 1399, 119203, 120056, 0, 8852, 64492, 241, 194759, 4907, 0, 9738, 0, 9727, 7851, 119196, 10951, 4439, 0, 119199, 195021, 9085, 0, 119200, 9327, 6160, 0, 8650, 64865, 8088, 64933, 41910, 118872, 65217, 3965, 120050, 0, 0, 13300, 0, 0, 65491, 65145, 9041, 0, 65017, 10826, 4420, 41263, 10583, 7760, 194798, 0, 0, 120047, 13217, 8748, 65415, 0, 42159, 9066, 194860, 11993, 0, 2626, 7762, 10902, 0, 0, 41526, 64285, 10472, 2995, 120704, 12907, 41184, 2371, 0, 10038, 259, 1009, 0, 2402, 2333, 65011, 0, 12962, 65125, 0, 12417, 65380, 9103, 12700, 3148, 0, 119145, 7779, 10219, 0, 9479, 6029, 120369, 119910, 9689, 41261, 0, 8993, 8613, 0, 118989, 3368, 606, 41492, 7697, 10228, 41596, 4311, 194769, 6027, 120572, 4322, 41661, 7991, 0, 10578, 0, 41465, 41054, 2735, 41664, 0, 63778, 65273, 1287, 65408, 9348, 120656, 6164, 0, 41273, 0, 65027, 0, 9576, 0, 3347, 4160, 5154, 0, 3794, 66564, 65219, 11925, 7709, 9088, 3743, 65099, 1396, 4572, 0, 3847, 0, 65081, 4985, 1615, 672, 809, 12980, 63806, 0, 65218, 5799, 0, 65072, 1577, 194934, 0, 5928, 4525, 10658, 120561, 1266, 0, 0, 195024, 12622, 9347, 0, 0, 64424, 41048, 7789, 773, 63910, 41112, 283, 64416, 66374, 532, 0, 120049, 41115, 3051, 5862, 3370, 0, 119132, 5443, 3250, 8153, 0, 120278, 9510, 120279, 120493, 9541, 0, 41066, 64706, 0, 0, 3505, 8707, 9466, 64286, 8537, 120802, 3626, 3471, 0, 915, 195094, 12990, 120034, 0, 118797, 195074, 0, 41906, 0, 195072, 0, 64365, 0, 3225, 0, 4433, 5186, 0, 41933, 1443, 4381, 9829, 65124, 10926, 0, 195076, 64879, 64699, 0, 65476, 0, 0, 10021, 5160, 1387, 65495, 6103, 120388, 41480, 0, 0, 217, 0, 0, 12466, 10443, 10789, 41158, 41460, 0, 0, 41483, 195096, 12565, 64287, 10077, 12890, 5931, 195014, 9283, 7700, 41252, 6042, 65499, 0, 41249, 512, 2990, 0, 0, 65456, 0, 632, 12940, 0, 41296, 9545, 41291, 5957, 0, 8926, 3511, 41282, 5923, 10400, 10174, 41456, 64581, 5386, 4274, 5786, 10633, 0, 5056, 119860, 417, 41474, 120773, 13263, 9812, 5934, 4460, 66583, 119231, 64877, 65410, 64481, 0, 0, 10937, 0, 120218, 0, 0, 0, 2953, 5819, 1801, 12835, 917627, 0, 194743, 0, 66375, 8867, 702, 120410, 1237, 10274, 4552, 65447, 119966, 0, 1375, 12106, 194693, 10264, 1755, 10482, 9228, 10376, 1163, 2951, 7840, 64336, 64890, 10252, 0, 3384, 120703, 10167, 830, 194656, 65425, 10769, 8451, 41368, 12520, 9753, 120762, 8944, 0, 0, 10473, 2908, 0, 0, 64902, 10299, 119165, 12097, 64733, 12952, 4441, 10503, 0, 41430, 9330, 0, 10267, 411, 10315, 10379, 0, 0, 13281, 10009, 7865, 2730, 10388, 9677, 5428, 118993, 3364, 64806, 66363, 119179, 118816, 65463, 9535, 216, 10332, 1401, 119895, 622, 0, 885, 64772, 1602, 4467, 41405, 5768, 0, 12160, 41328, 484, 65187, 41051, 12071, 9609, 9806, 41497, 3338, 0, 120671, 10411, 2736, 10255, 10263, 10279, 2794, 8807, 64491, 119896, 4315, 5222, 5381, 0, 0, 5193, 5125, 5456, 5509, 41177, 0, 9534, 0, 64431, 1603, 3430, 0, 10298, 0, 0, 981, 41176, 4330, 994, 120536, 1824, 10908, 0, 41681, 41683, 5921, 194925, 2597, 3957, 5922, 118903, 0, 674, 194971, 0, 2946, 5354, 5251, 4406, 5307, 3759, 65160, 8364, 5123, 1433, 5281, 5469, 5121, 5924, 5920, 0, 5130, 64606, 0, 0, 8418, 41420, 1221, 2733, 0, 742, 5216, 2893, 10772, 65276, 5937, 3468, 2553, 9230, 5939, 3997, 0, 8363, 120677, 2993, 7772, 3916, 10289, 194932, 1141, 120301, 8159, 718, 10137, 973, 9666, 120718, 3235, 2415, 5938, 0, 8018, 12448, 0, 10401, 10337, 0, 0, 65390, 0, 8719, 1202, 0, 64651, 12983, 0, 12165, 119095, 0, 9067, 13116, 8077, 65388, 0, 8419, 63773, 65419, 63774, 0, 0, 10725, 10433, 0, 0, 1431, 64519, 66565, 10821, 4359, 12804, 12192, 8229, 1235, 3307, 41928, 0, 3146, 4544, 9009, 8551, 118820, 1740, 194749, 65469, 985, 2724, 13076, 120806, 12068, 119949, 515, 10141, 119944, 119945, 63763, 4476, 119146, 119941, 12655, 8907, 13226, 4589, 4521, 119077, 9141, 64645, 10665, 2741, 41572, 6197, 1370, 10101, 41573, 194746, 3931, 194924, 0, 6184, 8606, 3303, 11968, 65475, 9473, 13103, 63771, 8879, 41390, 120600, 4478, 917588, 41735, 120349, 717, 10754, 4477, 0, 814, 42066, 119962, 63767, 1780, 41031, 119958, 41392, 819, 10611, 9694, 11955, 119952, 119953, 41111, 9462, 0, 7788, 12820, 66327, 66580, 0, 118966, 0, 1581, 12650, 41173, 3346, 430, 64698, 0, 66628, 268, 0, 4945, 0, 4950, 12918, 9456, 10923, 5936, 0, 5964, 12908, 13081, 308, 0, 12933, 0, 41746, 4949, 0, 443, 41030, 4944, 5467, 194938, 5926, 1862, 6044, 65392, 8820, 4946, 194793, 9038, 7887, 0, 7830, 41306, 13093, 2698, 41144, 0, 12072, 41753, 41914, 41304, 824, 0, 8595, 65225, 119813, 119816, 4673, 41354, 4678, 13283, 12697, 65059, 12381, 3488, 5933, 5481, 3490, 1199, 65014, 8356, 12297, 119153, 1955, 12688, 3102, 10474, 4672, 119822, 119821, 5531, 119823, 119826, 66332, 8835, 4674, 119041, 5831, 0, 64896, 12379, 8025, 119947, 64542, 1855, 65128, 5472, 64425, 7852, 194993, 119943, 0, 0, 2745, 5470, 65171, 9124, 119110, 4654, 65289, 291, 0, 120285, 10525, 4649, 65209, 120284, 12647, 4648, 4640, 64713, 10224, 120429, 6246, 64950, 7828, 4650, 41464, 0, 119086, 4653, 7822, 120331, 118824, 120330, 8669, 194921, 10729, 65093, 5778, 6302, 2716, 194606, 12680, 119130, 1417, 10916, 0, 9452, 8547, 2711, 42165, 120798, 64953, 7992, 64663, 41907, 4662, 65453, 120408, 9149, 9146, 599, 4641, 11990, 64819, 63782, 4656, 10130, 41469, 7811, 40994, 12426, 4646, 5967, 865, 3725, 5713, 5814, 4645, 42033, 120422, 41756, 13132, 64728, 9026, 10833, 64673, 1659, 919, 41935, 1671, 195089, 3054, 9219, 9744, 1661, 13120, 4622, 119087, 10140, 9713, 0, 119143, 194961, 9045, 2306, 10485, 118943, 6068, 10612, 65307, 4617, 120294, 194964, 41462, 4616, 10518, 10423, 10359, 0, 5958, 0, 9564, 4618, 826, 195083, 4321, 4621, 195084, 41313, 522, 5368, 1808, 7848, 0, 5366, 12201, 5372, 0, 66632, 0, 4391, 64331, 2696, 120155, 11003, 4638, 64490, 1790, 66304, 167, 10921, 9791, 0, 9840, 5376, 1835, 5335, 10313, 41370, 4633, 64320, 10265, 1180, 4632, 118970, 5387, 5333, 64256, 12903, 41, 5331, 1792, 11928, 64363, 5338, 4637, 0, 5971, 12066, 120393, 385, 4152, 2585, 0, 10909, 3126, 1427, 194812, 10957, 5970, 3431, 120394, 10358, 10422, 4758, 0, 1608, 2738, 12707, 10455, 4753, 0, 0, 0, 6240, 5231, 119013, 12541, 65216, 6248, 0, 2593, 8463, 7810, 119923, 5229, 4757, 65192, 66581, 2728, 4411, 64563, 65235, 5234, 119924, 194914, 0, 10066, 9746, 0, 2622, 6033, 13061, 8016, 41196, 8954, 64831, 65189, 2632, 13228, 10108, 1011, 5574, 1853, 2709, 65139, 5577, 42091, 41165, 393, 12450, 8965, 41166, 42177, 5316, 0, 171, 5941, 5572, 120062, 5312, 12531, 5525, 5330, 5319, 64066, 195100, 64647, 8937, 63798, 12454, 12291, 42132, 12063, 0, 64343, 3230, 0, 10350, 10644, 5209, 297, 5721, 12109, 8415, 8632, 10102, 119925, 0, 2497, 5720, 960, 1692, 118792, 4610, 8696, 4292, 64760, 4609, 10512, 4614, 541, 0, 5287, 5309, 2503, 119243, 1762, 4647, 56, 10743, 5844, 41381, 601, 4613, 10194, 4663, 64469, 4608, 2507, 13273, 5190, 119963, 63759, 195010, 66357, 8892, 0, 119942, 119931, 2734, 5782, 420, 64368, 63795, 65105, 10797, 5960, 63797, 8992, 65293, 41238, 1782, 12814, 63852, 12525, 10686, 41383, 5501, 0, 3650, 119955, 120749, 359, 4183, 119957, 6239, 41670, 41256, 329, 66582, 12573, 120462, 0, 9346, 66331, 13244, 119048, 42167, 3767, 5737, 5380, 4865, 0, 1155, 917538, 5736, 4368, 64724, 63749, 0, 5601, 5739, 41023, 4866, 9985, 7987, 64406, 1172, 120563, 0, 6253, 0, 8574, 5603, 41666, 4473, 119847, 4870, 0, 65347, 41799, 65345, 8199, 0, 5347, 119063, 9280, 4864, 10398, 4144, 0, 120567, 6245, 120478, 2732, 5598, 745, 4555, 5341, 0, 4777, 0, 5351, 0, 0, 65244, 120729, 195080, 3097, 63817, 5966, 120363, 4778, 0, 10863, 1660, 4781, 0, 271, 0, 65370, 8577, 65368, 12653, 65366, 10216, 4782, 10000, 65362, 65361, 11912, 12325, 65358, 8717, 41583, 65355, 4776, 65353, 65352, 8700, 65350, 65349, 10575, 10426, 0, 120150, 10362, 0, 1715, 4849, 8242, 9561, 0, 0, 0, 0, 0, 5963, 0, 0, 4916, 4850, 380, 1607, 466, 4853, 0, 4854, 0, 5164, 41096, 1350, 5124, 64420, 0, 5362, 8471, 2708, 119131, 7946, 3785, 234, 0, 120481, 41268, 4848, 2530, 41636, 4798, 1225, 41842, 0, 10458, 0, 8576, 5197, 0, 2704, 4794, 8329, 63823, 8322, 4797, 66326, 5725, 2694, 2595, 3363, 2439, 65104, 5607, 41089, 303, 41162, 195037, 2665, 2437, 0, 9817, 4844, 8764, 0, 8934, 0, 0, 4492, 0, 9843, 2441, 10739, 65090, 1188, 120290, 1100, 2451, 2714, 41081, 2912, 0, 4937, 119104, 0, 3572, 10023, 12343, 13079, 9248, 0, 9729, 0, 65190, 119094, 2726, 3107, 0, 4941, 7996, 10995, 9140, 1408, 5261, 0, 41451, 181, 0, 4942, 63801, 4938, 0, 972, 5259, 9369, 64868, 4142, 5257, 0, 0, 4964, 5264, 9538, 0, 0, 41225, 0, 63800, 0, 119058, 9482, 4873, 3265, 1822, 0, 12601, 41078, 3865, 261, 5927, 7791, 0, 0, 0, 10696, 9830, 6073, 389, 10893, 6255, 6075, 4872, 282, 0, 3125, 9567, 195012, 4878, 5459, 4874, 0, 9557, 3474, 64774, 120356, 194704, 6081, 9563, 9411, 13139, 0, 11940, 41744, 0, 10788, 119176, 8751, 10385, 120273, 7816, 9414, 4665, 12628, 4670, 119871, 41555, 0, 9642, 10912, 958, 119853, 3082, 0, 4666, 0, 4915, 0, 2891, 5856, 12096, 5163, 4664, 10836, 1817, 120010, 12231, 41554, 10564, 7763, 13077, 42099, 4400, 9697, 3606, 10275, 8925, 10371, 10307, 1063, 10227, 120251, 9772, 4541, 6299, 1389, 0, 120257, 9823, 42081, 12941, 65197, 10520, 120255, 120256, 12301, 120266, 10505, 120268, 66604, 120262, 66601, 41814, 13282, 66600, 523, 505, 1447, 846, 0, 41813, 0, 8608, 120537, 65482, 2543, 12163, 3108, 9745, 4529, 120472, 64764, 118825, 7919, 0, 1641, 119874, 64949, 8966, 10251, 10247, 5908, 715, 64353, 0, 9453, 1699, 10943, 10763, 0, 118992, 550, 10169, 0, 64385, 66579, 3766, 120457, 5780, 9504, 9051, 257, 10373, 13153, 12061, 10261, 10253, 7821, 2599, 9433, 11984, 9156, 5930, 120377, 0, 0, 3128, 4789, 5067, 5066, 3760, 1718, 9438, 8827, 1146, 5065, 41435, 4352, 0, 2435, 41839, 5064, 5326, 120453, 3778, 1809, 8873, 7824, 41434, 5062, 1264, 64817, 41586, 41440, 3764, 8473, 64716, 8469, 3933, 12947, 4564, 12337, 0, 10375, 0, 120362, 64768, 0, 0, 5225, 0, 42130, 7903, 5151, 0, 0, 64685, 5626, 2569, 0, 3800, 65424, 0, 0, 5353, 5625, 10894, 954, 64927, 1010, 41043, 0, 41438, 41439, 120357, 10711, 4593, 120752, 119003, 2590, 5629, 13309, 10293, 10325, 5632, 10471, 120038, 64759, 42054, 5166, 5628, 120031, 970, 120029, 4772, 2400, 5627, 118972, 120018, 12885, 3119, 120021, 10961, 65103, 203, 9986, 0, 64344, 636, 120550, 120652, 64378, 42111, 64356, 0, 554, 120761, 8320, 64275, 8863, 120520, 42042, 41883, 63803, 0, 120792, 5694, 7689, 42142, 9323, 4325, 3047, 3937, 175, 195077, 3169, 64335, 64781, 912, 1243, 4536, 5431, 120005, 0, 6244, 120154, 0, 3935, 120665, 1129, 0, 11950, 5392, 118859, 7846, 118806, 5397, 0, 12046, 12599, 3845, 4490, 5395, 0, 5393, 354, 120544, 11977, 0, 8366, 0, 7756, 3901, 65484, 51, 626, 41602, 5895, 9568, 64057, 456, 0, 8145, 1168, 9251, 9082, 119964, 64055, 0, 3866, 8818, 41512, 0, 0, 10324, 3918, 5377, 3797, 1644, 10405, 9658, 4140, 13057, 42029, 42037, 9030, 813, 119973, 41454, 4146, 195036, 5360, 2466, 236, 195032, 0, 6249, 42117, 5898, 0, 41457, 119148, 5855, 1969, 4911, 988, 0, 12838, 64483, 0, 10341, 10552, 65479, 5854, 0, 0, 118933, 119989, 119940, 10416, 11981, 3872, 0, 0, 120725, 6093, 0, 2838, 119939, 0, 170, 0, 13143, 4169, 118931, 41859, 6058, 120813, 10553, 1662, 65295, 0, 64342, 5892, 195081, 0, 42106, 66, 65, 68, 67, 70, 69, 72, 71, 74, 73, 76, 75, 78, 77, 80, 79, 82, 81, 84, 83, 86, 85, 88, 87, 90, 89, 4736, 10357, 120400, 8170, 1704, 8556, 120661, 9659, 120403, 1743, 120512, 9556, 9496, 4503, 41977, 9647, 7876, 0, 120575, 3928, 11948, 65283, 10706, 66562, 66308, 4842, 7771, 0, 9109, 4841, 1289, 4171, 12008, 6251, 3923, 1490, 2447, 120347, 0, 10907, 5245, 0, 10114, 64000, 9790, 4845, 8332, 10582, 0, 4840, 5675, 254, 1747, 65429, 4825, 10626, 8918, 10281, 5716, 64004, 66594, 0, 119019, 0, 8080, 118895, 367, 1472, 120386, 0, 4829, 64693, 5905, 12339, 8919, 9515, 120384, 194651, 65266, 0, 4830, 9134, 41365, 64671, 41978, 1412, 4594, 1391, 10536, 7720, 4824, 7775, 0, 120392, 0, 1960, 3140, 0, 7960, 41836, 41844, 6052, 6064, 54, 1428, 12214, 0, 6211, 7699, 358, 0, 10557, 65161, 10758, 8223, 120341, 4261, 12642, 0, 120343, 0, 0, 119053, 120382, 119055, 119054, 194902, 64554, 10574, 3878, 4017, 12827, 1752, 0, 0, 41118, 3924, 10199, 0, 64966, 0, 0, 0, 41116, 720, 324, 0, 120684, 12057, 11917, 1464, 41343, 4721, 7974, 65407, 8957, 0, 64488, 120371, 0, 64041, 195058, 120091, 0, 4722, 917617, 0, 0, 4725, 9690, 4726, 0, 194956, 119843, 118969, 5204, 0, 0, 118851, 4015, 3995, 8052, 476, 3714, 10073, 3595, 10232, 10999, 1382, 120558, 12636, 0, 120404, 1656, 41831, 8130, 8672, 8832, 8720, 3908, 1452, 13111, 64523, 64067, 0, 8552, 12398, 41845, 3849, 0, 0, 9778, 468, 612, 42150, 55, 118959, 0, 0, 1674, 120277, 5823, 120276, 1114, 42110, 540, 120052, 119017, 12516, 41743, 3938, 120057, 65417, 64316, 120060, 12400, 820, 41741, 6292, 65303, 7955, 64074, 4713, 3359, 7800, 41566, 65177, 6226, 353, 719, 9656, 9474, 64742, 120043, 4532, 65412, 120046, 10868, 4717, 2349, 5902, 0, 4712, 9481, 119012, 65400, 3623, 8155, 1195, 3942, 4714, 9625, 41151, 0, 41589, 12006, 0, 12074, 12409, 0, 4360, 12964, 9739, 1229, 63793, 0, 0, 0, 8539, 65100, 120508, 4809, 9623, 4788, 0, 0, 64745, 0, 65405, 120104, 13075, 194866, 5365, 4545, 8901, 8000, 2492, 4813, 65432, 0, 5925, 4808, 64330, 9649, 41154, 65030, 5128, 4038, 12718, 4810, 64859, 12794, 64928, 1648, 5435, 3522, 120689, 414, 10236, 0, 12709, 41359, 120494, 0, 11905, 41082, 119859, 12581, 10374, 5175, 119857, 0, 10254, 63820, 9751, 10262, 64088, 41363, 3919, 607, 0, 120288, 9018, 5270, 10314, 10282, 65477, 10378, 64310, 40976, 8265, 7737, 0, 40975, 5840, 0, 10162, 40978, 0, 8454, 42072, 42038, 387, 119098, 119083, 0, 2550, 0, 119836, 118971, 41344, 3525, 120297, 0, 64641, 41590, 5619, 41346, 13157, 375, 12703, 0, 5616, 64943, 64324, 0, 119202, 9454, 5615, 0, 2315, 0, 1938, 5455, 64752, 808, 5568, 119201, 119198, 1026, 5620, 194887, 195078, 13150, 5617, 0, 9225, 64639, 12902, 9145, 64595, 1338, 120352, 119178, 9863, 0, 3084, 64553, 0, 41025, 6037, 0, 3974, 7998, 10290, 10888, 3083, 10322, 2316, 118821, 64297, 41036, 0, 917615, 0, 0, 0, 12904, 5373, 194773, 64700, 3762, 1445, 40961, 0, 11986, 0, 40960, 0, 3780, 12808, 5779, 64952, 10402, 12011, 3906, 9707, 10603, 8326, 0, 65498, 3763, 194923, 5618, 0, 3779, 194922, 9324, 118852, 63822, 9073, 0, 64302, 10704, 280, 4787, 0, 917556, 13072, 9999, 0, 0, 9570, 0, 8699, 2689, 917626, 65426, 0, 42135, 119061, 2551, 40966, 10011, 10200, 3998, 120448, 120788, 503, 0, 4470, 2690, 118853, 7780, 5369, 41954, 5249, 1652, 772, 8756, 8310, 65428, 3487, 120585, 3585, 1688, 917610, 119159, 41822, 194874, 65359, 41904, 9720, 41697, 41319, 13125, 10650, 5836, 12358, 4668, 4355, 9048, 1465, 10850, 3943, 65025, 41205, 41315, 41488, 0, 917601, 5352, 12362, 12435, 8839, 41053, 3266, 7785, 12356, 8616, 12104, 0, 0, 194621, 0, 3638, 5420, 3897, 3216, 0, 2358, 4018, 8633, 2850, 0, 9639, 0, 0, 0, 64630, 65427, 3542, 120023, 12076, 5303, 8078, 12676, 64418, 6276, 1706, 0, 41819, 41422, 12943, 65150, 10792, 41484, 194607, 10847, 41050, 8872, 41824, 13099, 0, 0, 120378, 8504, 10830, 0, 615, 10668, 10139, 0, 10504, 9779, 3625, 64650, 41409, 0, 41425, 65087, 41688, 8789, 41427, 4022, 0, 0, 0, 120355, 41424, 917598, 0, 41820, 0, 65292, 4812, 1261, 0, 3911, 12102, 120727, 1033, 0, 64642, 0, 3904, 119205, 10514, 3275, 0, 0, 13123, 10846, 0, 118936, 195029, 12138, 10989, 0, 6233, 10598, 449, 2669, 903, 118997, 2920, 9636, 65240, 10738, 0, 9367, 593, 41085, 3917, 64622, 41713, 64307, 0, 41448, 3596, 0, 0, 9763, 64082, 8819, 12347, 124, 12981, 41113, 232, 12234, 120646, 0, 0, 10820, 194978, 0, 9094, 1769, 41715, 2463, 0, 1064, 13307, 41976, 10115, 64482, 0, 0, 7862, 7795, 1474, 8516, 4828, 1258, 118994, 0, 0, 0, 9498, 0, 2911, 120289, 41178, 3939, 64823, 8846, 8943, 12617, 41174, 2650, 4491, 1961, 41463, 64291, 41167, 1959, 775, 120311, 41732, 41016, 6074, 9618, 194903, 1511, 3613, 0, 4259, 41436, 3656, 0, 65436, 41019, 12428, 0, 0, 194896, 8514, 8513, 9054, 1613, 41828, 0, 65531, 0, 118879, 0, 0, 5741, 10145, 8865, 64551, 120379, 5788, 7917, 0, 66622, 7733, 64359, 9558, 120375, 0, 120376, 0, 4268, 41247, 120524, 120370, 3871, 194892, 10881, 9111, 10621, 41696, 65462, 120366, 119111, 120745, 9765, 120368, 0, 0, 42118, 10321, 65281, 41587, 10949, 0, 42107, 0, 0, 5416, 10802, 195050, 66318, 65298, 0, 5685, 0, 12633, 7928, 120354, 8094, 41595, 120510, 0, 794, 194907, 12656, 10355, 64665, 5274, 1665, 41598, 3993, 194909, 64512, 40971, 536, 189, 12611, 119234, 0, 2859, 4838, 63838, 4834, 2338, 0, 194839, 4837, 41944, 770, 41452, 811, 1687, 41042, 66620, 120730, 64427, 64326, 40969, 10526, 3895, 5406, 40968, 1339, 0, 120473, 10193, 3116, 7747, 0, 8020, 10843, 41012, 12825, 0, 8266, 41006, 12371, 2871, 64614, 41245, 999, 119129, 64567, 41876, 2663, 64586, 0, 120651, 120687, 10150, 65367, 64308, 1522, 597, 4775, 10917, 12571, 10448, 12583, 12560, 12558, 12556, 12584, 1741, 65097, 1227, 9676, 12566, 12569, 12554, 0, 10812, 1586, 4978, 0, 3078, 1402, 118924, 9391, 40984, 9379, 9372, 394, 3088, 6284, 0, 41663, 3991, 64391, 0, 9237, 424, 41648, 41208, 0, 9384, 41076, 1830, 0, 0, 41656, 8246, 120307, 0, 0, 41840, 0, 2377, 41676, 0, 12572, 12552, 12557, 12559, 5479, 2796, 1003, 2373, 9446, 9447, 9448, 48, 0, 9480, 481, 2359, 9125, 9439, 9440, 9441, 548, 9153, 9444, 9445, 9430, 9431, 9432, 397, 9434, 9435, 3984, 9437, 0, 1614, 9424, 9425, 9426, 9427, 1358, 9429, 428, 9620, 9655, 0, 10982, 9096, 1333, 65170, 407, 12299, 0, 0, 5955, 194985, 1108, 5804, 11976, 41231, 41466, 64782, 3926, 9057, 64613, 8798, 0, 0, 1392, 8250, 10952, 5986, 5985, 8065, 41326, 10353, 10417, 0, 0, 4407, 64524, 4019, 0, 118919, 8448, 8219, 118914, 1812, 12675, 12659, 0, 194823, 119167, 42172, 42068, 6054, 10697, 2386, 0, 41759, 10642, 3909, 64585, 10296, 41763, 119171, 42051, 64862, 4164, 1049, 0, 120569, 11943, 41806, 8709, 10606, 3921, 120637, 64691, 41985, 8994, 1038, 120373, 8470, 0, 0, 4008, 0, 8773, 10733, 36, 0, 5153, 41805, 13097, 0, 64937, 8736, 1414, 64495, 9683, 0, 0, 0, 2536, 119951, 66330, 0, 8621, 65157, 12852, 3031, 120441, 41345, 66317, 182, 66315, 66316, 0, 10210, 120492, 9058, 366, 0, 120102, 961, 63755, 10848, 4570, 65301, 3106, 0, 41284, 1696, 41189, 4003, 12105, 0, 5766, 12802, 3264, 8824, 13268, 0, 10936, 63980, 0, 0, 194604, 120523, 0, 2322, 917561, 65506, 8300, 120374, 917536, 41285, 3547, 120144, 8112, 0, 41459, 41369, 6089, 13000, 0, 12117, 4170, 1029, 10540, 12315, 9063, 0, 120666, 744, 0, 12897, 3792, 4926, 917623, 6065, 3551, 0, 0, 4623, 41186, 41816, 4598, 41818, 12795, 5968, 7922, 12614, 10851, 8523, 6179, 119066, 6180, 1863, 4710, 0, 5956, 11972, 41290, 0, 4705, 716, 177, 120831, 4704, 12360, 120270, 64719, 161, 9020, 120272, 0, 4706, 10646, 0, 120037, 4709, 10680, 8754, 0, 120237, 120245, 119164, 0, 41377, 9136, 1700, 4401, 41280, 194711, 8974, 4004, 0, 10634, 41791, 2318, 8506, 66361, 8198, 42022, 1005, 937, 118996, 4734, 2870, 41277, 12319, 66619, 5404, 4729, 3667, 235, 1384, 4728, 41049, 120420, 120644, 120017, 8109, 120020, 119920, 4730, 447, 13186, 1513, 4733, 8664, 63978, 0, 120252, 12911, 9665, 1383, 8565, 2469, 120024, 12663, 6156, 120417, 0, 0, 4288, 120225, 2674, 13238, 11922, 41145, 41468, 3510, 13234, 41148, 8683, 5605, 42095, 10497, 12221, 1380, 12314, 41146, 118964, 13196, 13197, 3512, 120682, 9495, 8103, 0, 5959, 65184, 0, 41563, 0, 120028, 41925, 13205, 13211, 5801, 41923, 0, 120316, 1283, 120302, 4779, 7988, 3719, 4006, 3271, 66569, 64711, 8355, 118799, 8842, 0, 64870, 13070, 0, 3875, 5962, 1095, 120106, 3599, 119149, 5827, 0, 7787, 0, 65494, 120816, 64565, 0, 4773, 64531, 64034, 0, 0, 12785, 42043, 65467, 119227, 0, 42046, 9742, 521, 65136, 10800, 41473, 8404, 917595, 483, 0, 1450, 12986, 928, 0, 65441, 0, 10599, 0, 3989, 10971, 120431, 5771, 9841, 8843, 12145, 119950, 119959, 194856, 9807, 3769, 41190, 3973, 119105, 4575, 9573, 7982, 429, 8849, 0, 0, 41771, 1796, 118918, 118968, 194853, 8164, 41301, 3502, 0, 0, 0, 4919, 10590, 5825, 7755, 0, 0, 64548, 12661, 1621, 10214, 10418, 41962, 0, 41971, 1409, 12195, 1617, 3112, 10824, 42101, 1390, 64403, 0, 421, 1756, 5846, 0, 8666, 120132, 0, 120360, 42174, 3630, 5408, 2817, 1214, 119000, 120124, 10218, 41769, 3168, 0, 42134, 7957, 2370, 2846, 1056, 119070, 12798, 0, 120314, 1836, 8757, 0, 12327, 3740, 119028, 5622, 65374, 41765, 2341, 3944, 8484, 8474, 120817, 120433, 3118, 8461, 41942, 12153, 5621, 12799, 8127, 8975, 9451, 7943, 13073, 12169, 10618, 681, 0, 703, 120812, 3272, 8781, 12894, 0, 12223, 0, 6204, 0, 0, 8279, 8776, 64954, 3276, 0, 65222, 4267, 194627, 41325, 0, 64795, 0, 12171, 10047, 9710, 3262, 0, 0, 0, 42020, 118788, 163, 3877, 10495, 1655, 5842, 12479, 3122, 0, 7793, 0, 9328, 64352, 10039, 6003, 42094, 5623, 0, 5717, 3986, 0, 0, 8912, 64555, 41858, 64078, 0, 3627, 4523, 194836, 12241, 8540, 12993, 8887, 4574, 41040, 2459, 64886, 13060, 41041, 8946, 10348, 10412, 5718, 0, 10450, 8147, 13221, 66329, 120353, 3765, 119885, 0, 1606, 120348, 120351, 3093, 119126, 4619, 10600, 119247, 7712, 0, 4312, 41918, 120337, 10128, 11923, 4023, 41892, 5763, 120335, 4827, 2401, 12810, 8792, 120346, 4455, 7826, 433, 120342, 0, 2499, 41812, 12886, 0, 11973, 13089, 4293, 10300, 10161, 10396, 12196, 66322, 66630, 0, 0, 3010, 5817, 120604, 1458, 3120, 9797, 9643, 0, 4984, 10389, 120111, 9100, 0, 0, 0, 1061, 4699, 9115, 3509, 0, 486, 4290, 120201, 0, 0, 0, 1045, 120361, 5631, 10380, 9626, 2380, 0, 0, 120678, 2376, 8486, 0, 9824, 2335, 4362, 12174, 0, 2366, 1025, 0, 12634, 120760, 0, 41443, 120732, 0, 64035, 9711, 1523, 0, 5058, 41445, 120058, 0, 8567, 41442, 3988, 0, 0, 1847, 0, 10403, 8564, 65385, 65076, 65117, 0, 0, 0, 12616, 0, 6256, 0, 12671, 0, 10206, 118974, 0, 2673, 11960, 5820, 0, 4488, 194740, 7926, 0, 10444, 42137, 120787, 2754, 9850, 0, 4487, 13192, 41957, 1032, 65530, 1711, 0, 120067, 3114, 614, 0, 118938, 119261, 0, 926, 120822, 0, 0, 0, 0, 10832, 0, 1050, 41798, 41035, 0, 9314, 41801, 119088, 120616, 520, 10437, 12699, 8331, 0, 3091, 41034, 0, 2307, 8360, 10097, 0, 321, 41028, 64543, 0, 0, 0, 0, 2861, 10360, 10095, 0, 66307, 440, 1861, 13085, 9233, 0, 64532, 0, 119158, 12123, 0, 3859, 10570, 41660, 8209, 0, 118841, 10910, 0, 1521, 7875, 41658, 10487, 0, 5760, 13011, 743, 4414, 120766, 120628, 0, 5243, 9849, 5239, 0, 0, 1405, 5237, 0, 65112, 10103, 5247, 4769, 42063, 5508, 120829, 5764, 0, 3513, 3008, 9378, 0, 194960, 10125, 120686, 41103, 9394, 13225, 1397, 120548, 65365, 119093, 4770, 0, 9392, 8731, 65378, 12079, 120619, 12682, 9122, 0, 4774, 3019, 9997, 12834, 0, 1099, 10490, 120547, 1340, 9390, 0, 0, 464, 4281, 4768, 9385, 0, 1346, 9017, 917631, 12087, 64516, 423, 1818, 65144, 0, 8272, 0, 66324, 120676, 3087, 64960, 10111, 65181, 64707, 0, 9584, 8214, 0, 0, 0, 9106, 118907, 119248, 5806, 64750, 119195, 8243, 9123, 5709, 0, 265, 64409, 13255, 12605, 0, 2752, 64626, 0, 1434, 59, 5637, 0, 0, 64897, 0, 41810, 42008, 66305, 0, 41809, 10283, 41983, 64826, 917596, 1156, 8009, 3305, 3782, 511, 41843, 0, 1014, 64360, 11906, 194676, 10835, 10157, 0, 1400, 10323, 10685, 7702, 41211, 10387, 4453, 2440, 3758, 1150, 10547, 5700, 41213, 118812, 65383, 2339, 64019, 5697, 41156, 63984, 9116, 120480, 0, 462, 41841, 10493, 3862, 8129, 0, 0, 12864, 42065, 9845, 0, 8261, 5701, 9722, 9581, 1385, 1426, 120474, 194943, 41872, 0, 41033, 8571, 194870, 13288, 120108, 5167, 0, 1681, 12184, 1204, 3755, 11935, 7748, 8213, 3286, 8911, 64712, 10744, 0, 990, 5647, 5726, 64915, 10377, 0, 194989, 5646, 195063, 13253, 2851, 3945, 120096, 120119, 4373, 0, 64402, 9587, 1789, 5651, 120097, 3100, 0, 5648, 64748, 118897, 0, 10205, 3545, 8190, 10016, 64616, 0, 8479, 64312, 120118, 2368, 63993, 4419, 120460, 0, 3439, 1825, 1192, 119166, 8891, 3080, 118836, 2347, 5430, 1140, 8990, 2848, 10159, 0, 120212, 249, 0, 66623, 12191, 1815, 0, 890, 8883, 3267, 728, 42144, 995, 0, 4410, 1041, 10576, 8102, 10099, 10343, 0, 8091, 558, 120110, 12273, 0, 0, 12112, 0, 41389, 0, 65214, 5375, 10142, 8548, 8215, 3129, 10074, 12913, 9005, 41856, 13242, 64891, 7725, 11938, 194757, 0, 8624, 5173, 65348, 527, 0, 41894, 10327, 6277, 10608, 11915, 10010, 0, 3540, 41672, 835, 2329, 0, 41029, 0, 7849, 12245, 5426, 4258, 63987, 41787, 5424, 12016, 9699, 0, 5434, 0, 0, 8067, 6144, 0, 10311, 118977, 1404, 3095, 64917, 120211, 3464, 494, 4819, 0, 65098, 10965, 956, 3672, 13112, 1498, 194864, 0, 120667, 431, 10029, 65159, 0, 8761, 41537, 13171, 13096, 0, 65108, 0, 9516, 1044, 5268, 0, 4954, 0, 4450, 120723, 0, 64358, 11946, 356, 3477, 227, 10488, 13214, 382, 41940, 12295, 0, 66631, 0, 3020, 120819, 120560, 2541, 0, 12364, 64934, 0, 1057, 957, 9110, 194974, 2743, 0, 63965, 120463, 9097, 66571, 0, 8782, 3006, 776, 2524, 1592, 8573, 0, 10924, 65164, 63941, 41593, 4397, 8952, 3856, 118818, 0, 5872, 65377, 0, 917620, 0, 1698, 0, 64477, 5413, 3953, 1053, 120827, 65094, 11994, 4339, 1052, 1051, 459, 1060, 0, 194647, 65299, 0, 5228, 0, 7868, 689, 12984, 4163, 0, 8639, 0, 65226, 65510, 1162, 12130, 2671, 0, 8095, 64375, 119005, 42178, 4553, 0, 0, 195005, 0, 195004, 0, 195003, 0, 194623, 4567, 41891, 1926, 0, 119056, 4820, 8110, 10935, 194646, 194665, 5830, 119212, 1377, 0, 4897, 12932, 9250, 8693, 4438, 0, 0, 1753, 194641, 6147, 917558, 64621, 8833, 0, 0, 194644, 41428, 64596, 10719, 65440, 194669, 1413, 194994, 65394, 802, 12141, 0, 5561, 10607, 10671, 2528, 41774, 41379, 42023, 838, 5669, 120697, 844, 8036, 194891, 256, 0, 5583, 41987, 0, 0, 5580, 65464, 2923, 10853, 5582, 10048, 0, 13069, 5795, 13158, 119006, 195066, 6087, 120514, 41322, 12180, 0, 194640, 0, 0, 8894, 5370, 119997, 194628, 1638, 10966, 120491, 194630, 118848, 5733, 0, 64288, 0, 8172, 42017, 5729, 10844, 194715, 64054, 9760, 0, 120121, 1238, 200, 0, 1062, 119993, 194946, 118905, 0, 0, 1070, 9361, 0, 6095, 3394, 0, 3015, 0, 0, 4037, 0, 119995, 65186, 66626, 7817, 1841, 13183, 12976, 120496, 372, 1669, 10776, 63937, 7701, 41585, 64397, 119211, 1732, 276, 41862, 2828, 33, 65326, 41768, 9007, 118796, 41588, 914, 427, 8071, 3538, 3900, 65321, 41864, 1031, 6257, 65279, 41869, 0, 0, 2328, 917550, 1071, 41400, 194717, 13249, 10841, 41627, 5301, 1047, 0, 5734, 8960, 120688, 8001, 10651, 119970, 65012, 9663, 194990, 12304, 41621, 5711, 12921, 12098, 119244, 9166, 12164, 5710, 119082, 194782, 65213, 12447, 10571, 0, 0, 0, 119108, 5558, 0, 5715, 10915, 0, 12007, 3670, 2761, 11975, 0, 3074, 5722, 194876, 8629, 0, 0, 4499, 2757, 4496, 9725, 0, 8910, 10689, 0, 12717, 0, 64730, 0, 0, 0, 41630, 41640, 120143, 0, 118911, 4280, 13118, 8765, 12784, 7792, 1393, 0, 8701, 119027, 8487, 8233, 0, 0, 0, 120009, 4495, 12144, 2841, 12543, 0, 1473, 10992, 64329, 118984, 0, 120006, 9318, 357, 1048, 41100, 0, 41104, 65457, 8035, 1054, 0, 1040, 65450, 5454, 4434, 1069, 0, 0, 0, 0, 5084, 65402, 119133, 9693, 12354, 733, 41931, 41677, 41102, 4353, 41674, 1059, 9218, 1731, 0, 0, 0, 194786, 41679, 8299, 0, 118833, 64390, 0, 5155, 12786, 12787, 42122, 63998, 0, 41779, 0, 3587, 12131, 41432, 10986, 66602, 9605, 64807, 12788, 194926, 41767, 3371, 0, 13114, 8771, 3955, 41022, 0, 1109, 11000, 0, 65351, 9770, 9246, 12230, 64507, 8868, 399, 65137, 41783, 41772, 64045, 12149, 2755, 551, 0, 10156, 4857, 0, 4428, 2544, 65074, 0, 0, 0, 917612, 351, 5747, 12179, 194603, 7978, 41092, 120731, 0, 11924, 0, 10712, 65015, 120733, 563, 64815, 0, 9013, 5588, 57, 0, 10386, 65269, 119043, 5585, 0, 2549, 694, 0, 0, 5584, 8358, 64717, 10238, 194919, 10919, 277, 7980, 0, 41815, 194920, 41800, 5589, 41807, 2664, 12793, 5586, 1574, 10513, 0, 2525, 4852, 5749, 0, 41605, 64696, 0, 1039, 9801, 10155, 5745, 188, 8135, 0, 10055, 120655, 9055, 41853, 4858, 5657, 0, 436, 4771, 0, 0, 5654, 4856, 8051, 120799, 0, 0, 5652, 10945, 0, 0, 0, 3661, 7863, 118834, 0, 41302, 0, 0, 5402, 10234, 5843, 11939, 5655, 42157, 0, 3157, 1055, 917628, 0, 3504, 0, 0, 10822, 5149, 41927, 10226, 41871, 0, 3594, 10272, 10304, 40, 12657, 594, 10244, 386, 10256, 8834, 10816, 118866, 3467, 0, 0, 3331, 946, 10231, 1495, 8131, 13179, 194752, 9562, 4304, 0, 8160, 0, 194753, 64529, 64656, 63995, 1348, 12239, 64013, 5666, 13303, 10555, 194729, 119919, 9091, 10798, 65230, 13269, 10195, 194931, 7732, 41905, 9793, 0, 6097, 5668, 8780, 4982, 119883, 5670, 63969, 0, 194762, 2672, 3735, 5667, 13138, 120807, 9484, 10724, 13203, 119024, 65258, 194933, 4361, 9487, 64314, 9286, 1497, 195034, 1932, 12442, 6193, 3571, 13247, 0, 7973, 119157, 64821, 11964, 41339, 7873, 63968, 119219, 553, 120653, 194690, 194857, 3604, 0, 4587, 0, 0, 119020, 65149, 1962, 194861, 194696, 5633, 194862, 66337, 0, 0, 64905, 12856, 5437, 65208, 10669, 8702, 7964, 63971, 9135, 199, 10976, 4105, 63880, 194699, 194736, 194710, 12148, 13148, 194684, 0, 9226, 120439, 12399, 10765, 5634, 4524, 12720, 4724, 0, 8407, 66323, 12224, 120815, 0, 5221, 64348, 328, 7886, 0, 5448, 5636, 120071, 5329, 0, 5638, 118839, 7940, 119076, 0, 65182, 5635, 3373, 2986, 118880, 194751, 3437, 194832, 6203, 9833, 12693, 11920, 8274, 194838, 64394, 1657, 41558, 194672, 118887, 5639, 2954, 5660, 5640, 65376, 194818, 194817, 194820, 194819, 5297, 41637, 13284, 6112, 7968, 41625, 194737, 194738, 120507, 41780, 5642, 0, 194827, 42181, 4342, 42039, 194831, 1677, 0, 4585, 5641, 8259, 13301, 1058, 2719, 194625, 194638, 917587, 1144, 5868, 0, 10867, 65169, 13277, 4308, 2539, 0, 65122, 543, 64916, 64736, 2547, 10209, 119170, 65317, 5399, 65316, 0, 41633, 7902, 64932, 9000, 12233, 0, 120315, 1865, 0, 5613, 194772, 12994, 65057, 5610, 0, 6228, 4307, 3482, 42133, 10787, 194840, 2997, 506, 5609, 41194, 12863, 194776, 64412, 41195, 2412, 8169, 8186, 8841, 9522, 516, 13130, 41197, 0, 34, 64007, 10030, 5306, 1612, 120187, 120182, 64951, 120184, 12001, 10211, 120177, 64564, 66365, 120174, 120173, 7749, 120175, 118898, 1758, 413, 10667, 4677, 120197, 9133, 1935, 120194, 1042, 120196, 64779, 1931, 10248, 6185, 64776, 1217, 10242, 708, 825, 118913, 0, 12294, 0, 194908, 9138, 2534, 810, 12631, 194911, 0, 4424, 119255, 5591, 1239, 2364, 0, 917562, 3403, 119193, 0, 64364, 0, 65250, 10027, 8998, 0, 0, 9152, 194952, 120191, 2980, 119169, 41850, 931, 3433, 13170, 12615, 1594, 119937, 65397, 0, 12944, 41623, 8730, 41353, 65409, 119009, 4337, 65188, 41394, 918, 194899, 935, 7681, 194900, 377, 41393, 12668, 194904, 2477, 64301, 0, 0, 0, 65201, 9528, 0, 12884, 194881, 7907, 194883, 120186, 194885, 65328, 10673, 119217, 194889, 119128, 917575, 1781, 5496, 3357, 62, 1649, 120641, 964, 119242, 65033, 194894, 0, 0, 65035, 194872, 65038, 0, 64602, 119856, 0, 12220, 12711, 66575, 4542, 194875, 8423, 3348, 448, 120573, 2991, 9364, 0, 997, 7949, 194918, 12849, 0, 0, 3073, 42000, 9714, 120679, 4657, 12988, 4658, 65335, 12335, 119228, 65237, 6241, 2818, 4877, 2385, 5463, 41897, 4172, 10052, 4409, 0, 10873, 12095, 0, 5346, 120328, 0, 6237, 5461, 118803, 12722, 119999, 40974, 65231, 64828, 12678, 194868, 8592, 1257, 0, 10970, 2408, 3251, 66617, 3274, 5465, 41501, 2461, 0, 0, 5342, 8317, 194663, 194999, 3263, 120559, 8673, 194719, 3270, 64539, 65338, 0, 120518, 0, 0, 5535, 9142, 0, 4289, 8687, 10938, 120658, 118790, 1182, 2542, 186, 0, 119156, 5770, 529, 65196, 12612, 12949, 10586, 10790, 10839, 8920, 5241, 41207, 0, 0, 41594, 225, 0, 5688, 41300, 41204, 0, 118794, 10721, 41209, 9254, 42097, 1794, 41875, 65238, 5624, 266, 120221, 120222, 41873, 3617, 120040, 41494, 119824, 8420, 13088, 120214, 10225, 41338, 3734, 7734, 0, 5502, 66605, 4452, 41260, 0, 0, 4511, 5161, 10572, 0, 42115, 42050, 64349, 41083, 0, 0, 0, 9003, 8192, 0, 5305, 9653, 10616, 1697, 9546, 0, 194847, 119174, 41482, 65205, 10031, 64063, 12353, 12535, 8620, 120207, 64058, 8799, 42131, 42031, 64062, 1028, 64060, 64059, 837, 10567, 119960, 41606, 3176, 64773, 0, 2902, 64043, 64042, 41740, 3609, 120577, 13200, 832, 64044, 42156, 10076, 64040, 64039, 12919, 1034, 3392, 10753, 5180, 64033, 41395, 65468, 64038, 64037, 64036, 41898, 4291, 63966, 64015, 41114, 243, 194930, 0, 6024, 194586, 12128, 194910, 3476, 8973, 8538, 64011, 64010, 64008, 4285, 4800, 7706, 41750, 0, 2538, 64009, 204, 0, 4802, 4111, 8239, 9098, 4805, 64001, 214, 7885, 42143, 8321, 0, 12208, 4767, 9343, 64049, 64048, 0, 1133, 64053, 64052, 64051, 41187, 8692, 6022, 119052, 10005, 12329, 41333, 0, 43, 1942, 0, 0, 41107, 12619, 41121, 3885, 92, 64023, 64022, 64021, 64020, 0, 12451, 64025, 41412, 41485, 12035, 119208, 6254, 10501, 64018, 8890, 12457, 66587, 194837, 0, 64778, 118915, 194834, 120193, 0, 66637, 7995, 8759, 41411, 13094, 12449, 8546, 41414, 65109, 3179, 0, 4720, 10165, 0, 119249, 0, 10751, 0, 12915, 120180, 10535, 0, 0, 0, 6168, 10934, 1946, 294, 41874, 5494, 4639, 0, 12040, 6196, 4498, 0, 64028, 64027, 41789, 41788, 2960, 118786, 118795, 8969, 119887, 10197, 0, 119886, 2950, 11998, 6210, 119890, 370, 3549, 64790, 7801, 4953, 119967, 0, 0, 3297, 10681, 120693, 1135, 194783, 0, 5063, 3517, 2964, 119257, 0, 2552, 41546, 60, 10627, 8649, 8252, 729, 120598, 0, 10541, 0, 64923, 41770, 41547, 9032, 0, 0, 119899, 41215, 119897, 119898, 12832, 119904, 8081, 3761, 3537, 119908, 9137, 119906, 8999, 65343, 3850, 3466, 4327, 0, 9373, 0, 908, 6282, 8611, 9813, 0, 41655, 537, 41511, 4179, 8978, 120540, 119135, 1842, 10527, 120409, 9628, 3848, 12081, 9826, 64502, 1767, 5336, 120200, 64659, 663, 194846, 10780, 0, 13108, 120574, 120204, 120198, 120205, 347, 42112, 40992, 4100, 920, 1811, 1355, 7739, 917547, 3592, 10078, 5318, 0, 0, 120073, 0, 6224, 120470, 9381, 0, 64345, 0, 9281, 3296, 12865, 0, 0, }; #define code_magic 47 #define code_size 16384 #define code_poly 16427 Python-2.3.7/Modules/timemodule.c0000644001241000117560000005765707700214430016211 0ustar loewishpifb6 /* Time module */ #include "Python.h" #include "structseq.h" #include #ifdef macintosh #include #include #else #include #endif #ifdef QUICKWIN #include #endif #ifdef HAVE_FTIME #include #if !defined(MS_WINDOWS) && !defined(PYOS_OS2) extern int ftime(struct timeb *); #endif /* MS_WINDOWS */ #endif /* HAVE_FTIME */ #if defined(__WATCOMC__) && !defined(__QNX__) #include #else #ifdef MS_WINDOWS #define WIN32_LEAN_AND_MEAN #include #include "pythread.h" /* helper to allow us to interrupt sleep() on Windows*/ static HANDLE hInterruptEvent = NULL; static BOOL WINAPI PyCtrlHandler(DWORD dwCtrlType) { SetEvent(hInterruptEvent); /* allow other default handlers to be called. Default Python handler will setup the KeyboardInterrupt exception. */ return FALSE; } static long main_thread; #if defined(__BORLANDC__) /* These overrides not needed for Win32 */ #define timezone _timezone #define tzname _tzname #define daylight _daylight #endif /* __BORLANDC__ */ #endif /* MS_WINDOWS */ #endif /* !__WATCOMC__ || __QNX__ */ #if defined(MS_WINDOWS) && !defined(MS_WIN64) && !defined(__BORLANDC__) /* Win32 has better clock replacement XXX Win64 does not yet, but might when the platform matures. */ #undef HAVE_CLOCK /* We have our own version down below */ #endif /* MS_WINDOWS && !MS_WIN64 */ #if defined(PYOS_OS2) #define INCL_DOS #define INCL_ERRORS #include #endif #if defined(PYCC_VACPP) #include #endif #ifdef __BEOS__ #include /* For bigtime_t, snooze(). - [cjh] */ #include #include #endif #ifdef RISCOS extern int riscos_sleep(double); #endif /* Forward declarations */ static int floatsleep(double); static double floattime(void); /* For Y2K check */ static PyObject *moddict; #ifdef macintosh /* Our own timezone. We have enough information to deduce whether ** DST is on currently, but unfortunately we cannot put it to good ** use because we don't know the rules (and that is needed to have ** localtime() return correct tm_isdst values for times other than ** the current time. So, we cop out and only tell the user the current ** timezone. */ static long timezone; static void initmactimezone(void) { MachineLocation loc; long delta; ReadLocation(&loc); if (loc.latitude == 0 && loc.longitude == 0 && loc.u.gmtDelta == 0) return; delta = loc.u.gmtDelta & 0x00FFFFFF; if (delta & 0x00800000) delta |= 0xFF000000; timezone = -delta; } #endif /* macintosh */ static PyObject * time_time(PyObject *self, PyObject *args) { double secs; if (!PyArg_ParseTuple(args, ":time")) return NULL; secs = floattime(); if (secs == 0.0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return PyFloat_FromDouble(secs); } PyDoc_STRVAR(time_doc, "time() -> floating point number\n\ \n\ Return the current time in seconds since the Epoch.\n\ Fractions of a second may be present if the system clock provides them."); #ifdef HAVE_CLOCK #ifndef CLOCKS_PER_SEC #ifdef CLK_TCK #define CLOCKS_PER_SEC CLK_TCK #else #define CLOCKS_PER_SEC 1000000 #endif #endif static PyObject * time_clock(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":clock")) return NULL; return PyFloat_FromDouble(((double)clock()) / CLOCKS_PER_SEC); } #endif /* HAVE_CLOCK */ #if defined(MS_WINDOWS) && !defined(MS_WIN64) && !defined(__BORLANDC__) /* Due to Mark Hammond and Tim Peters */ static PyObject * time_clock(PyObject *self, PyObject *args) { static LARGE_INTEGER ctrStart; static double divisor = 0.0; LARGE_INTEGER now; double diff; if (!PyArg_ParseTuple(args, ":clock")) return NULL; if (divisor == 0.0) { LARGE_INTEGER freq; QueryPerformanceCounter(&ctrStart); if (!QueryPerformanceFrequency(&freq) || freq.QuadPart == 0) { /* Unlikely to happen - this works on all intel machines at least! Revert to clock() */ return PyFloat_FromDouble(clock()); } divisor = (double)freq.QuadPart; } QueryPerformanceCounter(&now); diff = (double)(now.QuadPart - ctrStart.QuadPart); return PyFloat_FromDouble(diff / divisor); } #define HAVE_CLOCK /* So it gets included in the methods */ #endif /* MS_WINDOWS && !MS_WIN64 */ #ifdef HAVE_CLOCK PyDoc_STRVAR(clock_doc, "clock() -> floating point number\n\ \n\ Return the CPU time or real time since the start of the process or since\n\ the first call to clock(). This has as much precision as the system\n\ records."); #endif static PyObject * time_sleep(PyObject *self, PyObject *args) { double secs; if (!PyArg_ParseTuple(args, "d:sleep", &secs)) return NULL; if (floatsleep(secs) != 0) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(sleep_doc, "sleep(seconds)\n\ \n\ Delay execution for a given number of seconds. The argument may be\n\ a floating point number for subsecond precision."); static PyStructSequence_Field struct_time_type_fields[] = { {"tm_year", NULL}, {"tm_mon", NULL}, {"tm_mday", NULL}, {"tm_hour", NULL}, {"tm_min", NULL}, {"tm_sec", NULL}, {"tm_wday", NULL}, {"tm_yday", NULL}, {"tm_isdst", NULL}, {0} }; static PyStructSequence_Desc struct_time_type_desc = { "time.struct_time", NULL, struct_time_type_fields, 9, }; static PyTypeObject StructTimeType; static PyObject * tmtotuple(struct tm *p) { PyObject *v = PyStructSequence_New(&StructTimeType); if (v == NULL) return NULL; #define SET(i,val) PyStructSequence_SET_ITEM(v, i, PyInt_FromLong((long) val)) SET(0, p->tm_year + 1900); SET(1, p->tm_mon + 1); /* Want January == 1 */ SET(2, p->tm_mday); SET(3, p->tm_hour); SET(4, p->tm_min); SET(5, p->tm_sec); SET(6, (p->tm_wday + 6) % 7); /* Want Monday == 0 */ SET(7, p->tm_yday + 1); /* Want January, 1 == 1 */ SET(8, p->tm_isdst); #undef SET if (PyErr_Occurred()) { Py_XDECREF(v); return NULL; } return v; } static PyObject * time_convert(time_t when, struct tm * (*function)(const time_t *)) { struct tm *p; errno = 0; p = function(&when); if (p == NULL) { #ifdef EINVAL if (errno == 0) errno = EINVAL; #endif return PyErr_SetFromErrno(PyExc_ValueError); } return tmtotuple(p); } static PyObject * time_gmtime(PyObject *self, PyObject *args) { double when; if (PyTuple_Size(args) == 0) when = floattime(); if (!PyArg_ParseTuple(args, "|d:gmtime", &when)) return NULL; return time_convert((time_t)when, gmtime); } PyDoc_STRVAR(gmtime_doc, "gmtime([seconds]) -> (tm_year, tm_mon, tm_day, tm_hour, tm_min,\n\ tm_sec, tm_wday, tm_yday, tm_isdst)\n\ \n\ Convert seconds since the Epoch to a time tuple expressing UTC (a.k.a.\n\ GMT). When 'seconds' is not passed in, convert the current time instead."); static PyObject * time_localtime(PyObject *self, PyObject *args) { double when; if (PyTuple_Size(args) == 0) when = floattime(); if (!PyArg_ParseTuple(args, "|d:localtime", &when)) return NULL; return time_convert((time_t)when, localtime); } PyDoc_STRVAR(localtime_doc, "localtime([seconds]) -> (tm_year,tm_mon,tm_day,tm_hour,tm_min,tm_sec,tm_wday,tm_yday,tm_isdst)\n\ \n\ Convert seconds since the Epoch to a time tuple expressing local time.\n\ When 'seconds' is not passed in, convert the current time instead."); static int gettmarg(PyObject *args, struct tm *p) { int y; memset((void *) p, '\0', sizeof(struct tm)); if (!PyArg_Parse(args, "(iiiiiiiii)", &y, &p->tm_mon, &p->tm_mday, &p->tm_hour, &p->tm_min, &p->tm_sec, &p->tm_wday, &p->tm_yday, &p->tm_isdst)) return 0; if (y < 1900) { PyObject *accept = PyDict_GetItemString(moddict, "accept2dyear"); if (accept == NULL || !PyInt_Check(accept) || PyInt_AsLong(accept) == 0) { PyErr_SetString(PyExc_ValueError, "year >= 1900 required"); return 0; } if (69 <= y && y <= 99) y += 1900; else if (0 <= y && y <= 68) y += 2000; else { PyErr_SetString(PyExc_ValueError, "year out of range"); return 0; } } p->tm_year = y - 1900; p->tm_mon--; p->tm_wday = (p->tm_wday + 1) % 7; p->tm_yday--; return 1; } #ifdef HAVE_STRFTIME static PyObject * time_strftime(PyObject *self, PyObject *args) { PyObject *tup = NULL; struct tm buf; const char *fmt; size_t fmtlen, buflen; char *outbuf = 0; size_t i; memset((void *) &buf, '\0', sizeof(buf)); if (!PyArg_ParseTuple(args, "s|O:strftime", &fmt, &tup)) return NULL; if (tup == NULL) { time_t tt = time(NULL); buf = *localtime(&tt); } else if (!gettmarg(tup, &buf)) return NULL; fmtlen = strlen(fmt); /* I hate these functions that presume you know how big the output * will be ahead of time... */ for (i = 1024; ; i += i) { outbuf = malloc(i); if (outbuf == NULL) { return PyErr_NoMemory(); } buflen = strftime(outbuf, i, fmt, &buf); if (buflen > 0 || i >= 256 * fmtlen) { /* If the buffer is 256 times as long as the format, it's probably not failing for lack of room! More likely, the format yields an empty result, e.g. an empty format, or %Z when the timezone is unknown. */ PyObject *ret; ret = PyString_FromStringAndSize(outbuf, buflen); free(outbuf); return ret; } free(outbuf); } } PyDoc_STRVAR(strftime_doc, "strftime(format[, tuple]) -> string\n\ \n\ Convert a time tuple to a string according to a format specification.\n\ See the library reference manual for formatting codes. When the time tuple\n\ is not present, current time as returned by localtime() is used."); #endif /* HAVE_STRFTIME */ static PyObject * time_strptime(PyObject *self, PyObject *args) { PyObject *strptime_module = PyImport_ImportModule("_strptime"); PyObject *strptime_result; if (!strptime_module) return NULL; strptime_result = PyObject_CallMethod(strptime_module, "strptime", "O", args); Py_DECREF(strptime_module); return strptime_result; } PyDoc_STRVAR(strptime_doc, "strptime(string, format) -> struct_time\n\ \n\ Parse a string to a time tuple according to a format specification.\n\ See the library reference manual for formatting codes (same as strftime())."); static PyObject * time_asctime(PyObject *self, PyObject *args) { PyObject *tup = NULL; struct tm buf; char *p; if (!PyArg_ParseTuple(args, "|O:asctime", &tup)) return NULL; if (tup == NULL) { time_t tt = time(NULL); buf = *localtime(&tt); } else if (!gettmarg(tup, &buf)) return NULL; p = asctime(&buf); if (p[24] == '\n') p[24] = '\0'; return PyString_FromString(p); } PyDoc_STRVAR(asctime_doc, "asctime([tuple]) -> string\n\ \n\ Convert a time tuple to a string, e.g. 'Sat Jun 06 16:26:11 1998'.\n\ When the time tuple is not present, current time as returned by localtime()\n\ is used."); static PyObject * time_ctime(PyObject *self, PyObject *args) { double dt; time_t tt; char *p; if (PyTuple_Size(args) == 0) tt = time(NULL); else { if (!PyArg_ParseTuple(args, "|d:ctime", &dt)) return NULL; tt = (time_t)dt; } p = ctime(&tt); if (p == NULL) { PyErr_SetString(PyExc_ValueError, "unconvertible time"); return NULL; } if (p[24] == '\n') p[24] = '\0'; return PyString_FromString(p); } PyDoc_STRVAR(ctime_doc, "ctime(seconds) -> string\n\ \n\ Convert a time in seconds since the Epoch to a string in local time.\n\ This is equivalent to asctime(localtime(seconds)). When the time tuple is\n\ not present, current time as returned by localtime() is used."); #ifdef HAVE_MKTIME static PyObject * time_mktime(PyObject *self, PyObject *args) { PyObject *tup; struct tm buf; time_t tt; if (!PyArg_ParseTuple(args, "O:mktime", &tup)) return NULL; tt = time(&tt); buf = *localtime(&tt); if (!gettmarg(tup, &buf)) return NULL; tt = mktime(&buf); if (tt == (time_t)(-1)) { PyErr_SetString(PyExc_OverflowError, "mktime argument out of range"); return NULL; } return PyFloat_FromDouble((double)tt); } PyDoc_STRVAR(mktime_doc, "mktime(tuple) -> floating point number\n\ \n\ Convert a time tuple in local time to seconds since the Epoch."); #endif /* HAVE_MKTIME */ #ifdef HAVE_WORKING_TZSET void inittimezone(PyObject *module); static PyObject * time_tzset(PyObject *self, PyObject *args) { PyObject* m; if (!PyArg_ParseTuple(args, ":tzset")) return NULL; m = PyImport_ImportModule("time"); if (m == NULL) { return NULL; } tzset(); /* Reset timezone, altzone, daylight and tzname */ inittimezone(m); Py_DECREF(m); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(tzset_doc, "tzset(zone)\n\ \n\ Initialize, or reinitialize, the local timezone to the value stored in\n\ os.environ['TZ']. The TZ environment variable should be specified in\n\ standard Uniz timezone format as documented in the tzset man page\n\ (eg. 'US/Eastern', 'Europe/Amsterdam'). Unknown timezones will silently\n\ fall back to UTC. If the TZ environment variable is not set, the local\n\ timezone is set to the systems best guess of wallclock time.\n\ Changing the TZ environment variable without calling tzset *may* change\n\ the local timezone used by methods such as localtime, but this behaviour\n\ should not be relied on."); #endif /* HAVE_WORKING_TZSET */ void inittimezone(PyObject *m) { /* This code moved from inittime wholesale to allow calling it from time_tzset. In the future, some parts of it can be moved back (for platforms that don't HAVE_WORKING_TZSET, when we know what they are), and the extranious calls to tzset(3) should be removed. I havn't done this yet, as I don't want to change this code as little as possible when introducing the time.tzset and time.tzsetwall methods. This should simply be a method of doing the following once, at the top of this function and removing the call to tzset() from time_tzset(): #ifdef HAVE_TZSET tzset() #endif And I'm lazy and hate C so nyer. */ #if defined(HAVE_TZNAME) && !defined(__GLIBC__) && !defined(__CYGWIN__) tzset(); #ifdef PYOS_OS2 PyModule_AddIntConstant(m, "timezone", _timezone); #else /* !PYOS_OS2 */ PyModule_AddIntConstant(m, "timezone", timezone); #endif /* PYOS_OS2 */ #ifdef HAVE_ALTZONE PyModule_AddIntConstant(m, "altzone", altzone); #else #ifdef PYOS_OS2 PyModule_AddIntConstant(m, "altzone", _timezone-3600); #else /* !PYOS_OS2 */ PyModule_AddIntConstant(m, "altzone", timezone-3600); #endif /* PYOS_OS2 */ #endif PyModule_AddIntConstant(m, "daylight", daylight); PyModule_AddObject(m, "tzname", Py_BuildValue("(zz)", tzname[0], tzname[1])); #else /* !HAVE_TZNAME || __GLIBC__ || __CYGWIN__*/ #ifdef HAVE_STRUCT_TM_TM_ZONE { #define YEAR ((time_t)((365 * 24 + 6) * 3600)) time_t t; struct tm *p; long janzone, julyzone; char janname[10], julyname[10]; t = (time((time_t *)0) / YEAR) * YEAR; p = localtime(&t); janzone = -p->tm_gmtoff; strncpy(janname, p->tm_zone ? p->tm_zone : " ", 9); janname[9] = '\0'; t += YEAR/2; p = localtime(&t); julyzone = -p->tm_gmtoff; strncpy(julyname, p->tm_zone ? p->tm_zone : " ", 9); julyname[9] = '\0'; if( janzone < julyzone ) { /* DST is reversed in the southern hemisphere */ PyModule_AddIntConstant(m, "timezone", julyzone); PyModule_AddIntConstant(m, "altzone", janzone); PyModule_AddIntConstant(m, "daylight", janzone != julyzone); PyModule_AddObject(m, "tzname", Py_BuildValue("(zz)", julyname, janname)); } else { PyModule_AddIntConstant(m, "timezone", janzone); PyModule_AddIntConstant(m, "altzone", julyzone); PyModule_AddIntConstant(m, "daylight", janzone != julyzone); PyModule_AddObject(m, "tzname", Py_BuildValue("(zz)", janname, julyname)); } } #else #ifdef macintosh /* The only thing we can obtain is the current timezone ** (and whether dst is currently _active_, but that is not what ** we're looking for:-( ) */ initmactimezone(); PyModule_AddIntConstant(m, "timezone", timezone); PyModule_AddIntConstant(m, "altzone", timezone); PyModule_AddIntConstant(m, "daylight", 0); PyModule_AddObject(m, "tzname", Py_BuildValue("(zz)", "", "")); #endif /* macintosh */ #endif /* HAVE_STRUCT_TM_TM_ZONE */ #ifdef __CYGWIN__ tzset(); PyModule_AddIntConstant(m, "timezone", _timezone); PyModule_AddIntConstant(m, "altzone", _timezone); PyModule_AddIntConstant(m, "daylight", _daylight); PyModule_AddObject(m, "tzname", Py_BuildValue("(zz)", _tzname[0], _tzname[1])); #endif /* __CYGWIN__ */ #endif /* !HAVE_TZNAME || __GLIBC__ || __CYGWIN__*/ } static PyMethodDef time_methods[] = { {"time", time_time, METH_VARARGS, time_doc}, #ifdef HAVE_CLOCK {"clock", time_clock, METH_VARARGS, clock_doc}, #endif {"sleep", time_sleep, METH_VARARGS, sleep_doc}, {"gmtime", time_gmtime, METH_VARARGS, gmtime_doc}, {"localtime", time_localtime, METH_VARARGS, localtime_doc}, {"asctime", time_asctime, METH_VARARGS, asctime_doc}, {"ctime", time_ctime, METH_VARARGS, ctime_doc}, #ifdef HAVE_MKTIME {"mktime", time_mktime, METH_VARARGS, mktime_doc}, #endif #ifdef HAVE_STRFTIME {"strftime", time_strftime, METH_VARARGS, strftime_doc}, #endif {"strptime", time_strptime, METH_VARARGS, strptime_doc}, #ifdef HAVE_WORKING_TZSET {"tzset", time_tzset, METH_VARARGS, tzset_doc}, #endif {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(module_doc, "This module provides various functions to manipulate time values.\n\ \n\ There are two standard representations of time. One is the number\n\ of seconds since the Epoch, in UTC (a.k.a. GMT). It may be an integer\n\ or a floating point number (to represent fractions of seconds).\n\ The Epoch is system-defined; on Unix, it is generally January 1st, 1970.\n\ The actual value can be retrieved by calling gmtime(0).\n\ \n\ The other representation is a tuple of 9 integers giving local time.\n\ The tuple items are:\n\ year (four digits, e.g. 1998)\n\ month (1-12)\n\ day (1-31)\n\ hours (0-23)\n\ minutes (0-59)\n\ seconds (0-59)\n\ weekday (0-6, Monday is 0)\n\ Julian day (day in the year, 1-366)\n\ DST (Daylight Savings Time) flag (-1, 0 or 1)\n\ If the DST flag is 0, the time is given in the regular time zone;\n\ if it is 1, the time is given in the DST time zone;\n\ if it is -1, mktime() should guess based on the date and time.\n\ \n\ Variables:\n\ \n\ timezone -- difference in seconds between UTC and local standard time\n\ altzone -- difference in seconds between UTC and local DST time\n\ daylight -- whether local time should reflect DST\n\ tzname -- tuple of (standard time zone name, DST time zone name)\n\ \n\ Functions:\n\ \n\ time() -- return current time in seconds since the Epoch as a float\n\ clock() -- return CPU time since process start as a float\n\ sleep() -- delay for a number of seconds given as a float\n\ gmtime() -- convert seconds since Epoch to UTC tuple\n\ localtime() -- convert seconds since Epoch to local time tuple\n\ asctime() -- convert time tuple to string\n\ ctime() -- convert time in seconds to string\n\ mktime() -- convert local time tuple to seconds since Epoch\n\ strftime() -- convert time tuple to string according to format specification\n\ strptime() -- parse string to time tuple according to format specification\n\ tzset() -- change the local timezone"); PyMODINIT_FUNC inittime(void) { PyObject *m; char *p; m = Py_InitModule3("time", time_methods, module_doc); /* Accept 2-digit dates unless PYTHONY2K is set and non-empty */ p = Py_GETENV("PYTHONY2K"); PyModule_AddIntConstant(m, "accept2dyear", (long) (!p || !*p)); /* Squirrel away the module's dictionary for the y2k check */ moddict = PyModule_GetDict(m); Py_INCREF(moddict); /* Set, or reset, module variables like time.timezone */ inittimezone(m); #ifdef MS_WINDOWS /* Helper to allow interrupts for Windows. If Ctrl+C event delivered while not sleeping it will be ignored. */ main_thread = PyThread_get_thread_ident(); hInterruptEvent = CreateEvent(NULL, TRUE, FALSE, NULL); SetConsoleCtrlHandler( PyCtrlHandler, TRUE); #endif /* MS_WINDOWS */ PyStructSequence_InitType(&StructTimeType, &struct_time_type_desc); Py_INCREF(&StructTimeType); PyModule_AddObject(m, "struct_time", (PyObject*) &StructTimeType); } /* Implement floattime() for various platforms */ static double floattime(void) { /* There are three ways to get the time: (1) gettimeofday() -- resolution in microseconds (2) ftime() -- resolution in milliseconds (3) time() -- resolution in seconds In all cases the return value is a float in seconds. Since on some systems (e.g. SCO ODT 3.0) gettimeofday() may fail, so we fall back on ftime() or time(). Note: clock resolution does not imply clock accuracy! */ #ifdef HAVE_GETTIMEOFDAY { struct timeval t; #ifdef GETTIMEOFDAY_NO_TZ if (gettimeofday(&t) == 0) return (double)t.tv_sec + t.tv_usec*0.000001; #else /* !GETTIMEOFDAY_NO_TZ */ if (gettimeofday(&t, (struct timezone *)NULL) == 0) return (double)t.tv_sec + t.tv_usec*0.000001; #endif /* !GETTIMEOFDAY_NO_TZ */ } #endif /* !HAVE_GETTIMEOFDAY */ { #if defined(HAVE_FTIME) struct timeb t; ftime(&t); return (double)t.time + (double)t.millitm * (double)0.001; #else /* !HAVE_FTIME */ time_t secs; time(&secs); return (double)secs; #endif /* !HAVE_FTIME */ } } /* Implement floatsleep() for various platforms. When interrupted (or when another error occurs), return -1 and set an exception; else return 0. */ static int floatsleep(double secs) { /* XXX Should test for MS_WINDOWS first! */ #if defined(HAVE_SELECT) && !defined(__BEOS__) && !defined(__EMX__) struct timeval t; double frac; frac = fmod(secs, 1.0); secs = floor(secs); t.tv_sec = (long)secs; t.tv_usec = (long)(frac*1000000.0); Py_BEGIN_ALLOW_THREADS if (select(0, (fd_set *)0, (fd_set *)0, (fd_set *)0, &t) != 0) { #ifdef EINTR if (errno != EINTR) { #else if (1) { #endif Py_BLOCK_THREADS PyErr_SetFromErrno(PyExc_IOError); return -1; } } Py_END_ALLOW_THREADS #elif defined(macintosh) #define MacTicks (* (long *)0x16A) long deadline; deadline = MacTicks + (long)(secs * 60.0); while (MacTicks < deadline) { /* XXX Should call some yielding function here */ if (PyErr_CheckSignals()) return -1; } #elif defined(__WATCOMC__) && !defined(__QNX__) /* XXX Can't interrupt this sleep */ Py_BEGIN_ALLOW_THREADS delay((int)(secs * 1000 + 0.5)); /* delay() uses milliseconds */ Py_END_ALLOW_THREADS #elif defined(MS_WINDOWS) { double millisecs = secs * 1000.0; unsigned long ul_millis; if (millisecs > (double)ULONG_MAX) { PyErr_SetString(PyExc_OverflowError, "sleep length is too large"); return -1; } Py_BEGIN_ALLOW_THREADS /* Allow sleep(0) to maintain win32 semantics, and as decreed * by Guido, only the main thread can be interrupted. */ ul_millis = (unsigned long)millisecs; if (ul_millis == 0 || main_thread != PyThread_get_thread_ident()) Sleep(ul_millis); else { DWORD rc; ResetEvent(hInterruptEvent); rc = WaitForSingleObject(hInterruptEvent, ul_millis); if (rc == WAIT_OBJECT_0) { /* Yield to make sure real Python signal * handler called. */ Sleep(1); Py_BLOCK_THREADS errno = EINTR; PyErr_SetFromErrno(PyExc_IOError); return -1; } } Py_END_ALLOW_THREADS } #elif defined(PYOS_OS2) /* This Sleep *IS* Interruptable by Exceptions */ Py_BEGIN_ALLOW_THREADS if (DosSleep(secs * 1000) != NO_ERROR) { Py_BLOCK_THREADS PyErr_SetFromErrno(PyExc_IOError); return -1; } Py_END_ALLOW_THREADS #elif defined(__BEOS__) /* This sleep *CAN BE* interrupted. */ { if( secs <= 0.0 ) { return; } Py_BEGIN_ALLOW_THREADS /* BeOS snooze() is in microseconds... */ if( snooze( (bigtime_t)( secs * 1000.0 * 1000.0 ) ) == B_INTERRUPTED ) { Py_BLOCK_THREADS PyErr_SetFromErrno( PyExc_IOError ); return -1; } Py_END_ALLOW_THREADS } #elif defined(RISCOS) if (secs <= 0.0) return 0; Py_BEGIN_ALLOW_THREADS /* This sleep *CAN BE* interrupted. */ if ( riscos_sleep(secs) ) return -1; Py_END_ALLOW_THREADS #elif defined(PLAN9) { double millisecs = secs * 1000.0; if (millisecs > (double)LONG_MAX) { PyErr_SetString(PyExc_OverflowError, "sleep length is too large"); return -1; } /* This sleep *CAN BE* interrupted. */ Py_BEGIN_ALLOW_THREADS if(sleep((long)millisecs) < 0){ Py_BLOCK_THREADS PyErr_SetFromErrno(PyExc_IOError); return -1; } Py_END_ALLOW_THREADS } #else /* XXX Can't interrupt this sleep */ Py_BEGIN_ALLOW_THREADS sleep((int)secs); Py_END_ALLOW_THREADS #endif return 0; } Python-2.3.7/Modules/signalmodule.c0000644001241000117560000003662307634107045016527 0ustar loewishpifb6 /* Signal module -- many thanks to Lance Ellinghaus */ /* XXX Signals should be recorded per thread, now we have thread state. */ #include "Python.h" #include "intrcheck.h" #ifdef MS_WINDOWS #include #endif #include #ifndef SIG_ERR #define SIG_ERR ((PyOS_sighandler_t)(-1)) #endif #if defined(PYOS_OS2) && !defined(PYCC_GCC) #define NSIG 12 #include #endif #ifndef NSIG # if defined(_NSIG) # define NSIG _NSIG /* For BSD/SysV */ # elif defined(_SIGMAX) # define NSIG (_SIGMAX + 1) /* For QNX */ # elif defined(SIGMAX) # define NSIG (SIGMAX + 1) /* For djgpp */ # else # define NSIG 64 /* Use a reasonable default value */ # endif #endif /* NOTES ON THE INTERACTION BETWEEN SIGNALS AND THREADS When threads are supported, we want the following semantics: - only the main thread can set a signal handler - any thread can get a signal handler - signals are only delivered to the main thread I.e. we don't support "synchronous signals" like SIGFPE (catching this doesn't make much sense in Python anyway) nor do we support signals as a means of inter-thread communication, since not all thread implementations support that (at least our thread library doesn't). We still have the problem that in some implementations signals generated by the keyboard (e.g. SIGINT) are delivered to all threads (e.g. SGI), while in others (e.g. Solaris) such signals are delivered to one random thread (an intermediate possibility would be to deliver it to the main thread -- POSIX?). For now, we have a working implementation that works in all three cases -- the handler ignores signals if getpid() isn't the same as in the main thread. XXX This is a hack. GNU pth is a user-space threading library, and as such, all threads run within the same process. In this case, if the currently running thread is not the main_thread, send the signal to the main_thread. */ #ifdef WITH_THREAD #include /* For pid_t */ #include "pythread.h" static long main_thread; static pid_t main_pid; #endif static struct { int tripped; PyObject *func; } Handlers[NSIG]; static int is_tripped = 0; /* Speed up sigcheck() when none tripped */ static PyObject *DefaultHandler; static PyObject *IgnoreHandler; static PyObject *IntHandler; /* On Solaris 8, gcc will produce a warning that the function declaration is not a prototype. This is caused by the definition of SIG_DFL as (void (*)())0; the correct declaration would have been (void (*)(int))0. */ static PyOS_sighandler_t old_siginthandler = SIG_DFL; static PyObject * signal_default_int_handler(PyObject *self, PyObject *args) { PyErr_SetNone(PyExc_KeyboardInterrupt); return NULL; } PyDoc_STRVAR(default_int_handler_doc, "default_int_handler(...)\n\ \n\ The default handler for SIGINT instated by Python.\n\ It raises KeyboardInterrupt."); static int checksignals_witharg(void * unused) { return PyErr_CheckSignals(); } static void signal_handler(int sig_num) { #ifdef WITH_THREAD #ifdef WITH_PTH if (PyThread_get_thread_ident() != main_thread) { pth_raise(*(pth_t *) main_thread, sig_num); return; } #endif /* See NOTES section above */ if (getpid() == main_pid) { #endif is_tripped++; Handlers[sig_num].tripped = 1; Py_AddPendingCall(checksignals_witharg, NULL); #ifdef WITH_THREAD } #endif #ifdef SIGCHLD if (sig_num == SIGCHLD) { /* To avoid infinite recursion, this signal remains reset until explicit re-instated. Don't clear the 'func' field as it is our pointer to the Python handler... */ return; } #endif #ifdef HAVE_SIGINTERRUPT siginterrupt(sig_num, 1); #endif PyOS_setsig(sig_num, signal_handler); } #ifdef HAVE_ALARM static PyObject * signal_alarm(PyObject *self, PyObject *args) { int t; if (!PyArg_ParseTuple(args, "i:alarm", &t)) return NULL; /* alarm() returns the number of seconds remaining */ return PyInt_FromLong((long)alarm(t)); } PyDoc_STRVAR(alarm_doc, "alarm(seconds)\n\ \n\ Arrange for SIGALRM to arrive after the given number of seconds."); #endif #ifdef HAVE_PAUSE static PyObject * signal_pause(PyObject *self) { Py_BEGIN_ALLOW_THREADS (void)pause(); Py_END_ALLOW_THREADS /* make sure that any exceptions that got raised are propagated * back into Python */ if (PyErr_CheckSignals()) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(pause_doc, "pause()\n\ \n\ Wait until a signal arrives."); #endif static PyObject * signal_signal(PyObject *self, PyObject *args) { PyObject *obj; int sig_num; PyObject *old_handler; void (*func)(int); if (!PyArg_ParseTuple(args, "iO:signal", &sig_num, &obj)) return NULL; #ifdef WITH_THREAD if (PyThread_get_thread_ident() != main_thread) { PyErr_SetString(PyExc_ValueError, "signal only works in main thread"); return NULL; } #endif if (sig_num < 1 || sig_num >= NSIG) { PyErr_SetString(PyExc_ValueError, "signal number out of range"); return NULL; } if (obj == IgnoreHandler) func = SIG_IGN; else if (obj == DefaultHandler) func = SIG_DFL; else if (!PyCallable_Check(obj)) { PyErr_SetString(PyExc_TypeError, "signal handler must be signal.SIG_IGN, signal.SIG_DFL, or a callable object"); return NULL; } else func = signal_handler; #ifdef HAVE_SIGINTERRUPT siginterrupt(sig_num, 1); #endif if (PyOS_setsig(sig_num, func) == SIG_ERR) { PyErr_SetFromErrno(PyExc_RuntimeError); return NULL; } old_handler = Handlers[sig_num].func; Handlers[sig_num].tripped = 0; Py_INCREF(obj); Handlers[sig_num].func = obj; return old_handler; } PyDoc_STRVAR(signal_doc, "signal(sig, action) -> action\n\ \n\ Set the action for the given signal. The action can be SIG_DFL,\n\ SIG_IGN, or a callable Python object. The previous action is\n\ returned. See getsignal() for possible return values.\n\ \n\ *** IMPORTANT NOTICE ***\n\ A signal handler function is called with two arguments:\n\ the first is the signal number, the second is the interrupted stack frame."); static PyObject * signal_getsignal(PyObject *self, PyObject *args) { int sig_num; PyObject *old_handler; if (!PyArg_ParseTuple(args, "i:getsignal", &sig_num)) return NULL; if (sig_num < 1 || sig_num >= NSIG) { PyErr_SetString(PyExc_ValueError, "signal number out of range"); return NULL; } old_handler = Handlers[sig_num].func; Py_INCREF(old_handler); return old_handler; } PyDoc_STRVAR(getsignal_doc, "getsignal(sig) -> action\n\ \n\ Return the current action for the given signal. The return value can be:\n\ SIG_IGN -- if the signal is being ignored\n\ SIG_DFL -- if the default action for the signal is in effect\n\ None -- if an unknown handler is in effect\n\ anything else -- the callable Python object used as a handler"); /* List of functions defined in the module */ static PyMethodDef signal_methods[] = { #ifdef HAVE_ALARM {"alarm", signal_alarm, METH_VARARGS, alarm_doc}, #endif {"signal", signal_signal, METH_VARARGS, signal_doc}, {"getsignal", signal_getsignal, METH_VARARGS, getsignal_doc}, #ifdef HAVE_PAUSE {"pause", (PyCFunction)signal_pause, METH_NOARGS,pause_doc}, #endif {"default_int_handler", signal_default_int_handler, METH_VARARGS, default_int_handler_doc}, {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(module_doc, "This module provides mechanisms to use signal handlers in Python.\n\ \n\ Functions:\n\ \n\ alarm() -- cause SIGALRM after a specified time [Unix only]\n\ signal() -- set the action for a given signal\n\ getsignal() -- get the signal action for a given signal\n\ pause() -- wait until a signal arrives [Unix only]\n\ default_int_handler() -- default SIGINT handler\n\ \n\ Constants:\n\ \n\ SIG_DFL -- used to refer to the system default handler\n\ SIG_IGN -- used to ignore the signal\n\ NSIG -- number of defined signals\n\ \n\ SIGINT, SIGTERM, etc. -- signal numbers\n\ \n\ *** IMPORTANT NOTICE ***\n\ A signal handler function is called with two arguments:\n\ the first is the signal number, the second is the interrupted stack frame."); PyMODINIT_FUNC initsignal(void) { PyObject *m, *d, *x; int i; #ifdef WITH_THREAD main_thread = PyThread_get_thread_ident(); main_pid = getpid(); #endif /* Create the module and add the functions */ m = Py_InitModule3("signal", signal_methods, module_doc); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); x = DefaultHandler = PyLong_FromVoidPtr((void *)SIG_DFL); if (!x || PyDict_SetItemString(d, "SIG_DFL", x) < 0) goto finally; x = IgnoreHandler = PyLong_FromVoidPtr((void *)SIG_IGN); if (!x || PyDict_SetItemString(d, "SIG_IGN", x) < 0) goto finally; x = PyInt_FromLong((long)NSIG); if (!x || PyDict_SetItemString(d, "NSIG", x) < 0) goto finally; Py_DECREF(x); x = IntHandler = PyDict_GetItemString(d, "default_int_handler"); if (!x) goto finally; Py_INCREF(IntHandler); Handlers[0].tripped = 0; for (i = 1; i < NSIG; i++) { void (*t)(int); t = PyOS_getsig(i); Handlers[i].tripped = 0; if (t == SIG_DFL) Handlers[i].func = DefaultHandler; else if (t == SIG_IGN) Handlers[i].func = IgnoreHandler; else Handlers[i].func = Py_None; /* None of our business */ Py_INCREF(Handlers[i].func); } if (Handlers[SIGINT].func == DefaultHandler) { /* Install default int handler */ Py_INCREF(IntHandler); Py_DECREF(Handlers[SIGINT].func); Handlers[SIGINT].func = IntHandler; old_siginthandler = PyOS_setsig(SIGINT, signal_handler); } #ifdef SIGHUP x = PyInt_FromLong(SIGHUP); PyDict_SetItemString(d, "SIGHUP", x); Py_XDECREF(x); #endif #ifdef SIGINT x = PyInt_FromLong(SIGINT); PyDict_SetItemString(d, "SIGINT", x); Py_XDECREF(x); #endif #ifdef SIGBREAK x = PyInt_FromLong(SIGBREAK); PyDict_SetItemString(d, "SIGBREAK", x); Py_XDECREF(x); #endif #ifdef SIGQUIT x = PyInt_FromLong(SIGQUIT); PyDict_SetItemString(d, "SIGQUIT", x); Py_XDECREF(x); #endif #ifdef SIGILL x = PyInt_FromLong(SIGILL); PyDict_SetItemString(d, "SIGILL", x); Py_XDECREF(x); #endif #ifdef SIGTRAP x = PyInt_FromLong(SIGTRAP); PyDict_SetItemString(d, "SIGTRAP", x); Py_XDECREF(x); #endif #ifdef SIGIOT x = PyInt_FromLong(SIGIOT); PyDict_SetItemString(d, "SIGIOT", x); Py_XDECREF(x); #endif #ifdef SIGABRT x = PyInt_FromLong(SIGABRT); PyDict_SetItemString(d, "SIGABRT", x); Py_XDECREF(x); #endif #ifdef SIGEMT x = PyInt_FromLong(SIGEMT); PyDict_SetItemString(d, "SIGEMT", x); Py_XDECREF(x); #endif #ifdef SIGFPE x = PyInt_FromLong(SIGFPE); PyDict_SetItemString(d, "SIGFPE", x); Py_XDECREF(x); #endif #ifdef SIGKILL x = PyInt_FromLong(SIGKILL); PyDict_SetItemString(d, "SIGKILL", x); Py_XDECREF(x); #endif #ifdef SIGBUS x = PyInt_FromLong(SIGBUS); PyDict_SetItemString(d, "SIGBUS", x); Py_XDECREF(x); #endif #ifdef SIGSEGV x = PyInt_FromLong(SIGSEGV); PyDict_SetItemString(d, "SIGSEGV", x); Py_XDECREF(x); #endif #ifdef SIGSYS x = PyInt_FromLong(SIGSYS); PyDict_SetItemString(d, "SIGSYS", x); Py_XDECREF(x); #endif #ifdef SIGPIPE x = PyInt_FromLong(SIGPIPE); PyDict_SetItemString(d, "SIGPIPE", x); Py_XDECREF(x); #endif #ifdef SIGALRM x = PyInt_FromLong(SIGALRM); PyDict_SetItemString(d, "SIGALRM", x); Py_XDECREF(x); #endif #ifdef SIGTERM x = PyInt_FromLong(SIGTERM); PyDict_SetItemString(d, "SIGTERM", x); Py_XDECREF(x); #endif #ifdef SIGUSR1 x = PyInt_FromLong(SIGUSR1); PyDict_SetItemString(d, "SIGUSR1", x); Py_XDECREF(x); #endif #ifdef SIGUSR2 x = PyInt_FromLong(SIGUSR2); PyDict_SetItemString(d, "SIGUSR2", x); Py_XDECREF(x); #endif #ifdef SIGCLD x = PyInt_FromLong(SIGCLD); PyDict_SetItemString(d, "SIGCLD", x); Py_XDECREF(x); #endif #ifdef SIGCHLD x = PyInt_FromLong(SIGCHLD); PyDict_SetItemString(d, "SIGCHLD", x); Py_XDECREF(x); #endif #ifdef SIGPWR x = PyInt_FromLong(SIGPWR); PyDict_SetItemString(d, "SIGPWR", x); Py_XDECREF(x); #endif #ifdef SIGIO x = PyInt_FromLong(SIGIO); PyDict_SetItemString(d, "SIGIO", x); Py_XDECREF(x); #endif #ifdef SIGURG x = PyInt_FromLong(SIGURG); PyDict_SetItemString(d, "SIGURG", x); Py_XDECREF(x); #endif #ifdef SIGWINCH x = PyInt_FromLong(SIGWINCH); PyDict_SetItemString(d, "SIGWINCH", x); Py_XDECREF(x); #endif #ifdef SIGPOLL x = PyInt_FromLong(SIGPOLL); PyDict_SetItemString(d, "SIGPOLL", x); Py_XDECREF(x); #endif #ifdef SIGSTOP x = PyInt_FromLong(SIGSTOP); PyDict_SetItemString(d, "SIGSTOP", x); Py_XDECREF(x); #endif #ifdef SIGTSTP x = PyInt_FromLong(SIGTSTP); PyDict_SetItemString(d, "SIGTSTP", x); Py_XDECREF(x); #endif #ifdef SIGCONT x = PyInt_FromLong(SIGCONT); PyDict_SetItemString(d, "SIGCONT", x); Py_XDECREF(x); #endif #ifdef SIGTTIN x = PyInt_FromLong(SIGTTIN); PyDict_SetItemString(d, "SIGTTIN", x); Py_XDECREF(x); #endif #ifdef SIGTTOU x = PyInt_FromLong(SIGTTOU); PyDict_SetItemString(d, "SIGTTOU", x); Py_XDECREF(x); #endif #ifdef SIGVTALRM x = PyInt_FromLong(SIGVTALRM); PyDict_SetItemString(d, "SIGVTALRM", x); Py_XDECREF(x); #endif #ifdef SIGPROF x = PyInt_FromLong(SIGPROF); PyDict_SetItemString(d, "SIGPROF", x); Py_XDECREF(x); #endif #ifdef SIGXCPU x = PyInt_FromLong(SIGXCPU); PyDict_SetItemString(d, "SIGXCPU", x); Py_XDECREF(x); #endif #ifdef SIGXFSZ x = PyInt_FromLong(SIGXFSZ); PyDict_SetItemString(d, "SIGXFSZ", x); Py_XDECREF(x); #endif #ifdef SIGINFO x = PyInt_FromLong(SIGINFO); PyDict_SetItemString(d, "SIGINFO", x); Py_XDECREF(x); #endif if (!PyErr_Occurred()) return; /* Check for errors */ finally: return; } static void finisignal(void) { int i; PyObject *func; PyOS_setsig(SIGINT, old_siginthandler); old_siginthandler = SIG_DFL; for (i = 1; i < NSIG; i++) { func = Handlers[i].func; Handlers[i].tripped = 0; Handlers[i].func = NULL; if (i != SIGINT && func != NULL && func != Py_None && func != DefaultHandler && func != IgnoreHandler) PyOS_setsig(i, SIG_DFL); Py_XDECREF(func); } Py_XDECREF(IntHandler); IntHandler = NULL; Py_XDECREF(DefaultHandler); DefaultHandler = NULL; Py_XDECREF(IgnoreHandler); IgnoreHandler = NULL; } /* Declared in pyerrors.h */ int PyErr_CheckSignals(void) { int i; PyObject *f; if (!is_tripped) return 0; #ifdef WITH_THREAD if (PyThread_get_thread_ident() != main_thread) return 0; #endif if (!(f = (PyObject *)PyEval_GetFrame())) f = Py_None; for (i = 1; i < NSIG; i++) { if (Handlers[i].tripped) { PyObject *result = NULL; PyObject *arglist = Py_BuildValue("(iO)", i, f); Handlers[i].tripped = 0; if (arglist) { result = PyEval_CallObject(Handlers[i].func, arglist); Py_DECREF(arglist); } if (!result) return -1; Py_DECREF(result); } } is_tripped = 0; return 0; } /* Replacements for intrcheck.c functionality * Declared in pyerrors.h */ void PyErr_SetInterrupt(void) { is_tripped++; Handlers[SIGINT].tripped = 1; Py_AddPendingCall((int (*)(void *))PyErr_CheckSignals, NULL); } void PyOS_InitInterrupts(void) { initsignal(); _PyImport_FixupExtension("signal", "signal"); } void PyOS_FiniInterrupts(void) { finisignal(); } int PyOS_InterruptOccurred(void) { if (Handlers[SIGINT].tripped) { #ifdef WITH_THREAD if (PyThread_get_thread_ident() != main_thread) return 0; #endif Handlers[SIGINT].tripped = 0; return 1; } return 0; } void PyOS_AfterFork(void) { #ifdef WITH_THREAD PyEval_ReInitThreads(); main_thread = PyThread_get_thread_ident(); main_pid = getpid(); #endif } Python-2.3.7/Modules/bz2module.c0000644001241000117560000015025207700365731015744 0ustar loewishpifb6/* python-bz2 - python bz2 library interface Copyright (c) 2002 Gustavo Niemeyer Copyright (c) 2002 Python Software Foundation; All Rights Reserved */ #include "Python.h" #include #include #include "structmember.h" #ifdef WITH_THREAD #include "pythread.h" #endif static char __author__[] = "The bz2 python module was written by:\n\ \n\ Gustavo Niemeyer \n\ "; #define BUF(v) PyString_AS_STRING((PyStringObject *)v) #define MODE_CLOSED 0 #define MODE_READ 1 #define MODE_READ_EOF 2 #define MODE_WRITE 3 #define BZ2FileObject_Check(v) ((v)->ob_type == &BZ2File_Type) #ifdef BZ_CONFIG_ERROR #if SIZEOF_LONG >= 8 #define BZS_TOTAL_OUT(bzs) \ (((long)bzs->total_out_hi32 << 32) + bzs->total_out_lo32) #elif SIZEOF_LONG_LONG >= 8 #define BZS_TOTAL_OUT(bzs) \ (((PY_LONG_LONG)bzs->total_out_hi32 << 32) + bzs->total_out_lo32) #else #define BZS_TOTAL_OUT(bzs) \ bzs->total_out_lo32; #endif #else /* ! BZ_CONFIG_ERROR */ #define BZ2_bzRead bzRead #define BZ2_bzReadOpen bzReadOpen #define BZ2_bzReadClose bzReadClose #define BZ2_bzWrite bzWrite #define BZ2_bzWriteOpen bzWriteOpen #define BZ2_bzWriteClose bzWriteClose #define BZ2_bzCompress bzCompress #define BZ2_bzCompressInit bzCompressInit #define BZ2_bzCompressEnd bzCompressEnd #define BZ2_bzDecompress bzDecompress #define BZ2_bzDecompressInit bzDecompressInit #define BZ2_bzDecompressEnd bzDecompressEnd #define BZS_TOTAL_OUT(bzs) bzs->total_out #endif /* ! BZ_CONFIG_ERROR */ #ifdef WITH_THREAD #define ACQUIRE_LOCK(obj) PyThread_acquire_lock(obj->lock, 1) #define RELEASE_LOCK(obj) PyThread_release_lock(obj->lock) #else #define ACQUIRE_LOCK(obj) #define RELEASE_LOCK(obj) #endif #ifdef WITH_UNIVERSAL_NEWLINES /* Bits in f_newlinetypes */ #define NEWLINE_UNKNOWN 0 /* No newline seen, yet */ #define NEWLINE_CR 1 /* \r newline seen */ #define NEWLINE_LF 2 /* \n newline seen */ #define NEWLINE_CRLF 4 /* \r\n newline seen */ #endif /* ===================================================================== */ /* Structure definitions. */ typedef struct { PyObject_HEAD PyObject *file; char* f_buf; /* Allocated readahead buffer */ char* f_bufend; /* Points after last occupied position */ char* f_bufptr; /* Current buffer position */ int f_softspace; /* Flag used by 'print' command */ #ifdef WITH_UNIVERSAL_NEWLINES int f_univ_newline; /* Handle any newline convention */ int f_newlinetypes; /* Types of newlines seen */ int f_skipnextlf; /* Skip next \n */ #endif BZFILE *fp; int mode; long pos; long size; #ifdef WITH_THREAD PyThread_type_lock lock; #endif } BZ2FileObject; typedef struct { PyObject_HEAD bz_stream bzs; int running; #ifdef WITH_THREAD PyThread_type_lock lock; #endif } BZ2CompObject; typedef struct { PyObject_HEAD bz_stream bzs; int running; PyObject *unused_data; #ifdef WITH_THREAD PyThread_type_lock lock; #endif } BZ2DecompObject; /* ===================================================================== */ /* Utility functions. */ static int Util_CatchBZ2Error(int bzerror) { int ret = 0; switch(bzerror) { case BZ_OK: case BZ_STREAM_END: break; #ifdef BZ_CONFIG_ERROR case BZ_CONFIG_ERROR: PyErr_SetString(PyExc_SystemError, "the bz2 library was not compiled " "correctly"); ret = 1; break; #endif case BZ_PARAM_ERROR: PyErr_SetString(PyExc_ValueError, "the bz2 library has received wrong " "parameters"); ret = 1; break; case BZ_MEM_ERROR: PyErr_NoMemory(); ret = 1; break; case BZ_DATA_ERROR: case BZ_DATA_ERROR_MAGIC: PyErr_SetString(PyExc_IOError, "invalid data stream"); ret = 1; break; case BZ_IO_ERROR: PyErr_SetString(PyExc_IOError, "unknown IO error"); ret = 1; break; case BZ_UNEXPECTED_EOF: PyErr_SetString(PyExc_EOFError, "compressed file ended before the " "logical end-of-stream was detected"); ret = 1; break; case BZ_SEQUENCE_ERROR: PyErr_SetString(PyExc_RuntimeError, "wrong sequence of bz2 library " "commands used"); ret = 1; break; } return ret; } #if BUFSIZ < 8192 #define SMALLCHUNK 8192 #else #define SMALLCHUNK BUFSIZ #endif #if SIZEOF_INT < 4 #define BIGCHUNK (512 * 32) #else #define BIGCHUNK (512 * 1024) #endif /* This is a hacked version of Python's fileobject.c:new_buffersize(). */ static size_t Util_NewBufferSize(size_t currentsize) { if (currentsize > SMALLCHUNK) { /* Keep doubling until we reach BIGCHUNK; then keep adding BIGCHUNK. */ if (currentsize <= BIGCHUNK) return currentsize + currentsize; else return currentsize + BIGCHUNK; } return currentsize + SMALLCHUNK; } /* This is a hacked version of Python's fileobject.c:get_line(). */ static PyObject * Util_GetLine(BZ2FileObject *f, int n) { char c; char *buf, *end; size_t total_v_size; /* total # of slots in buffer */ size_t used_v_size; /* # used slots in buffer */ size_t increment; /* amount to increment the buffer */ PyObject *v; int bzerror; #ifdef WITH_UNIVERSAL_NEWLINES int newlinetypes = f->f_newlinetypes; int skipnextlf = f->f_skipnextlf; int univ_newline = f->f_univ_newline; #endif total_v_size = n > 0 ? n : 100; v = PyString_FromStringAndSize((char *)NULL, total_v_size); if (v == NULL) return NULL; buf = BUF(v); end = buf + total_v_size; for (;;) { Py_BEGIN_ALLOW_THREADS #ifdef WITH_UNIVERSAL_NEWLINES if (univ_newline) { while (1) { BZ2_bzRead(&bzerror, f->fp, &c, 1); f->pos++; if (bzerror != BZ_OK || buf == end) break; if (skipnextlf) { skipnextlf = 0; if (c == '\n') { /* Seeing a \n here with * skipnextlf true means we * saw a \r before. */ newlinetypes |= NEWLINE_CRLF; BZ2_bzRead(&bzerror, f->fp, &c, 1); if (bzerror != BZ_OK) break; } else { newlinetypes |= NEWLINE_CR; } } if (c == '\r') { skipnextlf = 1; c = '\n'; } else if ( c == '\n') newlinetypes |= NEWLINE_LF; *buf++ = c; if (c == '\n') break; } if (bzerror == BZ_STREAM_END && skipnextlf) newlinetypes |= NEWLINE_CR; } else /* If not universal newlines use the normal loop */ #endif do { BZ2_bzRead(&bzerror, f->fp, &c, 1); f->pos++; *buf++ = c; } while (bzerror == BZ_OK && c != '\n' && buf != end); Py_END_ALLOW_THREADS #ifdef WITH_UNIVERSAL_NEWLINES f->f_newlinetypes = newlinetypes; f->f_skipnextlf = skipnextlf; #endif if (bzerror == BZ_STREAM_END) { f->size = f->pos; f->mode = MODE_READ_EOF; break; } else if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); Py_DECREF(v); return NULL; } if (c == '\n') break; /* Must be because buf == end */ if (n > 0) break; used_v_size = total_v_size; increment = total_v_size >> 2; /* mild exponential growth */ total_v_size += increment; if (total_v_size > INT_MAX) { PyErr_SetString(PyExc_OverflowError, "line is longer than a Python string can hold"); Py_DECREF(v); return NULL; } if (_PyString_Resize(&v, total_v_size) < 0) return NULL; buf = BUF(v) + used_v_size; end = BUF(v) + total_v_size; } used_v_size = buf - BUF(v); if (used_v_size != total_v_size) _PyString_Resize(&v, used_v_size); return v; } #ifndef WITH_UNIVERSAL_NEWLINES #define Util_UnivNewlineRead(a,b,c,d,e) BZ2_bzRead(a,b,c,d) #else /* This is a hacked version of Python's * fileobject.c:Py_UniversalNewlineFread(). */ size_t Util_UnivNewlineRead(int *bzerror, BZFILE *stream, char* buf, size_t n, BZ2FileObject *f) { char *dst = buf; int newlinetypes, skipnextlf; assert(buf != NULL); assert(stream != NULL); if (!f->f_univ_newline) return BZ2_bzRead(bzerror, stream, buf, n); newlinetypes = f->f_newlinetypes; skipnextlf = f->f_skipnextlf; /* Invariant: n is the number of bytes remaining to be filled * in the buffer. */ while (n) { size_t nread; int shortread; char *src = dst; nread = BZ2_bzRead(bzerror, stream, dst, n); assert(nread <= n); n -= nread; /* assuming 1 byte out for each in; will adjust */ shortread = n != 0; /* true iff EOF or error */ while (nread--) { char c = *src++; if (c == '\r') { /* Save as LF and set flag to skip next LF. */ *dst++ = '\n'; skipnextlf = 1; } else if (skipnextlf && c == '\n') { /* Skip LF, and remember we saw CR LF. */ skipnextlf = 0; newlinetypes |= NEWLINE_CRLF; ++n; } else { /* Normal char to be stored in buffer. Also * update the newlinetypes flag if either this * is an LF or the previous char was a CR. */ if (c == '\n') newlinetypes |= NEWLINE_LF; else if (skipnextlf) newlinetypes |= NEWLINE_CR; *dst++ = c; skipnextlf = 0; } } if (shortread) { /* If this is EOF, update type flags. */ if (skipnextlf && *bzerror == BZ_STREAM_END) newlinetypes |= NEWLINE_CR; break; } } f->f_newlinetypes = newlinetypes; f->f_skipnextlf = skipnextlf; return dst - buf; } #endif /* This is a hacked version of Python's fileobject.c:drop_readahead(). */ static void Util_DropReadAhead(BZ2FileObject *f) { if (f->f_buf != NULL) { PyMem_Free(f->f_buf); f->f_buf = NULL; } } /* This is a hacked version of Python's fileobject.c:readahead(). */ static int Util_ReadAhead(BZ2FileObject *f, int bufsize) { int chunksize; int bzerror; if (f->f_buf != NULL) { if((f->f_bufend - f->f_bufptr) >= 1) return 0; else Util_DropReadAhead(f); } if (f->mode == MODE_READ_EOF) { return -1; } if ((f->f_buf = PyMem_Malloc(bufsize)) == NULL) { return -1; } Py_BEGIN_ALLOW_THREADS chunksize = Util_UnivNewlineRead(&bzerror, f->fp, f->f_buf, bufsize, f); Py_END_ALLOW_THREADS f->pos += chunksize; if (bzerror == BZ_STREAM_END) { f->size = f->pos; f->mode = MODE_READ_EOF; } else if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); Util_DropReadAhead(f); return -1; } f->f_bufptr = f->f_buf; f->f_bufend = f->f_buf + chunksize; return 0; } /* This is a hacked version of Python's * fileobject.c:readahead_get_line_skip(). */ static PyStringObject * Util_ReadAheadGetLineSkip(BZ2FileObject *f, int skip, int bufsize) { PyStringObject* s; char *bufptr; char *buf; int len; if (f->f_buf == NULL) if (Util_ReadAhead(f, bufsize) < 0) return NULL; len = f->f_bufend - f->f_bufptr; if (len == 0) return (PyStringObject *) PyString_FromStringAndSize(NULL, skip); bufptr = memchr(f->f_bufptr, '\n', len); if (bufptr != NULL) { bufptr++; /* Count the '\n' */ len = bufptr - f->f_bufptr; s = (PyStringObject *) PyString_FromStringAndSize(NULL, skip+len); if (s == NULL) return NULL; memcpy(PyString_AS_STRING(s)+skip, f->f_bufptr, len); f->f_bufptr = bufptr; if (bufptr == f->f_bufend) Util_DropReadAhead(f); } else { bufptr = f->f_bufptr; buf = f->f_buf; f->f_buf = NULL; /* Force new readahead buffer */ s = Util_ReadAheadGetLineSkip(f, skip+len, bufsize + (bufsize>>2)); if (s == NULL) { PyMem_Free(buf); return NULL; } memcpy(PyString_AS_STRING(s)+skip, bufptr, len); PyMem_Free(buf); } return s; } /* ===================================================================== */ /* Methods of BZ2File. */ PyDoc_STRVAR(BZ2File_read__doc__, "read([size]) -> string\n\ \n\ Read at most size uncompressed bytes, returned as a string. If the size\n\ argument is negative or omitted, read until EOF is reached.\n\ "); /* This is a hacked version of Python's fileobject.c:file_read(). */ static PyObject * BZ2File_read(BZ2FileObject *self, PyObject *args) { long bytesrequested = -1; size_t bytesread, buffersize, chunksize; int bzerror; PyObject *ret = NULL; if (!PyArg_ParseTuple(args, "|l:read", &bytesrequested)) return NULL; ACQUIRE_LOCK(self); switch (self->mode) { case MODE_READ: break; case MODE_READ_EOF: ret = PyString_FromString(""); goto cleanup; case MODE_CLOSED: PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto cleanup; default: PyErr_SetString(PyExc_IOError, "file is not ready for reading"); goto cleanup; } if (bytesrequested < 0) buffersize = Util_NewBufferSize((size_t)0); else buffersize = bytesrequested; if (buffersize > INT_MAX) { PyErr_SetString(PyExc_OverflowError, "requested number of bytes is " "more than a Python string can hold"); goto cleanup; } ret = PyString_FromStringAndSize((char *)NULL, buffersize); if (ret == NULL) goto cleanup; bytesread = 0; for (;;) { Py_BEGIN_ALLOW_THREADS chunksize = Util_UnivNewlineRead(&bzerror, self->fp, BUF(ret)+bytesread, buffersize-bytesread, self); self->pos += chunksize; Py_END_ALLOW_THREADS bytesread += chunksize; if (bzerror == BZ_STREAM_END) { self->size = self->pos; self->mode = MODE_READ_EOF; break; } else if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); Py_DECREF(ret); ret = NULL; goto cleanup; } if (bytesrequested < 0) { buffersize = Util_NewBufferSize(buffersize); if (_PyString_Resize(&ret, buffersize) < 0) goto cleanup; } else { break; } } if (bytesread != buffersize) _PyString_Resize(&ret, bytesread); cleanup: RELEASE_LOCK(self); return ret; } PyDoc_STRVAR(BZ2File_readline__doc__, "readline([size]) -> string\n\ \n\ Return the next line from the file, as a string, retaining newline.\n\ A non-negative size argument will limit the maximum number of bytes to\n\ return (an incomplete line may be returned then). Return an empty\n\ string at EOF.\n\ "); static PyObject * BZ2File_readline(BZ2FileObject *self, PyObject *args) { PyObject *ret = NULL; int sizehint = -1; if (!PyArg_ParseTuple(args, "|i:readline", &sizehint)) return NULL; ACQUIRE_LOCK(self); switch (self->mode) { case MODE_READ: break; case MODE_READ_EOF: ret = PyString_FromString(""); goto cleanup; case MODE_CLOSED: PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto cleanup; default: PyErr_SetString(PyExc_IOError, "file is not ready for reading"); goto cleanup; } if (sizehint == 0) ret = PyString_FromString(""); else ret = Util_GetLine(self, (sizehint < 0) ? 0 : sizehint); cleanup: RELEASE_LOCK(self); return ret; } PyDoc_STRVAR(BZ2File_readlines__doc__, "readlines([size]) -> list\n\ \n\ Call readline() repeatedly and return a list of lines read.\n\ The optional size argument, if given, is an approximate bound on the\n\ total number of bytes in the lines returned.\n\ "); /* This is a hacked version of Python's fileobject.c:file_readlines(). */ static PyObject * BZ2File_readlines(BZ2FileObject *self, PyObject *args) { long sizehint = 0; PyObject *list = NULL; PyObject *line; char small_buffer[SMALLCHUNK]; char *buffer = small_buffer; size_t buffersize = SMALLCHUNK; PyObject *big_buffer = NULL; size_t nfilled = 0; size_t nread; size_t totalread = 0; char *p, *q, *end; int err; int shortread = 0; int bzerror; if (!PyArg_ParseTuple(args, "|l:readlines", &sizehint)) return NULL; ACQUIRE_LOCK(self); switch (self->mode) { case MODE_READ: break; case MODE_READ_EOF: list = PyList_New(0); goto cleanup; case MODE_CLOSED: PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto cleanup; default: PyErr_SetString(PyExc_IOError, "file is not ready for reading"); goto cleanup; } if ((list = PyList_New(0)) == NULL) goto cleanup; for (;;) { Py_BEGIN_ALLOW_THREADS nread = Util_UnivNewlineRead(&bzerror, self->fp, buffer+nfilled, buffersize-nfilled, self); self->pos += nread; Py_END_ALLOW_THREADS if (bzerror == BZ_STREAM_END) { self->size = self->pos; self->mode = MODE_READ_EOF; if (nread == 0) { sizehint = 0; break; } shortread = 1; } else if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); error: Py_DECREF(list); list = NULL; goto cleanup; } totalread += nread; p = memchr(buffer+nfilled, '\n', nread); if (p == NULL) { /* Need a larger buffer to fit this line */ nfilled += nread; buffersize *= 2; if (buffersize > INT_MAX) { PyErr_SetString(PyExc_OverflowError, "line is longer than a Python string can hold"); goto error; } if (big_buffer == NULL) { /* Create the big buffer */ big_buffer = PyString_FromStringAndSize( NULL, buffersize); if (big_buffer == NULL) goto error; buffer = PyString_AS_STRING(big_buffer); memcpy(buffer, small_buffer, nfilled); } else { /* Grow the big buffer */ _PyString_Resize(&big_buffer, buffersize); buffer = PyString_AS_STRING(big_buffer); } continue; } end = buffer+nfilled+nread; q = buffer; do { /* Process complete lines */ p++; line = PyString_FromStringAndSize(q, p-q); if (line == NULL) goto error; err = PyList_Append(list, line); Py_DECREF(line); if (err != 0) goto error; q = p; p = memchr(q, '\n', end-q); } while (p != NULL); /* Move the remaining incomplete line to the start */ nfilled = end-q; memmove(buffer, q, nfilled); if (sizehint > 0) if (totalread >= (size_t)sizehint) break; if (shortread) { sizehint = 0; break; } } if (nfilled != 0) { /* Partial last line */ line = PyString_FromStringAndSize(buffer, nfilled); if (line == NULL) goto error; if (sizehint > 0) { /* Need to complete the last line */ PyObject *rest = Util_GetLine(self, 0); if (rest == NULL) { Py_DECREF(line); goto error; } PyString_Concat(&line, rest); Py_DECREF(rest); if (line == NULL) goto error; } err = PyList_Append(list, line); Py_DECREF(line); if (err != 0) goto error; } cleanup: RELEASE_LOCK(self); if (big_buffer) { Py_DECREF(big_buffer); } return list; } PyDoc_STRVAR(BZ2File_xreadlines__doc__, "xreadlines() -> self\n\ \n\ For backward compatibility. BZ2File objects now include the performance\n\ optimizations previously implemented in the xreadlines module.\n\ "); PyDoc_STRVAR(BZ2File_write__doc__, "write(data) -> None\n\ \n\ Write the 'data' string to file. Note that due to buffering, close() may\n\ be needed before the file on disk reflects the data written.\n\ "); /* This is a hacked version of Python's fileobject.c:file_write(). */ static PyObject * BZ2File_write(BZ2FileObject *self, PyObject *args) { PyObject *ret = NULL; char *buf; int len; int bzerror; if (!PyArg_ParseTuple(args, "s#", &buf, &len)) return NULL; ACQUIRE_LOCK(self); switch (self->mode) { case MODE_WRITE: break; case MODE_CLOSED: PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto cleanup;; default: PyErr_SetString(PyExc_IOError, "file is not ready for writing"); goto cleanup;; } self->f_softspace = 0; Py_BEGIN_ALLOW_THREADS BZ2_bzWrite (&bzerror, self->fp, buf, len); self->pos += len; Py_END_ALLOW_THREADS if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto cleanup; } Py_INCREF(Py_None); ret = Py_None; cleanup: RELEASE_LOCK(self); return ret; } PyDoc_STRVAR(BZ2File_writelines__doc__, "writelines(sequence_of_strings) -> None\n\ \n\ Write the sequence of strings to the file. Note that newlines are not\n\ added. The sequence can be any iterable object producing strings. This is\n\ equivalent to calling write() for each string.\n\ "); /* This is a hacked version of Python's fileobject.c:file_writelines(). */ static PyObject * BZ2File_writelines(BZ2FileObject *self, PyObject *seq) { #define CHUNKSIZE 1000 PyObject *list = NULL; PyObject *iter = NULL; PyObject *ret = NULL; PyObject *line; int i, j, index, len, islist; int bzerror; ACQUIRE_LOCK(self); islist = PyList_Check(seq); if (!islist) { iter = PyObject_GetIter(seq); if (iter == NULL) { PyErr_SetString(PyExc_TypeError, "writelines() requires an iterable argument"); goto error; } list = PyList_New(CHUNKSIZE); if (list == NULL) goto error; } /* Strategy: slurp CHUNKSIZE lines into a private list, checking that they are all strings, then write that list without holding the interpreter lock, then come back for more. */ for (index = 0; ; index += CHUNKSIZE) { if (islist) { Py_XDECREF(list); list = PyList_GetSlice(seq, index, index+CHUNKSIZE); if (list == NULL) goto error; j = PyList_GET_SIZE(list); } else { for (j = 0; j < CHUNKSIZE; j++) { line = PyIter_Next(iter); if (line == NULL) { if (PyErr_Occurred()) goto error; break; } PyList_SetItem(list, j, line); } } if (j == 0) break; /* Check that all entries are indeed strings. If not, apply the same rules as for file.write() and convert the rets to strings. This is slow, but seems to be the only way since all conversion APIs could potentially execute Python code. */ for (i = 0; i < j; i++) { PyObject *v = PyList_GET_ITEM(list, i); if (!PyString_Check(v)) { const char *buffer; int len; if (PyObject_AsCharBuffer(v, &buffer, &len)) { PyErr_SetString(PyExc_TypeError, "writelines() " "argument must be " "a sequence of " "strings"); goto error; } line = PyString_FromStringAndSize(buffer, len); if (line == NULL) goto error; Py_DECREF(v); PyList_SET_ITEM(list, i, line); } } self->f_softspace = 0; /* Since we are releasing the global lock, the following code may *not* execute Python code. */ Py_BEGIN_ALLOW_THREADS for (i = 0; i < j; i++) { line = PyList_GET_ITEM(list, i); len = PyString_GET_SIZE(line); BZ2_bzWrite (&bzerror, self->fp, PyString_AS_STRING(line), len); if (bzerror != BZ_OK) { Py_BLOCK_THREADS Util_CatchBZ2Error(bzerror); goto error; } } Py_END_ALLOW_THREADS if (j < CHUNKSIZE) break; } Py_INCREF(Py_None); ret = Py_None; error: RELEASE_LOCK(self); Py_XDECREF(list); Py_XDECREF(iter); return ret; #undef CHUNKSIZE } PyDoc_STRVAR(BZ2File_seek__doc__, "seek(offset [, whence]) -> None\n\ \n\ Move to new file position. Argument offset is a byte count. Optional\n\ argument whence defaults to 0 (offset from start of file, offset\n\ should be >= 0); other values are 1 (move relative to current position,\n\ positive or negative), and 2 (move relative to end of file, usually\n\ negative, although many platforms allow seeking beyond the end of a file).\n\ \n\ Note that seeking of bz2 files is emulated, and depending on the parameters\n\ the operation may be extremely slow.\n\ "); static PyObject * BZ2File_seek(BZ2FileObject *self, PyObject *args) { int where = 0; long offset; char small_buffer[SMALLCHUNK]; char *buffer = small_buffer; size_t buffersize = SMALLCHUNK; int bytesread = 0; int readsize; int chunksize; int bzerror; int rewind = 0; PyObject *ret = NULL; if (!PyArg_ParseTuple(args, "l|i:seek", &offset, &where)) return NULL; ACQUIRE_LOCK(self); Util_DropReadAhead(self); switch (self->mode) { case MODE_READ: case MODE_READ_EOF: break; case MODE_CLOSED: PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto cleanup;; default: PyErr_SetString(PyExc_IOError, "seek works only while reading"); goto cleanup;; } if (offset < 0) { if (where == 1) { offset = self->pos + offset; rewind = 1; } else if (where == 2) { if (self->size == -1) { assert(self->mode != MODE_READ_EOF); for (;;) { Py_BEGIN_ALLOW_THREADS chunksize = Util_UnivNewlineRead( &bzerror, self->fp, buffer, buffersize, self); self->pos += chunksize; Py_END_ALLOW_THREADS bytesread += chunksize; if (bzerror == BZ_STREAM_END) { break; } else if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto cleanup; } } self->mode = MODE_READ_EOF; self->size = self->pos; bytesread = 0; } offset = self->size + offset; if (offset >= self->pos) offset -= self->pos; else rewind = 1; } if (offset < 0) offset = 0; } else if (where == 0) { if (offset >= self->pos) offset -= self->pos; else rewind = 1; } if (rewind) { BZ2_bzReadClose(&bzerror, self->fp); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto cleanup; } ret = PyObject_CallMethod(self->file, "seek", "(i)", 0); if (!ret) goto cleanup; Py_DECREF(ret); ret = NULL; self->pos = 0; self->fp = BZ2_bzReadOpen(&bzerror, PyFile_AsFile(self->file), 0, 0, NULL, 0); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto cleanup; } self->mode = MODE_READ; } else if (self->mode == MODE_READ_EOF) { goto exit; } if (offset == 0) goto exit; /* Before getting here, offset must be set to the number of bytes * to walk forward. */ for (;;) { if ((size_t)offset-bytesread > buffersize) readsize = buffersize; else readsize = offset-bytesread; Py_BEGIN_ALLOW_THREADS chunksize = Util_UnivNewlineRead(&bzerror, self->fp, buffer, readsize, self); self->pos += chunksize; Py_END_ALLOW_THREADS bytesread += chunksize; if (bzerror == BZ_STREAM_END) { self->size = self->pos; self->mode = MODE_READ_EOF; break; } else if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto cleanup; } if (bytesread == offset) break; } exit: Py_INCREF(Py_None); ret = Py_None; cleanup: RELEASE_LOCK(self); return ret; } PyDoc_STRVAR(BZ2File_tell__doc__, "tell() -> int\n\ \n\ Return the current file position, an integer (may be a long integer).\n\ "); static PyObject * BZ2File_tell(BZ2FileObject *self, PyObject *args) { PyObject *ret = NULL; if (self->mode == MODE_CLOSED) { PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); goto cleanup; } ret = PyInt_FromLong(self->pos); cleanup: return ret; } PyDoc_STRVAR(BZ2File_close__doc__, "close() -> None or (perhaps) an integer\n\ \n\ Close the file. Sets data attribute .closed to true. A closed file\n\ cannot be used for further I/O operations. close() may be called more\n\ than once without error.\n\ "); static PyObject * BZ2File_close(BZ2FileObject *self) { PyObject *ret = NULL; int bzerror = BZ_OK; ACQUIRE_LOCK(self); switch (self->mode) { case MODE_READ: case MODE_READ_EOF: BZ2_bzReadClose(&bzerror, self->fp); break; case MODE_WRITE: BZ2_bzWriteClose(&bzerror, self->fp, 0, NULL, NULL); break; } self->mode = MODE_CLOSED; ret = PyObject_CallMethod(self->file, "close", NULL); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); Py_XDECREF(ret); ret = NULL; } RELEASE_LOCK(self); return ret; } static PyObject *BZ2File_getiter(BZ2FileObject *self); static PyMethodDef BZ2File_methods[] = { {"read", (PyCFunction)BZ2File_read, METH_VARARGS, BZ2File_read__doc__}, {"readline", (PyCFunction)BZ2File_readline, METH_VARARGS, BZ2File_readline__doc__}, {"readlines", (PyCFunction)BZ2File_readlines, METH_VARARGS, BZ2File_readlines__doc__}, {"xreadlines", (PyCFunction)BZ2File_getiter, METH_VARARGS, BZ2File_xreadlines__doc__}, {"write", (PyCFunction)BZ2File_write, METH_VARARGS, BZ2File_write__doc__}, {"writelines", (PyCFunction)BZ2File_writelines, METH_O, BZ2File_writelines__doc__}, {"seek", (PyCFunction)BZ2File_seek, METH_VARARGS, BZ2File_seek__doc__}, {"tell", (PyCFunction)BZ2File_tell, METH_NOARGS, BZ2File_tell__doc__}, {"close", (PyCFunction)BZ2File_close, METH_NOARGS, BZ2File_close__doc__}, {NULL, NULL} /* sentinel */ }; /* ===================================================================== */ /* Getters and setters of BZ2File. */ #ifdef WITH_UNIVERSAL_NEWLINES /* This is a hacked version of Python's fileobject.c:get_newlines(). */ static PyObject * BZ2File_get_newlines(BZ2FileObject *self, void *closure) { switch (self->f_newlinetypes) { case NEWLINE_UNKNOWN: Py_INCREF(Py_None); return Py_None; case NEWLINE_CR: return PyString_FromString("\r"); case NEWLINE_LF: return PyString_FromString("\n"); case NEWLINE_CR|NEWLINE_LF: return Py_BuildValue("(ss)", "\r", "\n"); case NEWLINE_CRLF: return PyString_FromString("\r\n"); case NEWLINE_CR|NEWLINE_CRLF: return Py_BuildValue("(ss)", "\r", "\r\n"); case NEWLINE_LF|NEWLINE_CRLF: return Py_BuildValue("(ss)", "\n", "\r\n"); case NEWLINE_CR|NEWLINE_LF|NEWLINE_CRLF: return Py_BuildValue("(sss)", "\r", "\n", "\r\n"); default: PyErr_Format(PyExc_SystemError, "Unknown newlines value 0x%x\n", self->f_newlinetypes); return NULL; } } #endif static PyObject * BZ2File_get_closed(BZ2FileObject *self, void *closure) { return PyInt_FromLong(self->mode == MODE_CLOSED); } static PyObject * BZ2File_get_mode(BZ2FileObject *self, void *closure) { return PyObject_GetAttrString(self->file, "mode"); } static PyObject * BZ2File_get_name(BZ2FileObject *self, void *closure) { return PyObject_GetAttrString(self->file, "name"); } static PyGetSetDef BZ2File_getset[] = { {"closed", (getter)BZ2File_get_closed, NULL, "True if the file is closed"}, #ifdef WITH_UNIVERSAL_NEWLINES {"newlines", (getter)BZ2File_get_newlines, NULL, "end-of-line convention used in this file"}, #endif {"mode", (getter)BZ2File_get_mode, NULL, "file mode ('r', 'w', or 'U')"}, {"name", (getter)BZ2File_get_name, NULL, "file name"}, {NULL} /* Sentinel */ }; /* ===================================================================== */ /* Members of BZ2File_Type. */ #undef OFF #define OFF(x) offsetof(BZ2FileObject, x) static PyMemberDef BZ2File_members[] = { {"softspace", T_INT, OFF(f_softspace), 0, "flag indicating that a space needs to be printed; used by print"}, {NULL} /* Sentinel */ }; /* ===================================================================== */ /* Slot definitions for BZ2File_Type. */ static int BZ2File_init(BZ2FileObject *self, PyObject *args, PyObject *kwargs) { static char *kwlist[] = {"filename", "mode", "buffering", "compresslevel", 0}; PyObject *name; char *mode = "r"; int buffering = -1; int compresslevel = 9; int bzerror; int mode_char = 0; self->size = -1; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "O|sii:BZ2File", kwlist, &name, &mode, &buffering, &compresslevel)) return -1; if (compresslevel < 1 || compresslevel > 9) { PyErr_SetString(PyExc_ValueError, "compresslevel must be between 1 and 9"); return -1; } for (;;) { int error = 0; switch (*mode) { case 'r': case 'w': if (mode_char) error = 1; mode_char = *mode; break; case 'b': break; case 'U': #ifdef WITH_UNIVERSAL_NEWLINES self->f_univ_newline = 1; #endif break; default: error = 1; break; } if (error) { PyErr_Format(PyExc_ValueError, "invalid mode char %c", *mode); return -1; } mode++; if (*mode == '\0') break; } mode = (mode_char == 'r') ? "rb" : "wb"; self->file = PyObject_CallFunction((PyObject*)&PyFile_Type, "(Osi)", name, mode, buffering); if (self->file == NULL) return -1; /* From now on, we have stuff to dealloc, so jump to error label * instead of returning */ #ifdef WITH_THREAD self->lock = PyThread_allocate_lock(); if (!self->lock) goto error; #endif if (mode_char == 'r') self->fp = BZ2_bzReadOpen(&bzerror, PyFile_AsFile(self->file), 0, 0, NULL, 0); else self->fp = BZ2_bzWriteOpen(&bzerror, PyFile_AsFile(self->file), compresslevel, 0, 0); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto error; } self->mode = (mode_char == 'r') ? MODE_READ : MODE_WRITE; return 0; error: Py_DECREF(self->file); #ifdef WITH_THREAD if (self->lock) PyThread_free_lock(self->lock); #endif return -1; } static void BZ2File_dealloc(BZ2FileObject *self) { int bzerror; #ifdef WITH_THREAD if (self->lock) PyThread_free_lock(self->lock); #endif switch (self->mode) { case MODE_READ: case MODE_READ_EOF: BZ2_bzReadClose(&bzerror, self->fp); break; case MODE_WRITE: BZ2_bzWriteClose(&bzerror, self->fp, 0, NULL, NULL); break; } Util_DropReadAhead(self); Py_XDECREF(self->file); self->ob_type->tp_free((PyObject *)self); } /* This is a hacked version of Python's fileobject.c:file_getiter(). */ static PyObject * BZ2File_getiter(BZ2FileObject *self) { if (self->mode == MODE_CLOSED) { PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); return NULL; } Py_INCREF((PyObject*)self); return (PyObject *)self; } /* This is a hacked version of Python's fileobject.c:file_iternext(). */ #define READAHEAD_BUFSIZE 8192 static PyObject * BZ2File_iternext(BZ2FileObject *self) { PyStringObject* ret; ACQUIRE_LOCK(self); if (self->mode == MODE_CLOSED) { PyErr_SetString(PyExc_ValueError, "I/O operation on closed file"); return NULL; } ret = Util_ReadAheadGetLineSkip(self, 0, READAHEAD_BUFSIZE); RELEASE_LOCK(self); if (ret == NULL || PyString_GET_SIZE(ret) == 0) { Py_XDECREF(ret); return NULL; } return (PyObject *)ret; } /* ===================================================================== */ /* BZ2File_Type definition. */ PyDoc_VAR(BZ2File__doc__) = PyDoc_STR( "BZ2File(name [, mode='r', buffering=0, compresslevel=9]) -> file object\n\ \n\ Open a bz2 file. The mode can be 'r' or 'w', for reading (default) or\n\ writing. When opened for writing, the file will be created if it doesn't\n\ exist, and truncated otherwise. If the buffering argument is given, 0 means\n\ unbuffered, and larger numbers specify the buffer size. If compresslevel\n\ is given, must be a number between 1 and 9.\n\ ") #ifdef WITH_UNIVERSAL_NEWLINES PyDoc_STR( "\n\ Add a 'U' to mode to open the file for input with universal newline\n\ support. Any line ending in the input file will be seen as a '\\n' in\n\ Python. Also, a file so opened gains the attribute 'newlines'; the value\n\ for this attribute is one of None (no newline read yet), '\\r', '\\n',\n\ '\\r\\n' or a tuple containing all the newline types seen. Universal\n\ newlines are available only when reading.\n\ ") #endif ; static PyTypeObject BZ2File_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "bz2.BZ2File", /*tp_name*/ sizeof(BZ2FileObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ (destructor)BZ2File_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ 0, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ PyObject_GenericGetAttr,/*tp_getattro*/ PyObject_GenericSetAttr,/*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT|Py_TPFLAGS_BASETYPE, /*tp_flags*/ BZ2File__doc__, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ (getiterfunc)BZ2File_getiter, /*tp_iter*/ (iternextfunc)BZ2File_iternext, /*tp_iternext*/ BZ2File_methods, /*tp_methods*/ BZ2File_members, /*tp_members*/ BZ2File_getset, /*tp_getset*/ 0, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ (initproc)BZ2File_init, /*tp_init*/ PyType_GenericAlloc, /*tp_alloc*/ PyType_GenericNew, /*tp_new*/ _PyObject_Del, /*tp_free*/ 0, /*tp_is_gc*/ }; /* ===================================================================== */ /* Methods of BZ2Comp. */ PyDoc_STRVAR(BZ2Comp_compress__doc__, "compress(data) -> string\n\ \n\ Provide more data to the compressor object. It will return chunks of\n\ compressed data whenever possible. When you've finished providing data\n\ to compress, call the flush() method to finish the compression process,\n\ and return what is left in the internal buffers.\n\ "); static PyObject * BZ2Comp_compress(BZ2CompObject *self, PyObject *args) { char *data; int datasize; int bufsize = SMALLCHUNK; PY_LONG_LONG totalout; PyObject *ret = NULL; bz_stream *bzs = &self->bzs; int bzerror; if (!PyArg_ParseTuple(args, "s#", &data, &datasize)) return NULL; ACQUIRE_LOCK(self); if (!self->running) { PyErr_SetString(PyExc_ValueError, "this object was already flushed"); goto error; } ret = PyString_FromStringAndSize(NULL, bufsize); if (!ret) goto error; bzs->next_in = data; bzs->avail_in = datasize; bzs->next_out = BUF(ret); bzs->avail_out = bufsize; totalout = BZS_TOTAL_OUT(bzs); for (;;) { Py_BEGIN_ALLOW_THREADS bzerror = BZ2_bzCompress(bzs, BZ_RUN); Py_END_ALLOW_THREADS if (bzerror != BZ_RUN_OK) { Util_CatchBZ2Error(bzerror); goto error; } if (bzs->avail_out == 0) { bufsize = Util_NewBufferSize(bufsize); if (_PyString_Resize(&ret, bufsize) < 0) { BZ2_bzCompressEnd(bzs); goto error; } bzs->next_out = BUF(ret) + (BZS_TOTAL_OUT(bzs) - totalout); bzs->avail_out = bufsize - (bzs->next_out - BUF(ret)); } else if (bzs->avail_in == 0) { break; } } _PyString_Resize(&ret, (int)(BZS_TOTAL_OUT(bzs) - totalout)); RELEASE_LOCK(self); return ret; error: RELEASE_LOCK(self); Py_XDECREF(ret); return NULL; } PyDoc_STRVAR(BZ2Comp_flush__doc__, "flush() -> string\n\ \n\ Finish the compression process and return what is left in internal buffers.\n\ You must not use the compressor object after calling this method.\n\ "); static PyObject * BZ2Comp_flush(BZ2CompObject *self) { int bufsize = SMALLCHUNK; PyObject *ret = NULL; bz_stream *bzs = &self->bzs; PY_LONG_LONG totalout; int bzerror; ACQUIRE_LOCK(self); if (!self->running) { PyErr_SetString(PyExc_ValueError, "object was already " "flushed"); goto error; } self->running = 0; ret = PyString_FromStringAndSize(NULL, bufsize); if (!ret) goto error; bzs->next_out = BUF(ret); bzs->avail_out = bufsize; totalout = BZS_TOTAL_OUT(bzs); for (;;) { Py_BEGIN_ALLOW_THREADS bzerror = BZ2_bzCompress(bzs, BZ_FINISH); Py_END_ALLOW_THREADS if (bzerror == BZ_STREAM_END) { break; } else if (bzerror != BZ_FINISH_OK) { Util_CatchBZ2Error(bzerror); goto error; } if (bzs->avail_out == 0) { bufsize = Util_NewBufferSize(bufsize); if (_PyString_Resize(&ret, bufsize) < 0) goto error; bzs->next_out = BUF(ret); bzs->next_out = BUF(ret) + (BZS_TOTAL_OUT(bzs) - totalout); bzs->avail_out = bufsize - (bzs->next_out - BUF(ret)); } } if (bzs->avail_out != 0) _PyString_Resize(&ret, (int)(BZS_TOTAL_OUT(bzs) - totalout)); RELEASE_LOCK(self); return ret; error: RELEASE_LOCK(self); Py_XDECREF(ret); return NULL; } static PyMethodDef BZ2Comp_methods[] = { {"compress", (PyCFunction)BZ2Comp_compress, METH_VARARGS, BZ2Comp_compress__doc__}, {"flush", (PyCFunction)BZ2Comp_flush, METH_NOARGS, BZ2Comp_flush__doc__}, {NULL, NULL} /* sentinel */ }; /* ===================================================================== */ /* Slot definitions for BZ2Comp_Type. */ static int BZ2Comp_init(BZ2CompObject *self, PyObject *args, PyObject *kwargs) { int compresslevel = 9; int bzerror; static char *kwlist[] = {"compresslevel", 0}; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "|i:BZ2Compressor", kwlist, &compresslevel)) return -1; if (compresslevel < 1 || compresslevel > 9) { PyErr_SetString(PyExc_ValueError, "compresslevel must be between 1 and 9"); goto error; } #ifdef WITH_THREAD self->lock = PyThread_allocate_lock(); if (!self->lock) goto error; #endif memset(&self->bzs, 0, sizeof(bz_stream)); bzerror = BZ2_bzCompressInit(&self->bzs, compresslevel, 0, 0); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto error; } self->running = 1; return 0; error: #ifdef WITH_THREAD if (self->lock) PyThread_free_lock(self->lock); #endif return -1; } static void BZ2Comp_dealloc(BZ2CompObject *self) { #ifdef WITH_THREAD if (self->lock) PyThread_free_lock(self->lock); #endif BZ2_bzCompressEnd(&self->bzs); self->ob_type->tp_free((PyObject *)self); } /* ===================================================================== */ /* BZ2Comp_Type definition. */ PyDoc_STRVAR(BZ2Comp__doc__, "BZ2Compressor([compresslevel=9]) -> compressor object\n\ \n\ Create a new compressor object. This object may be used to compress\n\ data sequentially. If you want to compress data in one shot, use the\n\ compress() function instead. The compresslevel parameter, if given,\n\ must be a number between 1 and 9.\n\ "); static PyTypeObject BZ2Comp_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "bz2.BZ2Compressor", /*tp_name*/ sizeof(BZ2CompObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ (destructor)BZ2Comp_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ 0, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ PyObject_GenericGetAttr,/*tp_getattro*/ PyObject_GenericSetAttr,/*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT|Py_TPFLAGS_BASETYPE, /*tp_flags*/ BZ2Comp__doc__, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ 0, /*tp_iter*/ 0, /*tp_iternext*/ BZ2Comp_methods, /*tp_methods*/ 0, /*tp_members*/ 0, /*tp_getset*/ 0, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ (initproc)BZ2Comp_init, /*tp_init*/ PyType_GenericAlloc, /*tp_alloc*/ PyType_GenericNew, /*tp_new*/ _PyObject_Del, /*tp_free*/ 0, /*tp_is_gc*/ }; /* ===================================================================== */ /* Members of BZ2Decomp. */ #undef OFF #define OFF(x) offsetof(BZ2DecompObject, x) static PyMemberDef BZ2Decomp_members[] = { {"unused_data", T_OBJECT, OFF(unused_data), RO}, {NULL} /* Sentinel */ }; /* ===================================================================== */ /* Methods of BZ2Decomp. */ PyDoc_STRVAR(BZ2Decomp_decompress__doc__, "decompress(data) -> string\n\ \n\ Provide more data to the decompressor object. It will return chunks\n\ of decompressed data whenever possible. If you try to decompress data\n\ after the end of stream is found, EOFError will be raised. If any data\n\ was found after the end of stream, it'll be ignored and saved in\n\ unused_data attribute.\n\ "); static PyObject * BZ2Decomp_decompress(BZ2DecompObject *self, PyObject *args) { char *data; int datasize; int bufsize = SMALLCHUNK; PY_LONG_LONG totalout; PyObject *ret = NULL; bz_stream *bzs = &self->bzs; int bzerror; if (!PyArg_ParseTuple(args, "s#", &data, &datasize)) return NULL; ACQUIRE_LOCK(self); if (!self->running) { PyErr_SetString(PyExc_EOFError, "end of stream was " "already found"); goto error; } ret = PyString_FromStringAndSize(NULL, bufsize); if (!ret) goto error; bzs->next_in = data; bzs->avail_in = datasize; bzs->next_out = BUF(ret); bzs->avail_out = bufsize; totalout = BZS_TOTAL_OUT(bzs); for (;;) { Py_BEGIN_ALLOW_THREADS bzerror = BZ2_bzDecompress(bzs); Py_END_ALLOW_THREADS if (bzerror == BZ_STREAM_END) { if (bzs->avail_in != 0) { Py_DECREF(self->unused_data); self->unused_data = PyString_FromStringAndSize(bzs->next_in, bzs->avail_in); } self->running = 0; break; } if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto error; } if (bzs->avail_out == 0) { bufsize = Util_NewBufferSize(bufsize); if (_PyString_Resize(&ret, bufsize) < 0) { BZ2_bzDecompressEnd(bzs); goto error; } bzs->next_out = BUF(ret); bzs->next_out = BUF(ret) + (BZS_TOTAL_OUT(bzs) - totalout); bzs->avail_out = bufsize - (bzs->next_out - BUF(ret)); } else if (bzs->avail_in == 0) { break; } } if (bzs->avail_out != 0) _PyString_Resize(&ret, (int)(BZS_TOTAL_OUT(bzs) - totalout)); RELEASE_LOCK(self); return ret; error: RELEASE_LOCK(self); Py_XDECREF(ret); return NULL; } static PyMethodDef BZ2Decomp_methods[] = { {"decompress", (PyCFunction)BZ2Decomp_decompress, METH_VARARGS, BZ2Decomp_decompress__doc__}, {NULL, NULL} /* sentinel */ }; /* ===================================================================== */ /* Slot definitions for BZ2Decomp_Type. */ static int BZ2Decomp_init(BZ2DecompObject *self, PyObject *args, PyObject *kwargs) { int bzerror; if (!PyArg_ParseTuple(args, ":BZ2Decompressor")) return -1; #ifdef WITH_THREAD self->lock = PyThread_allocate_lock(); if (!self->lock) goto error; #endif self->unused_data = PyString_FromString(""); if (!self->unused_data) goto error; memset(&self->bzs, 0, sizeof(bz_stream)); bzerror = BZ2_bzDecompressInit(&self->bzs, 0, 0); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); goto error; } self->running = 1; return 0; error: #ifdef WITH_THREAD if (self->lock) PyThread_free_lock(self->lock); #endif Py_XDECREF(self->unused_data); return -1; } static void BZ2Decomp_dealloc(BZ2DecompObject *self) { #ifdef WITH_THREAD if (self->lock) PyThread_free_lock(self->lock); #endif Py_XDECREF(self->unused_data); BZ2_bzDecompressEnd(&self->bzs); self->ob_type->tp_free((PyObject *)self); } /* ===================================================================== */ /* BZ2Decomp_Type definition. */ PyDoc_STRVAR(BZ2Decomp__doc__, "BZ2Decompressor() -> decompressor object\n\ \n\ Create a new decompressor object. This object may be used to decompress\n\ data sequentially. If you want to decompress data in one shot, use the\n\ decompress() function instead.\n\ "); static PyTypeObject BZ2Decomp_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "bz2.BZ2Decompressor", /*tp_name*/ sizeof(BZ2DecompObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ (destructor)BZ2Decomp_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ 0, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ PyObject_GenericGetAttr,/*tp_getattro*/ PyObject_GenericSetAttr,/*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT|Py_TPFLAGS_BASETYPE, /*tp_flags*/ BZ2Decomp__doc__, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ 0, /*tp_iter*/ 0, /*tp_iternext*/ BZ2Decomp_methods, /*tp_methods*/ BZ2Decomp_members, /*tp_members*/ 0, /*tp_getset*/ 0, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ (initproc)BZ2Decomp_init, /*tp_init*/ PyType_GenericAlloc, /*tp_alloc*/ PyType_GenericNew, /*tp_new*/ _PyObject_Del, /*tp_free*/ 0, /*tp_is_gc*/ }; /* ===================================================================== */ /* Module functions. */ PyDoc_STRVAR(bz2_compress__doc__, "compress(data [, compresslevel=9]) -> string\n\ \n\ Compress data in one shot. If you want to compress data sequentially,\n\ use an instance of BZ2Compressor instead. The compresslevel parameter, if\n\ given, must be a number between 1 and 9.\n\ "); static PyObject * bz2_compress(PyObject *self, PyObject *args, PyObject *kwargs) { int compresslevel=9; char *data; int datasize; int bufsize; PyObject *ret = NULL; bz_stream _bzs; bz_stream *bzs = &_bzs; int bzerror; static char *kwlist[] = {"data", "compresslevel", 0}; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "s#|i", kwlist, &data, &datasize, &compresslevel)) return NULL; if (compresslevel < 1 || compresslevel > 9) { PyErr_SetString(PyExc_ValueError, "compresslevel must be between 1 and 9"); return NULL; } /* Conforming to bz2 manual, this is large enough to fit compressed * data in one shot. We will check it later anyway. */ bufsize = datasize + (datasize/100+1) + 600; ret = PyString_FromStringAndSize(NULL, bufsize); if (!ret) return NULL; memset(bzs, 0, sizeof(bz_stream)); bzs->next_in = data; bzs->avail_in = datasize; bzs->next_out = BUF(ret); bzs->avail_out = bufsize; bzerror = BZ2_bzCompressInit(bzs, compresslevel, 0, 0); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); Py_DECREF(ret); return NULL; } for (;;) { Py_BEGIN_ALLOW_THREADS bzerror = BZ2_bzCompress(bzs, BZ_FINISH); Py_END_ALLOW_THREADS if (bzerror == BZ_STREAM_END) { break; } else if (bzerror != BZ_FINISH_OK) { BZ2_bzCompressEnd(bzs); Util_CatchBZ2Error(bzerror); Py_DECREF(ret); return NULL; } if (bzs->avail_out == 0) { bufsize = Util_NewBufferSize(bufsize); if (_PyString_Resize(&ret, bufsize) < 0) { BZ2_bzCompressEnd(bzs); Py_DECREF(ret); return NULL; } bzs->next_out = BUF(ret) + BZS_TOTAL_OUT(bzs); bzs->avail_out = bufsize - (bzs->next_out - BUF(ret)); } } if (bzs->avail_out != 0) _PyString_Resize(&ret, (int)BZS_TOTAL_OUT(bzs)); BZ2_bzCompressEnd(bzs); return ret; } PyDoc_STRVAR(bz2_decompress__doc__, "decompress(data) -> decompressed data\n\ \n\ Decompress data in one shot. If you want to decompress data sequentially,\n\ use an instance of BZ2Decompressor instead.\n\ "); static PyObject * bz2_decompress(PyObject *self, PyObject *args) { char *data; int datasize; int bufsize = SMALLCHUNK; PyObject *ret; bz_stream _bzs; bz_stream *bzs = &_bzs; int bzerror; if (!PyArg_ParseTuple(args, "s#", &data, &datasize)) return NULL; if (datasize == 0) return PyString_FromString(""); ret = PyString_FromStringAndSize(NULL, bufsize); if (!ret) return NULL; memset(bzs, 0, sizeof(bz_stream)); bzs->next_in = data; bzs->avail_in = datasize; bzs->next_out = BUF(ret); bzs->avail_out = bufsize; bzerror = BZ2_bzDecompressInit(bzs, 0, 0); if (bzerror != BZ_OK) { Util_CatchBZ2Error(bzerror); Py_DECREF(ret); return NULL; } for (;;) { Py_BEGIN_ALLOW_THREADS bzerror = BZ2_bzDecompress(bzs); Py_END_ALLOW_THREADS if (bzerror == BZ_STREAM_END) { break; } else if (bzerror != BZ_OK) { BZ2_bzDecompressEnd(bzs); Util_CatchBZ2Error(bzerror); Py_DECREF(ret); return NULL; } if (bzs->avail_out == 0) { bufsize = Util_NewBufferSize(bufsize); if (_PyString_Resize(&ret, bufsize) < 0) { BZ2_bzDecompressEnd(bzs); Py_DECREF(ret); return NULL; } bzs->next_out = BUF(ret) + BZS_TOTAL_OUT(bzs); bzs->avail_out = bufsize - (bzs->next_out - BUF(ret)); } else if (bzs->avail_in == 0) { BZ2_bzDecompressEnd(bzs); PyErr_SetString(PyExc_ValueError, "couldn't find end of stream"); Py_DECREF(ret); return NULL; } } if (bzs->avail_out != 0) _PyString_Resize(&ret, (int)BZS_TOTAL_OUT(bzs)); BZ2_bzDecompressEnd(bzs); return ret; } static PyMethodDef bz2_methods[] = { {"compress", (PyCFunction) bz2_compress, METH_VARARGS|METH_KEYWORDS, bz2_compress__doc__}, {"decompress", (PyCFunction) bz2_decompress, METH_VARARGS, bz2_decompress__doc__}, {NULL, NULL} /* sentinel */ }; /* ===================================================================== */ /* Initialization function. */ PyDoc_STRVAR(bz2__doc__, "The python bz2 module provides a comprehensive interface for\n\ the bz2 compression library. It implements a complete file\n\ interface, one shot (de)compression functions, and types for\n\ sequential (de)compression.\n\ "); PyMODINIT_FUNC initbz2(void) { PyObject *m; BZ2File_Type.ob_type = &PyType_Type; BZ2Comp_Type.ob_type = &PyType_Type; BZ2Decomp_Type.ob_type = &PyType_Type; m = Py_InitModule3("bz2", bz2_methods, bz2__doc__); PyModule_AddObject(m, "__author__", PyString_FromString(__author__)); Py_INCREF(&BZ2File_Type); PyModule_AddObject(m, "BZ2File", (PyObject *)&BZ2File_Type); Py_INCREF(&BZ2Comp_Type); PyModule_AddObject(m, "BZ2Compressor", (PyObject *)&BZ2Comp_Type); Py_INCREF(&BZ2Decomp_Type); PyModule_AddObject(m, "BZ2Decompressor", (PyObject *)&BZ2Decomp_Type); } Python-2.3.7/Modules/errnomodule.c0000644001241000117560000005637007522367001016374 0ustar loewishpifb6 /* Errno module */ #include "Python.h" /* Mac with GUSI has more errors than those in errno.h */ #ifdef USE_GUSI #include #endif /* Windows socket errors (WSA*) */ #ifdef MS_WINDOWS #include #endif /* * Pull in the system error definitions */ static PyMethodDef errno_methods[] = { {NULL, NULL} }; /* Helper function doing the dictionary inserting */ static void _inscode(PyObject *d, PyObject *de, char *name, int code) { PyObject *u = PyString_FromString(name); PyObject *v = PyInt_FromLong((long) code); /* Don't bother checking for errors; they'll be caught at the end * of the module initialization function by the caller of * initerrno(). */ if (u && v) { /* insert in modules dict */ PyDict_SetItem(d, u, v); /* insert in errorcode dict */ PyDict_SetItem(de, v, u); } Py_XDECREF(u); Py_XDECREF(v); } PyDoc_STRVAR(errno__doc__, "This module makes available standard errno system symbols.\n\ \n\ The value of each symbol is the corresponding integer value,\n\ e.g., on most systems, errno.ENOENT equals the integer 2.\n\ \n\ The dictionary errno.errorcode maps numeric codes to symbol names,\n\ e.g., errno.errorcode[2] could be the string 'ENOENT'.\n\ \n\ Symbols that are not relevant to the underlying system are not defined.\n\ \n\ To map error codes to error messages, use the function os.strerror(),\n\ e.g. os.strerror(2) could return 'No such file or directory'."); PyMODINIT_FUNC initerrno(void) { PyObject *m, *d, *de; m = Py_InitModule3("errno", errno_methods, errno__doc__); d = PyModule_GetDict(m); de = PyDict_New(); if (!d || !de || PyDict_SetItemString(d, "errorcode", de) < 0) return; /* Macro so I don't have to edit each and every line below... */ #define inscode(d, ds, de, name, code, comment) _inscode(d, de, name, code) /* * The names and comments are borrowed from linux/include/errno.h, * which should be pretty all-inclusive */ #ifdef ENODEV inscode(d, ds, de, "ENODEV", ENODEV, "No such device"); #endif #ifdef ENOCSI inscode(d, ds, de, "ENOCSI", ENOCSI, "No CSI structure available"); #endif #ifdef EHOSTUNREACH inscode(d, ds, de, "EHOSTUNREACH", EHOSTUNREACH, "No route to host"); #else #ifdef WSAEHOSTUNREACH inscode(d, ds, de, "EHOSTUNREACH", WSAEHOSTUNREACH, "No route to host"); #endif #endif #ifdef ENOMSG inscode(d, ds, de, "ENOMSG", ENOMSG, "No message of desired type"); #endif #ifdef EUCLEAN inscode(d, ds, de, "EUCLEAN", EUCLEAN, "Structure needs cleaning"); #endif #ifdef EL2NSYNC inscode(d, ds, de, "EL2NSYNC", EL2NSYNC, "Level 2 not synchronized"); #endif #ifdef EL2HLT inscode(d, ds, de, "EL2HLT", EL2HLT, "Level 2 halted"); #endif #ifdef ENODATA inscode(d, ds, de, "ENODATA", ENODATA, "No data available"); #endif #ifdef ENOTBLK inscode(d, ds, de, "ENOTBLK", ENOTBLK, "Block device required"); #endif #ifdef ENOSYS inscode(d, ds, de, "ENOSYS", ENOSYS, "Function not implemented"); #endif #ifdef EPIPE inscode(d, ds, de, "EPIPE", EPIPE, "Broken pipe"); #endif #ifdef EINVAL inscode(d, ds, de, "EINVAL", EINVAL, "Invalid argument"); #else #ifdef WSAEINVAL inscode(d, ds, de, "EINVAL", WSAEINVAL, "Invalid argument"); #endif #endif #ifdef EOVERFLOW inscode(d, ds, de, "EOVERFLOW", EOVERFLOW, "Value too large for defined data type"); #endif #ifdef EADV inscode(d, ds, de, "EADV", EADV, "Advertise error"); #endif #ifdef EINTR inscode(d, ds, de, "EINTR", EINTR, "Interrupted system call"); #else #ifdef WSAEINTR inscode(d, ds, de, "EINTR", WSAEINTR, "Interrupted system call"); #endif #endif #ifdef EUSERS inscode(d, ds, de, "EUSERS", EUSERS, "Too many users"); #else #ifdef WSAEUSERS inscode(d, ds, de, "EUSERS", WSAEUSERS, "Too many users"); #endif #endif #ifdef ENOTEMPTY inscode(d, ds, de, "ENOTEMPTY", ENOTEMPTY, "Directory not empty"); #else #ifdef WSAENOTEMPTY inscode(d, ds, de, "ENOTEMPTY", WSAENOTEMPTY, "Directory not empty"); #endif #endif #ifdef ENOBUFS inscode(d, ds, de, "ENOBUFS", ENOBUFS, "No buffer space available"); #else #ifdef WSAENOBUFS inscode(d, ds, de, "ENOBUFS", WSAENOBUFS, "No buffer space available"); #endif #endif #ifdef EPROTO inscode(d, ds, de, "EPROTO", EPROTO, "Protocol error"); #endif #ifdef EREMOTE inscode(d, ds, de, "EREMOTE", EREMOTE, "Object is remote"); #else #ifdef WSAEREMOTE inscode(d, ds, de, "EREMOTE", WSAEREMOTE, "Object is remote"); #endif #endif #ifdef ENAVAIL inscode(d, ds, de, "ENAVAIL", ENAVAIL, "No XENIX semaphores available"); #endif #ifdef ECHILD inscode(d, ds, de, "ECHILD", ECHILD, "No child processes"); #endif #ifdef ELOOP inscode(d, ds, de, "ELOOP", ELOOP, "Too many symbolic links encountered"); #else #ifdef WSAELOOP inscode(d, ds, de, "ELOOP", WSAELOOP, "Too many symbolic links encountered"); #endif #endif #ifdef EXDEV inscode(d, ds, de, "EXDEV", EXDEV, "Cross-device link"); #endif #ifdef E2BIG inscode(d, ds, de, "E2BIG", E2BIG, "Arg list too long"); #endif #ifdef ESRCH inscode(d, ds, de, "ESRCH", ESRCH, "No such process"); #endif #ifdef EMSGSIZE inscode(d, ds, de, "EMSGSIZE", EMSGSIZE, "Message too long"); #else #ifdef WSAEMSGSIZE inscode(d, ds, de, "EMSGSIZE", WSAEMSGSIZE, "Message too long"); #endif #endif #ifdef EAFNOSUPPORT inscode(d, ds, de, "EAFNOSUPPORT", EAFNOSUPPORT, "Address family not supported by protocol"); #else #ifdef WSAEAFNOSUPPORT inscode(d, ds, de, "EAFNOSUPPORT", WSAEAFNOSUPPORT, "Address family not supported by protocol"); #endif #endif #ifdef EBADR inscode(d, ds, de, "EBADR", EBADR, "Invalid request descriptor"); #endif #ifdef EHOSTDOWN inscode(d, ds, de, "EHOSTDOWN", EHOSTDOWN, "Host is down"); #else #ifdef WSAEHOSTDOWN inscode(d, ds, de, "EHOSTDOWN", WSAEHOSTDOWN, "Host is down"); #endif #endif #ifdef EPFNOSUPPORT inscode(d, ds, de, "EPFNOSUPPORT", EPFNOSUPPORT, "Protocol family not supported"); #else #ifdef WSAEPFNOSUPPORT inscode(d, ds, de, "EPFNOSUPPORT", WSAEPFNOSUPPORT, "Protocol family not supported"); #endif #endif #ifdef ENOPROTOOPT inscode(d, ds, de, "ENOPROTOOPT", ENOPROTOOPT, "Protocol not available"); #else #ifdef WSAENOPROTOOPT inscode(d, ds, de, "ENOPROTOOPT", WSAENOPROTOOPT, "Protocol not available"); #endif #endif #ifdef EBUSY inscode(d, ds, de, "EBUSY", EBUSY, "Device or resource busy"); #endif #ifdef EWOULDBLOCK inscode(d, ds, de, "EWOULDBLOCK", EWOULDBLOCK, "Operation would block"); #else #ifdef WSAEWOULDBLOCK inscode(d, ds, de, "EWOULDBLOCK", WSAEWOULDBLOCK, "Operation would block"); #endif #endif #ifdef EBADFD inscode(d, ds, de, "EBADFD", EBADFD, "File descriptor in bad state"); #endif #ifdef EDOTDOT inscode(d, ds, de, "EDOTDOT", EDOTDOT, "RFS specific error"); #endif #ifdef EISCONN inscode(d, ds, de, "EISCONN", EISCONN, "Transport endpoint is already connected"); #else #ifdef WSAEISCONN inscode(d, ds, de, "EISCONN", WSAEISCONN, "Transport endpoint is already connected"); #endif #endif #ifdef ENOANO inscode(d, ds, de, "ENOANO", ENOANO, "No anode"); #endif #ifdef ESHUTDOWN inscode(d, ds, de, "ESHUTDOWN", ESHUTDOWN, "Cannot send after transport endpoint shutdown"); #else #ifdef WSAESHUTDOWN inscode(d, ds, de, "ESHUTDOWN", WSAESHUTDOWN, "Cannot send after transport endpoint shutdown"); #endif #endif #ifdef ECHRNG inscode(d, ds, de, "ECHRNG", ECHRNG, "Channel number out of range"); #endif #ifdef ELIBBAD inscode(d, ds, de, "ELIBBAD", ELIBBAD, "Accessing a corrupted shared library"); #endif #ifdef ENONET inscode(d, ds, de, "ENONET", ENONET, "Machine is not on the network"); #endif #ifdef EBADE inscode(d, ds, de, "EBADE", EBADE, "Invalid exchange"); #endif #ifdef EBADF inscode(d, ds, de, "EBADF", EBADF, "Bad file number"); #else #ifdef WSAEBADF inscode(d, ds, de, "EBADF", WSAEBADF, "Bad file number"); #endif #endif #ifdef EMULTIHOP inscode(d, ds, de, "EMULTIHOP", EMULTIHOP, "Multihop attempted"); #endif #ifdef EIO inscode(d, ds, de, "EIO", EIO, "I/O error"); #endif #ifdef EUNATCH inscode(d, ds, de, "EUNATCH", EUNATCH, "Protocol driver not attached"); #endif #ifdef EPROTOTYPE inscode(d, ds, de, "EPROTOTYPE", EPROTOTYPE, "Protocol wrong type for socket"); #else #ifdef WSAEPROTOTYPE inscode(d, ds, de, "EPROTOTYPE", WSAEPROTOTYPE, "Protocol wrong type for socket"); #endif #endif #ifdef ENOSPC inscode(d, ds, de, "ENOSPC", ENOSPC, "No space left on device"); #endif #ifdef ENOEXEC inscode(d, ds, de, "ENOEXEC", ENOEXEC, "Exec format error"); #endif #ifdef EALREADY inscode(d, ds, de, "EALREADY", EALREADY, "Operation already in progress"); #else #ifdef WSAEALREADY inscode(d, ds, de, "EALREADY", WSAEALREADY, "Operation already in progress"); #endif #endif #ifdef ENETDOWN inscode(d, ds, de, "ENETDOWN", ENETDOWN, "Network is down"); #else #ifdef WSAENETDOWN inscode(d, ds, de, "ENETDOWN", WSAENETDOWN, "Network is down"); #endif #endif #ifdef ENOTNAM inscode(d, ds, de, "ENOTNAM", ENOTNAM, "Not a XENIX named type file"); #endif #ifdef EACCES inscode(d, ds, de, "EACCES", EACCES, "Permission denied"); #else #ifdef WSAEACCES inscode(d, ds, de, "EACCES", WSAEACCES, "Permission denied"); #endif #endif #ifdef ELNRNG inscode(d, ds, de, "ELNRNG", ELNRNG, "Link number out of range"); #endif #ifdef EILSEQ inscode(d, ds, de, "EILSEQ", EILSEQ, "Illegal byte sequence"); #endif #ifdef ENOTDIR inscode(d, ds, de, "ENOTDIR", ENOTDIR, "Not a directory"); #endif #ifdef ENOTUNIQ inscode(d, ds, de, "ENOTUNIQ", ENOTUNIQ, "Name not unique on network"); #endif #ifdef EPERM inscode(d, ds, de, "EPERM", EPERM, "Operation not permitted"); #endif #ifdef EDOM inscode(d, ds, de, "EDOM", EDOM, "Math argument out of domain of func"); #endif #ifdef EXFULL inscode(d, ds, de, "EXFULL", EXFULL, "Exchange full"); #endif #ifdef ECONNREFUSED inscode(d, ds, de, "ECONNREFUSED", ECONNREFUSED, "Connection refused"); #else #ifdef WSAECONNREFUSED inscode(d, ds, de, "ECONNREFUSED", WSAECONNREFUSED, "Connection refused"); #endif #endif #ifdef EISDIR inscode(d, ds, de, "EISDIR", EISDIR, "Is a directory"); #endif #ifdef EPROTONOSUPPORT inscode(d, ds, de, "EPROTONOSUPPORT", EPROTONOSUPPORT, "Protocol not supported"); #else #ifdef WSAEPROTONOSUPPORT inscode(d, ds, de, "EPROTONOSUPPORT", WSAEPROTONOSUPPORT, "Protocol not supported"); #endif #endif #ifdef EROFS inscode(d, ds, de, "EROFS", EROFS, "Read-only file system"); #endif #ifdef EADDRNOTAVAIL inscode(d, ds, de, "EADDRNOTAVAIL", EADDRNOTAVAIL, "Cannot assign requested address"); #else #ifdef WSAEADDRNOTAVAIL inscode(d, ds, de, "EADDRNOTAVAIL", WSAEADDRNOTAVAIL, "Cannot assign requested address"); #endif #endif #ifdef EIDRM inscode(d, ds, de, "EIDRM", EIDRM, "Identifier removed"); #endif #ifdef ECOMM inscode(d, ds, de, "ECOMM", ECOMM, "Communication error on send"); #endif #ifdef ESRMNT inscode(d, ds, de, "ESRMNT", ESRMNT, "Srmount error"); #endif #ifdef EREMOTEIO inscode(d, ds, de, "EREMOTEIO", EREMOTEIO, "Remote I/O error"); #endif #ifdef EL3RST inscode(d, ds, de, "EL3RST", EL3RST, "Level 3 reset"); #endif #ifdef EBADMSG inscode(d, ds, de, "EBADMSG", EBADMSG, "Not a data message"); #endif #ifdef ENFILE inscode(d, ds, de, "ENFILE", ENFILE, "File table overflow"); #endif #ifdef ELIBMAX inscode(d, ds, de, "ELIBMAX", ELIBMAX, "Attempting to link in too many shared libraries"); #endif #ifdef ESPIPE inscode(d, ds, de, "ESPIPE", ESPIPE, "Illegal seek"); #endif #ifdef ENOLINK inscode(d, ds, de, "ENOLINK", ENOLINK, "Link has been severed"); #endif #ifdef ENETRESET inscode(d, ds, de, "ENETRESET", ENETRESET, "Network dropped connection because of reset"); #else #ifdef WSAENETRESET inscode(d, ds, de, "ENETRESET", WSAENETRESET, "Network dropped connection because of reset"); #endif #endif #ifdef ETIMEDOUT inscode(d, ds, de, "ETIMEDOUT", ETIMEDOUT, "Connection timed out"); #else #ifdef WSAETIMEDOUT inscode(d, ds, de, "ETIMEDOUT", WSAETIMEDOUT, "Connection timed out"); #endif #endif #ifdef ENOENT inscode(d, ds, de, "ENOENT", ENOENT, "No such file or directory"); #endif #ifdef EEXIST inscode(d, ds, de, "EEXIST", EEXIST, "File exists"); #endif #ifdef EDQUOT inscode(d, ds, de, "EDQUOT", EDQUOT, "Quota exceeded"); #else #ifdef WSAEDQUOT inscode(d, ds, de, "EDQUOT", WSAEDQUOT, "Quota exceeded"); #endif #endif #ifdef ENOSTR inscode(d, ds, de, "ENOSTR", ENOSTR, "Device not a stream"); #endif #ifdef EBADSLT inscode(d, ds, de, "EBADSLT", EBADSLT, "Invalid slot"); #endif #ifdef EBADRQC inscode(d, ds, de, "EBADRQC", EBADRQC, "Invalid request code"); #endif #ifdef ELIBACC inscode(d, ds, de, "ELIBACC", ELIBACC, "Can not access a needed shared library"); #endif #ifdef EFAULT inscode(d, ds, de, "EFAULT", EFAULT, "Bad address"); #else #ifdef WSAEFAULT inscode(d, ds, de, "EFAULT", WSAEFAULT, "Bad address"); #endif #endif #ifdef EFBIG inscode(d, ds, de, "EFBIG", EFBIG, "File too large"); #endif #ifdef EDEADLK inscode(d, ds, de, "EDEADLK", EDEADLK, "Resource deadlock would occur"); #endif #ifdef ENOTCONN inscode(d, ds, de, "ENOTCONN", ENOTCONN, "Transport endpoint is not connected"); #else #ifdef WSAENOTCONN inscode(d, ds, de, "ENOTCONN", WSAENOTCONN, "Transport endpoint is not connected"); #endif #endif #ifdef EDESTADDRREQ inscode(d, ds, de, "EDESTADDRREQ", EDESTADDRREQ, "Destination address required"); #else #ifdef WSAEDESTADDRREQ inscode(d, ds, de, "EDESTADDRREQ", WSAEDESTADDRREQ, "Destination address required"); #endif #endif #ifdef ELIBSCN inscode(d, ds, de, "ELIBSCN", ELIBSCN, ".lib section in a.out corrupted"); #endif #ifdef ENOLCK inscode(d, ds, de, "ENOLCK", ENOLCK, "No record locks available"); #endif #ifdef EISNAM inscode(d, ds, de, "EISNAM", EISNAM, "Is a named type file"); #endif #ifdef ECONNABORTED inscode(d, ds, de, "ECONNABORTED", ECONNABORTED, "Software caused connection abort"); #else #ifdef WSAECONNABORTED inscode(d, ds, de, "ECONNABORTED", WSAECONNABORTED, "Software caused connection abort"); #endif #endif #ifdef ENETUNREACH inscode(d, ds, de, "ENETUNREACH", ENETUNREACH, "Network is unreachable"); #else #ifdef WSAENETUNREACH inscode(d, ds, de, "ENETUNREACH", WSAENETUNREACH, "Network is unreachable"); #endif #endif #ifdef ESTALE inscode(d, ds, de, "ESTALE", ESTALE, "Stale NFS file handle"); #else #ifdef WSAESTALE inscode(d, ds, de, "ESTALE", WSAESTALE, "Stale NFS file handle"); #endif #endif #ifdef ENOSR inscode(d, ds, de, "ENOSR", ENOSR, "Out of streams resources"); #endif #ifdef ENOMEM inscode(d, ds, de, "ENOMEM", ENOMEM, "Out of memory"); #endif #ifdef ENOTSOCK inscode(d, ds, de, "ENOTSOCK", ENOTSOCK, "Socket operation on non-socket"); #else #ifdef WSAENOTSOCK inscode(d, ds, de, "ENOTSOCK", WSAENOTSOCK, "Socket operation on non-socket"); #endif #endif #ifdef ESTRPIPE inscode(d, ds, de, "ESTRPIPE", ESTRPIPE, "Streams pipe error"); #endif #ifdef EMLINK inscode(d, ds, de, "EMLINK", EMLINK, "Too many links"); #endif #ifdef ERANGE inscode(d, ds, de, "ERANGE", ERANGE, "Math result not representable"); #endif #ifdef ELIBEXEC inscode(d, ds, de, "ELIBEXEC", ELIBEXEC, "Cannot exec a shared library directly"); #endif #ifdef EL3HLT inscode(d, ds, de, "EL3HLT", EL3HLT, "Level 3 halted"); #endif #ifdef ECONNRESET inscode(d, ds, de, "ECONNRESET", ECONNRESET, "Connection reset by peer"); #else #ifdef WSAECONNRESET inscode(d, ds, de, "ECONNRESET", WSAECONNRESET, "Connection reset by peer"); #endif #endif #ifdef EADDRINUSE inscode(d, ds, de, "EADDRINUSE", EADDRINUSE, "Address already in use"); #else #ifdef WSAEADDRINUSE inscode(d, ds, de, "EADDRINUSE", WSAEADDRINUSE, "Address already in use"); #endif #endif #ifdef EOPNOTSUPP inscode(d, ds, de, "EOPNOTSUPP", EOPNOTSUPP, "Operation not supported on transport endpoint"); #else #ifdef WSAEOPNOTSUPP inscode(d, ds, de, "EOPNOTSUPP", WSAEOPNOTSUPP, "Operation not supported on transport endpoint"); #endif #endif #ifdef EREMCHG inscode(d, ds, de, "EREMCHG", EREMCHG, "Remote address changed"); #endif #ifdef EAGAIN inscode(d, ds, de, "EAGAIN", EAGAIN, "Try again"); #endif #ifdef ENAMETOOLONG inscode(d, ds, de, "ENAMETOOLONG", ENAMETOOLONG, "File name too long"); #else #ifdef WSAENAMETOOLONG inscode(d, ds, de, "ENAMETOOLONG", WSAENAMETOOLONG, "File name too long"); #endif #endif #ifdef ENOTTY inscode(d, ds, de, "ENOTTY", ENOTTY, "Not a typewriter"); #endif #ifdef ERESTART inscode(d, ds, de, "ERESTART", ERESTART, "Interrupted system call should be restarted"); #endif #ifdef ESOCKTNOSUPPORT inscode(d, ds, de, "ESOCKTNOSUPPORT", ESOCKTNOSUPPORT, "Socket type not supported"); #else #ifdef WSAESOCKTNOSUPPORT inscode(d, ds, de, "ESOCKTNOSUPPORT", WSAESOCKTNOSUPPORT, "Socket type not supported"); #endif #endif #ifdef ETIME inscode(d, ds, de, "ETIME", ETIME, "Timer expired"); #endif #ifdef EBFONT inscode(d, ds, de, "EBFONT", EBFONT, "Bad font file format"); #endif #ifdef EDEADLOCK inscode(d, ds, de, "EDEADLOCK", EDEADLOCK, "Error EDEADLOCK"); #endif #ifdef ETOOMANYREFS inscode(d, ds, de, "ETOOMANYREFS", ETOOMANYREFS, "Too many references: cannot splice"); #else #ifdef WSAETOOMANYREFS inscode(d, ds, de, "ETOOMANYREFS", WSAETOOMANYREFS, "Too many references: cannot splice"); #endif #endif #ifdef EMFILE inscode(d, ds, de, "EMFILE", EMFILE, "Too many open files"); #else #ifdef WSAEMFILE inscode(d, ds, de, "EMFILE", WSAEMFILE, "Too many open files"); #endif #endif #ifdef ETXTBSY inscode(d, ds, de, "ETXTBSY", ETXTBSY, "Text file busy"); #endif #ifdef EINPROGRESS inscode(d, ds, de, "EINPROGRESS", EINPROGRESS, "Operation now in progress"); #else #ifdef WSAEINPROGRESS inscode(d, ds, de, "EINPROGRESS", WSAEINPROGRESS, "Operation now in progress"); #endif #endif #ifdef ENXIO inscode(d, ds, de, "ENXIO", ENXIO, "No such device or address"); #endif #ifdef ENOPKG inscode(d, ds, de, "ENOPKG", ENOPKG, "Package not installed"); #endif #ifdef WSASY inscode(d, ds, de, "WSASY", WSASY, "Error WSASY"); #endif #ifdef WSAEHOSTDOWN inscode(d, ds, de, "WSAEHOSTDOWN", WSAEHOSTDOWN, "Host is down"); #endif #ifdef WSAENETDOWN inscode(d, ds, de, "WSAENETDOWN", WSAENETDOWN, "Network is down"); #endif #ifdef WSAENOTSOCK inscode(d, ds, de, "WSAENOTSOCK", WSAENOTSOCK, "Socket operation on non-socket"); #endif #ifdef WSAEHOSTUNREACH inscode(d, ds, de, "WSAEHOSTUNREACH", WSAEHOSTUNREACH, "No route to host"); #endif #ifdef WSAELOOP inscode(d, ds, de, "WSAELOOP", WSAELOOP, "Too many symbolic links encountered"); #endif #ifdef WSAEMFILE inscode(d, ds, de, "WSAEMFILE", WSAEMFILE, "Too many open files"); #endif #ifdef WSAESTALE inscode(d, ds, de, "WSAESTALE", WSAESTALE, "Stale NFS file handle"); #endif #ifdef WSAVERNOTSUPPORTED inscode(d, ds, de, "WSAVERNOTSUPPORTED", WSAVERNOTSUPPORTED, "Error WSAVERNOTSUPPORTED"); #endif #ifdef WSAENETUNREACH inscode(d, ds, de, "WSAENETUNREACH", WSAENETUNREACH, "Network is unreachable"); #endif #ifdef WSAEPROCLIM inscode(d, ds, de, "WSAEPROCLIM", WSAEPROCLIM, "Error WSAEPROCLIM"); #endif #ifdef WSAEFAULT inscode(d, ds, de, "WSAEFAULT", WSAEFAULT, "Bad address"); #endif #ifdef WSANOTINITIALISED inscode(d, ds, de, "WSANOTINITIALISED", WSANOTINITIALISED, "Error WSANOTINITIALISED"); #endif #ifdef WSAEUSERS inscode(d, ds, de, "WSAEUSERS", WSAEUSERS, "Too many users"); #endif #ifdef WSAMAKEASYNCREPL inscode(d, ds, de, "WSAMAKEASYNCREPL", WSAMAKEASYNCREPL, "Error WSAMAKEASYNCREPL"); #endif #ifdef WSAENOPROTOOPT inscode(d, ds, de, "WSAENOPROTOOPT", WSAENOPROTOOPT, "Protocol not available"); #endif #ifdef WSAECONNABORTED inscode(d, ds, de, "WSAECONNABORTED", WSAECONNABORTED, "Software caused connection abort"); #endif #ifdef WSAENAMETOOLONG inscode(d, ds, de, "WSAENAMETOOLONG", WSAENAMETOOLONG, "File name too long"); #endif #ifdef WSAENOTEMPTY inscode(d, ds, de, "WSAENOTEMPTY", WSAENOTEMPTY, "Directory not empty"); #endif #ifdef WSAESHUTDOWN inscode(d, ds, de, "WSAESHUTDOWN", WSAESHUTDOWN, "Cannot send after transport endpoint shutdown"); #endif #ifdef WSAEAFNOSUPPORT inscode(d, ds, de, "WSAEAFNOSUPPORT", WSAEAFNOSUPPORT, "Address family not supported by protocol"); #endif #ifdef WSAETOOMANYREFS inscode(d, ds, de, "WSAETOOMANYREFS", WSAETOOMANYREFS, "Too many references: cannot splice"); #endif #ifdef WSAEACCES inscode(d, ds, de, "WSAEACCES", WSAEACCES, "Permission denied"); #endif #ifdef WSATR inscode(d, ds, de, "WSATR", WSATR, "Error WSATR"); #endif #ifdef WSABASEERR inscode(d, ds, de, "WSABASEERR", WSABASEERR, "Error WSABASEERR"); #endif #ifdef WSADESCRIPTIO inscode(d, ds, de, "WSADESCRIPTIO", WSADESCRIPTIO, "Error WSADESCRIPTIO"); #endif #ifdef WSAEMSGSIZE inscode(d, ds, de, "WSAEMSGSIZE", WSAEMSGSIZE, "Message too long"); #endif #ifdef WSAEBADF inscode(d, ds, de, "WSAEBADF", WSAEBADF, "Bad file number"); #endif #ifdef WSAECONNRESET inscode(d, ds, de, "WSAECONNRESET", WSAECONNRESET, "Connection reset by peer"); #endif #ifdef WSAGETSELECTERRO inscode(d, ds, de, "WSAGETSELECTERRO", WSAGETSELECTERRO, "Error WSAGETSELECTERRO"); #endif #ifdef WSAETIMEDOUT inscode(d, ds, de, "WSAETIMEDOUT", WSAETIMEDOUT, "Connection timed out"); #endif #ifdef WSAENOBUFS inscode(d, ds, de, "WSAENOBUFS", WSAENOBUFS, "No buffer space available"); #endif #ifdef WSAEDISCON inscode(d, ds, de, "WSAEDISCON", WSAEDISCON, "Error WSAEDISCON"); #endif #ifdef WSAEINTR inscode(d, ds, de, "WSAEINTR", WSAEINTR, "Interrupted system call"); #endif #ifdef WSAEPROTOTYPE inscode(d, ds, de, "WSAEPROTOTYPE", WSAEPROTOTYPE, "Protocol wrong type for socket"); #endif #ifdef WSAHOS inscode(d, ds, de, "WSAHOS", WSAHOS, "Error WSAHOS"); #endif #ifdef WSAEADDRINUSE inscode(d, ds, de, "WSAEADDRINUSE", WSAEADDRINUSE, "Address already in use"); #endif #ifdef WSAEADDRNOTAVAIL inscode(d, ds, de, "WSAEADDRNOTAVAIL", WSAEADDRNOTAVAIL, "Cannot assign requested address"); #endif #ifdef WSAEALREADY inscode(d, ds, de, "WSAEALREADY", WSAEALREADY, "Operation already in progress"); #endif #ifdef WSAEPROTONOSUPPORT inscode(d, ds, de, "WSAEPROTONOSUPPORT", WSAEPROTONOSUPPORT, "Protocol not supported"); #endif #ifdef WSASYSNOTREADY inscode(d, ds, de, "WSASYSNOTREADY", WSASYSNOTREADY, "Error WSASYSNOTREADY"); #endif #ifdef WSAEWOULDBLOCK inscode(d, ds, de, "WSAEWOULDBLOCK", WSAEWOULDBLOCK, "Operation would block"); #endif #ifdef WSAEPFNOSUPPORT inscode(d, ds, de, "WSAEPFNOSUPPORT", WSAEPFNOSUPPORT, "Protocol family not supported"); #endif #ifdef WSAEOPNOTSUPP inscode(d, ds, de, "WSAEOPNOTSUPP", WSAEOPNOTSUPP, "Operation not supported on transport endpoint"); #endif #ifdef WSAEISCONN inscode(d, ds, de, "WSAEISCONN", WSAEISCONN, "Transport endpoint is already connected"); #endif #ifdef WSAEDQUOT inscode(d, ds, de, "WSAEDQUOT", WSAEDQUOT, "Quota exceeded"); #endif #ifdef WSAENOTCONN inscode(d, ds, de, "WSAENOTCONN", WSAENOTCONN, "Transport endpoint is not connected"); #endif #ifdef WSAEREMOTE inscode(d, ds, de, "WSAEREMOTE", WSAEREMOTE, "Object is remote"); #endif #ifdef WSAEINVAL inscode(d, ds, de, "WSAEINVAL", WSAEINVAL, "Invalid argument"); #endif #ifdef WSAEINPROGRESS inscode(d, ds, de, "WSAEINPROGRESS", WSAEINPROGRESS, "Operation now in progress"); #endif #ifdef WSAGETSELECTEVEN inscode(d, ds, de, "WSAGETSELECTEVEN", WSAGETSELECTEVEN, "Error WSAGETSELECTEVEN"); #endif #ifdef WSAESOCKTNOSUPPORT inscode(d, ds, de, "WSAESOCKTNOSUPPORT", WSAESOCKTNOSUPPORT, "Socket type not supported"); #endif #ifdef WSAGETASYNCERRO inscode(d, ds, de, "WSAGETASYNCERRO", WSAGETASYNCERRO, "Error WSAGETASYNCERRO"); #endif #ifdef WSAMAKESELECTREPL inscode(d, ds, de, "WSAMAKESELECTREPL", WSAMAKESELECTREPL, "Error WSAMAKESELECTREPL"); #endif #ifdef WSAGETASYNCBUFLE inscode(d, ds, de, "WSAGETASYNCBUFLE", WSAGETASYNCBUFLE, "Error WSAGETASYNCBUFLE"); #endif #ifdef WSAEDESTADDRREQ inscode(d, ds, de, "WSAEDESTADDRREQ", WSAEDESTADDRREQ, "Destination address required"); #endif #ifdef WSAECONNREFUSED inscode(d, ds, de, "WSAECONNREFUSED", WSAECONNREFUSED, "Connection refused"); #endif #ifdef WSAENETRESET inscode(d, ds, de, "WSAENETRESET", WSAENETRESET, "Network dropped connection because of reset"); #endif #ifdef WSAN inscode(d, ds, de, "WSAN", WSAN, "Error WSAN"); #endif Py_DECREF(de); } Python-2.3.7/Modules/cmathmodule.c0000644001241000117560000001675407522367001016345 0ustar loewishpifb6/* Complex math module */ /* much code borrowed from mathmodule.c */ #include "Python.h" #ifndef M_PI #define M_PI (3.141592653589793239) #endif /* First, the C functions that do the real work */ /* constants */ static Py_complex c_one = {1., 0.}; static Py_complex c_half = {0.5, 0.}; static Py_complex c_i = {0., 1.}; static Py_complex c_halfi = {0., 0.5}; /* forward declarations */ static Py_complex c_log(Py_complex); static Py_complex c_prodi(Py_complex); static Py_complex c_sqrt(Py_complex); static Py_complex c_acos(Py_complex x) { return c_neg(c_prodi(c_log(c_sum(x,c_prod(c_i, c_sqrt(c_diff(c_one,c_prod(x,x)))))))); } PyDoc_STRVAR(c_acos_doc, "acos(x)\n" "\n" "Return the arc cosine of x."); static Py_complex c_acosh(Py_complex x) { Py_complex z; z = c_sqrt(c_half); z = c_log(c_prod(z, c_sum(c_sqrt(c_sum(x,c_one)), c_sqrt(c_diff(x,c_one))))); return c_sum(z, z); } PyDoc_STRVAR(c_acosh_doc, "acosh(x)\n" "\n" "Return the hyperbolic arccosine of x."); static Py_complex c_asin(Py_complex x) { /* -i * log[(sqrt(1-x**2) + i*x] */ const Py_complex squared = c_prod(x, x); const Py_complex sqrt_1_minus_x_sq = c_sqrt(c_diff(c_one, squared)); return c_neg(c_prodi(c_log( c_sum(sqrt_1_minus_x_sq, c_prodi(x)) ) ) ); } PyDoc_STRVAR(c_asin_doc, "asin(x)\n" "\n" "Return the arc sine of x."); static Py_complex c_asinh(Py_complex x) { Py_complex z; z = c_sqrt(c_half); z = c_log(c_prod(z, c_sum(c_sqrt(c_sum(x, c_i)), c_sqrt(c_diff(x, c_i))))); return c_sum(z, z); } PyDoc_STRVAR(c_asinh_doc, "asinh(x)\n" "\n" "Return the hyperbolic arc sine of x."); static Py_complex c_atan(Py_complex x) { return c_prod(c_halfi,c_log(c_quot(c_sum(c_i,x),c_diff(c_i,x)))); } PyDoc_STRVAR(c_atan_doc, "atan(x)\n" "\n" "Return the arc tangent of x."); static Py_complex c_atanh(Py_complex x) { return c_prod(c_half,c_log(c_quot(c_sum(c_one,x),c_diff(c_one,x)))); } PyDoc_STRVAR(c_atanh_doc, "atanh(x)\n" "\n" "Return the hyperbolic arc tangent of x."); static Py_complex c_cos(Py_complex x) { Py_complex r; r.real = cos(x.real)*cosh(x.imag); r.imag = -sin(x.real)*sinh(x.imag); return r; } PyDoc_STRVAR(c_cos_doc, "cos(x)\n" "n" "Return the cosine of x."); static Py_complex c_cosh(Py_complex x) { Py_complex r; r.real = cos(x.imag)*cosh(x.real); r.imag = sin(x.imag)*sinh(x.real); return r; } PyDoc_STRVAR(c_cosh_doc, "cosh(x)\n" "n" "Return the hyperbolic cosine of x."); static Py_complex c_exp(Py_complex x) { Py_complex r; double l = exp(x.real); r.real = l*cos(x.imag); r.imag = l*sin(x.imag); return r; } PyDoc_STRVAR(c_exp_doc, "exp(x)\n" "\n" "Return the exponential value e**x."); static Py_complex c_log(Py_complex x) { Py_complex r; double l = hypot(x.real,x.imag); r.imag = atan2(x.imag, x.real); r.real = log(l); return r; } PyDoc_STRVAR(c_log_doc, "log(x)\n" "\n" "Return the natural logarithm of x."); static Py_complex c_log10(Py_complex x) { Py_complex r; double l = hypot(x.real,x.imag); r.imag = atan2(x.imag, x.real)/log(10.); r.real = log10(l); return r; } PyDoc_STRVAR(c_log10_doc, "log10(x)\n" "\n" "Return the base-10 logarithm of x."); /* internal function not available from Python */ static Py_complex c_prodi(Py_complex x) { Py_complex r; r.real = -x.imag; r.imag = x.real; return r; } static Py_complex c_sin(Py_complex x) { Py_complex r; r.real = sin(x.real) * cosh(x.imag); r.imag = cos(x.real) * sinh(x.imag); return r; } PyDoc_STRVAR(c_sin_doc, "sin(x)\n" "\n" "Return the sine of x."); static Py_complex c_sinh(Py_complex x) { Py_complex r; r.real = cos(x.imag) * sinh(x.real); r.imag = sin(x.imag) * cosh(x.real); return r; } PyDoc_STRVAR(c_sinh_doc, "sinh(x)\n" "\n" "Return the hyperbolic sine of x."); static Py_complex c_sqrt(Py_complex x) { Py_complex r; double s,d; if (x.real == 0. && x.imag == 0.) r = x; else { s = sqrt(0.5*(fabs(x.real) + hypot(x.real,x.imag))); d = 0.5*x.imag/s; if (x.real > 0.) { r.real = s; r.imag = d; } else if (x.imag >= 0.) { r.real = d; r.imag = s; } else { r.real = -d; r.imag = -s; } } return r; } PyDoc_STRVAR(c_sqrt_doc, "sqrt(x)\n" "\n" "Return the square root of x."); static Py_complex c_tan(Py_complex x) { Py_complex r; double sr,cr,shi,chi; double rs,is,rc,ic; double d; sr = sin(x.real); cr = cos(x.real); shi = sinh(x.imag); chi = cosh(x.imag); rs = sr * chi; is = cr * shi; rc = cr * chi; ic = -sr * shi; d = rc*rc + ic * ic; r.real = (rs*rc + is*ic) / d; r.imag = (is*rc - rs*ic) / d; return r; } PyDoc_STRVAR(c_tan_doc, "tan(x)\n" "\n" "Return the tangent of x."); static Py_complex c_tanh(Py_complex x) { Py_complex r; double si,ci,shr,chr; double rs,is,rc,ic; double d; si = sin(x.imag); ci = cos(x.imag); shr = sinh(x.real); chr = cosh(x.real); rs = ci * shr; is = si * chr; rc = ci * chr; ic = si * shr; d = rc*rc + ic*ic; r.real = (rs*rc + is*ic) / d; r.imag = (is*rc - rs*ic) / d; return r; } PyDoc_STRVAR(c_tanh_doc, "tanh(x)\n" "\n" "Return the hyperbolic tangent of x."); /* And now the glue to make them available from Python: */ static PyObject * math_error(void) { if (errno == EDOM) PyErr_SetString(PyExc_ValueError, "math domain error"); else if (errno == ERANGE) PyErr_SetString(PyExc_OverflowError, "math range error"); else /* Unexpected math error */ PyErr_SetFromErrno(PyExc_ValueError); return NULL; } static PyObject * math_1(PyObject *args, Py_complex (*func)(Py_complex)) { Py_complex x; if (!PyArg_ParseTuple(args, "D", &x)) return NULL; errno = 0; PyFPE_START_PROTECT("complex function", return 0) x = (*func)(x); PyFPE_END_PROTECT(x) Py_ADJUST_ERANGE2(x.real, x.imag); if (errno != 0) return math_error(); else return PyComplex_FromCComplex(x); } #define FUNC1(stubname, func) \ static PyObject * stubname(PyObject *self, PyObject *args) { \ return math_1(args, func); \ } FUNC1(cmath_acos, c_acos) FUNC1(cmath_acosh, c_acosh) FUNC1(cmath_asin, c_asin) FUNC1(cmath_asinh, c_asinh) FUNC1(cmath_atan, c_atan) FUNC1(cmath_atanh, c_atanh) FUNC1(cmath_cos, c_cos) FUNC1(cmath_cosh, c_cosh) FUNC1(cmath_exp, c_exp) FUNC1(cmath_log, c_log) FUNC1(cmath_log10, c_log10) FUNC1(cmath_sin, c_sin) FUNC1(cmath_sinh, c_sinh) FUNC1(cmath_sqrt, c_sqrt) FUNC1(cmath_tan, c_tan) FUNC1(cmath_tanh, c_tanh) PyDoc_STRVAR(module_doc, "This module is always available. It provides access to mathematical\n" "functions for complex numbers."); static PyMethodDef cmath_methods[] = { {"acos", cmath_acos, METH_VARARGS, c_acos_doc}, {"acosh", cmath_acosh, METH_VARARGS, c_acosh_doc}, {"asin", cmath_asin, METH_VARARGS, c_asin_doc}, {"asinh", cmath_asinh, METH_VARARGS, c_asinh_doc}, {"atan", cmath_atan, METH_VARARGS, c_atan_doc}, {"atanh", cmath_atanh, METH_VARARGS, c_atanh_doc}, {"cos", cmath_cos, METH_VARARGS, c_cos_doc}, {"cosh", cmath_cosh, METH_VARARGS, c_cosh_doc}, {"exp", cmath_exp, METH_VARARGS, c_exp_doc}, {"log", cmath_log, METH_VARARGS, c_log_doc}, {"log10", cmath_log10, METH_VARARGS, c_log10_doc}, {"sin", cmath_sin, METH_VARARGS, c_sin_doc}, {"sinh", cmath_sinh, METH_VARARGS, c_sinh_doc}, {"sqrt", cmath_sqrt, METH_VARARGS, c_sqrt_doc}, {"tan", cmath_tan, METH_VARARGS, c_tan_doc}, {"tanh", cmath_tanh, METH_VARARGS, c_tanh_doc}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initcmath(void) { PyObject *m; m = Py_InitModule3("cmath", cmath_methods, module_doc); PyModule_AddObject(m, "pi", PyFloat_FromDouble(atan(1.0) * 4.0)); PyModule_AddObject(m, "e", PyFloat_FromDouble(exp(1.0))); } Python-2.3.7/Modules/md5c.c0000644001241000117560000002270707744771210014675 0ustar loewishpifb6/* MD5C.C - RSA Data Security, Inc., MD5 message-digest algorithm */ /* Copyright (C) 1991-2, RSA Data Security, Inc. Created 1991. All rights reserved. License to copy and use this software is granted provided that it is identified as the "RSA Data Security, Inc. MD5 Message-Digest Algorithm" in all material mentioning or referencing this software or this function. License is also granted to make and use derivative works provided that such works are identified as "derived from the RSA Data Security, Inc. MD5 Message-Digest Algorithm" in all material mentioning or referencing the derived work. RSA Data Security, Inc. makes no representations concerning either the merchantability of this software or the suitability of this software for any particular purpose. It is provided "as is" without express or implied warranty of any kind. These notices must be retained in any copies of any part of this documentation and/or software. */ #include "Python.h" #include "md5.h" /* Constants for MD5Transform routine. */ #define S11 7 #define S12 12 #define S13 17 #define S14 22 #define S21 5 #define S22 9 #define S23 14 #define S24 20 #define S31 4 #define S32 11 #define S33 16 #define S34 23 #define S41 6 #define S42 10 #define S43 15 #define S44 21 static void MD5Transform(UINT4[4], unsigned char[64]); static void Encode(unsigned char *, UINT4 *, unsigned int); static void Decode(UINT4 *, unsigned char *, unsigned int); static unsigned char PADDING[64] = { 0x80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; /* F, G, H and I are basic MD5 functions. */ #define F(x, y, z) (((x) & (y)) | ((~x) & (z))) #define G(x, y, z) (((x) & (z)) | ((y) & (~z))) #define H(x, y, z) ((x) ^ (y) ^ (z)) #define I(x, y, z) ((y) ^ ((x) | (~z))) /* ROTATE_LEFT rotates x left n bits. */ #define ROTATE_LEFT(x, n) (((x) << (n)) | ((x) >> (32-(n)))) /* FF, GG, HH, and II transformations for rounds 1, 2, 3, and 4. Rotation is separate from addition to prevent recomputation. */ #define FF(a, b, c, d, x, s, ac) { \ (a) += F ((b), (c), (d)) + (x) + (UINT4)(ac); \ (a) = ROTATE_LEFT ((a), (s)); \ (a) += (b); \ } #define GG(a, b, c, d, x, s, ac) { \ (a) += G ((b), (c), (d)) + (x) + (UINT4)(ac); \ (a) = ROTATE_LEFT ((a), (s)); \ (a) += (b); \ } #define HH(a, b, c, d, x, s, ac) { \ (a) += H ((b), (c), (d)) + (x) + (UINT4)(ac); \ (a) = ROTATE_LEFT ((a), (s)); \ (a) += (b); \ } #define II(a, b, c, d, x, s, ac) { \ (a) += I ((b), (c), (d)) + (x) + (UINT4)(ac); \ (a) = ROTATE_LEFT ((a), (s)); \ (a) += (b); \ } /* MD5 initialization. Begins an MD5 operation, writing a new context. */ void MD5Init(MD5_CTX *context) { context->count[0] = context->count[1] = 0; /* Load magic initialization constants. */ context->state[0] = 0x67452301; context->state[1] = 0xefcdab89; context->state[2] = 0x98badcfe; context->state[3] = 0x10325476; } /* MD5 block update operation. Continues an MD5 message-digest operation, processing another message block, and updating the context. */ void MD5Update(MD5_CTX *context, unsigned char *input, unsigned int inputLen) { unsigned int i, index, partLen; /* Compute number of bytes mod 64 */ index = (unsigned int)((context->count[0] >> 3) & 0x3F); /* Update number of bits */ if ((context->count[0] += ((UINT4)inputLen << 3)) < ((UINT4)inputLen << 3)) context->count[1]++; context->count[1] += ((UINT4)inputLen >> 29); partLen = 64 - index; /* Transform as many times as possible. */ if (inputLen >= partLen) { memcpy((POINTER)&context->buffer[index], (POINTER)input, partLen); MD5Transform(context->state, context->buffer); for (i = partLen; i + 63 < inputLen; i += 64) MD5Transform(context->state, &input[i]); index = 0; } else i = 0; /* Buffer remaining input */ memcpy((POINTER)&context->buffer[index], (POINTER)&input[i], inputLen-i); } /* MD5 finalization. Ends an MD5 message-digest operation, writing the message digest and zeroing the context. */ void MD5Final(unsigned char digest[16], MD5_CTX *context) { unsigned char bits[8]; unsigned int index, padLen; /* Save number of bits */ Encode (bits, context->count, 8); /* Pad out to 56 mod 64. */ index = (unsigned int)((context->count[0] >> 3) & 0x3f); padLen = (index < 56) ? (56 - index) : (120 - index); MD5Update(context, PADDING, padLen); /* Append length (before padding) */ MD5Update(context, bits, 8); /* Store state in digest */ Encode(digest, context->state, 16); /* Zeroize sensitive information. */ memset((POINTER)context, 0, sizeof (*context)); } /* MD5 basic transformation. Transforms state based on block. */ static void MD5Transform(UINT4 state[4], unsigned char block[64]) { UINT4 a = state[0], b = state[1], c = state[2], d = state[3], x[16]; Decode (x, block, 64); /* Round 1 */ FF(a, b, c, d, x[ 0], S11, 0xd76aa478); /* 1 */ FF(d, a, b, c, x[ 1], S12, 0xe8c7b756); /* 2 */ FF(c, d, a, b, x[ 2], S13, 0x242070db); /* 3 */ FF(b, c, d, a, x[ 3], S14, 0xc1bdceee); /* 4 */ FF(a, b, c, d, x[ 4], S11, 0xf57c0faf); /* 5 */ FF(d, a, b, c, x[ 5], S12, 0x4787c62a); /* 6 */ FF(c, d, a, b, x[ 6], S13, 0xa8304613); /* 7 */ FF(b, c, d, a, x[ 7], S14, 0xfd469501); /* 8 */ FF(a, b, c, d, x[ 8], S11, 0x698098d8); /* 9 */ FF(d, a, b, c, x[ 9], S12, 0x8b44f7af); /* 10 */ FF(c, d, a, b, x[10], S13, 0xffff5bb1); /* 11 */ FF(b, c, d, a, x[11], S14, 0x895cd7be); /* 12 */ FF(a, b, c, d, x[12], S11, 0x6b901122); /* 13 */ FF(d, a, b, c, x[13], S12, 0xfd987193); /* 14 */ FF(c, d, a, b, x[14], S13, 0xa679438e); /* 15 */ FF(b, c, d, a, x[15], S14, 0x49b40821); /* 16 */ /* Round 2 */ GG(a, b, c, d, x[ 1], S21, 0xf61e2562); /* 17 */ GG(d, a, b, c, x[ 6], S22, 0xc040b340); /* 18 */ GG(c, d, a, b, x[11], S23, 0x265e5a51); /* 19 */ GG(b, c, d, a, x[ 0], S24, 0xe9b6c7aa); /* 20 */ GG(a, b, c, d, x[ 5], S21, 0xd62f105d); /* 21 */ GG(d, a, b, c, x[10], S22, 0x2441453); /* 22 */ GG(c, d, a, b, x[15], S23, 0xd8a1e681); /* 23 */ GG(b, c, d, a, x[ 4], S24, 0xe7d3fbc8); /* 24 */ GG(a, b, c, d, x[ 9], S21, 0x21e1cde6); /* 25 */ GG(d, a, b, c, x[14], S22, 0xc33707d6); /* 26 */ GG(c, d, a, b, x[ 3], S23, 0xf4d50d87); /* 27 */ GG(b, c, d, a, x[ 8], S24, 0x455a14ed); /* 28 */ GG(a, b, c, d, x[13], S21, 0xa9e3e905); /* 29 */ GG(d, a, b, c, x[ 2], S22, 0xfcefa3f8); /* 30 */ GG(c, d, a, b, x[ 7], S23, 0x676f02d9); /* 31 */ GG(b, c, d, a, x[12], S24, 0x8d2a4c8a); /* 32 */ /* Round 3 */ HH(a, b, c, d, x[ 5], S31, 0xfffa3942); /* 33 */ HH(d, a, b, c, x[ 8], S32, 0x8771f681); /* 34 */ HH(c, d, a, b, x[11], S33, 0x6d9d6122); /* 35 */ HH(b, c, d, a, x[14], S34, 0xfde5380c); /* 36 */ HH(a, b, c, d, x[ 1], S31, 0xa4beea44); /* 37 */ HH(d, a, b, c, x[ 4], S32, 0x4bdecfa9); /* 38 */ HH(c, d, a, b, x[ 7], S33, 0xf6bb4b60); /* 39 */ HH(b, c, d, a, x[10], S34, 0xbebfbc70); /* 40 */ HH(a, b, c, d, x[13], S31, 0x289b7ec6); /* 41 */ HH(d, a, b, c, x[ 0], S32, 0xeaa127fa); /* 42 */ HH(c, d, a, b, x[ 3], S33, 0xd4ef3085); /* 43 */ HH(b, c, d, a, x[ 6], S34, 0x4881d05); /* 44 */ HH(a, b, c, d, x[ 9], S31, 0xd9d4d039); /* 45 */ HH(d, a, b, c, x[12], S32, 0xe6db99e5); /* 46 */ HH(c, d, a, b, x[15], S33, 0x1fa27cf8); /* 47 */ HH(b, c, d, a, x[ 2], S34, 0xc4ac5665); /* 48 */ /* Round 4 */ II(a, b, c, d, x[ 0], S41, 0xf4292244); /* 49 */ II(d, a, b, c, x[ 7], S42, 0x432aff97); /* 50 */ II(c, d, a, b, x[14], S43, 0xab9423a7); /* 51 */ II(b, c, d, a, x[ 5], S44, 0xfc93a039); /* 52 */ II(a, b, c, d, x[12], S41, 0x655b59c3); /* 53 */ II(d, a, b, c, x[ 3], S42, 0x8f0ccc92); /* 54 */ II(c, d, a, b, x[10], S43, 0xffeff47d); /* 55 */ II(b, c, d, a, x[ 1], S44, 0x85845dd1); /* 56 */ II(a, b, c, d, x[ 8], S41, 0x6fa87e4f); /* 57 */ II(d, a, b, c, x[15], S42, 0xfe2ce6e0); /* 58 */ II(c, d, a, b, x[ 6], S43, 0xa3014314); /* 59 */ II(b, c, d, a, x[13], S44, 0x4e0811a1); /* 60 */ II(a, b, c, d, x[ 4], S41, 0xf7537e82); /* 61 */ II(d, a, b, c, x[11], S42, 0xbd3af235); /* 62 */ II(c, d, a, b, x[ 2], S43, 0x2ad7d2bb); /* 63 */ II(b, c, d, a, x[ 9], S44, 0xeb86d391); /* 64 */ state[0] += a; state[1] += b; state[2] += c; state[3] += d; /* Zeroize sensitive information. */ memset((POINTER)x, 0, sizeof (x)); } /* Encodes input (UINT4) into output (unsigned char). Assumes len is a multiple of 4. */ static void Encode(unsigned char *output, UINT4 *input, unsigned int len) { unsigned int i, j; for (i = 0, j = 0; j < len; i++, j += 4) { output[j] = (unsigned char)(input[i] & 0xff); output[j+1] = (unsigned char)((input[i] >> 8) & 0xff); output[j+2] = (unsigned char)((input[i] >> 16) & 0xff); output[j+3] = (unsigned char)((input[i] >> 24) & 0xff); } } /* Decodes input (unsigned char) into output (UINT4). Assumes len is a multiple of 4. */ static void Decode(UINT4 *output, unsigned char *input, unsigned int len) { unsigned int i, j; for (i = 0, j = 0; j < len; i++, j += 4) { output[i] = ((UINT4)input[j]) | (((UINT4)input[j+1]) << 8) | (((UINT4)input[j+2]) << 16) | (((UINT4)input[j+3]) << 24); } } Python-2.3.7/Modules/termios.c0000644001241000117560000004457307750456424015540 0ustar loewishpifb6/* termiosmodule.c -- POSIX terminal I/O module implementation. */ #include "Python.h" #define PyInit_termios inittermios /* Apparently, on SGI, termios.h won't define CTRL if _XOPEN_SOURCE is defined, so we define it here. */ #if defined(__sgi) #define CTRL(c) ((c)&037) #endif #include #ifdef __osf__ /* On OSF, sys/ioctl.h requires that struct termio already be defined, * so this needs to be included first on that platform. */ #include #endif #include /* HP-UX requires that this be included to pick up MDCD, MCTS, MDSR, * MDTR, MRI, and MRTS (appearantly used internally by some things * defined as macros; these are not used here directly). */ #ifdef HAVE_SYS_MODEM_H #include #endif /* HP-UX requires that this be included to pick up TIOCGPGRP and friends */ #ifdef HAVE_SYS_BSDTTY_H #include #endif PyDoc_STRVAR(termios__doc__, "This module provides an interface to the Posix calls for tty I/O control.\n\ For a complete description of these calls, see the Posix or Unix manual\n\ pages. It is only available for those Unix versions that support Posix\n\ termios style tty I/O control.\n\ \n\ All functions in this module take a file descriptor fd as their first\n\ argument. This can be an integer file descriptor, such as returned by\n\ sys.stdin.fileno(), or a file object, such as sys.stdin itself."); static PyObject *TermiosError; static int fdconv(PyObject* obj, void* p) { int fd; fd = PyObject_AsFileDescriptor(obj); if (fd >= 0) { *(int*)p = fd; return 1; } return 0; } PyDoc_STRVAR(termios_tcgetattr__doc__, "tcgetattr(fd) -> list_of_attrs\n\ \n\ Get the tty attributes for file descriptor fd, as follows:\n\ [iflag, oflag, cflag, lflag, ispeed, ospeed, cc] where cc is a list\n\ of the tty special characters (each a string of length 1, except the items\n\ with indices VMIN and VTIME, which are integers when these fields are\n\ defined). The interpretation of the flags and the speeds as well as the\n\ indexing in the cc array must be done using the symbolic constants defined\n\ in this module."); static PyObject * termios_tcgetattr(PyObject *self, PyObject *args) { int fd; struct termios mode; PyObject *cc; speed_t ispeed, ospeed; PyObject *v; int i; char ch; if (!PyArg_ParseTuple(args, "O&:tcgetattr", fdconv, (void*)&fd)) return NULL; if (tcgetattr(fd, &mode) == -1) return PyErr_SetFromErrno(TermiosError); ispeed = cfgetispeed(&mode); ospeed = cfgetospeed(&mode); cc = PyList_New(NCCS); if (cc == NULL) return NULL; for (i = 0; i < NCCS; i++) { ch = (char)mode.c_cc[i]; v = PyString_FromStringAndSize(&ch, 1); if (v == NULL) goto err; PyList_SetItem(cc, i, v); } /* Convert the MIN and TIME slots to integer. On some systems, the MIN and TIME slots are the same as the EOF and EOL slots. So we only do this in noncanonical input mode. */ if ((mode.c_lflag & ICANON) == 0) { v = PyInt_FromLong((long)mode.c_cc[VMIN]); if (v == NULL) goto err; PyList_SetItem(cc, VMIN, v); v = PyInt_FromLong((long)mode.c_cc[VTIME]); if (v == NULL) goto err; PyList_SetItem(cc, VTIME, v); } if (!(v = PyList_New(7))) goto err; PyList_SetItem(v, 0, PyInt_FromLong((long)mode.c_iflag)); PyList_SetItem(v, 1, PyInt_FromLong((long)mode.c_oflag)); PyList_SetItem(v, 2, PyInt_FromLong((long)mode.c_cflag)); PyList_SetItem(v, 3, PyInt_FromLong((long)mode.c_lflag)); PyList_SetItem(v, 4, PyInt_FromLong((long)ispeed)); PyList_SetItem(v, 5, PyInt_FromLong((long)ospeed)); PyList_SetItem(v, 6, cc); if (PyErr_Occurred()){ Py_DECREF(v); goto err; } return v; err: Py_DECREF(cc); return NULL; } PyDoc_STRVAR(termios_tcsetattr__doc__, "tcsetattr(fd, when, attributes) -> None\n\ \n\ Set the tty attributes for file descriptor fd.\n\ The attributes to be set are taken from the attributes argument, which\n\ is a list like the one returned by tcgetattr(). The when argument\n\ determines when the attributes are changed: termios.TCSANOW to\n\ change immediately, termios.TCSADRAIN to change after transmitting all\n\ queued output, or termios.TCSAFLUSH to change after transmitting all\n\ queued output and discarding all queued input. "); static PyObject * termios_tcsetattr(PyObject *self, PyObject *args) { int fd, when; struct termios mode; speed_t ispeed, ospeed; PyObject *term, *cc, *v; int i; if (!PyArg_ParseTuple(args, "O&iO:tcsetattr", fdconv, &fd, &when, &term)) return NULL; if (!PyList_Check(term) || PyList_Size(term) != 7) { PyErr_SetString(PyExc_TypeError, "tcsetattr, arg 3: must be 7 element list"); return NULL; } /* Get the old mode, in case there are any hidden fields... */ if (tcgetattr(fd, &mode) == -1) return PyErr_SetFromErrno(TermiosError); mode.c_iflag = (tcflag_t) PyInt_AsLong(PyList_GetItem(term, 0)); mode.c_oflag = (tcflag_t) PyInt_AsLong(PyList_GetItem(term, 1)); mode.c_cflag = (tcflag_t) PyInt_AsLong(PyList_GetItem(term, 2)); mode.c_lflag = (tcflag_t) PyInt_AsLong(PyList_GetItem(term, 3)); ispeed = (speed_t) PyInt_AsLong(PyList_GetItem(term, 4)); ospeed = (speed_t) PyInt_AsLong(PyList_GetItem(term, 5)); cc = PyList_GetItem(term, 6); if (PyErr_Occurred()) return NULL; if (!PyList_Check(cc) || PyList_Size(cc) != NCCS) { PyErr_Format(PyExc_TypeError, "tcsetattr: attributes[6] must be %d element list", NCCS); return NULL; } for (i = 0; i < NCCS; i++) { v = PyList_GetItem(cc, i); if (PyString_Check(v) && PyString_Size(v) == 1) mode.c_cc[i] = (cc_t) * PyString_AsString(v); else if (PyInt_Check(v)) mode.c_cc[i] = (cc_t) PyInt_AsLong(v); else { PyErr_SetString(PyExc_TypeError, "tcsetattr: elements of attributes must be characters or integers"); return NULL; } } if (cfsetispeed(&mode, (speed_t) ispeed) == -1) return PyErr_SetFromErrno(TermiosError); if (cfsetospeed(&mode, (speed_t) ospeed) == -1) return PyErr_SetFromErrno(TermiosError); if (tcsetattr(fd, when, &mode) == -1) return PyErr_SetFromErrno(TermiosError); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(termios_tcsendbreak__doc__, "tcsendbreak(fd, duration) -> None\n\ \n\ Send a break on file descriptor fd.\n\ A zero duration sends a break for 0.25-0.5 seconds; a nonzero duration\n\ has a system dependent meaning."); static PyObject * termios_tcsendbreak(PyObject *self, PyObject *args) { int fd, duration; if (!PyArg_ParseTuple(args, "O&i:tcsendbreak", fdconv, &fd, &duration)) return NULL; if (tcsendbreak(fd, duration) == -1) return PyErr_SetFromErrno(TermiosError); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(termios_tcdrain__doc__, "tcdrain(fd) -> None\n\ \n\ Wait until all output written to file descriptor fd has been transmitted."); static PyObject * termios_tcdrain(PyObject *self, PyObject *args) { int fd; if (!PyArg_ParseTuple(args, "O&:tcdrain", fdconv, &fd)) return NULL; if (tcdrain(fd) == -1) return PyErr_SetFromErrno(TermiosError); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(termios_tcflush__doc__, "tcflush(fd, queue) -> None\n\ \n\ Discard queued data on file descriptor fd.\n\ The queue selector specifies which queue: termios.TCIFLUSH for the input\n\ queue, termios.TCOFLUSH for the output queue, or termios.TCIOFLUSH for\n\ both queues. "); static PyObject * termios_tcflush(PyObject *self, PyObject *args) { int fd, queue; if (!PyArg_ParseTuple(args, "O&i:tcflush", fdconv, &fd, &queue)) return NULL; if (tcflush(fd, queue) == -1) return PyErr_SetFromErrno(TermiosError); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(termios_tcflow__doc__, "tcflow(fd, action) -> None\n\ \n\ Suspend or resume input or output on file descriptor fd.\n\ The action argument can be termios.TCOOFF to suspend output,\n\ termios.TCOON to restart output, termios.TCIOFF to suspend input,\n\ or termios.TCION to restart input."); static PyObject * termios_tcflow(PyObject *self, PyObject *args) { int fd, action; if (!PyArg_ParseTuple(args, "O&i:tcflow", fdconv, &fd, &action)) return NULL; if (tcflow(fd, action) == -1) return PyErr_SetFromErrno(TermiosError); Py_INCREF(Py_None); return Py_None; } static PyMethodDef termios_methods[] = { {"tcgetattr", termios_tcgetattr, METH_VARARGS, termios_tcgetattr__doc__}, {"tcsetattr", termios_tcsetattr, METH_VARARGS, termios_tcsetattr__doc__}, {"tcsendbreak", termios_tcsendbreak, METH_VARARGS, termios_tcsendbreak__doc__}, {"tcdrain", termios_tcdrain, METH_VARARGS, termios_tcdrain__doc__}, {"tcflush", termios_tcflush, METH_VARARGS, termios_tcflush__doc__}, {"tcflow", termios_tcflow, METH_VARARGS, termios_tcflow__doc__}, {NULL, NULL} }; #if defined(VSWTCH) && !defined(VSWTC) #define VSWTC VSWTCH #endif #if defined(VSWTC) && !defined(VSWTCH) #define VSWTCH VSWTC #endif static struct constant { char *name; long value; } termios_constants[] = { /* cfgetospeed(), cfsetospeed() constants */ {"B0", B0}, {"B50", B50}, {"B75", B75}, {"B110", B110}, {"B134", B134}, {"B150", B150}, {"B200", B200}, {"B300", B300}, {"B600", B600}, {"B1200", B1200}, {"B1800", B1800}, {"B2400", B2400}, {"B4800", B4800}, {"B9600", B9600}, {"B19200", B19200}, {"B38400", B38400}, #ifdef B57600 {"B57600", B57600}, #endif #ifdef B115200 {"B115200", B115200}, #endif #ifdef B230400 {"B230400", B230400}, #endif #ifdef CBAUDEX {"CBAUDEX", CBAUDEX}, #endif /* tcsetattr() constants */ {"TCSANOW", TCSANOW}, {"TCSADRAIN", TCSADRAIN}, {"TCSAFLUSH", TCSAFLUSH}, /* tcflush() constants */ {"TCIFLUSH", TCIFLUSH}, {"TCOFLUSH", TCOFLUSH}, {"TCIOFLUSH", TCIOFLUSH}, /* tcflow() constants */ {"TCOOFF", TCOOFF}, {"TCOON", TCOON}, {"TCIOFF", TCIOFF}, {"TCION", TCION}, /* struct termios.c_iflag constants */ {"IGNBRK", IGNBRK}, {"BRKINT", BRKINT}, {"IGNPAR", IGNPAR}, {"PARMRK", PARMRK}, {"INPCK", INPCK}, {"ISTRIP", ISTRIP}, {"INLCR", INLCR}, {"IGNCR", IGNCR}, {"ICRNL", ICRNL}, #ifdef IUCLC {"IUCLC", IUCLC}, #endif {"IXON", IXON}, {"IXANY", IXANY}, {"IXOFF", IXOFF}, #ifdef IMAXBEL {"IMAXBEL", IMAXBEL}, #endif /* struct termios.c_oflag constants */ {"OPOST", OPOST}, #ifdef OLCUC {"OLCUC", OLCUC}, #endif #ifdef ONLCR {"ONLCR", ONLCR}, #endif #ifdef OCRNL {"OCRNL", OCRNL}, #endif #ifdef ONOCR {"ONOCR", ONOCR}, #endif #ifdef ONLRET {"ONLRET", ONLRET}, #endif #ifdef OFILL {"OFILL", OFILL}, #endif #ifdef OFDEL {"OFDEL", OFDEL}, #endif #ifdef NLDLY {"NLDLY", NLDLY}, #endif #ifdef CRDLY {"CRDLY", CRDLY}, #endif #ifdef TABDLY {"TABDLY", TABDLY}, #endif #ifdef BSDLY {"BSDLY", BSDLY}, #endif #ifdef VTDLY {"VTDLY", VTDLY}, #endif #ifdef FFDLY {"FFDLY", FFDLY}, #endif /* struct termios.c_oflag-related values (delay mask) */ #ifdef NL0 {"NL0", NL0}, #endif #ifdef NL1 {"NL1", NL1}, #endif #ifdef CR0 {"CR0", CR0}, #endif #ifdef CR1 {"CR1", CR1}, #endif #ifdef CR2 {"CR2", CR2}, #endif #ifdef CR3 {"CR3", CR3}, #endif #ifdef TAB0 {"TAB0", TAB0}, #endif #ifdef TAB1 {"TAB1", TAB1}, #endif #ifdef TAB2 {"TAB2", TAB2}, #endif #ifdef TAB3 {"TAB3", TAB3}, #endif #ifdef XTABS {"XTABS", XTABS}, #endif #ifdef BS0 {"BS0", BS0}, #endif #ifdef BS1 {"BS1", BS1}, #endif #ifdef VT0 {"VT0", VT0}, #endif #ifdef VT1 {"VT1", VT1}, #endif #ifdef FF0 {"FF0", FF0}, #endif #ifdef FF1 {"FF1", FF1}, #endif /* struct termios.c_cflag constants */ {"CSIZE", CSIZE}, {"CSTOPB", CSTOPB}, {"CREAD", CREAD}, {"PARENB", PARENB}, {"PARODD", PARODD}, {"HUPCL", HUPCL}, {"CLOCAL", CLOCAL}, #ifdef CIBAUD {"CIBAUD", CIBAUD}, #endif #ifdef CRTSCTS {"CRTSCTS", (long)CRTSCTS}, #endif /* struct termios.c_cflag-related values (character size) */ {"CS5", CS5}, {"CS6", CS6}, {"CS7", CS7}, {"CS8", CS8}, /* struct termios.c_lflag constants */ {"ISIG", ISIG}, {"ICANON", ICANON}, #ifdef XCASE {"XCASE", XCASE}, #endif {"ECHO", ECHO}, {"ECHOE", ECHOE}, {"ECHOK", ECHOK}, {"ECHONL", ECHONL}, #ifdef ECHOCTL {"ECHOCTL", ECHOCTL}, #endif #ifdef ECHOPRT {"ECHOPRT", ECHOPRT}, #endif #ifdef ECHOKE {"ECHOKE", ECHOKE}, #endif #ifdef FLUSHO {"FLUSHO", FLUSHO}, #endif {"NOFLSH", NOFLSH}, {"TOSTOP", TOSTOP}, #ifdef PENDIN {"PENDIN", PENDIN}, #endif {"IEXTEN", IEXTEN}, /* indexes into the control chars array returned by tcgetattr() */ {"VINTR", VINTR}, {"VQUIT", VQUIT}, {"VERASE", VERASE}, {"VKILL", VKILL}, {"VEOF", VEOF}, {"VTIME", VTIME}, {"VMIN", VMIN}, #ifdef VSWTC /* The #defines above ensure that if either is defined, both are, * but both may be omitted by the system headers. ;-( */ {"VSWTC", VSWTC}, {"VSWTCH", VSWTCH}, #endif {"VSTART", VSTART}, {"VSTOP", VSTOP}, {"VSUSP", VSUSP}, {"VEOL", VEOL}, #ifdef VREPRINT {"VREPRINT", VREPRINT}, #endif #ifdef VDISCARD {"VDISCARD", VDISCARD}, #endif #ifdef VWERASE {"VWERASE", VWERASE}, #endif #ifdef VLNEXT {"VLNEXT", VLNEXT}, #endif #ifdef VEOL2 {"VEOL2", VEOL2}, #endif #ifdef B460800 {"B460800", B460800}, #endif #ifdef CBAUD {"CBAUD", CBAUD}, #endif #ifdef CDEL {"CDEL", CDEL}, #endif #ifdef CDSUSP {"CDSUSP", CDSUSP}, #endif #ifdef CEOF {"CEOF", CEOF}, #endif #ifdef CEOL {"CEOL", CEOL}, #endif #ifdef CEOL2 {"CEOL2", CEOL2}, #endif #ifdef CEOT {"CEOT", CEOT}, #endif #ifdef CERASE {"CERASE", CERASE}, #endif #ifdef CESC {"CESC", CESC}, #endif #ifdef CFLUSH {"CFLUSH", CFLUSH}, #endif #ifdef CINTR {"CINTR", CINTR}, #endif #ifdef CKILL {"CKILL", CKILL}, #endif #ifdef CLNEXT {"CLNEXT", CLNEXT}, #endif #ifdef CNUL {"CNUL", CNUL}, #endif #ifdef COMMON {"COMMON", COMMON}, #endif #ifdef CQUIT {"CQUIT", CQUIT}, #endif #ifdef CRPRNT {"CRPRNT", CRPRNT}, #endif #ifdef CSTART {"CSTART", CSTART}, #endif #ifdef CSTOP {"CSTOP", CSTOP}, #endif #ifdef CSUSP {"CSUSP", CSUSP}, #endif #ifdef CSWTCH {"CSWTCH", CSWTCH}, #endif #ifdef CWERASE {"CWERASE", CWERASE}, #endif #ifdef EXTA {"EXTA", EXTA}, #endif #ifdef EXTB {"EXTB", EXTB}, #endif #ifdef FIOASYNC {"FIOASYNC", FIOASYNC}, #endif #ifdef FIOCLEX {"FIOCLEX", FIOCLEX}, #endif #ifdef FIONBIO {"FIONBIO", FIONBIO}, #endif #ifdef FIONCLEX {"FIONCLEX", FIONCLEX}, #endif #ifdef FIONREAD {"FIONREAD", FIONREAD}, #endif #ifdef IBSHIFT {"IBSHIFT", IBSHIFT}, #endif #ifdef INIT_C_CC {"INIT_C_CC", INIT_C_CC}, #endif #ifdef IOCSIZE_MASK {"IOCSIZE_MASK", IOCSIZE_MASK}, #endif #ifdef IOCSIZE_SHIFT {"IOCSIZE_SHIFT", IOCSIZE_SHIFT}, #endif #ifdef NCC {"NCC", NCC}, #endif #ifdef NCCS {"NCCS", NCCS}, #endif #ifdef NSWTCH {"NSWTCH", NSWTCH}, #endif #ifdef N_MOUSE {"N_MOUSE", N_MOUSE}, #endif #ifdef N_PPP {"N_PPP", N_PPP}, #endif #ifdef N_SLIP {"N_SLIP", N_SLIP}, #endif #ifdef N_STRIP {"N_STRIP", N_STRIP}, #endif #ifdef N_TTY {"N_TTY", N_TTY}, #endif #ifdef TCFLSH {"TCFLSH", TCFLSH}, #endif #ifdef TCGETA {"TCGETA", TCGETA}, #endif #ifdef TCGETS {"TCGETS", TCGETS}, #endif #ifdef TCSBRK {"TCSBRK", TCSBRK}, #endif #ifdef TCSBRKP {"TCSBRKP", TCSBRKP}, #endif #ifdef TCSETA {"TCSETA", TCSETA}, #endif #ifdef TCSETAF {"TCSETAF", TCSETAF}, #endif #ifdef TCSETAW {"TCSETAW", TCSETAW}, #endif #ifdef TCSETS {"TCSETS", TCSETS}, #endif #ifdef TCSETSF {"TCSETSF", TCSETSF}, #endif #ifdef TCSETSW {"TCSETSW", TCSETSW}, #endif #ifdef TCXONC {"TCXONC", TCXONC}, #endif #ifdef TIOCCONS {"TIOCCONS", TIOCCONS}, #endif #ifdef TIOCEXCL {"TIOCEXCL", TIOCEXCL}, #endif #ifdef TIOCGETD {"TIOCGETD", TIOCGETD}, #endif #ifdef TIOCGICOUNT {"TIOCGICOUNT", TIOCGICOUNT}, #endif #ifdef TIOCGLCKTRMIOS {"TIOCGLCKTRMIOS", TIOCGLCKTRMIOS}, #endif #ifdef TIOCGPGRP {"TIOCGPGRP", TIOCGPGRP}, #endif #ifdef TIOCGSERIAL {"TIOCGSERIAL", TIOCGSERIAL}, #endif #ifdef TIOCGSOFTCAR {"TIOCGSOFTCAR", TIOCGSOFTCAR}, #endif #ifdef TIOCGWINSZ {"TIOCGWINSZ", TIOCGWINSZ}, #endif #ifdef TIOCINQ {"TIOCINQ", TIOCINQ}, #endif #ifdef TIOCLINUX {"TIOCLINUX", TIOCLINUX}, #endif #ifdef TIOCMBIC {"TIOCMBIC", TIOCMBIC}, #endif #ifdef TIOCMBIS {"TIOCMBIS", TIOCMBIS}, #endif #ifdef TIOCMGET {"TIOCMGET", TIOCMGET}, #endif #ifdef TIOCMIWAIT {"TIOCMIWAIT", TIOCMIWAIT}, #endif #ifdef TIOCMSET {"TIOCMSET", TIOCMSET}, #endif #ifdef TIOCM_CAR {"TIOCM_CAR", TIOCM_CAR}, #endif #ifdef TIOCM_CD {"TIOCM_CD", TIOCM_CD}, #endif #ifdef TIOCM_CTS {"TIOCM_CTS", TIOCM_CTS}, #endif #ifdef TIOCM_DSR {"TIOCM_DSR", TIOCM_DSR}, #endif #ifdef TIOCM_DTR {"TIOCM_DTR", TIOCM_DTR}, #endif #ifdef TIOCM_LE {"TIOCM_LE", TIOCM_LE}, #endif #ifdef TIOCM_RI {"TIOCM_RI", TIOCM_RI}, #endif #ifdef TIOCM_RNG {"TIOCM_RNG", TIOCM_RNG}, #endif #ifdef TIOCM_RTS {"TIOCM_RTS", TIOCM_RTS}, #endif #ifdef TIOCM_SR {"TIOCM_SR", TIOCM_SR}, #endif #ifdef TIOCM_ST {"TIOCM_ST", TIOCM_ST}, #endif #ifdef TIOCNOTTY {"TIOCNOTTY", TIOCNOTTY}, #endif #ifdef TIOCNXCL {"TIOCNXCL", TIOCNXCL}, #endif #ifdef TIOCOUTQ {"TIOCOUTQ", TIOCOUTQ}, #endif #ifdef TIOCPKT {"TIOCPKT", TIOCPKT}, #endif #ifdef TIOCPKT_DATA {"TIOCPKT_DATA", TIOCPKT_DATA}, #endif #ifdef TIOCPKT_DOSTOP {"TIOCPKT_DOSTOP", TIOCPKT_DOSTOP}, #endif #ifdef TIOCPKT_FLUSHREAD {"TIOCPKT_FLUSHREAD", TIOCPKT_FLUSHREAD}, #endif #ifdef TIOCPKT_FLUSHWRITE {"TIOCPKT_FLUSHWRITE", TIOCPKT_FLUSHWRITE}, #endif #ifdef TIOCPKT_NOSTOP {"TIOCPKT_NOSTOP", TIOCPKT_NOSTOP}, #endif #ifdef TIOCPKT_START {"TIOCPKT_START", TIOCPKT_START}, #endif #ifdef TIOCPKT_STOP {"TIOCPKT_STOP", TIOCPKT_STOP}, #endif #ifdef TIOCSCTTY {"TIOCSCTTY", TIOCSCTTY}, #endif #ifdef TIOCSERCONFIG {"TIOCSERCONFIG", TIOCSERCONFIG}, #endif #ifdef TIOCSERGETLSR {"TIOCSERGETLSR", TIOCSERGETLSR}, #endif #ifdef TIOCSERGETMULTI {"TIOCSERGETMULTI", TIOCSERGETMULTI}, #endif #ifdef TIOCSERGSTRUCT {"TIOCSERGSTRUCT", TIOCSERGSTRUCT}, #endif #ifdef TIOCSERGWILD {"TIOCSERGWILD", TIOCSERGWILD}, #endif #ifdef TIOCSERSETMULTI {"TIOCSERSETMULTI", TIOCSERSETMULTI}, #endif #ifdef TIOCSERSWILD {"TIOCSERSWILD", TIOCSERSWILD}, #endif #ifdef TIOCSER_TEMT {"TIOCSER_TEMT", TIOCSER_TEMT}, #endif #ifdef TIOCSETD {"TIOCSETD", TIOCSETD}, #endif #ifdef TIOCSLCKTRMIOS {"TIOCSLCKTRMIOS", TIOCSLCKTRMIOS}, #endif #ifdef TIOCSPGRP {"TIOCSPGRP", TIOCSPGRP}, #endif #ifdef TIOCSSERIAL {"TIOCSSERIAL", TIOCSSERIAL}, #endif #ifdef TIOCSSOFTCAR {"TIOCSSOFTCAR", TIOCSSOFTCAR}, #endif #ifdef TIOCSTI {"TIOCSTI", TIOCSTI}, #endif #ifdef TIOCSWINSZ {"TIOCSWINSZ", TIOCSWINSZ}, #endif #ifdef TIOCTTYGSTRUCT {"TIOCTTYGSTRUCT", TIOCTTYGSTRUCT}, #endif /* sentinel */ {NULL, 0} }; PyMODINIT_FUNC PyInit_termios(void) { PyObject *m; struct constant *constant = termios_constants; m = Py_InitModule4("termios", termios_methods, termios__doc__, (PyObject *)NULL, PYTHON_API_VERSION); if (TermiosError == NULL) { TermiosError = PyErr_NewException("termios.error", NULL, NULL); } Py_INCREF(TermiosError); PyModule_AddObject(m, "error", TermiosError); while (constant->name != NULL) { PyModule_AddIntConstant(m, constant->name, constant->value); ++constant; } } Python-2.3.7/Modules/addrinfo.h0000644001241000117560000001305207641270032015621 0ustar loewishpifb6/* * Copyright (C) 1995, 1996, 1997, 1998, and 1999 WIDE Project. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of the project nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #ifndef HAVE_GETADDRINFO /* * Error return codes from getaddrinfo() */ #ifdef EAI_ADDRFAMILY /* If this is defined, there is a conflicting implementation in the C library, which can't be used for some reason. Make sure it won't interfere with this emulation. */ #undef EAI_ADDRFAMILY #undef EAI_AGAIN #undef EAI_BADFLAGS #undef EAI_FAIL #undef EAI_FAMILY #undef EAI_MEMORY #undef EAI_NODATA #undef EAI_NONAME #undef EAI_SERVICE #undef EAI_SOCKTYPE #undef EAI_SYSTEM #undef EAI_BADHINTS #undef EAI_PROTOCOL #undef EAI_MAX #undef getaddrinfo #define getaddrinfo fake_getaddrinfo #endif #define EAI_ADDRFAMILY 1 /* address family for hostname not supported */ #define EAI_AGAIN 2 /* temporary failure in name resolution */ #define EAI_BADFLAGS 3 /* invalid value for ai_flags */ #define EAI_FAIL 4 /* non-recoverable failure in name resolution */ #define EAI_FAMILY 5 /* ai_family not supported */ #define EAI_MEMORY 6 /* memory allocation failure */ #define EAI_NODATA 7 /* no address associated with hostname */ #define EAI_NONAME 8 /* hostname nor servname provided, or not known */ #define EAI_SERVICE 9 /* servname not supported for ai_socktype */ #define EAI_SOCKTYPE 10 /* ai_socktype not supported */ #define EAI_SYSTEM 11 /* system error returned in errno */ #define EAI_BADHINTS 12 #define EAI_PROTOCOL 13 #define EAI_MAX 14 /* * Flag values for getaddrinfo() */ #ifdef AI_PASSIVE #undef AI_PASSIVE #undef AI_CANONNAME #undef AI_NUMERICHOST #undef AI_MASK #undef AI_ALL #undef AI_V4MAPPED_CFG #undef AI_ADDRCONFIG #undef AI_V4MAPPED #undef AI_DEFAULT #endif #define AI_PASSIVE 0x00000001 /* get address to use bind() */ #define AI_CANONNAME 0x00000002 /* fill ai_canonname */ #define AI_NUMERICHOST 0x00000004 /* prevent name resolution */ /* valid flags for addrinfo */ #define AI_MASK (AI_PASSIVE | AI_CANONNAME | AI_NUMERICHOST) #define AI_ALL 0x00000100 /* IPv6 and IPv4-mapped (with AI_V4MAPPED) */ #define AI_V4MAPPED_CFG 0x00000200 /* accept IPv4-mapped if kernel supports */ #define AI_ADDRCONFIG 0x00000400 /* only if any address is assigned */ #define AI_V4MAPPED 0x00000800 /* accept IPv4-mapped IPv6 address */ /* special recommended flags for getipnodebyname */ #define AI_DEFAULT (AI_V4MAPPED_CFG | AI_ADDRCONFIG) #endif /* HAVE_GETADDRINFO */ #ifndef HAVE_GETNAMEINFO /* * Constants for getnameinfo() */ #ifndef NI_MAXHOST #define NI_MAXHOST 1025 #define NI_MAXSERV 32 #endif /* * Flag values for getnameinfo() */ #ifndef NI_NOFQDN #define NI_NOFQDN 0x00000001 #define NI_NUMERICHOST 0x00000002 #define NI_NAMEREQD 0x00000004 #define NI_NUMERICSERV 0x00000008 #define NI_DGRAM 0x00000010 #endif #endif /* HAVE_GETNAMEINFO */ #ifndef HAVE_ADDRINFO struct addrinfo { int ai_flags; /* AI_PASSIVE, AI_CANONNAME */ int ai_family; /* PF_xxx */ int ai_socktype; /* SOCK_xxx */ int ai_protocol; /* 0 or IPPROTO_xxx for IPv4 and IPv6 */ size_t ai_addrlen; /* length of ai_addr */ char *ai_canonname; /* canonical name for hostname */ struct sockaddr *ai_addr; /* binary address */ struct addrinfo *ai_next; /* next structure in linked list */ }; #endif #ifndef HAVE_SOCKADDR_STORAGE /* * RFC 2553: protocol-independent placeholder for socket addresses */ #define _SS_MAXSIZE 128 #ifdef HAVE_LONG_LONG #define _SS_ALIGNSIZE (sizeof(PY_LONG_LONG)) #else #define _SS_ALIGNSIZE (sizeof(double)) #endif #define _SS_PAD1SIZE (_SS_ALIGNSIZE - sizeof(u_char) * 2) #define _SS_PAD2SIZE (_SS_MAXSIZE - sizeof(u_char) * 2 - \ _SS_PAD1SIZE - _SS_ALIGNSIZE) struct sockaddr_storage { #ifdef HAVE_SOCKADDR_SA_LEN unsigned char ss_len; /* address length */ unsigned char ss_family; /* address family */ #else unsigned short ss_family; /* address family */ #endif char __ss_pad1[_SS_PAD1SIZE]; #ifdef HAVE_LONG_LONG PY_LONG_LONG __ss_align; /* force desired structure storage alignment */ #else double __ss_align; /* force desired structure storage alignment */ #endif char __ss_pad2[_SS_PAD2SIZE]; }; #endif #ifdef __cplusplus extern "C" { #endif extern void freehostent Py_PROTO((struct hostent *)); #ifdef __cplusplus } #endif Python-2.3.7/Modules/testcapi_long.h0000644001241000117560000001031107312612145016661 0ustar loewishpifb6/* Poor-man's template. Macros used: TESTNAME name of the test (like test_long_api_inner) TYPENAME the signed type (like long) F_S_TO_PY convert signed to pylong; TYPENAME -> PyObject* F_PY_TO_S convert pylong to signed; PyObject* -> TYPENAME F_U_TO_PY convert unsigned to pylong; unsigned TYPENAME -> PyObject* F_PY_TO_U convert pylong to unsigned; PyObject* -> unsigned TYPENAME */ static PyObject * TESTNAME(PyObject *error(const char*)) { const int NBITS = sizeof(TYPENAME) * 8; unsigned TYPENAME base; PyObject *pyresult; int i; /* Note: This test lets PyObjects leak if an error is raised. Since an error should never be raised, leaks are impossible . */ /* Test native -> PyLong -> native roundtrip identity. * Generate all powers of 2, and test them and their negations, * plus the numbers +-1 off from them. */ base = 1; for (i = 0; i < NBITS + 1; /* on last, base overflows to 0 */ ++i, base <<= 1) { int j; for (j = 0; j < 6; ++j) { TYPENAME in, out; unsigned TYPENAME uin, uout; /* For 0, 1, 2 use base; for 3, 4, 5 use -base */ uin = j < 3 ? base : (unsigned TYPENAME)(-(TYPENAME)base); /* For 0 & 3, subtract 1. * For 1 & 4, leave alone. * For 2 & 5, add 1. */ uin += (unsigned TYPENAME)(TYPENAME)(j % 3 - 1); pyresult = F_U_TO_PY(uin); if (pyresult == NULL) return error( "unsigned unexpected null result"); uout = F_PY_TO_U(pyresult); if (uout == (unsigned TYPENAME)-1 && PyErr_Occurred()) return error( "unsigned unexpected -1 result"); if (uout != uin) return error( "unsigned output != input"); UNBIND(pyresult); in = (TYPENAME)uin; pyresult = F_S_TO_PY(in); if (pyresult == NULL) return error( "signed unexpected null result"); out = F_PY_TO_S(pyresult); if (out == (TYPENAME)-1 && PyErr_Occurred()) return error( "signed unexpected -1 result"); if (out != in) return error( "signed output != input"); UNBIND(pyresult); } } /* Overflow tests. The loop above ensured that all limit cases that * should not overflow don't overflow, so all we need to do here is * provoke one-over-the-limit cases (not exhaustive, but sharp). */ { PyObject *one, *x, *y; TYPENAME out; unsigned TYPENAME uout; one = PyLong_FromLong(1); if (one == NULL) return error( "unexpected NULL from PyLong_FromLong"); /* Unsigned complains about -1? */ x = PyNumber_Negative(one); if (x == NULL) return error( "unexpected NULL from PyNumber_Negative"); uout = F_PY_TO_U(x); if (uout != (unsigned TYPENAME)-1 || !PyErr_Occurred()) return error( "PyLong_AsUnsignedXXX(-1) didn't complain"); PyErr_Clear(); UNBIND(x); /* Unsigned complains about 2**NBITS? */ y = PyLong_FromLong((long)NBITS); if (y == NULL) return error( "unexpected NULL from PyLong_FromLong"); x = PyNumber_Lshift(one, y); /* 1L << NBITS, == 2**NBITS */ UNBIND(y); if (x == NULL) return error( "unexpected NULL from PyNumber_Lshift"); uout = F_PY_TO_U(x); if (uout != (unsigned TYPENAME)-1 || !PyErr_Occurred()) return error( "PyLong_AsUnsignedXXX(2**NBITS) didn't " "complain"); PyErr_Clear(); /* Signed complains about 2**(NBITS-1)? x still has 2**NBITS. */ y = PyNumber_Rshift(x, one); /* 2**(NBITS-1) */ UNBIND(x); if (y == NULL) return error( "unexpected NULL from PyNumber_Rshift"); out = F_PY_TO_S(y); if (out != (TYPENAME)-1 || !PyErr_Occurred()) return error( "PyLong_AsXXX(2**(NBITS-1)) didn't " "complain"); PyErr_Clear(); /* Signed complains about -2**(NBITS-1)-1?; y still has 2**(NBITS-1). */ x = PyNumber_Negative(y); /* -(2**(NBITS-1)) */ UNBIND(y); if (x == NULL) return error( "unexpected NULL from PyNumber_Negative"); y = PyNumber_Subtract(x, one); /* -(2**(NBITS-1))-1 */ UNBIND(x); if (y == NULL) return error( "unexpected NULL from PyNumber_Subtract"); out = F_PY_TO_S(y); if (out != (TYPENAME)-1 || !PyErr_Occurred()) return error( "PyLong_AsXXX(-2**(NBITS-1)-1) didn't " "complain"); PyErr_Clear(); UNBIND(y); Py_XDECREF(x); Py_XDECREF(y); Py_DECREF(one); } Py_INCREF(Py_None); return Py_None; } Python-2.3.7/Modules/_weakref.c0000644001241000117560000000715307522565114015624 0ustar loewishpifb6#include "Python.h" #define GET_WEAKREFS_LISTPTR(o) \ ((PyWeakReference **) PyObject_GET_WEAKREFS_LISTPTR(o)) PyDoc_STRVAR(weakref_getweakrefcount__doc__, "getweakrefcount(object) -- return the number of weak references\n" "to 'object'."); static PyObject * weakref_getweakrefcount(PyObject *self, PyObject *object) { PyObject *result = NULL; if (PyType_SUPPORTS_WEAKREFS(object->ob_type)) { PyWeakReference **list = GET_WEAKREFS_LISTPTR(object); result = PyInt_FromLong(_PyWeakref_GetWeakrefCount(*list)); } else result = PyInt_FromLong(0); return result; } PyDoc_STRVAR(weakref_getweakrefs__doc__, "getweakrefs(object) -- return a list of all weak reference objects\n" "that point to 'object'."); static PyObject * weakref_getweakrefs(PyObject *self, PyObject *object) { PyObject *result = NULL; if (PyType_SUPPORTS_WEAKREFS(object->ob_type)) { PyWeakReference **list = GET_WEAKREFS_LISTPTR(object); long count = _PyWeakref_GetWeakrefCount(*list); result = PyList_New(count); if (result != NULL) { PyWeakReference *current = *list; long i; for (i = 0; i < count; ++i) { PyList_SET_ITEM(result, i, (PyObject *) current); Py_INCREF(current); current = current->wr_next; } } } else { result = PyList_New(0); } return result; } PyDoc_STRVAR(weakref_ref__doc__, "ref(object[, callback]) -- create a weak reference to 'object';\n" "when 'object' is finalized, 'callback' will be called and passed\n" "a reference to the weak reference object when 'object' is about\n" "to be finalized."); static PyObject * weakref_ref(PyObject *self, PyObject *args) { PyObject *object; PyObject *callback = NULL; PyObject *result = NULL; if (PyArg_UnpackTuple(args, "ref", 1, 2, &object, &callback)) { result = PyWeakref_NewRef(object, callback); } return result; } PyDoc_STRVAR(weakref_proxy__doc__, "proxy(object[, callback]) -- create a proxy object that weakly\n" "references 'object'. 'callback', if given, is called with a\n" "reference to the proxy when 'object' is about to be finalized."); static PyObject * weakref_proxy(PyObject *self, PyObject *args) { PyObject *object; PyObject *callback = NULL; PyObject *result = NULL; if (PyArg_UnpackTuple(args, "proxy", 1, 2, &object, &callback)) { result = PyWeakref_NewProxy(object, callback); } return result; } static PyMethodDef weakref_functions[] = { {"getweakrefcount", weakref_getweakrefcount, METH_O, weakref_getweakrefcount__doc__}, {"getweakrefs", weakref_getweakrefs, METH_O, weakref_getweakrefs__doc__}, {"proxy", weakref_proxy, METH_VARARGS, weakref_proxy__doc__}, {"ref", weakref_ref, METH_VARARGS, weakref_ref__doc__}, {NULL, NULL, 0, NULL} }; PyMODINIT_FUNC init_weakref(void) { PyObject *m; m = Py_InitModule3("_weakref", weakref_functions, "Weak-reference support module."); if (m != NULL) { Py_INCREF(&_PyWeakref_RefType); PyModule_AddObject(m, "ReferenceType", (PyObject *) &_PyWeakref_RefType); Py_INCREF(&_PyWeakref_ProxyType); PyModule_AddObject(m, "ProxyType", (PyObject *) &_PyWeakref_ProxyType); Py_INCREF(&_PyWeakref_CallableProxyType); PyModule_AddObject(m, "CallableProxyType", (PyObject *) &_PyWeakref_CallableProxyType); } } Python-2.3.7/Modules/binascii.c0000644001241000117560000012345710762607371015632 0ustar loewishpifb6/* ** Routines to represent binary data in ASCII and vice-versa ** ** This module currently supports the following encodings: ** uuencode: ** each line encodes 45 bytes (except possibly the last) ** First char encodes (binary) length, rest data ** each char encodes 6 bits, as follows: ** binary: 01234567 abcdefgh ijklmnop ** ascii: 012345 67abcd efghij klmnop ** ASCII encoding method is "excess-space": 000000 is encoded as ' ', etc. ** short binary data is zero-extended (so the bits are always in the ** right place), this does *not* reflect in the length. ** base64: ** Line breaks are insignificant, but lines are at most 76 chars ** each char encodes 6 bits, in similar order as uucode/hqx. Encoding ** is done via a table. ** Short binary data is filled (in ASCII) with '='. ** hqx: ** File starts with introductory text, real data starts and ends ** with colons. ** Data consists of three similar parts: info, datafork, resourcefork. ** Each part is protected (at the end) with a 16-bit crc ** The binary data is run-length encoded, and then ascii-fied: ** binary: 01234567 abcdefgh ijklmnop ** ascii: 012345 67abcd efghij klmnop ** ASCII encoding is table-driven, see the code. ** Short binary data results in the runt ascii-byte being output with ** the bits in the right place. ** ** While I was reading dozens of programs that encode or decode the formats ** here (documentation? hihi:-) I have formulated Jansen's Observation: ** ** Programs that encode binary data in ASCII are written in ** such a style that they are as unreadable as possible. Devices used ** include unnecessary global variables, burying important tables ** in unrelated sourcefiles, putting functions in include files, ** using seemingly-descriptive variable names for different purposes, ** calls to empty subroutines and a host of others. ** ** I have attempted to break with this tradition, but I guess that that ** does make the performance sub-optimal. Oh well, too bad... ** ** Jack Jansen, CWI, July 1995. ** ** Added support for quoted-printable encoding, based on rfc 1521 et al ** quoted-printable encoding specifies that non printable characters (anything ** below 32 and above 126) be encoded as =XX where XX is the hexadecimal value ** of the character. It also specifies some other behavior to enable 8bit data ** in a mail message with little difficulty (maximum line sizes, protecting ** some cases of whitespace, etc). ** ** Brandon Long, September 2001. */ #include "Python.h" static PyObject *Error; static PyObject *Incomplete; /* ** hqx lookup table, ascii->binary. */ #define RUNCHAR 0x90 #define DONE 0x7F #define SKIP 0x7E #define FAIL 0x7D static unsigned char table_a2b_hqx[256] = { /* ^@ ^A ^B ^C ^D ^E ^F ^G */ /* 0*/ FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, /* \b \t \n ^K ^L \r ^N ^O */ /* 1*/ FAIL, FAIL, SKIP, FAIL, FAIL, SKIP, FAIL, FAIL, /* ^P ^Q ^R ^S ^T ^U ^V ^W */ /* 2*/ FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, /* ^X ^Y ^Z ^[ ^\ ^] ^^ ^_ */ /* 3*/ FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, /* ! " # $ % & ' */ /* 4*/ FAIL, 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, /* ( ) * + , - . / */ /* 5*/ 0x07, 0x08, 0x09, 0x0A, 0x0B, 0x0C, FAIL, FAIL, /* 0 1 2 3 4 5 6 7 */ /* 6*/ 0x0D, 0x0E, 0x0F, 0x10, 0x11, 0x12, 0x13, FAIL, /* 8 9 : ; < = > ? */ /* 7*/ 0x14, 0x15, DONE, FAIL, FAIL, FAIL, FAIL, FAIL, /* @ A B C D E F G */ /* 8*/ 0x16, 0x17, 0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, /* H I J K L M N O */ /* 9*/ 0x1E, 0x1F, 0x20, 0x21, 0x22, 0x23, 0x24, FAIL, /* P Q R S T U V W */ /*10*/ 0x25, 0x26, 0x27, 0x28, 0x29, 0x2A, 0x2B, FAIL, /* X Y Z [ \ ] ^ _ */ /*11*/ 0x2C, 0x2D, 0x2E, 0x2F, FAIL, FAIL, FAIL, FAIL, /* ` a b c d e f g */ /*12*/ 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, FAIL, /* h i j k l m n o */ /*13*/ 0x37, 0x38, 0x39, 0x3A, 0x3B, 0x3C, FAIL, FAIL, /* p q r s t u v w */ /*14*/ 0x3D, 0x3E, 0x3F, FAIL, FAIL, FAIL, FAIL, FAIL, /* x y z { | } ~ ^? */ /*15*/ FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, /*16*/ FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, FAIL, }; static unsigned char table_b2a_hqx[] = "!\"#$%&'()*+,-012345689@ABCDEFGHIJKLMNPQRSTUVXYZ[`abcdefhijklmpqr"; static char table_a2b_base64[] = { -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,62, -1,-1,-1,63, 52,53,54,55, 56,57,58,59, 60,61,-1,-1, -1, 0,-1,-1, /* Note PAD->0 */ -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9,10, 11,12,13,14, 15,16,17,18, 19,20,21,22, 23,24,25,-1, -1,-1,-1,-1, -1,26,27,28, 29,30,31,32, 33,34,35,36, 37,38,39,40, 41,42,43,44, 45,46,47,48, 49,50,51,-1, -1,-1,-1,-1 }; #define BASE64_PAD '=' /* Max binary chunk size; limited only by available memory */ #define BASE64_MAXBIN (INT_MAX/2 - sizeof(PyStringObject) - 3) static unsigned char table_b2a_base64[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"; static unsigned short crctab_hqx[256] = { 0x0000, 0x1021, 0x2042, 0x3063, 0x4084, 0x50a5, 0x60c6, 0x70e7, 0x8108, 0x9129, 0xa14a, 0xb16b, 0xc18c, 0xd1ad, 0xe1ce, 0xf1ef, 0x1231, 0x0210, 0x3273, 0x2252, 0x52b5, 0x4294, 0x72f7, 0x62d6, 0x9339, 0x8318, 0xb37b, 0xa35a, 0xd3bd, 0xc39c, 0xf3ff, 0xe3de, 0x2462, 0x3443, 0x0420, 0x1401, 0x64e6, 0x74c7, 0x44a4, 0x5485, 0xa56a, 0xb54b, 0x8528, 0x9509, 0xe5ee, 0xf5cf, 0xc5ac, 0xd58d, 0x3653, 0x2672, 0x1611, 0x0630, 0x76d7, 0x66f6, 0x5695, 0x46b4, 0xb75b, 0xa77a, 0x9719, 0x8738, 0xf7df, 0xe7fe, 0xd79d, 0xc7bc, 0x48c4, 0x58e5, 0x6886, 0x78a7, 0x0840, 0x1861, 0x2802, 0x3823, 0xc9cc, 0xd9ed, 0xe98e, 0xf9af, 0x8948, 0x9969, 0xa90a, 0xb92b, 0x5af5, 0x4ad4, 0x7ab7, 0x6a96, 0x1a71, 0x0a50, 0x3a33, 0x2a12, 0xdbfd, 0xcbdc, 0xfbbf, 0xeb9e, 0x9b79, 0x8b58, 0xbb3b, 0xab1a, 0x6ca6, 0x7c87, 0x4ce4, 0x5cc5, 0x2c22, 0x3c03, 0x0c60, 0x1c41, 0xedae, 0xfd8f, 0xcdec, 0xddcd, 0xad2a, 0xbd0b, 0x8d68, 0x9d49, 0x7e97, 0x6eb6, 0x5ed5, 0x4ef4, 0x3e13, 0x2e32, 0x1e51, 0x0e70, 0xff9f, 0xefbe, 0xdfdd, 0xcffc, 0xbf1b, 0xaf3a, 0x9f59, 0x8f78, 0x9188, 0x81a9, 0xb1ca, 0xa1eb, 0xd10c, 0xc12d, 0xf14e, 0xe16f, 0x1080, 0x00a1, 0x30c2, 0x20e3, 0x5004, 0x4025, 0x7046, 0x6067, 0x83b9, 0x9398, 0xa3fb, 0xb3da, 0xc33d, 0xd31c, 0xe37f, 0xf35e, 0x02b1, 0x1290, 0x22f3, 0x32d2, 0x4235, 0x5214, 0x6277, 0x7256, 0xb5ea, 0xa5cb, 0x95a8, 0x8589, 0xf56e, 0xe54f, 0xd52c, 0xc50d, 0x34e2, 0x24c3, 0x14a0, 0x0481, 0x7466, 0x6447, 0x5424, 0x4405, 0xa7db, 0xb7fa, 0x8799, 0x97b8, 0xe75f, 0xf77e, 0xc71d, 0xd73c, 0x26d3, 0x36f2, 0x0691, 0x16b0, 0x6657, 0x7676, 0x4615, 0x5634, 0xd94c, 0xc96d, 0xf90e, 0xe92f, 0x99c8, 0x89e9, 0xb98a, 0xa9ab, 0x5844, 0x4865, 0x7806, 0x6827, 0x18c0, 0x08e1, 0x3882, 0x28a3, 0xcb7d, 0xdb5c, 0xeb3f, 0xfb1e, 0x8bf9, 0x9bd8, 0xabbb, 0xbb9a, 0x4a75, 0x5a54, 0x6a37, 0x7a16, 0x0af1, 0x1ad0, 0x2ab3, 0x3a92, 0xfd2e, 0xed0f, 0xdd6c, 0xcd4d, 0xbdaa, 0xad8b, 0x9de8, 0x8dc9, 0x7c26, 0x6c07, 0x5c64, 0x4c45, 0x3ca2, 0x2c83, 0x1ce0, 0x0cc1, 0xef1f, 0xff3e, 0xcf5d, 0xdf7c, 0xaf9b, 0xbfba, 0x8fd9, 0x9ff8, 0x6e17, 0x7e36, 0x4e55, 0x5e74, 0x2e93, 0x3eb2, 0x0ed1, 0x1ef0, }; PyDoc_STRVAR(doc_a2b_uu, "(ascii) -> bin. Decode a line of uuencoded data"); static PyObject * binascii_a2b_uu(PyObject *self, PyObject *args) { unsigned char *ascii_data, *bin_data; int leftbits = 0; unsigned char this_ch; unsigned int leftchar = 0; PyObject *rv; int ascii_len, bin_len; if ( !PyArg_ParseTuple(args, "t#:a2b_uu", &ascii_data, &ascii_len) ) return NULL; assert(ascii_len >= 0); /* First byte: binary data length (in bytes) */ bin_len = (*ascii_data++ - ' ') & 077; ascii_len--; /* Allocate the buffer */ if ( (rv=PyString_FromStringAndSize(NULL, bin_len)) == NULL ) return NULL; bin_data = (unsigned char *)PyString_AsString(rv); for( ; bin_len > 0 ; ascii_len--, ascii_data++ ) { this_ch = *ascii_data; if ( this_ch == '\n' || this_ch == '\r' || ascii_len <= 0) { /* ** Whitespace. Assume some spaces got eaten at ** end-of-line. (We check this later) */ this_ch = 0; } else { /* Check the character for legality ** The 64 in stead of the expected 63 is because ** there are a few uuencodes out there that use ** '`' as zero instead of space. */ if ( this_ch < ' ' || this_ch > (' ' + 64)) { PyErr_SetString(Error, "Illegal char"); Py_DECREF(rv); return NULL; } this_ch = (this_ch - ' ') & 077; } /* ** Shift it in on the low end, and see if there's ** a byte ready for output. */ leftchar = (leftchar << 6) | (this_ch); leftbits += 6; if ( leftbits >= 8 ) { leftbits -= 8; *bin_data++ = (leftchar >> leftbits) & 0xff; leftchar &= ((1 << leftbits) - 1); bin_len--; } } /* ** Finally, check that if there's anything left on the line ** that it's whitespace only. */ while( ascii_len-- > 0 ) { this_ch = *ascii_data++; /* Extra '`' may be written as padding in some cases */ if ( this_ch != ' ' && this_ch != ' '+64 && this_ch != '\n' && this_ch != '\r' ) { PyErr_SetString(Error, "Trailing garbage"); Py_DECREF(rv); return NULL; } } return rv; } PyDoc_STRVAR(doc_b2a_uu, "(bin) -> ascii. Uuencode line of data"); static PyObject * binascii_b2a_uu(PyObject *self, PyObject *args) { unsigned char *ascii_data, *bin_data; int leftbits = 0; unsigned char this_ch; unsigned int leftchar = 0; PyObject *rv; int bin_len; if ( !PyArg_ParseTuple(args, "s#:b2a_uu", &bin_data, &bin_len) ) return NULL; if ( bin_len > 45 ) { /* The 45 is a limit that appears in all uuencode's */ PyErr_SetString(Error, "At most 45 bytes at once"); return NULL; } /* We're lazy and allocate to much (fixed up later) */ if ( (rv=PyString_FromStringAndSize(NULL, bin_len*2)) == NULL ) return NULL; ascii_data = (unsigned char *)PyString_AsString(rv); /* Store the length */ *ascii_data++ = ' ' + (bin_len & 077); for( ; bin_len > 0 || leftbits != 0 ; bin_len--, bin_data++ ) { /* Shift the data (or padding) into our buffer */ if ( bin_len > 0 ) /* Data */ leftchar = (leftchar << 8) | *bin_data; else /* Padding */ leftchar <<= 8; leftbits += 8; /* See if there are 6-bit groups ready */ while ( leftbits >= 6 ) { this_ch = (leftchar >> (leftbits-6)) & 0x3f; leftbits -= 6; *ascii_data++ = this_ch + ' '; } } *ascii_data++ = '\n'; /* Append a courtesy newline */ _PyString_Resize(&rv, (ascii_data - (unsigned char *)PyString_AsString(rv))); return rv; } static int binascii_find_valid(unsigned char *s, int slen, int num) { /* Finds & returns the (num+1)th ** valid character for base64, or -1 if none. */ int ret = -1; unsigned char c, b64val; while ((slen > 0) && (ret == -1)) { c = *s; b64val = table_a2b_base64[c & 0x7f]; if ( ((c <= 0x7f) && (b64val != (unsigned char)-1)) ) { if (num == 0) ret = *s; num--; } s++; slen--; } return ret; } PyDoc_STRVAR(doc_a2b_base64, "(ascii) -> bin. Decode a line of base64 data"); static PyObject * binascii_a2b_base64(PyObject *self, PyObject *args) { unsigned char *ascii_data, *bin_data; int leftbits = 0; unsigned char this_ch; unsigned int leftchar = 0; PyObject *rv; int ascii_len, bin_len; int quad_pos = 0; if ( !PyArg_ParseTuple(args, "t#:a2b_base64", &ascii_data, &ascii_len) ) return NULL; assert(ascii_len >= 0); if (ascii_len > INT_MAX - 3) return PyErr_NoMemory(); bin_len = ((ascii_len+3)/4)*3; /* Upper bound, corrected later */ /* Allocate the buffer */ if ( (rv=PyString_FromStringAndSize(NULL, bin_len)) == NULL ) return NULL; bin_data = (unsigned char *)PyString_AsString(rv); bin_len = 0; for( ; ascii_len > 0; ascii_len--, ascii_data++) { this_ch = *ascii_data; if (this_ch > 0x7f || this_ch == '\r' || this_ch == '\n' || this_ch == ' ') continue; /* Check for pad sequences and ignore ** the invalid ones. */ if (this_ch == BASE64_PAD) { if ( (quad_pos < 2) || ((quad_pos == 2) && (binascii_find_valid(ascii_data, ascii_len, 1) != BASE64_PAD)) ) { continue; } else { /* A pad sequence means no more input. ** We've already interpreted the data ** from the quad at this point. */ leftbits = 0; break; } } this_ch = table_a2b_base64[*ascii_data]; if ( this_ch == (unsigned char) -1 ) continue; /* ** Shift it in on the low end, and see if there's ** a byte ready for output. */ quad_pos = (quad_pos + 1) & 0x03; leftchar = (leftchar << 6) | (this_ch); leftbits += 6; if ( leftbits >= 8 ) { leftbits -= 8; *bin_data++ = (leftchar >> leftbits) & 0xff; bin_len++; leftchar &= ((1 << leftbits) - 1); } } if (leftbits != 0) { PyErr_SetString(Error, "Incorrect padding"); Py_DECREF(rv); return NULL; } /* And set string size correctly. If the result string is empty ** (because the input was all invalid) return the shared empty ** string instead; _PyString_Resize() won't do this for us. */ if (bin_len > 0) _PyString_Resize(&rv, bin_len); else { Py_DECREF(rv); rv = PyString_FromString(""); } return rv; } PyDoc_STRVAR(doc_b2a_base64, "(bin) -> ascii. Base64-code line of data"); static PyObject * binascii_b2a_base64(PyObject *self, PyObject *args) { unsigned char *ascii_data, *bin_data; int leftbits = 0; unsigned char this_ch; unsigned int leftchar = 0; PyObject *rv; int bin_len; if ( !PyArg_ParseTuple(args, "s#:b2a_base64", &bin_data, &bin_len) ) return NULL; assert(bin_len >= 0); if ( bin_len > BASE64_MAXBIN ) { PyErr_SetString(Error, "Too much data for base64 line"); return NULL; } /* We're lazy and allocate too much (fixed up later). "+3" leaves room for up to two pad characters and a trailing newline. Note that 'b' gets encoded as 'Yg==\n' (1 in, 5 out). */ if ( (rv=PyString_FromStringAndSize(NULL, bin_len*2 + 3)) == NULL ) return NULL; ascii_data = (unsigned char *)PyString_AsString(rv); for( ; bin_len > 0 ; bin_len--, bin_data++ ) { /* Shift the data into our buffer */ leftchar = (leftchar << 8) | *bin_data; leftbits += 8; /* See if there are 6-bit groups ready */ while ( leftbits >= 6 ) { this_ch = (leftchar >> (leftbits-6)) & 0x3f; leftbits -= 6; *ascii_data++ = table_b2a_base64[this_ch]; } } if ( leftbits == 2 ) { *ascii_data++ = table_b2a_base64[(leftchar&3) << 4]; *ascii_data++ = BASE64_PAD; *ascii_data++ = BASE64_PAD; } else if ( leftbits == 4 ) { *ascii_data++ = table_b2a_base64[(leftchar&0xf) << 2]; *ascii_data++ = BASE64_PAD; } *ascii_data++ = '\n'; /* Append a courtesy newline */ _PyString_Resize(&rv, (ascii_data - (unsigned char *)PyString_AsString(rv))); return rv; } PyDoc_STRVAR(doc_a2b_hqx, "ascii -> bin, done. Decode .hqx coding"); static PyObject * binascii_a2b_hqx(PyObject *self, PyObject *args) { unsigned char *ascii_data, *bin_data; int leftbits = 0; unsigned char this_ch; unsigned int leftchar = 0; PyObject *rv; int len; int done = 0; if ( !PyArg_ParseTuple(args, "t#:a2b_hqx", &ascii_data, &len) ) return NULL; assert(len >= 0); if (len > INT_MAX - 2) return PyErr_NoMemory(); /* Allocate a string that is too big (fixed later) */ if ( (rv=PyString_FromStringAndSize(NULL, len)) == NULL ) return NULL; bin_data = (unsigned char *)PyString_AsString(rv); for( ; len > 0 ; len--, ascii_data++ ) { /* Get the byte and look it up */ this_ch = table_a2b_hqx[*ascii_data]; if ( this_ch == SKIP ) continue; if ( this_ch == FAIL ) { PyErr_SetString(Error, "Illegal char"); Py_DECREF(rv); return NULL; } if ( this_ch == DONE ) { /* The terminating colon */ done = 1; break; } /* Shift it into the buffer and see if any bytes are ready */ leftchar = (leftchar << 6) | (this_ch); leftbits += 6; if ( leftbits >= 8 ) { leftbits -= 8; *bin_data++ = (leftchar >> leftbits) & 0xff; leftchar &= ((1 << leftbits) - 1); } } if ( leftbits && !done ) { PyErr_SetString(Incomplete, "String has incomplete number of bytes"); Py_DECREF(rv); return NULL; } _PyString_Resize( &rv, (bin_data - (unsigned char *)PyString_AsString(rv))); if (rv) { PyObject *rrv = Py_BuildValue("Oi", rv, done); Py_DECREF(rv); return rrv; } return NULL; } PyDoc_STRVAR(doc_rlecode_hqx, "Binhex RLE-code binary data"); static PyObject * binascii_rlecode_hqx(PyObject *self, PyObject *args) { unsigned char *in_data, *out_data; PyObject *rv; unsigned char ch; int in, inend, len; if ( !PyArg_ParseTuple(args, "s#:rlecode_hqx", &in_data, &len) ) return NULL; assert(len >= 0); if (len > INT_MAX / 2 - 2) return PyErr_NoMemory(); /* Worst case: output is twice as big as input (fixed later) */ if ( (rv=PyString_FromStringAndSize(NULL, len*2)) == NULL ) return NULL; out_data = (unsigned char *)PyString_AsString(rv); for( in=0; in 3 ) { /* More than 3 in a row. Output RLE. */ *out_data++ = ch; *out_data++ = RUNCHAR; *out_data++ = inend-in; in = inend-1; } else { /* Less than 3. Output the byte itself */ *out_data++ = ch; } } } _PyString_Resize(&rv, (out_data - (unsigned char *)PyString_AsString(rv))); return rv; } PyDoc_STRVAR(doc_b2a_hqx, "Encode .hqx data"); static PyObject * binascii_b2a_hqx(PyObject *self, PyObject *args) { unsigned char *ascii_data, *bin_data; int leftbits = 0; unsigned char this_ch; unsigned int leftchar = 0; PyObject *rv; int len; if ( !PyArg_ParseTuple(args, "s#:b2a_hqx", &bin_data, &len) ) return NULL; assert(len >= 0); if (len > INT_MAX / 2 - 2) return PyErr_NoMemory(); /* Allocate a buffer that is at least large enough */ if ( (rv=PyString_FromStringAndSize(NULL, len*2)) == NULL ) return NULL; ascii_data = (unsigned char *)PyString_AsString(rv); for( ; len > 0 ; len--, bin_data++ ) { /* Shift into our buffer, and output any 6bits ready */ leftchar = (leftchar << 8) | *bin_data; leftbits += 8; while ( leftbits >= 6 ) { this_ch = (leftchar >> (leftbits-6)) & 0x3f; leftbits -= 6; *ascii_data++ = table_b2a_hqx[this_ch]; } } /* Output a possible runt byte */ if ( leftbits ) { leftchar <<= (6-leftbits); *ascii_data++ = table_b2a_hqx[leftchar & 0x3f]; } _PyString_Resize(&rv, (ascii_data - (unsigned char *)PyString_AsString(rv))); return rv; } PyDoc_STRVAR(doc_rledecode_hqx, "Decode hexbin RLE-coded string"); static PyObject * binascii_rledecode_hqx(PyObject *self, PyObject *args) { unsigned char *in_data, *out_data; unsigned char in_byte, in_repeat; PyObject *rv; int in_len, out_len, out_len_left; if ( !PyArg_ParseTuple(args, "s#:rledecode_hqx", &in_data, &in_len) ) return NULL; assert(in_len >= 0); /* Empty string is a special case */ if ( in_len == 0 ) return Py_BuildValue("s", ""); else if (in_len > INT_MAX / 2) return PyErr_NoMemory(); /* Allocate a buffer of reasonable size. Resized when needed */ out_len = in_len*2; if ( (rv=PyString_FromStringAndSize(NULL, out_len)) == NULL ) return NULL; out_len_left = out_len; out_data = (unsigned char *)PyString_AsString(rv); /* ** We need two macros here to get/put bytes and handle ** end-of-buffer for input and output strings. */ #define INBYTE(b) \ do { \ if ( --in_len < 0 ) { \ PyErr_SetString(Incomplete, ""); \ Py_DECREF(rv); \ return NULL; \ } \ b = *in_data++; \ } while(0) #define OUTBYTE(b) \ do { \ if ( --out_len_left < 0 ) { \ if ( out_len > INT_MAX / 2) return PyErr_NoMemory(); \ _PyString_Resize(&rv, 2*out_len); \ if ( rv == NULL ) return NULL; \ out_data = (unsigned char *)PyString_AsString(rv) \ + out_len; \ out_len_left = out_len-1; \ out_len = out_len * 2; \ } \ *out_data++ = b; \ } while(0) /* ** Handle first byte separately (since we have to get angry ** in case of an orphaned RLE code). */ INBYTE(in_byte); if (in_byte == RUNCHAR) { INBYTE(in_repeat); if (in_repeat != 0) { /* Note Error, not Incomplete (which is at the end ** of the string only). This is a programmer error. */ PyErr_SetString(Error, "Orphaned RLE code at start"); Py_DECREF(rv); return NULL; } OUTBYTE(RUNCHAR); } else { OUTBYTE(in_byte); } while( in_len > 0 ) { INBYTE(in_byte); if (in_byte == RUNCHAR) { INBYTE(in_repeat); if ( in_repeat == 0 ) { /* Just an escaped RUNCHAR value */ OUTBYTE(RUNCHAR); } else { /* Pick up value and output a sequence of it */ in_byte = out_data[-1]; while ( --in_repeat > 0 ) OUTBYTE(in_byte); } } else { /* Normal byte */ OUTBYTE(in_byte); } } _PyString_Resize(&rv, (out_data - (unsigned char *)PyString_AsString(rv))); return rv; } PyDoc_STRVAR(doc_crc_hqx, "(data, oldcrc) -> newcrc. Compute hqx CRC incrementally"); static PyObject * binascii_crc_hqx(PyObject *self, PyObject *args) { unsigned char *bin_data; unsigned int crc; int len; if ( !PyArg_ParseTuple(args, "s#i:crc_hqx", &bin_data, &len, &crc) ) return NULL; while(len-- > 0) { crc=((crc<<8)&0xff00)^crctab_hqx[((crc>>8)&0xff)^*bin_data++]; } return Py_BuildValue("i", crc); } PyDoc_STRVAR(doc_crc32, "(data, oldcrc = 0) -> newcrc. Compute CRC-32 incrementally"); /* Crc - 32 BIT ANSI X3.66 CRC checksum files Also known as: ISO 3307 **********************************************************************| * *| * Demonstration program to compute the 32-bit CRC used as the frame *| * check sequence in ADCCP (ANSI X3.66, also known as FIPS PUB 71 *| * and FED-STD-1003, the U.S. versions of CCITT's X.25 link-level *| * protocol). The 32-bit FCS was added via the Federal Register, *| * 1 June 1982, p.23798. I presume but don't know for certain that *| * this polynomial is or will be included in CCITT V.41, which *| * defines the 16-bit CRC (often called CRC-CCITT) polynomial. FIPS *| * PUB 78 says that the 32-bit FCS reduces otherwise undetected *| * errors by a factor of 10^-5 over 16-bit FCS. *| * *| **********************************************************************| Copyright (C) 1986 Gary S. Brown. You may use this program, or code or tables extracted from it, as desired without restriction. First, the polynomial itself and its table of feedback terms. The polynomial is X^32+X^26+X^23+X^22+X^16+X^12+X^11+X^10+X^8+X^7+X^5+X^4+X^2+X^1+X^0 Note that we take it "backwards" and put the highest-order term in the lowest-order bit. The X^32 term is "implied"; the LSB is the X^31 term, etc. The X^0 term (usually shown as "+1") results in the MSB being 1. Note that the usual hardware shift register implementation, which is what we're using (we're merely optimizing it by doing eight-bit chunks at a time) shifts bits into the lowest-order term. In our implementation, that means shifting towards the right. Why do we do it this way? Because the calculated CRC must be transmitted in order from highest-order term to lowest-order term. UARTs transmit characters in order from LSB to MSB. By storing the CRC this way, we hand it to the UART in the order low-byte to high-byte; the UART sends each low-bit to hight-bit; and the result is transmission bit by bit from highest- to lowest-order term without requiring any bit shuffling on our part. Reception works similarly. The feedback terms table consists of 256, 32-bit entries. Notes: 1. The table can be generated at runtime if desired; code to do so is shown later. It might not be obvious, but the feedback terms simply represent the results of eight shift/xor opera- tions for all combinations of data and CRC register values. 2. The CRC accumulation logic is the same for all CRC polynomials, be they sixteen or thirty-two bits wide. You simply choose the appropriate table. Alternatively, because the table can be generated at runtime, you can start by generating the table for the polynomial in question and use exactly the same "updcrc", if your application needn't simultaneously handle two CRC polynomials. (Note, however, that XMODEM is strange.) 3. For 16-bit CRCs, the table entries need be only 16 bits wide; of course, 32-bit entries work OK if the high 16 bits are zero. 4. The values must be right-shifted by eight bits by the "updcrc" logic; the shift must be unsigned (bring in zeroes). On some hardware you could probably optimize the shift in assembler by using byte-swap instructions. ********************************************************************/ static unsigned long crc_32_tab[256] = { 0x00000000UL, 0x77073096UL, 0xee0e612cUL, 0x990951baUL, 0x076dc419UL, 0x706af48fUL, 0xe963a535UL, 0x9e6495a3UL, 0x0edb8832UL, 0x79dcb8a4UL, 0xe0d5e91eUL, 0x97d2d988UL, 0x09b64c2bUL, 0x7eb17cbdUL, 0xe7b82d07UL, 0x90bf1d91UL, 0x1db71064UL, 0x6ab020f2UL, 0xf3b97148UL, 0x84be41deUL, 0x1adad47dUL, 0x6ddde4ebUL, 0xf4d4b551UL, 0x83d385c7UL, 0x136c9856UL, 0x646ba8c0UL, 0xfd62f97aUL, 0x8a65c9ecUL, 0x14015c4fUL, 0x63066cd9UL, 0xfa0f3d63UL, 0x8d080df5UL, 0x3b6e20c8UL, 0x4c69105eUL, 0xd56041e4UL, 0xa2677172UL, 0x3c03e4d1UL, 0x4b04d447UL, 0xd20d85fdUL, 0xa50ab56bUL, 0x35b5a8faUL, 0x42b2986cUL, 0xdbbbc9d6UL, 0xacbcf940UL, 0x32d86ce3UL, 0x45df5c75UL, 0xdcd60dcfUL, 0xabd13d59UL, 0x26d930acUL, 0x51de003aUL, 0xc8d75180UL, 0xbfd06116UL, 0x21b4f4b5UL, 0x56b3c423UL, 0xcfba9599UL, 0xb8bda50fUL, 0x2802b89eUL, 0x5f058808UL, 0xc60cd9b2UL, 0xb10be924UL, 0x2f6f7c87UL, 0x58684c11UL, 0xc1611dabUL, 0xb6662d3dUL, 0x76dc4190UL, 0x01db7106UL, 0x98d220bcUL, 0xefd5102aUL, 0x71b18589UL, 0x06b6b51fUL, 0x9fbfe4a5UL, 0xe8b8d433UL, 0x7807c9a2UL, 0x0f00f934UL, 0x9609a88eUL, 0xe10e9818UL, 0x7f6a0dbbUL, 0x086d3d2dUL, 0x91646c97UL, 0xe6635c01UL, 0x6b6b51f4UL, 0x1c6c6162UL, 0x856530d8UL, 0xf262004eUL, 0x6c0695edUL, 0x1b01a57bUL, 0x8208f4c1UL, 0xf50fc457UL, 0x65b0d9c6UL, 0x12b7e950UL, 0x8bbeb8eaUL, 0xfcb9887cUL, 0x62dd1ddfUL, 0x15da2d49UL, 0x8cd37cf3UL, 0xfbd44c65UL, 0x4db26158UL, 0x3ab551ceUL, 0xa3bc0074UL, 0xd4bb30e2UL, 0x4adfa541UL, 0x3dd895d7UL, 0xa4d1c46dUL, 0xd3d6f4fbUL, 0x4369e96aUL, 0x346ed9fcUL, 0xad678846UL, 0xda60b8d0UL, 0x44042d73UL, 0x33031de5UL, 0xaa0a4c5fUL, 0xdd0d7cc9UL, 0x5005713cUL, 0x270241aaUL, 0xbe0b1010UL, 0xc90c2086UL, 0x5768b525UL, 0x206f85b3UL, 0xb966d409UL, 0xce61e49fUL, 0x5edef90eUL, 0x29d9c998UL, 0xb0d09822UL, 0xc7d7a8b4UL, 0x59b33d17UL, 0x2eb40d81UL, 0xb7bd5c3bUL, 0xc0ba6cadUL, 0xedb88320UL, 0x9abfb3b6UL, 0x03b6e20cUL, 0x74b1d29aUL, 0xead54739UL, 0x9dd277afUL, 0x04db2615UL, 0x73dc1683UL, 0xe3630b12UL, 0x94643b84UL, 0x0d6d6a3eUL, 0x7a6a5aa8UL, 0xe40ecf0bUL, 0x9309ff9dUL, 0x0a00ae27UL, 0x7d079eb1UL, 0xf00f9344UL, 0x8708a3d2UL, 0x1e01f268UL, 0x6906c2feUL, 0xf762575dUL, 0x806567cbUL, 0x196c3671UL, 0x6e6b06e7UL, 0xfed41b76UL, 0x89d32be0UL, 0x10da7a5aUL, 0x67dd4accUL, 0xf9b9df6fUL, 0x8ebeeff9UL, 0x17b7be43UL, 0x60b08ed5UL, 0xd6d6a3e8UL, 0xa1d1937eUL, 0x38d8c2c4UL, 0x4fdff252UL, 0xd1bb67f1UL, 0xa6bc5767UL, 0x3fb506ddUL, 0x48b2364bUL, 0xd80d2bdaUL, 0xaf0a1b4cUL, 0x36034af6UL, 0x41047a60UL, 0xdf60efc3UL, 0xa867df55UL, 0x316e8eefUL, 0x4669be79UL, 0xcb61b38cUL, 0xbc66831aUL, 0x256fd2a0UL, 0x5268e236UL, 0xcc0c7795UL, 0xbb0b4703UL, 0x220216b9UL, 0x5505262fUL, 0xc5ba3bbeUL, 0xb2bd0b28UL, 0x2bb45a92UL, 0x5cb36a04UL, 0xc2d7ffa7UL, 0xb5d0cf31UL, 0x2cd99e8bUL, 0x5bdeae1dUL, 0x9b64c2b0UL, 0xec63f226UL, 0x756aa39cUL, 0x026d930aUL, 0x9c0906a9UL, 0xeb0e363fUL, 0x72076785UL, 0x05005713UL, 0x95bf4a82UL, 0xe2b87a14UL, 0x7bb12baeUL, 0x0cb61b38UL, 0x92d28e9bUL, 0xe5d5be0dUL, 0x7cdcefb7UL, 0x0bdbdf21UL, 0x86d3d2d4UL, 0xf1d4e242UL, 0x68ddb3f8UL, 0x1fda836eUL, 0x81be16cdUL, 0xf6b9265bUL, 0x6fb077e1UL, 0x18b74777UL, 0x88085ae6UL, 0xff0f6a70UL, 0x66063bcaUL, 0x11010b5cUL, 0x8f659effUL, 0xf862ae69UL, 0x616bffd3UL, 0x166ccf45UL, 0xa00ae278UL, 0xd70dd2eeUL, 0x4e048354UL, 0x3903b3c2UL, 0xa7672661UL, 0xd06016f7UL, 0x4969474dUL, 0x3e6e77dbUL, 0xaed16a4aUL, 0xd9d65adcUL, 0x40df0b66UL, 0x37d83bf0UL, 0xa9bcae53UL, 0xdebb9ec5UL, 0x47b2cf7fUL, 0x30b5ffe9UL, 0xbdbdf21cUL, 0xcabac28aUL, 0x53b39330UL, 0x24b4a3a6UL, 0xbad03605UL, 0xcdd70693UL, 0x54de5729UL, 0x23d967bfUL, 0xb3667a2eUL, 0xc4614ab8UL, 0x5d681b02UL, 0x2a6f2b94UL, 0xb40bbe37UL, 0xc30c8ea1UL, 0x5a05df1bUL, 0x2d02ef8dUL }; static PyObject * binascii_crc32(PyObject *self, PyObject *args) { /* By Jim Ahlstrom; All rights transferred to CNRI */ unsigned char *bin_data; unsigned long crc = 0UL; /* initial value of CRC */ int len; long result; if ( !PyArg_ParseTuple(args, "s#|l:crc32", &bin_data, &len, &crc) ) return NULL; crc = ~ crc; #if SIZEOF_LONG > 4 /* only want the trailing 32 bits */ crc &= 0xFFFFFFFFUL; #endif while (len-- > 0) crc = crc_32_tab[(crc ^ *bin_data++) & 0xffUL] ^ (crc >> 8); /* Note: (crc >> 8) MUST zero fill on left */ result = (long)(crc ^ 0xFFFFFFFFUL); #if SIZEOF_LONG > 4 /* Extend the sign bit. This is one way to ensure the result is the * same across platforms. The other way would be to return an * unbounded unsigned long, but the evidence suggests that lots of * code outside this treats the result as if it were a signed 4-byte * integer. */ result |= -(result & (1L << 31)); #endif return PyInt_FromLong(result); } static PyObject * binascii_hexlify(PyObject *self, PyObject *args) { char* argbuf; int arglen; PyObject *retval; char* retbuf; int i, j; if (!PyArg_ParseTuple(args, "t#:b2a_hex", &argbuf, &arglen)) return NULL; assert(arglen >= 0); if (arglen > INT_MAX / 2) return PyErr_NoMemory(); retval = PyString_FromStringAndSize(NULL, arglen*2); if (!retval) return NULL; retbuf = PyString_AsString(retval); if (!retbuf) goto finally; /* make hex version of string, taken from shamodule.c */ for (i=j=0; i < arglen; i++) { char c; c = (argbuf[i] >> 4) & 0xf; c = (c>9) ? c+'a'-10 : c + '0'; retbuf[j++] = c; c = argbuf[i] & 0xf; c = (c>9) ? c+'a'-10 : c + '0'; retbuf[j++] = c; } return retval; finally: Py_DECREF(retval); return NULL; } PyDoc_STRVAR(doc_hexlify, "b2a_hex(data) -> s; Hexadecimal representation of binary data.\n\ \n\ This function is also available as \"hexlify()\"."); static int to_int(int c) { if (isdigit(c)) return c - '0'; else { if (isupper(c)) c = tolower(c); if (c >= 'a' && c <= 'f') return c - 'a' + 10; } return -1; } static PyObject * binascii_unhexlify(PyObject *self, PyObject *args) { char* argbuf; int arglen; PyObject *retval; char* retbuf; int i, j; if (!PyArg_ParseTuple(args, "s#:a2b_hex", &argbuf, &arglen)) return NULL; assert(arglen >= 0); /* XXX What should we do about strings with an odd length? Should * we add an implicit leading zero, or a trailing zero? For now, * raise an exception. */ if (arglen % 2) { PyErr_SetString(PyExc_TypeError, "Odd-length string"); return NULL; } retval = PyString_FromStringAndSize(NULL, (arglen/2)); if (!retval) return NULL; retbuf = PyString_AsString(retval); if (!retbuf) goto finally; for (i=j=0; i < arglen; i += 2) { int top = to_int(Py_CHARMASK(argbuf[i])); int bot = to_int(Py_CHARMASK(argbuf[i+1])); if (top == -1 || bot == -1) { PyErr_SetString(PyExc_TypeError, "Non-hexadecimal digit found"); goto finally; } retbuf[j++] = (top << 4) + bot; } return retval; finally: Py_DECREF(retval); return NULL; } PyDoc_STRVAR(doc_unhexlify, "a2b_hex(hexstr) -> s; Binary data of hexadecimal representation.\n\ \n\ hexstr must contain an even number of hex digits (upper or lower case).\n\ This function is also available as \"unhexlify()\""); static int table_hex[128] = { -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9,-1,-1, -1,-1,-1,-1, -1,10,11,12, 13,14,15,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,10,11,12, 13,14,15,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1 }; #define hexval(c) table_hex[(unsigned int)(c)] #define MAXLINESIZE 76 PyDoc_STRVAR(doc_a2b_qp, "Decode a string of qp-encoded data"); static PyObject* binascii_a2b_qp(PyObject *self, PyObject *args, PyObject *kwargs) { unsigned int in, out; char ch; unsigned char *data, *odata; unsigned int datalen = 0; PyObject *rv; static char *kwlist[] = {"data", "header", NULL}; int header = 0; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "s#|i", kwlist, &data, &datalen, &header)) return NULL; /* We allocate the output same size as input, this is overkill. * The previous implementation used calloc() so we'll zero out the * memory here too, since PyMem_Malloc() does not guarantee that. */ odata = (unsigned char *) PyMem_Malloc(datalen); if (odata == NULL) { PyErr_NoMemory(); return NULL; } memset(odata, datalen, 0); in = out = 0; while (in < datalen) { if (data[in] == '=') { in++; if (in >= datalen) break; /* Soft line breaks */ if ((data[in] == '\n') || (data[in] == '\r') || (data[in] == ' ') || (data[in] == '\t')) { if (data[in] != '\n') { while (in < datalen && data[in] != '\n') in++; } if (in < datalen) in++; } else if (data[in] == '=') { /* broken case from broken python qp */ odata[out++] = '='; in++; } else if (((data[in] >= 'A' && data[in] <= 'F') || (data[in] >= 'a' && data[in] <= 'f') || (data[in] >= '0' && data[in] <= '9')) && ((data[in+1] >= 'A' && data[in+1] <= 'F') || (data[in+1] >= 'a' && data[in+1] <= 'f') || (data[in+1] >= '0' && data[in+1] <= '9'))) { /* hexval */ ch = hexval(data[in]) << 4; in++; ch |= hexval(data[in]); in++; odata[out++] = ch; } else { odata[out++] = '='; } } else if (header && data[in] == '_') { odata[out++] = ' '; in++; } else { odata[out] = data[in]; in++; out++; } } if ((rv = PyString_FromStringAndSize((char *)odata, out)) == NULL) { PyMem_Free(odata); return NULL; } PyMem_Free(odata); return rv; } static int to_hex (unsigned char ch, unsigned char *s) { unsigned int uvalue = ch; s[1] = "0123456789ABCDEF"[uvalue % 16]; uvalue = (uvalue / 16); s[0] = "0123456789ABCDEF"[uvalue % 16]; return 0; } PyDoc_STRVAR(doc_b2a_qp, "b2a_qp(data, quotetabs=0, istext=1, header=0) -> s; \n\ Encode a string using quoted-printable encoding. \n\ \n\ On encoding, when istext is set, newlines are not encoded, and white \n\ space at end of lines is. When istext is not set, \\r and \\n (CR/LF) are \n\ both encoded. When quotetabs is set, space and tabs are encoded."); /* XXX: This is ridiculously complicated to be backward compatible * (mostly) with the quopri module. It doesn't re-create the quopri * module bug where text ending in CRLF has the CR encoded */ static PyObject* binascii_b2a_qp (PyObject *self, PyObject *args, PyObject *kwargs) { unsigned int in, out; unsigned char *data, *odata; unsigned int datalen = 0, odatalen = 0; PyObject *rv; unsigned int linelen = 0; static char *kwlist[] = {"data", "quotetabs", "istext", "header", NULL}; int istext = 1; int quotetabs = 0; int header = 0; unsigned char ch; int crlf = 0; unsigned char *p; if (!PyArg_ParseTupleAndKeywords(args, kwargs, "s#|iii", kwlist, &data, &datalen, "etabs, &istext, &header)) return NULL; /* See if this string is using CRLF line ends */ /* XXX: this function has the side effect of converting all of * the end of lines to be the same depending on this detection * here */ p = (unsigned char *) strchr((char *)data, '\n'); if ((p != NULL) && (p > data) && (*(p-1) == '\r')) crlf = 1; /* First, scan to see how many characters need to be encoded */ in = 0; while (in < datalen) { if ((data[in] > 126) || (data[in] == '=') || (header && data[in] == '_') || ((data[in] == '.') && (linelen == 1)) || (!istext && ((data[in] == '\r') || (data[in] == '\n'))) || ((data[in] == '\t' || data[in] == ' ') && (in + 1 == datalen)) || ((data[in] < 33) && (data[in] != '\r') && (data[in] != '\n') && (quotetabs && ((data[in] != '\t') || (data[in] != ' '))))) { if ((linelen + 3) >= MAXLINESIZE) { linelen = 0; if (crlf) odatalen += 3; else odatalen += 2; } linelen += 3; odatalen += 3; in++; } else { if (istext && ((data[in] == '\n') || ((in+1 < datalen) && (data[in] == '\r') && (data[in+1] == '\n')))) { linelen = 0; /* Protect against whitespace on end of line */ if (in && ((data[in-1] == ' ') || (data[in-1] == '\t'))) odatalen += 2; if (crlf) odatalen += 2; else odatalen += 1; if (data[in] == '\r') in += 2; else in++; } else { if ((in + 1 != datalen) && (data[in+1] != '\n') && (linelen + 1) >= MAXLINESIZE) { linelen = 0; if (crlf) odatalen += 3; else odatalen += 2; } linelen++; odatalen++; in++; } } } /* We allocate the output same size as input, this is overkill. * The previous implementation used calloc() so we'll zero out the * memory here too, since PyMem_Malloc() does not guarantee that. */ odata = (unsigned char *) PyMem_Malloc(odatalen); if (odata == NULL) { PyErr_NoMemory(); return NULL; } memset(odata, odatalen, 0); in = out = linelen = 0; while (in < datalen) { if ((data[in] > 126) || (data[in] == '=') || (header && data[in] == '_') || ((data[in] == '.') && (linelen == 1)) || (!istext && ((data[in] == '\r') || (data[in] == '\n'))) || ((data[in] == '\t' || data[in] == ' ') && (in + 1 == datalen)) || ((data[in] < 33) && (data[in] != '\r') && (data[in] != '\n') && (quotetabs && ((data[in] != '\t') || (data[in] != ' '))))) { if ((linelen + 3 )>= MAXLINESIZE) { odata[out++] = '='; if (crlf) odata[out++] = '\r'; odata[out++] = '\n'; linelen = 0; } odata[out++] = '='; to_hex(data[in], &odata[out]); out += 2; in++; linelen += 3; } else { if (istext && ((data[in] == '\n') || ((in+1 < datalen) && (data[in] == '\r') && (data[in+1] == '\n')))) { linelen = 0; /* Protect against whitespace on end of line */ if (out && ((odata[out-1] == ' ') || (odata[out-1] == '\t'))) { ch = odata[out-1]; odata[out-1] = '='; to_hex(ch, &odata[out]); out += 2; } if (crlf) odata[out++] = '\r'; odata[out++] = '\n'; if (data[in] == '\r') in += 2; else in++; } else { if ((in + 1 != datalen) && (data[in+1] != '\n') && (linelen + 1) >= MAXLINESIZE) { odata[out++] = '='; if (crlf) odata[out++] = '\r'; odata[out++] = '\n'; linelen = 0; } linelen++; if (header && data[in] == ' ') { odata[out++] = '_'; in++; } else { odata[out++] = data[in++]; } } } } if ((rv = PyString_FromStringAndSize((char *)odata, out)) == NULL) { PyMem_Free(odata); return NULL; } PyMem_Free(odata); return rv; } /* List of functions defined in the module */ static struct PyMethodDef binascii_module_methods[] = { {"a2b_uu", binascii_a2b_uu, METH_VARARGS, doc_a2b_uu}, {"b2a_uu", binascii_b2a_uu, METH_VARARGS, doc_b2a_uu}, {"a2b_base64", binascii_a2b_base64, METH_VARARGS, doc_a2b_base64}, {"b2a_base64", binascii_b2a_base64, METH_VARARGS, doc_b2a_base64}, {"a2b_hqx", binascii_a2b_hqx, METH_VARARGS, doc_a2b_hqx}, {"b2a_hqx", binascii_b2a_hqx, METH_VARARGS, doc_b2a_hqx}, {"b2a_hex", binascii_hexlify, METH_VARARGS, doc_hexlify}, {"a2b_hex", binascii_unhexlify, METH_VARARGS, doc_unhexlify}, {"hexlify", binascii_hexlify, METH_VARARGS, doc_hexlify}, {"unhexlify", binascii_unhexlify, METH_VARARGS, doc_unhexlify}, {"rlecode_hqx", binascii_rlecode_hqx, METH_VARARGS, doc_rlecode_hqx}, {"rledecode_hqx", binascii_rledecode_hqx, METH_VARARGS, doc_rledecode_hqx}, {"crc_hqx", binascii_crc_hqx, METH_VARARGS, doc_crc_hqx}, {"crc32", binascii_crc32, METH_VARARGS, doc_crc32}, {"a2b_qp", (PyCFunction)binascii_a2b_qp, METH_VARARGS | METH_KEYWORDS, doc_a2b_qp}, {"b2a_qp", (PyCFunction)binascii_b2a_qp, METH_VARARGS | METH_KEYWORDS, doc_b2a_qp}, {NULL, NULL} /* sentinel */ }; /* Initialization function for the module (*must* be called initbinascii) */ PyDoc_STRVAR(doc_binascii, "Conversion between binary data and ASCII"); PyMODINIT_FUNC initbinascii(void) { PyObject *m, *d, *x; /* Create the module and add the functions */ m = Py_InitModule("binascii", binascii_module_methods); d = PyModule_GetDict(m); x = PyString_FromString(doc_binascii); PyDict_SetItemString(d, "__doc__", x); Py_XDECREF(x); Error = PyErr_NewException("binascii.Error", NULL, NULL); PyDict_SetItemString(d, "Error", Error); Incomplete = PyErr_NewException("binascii.Incomplete", NULL, NULL); PyDict_SetItemString(d, "Incomplete", Incomplete); } Python-2.3.7/Modules/Setup.config.in0000644001241000117560000000062607576144556016603 0ustar loewishpifb6# This file is transmogrified into Setup.config by config.status. # The purpose of this file is to conditionally enable certain modules # based on configure-time options. # Threading @USE_THREAD_MODULE@thread threadmodule.c # The signal module @USE_SIGNAL_MODULE@signal signalmodule.c # The rest of the modules previously listed in this file are built # by the setup.py script in Python 2.1 and later. Python-2.3.7/Modules/selectmodule.c0000644001241000117560000004071010027645221016512 0ustar loewishpifb6/* select - Module containing unix select(2) call. Under Unix, the file descriptors are small integers. Under Win32, select only exists for sockets, and sockets may have any value except INVALID_SOCKET. Under BeOS, we suffer the same dichotomy as Win32; sockets can be anything >= 0. */ #include "Python.h" /* Windows #defines FD_SETSIZE to 64 if FD_SETSIZE isn't already defined. 64 is too small (too many people have bumped into that limit). Here we boost it. Users who want even more than the boosted limit should #define FD_SETSIZE higher before this; e.g., via compiler /D switch. */ #if defined(MS_WINDOWS) && !defined(FD_SETSIZE) #define FD_SETSIZE 512 #endif #if defined(HAVE_POLL_H) #include #elif defined(HAVE_SYS_POLL_H) #include #endif #ifdef __sgi /* This is missing from unistd.h */ extern void bzero(void *, int); #endif #ifndef DONT_HAVE_SYS_TYPES_H #include #endif #if defined(PYOS_OS2) && !defined(PYCC_GCC) #include #include #endif #ifdef MS_WINDOWS #include #else #ifdef __BEOS__ #include #define SOCKET int #else #define SOCKET int #endif #endif static PyObject *SelectError; /* list of Python objects and their file descriptor */ typedef struct { PyObject *obj; /* owned reference */ SOCKET fd; int sentinel; /* -1 == sentinel */ } pylist; static void reap_obj(pylist fd2obj[FD_SETSIZE + 1]) { int i; for (i = 0; i < FD_SETSIZE + 1 && fd2obj[i].sentinel >= 0; i++) { Py_XDECREF(fd2obj[i].obj); fd2obj[i].obj = NULL; } fd2obj[0].sentinel = -1; } /* returns -1 and sets the Python exception if an error occurred, otherwise returns a number >= 0 */ static int list2set(PyObject *list, fd_set *set, pylist fd2obj[FD_SETSIZE + 1]) { int i; int max = -1; int index = 0; int len = PyList_Size(list); PyObject* o = NULL; fd2obj[0].obj = (PyObject*)0; /* set list to zero size */ FD_ZERO(set); for (i = 0; i < len; i++) { SOCKET v; /* any intervening fileno() calls could decr this refcnt */ if (!(o = PyList_GetItem(list, i))) return -1; Py_INCREF(o); v = PyObject_AsFileDescriptor( o ); if (v == -1) goto finally; #if defined(_MSC_VER) max = 0; /* not used for Win32 */ #else /* !_MSC_VER */ if (v < 0 || v >= FD_SETSIZE) { PyErr_SetString(PyExc_ValueError, "filedescriptor out of range in select()"); goto finally; } if (v > max) max = v; #endif /* _MSC_VER */ FD_SET(v, set); /* add object and its file descriptor to the list */ if (index >= FD_SETSIZE) { PyErr_SetString(PyExc_ValueError, "too many file descriptors in select()"); goto finally; } fd2obj[index].obj = o; fd2obj[index].fd = v; fd2obj[index].sentinel = 0; fd2obj[++index].sentinel = -1; } return max+1; finally: Py_XDECREF(o); return -1; } /* returns NULL and sets the Python exception if an error occurred */ static PyObject * set2list(fd_set *set, pylist fd2obj[FD_SETSIZE + 1]) { int i, j, count=0; PyObject *list, *o; SOCKET fd; for (j = 0; fd2obj[j].sentinel >= 0; j++) { if (FD_ISSET(fd2obj[j].fd, set)) count++; } list = PyList_New(count); if (!list) return NULL; i = 0; for (j = 0; fd2obj[j].sentinel >= 0; j++) { fd = fd2obj[j].fd; if (FD_ISSET(fd, set)) { #ifndef _MSC_VER if (fd > FD_SETSIZE) { PyErr_SetString(PyExc_SystemError, "filedescriptor out of range returned in select()"); goto finally; } #endif o = fd2obj[j].obj; fd2obj[j].obj = NULL; /* transfer ownership */ if (PyList_SetItem(list, i, o) < 0) goto finally; i++; } } return list; finally: Py_DECREF(list); return NULL; } #undef SELECT_USES_HEAP #if FD_SETSIZE > 1024 #define SELECT_USES_HEAP #endif /* FD_SETSIZE > 1024 */ static PyObject * select_select(PyObject *self, PyObject *args) { #ifdef SELECT_USES_HEAP pylist *rfd2obj, *wfd2obj, *efd2obj; #else /* !SELECT_USES_HEAP */ /* XXX: All this should probably be implemented as follows: * - find the highest descriptor we're interested in * - add one * - that's the size * See: Stevens, APitUE, $12.5.1 */ pylist rfd2obj[FD_SETSIZE + 1]; pylist wfd2obj[FD_SETSIZE + 1]; pylist efd2obj[FD_SETSIZE + 1]; #endif /* SELECT_USES_HEAP */ PyObject *ifdlist, *ofdlist, *efdlist; PyObject *ret = NULL; PyObject *tout = Py_None; fd_set ifdset, ofdset, efdset; double timeout; struct timeval tv, *tvp; long seconds; int imax, omax, emax, max; int n; /* convert arguments */ if (!PyArg_ParseTuple(args, "OOO|O:select", &ifdlist, &ofdlist, &efdlist, &tout)) return NULL; if (tout == Py_None) tvp = (struct timeval *)0; else if (!PyNumber_Check(tout)) { PyErr_SetString(PyExc_TypeError, "timeout must be a float or None"); return NULL; } else { timeout = PyFloat_AsDouble(tout); if (timeout == -1 && PyErr_Occurred()) return NULL; if (timeout > (double)LONG_MAX) { PyErr_SetString(PyExc_OverflowError, "timeout period too long"); return NULL; } seconds = (long)timeout; timeout = timeout - (double)seconds; tv.tv_sec = seconds; tv.tv_usec = (long)(timeout*1000000.0); tvp = &tv; } /* sanity check first three arguments */ if (!PyList_Check(ifdlist) || !PyList_Check(ofdlist) || !PyList_Check(efdlist)) { PyErr_SetString(PyExc_TypeError, "arguments 1-3 must be lists"); return NULL; } #ifdef SELECT_USES_HEAP /* Allocate memory for the lists */ rfd2obj = PyMem_NEW(pylist, FD_SETSIZE + 1); wfd2obj = PyMem_NEW(pylist, FD_SETSIZE + 1); efd2obj = PyMem_NEW(pylist, FD_SETSIZE + 1); if (rfd2obj == NULL || wfd2obj == NULL || efd2obj == NULL) { if (rfd2obj) PyMem_DEL(rfd2obj); if (wfd2obj) PyMem_DEL(wfd2obj); if (efd2obj) PyMem_DEL(efd2obj); return PyErr_NoMemory(); } #endif /* SELECT_USES_HEAP */ /* Convert lists to fd_sets, and get maximum fd number * propagates the Python exception set in list2set() */ rfd2obj[0].sentinel = -1; wfd2obj[0].sentinel = -1; efd2obj[0].sentinel = -1; if ((imax=list2set(ifdlist, &ifdset, rfd2obj)) < 0) goto finally; if ((omax=list2set(ofdlist, &ofdset, wfd2obj)) < 0) goto finally; if ((emax=list2set(efdlist, &efdset, efd2obj)) < 0) goto finally; max = imax; if (omax > max) max = omax; if (emax > max) max = emax; Py_BEGIN_ALLOW_THREADS n = select(max, &ifdset, &ofdset, &efdset, tvp); Py_END_ALLOW_THREADS #ifdef MS_WINDOWS if (n == SOCKET_ERROR) { PyErr_SetExcFromWindowsErr(SelectError, WSAGetLastError()); } #else if (n < 0) { PyErr_SetFromErrno(SelectError); } #endif else if (n == 0) { /* optimization */ ifdlist = PyList_New(0); if (ifdlist) { ret = Py_BuildValue("OOO", ifdlist, ifdlist, ifdlist); Py_DECREF(ifdlist); } } else { /* any of these three calls can raise an exception. it's more convenient to test for this after all three calls... but is that acceptable? */ ifdlist = set2list(&ifdset, rfd2obj); ofdlist = set2list(&ofdset, wfd2obj); efdlist = set2list(&efdset, efd2obj); if (PyErr_Occurred()) ret = NULL; else ret = Py_BuildValue("OOO", ifdlist, ofdlist, efdlist); Py_DECREF(ifdlist); Py_DECREF(ofdlist); Py_DECREF(efdlist); } finally: reap_obj(rfd2obj); reap_obj(wfd2obj); reap_obj(efd2obj); #ifdef SELECT_USES_HEAP PyMem_DEL(rfd2obj); PyMem_DEL(wfd2obj); PyMem_DEL(efd2obj); #endif /* SELECT_USES_HEAP */ return ret; } #if defined(HAVE_POLL) && !defined(HAVE_BROKEN_POLL) /* * poll() support */ typedef struct { PyObject_HEAD PyObject *dict; int ufd_uptodate; int ufd_len; struct pollfd *ufds; } pollObject; static PyTypeObject poll_Type; /* Update the malloc'ed array of pollfds to match the dictionary contained within a pollObject. Return 1 on success, 0 on an error. */ static int update_ufd_array(pollObject *self) { int i, pos; PyObject *key, *value; self->ufd_len = PyDict_Size(self->dict); PyMem_Resize(self->ufds, struct pollfd, self->ufd_len); if (self->ufds == NULL) { PyErr_NoMemory(); return 0; } i = pos = 0; while (PyDict_Next(self->dict, &pos, &key, &value)) { self->ufds[i].fd = PyInt_AsLong(key); self->ufds[i].events = (short)PyInt_AsLong(value); i++; } self->ufd_uptodate = 1; return 1; } PyDoc_STRVAR(poll_register_doc, "register(fd [, eventmask] ) -> None\n\n\ Register a file descriptor with the polling object.\n\ fd -- either an integer, or an object with a fileno() method returning an\n\ int.\n\ events -- an optional bitmask describing the type of events to check for"); static PyObject * poll_register(pollObject *self, PyObject *args) { PyObject *o, *key, *value; int fd, events = POLLIN | POLLPRI | POLLOUT; int err; if (!PyArg_ParseTuple(args, "O|i:register", &o, &events)) { return NULL; } fd = PyObject_AsFileDescriptor(o); if (fd == -1) return NULL; /* Add entry to the internal dictionary: the key is the file descriptor, and the value is the event mask. */ key = PyInt_FromLong(fd); if (key == NULL) return NULL; value = PyInt_FromLong(events); if (value == NULL) { Py_DECREF(key); return NULL; } err = PyDict_SetItem(self->dict, key, value); Py_DECREF(key); Py_DECREF(value); if (err < 0) return NULL; self->ufd_uptodate = 0; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(poll_unregister_doc, "unregister(fd) -> None\n\n\ Remove a file descriptor being tracked by the polling object."); static PyObject * poll_unregister(pollObject *self, PyObject *args) { PyObject *o, *key; int fd; if (!PyArg_ParseTuple(args, "O:unregister", &o)) { return NULL; } fd = PyObject_AsFileDescriptor( o ); if (fd == -1) return NULL; /* Check whether the fd is already in the array */ key = PyInt_FromLong(fd); if (key == NULL) return NULL; if (PyDict_DelItem(self->dict, key) == -1) { Py_DECREF(key); /* This will simply raise the KeyError set by PyDict_DelItem if the file descriptor isn't registered. */ return NULL; } Py_DECREF(key); self->ufd_uptodate = 0; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(poll_poll_doc, "poll( [timeout] ) -> list of (fd, event) 2-tuples\n\n\ Polls the set of registered file descriptors, returning a list containing \n\ any descriptors that have events or errors to report."); static PyObject * poll_poll(pollObject *self, PyObject *args) { PyObject *result_list = NULL, *tout = NULL; int timeout = 0, poll_result, i, j; PyObject *value = NULL, *num = NULL; if (!PyArg_ParseTuple(args, "|O:poll", &tout)) { return NULL; } /* Check values for timeout */ if (tout == NULL || tout == Py_None) timeout = -1; else if (!PyNumber_Check(tout)) { PyErr_SetString(PyExc_TypeError, "timeout must be an integer or None"); return NULL; } else { tout = PyNumber_Int(tout); if (!tout) return NULL; timeout = PyInt_AsLong(tout); Py_DECREF(tout); } /* Ensure the ufd array is up to date */ if (!self->ufd_uptodate) if (update_ufd_array(self) == 0) return NULL; /* call poll() */ Py_BEGIN_ALLOW_THREADS; poll_result = poll(self->ufds, self->ufd_len, timeout); Py_END_ALLOW_THREADS; if (poll_result < 0) { PyErr_SetFromErrno(SelectError); return NULL; } /* build the result list */ result_list = PyList_New(poll_result); if (!result_list) return NULL; else { for (i = 0, j = 0; j < poll_result; j++) { /* skip to the next fired descriptor */ while (!self->ufds[i].revents) { i++; } /* if we hit a NULL return, set value to NULL and break out of loop; code at end will clean up result_list */ value = PyTuple_New(2); if (value == NULL) goto error; num = PyInt_FromLong(self->ufds[i].fd); if (num == NULL) { Py_DECREF(value); goto error; } PyTuple_SET_ITEM(value, 0, num); num = PyInt_FromLong(self->ufds[i].revents); if (num == NULL) { Py_DECREF(value); goto error; } PyTuple_SET_ITEM(value, 1, num); if ((PyList_SetItem(result_list, j, value)) == -1) { Py_DECREF(value); goto error; } i++; } } return result_list; error: Py_DECREF(result_list); return NULL; } static PyMethodDef poll_methods[] = { {"register", (PyCFunction)poll_register, METH_VARARGS, poll_register_doc}, {"unregister", (PyCFunction)poll_unregister, METH_VARARGS, poll_unregister_doc}, {"poll", (PyCFunction)poll_poll, METH_VARARGS, poll_poll_doc}, {NULL, NULL} /* sentinel */ }; static pollObject * newPollObject(void) { pollObject *self; self = PyObject_New(pollObject, &poll_Type); if (self == NULL) return NULL; /* ufd_uptodate is a Boolean, denoting whether the array pointed to by ufds matches the contents of the dictionary. */ self->ufd_uptodate = 0; self->ufds = NULL; self->dict = PyDict_New(); if (self->dict == NULL) { Py_DECREF(self); return NULL; } return self; } static void poll_dealloc(pollObject *self) { if (self->ufds != NULL) PyMem_DEL(self->ufds); Py_XDECREF(self->dict); PyObject_Del(self); } static PyObject * poll_getattr(pollObject *self, char *name) { return Py_FindMethod(poll_methods, (PyObject *)self, name); } static PyTypeObject poll_Type = { /* The ob_type field must be initialized in the module init function * to be portable to Windows without using C++. */ PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "select.poll", /*tp_name*/ sizeof(pollObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)poll_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)poll_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; PyDoc_STRVAR(poll_doc, "Returns a polling object, which supports registering and\n\ unregistering file descriptors, and then polling them for I/O events."); static PyObject * select_poll(PyObject *self, PyObject *args) { pollObject *rv; if (!PyArg_ParseTuple(args, ":poll")) return NULL; rv = newPollObject(); if ( rv == NULL ) return NULL; return (PyObject *)rv; } #endif /* HAVE_POLL && !HAVE_BROKEN_POLL */ PyDoc_STRVAR(select_doc, "select(rlist, wlist, xlist[, timeout]) -> (rlist, wlist, xlist)\n\ \n\ Wait until one or more file descriptors are ready for some kind of I/O.\n\ The first three arguments are lists of file descriptors to be waited for:\n\ rlist -- wait until ready for reading\n\ wlist -- wait until ready for writing\n\ xlist -- wait for an ``exceptional condition''\n\ If only one kind of condition is required, pass [] for the other lists.\n\ A file descriptor is either a socket or file object, or a small integer\n\ gotten from a fileno() method call on one of those.\n\ \n\ The optional 4th argument specifies a timeout in seconds; it may be\n\ a floating point number to specify fractions of seconds. If it is absent\n\ or None, the call will never time out.\n\ \n\ The return value is a tuple of three lists corresponding to the first three\n\ arguments; each contains the subset of the corresponding file descriptors\n\ that are ready.\n\ \n\ *** IMPORTANT NOTICE ***\n\ On Windows, only sockets are supported; on Unix, all file descriptors."); static PyMethodDef select_methods[] = { {"select", select_select, METH_VARARGS, select_doc}, #if defined(HAVE_POLL) && !defined(HAVE_BROKEN_POLL) {"poll", select_poll, METH_VARARGS, poll_doc}, #endif /* HAVE_POLL && !HAVE_BROKEN_POLL */ {0, 0}, /* sentinel */ }; PyDoc_STRVAR(module_doc, "This module supports asynchronous I/O on multiple file descriptors.\n\ \n\ *** IMPORTANT NOTICE ***\n\ On Windows, only sockets are supported; on Unix, all file descriptors."); PyMODINIT_FUNC initselect(void) { PyObject *m; m = Py_InitModule3("select", select_methods, module_doc); SelectError = PyErr_NewException("select.error", NULL, NULL); Py_INCREF(SelectError); PyModule_AddObject(m, "error", SelectError); #if defined(HAVE_POLL) && !defined(HAVE_BROKEN_POLL) poll_Type.ob_type = &PyType_Type; PyModule_AddIntConstant(m, "POLLIN", POLLIN); PyModule_AddIntConstant(m, "POLLPRI", POLLPRI); PyModule_AddIntConstant(m, "POLLOUT", POLLOUT); PyModule_AddIntConstant(m, "POLLERR", POLLERR); PyModule_AddIntConstant(m, "POLLHUP", POLLHUP); PyModule_AddIntConstant(m, "POLLNVAL", POLLNVAL); #ifdef POLLRDNORM PyModule_AddIntConstant(m, "POLLRDNORM", POLLRDNORM); #endif #ifdef POLLRDBAND PyModule_AddIntConstant(m, "POLLRDBAND", POLLRDBAND); #endif #ifdef POLLWRNORM PyModule_AddIntConstant(m, "POLLWRNORM", POLLWRNORM); #endif #ifdef POLLWRBAND PyModule_AddIntConstant(m, "POLLWRBAND", POLLWRBAND); #endif #ifdef POLLMSG PyModule_AddIntConstant(m, "POLLMSG", POLLMSG); #endif #endif /* HAVE_POLL && !HAVE_BROKEN_POLL */ } Python-2.3.7/Modules/bsddbmodule.c0000644001241000117560000004571207656016534016335 0ustar loewishpifb6/* Berkeley DB interface. Author: Michael McLay Hacked: Guido van Rossum Btree and Recno additions plus sequence methods: David Ely Hacked by Gustavo Niemeyer fixing recno support. XXX To do: - provide a way to access the various hash functions - support more open flags The windows port of the Berkeley DB code is hard to find on the web: www.nightmare.com/software.html */ #include "Python.h" #ifdef WITH_THREAD #include "pythread.h" #endif #include #include #include #ifdef HAVE_DB_185_H #include #else #include #endif /* Please don't include internal header files of the Berkeley db package (it messes up the info required in the Setup file) */ typedef struct { PyObject_HEAD DB *di_bsddb; int di_size; /* -1 means recompute */ int di_type; #ifdef WITH_THREAD PyThread_type_lock di_lock; #endif } bsddbobject; static PyTypeObject Bsddbtype; #define is_bsddbobject(v) ((v)->ob_type == &Bsddbtype) #define check_bsddbobject_open(v, r) if ((v)->di_bsddb == NULL) \ { PyErr_SetString(BsddbError, \ "BSDDB object has already been closed"); \ return r; } static PyObject *BsddbError; static PyObject * newdbhashobject(char *file, int flags, int mode, int bsize, int ffactor, int nelem, int cachesize, int hash, int lorder) { bsddbobject *dp; HASHINFO info; if ((dp = PyObject_New(bsddbobject, &Bsddbtype)) == NULL) return NULL; info.bsize = bsize; info.ffactor = ffactor; info.nelem = nelem; info.cachesize = cachesize; info.hash = NULL; /* XXX should derive from hash argument */ info.lorder = lorder; #ifdef O_BINARY flags |= O_BINARY; #endif Py_BEGIN_ALLOW_THREADS dp->di_bsddb = dbopen(file, flags, mode, DB_HASH, &info); Py_END_ALLOW_THREADS if (dp->di_bsddb == NULL) { PyErr_SetFromErrno(BsddbError); #ifdef WITH_THREAD dp->di_lock = NULL; #endif Py_DECREF(dp); return NULL; } dp->di_size = -1; dp->di_type = DB_HASH; #ifdef WITH_THREAD dp->di_lock = PyThread_allocate_lock(); if (dp->di_lock == NULL) { PyErr_SetString(BsddbError, "can't allocate lock"); Py_DECREF(dp); return NULL; } #endif return (PyObject *)dp; } static PyObject * newdbbtobject(char *file, int flags, int mode, int btflags, int cachesize, int maxkeypage, int minkeypage, int psize, int lorder) { bsddbobject *dp; BTREEINFO info; if ((dp = PyObject_New(bsddbobject, &Bsddbtype)) == NULL) return NULL; info.flags = btflags; info.cachesize = cachesize; info.maxkeypage = maxkeypage; info.minkeypage = minkeypage; info.psize = psize; info.lorder = lorder; info.compare = 0; /* Use default comparison functions, for now..*/ info.prefix = 0; #ifdef O_BINARY flags |= O_BINARY; #endif Py_BEGIN_ALLOW_THREADS dp->di_bsddb = dbopen(file, flags, mode, DB_BTREE, &info); Py_END_ALLOW_THREADS if (dp->di_bsddb == NULL) { PyErr_SetFromErrno(BsddbError); #ifdef WITH_THREAD dp->di_lock = NULL; #endif Py_DECREF(dp); return NULL; } dp->di_size = -1; dp->di_type = DB_BTREE; #ifdef WITH_THREAD dp->di_lock = PyThread_allocate_lock(); if (dp->di_lock == NULL) { PyErr_SetString(BsddbError, "can't allocate lock"); Py_DECREF(dp); return NULL; } #endif return (PyObject *)dp; } static PyObject * newdbrnobject(char *file, int flags, int mode, int rnflags, int cachesize, int psize, int lorder, size_t reclen, u_char bval, char *bfname) { bsddbobject *dp; RECNOINFO info; int fd; if ((dp = PyObject_New(bsddbobject, &Bsddbtype)) == NULL) return NULL; info.flags = rnflags; info.cachesize = cachesize; info.psize = psize; info.lorder = lorder; info.reclen = reclen; info.bval = bval; info.bfname = bfname; #ifdef O_BINARY flags |= O_BINARY; #endif /* This is a hack to avoid a dbopen() bug that happens when * it fails. */ fd = open(file, flags); if (fd == -1) { dp->di_bsddb = NULL; } else { close(fd); Py_BEGIN_ALLOW_THREADS dp->di_bsddb = dbopen(file, flags, mode, DB_RECNO, &info); Py_END_ALLOW_THREADS } if (dp->di_bsddb == NULL) { PyErr_SetFromErrno(BsddbError); #ifdef WITH_THREAD dp->di_lock = NULL; #endif Py_DECREF(dp); return NULL; } dp->di_size = -1; dp->di_type = DB_RECNO; #ifdef WITH_THREAD dp->di_lock = PyThread_allocate_lock(); if (dp->di_lock == NULL) { PyErr_SetString(BsddbError, "can't allocate lock"); Py_DECREF(dp); return NULL; } #endif return (PyObject *)dp; } static void bsddb_dealloc(bsddbobject *dp) { #ifdef WITH_THREAD if (dp->di_lock) { PyThread_acquire_lock(dp->di_lock, 0); PyThread_release_lock(dp->di_lock); PyThread_free_lock(dp->di_lock); dp->di_lock = NULL; } #endif if (dp->di_bsddb != NULL) { int status; Py_BEGIN_ALLOW_THREADS status = (dp->di_bsddb->close)(dp->di_bsddb); Py_END_ALLOW_THREADS if (status != 0) fprintf(stderr, "Python bsddb: close errno %d in dealloc\n", errno); } PyObject_Del(dp); } #ifdef WITH_THREAD #define BSDDB_BGN_SAVE(_dp) \ Py_BEGIN_ALLOW_THREADS PyThread_acquire_lock(_dp->di_lock,1); #define BSDDB_END_SAVE(_dp) \ PyThread_release_lock(_dp->di_lock); Py_END_ALLOW_THREADS #else #define BSDDB_BGN_SAVE(_dp) Py_BEGIN_ALLOW_THREADS #define BSDDB_END_SAVE(_dp) Py_END_ALLOW_THREADS #endif static int bsddb_length(bsddbobject *dp) { check_bsddbobject_open(dp, -1); if (dp->di_size < 0) { DBT krec, drec; int status; int size = 0; BSDDB_BGN_SAVE(dp) for (status = (dp->di_bsddb->seq)(dp->di_bsddb, &krec, &drec,R_FIRST); status == 0; status = (dp->di_bsddb->seq)(dp->di_bsddb, &krec, &drec, R_NEXT)) size++; BSDDB_END_SAVE(dp) if (status < 0) { PyErr_SetFromErrno(BsddbError); return -1; } dp->di_size = size; } return dp->di_size; } static PyObject * bsddb_subscript(bsddbobject *dp, PyObject *key) { int status; DBT krec, drec; char *data,buf[4096]; int size; PyObject *result; recno_t recno; if (dp->di_type == DB_RECNO) { if (!PyArg_Parse(key, "i", &recno)) { PyErr_SetString(PyExc_TypeError, "key type must be integer"); return NULL; } krec.data = &recno; krec.size = sizeof(recno); } else { if (!PyArg_Parse(key, "s#", &data, &size)) { PyErr_SetString(PyExc_TypeError, "key type must be string"); return NULL; } krec.data = data; krec.size = size; } check_bsddbobject_open(dp, NULL); BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->get)(dp->di_bsddb, &krec, &drec, 0); if (status == 0) { if (drec.size > sizeof(buf)) data = malloc(drec.size); else data = buf; if (data!=NULL) memcpy(data,drec.data,drec.size); } BSDDB_END_SAVE(dp) if (data==NULL) return PyErr_NoMemory(); if (status != 0) { if (status < 0) PyErr_SetFromErrno(BsddbError); else PyErr_SetObject(PyExc_KeyError, key); return NULL; } result = PyString_FromStringAndSize(data, (int)drec.size); if (data != buf) free(data); return result; } static int bsddb_ass_sub(bsddbobject *dp, PyObject *key, PyObject *value) { int status; DBT krec, drec; char *data; int size; recno_t recno; if (dp->di_type == DB_RECNO) { if (!PyArg_Parse(key, "i", &recno)) { PyErr_SetString(PyExc_TypeError, "bsddb key type must be integer"); return -1; } krec.data = &recno; krec.size = sizeof(recno); } else { if (!PyArg_Parse(key, "s#", &data, &size)) { PyErr_SetString(PyExc_TypeError, "bsddb key type must be string"); return -1; } krec.data = data; krec.size = size; } check_bsddbobject_open(dp, -1); dp->di_size = -1; if (value == NULL) { BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->del)(dp->di_bsddb, &krec, 0); BSDDB_END_SAVE(dp) } else { if (!PyArg_Parse(value, "s#", &data, &size)) { PyErr_SetString(PyExc_TypeError, "bsddb value type must be string"); return -1; } drec.data = data; drec.size = size; BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->put)(dp->di_bsddb, &krec, &drec, 0); BSDDB_END_SAVE(dp) } if (status != 0) { if (status < 0) PyErr_SetFromErrno(BsddbError); else PyErr_SetObject(PyExc_KeyError, key); return -1; } return 0; } static PyMappingMethods bsddb_as_mapping = { (inquiry)bsddb_length, /*mp_length*/ (binaryfunc)bsddb_subscript, /*mp_subscript*/ (objobjargproc)bsddb_ass_sub, /*mp_ass_subscript*/ }; static PyObject * bsddb_close(bsddbobject *dp) { if (dp->di_bsddb != NULL) { int status; BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->close)(dp->di_bsddb); BSDDB_END_SAVE(dp) if (status != 0) { dp->di_bsddb = NULL; PyErr_SetFromErrno(BsddbError); return NULL; } } dp->di_bsddb = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * bsddb_keys(bsddbobject *dp) { PyObject *list, *item=NULL; DBT krec, drec; char *data=NULL,buf[4096]; int status; int err; check_bsddbobject_open(dp, NULL); list = PyList_New(0); if (list == NULL) return NULL; BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->seq)(dp->di_bsddb, &krec, &drec, R_FIRST); if (status == 0) { if (krec.size > sizeof(buf)) data = malloc(krec.size); else data = buf; if (data != NULL) memcpy(data,krec.data,krec.size); } BSDDB_END_SAVE(dp) if (status == 0 && data==NULL) return PyErr_NoMemory(); while (status == 0) { if (dp->di_type == DB_RECNO) item = PyInt_FromLong(*((int*)data)); else item = PyString_FromStringAndSize(data, (int)krec.size); if (data != buf) free(data); if (item == NULL) { Py_DECREF(list); return NULL; } err = PyList_Append(list, item); Py_DECREF(item); if (err != 0) { Py_DECREF(list); return NULL; } BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->seq) (dp->di_bsddb, &krec, &drec, R_NEXT); if (status == 0) { if (krec.size > sizeof(buf)) data = malloc(krec.size); else data = buf; if (data != NULL) memcpy(data,krec.data,krec.size); } BSDDB_END_SAVE(dp) if (data == NULL) return PyErr_NoMemory(); } if (status < 0) { PyErr_SetFromErrno(BsddbError); Py_DECREF(list); return NULL; } if (dp->di_size < 0) dp->di_size = PyList_Size(list); /* We just did the work */ return list; } static PyObject * bsddb_has_key(bsddbobject *dp, PyObject *args) { DBT krec, drec; int status; char *data; int size; recno_t recno; if (dp->di_type == DB_RECNO) { if (!PyArg_ParseTuple(args, "i;key type must be integer", &recno)) { return NULL; } krec.data = &recno; krec.size = sizeof(recno); } else { if (!PyArg_ParseTuple(args, "s#;key type must be string", &data, &size)) { return NULL; } krec.data = data; krec.size = size; } check_bsddbobject_open(dp, NULL); BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->get)(dp->di_bsddb, &krec, &drec, 0); BSDDB_END_SAVE(dp) if (status < 0) { PyErr_SetFromErrno(BsddbError); return NULL; } return PyInt_FromLong(status == 0); } static PyObject * bsddb_set_location(bsddbobject *dp, PyObject *key) { int status; DBT krec, drec; char *data,buf[4096]; int size; PyObject *result; recno_t recno; if (dp->di_type == DB_RECNO) { if (!PyArg_ParseTuple(key, "i;key type must be integer", &recno)) { return NULL; } krec.data = &recno; krec.size = sizeof(recno); } else { if (!PyArg_ParseTuple(key, "s#;key type must be string", &data, &size)) { return NULL; } krec.data = data; krec.size = size; } check_bsddbobject_open(dp, NULL); BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->seq)(dp->di_bsddb, &krec, &drec, R_CURSOR); if (status == 0) { if (drec.size > sizeof(buf)) data = malloc(drec.size); else data = buf; if (data!=NULL) memcpy(data,drec.data,drec.size); } BSDDB_END_SAVE(dp) if (data==NULL) return PyErr_NoMemory(); if (status != 0) { if (status < 0) PyErr_SetFromErrno(BsddbError); else PyErr_SetObject(PyExc_KeyError, key); return NULL; } if (dp->di_type == DB_RECNO) result = Py_BuildValue("is#", *((int*)krec.data), data, drec.size); else result = Py_BuildValue("s#s#", krec.data, krec.size, data, drec.size); if (data != buf) free(data); return result; } static PyObject * bsddb_seq(bsddbobject *dp, int sequence_request) { int status; DBT krec, drec; char *kdata=NULL,kbuf[4096]; char *ddata=NULL,dbuf[4096]; PyObject *result; check_bsddbobject_open(dp, NULL); krec.data = 0; krec.size = 0; BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->seq)(dp->di_bsddb, &krec, &drec, sequence_request); if (status == 0) { if (krec.size > sizeof(kbuf)) kdata = malloc(krec.size); else kdata = kbuf; if (kdata != NULL) memcpy(kdata,krec.data,krec.size); if (drec.size > sizeof(dbuf)) ddata = malloc(drec.size); else ddata = dbuf; if (ddata != NULL) memcpy(ddata,drec.data,drec.size); } BSDDB_END_SAVE(dp) if (status == 0) { if ((kdata == NULL) || (ddata == NULL)) return PyErr_NoMemory(); } else { /* (status != 0) */ if (status < 0) PyErr_SetFromErrno(BsddbError); else PyErr_SetString(PyExc_KeyError, "no key/data pairs"); return NULL; } if (dp->di_type == DB_RECNO) result = Py_BuildValue("is#", *((int*)kdata), ddata, drec.size); else result = Py_BuildValue("s#s#", kdata, krec.size, ddata, drec.size); if (kdata != kbuf) free(kdata); if (ddata != dbuf) free(ddata); return result; } static PyObject * bsddb_next(bsddbobject *dp) { return bsddb_seq(dp, R_NEXT); } static PyObject * bsddb_previous(bsddbobject *dp) { return bsddb_seq(dp, R_PREV); } static PyObject * bsddb_first(bsddbobject *dp) { return bsddb_seq(dp, R_FIRST); } static PyObject * bsddb_last(bsddbobject *dp) { return bsddb_seq(dp, R_LAST); } static PyObject * bsddb_sync(bsddbobject *dp) { int status; check_bsddbobject_open(dp, NULL); BSDDB_BGN_SAVE(dp) status = (dp->di_bsddb->sync)(dp->di_bsddb, 0); BSDDB_END_SAVE(dp) if (status != 0) { PyErr_SetFromErrno(BsddbError); return NULL; } return PyInt_FromLong(status = 0); } static PyMethodDef bsddb_methods[] = { {"close", (PyCFunction)bsddb_close, METH_NOARGS}, {"keys", (PyCFunction)bsddb_keys, METH_NOARGS}, {"has_key", (PyCFunction)bsddb_has_key, METH_VARARGS}, {"set_location", (PyCFunction)bsddb_set_location, METH_VARARGS}, {"next", (PyCFunction)bsddb_next, METH_NOARGS}, {"previous", (PyCFunction)bsddb_previous, METH_NOARGS}, {"first", (PyCFunction)bsddb_first, METH_NOARGS}, {"last", (PyCFunction)bsddb_last, METH_NOARGS}, {"sync", (PyCFunction)bsddb_sync, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * bsddb_getattr(PyObject *dp, char *name) { return Py_FindMethod(bsddb_methods, dp, name); } static PyTypeObject Bsddbtype = { PyObject_HEAD_INIT(NULL) 0, "bsddb.bsddb", sizeof(bsddbobject), 0, (destructor)bsddb_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)bsddb_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ &bsddb_as_mapping, /*tp_as_mapping*/ }; static PyObject * bsdhashopen(PyObject *self, PyObject *args) { char *file; char *flag = NULL; int flags = O_RDONLY; int mode = 0666; int bsize = 0; int ffactor = 0; int nelem = 0; int cachesize = 0; int hash = 0; /* XXX currently ignored */ int lorder = 0; if (!PyArg_ParseTuple(args, "z|siiiiiii:hashopen", &file, &flag, &mode, &bsize, &ffactor, &nelem, &cachesize, &hash, &lorder)) return NULL; if (flag != NULL) { /* XXX need to pass O_EXCL, O_EXLOCK, O_NONBLOCK, O_SHLOCK */ if (flag[0] == 'r') flags = O_RDONLY; else if (flag[0] == 'w') flags = O_RDWR; else if (flag[0] == 'c') flags = O_RDWR|O_CREAT; else if (flag[0] == 'n') flags = O_RDWR|O_CREAT|O_TRUNC; else { PyErr_SetString(BsddbError, "Flag should begin with 'r', 'w', 'c' or 'n'"); return NULL; } if (flag[1] == 'l') { #if defined(O_EXLOCK) && defined(O_SHLOCK) if (flag[0] == 'r') flags |= O_SHLOCK; else flags |= O_EXLOCK; #else PyErr_SetString(BsddbError, "locking not supported on this platform"); return NULL; #endif } } return newdbhashobject(file, flags, mode, bsize, ffactor, nelem, cachesize, hash, lorder); } static PyObject * bsdbtopen(PyObject *self, PyObject *args) { char *file; char *flag = NULL; int flags = O_RDONLY; int mode = 0666; int cachesize = 0; int maxkeypage = 0; int minkeypage = 0; int btflags = 0; unsigned int psize = 0; int lorder = 0; if (!PyArg_ParseTuple(args, "z|siiiiiii:btopen", &file, &flag, &mode, &btflags, &cachesize, &maxkeypage, &minkeypage, &psize, &lorder)) return NULL; if (flag != NULL) { /* XXX need to pass O_EXCL, O_EXLOCK, O_NONBLOCK, O_SHLOCK */ if (flag[0] == 'r') flags = O_RDONLY; else if (flag[0] == 'w') flags = O_RDWR; else if (flag[0] == 'c') flags = O_RDWR|O_CREAT; else if (flag[0] == 'n') flags = O_RDWR|O_CREAT|O_TRUNC; else { PyErr_SetString(BsddbError, "Flag should begin with 'r', 'w', 'c' or 'n'"); return NULL; } if (flag[1] == 'l') { #if defined(O_EXLOCK) && defined(O_SHLOCK) if (flag[0] == 'r') flags |= O_SHLOCK; else flags |= O_EXLOCK; #else PyErr_SetString(BsddbError, "locking not supported on this platform"); return NULL; #endif } } return newdbbtobject(file, flags, mode, btflags, cachesize, maxkeypage, minkeypage, psize, lorder); } static PyObject * bsdrnopen(PyObject *self, PyObject *args) { char *file; char *flag = NULL; int flags = O_RDONLY; int mode = 0666; int cachesize = 0; int rnflags = 0; unsigned int psize = 0; int lorder = 0; size_t reclen = 0; char *bval = ""; char *bfname = NULL; if (!PyArg_ParseTuple(args, "z|siiiiiiss:rnopen", &file, &flag, &mode, &rnflags, &cachesize, &psize, &lorder, &reclen, &bval, &bfname)) return NULL; if (flag != NULL) { /* XXX need to pass O_EXCL, O_EXLOCK, O_NONBLOCK, O_SHLOCK */ if (flag[0] == 'r') flags = O_RDONLY; else if (flag[0] == 'w') flags = O_RDWR; else if (flag[0] == 'c') flags = O_RDWR|O_CREAT; else if (flag[0] == 'n') flags = O_RDWR|O_CREAT|O_TRUNC; else { PyErr_SetString(BsddbError, "Flag should begin with 'r', 'w', 'c' or 'n'"); return NULL; } if (flag[1] == 'l') { #if defined(O_EXLOCK) && defined(O_SHLOCK) if (flag[0] == 'r') flags |= O_SHLOCK; else flags |= O_EXLOCK; #else PyErr_SetString(BsddbError, "locking not supported on this platform"); return NULL; #endif } else if (flag[1] != '\0') { PyErr_SetString(BsddbError, "Flag char 2 should be 'l' or absent"); return NULL; } } return newdbrnobject(file, flags, mode, rnflags, cachesize, psize, lorder, reclen, bval[0], bfname); } static PyMethodDef bsddbmodule_methods[] = { {"hashopen", (PyCFunction)bsdhashopen, METH_VARARGS}, {"btopen", (PyCFunction)bsdbtopen, METH_VARARGS}, {"rnopen", (PyCFunction)bsdrnopen, METH_VARARGS}, /* strictly for use by dbhhash!!! */ {"open", (PyCFunction)bsdhashopen, METH_VARARGS}, {0, 0}, }; PyMODINIT_FUNC initbsddb185(void) { PyObject *m, *d; Bsddbtype.ob_type = &PyType_Type; m = Py_InitModule("bsddb185", bsddbmodule_methods); d = PyModule_GetDict(m); BsddbError = PyErr_NewException("bsddb.error", NULL, NULL); if (BsddbError != NULL) PyDict_SetItemString(d, "error", BsddbError); } Python-2.3.7/Modules/ld_so_beos0000755001241000117560000000344207243117047015726 0ustar loewishpifb6#! /bin/sh # # linkmodule for Python # Chris Herborth (chrish@qnx.com) # # This is covered by the same copyright/licensing terms as the rest of # Python. # # Shell script to build shared library versions of the modules; since # the change to the *ahem* "proper" import/export mechanism, this script # is much simpler. It handles PowerPC and x86, too. # # This is called by the Modules/Makefile as $(LDSHARED): # # $(LDSHARED) foomodule.o -o foomodule$(SO) # # Could also be called as: # # $(LDSHARED) readline.o -L/boot/home/config/lib -lreadline -ltermcap \ # -o readline$(SO) # # so we need to preserve the arguments, sort of. # Make sure we got reasonable arguments. TARGET="" ARGS="" while [ "$#" != "0" ]; do case "$1" in -o) TARGET="$2"; shift; shift;; *) ARGS="$ARGS $1"; shift;; esac done if [ "$TARGET" = "" ] ; then echo "Usage:" echo echo " $0 [args] -o foomodule.so [args] foomodule.o [args]" echo echo "Where:" echo echo " [args] normal compiler arguments" exit 1 fi # The shared libraries and glue objects we need to link against; these # libs are overkill for most of the standard modules, but it makes life # in this shell script easier. LIBS="-lbe -lnet -lroot" case $BE_HOST_CPU in ppc) # Boy, do we need a lot of crap... GLUE_LOC=/boot/develop/lib/ppc GLUE="${GLUE_LOC}/glue-noinit.a ${GLUE_LOC}/init_term_dyn.o" case $(uname -r) in 4.0*) CC="mwcc -xms -export pragma -nodup" ;; *) CC="mwcc -shared -export pragma -nodup" ;; esac ;; x86) # We don't need as much crap here... GLUE="" CC="gcc -nostart -Wl,-soname=${TARGET}" ;; *) # What the?!? echo "$0 doesn't support $BE_HOST_CPU systems..." echo "You're on your own... I'd be surprised if this works." GLUE="" CC="cc" ;; esac # Now link that shared lib... $CC -o $TARGET $ARGS $GLUE $LIBS Python-2.3.7/Modules/datetimemodule.c0000644001241000117560000040602710762607371017050 0ustar loewishpifb6/* C implementation for the date/time type documented at * http://www.zope.org/Members/fdrake/DateTimeWiki/FrontPage */ #include "Python.h" #include "modsupport.h" #include "structmember.h" #include #include "datetime.h" /* We require that C int be at least 32 bits, and use int virtually * everywhere. In just a few cases we use a temp long, where a Python * API returns a C long. In such cases, we have to ensure that the * final result fits in a C int (this can be an issue on 64-bit boxes). */ #if SIZEOF_INT < 4 # error "datetime.c requires that C int have at least 32 bits" #endif #define MINYEAR 1 #define MAXYEAR 9999 /* Nine decimal digits is easy to communicate, and leaves enough room * so that two delta days can be added w/o fear of overflowing a signed * 32-bit int, and with plenty of room left over to absorb any possible * carries from adding seconds. */ #define MAX_DELTA_DAYS 999999999 /* Rename the long macros in datetime.h to more reasonable short names. */ #define GET_YEAR PyDateTime_GET_YEAR #define GET_MONTH PyDateTime_GET_MONTH #define GET_DAY PyDateTime_GET_DAY #define DATE_GET_HOUR PyDateTime_DATE_GET_HOUR #define DATE_GET_MINUTE PyDateTime_DATE_GET_MINUTE #define DATE_GET_SECOND PyDateTime_DATE_GET_SECOND #define DATE_GET_MICROSECOND PyDateTime_DATE_GET_MICROSECOND /* Date accessors for date and datetime. */ #define SET_YEAR(o, v) (((o)->data[0] = ((v) & 0xff00) >> 8), \ ((o)->data[1] = ((v) & 0x00ff))) #define SET_MONTH(o, v) (PyDateTime_GET_MONTH(o) = (v)) #define SET_DAY(o, v) (PyDateTime_GET_DAY(o) = (v)) /* Date/Time accessors for datetime. */ #define DATE_SET_HOUR(o, v) (PyDateTime_DATE_GET_HOUR(o) = (v)) #define DATE_SET_MINUTE(o, v) (PyDateTime_DATE_GET_MINUTE(o) = (v)) #define DATE_SET_SECOND(o, v) (PyDateTime_DATE_GET_SECOND(o) = (v)) #define DATE_SET_MICROSECOND(o, v) \ (((o)->data[7] = ((v) & 0xff0000) >> 16), \ ((o)->data[8] = ((v) & 0x00ff00) >> 8), \ ((o)->data[9] = ((v) & 0x0000ff))) /* Time accessors for time. */ #define TIME_GET_HOUR PyDateTime_TIME_GET_HOUR #define TIME_GET_MINUTE PyDateTime_TIME_GET_MINUTE #define TIME_GET_SECOND PyDateTime_TIME_GET_SECOND #define TIME_GET_MICROSECOND PyDateTime_TIME_GET_MICROSECOND #define TIME_SET_HOUR(o, v) (PyDateTime_TIME_GET_HOUR(o) = (v)) #define TIME_SET_MINUTE(o, v) (PyDateTime_TIME_GET_MINUTE(o) = (v)) #define TIME_SET_SECOND(o, v) (PyDateTime_TIME_GET_SECOND(o) = (v)) #define TIME_SET_MICROSECOND(o, v) \ (((o)->data[3] = ((v) & 0xff0000) >> 16), \ ((o)->data[4] = ((v) & 0x00ff00) >> 8), \ ((o)->data[5] = ((v) & 0x0000ff))) /* Delta accessors for timedelta. */ #define GET_TD_DAYS(o) (((PyDateTime_Delta *)(o))->days) #define GET_TD_SECONDS(o) (((PyDateTime_Delta *)(o))->seconds) #define GET_TD_MICROSECONDS(o) (((PyDateTime_Delta *)(o))->microseconds) #define SET_TD_DAYS(o, v) ((o)->days = (v)) #define SET_TD_SECONDS(o, v) ((o)->seconds = (v)) #define SET_TD_MICROSECONDS(o, v) ((o)->microseconds = (v)) /* p is a pointer to a time or a datetime object; HASTZINFO(p) returns * p->hastzinfo. */ #define HASTZINFO(p) (((_PyDateTime_BaseTZInfo *)(p))->hastzinfo) /* Forward declarations. */ static PyTypeObject PyDateTime_DateType; static PyTypeObject PyDateTime_DateTimeType; static PyTypeObject PyDateTime_DeltaType; static PyTypeObject PyDateTime_TimeType; static PyTypeObject PyDateTime_TZInfoType; /* --------------------------------------------------------------------------- * Math utilities. */ /* k = i+j overflows iff k differs in sign from both inputs, * iff k^i has sign bit set and k^j has sign bit set, * iff (k^i)&(k^j) has sign bit set. */ #define SIGNED_ADD_OVERFLOWED(RESULT, I, J) \ ((((RESULT) ^ (I)) & ((RESULT) ^ (J))) < 0) /* Compute Python divmod(x, y), returning the quotient and storing the * remainder into *r. The quotient is the floor of x/y, and that's * the real point of this. C will probably truncate instead (C99 * requires truncation; C89 left it implementation-defined). * Simplification: we *require* that y > 0 here. That's appropriate * for all the uses made of it. This simplifies the code and makes * the overflow case impossible (divmod(LONG_MIN, -1) is the only * overflow case). */ static int divmod(int x, int y, int *r) { int quo; assert(y > 0); quo = x / y; *r = x - quo * y; if (*r < 0) { --quo; *r += y; } assert(0 <= *r && *r < y); return quo; } /* Round a double to the nearest long. |x| must be small enough to fit * in a C long; this is not checked. */ static long round_to_long(double x) { if (x >= 0.0) x = floor(x + 0.5); else x = ceil(x - 0.5); return (long)x; } /* --------------------------------------------------------------------------- * General calendrical helper functions */ /* For each month ordinal in 1..12, the number of days in that month, * and the number of days before that month in the same year. These * are correct for non-leap years only. */ static int _days_in_month[] = { 0, /* unused; this vector uses 1-based indexing */ 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }; static int _days_before_month[] = { 0, /* unused; this vector uses 1-based indexing */ 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334 }; /* year -> 1 if leap year, else 0. */ static int is_leap(int year) { /* Cast year to unsigned. The result is the same either way, but * C can generate faster code for unsigned mod than for signed * mod (especially for % 4 -- a good compiler should just grab * the last 2 bits when the LHS is unsigned). */ const unsigned int ayear = (unsigned int)year; return ayear % 4 == 0 && (ayear % 100 != 0 || ayear % 400 == 0); } /* year, month -> number of days in that month in that year */ static int days_in_month(int year, int month) { assert(month >= 1); assert(month <= 12); if (month == 2 && is_leap(year)) return 29; else return _days_in_month[month]; } /* year, month -> number of days in year preceeding first day of month */ static int days_before_month(int year, int month) { int days; assert(month >= 1); assert(month <= 12); days = _days_before_month[month]; if (month > 2 && is_leap(year)) ++days; return days; } /* year -> number of days before January 1st of year. Remember that we * start with year 1, so days_before_year(1) == 0. */ static int days_before_year(int year) { int y = year - 1; /* This is incorrect if year <= 0; we really want the floor * here. But so long as MINYEAR is 1, the smallest year this * can see is 0 (this can happen in some normalization endcases), * so we'll just special-case that. */ assert (year >= 0); if (y >= 0) return y*365 + y/4 - y/100 + y/400; else { assert(y == -1); return -366; } } /* Number of days in 4, 100, and 400 year cycles. That these have * the correct values is asserted in the module init function. */ #define DI4Y 1461 /* days_before_year(5); days in 4 years */ #define DI100Y 36524 /* days_before_year(101); days in 100 years */ #define DI400Y 146097 /* days_before_year(401); days in 400 years */ /* ordinal -> year, month, day, considering 01-Jan-0001 as day 1. */ static void ord_to_ymd(int ordinal, int *year, int *month, int *day) { int n, n1, n4, n100, n400, leapyear, preceding; /* ordinal is a 1-based index, starting at 1-Jan-1. The pattern of * leap years repeats exactly every 400 years. The basic strategy is * to find the closest 400-year boundary at or before ordinal, then * work with the offset from that boundary to ordinal. Life is much * clearer if we subtract 1 from ordinal first -- then the values * of ordinal at 400-year boundaries are exactly those divisible * by DI400Y: * * D M Y n n-1 * -- --- ---- ---------- ---------------- * 31 Dec -400 -DI400Y -DI400Y -1 * 1 Jan -399 -DI400Y +1 -DI400Y 400-year boundary * ... * 30 Dec 000 -1 -2 * 31 Dec 000 0 -1 * 1 Jan 001 1 0 400-year boundary * 2 Jan 001 2 1 * 3 Jan 001 3 2 * ... * 31 Dec 400 DI400Y DI400Y -1 * 1 Jan 401 DI400Y +1 DI400Y 400-year boundary */ assert(ordinal >= 1); --ordinal; n400 = ordinal / DI400Y; n = ordinal % DI400Y; *year = n400 * 400 + 1; /* Now n is the (non-negative) offset, in days, from January 1 of * year, to the desired date. Now compute how many 100-year cycles * precede n. * Note that it's possible for n100 to equal 4! In that case 4 full * 100-year cycles precede the desired day, which implies the * desired day is December 31 at the end of a 400-year cycle. */ n100 = n / DI100Y; n = n % DI100Y; /* Now compute how many 4-year cycles precede it. */ n4 = n / DI4Y; n = n % DI4Y; /* And now how many single years. Again n1 can be 4, and again * meaning that the desired day is December 31 at the end of the * 4-year cycle. */ n1 = n / 365; n = n % 365; *year += n100 * 100 + n4 * 4 + n1; if (n1 == 4 || n100 == 4) { assert(n == 0); *year -= 1; *month = 12; *day = 31; return; } /* Now the year is correct, and n is the offset from January 1. We * find the month via an estimate that's either exact or one too * large. */ leapyear = n1 == 3 && (n4 != 24 || n100 == 3); assert(leapyear == is_leap(*year)); *month = (n + 50) >> 5; preceding = (_days_before_month[*month] + (*month > 2 && leapyear)); if (preceding > n) { /* estimate is too large */ *month -= 1; preceding -= days_in_month(*year, *month); } n -= preceding; assert(0 <= n); assert(n < days_in_month(*year, *month)); *day = n + 1; } /* year, month, day -> ordinal, considering 01-Jan-0001 as day 1. */ static int ymd_to_ord(int year, int month, int day) { return days_before_year(year) + days_before_month(year, month) + day; } /* Day of week, where Monday==0, ..., Sunday==6. 1/1/1 was a Monday. */ static int weekday(int year, int month, int day) { return (ymd_to_ord(year, month, day) + 6) % 7; } /* Ordinal of the Monday starting week 1 of the ISO year. Week 1 is the * first calendar week containing a Thursday. */ static int iso_week1_monday(int year) { int first_day = ymd_to_ord(year, 1, 1); /* ord of 1/1 */ /* 0 if 1/1 is a Monday, 1 if a Tue, etc. */ int first_weekday = (first_day + 6) % 7; /* ordinal of closest Monday at or before 1/1 */ int week1_monday = first_day - first_weekday; if (first_weekday > 3) /* if 1/1 was Fri, Sat, Sun */ week1_monday += 7; return week1_monday; } /* --------------------------------------------------------------------------- * Range checkers. */ /* Check that -MAX_DELTA_DAYS <= days <= MAX_DELTA_DAYS. If so, return 0. * If not, raise OverflowError and return -1. */ static int check_delta_day_range(int days) { if (-MAX_DELTA_DAYS <= days && days <= MAX_DELTA_DAYS) return 0; PyErr_Format(PyExc_OverflowError, "days=%d; must have magnitude <= %d", days, MAX_DELTA_DAYS); return -1; } /* Check that date arguments are in range. Return 0 if they are. If they * aren't, raise ValueError and return -1. */ static int check_date_args(int year, int month, int day) { if (year < MINYEAR || year > MAXYEAR) { PyErr_SetString(PyExc_ValueError, "year is out of range"); return -1; } if (month < 1 || month > 12) { PyErr_SetString(PyExc_ValueError, "month must be in 1..12"); return -1; } if (day < 1 || day > days_in_month(year, month)) { PyErr_SetString(PyExc_ValueError, "day is out of range for month"); return -1; } return 0; } /* Check that time arguments are in range. Return 0 if they are. If they * aren't, raise ValueError and return -1. */ static int check_time_args(int h, int m, int s, int us) { if (h < 0 || h > 23) { PyErr_SetString(PyExc_ValueError, "hour must be in 0..23"); return -1; } if (m < 0 || m > 59) { PyErr_SetString(PyExc_ValueError, "minute must be in 0..59"); return -1; } if (s < 0 || s > 59) { PyErr_SetString(PyExc_ValueError, "second must be in 0..59"); return -1; } if (us < 0 || us > 999999) { PyErr_SetString(PyExc_ValueError, "microsecond must be in 0..999999"); return -1; } return 0; } /* --------------------------------------------------------------------------- * Normalization utilities. */ /* One step of a mixed-radix conversion. A "hi" unit is equivalent to * factor "lo" units. factor must be > 0. If *lo is less than 0, or * at least factor, enough of *lo is converted into "hi" units so that * 0 <= *lo < factor. The input values must be such that int overflow * is impossible. */ static void normalize_pair(int *hi, int *lo, int factor) { assert(factor > 0); assert(lo != hi); if (*lo < 0 || *lo >= factor) { const int num_hi = divmod(*lo, factor, lo); const int new_hi = *hi + num_hi; assert(! SIGNED_ADD_OVERFLOWED(new_hi, *hi, num_hi)); *hi = new_hi; } assert(0 <= *lo && *lo < factor); } /* Fiddle days (d), seconds (s), and microseconds (us) so that * 0 <= *s < 24*3600 * 0 <= *us < 1000000 * The input values must be such that the internals don't overflow. * The way this routine is used, we don't get close. */ static void normalize_d_s_us(int *d, int *s, int *us) { if (*us < 0 || *us >= 1000000) { normalize_pair(s, us, 1000000); /* |s| can't be bigger than about * |original s| + |original us|/1000000 now. */ } if (*s < 0 || *s >= 24*3600) { normalize_pair(d, s, 24*3600); /* |d| can't be bigger than about * |original d| + * (|original s| + |original us|/1000000) / (24*3600) now. */ } assert(0 <= *s && *s < 24*3600); assert(0 <= *us && *us < 1000000); } /* Fiddle years (y), months (m), and days (d) so that * 1 <= *m <= 12 * 1 <= *d <= days_in_month(*y, *m) * The input values must be such that the internals don't overflow. * The way this routine is used, we don't get close. */ static void normalize_y_m_d(int *y, int *m, int *d) { int dim; /* # of days in month */ /* This gets muddy: the proper range for day can't be determined * without knowing the correct month and year, but if day is, e.g., * plus or minus a million, the current month and year values make * no sense (and may also be out of bounds themselves). * Saying 12 months == 1 year should be non-controversial. */ if (*m < 1 || *m > 12) { --*m; normalize_pair(y, m, 12); ++*m; /* |y| can't be bigger than about * |original y| + |original m|/12 now. */ } assert(1 <= *m && *m <= 12); /* Now only day can be out of bounds (year may also be out of bounds * for a datetime object, but we don't care about that here). * If day is out of bounds, what to do is arguable, but at least the * method here is principled and explainable. */ dim = days_in_month(*y, *m); if (*d < 1 || *d > dim) { /* Move day-1 days from the first of the month. First try to * get off cheap if we're only one day out of range * (adjustments for timezone alone can't be worse than that). */ if (*d == 0) { --*m; if (*m > 0) *d = days_in_month(*y, *m); else { --*y; *m = 12; *d = 31; } } else if (*d == dim + 1) { /* move forward a day */ ++*m; *d = 1; if (*m > 12) { *m = 1; ++*y; } } else { int ordinal = ymd_to_ord(*y, *m, 1) + *d - 1; ord_to_ymd(ordinal, y, m, d); } } assert(*m > 0); assert(*d > 0); } /* Fiddle out-of-bounds months and days so that the result makes some kind * of sense. The parameters are both inputs and outputs. Returns < 0 on * failure, where failure means the adjusted year is out of bounds. */ static int normalize_date(int *year, int *month, int *day) { int result; normalize_y_m_d(year, month, day); if (MINYEAR <= *year && *year <= MAXYEAR) result = 0; else { PyErr_SetString(PyExc_OverflowError, "date value out of range"); result = -1; } return result; } /* Force all the datetime fields into range. The parameters are both * inputs and outputs. Returns < 0 on error. */ static int normalize_datetime(int *year, int *month, int *day, int *hour, int *minute, int *second, int *microsecond) { normalize_pair(second, microsecond, 1000000); normalize_pair(minute, second, 60); normalize_pair(hour, minute, 60); normalize_pair(day, hour, 24); return normalize_date(year, month, day); } /* --------------------------------------------------------------------------- * Basic object allocation: tp_alloc implementations. These allocate * Python objects of the right size and type, and do the Python object- * initialization bit. If there's not enough memory, they return NULL after * setting MemoryError. All data members remain uninitialized trash. * * We abuse the tp_alloc "nitems" argument to communicate whether a tzinfo * member is needed. This is ugly, imprecise, and possibly insecure. * tp_basicsize for the time and datetime types is set to the size of the * struct that has room for the tzinfo member, so subclasses in Python will * allocate enough space for a tzinfo member whether or not one is actually * needed. That's the "ugly and imprecise" parts. The "possibly insecure" * part is that PyType_GenericAlloc() (which subclasses in Python end up * using) just happens today to effectively ignore the nitems argument * when tp_itemsize is 0, which it is for these type objects. If that * changes, perhaps the callers of tp_alloc slots in this file should * be changed to force a 0 nitems argument unless the type being allocated * is a base type implemented in this file (so that tp_alloc is time_alloc * or datetime_alloc below, which know about the nitems abuse). */ static PyObject * time_alloc(PyTypeObject *type, int aware) { PyObject *self; self = (PyObject *) PyObject_MALLOC(aware ? sizeof(PyDateTime_Time) : sizeof(_PyDateTime_BaseTime)); if (self == NULL) return (PyObject *)PyErr_NoMemory(); PyObject_INIT(self, type); return self; } static PyObject * datetime_alloc(PyTypeObject *type, int aware) { PyObject *self; self = (PyObject *) PyObject_MALLOC(aware ? sizeof(PyDateTime_DateTime) : sizeof(_PyDateTime_BaseDateTime)); if (self == NULL) return (PyObject *)PyErr_NoMemory(); PyObject_INIT(self, type); return self; } /* --------------------------------------------------------------------------- * Helpers for setting object fields. These work on pointers to the * appropriate base class. */ /* For date and datetime. */ static void set_date_fields(PyDateTime_Date *self, int y, int m, int d) { self->hashcode = -1; SET_YEAR(self, y); SET_MONTH(self, m); SET_DAY(self, d); } /* --------------------------------------------------------------------------- * Create various objects, mostly without range checking. */ /* Create a date instance with no range checking. */ static PyObject * new_date_ex(int year, int month, int day, PyTypeObject *type) { PyDateTime_Date *self; self = (PyDateTime_Date *) (type->tp_alloc(type, 0)); if (self != NULL) set_date_fields(self, year, month, day); return (PyObject *) self; } #define new_date(year, month, day) \ new_date_ex(year, month, day, &PyDateTime_DateType) /* Create a datetime instance with no range checking. */ static PyObject * new_datetime_ex(int year, int month, int day, int hour, int minute, int second, int usecond, PyObject *tzinfo, PyTypeObject *type) { PyDateTime_DateTime *self; char aware = tzinfo != Py_None; self = (PyDateTime_DateTime *) (type->tp_alloc(type, aware)); if (self != NULL) { self->hastzinfo = aware; set_date_fields((PyDateTime_Date *)self, year, month, day); DATE_SET_HOUR(self, hour); DATE_SET_MINUTE(self, minute); DATE_SET_SECOND(self, second); DATE_SET_MICROSECOND(self, usecond); if (aware) { Py_INCREF(tzinfo); self->tzinfo = tzinfo; } } return (PyObject *)self; } #define new_datetime(y, m, d, hh, mm, ss, us, tzinfo) \ new_datetime_ex(y, m, d, hh, mm, ss, us, tzinfo, \ &PyDateTime_DateTimeType) /* Create a time instance with no range checking. */ static PyObject * new_time_ex(int hour, int minute, int second, int usecond, PyObject *tzinfo, PyTypeObject *type) { PyDateTime_Time *self; char aware = tzinfo != Py_None; self = (PyDateTime_Time *) (type->tp_alloc(type, aware)); if (self != NULL) { self->hastzinfo = aware; self->hashcode = -1; TIME_SET_HOUR(self, hour); TIME_SET_MINUTE(self, minute); TIME_SET_SECOND(self, second); TIME_SET_MICROSECOND(self, usecond); if (aware) { Py_INCREF(tzinfo); self->tzinfo = tzinfo; } } return (PyObject *)self; } #define new_time(hh, mm, ss, us, tzinfo) \ new_time_ex(hh, mm, ss, us, tzinfo, &PyDateTime_TimeType) /* Create a timedelta instance. Normalize the members iff normalize is * true. Passing false is a speed optimization, if you know for sure * that seconds and microseconds are already in their proper ranges. In any * case, raises OverflowError and returns NULL if the normalized days is out * of range). */ static PyObject * new_delta_ex(int days, int seconds, int microseconds, int normalize, PyTypeObject *type) { PyDateTime_Delta *self; if (normalize) normalize_d_s_us(&days, &seconds, µseconds); assert(0 <= seconds && seconds < 24*3600); assert(0 <= microseconds && microseconds < 1000000); if (check_delta_day_range(days) < 0) return NULL; self = (PyDateTime_Delta *) (type->tp_alloc(type, 0)); if (self != NULL) { self->hashcode = -1; SET_TD_DAYS(self, days); SET_TD_SECONDS(self, seconds); SET_TD_MICROSECONDS(self, microseconds); } return (PyObject *) self; } #define new_delta(d, s, us, normalize) \ new_delta_ex(d, s, us, normalize, &PyDateTime_DeltaType) /* --------------------------------------------------------------------------- * tzinfo helpers. */ /* Ensure that p is None or of a tzinfo subclass. Return 0 if OK; if not * raise TypeError and return -1. */ static int check_tzinfo_subclass(PyObject *p) { if (p == Py_None || PyTZInfo_Check(p)) return 0; PyErr_Format(PyExc_TypeError, "tzinfo argument must be None or of a tzinfo subclass, " "not type '%s'", p->ob_type->tp_name); return -1; } /* Return tzinfo.methname(tzinfoarg), without any checking of results. * If tzinfo is None, returns None. */ static PyObject * call_tzinfo_method(PyObject *tzinfo, char *methname, PyObject *tzinfoarg) { PyObject *result; assert(tzinfo && methname && tzinfoarg); assert(check_tzinfo_subclass(tzinfo) >= 0); if (tzinfo == Py_None) { result = Py_None; Py_INCREF(result); } else result = PyObject_CallMethod(tzinfo, methname, "O", tzinfoarg); return result; } /* If self has a tzinfo member, return a BORROWED reference to it. Else * return NULL, which is NOT AN ERROR. There are no error returns here, * and the caller must not decref the result. */ static PyObject * get_tzinfo_member(PyObject *self) { PyObject *tzinfo = NULL; if (PyDateTime_Check(self) && HASTZINFO(self)) tzinfo = ((PyDateTime_DateTime *)self)->tzinfo; else if (PyTime_Check(self) && HASTZINFO(self)) tzinfo = ((PyDateTime_Time *)self)->tzinfo; return tzinfo; } /* Call getattr(tzinfo, name)(tzinfoarg), and extract an int from the * result. tzinfo must be an instance of the tzinfo class. If the method * returns None, this returns 0 and sets *none to 1. If the method doesn't * return None or timedelta, TypeError is raised and this returns -1. If it * returnsa timedelta and the value is out of range or isn't a whole number * of minutes, ValueError is raised and this returns -1. * Else *none is set to 0 and the integer method result is returned. */ static int call_utc_tzinfo_method(PyObject *tzinfo, char *name, PyObject *tzinfoarg, int *none) { PyObject *u; int result = -1; assert(tzinfo != NULL); assert(PyTZInfo_Check(tzinfo)); assert(tzinfoarg != NULL); *none = 0; u = call_tzinfo_method(tzinfo, name, tzinfoarg); if (u == NULL) return -1; else if (u == Py_None) { result = 0; *none = 1; } else if (PyDelta_Check(u)) { const int days = GET_TD_DAYS(u); if (days < -1 || days > 0) result = 24*60; /* trigger ValueError below */ else { /* next line can't overflow because we know days * is -1 or 0 now */ int ss = days * 24 * 3600 + GET_TD_SECONDS(u); result = divmod(ss, 60, &ss); if (ss || GET_TD_MICROSECONDS(u)) { PyErr_Format(PyExc_ValueError, "tzinfo.%s() must return a " "whole number of minutes", name); result = -1; } } } else { PyErr_Format(PyExc_TypeError, "tzinfo.%s() must return None or " "timedelta, not '%s'", name, u->ob_type->tp_name); } Py_DECREF(u); if (result < -1439 || result > 1439) { PyErr_Format(PyExc_ValueError, "tzinfo.%s() returned %d; must be in " "-1439 .. 1439", name, result); result = -1; } return result; } /* Call tzinfo.utcoffset(tzinfoarg), and extract an integer from the * result. tzinfo must be an instance of the tzinfo class. If utcoffset() * returns None, call_utcoffset returns 0 and sets *none to 1. If uctoffset() * doesn't return None or timedelta, TypeError is raised and this returns -1. * If utcoffset() returns an invalid timedelta (out of range, or not a whole * # of minutes), ValueError is raised and this returns -1. Else *none is * set to 0 and the offset is returned (as int # of minutes east of UTC). */ static int call_utcoffset(PyObject *tzinfo, PyObject *tzinfoarg, int *none) { return call_utc_tzinfo_method(tzinfo, "utcoffset", tzinfoarg, none); } /* Call tzinfo.name(tzinfoarg), and return the offset as a timedelta or None. */ static PyObject * offset_as_timedelta(PyObject *tzinfo, char *name, PyObject *tzinfoarg) { PyObject *result; assert(tzinfo && name && tzinfoarg); if (tzinfo == Py_None) { result = Py_None; Py_INCREF(result); } else { int none; int offset = call_utc_tzinfo_method(tzinfo, name, tzinfoarg, &none); if (offset < 0 && PyErr_Occurred()) return NULL; if (none) { result = Py_None; Py_INCREF(result); } else result = new_delta(0, offset * 60, 0, 1); } return result; } /* Call tzinfo.dst(tzinfoarg), and extract an integer from the * result. tzinfo must be an instance of the tzinfo class. If dst() * returns None, call_dst returns 0 and sets *none to 1. If dst() & doesn't return None or timedelta, TypeError is raised and this * returns -1. If dst() returns an invalid timedelta for a UTC offset, * ValueError is raised and this returns -1. Else *none is set to 0 and * the offset is returned (as an int # of minutes east of UTC). */ static int call_dst(PyObject *tzinfo, PyObject *tzinfoarg, int *none) { return call_utc_tzinfo_method(tzinfo, "dst", tzinfoarg, none); } /* Call tzinfo.tzname(tzinfoarg), and return the result. tzinfo must be * an instance of the tzinfo class or None. If tzinfo isn't None, and * tzname() doesn't return None or a string, TypeError is raised and this * returns NULL. */ static PyObject * call_tzname(PyObject *tzinfo, PyObject *tzinfoarg) { PyObject *result; assert(tzinfo != NULL); assert(check_tzinfo_subclass(tzinfo) >= 0); assert(tzinfoarg != NULL); if (tzinfo == Py_None) { result = Py_None; Py_INCREF(result); } else result = PyObject_CallMethod(tzinfo, "tzname", "O", tzinfoarg); if (result != NULL && result != Py_None && ! PyString_Check(result)) { PyErr_Format(PyExc_TypeError, "tzinfo.tzname() must " "return None or a string, not '%s'", result->ob_type->tp_name); Py_DECREF(result); result = NULL; } return result; } typedef enum { /* an exception has been set; the caller should pass it on */ OFFSET_ERROR, /* type isn't date, datetime, or time subclass */ OFFSET_UNKNOWN, /* date, * datetime with !hastzinfo * datetime with None tzinfo, * datetime where utcoffset() returns None * time with !hastzinfo * time with None tzinfo, * time where utcoffset() returns None */ OFFSET_NAIVE, /* time or datetime where utcoffset() doesn't return None */ OFFSET_AWARE, } naivety; /* Classify an object as to whether it's naive or offset-aware. See * the "naivety" typedef for details. If the type is aware, *offset is set * to minutes east of UTC (as returned by the tzinfo.utcoffset() method). * If the type is offset-naive (or unknown, or error), *offset is set to 0. * tzinfoarg is the argument to pass to the tzinfo.utcoffset() method. */ static naivety classify_utcoffset(PyObject *op, PyObject *tzinfoarg, int *offset) { int none; PyObject *tzinfo; assert(tzinfoarg != NULL); *offset = 0; tzinfo = get_tzinfo_member(op); /* NULL means no tzinfo, not error */ if (tzinfo == Py_None) return OFFSET_NAIVE; if (tzinfo == NULL) { /* note that a datetime passes the PyDate_Check test */ return (PyTime_Check(op) || PyDate_Check(op)) ? OFFSET_NAIVE : OFFSET_UNKNOWN; } *offset = call_utcoffset(tzinfo, tzinfoarg, &none); if (*offset == -1 && PyErr_Occurred()) return OFFSET_ERROR; return none ? OFFSET_NAIVE : OFFSET_AWARE; } /* Classify two objects as to whether they're naive or offset-aware. * This isn't quite the same as calling classify_utcoffset() twice: for * binary operations (comparison and subtraction), we generally want to * ignore the tzinfo members if they're identical. This is by design, * so that results match "naive" expectations when mixing objects from a * single timezone. So in that case, this sets both offsets to 0 and * both naiveties to OFFSET_NAIVE. * The function returns 0 if everything's OK, and -1 on error. */ static int classify_two_utcoffsets(PyObject *o1, int *offset1, naivety *n1, PyObject *tzinfoarg1, PyObject *o2, int *offset2, naivety *n2, PyObject *tzinfoarg2) { if (get_tzinfo_member(o1) == get_tzinfo_member(o2)) { *offset1 = *offset2 = 0; *n1 = *n2 = OFFSET_NAIVE; } else { *n1 = classify_utcoffset(o1, tzinfoarg1, offset1); if (*n1 == OFFSET_ERROR) return -1; *n2 = classify_utcoffset(o2, tzinfoarg2, offset2); if (*n2 == OFFSET_ERROR) return -1; } return 0; } /* repr is like "someclass(arg1, arg2)". If tzinfo isn't None, * stuff * ", tzinfo=" + repr(tzinfo) * before the closing ")". */ static PyObject * append_keyword_tzinfo(PyObject *repr, PyObject *tzinfo) { PyObject *temp; assert(PyString_Check(repr)); assert(tzinfo); if (tzinfo == Py_None) return repr; /* Get rid of the trailing ')'. */ assert(PyString_AsString(repr)[PyString_Size(repr)-1] == ')'); temp = PyString_FromStringAndSize(PyString_AsString(repr), PyString_Size(repr) - 1); Py_DECREF(repr); if (temp == NULL) return NULL; repr = temp; /* Append ", tzinfo=". */ PyString_ConcatAndDel(&repr, PyString_FromString(", tzinfo=")); /* Append repr(tzinfo). */ PyString_ConcatAndDel(&repr, PyObject_Repr(tzinfo)); /* Add a closing paren. */ PyString_ConcatAndDel(&repr, PyString_FromString(")")); return repr; } /* --------------------------------------------------------------------------- * String format helpers. */ static PyObject * format_ctime(PyDateTime_Date *date, int hours, int minutes, int seconds) { static char *DayNames[] = { "Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun" }; static char *MonthNames[] = { "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec" }; char buffer[128]; int wday = weekday(GET_YEAR(date), GET_MONTH(date), GET_DAY(date)); PyOS_snprintf(buffer, sizeof(buffer), "%s %s %2d %02d:%02d:%02d %04d", DayNames[wday], MonthNames[GET_MONTH(date) - 1], GET_DAY(date), hours, minutes, seconds, GET_YEAR(date)); return PyString_FromString(buffer); } /* Add an hours & minutes UTC offset string to buf. buf has no more than * buflen bytes remaining. The UTC offset is gotten by calling * tzinfo.uctoffset(tzinfoarg). If that returns None, \0 is stored into * *buf, and that's all. Else the returned value is checked for sanity (an * integer in range), and if that's OK it's converted to an hours & minutes * string of the form * sign HH sep MM * Returns 0 if everything is OK. If the return value from utcoffset() is * bogus, an appropriate exception is set and -1 is returned. */ static int format_utcoffset(char *buf, size_t buflen, const char *sep, PyObject *tzinfo, PyObject *tzinfoarg) { int offset; int hours; int minutes; char sign; int none; assert(buflen >= 1); offset = call_utcoffset(tzinfo, tzinfoarg, &none); if (offset == -1 && PyErr_Occurred()) return -1; if (none) { *buf = '\0'; return 0; } sign = '+'; if (offset < 0) { sign = '-'; offset = - offset; } hours = divmod(offset, 60, &minutes); PyOS_snprintf(buf, buflen, "%c%02d%s%02d", sign, hours, sep, minutes); return 0; } /* I sure don't want to reproduce the strftime code from the time module, * so this imports the module and calls it. All the hair is due to * giving special meanings to the %z and %Z format codes via a preprocessing * step on the format string. * tzinfoarg is the argument to pass to the object's tzinfo method, if * needed. */ static PyObject * wrap_strftime(PyObject *object, PyObject *format, PyObject *timetuple, PyObject *tzinfoarg) { PyObject *result = NULL; /* guilty until proved innocent */ PyObject *zreplacement = NULL; /* py string, replacement for %z */ PyObject *Zreplacement = NULL; /* py string, replacement for %Z */ char *pin; /* pointer to next char in input format */ char ch; /* next char in input format */ PyObject *newfmt = NULL; /* py string, the output format */ char *pnew; /* pointer to available byte in output format */ char totalnew; /* number bytes total in output format buffer, exclusive of trailing \0 */ char usednew; /* number bytes used so far in output format buffer */ char *ptoappend; /* pointer to string to append to output buffer */ int ntoappend; /* # of bytes to append to output buffer */ assert(object && format && timetuple); assert(PyString_Check(format)); /* Give up if the year is before 1900. * Python strftime() plays games with the year, and different * games depending on whether envar PYTHON2K is set. This makes * years before 1900 a nightmare, even if the platform strftime * supports them (and not all do). * We could get a lot farther here by avoiding Python's strftime * wrapper and calling the C strftime() directly, but that isn't * an option in the Python implementation of this module. */ { long year; PyObject *pyyear = PySequence_GetItem(timetuple, 0); if (pyyear == NULL) return NULL; assert(PyInt_Check(pyyear)); year = PyInt_AsLong(pyyear); Py_DECREF(pyyear); if (year < 1900) { PyErr_Format(PyExc_ValueError, "year=%ld is before " "1900; the datetime strftime() " "methods require year >= 1900", year); return NULL; } } /* Scan the input format, looking for %z and %Z escapes, building * a new format. Since computing the replacements for those codes * is expensive, don't unless they're actually used. */ if (PyString_Size(format) > INT_MAX - 1) { PyErr_NoMemory(); goto Done; } totalnew = PyString_Size(format) + 1; /* realistic if no %z/%Z */ newfmt = PyString_FromStringAndSize(NULL, totalnew); if (newfmt == NULL) goto Done; pnew = PyString_AsString(newfmt); usednew = 0; pin = PyString_AsString(format); while ((ch = *pin++) != '\0') { if (ch != '%') { ptoappend = pin - 1; ntoappend = 1; } else if ((ch = *pin++) == '\0') { /* There's a lone trailing %; doesn't make sense. */ PyErr_SetString(PyExc_ValueError, "strftime format " "ends with raw %"); goto Done; } /* A % has been seen and ch is the character after it. */ else if (ch == 'z') { if (zreplacement == NULL) { /* format utcoffset */ char buf[100]; PyObject *tzinfo = get_tzinfo_member(object); zreplacement = PyString_FromString(""); if (zreplacement == NULL) goto Done; if (tzinfo != Py_None && tzinfo != NULL) { assert(tzinfoarg != NULL); if (format_utcoffset(buf, sizeof(buf), "", tzinfo, tzinfoarg) < 0) goto Done; Py_DECREF(zreplacement); zreplacement = PyString_FromString(buf); if (zreplacement == NULL) goto Done; } } assert(zreplacement != NULL); ptoappend = PyString_AsString(zreplacement); ntoappend = PyString_Size(zreplacement); } else if (ch == 'Z') { /* format tzname */ if (Zreplacement == NULL) { PyObject *tzinfo = get_tzinfo_member(object); Zreplacement = PyString_FromString(""); if (Zreplacement == NULL) goto Done; if (tzinfo != Py_None && tzinfo != NULL) { PyObject *temp; assert(tzinfoarg != NULL); temp = call_tzname(tzinfo, tzinfoarg); if (temp == NULL) goto Done; if (temp != Py_None) { assert(PyString_Check(temp)); /* Since the tzname is getting * stuffed into the format, we * have to double any % signs * so that strftime doesn't * treat them as format codes. */ Py_DECREF(Zreplacement); Zreplacement = PyObject_CallMethod( temp, "replace", "ss", "%", "%%"); Py_DECREF(temp); if (Zreplacement == NULL) goto Done; } else Py_DECREF(temp); } } assert(Zreplacement != NULL); ptoappend = PyString_AsString(Zreplacement); ntoappend = PyString_Size(Zreplacement); } else { /* percent followed by neither z nor Z */ ptoappend = pin - 2; ntoappend = 2; } /* Append the ntoappend chars starting at ptoappend to * the new format. */ assert(ntoappend >= 0); if (ntoappend == 0) continue; while (usednew + ntoappend > totalnew) { int bigger = totalnew << 1; if ((bigger >> 1) != totalnew) { /* overflow */ PyErr_NoMemory(); goto Done; } if (_PyString_Resize(&newfmt, bigger) < 0) goto Done; totalnew = bigger; pnew = PyString_AsString(newfmt) + usednew; } memcpy(pnew, ptoappend, ntoappend); pnew += ntoappend; usednew += ntoappend; assert(usednew <= totalnew); } /* end while() */ if (_PyString_Resize(&newfmt, usednew) < 0) goto Done; { PyObject *time = PyImport_ImportModule("time"); if (time == NULL) goto Done; result = PyObject_CallMethod(time, "strftime", "OO", newfmt, timetuple); Py_DECREF(time); } Done: Py_XDECREF(zreplacement); Py_XDECREF(Zreplacement); Py_XDECREF(newfmt); return result; } static char * isoformat_date(PyDateTime_Date *dt, char buffer[], int bufflen) { int x; x = PyOS_snprintf(buffer, bufflen, "%04d-%02d-%02d", GET_YEAR(dt), GET_MONTH(dt), GET_DAY(dt)); return buffer + x; } static void isoformat_time(PyDateTime_DateTime *dt, char buffer[], int bufflen) { int us = DATE_GET_MICROSECOND(dt); PyOS_snprintf(buffer, bufflen, "%02d:%02d:%02d", /* 8 characters */ DATE_GET_HOUR(dt), DATE_GET_MINUTE(dt), DATE_GET_SECOND(dt)); if (us) PyOS_snprintf(buffer + 8, bufflen - 8, ".%06d", us); } /* --------------------------------------------------------------------------- * Wrap functions from the time module. These aren't directly available * from C. Perhaps they should be. */ /* Call time.time() and return its result (a Python float). */ static PyObject * time_time(void) { PyObject *result = NULL; PyObject *time = PyImport_ImportModule("time"); if (time != NULL) { result = PyObject_CallMethod(time, "time", "()"); Py_DECREF(time); } return result; } /* Build a time.struct_time. The weekday and day number are automatically * computed from the y,m,d args. */ static PyObject * build_struct_time(int y, int m, int d, int hh, int mm, int ss, int dstflag) { PyObject *time; PyObject *result = NULL; time = PyImport_ImportModule("time"); if (time != NULL) { result = PyObject_CallMethod(time, "struct_time", "((iiiiiiiii))", y, m, d, hh, mm, ss, weekday(y, m, d), days_before_month(y, m) + d, dstflag); Py_DECREF(time); } return result; } /* --------------------------------------------------------------------------- * Miscellaneous helpers. */ /* For obscure reasons, we need to use tp_richcompare instead of tp_compare. * The comparisons here all most naturally compute a cmp()-like result. * This little helper turns that into a bool result for rich comparisons. */ static PyObject * diff_to_bool(int diff, int op) { PyObject *result; int istrue; switch (op) { case Py_EQ: istrue = diff == 0; break; case Py_NE: istrue = diff != 0; break; case Py_LE: istrue = diff <= 0; break; case Py_GE: istrue = diff >= 0; break; case Py_LT: istrue = diff < 0; break; case Py_GT: istrue = diff > 0; break; default: assert(! "op unknown"); istrue = 0; /* To shut up compiler */ } result = istrue ? Py_True : Py_False; Py_INCREF(result); return result; } /* Raises a "can't compare" TypeError and returns NULL. */ static PyObject * cmperror(PyObject *a, PyObject *b) { PyErr_Format(PyExc_TypeError, "can't compare %s to %s", a->ob_type->tp_name, b->ob_type->tp_name); return NULL; } /* --------------------------------------------------------------------------- * Cached Python objects; these are set by the module init function. */ /* Conversion factors. */ static PyObject *us_per_us = NULL; /* 1 */ static PyObject *us_per_ms = NULL; /* 1000 */ static PyObject *us_per_second = NULL; /* 1000000 */ static PyObject *us_per_minute = NULL; /* 1e6 * 60 as Python int */ static PyObject *us_per_hour = NULL; /* 1e6 * 3600 as Python long */ static PyObject *us_per_day = NULL; /* 1e6 * 3600 * 24 as Python long */ static PyObject *us_per_week = NULL; /* 1e6*3600*24*7 as Python long */ static PyObject *seconds_per_day = NULL; /* 3600*24 as Python int */ /* --------------------------------------------------------------------------- * Class implementations. */ /* * PyDateTime_Delta implementation. */ /* Convert a timedelta to a number of us, * (24*3600*self.days + self.seconds)*1000000 + self.microseconds * as a Python int or long. * Doing mixed-radix arithmetic by hand instead is excruciating in C, * due to ubiquitous overflow possibilities. */ static PyObject * delta_to_microseconds(PyDateTime_Delta *self) { PyObject *x1 = NULL; PyObject *x2 = NULL; PyObject *x3 = NULL; PyObject *result = NULL; x1 = PyInt_FromLong(GET_TD_DAYS(self)); if (x1 == NULL) goto Done; x2 = PyNumber_Multiply(x1, seconds_per_day); /* days in seconds */ if (x2 == NULL) goto Done; Py_DECREF(x1); x1 = NULL; /* x2 has days in seconds */ x1 = PyInt_FromLong(GET_TD_SECONDS(self)); /* seconds */ if (x1 == NULL) goto Done; x3 = PyNumber_Add(x1, x2); /* days and seconds in seconds */ if (x3 == NULL) goto Done; Py_DECREF(x1); Py_DECREF(x2); x1 = x2 = NULL; /* x3 has days+seconds in seconds */ x1 = PyNumber_Multiply(x3, us_per_second); /* us */ if (x1 == NULL) goto Done; Py_DECREF(x3); x3 = NULL; /* x1 has days+seconds in us */ x2 = PyInt_FromLong(GET_TD_MICROSECONDS(self)); if (x2 == NULL) goto Done; result = PyNumber_Add(x1, x2); Done: Py_XDECREF(x1); Py_XDECREF(x2); Py_XDECREF(x3); return result; } /* Convert a number of us (as a Python int or long) to a timedelta. */ static PyObject * microseconds_to_delta_ex(PyObject *pyus, PyTypeObject *type) { int us; int s; int d; long temp; PyObject *tuple = NULL; PyObject *num = NULL; PyObject *result = NULL; tuple = PyNumber_Divmod(pyus, us_per_second); if (tuple == NULL) goto Done; num = PyTuple_GetItem(tuple, 1); /* us */ if (num == NULL) goto Done; temp = PyLong_AsLong(num); num = NULL; if (temp == -1 && PyErr_Occurred()) goto Done; assert(0 <= temp && temp < 1000000); us = (int)temp; if (us < 0) { /* The divisor was positive, so this must be an error. */ assert(PyErr_Occurred()); goto Done; } num = PyTuple_GetItem(tuple, 0); /* leftover seconds */ if (num == NULL) goto Done; Py_INCREF(num); Py_DECREF(tuple); tuple = PyNumber_Divmod(num, seconds_per_day); if (tuple == NULL) goto Done; Py_DECREF(num); num = PyTuple_GetItem(tuple, 1); /* seconds */ if (num == NULL) goto Done; temp = PyLong_AsLong(num); num = NULL; if (temp == -1 && PyErr_Occurred()) goto Done; assert(0 <= temp && temp < 24*3600); s = (int)temp; if (s < 0) { /* The divisor was positive, so this must be an error. */ assert(PyErr_Occurred()); goto Done; } num = PyTuple_GetItem(tuple, 0); /* leftover days */ if (num == NULL) goto Done; Py_INCREF(num); temp = PyLong_AsLong(num); if (temp == -1 && PyErr_Occurred()) goto Done; d = (int)temp; if ((long)d != temp) { PyErr_SetString(PyExc_OverflowError, "normalized days too " "large to fit in a C int"); goto Done; } result = new_delta_ex(d, s, us, 0, type); Done: Py_XDECREF(tuple); Py_XDECREF(num); return result; } #define microseconds_to_delta(pymicros) \ microseconds_to_delta_ex(pymicros, &PyDateTime_DeltaType) static PyObject * multiply_int_timedelta(PyObject *intobj, PyDateTime_Delta *delta) { PyObject *pyus_in; PyObject *pyus_out; PyObject *result; pyus_in = delta_to_microseconds(delta); if (pyus_in == NULL) return NULL; pyus_out = PyNumber_Multiply(pyus_in, intobj); Py_DECREF(pyus_in); if (pyus_out == NULL) return NULL; result = microseconds_to_delta(pyus_out); Py_DECREF(pyus_out); return result; } static PyObject * divide_timedelta_int(PyDateTime_Delta *delta, PyObject *intobj) { PyObject *pyus_in; PyObject *pyus_out; PyObject *result; pyus_in = delta_to_microseconds(delta); if (pyus_in == NULL) return NULL; pyus_out = PyNumber_FloorDivide(pyus_in, intobj); Py_DECREF(pyus_in); if (pyus_out == NULL) return NULL; result = microseconds_to_delta(pyus_out); Py_DECREF(pyus_out); return result; } static PyObject * delta_add(PyObject *left, PyObject *right) { PyObject *result = Py_NotImplemented; if (PyDelta_Check(left) && PyDelta_Check(right)) { /* delta + delta */ /* The C-level additions can't overflow because of the * invariant bounds. */ int days = GET_TD_DAYS(left) + GET_TD_DAYS(right); int seconds = GET_TD_SECONDS(left) + GET_TD_SECONDS(right); int microseconds = GET_TD_MICROSECONDS(left) + GET_TD_MICROSECONDS(right); result = new_delta(days, seconds, microseconds, 1); } if (result == Py_NotImplemented) Py_INCREF(result); return result; } static PyObject * delta_negative(PyDateTime_Delta *self) { return new_delta(-GET_TD_DAYS(self), -GET_TD_SECONDS(self), -GET_TD_MICROSECONDS(self), 1); } static PyObject * delta_positive(PyDateTime_Delta *self) { /* Could optimize this (by returning self) if this isn't a * subclass -- but who uses unary + ? Approximately nobody. */ return new_delta(GET_TD_DAYS(self), GET_TD_SECONDS(self), GET_TD_MICROSECONDS(self), 0); } static PyObject * delta_abs(PyDateTime_Delta *self) { PyObject *result; assert(GET_TD_MICROSECONDS(self) >= 0); assert(GET_TD_SECONDS(self) >= 0); if (GET_TD_DAYS(self) < 0) result = delta_negative(self); else result = delta_positive(self); return result; } static PyObject * delta_subtract(PyObject *left, PyObject *right) { PyObject *result = Py_NotImplemented; if (PyDelta_Check(left) && PyDelta_Check(right)) { /* delta - delta */ PyObject *minus_right = PyNumber_Negative(right); if (minus_right) { result = delta_add(left, minus_right); Py_DECREF(minus_right); } else result = NULL; } if (result == Py_NotImplemented) Py_INCREF(result); return result; } /* This is more natural as a tp_compare, but doesn't work then: for whatever * reason, Python's try_3way_compare ignores tp_compare unless * PyInstance_Check returns true, but these aren't old-style classes. */ static PyObject * delta_richcompare(PyDateTime_Delta *self, PyObject *other, int op) { int diff = 42; /* nonsense */ if (PyDelta_Check(other)) { diff = GET_TD_DAYS(self) - GET_TD_DAYS(other); if (diff == 0) { diff = GET_TD_SECONDS(self) - GET_TD_SECONDS(other); if (diff == 0) diff = GET_TD_MICROSECONDS(self) - GET_TD_MICROSECONDS(other); } } else if (op == Py_EQ || op == Py_NE) diff = 1; /* any non-zero value will do */ else /* stop this from falling back to address comparison */ return cmperror((PyObject *)self, other); return diff_to_bool(diff, op); } static PyObject *delta_getstate(PyDateTime_Delta *self); static long delta_hash(PyDateTime_Delta *self) { if (self->hashcode == -1) { PyObject *temp = delta_getstate(self); if (temp != NULL) { self->hashcode = PyObject_Hash(temp); Py_DECREF(temp); } } return self->hashcode; } static PyObject * delta_multiply(PyObject *left, PyObject *right) { PyObject *result = Py_NotImplemented; if (PyDelta_Check(left)) { /* delta * ??? */ if (PyInt_Check(right) || PyLong_Check(right)) result = multiply_int_timedelta(right, (PyDateTime_Delta *) left); } else if (PyInt_Check(left) || PyLong_Check(left)) result = multiply_int_timedelta(left, (PyDateTime_Delta *) right); if (result == Py_NotImplemented) Py_INCREF(result); return result; } static PyObject * delta_divide(PyObject *left, PyObject *right) { PyObject *result = Py_NotImplemented; if (PyDelta_Check(left)) { /* delta * ??? */ if (PyInt_Check(right) || PyLong_Check(right)) result = divide_timedelta_int( (PyDateTime_Delta *)left, right); } if (result == Py_NotImplemented) Py_INCREF(result); return result; } /* Fold in the value of the tag ("seconds", "weeks", etc) component of a * timedelta constructor. sofar is the # of microseconds accounted for * so far, and there are factor microseconds per current unit, the number * of which is given by num. num * factor is added to sofar in a * numerically careful way, and that's the result. Any fractional * microseconds left over (this can happen if num is a float type) are * added into *leftover. * Note that there are many ways this can give an error (NULL) return. */ static PyObject * accum(const char* tag, PyObject *sofar, PyObject *num, PyObject *factor, double *leftover) { PyObject *prod; PyObject *sum; assert(num != NULL); if (PyInt_Check(num) || PyLong_Check(num)) { prod = PyNumber_Multiply(num, factor); if (prod == NULL) return NULL; sum = PyNumber_Add(sofar, prod); Py_DECREF(prod); return sum; } if (PyFloat_Check(num)) { double dnum; double fracpart; double intpart; PyObject *x; PyObject *y; /* The Plan: decompose num into an integer part and a * fractional part, num = intpart + fracpart. * Then num * factor == * intpart * factor + fracpart * factor * and the LHS can be computed exactly in long arithmetic. * The RHS is again broken into an int part and frac part. * and the frac part is added into *leftover. */ dnum = PyFloat_AsDouble(num); if (dnum == -1.0 && PyErr_Occurred()) return NULL; fracpart = modf(dnum, &intpart); x = PyLong_FromDouble(intpart); if (x == NULL) return NULL; prod = PyNumber_Multiply(x, factor); Py_DECREF(x); if (prod == NULL) return NULL; sum = PyNumber_Add(sofar, prod); Py_DECREF(prod); if (sum == NULL) return NULL; if (fracpart == 0.0) return sum; /* So far we've lost no information. Dealing with the * fractional part requires float arithmetic, and may * lose a little info. */ assert(PyInt_Check(factor) || PyLong_Check(factor)); if (PyInt_Check(factor)) dnum = (double)PyInt_AsLong(factor); else dnum = PyLong_AsDouble(factor); dnum *= fracpart; fracpart = modf(dnum, &intpart); x = PyLong_FromDouble(intpart); if (x == NULL) { Py_DECREF(sum); return NULL; } y = PyNumber_Add(sum, x); Py_DECREF(sum); Py_DECREF(x); *leftover += fracpart; return y; } PyErr_Format(PyExc_TypeError, "unsupported type for timedelta %s component: %s", tag, num->ob_type->tp_name); return NULL; } static PyObject * delta_new(PyTypeObject *type, PyObject *args, PyObject *kw) { PyObject *self = NULL; /* Argument objects. */ PyObject *day = NULL; PyObject *second = NULL; PyObject *us = NULL; PyObject *ms = NULL; PyObject *minute = NULL; PyObject *hour = NULL; PyObject *week = NULL; PyObject *x = NULL; /* running sum of microseconds */ PyObject *y = NULL; /* temp sum of microseconds */ double leftover_us = 0.0; static char *keywords[] = { "days", "seconds", "microseconds", "milliseconds", "minutes", "hours", "weeks", NULL }; if (PyArg_ParseTupleAndKeywords(args, kw, "|OOOOOOO:__new__", keywords, &day, &second, &us, &ms, &minute, &hour, &week) == 0) goto Done; x = PyInt_FromLong(0); if (x == NULL) goto Done; #define CLEANUP \ Py_DECREF(x); \ x = y; \ if (x == NULL) \ goto Done if (us) { y = accum("microseconds", x, us, us_per_us, &leftover_us); CLEANUP; } if (ms) { y = accum("milliseconds", x, ms, us_per_ms, &leftover_us); CLEANUP; } if (second) { y = accum("seconds", x, second, us_per_second, &leftover_us); CLEANUP; } if (minute) { y = accum("minutes", x, minute, us_per_minute, &leftover_us); CLEANUP; } if (hour) { y = accum("hours", x, hour, us_per_hour, &leftover_us); CLEANUP; } if (day) { y = accum("days", x, day, us_per_day, &leftover_us); CLEANUP; } if (week) { y = accum("weeks", x, week, us_per_week, &leftover_us); CLEANUP; } if (leftover_us) { /* Round to nearest whole # of us, and add into x. */ PyObject *temp = PyLong_FromLong(round_to_long(leftover_us)); if (temp == NULL) { Py_DECREF(x); goto Done; } y = PyNumber_Add(x, temp); Py_DECREF(temp); CLEANUP; } self = microseconds_to_delta_ex(x, type); Py_DECREF(x); Done: return self; #undef CLEANUP } static int delta_nonzero(PyDateTime_Delta *self) { return (GET_TD_DAYS(self) != 0 || GET_TD_SECONDS(self) != 0 || GET_TD_MICROSECONDS(self) != 0); } static PyObject * delta_repr(PyDateTime_Delta *self) { if (GET_TD_MICROSECONDS(self) != 0) return PyString_FromFormat("%s(%d, %d, %d)", self->ob_type->tp_name, GET_TD_DAYS(self), GET_TD_SECONDS(self), GET_TD_MICROSECONDS(self)); if (GET_TD_SECONDS(self) != 0) return PyString_FromFormat("%s(%d, %d)", self->ob_type->tp_name, GET_TD_DAYS(self), GET_TD_SECONDS(self)); return PyString_FromFormat("%s(%d)", self->ob_type->tp_name, GET_TD_DAYS(self)); } static PyObject * delta_str(PyDateTime_Delta *self) { int days = GET_TD_DAYS(self); int seconds = GET_TD_SECONDS(self); int us = GET_TD_MICROSECONDS(self); int hours; int minutes; char buf[100]; char *pbuf = buf; size_t buflen = sizeof(buf); int n; minutes = divmod(seconds, 60, &seconds); hours = divmod(minutes, 60, &minutes); if (days) { n = PyOS_snprintf(pbuf, buflen, "%d day%s, ", days, (days == 1 || days == -1) ? "" : "s"); if (n < 0 || (size_t)n >= buflen) goto Fail; pbuf += n; buflen -= (size_t)n; } n = PyOS_snprintf(pbuf, buflen, "%d:%02d:%02d", hours, minutes, seconds); if (n < 0 || (size_t)n >= buflen) goto Fail; pbuf += n; buflen -= (size_t)n; if (us) { n = PyOS_snprintf(pbuf, buflen, ".%06d", us); if (n < 0 || (size_t)n >= buflen) goto Fail; pbuf += n; } return PyString_FromStringAndSize(buf, pbuf - buf); Fail: PyErr_SetString(PyExc_SystemError, "goofy result from PyOS_snprintf"); return NULL; } /* Pickle support, a simple use of __reduce__. */ /* __getstate__ isn't exposed */ static PyObject * delta_getstate(PyDateTime_Delta *self) { return Py_BuildValue("iii", GET_TD_DAYS(self), GET_TD_SECONDS(self), GET_TD_MICROSECONDS(self)); } static PyObject * delta_reduce(PyDateTime_Delta* self) { return Py_BuildValue("ON", self->ob_type, delta_getstate(self)); } #define OFFSET(field) offsetof(PyDateTime_Delta, field) static PyMemberDef delta_members[] = { {"days", T_INT, OFFSET(days), READONLY, PyDoc_STR("Number of days.")}, {"seconds", T_INT, OFFSET(seconds), READONLY, PyDoc_STR("Number of seconds (>= 0 and less than 1 day).")}, {"microseconds", T_INT, OFFSET(microseconds), READONLY, PyDoc_STR("Number of microseconds (>= 0 and less than 1 second).")}, {NULL} }; static PyMethodDef delta_methods[] = { {"__reduce__", (PyCFunction)delta_reduce, METH_NOARGS, PyDoc_STR("__reduce__() -> (cls, state)")}, {NULL, NULL}, }; static char delta_doc[] = PyDoc_STR("Difference between two datetime values."); static PyNumberMethods delta_as_number = { delta_add, /* nb_add */ delta_subtract, /* nb_subtract */ delta_multiply, /* nb_multiply */ delta_divide, /* nb_divide */ 0, /* nb_remainder */ 0, /* nb_divmod */ 0, /* nb_power */ (unaryfunc)delta_negative, /* nb_negative */ (unaryfunc)delta_positive, /* nb_positive */ (unaryfunc)delta_abs, /* nb_absolute */ (inquiry)delta_nonzero, /* nb_nonzero */ 0, /*nb_invert*/ 0, /*nb_lshift*/ 0, /*nb_rshift*/ 0, /*nb_and*/ 0, /*nb_xor*/ 0, /*nb_or*/ 0, /*nb_coerce*/ 0, /*nb_int*/ 0, /*nb_long*/ 0, /*nb_float*/ 0, /*nb_oct*/ 0, /*nb_hex*/ 0, /*nb_inplace_add*/ 0, /*nb_inplace_subtract*/ 0, /*nb_inplace_multiply*/ 0, /*nb_inplace_divide*/ 0, /*nb_inplace_remainder*/ 0, /*nb_inplace_power*/ 0, /*nb_inplace_lshift*/ 0, /*nb_inplace_rshift*/ 0, /*nb_inplace_and*/ 0, /*nb_inplace_xor*/ 0, /*nb_inplace_or*/ delta_divide, /* nb_floor_divide */ 0, /* nb_true_divide */ 0, /* nb_inplace_floor_divide */ 0, /* nb_inplace_true_divide */ }; static PyTypeObject PyDateTime_DeltaType = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "datetime.timedelta", /* tp_name */ sizeof(PyDateTime_Delta), /* tp_basicsize */ 0, /* tp_itemsize */ 0, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ (reprfunc)delta_repr, /* tp_repr */ &delta_as_number, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ (hashfunc)delta_hash, /* tp_hash */ 0, /* tp_call */ (reprfunc)delta_str, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_CHECKTYPES | Py_TPFLAGS_BASETYPE, /* tp_flags */ delta_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ (richcmpfunc)delta_richcompare, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ delta_methods, /* tp_methods */ delta_members, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ delta_new, /* tp_new */ 0, /* tp_free */ }; /* * PyDateTime_Date implementation. */ /* Accessor properties. */ static PyObject * date_year(PyDateTime_Date *self, void *unused) { return PyInt_FromLong(GET_YEAR(self)); } static PyObject * date_month(PyDateTime_Date *self, void *unused) { return PyInt_FromLong(GET_MONTH(self)); } static PyObject * date_day(PyDateTime_Date *self, void *unused) { return PyInt_FromLong(GET_DAY(self)); } static PyGetSetDef date_getset[] = { {"year", (getter)date_year}, {"month", (getter)date_month}, {"day", (getter)date_day}, {NULL} }; /* Constructors. */ static char *date_kws[] = {"year", "month", "day", NULL}; static PyObject * date_new(PyTypeObject *type, PyObject *args, PyObject *kw) { PyObject *self = NULL; PyObject *state; int year; int month; int day; /* Check for invocation from pickle with __getstate__ state */ if (PyTuple_GET_SIZE(args) == 1 && PyString_Check(state = PyTuple_GET_ITEM(args, 0)) && PyString_GET_SIZE(state) == _PyDateTime_DATE_DATASIZE) { PyDateTime_Date *me; me = (PyDateTime_Date *) (type->tp_alloc(type, 0)); if (me != NULL) { char *pdata = PyString_AS_STRING(state); memcpy(me->data, pdata, _PyDateTime_DATE_DATASIZE); me->hashcode = -1; } return (PyObject *)me; } if (PyArg_ParseTupleAndKeywords(args, kw, "iii", date_kws, &year, &month, &day)) { if (check_date_args(year, month, day) < 0) return NULL; self = new_date_ex(year, month, day, type); } return self; } /* Return new date from localtime(t). */ static PyObject * date_local_from_time_t(PyObject *cls, time_t t) { struct tm *tm; PyObject *result = NULL; tm = localtime(&t); if (tm) result = PyObject_CallFunction(cls, "iii", tm->tm_year + 1900, tm->tm_mon + 1, tm->tm_mday); else PyErr_SetString(PyExc_ValueError, "timestamp out of range for " "platform localtime() function"); return result; } /* Return new date from current time. * We say this is equivalent to fromtimestamp(time.time()), and the * only way to be sure of that is to *call* time.time(). That's not * generally the same as calling C's time. */ static PyObject * date_today(PyObject *cls, PyObject *dummy) { PyObject *time; PyObject *result; time = time_time(); if (time == NULL) return NULL; /* Note well: today() is a class method, so this may not call * date.fromtimestamp. For example, it may call * datetime.fromtimestamp. That's why we need all the accuracy * time.time() delivers; if someone were gonzo about optimization, * date.today() could get away with plain C time(). */ result = PyObject_CallMethod(cls, "fromtimestamp", "O", time); Py_DECREF(time); return result; } /* Return new date from given timestamp (Python timestamp -- a double). */ static PyObject * date_fromtimestamp(PyObject *cls, PyObject *args) { double timestamp; PyObject *result = NULL; if (PyArg_ParseTuple(args, "d:fromtimestamp", ×tamp)) result = date_local_from_time_t(cls, (time_t)timestamp); return result; } /* Return new date from proleptic Gregorian ordinal. Raises ValueError if * the ordinal is out of range. */ static PyObject * date_fromordinal(PyObject *cls, PyObject *args) { PyObject *result = NULL; int ordinal; if (PyArg_ParseTuple(args, "i:fromordinal", &ordinal)) { int year; int month; int day; if (ordinal < 1) PyErr_SetString(PyExc_ValueError, "ordinal must be " ">= 1"); else { ord_to_ymd(ordinal, &year, &month, &day); result = PyObject_CallFunction(cls, "iii", year, month, day); } } return result; } /* * Date arithmetic. */ /* date + timedelta -> date. If arg negate is true, subtract the timedelta * instead. */ static PyObject * add_date_timedelta(PyDateTime_Date *date, PyDateTime_Delta *delta, int negate) { PyObject *result = NULL; int year = GET_YEAR(date); int month = GET_MONTH(date); int deltadays = GET_TD_DAYS(delta); /* C-level overflow is impossible because |deltadays| < 1e9. */ int day = GET_DAY(date) + (negate ? -deltadays : deltadays); if (normalize_date(&year, &month, &day) >= 0) result = new_date(year, month, day); return result; } static PyObject * date_add(PyObject *left, PyObject *right) { if (PyDateTime_Check(left) || PyDateTime_Check(right)) { Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } if (PyDate_Check(left)) { /* date + ??? */ if (PyDelta_Check(right)) /* date + delta */ return add_date_timedelta((PyDateTime_Date *) left, (PyDateTime_Delta *) right, 0); } else { /* ??? + date * 'right' must be one of us, or we wouldn't have been called */ if (PyDelta_Check(left)) /* delta + date */ return add_date_timedelta((PyDateTime_Date *) right, (PyDateTime_Delta *) left, 0); } Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } static PyObject * date_subtract(PyObject *left, PyObject *right) { if (PyDateTime_Check(left) || PyDateTime_Check(right)) { Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } if (PyDate_Check(left)) { if (PyDate_Check(right)) { /* date - date */ int left_ord = ymd_to_ord(GET_YEAR(left), GET_MONTH(left), GET_DAY(left)); int right_ord = ymd_to_ord(GET_YEAR(right), GET_MONTH(right), GET_DAY(right)); return new_delta(left_ord - right_ord, 0, 0, 0); } if (PyDelta_Check(right)) { /* date - delta */ return add_date_timedelta((PyDateTime_Date *) left, (PyDateTime_Delta *) right, 1); } } Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } /* Various ways to turn a date into a string. */ static PyObject * date_repr(PyDateTime_Date *self) { char buffer[1028]; char *typename; typename = self->ob_type->tp_name; PyOS_snprintf(buffer, sizeof(buffer), "%s(%d, %d, %d)", typename, GET_YEAR(self), GET_MONTH(self), GET_DAY(self)); return PyString_FromString(buffer); } static PyObject * date_isoformat(PyDateTime_Date *self) { char buffer[128]; isoformat_date(self, buffer, sizeof(buffer)); return PyString_FromString(buffer); } /* str() calls the appropriate isoformat() method. */ static PyObject * date_str(PyDateTime_Date *self) { return PyObject_CallMethod((PyObject *)self, "isoformat", "()"); } static PyObject * date_ctime(PyDateTime_Date *self) { return format_ctime(self, 0, 0, 0); } static PyObject * date_strftime(PyDateTime_Date *self, PyObject *args, PyObject *kw) { /* This method can be inherited, and needs to call the * timetuple() method appropriate to self's class. */ PyObject *result; PyObject *format; PyObject *tuple; static char *keywords[] = {"format", NULL}; if (! PyArg_ParseTupleAndKeywords(args, kw, "O!:strftime", keywords, &PyString_Type, &format)) return NULL; tuple = PyObject_CallMethod((PyObject *)self, "timetuple", "()"); if (tuple == NULL) return NULL; result = wrap_strftime((PyObject *)self, format, tuple, (PyObject *)self); Py_DECREF(tuple); return result; } /* ISO methods. */ static PyObject * date_isoweekday(PyDateTime_Date *self) { int dow = weekday(GET_YEAR(self), GET_MONTH(self), GET_DAY(self)); return PyInt_FromLong(dow + 1); } static PyObject * date_isocalendar(PyDateTime_Date *self) { int year = GET_YEAR(self); int week1_monday = iso_week1_monday(year); int today = ymd_to_ord(year, GET_MONTH(self), GET_DAY(self)); int week; int day; week = divmod(today - week1_monday, 7, &day); if (week < 0) { --year; week1_monday = iso_week1_monday(year); week = divmod(today - week1_monday, 7, &day); } else if (week >= 52 && today >= iso_week1_monday(year + 1)) { ++year; week = 0; } return Py_BuildValue("iii", year, week + 1, day + 1); } /* Miscellaneous methods. */ /* This is more natural as a tp_compare, but doesn't work then: for whatever * reason, Python's try_3way_compare ignores tp_compare unless * PyInstance_Check returns true, but these aren't old-style classes. */ static PyObject * date_richcompare(PyDateTime_Date *self, PyObject *other, int op) { int diff = 42; /* nonsense */ if (PyDate_Check(other)) diff = memcmp(self->data, ((PyDateTime_Date *)other)->data, _PyDateTime_DATE_DATASIZE); else if (PyObject_HasAttrString(other, "timetuple")) { /* A hook for other kinds of date objects. */ Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } else if (op == Py_EQ || op == Py_NE) diff = 1; /* any non-zero value will do */ else /* stop this from falling back to address comparison */ return cmperror((PyObject *)self, other); return diff_to_bool(diff, op); } static PyObject * date_timetuple(PyDateTime_Date *self) { return build_struct_time(GET_YEAR(self), GET_MONTH(self), GET_DAY(self), 0, 0, 0, -1); } static PyObject * date_replace(PyDateTime_Date *self, PyObject *args, PyObject *kw) { PyObject *clone; PyObject *tuple; int year = GET_YEAR(self); int month = GET_MONTH(self); int day = GET_DAY(self); if (! PyArg_ParseTupleAndKeywords(args, kw, "|iii:replace", date_kws, &year, &month, &day)) return NULL; tuple = Py_BuildValue("iii", year, month, day); if (tuple == NULL) return NULL; clone = date_new(self->ob_type, tuple, NULL); Py_DECREF(tuple); return clone; } static PyObject *date_getstate(PyDateTime_Date *self); static long date_hash(PyDateTime_Date *self) { if (self->hashcode == -1) { PyObject *temp = date_getstate(self); if (temp != NULL) { self->hashcode = PyObject_Hash(temp); Py_DECREF(temp); } } return self->hashcode; } static PyObject * date_toordinal(PyDateTime_Date *self) { return PyInt_FromLong(ymd_to_ord(GET_YEAR(self), GET_MONTH(self), GET_DAY(self))); } static PyObject * date_weekday(PyDateTime_Date *self) { int dow = weekday(GET_YEAR(self), GET_MONTH(self), GET_DAY(self)); return PyInt_FromLong(dow); } /* Pickle support, a simple use of __reduce__. */ /* __getstate__ isn't exposed */ static PyObject * date_getstate(PyDateTime_Date *self) { return Py_BuildValue( "(N)", PyString_FromStringAndSize((char *)self->data, _PyDateTime_DATE_DATASIZE)); } static PyObject * date_reduce(PyDateTime_Date *self, PyObject *arg) { return Py_BuildValue("(ON)", self->ob_type, date_getstate(self)); } static PyMethodDef date_methods[] = { /* Class methods: */ {"fromtimestamp", (PyCFunction)date_fromtimestamp, METH_VARARGS | METH_CLASS, PyDoc_STR("timestamp -> local date from a POSIX timestamp (like " "time.time()).")}, {"fromordinal", (PyCFunction)date_fromordinal, METH_VARARGS | METH_CLASS, PyDoc_STR("int -> date corresponding to a proleptic Gregorian " "ordinal.")}, {"today", (PyCFunction)date_today, METH_NOARGS | METH_CLASS, PyDoc_STR("Current date or datetime: same as " "self.__class__.fromtimestamp(time.time()).")}, /* Instance methods: */ {"ctime", (PyCFunction)date_ctime, METH_NOARGS, PyDoc_STR("Return ctime() style string.")}, {"strftime", (PyCFunction)date_strftime, METH_KEYWORDS, PyDoc_STR("format -> strftime() style string.")}, {"timetuple", (PyCFunction)date_timetuple, METH_NOARGS, PyDoc_STR("Return time tuple, compatible with time.localtime().")}, {"isocalendar", (PyCFunction)date_isocalendar, METH_NOARGS, PyDoc_STR("Return a 3-tuple containing ISO year, week number, and " "weekday.")}, {"isoformat", (PyCFunction)date_isoformat, METH_NOARGS, PyDoc_STR("Return string in ISO 8601 format, YYYY-MM-DD.")}, {"isoweekday", (PyCFunction)date_isoweekday, METH_NOARGS, PyDoc_STR("Return the day of the week represented by the date.\n" "Monday == 1 ... Sunday == 7")}, {"toordinal", (PyCFunction)date_toordinal, METH_NOARGS, PyDoc_STR("Return proleptic Gregorian ordinal. January 1 of year " "1 is day 1.")}, {"weekday", (PyCFunction)date_weekday, METH_NOARGS, PyDoc_STR("Return the day of the week represented by the date.\n" "Monday == 0 ... Sunday == 6")}, {"replace", (PyCFunction)date_replace, METH_KEYWORDS, PyDoc_STR("Return date with new specified fields.")}, {"__reduce__", (PyCFunction)date_reduce, METH_NOARGS, PyDoc_STR("__reduce__() -> (cls, state)")}, {NULL, NULL} }; static char date_doc[] = PyDoc_STR("Basic date type."); static PyNumberMethods date_as_number = { date_add, /* nb_add */ date_subtract, /* nb_subtract */ 0, /* nb_multiply */ 0, /* nb_divide */ 0, /* nb_remainder */ 0, /* nb_divmod */ 0, /* nb_power */ 0, /* nb_negative */ 0, /* nb_positive */ 0, /* nb_absolute */ 0, /* nb_nonzero */ }; static PyTypeObject PyDateTime_DateType = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "datetime.date", /* tp_name */ sizeof(PyDateTime_Date), /* tp_basicsize */ 0, /* tp_itemsize */ 0, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ (reprfunc)date_repr, /* tp_repr */ &date_as_number, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ (hashfunc)date_hash, /* tp_hash */ 0, /* tp_call */ (reprfunc)date_str, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_CHECKTYPES | Py_TPFLAGS_BASETYPE, /* tp_flags */ date_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ (richcmpfunc)date_richcompare, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ date_methods, /* tp_methods */ 0, /* tp_members */ date_getset, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ date_new, /* tp_new */ 0, /* tp_free */ }; /* * PyDateTime_TZInfo implementation. */ /* This is a pure abstract base class, so doesn't do anything beyond * raising NotImplemented exceptions. Real tzinfo classes need * to derive from this. This is mostly for clarity, and for efficiency in * datetime and time constructors (their tzinfo arguments need to * be subclasses of this tzinfo class, which is easy and quick to check). * * Note: For reasons having to do with pickling of subclasses, we have * to allow tzinfo objects to be instantiated. This wasn't an issue * in the Python implementation (__init__() could raise NotImplementedError * there without ill effect), but doing so in the C implementation hit a * brick wall. */ static PyObject * tzinfo_nogo(const char* methodname) { PyErr_Format(PyExc_NotImplementedError, "a tzinfo subclass must implement %s()", methodname); return NULL; } /* Methods. A subclass must implement these. */ static PyObject * tzinfo_tzname(PyDateTime_TZInfo *self, PyObject *dt) { return tzinfo_nogo("tzname"); } static PyObject * tzinfo_utcoffset(PyDateTime_TZInfo *self, PyObject *dt) { return tzinfo_nogo("utcoffset"); } static PyObject * tzinfo_dst(PyDateTime_TZInfo *self, PyObject *dt) { return tzinfo_nogo("dst"); } static PyObject * tzinfo_fromutc(PyDateTime_TZInfo *self, PyDateTime_DateTime *dt) { int y, m, d, hh, mm, ss, us; PyObject *result; int off, dst; int none; int delta; if (! PyDateTime_Check(dt)) { PyErr_SetString(PyExc_TypeError, "fromutc: argument must be a datetime"); return NULL; } if (! HASTZINFO(dt) || dt->tzinfo != (PyObject *)self) { PyErr_SetString(PyExc_ValueError, "fromutc: dt.tzinfo " "is not self"); return NULL; } off = call_utcoffset(dt->tzinfo, (PyObject *)dt, &none); if (off == -1 && PyErr_Occurred()) return NULL; if (none) { PyErr_SetString(PyExc_ValueError, "fromutc: non-None " "utcoffset() result required"); return NULL; } dst = call_dst(dt->tzinfo, (PyObject *)dt, &none); if (dst == -1 && PyErr_Occurred()) return NULL; if (none) { PyErr_SetString(PyExc_ValueError, "fromutc: non-None " "dst() result required"); return NULL; } y = GET_YEAR(dt); m = GET_MONTH(dt); d = GET_DAY(dt); hh = DATE_GET_HOUR(dt); mm = DATE_GET_MINUTE(dt); ss = DATE_GET_SECOND(dt); us = DATE_GET_MICROSECOND(dt); delta = off - dst; mm += delta; if ((mm < 0 || mm >= 60) && normalize_datetime(&y, &m, &d, &hh, &mm, &ss, &us) < 0) return NULL; result = new_datetime(y, m, d, hh, mm, ss, us, dt->tzinfo); if (result == NULL) return result; dst = call_dst(dt->tzinfo, result, &none); if (dst == -1 && PyErr_Occurred()) goto Fail; if (none) goto Inconsistent; if (dst == 0) return result; mm += dst; if ((mm < 0 || mm >= 60) && normalize_datetime(&y, &m, &d, &hh, &mm, &ss, &us) < 0) goto Fail; Py_DECREF(result); result = new_datetime(y, m, d, hh, mm, ss, us, dt->tzinfo); return result; Inconsistent: PyErr_SetString(PyExc_ValueError, "fromutc: tz.dst() gave" "inconsistent results; cannot convert"); /* fall thru to failure */ Fail: Py_DECREF(result); return NULL; } /* * Pickle support. This is solely so that tzinfo subclasses can use * pickling -- tzinfo itself is supposed to be uninstantiable. */ static PyObject * tzinfo_reduce(PyObject *self) { PyObject *args, *state, *tmp; PyObject *getinitargs, *getstate; tmp = PyTuple_New(0); if (tmp == NULL) return NULL; getinitargs = PyObject_GetAttrString(self, "__getinitargs__"); if (getinitargs != NULL) { args = PyObject_CallObject(getinitargs, tmp); Py_DECREF(getinitargs); if (args == NULL) { Py_DECREF(tmp); return NULL; } } else { PyErr_Clear(); args = tmp; Py_INCREF(args); } getstate = PyObject_GetAttrString(self, "__getstate__"); if (getstate != NULL) { state = PyObject_CallObject(getstate, tmp); Py_DECREF(getstate); if (state == NULL) { Py_DECREF(args); Py_DECREF(tmp); return NULL; } } else { PyObject **dictptr; PyErr_Clear(); state = Py_None; dictptr = _PyObject_GetDictPtr(self); if (dictptr && *dictptr && PyDict_Size(*dictptr)) state = *dictptr; Py_INCREF(state); } Py_DECREF(tmp); if (state == Py_None) { Py_DECREF(state); return Py_BuildValue("(ON)", self->ob_type, args); } else return Py_BuildValue("(ONN)", self->ob_type, args, state); } static PyMethodDef tzinfo_methods[] = { {"tzname", (PyCFunction)tzinfo_tzname, METH_O, PyDoc_STR("datetime -> string name of time zone.")}, {"utcoffset", (PyCFunction)tzinfo_utcoffset, METH_O, PyDoc_STR("datetime -> minutes east of UTC (negative for " "west of UTC).")}, {"dst", (PyCFunction)tzinfo_dst, METH_O, PyDoc_STR("datetime -> DST offset in minutes east of UTC.")}, {"fromutc", (PyCFunction)tzinfo_fromutc, METH_O, PyDoc_STR("datetime in UTC -> datetime in local time.")}, {"__reduce__", (PyCFunction)tzinfo_reduce, METH_NOARGS, PyDoc_STR("-> (cls, state)")}, {NULL, NULL} }; static char tzinfo_doc[] = PyDoc_STR("Abstract base class for time zone info objects."); statichere PyTypeObject PyDateTime_TZInfoType = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "datetime.tzinfo", /* tp_name */ sizeof(PyDateTime_TZInfo), /* tp_basicsize */ 0, /* tp_itemsize */ 0, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_CHECKTYPES | Py_TPFLAGS_BASETYPE, /* tp_flags */ tzinfo_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ tzinfo_methods, /* tp_methods */ 0, /* tp_members */ 0, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ 0, /* tp_alloc */ PyType_GenericNew, /* tp_new */ 0, /* tp_free */ }; /* * PyDateTime_Time implementation. */ /* Accessor properties. */ static PyObject * time_hour(PyDateTime_Time *self, void *unused) { return PyInt_FromLong(TIME_GET_HOUR(self)); } static PyObject * time_minute(PyDateTime_Time *self, void *unused) { return PyInt_FromLong(TIME_GET_MINUTE(self)); } /* The name time_second conflicted with some platform header file. */ static PyObject * py_time_second(PyDateTime_Time *self, void *unused) { return PyInt_FromLong(TIME_GET_SECOND(self)); } static PyObject * time_microsecond(PyDateTime_Time *self, void *unused) { return PyInt_FromLong(TIME_GET_MICROSECOND(self)); } static PyObject * time_tzinfo(PyDateTime_Time *self, void *unused) { PyObject *result = HASTZINFO(self) ? self->tzinfo : Py_None; Py_INCREF(result); return result; } static PyGetSetDef time_getset[] = { {"hour", (getter)time_hour}, {"minute", (getter)time_minute}, {"second", (getter)py_time_second}, {"microsecond", (getter)time_microsecond}, {"tzinfo", (getter)time_tzinfo}, {NULL} }; /* * Constructors. */ static char *time_kws[] = {"hour", "minute", "second", "microsecond", "tzinfo", NULL}; static PyObject * time_new(PyTypeObject *type, PyObject *args, PyObject *kw) { PyObject *self = NULL; PyObject *state; int hour = 0; int minute = 0; int second = 0; int usecond = 0; PyObject *tzinfo = Py_None; /* Check for invocation from pickle with __getstate__ state */ if (PyTuple_GET_SIZE(args) >= 1 && PyTuple_GET_SIZE(args) <= 2 && PyString_Check(state = PyTuple_GET_ITEM(args, 0)) && PyString_GET_SIZE(state) == _PyDateTime_TIME_DATASIZE) { PyDateTime_Time *me; char aware; if (PyTuple_GET_SIZE(args) == 2) { tzinfo = PyTuple_GET_ITEM(args, 1); if (check_tzinfo_subclass(tzinfo) < 0) { PyErr_SetString(PyExc_TypeError, "bad " "tzinfo state arg"); return NULL; } } aware = (char)(tzinfo != Py_None); me = (PyDateTime_Time *) (type->tp_alloc(type, aware)); if (me != NULL) { char *pdata = PyString_AS_STRING(state); memcpy(me->data, pdata, _PyDateTime_TIME_DATASIZE); me->hashcode = -1; me->hastzinfo = aware; if (aware) { Py_INCREF(tzinfo); me->tzinfo = tzinfo; } } return (PyObject *)me; } if (PyArg_ParseTupleAndKeywords(args, kw, "|iiiiO", time_kws, &hour, &minute, &second, &usecond, &tzinfo)) { if (check_time_args(hour, minute, second, usecond) < 0) return NULL; if (check_tzinfo_subclass(tzinfo) < 0) return NULL; self = new_time_ex(hour, minute, second, usecond, tzinfo, type); } return self; } /* * Destructor. */ static void time_dealloc(PyDateTime_Time *self) { if (HASTZINFO(self)) { Py_XDECREF(self->tzinfo); } self->ob_type->tp_free((PyObject *)self); } /* * Indirect access to tzinfo methods. */ /* These are all METH_NOARGS, so don't need to check the arglist. */ static PyObject * time_utcoffset(PyDateTime_Time *self, PyObject *unused) { return offset_as_timedelta(HASTZINFO(self) ? self->tzinfo : Py_None, "utcoffset", Py_None); } static PyObject * time_dst(PyDateTime_Time *self, PyObject *unused) { return offset_as_timedelta(HASTZINFO(self) ? self->tzinfo : Py_None, "dst", Py_None); } static PyObject * time_tzname(PyDateTime_Time *self, PyObject *unused) { return call_tzname(HASTZINFO(self) ? self->tzinfo : Py_None, Py_None); } /* * Various ways to turn a time into a string. */ static PyObject * time_repr(PyDateTime_Time *self) { char buffer[100]; char *typename = self->ob_type->tp_name; int h = TIME_GET_HOUR(self); int m = TIME_GET_MINUTE(self); int s = TIME_GET_SECOND(self); int us = TIME_GET_MICROSECOND(self); PyObject *result = NULL; if (us) PyOS_snprintf(buffer, sizeof(buffer), "%s(%d, %d, %d, %d)", typename, h, m, s, us); else if (s) PyOS_snprintf(buffer, sizeof(buffer), "%s(%d, %d, %d)", typename, h, m, s); else PyOS_snprintf(buffer, sizeof(buffer), "%s(%d, %d)", typename, h, m); result = PyString_FromString(buffer); if (result != NULL && HASTZINFO(self)) result = append_keyword_tzinfo(result, self->tzinfo); return result; } static PyObject * time_str(PyDateTime_Time *self) { return PyObject_CallMethod((PyObject *)self, "isoformat", "()"); } static PyObject * time_isoformat(PyDateTime_Time *self) { char buf[100]; PyObject *result; /* Reuse the time format code from the datetime type. */ PyDateTime_DateTime datetime; PyDateTime_DateTime *pdatetime = &datetime; /* Copy over just the time bytes. */ memcpy(pdatetime->data + _PyDateTime_DATE_DATASIZE, self->data, _PyDateTime_TIME_DATASIZE); isoformat_time(pdatetime, buf, sizeof(buf)); result = PyString_FromString(buf); if (result == NULL || ! HASTZINFO(self) || self->tzinfo == Py_None) return result; /* We need to append the UTC offset. */ if (format_utcoffset(buf, sizeof(buf), ":", self->tzinfo, Py_None) < 0) { Py_DECREF(result); return NULL; } PyString_ConcatAndDel(&result, PyString_FromString(buf)); return result; } static PyObject * time_strftime(PyDateTime_Time *self, PyObject *args, PyObject *kw) { PyObject *result; PyObject *format; PyObject *tuple; static char *keywords[] = {"format", NULL}; if (! PyArg_ParseTupleAndKeywords(args, kw, "O!:strftime", keywords, &PyString_Type, &format)) return NULL; /* Python's strftime does insane things with the year part of the * timetuple. The year is forced to (the otherwise nonsensical) * 1900 to worm around that. */ tuple = Py_BuildValue("iiiiiiiii", 1900, 0, 0, /* year, month, day */ TIME_GET_HOUR(self), TIME_GET_MINUTE(self), TIME_GET_SECOND(self), 0, 0, -1); /* weekday, daynum, dst */ if (tuple == NULL) return NULL; assert(PyTuple_Size(tuple) == 9); result = wrap_strftime((PyObject *)self, format, tuple, Py_None); Py_DECREF(tuple); return result; } /* * Miscellaneous methods. */ /* This is more natural as a tp_compare, but doesn't work then: for whatever * reason, Python's try_3way_compare ignores tp_compare unless * PyInstance_Check returns true, but these aren't old-style classes. */ static PyObject * time_richcompare(PyDateTime_Time *self, PyObject *other, int op) { int diff; naivety n1, n2; int offset1, offset2; if (! PyTime_Check(other)) { if (op == Py_EQ || op == Py_NE) { PyObject *result = op == Py_EQ ? Py_False : Py_True; Py_INCREF(result); return result; } /* Stop this from falling back to address comparison. */ return cmperror((PyObject *)self, other); } if (classify_two_utcoffsets((PyObject *)self, &offset1, &n1, Py_None, other, &offset2, &n2, Py_None) < 0) return NULL; assert(n1 != OFFSET_UNKNOWN && n2 != OFFSET_UNKNOWN); /* If they're both naive, or both aware and have the same offsets, * we get off cheap. Note that if they're both naive, offset1 == * offset2 == 0 at this point. */ if (n1 == n2 && offset1 == offset2) { diff = memcmp(self->data, ((PyDateTime_Time *)other)->data, _PyDateTime_TIME_DATASIZE); return diff_to_bool(diff, op); } if (n1 == OFFSET_AWARE && n2 == OFFSET_AWARE) { assert(offset1 != offset2); /* else last "if" handled it */ /* Convert everything except microseconds to seconds. These * can't overflow (no more than the # of seconds in 2 days). */ offset1 = TIME_GET_HOUR(self) * 3600 + (TIME_GET_MINUTE(self) - offset1) * 60 + TIME_GET_SECOND(self); offset2 = TIME_GET_HOUR(other) * 3600 + (TIME_GET_MINUTE(other) - offset2) * 60 + TIME_GET_SECOND(other); diff = offset1 - offset2; if (diff == 0) diff = TIME_GET_MICROSECOND(self) - TIME_GET_MICROSECOND(other); return diff_to_bool(diff, op); } assert(n1 != n2); PyErr_SetString(PyExc_TypeError, "can't compare offset-naive and " "offset-aware times"); return NULL; } static long time_hash(PyDateTime_Time *self) { if (self->hashcode == -1) { naivety n; int offset; PyObject *temp; n = classify_utcoffset((PyObject *)self, Py_None, &offset); assert(n != OFFSET_UNKNOWN); if (n == OFFSET_ERROR) return -1; /* Reduce this to a hash of another object. */ if (offset == 0) temp = PyString_FromStringAndSize((char *)self->data, _PyDateTime_TIME_DATASIZE); else { int hour; int minute; assert(n == OFFSET_AWARE); assert(HASTZINFO(self)); hour = divmod(TIME_GET_HOUR(self) * 60 + TIME_GET_MINUTE(self) - offset, 60, &minute); if (0 <= hour && hour < 24) temp = new_time(hour, minute, TIME_GET_SECOND(self), TIME_GET_MICROSECOND(self), Py_None); else temp = Py_BuildValue("iiii", hour, minute, TIME_GET_SECOND(self), TIME_GET_MICROSECOND(self)); } if (temp != NULL) { self->hashcode = PyObject_Hash(temp); Py_DECREF(temp); } } return self->hashcode; } static PyObject * time_replace(PyDateTime_Time *self, PyObject *args, PyObject *kw) { PyObject *clone; PyObject *tuple; int hh = TIME_GET_HOUR(self); int mm = TIME_GET_MINUTE(self); int ss = TIME_GET_SECOND(self); int us = TIME_GET_MICROSECOND(self); PyObject *tzinfo = HASTZINFO(self) ? self->tzinfo : Py_None; if (! PyArg_ParseTupleAndKeywords(args, kw, "|iiiiO:replace", time_kws, &hh, &mm, &ss, &us, &tzinfo)) return NULL; tuple = Py_BuildValue("iiiiO", hh, mm, ss, us, tzinfo); if (tuple == NULL) return NULL; clone = time_new(self->ob_type, tuple, NULL); Py_DECREF(tuple); return clone; } static int time_nonzero(PyDateTime_Time *self) { int offset; int none; if (TIME_GET_SECOND(self) || TIME_GET_MICROSECOND(self)) { /* Since utcoffset is in whole minutes, nothing can * alter the conclusion that this is nonzero. */ return 1; } offset = 0; if (HASTZINFO(self) && self->tzinfo != Py_None) { offset = call_utcoffset(self->tzinfo, Py_None, &none); if (offset == -1 && PyErr_Occurred()) return -1; } return (TIME_GET_MINUTE(self) - offset + TIME_GET_HOUR(self)*60) != 0; } /* Pickle support, a simple use of __reduce__. */ /* Let basestate be the non-tzinfo data string. * If tzinfo is None, this returns (basestate,), else (basestate, tzinfo). * So it's a tuple in any (non-error) case. * __getstate__ isn't exposed. */ static PyObject * time_getstate(PyDateTime_Time *self) { PyObject *basestate; PyObject *result = NULL; basestate = PyString_FromStringAndSize((char *)self->data, _PyDateTime_TIME_DATASIZE); if (basestate != NULL) { if (! HASTZINFO(self) || self->tzinfo == Py_None) result = Py_BuildValue("(O)", basestate); else result = Py_BuildValue("OO", basestate, self->tzinfo); Py_DECREF(basestate); } return result; } static PyObject * time_reduce(PyDateTime_Time *self, PyObject *arg) { return Py_BuildValue("(ON)", self->ob_type, time_getstate(self)); } static PyMethodDef time_methods[] = { {"isoformat", (PyCFunction)time_isoformat, METH_KEYWORDS, PyDoc_STR("Return string in ISO 8601 format, HH:MM:SS[.mmmmmm]" "[+HH:MM].")}, {"strftime", (PyCFunction)time_strftime, METH_KEYWORDS, PyDoc_STR("format -> strftime() style string.")}, {"utcoffset", (PyCFunction)time_utcoffset, METH_NOARGS, PyDoc_STR("Return self.tzinfo.utcoffset(self).")}, {"tzname", (PyCFunction)time_tzname, METH_NOARGS, PyDoc_STR("Return self.tzinfo.tzname(self).")}, {"dst", (PyCFunction)time_dst, METH_NOARGS, PyDoc_STR("Return self.tzinfo.dst(self).")}, {"replace", (PyCFunction)time_replace, METH_KEYWORDS, PyDoc_STR("Return time with new specified fields.")}, {"__reduce__", (PyCFunction)time_reduce, METH_NOARGS, PyDoc_STR("__reduce__() -> (cls, state)")}, {NULL, NULL} }; static char time_doc[] = PyDoc_STR("Time type."); static PyNumberMethods time_as_number = { 0, /* nb_add */ 0, /* nb_subtract */ 0, /* nb_multiply */ 0, /* nb_divide */ 0, /* nb_remainder */ 0, /* nb_divmod */ 0, /* nb_power */ 0, /* nb_negative */ 0, /* nb_positive */ 0, /* nb_absolute */ (inquiry)time_nonzero, /* nb_nonzero */ }; statichere PyTypeObject PyDateTime_TimeType = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "datetime.time", /* tp_name */ sizeof(PyDateTime_Time), /* tp_basicsize */ 0, /* tp_itemsize */ (destructor)time_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ (reprfunc)time_repr, /* tp_repr */ &time_as_number, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ (hashfunc)time_hash, /* tp_hash */ 0, /* tp_call */ (reprfunc)time_str, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_CHECKTYPES | Py_TPFLAGS_BASETYPE, /* tp_flags */ time_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ (richcmpfunc)time_richcompare, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ time_methods, /* tp_methods */ 0, /* tp_members */ time_getset, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ time_alloc, /* tp_alloc */ time_new, /* tp_new */ 0, /* tp_free */ }; /* * PyDateTime_DateTime implementation. */ /* Accessor properties. Properties for day, month, and year are inherited * from date. */ static PyObject * datetime_hour(PyDateTime_DateTime *self, void *unused) { return PyInt_FromLong(DATE_GET_HOUR(self)); } static PyObject * datetime_minute(PyDateTime_DateTime *self, void *unused) { return PyInt_FromLong(DATE_GET_MINUTE(self)); } static PyObject * datetime_second(PyDateTime_DateTime *self, void *unused) { return PyInt_FromLong(DATE_GET_SECOND(self)); } static PyObject * datetime_microsecond(PyDateTime_DateTime *self, void *unused) { return PyInt_FromLong(DATE_GET_MICROSECOND(self)); } static PyObject * datetime_tzinfo(PyDateTime_DateTime *self, void *unused) { PyObject *result = HASTZINFO(self) ? self->tzinfo : Py_None; Py_INCREF(result); return result; } static PyGetSetDef datetime_getset[] = { {"hour", (getter)datetime_hour}, {"minute", (getter)datetime_minute}, {"second", (getter)datetime_second}, {"microsecond", (getter)datetime_microsecond}, {"tzinfo", (getter)datetime_tzinfo}, {NULL} }; /* * Constructors. */ static char *datetime_kws[] = { "year", "month", "day", "hour", "minute", "second", "microsecond", "tzinfo", NULL }; static PyObject * datetime_new(PyTypeObject *type, PyObject *args, PyObject *kw) { PyObject *self = NULL; PyObject *state; int year; int month; int day; int hour = 0; int minute = 0; int second = 0; int usecond = 0; PyObject *tzinfo = Py_None; /* Check for invocation from pickle with __getstate__ state */ if (PyTuple_GET_SIZE(args) >= 1 && PyTuple_GET_SIZE(args) <= 2 && PyString_Check(state = PyTuple_GET_ITEM(args, 0)) && PyString_GET_SIZE(state) == _PyDateTime_DATETIME_DATASIZE) { PyDateTime_DateTime *me; char aware; if (PyTuple_GET_SIZE(args) == 2) { tzinfo = PyTuple_GET_ITEM(args, 1); if (check_tzinfo_subclass(tzinfo) < 0) { PyErr_SetString(PyExc_TypeError, "bad " "tzinfo state arg"); return NULL; } } aware = (char)(tzinfo != Py_None); me = (PyDateTime_DateTime *) (type->tp_alloc(type , aware)); if (me != NULL) { char *pdata = PyString_AS_STRING(state); memcpy(me->data, pdata, _PyDateTime_DATETIME_DATASIZE); me->hashcode = -1; me->hastzinfo = aware; if (aware) { Py_INCREF(tzinfo); me->tzinfo = tzinfo; } } return (PyObject *)me; } if (PyArg_ParseTupleAndKeywords(args, kw, "iii|iiiiO", datetime_kws, &year, &month, &day, &hour, &minute, &second, &usecond, &tzinfo)) { if (check_date_args(year, month, day) < 0) return NULL; if (check_time_args(hour, minute, second, usecond) < 0) return NULL; if (check_tzinfo_subclass(tzinfo) < 0) return NULL; self = new_datetime_ex(year, month, day, hour, minute, second, usecond, tzinfo, type); } return self; } /* TM_FUNC is the shared type of localtime() and gmtime(). */ typedef struct tm *(*TM_FUNC)(const time_t *timer); /* Internal helper. * Build datetime from a time_t and a distinct count of microseconds. * Pass localtime or gmtime for f, to control the interpretation of timet. */ static PyObject * datetime_from_timet_and_us(PyObject *cls, TM_FUNC f, time_t timet, int us, PyObject *tzinfo) { struct tm *tm; PyObject *result = NULL; tm = f(&timet); if (tm) { /* The platform localtime/gmtime may insert leap seconds, * indicated by tm->tm_sec > 59. We don't care about them, * except to the extent that passing them on to the datetime * constructor would raise ValueError for a reason that * made no sense to the user. */ if (tm->tm_sec > 59) tm->tm_sec = 59; result = PyObject_CallFunction(cls, "iiiiiiiO", tm->tm_year + 1900, tm->tm_mon + 1, tm->tm_mday, tm->tm_hour, tm->tm_min, tm->tm_sec, us, tzinfo); } else PyErr_SetString(PyExc_ValueError, "timestamp out of range for " "platform localtime()/gmtime() function"); return result; } /* Internal helper. * Build datetime from a Python timestamp. Pass localtime or gmtime for f, * to control the interpretation of the timestamp. Since a double doesn't * have enough bits to cover a datetime's full range of precision, it's * better to call datetime_from_timet_and_us provided you have a way * to get that much precision (e.g., C time() isn't good enough). */ static PyObject * datetime_from_timestamp(PyObject *cls, TM_FUNC f, double timestamp, PyObject *tzinfo) { time_t timet = (time_t)timestamp; double fraction = timestamp - (double)timet; int us = (int)round_to_long(fraction * 1e6); return datetime_from_timet_and_us(cls, f, timet, us, tzinfo); } /* Internal helper. * Build most accurate possible datetime for current time. Pass localtime or * gmtime for f as appropriate. */ static PyObject * datetime_best_possible(PyObject *cls, TM_FUNC f, PyObject *tzinfo) { #ifdef HAVE_GETTIMEOFDAY struct timeval t; #ifdef GETTIMEOFDAY_NO_TZ gettimeofday(&t); #else gettimeofday(&t, (struct timezone *)NULL); #endif return datetime_from_timet_and_us(cls, f, t.tv_sec, (int)t.tv_usec, tzinfo); #else /* ! HAVE_GETTIMEOFDAY */ /* No flavor of gettimeofday exists on this platform. Python's * time.time() does a lot of other platform tricks to get the * best time it can on the platform, and we're not going to do * better than that (if we could, the better code would belong * in time.time()!) We're limited by the precision of a double, * though. */ PyObject *time; double dtime; time = time_time(); if (time == NULL) return NULL; dtime = PyFloat_AsDouble(time); Py_DECREF(time); if (dtime == -1.0 && PyErr_Occurred()) return NULL; return datetime_from_timestamp(cls, f, dtime, tzinfo); #endif /* ! HAVE_GETTIMEOFDAY */ } /* Return best possible local time -- this isn't constrained by the * precision of a timestamp. */ static PyObject * datetime_now(PyObject *cls, PyObject *args, PyObject *kw) { PyObject *self; PyObject *tzinfo = Py_None; static char *keywords[] = {"tz", NULL}; if (! PyArg_ParseTupleAndKeywords(args, kw, "|O:now", keywords, &tzinfo)) return NULL; if (check_tzinfo_subclass(tzinfo) < 0) return NULL; self = datetime_best_possible(cls, tzinfo == Py_None ? localtime : gmtime, tzinfo); if (self != NULL && tzinfo != Py_None) { /* Convert UTC to tzinfo's zone. */ PyObject *temp = self; self = PyObject_CallMethod(tzinfo, "fromutc", "O", self); Py_DECREF(temp); } return self; } /* Return best possible UTC time -- this isn't constrained by the * precision of a timestamp. */ static PyObject * datetime_utcnow(PyObject *cls, PyObject *dummy) { return datetime_best_possible(cls, gmtime, Py_None); } /* Return new local datetime from timestamp (Python timestamp -- a double). */ static PyObject * datetime_fromtimestamp(PyObject *cls, PyObject *args, PyObject *kw) { PyObject *self; double timestamp; PyObject *tzinfo = Py_None; static char *keywords[] = {"timestamp", "tz", NULL}; if (! PyArg_ParseTupleAndKeywords(args, kw, "d|O:fromtimestamp", keywords, ×tamp, &tzinfo)) return NULL; if (check_tzinfo_subclass(tzinfo) < 0) return NULL; self = datetime_from_timestamp(cls, tzinfo == Py_None ? localtime : gmtime, timestamp, tzinfo); if (self != NULL && tzinfo != Py_None) { /* Convert UTC to tzinfo's zone. */ PyObject *temp = self; self = PyObject_CallMethod(tzinfo, "fromutc", "O", self); Py_DECREF(temp); } return self; } /* Return new UTC datetime from timestamp (Python timestamp -- a double). */ static PyObject * datetime_utcfromtimestamp(PyObject *cls, PyObject *args) { double timestamp; PyObject *result = NULL; if (PyArg_ParseTuple(args, "d:utcfromtimestamp", ×tamp)) result = datetime_from_timestamp(cls, gmtime, timestamp, Py_None); return result; } /* Return new datetime from date/datetime and time arguments. */ static PyObject * datetime_combine(PyObject *cls, PyObject *args, PyObject *kw) { static char *keywords[] = {"date", "time", NULL}; PyObject *date; PyObject *time; PyObject *result = NULL; if (PyArg_ParseTupleAndKeywords(args, kw, "O!O!:combine", keywords, &PyDateTime_DateType, &date, &PyDateTime_TimeType, &time)) { PyObject *tzinfo = Py_None; if (HASTZINFO(time)) tzinfo = ((PyDateTime_Time *)time)->tzinfo; result = PyObject_CallFunction(cls, "iiiiiiiO", GET_YEAR(date), GET_MONTH(date), GET_DAY(date), TIME_GET_HOUR(time), TIME_GET_MINUTE(time), TIME_GET_SECOND(time), TIME_GET_MICROSECOND(time), tzinfo); } return result; } /* * Destructor. */ static void datetime_dealloc(PyDateTime_DateTime *self) { if (HASTZINFO(self)) { Py_XDECREF(self->tzinfo); } self->ob_type->tp_free((PyObject *)self); } /* * Indirect access to tzinfo methods. */ /* These are all METH_NOARGS, so don't need to check the arglist. */ static PyObject * datetime_utcoffset(PyDateTime_DateTime *self, PyObject *unused) { return offset_as_timedelta(HASTZINFO(self) ? self->tzinfo : Py_None, "utcoffset", (PyObject *)self); } static PyObject * datetime_dst(PyDateTime_DateTime *self, PyObject *unused) { return offset_as_timedelta(HASTZINFO(self) ? self->tzinfo : Py_None, "dst", (PyObject *)self); } static PyObject * datetime_tzname(PyDateTime_DateTime *self, PyObject *unused) { return call_tzname(HASTZINFO(self) ? self->tzinfo : Py_None, (PyObject *)self); } /* * datetime arithmetic. */ /* factor must be 1 (to add) or -1 (to subtract). The result inherits * the tzinfo state of date. */ static PyObject * add_datetime_timedelta(PyDateTime_DateTime *date, PyDateTime_Delta *delta, int factor) { /* Note that the C-level additions can't overflow, because of * invariant bounds on the member values. */ int year = GET_YEAR(date); int month = GET_MONTH(date); int day = GET_DAY(date) + GET_TD_DAYS(delta) * factor; int hour = DATE_GET_HOUR(date); int minute = DATE_GET_MINUTE(date); int second = DATE_GET_SECOND(date) + GET_TD_SECONDS(delta) * factor; int microsecond = DATE_GET_MICROSECOND(date) + GET_TD_MICROSECONDS(delta) * factor; assert(factor == 1 || factor == -1); if (normalize_datetime(&year, &month, &day, &hour, &minute, &second, µsecond) < 0) return NULL; else return new_datetime(year, month, day, hour, minute, second, microsecond, HASTZINFO(date) ? date->tzinfo : Py_None); } static PyObject * datetime_add(PyObject *left, PyObject *right) { if (PyDateTime_Check(left)) { /* datetime + ??? */ if (PyDelta_Check(right)) /* datetime + delta */ return add_datetime_timedelta( (PyDateTime_DateTime *)left, (PyDateTime_Delta *)right, 1); } else if (PyDelta_Check(left)) { /* delta + datetime */ return add_datetime_timedelta((PyDateTime_DateTime *) right, (PyDateTime_Delta *) left, 1); } Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } static PyObject * datetime_subtract(PyObject *left, PyObject *right) { PyObject *result = Py_NotImplemented; if (PyDateTime_Check(left)) { /* datetime - ??? */ if (PyDateTime_Check(right)) { /* datetime - datetime */ naivety n1, n2; int offset1, offset2; int delta_d, delta_s, delta_us; if (classify_two_utcoffsets(left, &offset1, &n1, left, right, &offset2, &n2, right) < 0) return NULL; assert(n1 != OFFSET_UNKNOWN && n2 != OFFSET_UNKNOWN); if (n1 != n2) { PyErr_SetString(PyExc_TypeError, "can't subtract offset-naive and " "offset-aware datetimes"); return NULL; } delta_d = ymd_to_ord(GET_YEAR(left), GET_MONTH(left), GET_DAY(left)) - ymd_to_ord(GET_YEAR(right), GET_MONTH(right), GET_DAY(right)); /* These can't overflow, since the values are * normalized. At most this gives the number of * seconds in one day. */ delta_s = (DATE_GET_HOUR(left) - DATE_GET_HOUR(right)) * 3600 + (DATE_GET_MINUTE(left) - DATE_GET_MINUTE(right)) * 60 + (DATE_GET_SECOND(left) - DATE_GET_SECOND(right)); delta_us = DATE_GET_MICROSECOND(left) - DATE_GET_MICROSECOND(right); /* (left - offset1) - (right - offset2) = * (left - right) + (offset2 - offset1) */ delta_s += (offset2 - offset1) * 60; result = new_delta(delta_d, delta_s, delta_us, 1); } else if (PyDelta_Check(right)) { /* datetime - delta */ result = add_datetime_timedelta( (PyDateTime_DateTime *)left, (PyDateTime_Delta *)right, -1); } } if (result == Py_NotImplemented) Py_INCREF(result); return result; } /* Various ways to turn a datetime into a string. */ static PyObject * datetime_repr(PyDateTime_DateTime *self) { char buffer[1000]; char *typename = self->ob_type->tp_name; PyObject *baserepr; if (DATE_GET_MICROSECOND(self)) { PyOS_snprintf(buffer, sizeof(buffer), "%s(%d, %d, %d, %d, %d, %d, %d)", typename, GET_YEAR(self), GET_MONTH(self), GET_DAY(self), DATE_GET_HOUR(self), DATE_GET_MINUTE(self), DATE_GET_SECOND(self), DATE_GET_MICROSECOND(self)); } else if (DATE_GET_SECOND(self)) { PyOS_snprintf(buffer, sizeof(buffer), "%s(%d, %d, %d, %d, %d, %d)", typename, GET_YEAR(self), GET_MONTH(self), GET_DAY(self), DATE_GET_HOUR(self), DATE_GET_MINUTE(self), DATE_GET_SECOND(self)); } else { PyOS_snprintf(buffer, sizeof(buffer), "%s(%d, %d, %d, %d, %d)", typename, GET_YEAR(self), GET_MONTH(self), GET_DAY(self), DATE_GET_HOUR(self), DATE_GET_MINUTE(self)); } baserepr = PyString_FromString(buffer); if (baserepr == NULL || ! HASTZINFO(self)) return baserepr; return append_keyword_tzinfo(baserepr, self->tzinfo); } static PyObject * datetime_str(PyDateTime_DateTime *self) { return PyObject_CallMethod((PyObject *)self, "isoformat", "(s)", " "); } static PyObject * datetime_isoformat(PyDateTime_DateTime *self, PyObject *args, PyObject *kw) { char sep = 'T'; static char *keywords[] = {"sep", NULL}; char buffer[100]; char *cp; PyObject *result; if (!PyArg_ParseTupleAndKeywords(args, kw, "|c:isoformat", keywords, &sep)) return NULL; cp = isoformat_date((PyDateTime_Date *)self, buffer, sizeof(buffer)); assert(cp != NULL); *cp++ = sep; isoformat_time(self, cp, sizeof(buffer) - (cp - buffer)); result = PyString_FromString(buffer); if (result == NULL || ! HASTZINFO(self)) return result; /* We need to append the UTC offset. */ if (format_utcoffset(buffer, sizeof(buffer), ":", self->tzinfo, (PyObject *)self) < 0) { Py_DECREF(result); return NULL; } PyString_ConcatAndDel(&result, PyString_FromString(buffer)); return result; } static PyObject * datetime_ctime(PyDateTime_DateTime *self) { return format_ctime((PyDateTime_Date *)self, DATE_GET_HOUR(self), DATE_GET_MINUTE(self), DATE_GET_SECOND(self)); } /* Miscellaneous methods. */ /* This is more natural as a tp_compare, but doesn't work then: for whatever * reason, Python's try_3way_compare ignores tp_compare unless * PyInstance_Check returns true, but these aren't old-style classes. */ static PyObject * datetime_richcompare(PyDateTime_DateTime *self, PyObject *other, int op) { int diff; naivety n1, n2; int offset1, offset2; if (! PyDateTime_Check(other)) { if (PyObject_HasAttrString(other, "timetuple")) { /* A hook for other kinds of datetime objects. */ Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } if (op == Py_EQ || op == Py_NE) { PyObject *result = op == Py_EQ ? Py_False : Py_True; Py_INCREF(result); return result; } /* Stop this from falling back to address comparison. */ return cmperror((PyObject *)self, other); } if (classify_two_utcoffsets((PyObject *)self, &offset1, &n1, (PyObject *)self, other, &offset2, &n2, other) < 0) return NULL; assert(n1 != OFFSET_UNKNOWN && n2 != OFFSET_UNKNOWN); /* If they're both naive, or both aware and have the same offsets, * we get off cheap. Note that if they're both naive, offset1 == * offset2 == 0 at this point. */ if (n1 == n2 && offset1 == offset2) { diff = memcmp(self->data, ((PyDateTime_DateTime *)other)->data, _PyDateTime_DATETIME_DATASIZE); return diff_to_bool(diff, op); } if (n1 == OFFSET_AWARE && n2 == OFFSET_AWARE) { PyDateTime_Delta *delta; assert(offset1 != offset2); /* else last "if" handled it */ delta = (PyDateTime_Delta *)datetime_subtract((PyObject *)self, other); if (delta == NULL) return NULL; diff = GET_TD_DAYS(delta); if (diff == 0) diff = GET_TD_SECONDS(delta) | GET_TD_MICROSECONDS(delta); Py_DECREF(delta); return diff_to_bool(diff, op); } assert(n1 != n2); PyErr_SetString(PyExc_TypeError, "can't compare offset-naive and " "offset-aware datetimes"); return NULL; } static long datetime_hash(PyDateTime_DateTime *self) { if (self->hashcode == -1) { naivety n; int offset; PyObject *temp; n = classify_utcoffset((PyObject *)self, (PyObject *)self, &offset); assert(n != OFFSET_UNKNOWN); if (n == OFFSET_ERROR) return -1; /* Reduce this to a hash of another object. */ if (n == OFFSET_NAIVE) temp = PyString_FromStringAndSize( (char *)self->data, _PyDateTime_DATETIME_DATASIZE); else { int days; int seconds; assert(n == OFFSET_AWARE); assert(HASTZINFO(self)); days = ymd_to_ord(GET_YEAR(self), GET_MONTH(self), GET_DAY(self)); seconds = DATE_GET_HOUR(self) * 3600 + (DATE_GET_MINUTE(self) - offset) * 60 + DATE_GET_SECOND(self); temp = new_delta(days, seconds, DATE_GET_MICROSECOND(self), 1); } if (temp != NULL) { self->hashcode = PyObject_Hash(temp); Py_DECREF(temp); } } return self->hashcode; } static PyObject * datetime_replace(PyDateTime_DateTime *self, PyObject *args, PyObject *kw) { PyObject *clone; PyObject *tuple; int y = GET_YEAR(self); int m = GET_MONTH(self); int d = GET_DAY(self); int hh = DATE_GET_HOUR(self); int mm = DATE_GET_MINUTE(self); int ss = DATE_GET_SECOND(self); int us = DATE_GET_MICROSECOND(self); PyObject *tzinfo = HASTZINFO(self) ? self->tzinfo : Py_None; if (! PyArg_ParseTupleAndKeywords(args, kw, "|iiiiiiiO:replace", datetime_kws, &y, &m, &d, &hh, &mm, &ss, &us, &tzinfo)) return NULL; tuple = Py_BuildValue("iiiiiiiO", y, m, d, hh, mm, ss, us, tzinfo); if (tuple == NULL) return NULL; clone = datetime_new(self->ob_type, tuple, NULL); Py_DECREF(tuple); return clone; } static PyObject * datetime_astimezone(PyDateTime_DateTime *self, PyObject *args, PyObject *kw) { int y, m, d, hh, mm, ss, us; PyObject *result; int offset, none; PyObject *tzinfo; static char *keywords[] = {"tz", NULL}; if (! PyArg_ParseTupleAndKeywords(args, kw, "O!:astimezone", keywords, &PyDateTime_TZInfoType, &tzinfo)) return NULL; if (!HASTZINFO(self) || self->tzinfo == Py_None) goto NeedAware; /* Conversion to self's own time zone is a NOP. */ if (self->tzinfo == tzinfo) { Py_INCREF(self); return (PyObject *)self; } /* Convert self to UTC. */ offset = call_utcoffset(self->tzinfo, (PyObject *)self, &none); if (offset == -1 && PyErr_Occurred()) return NULL; if (none) goto NeedAware; y = GET_YEAR(self); m = GET_MONTH(self); d = GET_DAY(self); hh = DATE_GET_HOUR(self); mm = DATE_GET_MINUTE(self); ss = DATE_GET_SECOND(self); us = DATE_GET_MICROSECOND(self); mm -= offset; if ((mm < 0 || mm >= 60) && normalize_datetime(&y, &m, &d, &hh, &mm, &ss, &us) < 0) return NULL; /* Attach new tzinfo and let fromutc() do the rest. */ result = new_datetime(y, m, d, hh, mm, ss, us, tzinfo); if (result != NULL) { PyObject *temp = result; result = PyObject_CallMethod(tzinfo, "fromutc", "O", temp); Py_DECREF(temp); } return result; NeedAware: PyErr_SetString(PyExc_ValueError, "astimezone() cannot be applied to " "a naive datetime"); return NULL; } static PyObject * datetime_timetuple(PyDateTime_DateTime *self) { int dstflag = -1; if (HASTZINFO(self) && self->tzinfo != Py_None) { int none; dstflag = call_dst(self->tzinfo, (PyObject *)self, &none); if (dstflag == -1 && PyErr_Occurred()) return NULL; if (none) dstflag = -1; else if (dstflag != 0) dstflag = 1; } return build_struct_time(GET_YEAR(self), GET_MONTH(self), GET_DAY(self), DATE_GET_HOUR(self), DATE_GET_MINUTE(self), DATE_GET_SECOND(self), dstflag); } static PyObject * datetime_getdate(PyDateTime_DateTime *self) { return new_date(GET_YEAR(self), GET_MONTH(self), GET_DAY(self)); } static PyObject * datetime_gettime(PyDateTime_DateTime *self) { return new_time(DATE_GET_HOUR(self), DATE_GET_MINUTE(self), DATE_GET_SECOND(self), DATE_GET_MICROSECOND(self), Py_None); } static PyObject * datetime_gettimetz(PyDateTime_DateTime *self) { return new_time(DATE_GET_HOUR(self), DATE_GET_MINUTE(self), DATE_GET_SECOND(self), DATE_GET_MICROSECOND(self), HASTZINFO(self) ? self->tzinfo : Py_None); } static PyObject * datetime_utctimetuple(PyDateTime_DateTime *self) { int y = GET_YEAR(self); int m = GET_MONTH(self); int d = GET_DAY(self); int hh = DATE_GET_HOUR(self); int mm = DATE_GET_MINUTE(self); int ss = DATE_GET_SECOND(self); int us = 0; /* microseconds are ignored in a timetuple */ int offset = 0; if (HASTZINFO(self) && self->tzinfo != Py_None) { int none; offset = call_utcoffset(self->tzinfo, (PyObject *)self, &none); if (offset == -1 && PyErr_Occurred()) return NULL; } /* Even if offset is 0, don't call timetuple() -- tm_isdst should be * 0 in a UTC timetuple regardless of what dst() says. */ if (offset) { /* Subtract offset minutes & normalize. */ int stat; mm -= offset; stat = normalize_datetime(&y, &m, &d, &hh, &mm, &ss, &us); if (stat < 0) { /* At the edges, it's possible we overflowed * beyond MINYEAR or MAXYEAR. */ if (PyErr_ExceptionMatches(PyExc_OverflowError)) PyErr_Clear(); else return NULL; } } return build_struct_time(y, m, d, hh, mm, ss, 0); } /* Pickle support, a simple use of __reduce__. */ /* Let basestate be the non-tzinfo data string. * If tzinfo is None, this returns (basestate,), else (basestate, tzinfo). * So it's a tuple in any (non-error) case. * __getstate__ isn't exposed. */ static PyObject * datetime_getstate(PyDateTime_DateTime *self) { PyObject *basestate; PyObject *result = NULL; basestate = PyString_FromStringAndSize((char *)self->data, _PyDateTime_DATETIME_DATASIZE); if (basestate != NULL) { if (! HASTZINFO(self) || self->tzinfo == Py_None) result = Py_BuildValue("(O)", basestate); else result = Py_BuildValue("OO", basestate, self->tzinfo); Py_DECREF(basestate); } return result; } static PyObject * datetime_reduce(PyDateTime_DateTime *self, PyObject *arg) { return Py_BuildValue("(ON)", self->ob_type, datetime_getstate(self)); } static PyMethodDef datetime_methods[] = { /* Class methods: */ {"now", (PyCFunction)datetime_now, METH_KEYWORDS | METH_CLASS, PyDoc_STR("[tz] -> new datetime with tz's local day and time.")}, {"utcnow", (PyCFunction)datetime_utcnow, METH_NOARGS | METH_CLASS, PyDoc_STR("Return a new datetime representing UTC day and time.")}, {"fromtimestamp", (PyCFunction)datetime_fromtimestamp, METH_KEYWORDS | METH_CLASS, PyDoc_STR("timestamp[, tz] -> tz's local time from POSIX timestamp.")}, {"utcfromtimestamp", (PyCFunction)datetime_utcfromtimestamp, METH_VARARGS | METH_CLASS, PyDoc_STR("timestamp -> UTC datetime from a POSIX timestamp " "(like time.time()).")}, {"combine", (PyCFunction)datetime_combine, METH_VARARGS | METH_KEYWORDS | METH_CLASS, PyDoc_STR("date, time -> datetime with same date and time fields")}, /* Instance methods: */ {"date", (PyCFunction)datetime_getdate, METH_NOARGS, PyDoc_STR("Return date object with same year, month and day.")}, {"time", (PyCFunction)datetime_gettime, METH_NOARGS, PyDoc_STR("Return time object with same time but with tzinfo=None.")}, {"timetz", (PyCFunction)datetime_gettimetz, METH_NOARGS, PyDoc_STR("Return time object with same time and tzinfo.")}, {"ctime", (PyCFunction)datetime_ctime, METH_NOARGS, PyDoc_STR("Return ctime() style string.")}, {"timetuple", (PyCFunction)datetime_timetuple, METH_NOARGS, PyDoc_STR("Return time tuple, compatible with time.localtime().")}, {"utctimetuple", (PyCFunction)datetime_utctimetuple, METH_NOARGS, PyDoc_STR("Return UTC time tuple, compatible with time.localtime().")}, {"isoformat", (PyCFunction)datetime_isoformat, METH_KEYWORDS, PyDoc_STR("[sep] -> string in ISO 8601 format, " "YYYY-MM-DDTHH:MM:SS[.mmmmmm][+HH:MM].\n\n" "sep is used to separate the year from the time, and " "defaults to 'T'.")}, {"utcoffset", (PyCFunction)datetime_utcoffset, METH_NOARGS, PyDoc_STR("Return self.tzinfo.utcoffset(self).")}, {"tzname", (PyCFunction)datetime_tzname, METH_NOARGS, PyDoc_STR("Return self.tzinfo.tzname(self).")}, {"dst", (PyCFunction)datetime_dst, METH_NOARGS, PyDoc_STR("Return self.tzinfo.dst(self).")}, {"replace", (PyCFunction)datetime_replace, METH_KEYWORDS, PyDoc_STR("Return datetime with new specified fields.")}, {"astimezone", (PyCFunction)datetime_astimezone, METH_KEYWORDS, PyDoc_STR("tz -> convert to local time in new timezone tz\n")}, {"__reduce__", (PyCFunction)datetime_reduce, METH_NOARGS, PyDoc_STR("__reduce__() -> (cls, state)")}, {NULL, NULL} }; static char datetime_doc[] = PyDoc_STR("date/time type."); static PyNumberMethods datetime_as_number = { datetime_add, /* nb_add */ datetime_subtract, /* nb_subtract */ 0, /* nb_multiply */ 0, /* nb_divide */ 0, /* nb_remainder */ 0, /* nb_divmod */ 0, /* nb_power */ 0, /* nb_negative */ 0, /* nb_positive */ 0, /* nb_absolute */ 0, /* nb_nonzero */ }; statichere PyTypeObject PyDateTime_DateTimeType = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "datetime.datetime", /* tp_name */ sizeof(PyDateTime_DateTime), /* tp_basicsize */ 0, /* tp_itemsize */ (destructor)datetime_dealloc, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ (reprfunc)datetime_repr, /* tp_repr */ &datetime_as_number, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ (hashfunc)datetime_hash, /* tp_hash */ 0, /* tp_call */ (reprfunc)datetime_str, /* tp_str */ PyObject_GenericGetAttr, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_CHECKTYPES | Py_TPFLAGS_BASETYPE, /* tp_flags */ datetime_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ (richcmpfunc)datetime_richcompare, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ datetime_methods, /* tp_methods */ 0, /* tp_members */ datetime_getset, /* tp_getset */ &PyDateTime_DateType, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ 0, /* tp_init */ datetime_alloc, /* tp_alloc */ datetime_new, /* tp_new */ 0, /* tp_free */ }; /* --------------------------------------------------------------------------- * Module methods and initialization. */ static PyMethodDef module_methods[] = { {NULL, NULL} }; PyMODINIT_FUNC initdatetime(void) { PyObject *m; /* a module object */ PyObject *d; /* its dict */ PyObject *x; m = Py_InitModule3("datetime", module_methods, "Fast implementation of the datetime type."); if (PyType_Ready(&PyDateTime_DateType) < 0) return; if (PyType_Ready(&PyDateTime_DateTimeType) < 0) return; if (PyType_Ready(&PyDateTime_DeltaType) < 0) return; if (PyType_Ready(&PyDateTime_TimeType) < 0) return; if (PyType_Ready(&PyDateTime_TZInfoType) < 0) return; /* timedelta values */ d = PyDateTime_DeltaType.tp_dict; x = new_delta(0, 0, 1, 0); if (x == NULL || PyDict_SetItemString(d, "resolution", x) < 0) return; Py_DECREF(x); x = new_delta(-MAX_DELTA_DAYS, 0, 0, 0); if (x == NULL || PyDict_SetItemString(d, "min", x) < 0) return; Py_DECREF(x); x = new_delta(MAX_DELTA_DAYS, 24*3600-1, 1000000-1, 0); if (x == NULL || PyDict_SetItemString(d, "max", x) < 0) return; Py_DECREF(x); /* date values */ d = PyDateTime_DateType.tp_dict; x = new_date(1, 1, 1); if (x == NULL || PyDict_SetItemString(d, "min", x) < 0) return; Py_DECREF(x); x = new_date(MAXYEAR, 12, 31); if (x == NULL || PyDict_SetItemString(d, "max", x) < 0) return; Py_DECREF(x); x = new_delta(1, 0, 0, 0); if (x == NULL || PyDict_SetItemString(d, "resolution", x) < 0) return; Py_DECREF(x); /* time values */ d = PyDateTime_TimeType.tp_dict; x = new_time(0, 0, 0, 0, Py_None); if (x == NULL || PyDict_SetItemString(d, "min", x) < 0) return; Py_DECREF(x); x = new_time(23, 59, 59, 999999, Py_None); if (x == NULL || PyDict_SetItemString(d, "max", x) < 0) return; Py_DECREF(x); x = new_delta(0, 0, 1, 0); if (x == NULL || PyDict_SetItemString(d, "resolution", x) < 0) return; Py_DECREF(x); /* datetime values */ d = PyDateTime_DateTimeType.tp_dict; x = new_datetime(1, 1, 1, 0, 0, 0, 0, Py_None); if (x == NULL || PyDict_SetItemString(d, "min", x) < 0) return; Py_DECREF(x); x = new_datetime(MAXYEAR, 12, 31, 23, 59, 59, 999999, Py_None); if (x == NULL || PyDict_SetItemString(d, "max", x) < 0) return; Py_DECREF(x); x = new_delta(0, 0, 1, 0); if (x == NULL || PyDict_SetItemString(d, "resolution", x) < 0) return; Py_DECREF(x); /* module initialization */ PyModule_AddIntConstant(m, "MINYEAR", MINYEAR); PyModule_AddIntConstant(m, "MAXYEAR", MAXYEAR); Py_INCREF(&PyDateTime_DateType); PyModule_AddObject(m, "date", (PyObject *) &PyDateTime_DateType); Py_INCREF(&PyDateTime_DateTimeType); PyModule_AddObject(m, "datetime", (PyObject *)&PyDateTime_DateTimeType); Py_INCREF(&PyDateTime_TimeType); PyModule_AddObject(m, "time", (PyObject *) &PyDateTime_TimeType); Py_INCREF(&PyDateTime_DeltaType); PyModule_AddObject(m, "timedelta", (PyObject *) &PyDateTime_DeltaType); Py_INCREF(&PyDateTime_TZInfoType); PyModule_AddObject(m, "tzinfo", (PyObject *) &PyDateTime_TZInfoType); /* A 4-year cycle has an extra leap day over what we'd get from * pasting together 4 single years. */ assert(DI4Y == 4 * 365 + 1); assert(DI4Y == days_before_year(4+1)); /* Similarly, a 400-year cycle has an extra leap day over what we'd * get from pasting together 4 100-year cycles. */ assert(DI400Y == 4 * DI100Y + 1); assert(DI400Y == days_before_year(400+1)); /* OTOH, a 100-year cycle has one fewer leap day than we'd get from * pasting together 25 4-year cycles. */ assert(DI100Y == 25 * DI4Y - 1); assert(DI100Y == days_before_year(100+1)); us_per_us = PyInt_FromLong(1); us_per_ms = PyInt_FromLong(1000); us_per_second = PyInt_FromLong(1000000); us_per_minute = PyInt_FromLong(60000000); seconds_per_day = PyInt_FromLong(24 * 3600); if (us_per_us == NULL || us_per_ms == NULL || us_per_second == NULL || us_per_minute == NULL || seconds_per_day == NULL) return; /* The rest are too big for 32-bit ints, but even * us_per_week fits in 40 bits, so doubles should be exact. */ us_per_hour = PyLong_FromDouble(3600000000.0); us_per_day = PyLong_FromDouble(86400000000.0); us_per_week = PyLong_FromDouble(604800000000.0); if (us_per_hour == NULL || us_per_day == NULL || us_per_week == NULL) return; } /* --------------------------------------------------------------------------- Some time zone algebra. For a datetime x, let x.n = x stripped of its timezone -- its naive time. x.o = x.utcoffset(), and assuming that doesn't raise an exception or return None x.d = x.dst(), and assuming that doesn't raise an exception or return None x.s = x's standard offset, x.o - x.d Now some derived rules, where k is a duration (timedelta). 1. x.o = x.s + x.d This follows from the definition of x.s. 2. If x and y have the same tzinfo member, x.s = y.s. This is actually a requirement, an assumption we need to make about sane tzinfo classes. 3. The naive UTC time corresponding to x is x.n - x.o. This is again a requirement for a sane tzinfo class. 4. (x+k).s = x.s This follows from #2, and that datimetimetz+timedelta preserves tzinfo. 5. (x+k).n = x.n + k Again follows from how arithmetic is defined. Now we can explain tz.fromutc(x). Let's assume it's an interesting case (meaning that the various tzinfo methods exist, and don't blow up or return None when called). The function wants to return a datetime y with timezone tz, equivalent to x. x is already in UTC. By #3, we want y.n - y.o = x.n [1] The algorithm starts by attaching tz to x.n, and calling that y. So x.n = y.n at the start. Then it wants to add a duration k to y, so that [1] becomes true; in effect, we want to solve [2] for k: (y+k).n - (y+k).o = x.n [2] By #1, this is the same as (y+k).n - ((y+k).s + (y+k).d) = x.n [3] By #5, (y+k).n = y.n + k, which equals x.n + k because x.n=y.n at the start. Substituting that into [3], x.n + k - (y+k).s - (y+k).d = x.n; the x.n terms cancel, leaving k - (y+k).s - (y+k).d = 0; rearranging, k = (y+k).s - (y+k).d; by #4, (y+k).s == y.s, so k = y.s - (y+k).d On the RHS, (y+k).d can't be computed directly, but y.s can be, and we approximate k by ignoring the (y+k).d term at first. Note that k can't be very large, since all offset-returning methods return a duration of magnitude less than 24 hours. For that reason, if y is firmly in std time, (y+k).d must be 0, so ignoring it has no consequence then. In any case, the new value is z = y + y.s [4] It's helpful to step back at look at [4] from a higher level: it's simply mapping from UTC to tz's standard time. At this point, if z.n - z.o = x.n [5] we have an equivalent time, and are almost done. The insecurity here is at the start of daylight time. Picture US Eastern for concreteness. The wall time jumps from 1:59 to 3:00, and wall hours of the form 2:MM don't make good sense then. The docs ask that an Eastern tzinfo class consider such a time to be EDT (because it's "after 2"), which is a redundant spelling of 1:MM EST on the day DST starts. We want to return the 1:MM EST spelling because that's the only spelling that makes sense on the local wall clock. In fact, if [5] holds at this point, we do have the standard-time spelling, but that takes a bit of proof. We first prove a stronger result. What's the difference between the LHS and RHS of [5]? Let diff = x.n - (z.n - z.o) [6] Now z.n = by [4] (y + y.s).n = by #5 y.n + y.s = since y.n = x.n x.n + y.s = since z and y are have the same tzinfo member, y.s = z.s by #2 x.n + z.s Plugging that back into [6] gives diff = x.n - ((x.n + z.s) - z.o) = expanding x.n - x.n - z.s + z.o = cancelling - z.s + z.o = by #2 z.d So diff = z.d. If [5] is true now, diff = 0, so z.d = 0 too, and we have the standard-time spelling we wanted in the endcase described above. We're done. Contrarily, if z.d = 0, then we have a UTC equivalent, and are also done. If [5] is not true now, diff = z.d != 0, and z.d is the offset we need to add to z (in effect, z is in tz's standard time, and we need to shift the local clock into tz's daylight time). Let z' = z + z.d = z + diff [7] and we can again ask whether z'.n - z'.o = x.n [8] If so, we're done. If not, the tzinfo class is insane, according to the assumptions we've made. This also requires a bit of proof. As before, let's compute the difference between the LHS and RHS of [8] (and skipping some of the justifications for the kinds of substitutions we've done several times already): diff' = x.n - (z'.n - z'.o) = replacing z'.n via [7] x.n - (z.n + diff - z'.o) = replacing diff via [6] x.n - (z.n + x.n - (z.n - z.o) - z'.o) = x.n - z.n - x.n + z.n - z.o + z'.o = cancel x.n - z.n + z.n - z.o + z'.o = cancel z.n - z.o + z'.o = #1 twice -z.s - z.d + z'.s + z'.d = z and z' have same tzinfo z'.d - z.d So z' is UTC-equivalent to x iff z'.d = z.d at this point. If they are equal, we've found the UTC-equivalent so are done. In fact, we stop with [7] and return z', not bothering to compute z'.d. How could z.d and z'd differ? z' = z + z.d [7], so merely moving z' by a dst() offset, and starting *from* a time already in DST (we know z.d != 0), would have to change the result dst() returns: we start in DST, and moving a little further into it takes us out of DST. There isn't a sane case where this can happen. The closest it gets is at the end of DST, where there's an hour in UTC with no spelling in a hybrid tzinfo class. In US Eastern, that's 5:MM UTC = 0:MM EST = 1:MM EDT. During that hour, on an Eastern clock 1:MM is taken as being in standard time (6:MM UTC) because the docs insist on that, but 0:MM is taken as being in daylight time (4:MM UTC). There is no local time mapping to 5:MM UTC. The local clock jumps from 1:59 back to 1:00 again, and repeats the 1:MM hour in standard time. Since that's what the local clock *does*, we want to map both UTC hours 5:MM and 6:MM to 1:MM Eastern. The result is ambiguous in local time, but so it goes -- it's the way the local clock works. When x = 5:MM UTC is the input to this algorithm, x.o=0, y.o=-5 and y.d=0, so z=0:MM. z.d=60 (minutes) then, so [5] doesn't hold and we keep going. z' = z + z.d = 1:MM then, and z'.d=0, and z'.d - z.d = -60 != 0 so [8] (correctly) concludes that z' is not UTC-equivalent to x. Because we know z.d said z was in daylight time (else [5] would have held and we would have stopped then), and we know z.d != z'.d (else [8] would have held and we would have stopped then), and there are only 2 possible values dst() can return in Eastern, it follows that z'.d must be 0 (which it is in the example, but the reasoning doesn't depend on the example -- it depends on there being two possible dst() outcomes, one zero and the other non-zero). Therefore z' must be in standard time, and is the spelling we want in this case. Note again that z' is not UTC-equivalent as far as the hybrid tzinfo class is concerned (because it takes z' as being in standard time rather than the daylight time we intend here), but returning it gives the real-life "local clock repeats an hour" behavior when mapping the "unspellable" UTC hour into tz. When the input is 6:MM, z=1:MM and z.d=0, and we stop at once, again with the 1:MM standard time spelling we want. So how can this break? One of the assumptions must be violated. Two possibilities: 1) [2] effectively says that y.s is invariant across all y belong to a given time zone. This isn't true if, for political reasons or continental drift, a region decides to change its base offset from UTC. 2) There may be versions of "double daylight" time where the tail end of the analysis gives up a step too early. I haven't thought about that enough to say. In any case, it's clear that the default fromutc() is strong enough to handle "almost all" time zones: so long as the standard offset is invariant, it doesn't matter if daylight time transition points change from year to year, or if daylight time is skipped in some years; it doesn't matter how large or small dst() may get within its bounds; and it doesn't even matter if some perverse time zone returns a negative dst()). So a breaking case must be pretty bizarre, and a tzinfo subclass can override fromutc() if it is. --------------------------------------------------------------------------- */ Python-2.3.7/Modules/threadmodule.c0000644001241000117560000002531010115446673016511 0ustar loewishpifb6 /* Thread module */ /* Interface to Sjoerd's portable C thread library */ #include "Python.h" #ifndef WITH_THREAD #error "Error! The rest of Python is not compiled with thread support." #error "Rerun configure, adding a --with-threads option." #error "Then run `make clean' followed by `make'." #endif #include "pythread.h" static PyObject *ThreadError; /* Lock objects */ typedef struct { PyObject_HEAD PyThread_type_lock lock_lock; } lockobject; static PyTypeObject Locktype; static lockobject * newlockobject(void) { lockobject *self; self = PyObject_New(lockobject, &Locktype); if (self == NULL) return NULL; self->lock_lock = PyThread_allocate_lock(); if (self->lock_lock == NULL) { PyObject_Del(self); self = NULL; PyErr_SetString(ThreadError, "can't allocate lock"); } return self; } static void lock_dealloc(lockobject *self) { /* Unlock the lock so it's safe to free it */ PyThread_acquire_lock(self->lock_lock, 0); PyThread_release_lock(self->lock_lock); PyThread_free_lock(self->lock_lock); PyObject_Del(self); } static PyObject * lock_PyThread_acquire_lock(lockobject *self, PyObject *args) { int i = 1; if (!PyArg_ParseTuple(args, "|i:acquire", &i)) return NULL; Py_BEGIN_ALLOW_THREADS i = PyThread_acquire_lock(self->lock_lock, i); Py_END_ALLOW_THREADS if (args == NULL) { Py_INCREF(Py_None); return Py_None; } else return PyBool_FromLong((long)i); } PyDoc_STRVAR(acquire_doc, "acquire([wait]) -> None or bool\n\ (PyThread_acquire_lock() is an obsolete synonym)\n\ \n\ Lock the lock. Without argument, this blocks if the lock is already\n\ locked (even by the same thread), waiting for another thread to release\n\ the lock, and return None once the lock is acquired.\n\ With an argument, this will only block if the argument is true,\n\ and the return value reflects whether the lock is acquired.\n\ The blocking operation is not interruptible."); static PyObject * lock_PyThread_release_lock(lockobject *self) { /* Sanity check: the lock must be locked */ if (PyThread_acquire_lock(self->lock_lock, 0)) { PyThread_release_lock(self->lock_lock); PyErr_SetString(ThreadError, "release unlocked lock"); return NULL; } PyThread_release_lock(self->lock_lock); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(release_doc, "release()\n\ (PyThread_release_lock() is an obsolete synonym)\n\ \n\ Release the lock, allowing another thread that is blocked waiting for\n\ the lock to acquire the lock. The lock must be in the locked state,\n\ but it needn't be locked by the same thread that unlocks it."); static PyObject * lock_locked_lock(lockobject *self) { if (PyThread_acquire_lock(self->lock_lock, 0)) { PyThread_release_lock(self->lock_lock); return PyBool_FromLong(0L); } return PyBool_FromLong(1L); } PyDoc_STRVAR(locked_doc, "locked() -> bool\n\ (locked_lock() is an obsolete synonym)\n\ \n\ Return whether the lock is in the locked state."); static PyMethodDef lock_methods[] = { {"acquire_lock", (PyCFunction)lock_PyThread_acquire_lock, METH_VARARGS, acquire_doc}, {"acquire", (PyCFunction)lock_PyThread_acquire_lock, METH_VARARGS, acquire_doc}, {"release_lock", (PyCFunction)lock_PyThread_release_lock, METH_NOARGS, release_doc}, {"release", (PyCFunction)lock_PyThread_release_lock, METH_NOARGS, release_doc}, {"locked_lock", (PyCFunction)lock_locked_lock, METH_NOARGS, locked_doc}, {"locked", (PyCFunction)lock_locked_lock, METH_NOARGS, locked_doc}, {NULL, NULL} /* sentinel */ }; static PyObject * lock_getattr(lockobject *self, char *name) { return Py_FindMethod(lock_methods, (PyObject *)self, name); } static PyTypeObject Locktype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "thread.lock", /*tp_name*/ sizeof(lockobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)lock_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)lock_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; /* Module functions */ struct bootstate { PyInterpreterState *interp; PyObject *func; PyObject *args; PyObject *keyw; }; static void t_bootstrap(void *boot_raw) { struct bootstate *boot = (struct bootstate *) boot_raw; PyGILState_STATE gstate; PyObject *res; gstate = PyGILState_Ensure(); res = PyEval_CallObjectWithKeywords( boot->func, boot->args, boot->keyw); if (res == NULL) { if (PyErr_ExceptionMatches(PyExc_SystemExit)) PyErr_Clear(); else { PyObject *file; PySys_WriteStderr( "Unhandled exception in thread started by "); file = PySys_GetObject("stderr"); if (file) PyFile_WriteObject(boot->func, file, 0); else PyObject_Print(boot->func, stderr, 0); PySys_WriteStderr("\n"); PyErr_PrintEx(0); } } else Py_DECREF(res); Py_DECREF(boot->func); Py_DECREF(boot->args); Py_XDECREF(boot->keyw); PyMem_DEL(boot_raw); PyGILState_Release(gstate); PyThread_exit_thread(); } static PyObject * thread_PyThread_start_new_thread(PyObject *self, PyObject *fargs) { PyObject *func, *args, *keyw = NULL; struct bootstate *boot; long ident; if (!PyArg_ParseTuple(fargs, "OO|O:start_new_thread", &func, &args, &keyw)) return NULL; if (!PyCallable_Check(func)) { PyErr_SetString(PyExc_TypeError, "first arg must be callable"); return NULL; } if (!PyTuple_Check(args)) { PyErr_SetString(PyExc_TypeError, "2nd arg must be a tuple"); return NULL; } if (keyw != NULL && !PyDict_Check(keyw)) { PyErr_SetString(PyExc_TypeError, "optional 3rd arg must be a dictionary"); return NULL; } boot = PyMem_NEW(struct bootstate, 1); if (boot == NULL) return PyErr_NoMemory(); boot->interp = PyThreadState_Get()->interp; boot->func = func; boot->args = args; boot->keyw = keyw; Py_INCREF(func); Py_INCREF(args); Py_XINCREF(keyw); PyEval_InitThreads(); /* Start the interpreter's thread-awareness */ ident = PyThread_start_new_thread(t_bootstrap, (void*) boot); if (ident == -1) { PyErr_SetString(ThreadError, "can't start new thread\n"); Py_DECREF(func); Py_DECREF(args); Py_XDECREF(keyw); PyMem_DEL(boot); return NULL; } return PyInt_FromLong(ident); } PyDoc_STRVAR(start_new_doc, "start_new_thread(function, args[, kwargs])\n\ (start_new() is an obsolete synonym)\n\ \n\ Start a new thread and return its identifier. The thread will call the\n\ function with positional arguments from the tuple args and keyword arguments\n\ taken from the optional dictionary kwargs. The thread exits when the\n\ function returns; the return value is ignored. The thread will also exit\n\ when the function raises an unhandled exception; a stack trace will be\n\ printed unless the exception is SystemExit.\n"); static PyObject * thread_PyThread_exit_thread(PyObject *self) { PyErr_SetNone(PyExc_SystemExit); return NULL; } PyDoc_STRVAR(exit_doc, "exit()\n\ (PyThread_exit_thread() is an obsolete synonym)\n\ \n\ This is synonymous to ``raise SystemExit''. It will cause the current\n\ thread to exit silently unless the exception is caught."); static PyObject * thread_PyThread_interrupt_main(PyObject * self) { PyErr_SetInterrupt(); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(interrupt_doc, "interrupt_main()\n\ \n\ Raise a KeyboardInterrupt in the main thread.\n\ A subthread can use this function to interrupt the main thread." ); #ifndef NO_EXIT_PROG static PyObject * thread_PyThread_exit_prog(PyObject *self, PyObject *args) { int sts; if (!PyArg_ParseTuple(args, "i:exit_prog", &sts)) return NULL; Py_Exit(sts); /* Calls PyThread_exit_prog(sts) or _PyThread_exit_prog(sts) */ for (;;) { } /* Should not be reached */ } #endif static PyObject * thread_PyThread_allocate_lock(PyObject *self) { return (PyObject *) newlockobject(); } PyDoc_STRVAR(allocate_doc, "allocate_lock() -> lock object\n\ (allocate() is an obsolete synonym)\n\ \n\ Create a new lock object. See LockType.__doc__ for information about locks."); static PyObject * thread_get_ident(PyObject *self) { long ident; ident = PyThread_get_thread_ident(); if (ident == -1) { PyErr_SetString(ThreadError, "no current thread ident"); return NULL; } return PyInt_FromLong(ident); } PyDoc_STRVAR(get_ident_doc, "get_ident() -> integer\n\ \n\ Return a non-zero integer that uniquely identifies the current thread\n\ amongst other threads that exist simultaneously.\n\ This may be used to identify per-thread resources.\n\ Even though on some platforms threads identities may appear to be\n\ allocated consecutive numbers starting at 1, this behavior should not\n\ be relied upon, and the number should be seen purely as a magic cookie.\n\ A thread's identity may be reused for another thread after it exits."); static PyMethodDef thread_methods[] = { {"start_new_thread", (PyCFunction)thread_PyThread_start_new_thread, METH_VARARGS, start_new_doc}, {"start_new", (PyCFunction)thread_PyThread_start_new_thread, METH_VARARGS, start_new_doc}, {"allocate_lock", (PyCFunction)thread_PyThread_allocate_lock, METH_NOARGS, allocate_doc}, {"allocate", (PyCFunction)thread_PyThread_allocate_lock, METH_NOARGS, allocate_doc}, {"exit_thread", (PyCFunction)thread_PyThread_exit_thread, METH_NOARGS, exit_doc}, {"exit", (PyCFunction)thread_PyThread_exit_thread, METH_NOARGS, exit_doc}, {"interrupt_main", (PyCFunction)thread_PyThread_interrupt_main, METH_NOARGS, interrupt_doc}, {"get_ident", (PyCFunction)thread_get_ident, METH_NOARGS, get_ident_doc}, #ifndef NO_EXIT_PROG {"exit_prog", (PyCFunction)thread_PyThread_exit_prog, METH_VARARGS}, #endif {NULL, NULL} /* sentinel */ }; /* Initialization function */ PyDoc_STRVAR(thread_doc, "This module provides primitive operations to write multi-threaded programs.\n\ The 'threading' module provides a more convenient interface."); PyDoc_STRVAR(lock_doc, "A lock object is a synchronization primitive. To create a lock,\n\ call the PyThread_allocate_lock() function. Methods are:\n\ \n\ acquire() -- lock the lock, possibly blocking until it can be obtained\n\ release() -- unlock of the lock\n\ locked() -- test whether the lock is currently locked\n\ \n\ A lock is not owned by the thread that locked it; another thread may\n\ unlock it. A thread attempting to lock a lock that it has already locked\n\ will block until another thread unlocks it. Deadlocks may ensue."); PyMODINIT_FUNC initthread(void) { PyObject *m, *d; /* Create the module and add the functions */ m = Py_InitModule3("thread", thread_methods, thread_doc); /* Add a symbolic constant */ d = PyModule_GetDict(m); ThreadError = PyErr_NewException("thread.error", NULL, NULL); PyDict_SetItemString(d, "error", ThreadError); Locktype.tp_doc = lock_doc; Py_INCREF(&Locktype); PyDict_SetItemString(d, "LockType", (PyObject *)&Locktype); /* Initialize the C thread library */ PyThread_init_thread(); } Python-2.3.7/Modules/sre.h0000644001241000117560000000470410046633721014631 0ustar loewishpifb6/* * Secret Labs' Regular Expression Engine * * regular expression matching engine * * Copyright (c) 1997-2001 by Secret Labs AB. All rights reserved. * * See the _sre.c file for information on usage and redistribution. */ #ifndef SRE_INCLUDED #define SRE_INCLUDED #include "sre_constants.h" /* size of a code word (must be unsigned short or larger, and large enough to hold a Py_UNICODE character) */ #ifdef Py_UNICODE_WIDE #define SRE_CODE Py_UCS4 #else #define SRE_CODE unsigned short #endif typedef struct { PyObject_VAR_HEAD int groups; /* must be first! */ PyObject* groupindex; PyObject* indexgroup; /* compatibility */ PyObject* pattern; /* pattern source (or None) */ int flags; /* flags used when compiling pattern source */ /* pattern code */ int codesize; SRE_CODE code[1]; } PatternObject; #define PatternObject_GetCode(o) (((PatternObject*)(o))->code) typedef struct { PyObject_VAR_HEAD PyObject* string; /* link to the target string (must be first) */ PyObject* regs; /* cached list of matching spans */ PatternObject* pattern; /* link to the regex (pattern) object */ int pos, endpos; /* current target slice */ int lastindex; /* last index marker seen by the engine (-1 if none) */ int groups; /* number of groups (start/end marks) */ int mark[1]; } MatchObject; typedef unsigned int (*SRE_TOLOWER_HOOK)(unsigned int ch); /* FIXME: shouldn't be a constant, really... */ #define SRE_MARK_SIZE 200 typedef struct SRE_REPEAT_T { int count; SRE_CODE* pattern; /* points to REPEAT operator arguments */ struct SRE_REPEAT_T *prev; /* points to previous repeat context */ } SRE_REPEAT; typedef struct { /* string pointers */ void* ptr; /* current position (also end of current slice) */ void* beginning; /* start of original string */ void* start; /* start of current slice */ void* end; /* end of original string */ /* attributes for the match object */ PyObject* string; int pos, endpos; /* character size */ int charsize; /* registers */ int lastindex; int lastmark; void* mark[SRE_MARK_SIZE]; /* dynamically allocated stuff */ void** mark_stack; int mark_stack_size; int mark_stack_base; SRE_REPEAT *repeat; /* current repeat context */ /* hooks */ SRE_TOLOWER_HOOK lower; } SRE_STATE; typedef struct { PyObject_HEAD PyObject* pattern; SRE_STATE state; } ScannerObject; #endif Python-2.3.7/Modules/resource.c0000644001241000117560000002067610106670011015656 0ustar loewishpifb6 #include "Python.h" #include "structseq.h" #include #include #include #include /* for sysconf */ #if defined(HAVE_UNISTD_H) #include #endif /* On some systems, these aren't in any header file. On others they are, with inconsistent prototypes. We declare the (default) return type, to shut up gcc -Wall; but we can't declare the prototype, to avoid errors when the header files declare it different. Worse, on some Linuxes, getpagesize() returns a size_t... */ #define doubletime(TV) ((double)(TV).tv_sec + (TV).tv_usec * 0.000001) static PyObject *ResourceError; PyDoc_STRVAR(struct_rusage__doc__, "struct_rusage: Result from getrusage.\n\n" "This object may be accessed either as a tuple of\n" " (utime,stime,maxrss,ixrss,idrss,isrss,minflt,majflt,\n" " nswap,inblock,oublock,msgsnd,msgrcv,nsignals,nvcsw,nivcsw)\n" "or via the attributes ru_utime, ru_stime, ru_maxrss, and so on."); static PyStructSequence_Field struct_rusage_fields[] = { {"ru_utime", "user time used"}, {"ru_stime", "system time used"}, {"ru_maxrss", "max. resident set size"}, {"ru_ixrss", "shared memory size"}, {"ru_idrss", "unshared data size"}, {"ru_isrss", "unshared stack size"}, {"ru_minflt", "page faults not requiring I/O"}, {"ru_majflt", "page faults requiring I/O"}, {"ru_nswap", "number of swap outs"}, {"ru_inblock", "block input operations"}, {"ru_oublock", "block output operations"}, {"ru_msgsnd", "IPC messages sent"}, {"ru_msgrcv", "IPC messages received"}, {"ru_nsignals", "signals received"}, {"ru_nvcsw", "voluntary context switches"}, {"ru_nivcsw", "involuntary context switches"}, {0} }; static PyStructSequence_Desc struct_rusage_desc = { "resource.struct_rusage", /* name */ struct_rusage__doc__, /* doc */ struct_rusage_fields, /* fields */ 16 /* n_in_sequence */ }; static PyTypeObject StructRUsageType; static PyObject * resource_getrusage(PyObject *self, PyObject *args) { int who; struct rusage ru; PyObject *result; if (!PyArg_ParseTuple(args, "i:getrusage", &who)) return NULL; if (getrusage(who, &ru) == -1) { if (errno == EINVAL) { PyErr_SetString(PyExc_ValueError, "invalid who parameter"); return NULL; } PyErr_SetFromErrno(ResourceError); return NULL; } result = PyStructSequence_New(&StructRUsageType); if (!result) return NULL; PyStructSequence_SET_ITEM(result, 0, PyFloat_FromDouble(doubletime(ru.ru_utime))); PyStructSequence_SET_ITEM(result, 1, PyFloat_FromDouble(doubletime(ru.ru_stime))); PyStructSequence_SET_ITEM(result, 2, PyInt_FromLong(ru.ru_maxrss)); PyStructSequence_SET_ITEM(result, 3, PyInt_FromLong(ru.ru_ixrss)); PyStructSequence_SET_ITEM(result, 4, PyInt_FromLong(ru.ru_idrss)); PyStructSequence_SET_ITEM(result, 5, PyInt_FromLong(ru.ru_isrss)); PyStructSequence_SET_ITEM(result, 6, PyInt_FromLong(ru.ru_minflt)); PyStructSequence_SET_ITEM(result, 7, PyInt_FromLong(ru.ru_majflt)); PyStructSequence_SET_ITEM(result, 8, PyInt_FromLong(ru.ru_nswap)); PyStructSequence_SET_ITEM(result, 9, PyInt_FromLong(ru.ru_inblock)); PyStructSequence_SET_ITEM(result, 10, PyInt_FromLong(ru.ru_oublock)); PyStructSequence_SET_ITEM(result, 11, PyInt_FromLong(ru.ru_msgsnd)); PyStructSequence_SET_ITEM(result, 12, PyInt_FromLong(ru.ru_msgrcv)); PyStructSequence_SET_ITEM(result, 13, PyInt_FromLong(ru.ru_nsignals)); PyStructSequence_SET_ITEM(result, 14, PyInt_FromLong(ru.ru_nvcsw)); PyStructSequence_SET_ITEM(result, 15, PyInt_FromLong(ru.ru_nivcsw)); if (PyErr_Occurred()) { Py_DECREF(result); return NULL; } return result; } static PyObject * resource_getrlimit(PyObject *self, PyObject *args) { struct rlimit rl; int resource; if (!PyArg_ParseTuple(args, "i:getrlimit", &resource)) return NULL; if (resource < 0 || resource >= RLIM_NLIMITS) { PyErr_SetString(PyExc_ValueError, "invalid resource specified"); return NULL; } if (getrlimit(resource, &rl) == -1) { PyErr_SetFromErrno(ResourceError); return NULL; } #if defined(HAVE_LONG_LONG) if (sizeof(rl.rlim_cur) > sizeof(long)) { return Py_BuildValue("LL", (PY_LONG_LONG) rl.rlim_cur, (PY_LONG_LONG) rl.rlim_max); } #endif return Py_BuildValue("ll", (long) rl.rlim_cur, (long) rl.rlim_max); } static PyObject * resource_setrlimit(PyObject *self, PyObject *args) { struct rlimit rl; int resource; PyObject *curobj, *maxobj; if (!PyArg_ParseTuple(args, "i(OO):setrlimit", &resource, &curobj, &maxobj)) return NULL; if (resource < 0 || resource >= RLIM_NLIMITS) { PyErr_SetString(PyExc_ValueError, "invalid resource specified"); return NULL; } #if !defined(HAVE_LARGEFILE_SUPPORT) rl.rlim_cur = PyInt_AsLong(curobj); if (rl.rlim_cur == -1 && PyErr_Occurred()) return NULL; rl.rlim_max = PyInt_AsLong(maxobj); if (rl.rlim_max == -1 && PyErr_Occurred()) return NULL; #else /* The limits are probably bigger than a long */ rl.rlim_cur = PyLong_Check(curobj) ? PyLong_AsLongLong(curobj) : PyInt_AsLong(curobj); if (rl.rlim_cur == -1 && PyErr_Occurred()) return NULL; rl.rlim_max = PyLong_Check(maxobj) ? PyLong_AsLongLong(maxobj) : PyInt_AsLong(maxobj); if (rl.rlim_max == -1 && PyErr_Occurred()) return NULL; #endif rl.rlim_cur = rl.rlim_cur & RLIM_INFINITY; rl.rlim_max = rl.rlim_max & RLIM_INFINITY; if (setrlimit(resource, &rl) == -1) { if (errno == EINVAL) PyErr_SetString(PyExc_ValueError, "current limit exceeds maximum limit"); else if (errno == EPERM) PyErr_SetString(PyExc_ValueError, "not allowed to raise maximum limit"); else PyErr_SetFromErrno(ResourceError); return NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * resource_getpagesize(PyObject *self, PyObject *args) { long pagesize = 0; if (!PyArg_ParseTuple(args, ":getpagesize")) return NULL; #if defined(HAVE_GETPAGESIZE) pagesize = getpagesize(); #elif defined(HAVE_SYSCONF) #if defined(_SC_PAGE_SIZE) pagesize = sysconf(_SC_PAGE_SIZE); #else /* Irix 5.3 has _SC_PAGESIZE, but not _SC_PAGE_SIZE */ pagesize = sysconf(_SC_PAGESIZE); #endif #endif return Py_BuildValue("i", pagesize); } /* List of functions */ static struct PyMethodDef resource_methods[] = { {"getrusage", resource_getrusage, METH_VARARGS}, {"getrlimit", resource_getrlimit, METH_VARARGS}, {"setrlimit", resource_setrlimit, METH_VARARGS}, {"getpagesize", resource_getpagesize, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; /* Module initialization */ PyMODINIT_FUNC initresource(void) { PyObject *m, *v; /* Create the module and add the functions */ m = Py_InitModule("resource", resource_methods); /* Add some symbolic constants to the module */ if (ResourceError == NULL) { ResourceError = PyErr_NewException("resource.error", NULL, NULL); } Py_INCREF(ResourceError); PyModule_AddObject(m, "error", ResourceError); PyStructSequence_InitType(&StructRUsageType, &struct_rusage_desc); PyModule_AddObject(m, "struct_rusage", (PyObject*) &StructRUsageType); /* insert constants */ #ifdef RLIMIT_CPU PyModule_AddIntConstant(m, "RLIMIT_CPU", RLIMIT_CPU); #endif #ifdef RLIMIT_FSIZE PyModule_AddIntConstant(m, "RLIMIT_FSIZE", RLIMIT_FSIZE); #endif #ifdef RLIMIT_DATA PyModule_AddIntConstant(m, "RLIMIT_DATA", RLIMIT_DATA); #endif #ifdef RLIMIT_STACK PyModule_AddIntConstant(m, "RLIMIT_STACK", RLIMIT_STACK); #endif #ifdef RLIMIT_CORE PyModule_AddIntConstant(m, "RLIMIT_CORE", RLIMIT_CORE); #endif #ifdef RLIMIT_NOFILE PyModule_AddIntConstant(m, "RLIMIT_NOFILE", RLIMIT_NOFILE); #endif #ifdef RLIMIT_OFILE PyModule_AddIntConstant(m, "RLIMIT_OFILE", RLIMIT_OFILE); #endif #ifdef RLIMIT_VMEM PyModule_AddIntConstant(m, "RLIMIT_VMEM", RLIMIT_VMEM); #endif #ifdef RLIMIT_AS PyModule_AddIntConstant(m, "RLIMIT_AS", RLIMIT_AS); #endif #ifdef RLIMIT_RSS PyModule_AddIntConstant(m, "RLIMIT_RSS", RLIMIT_RSS); #endif #ifdef RLIMIT_NPROC PyModule_AddIntConstant(m, "RLIMIT_NPROC", RLIMIT_NPROC); #endif #ifdef RLIMIT_MEMLOCK PyModule_AddIntConstant(m, "RLIMIT_MEMLOCK", RLIMIT_MEMLOCK); #endif #ifdef RUSAGE_SELF PyModule_AddIntConstant(m, "RUSAGE_SELF", RUSAGE_SELF); #endif #ifdef RUSAGE_CHILDREN PyModule_AddIntConstant(m, "RUSAGE_CHILDREN", RUSAGE_CHILDREN); #endif #ifdef RUSAGE_BOTH PyModule_AddIntConstant(m, "RUSAGE_BOTH", RUSAGE_BOTH); #endif #if defined(HAVE_LONG_LONG) if (sizeof(RLIM_INFINITY) > sizeof(long)) { v = PyLong_FromLongLong((PY_LONG_LONG) RLIM_INFINITY); } else #endif { v = PyInt_FromLong((long) RLIM_INFINITY); } if (v) { PyModule_AddObject(m, "RLIM_INFINITY", v); } } Python-2.3.7/Modules/flmodule.c0000644001241000117560000014224507522367001015645 0ustar loewishpifb6/* FL module -- interface to Mark Overmars' FORMS Library. */ /* This code works with FORMS version 2.2 (if you defined OBSOLETE_FORMS_CALLS), and 2.3. FORMS can be ftp'ed from ftp.cs.ruu.nl (131.211.80.17), directory /pub/SGI/FORMS. */ /* A half-hearted attempt has been made to allow programs using this * module to exploit parallelism (through the threads module). No provisions * have been made for multiple threads to use this module at the same time, * though. So, a program with a forms thread and a non-forms thread will work * fine but a program with two threads using forms will probably crash (unless * the program takes precaution to ensure that only one thread can be in * this module at any time). This will have to be fixed some time. * (A fix will probably also have to synchronize with the gl module). */ #include "Python.h" #include "forms.h" #include "structmember.h" /* Generic Forms Objects */ typedef struct { PyObject_HEAD FL_OBJECT *ob_generic; PyMethodDef *ob_methods; PyObject *ob_callback; PyObject *ob_callback_arg; } genericobject; static PyTypeObject GenericObjecttype; #define is_genericobject(g) ((g)->ob_type == &GenericObjecttype) /* List of all objects (XXX this should be a hash table on address...) */ static PyObject *allgenerics = NULL; static int nfreeslots = 0; /* Add an object to the list of known objects */ static void knowgeneric(genericobject *g) { int i, n; /* Create the list if it doesn't already exist */ if (allgenerics == NULL) { allgenerics = PyList_New(0); if (allgenerics == NULL) { PyErr_Clear(); return; /* Too bad, live without allgenerics... */ } } if (nfreeslots > 0) { /* Search the list for reusable slots (NULL items) */ /* XXX This can be made faster! */ n = PyList_Size(allgenerics); for (i = 0; i < n; i++) { if (PyList_GetItem(allgenerics, i) == NULL) { Py_INCREF(g); PyList_SetItem(allgenerics, i, (PyObject *)g); nfreeslots--; return; } } /* Strange... no free slots found... */ nfreeslots = 0; } /* No free entries, append new item to the end */ PyList_Append(allgenerics, (PyObject *)g); } /* Find an object in the list of known objects */ static genericobject * findgeneric(FL_OBJECT *generic) { int i, n; genericobject *g; if (allgenerics == NULL) return NULL; /* No objects known yet */ n = PyList_Size(allgenerics); for (i = 0; i < n; i++) { g = (genericobject *)PyList_GetItem(allgenerics, i); if (g != NULL && g->ob_generic == generic) return g; } return NULL; /* Unknown object */ } /* Remove an object from the list of known objects */ static void forgetgeneric(genericobject *g) { int i, n; Py_XDECREF(g->ob_callback); g->ob_callback = NULL; Py_XDECREF(g->ob_callback_arg); g->ob_callback_arg = NULL; if (allgenerics == NULL) return; /* No objects known yet */ n = PyList_Size(allgenerics); for (i = 0; i < n; i++) { if (g == (genericobject *)PyList_GetItem(allgenerics, i)) { PyList_SetItem(allgenerics, i, (PyObject *)NULL); nfreeslots++; break; } } } /* Called when a form is about to be freed -- remove all the objects that we know about from it. */ static void releaseobjects(FL_FORM *form) { int i, n; genericobject *g; if (allgenerics == NULL) return; /* No objects known yet */ n = PyList_Size(allgenerics); for (i = 0; i < n; i++) { g = (genericobject *)PyList_GetItem(allgenerics, i); if (g != NULL && g->ob_generic->form == form) { fl_delete_object(g->ob_generic); /* The object is now unreachable for do_forms and check_forms, so delete it from the list of known objects */ Py_XDECREF(g->ob_callback); g->ob_callback = NULL; Py_XDECREF(g->ob_callback_arg); g->ob_callback_arg = NULL; PyList_SetItem(allgenerics, i, (PyObject *)NULL); nfreeslots++; } } } /* Methods of generic objects */ static PyObject * generic_set_call_back(genericobject *g, PyObject *args) { if (args == NULL) { Py_XDECREF(g->ob_callback); Py_XDECREF(g->ob_callback_arg); g->ob_callback = NULL; g->ob_callback_arg = NULL; } else { if (!PyTuple_Check(args) || PyTuple_Size(args) != 2) { PyErr_BadArgument(); return NULL; } Py_XDECREF(g->ob_callback); Py_XDECREF(g->ob_callback_arg); g->ob_callback = PyTuple_GetItem(args, 0); Py_INCREF(g->ob_callback); g->ob_callback_arg = PyTuple_GetItem(args, 1); Py_INCREF(g->ob_callback_arg); } Py_INCREF(Py_None); return Py_None; } static PyObject * generic_call(genericobject *g, void (*func)(FL_OBJECT *)) { (*func)(g->ob_generic); Py_INCREF(Py_None); return Py_None; } static PyObject * generic_delete_object(genericobject *g) { PyObject *res; res = generic_call(g, fl_delete_object); if (res != NULL) forgetgeneric(g); return res; } static PyObject * generic_show_object(genericobject *g) { return generic_call(g, fl_show_object); } static PyObject * generic_hide_object(genericobject *g) { return generic_call(g, fl_hide_object); } static PyObject * generic_redraw_object(genericobject *g) { return generic_call(g, fl_redraw_object); } #ifdef OBSOLETE_FORMS_CALLS /* (un)freeze_object() are obsolete in FORMS 2.2 and unsupported in 2.3. Since there's no foolproof way to tell which version we're using, we omit them unconditionally. */ static PyObject * generic_freeze_object(genericobject *g) { return generic_call(g, fl_freeze_object); } static PyObject * generic_unfreeze_object(genericobject *g) { return generic_call(g, fl_unfreeze_object); } #endif /* OBSOLETE_FORMS_CALLS */ static PyObject * generic_activate_object(genericobject *g) { return generic_call(g, fl_activate_object); } static PyObject * generic_deactivate_object(genericobject *g) { return generic_call(g, fl_deactivate_object); } static PyObject * generic_set_object_shortcut(genericobject *g, PyObject *args) { char *str; if (!PyArg_ParseTuple(args, "s:set_object_shortcut", &str)) return NULL; fl_set_object_shortcut(g->ob_generic, str); Py_INCREF(Py_None); return Py_None; } static PyMethodDef generic_methods[] = { {"set_call_back", (PyCFunction)generic_set_call_back, METH_OLDARGS}, {"delete_object", (PyCFunction)generic_delete_object, METH_NOARGS}, {"show_object", (PyCFunction)generic_show_object, METH_NOARGS}, {"hide_object", (PyCFunction)generic_hide_object, METH_NOARGS}, {"redraw_object", (PyCFunction)generic_redraw_object, METH_NOARGS}, #ifdef OBSOLETE_FORMS_CALLS {"freeze_object", (PyCFunction)generic_freeze_object, METH_NOARGS}, {"unfreeze_object", (PyCFunction)generic_unfreeze_object, METH_NOARGS}, #endif {"activate_object", (PyCFunction)generic_activate_object, METH_NOARGS}, {"deactivate_object", (PyCFunction)generic_deactivate_object, METH_NOARGS}, {"set_object_shortcut", (PyCFunction)generic_set_object_shortcut, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static void generic_dealloc(genericobject *g) { fl_free_object(g->ob_generic); Py_XDECREF(g->ob_callback); Py_XDECREF(g->ob_callback_arg); PyObject_Del(g); } #define OFF(x) offsetof(FL_OBJECT, x) static struct memberlist generic_memberlist[] = { {"objclass", T_INT, OFF(objclass), RO}, {"type", T_INT, OFF(type), RO}, {"boxtype", T_INT, OFF(boxtype)}, {"x", T_FLOAT, OFF(x)}, {"y", T_FLOAT, OFF(y)}, {"w", T_FLOAT, OFF(w)}, {"h", T_FLOAT, OFF(h)}, {"col1", T_INT, OFF(col1)}, {"col2", T_INT, OFF(col2)}, {"align", T_INT, OFF(align)}, {"lcol", T_INT, OFF(lcol)}, {"lsize", T_FLOAT, OFF(lsize)}, /* "label" is treated specially! */ {"lstyle", T_INT, OFF(lstyle)}, {"pushed", T_INT, OFF(pushed), RO}, {"focus", T_INT, OFF(focus), RO}, {"belowmouse", T_INT, OFF(belowmouse),RO}, /* {"frozen", T_INT, OFF(frozen), RO}, */ {"active", T_INT, OFF(active)}, {"input", T_INT, OFF(input)}, {"visible", T_INT, OFF(visible), RO}, {"radio", T_INT, OFF(radio)}, {"automatic", T_INT, OFF(automatic)}, {NULL} /* Sentinel */ }; #undef OFF static PyObject * generic_getattr(genericobject *g, char *name) { PyObject *meth; /* XXX Ought to special-case name "__methods__" */ if (g-> ob_methods) { meth = Py_FindMethod(g->ob_methods, (PyObject *)g, name); if (meth != NULL) return meth; PyErr_Clear(); } meth = Py_FindMethod(generic_methods, (PyObject *)g, name); if (meth != NULL) return meth; PyErr_Clear(); /* "label" is an exception, getmember only works for char pointers, not for char arrays */ if (strcmp(name, "label") == 0) return PyString_FromString(g->ob_generic->label); return PyMember_Get((char *)g->ob_generic, generic_memberlist, name); } static int generic_setattr(genericobject *g, char *name, PyObject *v) { int ret; if (v == NULL) { PyErr_SetString(PyExc_TypeError, "can't delete forms object attributes"); return -1; } /* "label" is an exception: setmember doesn't set strings; and FORMS wants you to call a function to set the label */ if (strcmp(name, "label") == 0) { if (!PyString_Check(v)) { PyErr_SetString(PyExc_TypeError, "label attr must be string"); return -1; } fl_set_object_label(g->ob_generic, PyString_AsString(v)); return 0; } ret = PyMember_Set((char *)g->ob_generic, generic_memberlist, name, v); /* Rather than calling all the various set_object_* functions, we call fl_redraw_object here. This is sometimes redundant but I doubt that's a big problem */ if (ret == 0) fl_redraw_object(g->ob_generic); return ret; } static PyObject * generic_repr(genericobject *g) { char buf[100]; PyOS_snprintf(buf, sizeof(buf), "", g, g->ob_generic->objclass); return PyString_FromString(buf); } static PyTypeObject GenericObjecttype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "fl.FORMS_object", /*tp_name*/ sizeof(genericobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)generic_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)generic_getattr, /*tp_getattr*/ (setattrfunc)generic_setattr, /*tp_setattr*/ 0, /*tp_compare*/ (reprfunc)generic_repr, /*tp_repr*/ }; static PyObject * newgenericobject(FL_OBJECT *generic, PyMethodDef *methods) { genericobject *g; g = PyObject_New(genericobject, &GenericObjecttype); if (g == NULL) return NULL; g-> ob_generic = generic; g->ob_methods = methods; g->ob_callback = NULL; g->ob_callback_arg = NULL; knowgeneric(g); return (PyObject *)g; } /**********************************************************************/ /* Some common calling sequences */ /* void func (object, float) */ static PyObject * call_forms_INf (void (*func)(FL_OBJECT *, float), FL_OBJECT *obj, PyObject *args) { float parameter; if (!PyArg_Parse(args, "f", ¶meter)) return NULL; (*func) (obj, parameter); Py_INCREF(Py_None); return Py_None; } /* void func (object, float) */ static PyObject * call_forms_INfINf (void (*func)(FL_OBJECT *, float, float), FL_OBJECT *obj, PyObject *args) { float par1, par2; if (!PyArg_Parse(args, "(ff)", &par1, &par2)) return NULL; (*func) (obj, par1, par2); Py_INCREF(Py_None); return Py_None; } /* void func (object, int) */ static PyObject * call_forms_INi (void (*func)(FL_OBJECT *, int), FL_OBJECT *obj, PyObject *args) { int parameter; if (!PyArg_Parse(args, "i", ¶meter)) return NULL; (*func) (obj, parameter); Py_INCREF(Py_None); return Py_None; } /* void func (object, char) */ static PyObject * call_forms_INc (void (*func)(FL_OBJECT *, int), FL_OBJECT *obj, PyObject *args) { char *a; if (!PyArg_Parse(args, "s", &a)) return NULL; (*func) (obj, a[0]); Py_INCREF(Py_None); return Py_None; } /* void func (object, string) */ static PyObject * call_forms_INstr (void (*func)(FL_OBJECT *, char *), FL_OBJECT *obj, PyObject *args) { char *a; if (!PyArg_Parse(args, "s", &a)) return NULL; (*func) (obj, a); Py_INCREF(Py_None); return Py_None; } /* void func (object, int, string) */ static PyObject * call_forms_INiINstr (void (*func)(FL_OBJECT *, int, char *), FL_OBJECT *obj, PyObject *args) { char *b; int a; if (!PyArg_Parse(args, "(is)", &a, &b)) return NULL; (*func) (obj, a, b); Py_INCREF(Py_None); return Py_None; } #ifdef UNUSED /* void func (object, int, int) */ static PyObject * call_forms_INiINi (void (*func)(FL_OBJECT *, int, int), FL_OBJECT *obj, PyObject *args) { int par1, par2; if (!PyArg_Parse(args, "(ii)", &par1, &par2)) return NULL; (*func) (obj, par1, par2); Py_INCREF(Py_None); return Py_None; } #endif /* int func (object) */ static PyObject * call_forms_Ri (int (*func)(FL_OBJECT *), FL_OBJECT *obj) { int retval; retval = (*func) (obj); return PyInt_FromLong ((long) retval); } /* char * func (object) */ static PyObject * call_forms_Rstr (char * (*func)(FL_OBJECT *), FL_OBJECT *obj) { char *str; str = (*func) (obj); if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString (str); } /* int func (object) */ static PyObject * call_forms_Rf (float (*func)(FL_OBJECT *), FL_OBJECT *obj) { float retval; retval = (*func) (obj); return PyFloat_FromDouble (retval); } static PyObject * call_forms_OUTfOUTf (void (*func)(FL_OBJECT *, float *, float *), FL_OBJECT *obj) { float f1, f2; (*func) (obj, &f1, &f2); return Py_BuildValue("(ff)", f1, f2); } #ifdef UNUSED static PyObject * call_forms_OUTf (void (*func)(FL_OBJECT *, float *), FL_OBJECT *obj) { float f; (*func) (obj, &f); return PyFloat_FromDouble (f); } #endif /**********************************************************************/ /* Class : browser */ static PyObject * set_browser_topline(genericobject *g, PyObject *args) { return call_forms_INi (fl_set_browser_topline, g-> ob_generic, args); } static PyObject * clear_browser(genericobject *g) { return generic_call (g, fl_clear_browser); } static PyObject * add_browser_line (genericobject *g, PyObject *args) { return call_forms_INstr (fl_add_browser_line, g-> ob_generic, args); } static PyObject * addto_browser (genericobject *g, PyObject *args) { return call_forms_INstr (fl_addto_browser, g-> ob_generic, args); } static PyObject * insert_browser_line (genericobject *g, PyObject *args) { return call_forms_INiINstr (fl_insert_browser_line, g-> ob_generic, args); } static PyObject * delete_browser_line (genericobject *g, PyObject *args) { return call_forms_INi (fl_delete_browser_line, g-> ob_generic, args); } static PyObject * replace_browser_line (genericobject *g, PyObject *args) { return call_forms_INiINstr (fl_replace_browser_line, g-> ob_generic, args); } static PyObject * get_browser_line(genericobject *g, PyObject *args) { int i; char *str; if (!PyArg_Parse(args, "i", &i)) return NULL; str = fl_get_browser_line (g->ob_generic, i); if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString (str); } static PyObject * load_browser (genericobject *g, PyObject *args) { /* XXX strictly speaking this is wrong since fl_load_browser XXX returns int, not void */ return call_forms_INstr (fl_load_browser, g-> ob_generic, args); } static PyObject * get_browser_maxline(genericobject *g) { return call_forms_Ri (fl_get_browser_maxline, g-> ob_generic); } static PyObject * select_browser_line (genericobject *g, PyObject *args) { return call_forms_INi (fl_select_browser_line, g-> ob_generic, args); } static PyObject * deselect_browser_line (genericobject *g, PyObject *args) { return call_forms_INi (fl_deselect_browser_line, g-> ob_generic, args); } static PyObject * deselect_browser (genericobject *g) { return generic_call (g, fl_deselect_browser); } static PyObject * isselected_browser_line (genericobject *g, PyObject *args) { int i, j; if (!PyArg_Parse(args, "i", &i)) return NULL; j = fl_isselected_browser_line (g->ob_generic, i); return PyInt_FromLong (j); } static PyObject * get_browser (genericobject *g) { return call_forms_Ri (fl_get_browser, g-> ob_generic); } static PyObject * set_browser_fontsize (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_browser_fontsize, g-> ob_generic, args); } static PyObject * set_browser_fontstyle (genericobject *g, PyObject *args) { return call_forms_INi (fl_set_browser_fontstyle, g-> ob_generic, args); } static PyObject * set_browser_specialkey (genericobject *g, PyObject *args) { return call_forms_INc(fl_set_browser_specialkey, g-> ob_generic, args); } static PyMethodDef browser_methods[] = { {"set_browser_topline", (PyCFunction)set_browser_topline, METH_OLDARGS}, {"clear_browser", (PyCFunction)clear_browser, METH_NOARGS}, {"add_browser_line", (PyCFunction)add_browser_line, METH_OLDARGS}, {"addto_browser", (PyCFunction)addto_browser, METH_OLDARGS}, {"insert_browser_line", (PyCFunction)insert_browser_line, METH_OLDARGS}, {"delete_browser_line", (PyCFunction)delete_browser_line, METH_OLDARGS}, {"replace_browser_line", (PyCFunction)replace_browser_line, METH_OLDARGS}, {"get_browser_line", (PyCFunction)get_browser_line, METH_OLDARGS}, {"load_browser", (PyCFunction)load_browser, METH_OLDARGS}, {"get_browser_maxline", (PyCFunction)get_browser_maxline, METH_NOARGS,} {"select_browser_line", (PyCFunction)select_browser_line, METH_OLDARGS}, {"deselect_browser_line", (PyCFunction)deselect_browser_line, METH_OLDARGS}, {"deselect_browser", (PyCFunction)deselect_browser, METH_NOARGS,} {"isselected_browser_line", (PyCFunction)isselected_browser_line, METH_OLDARGS}, {"get_browser", (PyCFunction)get_browser, METH_NOARGS,} {"set_browser_fontsize", (PyCFunction)set_browser_fontsize, METH_OLDARGS}, {"set_browser_fontstyle", (PyCFunction)set_browser_fontstyle, METH_OLDARGS}, {"set_browser_specialkey", (PyCFunction)set_browser_specialkey, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; /* Class: button */ static PyObject * set_button(genericobject *g, PyObject *args) { return call_forms_INi (fl_set_button, g-> ob_generic, args); } static PyObject * get_button(genericobject *g) { return call_forms_Ri (fl_get_button, g-> ob_generic); } static PyObject * get_button_numb(genericobject *g) { return call_forms_Ri (fl_get_button_numb, g-> ob_generic); } static PyObject * set_button_shortcut(genericobject *g, PyObject *args) { return call_forms_INstr (fl_set_button_shortcut, g-> ob_generic, args); } static PyMethodDef button_methods[] = { {"set_button", (PyCFunction)set_button, METH_OLDARGS}, {"get_button", (PyCFunction)get_button, METH_NOARGS}, {"get_button_numb", (PyCFunction)get_button_numb, METH_NOARGS}, {"set_button_shortcut", (PyCFunction)set_button_shortcut, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; /* Class: choice */ static PyObject * set_choice(genericobject *g, PyObject *args) { return call_forms_INi (fl_set_choice, g-> ob_generic, args); } static PyObject * get_choice(genericobject *g) { return call_forms_Ri (fl_get_choice, g-> ob_generic); } static PyObject * clear_choice (genericobject *g) { return generic_call (g, fl_clear_choice); } static PyObject * addto_choice (genericobject *g, PyObject *args) { return call_forms_INstr (fl_addto_choice, g-> ob_generic, args); } static PyObject * replace_choice (genericobject *g, PyObject *args) { return call_forms_INiINstr (fl_replace_choice, g-> ob_generic, args); } static PyObject * delete_choice (genericobject *g, PyObject *args) { return call_forms_INi (fl_delete_choice, g-> ob_generic, args); } static PyObject * get_choice_text (genericobject *g) { return call_forms_Rstr (fl_get_choice_text, g-> ob_generic); } static PyObject * set_choice_fontsize (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_choice_fontsize, g-> ob_generic, args); } static PyObject * set_choice_fontstyle (genericobject *g, PyObject *args) { return call_forms_INi (fl_set_choice_fontstyle, g-> ob_generic, args); } static PyMethodDef choice_methods[] = { {"set_choice", (PyCFunction)set_choice, METH_OLDARGS}, {"get_choice", (PyCFunction)get_choice, METH_NOARGS}, {"clear_choice", (PyCFunction)clear_choice, METH_NOARGS}, {"addto_choice", (PyCFunction)addto_choice, METH_OLDARGS}, {"replace_choice", (PyCFunction)replace_choice, METH_OLDARGS}, {"delete_choice", (PyCFunction)delete_choice, METH_OLDARGS}, {"get_choice_text", (PyCFunction)get_choice_text, METH_NOARGS}, {"set_choice_fontsize", (PyCFunction)set_choice_fontsize, METH_OLDARGS}, {"set_choice_fontstyle",(PyCFunction)set_choice_fontstyle, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; /* Class : Clock */ static PyObject * get_clock(genericobject *g) { int i0, i1, i2; fl_get_clock (g->ob_generic, &i0, &i1, &i2); return Py_BuildValue("(iii)", i0, i1, i2); } static PyMethodDef clock_methods[] = { {"get_clock", (PyCFunction)get_clock, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; /* CLass : Counters */ static PyObject * get_counter_value(genericobject *g) { return call_forms_Rf (fl_get_counter_value, g-> ob_generic); } static PyObject * set_counter_value (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_counter_value, g-> ob_generic, args); } static PyObject * set_counter_precision (genericobject *g, PyObject *args) { return call_forms_INi (fl_set_counter_precision, g-> ob_generic, args); } static PyObject * set_counter_bounds (genericobject *g, PyObject *args) { return call_forms_INfINf (fl_set_counter_bounds, g-> ob_generic, args); } static PyObject * set_counter_step (genericobject *g, PyObject *args) { return call_forms_INfINf (fl_set_counter_step, g-> ob_generic, args); } static PyObject * set_counter_return (genericobject *g, PyObject *args) { return call_forms_INi (fl_set_counter_return, g-> ob_generic, args); } static PyMethodDef counter_methods[] = { {"set_counter_value", (PyCFunction)set_counter_value, METH_OLDARGS}, {"get_counter_value", (PyCFunction)get_counter_value, METH_NOARGS}, {"set_counter_bounds", (PyCFunction)set_counter_bounds, METH_OLDARGS}, {"set_counter_step", (PyCFunction)set_counter_step, METH_OLDARGS}, {"set_counter_precision", (PyCFunction)set_counter_precision, METH_OLDARGS}, {"set_counter_return", (PyCFunction)set_counter_return, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; /* Class: Dials */ static PyObject * get_dial_value(genericobject *g) { return call_forms_Rf (fl_get_dial_value, g-> ob_generic); } static PyObject * set_dial_value (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_dial_value, g-> ob_generic, args); } static PyObject * set_dial_bounds (genericobject *g, PyObject *args) { return call_forms_INfINf (fl_set_dial_bounds, g-> ob_generic, args); } static PyObject * get_dial_bounds (genericobject *g) { return call_forms_OUTfOUTf (fl_get_dial_bounds, g-> ob_generic); } static PyObject * set_dial_step (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_dial_step, g-> ob_generic, args); } static PyMethodDef dial_methods[] = { {"set_dial_value", (PyCFunction)set_dial_value, METH_OLDARGS}, {"get_dial_value", (PyCFunction)get_dial_value, METH_NOARGS}, {"set_dial_bounds", (PyCFunction)set_dial_bounds, METH_OLDARGS}, {"get_dial_bounds", (PyCFunction)get_dial_bounds, METH_NOARGS}, {"set_dial_step", (PyCFunction)set_dial_step, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; /* Class : Input */ static PyObject * set_input (genericobject *g, PyObject *args) { return call_forms_INstr (fl_set_input, g-> ob_generic, args); } static PyObject * get_input (genericobject *g) { return call_forms_Rstr (fl_get_input, g-> ob_generic); } static PyObject * set_input_color (genericobject *g, PyObject *args) { return call_forms_INfINf (fl_set_input_color, g-> ob_generic, args); } static PyObject * set_input_return (genericobject *g, PyObject *args) { return call_forms_INi (fl_set_input_return, g-> ob_generic, args); } static PyMethodDef input_methods[] = { {"set_input", (PyCFunction)set_input, METH_OLDARGS}, {"get_input", (PyCFunction)get_input, METH_NOARGS}, {"set_input_color", (PyCFunction)set_input_color, METH_OLDARGS}, {"set_input_return", (PyCFunction)set_input_return, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; /* Class : Menu */ static PyObject * set_menu (genericobject *g, PyObject *args) { return call_forms_INstr (fl_set_menu, g-> ob_generic, args); } static PyObject * get_menu (genericobject *g) { /* XXX strictly speaking this is wrong since fl_get_menu XXX returns long, not int */ return call_forms_Ri (fl_get_menu, g-> ob_generic); } static PyObject * get_menu_text (genericobject *g) { return call_forms_Rstr (fl_get_menu_text, g-> ob_generic); } static PyObject * addto_menu (genericobject *g, PyObject *args) { return call_forms_INstr (fl_addto_menu, g-> ob_generic, args); } static PyMethodDef menu_methods[] = { {"set_menu", (PyCFunction)set_menu, METH_OLDARGS}, {"get_menu", (PyCFunction)get_menu, METH_NOARGS}, {"get_menu_text", (PyCFunction)get_menu_text, METH_NOARGS}, {"addto_menu", (PyCFunction)addto_menu, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; /* Class: Sliders */ static PyObject * get_slider_value(genericobject *g) { return call_forms_Rf (fl_get_slider_value, g-> ob_generic); } static PyObject * set_slider_value (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_slider_value, g-> ob_generic, args); } static PyObject * set_slider_bounds (genericobject *g, PyObject *args) { return call_forms_INfINf (fl_set_slider_bounds, g-> ob_generic, args); } static PyObject * get_slider_bounds (genericobject *g) { return call_forms_OUTfOUTf(fl_get_slider_bounds, g-> ob_generic); } static PyObject * set_slider_return (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_slider_return, g-> ob_generic, args); } static PyObject * set_slider_size (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_slider_size, g-> ob_generic, args); } static PyObject * set_slider_precision (genericobject *g, PyObject *args) { return call_forms_INi (fl_set_slider_precision, g-> ob_generic, args); } static PyObject * set_slider_step (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_slider_step, g-> ob_generic, args); } static PyMethodDef slider_methods[] = { {"set_slider_value", (PyCFunction)set_slider_value, METH_OLDARGS}, {"get_slider_value", (PyCFunction)get_slider_value, METH_NOARGS}, {"set_slider_bounds", (PyCFunction)set_slider_bounds, METH_OLDARGS}, {"get_slider_bounds", (PyCFunction)get_slider_bounds, METH_NOARGS}, {"set_slider_return", (PyCFunction)set_slider_return, METH_OLDARGS}, {"set_slider_size", (PyCFunction)set_slider_size, METH_OLDARGS}, {"set_slider_precision",(PyCFunction)set_slider_precision, METH_OLDARGS}, {"set_slider_step", (PyCFunction)set_slider_step, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * set_positioner_xvalue (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_positioner_xvalue, g-> ob_generic, args); } static PyObject * set_positioner_xbounds (genericobject *g, PyObject *args) { return call_forms_INfINf (fl_set_positioner_xbounds, g-> ob_generic, args); } static PyObject * set_positioner_yvalue (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_positioner_yvalue, g-> ob_generic, args); } static PyObject * set_positioner_ybounds (genericobject *g, PyObject *args) { return call_forms_INfINf (fl_set_positioner_ybounds, g-> ob_generic, args); } static PyObject * get_positioner_xvalue (genericobject *g) { return call_forms_Rf (fl_get_positioner_xvalue, g-> ob_generic); } static PyObject * get_positioner_xbounds (genericobject *g) { return call_forms_OUTfOUTf (fl_get_positioner_xbounds, g-> ob_generic); } static PyObject * get_positioner_yvalue (genericobject *g) { return call_forms_Rf (fl_get_positioner_yvalue, g-> ob_generic); } static PyObject * get_positioner_ybounds (genericobject *g) { return call_forms_OUTfOUTf (fl_get_positioner_ybounds, g-> ob_generic); } static PyMethodDef positioner_methods[] = { {"set_positioner_xvalue", (PyCFunction)set_positioner_xvalue, METH_OLDARGS}, {"set_positioner_yvalue", (PyCFunction)set_positioner_yvalue, METH_OLDARGS}, {"set_positioner_xbounds", (PyCFunction)set_positioner_xbounds, METH_OLDARGS}, {"set_positioner_ybounds", (PyCFunction)set_positioner_ybounds, METH_OLDARGS}, {"get_positioner_xvalue", (PyCFunction)get_positioner_xvalue, METH_NOARGS}, {"get_positioner_yvalue", (PyCFunction)get_positioner_yvalue, METH_NOARGS}, {"get_positioner_xbounds", (PyCFunction)get_positioner_xbounds, METH_NOARGS}, {"get_positioner_ybounds", (PyCFunction)get_positioner_ybounds, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; /* Class timer */ static PyObject * set_timer (genericobject *g, PyObject *args) { return call_forms_INf (fl_set_timer, g-> ob_generic, args); } static PyObject * get_timer (genericobject *g) { return call_forms_Rf (fl_get_timer, g-> ob_generic); } static PyMethodDef timer_methods[] = { {"set_timer", (PyCFunction)set_timer, METH_OLDARGS}, {"get_timer", (PyCFunction)get_timer, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; /* Form objects */ typedef struct { PyObject_HEAD FL_FORM *ob_form; } formobject; static PyTypeObject Formtype; #define is_formobject(v) ((v)->ob_type == &Formtype) static PyObject * form_show_form(formobject *f, PyObject *args) { int place, border; char *name; if (!PyArg_Parse(args, "(iis)", &place, &border, &name)) return NULL; fl_show_form(f->ob_form, place, border, name); Py_INCREF(Py_None); return Py_None; } static PyObject * form_call(void (*func)(FL_FORM *), FL_FORM *f) { (*func)(f); Py_INCREF(Py_None); return Py_None; } static PyObject * form_call_INiINi(void (*func)(FL_FORM *, int, int), FL_FORM *f, PyObject *args) { int a, b; if (!PyArg_Parse(args, "(ii)", &a, &b)) return NULL; (*func)(f, a, b); Py_INCREF(Py_None); return Py_None; } static PyObject * form_call_INfINf(void (*func)(FL_FORM *, float, float), FL_FORM *f, PyObject *args) { float a, b; if (!PyArg_Parse(args, "(ff)", &a, &b)) return NULL; (*func)(f, a, b); Py_INCREF(Py_None); return Py_None; } static PyObject * form_hide_form(formobject *f) { return form_call(fl_hide_form, f-> ob_form); } static PyObject * form_redraw_form(formobject *f) { return form_call(fl_redraw_form, f-> ob_form); } static PyObject * form_set_form_position(formobject *f, PyObject *args) { return form_call_INiINi(fl_set_form_position, f-> ob_form, args); } static PyObject * form_set_form_size(formobject *f, PyObject *args) { return form_call_INiINi(fl_set_form_size, f-> ob_form, args); } static PyObject * form_scale_form(formobject *f, PyObject *args) { return form_call_INfINf(fl_scale_form, f-> ob_form, args); } static PyObject * generic_add_object(formobject *f, PyObject *args, FL_OBJECT *(*func)(int, float, float, float, float, char*), PyMethodDef *internal_methods) { int type; float x, y, w, h; char *name; FL_OBJECT *obj; if (!PyArg_Parse(args,"(iffffs)", &type,&x,&y,&w,&h,&name)) return NULL; fl_addto_form (f-> ob_form); obj = (*func) (type, x, y, w, h, name); fl_end_form(); if (obj == NULL) { PyErr_NoMemory(); return NULL; } return newgenericobject (obj, internal_methods); } static PyObject * form_add_button(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_button, button_methods); } static PyObject * form_add_lightbutton(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_lightbutton, button_methods); } static PyObject * form_add_roundbutton(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_roundbutton, button_methods); } static PyObject * form_add_menu (formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_menu, menu_methods); } static PyObject * form_add_slider(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_slider, slider_methods); } static PyObject * form_add_valslider(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_valslider, slider_methods); } static PyObject * form_add_dial(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_dial, dial_methods); } static PyObject * form_add_counter(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_counter, counter_methods); } static PyObject * form_add_clock(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_clock, clock_methods); } static PyObject * form_add_box(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_box, (PyMethodDef *)NULL); } static PyObject * form_add_choice(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_choice, choice_methods); } static PyObject * form_add_browser(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_browser, browser_methods); } static PyObject * form_add_positioner(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_positioner, positioner_methods); } static PyObject * form_add_input(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_input, input_methods); } static PyObject * form_add_text(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_text, (PyMethodDef *)NULL); } static PyObject * form_add_timer(formobject *f, PyObject *args) { return generic_add_object(f, args, fl_add_timer, timer_methods); } static PyObject * form_freeze_form(formobject *f) { return form_call(fl_freeze_form, f-> ob_form); } static PyObject * form_unfreeze_form(formobject *f) { return form_call(fl_unfreeze_form, f-> ob_form); } static PyObject * form_activate_form(formobject *f) { return form_call(fl_activate_form, f-> ob_form); } static PyObject * form_deactivate_form(formobject *f) { return form_call(fl_deactivate_form, f-> ob_form); } static PyObject * form_bgn_group(formobject *f, PyObject *args) { FL_OBJECT *obj; fl_addto_form(f-> ob_form); obj = fl_bgn_group(); fl_end_form(); if (obj == NULL) { PyErr_NoMemory(); return NULL; } return newgenericobject (obj, (PyMethodDef *) NULL); } static PyObject * form_end_group(formobject *f, PyObject *args) { fl_addto_form(f-> ob_form); fl_end_group(); fl_end_form(); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_find_first_or_last(FL_OBJECT *(*func)(FL_FORM *, int, float, float), formobject *f, PyObject *args) { int type; float mx, my; FL_OBJECT *generic; genericobject *g; if (!PyArg_Parse(args, "(iff)", &type, &mx, &my)) return NULL; generic = (*func) (f-> ob_form, type, mx, my); if (generic == NULL) { Py_INCREF(Py_None); return Py_None; } g = findgeneric(generic); if (g == NULL) { PyErr_SetString(PyExc_RuntimeError, "forms_find_{first|last} returns unknown object"); return NULL; } Py_INCREF(g); return (PyObject *) g; } static PyObject * form_find_first(formobject *f, PyObject *args) { return forms_find_first_or_last(fl_find_first, f, args); } static PyObject * form_find_last(formobject *f, PyObject *args) { return forms_find_first_or_last(fl_find_last, f, args); } static PyObject * form_set_object_focus(formobject *f, PyObject *args) { genericobject *g; if (args == NULL || !is_genericobject(args)) { PyErr_BadArgument(); return NULL; } g = (genericobject *)args; fl_set_object_focus(f->ob_form, g->ob_generic); Py_INCREF(Py_None); return Py_None; } static PyMethodDef form_methods[] = { /* adm */ {"show_form", (PyCFunction)form_show_form, METH_OLDARGS}, {"hide_form", (PyCFunction)form_hide_form, METH_NOARGS}, {"redraw_form", (PyCFunction)form_redraw_form, METH_NOARGS}, {"set_form_position", (PyCFunction)form_set_form_position, METH_OLDARGS}, {"set_form_size", (PyCFunction)form_set_form_size, METH_OLDARGS}, {"scale_form", (PyCFunction)form_scale_form, METH_OLDARGS}, {"freeze_form", (PyCFunction)form_freeze_form, METH_NOARGS}, {"unfreeze_form", (PyCFunction)form_unfreeze_form, METH_NOARGS}, {"activate_form", (PyCFunction)form_activate_form, METH_NOARGS}, {"deactivate_form", (PyCFunction)form_deactivate_form, METH_NOARGS}, {"bgn_group", (PyCFunction)form_bgn_group, METH_OLDARGS}, {"end_group", (PyCFunction)form_end_group, METH_OLDARGS}, {"find_first", (PyCFunction)form_find_first, METH_OLDARGS}, {"find_last", (PyCFunction)form_find_last, METH_OLDARGS}, {"set_object_focus", (PyCFunction)form_set_object_focus, METH_OLDARGS}, /* basic objects */ {"add_button", (PyCFunction)form_add_button, METH_OLDARGS}, /* {"add_bitmap", (method)form_add_bitmap, METH_OLDARGS}, */ {"add_lightbutton", (PyCFunction)form_add_lightbutton, METH_OLDARGS}, {"add_roundbutton", (PyCFunction)form_add_roundbutton, METH_OLDARGS}, {"add_menu", (PyCFunction)form_add_menu, METH_OLDARGS}, {"add_slider", (PyCFunction)form_add_slider, METH_OLDARGS}, {"add_positioner", (PyCFunction)form_add_positioner, METH_OLDARGS}, {"add_valslider", (PyCFunction)form_add_valslider, METH_OLDARGS}, {"add_dial", (PyCFunction)form_add_dial, METH_OLDARGS}, {"add_counter", (PyCFunction)form_add_counter, METH_OLDARGS}, {"add_box", (PyCFunction)form_add_box, METH_OLDARGS}, {"add_clock", (PyCFunction)form_add_clock, METH_OLDARGS}, {"add_choice", (PyCFunction)form_add_choice, METH_OLDARGS}, {"add_browser", (PyCFunction)form_add_browser, METH_OLDARGS}, {"add_input", (PyCFunction)form_add_input, METH_OLDARGS}, {"add_timer", (PyCFunction)form_add_timer, METH_OLDARGS}, {"add_text", (PyCFunction)form_add_text, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static void form_dealloc(formobject *f) { releaseobjects(f->ob_form); if (f->ob_form->visible) fl_hide_form(f->ob_form); fl_free_form(f->ob_form); PyObject_Del(f); } #define OFF(x) offsetof(FL_FORM, x) static struct memberlist form_memberlist[] = { {"window", T_LONG, OFF(window), RO}, {"w", T_FLOAT, OFF(w)}, {"h", T_FLOAT, OFF(h)}, {"x", T_FLOAT, OFF(x), RO}, {"y", T_FLOAT, OFF(y), RO}, {"deactivated", T_INT, OFF(deactivated)}, {"visible", T_INT, OFF(visible), RO}, {"frozen", T_INT, OFF(frozen), RO}, {"doublebuf", T_INT, OFF(doublebuf)}, {NULL} /* Sentinel */ }; #undef OFF static PyObject * form_getattr(formobject *f, char *name) { PyObject *meth; meth = Py_FindMethod(form_methods, (PyObject *)f, name); if (meth != NULL) return meth; PyErr_Clear(); return PyMember_Get((char *)f->ob_form, form_memberlist, name); } static int form_setattr(formobject *f, char *name, PyObject *v) { if (v == NULL) { PyErr_SetString(PyExc_TypeError, "can't delete form attributes"); return -1; } return PyMember_Set((char *)f->ob_form, form_memberlist, name, v); } static PyObject * form_repr(formobject *f) { char buf[100]; PyOS_snprintf(buf, sizeof(buf), "", f, f->ob_form->window); return PyString_FromString(buf); } static PyTypeObject Formtype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "fl.FORMS_form", /*tp_name*/ sizeof(formobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)form_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)form_getattr, /*tp_getattr*/ (setattrfunc)form_setattr, /*tp_setattr*/ 0, /*tp_compare*/ (reprfunc)form_repr, /*tp_repr*/ }; static PyObject * newformobject(FL_FORM *form) { formobject *f; f = PyObject_New(formobject, &Formtype); if (f == NULL) return NULL; f->ob_form = form; return (PyObject *)f; } /* The "fl" module */ static PyObject * forms_make_form(PyObject *dummy, PyObject *args) { int type; float w, h; FL_FORM *form; if (!PyArg_Parse(args, "(iff)", &type, &w, &h)) return NULL; form = fl_bgn_form(type, w, h); if (form == NULL) { /* XXX Actually, cannot happen! */ PyErr_NoMemory(); return NULL; } fl_end_form(); return newformobject(form); } static PyObject * forms_activate_all_forms(PyObject *f, PyObject *args) { fl_activate_all_forms(); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_deactivate_all_forms(PyObject *f, PyObject *args) { fl_deactivate_all_forms(); Py_INCREF(Py_None); return Py_None; } static PyObject *my_event_callback = NULL; static PyObject * forms_set_event_call_back(PyObject *dummy, PyObject *args) { if (args == Py_None) args = NULL; my_event_callback = args; Py_XINCREF(args); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_do_or_check_forms(PyObject *dummy, FL_OBJECT *(*func)(void)) { FL_OBJECT *generic; genericobject *g; PyObject *arg, *res; for (;;) { Py_BEGIN_ALLOW_THREADS generic = (*func)(); Py_END_ALLOW_THREADS if (generic == NULL) { Py_INCREF(Py_None); return Py_None; } if (generic == FL_EVENT) { int dev; short val; if (my_event_callback == NULL) return PyInt_FromLong(-1L); dev = fl_qread(&val); arg = Py_BuildValue("(ih)", dev, val); if (arg == NULL) return NULL; res = PyEval_CallObject(my_event_callback, arg); Py_XDECREF(res); Py_DECREF(arg); if (res == NULL) return NULL; /* Callback raised exception */ continue; } g = findgeneric(generic); if (g == NULL) { /* Object not known to us (some dialogs cause this) */ continue; /* Ignore it */ } if (g->ob_callback == NULL) { Py_INCREF(g); return ((PyObject *) g); } arg = Py_BuildValue("(OO)", (PyObject *)g, g->ob_callback_arg); if (arg == NULL) return NULL; res = PyEval_CallObject(g->ob_callback, arg); Py_XDECREF(res); Py_DECREF(arg); if (res == NULL) return NULL; /* Callback raised exception */ } } static PyObject * forms_do_forms(PyObject *dummy) { return forms_do_or_check_forms(dummy, fl_do_forms); } static PyObject * forms_check_forms(PyObject *dummy) { return forms_do_or_check_forms(dummy, fl_check_forms); } static PyObject * forms_do_only_forms(PyObject *dummy) { return forms_do_or_check_forms(dummy, fl_do_only_forms); } static PyObject * forms_check_only_forms(PyObject *dummy) { return forms_do_or_check_forms(dummy, fl_check_only_forms); } #ifdef UNUSED static PyObject * fl_call(void (*func)(void)) { (*func)(); Py_INCREF(Py_None); return Py_None; } #endif static PyObject * forms_set_graphics_mode(PyObject *dummy, PyObject *args) { int rgbmode, doublebuf; if (!PyArg_Parse(args, "(ii)", &rgbmode, &doublebuf)) return NULL; fl_set_graphics_mode(rgbmode,doublebuf); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_get_rgbmode(PyObject *dummy, PyObject *args) { extern int fl_rgbmode; if (args != NULL) { PyErr_BadArgument(); return NULL; } return PyInt_FromLong((long)fl_rgbmode); } static PyObject * forms_show_errors(PyObject *dummy, PyObject *args) { int show; if (!PyArg_Parse(args, "i", &show)) return NULL; fl_show_errors(show); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_set_font_name(PyObject *dummy, PyObject *args) { int numb; char *name; if (!PyArg_Parse(args, "(is)", &numb, &name)) return NULL; fl_set_font_name(numb, name); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_qdevice(PyObject *self, PyObject *args) { short arg1; if (!PyArg_Parse(args, "h", &arg1)) return NULL; fl_qdevice(arg1); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_unqdevice(PyObject *self, PyObject *args) { short arg1; if (!PyArg_Parse(args, "h", &arg1)) return NULL; fl_unqdevice(arg1); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_isqueued(PyObject *self, PyObject *args) { long retval; short arg1; if (!PyArg_Parse(args, "h", &arg1)) return NULL; retval = fl_isqueued(arg1); return PyInt_FromLong(retval); } static PyObject * forms_qtest(PyObject *self, PyObject *args) { long retval; retval = fl_qtest(); return PyInt_FromLong(retval); } static PyObject * forms_qread(PyObject *self, PyObject *args) { int dev; short val; Py_BEGIN_ALLOW_THREADS dev = fl_qread(&val); Py_END_ALLOW_THREADS return Py_BuildValue("(ih)", dev, val); } static PyObject * forms_qreset(PyObject *self) { fl_qreset(); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_qenter(PyObject *self, PyObject *args) { short arg1, arg2; if (!PyArg_Parse(args, "(hh)", &arg1, &arg2)) return NULL; fl_qenter(arg1, arg2); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_color(PyObject *self, PyObject *args) { int arg; if (!PyArg_Parse(args, "i", &arg)) return NULL; fl_color((short) arg); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_mapcolor(PyObject *self, PyObject *args) { int arg0, arg1, arg2, arg3; if (!PyArg_Parse(args, "(iiii)", &arg0, &arg1, &arg2, &arg3)) return NULL; fl_mapcolor(arg0, (short) arg1, (short) arg2, (short) arg3); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_getmcolor(PyObject *self, PyObject *args) { int arg; short r, g, b; if (!PyArg_Parse(args, "i", &arg)) return NULL; fl_getmcolor(arg, &r, &g, &b); return Py_BuildValue("(hhh)", r, g, b); } static PyObject * forms_get_mouse(PyObject *self) { float x, y; fl_get_mouse(&x, &y); return Py_BuildValue("(ff)", x, y); } static PyObject * forms_tie(PyObject *self, PyObject *args) { short arg1, arg2, arg3; if (!PyArg_Parse(args, "(hhh)", &arg1, &arg2, &arg3)) return NULL; fl_tie(arg1, arg2, arg3); Py_INCREF(Py_None); return Py_None; } static PyObject * forms_show_message(PyObject *f, PyObject *args) { char *a, *b, *c; if (!PyArg_Parse(args, "(sss)", &a, &b, &c)) return NULL; Py_BEGIN_ALLOW_THREADS fl_show_message(a, b, c); Py_END_ALLOW_THREADS Py_INCREF(Py_None); return Py_None; } static PyObject * forms_show_choice(PyObject *f, PyObject *args) { char *m1, *m2, *m3, *b1, *b2, *b3; int nb; char *format; long rv; if (args == NULL || !PyTuple_Check(args)) { PyErr_BadArgument(); return NULL; } nb = PyTuple_Size(args) - 3; if (nb <= 0) { PyErr_SetString(PyExc_TypeError, "need at least one button label"); return NULL; } if (PyInt_Check(PyTuple_GetItem(args, 3))) { PyErr_SetString(PyExc_TypeError, "'number-of-buttons' argument not needed"); return NULL; } switch (nb) { case 1: format = "(ssss)"; break; case 2: format = "(sssss)"; break; case 3: format = "(ssssss)"; break; default: PyErr_SetString(PyExc_TypeError, "too many button labels"); return NULL; } if (!PyArg_Parse(args, format, &m1, &m2, &m3, &b1, &b2, &b3)) return NULL; Py_BEGIN_ALLOW_THREADS rv = fl_show_choice(m1, m2, m3, nb, b1, b2, b3); Py_END_ALLOW_THREADS return PyInt_FromLong(rv); } static PyObject * forms_show_question(PyObject *f, PyObject *args) { int ret; char *a, *b, *c; if (!PyArg_Parse(args, "(sss)", &a, &b, &c)) return NULL; Py_BEGIN_ALLOW_THREADS ret = fl_show_question(a, b, c); Py_END_ALLOW_THREADS return PyInt_FromLong((long) ret); } static PyObject * forms_show_input(PyObject *f, PyObject *args) { char *str; char *a, *b; if (!PyArg_Parse(args, "(ss)", &a, &b)) return NULL; Py_BEGIN_ALLOW_THREADS str = fl_show_input(a, b); Py_END_ALLOW_THREADS if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString(str); } static PyObject * forms_file_selector(PyObject *f, PyObject *args) { char *str; char *a, *b, *c, *d; if (!PyArg_Parse(args, "(ssss)", &a, &b, &c, &d)) return NULL; Py_BEGIN_ALLOW_THREADS str = fl_show_file_selector(a, b, c, d); Py_END_ALLOW_THREADS if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString(str); } static PyObject * forms_file_selector_func(PyObject *args, char *(*func)(void)) { char *str; str = (*func) (); if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString(str); } static PyObject * forms_get_directory(PyObject *f, PyObject *args) { return forms_file_selector_func(args, fl_get_directory); } static PyObject * forms_get_pattern(PyObject *f, PyObject *args) { return forms_file_selector_func(args, fl_get_pattern); } static PyObject * forms_get_filename(PyObject *f, PyObject *args) { return forms_file_selector_func(args, fl_get_filename); } static PyMethodDef forms_methods[] = { /* adm */ {"make_form", forms_make_form, METH_OLDARGS}, {"activate_all_forms", forms_activate_all_forms, METH_OLDARGS}, {"deactivate_all_forms",forms_deactivate_all_forms, METH_OLDARGS}, /* gl support wrappers */ {"qdevice", forms_qdevice, METH_OLDARGS}, {"unqdevice", forms_unqdevice, METH_OLDARGS}, {"isqueued", forms_isqueued, METH_OLDARGS}, {"qtest", forms_qtest, METH_OLDARGS}, {"qread", forms_qread, METH_OLDARGS}, /* {"blkqread", forms_blkqread, METH_OLDARGS}, */ {"qreset", forms_qreset, METH_NOARGS}, {"qenter", forms_qenter, METH_OLDARGS}, {"get_mouse", forms_get_mouse, METH_NOARGS}, {"tie", forms_tie, METH_OLDARGS}, /* {"new_events", forms_new_events, METH_OLDARGS}, */ {"color", forms_color, METH_OLDARGS}, {"mapcolor", forms_mapcolor, METH_OLDARGS}, {"getmcolor", forms_getmcolor, METH_OLDARGS}, /* interaction */ {"do_forms", forms_do_forms, METH_NOARGS}, {"do_only_forms", forms_do_only_forms, METH_NOARGS}, {"check_forms", forms_check_forms, METH_NOARGS}, {"check_only_forms", forms_check_only_forms, METH_NOARGS}, {"set_event_call_back", forms_set_event_call_back, METH_OLDARGS}, /* goodies */ {"show_message", forms_show_message, METH_OLDARGS}, {"show_question", forms_show_question, METH_OLDARGS}, {"show_choice", forms_show_choice, METH_OLDARGS}, {"show_input", forms_show_input, METH_OLDARGS}, {"show_file_selector", forms_file_selector, METH_OLDARGS}, {"file_selector", forms_file_selector, METH_OLDARGS}, /* BW compat */ {"get_directory", forms_get_directory, METH_OLDARGS}, {"get_pattern", forms_get_pattern, METH_OLDARGS}, {"get_filename", forms_get_filename, METH_OLDARGS}, {"set_graphics_mode", forms_set_graphics_mode, METH_OLDARGS}, {"get_rgbmode", forms_get_rgbmode, METH_OLDARGS}, {"show_errors", forms_show_errors, METH_OLDARGS}, {"set_font_name", forms_set_font_name, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initfl(void) { Py_InitModule("fl", forms_methods); foreground(); fl_init(); } Python-2.3.7/Modules/ld_so_aix0000755001241000117560000001351506403131452015552 0ustar loewishpifb6#!/bin/sh # # ======================================================================== # FILE: ld_so_aix # TYPE: executable, uses makexp_aix # SYSTEM: AIX # # DESCRIPTION: Creates a shareable .o from a set of pre-compiled # (unshared) .o files # # USAGE: ld_so_aix [CC] [arguments] # # ARGUMENTS: Same as for "ld". The following arguments are processed # or supplied by this script (those marked with an asterisk # can be overriden from command line): # # Argument Default value # (*) -o [OutputFileName] -o shr.o # (*) -e [EntryPointLabel] -e init[OutputBaseName] # (*) -bE:[ExportFile] -bE:[OutputBaseName].exp # (*) -bI:[ImportFile] -bI:./python.exp # -bM:[ModuleType] -bM:SRE # -bhalt:[Number] -bhalt:4 # -T[Number] -T512 # -H[Number] -H512 # -lm # # The compiler specific ("-lc" or "-lc_r", "-lpthreads",...) # arguments will be automatically passed to "ld" according # to the CC command provided as a first argument to this # script. Usually, the same CC command was used to produce # the pre-compiled .o file(s). # # NOTES: 1. Since "ld_so_aix" was originally written for building # shared modules for the Python interpreter, the -e and # -bI default values match Python's conventions. In # Python, the entry point for a shared module is based # on the module's name (e.g., the "mathmodule" will # expect an entry point of "initmath"). # 2. The script accepts multiple .o or .a input files and # creates a single (shared) output file. The export list # that is created is based on the output file's basename # with the suffix ".exp". # 3. The resulting shared object file is left in the # current directory. # 4. Uncommenting the "echo" lines gives detailed output # about the commands executed in the script. # # # HISTORY: Oct-1996 -- Support added for multiple .o files -- # -- and optional arguments processing. -- # Chris Myers (myers@tc.cornell.edu), Keith Kwok # (kkwok@tc.cornell.edu) and Vladimir Marangozov # # Aug-6-1996 -- Take care of the compiler specific -- # -- args by leaving CC to invoke "ld". -- # Vladimir Marangozov # # Jul-1-1996 -- Make sure to use /usr/ccs/bin/ld -- # -- Use makexp_aix for the export list. -- # Vladimir Marangozov (Vladimir.Marangozov@imag.fr) # # Manus Hand (mhand@csn.net) -- Initial code -- 6/24/96 # ======================================================================== # usage="Usage: ld_so_aix [CC command] [ld arguments]" if test ! -n "$*"; then echo $usage; exit 2 fi makexp=`dirname $0`/makexp_aix # Check for existence of compiler. CC=$1; shift whichcc=`which $CC` if test ! -x "$whichcc"; then echo "ld_so_aix: Compiler '$CC' not found; exiting." exit 2 fi if test ! -n "$*"; then echo $usage; exit 2 fi # Default import file for Python # Can be overriden by providing a -bI: argument. impfile="./python.exp" # Parse arguments while test -n "$1" do case "$1" in -e | -Wl,-e) if test -z "$2"; then echo "ld_so_aix: The -e flag needs a parameter; exiting."; exit 2 else shift; entry=$1 fi ;; -e* | -Wl,-e*) entry=`echo $1 | sed -e "s/-Wl,//" -e "s/-e//"` ;; -o) if test -z "$2"; then echo "ld_so_aix: The -o flag needs a parameter; exiting."; exit 2 else shift; objfile=$1 fi ;; -o*) objfile=`echo $1 | sed "s/-o//"` ;; -bI:* | -Wl,-bI:*) impfile=`echo $1 | sed -e "s/-Wl,//" -e "s/-bI://"` ;; -bE:* | -Wl,-bE:*) expfile=`echo $1 | sed -e "s/-Wl,//" -e "s/-bE://"` ;; *.o | *.a) objs="$objs $1" args="$args $1" ;; -bM:* | -Wl,-bM:* | -H* | -Wl,-H* | -T* | -Wl,-T* | -lm) ;; *) args="$args $1" ;; esac shift done if test -z "$objs"; then echo "ld_so_aix: No input files; exiting." exit 2 elif test ! -r "$impfile"; then echo "ld_so_aix: Import file '$impfile' not found or not readable; exiting." exit 2 fi # If -o wasn't specified, assume "-o shr.o" if test -z "$objfile"; then objfile=shr.o fi filename=`basename $objfile | sed "s/\.[^.]*$//"` # If -bE: wasn't specified, assume "-bE:$filename.exp" if test -z "$expfile"; then expfile="$filename.exp" fi # Default entry symbol for Python modules = init[modulename] # Can be overriden by providing a -e argument. if test -z "$entry"; then entry=init`echo $filename | sed "s/module.*//"` fi #echo "ld_so_aix: Debug info section" #echo " -> output file : $objfile" #echo " -> import file : $impfile" #echo " -> export file : $expfile" #echo " -> entry point : $entry" #echo " -> object files: $objs" #echo " -> CC arguments: $args" CCOPT="-Wl,-e$entry -Wl,-bE:$expfile -Wl,-bI:$impfile -Wl,-bhalt:4" CCOPT="$CCOPT -Wl,-bM:SRE -Wl,-T512 -Wl,-H512 -lm -o $objfile" CCARGS="$args" # Export list generation. #echo $makexp $expfile "$objfile" $objs $makexp $expfile "$objfile" $objs # Perform the link. #echo $CC $CCOPT $CCARGS $CC $CCOPT $CCARGS # Delete the module's export list file. # Comment this line if you need it. rm -f $expfile Python-2.3.7/Modules/pyexpat.c0000644001241000117560000016603207707020543015532 0ustar loewishpifb6#include "Python.h" #include #include "compile.h" #include "frameobject.h" #include "expat.h" #define XML_COMBINED_VERSION (10000*XML_MAJOR_VERSION+100*XML_MINOR_VERSION+XML_MICRO_VERSION) #ifndef PyDoc_STRVAR /* * fdrake says: * Don't change the PyDoc_STR macro definition to (str), because * '''the parentheses cause compile failures * ("non-constant static initializer" or something like that) * on some platforms (Irix?)''' */ #define PyDoc_STR(str) str #define PyDoc_VAR(name) static char name[] #define PyDoc_STRVAR(name,str) PyDoc_VAR(name) = PyDoc_STR(str) #endif #if (PY_MAJOR_VERSION == 2 && PY_MINOR_VERSION < 2) /* In Python 2.0 and 2.1, disabling Unicode was not possible. */ #define Py_USING_UNICODE #else #define FIX_TRACE #endif enum HandlerTypes { StartElement, EndElement, ProcessingInstruction, CharacterData, UnparsedEntityDecl, NotationDecl, StartNamespaceDecl, EndNamespaceDecl, Comment, StartCdataSection, EndCdataSection, Default, DefaultHandlerExpand, NotStandalone, ExternalEntityRef, StartDoctypeDecl, EndDoctypeDecl, EntityDecl, XmlDecl, ElementDecl, AttlistDecl, #if XML_COMBINED_VERSION >= 19504 SkippedEntity, #endif _DummyDecl }; static PyObject *ErrorObject; /* ----------------------------------------------------- */ /* Declarations for objects of type xmlparser */ typedef struct { PyObject_HEAD XML_Parser itself; int returns_unicode; /* True if Unicode strings are returned; if false, UTF-8 strings are returned */ int ordered_attributes; /* Return attributes as a list. */ int specified_attributes; /* Report only specified attributes. */ int in_callback; /* Is a callback active? */ int ns_prefixes; /* Namespace-triplets mode? */ XML_Char *buffer; /* Buffer used when accumulating characters */ /* NULL if not enabled */ int buffer_size; /* Size of buffer, in XML_Char units */ int buffer_used; /* Buffer units in use */ PyObject *intern; /* Dictionary to intern strings */ PyObject **handlers; } xmlparseobject; #define CHARACTER_DATA_BUFFER_SIZE 8192 static PyTypeObject Xmlparsetype; typedef void (*xmlhandlersetter)(XML_Parser self, void *meth); typedef void* xmlhandler; struct HandlerInfo { const char *name; xmlhandlersetter setter; xmlhandler handler; PyCodeObject *tb_code; PyObject *nameobj; }; static struct HandlerInfo handler_info[64]; /* Set an integer attribute on the error object; return true on success, * false on an exception. */ static int set_error_attr(PyObject *err, char *name, int value) { PyObject *v = PyInt_FromLong(value); if (v != NULL && PyObject_SetAttrString(err, name, v) == -1) { Py_DECREF(v); return 0; } return 1; } /* Build and set an Expat exception, including positioning * information. Always returns NULL. */ static PyObject * set_error(xmlparseobject *self, enum XML_Error code) { PyObject *err; char buffer[256]; XML_Parser parser = self->itself; int lineno = XML_GetErrorLineNumber(parser); int column = XML_GetErrorColumnNumber(parser); /* There is no risk of overflowing this buffer, since even for 64-bit integers, there is sufficient space. */ sprintf(buffer, "%.200s: line %i, column %i", XML_ErrorString(code), lineno, column); err = PyObject_CallFunction(ErrorObject, "s", buffer); if ( err != NULL && set_error_attr(err, "code", code) && set_error_attr(err, "offset", column) && set_error_attr(err, "lineno", lineno)) { PyErr_SetObject(ErrorObject, err); } return NULL; } static int have_handler(xmlparseobject *self, int type) { PyObject *handler = self->handlers[type]; return handler != NULL; } static PyObject * get_handler_name(struct HandlerInfo *hinfo) { PyObject *name = hinfo->nameobj; if (name == NULL) { name = PyString_FromString(hinfo->name); hinfo->nameobj = name; } Py_XINCREF(name); return name; } #ifdef Py_USING_UNICODE /* Convert a string of XML_Chars into a Unicode string. Returns None if str is a null pointer. */ static PyObject * conv_string_to_unicode(const XML_Char *str) { /* XXX currently this code assumes that XML_Char is 8-bit, and hence in UTF-8. */ /* UTF-8 from Expat, Unicode desired */ if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyUnicode_DecodeUTF8(str, strlen(str), "strict"); } static PyObject * conv_string_len_to_unicode(const XML_Char *str, int len) { /* XXX currently this code assumes that XML_Char is 8-bit, and hence in UTF-8. */ /* UTF-8 from Expat, Unicode desired */ if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyUnicode_DecodeUTF8((const char *)str, len, "strict"); } #endif /* Convert a string of XML_Chars into an 8-bit Python string. Returns None if str is a null pointer. */ static PyObject * conv_string_to_utf8(const XML_Char *str) { /* XXX currently this code assumes that XML_Char is 8-bit, and hence in UTF-8. */ /* UTF-8 from Expat, UTF-8 desired */ if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromString(str); } static PyObject * conv_string_len_to_utf8(const XML_Char *str, int len) { /* XXX currently this code assumes that XML_Char is 8-bit, and hence in UTF-8. */ /* UTF-8 from Expat, UTF-8 desired */ if (str == NULL) { Py_INCREF(Py_None); return Py_None; } return PyString_FromStringAndSize((const char *)str, len); } /* Callback routines */ static void clear_handlers(xmlparseobject *self, int initial); /* This handler is used when an error has been detected, in the hope that actual parsing can be terminated early. This will only help if an external entity reference is encountered. */ static int error_external_entity_ref_handler(XML_Parser parser, const XML_Char *context, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId) { return 0; } static void flag_error(xmlparseobject *self) { clear_handlers(self, 0); XML_SetExternalEntityRefHandler(self->itself, error_external_entity_ref_handler); } static PyCodeObject* getcode(enum HandlerTypes slot, char* func_name, int lineno) { PyObject *code = NULL; PyObject *name = NULL; PyObject *nulltuple = NULL; PyObject *filename = NULL; if (handler_info[slot].tb_code == NULL) { code = PyString_FromString(""); if (code == NULL) goto failed; name = PyString_FromString(func_name); if (name == NULL) goto failed; nulltuple = PyTuple_New(0); if (nulltuple == NULL) goto failed; filename = PyString_FromString(__FILE__); handler_info[slot].tb_code = PyCode_New(0, /* argcount */ 0, /* nlocals */ 0, /* stacksize */ 0, /* flags */ code, /* code */ nulltuple, /* consts */ nulltuple, /* names */ nulltuple, /* varnames */ #if PYTHON_API_VERSION >= 1010 nulltuple, /* freevars */ nulltuple, /* cellvars */ #endif filename, /* filename */ name, /* name */ lineno, /* firstlineno */ code /* lnotab */ ); if (handler_info[slot].tb_code == NULL) goto failed; Py_DECREF(code); Py_DECREF(nulltuple); Py_DECREF(filename); Py_DECREF(name); } return handler_info[slot].tb_code; failed: Py_XDECREF(code); Py_XDECREF(name); return NULL; } #ifdef FIX_TRACE static int trace_frame(PyThreadState *tstate, PyFrameObject *f, int code, PyObject *val) { int result = 0; if (!tstate->use_tracing || tstate->tracing) return 0; if (tstate->c_profilefunc != NULL) { tstate->tracing++; result = tstate->c_profilefunc(tstate->c_profileobj, f, code , val); tstate->use_tracing = ((tstate->c_tracefunc != NULL) || (tstate->c_profilefunc != NULL)); tstate->tracing--; if (result) return result; } if (tstate->c_tracefunc != NULL) { tstate->tracing++; result = tstate->c_tracefunc(tstate->c_traceobj, f, code , val); tstate->use_tracing = ((tstate->c_tracefunc != NULL) || (tstate->c_profilefunc != NULL)); tstate->tracing--; } return result; } static int trace_frame_exc(PyThreadState *tstate, PyFrameObject *f) { PyObject *type, *value, *traceback, *arg; int err; if (tstate->c_tracefunc == NULL) return 0; PyErr_Fetch(&type, &value, &traceback); if (value == NULL) { value = Py_None; Py_INCREF(value); } arg = Py_BuildValue("(OOO)", type, value, traceback); if (arg == NULL) { PyErr_Restore(type, value, traceback); return 0; } err = trace_frame(tstate, f, PyTrace_EXCEPTION, arg); Py_DECREF(arg); if (err == 0) PyErr_Restore(type, value, traceback); else { Py_XDECREF(type); Py_XDECREF(value); Py_XDECREF(traceback); } return err; } #endif static PyObject* call_with_frame(PyCodeObject *c, PyObject* func, PyObject* args) { PyThreadState *tstate = PyThreadState_GET(); PyFrameObject *f; PyObject *res; if (c == NULL) return NULL; f = PyFrame_New(tstate, c, PyEval_GetGlobals(), NULL); if (f == NULL) return NULL; tstate->frame = f; #ifdef FIX_TRACE if (trace_frame(tstate, f, PyTrace_CALL, Py_None) < 0) { return NULL; } #endif res = PyEval_CallObject(func, args); if (res == NULL) { if (tstate->curexc_traceback == NULL) PyTraceBack_Here(f); #ifdef FIX_TRACE if (trace_frame_exc(tstate, f) < 0) { return NULL; } } else { if (trace_frame(tstate, f, PyTrace_RETURN, res) < 0) { Py_XDECREF(res); res = NULL; } } #else } #endif tstate->frame = f->f_back; Py_DECREF(f); return res; } #ifndef Py_USING_UNICODE #define STRING_CONV_FUNC conv_string_to_utf8 #else /* Python 2.0 and later versions, when built with Unicode support */ #define STRING_CONV_FUNC (self->returns_unicode \ ? conv_string_to_unicode : conv_string_to_utf8) #endif static PyObject* string_intern(xmlparseobject *self, const char* str) { PyObject *result = STRING_CONV_FUNC(str); PyObject *value; if (!self->intern) return result; value = PyDict_GetItem(self->intern, result); if (!value) { if (PyDict_SetItem(self->intern, result, result) == 0) return result; else return NULL; } Py_INCREF(value); Py_DECREF(result); return value; } /* Return 0 on success, -1 on exception. * flag_error() will be called before return if needed. */ static int call_character_handler(xmlparseobject *self, const XML_Char *buffer, int len) { PyObject *args; PyObject *temp; args = PyTuple_New(1); if (args == NULL) return -1; #ifdef Py_USING_UNICODE temp = (self->returns_unicode ? conv_string_len_to_unicode(buffer, len) : conv_string_len_to_utf8(buffer, len)); #else temp = conv_string_len_to_utf8(buffer, len); #endif if (temp == NULL) { Py_DECREF(args); flag_error(self); return -1; } PyTuple_SET_ITEM(args, 0, temp); /* temp is now a borrowed reference; consider it unused. */ self->in_callback = 1; temp = call_with_frame(getcode(CharacterData, "CharacterData", __LINE__), self->handlers[CharacterData], args); /* temp is an owned reference again, or NULL */ self->in_callback = 0; Py_DECREF(args); if (temp == NULL) { flag_error(self); return -1; } Py_DECREF(temp); return 0; } static int flush_character_buffer(xmlparseobject *self) { int rc; if (self->buffer == NULL || self->buffer_used == 0) return 0; rc = call_character_handler(self, self->buffer, self->buffer_used); self->buffer_used = 0; return rc; } static void my_CharacterDataHandler(void *userData, const XML_Char *data, int len) { xmlparseobject *self = (xmlparseobject *) userData; if (self->buffer == NULL) call_character_handler(self, data, len); else { if ((self->buffer_used + len) > self->buffer_size) { if (flush_character_buffer(self) < 0) return; /* handler might have changed; drop the rest on the floor * if there isn't a handler anymore */ if (!have_handler(self, CharacterData)) return; } if (len > self->buffer_size) { call_character_handler(self, data, len); self->buffer_used = 0; } else { memcpy(self->buffer + self->buffer_used, data, len * sizeof(XML_Char)); self->buffer_used += len; } } } static void my_StartElementHandler(void *userData, const XML_Char *name, const XML_Char *atts[]) { xmlparseobject *self = (xmlparseobject *)userData; if (have_handler(self, StartElement)) { PyObject *container, *rv, *args; int i, max; if (flush_character_buffer(self) < 0) return; /* Set max to the number of slots filled in atts[]; max/2 is * the number of attributes we need to process. */ if (self->specified_attributes) { max = XML_GetSpecifiedAttributeCount(self->itself); } else { max = 0; while (atts[max] != NULL) max += 2; } /* Build the container. */ if (self->ordered_attributes) container = PyList_New(max); else container = PyDict_New(); if (container == NULL) { flag_error(self); return; } for (i = 0; i < max; i += 2) { PyObject *n = string_intern(self, (XML_Char *) atts[i]); PyObject *v; if (n == NULL) { flag_error(self); Py_DECREF(container); return; } v = STRING_CONV_FUNC((XML_Char *) atts[i+1]); if (v == NULL) { flag_error(self); Py_DECREF(container); Py_DECREF(n); return; } if (self->ordered_attributes) { PyList_SET_ITEM(container, i, n); PyList_SET_ITEM(container, i+1, v); } else if (PyDict_SetItem(container, n, v)) { flag_error(self); Py_DECREF(n); Py_DECREF(v); return; } else { Py_DECREF(n); Py_DECREF(v); } } args = Py_BuildValue("(NN)", string_intern(self, name), container); if (args == NULL) { Py_DECREF(container); return; } /* Container is now a borrowed reference; ignore it. */ self->in_callback = 1; rv = call_with_frame(getcode(StartElement, "StartElement", __LINE__), self->handlers[StartElement], args); self->in_callback = 0; Py_DECREF(args); if (rv == NULL) { flag_error(self); return; } Py_DECREF(rv); } } #define RC_HANDLER(RC, NAME, PARAMS, INIT, PARAM_FORMAT, CONVERSION, \ RETURN, GETUSERDATA) \ static RC \ my_##NAME##Handler PARAMS {\ xmlparseobject *self = GETUSERDATA ; \ PyObject *args = NULL; \ PyObject *rv = NULL; \ INIT \ \ if (have_handler(self, NAME)) { \ if (flush_character_buffer(self) < 0) \ return RETURN; \ args = Py_BuildValue PARAM_FORMAT ;\ if (!args) { flag_error(self); return RETURN;} \ self->in_callback = 1; \ rv = call_with_frame(getcode(NAME,#NAME,__LINE__), \ self->handlers[NAME], args); \ self->in_callback = 0; \ Py_DECREF(args); \ if (rv == NULL) { \ flag_error(self); \ return RETURN; \ } \ CONVERSION \ Py_DECREF(rv); \ } \ return RETURN; \ } #define VOID_HANDLER(NAME, PARAMS, PARAM_FORMAT) \ RC_HANDLER(void, NAME, PARAMS, ;, PARAM_FORMAT, ;, ;,\ (xmlparseobject *)userData) #define INT_HANDLER(NAME, PARAMS, PARAM_FORMAT)\ RC_HANDLER(int, NAME, PARAMS, int rc=0;, PARAM_FORMAT, \ rc = PyInt_AsLong(rv);, rc, \ (xmlparseobject *)userData) VOID_HANDLER(EndElement, (void *userData, const XML_Char *name), ("(N)", string_intern(self, name))) VOID_HANDLER(ProcessingInstruction, (void *userData, const XML_Char *target, const XML_Char *data), ("(NO&)", string_intern(self, target), STRING_CONV_FUNC,data)) VOID_HANDLER(UnparsedEntityDecl, (void *userData, const XML_Char *entityName, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId, const XML_Char *notationName), ("(NNNNN)", string_intern(self, entityName), string_intern(self, base), string_intern(self, systemId), string_intern(self, publicId), string_intern(self, notationName))) #ifndef Py_USING_UNICODE VOID_HANDLER(EntityDecl, (void *userData, const XML_Char *entityName, int is_parameter_entity, const XML_Char *value, int value_length, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId, const XML_Char *notationName), ("NiNNNNN", string_intern(self, entityName), is_parameter_entity, conv_string_len_to_utf8(value, value_length), string_intern(self, base), string_intern(self, systemId), string_intern(self, publicId), string_intern(self, notationName))) #else VOID_HANDLER(EntityDecl, (void *userData, const XML_Char *entityName, int is_parameter_entity, const XML_Char *value, int value_length, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId, const XML_Char *notationName), ("NiNNNNN", string_intern(self, entityName), is_parameter_entity, (self->returns_unicode ? conv_string_len_to_unicode(value, value_length) : conv_string_len_to_utf8(value, value_length)), string_intern(self, base), string_intern(self, systemId), string_intern(self, publicId), string_intern(self, notationName))) #endif VOID_HANDLER(XmlDecl, (void *userData, const XML_Char *version, const XML_Char *encoding, int standalone), ("(O&O&i)", STRING_CONV_FUNC,version, STRING_CONV_FUNC,encoding, standalone)) static PyObject * conv_content_model(XML_Content * const model, PyObject *(*conv_string)(const XML_Char *)) { PyObject *result = NULL; PyObject *children = PyTuple_New(model->numchildren); int i; if (children != NULL) { assert(model->numchildren < INT_MAX); for (i = 0; i < (int)model->numchildren; ++i) { PyObject *child = conv_content_model(&model->children[i], conv_string); if (child == NULL) { Py_XDECREF(children); return NULL; } PyTuple_SET_ITEM(children, i, child); } result = Py_BuildValue("(iiO&N)", model->type, model->quant, conv_string,model->name, children); } return result; } static void my_ElementDeclHandler(void *userData, const XML_Char *name, XML_Content *model) { xmlparseobject *self = (xmlparseobject *)userData; PyObject *args = NULL; if (have_handler(self, ElementDecl)) { PyObject *rv = NULL; PyObject *modelobj, *nameobj; if (flush_character_buffer(self) < 0) goto finally; #ifdef Py_USING_UNICODE modelobj = conv_content_model(model, (self->returns_unicode ? conv_string_to_unicode : conv_string_to_utf8)); #else modelobj = conv_content_model(model, conv_string_to_utf8); #endif if (modelobj == NULL) { flag_error(self); goto finally; } nameobj = string_intern(self, name); if (nameobj == NULL) { Py_DECREF(modelobj); flag_error(self); goto finally; } args = Py_BuildValue("NN", string_intern(self, name), modelobj); if (args == NULL) { Py_DECREF(modelobj); flag_error(self); goto finally; } self->in_callback = 1; rv = call_with_frame(getcode(ElementDecl, "ElementDecl", __LINE__), self->handlers[ElementDecl], args); self->in_callback = 0; if (rv == NULL) { flag_error(self); goto finally; } Py_DECREF(rv); } finally: Py_XDECREF(args); XML_FreeContentModel(self->itself, model); return; } VOID_HANDLER(AttlistDecl, (void *userData, const XML_Char *elname, const XML_Char *attname, const XML_Char *att_type, const XML_Char *dflt, int isrequired), ("(NNO&O&i)", string_intern(self, elname), string_intern(self, attname), STRING_CONV_FUNC,att_type, STRING_CONV_FUNC,dflt, isrequired)) #if XML_COMBINED_VERSION >= 19504 VOID_HANDLER(SkippedEntity, (void *userData, const XML_Char *entityName, int is_parameter_entity), ("Ni", string_intern(self, entityName), is_parameter_entity)) #endif VOID_HANDLER(NotationDecl, (void *userData, const XML_Char *notationName, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId), ("(NNNN)", string_intern(self, notationName), string_intern(self, base), string_intern(self, systemId), string_intern(self, publicId))) VOID_HANDLER(StartNamespaceDecl, (void *userData, const XML_Char *prefix, const XML_Char *uri), ("(NN)", string_intern(self, prefix), string_intern(self, uri))) VOID_HANDLER(EndNamespaceDecl, (void *userData, const XML_Char *prefix), ("(N)", string_intern(self, prefix))) VOID_HANDLER(Comment, (void *userData, const XML_Char *data), ("(O&)", STRING_CONV_FUNC,data)) VOID_HANDLER(StartCdataSection, (void *userData), ("()")) VOID_HANDLER(EndCdataSection, (void *userData), ("()")) #ifndef Py_USING_UNICODE VOID_HANDLER(Default, (void *userData, const XML_Char *s, int len), ("(N)", conv_string_len_to_utf8(s,len))) VOID_HANDLER(DefaultHandlerExpand, (void *userData, const XML_Char *s, int len), ("(N)", conv_string_len_to_utf8(s,len))) #else VOID_HANDLER(Default, (void *userData, const XML_Char *s, int len), ("(N)", (self->returns_unicode ? conv_string_len_to_unicode(s,len) : conv_string_len_to_utf8(s,len)))) VOID_HANDLER(DefaultHandlerExpand, (void *userData, const XML_Char *s, int len), ("(N)", (self->returns_unicode ? conv_string_len_to_unicode(s,len) : conv_string_len_to_utf8(s,len)))) #endif INT_HANDLER(NotStandalone, (void *userData), ("()")) RC_HANDLER(int, ExternalEntityRef, (XML_Parser parser, const XML_Char *context, const XML_Char *base, const XML_Char *systemId, const XML_Char *publicId), int rc=0;, ("(O&NNN)", STRING_CONV_FUNC,context, string_intern(self, base), string_intern(self, systemId), string_intern(self, publicId)), rc = PyInt_AsLong(rv);, rc, XML_GetUserData(parser)) /* XXX UnknownEncodingHandler */ VOID_HANDLER(StartDoctypeDecl, (void *userData, const XML_Char *doctypeName, const XML_Char *sysid, const XML_Char *pubid, int has_internal_subset), ("(NNNi)", string_intern(self, doctypeName), string_intern(self, sysid), string_intern(self, pubid), has_internal_subset)) VOID_HANDLER(EndDoctypeDecl, (void *userData), ("()")) /* ---------------------------------------------------------------- */ static PyObject * get_parse_result(xmlparseobject *self, int rv) { if (PyErr_Occurred()) { return NULL; } if (rv == 0) { return set_error(self, XML_GetErrorCode(self->itself)); } if (flush_character_buffer(self) < 0) { return NULL; } return PyInt_FromLong(rv); } PyDoc_STRVAR(xmlparse_Parse__doc__, "Parse(data[, isfinal])\n\ Parse XML data. `isfinal' should be true at end of input."); static PyObject * xmlparse_Parse(xmlparseobject *self, PyObject *args) { char *s; int slen; int isFinal = 0; if (!PyArg_ParseTuple(args, "s#|i:Parse", &s, &slen, &isFinal)) return NULL; return get_parse_result(self, XML_Parse(self->itself, s, slen, isFinal)); } /* File reading copied from cPickle */ #define BUF_SIZE 2048 static int readinst(char *buf, int buf_size, PyObject *meth) { PyObject *arg = NULL; PyObject *bytes = NULL; PyObject *str = NULL; int len = -1; if ((bytes = PyInt_FromLong(buf_size)) == NULL) goto finally; if ((arg = PyTuple_New(1)) == NULL) { Py_DECREF(bytes); goto finally; } PyTuple_SET_ITEM(arg, 0, bytes); if ((str = PyObject_Call(meth, arg, NULL)) == NULL) goto finally; /* XXX what to do if it returns a Unicode string? */ if (!PyString_Check(str)) { PyErr_Format(PyExc_TypeError, "read() did not return a string object (type=%.400s)", str->ob_type->tp_name); goto finally; } len = PyString_GET_SIZE(str); if (len > buf_size) { PyErr_Format(PyExc_ValueError, "read() returned too much data: " "%i bytes requested, %i returned", buf_size, len); goto finally; } memcpy(buf, PyString_AsString(str), len); finally: Py_XDECREF(arg); Py_XDECREF(str); return len; } PyDoc_STRVAR(xmlparse_ParseFile__doc__, "ParseFile(file)\n\ Parse XML data from file-like object."); static PyObject * xmlparse_ParseFile(xmlparseobject *self, PyObject *args) { int rv = 1; PyObject *f; FILE *fp; PyObject *readmethod = NULL; if (!PyArg_ParseTuple(args, "O:ParseFile", &f)) return NULL; if (PyFile_Check(f)) { fp = PyFile_AsFile(f); } else{ fp = NULL; readmethod = PyObject_GetAttrString(f, "read"); if (readmethod == NULL) { PyErr_Clear(); PyErr_SetString(PyExc_TypeError, "argument must have 'read' attribute"); return NULL; } } for (;;) { int bytes_read; void *buf = XML_GetBuffer(self->itself, BUF_SIZE); if (buf == NULL) { Py_XDECREF(readmethod); return PyErr_NoMemory(); } if (fp) { bytes_read = fread(buf, sizeof(char), BUF_SIZE, fp); if (bytes_read < 0) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } } else { bytes_read = readinst(buf, BUF_SIZE, readmethod); if (bytes_read < 0) { Py_DECREF(readmethod); return NULL; } } rv = XML_ParseBuffer(self->itself, bytes_read, bytes_read == 0); if (PyErr_Occurred()) { Py_XDECREF(readmethod); return NULL; } if (!rv || bytes_read == 0) break; } Py_XDECREF(readmethod); return get_parse_result(self, rv); } PyDoc_STRVAR(xmlparse_SetBase__doc__, "SetBase(base_url)\n\ Set the base URL for the parser."); static PyObject * xmlparse_SetBase(xmlparseobject *self, PyObject *args) { char *base; if (!PyArg_ParseTuple(args, "s:SetBase", &base)) return NULL; if (!XML_SetBase(self->itself, base)) { return PyErr_NoMemory(); } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(xmlparse_GetBase__doc__, "GetBase() -> url\n\ Return base URL string for the parser."); static PyObject * xmlparse_GetBase(xmlparseobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":GetBase")) return NULL; return Py_BuildValue("z", XML_GetBase(self->itself)); } PyDoc_STRVAR(xmlparse_GetInputContext__doc__, "GetInputContext() -> string\n\ Return the untranslated text of the input that caused the current event.\n\ If the event was generated by a large amount of text (such as a start tag\n\ for an element with many attributes), not all of the text may be available."); static PyObject * xmlparse_GetInputContext(xmlparseobject *self, PyObject *args) { PyObject *result = NULL; if (PyArg_ParseTuple(args, ":GetInputContext")) { if (self->in_callback) { int offset, size; const char *buffer = XML_GetInputContext(self->itself, &offset, &size); if (buffer != NULL) result = PyString_FromStringAndSize(buffer + offset, size); else { result = Py_None; Py_INCREF(result); } } else { result = Py_None; Py_INCREF(result); } } return result; } PyDoc_STRVAR(xmlparse_ExternalEntityParserCreate__doc__, "ExternalEntityParserCreate(context[, encoding])\n\ Create a parser for parsing an external entity based on the\n\ information passed to the ExternalEntityRefHandler."); static PyObject * xmlparse_ExternalEntityParserCreate(xmlparseobject *self, PyObject *args) { char *context; char *encoding = NULL; xmlparseobject *new_parser; int i; if (!PyArg_ParseTuple(args, "z|s:ExternalEntityParserCreate", &context, &encoding)) { return NULL; } #ifndef Py_TPFLAGS_HAVE_GC /* Python versions 2.0 and 2.1 */ new_parser = PyObject_New(xmlparseobject, &Xmlparsetype); #else /* Python versions 2.2 and later */ new_parser = PyObject_GC_New(xmlparseobject, &Xmlparsetype); #endif if (new_parser == NULL) return NULL; new_parser->buffer_size = self->buffer_size; new_parser->buffer_used = 0; if (self->buffer != NULL) { new_parser->buffer = malloc(new_parser->buffer_size); if (new_parser->buffer == NULL) { #ifndef Py_TPFLAGS_HAVE_GC /* Code for versions 2.0 and 2.1 */ PyObject_Del(new_parser); #else /* Code for versions 2.2 and later. */ PyObject_GC_Del(new_parser); #endif return PyErr_NoMemory(); } } else new_parser->buffer = NULL; new_parser->returns_unicode = self->returns_unicode; new_parser->ordered_attributes = self->ordered_attributes; new_parser->specified_attributes = self->specified_attributes; new_parser->in_callback = 0; new_parser->ns_prefixes = self->ns_prefixes; new_parser->itself = XML_ExternalEntityParserCreate(self->itself, context, encoding); new_parser->handlers = 0; new_parser->intern = self->intern; Py_XINCREF(new_parser->intern); #ifdef Py_TPFLAGS_HAVE_GC PyObject_GC_Track(new_parser); #else PyObject_GC_Init(new_parser); #endif if (!new_parser->itself) { Py_DECREF(new_parser); return PyErr_NoMemory(); } XML_SetUserData(new_parser->itself, (void *)new_parser); /* allocate and clear handlers first */ for (i = 0; handler_info[i].name != NULL; i++) /* do nothing */; new_parser->handlers = malloc(sizeof(PyObject *) * i); if (!new_parser->handlers) { Py_DECREF(new_parser); return PyErr_NoMemory(); } clear_handlers(new_parser, 1); /* then copy handlers from self */ for (i = 0; handler_info[i].name != NULL; i++) { PyObject *handler = self->handlers[i]; if (handler != NULL) { Py_INCREF(handler); new_parser->handlers[i] = handler; handler_info[i].setter(new_parser->itself, handler_info[i].handler); } } return (PyObject *)new_parser; } PyDoc_STRVAR(xmlparse_SetParamEntityParsing__doc__, "SetParamEntityParsing(flag) -> success\n\ Controls parsing of parameter entities (including the external DTD\n\ subset). Possible flag values are XML_PARAM_ENTITY_PARSING_NEVER,\n\ XML_PARAM_ENTITY_PARSING_UNLESS_STANDALONE and\n\ XML_PARAM_ENTITY_PARSING_ALWAYS. Returns true if setting the flag\n\ was successful."); static PyObject* xmlparse_SetParamEntityParsing(xmlparseobject *p, PyObject* args) { int flag; if (!PyArg_ParseTuple(args, "i", &flag)) return NULL; flag = XML_SetParamEntityParsing(p->itself, flag); return PyInt_FromLong(flag); } #if XML_COMBINED_VERSION >= 19505 PyDoc_STRVAR(xmlparse_UseForeignDTD__doc__, "UseForeignDTD([flag])\n\ Allows the application to provide an artificial external subset if one is\n\ not specified as part of the document instance. This readily allows the\n\ use of a 'default' document type controlled by the application, while still\n\ getting the advantage of providing document type information to the parser.\n\ 'flag' defaults to True if not provided."); static PyObject * xmlparse_UseForeignDTD(xmlparseobject *self, PyObject *args) { PyObject *flagobj = NULL; XML_Bool flag = XML_TRUE; enum XML_Error rc; if (!PyArg_ParseTuple(args, "|O:UseForeignDTD", &flagobj)) return NULL; if (flagobj != NULL) flag = PyObject_IsTrue(flagobj) ? XML_TRUE : XML_FALSE; rc = XML_UseForeignDTD(self->itself, flag); if (rc != XML_ERROR_NONE) { return set_error(self, rc); } Py_INCREF(Py_None); return Py_None; } #endif static struct PyMethodDef xmlparse_methods[] = { {"Parse", (PyCFunction)xmlparse_Parse, METH_VARARGS, xmlparse_Parse__doc__}, {"ParseFile", (PyCFunction)xmlparse_ParseFile, METH_VARARGS, xmlparse_ParseFile__doc__}, {"SetBase", (PyCFunction)xmlparse_SetBase, METH_VARARGS, xmlparse_SetBase__doc__}, {"GetBase", (PyCFunction)xmlparse_GetBase, METH_VARARGS, xmlparse_GetBase__doc__}, {"ExternalEntityParserCreate", (PyCFunction)xmlparse_ExternalEntityParserCreate, METH_VARARGS, xmlparse_ExternalEntityParserCreate__doc__}, {"SetParamEntityParsing", (PyCFunction)xmlparse_SetParamEntityParsing, METH_VARARGS, xmlparse_SetParamEntityParsing__doc__}, {"GetInputContext", (PyCFunction)xmlparse_GetInputContext, METH_VARARGS, xmlparse_GetInputContext__doc__}, #if XML_COMBINED_VERSION >= 19505 {"UseForeignDTD", (PyCFunction)xmlparse_UseForeignDTD, METH_VARARGS, xmlparse_UseForeignDTD__doc__}, #endif {NULL, NULL} /* sentinel */ }; /* ---------- */ #ifdef Py_USING_UNICODE /* pyexpat international encoding support. Make it as simple as possible. */ static char template_buffer[257]; PyObject *template_string = NULL; static void init_template_buffer(void) { int i; for (i = 0; i < 256; i++) { template_buffer[i] = i; } template_buffer[256] = 0; } static int PyUnknownEncodingHandler(void *encodingHandlerData, const XML_Char *name, XML_Encoding *info) { PyUnicodeObject *_u_string = NULL; int result = 0; int i; /* Yes, supports only 8bit encodings */ _u_string = (PyUnicodeObject *) PyUnicode_Decode(template_buffer, 256, name, "replace"); if (_u_string == NULL) return result; for (i = 0; i < 256; i++) { /* Stupid to access directly, but fast */ Py_UNICODE c = _u_string->str[i]; if (c == Py_UNICODE_REPLACEMENT_CHARACTER) info->map[i] = -1; else info->map[i] = c; } info->data = NULL; info->convert = NULL; info->release = NULL; result = 1; Py_DECREF(_u_string); return result; } #endif static PyObject * newxmlparseobject(char *encoding, char *namespace_separator, PyObject *intern) { int i; xmlparseobject *self; #ifdef Py_TPFLAGS_HAVE_GC /* Code for versions 2.2 and later */ self = PyObject_GC_New(xmlparseobject, &Xmlparsetype); #else self = PyObject_New(xmlparseobject, &Xmlparsetype); #endif if (self == NULL) return NULL; #ifdef Py_USING_UNICODE self->returns_unicode = 1; #else self->returns_unicode = 0; #endif self->buffer = NULL; self->buffer_size = CHARACTER_DATA_BUFFER_SIZE; self->buffer_used = 0; self->ordered_attributes = 0; self->specified_attributes = 0; self->in_callback = 0; self->ns_prefixes = 0; self->handlers = NULL; if (namespace_separator != NULL) { self->itself = XML_ParserCreateNS(encoding, *namespace_separator); } else { self->itself = XML_ParserCreate(encoding); } self->intern = intern; Py_XINCREF(self->intern); #ifdef Py_TPFLAGS_HAVE_GC PyObject_GC_Track(self); #else PyObject_GC_Init(self); #endif if (self->itself == NULL) { PyErr_SetString(PyExc_RuntimeError, "XML_ParserCreate failed"); Py_DECREF(self); return NULL; } XML_SetUserData(self->itself, (void *)self); #ifdef Py_USING_UNICODE XML_SetUnknownEncodingHandler(self->itself, (XML_UnknownEncodingHandler) PyUnknownEncodingHandler, NULL); #endif for (i = 0; handler_info[i].name != NULL; i++) /* do nothing */; self->handlers = malloc(sizeof(PyObject *) * i); if (!self->handlers) { Py_DECREF(self); return PyErr_NoMemory(); } clear_handlers(self, 1); return (PyObject*)self; } static void xmlparse_dealloc(xmlparseobject *self) { int i; #ifdef Py_TPFLAGS_HAVE_GC PyObject_GC_UnTrack(self); #else PyObject_GC_Fini(self); #endif if (self->itself != NULL) XML_ParserFree(self->itself); self->itself = NULL; if (self->handlers != NULL) { PyObject *temp; for (i = 0; handler_info[i].name != NULL; i++) { temp = self->handlers[i]; self->handlers[i] = NULL; Py_XDECREF(temp); } free(self->handlers); self->handlers = NULL; } if (self->buffer != NULL) { free(self->buffer); self->buffer = NULL; } Py_XDECREF(self->intern); #ifndef Py_TPFLAGS_HAVE_GC /* Code for versions 2.0 and 2.1 */ PyObject_Del(self); #else /* Code for versions 2.2 and later. */ PyObject_GC_Del(self); #endif } static int handlername2int(const char *name) { int i; for (i = 0; handler_info[i].name != NULL; i++) { if (strcmp(name, handler_info[i].name) == 0) { return i; } } return -1; } static PyObject * get_pybool(int istrue) { PyObject *result = istrue ? Py_True : Py_False; Py_INCREF(result); return result; } static PyObject * xmlparse_getattr(xmlparseobject *self, char *name) { int handlernum = handlername2int(name); if (handlernum != -1) { PyObject *result = self->handlers[handlernum]; if (result == NULL) result = Py_None; Py_INCREF(result); return result; } if (name[0] == 'E') { if (strcmp(name, "ErrorCode") == 0) return PyInt_FromLong((long) XML_GetErrorCode(self->itself)); if (strcmp(name, "ErrorLineNumber") == 0) return PyInt_FromLong((long) XML_GetErrorLineNumber(self->itself)); if (strcmp(name, "ErrorColumnNumber") == 0) return PyInt_FromLong((long) XML_GetErrorColumnNumber(self->itself)); if (strcmp(name, "ErrorByteIndex") == 0) return PyInt_FromLong((long) XML_GetErrorByteIndex(self->itself)); } if (name[0] == 'b') { if (strcmp(name, "buffer_size") == 0) return PyInt_FromLong((long) self->buffer_size); if (strcmp(name, "buffer_text") == 0) return get_pybool(self->buffer != NULL); if (strcmp(name, "buffer_used") == 0) return PyInt_FromLong((long) self->buffer_used); } if (strcmp(name, "namespace_prefixes") == 0) return get_pybool(self->ns_prefixes); if (strcmp(name, "ordered_attributes") == 0) return get_pybool(self->ordered_attributes); if (strcmp(name, "returns_unicode") == 0) return get_pybool((long) self->returns_unicode); if (strcmp(name, "specified_attributes") == 0) return get_pybool((long) self->specified_attributes); if (strcmp(name, "intern") == 0) { if (self->intern == NULL) { Py_INCREF(Py_None); return Py_None; } else { Py_INCREF(self->intern); return self->intern; } } #define APPEND(list, str) \ do { \ PyObject *o = PyString_FromString(str); \ if (o != NULL) \ PyList_Append(list, o); \ Py_XDECREF(o); \ } while (0) if (strcmp(name, "__members__") == 0) { int i; PyObject *rc = PyList_New(0); for (i = 0; handler_info[i].name != NULL; i++) { PyObject *o = get_handler_name(&handler_info[i]); if (o != NULL) PyList_Append(rc, o); Py_XDECREF(o); } APPEND(rc, "ErrorCode"); APPEND(rc, "ErrorLineNumber"); APPEND(rc, "ErrorColumnNumber"); APPEND(rc, "ErrorByteIndex"); APPEND(rc, "buffer_size"); APPEND(rc, "buffer_text"); APPEND(rc, "buffer_used"); APPEND(rc, "namespace_prefixes"); APPEND(rc, "ordered_attributes"); APPEND(rc, "returns_unicode"); APPEND(rc, "specified_attributes"); APPEND(rc, "intern"); #undef APPEND return rc; } return Py_FindMethod(xmlparse_methods, (PyObject *)self, name); } static int sethandler(xmlparseobject *self, const char *name, PyObject* v) { int handlernum = handlername2int(name); if (handlernum >= 0) { xmlhandler c_handler = NULL; PyObject *temp = self->handlers[handlernum]; if (v == Py_None) v = NULL; else if (v != NULL) { Py_INCREF(v); c_handler = handler_info[handlernum].handler; } self->handlers[handlernum] = v; Py_XDECREF(temp); handler_info[handlernum].setter(self->itself, c_handler); return 1; } return 0; } static int xmlparse_setattr(xmlparseobject *self, char *name, PyObject *v) { /* Set attribute 'name' to value 'v'. v==NULL means delete */ if (v == NULL) { PyErr_SetString(PyExc_RuntimeError, "Cannot delete attribute"); return -1; } if (strcmp(name, "buffer_text") == 0) { if (PyObject_IsTrue(v)) { if (self->buffer == NULL) { self->buffer = malloc(self->buffer_size); if (self->buffer == NULL) { PyErr_NoMemory(); return -1; } self->buffer_used = 0; } } else if (self->buffer != NULL) { if (flush_character_buffer(self) < 0) return -1; free(self->buffer); self->buffer = NULL; } return 0; } if (strcmp(name, "namespace_prefixes") == 0) { if (PyObject_IsTrue(v)) self->ns_prefixes = 1; else self->ns_prefixes = 0; XML_SetReturnNSTriplet(self->itself, self->ns_prefixes); return 0; } if (strcmp(name, "ordered_attributes") == 0) { if (PyObject_IsTrue(v)) self->ordered_attributes = 1; else self->ordered_attributes = 0; return 0; } if (strcmp(name, "returns_unicode") == 0) { if (PyObject_IsTrue(v)) { #ifndef Py_USING_UNICODE PyErr_SetString(PyExc_ValueError, "Unicode support not available"); return -1; #else self->returns_unicode = 1; #endif } else self->returns_unicode = 0; return 0; } if (strcmp(name, "specified_attributes") == 0) { if (PyObject_IsTrue(v)) self->specified_attributes = 1; else self->specified_attributes = 0; return 0; } if (strcmp(name, "CharacterDataHandler") == 0) { /* If we're changing the character data handler, flush all * cached data with the old handler. Not sure there's a * "right" thing to do, though, but this probably won't * happen. */ if (flush_character_buffer(self) < 0) return -1; } if (sethandler(self, name, v)) { return 0; } PyErr_SetString(PyExc_AttributeError, name); return -1; } #ifdef WITH_CYCLE_GC static int xmlparse_traverse(xmlparseobject *op, visitproc visit, void *arg) { int i, err; for (i = 0; handler_info[i].name != NULL; i++) { if (!op->handlers[i]) continue; err = visit(op->handlers[i], arg); if (err) return err; } return 0; } static int xmlparse_clear(xmlparseobject *op) { clear_handlers(op, 0); Py_XDECREF(op->intern); op->intern = 0; return 0; } #endif PyDoc_STRVAR(Xmlparsetype__doc__, "XML parser"); static PyTypeObject Xmlparsetype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "pyexpat.xmlparser", /*tp_name*/ sizeof(xmlparseobject) + PyGC_HEAD_SIZE,/*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)xmlparse_dealloc, /*tp_dealloc*/ (printfunc)0, /*tp_print*/ (getattrfunc)xmlparse_getattr, /*tp_getattr*/ (setattrfunc)xmlparse_setattr, /*tp_setattr*/ (cmpfunc)0, /*tp_compare*/ (reprfunc)0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ (hashfunc)0, /*tp_hash*/ (ternaryfunc)0, /*tp_call*/ (reprfunc)0, /*tp_str*/ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ #ifdef Py_TPFLAGS_HAVE_GC Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC, /*tp_flags*/ #else Py_TPFLAGS_DEFAULT | Py_TPFLAGS_GC, /*tp_flags*/ #endif Xmlparsetype__doc__, /* tp_doc - Documentation string */ #ifdef WITH_CYCLE_GC (traverseproc)xmlparse_traverse, /* tp_traverse */ (inquiry)xmlparse_clear /* tp_clear */ #else 0, 0 #endif }; /* End of code for xmlparser objects */ /* -------------------------------------------------------- */ PyDoc_STRVAR(pyexpat_ParserCreate__doc__, "ParserCreate([encoding[, namespace_separator]]) -> parser\n\ Return a new XML parser object."); static PyObject * pyexpat_ParserCreate(PyObject *notused, PyObject *args, PyObject *kw) { char *encoding = NULL; char *namespace_separator = NULL; PyObject *intern = NULL; PyObject *result; int intern_decref = 0; static char *kwlist[] = {"encoding", "namespace_separator", "intern", NULL}; if (!PyArg_ParseTupleAndKeywords(args, kw, "|zzO:ParserCreate", kwlist, &encoding, &namespace_separator, &intern)) return NULL; if (namespace_separator != NULL && strlen(namespace_separator) > 1) { PyErr_SetString(PyExc_ValueError, "namespace_separator must be at most one" " character, omitted, or None"); return NULL; } /* Explicitly passing None means no interning is desired. Not passing anything means that a new dictionary is used. */ if (intern == Py_None) intern = NULL; else if (intern == NULL) { intern = PyDict_New(); if (!intern) return NULL; intern_decref = 1; } else if (!PyDict_Check(intern)) { PyErr_SetString(PyExc_TypeError, "intern must be a dictionary"); return NULL; } result = newxmlparseobject(encoding, namespace_separator, intern); if (intern_decref) { Py_DECREF(intern); } return result; } PyDoc_STRVAR(pyexpat_ErrorString__doc__, "ErrorString(errno) -> string\n\ Returns string error for given number."); static PyObject * pyexpat_ErrorString(PyObject *self, PyObject *args) { long code = 0; if (!PyArg_ParseTuple(args, "l:ErrorString", &code)) return NULL; return Py_BuildValue("z", XML_ErrorString((int)code)); } /* List of methods defined in the module */ static struct PyMethodDef pyexpat_methods[] = { {"ParserCreate", (PyCFunction)pyexpat_ParserCreate, METH_VARARGS|METH_KEYWORDS, pyexpat_ParserCreate__doc__}, {"ErrorString", (PyCFunction)pyexpat_ErrorString, METH_VARARGS, pyexpat_ErrorString__doc__}, {NULL, (PyCFunction)NULL, 0, NULL} /* sentinel */ }; /* Module docstring */ PyDoc_STRVAR(pyexpat_module_documentation, "Python wrapper for Expat parser."); /* Return a Python string that represents the version number without the * extra cruft added by revision control, even if the right options were * given to the "cvs export" command to make it not include the extra * cruft. */ static PyObject * get_version_string(void) { static char *rcsid = "$Revision: 33635 $"; char *rev = rcsid; int i = 0; while (!isdigit((int)*rev)) ++rev; while (rev[i] != ' ' && rev[i] != '\0') ++i; return PyString_FromStringAndSize(rev, i); } /* Initialization function for the module */ #ifndef MODULE_NAME #define MODULE_NAME "pyexpat" #endif #ifndef MODULE_INITFUNC #define MODULE_INITFUNC initpyexpat #endif #ifndef PyMODINIT_FUNC # ifdef MS_WINDOWS # define PyMODINIT_FUNC __declspec(dllexport) void # else # define PyMODINIT_FUNC void # endif #endif PyMODINIT_FUNC MODULE_INITFUNC(void); /* avoid compiler warnings */ PyMODINIT_FUNC MODULE_INITFUNC(void) { PyObject *m, *d; PyObject *errmod_name = PyString_FromString(MODULE_NAME ".errors"); PyObject *errors_module; PyObject *modelmod_name; PyObject *model_module; PyObject *sys_modules; if (errmod_name == NULL) return; modelmod_name = PyString_FromString(MODULE_NAME ".model"); if (modelmod_name == NULL) return; Xmlparsetype.ob_type = &PyType_Type; /* Create the module and add the functions */ m = Py_InitModule3(MODULE_NAME, pyexpat_methods, pyexpat_module_documentation); /* Add some symbolic constants to the module */ if (ErrorObject == NULL) { ErrorObject = PyErr_NewException("xml.parsers.expat.ExpatError", NULL, NULL); if (ErrorObject == NULL) return; } Py_INCREF(ErrorObject); PyModule_AddObject(m, "error", ErrorObject); Py_INCREF(ErrorObject); PyModule_AddObject(m, "ExpatError", ErrorObject); Py_INCREF(&Xmlparsetype); PyModule_AddObject(m, "XMLParserType", (PyObject *) &Xmlparsetype); PyModule_AddObject(m, "__version__", get_version_string()); PyModule_AddStringConstant(m, "EXPAT_VERSION", (char *) XML_ExpatVersion()); { XML_Expat_Version info = XML_ExpatVersionInfo(); PyModule_AddObject(m, "version_info", Py_BuildValue("(iii)", info.major, info.minor, info.micro)); } #ifdef Py_USING_UNICODE init_template_buffer(); #endif /* XXX When Expat supports some way of figuring out how it was compiled, this should check and set native_encoding appropriately. */ PyModule_AddStringConstant(m, "native_encoding", "UTF-8"); sys_modules = PySys_GetObject("modules"); d = PyModule_GetDict(m); errors_module = PyDict_GetItem(d, errmod_name); if (errors_module == NULL) { errors_module = PyModule_New(MODULE_NAME ".errors"); if (errors_module != NULL) { PyDict_SetItem(sys_modules, errmod_name, errors_module); /* gives away the reference to errors_module */ PyModule_AddObject(m, "errors", errors_module); } } Py_DECREF(errmod_name); model_module = PyDict_GetItem(d, modelmod_name); if (model_module == NULL) { model_module = PyModule_New(MODULE_NAME ".model"); if (model_module != NULL) { PyDict_SetItem(sys_modules, modelmod_name, model_module); /* gives away the reference to model_module */ PyModule_AddObject(m, "model", model_module); } } Py_DECREF(modelmod_name); if (errors_module == NULL || model_module == NULL) /* Don't core dump later! */ return; #if XML_COMBINED_VERSION > 19505 { const XML_Feature *features = XML_GetFeatureList(); PyObject *list = PyList_New(0); if (list == NULL) /* just ignore it */ PyErr_Clear(); else { int i = 0; for (; features[i].feature != XML_FEATURE_END; ++i) { int ok; PyObject *item = Py_BuildValue("si", features[i].name, features[i].value); if (item == NULL) { Py_DECREF(list); list = NULL; break; } ok = PyList_Append(list, item); Py_DECREF(item); if (ok < 0) { PyErr_Clear(); break; } } if (list != NULL) PyModule_AddObject(m, "features", list); } } #endif #define MYCONST(name) \ PyModule_AddStringConstant(errors_module, #name, \ (char*)XML_ErrorString(name)) MYCONST(XML_ERROR_NO_MEMORY); MYCONST(XML_ERROR_SYNTAX); MYCONST(XML_ERROR_NO_ELEMENTS); MYCONST(XML_ERROR_INVALID_TOKEN); MYCONST(XML_ERROR_UNCLOSED_TOKEN); MYCONST(XML_ERROR_PARTIAL_CHAR); MYCONST(XML_ERROR_TAG_MISMATCH); MYCONST(XML_ERROR_DUPLICATE_ATTRIBUTE); MYCONST(XML_ERROR_JUNK_AFTER_DOC_ELEMENT); MYCONST(XML_ERROR_PARAM_ENTITY_REF); MYCONST(XML_ERROR_UNDEFINED_ENTITY); MYCONST(XML_ERROR_RECURSIVE_ENTITY_REF); MYCONST(XML_ERROR_ASYNC_ENTITY); MYCONST(XML_ERROR_BAD_CHAR_REF); MYCONST(XML_ERROR_BINARY_ENTITY_REF); MYCONST(XML_ERROR_ATTRIBUTE_EXTERNAL_ENTITY_REF); MYCONST(XML_ERROR_MISPLACED_XML_PI); MYCONST(XML_ERROR_UNKNOWN_ENCODING); MYCONST(XML_ERROR_INCORRECT_ENCODING); MYCONST(XML_ERROR_UNCLOSED_CDATA_SECTION); MYCONST(XML_ERROR_EXTERNAL_ENTITY_HANDLING); MYCONST(XML_ERROR_NOT_STANDALONE); PyModule_AddStringConstant(errors_module, "__doc__", "Constants used to describe error conditions."); #undef MYCONST #define MYCONST(c) PyModule_AddIntConstant(m, #c, c) MYCONST(XML_PARAM_ENTITY_PARSING_NEVER); MYCONST(XML_PARAM_ENTITY_PARSING_UNLESS_STANDALONE); MYCONST(XML_PARAM_ENTITY_PARSING_ALWAYS); #undef MYCONST #define MYCONST(c) PyModule_AddIntConstant(model_module, #c, c) PyModule_AddStringConstant(model_module, "__doc__", "Constants used to interpret content model information."); MYCONST(XML_CTYPE_EMPTY); MYCONST(XML_CTYPE_ANY); MYCONST(XML_CTYPE_MIXED); MYCONST(XML_CTYPE_NAME); MYCONST(XML_CTYPE_CHOICE); MYCONST(XML_CTYPE_SEQ); MYCONST(XML_CQUANT_NONE); MYCONST(XML_CQUANT_OPT); MYCONST(XML_CQUANT_REP); MYCONST(XML_CQUANT_PLUS); #undef MYCONST } static void clear_handlers(xmlparseobject *self, int initial) { int i = 0; PyObject *temp; for (; handler_info[i].name != NULL; i++) { if (initial) self->handlers[i] = NULL; else { temp = self->handlers[i]; self->handlers[i] = NULL; Py_XDECREF(temp); handler_info[i].setter(self->itself, NULL); } } } static struct HandlerInfo handler_info[] = { {"StartElementHandler", (xmlhandlersetter)XML_SetStartElementHandler, (xmlhandler)my_StartElementHandler}, {"EndElementHandler", (xmlhandlersetter)XML_SetEndElementHandler, (xmlhandler)my_EndElementHandler}, {"ProcessingInstructionHandler", (xmlhandlersetter)XML_SetProcessingInstructionHandler, (xmlhandler)my_ProcessingInstructionHandler}, {"CharacterDataHandler", (xmlhandlersetter)XML_SetCharacterDataHandler, (xmlhandler)my_CharacterDataHandler}, {"UnparsedEntityDeclHandler", (xmlhandlersetter)XML_SetUnparsedEntityDeclHandler, (xmlhandler)my_UnparsedEntityDeclHandler}, {"NotationDeclHandler", (xmlhandlersetter)XML_SetNotationDeclHandler, (xmlhandler)my_NotationDeclHandler}, {"StartNamespaceDeclHandler", (xmlhandlersetter)XML_SetStartNamespaceDeclHandler, (xmlhandler)my_StartNamespaceDeclHandler}, {"EndNamespaceDeclHandler", (xmlhandlersetter)XML_SetEndNamespaceDeclHandler, (xmlhandler)my_EndNamespaceDeclHandler}, {"CommentHandler", (xmlhandlersetter)XML_SetCommentHandler, (xmlhandler)my_CommentHandler}, {"StartCdataSectionHandler", (xmlhandlersetter)XML_SetStartCdataSectionHandler, (xmlhandler)my_StartCdataSectionHandler}, {"EndCdataSectionHandler", (xmlhandlersetter)XML_SetEndCdataSectionHandler, (xmlhandler)my_EndCdataSectionHandler}, {"DefaultHandler", (xmlhandlersetter)XML_SetDefaultHandler, (xmlhandler)my_DefaultHandler}, {"DefaultHandlerExpand", (xmlhandlersetter)XML_SetDefaultHandlerExpand, (xmlhandler)my_DefaultHandlerExpandHandler}, {"NotStandaloneHandler", (xmlhandlersetter)XML_SetNotStandaloneHandler, (xmlhandler)my_NotStandaloneHandler}, {"ExternalEntityRefHandler", (xmlhandlersetter)XML_SetExternalEntityRefHandler, (xmlhandler)my_ExternalEntityRefHandler}, {"StartDoctypeDeclHandler", (xmlhandlersetter)XML_SetStartDoctypeDeclHandler, (xmlhandler)my_StartDoctypeDeclHandler}, {"EndDoctypeDeclHandler", (xmlhandlersetter)XML_SetEndDoctypeDeclHandler, (xmlhandler)my_EndDoctypeDeclHandler}, {"EntityDeclHandler", (xmlhandlersetter)XML_SetEntityDeclHandler, (xmlhandler)my_EntityDeclHandler}, {"XmlDeclHandler", (xmlhandlersetter)XML_SetXmlDeclHandler, (xmlhandler)my_XmlDeclHandler}, {"ElementDeclHandler", (xmlhandlersetter)XML_SetElementDeclHandler, (xmlhandler)my_ElementDeclHandler}, {"AttlistDeclHandler", (xmlhandlersetter)XML_SetAttlistDeclHandler, (xmlhandler)my_AttlistDeclHandler}, #if XML_COMBINED_VERSION >= 19504 {"SkippedEntityHandler", (xmlhandlersetter)XML_SetSkippedEntityHandler, (xmlhandler)my_SkippedEntityHandler}, #endif {NULL, NULL, NULL} /* sentinel */ }; Python-2.3.7/Modules/symtablemodule.c0000644001241000117560000000460707526303071017064 0ustar loewishpifb6#include "Python.h" #include "compile.h" #include "symtable.h" static PyObject * symtable_symtable(PyObject *self, PyObject *args) { struct symtable *st; PyObject *t; char *str; char *filename; char *startstr; int start; if (!PyArg_ParseTuple(args, "sss:symtable", &str, &filename, &startstr)) return NULL; if (strcmp(startstr, "exec") == 0) start = Py_file_input; else if (strcmp(startstr, "eval") == 0) start = Py_eval_input; else if (strcmp(startstr, "single") == 0) start = Py_single_input; else { PyErr_SetString(PyExc_ValueError, "symtable() arg 3 must be 'exec' or 'eval' or 'single'"); return NULL; } st = Py_SymtableString(str, filename, start); if (st == NULL) return NULL; t = Py_BuildValue("O", st->st_symbols); PyMem_Free((void *)st->st_future); PySymtable_Free(st); return t; } static PyMethodDef symtable_methods[] = { {"symtable", symtable_symtable, METH_VARARGS, PyDoc_STR("Return symbol and scope dictionaries" " used internally by compiler.")}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC init_symtable(void) { PyObject *m; m = Py_InitModule("_symtable", symtable_methods); PyModule_AddIntConstant(m, "USE", USE); PyModule_AddIntConstant(m, "DEF_GLOBAL", DEF_GLOBAL); PyModule_AddIntConstant(m, "DEF_LOCAL", DEF_LOCAL); PyModule_AddIntConstant(m, "DEF_PARAM", DEF_PARAM); PyModule_AddIntConstant(m, "DEF_STAR", DEF_STAR); PyModule_AddIntConstant(m, "DEF_DOUBLESTAR", DEF_DOUBLESTAR); PyModule_AddIntConstant(m, "DEF_INTUPLE", DEF_INTUPLE); PyModule_AddIntConstant(m, "DEF_FREE", DEF_FREE); PyModule_AddIntConstant(m, "DEF_FREE_GLOBAL", DEF_FREE_GLOBAL); PyModule_AddIntConstant(m, "DEF_FREE_CLASS", DEF_FREE_CLASS); PyModule_AddIntConstant(m, "DEF_IMPORT", DEF_IMPORT); PyModule_AddIntConstant(m, "DEF_BOUND", DEF_BOUND); PyModule_AddIntConstant(m, "TYPE_FUNCTION", TYPE_FUNCTION); PyModule_AddIntConstant(m, "TYPE_CLASS", TYPE_CLASS); PyModule_AddIntConstant(m, "TYPE_MODULE", TYPE_MODULE); PyModule_AddIntConstant(m, "OPT_IMPORT_STAR", OPT_IMPORT_STAR); PyModule_AddIntConstant(m, "OPT_EXEC", OPT_EXEC); PyModule_AddIntConstant(m, "OPT_BARE_EXEC", OPT_BARE_EXEC); PyModule_AddIntConstant(m, "LOCAL", LOCAL); PyModule_AddIntConstant(m, "GLOBAL_EXPLICIT", GLOBAL_EXPLICIT); PyModule_AddIntConstant(m, "GLOBAL_IMPLICIT", GLOBAL_IMPLICIT); PyModule_AddIntConstant(m, "FREE", FREE); PyModule_AddIntConstant(m, "CELL", CELL); } Python-2.3.7/Modules/_randommodule.c0000644001241000117560000003547307663315676016710 0ustar loewishpifb6/* Random objects */ /* ------------------------------------------------------------------ The code in this module was based on a download from: http://www.math.keio.ac.jp/~matumoto/MT2002/emt19937ar.html It was modified in 2002 by Raymond Hettinger as follows: * the principal computational lines untouched except for tabbing. * renamed genrand_res53() to random_random() and wrapped in python calling/return code. * genrand_int32() and the helper functions, init_genrand() and init_by_array(), were declared static, wrapped in Python calling/return code. also, their global data references were replaced with structure references. * unused functions from the original were deleted. new, original C python code was added to implement the Random() interface. The following are the verbatim comments from the original code: A C-program for MT19937, with initialization improved 2002/1/26. Coded by Takuji Nishimura and Makoto Matsumoto. Before using, initialize the state by using init_genrand(seed) or init_by_array(init_key, key_length). Copyright (C) 1997 - 2002, Makoto Matsumoto and Takuji Nishimura, All rights reserved. Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met: 1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer. 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution. 3. The names of its contributors may not be used to endorse or promote products derived from this software without specific prior written permission. THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. Any feedback is very welcome. http://www.math.keio.ac.jp/matumoto/emt.html email: matumoto@math.keio.ac.jp */ /* ---------------------------------------------------------------*/ #include "Python.h" #include /* for seeding to current time */ /* Period parameters -- These are all magic. Don't change. */ #define N 624 #define M 397 #define MATRIX_A 0x9908b0dfUL /* constant vector a */ #define UPPER_MASK 0x80000000UL /* most significant w-r bits */ #define LOWER_MASK 0x7fffffffUL /* least significant r bits */ typedef struct { PyObject_HEAD unsigned long state[N]; int index; } RandomObject; static PyTypeObject Random_Type; #define RandomObject_Check(v) ((v)->ob_type == &Random_Type) /* Random methods */ /* generates a random number on [0,0xffffffff]-interval */ static unsigned long genrand_int32(RandomObject *self) { unsigned long y; static unsigned long mag01[2]={0x0UL, MATRIX_A}; /* mag01[x] = x * MATRIX_A for x=0,1 */ unsigned long *mt; mt = self->state; if (self->index >= N) { /* generate N words at one time */ int kk; for (kk=0;kk> 1) ^ mag01[y & 0x1UL]; } for (;kk> 1) ^ mag01[y & 0x1UL]; } y = (mt[N-1]&UPPER_MASK)|(mt[0]&LOWER_MASK); mt[N-1] = mt[M-1] ^ (y >> 1) ^ mag01[y & 0x1UL]; self->index = 0; } y = mt[self->index++]; y ^= (y >> 11); y ^= (y << 7) & 0x9d2c5680UL; y ^= (y << 15) & 0xefc60000UL; y ^= (y >> 18); return y; } /* random_random is the function named genrand_res53 in the original code; * generates a random number on [0,1) with 53-bit resolution; note that * 9007199254740992 == 2**53; I assume they're spelling "/2**53" as * multiply-by-reciprocal in the (likely vain) hope that the compiler will * optimize the division away at compile-time. 67108864 is 2**26. In * effect, a contains 27 random bits shifted left 26, and b fills in the * lower 26 bits of the 53-bit numerator. * The orginal code credited Isaku Wada for this algorithm, 2002/01/09. */ static PyObject * random_random(RandomObject *self) { unsigned long a=genrand_int32(self)>>5, b=genrand_int32(self)>>6; return PyFloat_FromDouble((a*67108864.0+b)*(1.0/9007199254740992.0)); } /* initializes mt[N] with a seed */ static void init_genrand(RandomObject *self, unsigned long s) { int mti; unsigned long *mt; mt = self->state; mt[0]= s & 0xffffffffUL; for (mti=1; mti> 30)) + mti); /* See Knuth TAOCP Vol2. 3rd Ed. P.106 for multiplier. */ /* In the previous versions, MSBs of the seed affect */ /* only MSBs of the array mt[]. */ /* 2002/01/09 modified by Makoto Matsumoto */ mt[mti] &= 0xffffffffUL; /* for >32 bit machines */ } self->index = mti; return; } /* initialize by an array with array-length */ /* init_key is the array for initializing keys */ /* key_length is its length */ static PyObject * init_by_array(RandomObject *self, unsigned long init_key[], unsigned long key_length) { unsigned int i, j, k; /* was signed in the original code. RDH 12/16/2002 */ unsigned long *mt; mt = self->state; init_genrand(self, 19650218UL); i=1; j=0; k = (N>key_length ? N : key_length); for (; k; k--) { mt[i] = (mt[i] ^ ((mt[i-1] ^ (mt[i-1] >> 30)) * 1664525UL)) + init_key[j] + j; /* non linear */ mt[i] &= 0xffffffffUL; /* for WORDSIZE > 32 machines */ i++; j++; if (i>=N) { mt[0] = mt[N-1]; i=1; } if (j>=key_length) j=0; } for (k=N-1; k; k--) { mt[i] = (mt[i] ^ ((mt[i-1] ^ (mt[i-1] >> 30)) * 1566083941UL)) - i; /* non linear */ mt[i] &= 0xffffffffUL; /* for WORDSIZE > 32 machines */ i++; if (i>=N) { mt[0] = mt[N-1]; i=1; } } mt[0] = 0x80000000UL; /* MSB is 1; assuring non-zero initial array */ Py_INCREF(Py_None); return Py_None; } /* * The rest is Python-specific code, neither part of, nor derived from, the * Twister download. */ static PyObject * random_seed(RandomObject *self, PyObject *args) { PyObject *result = NULL; /* guilty until proved innocent */ PyObject *masklower = NULL; PyObject *thirtytwo = NULL; PyObject *n = NULL; unsigned long *key = NULL; unsigned long keymax; /* # of allocated slots in key */ unsigned long keyused; /* # of used slots in key */ int err; PyObject *arg = NULL; if (!PyArg_UnpackTuple(args, "seed", 0, 1, &arg)) return NULL; if (arg == NULL || arg == Py_None) { time_t now; time(&now); init_genrand(self, (unsigned long)now); Py_INCREF(Py_None); return Py_None; } /* If the arg is an int or long, use its absolute value; else use * the absolute value of its hash code. */ if (PyInt_Check(arg) || PyLong_Check(arg)) n = PyNumber_Absolute(arg); else { long hash = PyObject_Hash(arg); if (hash == -1) goto Done; n = PyLong_FromUnsignedLong((unsigned long)hash); } if (n == NULL) goto Done; /* Now split n into 32-bit chunks, from the right. Each piece is * stored into key, which has a capacity of keymax chunks, of which * keyused are filled. Alas, the repeated shifting makes this a * quadratic-time algorithm; we'd really like to use * _PyLong_AsByteArray here, but then we'd have to break into the * long representation to figure out how big an array was needed * in advance. */ keymax = 8; /* arbitrary; grows later if needed */ keyused = 0; key = (unsigned long *)PyMem_Malloc(keymax * sizeof(*key)); if (key == NULL) goto Done; masklower = PyLong_FromUnsignedLong(0xffffffffU); if (masklower == NULL) goto Done; thirtytwo = PyInt_FromLong(32L); if (thirtytwo == NULL) goto Done; while ((err=PyObject_IsTrue(n))) { PyObject *newn; PyObject *pychunk; unsigned long chunk; if (err == -1) goto Done; pychunk = PyNumber_And(n, masklower); if (pychunk == NULL) goto Done; chunk = PyLong_AsUnsignedLong(pychunk); Py_DECREF(pychunk); if (chunk == (unsigned long)-1 && PyErr_Occurred()) goto Done; newn = PyNumber_Rshift(n, thirtytwo); if (newn == NULL) goto Done; Py_DECREF(n); n = newn; if (keyused >= keymax) { unsigned long bigger = keymax << 1; if ((bigger >> 1) != keymax) { PyErr_NoMemory(); goto Done; } key = (unsigned long *)PyMem_Realloc(key, bigger * sizeof(*key)); if (key == NULL) goto Done; keymax = bigger; } assert(keyused < keymax); key[keyused++] = chunk; } if (keyused == 0) key[keyused++] = 0UL; result = init_by_array(self, key, keyused); Done: Py_XDECREF(masklower); Py_XDECREF(thirtytwo); Py_XDECREF(n); PyMem_Free(key); return result; } static PyObject * random_getstate(RandomObject *self) { PyObject *state; PyObject *element; int i; state = PyTuple_New(N+1); if (state == NULL) return NULL; for (i=0; istate[i])); if (element == NULL) goto Fail; PyTuple_SET_ITEM(state, i, element); } element = PyInt_FromLong((long)(self->index)); if (element == NULL) goto Fail; PyTuple_SET_ITEM(state, i, element); return state; Fail: Py_DECREF(state); return NULL; } static PyObject * random_setstate(RandomObject *self, PyObject *state) { int i; long element; if (!PyTuple_Check(state)) { PyErr_SetString(PyExc_TypeError, "state vector must be a tuple"); return NULL; } if (PyTuple_Size(state) != N+1) { PyErr_SetString(PyExc_ValueError, "state vector is the wrong size"); return NULL; } for (i=0; istate[i] = (unsigned long)element; } element = PyInt_AsLong(PyTuple_GET_ITEM(state, i)); if (element == -1 && PyErr_Occurred()) return NULL; self->index = (int)element; Py_INCREF(Py_None); return Py_None; } /* Jumpahead should be a fast way advance the generator n-steps ahead, but lacking a formula for that, the next best is to use n and the existing state to create a new state far away from the original. The generator uses constant spaced additive feedback, so shuffling the state elements ought to produce a state which would not be encountered (in the near term) by calls to random(). Shuffling is normally implemented by swapping the ith element with another element ranging from 0 to i inclusive. That allows the element to have the possibility of not being moved. Since the goal is to produce a new, different state, the swap element is ranged from 0 to i-1 inclusive. This assures that each element gets moved at least once. To make sure that consecutive calls to jumpahead(n) produce different states (even in the rare case of involutory shuffles), i+1 is added to each element at position i. Successive calls are then guaranteed to have changing (growing) values as well as shuffled positions. Finally, the self->index value is set to N so that the generator itself kicks in on the next call to random(). This assures that all results have been through the generator and do not just reflect alterations to the underlying state. */ static PyObject * random_jumpahead(RandomObject *self, PyObject *n) { long i, j; PyObject *iobj; PyObject *remobj; unsigned long *mt, tmp; if (!PyInt_Check(n) && !PyLong_Check(n)) { PyErr_Format(PyExc_TypeError, "jumpahead requires an " "integer, not '%s'", n->ob_type->tp_name); return NULL; } mt = self->state; for (i = N-1; i > 1; i--) { iobj = PyInt_FromLong(i); if (iobj == NULL) return NULL; remobj = PyNumber_Remainder(n, iobj); Py_DECREF(iobj); if (remobj == NULL) return NULL; j = PyInt_AsLong(remobj); Py_DECREF(remobj); if (j == -1L && PyErr_Occurred()) return NULL; tmp = mt[i]; mt[i] = mt[j]; mt[j] = tmp; } for (i = 0; i < N; i++) mt[i] += i+1; self->index = N; Py_INCREF(Py_None); return Py_None; } static PyObject * random_new(PyTypeObject *type, PyObject *args, PyObject *kwds) { RandomObject *self; PyObject *tmp; self = (RandomObject *)type->tp_alloc(type, 0); if (self == NULL) return NULL; tmp = random_seed(self, args); if (tmp == NULL) { Py_DECREF(self); return NULL; } Py_DECREF(tmp); return (PyObject *)self; } static PyMethodDef random_methods[] = { {"random", (PyCFunction)random_random, METH_NOARGS, PyDoc_STR("random() -> x in the interval [0, 1).")}, {"seed", (PyCFunction)random_seed, METH_VARARGS, PyDoc_STR("seed([n]) -> None. Defaults to current time.")}, {"getstate", (PyCFunction)random_getstate, METH_NOARGS, PyDoc_STR("getstate() -> tuple containing the current state.")}, {"setstate", (PyCFunction)random_setstate, METH_O, PyDoc_STR("setstate(state) -> None. Restores generator state.")}, {"jumpahead", (PyCFunction)random_jumpahead, METH_O, PyDoc_STR("jumpahead(int) -> None. Create new state from " "existing state and integer.")}, {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(random_doc, "Random() -> create a random number generator with its own internal state."); static PyTypeObject Random_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "_random.Random", /*tp_name*/ sizeof(RandomObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ 0, /*tp_dealloc*/ 0, /*tp_print*/ 0, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ PyObject_GenericGetAttr, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /*tp_flags*/ random_doc, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ 0, /*tp_iter*/ 0, /*tp_iternext*/ random_methods, /*tp_methods*/ 0, /*tp_members*/ 0, /*tp_getset*/ 0, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ 0, /*tp_init*/ 0, /*tp_alloc*/ random_new, /*tp_new*/ _PyObject_Del, /*tp_free*/ 0, /*tp_is_gc*/ }; PyDoc_STRVAR(module_doc, "Module implements the Mersenne Twister random number generator."); PyMODINIT_FUNC init_random(void) { PyObject *m; if (PyType_Ready(&Random_Type) < 0) return; m = Py_InitModule3("_random", NULL, module_doc); Py_INCREF(&Random_Type); PyModule_AddObject(m, "Random", (PyObject *)&Random_Type); } Python-2.3.7/Modules/fmmodule.c0000644001241000117560000001164307515315657015657 0ustar loewishpifb6 /* Font Manager module */ #include "Python.h" #include #include #include /* Font Handle object implementation */ typedef struct { PyObject_HEAD fmfonthandle fh_fh; } fhobject; static PyTypeObject Fhtype; #define is_fhobject(v) ((v)->ob_type == &Fhtype) static PyObject * newfhobject(fmfonthandle fh) { fhobject *fhp; if (fh == NULL) { PyErr_SetString(PyExc_RuntimeError, "error creating new font handle"); return NULL; } fhp = PyObject_New(fhobject, &Fhtype); if (fhp == NULL) return NULL; fhp->fh_fh = fh; return (PyObject *)fhp; } /* Font Handle methods */ static PyObject * fh_scalefont(fhobject *self, PyObject *args) { double size; if (!PyArg_Parse(args, "d", &size)) return NULL; return newfhobject(fmscalefont(self->fh_fh, size)); } /* XXX fmmakefont */ static PyObject * fh_setfont(fhobject *self) { fmsetfont(self->fh_fh); Py_INCREF(Py_None); return Py_None; } static PyObject * fh_getfontname(fhobject *self) { char fontname[256]; int len; len = fmgetfontname(self->fh_fh, sizeof fontname, fontname); if (len < 0) { PyErr_SetString(PyExc_RuntimeError, "error in fmgetfontname"); return NULL; } return PyString_FromStringAndSize(fontname, len); } static PyObject * fh_getcomment(fhobject *self) { char comment[256]; int len; len = fmgetcomment(self->fh_fh, sizeof comment, comment); if (len < 0) { PyErr_SetString(PyExc_RuntimeError, "error in fmgetcomment"); return NULL; } return PyString_FromStringAndSize(comment, len); } static PyObject * fh_getfontinfo(fhobject *self) { fmfontinfo info; if (fmgetfontinfo(self->fh_fh, &info) < 0) { PyErr_SetString(PyExc_RuntimeError, "error in fmgetfontinfo"); return NULL; } return Py_BuildValue("(llllllll)", info.printermatched, info.fixed_width, info.xorig, info.yorig, info.xsize, info.ysize, info.height, info.nglyphs); } #if 0 static PyObject * fh_getwholemetrics(fhobject *self, PyObject *args) { } #endif static PyObject * fh_getstrwidth(fhobject *self, PyObject *args) { char *str; if (!PyArg_Parse(args, "s", &str)) return NULL; return PyInt_FromLong(fmgetstrwidth(self->fh_fh, str)); } static PyMethodDef fh_methods[] = { {"scalefont", (PyCFunction)fh_scalefont, METH_OLDARGS}, {"setfont", (PyCFunction)fh_setfont, METH_NOARGS}, {"getfontname", (PyCFunction)fh_getfontname, METH_NOARGS}, {"getcomment", (PyCFunction)fh_getcomment, METH_NOARGS}, {"getfontinfo", (PyCFunction)fh_getfontinfo, METH_NOARGS}, #if 0 {"getwholemetrics", (PyCFunction)fh_getwholemetrics, METH_OLDARGS}, #endif {"getstrwidth", (PyCFunction)fh_getstrwidth, METH_OLDARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * fh_getattr(fhobject *fhp, char *name) { return Py_FindMethod(fh_methods, (PyObject *)fhp, name); } static void fh_dealloc(fhobject *fhp) { fmfreefont(fhp->fh_fh); PyObject_Del(fhp); } static PyTypeObject Fhtype = { PyObject_HEAD_INIT(&PyType_Type) 0, /*ob_size*/ "fm.font handle", /*tp_name*/ sizeof(fhobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)fh_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)fh_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ }; /* Font Manager functions */ static PyObject * fm_init(PyObject *self) { fminit(); Py_INCREF(Py_None); return Py_None; } static PyObject * fm_findfont(PyObject *self, PyObject *args) { char *str; if (!PyArg_Parse(args, "s", &str)) return NULL; return newfhobject(fmfindfont(str)); } static PyObject * fm_prstr(PyObject *self, PyObject *args) { char *str; if (!PyArg_Parse(args, "s", &str)) return NULL; fmprstr(str); Py_INCREF(Py_None); return Py_None; } /* XXX This uses a global variable as temporary! Not re-entrant! */ static PyObject *fontlist; static void clientproc(char *fontname) { int err; PyObject *v; if (fontlist == NULL) return; v = PyString_FromString(fontname); if (v == NULL) err = -1; else { err = PyList_Append(fontlist, v); Py_DECREF(v); } if (err != 0) { Py_DECREF(fontlist); fontlist = NULL; } } static PyObject * fm_enumerate(PyObject *self) { PyObject *res; fontlist = PyList_New(0); if (fontlist == NULL) return NULL; fmenumerate(clientproc); res = fontlist; fontlist = NULL; return res; } static PyObject * fm_setpath(PyObject *self, PyObject *args) { char *str; if (!PyArg_Parse(args, "s", &str)) return NULL; fmsetpath(str); Py_INCREF(Py_None); return Py_None; } static PyObject * fm_fontpath(PyObject *self) { return PyString_FromString(fmfontpath()); } static PyMethodDef fm_methods[] = { {"init", fm_init, METH_NOARGS}, {"findfont", fm_findfont, METH_OLDARGS}, {"enumerate", fm_enumerate, METH_NOARGS}, {"prstr", fm_prstr, METH_OLDARGS}, {"setpath", fm_setpath, METH_OLDARGS}, {"fontpath", fm_fontpath, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; void initfm(void) { Py_InitModule("fm", fm_methods); fminit(); } Python-2.3.7/Modules/syslogmodule.c0000644001241000117560000001477007522367001016565 0ustar loewishpifb6/*********************************************************** Copyright 1994 by Lance Ellinghouse, Cathedral City, California Republic, United States of America. All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the name of Lance Ellinghouse not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. LANCE ELLINGHOUSE DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL LANCE ELLINGHOUSE BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ******************************************************************/ /****************************************************************** Revision history: 1998/04/28 (Sean Reifschneider) - When facility not specified to syslog() method, use default from openlog() (This is how it was claimed to work in the documentation) - Potential resource leak of o_ident, now cleaned up in closelog() - Minor comment accuracy fix. 95/06/29 (Steve Clift) - Changed arg parsing to use PyArg_ParseTuple. - Added PyErr_Clear() call(s) where needed. - Fix core dumps if user message contains format specifiers. - Change openlog arg defaults to match normal syslog behavior. - Plug memory leak in openlog(). - Fix setlogmask() to return previous mask value. ******************************************************************/ /* syslog module */ #include "Python.h" #include /* only one instance, only one syslog, so globals should be ok */ static PyObject *S_ident_o = NULL; /* identifier, held by openlog() */ static PyObject * syslog_openlog(PyObject * self, PyObject * args) { long logopt = 0; long facility = LOG_USER; Py_XDECREF(S_ident_o); if (!PyArg_ParseTuple(args, "S|ll;ident string [, logoption [, facility]]", &S_ident_o, &logopt, &facility)) return NULL; /* This is needed because openlog() does NOT make a copy * and syslog() later uses it.. cannot trash it. */ Py_INCREF(S_ident_o); openlog(PyString_AsString(S_ident_o), logopt, facility); Py_INCREF(Py_None); return Py_None; } static PyObject * syslog_syslog(PyObject * self, PyObject * args) { char *message; int priority = LOG_INFO; if (!PyArg_ParseTuple(args, "is;[priority,] message string", &priority, &message)) { PyErr_Clear(); if (!PyArg_ParseTuple(args, "s;[priority,] message string", &message)) return NULL; } syslog(priority, "%s", message); Py_INCREF(Py_None); return Py_None; } static PyObject * syslog_closelog(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":closelog")) return NULL; closelog(); Py_XDECREF(S_ident_o); S_ident_o = NULL; Py_INCREF(Py_None); return Py_None; } static PyObject * syslog_setlogmask(PyObject *self, PyObject *args) { long maskpri, omaskpri; if (!PyArg_ParseTuple(args, "l;mask for priority", &maskpri)) return NULL; omaskpri = setlogmask(maskpri); return PyInt_FromLong(omaskpri); } static PyObject * syslog_log_mask(PyObject *self, PyObject *args) { long mask; long pri; if (!PyArg_ParseTuple(args, "l:LOG_MASK", &pri)) return NULL; mask = LOG_MASK(pri); return PyInt_FromLong(mask); } static PyObject * syslog_log_upto(PyObject *self, PyObject *args) { long mask; long pri; if (!PyArg_ParseTuple(args, "l:LOG_UPTO", &pri)) return NULL; mask = LOG_UPTO(pri); return PyInt_FromLong(mask); } /* List of functions defined in the module */ static PyMethodDef syslog_methods[] = { {"openlog", syslog_openlog, METH_VARARGS}, {"closelog", syslog_closelog, METH_VARARGS}, {"syslog", syslog_syslog, METH_VARARGS}, {"setlogmask", syslog_setlogmask, METH_VARARGS}, {"LOG_MASK", syslog_log_mask, METH_VARARGS}, {"LOG_UPTO", syslog_log_upto, METH_VARARGS}, {NULL, NULL, 0} }; /* Initialization function for the module */ PyMODINIT_FUNC initsyslog(void) { PyObject *m; /* Create the module and add the functions */ m = Py_InitModule("syslog", syslog_methods); /* Add some symbolic constants to the module */ /* Priorities */ PyModule_AddIntConstant(m, "LOG_EMERG", LOG_EMERG); PyModule_AddIntConstant(m, "LOG_ALERT", LOG_ALERT); PyModule_AddIntConstant(m, "LOG_CRIT", LOG_CRIT); PyModule_AddIntConstant(m, "LOG_ERR", LOG_ERR); PyModule_AddIntConstant(m, "LOG_WARNING", LOG_WARNING); PyModule_AddIntConstant(m, "LOG_NOTICE", LOG_NOTICE); PyModule_AddIntConstant(m, "LOG_INFO", LOG_INFO); PyModule_AddIntConstant(m, "LOG_DEBUG", LOG_DEBUG); /* openlog() option flags */ PyModule_AddIntConstant(m, "LOG_PID", LOG_PID); PyModule_AddIntConstant(m, "LOG_CONS", LOG_CONS); PyModule_AddIntConstant(m, "LOG_NDELAY", LOG_NDELAY); #ifdef LOG_NOWAIT PyModule_AddIntConstant(m, "LOG_NOWAIT", LOG_NOWAIT); #endif #ifdef LOG_PERROR PyModule_AddIntConstant(m, "LOG_PERROR", LOG_PERROR); #endif /* Facilities */ PyModule_AddIntConstant(m, "LOG_KERN", LOG_KERN); PyModule_AddIntConstant(m, "LOG_USER", LOG_USER); PyModule_AddIntConstant(m, "LOG_MAIL", LOG_MAIL); PyModule_AddIntConstant(m, "LOG_DAEMON", LOG_DAEMON); PyModule_AddIntConstant(m, "LOG_AUTH", LOG_AUTH); PyModule_AddIntConstant(m, "LOG_LPR", LOG_LPR); PyModule_AddIntConstant(m, "LOG_LOCAL0", LOG_LOCAL0); PyModule_AddIntConstant(m, "LOG_LOCAL1", LOG_LOCAL1); PyModule_AddIntConstant(m, "LOG_LOCAL2", LOG_LOCAL2); PyModule_AddIntConstant(m, "LOG_LOCAL3", LOG_LOCAL3); PyModule_AddIntConstant(m, "LOG_LOCAL4", LOG_LOCAL4); PyModule_AddIntConstant(m, "LOG_LOCAL5", LOG_LOCAL5); PyModule_AddIntConstant(m, "LOG_LOCAL6", LOG_LOCAL6); PyModule_AddIntConstant(m, "LOG_LOCAL7", LOG_LOCAL7); #ifndef LOG_SYSLOG #define LOG_SYSLOG LOG_DAEMON #endif #ifndef LOG_NEWS #define LOG_NEWS LOG_MAIL #endif #ifndef LOG_UUCP #define LOG_UUCP LOG_MAIL #endif #ifndef LOG_CRON #define LOG_CRON LOG_DAEMON #endif PyModule_AddIntConstant(m, "LOG_SYSLOG", LOG_SYSLOG); PyModule_AddIntConstant(m, "LOG_CRON", LOG_CRON); PyModule_AddIntConstant(m, "LOG_UUCP", LOG_UUCP); PyModule_AddIntConstant(m, "LOG_NEWS", LOG_NEWS); } Python-2.3.7/Modules/_testcapimodule.c0000644001241000117560000004673210201654506017220 0ustar loewishpifb6/* * C Extension module to test Python interpreter C APIs. * * The 'test_*' functions exported by this module are run as part of the * standard Python regression test, via Lib/test/test_capi.py. */ #include "Python.h" #ifdef WITH_THREAD #include "pythread.h" #endif /* WITH_THREAD */ static PyObject *TestError; /* set to exception object in init */ /* Raise TestError with test_name + ": " + msg, and return NULL. */ static PyObject * raiseTestError(const char* test_name, const char* msg) { char buf[2048]; if (strlen(test_name) + strlen(msg) > sizeof(buf) - 50) PyErr_SetString(TestError, "internal error msg too large"); else { PyOS_snprintf(buf, sizeof(buf), "%s: %s", test_name, msg); PyErr_SetString(TestError, buf); } return NULL; } /* Test #defines from pyconfig.h (particularly the SIZEOF_* defines). The ones derived from autoconf on the UNIX-like OSes can be relied upon (in the absence of sloppy cross-compiling), but the Windows platforms have these hardcoded. Better safe than sorry. */ static PyObject* sizeof_error(const char* fatname, const char* typename, int expected, int got) { char buf[1024]; PyOS_snprintf(buf, sizeof(buf), "%.200s #define == %d but sizeof(%.200s) == %d", fatname, expected, typename, got); PyErr_SetString(TestError, buf); return (PyObject*)NULL; } static PyObject* test_config(PyObject *self) { #define CHECK_SIZEOF(FATNAME, TYPE) \ if (FATNAME != sizeof(TYPE)) \ return sizeof_error(#FATNAME, #TYPE, FATNAME, sizeof(TYPE)) CHECK_SIZEOF(SIZEOF_SHORT, short); CHECK_SIZEOF(SIZEOF_INT, int); CHECK_SIZEOF(SIZEOF_LONG, long); CHECK_SIZEOF(SIZEOF_VOID_P, void*); CHECK_SIZEOF(SIZEOF_TIME_T, time_t); #ifdef HAVE_LONG_LONG CHECK_SIZEOF(SIZEOF_LONG_LONG, PY_LONG_LONG); #endif #undef CHECK_SIZEOF Py_INCREF(Py_None); return Py_None; } static PyObject* test_list_api(PyObject *self) { PyObject* list; int i; /* SF bug 132008: PyList_Reverse segfaults */ #define NLIST 30 list = PyList_New(NLIST); if (list == (PyObject*)NULL) return (PyObject*)NULL; /* list = range(NLIST) */ for (i = 0; i < NLIST; ++i) { PyObject* anint = PyInt_FromLong(i); if (anint == (PyObject*)NULL) { Py_DECREF(list); return (PyObject*)NULL; } PyList_SET_ITEM(list, i, anint); } /* list.reverse(), via PyList_Reverse() */ i = PyList_Reverse(list); /* should not blow up! */ if (i != 0) { Py_DECREF(list); return (PyObject*)NULL; } /* Check that list == range(29, -1, -1) now */ for (i = 0; i < NLIST; ++i) { PyObject* anint = PyList_GET_ITEM(list, i); if (PyInt_AS_LONG(anint) != NLIST-1-i) { PyErr_SetString(TestError, "test_list_api: reverse screwed up"); Py_DECREF(list); return (PyObject*)NULL; } } Py_DECREF(list); #undef NLIST Py_INCREF(Py_None); return Py_None; } static int test_dict_inner(int count) { int pos = 0, iterations = 0, i; PyObject *dict = PyDict_New(); PyObject *v, *k; if (dict == NULL) return -1; for (i = 0; i < count; i++) { v = PyInt_FromLong(i); PyDict_SetItem(dict, v, v); Py_DECREF(v); } while (PyDict_Next(dict, &pos, &k, &v)) { PyObject *o; iterations++; i = PyInt_AS_LONG(v) + 1; o = PyInt_FromLong(i); if (o == NULL) return -1; if (PyDict_SetItem(dict, k, o) < 0) { Py_DECREF(o); return -1; } Py_DECREF(o); } Py_DECREF(dict); if (iterations != count) { PyErr_SetString( TestError, "test_dict_iteration: dict iteration went wrong "); return -1; } else { return 0; } } static PyObject* test_dict_iteration(PyObject* self) { int i; for (i = 0; i < 200; i++) { if (test_dict_inner(i) < 0) { return NULL; } } Py_INCREF(Py_None); return Py_None; } /* Tests of PyLong_{As, From}{Unsigned,}Long(), and (#ifdef HAVE_LONG_LONG) PyLong_{As, From}{Unsigned,}LongLong(). Note that the meat of the test is contained in testcapi_long.h. This is revolting, but delicate code duplication is worse: "almost exactly the same" code is needed to test PY_LONG_LONG, but the ubiquitous dependence on type names makes it impossible to use a parameterized function. A giant macro would be even worse than this. A C++ template would be perfect. The "report an error" functions are deliberately not part of the #include file: if the test fails, you can set a breakpoint in the appropriate error function directly, and crawl back from there in the debugger. */ #define UNBIND(X) Py_DECREF(X); (X) = NULL static PyObject * raise_test_long_error(const char* msg) { return raiseTestError("test_long_api", msg); } #define TESTNAME test_long_api_inner #define TYPENAME long #define F_S_TO_PY PyLong_FromLong #define F_PY_TO_S PyLong_AsLong #define F_U_TO_PY PyLong_FromUnsignedLong #define F_PY_TO_U PyLong_AsUnsignedLong #include "testcapi_long.h" static PyObject * test_long_api(PyObject* self) { return TESTNAME(raise_test_long_error); } #undef TESTNAME #undef TYPENAME #undef F_S_TO_PY #undef F_PY_TO_S #undef F_U_TO_PY #undef F_PY_TO_U #ifdef HAVE_LONG_LONG static PyObject * raise_test_longlong_error(const char* msg) { return raiseTestError("test_longlong_api", msg); } #define TESTNAME test_longlong_api_inner #define TYPENAME PY_LONG_LONG #define F_S_TO_PY PyLong_FromLongLong #define F_PY_TO_S PyLong_AsLongLong #define F_U_TO_PY PyLong_FromUnsignedLongLong #define F_PY_TO_U PyLong_AsUnsignedLongLong #include "testcapi_long.h" static PyObject * test_longlong_api(PyObject* self) { return TESTNAME(raise_test_longlong_error); } #undef TESTNAME #undef TYPENAME #undef F_S_TO_PY #undef F_PY_TO_S #undef F_U_TO_PY #undef F_PY_TO_U /* Test the L code for PyArg_ParseTuple. This should deliver a PY_LONG_LONG for both long and int arguments. The test may leak a little memory if it fails. */ static PyObject * test_L_code(PyObject *self) { PyObject *tuple, *num; PY_LONG_LONG value; tuple = PyTuple_New(1); if (tuple == NULL) return NULL; num = PyLong_FromLong(42); if (num == NULL) return NULL; PyTuple_SET_ITEM(tuple, 0, num); value = -1; if (PyArg_ParseTuple(tuple, "L:test_L_code", &value) < 0) return NULL; if (value != 42) return raiseTestError("test_L_code", "L code returned wrong value for long 42"); Py_DECREF(num); num = PyInt_FromLong(42); if (num == NULL) return NULL; PyTuple_SET_ITEM(tuple, 0, num); value = -1; if (PyArg_ParseTuple(tuple, "L:test_L_code", &value) < 0) return NULL; if (value != 42) return raiseTestError("test_L_code", "L code returned wrong value for int 42"); Py_DECREF(tuple); Py_INCREF(Py_None); return Py_None; } #endif /* ifdef HAVE_LONG_LONG */ /* Functions to call PyArg_ParseTuple with integer format codes, and return the result. */ static PyObject * getargs_b(PyObject *self, PyObject *args) { unsigned char value; if (!PyArg_ParseTuple(args, "b", &value)) return NULL; return PyLong_FromUnsignedLong((unsigned long)value); } static PyObject * getargs_B(PyObject *self, PyObject *args) { unsigned char value; if (!PyArg_ParseTuple(args, "B", &value)) return NULL; return PyLong_FromUnsignedLong((unsigned long)value); } static PyObject * getargs_H(PyObject *self, PyObject *args) { unsigned short value; if (!PyArg_ParseTuple(args, "H", &value)) return NULL; return PyLong_FromUnsignedLong((unsigned long)value); } static PyObject * getargs_I(PyObject *self, PyObject *args) { unsigned int value; if (!PyArg_ParseTuple(args, "I", &value)) return NULL; return PyLong_FromUnsignedLong((unsigned long)value); } static PyObject * getargs_k(PyObject *self, PyObject *args) { unsigned long value; if (!PyArg_ParseTuple(args, "k", &value)) return NULL; return PyLong_FromUnsignedLong(value); } static PyObject * getargs_i(PyObject *self, PyObject *args) { int value; if (!PyArg_ParseTuple(args, "i", &value)) return NULL; return PyLong_FromLong((long)value); } static PyObject * getargs_l(PyObject *self, PyObject *args) { long value; if (!PyArg_ParseTuple(args, "l", &value)) return NULL; return PyLong_FromLong(value); } #ifdef HAVE_LONG_LONG static PyObject * getargs_L(PyObject *self, PyObject *args) { PY_LONG_LONG value; if (!PyArg_ParseTuple(args, "L", &value)) return NULL; return PyLong_FromLongLong(value); } static PyObject * getargs_K(PyObject *self, PyObject *args) { unsigned PY_LONG_LONG value; if (!PyArg_ParseTuple(args, "K", &value)) return NULL; return PyLong_FromUnsignedLongLong(value); } #endif /* This function not only tests the 'k' getargs code, but also the PyInt_AsUnsignedLongMask() and PyInt_AsUnsignedLongMask() functions. */ static PyObject * test_k_code(PyObject *self) { PyObject *tuple, *num; unsigned long value; tuple = PyTuple_New(1); if (tuple == NULL) return NULL; /* a number larger than ULONG_MAX even on 64-bit platforms */ num = PyLong_FromString("FFFFFFFFFFFFFFFFFFFFFFFF", NULL, 16); if (num == NULL) return NULL; value = PyInt_AsUnsignedLongMask(num); if (value != ULONG_MAX) return raiseTestError("test_k_code", "PyInt_AsUnsignedLongMask() returned wrong value for long 0xFFF...FFF"); PyTuple_SET_ITEM(tuple, 0, num); value = -1; if (PyArg_ParseTuple(tuple, "k:test_k_code", &value) < 0) return NULL; if (value != ULONG_MAX) return raiseTestError("test_k_code", "k code returned wrong value for long 0xFFF...FFF"); Py_DECREF(num); num = PyLong_FromString("-FFFFFFFF000000000000000042", NULL, 16); if (num == NULL) return NULL; value = PyInt_AsUnsignedLongMask(num); if (value != (unsigned long)-0x42) return raiseTestError("test_k_code", "PyInt_AsUnsignedLongMask() returned wrong value for long 0xFFF...FFF"); PyTuple_SET_ITEM(tuple, 0, num); value = -1; if (PyArg_ParseTuple(tuple, "k:test_k_code", &value) < 0) return NULL; if (value != (unsigned long)-0x42) return raiseTestError("test_k_code", "k code returned wrong value for long -0xFFF..000042"); Py_DECREF(tuple); Py_INCREF(Py_None); return Py_None; } #ifdef Py_USING_UNICODE /* Test the u and u# codes for PyArg_ParseTuple. May leak memory in case of an error. */ static PyObject * test_u_code(PyObject *self) { PyObject *tuple, *obj; Py_UNICODE *value; int len; tuple = PyTuple_New(1); if (tuple == NULL) return NULL; obj = PyUnicode_Decode("test", strlen("test"), "ascii", NULL); if (obj == NULL) return NULL; PyTuple_SET_ITEM(tuple, 0, obj); value = 0; if (PyArg_ParseTuple(tuple, "u:test_u_code", &value) < 0) return NULL; if (value != PyUnicode_AS_UNICODE(obj)) return raiseTestError("test_u_code", "u code returned wrong value for u'test'"); value = 0; if (PyArg_ParseTuple(tuple, "u#:test_u_code", &value, &len) < 0) return NULL; if (value != PyUnicode_AS_UNICODE(obj) || len != PyUnicode_GET_SIZE(obj)) return raiseTestError("test_u_code", "u# code returned wrong values for u'test'"); Py_DECREF(tuple); Py_INCREF(Py_None); return Py_None; } #endif /* Simple test of _PyLong_NumBits and _PyLong_Sign. */ static PyObject * test_long_numbits(PyObject *self) { struct triple { long input; size_t nbits; int sign; } testcases[] = {{0, 0, 0}, {1L, 1, 1}, {-1L, 1, -1}, {2L, 2, 1}, {-2L, 2, -1}, {3L, 2, 1}, {-3L, 2, -1}, {4L, 3, 1}, {-4L, 3, -1}, {0x7fffL, 15, 1}, /* one Python long digit */ {-0x7fffL, 15, -1}, {0xffffL, 16, 1}, {-0xffffL, 16, -1}, {0xfffffffL, 28, 1}, {-0xfffffffL, 28, -1}}; int i; for (i = 0; i < sizeof(testcases) / sizeof(struct triple); ++i) { PyObject *plong = PyLong_FromLong(testcases[i].input); size_t nbits = _PyLong_NumBits(plong); int sign = _PyLong_Sign(plong); Py_DECREF(plong); if (nbits != testcases[i].nbits) return raiseTestError("test_long_numbits", "wrong result for _PyLong_NumBits"); if (sign != testcases[i].sign) return raiseTestError("test_long_numbits", "wrong result for _PyLong_Sign"); } Py_INCREF(Py_None); return Py_None; } static PyObject * raise_exception(PyObject *self, PyObject *args) { PyObject *exc; PyObject *exc_args, *v; int num_args, i; if (!PyArg_ParseTuple(args, "Oi:raise_exception", &exc, &num_args)) return NULL; exc_args = PyTuple_New(num_args); if (exc_args == NULL) return NULL; for (i = 0; i < num_args; ++i) { v = PyInt_FromLong(i); if (v == NULL) { Py_DECREF(exc_args); return NULL; } PyTuple_SET_ITEM(exc_args, i, v); } PyErr_SetObject(exc, exc_args); Py_DECREF(exc_args); return NULL; } #ifdef WITH_THREAD void _make_call(void *callable) { PyObject *rc; PyGILState_STATE s = PyGILState_Ensure(); rc = PyObject_CallFunction(callable, ""); Py_XDECREF(rc); PyGILState_Release(s); } static PyObject * test_thread_state(PyObject *self, PyObject *args) { PyObject *fn; if (!PyArg_ParseTuple(args, "O:test_thread_state", &fn)) return NULL; /* Ensure Python is setup for threading */ PyEval_InitThreads(); /* Start a new thread for our callback. */ PyThread_start_new_thread( _make_call, fn); /* Make the callback with the thread lock held by this thread */ _make_call(fn); /* Do it all again, but this time with the thread-lock released */ Py_BEGIN_ALLOW_THREADS _make_call(fn); Py_END_ALLOW_THREADS /* And once more with and without a thread XXX - should use a lock and work out exactly what we are trying to test */ Py_BEGIN_ALLOW_THREADS PyThread_start_new_thread( _make_call, fn); _make_call(fn); Py_END_ALLOW_THREADS Py_INCREF(Py_None); return Py_None; } #endif /* a classic-type with copyable instances */ typedef struct { PyObject_HEAD /* instance tag (a string). */ PyObject* tag; } CopyableObject; staticforward PyTypeObject Copyable_Type; #define Copyable_CheckExact(op) ((op)->ob_type == &Copyable_Type) /* -------------------------------------------------------------------- */ /* copyable constructor and destructor */ static PyObject* copyable_new(PyObject* tag) { CopyableObject* self; self = PyObject_New(CopyableObject, &Copyable_Type); if (self == NULL) return NULL; Py_INCREF(tag); self->tag = tag; return (PyObject*) self; } static PyObject* copyable(PyObject* self, PyObject* args, PyObject* kw) { PyObject* elem; PyObject* tag; if (!PyArg_ParseTuple(args, "O:Copyable", &tag)) return NULL; elem = copyable_new(tag); return elem; } static void copyable_dealloc(CopyableObject* self) { /* discard attributes */ Py_DECREF(self->tag); PyObject_Del(self); } /* copyable methods */ static PyObject* copyable_copy(CopyableObject* self, PyObject* args) { CopyableObject* copyable; if (!PyArg_ParseTuple(args, ":__copy__")) return NULL; copyable = (CopyableObject*)copyable_new(self->tag); if (!copyable) return NULL; return (PyObject*) copyable; } PyObject* _copy_deepcopy; static PyObject* copyable_deepcopy(CopyableObject* self, PyObject* args) { CopyableObject* copyable = 0; PyObject* memo; PyObject* tag_copy; if (!PyArg_ParseTuple(args, "O:__deepcopy__", &memo)) return NULL; tag_copy = PyObject_CallFunctionObjArgs(_copy_deepcopy, self->tag, memo, NULL); if(tag_copy) { copyable = (CopyableObject*)copyable_new(tag_copy); Py_DECREF(tag_copy); } return (PyObject*) copyable; } static PyObject* copyable_repr(CopyableObject* self) { PyObject* repr; char buffer[100]; repr = PyString_FromString("tag)); sprintf(buffer, "} at %p>", self); PyString_ConcatAndDel(&repr, PyString_FromString(buffer)); return repr; } static int copyable_compare(CopyableObject* obj1, CopyableObject* obj2) { return PyObject_Compare(obj1->tag, obj2->tag); } static PyMethodDef copyable_methods[] = { {"__copy__", (PyCFunction) copyable_copy, METH_VARARGS}, {"__deepcopy__", (PyCFunction) copyable_deepcopy, METH_VARARGS}, {NULL, NULL} }; static PyObject* copyable_getattr(CopyableObject* self, char* name) { PyObject* res; res = Py_FindMethod(copyable_methods, (PyObject*) self, name); if (res) return res; PyErr_Clear(); if (strcmp(name, "tag") == 0) { res = self->tag; } else { PyErr_SetString(PyExc_AttributeError, name); return NULL; } if (!res) return NULL; Py_INCREF(res); return res; } static int copyable_setattr(CopyableObject* self, const char* name, PyObject* value) { if (value == NULL) { PyErr_SetString( PyExc_AttributeError, "can't delete copyable attributes" ); return -1; } if (strcmp(name, "tag") == 0) { Py_DECREF(self->tag); self->tag = value; Py_INCREF(self->tag); } else { PyErr_SetString(PyExc_AttributeError, name); return -1; } return 0; } statichere PyTypeObject Copyable_Type = { PyObject_HEAD_INIT(NULL) 0, "Copyable", sizeof(CopyableObject), 0, /* methods */ (destructor)copyable_dealloc, /* tp_dealloc */ 0, /* tp_print */ (getattrfunc)copyable_getattr, /* tp_getattr */ (setattrfunc)copyable_setattr, /* tp_setattr */ (cmpfunc)copyable_compare, /* tp_compare */ (reprfunc)copyable_repr, /* tp_repr */ 0, /* tp_as_number */ }; static PyMethodDef TestMethods[] = { {"raise_exception", raise_exception, METH_VARARGS}, {"test_config", (PyCFunction)test_config, METH_NOARGS}, {"test_list_api", (PyCFunction)test_list_api, METH_NOARGS}, {"test_dict_iteration", (PyCFunction)test_dict_iteration,METH_NOARGS}, {"test_long_api", (PyCFunction)test_long_api, METH_NOARGS}, {"test_long_numbits", (PyCFunction)test_long_numbits, METH_NOARGS}, {"test_k_code", (PyCFunction)test_k_code, METH_NOARGS}, {"getargs_b", (PyCFunction)getargs_b, METH_VARARGS}, {"getargs_B", (PyCFunction)getargs_B, METH_VARARGS}, {"getargs_H", (PyCFunction)getargs_H, METH_VARARGS}, {"getargs_I", (PyCFunction)getargs_I, METH_VARARGS}, {"getargs_k", (PyCFunction)getargs_k, METH_VARARGS}, {"getargs_i", (PyCFunction)getargs_i, METH_VARARGS}, {"getargs_l", (PyCFunction)getargs_l, METH_VARARGS}, #ifdef HAVE_LONG_LONG {"getargs_L", (PyCFunction)getargs_L, METH_VARARGS}, {"getargs_K", (PyCFunction)getargs_K, METH_VARARGS}, {"test_longlong_api", (PyCFunction)test_longlong_api, METH_NOARGS}, {"test_L_code", (PyCFunction)test_L_code, METH_NOARGS}, #endif #ifdef Py_USING_UNICODE {"test_u_code", (PyCFunction)test_u_code, METH_NOARGS}, #endif #ifdef WITH_THREAD {"_test_thread_state", (PyCFunction)test_thread_state, METH_VARARGS}, #endif {"make_copyable", (PyCFunction) copyable, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; #define AddSym(d, n, f, v) {PyObject *o = f(v); PyDict_SetItemString(d, n, o); Py_DECREF(o);} PyMODINIT_FUNC init_testcapi(void) { PyObject *m; PyObject *copy_module; copy_module = PyImport_ImportModule("copy"); if(!copy_module) return; _copy_deepcopy = PyObject_GetAttrString(copy_module, "deepcopy"); Py_DECREF(copy_module); Copyable_Type.ob_type = &PyType_Type; m = Py_InitModule("_testcapi", TestMethods); PyModule_AddObject(m, "UCHAR_MAX", PyInt_FromLong(UCHAR_MAX)); PyModule_AddObject(m, "USHRT_MAX", PyInt_FromLong(USHRT_MAX)); PyModule_AddObject(m, "UINT_MAX", PyLong_FromUnsignedLong(UINT_MAX)); PyModule_AddObject(m, "ULONG_MAX", PyLong_FromUnsignedLong(ULONG_MAX)); PyModule_AddObject(m, "INT_MIN", PyInt_FromLong(INT_MIN)); PyModule_AddObject(m, "LONG_MIN", PyInt_FromLong(LONG_MIN)); PyModule_AddObject(m, "INT_MAX", PyInt_FromLong(INT_MAX)); PyModule_AddObject(m, "LONG_MAX", PyInt_FromLong(LONG_MAX)); TestError = PyErr_NewException("_testcapi.error", NULL, NULL); Py_INCREF(TestError); PyModule_AddObject(m, "error", TestError); } Python-2.3.7/Modules/gcmodule.c0000644001241000117560000011024110141263341015615 0ustar loewishpifb6/* Reference Cycle Garbage Collection ================================== Neil Schemenauer Based on a post on the python-dev list. Ideas from Guido van Rossum, Eric Tiedemann, and various others. http://www.arctrix.com/nas/python/gc/ http://www.python.org/pipermail/python-dev/2000-March/003869.html http://www.python.org/pipermail/python-dev/2000-March/004010.html http://www.python.org/pipermail/python-dev/2000-March/004022.html For a highlevel view of the collection process, read the collect function. */ #include "Python.h" /* Get an object's GC head */ #define AS_GC(o) ((PyGC_Head *)(o)-1) /* Get the object given the GC head */ #define FROM_GC(g) ((PyObject *)(((PyGC_Head *)g)+1)) /*** Global GC state ***/ struct gc_generation { PyGC_Head head; int threshold; /* collection threshold */ int count; /* count of allocations or collections of younger generations */ }; #define NUM_GENERATIONS 3 #define GEN_HEAD(n) (&generations[n].head) /* linked lists of container objects */ static struct gc_generation generations[NUM_GENERATIONS] = { /* PyGC_Head, threshold, count */ {{{GEN_HEAD(0), GEN_HEAD(0), 0}}, 700, 0}, {{{GEN_HEAD(1), GEN_HEAD(1), 0}}, 10, 0}, {{{GEN_HEAD(2), GEN_HEAD(2), 0}}, 10, 0}, }; PyGC_Head *_PyGC_generation0 = GEN_HEAD(0); static int enabled = 1; /* automatic collection enabled? */ /* true if we are currently running the collector */ static int collecting = 0; /* list of uncollectable objects */ static PyObject *garbage = NULL; /* Python string to use if unhandled exception occurs */ static PyObject *gc_str = NULL; /* Python string used to look for __del__ attribute. */ static PyObject *delstr = NULL; /* set for debugging information */ #define DEBUG_STATS (1<<0) /* print collection statistics */ #define DEBUG_COLLECTABLE (1<<1) /* print collectable objects */ #define DEBUG_UNCOLLECTABLE (1<<2) /* print uncollectable objects */ #define DEBUG_INSTANCES (1<<3) /* print instances */ #define DEBUG_OBJECTS (1<<4) /* print other objects */ #define DEBUG_SAVEALL (1<<5) /* save all garbage in gc.garbage */ #define DEBUG_LEAK DEBUG_COLLECTABLE | \ DEBUG_UNCOLLECTABLE | \ DEBUG_INSTANCES | \ DEBUG_OBJECTS | \ DEBUG_SAVEALL static int debug; /*-------------------------------------------------------------------------- gc_refs values. Between collections, every gc'ed object has one of two gc_refs values: GC_UNTRACKED The initial state; objects returned by PyObject_GC_Malloc are in this state. The object doesn't live in any generation list, and its tp_traverse slot must not be called. GC_REACHABLE The object lives in some generation list, and its tp_traverse is safe to call. An object transitions to GC_REACHABLE when PyObject_GC_Track is called. During a collection, gc_refs can temporarily take on other states: >= 0 At the start of a collection, update_refs() copies the true refcount to gc_refs, for each object in the generation being collected. subtract_refs() then adjusts gc_refs so that it equals the number of times an object is referenced directly from outside the generation being collected. gc_refs remains >= 0 throughout these steps. GC_TENTATIVELY_UNREACHABLE move_unreachable() then moves objects not reachable (whether directly or indirectly) from outside the generation into an "unreachable" set. Objects that are found to be reachable have gc_refs set to GC_REACHABLE again. Objects that are found to be unreachable have gc_refs set to GC_TENTATIVELY_UNREACHABLE. It's "tentatively" because the pass doing this can't be sure until it ends, and GC_TENTATIVELY_UNREACHABLE may transition back to GC_REACHABLE. Only objects with GC_TENTATIVELY_UNREACHABLE still set are candidates for collection. If it's decided not to collect such an object (e.g., it has a __del__ method), its gc_refs is restored to GC_REACHABLE again. ---------------------------------------------------------------------------- */ #define GC_UNTRACKED _PyGC_REFS_UNTRACKED #define GC_REACHABLE _PyGC_REFS_REACHABLE #define GC_TENTATIVELY_UNREACHABLE _PyGC_REFS_TENTATIVELY_UNREACHABLE #define IS_TRACKED(o) ((AS_GC(o))->gc.gc_refs != GC_UNTRACKED) #define IS_REACHABLE(o) ((AS_GC(o))->gc.gc_refs == GC_REACHABLE) #define IS_TENTATIVELY_UNREACHABLE(o) ( \ (AS_GC(o))->gc.gc_refs == GC_TENTATIVELY_UNREACHABLE) /*** list functions ***/ static void gc_list_init(PyGC_Head *list) { list->gc.gc_prev = list; list->gc.gc_next = list; } static int gc_list_is_empty(PyGC_Head *list) { return (list->gc.gc_next == list); } static void gc_list_append(PyGC_Head *node, PyGC_Head *list) { node->gc.gc_next = list; node->gc.gc_prev = list->gc.gc_prev; node->gc.gc_prev->gc.gc_next = node; list->gc.gc_prev = node; } static void gc_list_remove(PyGC_Head *node) { node->gc.gc_prev->gc.gc_next = node->gc.gc_next; node->gc.gc_next->gc.gc_prev = node->gc.gc_prev; node->gc.gc_next = NULL; /* object is not currently tracked */ } /* append a list onto another list, from becomes an empty list */ static void gc_list_merge(PyGC_Head *from, PyGC_Head *to) { PyGC_Head *tail; if (!gc_list_is_empty(from)) { tail = to->gc.gc_prev; tail->gc.gc_next = from->gc.gc_next; tail->gc.gc_next->gc.gc_prev = tail; to->gc.gc_prev = from->gc.gc_prev; to->gc.gc_prev->gc.gc_next = to; } gc_list_init(from); } static long gc_list_size(PyGC_Head *list) { PyGC_Head *gc; long n = 0; for (gc = list->gc.gc_next; gc != list; gc = gc->gc.gc_next) { n++; } return n; } /* Append objects in a GC list to a Python list. * Return 0 if all OK, < 0 if error (out of memory for list). */ static int append_objects(PyObject *py_list, PyGC_Head *gc_list) { PyGC_Head *gc; for (gc = gc_list->gc.gc_next; gc != gc_list; gc = gc->gc.gc_next) { PyObject *op = FROM_GC(gc); if (op != py_list) { if (PyList_Append(py_list, op)) { return -1; /* exception */ } } } return 0; } /*** end of list stuff ***/ /* Set all gc_refs = ob_refcnt. After this, gc_refs is > 0 for all objects * in containers, and is GC_REACHABLE for all tracked gc objects not in * containers. */ static void update_refs(PyGC_Head *containers) { PyGC_Head *gc = containers->gc.gc_next; for (; gc != containers; gc = gc->gc.gc_next) { assert(gc->gc.gc_refs == GC_REACHABLE); gc->gc.gc_refs = FROM_GC(gc)->ob_refcnt; } } /* A traversal callback for subtract_refs. */ static int visit_decref(PyObject *op, void *data) { assert(op != NULL); if (PyObject_IS_GC(op)) { PyGC_Head *gc = AS_GC(op); /* We're only interested in gc_refs for objects in the * generation being collected, which can be recognized * because only they have positive gc_refs. */ assert(gc->gc.gc_refs != 0); /* else refcount was too small */ if (gc->gc.gc_refs > 0) gc->gc.gc_refs--; } return 0; } /* Subtract internal references from gc_refs. After this, gc_refs is >= 0 * for all objects in containers, and is GC_REACHABLE for all tracked gc * objects not in containers. The ones with gc_refs > 0 are directly * reachable from outside containers, and so can't be collected. */ static void subtract_refs(PyGC_Head *containers) { traverseproc traverse; PyGC_Head *gc = containers->gc.gc_next; for (; gc != containers; gc=gc->gc.gc_next) { traverse = FROM_GC(gc)->ob_type->tp_traverse; (void) traverse(FROM_GC(gc), (visitproc)visit_decref, NULL); } } /* A traversal callback for move_unreachable. */ static int visit_reachable(PyObject *op, PyGC_Head *reachable) { if (PyObject_IS_GC(op)) { PyGC_Head *gc = AS_GC(op); const int gc_refs = gc->gc.gc_refs; if (gc_refs == 0) { /* This is in move_unreachable's 'young' list, but * the traversal hasn't yet gotten to it. All * we need to do is tell move_unreachable that it's * reachable. */ gc->gc.gc_refs = 1; } else if (gc_refs == GC_TENTATIVELY_UNREACHABLE) { /* This had gc_refs = 0 when move_unreachable got * to it, but turns out it's reachable after all. * Move it back to move_unreachable's 'young' list, * and move_unreachable will eventually get to it * again. */ gc_list_remove(gc); gc_list_append(gc, reachable); gc->gc.gc_refs = 1; } /* Else there's nothing to do. * If gc_refs > 0, it must be in move_unreachable's 'young' * list, and move_unreachable will eventually get to it. * If gc_refs == GC_REACHABLE, it's either in some other * generation so we don't care about it, or move_unreachable * already dealt with it. * If gc_refs == GC_UNTRACKED, it must be ignored. */ else { assert(gc_refs > 0 || gc_refs == GC_REACHABLE || gc_refs == GC_UNTRACKED); } } return 0; } /* Move the unreachable objects from young to unreachable. After this, * all objects in young have gc_refs = GC_REACHABLE, and all objects in * unreachable have gc_refs = GC_TENTATIVELY_UNREACHABLE. All tracked * gc objects not in young or unreachable still have gc_refs = GC_REACHABLE. * All objects in young after this are directly or indirectly reachable * from outside the original young; and all objects in unreachable are * not. */ static void move_unreachable(PyGC_Head *young, PyGC_Head *unreachable) { PyGC_Head *gc = young->gc.gc_next; /* Invariants: all objects "to the left" of us in young have gc_refs * = GC_REACHABLE, and are indeed reachable (directly or indirectly) * from outside the young list as it was at entry. All other objects * from the original young "to the left" of us are in unreachable now, * and have gc_refs = GC_TENTATIVELY_UNREACHABLE. All objects to the * left of us in 'young' now have been scanned, and no objects here * or to the right have been scanned yet. */ while (gc != young) { PyGC_Head *next; if (gc->gc.gc_refs) { /* gc is definitely reachable from outside the * original 'young'. Mark it as such, and traverse * its pointers to find any other objects that may * be directly reachable from it. Note that the * call to tp_traverse may append objects to young, * so we have to wait until it returns to determine * the next object to visit. */ PyObject *op = FROM_GC(gc); traverseproc traverse = op->ob_type->tp_traverse; assert(gc->gc.gc_refs > 0); gc->gc.gc_refs = GC_REACHABLE; (void) traverse(op, (visitproc)visit_reachable, (void *)young); next = gc->gc.gc_next; } else { /* This *may* be unreachable. To make progress, * assume it is. gc isn't directly reachable from * any object we've already traversed, but may be * reachable from an object we haven't gotten to yet. * visit_reachable will eventually move gc back into * young if that's so, and we'll see it again. */ next = gc->gc.gc_next; gc_list_remove(gc); gc_list_append(gc, unreachable); gc->gc.gc_refs = GC_TENTATIVELY_UNREACHABLE; } gc = next; } } /* Return true if object has a finalization method. * CAUTION: An instance of an old-style class has to be checked for a *__del__ method, and earlier versions of this used to call PyObject_HasAttr, * which in turn could call the class's __getattr__ hook (if any). That * could invoke arbitrary Python code, mutating the object graph in arbitrary * ways, and that was the source of some excruciatingly subtle bugs. */ static int has_finalizer(PyObject *op) { if (PyInstance_Check(op)) { assert(delstr != NULL); return _PyInstance_Lookup(op, delstr) != NULL; } else if (PyType_HasFeature(op->ob_type, Py_TPFLAGS_HEAPTYPE)) return op->ob_type->tp_del != NULL; else return 0; } /* Move the objects in unreachable with __del__ methods into `finalizers`. * Objects moved into `finalizers` have gc_refs set to GC_REACHABLE; the * objects remaining in unreachable are left at GC_TENTATIVELY_UNREACHABLE. */ static void move_finalizers(PyGC_Head *unreachable, PyGC_Head *finalizers) { PyGC_Head *gc; PyGC_Head *next; /* March over unreachable. Move objects with finalizers into * `finalizers`. */ for (gc = unreachable->gc.gc_next; gc != unreachable; gc = next) { PyObject *op = FROM_GC(gc); assert(IS_TENTATIVELY_UNREACHABLE(op)); next = gc->gc.gc_next; if (has_finalizer(op)) { gc_list_remove(gc); gc_list_append(gc, finalizers); gc->gc.gc_refs = GC_REACHABLE; } } } /* A traversal callback for move_finalizer_reachable. */ static int visit_move(PyObject *op, PyGC_Head *tolist) { if (PyObject_IS_GC(op)) { if (IS_TENTATIVELY_UNREACHABLE(op)) { PyGC_Head *gc = AS_GC(op); gc_list_remove(gc); gc_list_append(gc, tolist); gc->gc.gc_refs = GC_REACHABLE; } } return 0; } /* Move objects that are reachable from finalizers, from the unreachable set * into finalizers set. */ static void move_finalizer_reachable(PyGC_Head *finalizers) { traverseproc traverse; PyGC_Head *gc = finalizers->gc.gc_next; for (; gc != finalizers; gc = gc->gc.gc_next) { /* Note that the finalizers list may grow during this. */ traverse = FROM_GC(gc)->ob_type->tp_traverse; (void) traverse(FROM_GC(gc), (visitproc)visit_move, (void *)finalizers); } } /* Clear all weakrefs to unreachable objects, and if such a weakref has a * callback, invoke it if necessary. Note that it's possible for such * weakrefs to be outside the unreachable set -- indeed, those are precisely * the weakrefs whose callbacks must be invoked. See gc_weakref.txt for * overview & some details. Some weakrefs with callbacks may be reclaimed * directly by this routine; the number reclaimed is the return value. Other * weakrefs with callbacks may be moved into the `old` generation. Objects * moved into `old` have gc_refs set to GC_REACHABLE; the objects remaining in * unreachable are left at GC_TENTATIVELY_UNREACHABLE. When this returns, * no object in `unreachable` is weakly referenced anymore. */ static int handle_weakrefs(PyGC_Head *unreachable, PyGC_Head *old) { PyGC_Head *gc; PyObject *op; /* generally FROM_GC(gc) */ PyWeakReference *wr; /* generally a cast of op */ PyGC_Head wrcb_to_call; /* weakrefs with callbacks to call */ PyGC_Head *next; int num_freed = 0; gc_list_init(&wrcb_to_call); /* Clear all weakrefs to the objects in unreachable. If such a weakref * also has a callback, move it into `wrcb_to_call` if the callback * needs to be invoked. Note that we cannot invoke any callbacks until * all weakrefs to unreachable objects are cleared, lest the callback * resurrect an unreachable object via a still-active weakref. We * make another pass over wrcb_to_call, invoking callbacks, after this * pass completes. */ for (gc = unreachable->gc.gc_next; gc != unreachable; gc = next) { PyWeakReference **wrlist; op = FROM_GC(gc); assert(IS_TENTATIVELY_UNREACHABLE(op)); next = gc->gc.gc_next; if (! PyType_SUPPORTS_WEAKREFS(op->ob_type)) continue; /* It supports weakrefs. Does it have any? */ wrlist = (PyWeakReference **) PyObject_GET_WEAKREFS_LISTPTR(op); /* `op` may have some weakrefs. March over the list, clear * all the weakrefs, and move the weakrefs with callbacks * that must be called into wrcb_to_call. */ for (wr = *wrlist; wr != NULL; wr = *wrlist) { PyGC_Head *wrasgc; /* AS_GC(wr) */ /* _PyWeakref_ClearRef clears the weakref but leaves * the callback pointer intact. Obscure: it also * changes *wrlist. */ assert(wr->wr_object == op); _PyWeakref_ClearRef(wr); assert(wr->wr_object == Py_None); if (wr->wr_callback == NULL) continue; /* no callback */ /* Headache time. `op` is going away, and is weakly referenced by * `wr`, which has a callback. Should the callback be invoked? If wr * is also trash, no: * * 1. There's no need to call it. The object and the weakref are * both going away, so it's legitimate to pretend the weakref is * going away first. The user has to ensure a weakref outlives its * referent if they want a guarantee that the wr callback will get * invoked. * * 2. It may be catastrophic to call it. If the callback is also in * cyclic trash (CT), then although the CT is unreachable from * outside the current generation, CT may be reachable from the * callback. Then the callback could resurrect insane objects. * * Since the callback is never needed and may be unsafe in this case, * wr is simply left in the unreachable set. Note that because we * already called _PyWeakref_ClearRef(wr), its callback will never * trigger. * * OTOH, if wr isn't part of CT, we should invoke the callback: the * weakref outlived the trash. Note that since wr isn't CT in this * case, its callback can't be CT either -- wr acted as an external * root to this generation, and therefore its callback did too. So * nothing in CT is reachable from the callback either, so it's hard * to imagine how calling it later could create a problem for us. wr * is moved to wrcb_to_call in this case. */ if (IS_TENTATIVELY_UNREACHABLE(wr)) continue; assert(IS_REACHABLE(wr)); /* Create a new reference so that wr can't go away * before we can process it again. */ Py_INCREF(wr); /* Move wr to wrcb_to_call, for the next pass. */ wrasgc = AS_GC(wr); assert(wrasgc != next); /* wrasgc is reachable, but next isn't, so they can't be the same */ gc_list_remove(wrasgc); gc_list_append(wrasgc, &wrcb_to_call); } } /* Invoke the callbacks we decided to honor. It's safe to invoke them * because they can't reference unreachable objects. */ while (! gc_list_is_empty(&wrcb_to_call)) { PyObject *temp; PyObject *callback; gc = wrcb_to_call.gc.gc_next; op = FROM_GC(gc); assert(IS_REACHABLE(op)); assert(PyWeakref_Check(op)); wr = (PyWeakReference *)op; callback = wr->wr_callback; assert(callback != NULL); /* copy-paste of weakrefobject.c's handle_callback() */ temp = PyObject_CallFunction(callback, "O", wr); if (temp == NULL) PyErr_WriteUnraisable(callback); else Py_DECREF(temp); /* Give up the reference we created in the first pass. When * op's refcount hits 0 (which it may or may not do right now), * op's tp_dealloc will decref op->wr_callback too. Note * that the refcount probably will hit 0 now, and because this * weakref was reachable to begin with, gc didn't already * add it to its count of freed objects. Example: a reachable * weak value dict maps some key to this reachable weakref. * The callback removes this key->weakref mapping from the * dict, leaving no other references to the weakref (excepting * ours). */ Py_DECREF(op); if (wrcb_to_call.gc.gc_next == gc) { /* object is still alive -- move it */ gc_list_remove(gc); gc_list_append(gc, old); } else ++num_freed; } return num_freed; } static void debug_instance(char *msg, PyInstanceObject *inst) { char *cname; /* simple version of instance_repr */ PyObject *classname = inst->in_class->cl_name; if (classname != NULL && PyString_Check(classname)) cname = PyString_AsString(classname); else cname = "?"; PySys_WriteStderr("gc: %.100s <%.100s instance at %p>\n", msg, cname, inst); } static void debug_cycle(char *msg, PyObject *op) { if ((debug & DEBUG_INSTANCES) && PyInstance_Check(op)) { debug_instance(msg, (PyInstanceObject *)op); } else if (debug & DEBUG_OBJECTS) { PySys_WriteStderr("gc: %.100s <%.100s %p>\n", msg, op->ob_type->tp_name, op); } } /* Handle uncollectable garbage (cycles with finalizers, and stuff reachable * only from such cycles). * If DEBUG_SAVEALL, all objects in finalizers are appended to the module * garbage list (a Python list), else only the objects in finalizers with * __del__ methods are appended to garbage. All objects in finalizers are * merged into the old list regardless. * Returns 0 if all OK, <0 on error (out of memory to grow the garbage list). * The finalizers list is made empty on a successful return. */ static int handle_finalizers(PyGC_Head *finalizers, PyGC_Head *old) { PyGC_Head *gc = finalizers->gc.gc_next; if (garbage == NULL) { garbage = PyList_New(0); if (garbage == NULL) Py_FatalError("gc couldn't create gc.garbage list"); } for (; gc != finalizers; gc = gc->gc.gc_next) { PyObject *op = FROM_GC(gc); if ((debug & DEBUG_SAVEALL) || has_finalizer(op)) { if (PyList_Append(garbage, op) < 0) return -1; } } gc_list_merge(finalizers, old); return 0; } /* Break reference cycles by clearing the containers involved. This is * tricky business as the lists can be changing and we don't know which * objects may be freed. It is possible I screwed something up here. */ static void delete_garbage(PyGC_Head *collectable, PyGC_Head *old) { inquiry clear; while (!gc_list_is_empty(collectable)) { PyGC_Head *gc = collectable->gc.gc_next; PyObject *op = FROM_GC(gc); assert(IS_TENTATIVELY_UNREACHABLE(op)); if (debug & DEBUG_SAVEALL) { PyList_Append(garbage, op); } else { if ((clear = op->ob_type->tp_clear) != NULL) { Py_INCREF(op); clear(op); Py_DECREF(op); } } if (collectable->gc.gc_next == gc) { /* object is still alive, move it, it may die later */ gc_list_remove(gc); gc_list_append(gc, old); gc->gc.gc_refs = GC_REACHABLE; } } } /* This is the main function. Read this to understand how the * collection process works. */ static long collect(int generation) { int i; long m = 0; /* # objects collected */ long n = 0; /* # unreachable objects that couldn't be collected */ PyGC_Head *young; /* the generation we are examining */ PyGC_Head *old; /* next older generation */ PyGC_Head unreachable; /* non-problematic unreachable trash */ PyGC_Head finalizers; /* objects with, & reachable from, __del__ */ PyGC_Head *gc; if (delstr == NULL) { delstr = PyString_InternFromString("__del__"); if (delstr == NULL) Py_FatalError("gc couldn't allocate \"__del__\""); } if (debug & DEBUG_STATS) { PySys_WriteStderr("gc: collecting generation %d...\n", generation); PySys_WriteStderr("gc: objects in each generation:"); for (i = 0; i < NUM_GENERATIONS; i++) { PySys_WriteStderr(" %ld", gc_list_size(GEN_HEAD(i))); } PySys_WriteStderr("\n"); } /* update collection and allocation counters */ if (generation+1 < NUM_GENERATIONS) generations[generation+1].count += 1; for (i = 0; i <= generation; i++) generations[i].count = 0; /* merge younger generations with one we are currently collecting */ for (i = 0; i < generation; i++) { gc_list_merge(GEN_HEAD(i), GEN_HEAD(generation)); } /* handy references */ young = GEN_HEAD(generation); if (generation < NUM_GENERATIONS-1) old = GEN_HEAD(generation+1); else old = young; /* Using ob_refcnt and gc_refs, calculate which objects in the * container set are reachable from outside the set (i.e., have a * refcount greater than 0 when all the references within the * set are taken into account). */ update_refs(young); subtract_refs(young); /* Leave everything reachable from outside young in young, and move * everything else (in young) to unreachable. * NOTE: This used to move the reachable objects into a reachable * set instead. But most things usually turn out to be reachable, * so it's more efficient to move the unreachable things. */ gc_list_init(&unreachable); move_unreachable(young, &unreachable); /* Move reachable objects to next generation. */ if (young != old) gc_list_merge(young, old); /* All objects in unreachable are trash, but objects reachable from * finalizers can't safely be deleted. Python programmers should take * care not to create such things. For Python, finalizers means * instance objects with __del__ methods. Weakrefs with callbacks * can also call arbitrary Python code but they will be dealt with by * handle_weakrefs(). */ gc_list_init(&finalizers); move_finalizers(&unreachable, &finalizers); /* finalizers contains the unreachable objects with a finalizer; * unreachable objects reachable *from* those are also uncollectable, * and we move those into the finalizers list too. */ move_finalizer_reachable(&finalizers); /* Collect statistics on collectable objects found and print * debugging information. */ for (gc = unreachable.gc.gc_next; gc != &unreachable; gc = gc->gc.gc_next) { m++; if (debug & DEBUG_COLLECTABLE) { debug_cycle("collectable", FROM_GC(gc)); } } /* Clear weakrefs and invoke callbacks as necessary. */ m += handle_weakrefs(&unreachable, old); /* Call tp_clear on objects in the unreachable set. This will cause * the reference cycles to be broken. It may also cause some objects * in finalizers to be freed. */ delete_garbage(&unreachable, old); /* Collect statistics on uncollectable objects found and print * debugging information. */ for (gc = finalizers.gc.gc_next; gc != &finalizers; gc = gc->gc.gc_next) { n++; if (debug & DEBUG_UNCOLLECTABLE) debug_cycle("uncollectable", FROM_GC(gc)); } if (debug & DEBUG_STATS) { if (m == 0 && n == 0) { PySys_WriteStderr("gc: done.\n"); } else { PySys_WriteStderr( "gc: done, %ld unreachable, %ld uncollectable.\n", n+m, n); } } /* Append instances in the uncollectable set to a Python * reachable list of garbage. The programmer has to deal with * this if they insist on creating this type of structure. */ (void)handle_finalizers(&finalizers, old); if (PyErr_Occurred()) { if (gc_str == NULL) gc_str = PyString_FromString("garbage collection"); PyErr_WriteUnraisable(gc_str); Py_FatalError("unexpected exception during garbage collection"); } return n+m; } static long collect_generations(void) { int i; long n = 0; /* Find the oldest generation (higest numbered) where the count * exceeds the threshold. Objects in the that generation and * generations younger than it will be collected. */ for (i = NUM_GENERATIONS-1; i >= 0; i--) { if (generations[i].count > generations[i].threshold) { n = collect(i); break; } } return n; } PyDoc_STRVAR(gc_enable__doc__, "enable() -> None\n" "\n" "Enable automatic garbage collection.\n"); static PyObject * gc_enable(PyObject *self, PyObject *noargs) { enabled = 1; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(gc_disable__doc__, "disable() -> None\n" "\n" "Disable automatic garbage collection.\n"); static PyObject * gc_disable(PyObject *self, PyObject *noargs) { enabled = 0; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(gc_isenabled__doc__, "isenabled() -> status\n" "\n" "Returns true if automatic garbage collection is enabled.\n"); static PyObject * gc_isenabled(PyObject *self, PyObject *noargs) { return Py_BuildValue("i", enabled); } PyDoc_STRVAR(gc_collect__doc__, "collect() -> n\n" "\n" "Run a full collection. The number of unreachable objects is returned.\n"); static PyObject * gc_collect(PyObject *self, PyObject *noargs) { long n; if (collecting) n = 0; /* already collecting, don't do anything */ else { collecting = 1; n = collect(NUM_GENERATIONS - 1); collecting = 0; } return Py_BuildValue("l", n); } PyDoc_STRVAR(gc_set_debug__doc__, "set_debug(flags) -> None\n" "\n" "Set the garbage collection debugging flags. Debugging information is\n" "written to sys.stderr.\n" "\n" "flags is an integer and can have the following bits turned on:\n" "\n" " DEBUG_STATS - Print statistics during collection.\n" " DEBUG_COLLECTABLE - Print collectable objects found.\n" " DEBUG_UNCOLLECTABLE - Print unreachable but uncollectable objects found.\n" " DEBUG_INSTANCES - Print instance objects.\n" " DEBUG_OBJECTS - Print objects other than instances.\n" " DEBUG_SAVEALL - Save objects to gc.garbage rather than freeing them.\n" " DEBUG_LEAK - Debug leaking programs (everything but STATS).\n"); static PyObject * gc_set_debug(PyObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, "i:set_debug", &debug)) return NULL; Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(gc_get_debug__doc__, "get_debug() -> flags\n" "\n" "Get the garbage collection debugging flags.\n"); static PyObject * gc_get_debug(PyObject *self, PyObject *noargs) { return Py_BuildValue("i", debug); } PyDoc_STRVAR(gc_set_thresh__doc__, "set_threshold(threshold0, [threshold1, threshold2]) -> None\n" "\n" "Sets the collection thresholds. Setting threshold0 to zero disables\n" "collection.\n"); static PyObject * gc_set_thresh(PyObject *self, PyObject *args) { int i; if (!PyArg_ParseTuple(args, "i|ii:set_threshold", &generations[0].threshold, &generations[1].threshold, &generations[2].threshold)) return NULL; for (i = 2; i < NUM_GENERATIONS; i++) { /* generations higher than 2 get the same threshold */ generations[i].threshold = generations[2].threshold; } Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(gc_get_thresh__doc__, "get_threshold() -> (threshold0, threshold1, threshold2)\n" "\n" "Return the current collection thresholds\n"); static PyObject * gc_get_thresh(PyObject *self, PyObject *noargs) { return Py_BuildValue("(iii)", generations[0].threshold, generations[1].threshold, generations[2].threshold); } static int referrersvisit(PyObject* obj, PyObject *objs) { int i; for (i = 0; i < PyTuple_GET_SIZE(objs); i++) if (PyTuple_GET_ITEM(objs, i) == obj) return 1; return 0; } static int gc_referrers_for(PyObject *objs, PyGC_Head *list, PyObject *resultlist) { PyGC_Head *gc; PyObject *obj; traverseproc traverse; for (gc = list->gc.gc_next; gc != list; gc = gc->gc.gc_next) { obj = FROM_GC(gc); traverse = obj->ob_type->tp_traverse; if (obj == objs || obj == resultlist) continue; if (traverse(obj, (visitproc)referrersvisit, objs)) { if (PyList_Append(resultlist, obj) < 0) return 0; /* error */ } } return 1; /* no error */ } PyDoc_STRVAR(gc_get_referrers__doc__, "get_referrers(*objs) -> list\n\ Return the list of objects that directly refer to any of objs."); static PyObject * gc_get_referrers(PyObject *self, PyObject *args) { int i; PyObject *result = PyList_New(0); for (i = 0; i < NUM_GENERATIONS; i++) { if (!(gc_referrers_for(args, GEN_HEAD(i), result))) { Py_DECREF(result); return NULL; } } return result; } /* Append obj to list; return true if error (out of memory), false if OK. */ static int referentsvisit(PyObject *obj, PyObject *list) { return PyList_Append(list, obj) < 0; } PyDoc_STRVAR(gc_get_referents__doc__, "get_referents(*objs) -> list\n\ Return the list of objects that are directly referred to by objs."); static PyObject * gc_get_referents(PyObject *self, PyObject *args) { int i; PyObject *result = PyList_New(0); if (result == NULL) return NULL; for (i = 0; i < PyTuple_GET_SIZE(args); i++) { traverseproc traverse; PyObject *obj = PyTuple_GET_ITEM(args, i); if (! PyObject_IS_GC(obj)) continue; traverse = obj->ob_type->tp_traverse; if (! traverse) continue; if (traverse(obj, (visitproc)referentsvisit, result)) { Py_DECREF(result); return NULL; } } return result; } PyDoc_STRVAR(gc_get_objects__doc__, "get_objects() -> [...]\n" "\n" "Return a list of objects tracked by the collector (excluding the list\n" "returned).\n"); static PyObject * gc_get_objects(PyObject *self, PyObject *noargs) { int i; PyObject* result; result = PyList_New(0); if (result == NULL) return NULL; for (i = 0; i < NUM_GENERATIONS; i++) { if (append_objects(result, GEN_HEAD(i))) { Py_DECREF(result); return NULL; } } return result; } PyDoc_STRVAR(gc__doc__, "This module provides access to the garbage collector for reference cycles.\n" "\n" "enable() -- Enable automatic garbage collection.\n" "disable() -- Disable automatic garbage collection.\n" "isenabled() -- Returns true if automatic collection is enabled.\n" "collect() -- Do a full collection right now.\n" "set_debug() -- Set debugging flags.\n" "get_debug() -- Get debugging flags.\n" "set_threshold() -- Set the collection thresholds.\n" "get_threshold() -- Return the current the collection thresholds.\n" "get_objects() -- Return a list of all objects tracked by the collector.\n" "get_referrers() -- Return the list of objects that refer to an object.\n" "get_referents() -- Return the list of objects that an object refers to.\n"); static PyMethodDef GcMethods[] = { {"enable", gc_enable, METH_NOARGS, gc_enable__doc__}, {"disable", gc_disable, METH_NOARGS, gc_disable__doc__}, {"isenabled", gc_isenabled, METH_NOARGS, gc_isenabled__doc__}, {"set_debug", gc_set_debug, METH_VARARGS, gc_set_debug__doc__}, {"get_debug", gc_get_debug, METH_NOARGS, gc_get_debug__doc__}, {"set_threshold", gc_set_thresh, METH_VARARGS, gc_set_thresh__doc__}, {"get_threshold", gc_get_thresh, METH_NOARGS, gc_get_thresh__doc__}, {"collect", gc_collect, METH_NOARGS, gc_collect__doc__}, {"get_objects", gc_get_objects,METH_NOARGS, gc_get_objects__doc__}, {"get_referrers", gc_get_referrers, METH_VARARGS, gc_get_referrers__doc__}, {"get_referents", gc_get_referents, METH_VARARGS, gc_get_referents__doc__}, {NULL, NULL} /* Sentinel */ }; void initgc(void) { PyObject *m; m = Py_InitModule4("gc", GcMethods, gc__doc__, NULL, PYTHON_API_VERSION); if (garbage == NULL) { garbage = PyList_New(0); if (garbage == NULL) return; } if (PyModule_AddObject(m, "garbage", garbage) < 0) return; #define ADD_INT(NAME) if (PyModule_AddIntConstant(m, #NAME, NAME) < 0) return ADD_INT(DEBUG_STATS); ADD_INT(DEBUG_COLLECTABLE); ADD_INT(DEBUG_UNCOLLECTABLE); ADD_INT(DEBUG_INSTANCES); ADD_INT(DEBUG_OBJECTS); ADD_INT(DEBUG_SAVEALL); ADD_INT(DEBUG_LEAK); #undef ADD_INT } /* API to invoke gc.collect() from C */ long PyGC_Collect(void) { long n; if (collecting) n = 0; /* already collecting, don't do anything */ else { collecting = 1; n = collect(NUM_GENERATIONS - 1); collecting = 0; } return n; } /* for debugging */ void _PyGC_Dump(PyGC_Head *g) { _PyObject_Dump(FROM_GC(g)); } /* extension modules might be compiled with GC support so these functions must always be available */ #undef PyObject_GC_Track #undef PyObject_GC_UnTrack #undef PyObject_GC_Del #undef _PyObject_GC_Malloc void PyObject_GC_Track(void *op) { _PyObject_GC_TRACK(op); } /* for binary compatibility with 2.2 */ void _PyObject_GC_Track(PyObject *op) { PyObject_GC_Track(op); } void PyObject_GC_UnTrack(void *op) { /* Obscure: the Py_TRASHCAN mechanism requires that we be able to * call PyObject_GC_UnTrack twice on an object. */ if (IS_TRACKED(op)) _PyObject_GC_UNTRACK(op); } /* for binary compatibility with 2.2 */ void _PyObject_GC_UnTrack(PyObject *op) { PyObject_GC_UnTrack(op); } PyObject * _PyObject_GC_Malloc(size_t basicsize) { PyObject *op; PyGC_Head *g = PyObject_MALLOC(sizeof(PyGC_Head) + basicsize); if (g == NULL) return PyErr_NoMemory(); g->gc.gc_refs = GC_UNTRACKED; generations[0].count++; /* number of allocated GC objects */ if (generations[0].count > generations[0].threshold && enabled && generations[0].threshold && !collecting && !PyErr_Occurred()) { collecting = 1; collect_generations(); collecting = 0; } op = FROM_GC(g); return op; } PyObject * _PyObject_GC_New(PyTypeObject *tp) { PyObject *op = _PyObject_GC_Malloc(_PyObject_SIZE(tp)); if (op != NULL) op = PyObject_INIT(op, tp); return op; } PyVarObject * _PyObject_GC_NewVar(PyTypeObject *tp, int nitems) { const size_t size = _PyObject_VAR_SIZE(tp, nitems); PyVarObject *op = (PyVarObject *) _PyObject_GC_Malloc(size); if (op != NULL) op = PyObject_INIT_VAR(op, tp, nitems); return op; } PyVarObject * _PyObject_GC_Resize(PyVarObject *op, int nitems) { const size_t basicsize = _PyObject_VAR_SIZE(op->ob_type, nitems); PyGC_Head *g = AS_GC(op); g = PyObject_REALLOC(g, sizeof(PyGC_Head) + basicsize); if (g == NULL) return (PyVarObject *)PyErr_NoMemory(); op = (PyVarObject *) FROM_GC(g); op->ob_size = nitems; return op; } void PyObject_GC_Del(void *op) { PyGC_Head *g = AS_GC(op); if (IS_TRACKED(op)) gc_list_remove(g); if (generations[0].count > 0) { generations[0].count--; } PyObject_FREE(g); } /* for binary compatibility with 2.2 */ #undef _PyObject_GC_Del void _PyObject_GC_Del(PyObject *op) { PyObject_GC_Del(op); } Python-2.3.7/Modules/shamodule.c0000644001241000117560000003711207560045122016012 0ustar loewishpifb6/* SHA module */ /* This module provides an interface to NIST's Secure Hash Algorithm */ /* See below for information about the original code this module was based upon. Additional work performed by: Andrew Kuchling (amk@amk.ca) Greg Stein (gstein@lyra.org) */ /* SHA objects */ #include "Python.h" /* Endianness testing and definitions */ #define TestEndianness(variable) {int i=1; variable=PCT_BIG_ENDIAN;\ if (*((char*)&i)==1) variable=PCT_LITTLE_ENDIAN;} #define PCT_LITTLE_ENDIAN 1 #define PCT_BIG_ENDIAN 0 /* Some useful types */ typedef unsigned char SHA_BYTE; #if SIZEOF_INT == 4 typedef unsigned int SHA_INT32; /* 32-bit integer */ #else /* not defined. compilation will die. */ #endif /* The SHA block size and message digest sizes, in bytes */ #define SHA_BLOCKSIZE 64 #define SHA_DIGESTSIZE 20 /* The structure for storing SHS info */ typedef struct { PyObject_HEAD SHA_INT32 digest[5]; /* Message digest */ SHA_INT32 count_lo, count_hi; /* 64-bit bit count */ SHA_BYTE data[SHA_BLOCKSIZE]; /* SHA data buffer */ int Endianness; int local; /* unprocessed amount in data */ } SHAobject; /* When run on a little-endian CPU we need to perform byte reversal on an array of longwords. */ static void longReverse(SHA_INT32 *buffer, int byteCount, int Endianness) { SHA_INT32 value; if ( Endianness == PCT_BIG_ENDIAN ) return; byteCount /= sizeof(*buffer); while (byteCount--) { value = *buffer; value = ( ( value & 0xFF00FF00L ) >> 8 ) | \ ( ( value & 0x00FF00FFL ) << 8 ); *buffer++ = ( value << 16 ) | ( value >> 16 ); } } static void SHAcopy(SHAobject *src, SHAobject *dest) { dest->Endianness = src->Endianness; dest->local = src->local; dest->count_lo = src->count_lo; dest->count_hi = src->count_hi; memcpy(dest->digest, src->digest, sizeof(src->digest)); memcpy(dest->data, src->data, sizeof(src->data)); } /* ------------------------------------------------------------------------ * * This code for the SHA algorithm was noted as public domain. The original * headers are pasted below. * * Several changes have been made to make it more compatible with the * Python environment and desired interface. * */ /* NIST Secure Hash Algorithm */ /* heavily modified by Uwe Hollerbach */ /* from Peter C. Gutmann's implementation as found in */ /* Applied Cryptography by Bruce Schneier */ /* Further modifications to include the "UNRAVEL" stuff, below */ /* This code is in the public domain */ /* UNRAVEL should be fastest & biggest */ /* UNROLL_LOOPS should be just as big, but slightly slower */ /* both undefined should be smallest and slowest */ #define UNRAVEL /* #define UNROLL_LOOPS */ /* The SHA f()-functions. The f1 and f3 functions can be optimized to save one boolean operation each - thanks to Rich Schroeppel, rcs@cs.arizona.edu for discovering this */ /*#define f1(x,y,z) ((x & y) | (~x & z)) // Rounds 0-19 */ #define f1(x,y,z) (z ^ (x & (y ^ z))) /* Rounds 0-19 */ #define f2(x,y,z) (x ^ y ^ z) /* Rounds 20-39 */ /*#define f3(x,y,z) ((x & y) | (x & z) | (y & z)) // Rounds 40-59 */ #define f3(x,y,z) ((x & y) | (z & (x | y))) /* Rounds 40-59 */ #define f4(x,y,z) (x ^ y ^ z) /* Rounds 60-79 */ /* SHA constants */ #define CONST1 0x5a827999L /* Rounds 0-19 */ #define CONST2 0x6ed9eba1L /* Rounds 20-39 */ #define CONST3 0x8f1bbcdcL /* Rounds 40-59 */ #define CONST4 0xca62c1d6L /* Rounds 60-79 */ /* 32-bit rotate */ #define R32(x,n) ((x << n) | (x >> (32 - n))) /* the generic case, for when the overall rotation is not unraveled */ #define FG(n) \ T = R32(A,5) + f##n(B,C,D) + E + *WP++ + CONST##n; \ E = D; D = C; C = R32(B,30); B = A; A = T /* specific cases, for when the overall rotation is unraveled */ #define FA(n) \ T = R32(A,5) + f##n(B,C,D) + E + *WP++ + CONST##n; B = R32(B,30) #define FB(n) \ E = R32(T,5) + f##n(A,B,C) + D + *WP++ + CONST##n; A = R32(A,30) #define FC(n) \ D = R32(E,5) + f##n(T,A,B) + C + *WP++ + CONST##n; T = R32(T,30) #define FD(n) \ C = R32(D,5) + f##n(E,T,A) + B + *WP++ + CONST##n; E = R32(E,30) #define FE(n) \ B = R32(C,5) + f##n(D,E,T) + A + *WP++ + CONST##n; D = R32(D,30) #define FT(n) \ A = R32(B,5) + f##n(C,D,E) + T + *WP++ + CONST##n; C = R32(C,30) /* do SHA transformation */ static void sha_transform(SHAobject *sha_info) { int i; SHA_INT32 T, A, B, C, D, E, W[80], *WP; memcpy(W, sha_info->data, sizeof(sha_info->data)); longReverse(W, (int)sizeof(sha_info->data), sha_info->Endianness); for (i = 16; i < 80; ++i) { W[i] = W[i-3] ^ W[i-8] ^ W[i-14] ^ W[i-16]; /* extra rotation fix */ W[i] = R32(W[i], 1); } A = sha_info->digest[0]; B = sha_info->digest[1]; C = sha_info->digest[2]; D = sha_info->digest[3]; E = sha_info->digest[4]; WP = W; #ifdef UNRAVEL FA(1); FB(1); FC(1); FD(1); FE(1); FT(1); FA(1); FB(1); FC(1); FD(1); FE(1); FT(1); FA(1); FB(1); FC(1); FD(1); FE(1); FT(1); FA(1); FB(1); FC(2); FD(2); FE(2); FT(2); FA(2); FB(2); FC(2); FD(2); FE(2); FT(2); FA(2); FB(2); FC(2); FD(2); FE(2); FT(2); FA(2); FB(2); FC(2); FD(2); FE(3); FT(3); FA(3); FB(3); FC(3); FD(3); FE(3); FT(3); FA(3); FB(3); FC(3); FD(3); FE(3); FT(3); FA(3); FB(3); FC(3); FD(3); FE(3); FT(3); FA(4); FB(4); FC(4); FD(4); FE(4); FT(4); FA(4); FB(4); FC(4); FD(4); FE(4); FT(4); FA(4); FB(4); FC(4); FD(4); FE(4); FT(4); FA(4); FB(4); sha_info->digest[0] += E; sha_info->digest[1] += T; sha_info->digest[2] += A; sha_info->digest[3] += B; sha_info->digest[4] += C; #else /* !UNRAVEL */ #ifdef UNROLL_LOOPS FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(1); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(2); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(3); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); FG(4); #else /* !UNROLL_LOOPS */ for (i = 0; i < 20; ++i) { FG(1); } for (i = 20; i < 40; ++i) { FG(2); } for (i = 40; i < 60; ++i) { FG(3); } for (i = 60; i < 80; ++i) { FG(4); } #endif /* !UNROLL_LOOPS */ sha_info->digest[0] += A; sha_info->digest[1] += B; sha_info->digest[2] += C; sha_info->digest[3] += D; sha_info->digest[4] += E; #endif /* !UNRAVEL */ } /* initialize the SHA digest */ static void sha_init(SHAobject *sha_info) { TestEndianness(sha_info->Endianness) sha_info->digest[0] = 0x67452301L; sha_info->digest[1] = 0xefcdab89L; sha_info->digest[2] = 0x98badcfeL; sha_info->digest[3] = 0x10325476L; sha_info->digest[4] = 0xc3d2e1f0L; sha_info->count_lo = 0L; sha_info->count_hi = 0L; sha_info->local = 0; } /* update the SHA digest */ static void sha_update(SHAobject *sha_info, SHA_BYTE *buffer, int count) { int i; SHA_INT32 clo; clo = sha_info->count_lo + ((SHA_INT32) count << 3); if (clo < sha_info->count_lo) { ++sha_info->count_hi; } sha_info->count_lo = clo; sha_info->count_hi += (SHA_INT32) count >> 29; if (sha_info->local) { i = SHA_BLOCKSIZE - sha_info->local; if (i > count) { i = count; } memcpy(((SHA_BYTE *) sha_info->data) + sha_info->local, buffer, i); count -= i; buffer += i; sha_info->local += i; if (sha_info->local == SHA_BLOCKSIZE) { sha_transform(sha_info); } else { return; } } while (count >= SHA_BLOCKSIZE) { memcpy(sha_info->data, buffer, SHA_BLOCKSIZE); buffer += SHA_BLOCKSIZE; count -= SHA_BLOCKSIZE; sha_transform(sha_info); } memcpy(sha_info->data, buffer, count); sha_info->local = count; } /* finish computing the SHA digest */ static void sha_final(unsigned char digest[20], SHAobject *sha_info) { int count; SHA_INT32 lo_bit_count, hi_bit_count; lo_bit_count = sha_info->count_lo; hi_bit_count = sha_info->count_hi; count = (int) ((lo_bit_count >> 3) & 0x3f); ((SHA_BYTE *) sha_info->data)[count++] = 0x80; if (count > SHA_BLOCKSIZE - 8) { memset(((SHA_BYTE *) sha_info->data) + count, 0, SHA_BLOCKSIZE - count); sha_transform(sha_info); memset((SHA_BYTE *) sha_info->data, 0, SHA_BLOCKSIZE - 8); } else { memset(((SHA_BYTE *) sha_info->data) + count, 0, SHA_BLOCKSIZE - 8 - count); } /* GJS: note that we add the hi/lo in big-endian. sha_transform will swap these values into host-order. */ sha_info->data[56] = (hi_bit_count >> 24) & 0xff; sha_info->data[57] = (hi_bit_count >> 16) & 0xff; sha_info->data[58] = (hi_bit_count >> 8) & 0xff; sha_info->data[59] = (hi_bit_count >> 0) & 0xff; sha_info->data[60] = (lo_bit_count >> 24) & 0xff; sha_info->data[61] = (lo_bit_count >> 16) & 0xff; sha_info->data[62] = (lo_bit_count >> 8) & 0xff; sha_info->data[63] = (lo_bit_count >> 0) & 0xff; sha_transform(sha_info); digest[ 0] = (unsigned char) ((sha_info->digest[0] >> 24) & 0xff); digest[ 1] = (unsigned char) ((sha_info->digest[0] >> 16) & 0xff); digest[ 2] = (unsigned char) ((sha_info->digest[0] >> 8) & 0xff); digest[ 3] = (unsigned char) ((sha_info->digest[0] ) & 0xff); digest[ 4] = (unsigned char) ((sha_info->digest[1] >> 24) & 0xff); digest[ 5] = (unsigned char) ((sha_info->digest[1] >> 16) & 0xff); digest[ 6] = (unsigned char) ((sha_info->digest[1] >> 8) & 0xff); digest[ 7] = (unsigned char) ((sha_info->digest[1] ) & 0xff); digest[ 8] = (unsigned char) ((sha_info->digest[2] >> 24) & 0xff); digest[ 9] = (unsigned char) ((sha_info->digest[2] >> 16) & 0xff); digest[10] = (unsigned char) ((sha_info->digest[2] >> 8) & 0xff); digest[11] = (unsigned char) ((sha_info->digest[2] ) & 0xff); digest[12] = (unsigned char) ((sha_info->digest[3] >> 24) & 0xff); digest[13] = (unsigned char) ((sha_info->digest[3] >> 16) & 0xff); digest[14] = (unsigned char) ((sha_info->digest[3] >> 8) & 0xff); digest[15] = (unsigned char) ((sha_info->digest[3] ) & 0xff); digest[16] = (unsigned char) ((sha_info->digest[4] >> 24) & 0xff); digest[17] = (unsigned char) ((sha_info->digest[4] >> 16) & 0xff); digest[18] = (unsigned char) ((sha_info->digest[4] >> 8) & 0xff); digest[19] = (unsigned char) ((sha_info->digest[4] ) & 0xff); } /* * End of copied SHA code. * * ------------------------------------------------------------------------ */ static PyTypeObject SHAtype; static SHAobject * newSHAobject(void) { return (SHAobject *)PyObject_New(SHAobject, &SHAtype); } /* Internal methods for a hashing object */ static void SHA_dealloc(PyObject *ptr) { PyObject_Del(ptr); } /* External methods for a hashing object */ PyDoc_STRVAR(SHA_copy__doc__, "Return a copy of the hashing object."); static PyObject * SHA_copy(SHAobject *self, PyObject *args) { SHAobject *newobj; if (!PyArg_ParseTuple(args, ":copy")) { return NULL; } if ( (newobj = newSHAobject())==NULL) return NULL; SHAcopy(self, newobj); return (PyObject *)newobj; } PyDoc_STRVAR(SHA_digest__doc__, "Return the digest value as a string of binary data."); static PyObject * SHA_digest(SHAobject *self, PyObject *args) { unsigned char digest[SHA_DIGESTSIZE]; SHAobject temp; if (!PyArg_ParseTuple(args, ":digest")) return NULL; SHAcopy(self, &temp); sha_final(digest, &temp); return PyString_FromStringAndSize((const char *)digest, sizeof(digest)); } PyDoc_STRVAR(SHA_hexdigest__doc__, "Return the digest value as a string of hexadecimal digits."); static PyObject * SHA_hexdigest(SHAobject *self, PyObject *args) { unsigned char digest[SHA_DIGESTSIZE]; SHAobject temp; PyObject *retval; char *hex_digest; int i, j; if (!PyArg_ParseTuple(args, ":hexdigest")) return NULL; /* Get the raw (binary) digest value */ SHAcopy(self, &temp); sha_final(digest, &temp); /* Create a new string */ retval = PyString_FromStringAndSize(NULL, sizeof(digest) * 2); if (!retval) return NULL; hex_digest = PyString_AsString(retval); if (!hex_digest) { Py_DECREF(retval); return NULL; } /* Make hex version of the digest */ for(i=j=0; i> 4) & 0xf; c = (c>9) ? c+'a'-10 : c + '0'; hex_digest[j++] = c; c = (digest[i] & 0xf); c = (c>9) ? c+'a'-10 : c + '0'; hex_digest[j++] = c; } return retval; } PyDoc_STRVAR(SHA_update__doc__, "Update this hashing object's state with the provided string."); static PyObject * SHA_update(SHAobject *self, PyObject *args) { unsigned char *cp; int len; if (!PyArg_ParseTuple(args, "s#:update", &cp, &len)) return NULL; sha_update(self, cp, len); Py_INCREF(Py_None); return Py_None; } static PyMethodDef SHA_methods[] = { {"copy", (PyCFunction)SHA_copy, METH_VARARGS, SHA_copy__doc__}, {"digest", (PyCFunction)SHA_digest, METH_VARARGS, SHA_digest__doc__}, {"hexdigest", (PyCFunction)SHA_hexdigest, METH_VARARGS, SHA_hexdigest__doc__}, {"update", (PyCFunction)SHA_update, METH_VARARGS, SHA_update__doc__}, {NULL, NULL} /* sentinel */ }; static PyObject * SHA_getattr(PyObject *self, char *name) { if (strcmp(name, "blocksize")==0) return PyInt_FromLong(1); if (strcmp(name, "digest_size")==0 || strcmp(name, "digestsize")==0) return PyInt_FromLong(20); return Py_FindMethod(SHA_methods, self, name); } static PyTypeObject SHAtype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "sha.SHA", /*tp_name*/ sizeof(SHAobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ SHA_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ SHA_getattr, /*tp_getattr*/ }; /* The single module-level function: new() */ PyDoc_STRVAR(SHA_new__doc__, "Return a new SHA hashing object. An optional string argument\n\ may be provided; if present, this string will be automatically\n\ hashed."); static PyObject * SHA_new(PyObject *self, PyObject *args, PyObject *kwdict) { static char *kwlist[] = {"string", NULL}; SHAobject *new; unsigned char *cp = NULL; int len; if (!PyArg_ParseTupleAndKeywords(args, kwdict, "|s#:new", kwlist, &cp, &len)) { return NULL; } if ((new = newSHAobject()) == NULL) return NULL; sha_init(new); if (PyErr_Occurred()) { Py_DECREF(new); return NULL; } if (cp) sha_update(new, cp, len); return (PyObject *)new; } /* List of functions exported by this module */ static struct PyMethodDef SHA_functions[] = { {"new", (PyCFunction)SHA_new, METH_VARARGS|METH_KEYWORDS, SHA_new__doc__}, {"sha", (PyCFunction)SHA_new, METH_VARARGS|METH_KEYWORDS, SHA_new__doc__}, {NULL, NULL} /* Sentinel */ }; /* Initialize this module. */ #define insint(n,v) { PyModule_AddIntConstant(m,n,v); } PyMODINIT_FUNC initsha(void) { PyObject *m; SHAtype.ob_type = &PyType_Type; m = Py_InitModule("sha", SHA_functions); /* Add some symbolic constants to the module */ insint("blocksize", 1); /* For future use, in case some hash functions require an integral number of blocks */ insint("digestsize", 20); insint("digest_size", 20); } Python-2.3.7/Modules/xxmodule.c0000644001241000117560000002163207622763651015713 0ustar loewishpifb6 /* Use this file as a template to start implementing a module that also declares object types. All occurrences of 'Xxo' should be changed to something reasonable for your objects. After that, all other occurrences of 'xx' should be changed to something reasonable for your module. If your module is named foo your sourcefile should be named foomodule.c. You will probably want to delete all references to 'x_attr' and add your own types of attributes instead. Maybe you want to name your local variables other than 'self'. If your object type is needed in other files, you'll have to create a file "foobarobject.h"; see intobject.h for an example. */ /* Xxo objects */ #include "Python.h" static PyObject *ErrorObject; typedef struct { PyObject_HEAD PyObject *x_attr; /* Attributes dictionary */ } XxoObject; static PyTypeObject Xxo_Type; #define XxoObject_Check(v) ((v)->ob_type == &Xxo_Type) static XxoObject * newXxoObject(PyObject *arg) { XxoObject *self; self = PyObject_New(XxoObject, &Xxo_Type); if (self == NULL) return NULL; self->x_attr = NULL; return self; } /* Xxo methods */ static void Xxo_dealloc(XxoObject *self) { Py_XDECREF(self->x_attr); PyObject_Del(self); } static PyObject * Xxo_demo(XxoObject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":demo")) return NULL; Py_INCREF(Py_None); return Py_None; } static PyMethodDef Xxo_methods[] = { {"demo", (PyCFunction)Xxo_demo, METH_VARARGS, PyDoc_STR("demo() -> None")}, {NULL, NULL} /* sentinel */ }; static PyObject * Xxo_getattr(XxoObject *self, char *name) { if (self->x_attr != NULL) { PyObject *v = PyDict_GetItemString(self->x_attr, name); if (v != NULL) { Py_INCREF(v); return v; } } return Py_FindMethod(Xxo_methods, (PyObject *)self, name); } static int Xxo_setattr(XxoObject *self, char *name, PyObject *v) { if (self->x_attr == NULL) { self->x_attr = PyDict_New(); if (self->x_attr == NULL) return -1; } if (v == NULL) { int rv = PyDict_DelItemString(self->x_attr, name); if (rv < 0) PyErr_SetString(PyExc_AttributeError, "delete non-existing Xxo attribute"); return rv; } else return PyDict_SetItemString(self->x_attr, name, v); } static PyTypeObject Xxo_Type = { /* The ob_type field must be initialized in the module init function * to be portable to Windows without using C++. */ PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "xxmodule.Xxo", /*tp_name*/ sizeof(XxoObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)Xxo_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)Xxo_getattr, /*tp_getattr*/ (setattrfunc)Xxo_setattr, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT, /*tp_flags*/ 0, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ 0, /*tp_iter*/ 0, /*tp_iternext*/ 0, /*tp_methods*/ 0, /*tp_members*/ 0, /*tp_getset*/ 0, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ 0, /*tp_init*/ 0, /*tp_alloc*/ 0, /*tp_new*/ 0, /*tp_free*/ 0, /*tp_is_gc*/ }; /* --------------------------------------------------------------------- */ /* Function of two integers returning integer */ PyDoc_STRVAR(xx_foo_doc, "foo(i,j)\n\ \n\ Return the sum of i and j."); static PyObject * xx_foo(PyObject *self, PyObject *args) { long i, j; long res; if (!PyArg_ParseTuple(args, "ll:foo", &i, &j)) return NULL; res = i+j; /* XXX Do something here */ return PyInt_FromLong(res); } /* Function of no arguments returning new Xxo object */ static PyObject * xx_new(PyObject *self, PyObject *args) { XxoObject *rv; if (!PyArg_ParseTuple(args, ":new")) return NULL; rv = newXxoObject(args); if (rv == NULL) return NULL; return (PyObject *)rv; } /* Example with subtle bug from extensions manual ("Thin Ice"). */ static PyObject * xx_bug(PyObject *self, PyObject *args) { PyObject *list, *item; if (!PyArg_ParseTuple(args, "O:bug", &list)) return NULL; item = PyList_GetItem(list, 0); /* Py_INCREF(item); */ PyList_SetItem(list, 1, PyInt_FromLong(0L)); PyObject_Print(item, stdout, 0); printf("\n"); /* Py_DECREF(item); */ Py_INCREF(Py_None); return Py_None; } /* Test bad format character */ static PyObject * xx_roj(PyObject *self, PyObject *args) { PyObject *a; long b; if (!PyArg_ParseTuple(args, "O#:roj", &a, &b)) return NULL; Py_INCREF(Py_None); return Py_None; } /* ---------- */ static PyTypeObject Str_Type = { /* The ob_type field must be initialized in the module init function * to be portable to Windows without using C++. */ PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "xxmodule.Str", /*tp_name*/ 0, /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ 0, /*tp_dealloc*/ 0, /*tp_print*/ 0, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /*tp_flags*/ 0, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ 0, /*tp_iter*/ 0, /*tp_iternext*/ 0, /*tp_methods*/ 0, /*tp_members*/ 0, /*tp_getset*/ &PyString_Type, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ 0, /*tp_init*/ 0, /*tp_alloc*/ 0, /*tp_new*/ 0, /*tp_free*/ 0, /*tp_is_gc*/ }; /* ---------- */ static PyObject * null_richcompare(PyObject *self, PyObject *other, int op) { Py_INCREF(Py_NotImplemented); return Py_NotImplemented; } static PyTypeObject Null_Type = { /* The ob_type field must be initialized in the module init function * to be portable to Windows without using C++. */ PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "xxmodule.Null", /*tp_name*/ 0, /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ 0, /*tp_dealloc*/ 0, /*tp_print*/ 0, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ 0, /*tp_call*/ 0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /*tp_flags*/ 0, /*tp_doc*/ 0, /*tp_traverse*/ 0, /*tp_clear*/ null_richcompare, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ 0, /*tp_iter*/ 0, /*tp_iternext*/ 0, /*tp_methods*/ 0, /*tp_members*/ 0, /*tp_getset*/ &PyBaseObject_Type, /*tp_base*/ 0, /*tp_dict*/ 0, /*tp_descr_get*/ 0, /*tp_descr_set*/ 0, /*tp_dictoffset*/ 0, /*tp_init*/ 0, /*tp_alloc*/ PyType_GenericNew, /*tp_new*/ 0, /*tp_free*/ 0, /*tp_is_gc*/ }; /* ---------- */ /* List of functions defined in the module */ static PyMethodDef xx_methods[] = { {"roj", xx_roj, METH_VARARGS, PyDoc_STR("roj(a,b) -> None")}, {"foo", xx_foo, METH_VARARGS, xx_foo_doc}, {"new", xx_new, METH_VARARGS, PyDoc_STR("new() -> new Xx object")}, {"bug", xx_bug, METH_VARARGS, PyDoc_STR("bug(o) -> None")}, {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(module_doc, "This is a template module just for instruction."); /* Initialization function for the module (*must* be called initxx) */ PyMODINIT_FUNC initxx(void) { PyObject *m; /* Finalize the type object including setting type of the new type * object; doing it here is required for portability to Windows * without requiring C++. */ if (PyType_Ready(&Xxo_Type) < 0) return; /* Create the module and add the functions */ m = Py_InitModule3("xx", xx_methods, module_doc); /* Add some symbolic constants to the module */ if (ErrorObject == NULL) { ErrorObject = PyErr_NewException("xx.error", NULL, NULL); if (ErrorObject == NULL) return; } Py_INCREF(ErrorObject); PyModule_AddObject(m, "error", ErrorObject); /* Add Str */ if (PyType_Ready(&Str_Type) < 0) return; PyModule_AddObject(m, "Str", (PyObject *)&Str_Type); /* Add Null */ if (PyType_Ready(&Null_Type) < 0) return; PyModule_AddObject(m, "Null", (PyObject *)&Null_Type); } Python-2.3.7/Modules/zlibmodule.c0000644001241000117560000006226210164341237016203 0ustar loewishpifb6/* zlibmodule.c -- gzip-compatible data compression */ /* See http://www.gzip.org/zlib/ */ /* Windows users: read Python's PCbuild\readme.txt */ #include "Python.h" #include "zlib.h" #ifdef WITH_THREAD #include "pythread.h" /* #defs ripped off from _tkinter.c, even though the situation here is much simpler, because we don't have to worry about waiting for Tcl events! And, since zlib itself is threadsafe, we don't need to worry about re-entering zlib functions. N.B. Since ENTER_ZLIB and LEAVE_ZLIB only need to be called on functions that modify the components of preexisting de/compress objects, it could prove to be a performance gain on multiprocessor machines if there was an de/compress object-specific lock. However, for the moment the ENTER_ZLIB and LEAVE_ZLIB calls are global for ALL de/compress objects. */ static PyThread_type_lock zlib_lock = NULL; /* initialized on module load */ #define ENTER_ZLIB \ Py_BEGIN_ALLOW_THREADS \ PyThread_acquire_lock(zlib_lock, 1); \ Py_END_ALLOW_THREADS #define LEAVE_ZLIB \ PyThread_release_lock(zlib_lock); #else #define ENTER_ZLIB #define LEAVE_ZLIB #endif /* The following parameters are copied from zutil.h, version 0.95 */ #define DEFLATED 8 #if MAX_MEM_LEVEL >= 8 # define DEF_MEM_LEVEL 8 #else # define DEF_MEM_LEVEL MAX_MEM_LEVEL #endif #define DEF_WBITS MAX_WBITS /* The output buffer will be increased in chunks of DEFAULTALLOC bytes. */ #define DEFAULTALLOC (16*1024) #define PyInit_zlib initzlib static PyTypeObject Comptype; static PyTypeObject Decomptype; static PyObject *ZlibError; typedef struct { PyObject_HEAD z_stream zst; PyObject *unused_data; PyObject *unconsumed_tail; int is_initialised; } compobject; static void zlib_error(z_stream zst, int err, char *msg) { if (zst.msg == Z_NULL) PyErr_Format(ZlibError, "Error %d %s", err, msg); else PyErr_Format(ZlibError, "Error %d %s: %.200s", err, msg, zst.msg); } PyDoc_STRVAR(compressobj__doc__, "compressobj([level]) -- Return a compressor object.\n" "\n" "Optional arg level is the compression level, in 1-9."); PyDoc_STRVAR(decompressobj__doc__, "decompressobj([wbits]) -- Return a decompressor object.\n" "\n" "Optional arg wbits is the window buffer size."); static compobject * newcompobject(PyTypeObject *type) { compobject *self; self = PyObject_New(compobject, type); if (self == NULL) return NULL; self->is_initialised = 0; self->unused_data = PyString_FromString(""); if (self->unused_data == NULL) { Py_DECREF(self); return NULL; } self->unconsumed_tail = PyString_FromString(""); if (self->unconsumed_tail == NULL) { Py_DECREF(self); return NULL; } return self; } PyDoc_STRVAR(compress__doc__, "compress(string[, level]) -- Returned compressed string.\n" "\n" "Optional arg level is the compression level, in 1-9."); static PyObject * PyZlib_compress(PyObject *self, PyObject *args) { PyObject *ReturnVal = NULL; Byte *input, *output; int length, level=Z_DEFAULT_COMPRESSION, err; z_stream zst; /* require Python string object, optional 'level' arg */ if (!PyArg_ParseTuple(args, "s#|i:compress", &input, &length, &level)) return NULL; zst.avail_out = length + length/1000 + 12 + 1; output = (Byte*)malloc(zst.avail_out); if (output == NULL) { PyErr_SetString(PyExc_MemoryError, "Can't allocate memory to compress data"); return NULL; } /* Past the point of no return. From here on out, we need to make sure we clean up mallocs & INCREFs. */ zst.zalloc = (alloc_func)NULL; zst.zfree = (free_func)Z_NULL; zst.next_out = (Byte *)output; zst.next_in = (Byte *)input; zst.avail_in = length; err = deflateInit(&zst, level); switch(err) { case(Z_OK): break; case(Z_MEM_ERROR): PyErr_SetString(PyExc_MemoryError, "Out of memory while compressing data"); goto error; case(Z_STREAM_ERROR): PyErr_SetString(ZlibError, "Bad compression level"); goto error; default: deflateEnd(&zst); zlib_error(zst, err, "while compressing data"); goto error; } Py_BEGIN_ALLOW_THREADS; err = deflate(&zst, Z_FINISH); Py_END_ALLOW_THREADS; if (err != Z_STREAM_END) { zlib_error(zst, err, "while compressing data"); deflateEnd(&zst); goto error; } err=deflateEnd(&zst); if (err == Z_OK) ReturnVal = PyString_FromStringAndSize((char *)output, zst.total_out); else zlib_error(zst, err, "while finishing compression"); error: free(output); return ReturnVal; } PyDoc_STRVAR(decompress__doc__, "decompress(string[, wbits[, bufsize]]) -- Return decompressed string.\n" "\n" "Optional arg wbits is the window buffer size. Optional arg bufsize is\n" "the initial output buffer size."); static PyObject * PyZlib_decompress(PyObject *self, PyObject *args) { PyObject *result_str; Byte *input; int length, err; int wsize=DEF_WBITS, r_strlen=DEFAULTALLOC; z_stream zst; if (!PyArg_ParseTuple(args, "s#|ii:decompress", &input, &length, &wsize, &r_strlen)) return NULL; if (r_strlen <= 0) r_strlen = 1; zst.avail_in = length; zst.avail_out = r_strlen; if (!(result_str = PyString_FromStringAndSize(NULL, r_strlen))) return NULL; zst.zalloc = (alloc_func)NULL; zst.zfree = (free_func)Z_NULL; zst.next_out = (Byte *)PyString_AS_STRING(result_str); zst.next_in = (Byte *)input; err = inflateInit2(&zst, wsize); switch(err) { case(Z_OK): break; case(Z_MEM_ERROR): PyErr_SetString(PyExc_MemoryError, "Out of memory while decompressing data"); goto error; default: inflateEnd(&zst); zlib_error(zst, err, "while preparing to decompress data"); goto error; } do { Py_BEGIN_ALLOW_THREADS err=inflate(&zst, Z_FINISH); Py_END_ALLOW_THREADS switch(err) { case(Z_STREAM_END): break; case(Z_BUF_ERROR): /* * If there is at least 1 byte of room according to zst.avail_out * and we get this error, assume that it means zlib cannot * process the inflate call() due to an error in the data. */ if (zst.avail_out > 0) { PyErr_Format(ZlibError, "Error %i while decompressing data", err); inflateEnd(&zst); goto error; } /* fall through */ case(Z_OK): /* need more memory */ if (_PyString_Resize(&result_str, r_strlen << 1) < 0) { inflateEnd(&zst); goto error; } zst.next_out = (unsigned char *)PyString_AS_STRING(result_str) \ + r_strlen; zst.avail_out = r_strlen; r_strlen = r_strlen << 1; break; default: inflateEnd(&zst); zlib_error(zst, err, "while decompressing data"); goto error; } } while (err != Z_STREAM_END); err = inflateEnd(&zst); if (err != Z_OK) { zlib_error(zst, err, "while finishing data decompression"); goto error; } _PyString_Resize(&result_str, zst.total_out); return result_str; error: Py_XDECREF(result_str); return NULL; } static PyObject * PyZlib_compressobj(PyObject *selfptr, PyObject *args) { compobject *self; int level=Z_DEFAULT_COMPRESSION, method=DEFLATED; int wbits=MAX_WBITS, memLevel=DEF_MEM_LEVEL, strategy=0, err; if (!PyArg_ParseTuple(args, "|iiiii:compressobj", &level, &method, &wbits, &memLevel, &strategy)) return NULL; self = newcompobject(&Comptype); if (self==NULL) return(NULL); self->zst.zalloc = (alloc_func)NULL; self->zst.zfree = (free_func)Z_NULL; self->zst.next_in = NULL; self->zst.avail_in = 0; err = deflateInit2(&self->zst, level, method, wbits, memLevel, strategy); switch(err) { case (Z_OK): self->is_initialised = 1; return (PyObject*)self; case (Z_MEM_ERROR): Py_DECREF(self); PyErr_SetString(PyExc_MemoryError, "Can't allocate memory for compression object"); return NULL; case(Z_STREAM_ERROR): Py_DECREF(self); PyErr_SetString(PyExc_ValueError, "Invalid initialization option"); return NULL; default: zlib_error(self->zst, err, "while creating compression object"); Py_DECREF(self); return NULL; } } static PyObject * PyZlib_decompressobj(PyObject *selfptr, PyObject *args) { int wbits=DEF_WBITS, err; compobject *self; if (!PyArg_ParseTuple(args, "|i:decompressobj", &wbits)) return NULL; self = newcompobject(&Decomptype); if (self == NULL) return(NULL); self->zst.zalloc = (alloc_func)NULL; self->zst.zfree = (free_func)Z_NULL; self->zst.next_in = NULL; self->zst.avail_in = 0; err = inflateInit2(&self->zst, wbits); switch(err) { case (Z_OK): self->is_initialised = 1; return (PyObject*)self; case(Z_STREAM_ERROR): Py_DECREF(self); PyErr_SetString(PyExc_ValueError, "Invalid initialization option"); return NULL; case (Z_MEM_ERROR): Py_DECREF(self); PyErr_SetString(PyExc_MemoryError, "Can't allocate memory for decompression object"); return NULL; default: zlib_error(self->zst, err, "while creating decompression object"); Py_DECREF(self); return NULL; } } static void Comp_dealloc(compobject *self) { if (self->is_initialised) deflateEnd(&self->zst); Py_XDECREF(self->unused_data); Py_XDECREF(self->unconsumed_tail); PyObject_Del(self); } static void Decomp_dealloc(compobject *self) { if (self->is_initialised) inflateEnd(&self->zst); Py_XDECREF(self->unused_data); Py_XDECREF(self->unconsumed_tail); PyObject_Del(self); } PyDoc_STRVAR(comp_compress__doc__, "compress(data) -- Return a string containing data compressed.\n" "\n" "After calling this function, some of the input data may still\n" "be stored in internal buffers for later processing.\n" "Call the flush() method to clear these buffers."); static PyObject * PyZlib_objcompress(compobject *self, PyObject *args) { int err, inplen, length = DEFAULTALLOC; PyObject *RetVal; Byte *input; unsigned long start_total_out; if (!PyArg_ParseTuple(args, "s#:compress", &input, &inplen)) return NULL; if (!(RetVal = PyString_FromStringAndSize(NULL, length))) return NULL; ENTER_ZLIB start_total_out = self->zst.total_out; self->zst.avail_in = inplen; self->zst.next_in = input; self->zst.avail_out = length; self->zst.next_out = (unsigned char *)PyString_AS_STRING(RetVal); Py_BEGIN_ALLOW_THREADS err = deflate(&(self->zst), Z_NO_FLUSH); Py_END_ALLOW_THREADS /* while Z_OK and the output buffer is full, there might be more output, so extend the output buffer and try again */ while (err == Z_OK && self->zst.avail_out == 0) { if (_PyString_Resize(&RetVal, length << 1) < 0) goto error; self->zst.next_out = (unsigned char *)PyString_AS_STRING(RetVal) \ + length; self->zst.avail_out = length; length = length << 1; Py_BEGIN_ALLOW_THREADS err = deflate(&(self->zst), Z_NO_FLUSH); Py_END_ALLOW_THREADS } /* We will only get Z_BUF_ERROR if the output buffer was full but there wasn't more output when we tried again, so it is not an error condition. */ if (err != Z_OK && err != Z_BUF_ERROR) { zlib_error(self->zst, err, "while compressing"); Py_DECREF(RetVal); RetVal = NULL; goto error; } _PyString_Resize(&RetVal, self->zst.total_out - start_total_out); error: LEAVE_ZLIB return RetVal; } PyDoc_STRVAR(decomp_decompress__doc__, "decompress(data, max_length) -- Return a string containing the decompressed\n" "version of the data.\n" "\n" "After calling this function, some of the input data may still be stored in\n" "internal buffers for later processing.\n" "Call the flush() method to clear these buffers.\n" "If the max_length parameter is specified then the return value will be\n" "no longer than max_length. Unconsumed input data will be stored in\n" "the unconsumed_tail attribute."); static PyObject * PyZlib_objdecompress(compobject *self, PyObject *args) { int err, inplen, old_length, length = DEFAULTALLOC; int max_length = 0; PyObject *RetVal; Byte *input; unsigned long start_total_out; if (!PyArg_ParseTuple(args, "s#|i:decompress", &input, &inplen, &max_length)) return NULL; if (max_length < 0) { PyErr_SetString(PyExc_ValueError, "max_length must be greater than zero"); return NULL; } /* limit amount of data allocated to max_length */ if (max_length && length > max_length) length = max_length; if (!(RetVal = PyString_FromStringAndSize(NULL, length))) return NULL; ENTER_ZLIB start_total_out = self->zst.total_out; self->zst.avail_in = inplen; self->zst.next_in = input; self->zst.avail_out = length; self->zst.next_out = (unsigned char *)PyString_AS_STRING(RetVal); Py_BEGIN_ALLOW_THREADS err = inflate(&(self->zst), Z_SYNC_FLUSH); Py_END_ALLOW_THREADS /* While Z_OK and the output buffer is full, there might be more output. So extend the output buffer and try again. */ while (err == Z_OK && self->zst.avail_out == 0) { /* If max_length set, don't continue decompressing if we've already reached the limit. */ if (max_length && length >= max_length) break; /* otherwise, ... */ old_length = length; length = length << 1; if (max_length && length > max_length) length = max_length; if (_PyString_Resize(&RetVal, length) < 0) goto error; self->zst.next_out = (unsigned char *)PyString_AS_STRING(RetVal) \ + old_length; self->zst.avail_out = length - old_length; Py_BEGIN_ALLOW_THREADS err = inflate(&(self->zst), Z_SYNC_FLUSH); Py_END_ALLOW_THREADS } /* Not all of the compressed data could be accommodated in the output buffer of specified size. Return the unconsumed tail in an attribute.*/ if(max_length) { Py_DECREF(self->unconsumed_tail); self->unconsumed_tail = PyString_FromStringAndSize((char *)self->zst.next_in, self->zst.avail_in); if(!self->unconsumed_tail) { Py_DECREF(RetVal); RetVal = NULL; goto error; } } /* The end of the compressed data has been reached, so set the unused_data attribute to a string containing the remainder of the data in the string. Note that this is also a logical place to call inflateEnd, but the old behaviour of only calling it on flush() is preserved. */ if (err == Z_STREAM_END) { Py_XDECREF(self->unused_data); /* Free original empty string */ self->unused_data = PyString_FromStringAndSize( (char *)self->zst.next_in, self->zst.avail_in); if (self->unused_data == NULL) { Py_DECREF(RetVal); goto error; } /* We will only get Z_BUF_ERROR if the output buffer was full but there wasn't more output when we tried again, so it is not an error condition. */ } else if (err != Z_OK && err != Z_BUF_ERROR) { zlib_error(self->zst, err, "while decompressing"); Py_DECREF(RetVal); RetVal = NULL; goto error; } _PyString_Resize(&RetVal, self->zst.total_out - start_total_out); error: LEAVE_ZLIB return RetVal; } PyDoc_STRVAR(comp_flush__doc__, "flush( [mode] ) -- Return a string containing any remaining compressed data.\n" "\n" "mode can be one of the constants Z_SYNC_FLUSH, Z_FULL_FLUSH, Z_FINISH; the\n" "default value used when mode is not specified is Z_FINISH.\n" "If mode == Z_FINISH, the compressor object can no longer be used after\n" "calling the flush() method. Otherwise, more data can still be compressed."); static PyObject * PyZlib_flush(compobject *self, PyObject *args) { int err, length = DEFAULTALLOC; PyObject *RetVal; int flushmode = Z_FINISH; unsigned long start_total_out; if (!PyArg_ParseTuple(args, "|i:flush", &flushmode)) return NULL; /* Flushing with Z_NO_FLUSH is a no-op, so there's no point in doing any work at all; just return an empty string. */ if (flushmode == Z_NO_FLUSH) { return PyString_FromStringAndSize(NULL, 0); } if (!(RetVal = PyString_FromStringAndSize(NULL, length))) return NULL; ENTER_ZLIB start_total_out = self->zst.total_out; self->zst.avail_in = 0; self->zst.avail_out = length; self->zst.next_out = (unsigned char *)PyString_AS_STRING(RetVal); Py_BEGIN_ALLOW_THREADS err = deflate(&(self->zst), flushmode); Py_END_ALLOW_THREADS /* while Z_OK and the output buffer is full, there might be more output, so extend the output buffer and try again */ while (err == Z_OK && self->zst.avail_out == 0) { if (_PyString_Resize(&RetVal, length << 1) < 0) goto error; self->zst.next_out = (unsigned char *)PyString_AS_STRING(RetVal) \ + length; self->zst.avail_out = length; length = length << 1; Py_BEGIN_ALLOW_THREADS err = deflate(&(self->zst), flushmode); Py_END_ALLOW_THREADS } /* If flushmode is Z_FINISH, we also have to call deflateEnd() to free various data structures. Note we should only get Z_STREAM_END when flushmode is Z_FINISH, but checking both for safety*/ if (err == Z_STREAM_END && flushmode == Z_FINISH) { err = deflateEnd(&(self->zst)); if (err != Z_OK) { zlib_error(self->zst, err, "from deflateEnd()"); Py_DECREF(RetVal); RetVal = NULL; goto error; } else self->is_initialised = 0; /* We will only get Z_BUF_ERROR if the output buffer was full but there wasn't more output when we tried again, so it is not an error condition. */ } else if (err!=Z_OK && err!=Z_BUF_ERROR) { zlib_error(self->zst, err, "while flushing"); Py_DECREF(RetVal); RetVal = NULL; goto error; } _PyString_Resize(&RetVal, self->zst.total_out - start_total_out); error: LEAVE_ZLIB return RetVal; } PyDoc_STRVAR(decomp_flush__doc__, "flush() -- Return a string containing any remaining decompressed data.\n" "\n" "The decompressor object can no longer be used after this call."); static PyObject * PyZlib_unflush(compobject *self, PyObject *args) { int err, length = DEFAULTALLOC; PyObject * retval = NULL; unsigned long start_total_out; if (!PyArg_ParseTuple(args, "|i:flush", &length)) return NULL; if (!(retval = PyString_FromStringAndSize(NULL, length))) return NULL; ENTER_ZLIB start_total_out = self->zst.total_out; self->zst.avail_out = length; self->zst.next_out = (Byte *)PyString_AS_STRING(retval); Py_BEGIN_ALLOW_THREADS err = inflate(&(self->zst), Z_FINISH); Py_END_ALLOW_THREADS /* while Z_OK and the output buffer is full, there might be more output, so extend the output buffer and try again */ while ((err == Z_OK || err == Z_BUF_ERROR) && self->zst.avail_out == 0) { if (_PyString_Resize(&retval, length << 1) < 0) goto error; self->zst.next_out = (Byte *)PyString_AS_STRING(retval) + length; self->zst.avail_out = length; length = length << 1; Py_BEGIN_ALLOW_THREADS err = inflate(&(self->zst), Z_FINISH); Py_END_ALLOW_THREADS } /* If flushmode is Z_FINISH, we also have to call deflateEnd() to free various data structures. Note we should only get Z_STREAM_END when flushmode is Z_FINISH */ if (err == Z_STREAM_END) { err = inflateEnd(&(self->zst)); self->is_initialised = 0; if (err != Z_OK) { zlib_error(self->zst, err, "from inflateEnd()"); Py_DECREF(retval); retval = NULL; goto error; } } _PyString_Resize(&retval, self->zst.total_out - start_total_out); error: LEAVE_ZLIB return retval; } static PyMethodDef comp_methods[] = { {"compress", (binaryfunc)PyZlib_objcompress, METH_VARARGS, comp_compress__doc__}, {"flush", (binaryfunc)PyZlib_flush, METH_VARARGS, comp_flush__doc__}, {NULL, NULL} }; static PyMethodDef Decomp_methods[] = { {"decompress", (binaryfunc)PyZlib_objdecompress, METH_VARARGS, decomp_decompress__doc__}, {"flush", (binaryfunc)PyZlib_unflush, METH_VARARGS, decomp_flush__doc__}, {NULL, NULL} }; static PyObject * Comp_getattr(compobject *self, char *name) { /* No ENTER/LEAVE_ZLIB is necessary because this fn doesn't touch internal data. */ return Py_FindMethod(comp_methods, (PyObject *)self, name); } static PyObject * Decomp_getattr(compobject *self, char *name) { PyObject * retval; ENTER_ZLIB if (strcmp(name, "unused_data") == 0) { Py_INCREF(self->unused_data); retval = self->unused_data; } else if (strcmp(name, "unconsumed_tail") == 0) { Py_INCREF(self->unconsumed_tail); retval = self->unconsumed_tail; } else retval = Py_FindMethod(Decomp_methods, (PyObject *)self, name); LEAVE_ZLIB return retval; } PyDoc_STRVAR(adler32__doc__, "adler32(string[, start]) -- Compute an Adler-32 checksum of string.\n" "\n" "An optional starting value can be specified. The returned checksum is\n" "an integer."); static PyObject * PyZlib_adler32(PyObject *self, PyObject *args) { uLong adler32val = adler32(0L, Z_NULL, 0); Byte *buf; int len; if (!PyArg_ParseTuple(args, "s#|l:adler32", &buf, &len, &adler32val)) return NULL; adler32val = adler32(adler32val, buf, len); return PyInt_FromLong(adler32val); } PyDoc_STRVAR(crc32__doc__, "crc32(string[, start]) -- Compute a CRC-32 checksum of string.\n" "\n" "An optional starting value can be specified. The returned checksum is\n" "an integer."); static PyObject * PyZlib_crc32(PyObject *self, PyObject *args) { uLong crc32val = crc32(0L, Z_NULL, 0); Byte *buf; int len; if (!PyArg_ParseTuple(args, "s#|l:crc32", &buf, &len, &crc32val)) return NULL; crc32val = crc32(crc32val, buf, len); return PyInt_FromLong(crc32val); } static PyMethodDef zlib_methods[] = { {"adler32", (PyCFunction)PyZlib_adler32, METH_VARARGS, adler32__doc__}, {"compress", (PyCFunction)PyZlib_compress, METH_VARARGS, compress__doc__}, {"compressobj", (PyCFunction)PyZlib_compressobj, METH_VARARGS, compressobj__doc__}, {"crc32", (PyCFunction)PyZlib_crc32, METH_VARARGS, crc32__doc__}, {"decompress", (PyCFunction)PyZlib_decompress, METH_VARARGS, decompress__doc__}, {"decompressobj", (PyCFunction)PyZlib_decompressobj, METH_VARARGS, decompressobj__doc__}, {NULL, NULL} }; static PyTypeObject Comptype = { PyObject_HEAD_INIT(0) 0, "zlib.Compress", sizeof(compobject), 0, (destructor)Comp_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)Comp_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ }; static PyTypeObject Decomptype = { PyObject_HEAD_INIT(0) 0, "zlib.Decompress", sizeof(compobject), 0, (destructor)Decomp_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)Decomp_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ }; PyDoc_STRVAR(zlib_module_documentation, "The functions in this module allow compression and decompression using the\n" "zlib library, which is based on GNU zip.\n" "\n" "adler32(string[, start]) -- Compute an Adler-32 checksum.\n" "compress(string[, level]) -- Compress string, with compression level in 1-9.\n" "compressobj([level]) -- Return a compressor object.\n" "crc32(string[, start]) -- Compute a CRC-32 checksum.\n" "decompress(string,[wbits],[bufsize]) -- Decompresses a compressed string.\n" "decompressobj([wbits]) -- Return a decompressor object.\n" "\n" "'wbits' is window buffer size.\n" "Compressor objects support compress() and flush() methods; decompressor\n" "objects support decompress() and flush()."); PyMODINIT_FUNC PyInit_zlib(void) { PyObject *m, *ver; Comptype.ob_type = &PyType_Type; Decomptype.ob_type = &PyType_Type; m = Py_InitModule4("zlib", zlib_methods, zlib_module_documentation, (PyObject*)NULL,PYTHON_API_VERSION); ZlibError = PyErr_NewException("zlib.error", NULL, NULL); if (ZlibError != NULL) { Py_INCREF(ZlibError); PyModule_AddObject(m, "error", ZlibError); } PyModule_AddIntConstant(m, "MAX_WBITS", MAX_WBITS); PyModule_AddIntConstant(m, "DEFLATED", DEFLATED); PyModule_AddIntConstant(m, "DEF_MEM_LEVEL", DEF_MEM_LEVEL); PyModule_AddIntConstant(m, "Z_BEST_SPEED", Z_BEST_SPEED); PyModule_AddIntConstant(m, "Z_BEST_COMPRESSION", Z_BEST_COMPRESSION); PyModule_AddIntConstant(m, "Z_DEFAULT_COMPRESSION", Z_DEFAULT_COMPRESSION); PyModule_AddIntConstant(m, "Z_FILTERED", Z_FILTERED); PyModule_AddIntConstant(m, "Z_HUFFMAN_ONLY", Z_HUFFMAN_ONLY); PyModule_AddIntConstant(m, "Z_DEFAULT_STRATEGY", Z_DEFAULT_STRATEGY); PyModule_AddIntConstant(m, "Z_FINISH", Z_FINISH); PyModule_AddIntConstant(m, "Z_NO_FLUSH", Z_NO_FLUSH); PyModule_AddIntConstant(m, "Z_SYNC_FLUSH", Z_SYNC_FLUSH); PyModule_AddIntConstant(m, "Z_FULL_FLUSH", Z_FULL_FLUSH); ver = PyString_FromString(ZLIB_VERSION); if (ver != NULL) PyModule_AddObject(m, "ZLIB_VERSION", ver); PyModule_AddStringConstant(m, "__version__", "1.0"); #ifdef WITH_THREAD zlib_lock = PyThread_allocate_lock(); #endif /* WITH_THREAD */ } Python-2.3.7/Modules/rgbimgmodule.c0000644001241000117560000004174310762607371016523 0ustar loewishpifb6/* * fastimg - * Faster reading and writing of image files. * * This code should work on machines with any byte order. * * Could someone make this run real fast using multiple processors * or how about using memory mapped files to speed it up? * * Paul Haeberli - 1991 * * Changed to return sizes. * Sjoerd Mullender - 1993 * Changed to incorporate into Python. * Sjoerd Mullender - 1993 */ #include "Python.h" #if SIZEOF_INT == 4 typedef int Py_Int32; typedef unsigned int Py_UInt32; #else #if SIZEOF_LONG == 4 typedef long Py_Int32; typedef unsigned long Py_UInt32; #else #error "No 4-byte integral type" #endif #endif #include /* * from image.h * */ typedef struct { unsigned short imagic; /* stuff saved on disk . . */ unsigned short type; unsigned short dim; unsigned short xsize; unsigned short ysize; unsigned short zsize; Py_UInt32 min; Py_UInt32 max; Py_UInt32 wastebytes; char name[80]; Py_UInt32 colormap; Py_Int32 file; /* stuff used in core only */ unsigned short flags; short dorev; short x; short y; short z; short cnt; unsigned short *ptr; unsigned short *base; unsigned short *tmpbuf; Py_UInt32 offset; Py_UInt32 rleend; /* for rle images */ Py_UInt32 *rowstart; /* for rle images */ Py_Int32 *rowsize; /* for rle images */ } IMAGE; #define IMAGIC 0732 #define TYPEMASK 0xff00 #define BPPMASK 0x00ff #define ITYPE_VERBATIM 0x0000 #define ITYPE_RLE 0x0100 #define ISRLE(type) (((type) & 0xff00) == ITYPE_RLE) #define ISVERBATIM(type) (((type) & 0xff00) == ITYPE_VERBATIM) #define BPP(type) ((type) & BPPMASK) #define RLE(bpp) (ITYPE_RLE | (bpp)) #define VERBATIM(bpp) (ITYPE_VERBATIM | (bpp)) /* * end of image.h stuff * */ #define RINTLUM (79) #define GINTLUM (156) #define BINTLUM (21) #define ILUM(r,g,b) ((int)(RINTLUM*(r)+GINTLUM*(g)+BINTLUM*(b))>>8) #define OFFSET_R 3 /* this is byte order dependent */ #define OFFSET_G 2 #define OFFSET_B 1 #define OFFSET_A 0 #define CHANOFFSET(z) (3-(z)) /* this is byte order dependent */ static void expandrow(unsigned char *, unsigned char *, int); static void setalpha(unsigned char *, int); static void copybw(Py_Int32 *, int); static void interleaverow(unsigned char*, unsigned char*, int, int); static int compressrow(unsigned char *, unsigned char *, int, int); static void lumrow(unsigned char *, unsigned char *, int); #ifdef ADD_TAGS #define TAGLEN (5) #else #define TAGLEN (0) #endif static PyObject *ImgfileError; static int reverse_order; #ifdef ADD_TAGS /* * addlongimgtag - * this is used to extract image data from core dumps. * */ static void addlongimgtag(Py_UInt32 *dptr, int xsize, int ysize) { dptr = dptr + (xsize * ysize); dptr[0] = 0x12345678; dptr[1] = 0x59493333; dptr[2] = 0x69434222; dptr[3] = xsize; dptr[4] = ysize; } #endif /* * byte order independent read/write of shorts and longs. * */ static unsigned short getshort(FILE *inf) { unsigned char buf[2]; fread(buf, 2, 1, inf); return (buf[0] << 8) + (buf[1] << 0); } static Py_UInt32 getlong(FILE *inf) { unsigned char buf[4]; fread(buf, 4, 1, inf); return (buf[0] << 24) + (buf[1] << 16) + (buf[2] << 8) + (buf[3] << 0); } static void putshort(FILE *outf, unsigned short val) { unsigned char buf[2]; buf[0] = (val >> 8); buf[1] = (val >> 0); fwrite(buf, 2, 1, outf); } static int putlong(FILE *outf, Py_UInt32 val) { unsigned char buf[4]; buf[0] = (unsigned char) (val >> 24); buf[1] = (unsigned char) (val >> 16); buf[2] = (unsigned char) (val >> 8); buf[3] = (unsigned char) (val >> 0); return fwrite(buf, 4, 1, outf); } static void readheader(FILE *inf, IMAGE *image) { memset(image ,0, sizeof(IMAGE)); image->imagic = getshort(inf); image->type = getshort(inf); image->dim = getshort(inf); image->xsize = getshort(inf); image->ysize = getshort(inf); image->zsize = getshort(inf); } static int writeheader(FILE *outf, IMAGE *image) { IMAGE t; memset(&t, 0, sizeof(IMAGE)); fwrite(&t, sizeof(IMAGE), 1, outf); fseek(outf, 0, SEEK_SET); putshort(outf, image->imagic); putshort(outf, image->type); putshort(outf, image->dim); putshort(outf, image->xsize); putshort(outf, image->ysize); putshort(outf, image->zsize); putlong(outf, image->min); putlong(outf, image->max); putlong(outf, 0); return fwrite("no name", 8, 1, outf); } static int writetab(FILE *outf, /*unsigned*/ Py_Int32 *tab, int len) { int r = 0; while(len) { r = putlong(outf, *tab++); len--; } return r; } static void readtab(FILE *inf, /*unsigned*/ Py_Int32 *tab, int len) { while(len) { *tab++ = getlong(inf); len--; } } /* * sizeofimage - * return the xsize and ysize of an iris image file. * */ static PyObject * sizeofimage(PyObject *self, PyObject *args) { char *name; IMAGE image; FILE *inf; if (!PyArg_ParseTuple(args, "s:sizeofimage", &name)) return NULL; inf = fopen(name, "rb"); if (!inf) { PyErr_SetString(ImgfileError, "can't open image file"); return NULL; } readheader(inf, &image); fclose(inf); if (image.imagic != IMAGIC) { PyErr_SetString(ImgfileError, "bad magic number in image file"); return NULL; } return Py_BuildValue("(ii)", image.xsize, image.ysize); } /* * longimagedata - * read in a B/W RGB or RGBA iris image file and return a * pointer to an array of longs. * */ static PyObject * longimagedata(PyObject *self, PyObject *args) { char *name; unsigned char *base, *lptr; unsigned char *rledat = NULL, *verdat = NULL; Py_Int32 *starttab = NULL, *lengthtab = NULL; FILE *inf = NULL; IMAGE image; int y, z, tablen, new_size; int xsize, ysize, zsize; int bpp, rle, cur, badorder; int rlebuflen; PyObject *rv = NULL; if (!PyArg_ParseTuple(args, "s:longimagedata", &name)) return NULL; inf = fopen(name,"rb"); if (!inf) { PyErr_SetString(ImgfileError, "can't open image file"); return NULL; } readheader(inf,&image); if (image.imagic != IMAGIC) { PyErr_SetString(ImgfileError, "bad magic number in image file"); goto finally; } rle = ISRLE(image.type); bpp = BPP(image.type); if (bpp != 1) { PyErr_SetString(ImgfileError, "image must have 1 byte per pix chan"); goto finally; } xsize = image.xsize; ysize = image.ysize; zsize = image.zsize; if (rle) { tablen = ysize * zsize * sizeof(Py_Int32); rlebuflen = (int) (1.05 * xsize +10); if ((tablen / sizeof(Py_Int32)) != (ysize * zsize) || rlebuflen < 0) { PyErr_NoMemory(); goto finally; } starttab = (Py_Int32 *)malloc(tablen); lengthtab = (Py_Int32 *)malloc(tablen); rledat = (unsigned char *)malloc(rlebuflen); if (!starttab || !lengthtab || !rledat) { PyErr_NoMemory(); goto finally; } fseek(inf, 512, SEEK_SET); readtab(inf, starttab, ysize*zsize); readtab(inf, lengthtab, ysize*zsize); /* check data order */ cur = 0; badorder = 0; for(y = 0; y < ysize; y++) { for(z = 0; z < zsize; z++) { if (starttab[y + z * ysize] < cur) { badorder = 1; break; } cur = starttab[y +z * ysize]; } if (badorder) break; } fseek(inf, 512 + 2 * tablen, SEEK_SET); cur = 512 + 2 * tablen; new_size = xsize * ysize + TAGLEN; if (new_size < 0 || (new_size * sizeof(Py_Int32)) < 0) { PyErr_NoMemory(); goto finally; } rv = PyString_FromStringAndSize((char *)NULL, new_size * sizeof(Py_Int32)); if (rv == NULL) goto finally; base = (unsigned char *) PyString_AsString(rv); #ifdef ADD_TAGS addlongimgtag(base,xsize,ysize); #endif if (badorder) { for (z = 0; z < zsize; z++) { lptr = base; if (reverse_order) lptr += (ysize - 1) * xsize * sizeof(Py_UInt32); for (y = 0; y < ysize; y++) { int idx = y + z * ysize; if (cur != starttab[idx]) { fseek(inf,starttab[idx], SEEK_SET); cur = starttab[idx]; } if (lengthtab[idx] > rlebuflen) { PyErr_SetString(ImgfileError, "rlebuf is too small"); Py_DECREF(rv); rv = NULL; goto finally; } fread(rledat, lengthtab[idx], 1, inf); cur += lengthtab[idx]; expandrow(lptr, rledat, 3-z); if (reverse_order) lptr -= xsize * sizeof(Py_UInt32); else lptr += xsize * sizeof(Py_UInt32); } } } else { lptr = base; if (reverse_order) lptr += (ysize - 1) * xsize * sizeof(Py_UInt32); for (y = 0; y < ysize; y++) { for(z = 0; z < zsize; z++) { int idx = y + z * ysize; if (cur != starttab[idx]) { fseek(inf, starttab[idx], SEEK_SET); cur = starttab[idx]; } fread(rledat, lengthtab[idx], 1, inf); cur += lengthtab[idx]; expandrow(lptr, rledat, 3-z); } if (reverse_order) lptr -= xsize * sizeof(Py_UInt32); else lptr += xsize * sizeof(Py_UInt32); } } if (zsize == 3) setalpha(base, xsize * ysize); else if (zsize < 3) copybw((Py_Int32 *) base, xsize * ysize); } else { new_size = xsize * ysize + TAGLEN; if (new_size < 0 || (new_size * sizeof(Py_Int32)) < 0) { PyErr_NoMemory(); goto finally; } rv = PyString_FromStringAndSize((char *) 0, new_size*sizeof(Py_Int32)); if (rv == NULL) goto finally; base = (unsigned char *) PyString_AsString(rv); #ifdef ADD_TAGS addlongimgtag(base, xsize, ysize); #endif verdat = (unsigned char *)malloc(xsize); fseek(inf, 512, SEEK_SET); for (z = 0; z < zsize; z++) { lptr = base; if (reverse_order) lptr += (ysize - 1) * xsize * sizeof(Py_UInt32); for (y = 0; y < ysize; y++) { fread(verdat, xsize, 1, inf); interleaverow(lptr, verdat, 3-z, xsize); if (reverse_order) lptr -= xsize * sizeof(Py_UInt32); else lptr += xsize * sizeof(Py_UInt32); } } if (zsize == 3) setalpha(base, xsize * ysize); else if (zsize < 3) copybw((Py_Int32 *) base, xsize * ysize); } finally: free(starttab); free(lengthtab); free(rledat); free(verdat); fclose(inf); return rv; } /* static utility functions for longimagedata */ static void interleaverow(unsigned char *lptr, unsigned char *cptr, int z, int n) { lptr += z; while (n--) { *lptr = *cptr++; lptr += 4; } } static void copybw(Py_Int32 *lptr, int n) { while (n >= 8) { lptr[0] = 0xff000000 + (0x010101 * (lptr[0] & 0xff)); lptr[1] = 0xff000000 + (0x010101 * (lptr[1] & 0xff)); lptr[2] = 0xff000000 + (0x010101 * (lptr[2] & 0xff)); lptr[3] = 0xff000000 + (0x010101 * (lptr[3] & 0xff)); lptr[4] = 0xff000000 + (0x010101 * (lptr[4] & 0xff)); lptr[5] = 0xff000000 + (0x010101 * (lptr[5] & 0xff)); lptr[6] = 0xff000000 + (0x010101 * (lptr[6] & 0xff)); lptr[7] = 0xff000000 + (0x010101 * (lptr[7] & 0xff)); lptr += 8; n -= 8; } while (n--) { *lptr = 0xff000000 + (0x010101 * (*lptr&0xff)); lptr++; } } static void setalpha(unsigned char *lptr, int n) { while (n >= 8) { lptr[0 * 4] = 0xff; lptr[1 * 4] = 0xff; lptr[2 * 4] = 0xff; lptr[3 * 4] = 0xff; lptr[4 * 4] = 0xff; lptr[5 * 4] = 0xff; lptr[6 * 4] = 0xff; lptr[7 * 4] = 0xff; lptr += 4 * 8; n -= 8; } while (n--) { *lptr = 0xff; lptr += 4; } } static void expandrow(unsigned char *optr, unsigned char *iptr, int z) { unsigned char pixel, count; optr += z; while (1) { pixel = *iptr++; if (!(count = (pixel & 0x7f))) return; if (pixel & 0x80) { while (count >= 8) { optr[0 * 4] = iptr[0]; optr[1 * 4] = iptr[1]; optr[2 * 4] = iptr[2]; optr[3 * 4] = iptr[3]; optr[4 * 4] = iptr[4]; optr[5 * 4] = iptr[5]; optr[6 * 4] = iptr[6]; optr[7 * 4] = iptr[7]; optr += 8 * 4; iptr += 8; count -= 8; } while (count--) { *optr = *iptr++; optr += 4; } } else { pixel = *iptr++; while (count >= 8) { optr[0 * 4] = pixel; optr[1 * 4] = pixel; optr[2 * 4] = pixel; optr[3 * 4] = pixel; optr[4 * 4] = pixel; optr[5 * 4] = pixel; optr[6 * 4] = pixel; optr[7 * 4] = pixel; optr += 8 * 4; count -= 8; } while (count--) { *optr = pixel; optr += 4; } } } } /* * longstoimage - * copy an array of longs to an iris image file. Each long * represents one pixel. xsize and ysize specify the dimensions of * the pixel array. zsize specifies what kind of image file to * write out. if zsize is 1, the luminance of the pixels are * calculated, and a single channel black and white image is saved. * If zsize is 3, an RGB image file is saved. If zsize is 4, an * RGBA image file is saved. * */ static PyObject * longstoimage(PyObject *self, PyObject *args) { unsigned char *lptr; char *name; int xsize, ysize, zsize; FILE *outf = NULL; IMAGE image; int tablen, y, z, pos, len; Py_Int32 *starttab = NULL, *lengthtab = NULL; unsigned char *rlebuf = NULL; unsigned char *lumbuf = NULL; int rlebuflen, goodwrite; PyObject *retval = NULL; if (!PyArg_ParseTuple(args, "s#iiis:longstoimage", &lptr, &len, &xsize, &ysize, &zsize, &name)) return NULL; goodwrite = 1; outf = fopen(name, "wb"); if (!outf) { PyErr_SetString(ImgfileError, "can't open output file"); return NULL; } tablen = ysize * zsize * sizeof(Py_Int32); rlebuflen = (int) (1.05 * xsize + 10); if ((tablen / sizeof(Py_Int32)) != (ysize * zsize) || rlebuflen < 0 || (xsize * sizeof(Py_Int32)) < 0) { PyErr_NoMemory(); goto finally; } starttab = (Py_Int32 *)malloc(tablen); lengthtab = (Py_Int32 *)malloc(tablen); rlebuf = (unsigned char *)malloc(rlebuflen); lumbuf = (unsigned char *)malloc(xsize * sizeof(Py_Int32)); if (!starttab || !lengthtab || !rlebuf || !lumbuf) { PyErr_NoMemory(); goto finally; } memset(&image, 0, sizeof(IMAGE)); image.imagic = IMAGIC; image.type = RLE(1); if (zsize>1) image.dim = 3; else image.dim = 2; image.xsize = xsize; image.ysize = ysize; image.zsize = zsize; image.min = 0; image.max = 255; goodwrite *= writeheader(outf, &image); pos = 512 + 2 * tablen; fseek(outf, pos, SEEK_SET); if (reverse_order) lptr += (ysize - 1) * xsize * sizeof(Py_UInt32); for (y = 0; y < ysize; y++) { for (z = 0; z < zsize; z++) { if (zsize == 1) { lumrow(lptr, lumbuf, xsize); len = compressrow(lumbuf, rlebuf, CHANOFFSET(z), xsize); } else { len = compressrow(lptr, rlebuf, CHANOFFSET(z), xsize); } if(len > rlebuflen) { PyErr_SetString(ImgfileError, "rlebuf is too small"); goto finally; } goodwrite *= fwrite(rlebuf, len, 1, outf); starttab[y + z * ysize] = pos; lengthtab[y + z * ysize] = len; pos += len; } if (reverse_order) lptr -= xsize * sizeof(Py_UInt32); else lptr += xsize * sizeof(Py_UInt32); } fseek(outf, 512, SEEK_SET); goodwrite *= writetab(outf, starttab, ysize*zsize); goodwrite *= writetab(outf, lengthtab, ysize*zsize); if (goodwrite) { Py_INCREF(Py_None); retval = Py_None; } else PyErr_SetString(ImgfileError, "not enough space for image"); finally: fclose(outf); free(starttab); free(lengthtab); free(rlebuf); free(lumbuf); return retval; } /* static utility functions for longstoimage */ static void lumrow(unsigned char *rgbptr, unsigned char *lumptr, int n) { lumptr += CHANOFFSET(0); while (n--) { *lumptr = ILUM(rgbptr[OFFSET_R], rgbptr[OFFSET_G], rgbptr[OFFSET_B]); lumptr += 4; rgbptr += 4; } } static int compressrow(unsigned char *lbuf, unsigned char *rlebuf, int z, int cnt) { unsigned char *iptr, *ibufend, *sptr, *optr; short todo, cc; Py_Int32 count; lbuf += z; iptr = lbuf; ibufend = iptr + cnt * 4; optr = rlebuf; while(iptr < ibufend) { sptr = iptr; iptr += 8; while ((iptr 126 ? 126 : (short)count; count -= todo; *optr++ = 0x80 | todo; while (todo > 8) { optr[0] = sptr[0 * 4]; optr[1] = sptr[1 * 4]; optr[2] = sptr[2 * 4]; optr[3] = sptr[3 * 4]; optr[4] = sptr[4 * 4]; optr[5] = sptr[5 * 4]; optr[6] = sptr[6 * 4]; optr[7] = sptr[7 * 4]; optr += 8; sptr += 8 * 4; todo -= 8; } while (todo--) { *optr++ = *sptr; sptr += 4; } } sptr = iptr; cc = *iptr; iptr += 4; while ((iptr < ibufend) && (*iptr == cc)) iptr += 4; count = (iptr - sptr) / 4; while (count) { todo = count > 126 ? 126 : (short)count; count -= todo; *optr++ = (unsigned char) todo; *optr++ = (unsigned char) cc; } } *optr++ = 0; return optr - (unsigned char *)rlebuf; } static PyObject * ttob(PyObject *self, PyObject *args) { int order, oldorder; if (!PyArg_ParseTuple(args, "i:ttob", &order)) return NULL; oldorder = reverse_order; reverse_order = order; return PyInt_FromLong(oldorder); } static PyMethodDef rgbimg_methods[] = { {"sizeofimage", sizeofimage, METH_VARARGS}, {"longimagedata", longimagedata, METH_VARARGS}, {"longstoimage", longstoimage, METH_VARARGS}, {"ttob", ttob, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initrgbimg(void) { PyObject *m, *d; m = Py_InitModule("rgbimg", rgbimg_methods); d = PyModule_GetDict(m); ImgfileError = PyErr_NewException("rgbimg.error", NULL, NULL); if (ImgfileError != NULL) PyDict_SetItemString(d, "error", ImgfileError); } Python-2.3.7/Modules/getaddrinfo.c0000644001241000117560000003677007717771674016356 0ustar loewishpifb6/* * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. Neither the name of the project nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND * GAI_ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE * FOR GAI_ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON GAI_ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN GAI_ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ /* * "#ifdef FAITH" part is local hack for supporting IPv4-v6 translator. * * Issues to be discussed: * - Thread safe-ness must be checked. * - Return values. There are nonstandard return values defined and used * in the source code. This is because RFC2133 is silent about which error * code must be returned for which situation. * - PF_UNSPEC case would be handled in getipnodebyname() with the AI_ALL flag. */ #if 0 #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "addrinfo.h" #endif #if defined(__KAME__) && defined(ENABLE_IPV6) # define FAITH #endif #define SUCCESS 0 #define GAI_ANY 0 #define YES 1 #define NO 0 #ifdef FAITH static int translate = NO; static struct in6_addr faith_prefix = IN6ADDR_GAI_ANY_INIT; #endif static const char in_addrany[] = { 0, 0, 0, 0 }; static const char in6_addrany[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; static const char in_loopback[] = { 127, 0, 0, 1 }; static const char in6_loopback[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1 }; struct sockinet { u_char si_len; u_char si_family; u_short si_port; }; static struct gai_afd { int a_af; int a_addrlen; int a_socklen; int a_off; const char *a_addrany; const char *a_loopback; } gai_afdl [] = { #ifdef ENABLE_IPV6 #define N_INET6 0 {PF_INET6, sizeof(struct in6_addr), sizeof(struct sockaddr_in6), offsetof(struct sockaddr_in6, sin6_addr), in6_addrany, in6_loopback}, #define N_INET 1 #else #define N_INET 0 #endif {PF_INET, sizeof(struct in_addr), sizeof(struct sockaddr_in), offsetof(struct sockaddr_in, sin_addr), in_addrany, in_loopback}, {0, 0, 0, 0, NULL, NULL}, }; #ifdef ENABLE_IPV6 #define PTON_MAX 16 #else #define PTON_MAX 4 #endif #ifndef IN_MULTICAST #define IN_MULTICAST(i) (((i) & 0xf0000000U) == 0xe0000000U) #endif #ifndef IN_EXPERIMENTAL #define IN_EXPERIMENTAL(i) (((i) & 0xe0000000U) == 0xe0000000U) #endif #ifndef IN_LOOPBACKNET #define IN_LOOPBACKNET 127 #endif static int get_name Py_PROTO((const char *, struct gai_afd *, struct addrinfo **, char *, struct addrinfo *, int)); static int get_addr Py_PROTO((const char *, int, struct addrinfo **, struct addrinfo *, int)); static int str_isnumber Py_PROTO((const char *)); static char *ai_errlist[] = { "success.", "address family for hostname not supported.", /* EAI_ADDRFAMILY */ "temporary failure in name resolution.", /* EAI_AGAIN */ "invalid value for ai_flags.", /* EAI_BADFLAGS */ "non-recoverable failure in name resolution.", /* EAI_FAIL */ "ai_family not supported.", /* EAI_FAMILY */ "memory allocation failure.", /* EAI_MEMORY */ "no address associated with hostname.", /* EAI_NODATA */ "hostname nor servname provided, or not known.",/* EAI_NONAME */ "servname not supported for ai_socktype.", /* EAI_SERVICE */ "ai_socktype not supported.", /* EAI_SOCKTYPE */ "system error returned in errno.", /* EAI_SYSTEM */ "invalid value for hints.", /* EAI_BADHINTS */ "resolved protocol is unknown.", /* EAI_PROTOCOL */ "unknown error.", /* EAI_MAX */ }; #define GET_CANONNAME(ai, str) \ if (pai->ai_flags & AI_CANONNAME) {\ if (((ai)->ai_canonname = (char *)malloc(strlen(str) + 1)) != NULL) {\ strcpy((ai)->ai_canonname, (str));\ } else {\ error = EAI_MEMORY;\ goto free;\ }\ } #ifdef HAVE_SOCKADDR_SA_LEN #define GET_AI(ai, gai_afd, addr, port) {\ char *p;\ if (((ai) = (struct addrinfo *)malloc(sizeof(struct addrinfo) +\ ((gai_afd)->a_socklen)))\ == NULL) goto free;\ memcpy(ai, pai, sizeof(struct addrinfo));\ (ai)->ai_addr = (struct sockaddr *)((ai) + 1);\ memset((ai)->ai_addr, 0, (gai_afd)->a_socklen);\ (ai)->ai_addr->sa_len = (ai)->ai_addrlen = (gai_afd)->a_socklen;\ (ai)->ai_addr->sa_family = (ai)->ai_family = (gai_afd)->a_af;\ ((struct sockinet *)(ai)->ai_addr)->si_port = port;\ p = (char *)((ai)->ai_addr);\ memcpy(p + (gai_afd)->a_off, (addr), (gai_afd)->a_addrlen);\ } #else #define GET_AI(ai, gai_afd, addr, port) {\ char *p;\ if (((ai) = (struct addrinfo *)malloc(sizeof(struct addrinfo) +\ ((gai_afd)->a_socklen)))\ == NULL) goto free;\ memcpy(ai, pai, sizeof(struct addrinfo));\ (ai)->ai_addr = (struct sockaddr *)((ai) + 1);\ memset((ai)->ai_addr, 0, (gai_afd)->a_socklen);\ (ai)->ai_addrlen = (gai_afd)->a_socklen;\ (ai)->ai_addr->sa_family = (ai)->ai_family = (gai_afd)->a_af;\ ((struct sockinet *)(ai)->ai_addr)->si_port = port;\ p = (char *)((ai)->ai_addr);\ memcpy(p + (gai_afd)->a_off, (addr), (gai_afd)->a_addrlen);\ } #endif #define ERR(err) { error = (err); goto bad; } char * gai_strerror(int ecode) { if (ecode < 0 || ecode > EAI_MAX) ecode = EAI_MAX; return ai_errlist[ecode]; } void freeaddrinfo(struct addrinfo *ai) { struct addrinfo *next; do { next = ai->ai_next; if (ai->ai_canonname) free(ai->ai_canonname); /* no need to free(ai->ai_addr) */ free(ai); } while ((ai = next) != NULL); } static int str_isnumber(const char *p) { unsigned char *q = (unsigned char *)p; while (*q) { if (! isdigit(*q)) return NO; q++; } return YES; } int getaddrinfo(const char*hostname, const char*servname, const struct addrinfo *hints, struct addrinfo **res) { struct addrinfo sentinel; struct addrinfo *top = NULL; struct addrinfo *cur; int i, error = 0; char pton[PTON_MAX]; struct addrinfo ai; struct addrinfo *pai; u_short port; #ifdef FAITH static int firsttime = 1; if (firsttime) { /* translator hack */ { char *q = getenv("GAI"); if (q && inet_pton(AF_INET6, q, &faith_prefix) == 1) translate = YES; } firsttime = 0; } #endif /* initialize file static vars */ sentinel.ai_next = NULL; cur = &sentinel; pai = &ai; pai->ai_flags = 0; pai->ai_family = PF_UNSPEC; pai->ai_socktype = GAI_ANY; pai->ai_protocol = GAI_ANY; pai->ai_addrlen = 0; pai->ai_canonname = NULL; pai->ai_addr = NULL; pai->ai_next = NULL; port = GAI_ANY; if (hostname == NULL && servname == NULL) return EAI_NONAME; if (hints) { /* error check for hints */ if (hints->ai_addrlen || hints->ai_canonname || hints->ai_addr || hints->ai_next) ERR(EAI_BADHINTS); /* xxx */ if (hints->ai_flags & ~AI_MASK) ERR(EAI_BADFLAGS); switch (hints->ai_family) { case PF_UNSPEC: case PF_INET: #ifdef ENABLE_IPV6 case PF_INET6: #endif break; default: ERR(EAI_FAMILY); } memcpy(pai, hints, sizeof(*pai)); switch (pai->ai_socktype) { case GAI_ANY: switch (pai->ai_protocol) { case GAI_ANY: break; case IPPROTO_UDP: pai->ai_socktype = SOCK_DGRAM; break; case IPPROTO_TCP: pai->ai_socktype = SOCK_STREAM; break; default: pai->ai_socktype = SOCK_RAW; break; } break; case SOCK_RAW: break; case SOCK_DGRAM: if (pai->ai_protocol != IPPROTO_UDP && pai->ai_protocol != GAI_ANY) ERR(EAI_BADHINTS); /*xxx*/ pai->ai_protocol = IPPROTO_UDP; break; case SOCK_STREAM: if (pai->ai_protocol != IPPROTO_TCP && pai->ai_protocol != GAI_ANY) ERR(EAI_BADHINTS); /*xxx*/ pai->ai_protocol = IPPROTO_TCP; break; default: ERR(EAI_SOCKTYPE); /* unreachable */ } } /* * service port */ if (servname) { if (str_isnumber(servname)) { if (pai->ai_socktype == GAI_ANY) { /* caller accept *GAI_ANY* socktype */ pai->ai_socktype = SOCK_DGRAM; pai->ai_protocol = IPPROTO_UDP; } port = htons((u_short)atoi(servname)); } else { struct servent *sp; char *proto; proto = NULL; switch (pai->ai_socktype) { case GAI_ANY: proto = NULL; break; case SOCK_DGRAM: proto = "udp"; break; case SOCK_STREAM: proto = "tcp"; break; default: fprintf(stderr, "panic!\n"); break; } if ((sp = getservbyname(servname, proto)) == NULL) ERR(EAI_SERVICE); port = sp->s_port; if (pai->ai_socktype == GAI_ANY) { if (strcmp(sp->s_proto, "udp") == 0) { pai->ai_socktype = SOCK_DGRAM; pai->ai_protocol = IPPROTO_UDP; } else if (strcmp(sp->s_proto, "tcp") == 0) { pai->ai_socktype = SOCK_STREAM; pai->ai_protocol = IPPROTO_TCP; } else ERR(EAI_PROTOCOL); /*xxx*/ } } } /* * hostname == NULL. * passive socket -> anyaddr (0.0.0.0 or ::) * non-passive socket -> localhost (127.0.0.1 or ::1) */ if (hostname == NULL) { struct gai_afd *gai_afd; for (gai_afd = &gai_afdl[0]; gai_afd->a_af; gai_afd++) { if (!(pai->ai_family == PF_UNSPEC || pai->ai_family == gai_afd->a_af)) { continue; } if (pai->ai_flags & AI_PASSIVE) { GET_AI(cur->ai_next, gai_afd, gai_afd->a_addrany, port); /* xxx meaningless? * GET_CANONNAME(cur->ai_next, "anyaddr"); */ } else { GET_AI(cur->ai_next, gai_afd, gai_afd->a_loopback, port); /* xxx meaningless? * GET_CANONNAME(cur->ai_next, "localhost"); */ } cur = cur->ai_next; } top = sentinel.ai_next; if (top) goto good; else ERR(EAI_FAMILY); } /* hostname as numeric name */ for (i = 0; gai_afdl[i].a_af; i++) { if (inet_pton(gai_afdl[i].a_af, hostname, pton)) { u_long v4a; #ifdef ENABLE_IPV6 u_char pfx; #endif switch (gai_afdl[i].a_af) { case AF_INET: v4a = ((struct in_addr *)pton)->s_addr; v4a = ntohl(v4a); if (IN_MULTICAST(v4a) || IN_EXPERIMENTAL(v4a)) pai->ai_flags &= ~AI_CANONNAME; v4a >>= IN_CLASSA_NSHIFT; if (v4a == 0 || v4a == IN_LOOPBACKNET) pai->ai_flags &= ~AI_CANONNAME; break; #ifdef ENABLE_IPV6 case AF_INET6: pfx = ((struct in6_addr *)pton)->s6_addr8[0]; if (pfx == 0 || pfx == 0xfe || pfx == 0xff) pai->ai_flags &= ~AI_CANONNAME; break; #endif } if (pai->ai_family == gai_afdl[i].a_af || pai->ai_family == PF_UNSPEC) { if (! (pai->ai_flags & AI_CANONNAME)) { GET_AI(top, &gai_afdl[i], pton, port); goto good; } /* * if AI_CANONNAME and if reverse lookup * fail, return ai anyway to pacify * calling application. * * XXX getaddrinfo() is a name->address * translation function, and it looks strange * that we do addr->name translation here. */ get_name(pton, &gai_afdl[i], &top, pton, pai, port); goto good; } else ERR(EAI_FAMILY); /*xxx*/ } } if (pai->ai_flags & AI_NUMERICHOST) ERR(EAI_NONAME); /* hostname as alphabetical name */ error = get_addr(hostname, pai->ai_family, &top, pai, port); if (error == 0) { if (top) { good: *res = top; return SUCCESS; } else error = EAI_FAIL; } free: if (top) freeaddrinfo(top); bad: *res = NULL; return error; } static int get_name(addr, gai_afd, res, numaddr, pai, port0) const char *addr; struct gai_afd *gai_afd; struct addrinfo **res; char *numaddr; struct addrinfo *pai; int port0; { u_short port = port0 & 0xffff; struct hostent *hp; struct addrinfo *cur; int error = 0; #ifdef ENABLE_IPV6 int h_error; #endif #ifdef ENABLE_IPV6 hp = getipnodebyaddr(addr, gai_afd->a_addrlen, gai_afd->a_af, &h_error); #else hp = gethostbyaddr(addr, gai_afd->a_addrlen, AF_INET); #endif if (hp && hp->h_name && hp->h_name[0] && hp->h_addr_list[0]) { GET_AI(cur, gai_afd, hp->h_addr_list[0], port); GET_CANONNAME(cur, hp->h_name); } else GET_AI(cur, gai_afd, numaddr, port); #ifdef ENABLE_IPV6 if (hp) freehostent(hp); #endif *res = cur; return SUCCESS; free: if (cur) freeaddrinfo(cur); #ifdef ENABLE_IPV6 if (hp) freehostent(hp); #endif /* bad: */ *res = NULL; return error; } static int get_addr(hostname, af, res, pai, port0) const char *hostname; int af; struct addrinfo **res; struct addrinfo *pai; int port0; { u_short port = port0 & 0xffff; struct addrinfo sentinel; struct hostent *hp; struct addrinfo *top, *cur; struct gai_afd *gai_afd; int i, error = 0, h_error; char *ap; top = NULL; sentinel.ai_next = NULL; cur = &sentinel; #ifdef ENABLE_IPV6 if (af == AF_UNSPEC) { hp = getipnodebyname(hostname, AF_INET6, AI_ADDRCONFIG|AI_ALL|AI_V4MAPPED, &h_error); } else hp = getipnodebyname(hostname, af, AI_ADDRCONFIG, &h_error); #else hp = gethostbyname(hostname); h_error = h_errno; #endif if (hp == NULL) { switch (h_error) { case HOST_NOT_FOUND: case NO_DATA: error = EAI_NODATA; break; case TRY_AGAIN: error = EAI_AGAIN; break; case NO_RECOVERY: default: error = EAI_FAIL; break; } goto free; } if ((hp->h_name == NULL) || (hp->h_name[0] == 0) || (hp->h_addr_list[0] == NULL)) { error = EAI_FAIL; goto free; } for (i = 0; (ap = hp->h_addr_list[i]) != NULL; i++) { switch (af) { #ifdef ENABLE_IPV6 case AF_INET6: gai_afd = &gai_afdl[N_INET6]; break; #endif #ifndef ENABLE_IPV6 default: /* AF_UNSPEC */ #endif case AF_INET: gai_afd = &gai_afdl[N_INET]; break; #ifdef ENABLE_IPV6 default: /* AF_UNSPEC */ if (IN6_IS_ADDR_V4MAPPED((struct in6_addr *)ap)) { ap += sizeof(struct in6_addr) - sizeof(struct in_addr); gai_afd = &gai_afdl[N_INET]; } else gai_afd = &gai_afdl[N_INET6]; break; #endif } #ifdef FAITH if (translate && gai_afd->a_af == AF_INET) { struct in6_addr *in6; GET_AI(cur->ai_next, &gai_afdl[N_INET6], ap, port); in6 = &((struct sockaddr_in6 *)cur->ai_next->ai_addr)->sin6_addr; memcpy(&in6->s6_addr32[0], &faith_prefix, sizeof(struct in6_addr) - sizeof(struct in_addr)); memcpy(&in6->s6_addr32[3], ap, sizeof(struct in_addr)); } else #endif /* FAITH */ GET_AI(cur->ai_next, gai_afd, ap, port); if (cur == &sentinel) { top = cur->ai_next; GET_CANONNAME(top, hp->h_name); } cur = cur->ai_next; } #ifdef ENABLE_IPV6 freehostent(hp); #endif *res = top; return SUCCESS; free: if (top) freeaddrinfo(top); #ifdef ENABLE_IPV6 if (hp) freehostent(hp); #endif /* bad: */ *res = NULL; return error; } Python-2.3.7/Modules/pypcre.c0000644001241000117560000041522510305324271015334 0ustar loewishpifb6 /************************************************* * Perl-Compatible Regular Expressions * *************************************************/ /* DO NOT EDIT THIS FILE! */ /* This file is automatically written by the merge-files.py script included with the PCRE distribution for Python; it's produced from several C files, and code is removed in the process. If you want to modify the code or track down bugs, it will be much easier to work with the code in its original, multiple-file form. Don't edit this file by hand, or submit patches to it. The Python-specific PCRE distribution can be retrieved from http://starship.skyport.net/crew/amk/regex/ The unmodified original PCRE distribution is available at ftp://ftp.cus.cam.ac.uk/pub/software/programs/pcre/, and is originally written by: Philip Hazel Extensively modified by the Python String-SIG: Send bug reports to: (They'll figure out if it's a bug in PCRE or in the Python-specific changes.) Copyright (c) 1997 University of Cambridge ----------------------------------------------------------------------------- Permission is granted to anyone to use this software for any purpose on any computer system, and to redistribute it freely, subject to the following restrictions: 1. This software is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 2. The origin of this software must not be misrepresented, either by explicit claim or by omission. 3. Altered versions must be plainly marked as such, and must not be misrepresented as being the original software. ----------------------------------------------------------------------------- */ #define FOR_PYTHON #include "Python.h" #include "pcre-int.h" #include #include "graminit.h" /************************************************* * Perl-Compatible Regular Expressions * *************************************************/ /* This file is automatically written by the makechartables auxiliary program. If you edit it by hand, you might like to edit the Makefile to prevent its ever being regenerated. */ /* This table is a lower casing table. */ unsigned char pcre_lcc[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 97, 98, 99,100,101,102,103, 104,105,106,107,108,109,110,111, 112,113,114,115,116,117,118,119, 120,121,122, 91, 92, 93, 94, 95, 96, 97, 98, 99,100,101,102,103, 104,105,106,107,108,109,110,111, 112,113,114,115,116,117,118,119, 120,121,122,123,124,125,126,127, 128,129,130,131,132,133,134,135, 136,137,138,139,140,141,142,143, 144,145,146,147,148,149,150,151, 152,153,154,155,156,157,158,159, 160,161,162,163,164,165,166,167, 168,169,170,171,172,173,174,175, 176,177,178,179,180,181,182,183, 184,185,186,187,188,189,190,191, 192,193,194,195,196,197,198,199, 200,201,202,203,204,205,206,207, 208,209,210,211,212,213,214,215, 216,217,218,219,220,221,222,223, 224,225,226,227,228,229,230,231, 232,233,234,235,236,237,238,239, 240,241,242,243,244,245,246,247, 248,249,250,251,252,253,254,255 }; /* This table is a case flipping table. */ unsigned char pcre_fcc[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 97, 98, 99,100,101,102,103, 104,105,106,107,108,109,110,111, 112,113,114,115,116,117,118,119, 120,121,122, 91, 92, 93, 94, 95, 96, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90,123,124,125,126,127, 128,129,130,131,132,133,134,135, 136,137,138,139,140,141,142,143, 144,145,146,147,148,149,150,151, 152,153,154,155,156,157,158,159, 160,161,162,163,164,165,166,167, 168,169,170,171,172,173,174,175, 176,177,178,179,180,181,182,183, 184,185,186,187,188,189,190,191, 192,193,194,195,196,197,198,199, 200,201,202,203,204,205,206,207, 208,209,210,211,212,213,214,215, 216,217,218,219,220,221,222,223, 224,225,226,227,228,229,230,231, 232,233,234,235,236,237,238,239, 240,241,242,243,244,245,246,247, 248,249,250,251,252,253,254,255 }; /* This table contains bit maps for digits, letters, 'word' chars, and white space. Each map is 32 bytes long and the bits run from the least significant end of each byte. */ unsigned char pcre_cbits[] = { 0x00,0x00,0x00,0x00,0x00,0x00,0xff,0x03, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0xfe,0xff,0xff,0x07,0xfe,0xff,0xff,0x07, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0xff,0x03, 0xfe,0xff,0xff,0x87,0xfe,0xff,0xff,0x07, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x3e,0x00,0x00,0x01,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }; /* This table identifies various classes of character by individual bits: 0x01 white space character 0x02 letter 0x04 decimal digit 0x08 hexadecimal digit 0x10 alphanumeric or '_' 0x80 regular expression metacharacter or binary zero */ unsigned char pcre_ctypes[] = { 0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 0- 7 */ 0x00,0x01,0x01,0x01,0x01,0x01,0x00,0x00, /* 8- 15 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 16- 23 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 24- 31 */ 0x01,0x00,0x00,0x00,0x80,0x00,0x00,0x00, /* - ' */ 0x80,0x80,0x80,0x80,0x00,0x00,0x80,0x00, /* ( - / */ 0x3c,0x3c,0x3c,0x3c,0x3c,0x3c,0x3c,0x3c, /* 0 - 7 */ 0x1c,0x1c,0x00,0x00,0x00,0x00,0x00,0x80, /* 8 - ? */ 0x00,0x1a,0x1a,0x1a,0x1a,0x1a,0x1a,0x12, /* @ - G */ 0x12,0x12,0x12,0x12,0x12,0x12,0x12,0x12, /* H - O */ 0x12,0x12,0x12,0x12,0x12,0x12,0x12,0x12, /* P - W */ 0x12,0x12,0x12,0x80,0x00,0x00,0x80,0x10, /* X - _ */ 0x00,0x1a,0x1a,0x1a,0x1a,0x1a,0x1a,0x12, /* ` - g */ 0x12,0x12,0x12,0x12,0x12,0x12,0x12,0x12, /* h - o */ 0x12,0x12,0x12,0x12,0x12,0x12,0x12,0x12, /* p - w */ 0x12,0x12,0x12,0x80,0x80,0x00,0x00,0x00, /* x -127 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 128-135 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 136-143 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 144-151 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 152-159 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 160-167 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 168-175 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 176-183 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 184-191 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 192-199 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 200-207 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 208-215 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 216-223 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 224-231 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 232-239 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, /* 240-247 */ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00};/* 248-255 */ /* End of chartables.c */ /************************************************* * Perl-Compatible Regular Expressions * *************************************************/ /* This is a library of functions to support regular expressions whose syntax and semantics are as close as possible to those of the Perl 5 language. See the file Tech.Notes for some information on the internals. Written by: Philip Hazel Copyright (c) 1998 University of Cambridge ----------------------------------------------------------------------------- Permission is granted to anyone to use this software for any purpose on any computer system, and to redistribute it freely, subject to the following restrictions: 1. This software is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 2. The origin of this software must not be misrepresented, either by explicit claim or by omission. 3. Altered versions must be plainly marked as such, and must not be misrepresented as being the original software. ----------------------------------------------------------------------------- */ /* Include the internals header, which itself includes Standard C headers plus the external pcre header. */ /************************************************* * Create bitmap of starting chars * *************************************************/ /* This function scans a compiled unanchored expression and attempts to build a bitmap of the set of initial characters. If it can't, it returns FALSE. As time goes by, we may be able to get more clever at doing this. Arguments: code points to an expression start_bits points to a 32-byte table, initialized to 0 Returns: TRUE if table built, FALSE otherwise */ static BOOL set_start_bits(const uschar *code, uschar *start_bits) { register int c; volatile int dummy; do { const uschar *tcode = code + 3; BOOL try_next = TRUE; while (try_next) { try_next = FALSE; if ((int)*tcode >= OP_BRA || *tcode == OP_ASSERT) { if (!set_start_bits(tcode, start_bits)) return FALSE; } else switch(*tcode) { default: return FALSE; /* BRAZERO does the bracket, but carries on. */ case OP_BRAZERO: case OP_BRAMINZERO: if (!set_start_bits(++tcode, start_bits)) return FALSE; dummy = 1; do tcode += (tcode[1] << 8) + tcode[2]; while (*tcode == OP_ALT); tcode += 3; try_next = TRUE; break; /* Single-char * or ? sets the bit and tries the next item */ case OP_STAR: case OP_MINSTAR: case OP_QUERY: case OP_MINQUERY: start_bits[tcode[1]/8] |= (1 << (tcode[1]&7)); tcode += 2; try_next = TRUE; break; /* Single-char upto sets the bit and tries the next */ case OP_UPTO: case OP_MINUPTO: start_bits[tcode[3]/8] |= (1 << (tcode[3]&7)); tcode += 4; try_next = TRUE; break; /* At least one single char sets the bit and stops */ case OP_EXACT: /* Fall through */ tcode++; case OP_CHARS: /* Fall through */ tcode++; case OP_PLUS: case OP_MINPLUS: start_bits[tcode[1]/8] |= (1 << (tcode[1]&7)); break; /* Single character type sets the bits and stops */ case OP_NOT_DIGIT: for (c = 0; c < 32; c++) start_bits[c] |= ~pcre_cbits[c+cbit_digit]; break; case OP_DIGIT: for (c = 0; c < 32; c++) start_bits[c] |= pcre_cbits[c+cbit_digit]; break; case OP_NOT_WHITESPACE: for (c = 0; c < 32; c++) start_bits[c] |= ~pcre_cbits[c+cbit_space]; break; case OP_WHITESPACE: for (c = 0; c < 32; c++) start_bits[c] |= pcre_cbits[c+cbit_space]; break; case OP_NOT_WORDCHAR: for (c = 0; c < 32; c++) start_bits[c] |= ~(pcre_cbits[c] | pcre_cbits[c+cbit_word]); break; case OP_WORDCHAR: for (c = 0; c < 32; c++) start_bits[c] |= (pcre_cbits[c] | pcre_cbits[c+cbit_word]); break; /* One or more character type fudges the pointer and restarts, knowing it will hit a single character type and stop there. */ case OP_TYPEPLUS: case OP_TYPEMINPLUS: tcode++; try_next = TRUE; break; case OP_TYPEEXACT: tcode += 3; try_next = TRUE; break; /* Zero or more repeats of character types set the bits and then try again. */ case OP_TYPEUPTO: case OP_TYPEMINUPTO: tcode += 2; /* Fall through */ case OP_TYPESTAR: case OP_TYPEMINSTAR: case OP_TYPEQUERY: case OP_TYPEMINQUERY: switch(tcode[1]) { case OP_NOT_DIGIT: for (c = 0; c < 32; c++) start_bits[c] |= ~pcre_cbits[c+cbit_digit]; break; case OP_DIGIT: for (c = 0; c < 32; c++) start_bits[c] |= pcre_cbits[c+cbit_digit]; break; case OP_NOT_WHITESPACE: for (c = 0; c < 32; c++) start_bits[c] |= ~pcre_cbits[c+cbit_space]; break; case OP_WHITESPACE: for (c = 0; c < 32; c++) start_bits[c] |= pcre_cbits[c+cbit_space]; break; case OP_NOT_WORDCHAR: for (c = 0; c < 32; c++) start_bits[c] |= ~(pcre_cbits[c] | pcre_cbits[c+cbit_word]); break; case OP_WORDCHAR: for (c = 0; c < 32; c++) start_bits[c] |= (pcre_cbits[c] | pcre_cbits[c+cbit_word]); break; } tcode += 2; try_next = TRUE; break; /* Character class: set the bits and either carry on or not, according to the repeat count. */ case OP_CLASS: case OP_NEGCLASS: { tcode++; for (c = 0; c < 32; c++) start_bits[c] |= tcode[c]; tcode += 32; switch (*tcode) { case OP_CRSTAR: case OP_CRMINSTAR: case OP_CRQUERY: case OP_CRMINQUERY: tcode++; try_next = TRUE; break; case OP_CRRANGE: case OP_CRMINRANGE: if (((tcode[1] << 8) + tcode[2]) == 0) { tcode += 5; try_next = TRUE; } break; } } break; /* End of class handling */ } /* End of switch */ } /* End of try_next loop */ code += (code[1] << 8) + code[2]; /* Advance to next branch */ } while (*code == OP_ALT); return TRUE; } /************************************************* * Study a compiled expression * *************************************************/ /* This function is handed a compiled expression that it must study to produce information that will speed up the matching. It returns a pcre_extra block which then gets handed back to pcre_exec(). Arguments: re points to the compiled expression options contains option bits errorptr points to where to place error messages; set NULL unless error Returns: pointer to a pcre_extra block, NULL on error or if no optimization possible */ pcre_extra * pcre_study(const pcre *external_re, int options, const char **errorptr) { BOOL caseless; uschar start_bits[32]; real_pcre_extra *extra; const real_pcre *re = (const real_pcre *)external_re; *errorptr = NULL; if (re == NULL || re->magic_number != MAGIC_NUMBER) { *errorptr = "argument is not a compiled regular expression"; return NULL; } if ((options & ~PUBLIC_STUDY_OPTIONS) != 0) { *errorptr = "unknown or incorrect option bit(s) set"; return NULL; } /* Caseless can either be from the compiled regex or from options. */ caseless = ((re->options | options) & PCRE_CASELESS) != 0; /* For an anchored pattern, or an unanchored pattern that has a first char, or a multiline pattern that matches only at "line starts", no further processing at present. */ if ((re->options & (PCRE_ANCHORED|PCRE_FIRSTSET|PCRE_STARTLINE)) != 0) return NULL; /* See if we can find a fixed set of initial characters for the pattern. */ memset(start_bits, 0, 32 * sizeof(uschar)); if (!set_start_bits(re->code, start_bits)) return NULL; /* If this studying is caseless, scan the created bit map and duplicate the bits for any letters. */ if (caseless) { register int c; for (c = 0; c < 256; c++) { if ((start_bits[c/8] & (1 << (c&7))) != 0 && (pcre_ctypes[c] & ctype_letter) != 0) { int d = pcre_fcc[c]; start_bits[d/8] |= (1 << (d&7)); } } } /* Get an "extra" block and put the information therein. */ extra = (real_pcre_extra *)(pcre_malloc)(sizeof(real_pcre_extra)); if (extra == NULL) { *errorptr = "failed to get memory"; return NULL; } extra->options = PCRE_STUDY_MAPPED | (caseless? PCRE_STUDY_CASELESS : 0); memcpy(extra->start_bits, start_bits, sizeof(start_bits)); return (pcre_extra *)extra; } /* End of study.c */ /************************************************* * Perl-Compatible Regular Expressions * *************************************************/ /* This is a library of functions to support regular expressions whose syntax and semantics are as close as possible to those of the Perl 5 language. See the file Tech.Notes for some information on the internals. Written by: Philip Hazel Copyright (c) 1998 University of Cambridge ----------------------------------------------------------------------------- Permission is granted to anyone to use this software for any purpose on any computer system, and to redistribute it freely, subject to the following restrictions: 1. This software is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 2. The origin of this software must not be misrepresented, either by explicit claim or by omission. 3. Altered versions must be plainly marked as such, and must not be misrepresented as being the original software. ----------------------------------------------------------------------------- */ /* Define DEBUG to get debugging output on stdout. */ /* #define DEBUG */ /* Use a macro for debugging printing, 'cause that eliminates the use of #ifdef inline, and there are *still* stupid compilers about that don't like indented pre-processor statements. I suppose it's only been 10 years... */ #undef DPRINTF #ifdef DEBUG #define DPRINTF(p) printf p #else #define DPRINTF(p) /*nothing*/ #endif /* Include the internals header, which itself includes Standard C headers plus the external pcre header. */ #ifndef Py_eval_input /* For Python 1.4, graminit.h has to be explicitly included */ #define Py_eval_input eval_input #endif /* FOR_PYTHON */ /* Allow compilation as C++ source code, should anybody want to do that. */ #ifdef __cplusplus #define class pcre_class #endif /* Min and max values for the common repeats; for the maxima, 0 => infinity */ static const char rep_min[] = { 0, 0, 1, 1, 0, 0 }; static const char rep_max[] = { 0, 0, 0, 0, 1, 1 }; /* Text forms of OP_ values and things, for debugging (not all used) */ #ifdef DEBUG static const char *OP_names[] = { "End", "\\A", "\\B", "\\b", "\\D", "\\d", "\\S", "\\s", "\\W", "\\w", "Cut", "\\Z", "localized \\B", "localized \\b", "localized \\W", "localized \\w", "^", "$", "Any", "chars", "not", "*", "*?", "+", "+?", "?", "??", "{", "{", "{", "*", "*?", "+", "+?", "?", "??", "{", "{", "{", "*", "*?", "+", "+?", "?", "??", "{", "{", "{", "*", "*?", "+", "+?", "?", "??", "{", "{", "class", "negclass", "classL", "Ref", "Alt", "Ket", "KetRmax", "KetRmin", "Assert", "Assert not", "Once", "Brazero", "Braminzero", "Bra" }; #endif /* Table for handling escaped characters in the range '0'-'z'. Positive returns are simple data values; negative values are for special things like \d and so on. Zero means further processing is needed (for things like \x), or the escape is invalid. */ static const short int escapes[] = { 0, 0, 0, 0, 0, 0, 0, 0, /* 0 - 7 */ 0, 0, ':', ';', '<', '=', '>', '?', /* 8 - ? */ '@', -ESC_A, -ESC_B, 0, -ESC_D, 0, 0, 0, /* @ - G */ 0, 0, 0, 0, 0, 0, 0, 0, /* H - O */ 0, 0, 0, -ESC_S, 0, 0, 0, -ESC_W, /* P - W */ 0, 0, -ESC_Z, '[', '\\', ']', '^', '_', /* X - _ */ '`', 7, -ESC_b, 0, -ESC_d, 0, '\f', 0, /* ` - g */ 0, 0, 0, 0, 0, 0, '\n', 0, /* h - o */ 0, 0, '\r', -ESC_s, '\t', 0, '\v', -ESC_w, /* p - w */ 0, 0, 0 /* x - z */ }; /* Definition to allow mutual recursion */ static BOOL compile_regex(int, int *, uschar **, const uschar **, const char **, PyObject *); /* Structure for passing "static" information around between the functions doing the matching, so that they are thread-safe. */ typedef struct match_data { int errorcode; /* As it says */ int *offset_vector; /* Offset vector */ int offset_end; /* One past the end */ BOOL offset_overflow; /* Set if too many extractions */ BOOL caseless; /* Case-independent flag */ BOOL runtime_caseless; /* Caseless forced at run time */ BOOL multiline; /* Multiline flag */ BOOL notbol; /* NOTBOL flag */ BOOL noteol; /* NOTEOL flag */ BOOL dotall; /* Dot matches any char */ BOOL endonly; /* Dollar not before final \n */ const uschar *start_subject; /* Start of the subject string */ const uschar *end_subject; /* End of the subject string */ jmp_buf fail_env; /* Environment for longjump() break out */ const uschar *end_match_ptr; /* Subject position at end match */ int end_offset_top; /* Highwater mark at end of match */ jmp_buf error_env; /* For longjmp() if an error occurs deep inside a matching operation */ int length; /* Length of the allocated stacks */ int point; /* Point to add next item pushed onto stacks */ /* Pointers to the 6 stacks */ int *off_num, *offset_top, *r1, *r2; const uschar **eptr, **ecode; } match_data; /************************************************* * Global variables * *************************************************/ /* PCRE is thread-clean and doesn't use any global variables in the normal sense. However, it calls memory allocation and free functions via the two indirections below, which are can be changed by the caller, but are shared between all threads. */ void *(*pcre_malloc)(size_t) = malloc; void (*pcre_free)(void *) = free; /************************************************* * Return version string * *************************************************/ const char * pcre_version(void) { return PCRE_VERSION; } /************************************************* * Return info about a compiled pattern * *************************************************/ /* This function picks potentially useful data out of the private structure. Arguments: external_re points to compiled code optptr where to pass back the options first_char where to pass back the first character, or -1 if multiline and all branches start ^, or -2 otherwise Returns: number of identifying extraction brackets or negative values on error */ int pcre_info(const pcre *external_re, int *optptr, int *first_char) { const real_pcre *re = (real_pcre *)external_re; if (re == NULL) return PCRE_ERROR_NULL; if (re->magic_number != MAGIC_NUMBER) return PCRE_ERROR_BADMAGIC; if (optptr != NULL) *optptr = (re->options & PUBLIC_OPTIONS); if (first_char != NULL) *first_char = ((re->options & PCRE_FIRSTSET) != 0)? re->first_char : ((re->options & PCRE_STARTLINE) != 0)? -1 : -2; return re->top_bracket; } #ifdef DEBUG /************************************************* * Debugging function to print chars * *************************************************/ /* Print a sequence of chars in printable format, stopping at the end of the subject if the requested. Arguments: p points to characters length number to print is_subject TRUE if printing from within md->start_subject md pointer to matching data block, if is_subject is TRUE Returns: nothing */ static void pchars(const uschar *p, int length, BOOL is_subject, match_data *md) { int c; if (is_subject && length > md->end_subject - p) length = md->end_subject - p; while (length-- > 0) if (isprint(c = *(p++))) printf("%c", c); else printf("\\x%02x", c); } #endif /************************************************* * Check subpattern for empty operand * *************************************************/ /* This function checks a bracketed subpattern to see if any of the paths through it could match an empty string. This is used to diagnose an error if such a subpattern is followed by a quantifier with an unlimited upper bound. Argument: code points to the opening bracket Returns: TRUE or FALSE */ static BOOL could_be_empty(uschar *code) { do { uschar *cc = code + 3; /* Scan along the opcodes for this branch; as soon as we find something that matches a non-empty string, break out and advance to test the next branch. If we get to the end of the branch, return TRUE for the whole sub-expression. */ for (;;) { /* Test an embedded subpattern; if it could not be empty, break the loop. Otherwise carry on in the branch. */ if ((int)(*cc) >= OP_BRA || (int)(*cc) == OP_ONCE) { if (!could_be_empty(cc)) break; do cc += (cc[1] << 8) + cc[2]; while (*cc == OP_ALT); cc += 3; } else switch (*cc) { /* Reached end of a branch: the subpattern may match the empty string */ case OP_ALT: case OP_KET: case OP_KETRMAX: case OP_KETRMIN: return TRUE; /* Skip over entire bracket groups with zero lower bound */ case OP_BRAZERO: case OP_BRAMINZERO: cc++; /* Fall through */ /* Skip over assertive subpatterns */ case OP_ASSERT: case OP_ASSERT_NOT: do cc += (cc[1] << 8) + cc[2]; while (*cc == OP_ALT); cc += 3; break; /* Skip over things that don't match chars */ case OP_SOD: case OP_EOD: case OP_CIRC: case OP_DOLL: case OP_NOT_WORD_BOUNDARY: case OP_WORD_BOUNDARY: case OP_NOT_WORD_BOUNDARY_L: case OP_WORD_BOUNDARY_L: cc++; break; /* Skip over simple repeats with zero lower bound */ case OP_STAR: case OP_MINSTAR: case OP_QUERY: case OP_MINQUERY: case OP_NOTSTAR: case OP_NOTMINSTAR: case OP_NOTQUERY: case OP_NOTMINQUERY: case OP_TYPESTAR: case OP_TYPEMINSTAR: case OP_TYPEQUERY: case OP_TYPEMINQUERY: cc += 2; break; /* Skip over UPTOs (lower bound is zero) */ case OP_UPTO: case OP_MINUPTO: case OP_TYPEUPTO: case OP_TYPEMINUPTO: cc += 4; break; /* Check a class or a back reference for a zero minimum */ case OP_CLASS: case OP_NEGCLASS: case OP_REF: case OP_CLASS_L: switch(*cc) { case (OP_REF): cc += 2; break; case (OP_CLASS): case (OP_NEGCLASS): cc += 1+32; break; case (OP_CLASS_L): cc += 1+1+32; break; } switch (*cc) { case OP_CRSTAR: case OP_CRMINSTAR: case OP_CRQUERY: case OP_CRMINQUERY: cc++; break; case OP_CRRANGE: case OP_CRMINRANGE: if ((cc[1] << 8) + cc[2] != 0) goto NEXT_BRANCH; cc += 3; break; default: goto NEXT_BRANCH; } break; /* Anything else matches at least one character */ default: goto NEXT_BRANCH; } } NEXT_BRANCH: code += (code[1] << 8) + code[2]; } while (*code == OP_ALT); /* No branches match the empty string */ return FALSE; } /* Determine the length of a group ID in an expression like (?P...) Arguments: ptr pattern position pointer (say that 3 times fast) finalchar the character that will mark the end of the ID errorptr points to the pointer to the error message */ static int get_group_id(const uschar *ptr, char finalchar, const char **errorptr) { const uschar *start = ptr; /* If the first character is not in \w, or is in \w but is a digit, report an error */ if (!(pcre_ctypes[*ptr] & ctype_word) || (pcre_ctypes[*ptr++] & ctype_digit)) { *errorptr = "(?P identifier must start with a letter or underscore"; return 0; } /* Increment ptr until we either hit a null byte, the desired final character, or a non-word character */ for(; (*ptr != 0) && (*ptr != finalchar) && (pcre_ctypes[*ptr] & ctype_word); ptr++) { /* Empty loop body */ } if (*ptr==finalchar) return ptr-start; if (*ptr==0) { *errorptr = "unterminated (?P identifier"; return 0; } *errorptr = "illegal character in (?P identifier"; return 0; } /************************************************* * Handle escapes * *************************************************/ /* This function is called when a \ has been encountered. It either returns a positive value for a simple escape such as \n, or a negative value which encodes one of the more complicated things such as \d. On entry, ptr is pointing at the \. On exit, it is on the final character of the escape sequence. Arguments: ptrptr points to the pattern position pointer errorptr points to the pointer to the error message bracount number of previous extracting brackets options the options bits isclass TRUE if inside a character class Returns: zero or positive => a data character negative => a special escape sequence on error, errorptr is set */ static int check_escape(const uschar **ptrptr, const char **errorptr, int bracount, int options, BOOL isclass) { const uschar *ptr = *ptrptr; int c = *(++ptr) & 255; /* Ensure > 0 on signed-char systems */ int i; if (c == 0) *errorptr = ERR1; /* Digits or letters may have special meaning; all others are literals. */ else if (c < '0' || c > 'z') {} /* Do an initial lookup in a table. A non-zero result is something that can be returned immediately. Otherwise further processing may be required. */ else if ((i = escapes[c - '0']) != 0) c = i; /* Escapes that need further processing, or are illegal. */ else { switch (c) { /* The handling of escape sequences consisting of a string of digits starting with one that is not zero is not straightforward. By experiment, the way Perl works seems to be as follows: Outside a character class, the digits are read as a decimal number. If the number is less than 10, or if there are that many previous extracting left brackets, then it is a back reference. Otherwise, up to three octal digits are read to form an escaped byte. Thus \123 is likely to be octal 123 (cf \0123, which is octal 012 followed by the literal 3). If the octal value is greater than 377, the least significant 8 bits are taken. Inside a character class, \ followed by a digit is always an octal number. */ case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': { /* PYTHON: Try to compute an octal value for a character */ for(c=0, i=0; ptr[i]!=0 && i<3; i++) { if (( pcre_ctypes[ ptr[i] ] & ctype_odigit) != 0) c = (c * 8 + ptr[i]-'0') & 255; else break; /* Non-octal character--break out of the loop */ } /* It's a character if there were exactly 3 octal digits, or if we're inside a character class and there was at least one octal digit. */ if ( (i == 3) || (isclass && i!=0) ) { ptr += i-1; break; } c = ptr[0]; /* Restore the first character after the \ */ c -= '0'; i = 1; while (i<2 && (pcre_ctypes[ptr[1]] & ctype_digit) != 0) { c = c * 10 + ptr[1] - '0'; ptr++; i++; } if (c > 255 - ESC_REF) *errorptr = "back reference too big"; c = -(ESC_REF + c); } break; /* \0 always starts an octal number, but we may drop through to here with a larger first octal digit */ case '0': c -= '0'; while(i++ < 2 && (pcre_ctypes[ptr[1]] & ctype_digit) != 0 && ptr[1] != '8' && ptr[1] != '9') c = (c * 8 + *(++ptr) - '0') & 255; break; /* Special escapes not starting with a digit are straightforward */ case 'x': c = 0; while ( (pcre_ctypes[ptr[1]] & ctype_xdigit) != 0) { ptr++; c = c * 16 + pcre_lcc[*ptr] - (((pcre_ctypes[*ptr] & ctype_digit) != 0)? '0' : 'W'); c &= 255; } break; /* PCRE_EXTRA enables extensions to Perl in the matter of escapes. Any other alphameric following \ is an error if PCRE_EXTRA was set; otherwise, for Perl compatibility, it is a literal. */ default: if ((options & PCRE_EXTRA) != 0) switch(c) { case 'X': c = -ESC_X; /* This could be a lookup if it ever got into Perl */ break; default: *errorptr = ERR3; break; } break; } } *ptrptr = ptr; return c; } /************************************************* * Check for counted repeat * *************************************************/ /* This function is called when a '{' is encountered in a place where it might start a quantifier. It looks ahead to see if it really is a quantifier or not. It is only a quantifier if it is one of the forms {ddd} {ddd,} or {ddd,ddd} where the ddds are digits. Arguments: p pointer to the first char after '{' Returns: TRUE or FALSE */ static BOOL is_counted_repeat(const uschar *p) { if ((pcre_ctypes[*p++] & ctype_digit) == 0) return FALSE; while ((pcre_ctypes[*p] & ctype_digit) != 0) p++; if (*p == '}') return TRUE; if (*p++ != ',') return FALSE; if (*p == '}') return TRUE; if ((pcre_ctypes[*p++] & ctype_digit) == 0) return FALSE; while ((pcre_ctypes[*p] & ctype_digit) != 0) p++; return (*p == '}'); } /************************************************* * Read repeat counts * *************************************************/ /* Read an item of the form {n,m} and return the values. This is called only after is_counted_repeat() has confirmed that a repeat-count quantifier exists, so the syntax is guaranteed to be correct, but we need to check the values. Arguments: p pointer to first char after '{' minp pointer to int for min maxp pointer to int for max returned as -1 if no max errorptr points to pointer to error message Returns: pointer to '}' on success; current ptr on error, with errorptr set */ static const uschar * read_repeat_counts(const uschar *p, int *minp, int *maxp, const char **errorptr) { int min = 0; int max = -1; /* Read the minimum value and do a paranoid check: a negative value indicates an integer overflow. */ while ((pcre_ctypes[*p] & ctype_digit) != 0) min = min * 10 + *p++ - '0'; if (min < 0 || min > 65535) { *errorptr = ERR5; return p; } /* Read the maximum value if there is one, and again do a paranoid check on its size. Also, max must not be less than min. */ if (*p == '}') max = min; else { if (*(++p) != '}') { max = 0; while((pcre_ctypes[*p] & ctype_digit) != 0) max = max * 10 + *p++ - '0'; if (max < 0 || max > 65535) { *errorptr = ERR5; return p; } if (max < min) { *errorptr = ERR4; return p; } } } /* Fill in the required variables, and pass back the pointer to the terminating '}'. */ *minp = min; *maxp = max; return p; } /************************************************* * Compile one branch * *************************************************/ /* Scan the pattern, compiling it into the code vector. Arguments: options the option bits bracket points to number of brackets used code points to the pointer to the current code point ptrptr points to the current pattern pointer errorptr points to pointer to error message Returns: TRUE on success FALSE, with *errorptr set on error */ static BOOL compile_branch(int options, int *brackets, uschar **codeptr, const uschar **ptrptr, const char **errorptr, PyObject *dictionary) { int repeat_type, op_type; int repeat_min, repeat_max; int bravalue, length; int greedy_default, greedy_non_default; register int c; register uschar *code = *codeptr; const uschar *ptr = *ptrptr; const uschar *oldptr; uschar *previous = NULL; uschar class[32]; uschar *class_flag; /* Pointer to the single-byte flag for OP_CLASS_L */ /* Set up the default and non-default settings for greediness */ greedy_default = ((options & PCRE_UNGREEDY) != 0); greedy_non_default = greedy_default ^ 1; /* Switch on next character until the end of the branch */ for (;; ptr++) { BOOL negate_class; int class_charcount; int class_lastchar; c = *ptr; if ((options & PCRE_EXTENDED) != 0) { if ((pcre_ctypes[c] & ctype_space) != 0) continue; if (c == '#') { while ((c = *(++ptr)) != 0 && c != '\n'); continue; } } switch(c) { /* The branch terminates at end of string, |, or ). */ case 0: case '|': case ')': *codeptr = code; *ptrptr = ptr; return TRUE; /* Handle single-character metacharacters */ case '^': previous = NULL; *code++ = OP_CIRC; break; case '$': previous = NULL; *code++ = OP_DOLL; break; case '.': previous = code; *code++ = OP_ANY; break; /* Character classes. These always build a 32-byte bitmap of the permitted characters, except in the special case where there is only one character. For negated classes, we build the map as usual, then invert it at the end. */ case '[': previous = code; if (options & PCRE_LOCALE) { *code++ = OP_CLASS_L; /* Set the flag for localized classes (like \w) to 0 */ class_flag = code; *class_flag = 0; } else { *code++ = OP_CLASS; class_flag = NULL; } /* If the first character is '^', set the negation flag, and use a different opcode. This only matters if caseless matching is specified at runtime. */ if ((c = *(++ptr)) == '^') { negate_class = TRUE; if (*(code-1)==OP_CLASS) *(code-1) = OP_NEGCLASS; c = *(++ptr); } else negate_class = FALSE; /* Keep a count of chars so that we can optimize the case of just a single character. */ class_charcount = 0; class_lastchar = -1; /* Initialize the 32-char bit map to all zeros. We have to build the map in a temporary bit of store, in case the class contains only 1 character, because in that case the compiled code doesn't use the bit map. */ memset(class, 0, 32 * sizeof(uschar)); /* Process characters until ] is reached. By writing this as a "do" it means that an initial ] is taken as a data character. */ do { if (c == 0) { *errorptr = ERR6; goto FAILED; } /* Backslash may introduce a single character, or it may introduce one of the specials, which just set a flag. Escaped items are checked for validity in the pre-compiling pass. The sequence \b is a special case. Inside a class (and only there) it is treated as backspace. Elsewhere it marks a word boundary. Other escapes have preset maps ready to or into the one we are building. We assume they have more than one character in them, so set class_count bigger than one. */ if (c == '\\') { c = check_escape(&ptr, errorptr, *brackets, options, TRUE); if (-c == ESC_b) c = '\b'; else if (c < 0) { class_charcount = 10; switch (-c) { case ESC_d: { for (c = 0; c < 32; c++) class[c] |= pcre_cbits[c+cbit_digit]; } continue; case ESC_D: { for (c = 0; c < 32; c++) class[c] |= ~pcre_cbits[c+cbit_digit]; } continue; case ESC_w: if (options & PCRE_LOCALE) { *class_flag |= 1; } else { for (c = 0; c < 32; c++) class[c] |= (pcre_cbits[c] | pcre_cbits[c+cbit_word]); } continue; case ESC_W: if (options & PCRE_LOCALE) { *class_flag |= 2; } else { for (c = 0; c < 32; c++) class[c] |= ~(pcre_cbits[c] | pcre_cbits[c+cbit_word]); } continue; case ESC_s: { for (c = 0; c < 32; c++) class[c] |= pcre_cbits[c+cbit_space]; } continue; case ESC_S: { for (c = 0; c < 32; c++) class[c] |= ~pcre_cbits[c+cbit_space]; } continue; default: *errorptr = ERR7; goto FAILED; } } /* Fall through if single character */ } /* A single character may be followed by '-' to form a range. However, Perl does not permit ']' to be the end of the range. A '-' character here is treated as a literal. */ if (ptr[1] == '-' && ptr[2] != ']') { int d; ptr += 2; d = *ptr; if (d == 0) { *errorptr = ERR6; goto FAILED; } /* The second part of a range can be a single-character escape, but not any of the other escapes. */ if (d == '\\') { d = check_escape(&ptr, errorptr, *brackets, options, TRUE); if (d < 0) { if (d == -ESC_b) d = '\b'; else { *errorptr = ERR7; goto FAILED; } } } if (d < c) { *errorptr = ERR8; goto FAILED; } for (; c <= d; c++) { class[c/8] |= (1 << (c&7)); if ((options & PCRE_CASELESS) != 0) { int uc = pcre_fcc[c]; /* flip case */ class[uc/8] |= (1 << (uc&7)); } class_charcount++; /* in case a one-char range */ class_lastchar = c; } continue; /* Go get the next char in the class */ } /* Handle a lone single character - we can get here for a normal non-escape char, or after \ that introduces a single character. */ class [c/8] |= (1 << (c&7)); if ((options & PCRE_CASELESS) != 0) { c = pcre_fcc[c]; /* flip case */ class[c/8] |= (1 << (c&7)); } class_charcount++; class_lastchar = c; } /* Loop until ']' reached; the check for end of string happens inside the loop. This "while" is the end of the "do" above. */ while ((c = *(++ptr)) != ']'); /* If class_charcount is 1 and class_lastchar is not negative, we saw precisely one character. This doesn't need the whole 32-byte bit map. We turn it into a 1-character OP_CHAR if it's positive, or OP_NOT if it's negative. */ if (class_charcount == 1 && class_lastchar >= 0) { if (negate_class) { code[-1] = OP_NOT; } else { code[-1] = OP_CHARS; *code++ = 1; } *code++ = class_lastchar; } /* Otherwise, negate the 32-byte map if necessary, and copy it into the code vector. */ else { /* If this is a localized opcode, bump the code pointer up */ if (class_flag) code++; if (negate_class) { if (class_flag) *class_flag = (*class_flag) ^ 63; for (c = 0; c < 32; c++) code[c] = ~class[c]; } else memcpy(code, class, 32); code += 32; } break; /* Various kinds of repeat */ case '{': if (!is_counted_repeat(ptr+1)) goto NORMAL_CHAR; ptr = read_repeat_counts(ptr+1, &repeat_min, &repeat_max, errorptr); if (*errorptr != NULL) goto FAILED; goto REPEAT; case '*': repeat_min = 0; repeat_max = -1; goto REPEAT; case '+': repeat_min = 1; repeat_max = -1; goto REPEAT; case '?': repeat_min = 0; repeat_max = 1; REPEAT: if (previous == NULL) { *errorptr = ERR9; goto FAILED; } /* If the next character is '?' this is a minimizing repeat, by default, but if PCRE_UNGREEDY is set, it works the other way round. Advance to the next character. */ if (ptr[1] == '?') { repeat_type = greedy_non_default; ptr++; } else repeat_type = greedy_default; /* If the maximum is zero then the minimum must also be zero; Perl allows this case, so we do too - by simply omitting the item altogether. */ if (repeat_max == 0) code = previous; /* If previous was a string of characters, chop off the last one and use it as the subject of the repeat. If there was only one character, we can abolish the previous item altogether. */ else if (*previous == OP_CHARS) { int len = previous[1]; if (len == 1) { c = previous[2]; code = previous; } else { c = previous[len+1]; previous[1]--; code--; } op_type = 0; /* Use single-char op codes */ goto OUTPUT_SINGLE_REPEAT; /* Code shared with single character types */ } /* If previous was a single negated character ([^a] or similar), we use one of the special opcodes, replacing it. The code is shared with single- character repeats by adding a suitable offset into repeat_type. */ else if ((int)*previous == OP_NOT) { op_type = OP_NOTSTAR - OP_STAR; /* Use "not" opcodes */ c = previous[1]; code = previous; goto OUTPUT_SINGLE_REPEAT; } /* If previous was a character type match (\d or similar), abolish it and create a suitable repeat item. The code is shared with single-character repeats by adding a suitable offset into repeat_type. */ else if ((int)*previous < OP_CIRC || *previous == OP_ANY) { op_type = OP_TYPESTAR - OP_STAR; /* Use type opcodes */ c = *previous; code = previous; OUTPUT_SINGLE_REPEAT: repeat_type += op_type; /* Combine both values for many cases */ /* A minimum of zero is handled either as the special case * or ?, or as an UPTO, with the maximum given. */ if (repeat_min == 0) { if (repeat_max == -1) *code++ = OP_STAR + repeat_type; else if (repeat_max == 1) *code++ = OP_QUERY + repeat_type; else { *code++ = OP_UPTO + repeat_type; *code++ = repeat_max >> 8; *code++ = (repeat_max & 255); } } /* The case {1,} is handled as the special case + */ else if (repeat_min == 1 && repeat_max == -1) *code++ = OP_PLUS + repeat_type; /* The case {n,n} is just an EXACT, while the general case {n,m} is handled as an EXACT followed by an UPTO. An EXACT of 1 is optimized. */ else { if (repeat_min != 1) { *code++ = OP_EXACT + op_type; /* NB EXACT doesn't have repeat_type */ *code++ = repeat_min >> 8; *code++ = (repeat_min & 255); } /* If the minimum is 1 and the previous item was a character string, we either have to put back the item that got canceled if the string length was 1, or add the character back onto the end of a longer string. For a character type nothing need be done; it will just get put back naturally. Note that the final character is always going to get added below. */ else if (*previous == OP_CHARS) { if (code == previous) code += 2; else previous[1]++; } /* For a single negated character we also have to put back the item that got canceled. */ else if (*previous == OP_NOT) code++; /* If the maximum is unlimited, insert an OP_STAR. */ if (repeat_max < 0) { *code++ = c; *code++ = OP_STAR + repeat_type; } /* Else insert an UPTO if the max is greater than the min. */ else if (repeat_max != repeat_min) { *code++ = c; repeat_max -= repeat_min; *code++ = OP_UPTO + repeat_type; *code++ = repeat_max >> 8; *code++ = (repeat_max & 255); } } /* The character or character type itself comes last in all cases. */ *code++ = c; } /* If previous was a character class or a back reference, we put the repeat stuff after it. */ else if (*previous == OP_CLASS || *previous == OP_NEGCLASS || *previous==OP_CLASS_L || *previous == OP_REF) { if (repeat_min == 0 && repeat_max == -1) *code++ = OP_CRSTAR + repeat_type; else if (repeat_min == 1 && repeat_max == -1) *code++ = OP_CRPLUS + repeat_type; else if (repeat_min == 0 && repeat_max == 1) *code++ = OP_CRQUERY + repeat_type; else { *code++ = OP_CRRANGE + repeat_type; *code++ = repeat_min >> 8; *code++ = repeat_min & 255; if (repeat_max == -1) repeat_max = 0; /* 2-byte encoding for max */ *code++ = repeat_max >> 8; *code++ = repeat_max & 255; } } /* If previous was a bracket group, we may have to replicate it in certain cases. If the maximum repeat count is unlimited, check that the bracket group cannot match the empty string, and diagnose an error if it can. */ else if ((int)*previous >= OP_BRA) { int i; int len = code - previous; if (repeat_max == -1 && could_be_empty(previous)) { *errorptr = ERR10; goto FAILED; } /* If the minimum is greater than zero, and the maximum is unlimited or equal to the minimum, the first copy remains where it is, and is replicated up to the minimum number of times. This case includes the + repeat, but of course no replication is needed in that case. */ if (repeat_min > 0 && (repeat_max == -1 || repeat_max == repeat_min)) { for (i = 1; i < repeat_min; i++) { memcpy(code, previous, len); code += len; } } /* If the minimum is zero, stick BRAZERO in front of the first copy. Then, if there is a fixed upper limit, replicated up to that many times, sticking BRAZERO in front of all the optional ones. */ else { if (repeat_min == 0) { memmove(previous+1, previous, len); code++; *previous++ = OP_BRAZERO + repeat_type; } for (i = 1; i < repeat_min; i++) { memcpy(code, previous, len); code += len; } for (i = (repeat_min > 0)? repeat_min : 1; i < repeat_max; i++) { *code++ = OP_BRAZERO + repeat_type; memcpy(code, previous, len); code += len; } } /* If the maximum is unlimited, set a repeater in the final copy. */ if (repeat_max == -1) code[-3] = OP_KETRMAX + repeat_type; } /* Else there's some kind of shambles */ else { *errorptr = ERR11; goto FAILED; } /* In all case we no longer have a previous item. */ previous = NULL; break; /* Start of nested bracket sub-expression, or comment or lookahead. First deal with special things that can come after a bracket; all are introduced by ?, and the appearance of any of them means that this is not a referencing group. They were checked for validity in the first pass over the string, so we don't have to check for syntax errors here. */ case '(': previous = code; /* Only real brackets can be repeated */ if (*(++ptr) == '?') { bravalue = OP_BRA; switch (*(++ptr)) { case '#': case 'i': case 'L': case 'm': case 's': case 'x': ptr++; while (*ptr != ')') ptr++; previous = NULL; continue; case ':': /* Non-extracting bracket */ ptr++; break; case '=': /* Assertions can't be repeated */ bravalue = OP_ASSERT; ptr++; previous = NULL; break; case '!': bravalue = OP_ASSERT_NOT; ptr++; previous = NULL; break; case ('P'): ptr++; if (*ptr=='<') { /* (?P...) */ int idlen; PyObject *string, *intobj; ptr++; idlen = get_group_id(ptr, '>', errorptr); if (*errorptr) { goto FAILED; } string = PyString_FromStringAndSize((char*)ptr, idlen); intobj = PyInt_FromLong( brackets[0] + 1 ); if (intobj == NULL || string == NULL) { Py_XDECREF(string); Py_XDECREF(intobj); *errorptr = "exception raised"; goto FAILED; } PyDict_SetItem(dictionary, string, intobj); Py_DECREF(string); Py_DECREF(intobj); /* XXX DECREF commented out! */ ptr += idlen+1; /* Point to rest of expression */ goto do_grouping_bracket; } if (*ptr=='=') { /* (?P=groupname) */ int idlen, refnum; PyObject *string, *intobj; ptr++; idlen = get_group_id(ptr, ')', errorptr); if (*errorptr) { goto FAILED; } string = PyString_FromStringAndSize((char *)ptr, idlen); if (string==NULL) { *errorptr = "exception raised"; goto FAILED; } intobj = PyDict_GetItem(dictionary, string); if (intobj==NULL) { Py_DECREF(string); *errorptr = "?P= group identifier isn't defined"; goto FAILED; } refnum = PyInt_AsLong(intobj); Py_DECREF(string); /* The caller doesn't own the reference to the value returned from PyDict_GetItem, so intobj is not DECREF'ed. */ *code++ = OP_REF; *code++ = refnum; /* The continue will cause the top-level for() loop to be resumed, so ptr will be immediately incremented. Therefore, the following line adds just idlen, not idlen+1 */ ptr += idlen; continue; } /* The character after ?P is neither < nor =, so report an error. Add more Python-extensions here. */ *errorptr="unknown after (?P"; goto FAILED; case '>': /* "Match once" brackets */ if ((options & PCRE_EXTRA) != 0) /* Not yet standard */ { bravalue = OP_ONCE; ptr++; previous = NULL; break; } /* Else fall through */ default: *errorptr = ERR12; goto FAILED; } } /* Else we have a referencing group */ else { do_grouping_bracket: if (++(*brackets) > EXTRACT_MAX) { *errorptr = ERR13; goto FAILED; } bravalue = OP_BRA + *brackets; } /* Process nested bracketed re; at end pointer is on the bracket. We copy code into a non-register variable in order to be able to pass its address because some compilers complain otherwise. */ *code = bravalue; { uschar *mcode = code; if (!compile_regex(options, brackets, &mcode, &ptr, errorptr, dictionary)) goto FAILED; code = mcode; } if (*ptr != ')') { *errorptr = ERR14; goto FAILED; } break; /* Check \ for being a real metacharacter; if not, fall through and handle it as a data character at the start of a string. Escape items are checked for validity in the pre-compiling pass. */ case '\\': oldptr = ptr; c = check_escape(&ptr, errorptr, *brackets, options, FALSE); /* Handle metacharacters introduced by \. For ones like \d, the ESC_ values are arranged to be the negation of the corresponding OP_values. For the back references, the values are ESC_REF plus the reference number. Only back references and those types that consume a character may be repeated. We can test for values between ESC_b and ESC_Z for the latter; this may have to change if any new ones are ever created. */ if (c < 0) { if (-c >= ESC_REF) { int refnum = -c - ESC_REF; if (*brackets < refnum) { *errorptr = ERR15; goto FAILED; } previous = code; *code++ = OP_REF; *code++ = refnum; } else { previous = (-c > ESC_b && -c < ESC_X)? code : NULL; if ( (options & PCRE_LOCALE) != 0) { switch (c) { case (-ESC_b): c = -OP_WORD_BOUNDARY_L; break; case (-ESC_B): c = -OP_NOT_WORD_BOUNDARY_L; break; case (-ESC_w): c = -OP_WORDCHAR_L; break; case (-ESC_W): c = -OP_NOT_WORDCHAR_L; break; } } *code++ = -c; } continue; } /* Data character: Reset and fall through */ ptr = oldptr; c = '\\'; /* Handle a run of data characters until a metacharacter is encountered. The first character is guaranteed not to be whitespace or # when the extended flag is set. */ NORMAL_CHAR: default: previous = code; *code = OP_CHARS; code += 2; length = 0; do { if ((options & PCRE_EXTENDED) != 0) { if ((pcre_ctypes[c] & ctype_space) != 0) continue; if (c == '#') { while ((c = *(++ptr)) != 0 && c != '\n'); if (c == 0) break; continue; } } /* Backslash may introduce a data char or a metacharacter. Escaped items are checked for validity in the pre-compiling pass. Stop the string before a metaitem. */ if (c == '\\') { oldptr = ptr; c = check_escape(&ptr, errorptr, *brackets, options, FALSE); if (c < 0) { ptr = oldptr; break; } } /* Ordinary character or single-char escape */ *code++ = c; length++; } /* This "while" is the end of the "do" above. */ while (length < 255 && (pcre_ctypes[c = *(++ptr)] & ctype_meta) == 0); /* Compute the length and set it in the data vector, and advance to the next state. */ previous[1] = length; if (length < 255) ptr--; break; } } /* end of big loop */ /* Control never reaches here by falling through, only by a goto for all the error states. Pass back the position in the pattern so that it can be displayed to the user for diagnosing the error. */ FAILED: *ptrptr = ptr; return FALSE; } /************************************************* * Compile sequence of alternatives * *************************************************/ /* On entry, ptr is pointing past the bracket character, but on return it points to the closing bracket, or vertical bar, or end of string. The code variable is pointing at the byte into which the BRA operator has been stored. Argument: options the option bits brackets -> int containing the number of extracting brackets used codeptr -> the address of the current code pointer ptrptr -> the address of the current pattern pointer errorptr -> pointer to error message Returns: TRUE on success */ static BOOL compile_regex(int options, int *brackets, uschar **codeptr, const uschar **ptrptr, const char **errorptr, PyObject *dictionary) { const uschar *ptr = *ptrptr; uschar *code = *codeptr; uschar *start_bracket = code; for (;;) { int length; uschar *last_branch = code; code += 3; if (!compile_branch(options, brackets, &code, &ptr, errorptr, dictionary)) { *ptrptr = ptr; return FALSE; } /* Fill in the length of the last branch */ length = code - last_branch; last_branch[1] = length >> 8; last_branch[2] = length & 255; /* Reached end of expression, either ')' or end of pattern. Insert a terminating ket and the length of the whole bracketed item, and return, leaving the pointer at the terminating char. */ if (*ptr != '|') { length = code - start_bracket; *code++ = OP_KET; *code++ = length >> 8; *code++ = length & 255; *codeptr = code; *ptrptr = ptr; return TRUE; } /* Another branch follows; insert an "or" node and advance the pointer. */ *code = OP_ALT; ptr++; } /* Control never reaches here */ } /************************************************* * Check for anchored expression * *************************************************/ /* Try to find out if this is an anchored regular expression. Consider each alternative branch. If they all start with OP_SOD or OP_CIRC, or with a bracket all of whose alternatives start with OP_SOD or OP_CIRC (recurse ad lib), then it's anchored. However, if this is a multiline pattern, then only OP_SOD counts, since OP_CIRC can match in the middle. A branch is also implicitly anchored if it starts with .* because that will try the rest of the pattern at all possible matching points, so there is no point trying them again. Argument: points to start of expression (the bracket) Returns: TRUE or FALSE */ static BOOL is_anchored(register const uschar *code, BOOL multiline) { do { int op = (int)code[3]; if (op >= OP_BRA || op == OP_ASSERT || op == OP_ONCE) { if (!is_anchored(code+3, multiline)) return FALSE; } else if (op == OP_TYPESTAR || op == OP_TYPEMINSTAR) { if (code[4] != OP_ANY) return FALSE; } else if (op != OP_SOD && (multiline || op != OP_CIRC)) return FALSE; code += (code[1] << 8) + code[2]; } while (*code == OP_ALT); return TRUE; } /************************************************* * Check for start with \n line expression * *************************************************/ /* This is called for multiline expressions to try to find out if every branch starts with ^ so that "first char" processing can be done to speed things up. Argument: points to start of expression (the bracket) Returns: TRUE or FALSE */ static BOOL is_startline(const uschar *code) { do { if ((int)code[3] >= OP_BRA || code[3] == OP_ASSERT) { if (!is_startline(code+3)) return FALSE; } else if (code[3] != OP_CIRC) return FALSE; code += (code[1] << 8) + code[2]; } while (*code == OP_ALT); return TRUE; } /************************************************* * Check for fixed first char * *************************************************/ /* Try to find out if there is a fixed first character. This is called for unanchored expressions, as it speeds up their processing quite considerably. Consider each alternative branch. If they all start with the same char, or with a bracket all of whose alternatives start with the same char (recurse ad lib), then we return that char, otherwise -1. Argument: points to start of expression (the bracket) Returns: -1 or the fixed first char */ static int find_firstchar(uschar *code) { register int c = -1; do { register int charoffset = 4; if ((int)code[3] >= OP_BRA || code[3] == OP_ASSERT) { register int d; if ((d = find_firstchar(code+3)) < 0) return -1; if (c < 0) c = d; else if (c != d) return -1; } else switch(code[3]) { default: return -1; case OP_EXACT: /* Fall through */ charoffset++; case OP_CHARS: /* Fall through */ charoffset++; case OP_PLUS: case OP_MINPLUS: if (c < 0) c = code[charoffset]; else if (c != code[charoffset]) return -1; break; } code += (code[1] << 8) + code[2]; } while (*code == OP_ALT); return c; } /************************************************* * Compile a Regular Expression * *************************************************/ /* This function takes a string and returns a pointer to a block of store holding a compiled version of the expression. Arguments: pattern the regular expression options various option bits errorptr pointer to pointer to error text erroroffset ptr offset in pattern where error was detected Returns: pointer to compiled data block, or NULL on error, with errorptr and erroroffset set */ pcre * pcre_compile(const char *pattern, int options, const char **errorptr, int *erroroffset, PyObject *dictionary) { real_pcre *re; int spaces = 0; int length = 3; /* For initial BRA plus length */ int runlength; int c, size; int bracount = 0; int brastack[200]; int top_backref = 0; unsigned int brastackptr = 0; uschar *code; const uschar *ptr; #ifdef DEBUG uschar *code_base, *code_end; #endif /* We can't pass back an error message if errorptr is NULL; I guess the best we can do is just return NULL. */ if (errorptr == NULL) return NULL; *errorptr = NULL; /* However, we can give a message for this error */ if (erroroffset == NULL) { *errorptr = ERR16; return NULL; } *erroroffset = 0; if ((options & ~PUBLIC_OPTIONS) != 0) { *errorptr = ERR17; return NULL; } DPRINTF(("------------------------------------------------------------------\n")); DPRINTF(("%s\n", pattern)); /* The first thing to do is to make a pass over the pattern to compute the amount of store required to hold the compiled code. This does not have to be perfect as long as errors are overestimates. At the same time we can detect any internal flag settings. Make an attempt to correct for any counted white space if an "extended" flag setting appears late in the pattern. We can't be so clever for #-comments. */ ptr = (const uschar *)(pattern - 1); while ((c = *(++ptr)) != 0) { int min, max; int class_charcount; if ((pcre_ctypes[c] & ctype_space) != 0) { if ((options & PCRE_EXTENDED) != 0) continue; spaces++; } if (c == '#' && (options & PCRE_EXTENDED) != 0) { while ((c = *(++ptr)) != 0 && c != '\n'); continue; } switch(c) { /* A backslashed item may be an escaped "normal" character or a character type. For a "normal" character, put the pointers and character back so that tests for whitespace etc. in the input are done correctly. */ case '\\': { const uschar *save_ptr = ptr; c = check_escape(&ptr, errorptr, bracount, options, FALSE); if (*errorptr != NULL) goto PCRE_ERROR_RETURN; if (c >= 0) { ptr = save_ptr; c = '\\'; goto NORMAL_CHAR; } } length++; /* A back reference needs an additional char, plus either one or 5 bytes for a repeat. We also need to keep the value of the highest back reference. */ if (c <= -ESC_REF) { int refnum = -c - ESC_REF; if (refnum > top_backref) top_backref = refnum; length++; /* For single back reference */ if (ptr[1] == '{' && is_counted_repeat(ptr+2)) { ptr = read_repeat_counts(ptr+2, &min, &max, errorptr); if (*errorptr != NULL) goto PCRE_ERROR_RETURN; if ((min == 0 && (max == 1 || max == -1)) || (min == 1 && max == -1)) length++; else length += 5; if (ptr[1] == '?') ptr++; } } continue; case '^': case '.': case '$': case '*': /* These repeats won't be after brackets; */ case '+': /* those are handled separately */ case '?': length++; continue; /* This covers the cases of repeats after a single char, metachar, class, or back reference. */ case '{': if (!is_counted_repeat(ptr+1)) goto NORMAL_CHAR; ptr = read_repeat_counts(ptr+1, &min, &max, errorptr); if (*errorptr != NULL) goto PCRE_ERROR_RETURN; if ((min == 0 && (max == 1 || max == -1)) || (min == 1 && max == -1)) length++; else { length--; /* Uncount the original char or metachar */ if (min == 1) length++; else if (min > 0) length += 4; if (max > 0) length += 4; else length += 2; } if (ptr[1] == '?') ptr++; continue; /* An alternation contains an offset to the next branch or ket. */ case '|': length += 3; continue; /* A character class uses 33 characters. Don't worry about character types that aren't allowed in classes - they'll get picked up during the compile. A character class that contains only one character uses 2 or 3 bytes, depending on whether it is negated or not. Notice this where we can. */ case '[': class_charcount = 0; if (*(++ptr) == '^') ptr++; do { if (*ptr == '\\') { int ch = check_escape(&ptr, errorptr, bracount, options, TRUE); if (*errorptr != NULL) goto PCRE_ERROR_RETURN; if (-ch == ESC_b) class_charcount++; else class_charcount = 10; } else class_charcount++; ptr++; } while (*ptr != 0 && *ptr != ']'); /* Repeats for negated single chars are handled by the general code */ if (class_charcount == 1) length += 3; else { length += 33; if (options & PCRE_LOCALE) length++; /* Add a byte for the localization flag */ /* A repeat needs either 1 or 5 bytes. */ if (*ptr != 0 && ptr[1] == '{' && is_counted_repeat(ptr+2)) { ptr = read_repeat_counts(ptr+2, &min, &max, errorptr); if (*errorptr != NULL) goto PCRE_ERROR_RETURN; if ((min == 0 && (max == 1 || max == -1)) || (min == 1 && max == -1)) length++; else length += 5; if (ptr[1] == '?') ptr++; } } continue; /* Brackets may be genuine groups or special things */ case '(': /* Handle special forms of bracket, which all start (? */ if (ptr[1] == '?') switch (c = ptr[2]) { /* Skip over comments entirely */ case '#': ptr += 3; while (*ptr != 0 && *ptr != ')') ptr++; if (*ptr == 0) { *errorptr = ERR18; goto PCRE_ERROR_RETURN; } continue; /* Non-referencing groups and lookaheads just move the pointer on, and then behave like a non-special bracket, except that they don't increment the count of extracting brackets. */ case ':': case '=': case '!': ptr += 2; break; case ('P'): { int idlen; switch (*ptr++) { case ('<'): idlen = get_group_id(ptr++, '>', errorptr); if (*errorptr) goto PCRE_ERROR_RETURN; ptr += idlen+1; break; case ('='): idlen = get_group_id(ptr++, ')', errorptr); if (*errorptr) goto PCRE_ERROR_RETURN; ptr += idlen+1; length++; break; } } break; /* Ditto for the "once only" bracket, allowed only if the extra bit is set. */ case '>': if ((options & PCRE_EXTRA) != 0) { ptr += 2; break; } /* Else fall through */ /* Else loop setting valid options until ) is met. Anything else is an error. */ default: ptr += 2; for (;; ptr++) { if ((c = *ptr) == 'i') { options |= PCRE_CASELESS; continue; } else if ((c = *ptr) == 'L') { options |= PCRE_LOCALE; continue; } else if ((c = *ptr) == 'm') { options |= PCRE_MULTILINE; continue; } else if (c == 's') { options |= PCRE_DOTALL; continue; } else if (c == 'x') { options |= PCRE_EXTENDED; length -= spaces; /* Already counted spaces */ continue; } else if (c == ')') break; *errorptr = ERR12; goto PCRE_ERROR_RETURN; } continue; /* End of this bracket handling */ } /* Extracting brackets must be counted so we can process escapes in a Perlish way. */ else bracount++; /* Non-special forms of bracket. Save length for computing whole length at end if there's a repeat that requires duplication of the group. */ if (brastackptr >= sizeof(brastack)/sizeof(int)) { *errorptr = ERR19; goto PCRE_ERROR_RETURN; } brastack[brastackptr++] = length; length += 3; continue; /* Handle ket. Look for subsequent max/min; for certain sets of values we have to replicate this bracket up to that many times. If brastackptr is 0 this is an unmatched bracket which will generate an error, but take care not to try to access brastack[-1]. */ case ')': length += 3; { int minval = 1; int maxval = 1; int duplength = (brastackptr > 0)? length - brastack[--brastackptr] : 0; /* Leave ptr at the final char; for read_repeat_counts this happens automatically; for the others we need an increment. */ if ((c = ptr[1]) == '{' && is_counted_repeat(ptr+2)) { ptr = read_repeat_counts(ptr+2, &minval, &maxval, errorptr); if (*errorptr != NULL) goto PCRE_ERROR_RETURN; } else if (c == '*') { minval = 0; maxval = -1; ptr++; } else if (c == '+') { maxval = -1; ptr++; } else if (c == '?') { minval = 0; ptr++; } /* If there is a minimum > 1 we have to replicate up to minval-1 times; if there is a limited maximum we have to replicate up to maxval-1 times and allow for a BRAZERO item before each optional copy, as we also have to do before the first copy if the minimum is zero. */ if (minval == 0) length++; else if (minval > 1) length += (minval - 1) * duplength; if (maxval > minval) length += (maxval - minval) * (duplength + 1); } continue; /* Non-special character. For a run of such characters the length required is the number of characters + 2, except that the maximum run length is 255. We won't get a skipped space or a non-data escape or the start of a # comment as the first character, so the length can't be zero. */ NORMAL_CHAR: default: length += 2; runlength = 0; do { if ((pcre_ctypes[c] & ctype_space) != 0) { if ((options & PCRE_EXTENDED) != 0) continue; spaces++; } if (c == '#' && (options & PCRE_EXTENDED) != 0) { while ((c = *(++ptr)) != 0 && c != '\n'); continue; } /* Backslash may introduce a data char or a metacharacter; stop the string before the latter. */ if (c == '\\') { const uschar *saveptr = ptr; c = check_escape(&ptr, errorptr, bracount, options, FALSE); if (*errorptr != NULL) goto PCRE_ERROR_RETURN; if (c < 0) { ptr = saveptr; break; } } /* Ordinary character or single-char escape */ runlength++; } /* This "while" is the end of the "do" above. */ while (runlength < 255 && (pcre_ctypes[c = *(++ptr)] & ctype_meta) == 0); ptr--; length += runlength; continue; } } length += 4; /* For final KET and END */ if (length > 65539) { *errorptr = ERR20; return NULL; } /* Compute the size of data block needed and get it, either from malloc or externally provided function. We specify "code[0]" in the offsetof() expression rather than just "code", because it has been reported that one broken compiler fails on "code" because it is also an independent variable. It should make no difference to the value of the offsetof(). */ size = length + offsetof(real_pcre, code[0]); re = (real_pcre *)(pcre_malloc)(size+50); if (re == NULL) { *errorptr = ERR21; return NULL; } /* Put in the magic number and the options. */ re->magic_number = MAGIC_NUMBER; re->options = options; /* Set up a starting, non-extracting bracket, then compile the expression. On error, *errorptr will be set non-NULL, so we don't need to look at the result of the function here. */ ptr = (const uschar *)pattern; code = re->code; *code = OP_BRA; bracount = 0; (void)compile_regex(options, &bracount, &code, &ptr, errorptr, dictionary); re->top_bracket = bracount; re->top_backref = top_backref; /* If not reached end of pattern on success, there's an excess bracket. */ if (*errorptr == NULL && *ptr != 0) *errorptr = ERR22; /* Fill in the terminating state and check for disastrous overflow, but if debugging, leave the test till after things are printed out. */ *code++ = OP_END; #ifndef DEBUG if (code - re->code > length) *errorptr = ERR23; #endif /* Failed to compile */ if (*errorptr != NULL) { (pcre_free)(re); PCRE_ERROR_RETURN: *erroroffset = ptr - (const uschar *)pattern; return NULL; } /* If the anchored option was not passed, set flag if we can determine that it is anchored by virtue of ^ characters or \A or anything else. Otherwise, see if we can determine what the first character has to be, because that speeds up unanchored matches no end. In the case of multiline matches, an alternative is to set the PCRE_STARTLINE flag if all branches start with ^. */ if ((options & PCRE_ANCHORED) == 0) { if (is_anchored(re->code, (options & PCRE_MULTILINE) != 0)) re->options |= PCRE_ANCHORED; else { int ch = find_firstchar(re->code); if (ch >= 0) { re->first_char = ch; re->options |= PCRE_FIRSTSET; } else if (is_startline(re->code)) re->options |= PCRE_STARTLINE; } } /* Print out the compiled data for debugging */ #ifdef DEBUG printf("Length = %d top_bracket = %d top_backref=%d\n", length, re->top_bracket, re->top_backref); if (re->options != 0) { printf("%s%s%s%s%s%s%s%s\n", ((re->options & PCRE_ANCHORED) != 0)? "anchored " : "", ((re->options & PCRE_CASELESS) != 0)? "caseless " : "", ((re->options & PCRE_EXTENDED) != 0)? "extended " : "", ((re->options & PCRE_MULTILINE) != 0)? "multiline " : "", ((re->options & PCRE_DOTALL) != 0)? "dotall " : "", ((re->options & PCRE_DOLLAR_ENDONLY) != 0)? "endonly " : "", ((re->options & PCRE_EXTRA) != 0)? "extra " : "", ((re->options & PCRE_UNGREEDY) != 0)? "ungreedy " : ""); } if ((re->options & PCRE_FIRSTSET) != 0) { if (isprint(re->first_char)) printf("First char = %c\n", re->first_char); else printf("First char = \\x%02x\n", re->first_char); } code_end = code; code_base = code = re->code; while (code < code_end) { int charlength; printf("%3d ", code - code_base); if (*code >= OP_BRA) { printf("%3d Bra %d", (code[1] << 8) + code[2], *code - OP_BRA); code += 2; } else switch(*code) { case OP_CHARS: charlength = *(++code); printf("%3d ", charlength); while (charlength-- > 0) if (isprint(c = *(++code))) printf("%c", c); else printf("\\x%02x", c); break; case OP_KETRMAX: case OP_KETRMIN: case OP_ALT: case OP_KET: case OP_ASSERT: case OP_ASSERT_NOT: case OP_ONCE: printf("%3d %s", (code[1] << 8) + code[2], OP_names[*code]); code += 2; break; case OP_STAR: case OP_MINSTAR: case OP_PLUS: case OP_MINPLUS: case OP_QUERY: case OP_MINQUERY: case OP_TYPESTAR: case OP_TYPEMINSTAR: case OP_TYPEPLUS: case OP_TYPEMINPLUS: case OP_TYPEQUERY: case OP_TYPEMINQUERY: if (*code >= OP_TYPESTAR) printf(" %s", OP_names[code[1]]); else if (isprint(c = code[1])) printf(" %c", c); else printf(" \\x%02x", c); printf("%s", OP_names[*code++]); break; case OP_EXACT: case OP_UPTO: case OP_MINUPTO: if (isprint(c = code[3])) printf(" %c{", c); else printf(" \\x%02x{", c); if (*code != OP_EXACT) printf("0,"); printf("%d}", (code[1] << 8) + code[2]); if (*code == OP_MINUPTO) printf("?"); code += 3; break; case OP_TYPEEXACT: case OP_TYPEUPTO: case OP_TYPEMINUPTO: printf(" %s{", OP_names[code[3]]); if (*code != OP_TYPEEXACT) printf(","); printf("%d}", (code[1] << 8) + code[2]); if (*code == OP_TYPEMINUPTO) printf("?"); code += 3; break; case OP_NOT: if (isprint(c = *(++code))) printf(" [^%c]", c); else printf(" [^\\x%02x]", c); break; case OP_NOTSTAR: case OP_NOTMINSTAR: case OP_NOTPLUS: case OP_NOTMINPLUS: case OP_NOTQUERY: case OP_NOTMINQUERY: if (isprint(c = code[1])) printf(" [^%c]", c); else printf(" [^\\x%02x]", c); printf("%s", OP_names[*code++]); break; case OP_NOTEXACT: case OP_NOTUPTO: case OP_NOTMINUPTO: if (isprint(c = code[3])) printf(" [^%c]{", c); else printf(" [^\\x%02x]{", c); if (*code != OP_NOTEXACT) printf(","); printf("%d}", (code[1] << 8) + code[2]); if (*code == OP_NOTMINUPTO) printf("?"); code += 3; break; case OP_REF: printf(" \\%d", *(++code)); code ++; goto CLASS_REF_REPEAT; case OP_CLASS: case OP_NEGCLASS: case OP_CLASS_L: { int i, min, max; if (*code==OP_CLASS_L) { code++; printf("Locflag = %i ", *code++); printf(" ["); } else { if (*code++ == OP_CLASS) printf(" ["); else printf(" ^["); } for (i = 0; i < 256; i++) { if ((code[i/8] & (1 << (i&7))) != 0) { int j; for (j = i+1; j < 256; j++) if ((code[j/8] & (1 << (j&7))) == 0) break; if (i == '-' || i == ']') printf("\\"); if (isprint(i)) printf("%c", i); else printf("\\x%02x", i); if (--j > i) { printf("-"); if (j == '-' || j == ']') printf("\\"); if (isprint(j)) printf("%c", j); else printf("\\x%02x", j); } i = j; } } printf("]"); code += 32; /* code ++;*/ CLASS_REF_REPEAT: switch(*code) { case OP_CRSTAR: case OP_CRMINSTAR: case OP_CRPLUS: case OP_CRMINPLUS: case OP_CRQUERY: case OP_CRMINQUERY: printf("%s", OP_names[*code]); break; case OP_CRRANGE: case OP_CRMINRANGE: min = (code[1] << 8) + code[2]; max = (code[3] << 8) + code[4]; if (max == 0) printf("{%d,}", min); else printf("{%d,%d}", min, max); if (*code == OP_CRMINRANGE) printf("?"); code += 4; break; default: code--; } } break; /* Anything else is just a one-node item */ default: printf(" %s", OP_names[*code]); break; } code++; printf("\n"); } printf("------------------------------------------------------------------\n"); /* This check is done here in the debugging case so that the code that was compiled can be seen. */ if (code - re->code > length) { printf("length=%i, code length=%i\n", length, code-re->code); *errorptr = ERR23; (pcre_free)(re); *erroroffset = ptr - (uschar *)pattern; return NULL; } #endif return (pcre *)re; } /************************************************* * Match a character type * *************************************************/ /* Not used in all the places it might be as it's sometimes faster to put the code inline. Arguments: type the character type c the character dotall the dotall flag Returns: TRUE if character is of the type */ static BOOL match_type(int type, int c, BOOL dotall) { #ifdef DEBUG if (isprint(c)) printf("matching subject %c against ", c); else printf("matching subject \\x%02x against ", c); printf("%s\n", OP_names[type]); #endif switch(type) { case OP_ANY: return dotall || c != '\n'; case OP_NOT_DIGIT: return (pcre_ctypes[c] & ctype_digit) == 0; case OP_DIGIT: return (pcre_ctypes[c] & ctype_digit) != 0; case OP_NOT_WHITESPACE: return (pcre_ctypes[c] & ctype_space) == 0; case OP_WHITESPACE: return (pcre_ctypes[c] & ctype_space) != 0; case OP_NOT_WORDCHAR: return (pcre_ctypes[c] & ctype_word) == 0; case OP_WORDCHAR: return (pcre_ctypes[c] & ctype_word) != 0; case OP_NOT_WORDCHAR_L: return (c!='_' && !isalnum(c)); case OP_WORDCHAR_L: return (c=='_' || isalnum(c)); } return FALSE; } /************************************************* * Match a back-reference * *************************************************/ /* If a back reference hasn't been set, the match fails. Arguments: number reference number eptr points into the subject length length to be matched md points to match data block Returns: TRUE if matched */ static BOOL match_ref(int number, register const uschar *eptr, int length, match_data *md) { const uschar *p = md->start_subject + md->offset_vector[number]; #ifdef DEBUG if (eptr >= md->end_subject) printf("matching subject "); else { printf("matching subject "); pchars(eptr, length, TRUE, md); } printf(" against backref "); pchars(p, length, FALSE, md); printf("\n"); #endif /* Always fail if not enough characters left */ if (length > md->end_subject - p) return FALSE; /* Separate the caseless case for speed */ if (md->caseless) { while (length-- > 0) if (pcre_lcc[*p++] != pcre_lcc[*eptr++]) return FALSE; } else { while (length-- > 0) if (*p++ != *eptr++) return FALSE; } return TRUE; } static int free_stack(match_data *md) { /* Free any stack space that was allocated by the call to match(). */ if (md->off_num) PyMem_DEL(md->off_num); if (md->offset_top) PyMem_DEL(md->offset_top); if (md->r1) PyMem_DEL(md->r1); if (md->r2) PyMem_DEL(md->r2); if (md->eptr) PyMem_DEL((char *)md->eptr); if (md->ecode) PyMem_DEL((char *)md->ecode); return 0; } static int grow_stack(match_data *md) { if (md->length != 0) { md->length = md->length + md->length/2; } else { int string_len = md->end_subject - md->start_subject + 1; if (string_len < 80) {md->length = string_len; } else {md->length = 80;} } PyMem_RESIZE(md->offset_top, int, md->length); /* Can't realloc a pointer-to-const; cast const away. */ md->eptr = (const uschar **)PyMem_Realloc((void *)md->eptr, sizeof(uschar *) * md->length); md->ecode = (const uschar **)PyMem_Realloc((void *)md->ecode, sizeof(uschar *) * md->length); PyMem_RESIZE(md->off_num, int, md->length); PyMem_RESIZE(md->r1, int, md->length); PyMem_RESIZE(md->r2, int, md->length); if (md->offset_top == NULL || md->eptr == NULL || md->ecode == NULL || md->off_num == NULL || md->r1 == NULL || md->r2 == NULL) { PyErr_NoMemory(); longjmp(md->error_env, 1); } return 0; } /************************************************* * Match from current position * *************************************************/ /* On entry ecode points to the first opcode, and eptr to the first character. Arguments: eptr pointer in subject ecode position in code offset_top current top pointer md pointer to "static" info for the match Returns: TRUE if matched */ static BOOL match(register const uschar *eptr, register const uschar *ecode, int offset_top, match_data *md) { int save_stack_position = md->point; match_loop: #define SUCCEED goto succeed #define FAIL goto fail for (;;) { int min, max, ctype; register int i; register int c; BOOL minimize = FALSE; /* Opening bracket. Check the alternative branches in turn, failing if none match. We have to set the start offset if required and there is space in the offset vector so that it is available for subsequent back references if the bracket matches. However, if the bracket fails, we must put back the previous value of both offsets in case they were set by a previous copy of the same bracket. Don't worry about setting the flag for the error case here; that is handled in the code for KET. */ if ((int)*ecode >= OP_BRA) { int number = (*ecode - OP_BRA) << 1; int save_offset1 = 0, save_offset2 = 0; DPRINTF(("start bracket %d\n", number/2)); if (number > 0 && number < md->offset_end) { save_offset1 = md->offset_vector[number]; save_offset2 = md->offset_vector[number+1]; md->offset_vector[number] = eptr - md->start_subject; DPRINTF(("saving %d %d\n", save_offset1, save_offset2)); } /* Recurse for all the alternatives. */ do { if (match(eptr, ecode+3, offset_top, md)) SUCCEED; ecode += (ecode[1] << 8) + ecode[2]; } while (*ecode == OP_ALT); DPRINTF(("bracket %d failed\n", number/2)); if (number > 0 && number < md->offset_end) { md->offset_vector[number] = save_offset1; md->offset_vector[number+1] = save_offset2; } FAIL; } /* Other types of node can be handled by a switch */ switch(*ecode) { case OP_END: md->end_match_ptr = eptr; /* Record where we ended */ md->end_offset_top = offset_top; /* and how many extracts were taken */ SUCCEED; /* The equivalent of Prolog's "cut" - if the rest doesn't match, the whole thing doesn't match, so we have to get out via a longjmp(). */ case OP_CUT: if (match(eptr, ecode+1, offset_top, md)) SUCCEED; longjmp(md->fail_env, 1); /* Assertion brackets. Check the alternative branches in turn - the matching won't pass the KET for an assertion. If any one branch matches, the assertion is true. */ case OP_ASSERT: do { if (match(eptr, ecode+3, offset_top, md)) break; ecode += (ecode[1] << 8) + ecode[2]; } while (*ecode == OP_ALT); if (*ecode == OP_KET) FAIL; /* Continue from after the assertion, updating the offsets high water mark, since extracts may have been taken during the assertion. */ do ecode += (ecode[1] << 8) + ecode[2]; while (*ecode == OP_ALT); ecode += 3; offset_top = md->end_offset_top; continue; /* Negative assertion: all branches must fail to match */ case OP_ASSERT_NOT: do { if (match(eptr, ecode+3, offset_top, md)) FAIL; ecode += (ecode[1] << 8) + ecode[2]; } while (*ecode == OP_ALT); ecode += 3; continue; /* "Once" brackets are like assertion brackets except that after a match, the point in the subject string is not moved back. Thus there can never be a move back into the brackets. Check the alternative branches in turn - the matching won't pass the KET for this kind of subpattern. If any one branch matches, we carry on, leaving the subject pointer. */ case OP_ONCE: do { if (match(eptr, ecode+3, offset_top, md)) break; ecode += (ecode[1] << 8) + ecode[2]; } while (*ecode == OP_ALT); if (*ecode == OP_KET) FAIL; /* Continue as from after the assertion, updating the offsets high water mark, since extracts may have been taken. */ do ecode += (ecode[1] << 8) + ecode[2]; while (*ecode == OP_ALT); ecode += 3; offset_top = md->end_offset_top; eptr = md->end_match_ptr; continue; /* An alternation is the end of a branch; scan along to find the end of the bracketed group and go to there. */ case OP_ALT: do ecode += (ecode[1] << 8) + ecode[2]; while (*ecode == OP_ALT); break; /* BRAZERO and BRAMINZERO occur just before a bracket group, indicating that it may occur zero times. It may repeat infinitely, or not at all - i.e. it could be ()* or ()? in the pattern. Brackets with fixed upper repeat limits are compiled as a number of copies, with the optional ones preceded by BRAZERO or BRAMINZERO. */ case OP_BRAZERO: { const uschar *next = ecode+1; if (match(eptr, next, offset_top, md)) SUCCEED; do next += (next[1] << 8) + next[2]; while (*next == OP_ALT); ecode = next + 3; } break; case OP_BRAMINZERO: { const uschar *next = ecode+1; do next += (next[1] << 8) + next[2]; while (*next == OP_ALT); if (match(eptr, next+3, offset_top, md)) SUCCEED; ecode++; } break;; /* End of a group, repeated or non-repeating. If we are at the end of an assertion "group", stop matching and SUCCEED, but record the current high water mark for use by positive assertions. */ case OP_KET: case OP_KETRMIN: case OP_KETRMAX: { int number; const uschar *prev = ecode - (ecode[1] << 8) - ecode[2]; if (*prev == OP_ASSERT || *prev == OP_ASSERT_NOT || *prev == OP_ONCE) { md->end_match_ptr = eptr; /* For ONCE */ md->end_offset_top = offset_top; SUCCEED; } /* In all other cases we have to check the group number back at the start and if necessary complete handling an extraction by setting the final offset and bumping the high water mark. */ number = (*prev - OP_BRA) << 1; DPRINTF(("end bracket %d\n", number/2)); if (number > 0) { if (number >= md->offset_end) md->offset_overflow = TRUE; else { md->offset_vector[number+1] = eptr - md->start_subject; if (offset_top <= number) offset_top = number + 2; } } /* For a non-repeating ket, just advance to the next node and continue at this level. */ if (*ecode == OP_KET) { ecode += 3; break; } /* The repeating kets try the rest of the pattern or restart from the preceding bracket, in the appropriate order. */ if (*ecode == OP_KETRMIN) { const uschar *ptr; if (match(eptr, ecode+3, offset_top, md)) goto succeed; /* Handle alternation inside the BRA...KET; push the additional alternatives onto the stack */ ptr=prev; do { ptr += (ptr[1]<<8)+ ptr[2]; if (*ptr==OP_ALT) { if (md->length == md->point) { grow_stack(md); } md->offset_top[md->point] = offset_top; md->eptr[md->point] = eptr; md->ecode[md->point] = ptr+3; md->r1[md->point] = 0; md->r2[md->point] = 0; md->off_num[md->point] = 0; md->point++; } } while (*ptr==OP_ALT); ecode=prev+3; goto match_loop; } else /* OP_KETRMAX */ { const uschar *ptr; /*int points_pushed=0;*/ /* Push one failure point, that will resume matching at the code after the KETRMAX opcode. */ if (md->length == md->point) { grow_stack(md); } md->offset_top[md->point] = offset_top; md->eptr[md->point] = eptr; md->ecode[md->point] = ecode+3; md->r1[md->point] = md->offset_vector[number]; md->r2[md->point] = md->offset_vector[number+1]; md->off_num[md->point] = number; md->point++; md->offset_vector[number] = eptr - md->start_subject; /* Handle alternation inside the BRA...KET; push each of the additional alternatives onto the stack */ ptr=prev; do { ptr += (ptr[1]<<8)+ ptr[2]; if (*ptr==OP_ALT) { if (md->length == md->point) if (md->length == md->point) { grow_stack(md); } md->offset_top[md->point] = offset_top; md->eptr[md->point] = eptr; md->ecode[md->point] = ptr+3; md->r1[md->point] = 0; md->r2[md->point] = 0; md->off_num[md->point] = 0; md->point++; /*points_pushed++;*/ } } while (*ptr==OP_ALT); /* Jump to the first (or only) alternative and resume trying to match */ ecode=prev+3; goto match_loop; } } /* Start of subject unless notbol, or after internal newline if multiline */ case OP_CIRC: if (md->notbol && eptr == md->start_subject) FAIL; if (md->multiline) { if (eptr != md->start_subject && eptr[-1] != '\n') FAIL; ecode++; break; } /* ... else fall through */ /* Start of subject assertion */ case OP_SOD: if (eptr != md->start_subject) FAIL; ecode++; break; /* Assert before internal newline if multiline, or before a terminating newline unless endonly is set, else end of subject unless noteol is set. */ case OP_DOLL: if (md->noteol && eptr >= md->end_subject) FAIL; if (md->multiline) { if (eptr < md->end_subject && *eptr != '\n') FAIL; ecode++; break; } else if (!md->endonly) { if (eptr < md->end_subject - 1 || (eptr == md->end_subject - 1 && *eptr != '\n')) FAIL; ecode++; break; } /* ... else fall through */ /* End of subject assertion */ case OP_EOD: if (eptr < md->end_subject) FAIL; ecode++; break; /* Word boundary assertions */ case OP_NOT_WORD_BOUNDARY: case OP_WORD_BOUNDARY: { BOOL prev_is_word = (eptr != md->start_subject) && ((pcre_ctypes[eptr[-1]] & ctype_word) != 0); BOOL cur_is_word = (eptr < md->end_subject) && ((pcre_ctypes[*eptr] & ctype_word) != 0); if ((*ecode++ == OP_WORD_BOUNDARY)? cur_is_word == prev_is_word : cur_is_word != prev_is_word) FAIL; } break; case OP_NOT_WORD_BOUNDARY_L: case OP_WORD_BOUNDARY_L: { BOOL prev_is_word = (eptr != md->start_subject) && (isalnum(eptr[-1]) || eptr[-1]=='_'); BOOL cur_is_word = (eptr < md->end_subject) && (isalnum(*eptr) || *eptr=='_'); if ((*ecode++ == OP_WORD_BOUNDARY_L)? cur_is_word == prev_is_word : cur_is_word != prev_is_word) FAIL; } break; /* Match a single character type; inline for speed */ case OP_ANY: if (!md->dotall && eptr < md->end_subject && *eptr == '\n') FAIL; if (eptr++ >= md->end_subject) FAIL; ecode++; break; case OP_NOT_DIGIT: if (eptr >= md->end_subject || (pcre_ctypes[*eptr++] & ctype_digit) != 0) FAIL; ecode++; break; case OP_DIGIT: if (eptr >= md->end_subject || (pcre_ctypes[*eptr++] & ctype_digit) == 0) FAIL; ecode++; break; case OP_NOT_WHITESPACE: if (eptr >= md->end_subject || (pcre_ctypes[*eptr++] & ctype_space) != 0) FAIL; ecode++; break; case OP_WHITESPACE: if (eptr >= md->end_subject || (pcre_ctypes[*eptr++] & ctype_space) == 0) FAIL; ecode++; break; case OP_NOT_WORDCHAR: if (eptr >= md->end_subject || (pcre_ctypes[*eptr++] & ctype_word) != 0) FAIL; ecode++; break; case OP_WORDCHAR: if (eptr >= md->end_subject || (pcre_ctypes[*eptr++] & ctype_word) == 0) FAIL; ecode++; break; case OP_NOT_WORDCHAR_L: if (eptr >= md->end_subject || (*eptr=='_' || isalnum(*eptr) )) FAIL; eptr++; ecode++; break; case OP_WORDCHAR_L: if (eptr >= md->end_subject || (*eptr!='_' && !isalnum(*eptr) )) FAIL; eptr++; ecode++; break; /* Match a back reference, possibly repeatedly. Look past the end of the item to see if there is repeat information following. The code is similar to that for character classes, but repeated for efficiency. Then obey similar code to character type repeats - written out again for speed. However, if the referenced string is the empty string, always treat it as matched, any number of times (otherwise there could be infinite loops). */ case OP_REF: { int length; int number = ecode[1] << 1; /* Doubled reference number */ ecode += 2; /* Advance past the item */ if (number >= offset_top || md->offset_vector[number] < 0) { md->errorcode = PCRE_ERROR_BADREF; FAIL; } length = md->offset_vector[number+1] - md->offset_vector[number]; switch (*ecode) { case OP_CRSTAR: case OP_CRMINSTAR: case OP_CRPLUS: case OP_CRMINPLUS: case OP_CRQUERY: case OP_CRMINQUERY: c = *ecode++ - OP_CRSTAR; minimize = (c & 1) != 0; min = rep_min[c]; /* Pick up values from tables; */ max = rep_max[c]; /* zero for max => infinity */ if (max == 0) max = INT_MAX; break; case OP_CRRANGE: case OP_CRMINRANGE: minimize = (*ecode == OP_CRMINRANGE); min = (ecode[1] << 8) + ecode[2]; max = (ecode[3] << 8) + ecode[4]; if (max == 0) max = INT_MAX; ecode += 5; break; default: /* No repeat follows */ if (!match_ref(number, eptr, length, md)) FAIL; eptr += length; continue; /* With the main loop */ } /* If the length of the reference is zero, just continue with the main loop. */ if (length == 0) continue; /* First, ensure the minimum number of matches are present. We get back the length of the reference string explicitly rather than passing the address of eptr, so that eptr can be a register variable. */ for (i = 1; i <= min; i++) { if (!match_ref(number, eptr, length, md)) FAIL; eptr += length; } /* If min = max, continue at the same level without recursion. They are not both allowed to be zero. */ if (min == max) continue; /* If minimizing, keep trying and advancing the pointer */ if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || !match_ref(number, eptr, length, md)) FAIL; eptr += length; } /* Control never gets here */ } /* If maximizing, find the longest string and work backwards */ else { const uschar *pp = eptr; for (i = min; i < max; i++) { if (!match_ref(number, eptr, length, md)) break; eptr += length; } while (eptr >= pp) { if (match(eptr, ecode, offset_top, md)) SUCCEED; eptr -= length; } FAIL; } } /* Control never gets here */ /* Match a character class, possibly repeatedly. Look past the end of the item to see if there is repeat information following. Then obey similar code to character type repeats - written out again for speed. If caseless matching was set at runtime but not at compile time, we have to check both versions of a character, and we have to behave differently for positive and negative classes. This is the only time where OP_CLASS and OP_NEGCLASS are treated differently. */ case OP_CLASS: case OP_NEGCLASS: { BOOL nasty_case = *ecode == OP_NEGCLASS && md->runtime_caseless; const uschar *data = ecode + 1; /* Save for matching */ ecode += 33; /* Advance past the item */ switch (*ecode) { case OP_CRSTAR: case OP_CRMINSTAR: case OP_CRPLUS: case OP_CRMINPLUS: case OP_CRQUERY: case OP_CRMINQUERY: c = *ecode++ - OP_CRSTAR; minimize = (c & 1) != 0; min = rep_min[c]; /* Pick up values from tables; */ max = rep_max[c]; /* zero for max => infinity */ if (max == 0) max = INT_MAX; break; case OP_CRRANGE: case OP_CRMINRANGE: minimize = (*ecode == OP_CRMINRANGE); min = (ecode[1] << 8) + ecode[2]; max = (ecode[3] << 8) + ecode[4]; if (max == 0) max = INT_MAX; ecode += 5; break; default: /* No repeat follows */ min = max = 1; break; } /* First, ensure the minimum number of matches are present. */ for (i = 1; i <= min; i++) { if (eptr >= md->end_subject) FAIL; c = *eptr++; /* Either not runtime caseless, or it was a positive class. For runtime caseless, continue if either case is in the map. */ if (!nasty_case) { if ((data[c/8] & (1 << (c&7))) != 0) continue; if (md->runtime_caseless) { c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; } } /* Runtime caseless and it was a negative class. Continue only if both cases are in the map. */ else { if ((data[c/8] & (1 << (c&7))) == 0) FAIL; c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; } FAIL; } /* If max == min we can continue with the main loop without the need to recurse. */ if (min == max) continue; /* If minimizing, keep testing the rest of the expression and advancing the pointer while it matches the class. */ if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || eptr >= md->end_subject) FAIL; c = *eptr++; /* Either not runtime caseless, or it was a positive class. For runtime caseless, continue if either case is in the map. */ if (!nasty_case) { if ((data[c/8] & (1 << (c&7))) != 0) continue; if (md->runtime_caseless) { c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; } } /* Runtime caseless and it was a negative class. Continue only if both cases are in the map. */ else { if ((data[c/8] & (1 << (c&7))) == 0) return FALSE; c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; } FAIL; } /* Control never gets here */ } /* If maximizing, find the longest possible run, then work backwards. */ else { const uschar *pp = eptr; for (i = min; i < max; eptr++, i++) { if (eptr >= md->end_subject) break; c = *eptr; /* Either not runtime caseless, or it was a positive class. For runtime caseless, continue if either case is in the map. */ if (!nasty_case) { if ((data[c/8] & (1 << (c&7))) != 0) continue; if (md->runtime_caseless) { c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; } } /* Runtime caseless and it was a negative class. Continue only if both cases are in the map. */ else { if ((data[c/8] & (1 << (c&7))) == 0) break; c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; } break; } while (eptr >= pp) if (match(eptr--, ecode, offset_top, md)) SUCCEED; FAIL; } } /* Control never gets here */ /* OP_CLASS_L opcode: handles localized character classes */ case OP_CLASS_L: { const uschar *data = ecode + 1; /* Save for matching */ const uschar locale_flag = *data; ecode++; data++; /* The localization support adds an extra byte */ ecode += 33; /* Advance past the item */ switch (*ecode) { case OP_CRSTAR: case OP_CRMINSTAR: case OP_CRPLUS: case OP_CRMINPLUS: case OP_CRQUERY: case OP_CRMINQUERY: c = *ecode++ - OP_CRSTAR; minimize = (c & 1) != 0; min = rep_min[c]; /* Pick up values from tables; */ max = rep_max[c]; /* zero for max => infinity */ if (max == 0) max = INT_MAX; break; case OP_CRRANGE: case OP_CRMINRANGE: minimize = (*ecode == OP_CRMINRANGE); min = (ecode[1] << 8) + ecode[2]; max = (ecode[3] << 8) + ecode[4]; if (max == 0) max = INT_MAX; ecode += 5; break; default: /* No repeat follows */ if (eptr >= md->end_subject) FAIL; c = *eptr++; if ((data[c/8] & (1 << (c&7))) != 0) continue; /* With main loop */ if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ #if 0 if ( (locale_flag & 4) && isdigit(c) ) continue; /* Locale \d */ if ( (locale_flag & 8) && !isdigit(c) ) continue; /* Locale \D */ if ( (locale_flag & 16) && isspace(c) ) continue; /* Locale \s */ if ( (locale_flag & 32) && !isspace(c) ) continue; /* Locale \S */ #endif if (md->runtime_caseless) { c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; /* With main loop */ if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ } FAIL; } /* First, ensure the minimum number of matches are present. */ for (i = 1; i <= min; i++) { if (eptr >= md->end_subject) FAIL; c = *eptr++; if ((data[c/8] & (1 << (c&7))) != 0) continue; if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ if (md->runtime_caseless) { c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ } FAIL; } /* If max == min we can continue with the main loop without the need to recurse. */ if (min == max) continue; /* If minimizing, keep testing the rest of the expression and advancing the pointer while it matches the class. */ if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || eptr >= md->end_subject) FAIL; c = *eptr++; if ((data[c/8] & (1 << (c&7))) != 0) continue; if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ if (md->runtime_caseless) { c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ } FAIL; } /* Control never gets here */ } /* If maximizing, find the longest possible run, then work backwards. */ else { const uschar *pp = eptr; for (i = min; i < max; eptr++, i++) { if (eptr >= md->end_subject) break; c = *eptr; if ((data[c/8] & (1 << (c&7))) != 0) continue; if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ if (md->runtime_caseless) { c = pcre_fcc[c]; if ((data[c/8] & (1 << (c&7))) != 0) continue; if ( (locale_flag & 1) && (isalnum(c) || c=='_') ) continue; /* Locale \w */ if ( (locale_flag & 2) && (!isalnum(c) && c!='_') ) continue; /* Locale \W */ } break; } while (eptr >= pp) if (match(eptr--, ecode, offset_top, md)) SUCCEED; FAIL; } } /* Control never gets here */ /* Match a run of characters */ case OP_CHARS: { register int length = ecode[1]; ecode += 2; #ifdef DEBUG /* Sigh. Some compilers never learn. */ if (eptr >= md->end_subject) printf("matching subject against pattern "); else { printf("matching subject "); pchars(eptr, length, TRUE, md); printf(" against pattern "); } pchars(ecode, length, FALSE, md); printf("\n"); #endif if (length > md->end_subject - eptr) FAIL; if (md->caseless) { while (length-- > 0) if (pcre_lcc[*ecode++] != pcre_lcc[*eptr++]) FAIL; } else { while (length-- > 0) if (*ecode++ != *eptr++) FAIL; } } break; /* Match a single character repeatedly; different opcodes share code. */ case OP_EXACT: min = max = (ecode[1] << 8) + ecode[2]; ecode += 3; goto REPEATCHAR; case OP_UPTO: case OP_MINUPTO: min = 0; max = (ecode[1] << 8) + ecode[2]; minimize = *ecode == OP_MINUPTO; ecode += 3; goto REPEATCHAR; case OP_STAR: case OP_MINSTAR: case OP_PLUS: case OP_MINPLUS: case OP_QUERY: case OP_MINQUERY: c = *ecode++ - OP_STAR; minimize = (c & 1) != 0; min = rep_min[c]; /* Pick up values from tables; */ max = rep_max[c]; /* zero for max => infinity */ if (max == 0) max = INT_MAX; /* Common code for all repeated single-character matches. We can give up quickly if there are fewer than the minimum number of characters left in the subject. */ REPEATCHAR: if (min > md->end_subject - eptr) FAIL; c = *ecode++; /* The code is duplicated for the caseless and caseful cases, for speed, since matching characters is likely to be quite common. First, ensure the minimum number of matches are present. If min = max, continue at the same level without recursing. Otherwise, if minimizing, keep trying the rest of the expression and advancing one matching character if failing, up to the maximum. Alternatively, if maximizing, find the maximum number of characters and work backwards. */ DPRINTF(("matching %c{%d,%d} against subject %.*s\n", c, min, max, max, eptr)); if (md->caseless) { c = pcre_lcc[c]; for (i = 1; i <= min; i++) if (c != pcre_lcc[*eptr++]) FAIL; if (min == max) continue; if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || eptr >= md->end_subject || c != pcre_lcc[*eptr++]) FAIL; } /* Control never gets here */ } else { const uschar *pp = eptr; for (i = min; i < max; i++) { if (eptr >= md->end_subject || c != pcre_lcc[*eptr]) break; eptr++; } while (eptr >= pp) if (match(eptr--, ecode, offset_top, md)) SUCCEED; FAIL; } /* Control never gets here */ } /* Caseful comparisons */ else { for (i = 1; i <= min; i++) if (c != *eptr++) FAIL; if (min == max) continue; if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || eptr >= md->end_subject || c != *eptr++) FAIL; } /* Control never gets here */ } else { const uschar *pp = eptr; for (i = min; i < max; i++) { if (eptr >= md->end_subject || c != *eptr) break; eptr++; } while (eptr >= pp) if (match(eptr--, ecode, offset_top, md)) SUCCEED; FAIL; } } /* Control never gets here */ /* Match a negated single character */ case OP_NOT: if (eptr >= md->end_subject) FAIL; ecode++; if (md->caseless) { if (pcre_lcc[*ecode++] == pcre_lcc[*eptr++]) FAIL; } else { if (*ecode++ == *eptr++) FAIL; } break; /* Match a negated single character repeatedly. This is almost a repeat of the code for a repeated single character, but I haven't found a nice way of commoning these up that doesn't require a test of the positive/negative option for each character match. Maybe that wouldn't add very much to the time taken, but character matching *is* what this is all about... */ case OP_NOTEXACT: min = max = (ecode[1] << 8) + ecode[2]; ecode += 3; goto REPEATNOTCHAR; case OP_NOTUPTO: case OP_NOTMINUPTO: min = 0; max = (ecode[1] << 8) + ecode[2]; minimize = *ecode == OP_NOTMINUPTO; ecode += 3; goto REPEATNOTCHAR; case OP_NOTSTAR: case OP_NOTMINSTAR: case OP_NOTPLUS: case OP_NOTMINPLUS: case OP_NOTQUERY: case OP_NOTMINQUERY: c = *ecode++ - OP_NOTSTAR; minimize = (c & 1) != 0; min = rep_min[c]; /* Pick up values from tables; */ max = rep_max[c]; /* zero for max => infinity */ if (max == 0) max = INT_MAX; /* Common code for all repeated single-character matches. We can give up quickly if there are fewer than the minimum number of characters left in the subject. */ REPEATNOTCHAR: if (min > md->end_subject - eptr) FAIL; c = *ecode++; /* The code is duplicated for the caseless and caseful cases, for speed, since matching characters is likely to be quite common. First, ensure the minimum number of matches are present. If min = max, continue at the same level without recursing. Otherwise, if minimizing, keep trying the rest of the expression and advancing one matching character if failing, up to the maximum. Alternatively, if maximizing, find the maximum number of characters and work backwards. */ DPRINTF(("negative matching %c{%d,%d} against subject %.*s\n", c, min, max, max, eptr)); if (md->caseless) { c = pcre_lcc[c]; for (i = 1; i <= min; i++) if (c == pcre_lcc[*eptr++]) FAIL; if (min == max) continue; if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || eptr >= md->end_subject || c == pcre_lcc[*eptr++]) FAIL; } /* Control never gets here */ } else { const uschar *pp = eptr; for (i = min; i < max; i++) { if (eptr >= md->end_subject || c == pcre_lcc[*eptr]) break; eptr++; } while (eptr >= pp) if (match(eptr--, ecode, offset_top, md)) SUCCEED; FAIL; } /* Control never gets here */ } /* Caseful comparisons */ else { for (i = 1; i <= min; i++) if (c == *eptr++) FAIL; if (min == max) continue; if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || eptr >= md->end_subject || c == *eptr++) FAIL; } /* Control never gets here */ } else { const uschar *pp = eptr; for (i = min; i < max; i++) { if (eptr >= md->end_subject || c == *eptr) break; eptr++; } while (eptr >= pp) if (match(eptr--, ecode, offset_top, md)) SUCCEED; FAIL; } } /* Control never gets here */ /* Match a single character type repeatedly; several different opcodes share code. This is very similar to the code for single characters, but we repeat it in the interests of efficiency. */ case OP_TYPEEXACT: min = max = (ecode[1] << 8) + ecode[2]; minimize = TRUE; ecode += 3; goto REPEATTYPE; case OP_TYPEUPTO: case OP_TYPEMINUPTO: min = 0; max = (ecode[1] << 8) + ecode[2]; minimize = *ecode == OP_TYPEMINUPTO; ecode += 3; goto REPEATTYPE; case OP_TYPESTAR: case OP_TYPEMINSTAR: case OP_TYPEPLUS: case OP_TYPEMINPLUS: case OP_TYPEQUERY: case OP_TYPEMINQUERY: c = *ecode++ - OP_TYPESTAR; minimize = (c & 1) != 0; min = rep_min[c]; /* Pick up values from tables; */ max = rep_max[c]; /* zero for max => infinity */ if (max == 0) max = INT_MAX; /* Common code for all repeated single character type matches */ REPEATTYPE: ctype = *ecode++; /* Code for the character type */ /* First, ensure the minimum number of matches are present. Use inline code for maximizing the speed, and do the type test once at the start (i.e. keep it out of the loop). Also test that there are at least the minimum number of characters before we start. */ if (min > md->end_subject - eptr) FAIL; if (min > 0) switch(ctype) { case OP_ANY: if (!md->dotall) { for (i = 1; i <= min; i++) if (*eptr++ == '\n') FAIL; } else eptr += min; break; case OP_NOT_DIGIT: for (i = 1; i <= min; i++) if ((pcre_ctypes[*eptr++] & ctype_digit) != 0) FAIL; break; case OP_DIGIT: for (i = 1; i <= min; i++) if ((pcre_ctypes[*eptr++] & ctype_digit) == 0) FAIL; break; case OP_NOT_WHITESPACE: for (i = 1; i <= min; i++) if ((pcre_ctypes[*eptr++] & ctype_space) != 0) FAIL; break; case OP_WHITESPACE: for (i = 1; i <= min; i++) if ((pcre_ctypes[*eptr++] & ctype_space) == 0) FAIL; break; case OP_NOT_WORDCHAR: for (i = 1; i <= min; i++) if ((pcre_ctypes[*eptr++] & ctype_word) != 0) FAIL; break; case OP_WORDCHAR: for (i = 1; i <= min; i++) if ((pcre_ctypes[*eptr++] & ctype_word) == 0) FAIL; break; case OP_NOT_WORDCHAR_L: for (i = 1; i <= min; i++, eptr++) if (*eptr=='_' || isalnum(*eptr)) FAIL; break; case OP_WORDCHAR_L: for (i = 1; i <= min; i++, eptr++) if (*eptr!='_' && !isalnum(*eptr)) FAIL; break; } /* If min = max, continue at the same level without recursing */ if (min == max) continue; /* If minimizing, we have to test the rest of the pattern before each subsequent match, so inlining isn't much help; just use the function. */ if (minimize) { for (i = min;; i++) { if (match(eptr, ecode, offset_top, md)) SUCCEED; if (i >= max || eptr >= md->end_subject || !match_type(ctype, *eptr++, md->dotall)) FAIL; } /* Control never gets here */ } /* If maximizing it is worth using inline code for speed, doing the type test once at the start (i.e. keep it out of the loop). */ else { const uschar *pp = eptr; switch(ctype) { case OP_ANY: if (!md->dotall) { for (i = min; i < max; i++) { if (eptr >= md->end_subject || *eptr == '\n') break; eptr++; } } else { c = max - min; if (c > md->end_subject - eptr) c = md->end_subject - eptr; eptr += c; } break; case OP_NOT_DIGIT: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (pcre_ctypes[*eptr] & ctype_digit) != 0) break; eptr++; } break; case OP_DIGIT: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (pcre_ctypes[*eptr] & ctype_digit) == 0) break; eptr++; } break; case OP_NOT_WHITESPACE: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (pcre_ctypes[*eptr] & ctype_space) != 0) break; eptr++; } break; case OP_WHITESPACE: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (pcre_ctypes[*eptr] & ctype_space) == 0) break; eptr++; } break; case OP_NOT_WORDCHAR: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (pcre_ctypes[*eptr] & ctype_word) != 0) break; eptr++; } break; case OP_WORDCHAR: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (pcre_ctypes[*eptr] & ctype_word) == 0) break; eptr++; } break; case OP_NOT_WORDCHAR_L: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (*eptr=='_' || isalnum(*eptr) ) ) break; eptr++; } break; case OP_WORDCHAR_L: for (i = min; i < max; i++) { if (eptr >= md->end_subject || (*eptr!='_' && !isalnum(*eptr) ) ) break; eptr++; } break; } while (eptr >= pp) if (match(eptr--, ecode, offset_top, md)) SUCCEED; FAIL; } /* Control never gets here */ /* There's been some horrible disaster. */ default: DPRINTF(("Unknown opcode %d\n", *ecode)); md->errorcode = PCRE_ERROR_UNKNOWN_NODE; FAIL; } /* Do not stick any code in here without much thought; it is assumed that "continue" in the code above comes out to here to repeat the main loop. */ } /* End of main loop */ /* Control never reaches here */ fail: if (md->point > save_stack_position) { /* If there are still points remaining on the stack, pop the next one off */ int off_num; md->point--; offset_top = md->offset_top[md->point]; eptr = md->eptr[md->point]; ecode = md->ecode[md->point]; off_num = md->off_num[md->point]; md->offset_vector[off_num] = md->r1[md->point]; md->offset_vector[off_num+1] = md->r2[md->point]; goto match_loop; } /* Failure, and nothing left on the stack, so end this function call */ /* Restore the top of the stack to where it was before this function call. This lets us use one stack for everything; recursive calls can push and pop information, and may increase the stack. When the call returns, the parent function can resume pushing and popping wherever it was. */ md->point = save_stack_position; return FALSE; succeed: return TRUE; } /************************************************* * Segregate setjmp() * *************************************************/ /* The -Wall option of gcc gives warnings for all local variables when setjmp() is used, even if the coding conforms to the rules of ANSI C. To avoid this, we hide it in a separate function. This is called only when PCRE_EXTRA is set, since it's needed only for the extension \X option, and with any luck, a good compiler will spot the tail recursion and compile it efficiently. Arguments: eptr pointer in subject ecode position in code offset_top current top pointer md pointer to "static" info for the match Returns: TRUE if matched */ static BOOL match_with_setjmp(const uschar *eptr, const uschar *ecode, int offset_top, match_data *match_block) { return setjmp(match_block->fail_env) == 0 && match(eptr, ecode, offset_top, match_block); } /************************************************* * Execute a Regular Expression * *************************************************/ /* This function applies a compiled re to a subject string and picks out portions of the string if it matches. Two elements in the vector are set for each substring: the offsets to the start and end of the substring. Arguments: external_re points to the compiled expression external_extra points to "hints" from pcre_study() or is NULL subject points to the subject string length length of subject string (may contain binary zeros) options option bits offsets points to a vector of ints to be filled in with offsets offsetcount the number of elements in the vector Returns: > 0 => success; value is the number of elements filled in = 0 => success, but offsets is not big enough -1 => failed to match < -1 => some kind of unexpected problem */ int pcre_exec(const pcre *external_re, const pcre_extra *external_extra, const char *subject, int length, int start_pos, int options, int *offsets, int offsetcount) { /* The "volatile" directives are to make gcc -Wall stop complaining that these variables can be clobbered by the longjmp. Hopefully they won't cost too much performance. */ volatile int resetcount, ocount; volatile int first_char = -1; const uschar * volatile start_bits = NULL; const uschar * volatile start_match = (const uschar *)subject + start_pos; match_data match_block; const uschar *end_subject; const real_pcre *re = (const real_pcre *)external_re; const real_pcre_extra *extra = (const real_pcre_extra *)external_extra; volatile BOOL using_temporary_offsets = FALSE; volatile BOOL anchored = ((re->options | options) & PCRE_ANCHORED) != 0; volatile BOOL startline = (re->options & PCRE_STARTLINE) != 0; if ((options & ~PUBLIC_EXEC_OPTIONS) != 0) return PCRE_ERROR_BADOPTION; if (re == NULL || subject == NULL || (offsets == NULL && offsetcount > 0)) return PCRE_ERROR_NULL; if (re->magic_number != MAGIC_NUMBER) return PCRE_ERROR_BADMAGIC; match_block.start_subject = (const uschar *)subject; match_block.end_subject = match_block.start_subject + length; end_subject = match_block.end_subject; match_block.caseless = ((re->options | options) & PCRE_CASELESS) != 0; match_block.runtime_caseless = match_block.caseless && (re->options & PCRE_CASELESS) == 0; match_block.multiline = ((re->options | options) & PCRE_MULTILINE) != 0; match_block.dotall = ((re->options | options) & PCRE_DOTALL) != 0; match_block.endonly = ((re->options | options) & PCRE_DOLLAR_ENDONLY) != 0; match_block.notbol = (options & PCRE_NOTBOL) != 0; match_block.noteol = (options & PCRE_NOTEOL) != 0; match_block.errorcode = PCRE_ERROR_NOMATCH; /* Default error */ /* Set the stack state to empty */ match_block.off_num = match_block.offset_top = NULL; match_block.r1 = match_block.r2 = NULL; match_block.eptr = match_block.ecode = NULL; match_block.point = match_block.length = 0; /* If the expression has got more back references than the offsets supplied can hold, we get a temporary bit of working store to use during the matching. Otherwise, we can use the vector supplied, rounding down its size to a multiple of 2. */ ocount = offsetcount & (-2); if (re->top_backref > 0 && re->top_backref >= ocount/2) { ocount = re->top_backref * 2 + 2; match_block.offset_vector = (int *)(pcre_malloc)(ocount * sizeof(int)); if (match_block.offset_vector == NULL) return PCRE_ERROR_NOMEMORY; using_temporary_offsets = TRUE; DPRINTF(("Got memory to hold back references\n")); } else match_block.offset_vector = offsets; match_block.offset_end = ocount; match_block.offset_overflow = FALSE; /* Compute the minimum number of offsets that we need to reset each time. Doing this makes a huge difference to execution time when there aren't many brackets in the pattern. */ resetcount = 2 + re->top_bracket * 2; if (resetcount > offsetcount) resetcount = ocount; /* If MULTILINE is set at exec time but was not set at compile time, and the anchored flag is set, we must re-check because a setting provoked by ^ in the pattern is not right in multi-line mode. Calling is_anchored() again here does the right check, because multiline is now set. If it now yields FALSE, the expression must have had ^ starting some of its branches. Check to see if that is true for *all* branches, and if so, set the startline flag. */ if (match_block.multiline && anchored && (re->options & PCRE_MULTILINE) == 0 && !is_anchored(re->code, match_block.multiline)) { anchored = FALSE; if (is_startline(re->code)) startline = TRUE; } /* Set up the first character to match, if available. The first_char value is never set for an anchored regular expression, but the anchoring may be forced at run time, so we have to test for anchoring. The first char may be unset for an unanchored pattern, of course. If there's no first char and the pattern was studied, the may be a bitmap of possible first characters. However, we can use this only if the caseless state of the studying was correct. */ if (!anchored) { if ((re->options & PCRE_FIRSTSET) != 0) { first_char = re->first_char; if (match_block.caseless) first_char = pcre_lcc[first_char]; } else if (!startline && extra != NULL && (extra->options & PCRE_STUDY_MAPPED) != 0 && ((extra->options & PCRE_STUDY_CASELESS) != 0) == match_block.caseless) start_bits = extra->start_bits; } /* Loop for unanchored matches; for anchored regexps the loop runs just once. */ do { int rc; register int *iptr = match_block.offset_vector; register int *iend = iptr + resetcount; /* Reset the maximum number of extractions we might see. */ while (iptr < iend) *iptr++ = -1; /* Advance to a unique first char if possible */ if (first_char >= 0) { if (match_block.caseless) while (start_match < end_subject && pcre_lcc[*start_match] != first_char) start_match++; else while (start_match < end_subject && *start_match != first_char) start_match++; } /* Or to just after \n for a multiline match if possible */ else if (startline) { if (start_match > match_block.start_subject) { while (start_match < end_subject && start_match[-1] != '\n') start_match++; } } /* Or to a non-unique first char */ else if (start_bits != NULL) { while (start_match < end_subject) { register int c = *start_match; if ((start_bits[c/8] & (1 << (c&7))) == 0) start_match++; else break; } } #ifdef DEBUG /* Sigh. Some compilers never learn. */ printf(">>>> Match against: "); pchars(start_match, end_subject - start_match, TRUE, &match_block); printf("\n"); #endif /* When a match occurs, substrings will be set for all internal extractions; we just need to set up the whole thing as substring 0 before returning. If there were too many extractions, set the return code to zero. In the case where we had to get some local store to hold offsets for backreferences, copy those back references that we can. In this case there need not be overflow if certain parts of the pattern were not used. Before starting the match, we have to set up a longjmp() target to enable the "cut" operation to fail a match completely without backtracking. This is done in a separate function to avoid compiler warnings. We need not do it unless PCRE_EXTRA is set, since only in that case is the "cut" operation enabled. */ /* To handle errors such as running out of memory for the failure stack, we need to save this location via setjmp(), so error-handling code can call longjmp() to jump out of deeply-nested code. */ if (setjmp(match_block.error_env)==0) { if ((re->options & PCRE_EXTRA) != 0) { if (!match_with_setjmp(start_match, re->code, 2, &match_block)) continue; } else if (!match(start_match, re->code, 2, &match_block)) continue; /* Copy the offset information from temporary store if necessary */ if (using_temporary_offsets) { if (offsetcount >= 4) { memcpy(offsets + 2, match_block.offset_vector + 2, (offsetcount - 2) * sizeof(int)); DPRINTF(("Copied offsets from temporary memory\n")); } if (match_block.end_offset_top > offsetcount) match_block.offset_overflow = TRUE; DPRINTF(("Freeing temporary memory\n")); (pcre_free)(match_block.offset_vector); } rc = match_block.offset_overflow? 0 : match_block.end_offset_top/2; if (match_block.offset_end < 2) rc = 0; else { offsets[0] = start_match - match_block.start_subject; offsets[1] = match_block.end_match_ptr - match_block.start_subject; } DPRINTF((">>>> returning %d\n", rc)); free_stack(&match_block); return rc; } /* End of (if setjmp(match_block.error_env)...) */ free_stack(&match_block); /* Return an error code; pcremodule.c will preserve the exception */ if (PyErr_Occurred()) return PCRE_ERROR_NOMEMORY; } while (!anchored && match_block.errorcode == PCRE_ERROR_NOMATCH && start_match++ < end_subject); if (using_temporary_offsets) { DPRINTF(("Freeing temporary memory\n")); (pcre_free)(match_block.offset_vector); } #ifdef DEBUG printf(">>>> returning %d\n", match_block.errorcode); #endif free_stack(&match_block); return match_block.errorcode; } /* End of pcre.c */ Python-2.3.7/Modules/pcre.h0000644001241000117560000000412107126463176014774 0ustar loewishpifb6/************************************************* * Perl-Compatible Regular Expressions * *************************************************/ /* Copyright (c) 1998 University of Cambridge */ #ifndef _PCRE_H #define _PCRE_H #ifdef FOR_PYTHON #include "Python.h" #endif /* Have to include stdlib.h in order to ensure that size_t is defined; it is needed here for malloc. */ #ifndef DONT_HAVE_SYS_TYPES_H #include #endif #include /* Allow for C++ users */ #ifdef __cplusplus extern "C" { #endif /* Options */ #define PCRE_CASELESS 0x0001 #define PCRE_EXTENDED 0x0002 #define PCRE_ANCHORED 0x0004 #define PCRE_MULTILINE 0x0008 #define PCRE_DOTALL 0x0010 #define PCRE_DOLLAR_ENDONLY 0x0020 #define PCRE_EXTRA 0x0040 #define PCRE_NOTBOL 0x0080 #define PCRE_NOTEOL 0x0100 #define PCRE_UNGREEDY 0x0400 #ifdef FOR_PYTHON #define PCRE_LOCALE 0x0200 #endif /* Exec-time error codes */ #define PCRE_ERROR_NOMATCH (-1) #define PCRE_ERROR_BADREF (-2) #define PCRE_ERROR_NULL (-3) #define PCRE_ERROR_BADOPTION (-4) #define PCRE_ERROR_BADMAGIC (-5) #define PCRE_ERROR_UNKNOWN_NODE (-6) #define PCRE_ERROR_NOMEMORY (-7) /* Types */ typedef void pcre; typedef void pcre_extra; /* Store get and free functions. These can be set to alternative malloc/free functions if required. */ extern void *(*pcre_malloc)(size_t); extern void (*pcre_free)(void *); /* Functions */ #ifdef FOR_PYTHON extern pcre *pcre_compile(const char *, int, const char **, int *, PyObject *); extern int pcre_exec(const pcre *, const pcre_extra *, const char *, int, int, int, int *, int); #else extern pcre *pcre_compile(const char *, int, const char **, int *); extern int pcre_exec(const pcre *, const pcre_extra *, const char *, int, int, int *, int); #endif extern int pcre_info(const pcre *, int *, int *); extern pcre_extra *pcre_study(const pcre *, int, const char **); extern const char *pcre_version(void); #ifdef __cplusplus } /* extern "C" */ #endif #endif /* End of pcre.h */ Python-2.3.7/Modules/sgimodule.c0000644001241000117560000000200507452373731016024 0ustar loewishpifb6 /* SGI module -- random SGI-specific things */ #include "Python.h" #include #include #include static PyObject * sgi_nap(PyObject *self, PyObject *args) { long ticks; if (!PyArg_ParseTuple(args, "l:nap", &ticks)) return NULL; Py_BEGIN_ALLOW_THREADS sginap(ticks); Py_END_ALLOW_THREADS Py_INCREF(Py_None); return Py_None; } extern char *_getpty(int *, int, mode_t, int); static PyObject * sgi__getpty(PyObject *self, PyObject *args) { int oflag; int mode; int nofork; char *name; int fildes; if (!PyArg_ParseTuple(args, "iii:_getpty", &oflag, &mode, &nofork)) return NULL; errno = 0; name = _getpty(&fildes, oflag, (mode_t)mode, nofork); if (name == NULL) { PyErr_SetFromErrno(PyExc_IOError); return NULL; } return Py_BuildValue("(si)", name, fildes); } static PyMethodDef sgi_methods[] = { {"nap", sgi_nap, METH_VARARGS}, {"_getpty", sgi__getpty, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; void initsgi(void) { Py_InitModule("sgi", sgi_methods); } Python-2.3.7/Modules/mpzmodule.c0000644001241000117560000011432407526335206016055 0ustar loewishpifb6 /* MPZ module */ /* This module provides an interface to an alternate Multi-Precision library, GNU MP in this case */ /* XXX note: everywhere where mpz_size is called, sizeof (limb) == sizeof (long) has been assumed. */ /* MPZ objects */ #include "Python.h" #include /* For size_t */ /* ** These are the cpp-flags used in this file... ** ** ** MPZ_MDIV_BUG works around the mpz_m{div,mod,...} routines. ** This bug has been fixed in a later release of ** GMP. ** ** MPZ_GET_STR_BUG mpz_get_str corrupts memory, seems to be fixed ** in a later release ** ** MPZ_DEBUG generates a bunch of diagnostic messages ** ** MPZ_SPARE_MALLOC if set, results in extra code that tries to ** minimize the creation of extra objects. ** ** MPZ_TEST_DIV extra diagnostic output on stderr, when division ** routines are involved ** ** MPZ_LIB_DOES_CHECKING if set, assumes that mpz library doesn't call ** alloca with arg < 0 (when casted to a signed ** integral type). ** ** MPZ_CONVERSIONS_AS_METHODS if set, presents the conversions as ** methods. e.g., `mpz(5).long() == 5L' ** Later, Guido provided an interface to the ** standard functions. So this flag has no been ** cleared, and `long(mpz(5)) == 5L' ** ** MP_TEST_ALLOC If set, you would discover why MPZ_GET_STR_BUG ** is needed ** ** MAKEDUMMYINT Must be set if dynamic linking will be used */ /* ** IMHO, mpz_m{div,mod,divmod}() do the wrong things when the denominator < 0 ** This has been fixed with gmp release 2.0 */ /*#define MPZ_MDIV_BUG fixed the (for me) nexessary parts in libgmp.a */ /* ** IMO, mpz_get_str() assumes a bit too large target space, if he doesn't ** allocate it himself */ #include "gmp.h" #if __GNU_MP__ + 0 >= 2 #define GMP2 #define BITS_PER_MP_LIMB mp_bits_per_limb #else #define MPZ_GET_STR_BUG #include "gmp-mparam.h" #endif typedef struct { PyObject_HEAD MP_INT mpz; /* the actual number */ } mpzobject; static PyTypeObject MPZtype; #define is_mpzobject(v) ((v)->ob_type == &MPZtype) static const char initialiser_name[] = "mpz"; /* #define MPZ_DEBUG */ static mpzobject * newmpzobject(void) { mpzobject *mpzp; #ifdef MPZ_DEBUG fputs( "mpz_object() called...\n", stderr ); #endif /* def MPZ_DEBUG */ mpzp = PyObject_New(mpzobject, &MPZtype); if (mpzp == NULL) return NULL; mpz_init(&mpzp->mpz); /* actual initialisation */ return mpzp; } /* newmpzobject() */ #ifdef MPZ_GET_STR_BUG #include "longlong.h" #endif /* def MPZ_GET_STR_BUG */ static PyObject * mpz_format(PyObject *objp, int base, unsigned char withname) { mpzobject *mpzp = (mpzobject *)objp; PyStringObject *strobjp; size_t i; int cmpres; int taglong; char *cp; char prefix[5], *tcp; tcp = &prefix[0]; if (mpzp == NULL || !is_mpzobject(mpzp)) { PyErr_BadInternalCall(); return NULL; } assert(base >= 2 && base <= 36); if (withname) i = strlen(initialiser_name) + 2; /* e.g. 'mpz(' + ')' */ else i = 0; if ((cmpres = mpz_cmp_si(&mpzp->mpz, 0L)) == 0) base = 10; /* '0' in every base, right */ else if (cmpres < 0) { *tcp++ = '-'; i += 1; /* space to hold '-' */ } #ifdef MPZ_DEBUG fprintf(stderr, "mpz_format: mpz_sizeinbase %d\n", (int)mpz_sizeinbase(&mpzp->mpz, base)); #endif /* def MPZ_DEBUG */ #ifdef MPZ_GET_STR_BUG #ifdef GMP2 i += ((size_t) abs(mpzp->mpz._mp_size) * BITS_PER_MP_LIMB * __mp_bases[base].chars_per_bit_exactly) + 1; #else i += ((size_t) abs(mpzp->mpz.size) * BITS_PER_MP_LIMB * __mp_bases[base].chars_per_bit_exactly) + 1; #endif #else /* def MPZ_GET_STR_BUG */ i += (int)mpz_sizeinbase(&mpzp->mpz, base); #endif /* def MPZ_GET_STR_BUG else */ if (base == 16) { *tcp++ = '0'; *tcp++ = 'x'; i += 2; /* space to hold '0x' */ } else if (base == 8) { *tcp++ = '0'; i += 1; /* space to hold the extra '0' */ } else if (base > 10) { *tcp++ = '0' + base / 10; *tcp++ = '0' + base % 10; *tcp++ = '#'; i += 3; /* space to hold e.g. '12#' */ } else if (base < 10) { *tcp++ = '0' + base; *tcp++ = '#'; i += 2; /* space to hold e.g. '6#' */ } /* ** the following code looks if we need a 'L' attached to the number ** it will also attach an 'L' to the value -0x80000000 */ taglong = 0; if (mpz_size(&mpzp->mpz) > 1 || (long)mpz_get_ui(&mpzp->mpz) < 0L) { taglong = 1; i += 1; /* space to hold 'L' */ } #ifdef MPZ_DEBUG fprintf(stderr, "mpz_format: requesting string size %d\n", i); #endif /* def MPZ_DEBUG */ if ((strobjp = (PyStringObject *)PyString_FromStringAndSize((char *)0, i)) == NULL) return NULL; /* get the beginning of the string memory and start copying things */ cp = PyString_AS_STRING(strobjp); if (withname) { strcpy(cp, initialiser_name); cp += strlen(initialiser_name); *cp++ = '('; /*')'*/ } /* copy the already prepared prefix; e.g. sign and base indicator */ *tcp = '\0'; strcpy(cp, prefix); cp += tcp - prefix; /* since' we have the sign already, let the lib think it's a positive number */ if (cmpres < 0) mpz_neg(&mpzp->mpz,&mpzp->mpz); /* hack Hack HAck HACk HACK */ (void)mpz_get_str(cp, base, &mpzp->mpz); if (cmpres < 0) mpz_neg(&mpzp->mpz,&mpzp->mpz); /* hack Hack HAck HACk HACK */ #ifdef MPZ_DEBUG fprintf(stderr, "mpz_format: base (ultim) %d, mpz_get_str: %s\n", base, cp); #endif /* def MPZ_DEBUG */ cp += strlen(cp); if (taglong) *cp++ = 'L'; if (withname) *cp++ = /*'('*/ ')'; *cp = '\0'; #ifdef MPZ_DEBUG fprintf(stderr, "mpz_format: cp (str end) %p, begin %p, diff %d, i %d\n", cp, PyString_AS_STRING(strobjp), cp - PyString_AS_STRING(strobjp), i); #endif /* def MPZ_DEBUG */ assert(cp - PyString_AS_STRING(strobjp) <= i); if (cp - PyString_AS_STRING(strobjp) != i) { strobjp->ob_size -= i - (cp - PyString_AS_STRING(strobjp)); } return (PyObject *)strobjp; } /* mpz_format() */ /* MPZ methods */ static void mpz_dealloc(mpzobject *mpzp) { #ifdef MPZ_DEBUG fputs( "mpz_dealloc() called...\n", stderr ); #endif /* def MPZ_DEBUG */ mpz_clear(&mpzp->mpz); PyObject_Del(mpzp); } /* mpz_dealloc() */ /* pointers to frequently used values 0, 1 and -1 */ static mpzobject *mpz_value_zero, *mpz_value_one, *mpz_value_mone; static int mpz_compare(mpzobject *a, mpzobject *b) { int cmpres; /* guido sez it's better to return -1, 0 or 1 */ return (cmpres = mpz_cmp( &a->mpz, &b->mpz )) == 0 ? 0 : cmpres > 0 ? 1 : -1; } /* mpz_compare() */ static PyObject * mpz_addition(mpzobject *a, mpzobject *b) { mpzobject *z; #ifdef MPZ_SPARE_MALLOC if (mpz_cmp_ui(&a->mpz, (unsigned long int)0) == 0) { Py_INCREF(b); return (PyObject *)b; } if (mpz_cmp_ui(&b->mpz, (unsigned long int)0) == 0) { Py_INCREF(a); return (PyObject *)a; } #endif /* def MPZ_SPARE_MALLOC */ if ((z = newmpzobject()) == NULL) return NULL; mpz_add(&z->mpz, &a->mpz, &b->mpz); return (PyObject *)z; } /* mpz_addition() */ static PyObject * mpz_substract(mpzobject *a, mpzobject *b) { mpzobject *z; #ifdef MPZ_SPARE_MALLOC if (mpz_cmp_ui(&b->mpz, (unsigned long int)0) == 0) { Py_INCREF(a); return (PyObject *)a; } #endif /* MPZ_SPARE_MALLOC */ if ((z = newmpzobject()) == NULL) return NULL; mpz_sub(&z->mpz, &a->mpz, &b->mpz); return (PyObject *)z; } /* mpz_substract() */ static PyObject * mpz_multiply(mpzobject *a, mpzobject *b) { #ifdef MPZ_SPARE_MALLOC int cmpres; #endif /* def MPZ_SPARE_MALLOC */ mpzobject *z; #ifdef MPZ_SPARE_MALLOC if ((cmpres = mpz_cmp_ui(&a->mpz, (unsigned long int)0)) == 0) { Py_INCREF(mpz_value_zero); return (PyObject *)mpz_value_zero; } if (cmpres > 0 && mpz_cmp_ui(&a->mpz, (unsigned long int)1) == 0) { Py_INCREF(b); return (PyObject *)b; } if ((cmpres = mpz_cmp_ui(&b->mpz, (unsigned long_int)0)) == 0) { Py_INCREF(mpz_value_zero); return (PyObject *)mpz_value_zero; } if (cmpres > 0 && mpz_cmp_ui(&b->mpz, (unsigned long int)1) == 0) { Py_INCREF(a); return (PyObject *)a; } #endif /* MPZ_SPARE_MALLOC */ if ((z = newmpzobject()) == NULL) return NULL; mpz_mul( &z->mpz, &a->mpz, &b->mpz ); return (PyObject *)z; } /* mpz_multiply() */ static PyObject * mpz_divide(mpzobject *a, mpzobject *b) { #ifdef MPZ_SPARE_MALLOC int cmpres; #endif /* def MPZ_SPARE_MALLOC */ mpzobject *z; if (( #ifdef MPZ_SPARE_MALLOC cmpres = #endif /* def MPZ_SPARE_MALLOC */ mpz_cmp_ui(&b->mpz, (unsigned long int)0)) == 0) { PyErr_SetString(PyExc_ZeroDivisionError, "mpz./ by zero"); return NULL; } #ifdef MPZ_SPARE_MALLOC if (cmpres > 0 && mpz_cmp_ui(&b->mpz(unsigned long int)1) == 0) { Py_INCREF(a); return (PyObject *)a; } #endif /* def MPZ_SPARE_MALLOC */ if ((z = newmpzobject()) == NULL) return NULL; #ifdef MPZ_TEST_DIV fputs("mpz_divide: div result", stderr); mpz_div(&z->mpz, &a->mpz, &b->mpz); mpz_out_str(stderr, 10, &z->mpz); putc('\n', stderr); #endif /* def MPZ_TEST_DIV */ #ifdef MPZ_MDIV_BUG if ((mpz_cmp_ui(&a->mpz, (unsigned long int)0) < 0) != (mpz_cmp_ui(&b->mpz, (unsigned long int)0) < 0)) { /* ** numerator has other sign than denominator: we have ** to look at the remainder for a correction, since mpz_mdiv ** also calls mpz_divmod, I can as well do it myself */ MP_INT tmpmpz; mpz_init(&tmpmpz); mpz_divmod(&z->mpz, &tmpmpz, &a->mpz, &b->mpz); if (mpz_cmp_ui(&tmpmpz, (unsigned long int)0) != 0) mpz_sub_ui(&z->mpz, &z->mpz, (unsigned long int)1); mpz_clear(&tmpmpz); } else mpz_div(&z->mpz, &a->mpz, &b->mpz); /* the ``naive'' implementation does it right for operands having the same sign */ #else /* def MPZ_MDIV_BUG */ mpz_mdiv(&z->mpz, &a->mpz, &b->mpz); #endif /* def MPZ_MDIV_BUG else */ #ifdef MPZ_TEST_DIV fputs("mpz_divide: mdiv result", stderr); mpz_out_str(stderr, 10, &z->mpz); putc('\n', stderr); #endif /* def MPZ_TEST_DIV */ return (PyObject *)z; } /* mpz_divide() */ static PyObject * mpz_remainder(mpzobject *a, mpzobject *b) { #ifdef MPZ_SPARE_MALLOC int cmpres; #endif /* def MPZ_SPARE_MALLOC */ mpzobject *z; if (( #ifdef MPZ_SPARE_MALLOC cmpres = #endif /* def MPZ_SPARE_MALLOC */ mpz_cmp_ui(&b->mpz, (unsigned long int)0)) == 0) { PyErr_SetString(PyExc_ZeroDivisionError, "mpz.% by zero"); return NULL; } #ifdef MPZ_SPARE_MALLOC if (cmpres > 0) { if ((cmpres = mpz_cmp_ui(&b->mpz, (unsigned long int)2)) == 0) { Py_INCREF(mpz_value_one); return (PyObject *)mpz_value_one; } if (cmpres < 0) { /* b must be 1 now */ Py_INCREF(mpz_value_zero); return (PyObject *)mpz_value_zero; } } #endif /* def MPZ_SPARE_MALLOC */ if ((z = newmpzobject()) == NULL) return NULL; #ifdef MPZ_TEST_DIV fputs("mpz_remain: mod result", stderr); mpz_mod(&z->mpz, &a->mpz, &b->mpz); mpz_out_str(stderr, 10, &z->mpz); putc('\n', stderr); #endif /* def MPZ_TEST_DIV */ #ifdef MPZ_MDIV_BUG /* the ``naive'' implementation does it right for operands having the same sign */ mpz_mod(&z->mpz, &a->mpz, &b->mpz); /* assumption: z, a and b all point to different locations */ if ((mpz_cmp_ui(&a->mpz, (unsigned long int)0) < 0) != (mpz_cmp_ui(&b->mpz, (unsigned long int)0) < 0) && mpz_cmp_ui(&z->mpz, (unsigned long int)0) != 0) mpz_add(&z->mpz, &z->mpz, &b->mpz); /* ** numerator has other sign than denominator: we have ** to look at the remainder for a correction, since mpz_mdiv ** also calls mpz_divmod, I can as well do it myself */ #else /* def MPZ_MDIV_BUG */ mpz_mmod(&z->mpz, &a->mpz, &b->mpz); #endif /* def MPZ_MDIV_BUG else */ #ifdef MPZ_TEST_DIV fputs("mpz_remain: mmod result", stderr); mpz_out_str(stderr, 10, &z->mpz); putc('\n', stderr); #endif /* def MPZ_TEST_DIV */ return (PyObject *)z; } /* mpz_remainder() */ static PyObject * mpz_div_and_mod(mpzobject *a, mpzobject *b) { PyObject *z = NULL; mpzobject *x = NULL, *y = NULL; if (mpz_cmp_ui(&b->mpz, (unsigned long int)0) == 0) { PyErr_SetString(PyExc_ZeroDivisionError, "mpz.divmod by zero"); return NULL; } if ((z = PyTuple_New(2)) == NULL || (x = newmpzobject()) == NULL || (y = newmpzobject()) == NULL) { Py_XDECREF(z); Py_XDECREF(x); Py_XDECREF(y); return NULL; } #ifdef MPZ_TEST_DIV fputs("mpz_divmod: dm result", stderr); mpz_divmod(&x->mpz, &y->mpz, &a->mpz, &b->mpz); mpz_out_str(stderr, 10, &x->mpz); putc('\n', stderr); mpz_out_str(stderr, 10, &y->mpz); putc('\n', stderr); #endif /* def MPZ_TEST_DIV */ #ifdef MPZ_MDIV_BUG mpz_divmod(&x->mpz, &y->mpz, &a->mpz, &b->mpz); if ((mpz_cmp_ui(&a->mpz, (unsigned long int)0) < 0) != (mpz_cmp_ui(&b->mpz, (unsigned long int)0) < 0) && mpz_cmp_ui(&y->mpz, (unsigned long int)0) != 0) { /* ** numerator has other sign than denominator: we have ** to look at the remainder for a correction. */ mpz_add(&y->mpz, &y->mpz, &b->mpz); mpz_sub_ui(&x->mpz, &x->mpz, (unsigned long int)1); } #else /* def MPZ_MDIV_BUG */ mpz_mdivmod( &x->mpz, &y->mpz, &a->mpz, &b->mpz ); #endif /* def MPZ_MDIV_BUG else */ #ifdef MPZ_TEST_DIV fputs("mpz_divmod: mdm result", stderr); mpz_out_str(stderr, 10, &x->mpz); putc('\n', stderr); mpz_out_str(stderr, 10, &y->mpz); putc('\n', stderr); #endif /* def MPZ_TEST_DIV */ (void)PyTuple_SetItem(z, 0, (PyObject *)x); (void)PyTuple_SetItem(z, 1, (PyObject *)y); return z; } /* mpz_div_and_mod() */ static PyObject * mpz_power(mpzobject *a, mpzobject *b, mpzobject *m) { mpzobject *z; int cmpres; if ((PyObject *)m != Py_None) { mpzobject *z2; Py_INCREF(Py_None); z=(mpzobject *)mpz_power(a, b, (mpzobject *)Py_None); Py_DECREF(Py_None); if (z==NULL) return((PyObject *)z); z2=(mpzobject *)mpz_remainder(z, m); Py_DECREF(z); return((PyObject *)z2); } if ((cmpres = mpz_cmp_ui(&b->mpz, (unsigned long int)0)) == 0) { /* the gnu-mp lib sets pow(0,0) to 0, we to 1 */ Py_INCREF(mpz_value_one); return (PyObject *)mpz_value_one; } if (cmpres < 0) { PyErr_SetString(PyExc_ValueError, "mpz.pow to negative exponent"); return NULL; } if ((cmpres = mpz_cmp_ui(&a->mpz, (unsigned long int)0)) == 0) { /* the base is 0 */ Py_INCREF(mpz_value_zero); return (PyObject *)mpz_value_zero; } else if (cmpres > 0 && mpz_cmp_ui(&a->mpz, (unsigned long int)1) == 0) { /* the base is 1 */ Py_INCREF(mpz_value_one); return (PyObject *)mpz_value_one; } else if (cmpres < 0 && mpz_cmp_si(&a->mpz, (long int)-1) == 0) { MP_INT tmpmpz; /* the base is -1: pow(-1, any) == 1,-1 for even,uneven b */ /* XXX this code needs to be optimized: what's better? mpz_mmod_ui or mpz_mod_2exp, I choose for the latter for *un*obvious reasons */ /* is the exponent even? */ mpz_init(&tmpmpz); /* look to the remainder after a division by (1 << 1) */ mpz_mod_2exp(&tmpmpz, &b->mpz, (unsigned long int)1); if (mpz_cmp_ui(&tmpmpz, (unsigned int)0) == 0) { mpz_clear(&tmpmpz); Py_INCREF(mpz_value_one); return (PyObject *)mpz_value_one; } mpz_clear(&tmpmpz); Py_INCREF(mpz_value_mone); return (PyObject *)mpz_value_mone; } #ifdef MPZ_LIB_DOES_CHECKING /* check if it's doable: sizeof(exp) > sizeof(long) && abs(base) > 1 ?? --> No Way */ if (mpz_size(&b->mpz) > 1) return (PyObject *)PyErr_NoMemory(); #else /* def MPZ_LIB_DOES_CHECKING */ /* wet finger method */ if (mpz_cmp_ui(&b->mpz, (unsigned long int)0x10000) >= 0) { PyErr_SetString(PyExc_ValueError, "mpz.pow outrageous exponent"); return NULL; } #endif /* def MPZ_LIB_DOES_CHECKING else */ if ((z = newmpzobject()) == NULL) return NULL; mpz_pow_ui(&z->mpz, &a->mpz, mpz_get_ui(&b->mpz)); return (PyObject *)z; } /* mpz_power() */ static PyObject * mpz_negative(mpzobject *v) { mpzobject *z; #ifdef MPZ_SPARE_MALLOC if (mpz_cmp_ui(&v->mpz, (unsigned long int)0) == 0) { /* -0 == 0 */ Py_INCREF(v); return (PyObject *)v; } #endif /* def MPZ_SPARE_MALLOC */ if ((z = newmpzobject()) == NULL) return NULL; mpz_neg(&z->mpz, &v->mpz); return (PyObject *)z; } /* mpz_negative() */ static PyObject * mpz_positive(mpzobject *v) { Py_INCREF(v); return (PyObject *)v; } /* mpz_positive() */ static PyObject * mpz_absolute(mpzobject *v) { mpzobject *z; if (mpz_cmp_ui(&v->mpz, (unsigned long int)0) >= 0) { Py_INCREF(v); return (PyObject *)v; } if ((z = newmpzobject()) == NULL) return NULL; mpz_neg(&z->mpz, &v->mpz); return (PyObject *)z; } /* mpz_absolute() */ static int mpz_nonzero(mpzobject *v) { return mpz_cmp_ui(&v->mpz, (unsigned long int)0) != 0; } /* mpz_nonzero() */ static PyObject * py_mpz_invert(mpzobject *v) { mpzobject *z; /* I think mpz_com does exactly what needed */ if ((z = newmpzobject()) == NULL) return NULL; mpz_com(&z->mpz, &v->mpz); return (PyObject *)z; } /* py_mpz_invert() */ static PyObject * mpz_lshift(mpzobject *a, mpzobject *b) { int cmpres; mpzobject *z; if ((cmpres = mpz_cmp_ui(&b->mpz, (unsigned long int)0)) == 0) { /* a << 0 == a */ Py_INCREF(a); return (PyObject *)a; } if (cmpres < 0) { PyErr_SetString(PyExc_ValueError, "mpz.<< negative shift count"); return NULL; } #ifdef MPZ_LIB_DOES_CHECKING if (mpz_size(&b->mpz) > 1) return (PyObject *)PyErr_NoMemory(); #else /* def MPZ_LIB_DOES_CHECKING */ /* wet finger method */ if (mpz_cmp_ui(&b->mpz, (unsigned long int)0x10000) >= 0) { PyErr_SetString(PyExc_ValueError, "mpz.<< outrageous shift count"); return NULL; } #endif /* def MPZ_LIB_DOES_CHECKING else */ if ((z = newmpzobject()) == NULL) return NULL; mpz_mul_2exp(&z->mpz, &a->mpz, mpz_get_ui(&b->mpz)); return (PyObject *)z; } /* mpz_lshift() */ static PyObject * mpz_rshift(mpzobject *a, mpzobject *b) { int cmpres; mpzobject *z; if ((cmpres = mpz_cmp_ui(&b->mpz, (unsigned long int)0)) == 0) { /* a >> 0 == a */ Py_INCREF(a); return (PyObject *)a; } if (cmpres < 0) { PyErr_SetString(PyExc_ValueError, "mpz.>> negative shift count"); return NULL; } if (mpz_size(&b->mpz) > 1) return (PyObject *)PyErr_NoMemory(); if ((z = newmpzobject()) == NULL) return NULL; mpz_div_2exp(&z->mpz, &a->mpz, mpz_get_ui(&b->mpz)); return (PyObject *)z; } /* mpz_rshift() */ static PyObject * mpz_andfunc(mpzobject *a, mpzobject *b) { mpzobject *z; if ((z = newmpzobject()) == NULL) return NULL; mpz_and(&z->mpz, &a->mpz, &b->mpz); return (PyObject *)z; } /* mpz_andfunc() */ /* hack Hack HAck HACk HACK, XXX this code is dead slow */ void mpz_xor(MP_INT *res, const MP_INT *op1, const MP_INT *op2) { MP_INT tmpmpz; mpz_init(&tmpmpz); mpz_and(res, op1, op2); mpz_com(&tmpmpz, res); mpz_ior(res, op1, op2); mpz_and(res, res, &tmpmpz); mpz_clear(&tmpmpz); } /* mpz_xor() HACK */ static PyObject * mpz_xorfunc(mpzobject *a, mpzobject *b) { mpzobject *z; if ((z = newmpzobject()) == NULL) return NULL; mpz_xor(&z->mpz, &a->mpz, &b->mpz); return (PyObject *)z; } /* mpz_xorfunc() */ static PyObject * mpz_orfunc(mpzobject *a, mpzobject *b) { mpzobject *z; if ((z = newmpzobject()) == NULL) return NULL; mpz_ior(&z->mpz, &a->mpz, &b->mpz); return (PyObject *)z; } /* mpz_orfunc() */ /* MPZ initialisation */ #include "longintrepr.h" static PyObject * MPZ_mpz(PyObject *self, PyObject *args) { mpzobject *mpzp; #ifdef MPZ_DEBUG fputs("MPZ_mpz() called...\n", stderr); #endif /* def MPZ_DEBUG */ /* at least we know it's some object */ /* note DON't Py_DECREF args */ if (PyInt_Check(args)) { long lval = PyInt_AS_LONG(args); if (lval == (long)0) { Py_INCREF(mpz_value_zero); mpzp = mpz_value_zero; } else if (lval == (long)1) { Py_INCREF(mpz_value_one); mpzp = mpz_value_one; } else if ((mpzp = newmpzobject()) == NULL) return NULL; else mpz_set_si(&mpzp->mpz, lval); } else if (PyLong_Check(args)) { MP_INT mplongdigit; int i; unsigned char isnegative; if ((mpzp = newmpzobject()) == NULL) return NULL; mpz_set_si(&mpzp->mpz, 0L); mpz_init(&mplongdigit); /* how we're gonna handle this? */ if ((isnegative = ((i = ((PyLongObject *)args)->ob_size) < 0) )) i = -i; while (i--) { mpz_set_ui(&mplongdigit, (unsigned long) ((PyLongObject *)args)->ob_digit[i]); mpz_mul_2exp(&mplongdigit,&mplongdigit, (unsigned long int)i * SHIFT); mpz_ior(&mpzp->mpz, &mpzp->mpz, &mplongdigit); } if (isnegative) mpz_neg(&mpzp->mpz, &mpzp->mpz); /* get rid of allocation for tmp variable */ mpz_clear(&mplongdigit); } else if (PyString_Check(args)) { unsigned char *cp = (unsigned char *)PyString_AS_STRING(args); int len = PyString_GET_SIZE(args); MP_INT mplongdigit; if ((mpzp = newmpzobject()) == NULL) return NULL; mpz_set_si(&mpzp->mpz, 0L); mpz_init(&mplongdigit); /* let's do it the same way as with the long conversion: without thinking how it can be faster (-: :-) */ cp += len; while (len--) { mpz_set_ui(&mplongdigit, (unsigned long)*--cp ); mpz_mul_2exp(&mplongdigit,&mplongdigit, (unsigned long int)len * 8); mpz_ior(&mpzp->mpz, &mpzp->mpz, &mplongdigit); } /* get rid of allocation for tmp variable */ mpz_clear(&mplongdigit); } else if (is_mpzobject(args)) { Py_INCREF(args); mpzp = (mpzobject *)args; } else { PyErr_SetString(PyExc_TypeError, "mpz.mpz() expects integer, long, string or mpz object argument"); return NULL; } #ifdef MPZ_DEBUG fputs("MPZ_mpz: created mpz=", stderr); mpz_out_str(stderr, 10, &mpzp->mpz); putc('\n', stderr); #endif /* def MPZ_DEBUG */ return (PyObject *)mpzp; } /* MPZ_mpz() */ static mpzobject * mpz_mpzcoerce(PyObject *z) { /* shortcut: 9 out of 10 times the type is already ok */ if (is_mpzobject(z)) { Py_INCREF(z); return (mpzobject *)z; /* coercion succeeded */ } /* what types do we accept?: intobjects and longobjects */ if (PyInt_Check(z) || PyLong_Check(z)) return (mpzobject *)MPZ_mpz((PyObject *)NULL, z); PyErr_SetString(PyExc_TypeError, "number coercion (to mpzobject) failed"); return NULL; } /* mpz_mpzcoerce() */ /* Forward */ static void mpz_divm(MP_INT *res, const MP_INT *num, const MP_INT *den, const MP_INT *mod); static PyObject * MPZ_powm(PyObject *self, PyObject *args) { PyObject *base, *exp, *mod; mpzobject *mpzbase = NULL, *mpzexp = NULL, *mpzmod = NULL; mpzobject *z = NULL; int tstres; if (!PyArg_ParseTuple(args, "OOO", &base, &exp, &mod)) return NULL; if ((mpzbase = mpz_mpzcoerce(base)) == NULL || (mpzexp = mpz_mpzcoerce(exp)) == NULL || (mpzmod = mpz_mpzcoerce(mod)) == NULL || (z = newmpzobject()) == NULL) { Py_XDECREF(mpzbase); Py_XDECREF(mpzexp); Py_XDECREF(mpzmod); Py_XDECREF(z); return NULL; } if ((tstres=mpz_cmp_ui(&mpzexp->mpz, (unsigned long int)0)) == 0) { Py_DECREF(mpzbase); Py_DECREF(mpzexp); Py_DECREF(mpzmod); Py_DECREF(z); Py_INCREF(mpz_value_one); return (PyObject *)mpz_value_one; } if (mpz_cmp_ui(&mpzmod->mpz, 0) == 0) { Py_DECREF(mpzbase); Py_DECREF(mpzexp); Py_DECREF(mpzmod); Py_DECREF(z); PyErr_SetString(PyExc_ValueError, "modulus cannot be 0"); return NULL; } if (tstres < 0) { MP_INT absexp; /* negative exp */ mpz_init_set(&absexp, &mpzexp->mpz); mpz_abs(&absexp, &absexp); mpz_powm(&z->mpz, &mpzbase->mpz, &absexp, &mpzmod->mpz); mpz_divm(&z->mpz, &mpz_value_one->mpz, &z->mpz, &mpzmod->mpz); mpz_clear(&absexp); } else { mpz_powm(&z->mpz, &mpzbase->mpz, &mpzexp->mpz, &mpzmod->mpz); } Py_DECREF(mpzbase); Py_DECREF(mpzexp); Py_DECREF(mpzmod); return (PyObject *)z; } /* MPZ_powm() */ static PyObject * MPZ_gcd(PyObject *self, PyObject *args) { PyObject *op1, *op2; mpzobject *mpzop1 = NULL, *mpzop2 = NULL; mpzobject *z; if (!PyArg_ParseTuple(args, "OO", &op1, &op2)) return NULL; if ((mpzop1 = mpz_mpzcoerce(op1)) == NULL || (mpzop2 = mpz_mpzcoerce(op2)) == NULL || (z = newmpzobject()) == NULL) { Py_XDECREF(mpzop1); Py_XDECREF(mpzop2); return NULL; } /* ok, we have three mpzobjects, and an initialised result holder */ mpz_gcd(&z->mpz, &mpzop1->mpz, &mpzop2->mpz); Py_DECREF(mpzop1); Py_DECREF(mpzop2); return (PyObject *)z; } /* MPZ_gcd() */ static PyObject * MPZ_gcdext(PyObject *self, PyObject *args) { PyObject *op1, *op2, *z = NULL; mpzobject *mpzop1 = NULL, *mpzop2 = NULL; mpzobject *g = NULL, *s = NULL, *t = NULL; if (!PyArg_ParseTuple(args, "OO", &op1, &op2)) return NULL; if ((mpzop1 = mpz_mpzcoerce(op1)) == NULL || (mpzop2 = mpz_mpzcoerce(op2)) == NULL || (z = PyTuple_New(3)) == NULL || (g = newmpzobject()) == NULL || (s = newmpzobject()) == NULL || (t = newmpzobject()) == NULL) { Py_XDECREF(mpzop1); Py_XDECREF(mpzop2); Py_XDECREF(z); Py_XDECREF(g); Py_XDECREF(s); /*Py_XDECREF(t);*/ return NULL; } mpz_gcdext(&g->mpz, &s->mpz, &t->mpz, &mpzop1->mpz, &mpzop2->mpz); Py_DECREF(mpzop1); Py_DECREF(mpzop2); (void)PyTuple_SetItem(z, 0, (PyObject *)g); (void)PyTuple_SetItem(z, 1, (PyObject *)s); (void)PyTuple_SetItem(z, 2, (PyObject *)t); return (PyObject *)z; } /* MPZ_gcdext() */ static PyObject * MPZ_sqrt(PyObject *self, PyObject *args) { mpzobject *mpzop = NULL; mpzobject *z; if ((mpzop = mpz_mpzcoerce(args)) == NULL || (z = newmpzobject()) == NULL) { Py_XDECREF(mpzop); return NULL; } mpz_sqrt(&z->mpz, &mpzop->mpz); Py_DECREF(mpzop); return (PyObject *)z; } /* MPZ_sqrt() */ static PyObject * MPZ_sqrtrem(PyObject *self, PyObject *args) { PyObject *z = NULL; mpzobject *mpzop = NULL; mpzobject *root = NULL, *rem = NULL; if ((mpzop = mpz_mpzcoerce(args)) == NULL || (z = PyTuple_New(2)) == NULL || (root = newmpzobject()) == NULL || (rem = newmpzobject()) == NULL) { Py_XDECREF(mpzop); Py_XDECREF(z); Py_XDECREF(root); /*Py_XDECREF(rem);*/ return NULL; } mpz_sqrtrem(&root->mpz, &rem->mpz, &mpzop->mpz); Py_DECREF(mpzop); (void)PyTuple_SetItem(z, 0, (PyObject *)root); (void)PyTuple_SetItem(z, 1, (PyObject *)rem); return (PyObject *)z; } /* MPZ_sqrtrem() */ static void mpz_divm(MP_INT *res, const MP_INT *num, const MP_INT *den, const MP_INT *mod) { MP_INT s0, s1, q, r, x, d0, d1; mpz_init_set(&s0, num); mpz_init_set_ui(&s1, 0); mpz_init(&q); mpz_init(&r); mpz_init(&x); mpz_init_set(&d0, den); mpz_init_set(&d1, mod); #ifdef GMP2 while (d1._mp_size != 0) { #else while (d1.size != 0) { #endif mpz_divmod(&q, &r, &d0, &d1); mpz_set(&d0, &d1); mpz_set(&d1, &r); mpz_mul(&x, &s1, &q); mpz_sub(&x, &s0, &x); mpz_set(&s0, &s1); mpz_set(&s1, &x); } #ifdef GMP2 if (d0._mp_size != 1 || d0._mp_d[0] != 1) res->_mp_size = 0; /* trouble: the gcd != 1; set s to zero */ #else if (d0.size != 1 || d0.d[0] != 1) res->size = 0; /* trouble: the gcd != 1; set s to zero */ #endif else { #ifdef MPZ_MDIV_BUG /* watch out here! first check the signs, and then perform the mpz_mod() since mod could point to res */ if ((s0.size < 0) != (mod->size < 0)) { mpz_mod(res, &s0, mod); if (res->size) mpz_add(res, res, mod); } else mpz_mod(res, &s0, mod); #else /* def MPZ_MDIV_BUG */ mpz_mmod(res, &s0, mod); #endif /* def MPZ_MDIV_BUG else */ } mpz_clear(&s0); mpz_clear(&s1); mpz_clear(&q); mpz_clear(&r); mpz_clear(&x); mpz_clear(&d0); mpz_clear(&d1); } /* mpz_divm() */ static PyObject * MPZ_divm(PyObject *self, PyObject *args) { PyObject *num, *den, *mod; mpzobject *mpznum, *mpzden = NULL, *mpzmod = NULL; mpzobject *z = NULL; if (!PyArg_ParseTuple(args, "OOO", &num, &den, &mod)) return NULL; if ((mpznum = mpz_mpzcoerce(num)) == NULL || (mpzden = mpz_mpzcoerce(den)) == NULL || (mpzmod = mpz_mpzcoerce(mod)) == NULL || (z = newmpzobject()) == NULL ) { Py_XDECREF(mpznum); Py_XDECREF(mpzden); Py_XDECREF(mpzmod); return NULL; } mpz_divm(&z->mpz, &mpznum->mpz, &mpzden->mpz, &mpzmod->mpz); Py_DECREF(mpznum); Py_DECREF(mpzden); Py_DECREF(mpzmod); if (mpz_cmp_ui(&z->mpz, (unsigned long int)0) == 0) { Py_DECREF(z); PyErr_SetString(PyExc_ValueError, "gcd(den, mod) != 1 or num == 0"); return NULL; } return (PyObject *)z; } /* MPZ_divm() */ static PyObject * mpz_int(mpzobject *self) { long sli; if (mpz_size(&self->mpz) > 1 || (sli = (long)mpz_get_ui(&self->mpz)) < (long)0 ) { PyErr_SetString(PyExc_ValueError, "mpz.int() arg too long to convert"); return NULL; } if (mpz_cmp_ui(&self->mpz, (unsigned long)0) < 0) sli = -sli; return PyInt_FromLong(sli); } /* mpz_int() */ static PyObject * mpz_long(mpzobject *self) { int i, isnegative; unsigned long int uli; PyLongObject *longobjp; int ldcount; int bitpointer, newbitpointer; MP_INT mpzscratch; /* determine length of python-long to be allocated */ if ((longobjp = _PyLong_New(i = (int) ((mpz_size(&self->mpz) * BITS_PER_MP_LIMB + SHIFT - 1) / SHIFT))) == NULL) return NULL; /* determine sign, and copy self to scratch var */ mpz_init_set(&mpzscratch, &self->mpz); if ((isnegative = (mpz_cmp_ui(&self->mpz, (unsigned long int)0) < 0))) mpz_neg(&mpzscratch, &mpzscratch); /* let those bits come, let those bits go, e.g. dismantle mpzscratch, build PyLongObject */ bitpointer = 0; /* the number of valid bits in stock */ newbitpointer = 0; ldcount = 0; /* the python-long limb counter */ uli = (unsigned long int)0; while (i--) { longobjp->ob_digit[ldcount] = uli & MASK; /* check if we've had enough bits for this digit */ if (bitpointer < SHIFT) { uli = mpz_get_ui(&mpzscratch); longobjp->ob_digit[ldcount] |= (uli << bitpointer) & MASK; uli >>= SHIFT-bitpointer; bitpointer += BITS_PER_MP_LIMB; mpz_div_2exp(&mpzscratch, &mpzscratch, BITS_PER_MP_LIMB); } else uli >>= SHIFT; bitpointer -= SHIFT; ldcount++; } assert(mpz_cmp_ui(&mpzscratch, (unsigned long int)0) == 0); mpz_clear(&mpzscratch); assert(ldcount <= longobjp->ob_size); /* long_normalize() is file-static */ /* longobjp = long_normalize(longobjp); */ while (ldcount > 0 && longobjp->ob_digit[ldcount-1] == 0) ldcount--; longobjp->ob_size = ldcount; if (isnegative) longobjp->ob_size = -longobjp->ob_size; return (PyObject *)longobjp; } /* mpz_long() */ /* I would have avoided pow() anyways, so ... */ static const double multiplier = 256.0 * 256.0 * 256.0 * 256.0; static PyObject * mpz_float(mpzobject *self) { int i, isnegative; double x; double mulstate; MP_INT mpzscratch; i = (int)mpz_size(&self->mpz); /* determine sign, and copy abs(self) to scratch var */ if ((isnegative = (mpz_cmp_ui(&self->mpz, (unsigned long int)0) < 0))) { mpz_init(&mpzscratch); mpz_neg(&mpzscratch, &self->mpz); } else mpz_init_set(&mpzscratch, &self->mpz); /* let those bits come, let those bits go, e.g. dismantle mpzscratch, build PyFloatObject */ /* Can this overflow? Dunno, protect against that possibility. */ PyFPE_START_PROTECT("mpz_float", return 0) x = 0.0; mulstate = 1.0; while (i--) { x += mulstate * mpz_get_ui(&mpzscratch); mulstate *= multiplier; mpz_div_2exp(&mpzscratch, &mpzscratch, BITS_PER_MP_LIMB); } PyFPE_END_PROTECT(mulstate) assert(mpz_cmp_ui(&mpzscratch, (unsigned long int)0) == 0); mpz_clear(&mpzscratch); if (isnegative) x = -x; return PyFloat_FromDouble(x); } /* mpz_float() */ static PyObject * mpz_hex(mpzobject *self) { return mpz_format((PyObject *)self, 16, (unsigned char)1); } /* mpz_hex() */ static PyObject * mpz_oct(mpzobject *self) { return mpz_format((PyObject *)self, 8, (unsigned char)1); } /* mpz_oct() */ static PyObject * mpz_binary(mpzobject *self) { int size; PyStringObject *strobjp; char *cp; MP_INT mp; unsigned long ldigit; if (mpz_cmp_ui(&self->mpz, (unsigned long int)0) < 0) { PyErr_SetString(PyExc_ValueError, "mpz.binary() arg must be >= 0"); return NULL; } mpz_init_set(&mp, &self->mpz); size = (int)mpz_size(&mp); if ((strobjp = (PyStringObject *) PyString_FromStringAndSize( (char *)0, size * sizeof (unsigned long int))) == NULL) return NULL; /* get the beginning of the string memory and start copying things */ cp = PyString_AS_STRING(strobjp); /* this has been programmed using a (fairly) decent lib-i/f it could be must faster if we looked into the GMP lib */ while (size--) { ldigit = mpz_get_ui(&mp); mpz_div_2exp(&mp, &mp, BITS_PER_MP_LIMB); *cp++ = (unsigned char)(ldigit & 0xFF); *cp++ = (unsigned char)((ldigit >>= 8) & 0xFF); *cp++ = (unsigned char)((ldigit >>= 8) & 0xFF); *cp++ = (unsigned char)((ldigit >>= 8) & 0xFF); if (sizeof(ldigit) == 8 && BITS_PER_MP_LIMB == 64) { *cp++ = (unsigned char)((ldigit >>= 8) & 0xFF); *cp++ = (unsigned char)((ldigit >>= 8) & 0xFF); *cp++ = (unsigned char)((ldigit >>= 8) & 0xFF); *cp++ = (unsigned char)((ldigit >>= 8) & 0xFF); } } while (strobjp->ob_size && !*--cp) strobjp->ob_size--; return (PyObject *)strobjp; } /* mpz_binary() */ static PyMethodDef mpz_methods[] = { #ifdef MPZ_CONVERSIONS_AS_METHODS {"int", mpz_int, METH_NOARGS}, {"long", mpz_long, METH_NOARGS}, {"float", mpz_float, METH_NOARGS}, {"hex", mpz_hex, METH_NOARGS}, {"oct", mpz_oct, METH_NOARGS}, #endif /* def MPZ_CONVERSIONS_AS_METHODS */ {"binary", (PyCFunction)mpz_binary, METH_NOARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * mpz_getattr(mpzobject *self, char *name) { return Py_FindMethod(mpz_methods, (PyObject *)self, name); } /* mpz_getattr() */ static int mpz_coerce(PyObject **pv, PyObject **pw) { PyObject *z; #ifdef MPZ_DEBUG fputs("mpz_coerce() called...\n", stderr); #endif /* def MPZ_DEBUG */ assert(is_mpzobject(*pv)); /* always convert other arg to mpz value, except for floats */ if (!PyFloat_Check(*pw)) { if ((z = (PyObject *)mpz_mpzcoerce(*pw)) == NULL) return -1; /* -1: an error always has been set */ Py_INCREF(*pv); *pw = z; } else { if ((z = mpz_float((mpzobject *)(*pv))) == NULL) return -1; Py_INCREF(*pw); *pv = z; } return 0; /* coercion succeeded */ } /* mpz_coerce() */ static PyObject * mpz_repr(PyObject *v) { return mpz_format(v, 10, (unsigned char)1); } /* mpz_repr() */ #define UF (unaryfunc) #define BF (binaryfunc) #define TF (ternaryfunc) #define IF (inquiry) #define CF (coercion) static PyNumberMethods mpz_as_number = { BF mpz_addition, /*nb_add*/ BF mpz_substract, /*nb_subtract*/ BF mpz_multiply, /*nb_multiply*/ BF mpz_divide, /*nb_divide*/ BF mpz_remainder, /*nb_remainder*/ BF mpz_div_and_mod, /*nb_divmod*/ TF mpz_power, /*nb_power*/ UF mpz_negative, /*nb_negative*/ UF mpz_positive, /*tp_positive*/ UF mpz_absolute, /*tp_absolute*/ IF mpz_nonzero, /*tp_nonzero*/ UF py_mpz_invert, /*nb_invert*/ BF mpz_lshift, /*nb_lshift*/ BF mpz_rshift, /*nb_rshift*/ BF mpz_andfunc, /*nb_and*/ BF mpz_xorfunc, /*nb_xor*/ BF mpz_orfunc, /*nb_or*/ CF mpz_coerce, /*nb_coerce*/ #ifndef MPZ_CONVERSIONS_AS_METHODS UF mpz_int, /*nb_int*/ UF mpz_long, /*nb_long*/ UF mpz_float, /*nb_float*/ UF mpz_oct, /*nb_oct*/ UF mpz_hex, /*nb_hex*/ #endif /* ndef MPZ_CONVERSIONS_AS_METHODS */ }; static PyTypeObject MPZtype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "mpz.mpz", /*tp_name*/ sizeof(mpzobject), /*tp_size*/ 0, /*tp_itemsize*/ /* methods */ (destructor)mpz_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)mpz_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ (cmpfunc)mpz_compare, /*tp_compare*/ (reprfunc)mpz_repr, /*tp_repr*/ &mpz_as_number, /*tp_as_number*/ }; /* List of functions exported by this module */ static PyMethodDef mpz_functions[] = { #if 0 {initialiser_name, MPZ_mpz, METH_O}, #else /* 0 */ /* until guido ``fixes'' struct PyMethodDef */ {(char *)initialiser_name, MPZ_mpz, METH_O}, #endif /* 0 else */ {"powm", MPZ_powm, METH_VARARGS}, {"gcd", MPZ_gcd, METH_VARARGS}, {"gcdext", MPZ_gcdext, METH_VARARGS}, {"sqrt", MPZ_sqrt, METH_O}, {"sqrtrem", MPZ_sqrtrem, METH_O}, {"divm", MPZ_divm, METH_VARARGS}, {NULL, NULL} /* Sentinel */ }; /* #define MP_TEST_ALLOC */ #ifdef MP_TEST_ALLOC #define MP_TEST_SIZE 4 static const char mp_test_magic[MP_TEST_SIZE] = {'\xAA','\xAA','\xAA','\xAA'}; static mp_test_error(int *location) { /* assumptions: *alloc returns address divisible by 4, mpz_* routines allocate in chunks divisible by four */ fprintf(stderr, "MP_TEST_ERROR: location holds 0x%08d\n", *location ); Py_FatalError("MP_TEST_ERROR"); } /* static mp_test_error() */ #define MP_EXTRA_ALLOC(size) ((size) + MP_TEST_SIZE) #define MP_SET_TEST(basep,size) (void)memcpy( ((char *)(basep))+(size), mp_test_magic, MP_TEST_SIZE) #define MP_DO_TEST(basep,size) if ( !memcmp( ((char *)(basep))+(size), mp_test_magic, MP_TEST_SIZE ) ) \ ; \ else \ mp_test_error((int *)((char *)(basep) + size)) #else /* def MP_TEST_ALLOC */ #define MP_EXTRA_ALLOC(size) (size) #define MP_SET_TEST(basep,size) #define MP_DO_TEST(basep,size) #endif /* def MP_TEST_ALLOC else */ void *mp_allocate(size_t alloc_size) { void *res; #ifdef MPZ_DEBUG fprintf(stderr, "mp_allocate : size %ld\n", alloc_size); #endif /* def MPZ_DEBUG */ if ( (res = malloc(MP_EXTRA_ALLOC(alloc_size))) == NULL ) Py_FatalError("mp_allocate failure"); #ifdef MPZ_DEBUG fprintf(stderr, "mp_allocate : address %08p\n", res); #endif /* def MPZ_DEBUG */ MP_SET_TEST(res,alloc_size); return res; } /* mp_allocate() */ void *mp_reallocate(void *ptr, size_t old_size, size_t new_size) { void *res; #ifdef MPZ_DEBUG fprintf(stderr, "mp_reallocate: old address %08p, old size %ld\n", ptr, old_size); #endif /* def MPZ_DEBUG */ MP_DO_TEST(ptr, old_size); if ( (res = realloc(ptr, MP_EXTRA_ALLOC(new_size))) == NULL ) Py_FatalError("mp_reallocate failure"); #ifdef MPZ_DEBUG fprintf(stderr, "mp_reallocate: new address %08p, new size %ld\n", res, new_size); #endif /* def MPZ_DEBUG */ MP_SET_TEST(res, new_size); return res; } /* mp_reallocate() */ void mp_free(void *ptr, size_t size) { #ifdef MPZ_DEBUG fprintf(stderr, "mp_free : old address %08p, old size %ld\n", ptr, size); #endif /* def MPZ_DEBUG */ MP_DO_TEST(ptr, size); free(ptr); } /* mp_free() */ /* Initialize this module. */ PyMODINIT_FUNC initmpz(void) { PyObject *module; PyObject *dict; #ifdef MPZ_DEBUG fputs( "initmpz() called...\n", stderr ); #endif /* def MPZ_DEBUG */ mp_set_memory_functions( mp_allocate, mp_reallocate, mp_free ); MPZtype.ob_type = &PyType_Type; module = Py_InitModule("mpz", mpz_functions); /* create some frequently used constants */ if ((mpz_value_zero = newmpzobject()) == NULL) goto finally; mpz_set_ui(&mpz_value_zero->mpz, (unsigned long int)0); if ((mpz_value_one = newmpzobject()) == NULL) goto finally; mpz_set_ui(&mpz_value_one->mpz, (unsigned long int)1); if ((mpz_value_mone = newmpzobject()) == NULL) goto finally; mpz_set_si(&mpz_value_mone->mpz, (long)-1); dict = PyModule_GetDict(module); if (dict != NULL) { PyDict_SetItemString(dict, "MPZType", (PyObject*)&MPZtype); } finally: return; } /* initmpz() */ #ifdef MAKEDUMMYINT int _mpz_dummy_int; /* XXX otherwise, we're .bss-less (DYNLOAD->Jack?) */ #endif /* def MAKEDUMMYINT */ Python-2.3.7/Modules/pcremodule.c0000644001241000117560000003565007522367001016176 0ustar loewishpifb6/* Pcre objects */ #include "Python.h" #ifndef Py_eval_input /* For Python 1.4, graminit.h has to be explicitly included */ #include "graminit.h" #define Py_eval_input eval_input #endif #ifndef FOR_PYTHON #define FOR_PYTHON #endif #include "pcre.h" #include "pcre-int.h" static PyObject *ErrorObject; typedef struct { PyObject_HEAD pcre *regex; pcre_extra *regex_extra; int num_groups; } PcreObject; static PyTypeObject Pcre_Type; #define PcreObject_Check(v) ((v)->ob_type == &Pcre_Type) #define NORMAL 0 #define CHARCLASS 1 #define REPLACEMENT 2 #define CHAR 0 #define MEMORY_REFERENCE 1 #define SYNTAX 2 #define NOT_SYNTAX 3 #define SET 4 #define WORD_BOUNDARY 5 #define NOT_WORD_BOUNDARY 6 #define BEGINNING_OF_BUFFER 7 #define END_OF_BUFFER 8 #define STRING 9 static PcreObject * newPcreObject(PyObject *args) { PcreObject *self; self = PyObject_New(PcreObject, &Pcre_Type); if (self == NULL) return NULL; self->regex = NULL; self->regex_extra = NULL; return self; } /* Pcre methods */ static void PyPcre_dealloc(PcreObject *self) { if (self->regex) (pcre_free)(self->regex); if (self->regex_extra) (pcre_free)(self->regex_extra); PyObject_Del(self); } static PyObject * PyPcre_exec(PcreObject *self, PyObject *args) { char *string; int stringlen, pos = 0, options=0, endpos = -1, i, count; int offsets[100*2]; PyObject *list; if (!PyArg_ParseTuple(args, "t#|iii:match", &string, &stringlen, &pos, &endpos, &options)) return NULL; if (endpos == -1) {endpos = stringlen;} count = pcre_exec(self->regex, self->regex_extra, string, endpos, pos, options, offsets, sizeof(offsets)/sizeof(int) ); /* If an error occurred during the match, and an exception was raised, just return NULL and leave the exception alone. The most likely problem to cause this would be running out of memory for the failure stack. */ if (PyErr_Occurred()) { return NULL; } if (count==PCRE_ERROR_NOMATCH) {Py_INCREF(Py_None); return Py_None;} if (count<0) { PyObject *errval = Py_BuildValue("si", "Regex execution error", count); PyErr_SetObject(ErrorObject, errval); Py_XDECREF(errval); return NULL; } list=PyList_New(self->num_groups+1); if (list==NULL) return NULL; for(i=0; i<=self->num_groups; i++) { PyObject *v; int start=offsets[i*2], end=offsets[i*2+1]; /* If the group wasn't affected by the match, return -1, -1 */ if (start<0 || count<=i) {start=end=-1;} v=Py_BuildValue("ii", start, end); if (v==NULL) {Py_DECREF(list); return NULL;} PyList_SetItem(list, i, v); } return list; } static PyMethodDef Pcre_methods[] = { {"match", (PyCFunction)PyPcre_exec, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; static PyObject * PyPcre_getattr(PcreObject *self, char *name) { return Py_FindMethod(Pcre_methods, (PyObject *)self, name); } static PyTypeObject Pcre_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "pcre.Pcre", /*tp_name*/ sizeof(PcreObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)PyPcre_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)PyPcre_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; /* --------------------------------------------------------------------- */ static PyObject * PyPcre_compile(PyObject *self, PyObject *args) { PcreObject *rv; PyObject *dictionary; char *pattern; const char *error; int options, erroroffset; if (!PyArg_ParseTuple(args, "siO!:pcre_compile", &pattern, &options, &PyDict_Type, &dictionary)) return NULL; rv = newPcreObject(args); if ( rv == NULL ) return NULL; rv->regex = pcre_compile((char*)pattern, options, &error, &erroroffset, dictionary); if (rv->regex==NULL) { Py_DECREF(rv); if (!PyErr_Occurred()) { PyObject *errval = Py_BuildValue("si", error, erroroffset); PyErr_SetObject(ErrorObject, errval); Py_XDECREF(errval); } return NULL; } rv->regex_extra=pcre_study(rv->regex, 0, &error); if (rv->regex_extra==NULL && error!=NULL) { PyObject *errval = Py_BuildValue("si", error, 0); Py_DECREF(rv); PyErr_SetObject(ErrorObject, errval); Py_XDECREF(errval); return NULL; } rv->num_groups = pcre_info(rv->regex, NULL, NULL); if (rv->num_groups<0) { PyObject *errval = Py_BuildValue("si", error, rv->num_groups); PyErr_SetObject(ErrorObject, errval); Py_XDECREF(errval); Py_DECREF(rv); return NULL; } return (PyObject *)rv; } static PyObject * PyPcre_expand_escape(unsigned char *pattern, int pattern_len, int *indexptr, int *typeptr) { unsigned char c; int index = *indexptr; if (pattern_len<=index) { PyErr_SetString(ErrorObject, "escape ends too soon"); return NULL; } c=pattern[index]; index++; *typeptr=CHAR; switch (c) { case('t'): *indexptr=index; return Py_BuildValue("c", (char)9); case('n'): *indexptr = index; return Py_BuildValue("c", (char)10); case('v'): *indexptr = index; return Py_BuildValue("c", (char)11); case('r'): *indexptr = index; return Py_BuildValue("c", (char)13); case('f'): *indexptr = index; return Py_BuildValue("c", (char)12); case('a'): *indexptr = index; return Py_BuildValue("c", (char)7); case('b'): *indexptr=index; return Py_BuildValue("c", (char)8); case('\\'): *indexptr=index; return Py_BuildValue("c", '\\'); case('x'): { int x, ch, end; x = 0; end = index; while ( (end starting with digit"); return NULL; } else {group_num = group_num * 10 + pattern[i] - '0';} if (!(pcre_ctypes[pattern[i]] & ctype_word) ) { /* XXX should include the text of the reference */ PyErr_SetString(ErrorObject, "illegal symbolic reference"); return NULL; } } *typeptr = MEMORY_REFERENCE; *indexptr = end+1; /* If it's a number, return the integer value of the group */ if (is_number) return Py_BuildValue("i", group_num); /* Otherwise, return a string containing the group name */ return Py_BuildValue("s#", pattern+index, end-index); } case('0'): { /* \0 always indicates an octal escape, so we consume up to 3 characters, as long as they're all octal digits */ int octval=0, i; index--; for(i=index; i<=index+2 && i255) { PyErr_SetString(ErrorObject, "octal value out of range"); return NULL; } *indexptr = i; return Py_BuildValue("c", (unsigned char)octval); } case('1'): case('2'): case('3'): case('4'): case('5'): case('6'): case('7'): case('8'): case('9'): { /* Handle \?, where ? is from 1 through 9 */ int value=0; index--; /* If it's at least a two-digit reference, like \34, it might either be a 3-digit octal escape (\123) or a 2-digit decimal memory reference (\34) */ if ( (index+1) 255) { PyErr_SetString(ErrorObject, "octal value out of range"); return NULL; } *indexptr = index+3; return Py_BuildValue("c", (unsigned char)value); } else { /* 2-digit form, so it's a memory reference */ value= 10*(pattern[index ]-'0') + (pattern[index+1]-'0'); if (value<1 || EXTRACT_MAX<=value) { PyErr_SetString(ErrorObject, "memory reference out of range"); return NULL; } *typeptr = MEMORY_REFERENCE; *indexptr = index+2; return Py_BuildValue("i", value); } } else { /* Single-digit form, like \2, so it's a memory reference */ *typeptr = MEMORY_REFERENCE; *indexptr = index+1; return Py_BuildValue("i", pattern[index]-'0'); } } default: /* It's some unknown escape like \s, so return a string containing \s */ *typeptr = STRING; *indexptr = index; return Py_BuildValue("s#", pattern+index-2, 2); } } static PyObject * PyPcre_expand(PyObject *self, PyObject *args) { PyObject *results, *match_obj; PyObject *repl_obj, *newstring; unsigned char *repl; int size, total_len, i, start, pos; if (!PyArg_ParseTuple(args, "OS:pcre_expand", &match_obj, &repl_obj)) return NULL; repl=(unsigned char *)PyString_AsString(repl_obj); size=PyString_Size(repl_obj); results=PyList_New(0); if (results==NULL) return NULL; for(start=total_len=i=0; i #endif int main(int argc, char **argv) { /* 754 requires that FP exceptions run in "no stop" mode by default, * and until C vendors implement C99's ways to control FP exceptions, * Python requires non-stop mode. Alas, some platforms enable FP * exceptions by default. Here we disable them. */ #ifdef __FreeBSD__ fp_except_t m; m = fpgetmask(); fpsetmask(m & ~FP_X_OFL); #endif return Py_Main(argc, argv); } Python-2.3.7/Modules/_csv.c0000644001241000117560000013131410762607371014772 0ustar loewishpifb6/* csv module */ /* This module provides the low-level underpinnings of a CSV reading/writing module. Users should not use this module directly, but import the csv.py module instead. **** For people modifying this code, please note that as of this writing **** (2003-03-23), it is intended that this code should work with Python **** 2.2. */ #define MODULE_VERSION "1.0" #include "Python.h" #include "structmember.h" /* begin 2.2 compatibility macros */ #ifndef PyDoc_STRVAR /* Define macros for inline documentation. */ #define PyDoc_VAR(name) static char name[] #define PyDoc_STRVAR(name,str) PyDoc_VAR(name) = PyDoc_STR(str) #ifdef WITH_DOC_STRINGS #define PyDoc_STR(str) str #else #define PyDoc_STR(str) "" #endif #endif /* ifndef PyDoc_STRVAR */ #ifndef PyMODINIT_FUNC # if defined(__cplusplus) # define PyMODINIT_FUNC extern "C" void # else /* __cplusplus */ # define PyMODINIT_FUNC void # endif /* __cplusplus */ #endif /* end 2.2 compatibility macros */ static PyObject *error_obj; /* CSV exception */ static PyObject *dialects; /* Dialect registry */ typedef enum { START_RECORD, START_FIELD, ESCAPED_CHAR, IN_FIELD, IN_QUOTED_FIELD, ESCAPE_IN_QUOTED_FIELD, QUOTE_IN_QUOTED_FIELD } ParserState; typedef enum { QUOTE_MINIMAL, QUOTE_ALL, QUOTE_NONNUMERIC, QUOTE_NONE } QuoteStyle; typedef struct { QuoteStyle style; char *name; } StyleDesc; static StyleDesc quote_styles[] = { { QUOTE_MINIMAL, "QUOTE_MINIMAL" }, { QUOTE_ALL, "QUOTE_ALL" }, { QUOTE_NONNUMERIC, "QUOTE_NONNUMERIC" }, { QUOTE_NONE, "QUOTE_NONE" }, { 0 } }; typedef struct { PyObject_HEAD int doublequote; /* is " represented by ""? */ char delimiter; /* field separator */ char quotechar; /* quote character */ char escapechar; /* escape character */ int skipinitialspace; /* ignore spaces following delimiter? */ PyObject *lineterminator; /* string to write between records */ QuoteStyle quoting; /* style of quoting to write */ int strict; /* raise exception on bad CSV */ } DialectObj; staticforward PyTypeObject Dialect_Type; typedef struct { PyObject_HEAD PyObject *input_iter; /* iterate over this for input lines */ DialectObj *dialect; /* parsing dialect */ PyObject *fields; /* field list for current record */ ParserState state; /* current CSV parse state */ char *field; /* build current field in here */ int field_size; /* size of allocated buffer */ int field_len; /* length of current field */ int had_parse_error; /* did we have a parse error? */ } ReaderObj; staticforward PyTypeObject Reader_Type; #define ReaderObject_Check(v) ((v)->ob_type == &Reader_Type) typedef struct { PyObject_HEAD PyObject *writeline; /* write output lines to this file */ DialectObj *dialect; /* parsing dialect */ char *rec; /* buffer for parser.join */ int rec_size; /* size of allocated record */ int rec_len; /* length of record */ int num_fields; /* number of fields in record */ } WriterObj; staticforward PyTypeObject Writer_Type; /* * DIALECT class */ static PyObject * get_dialect_from_registry(PyObject * name_obj) { PyObject *dialect_obj; dialect_obj = PyDict_GetItem(dialects, name_obj); if (dialect_obj == NULL) return PyErr_Format(error_obj, "unknown dialect"); Py_INCREF(dialect_obj); return dialect_obj; } static int check_delattr(PyObject *v) { if (v == NULL) { PyErr_SetString(PyExc_TypeError, "Cannot delete attribute"); return -1; } return 0; } static PyObject * get_string(PyObject *str) { Py_XINCREF(str); return str; } static int set_string(PyObject **str, PyObject *v) { if (check_delattr(v) < 0) return -1; if (!PyString_Check(v) #ifdef Py_USING_UNICODE && !PyUnicode_Check(v) #endif ) { PyErr_BadArgument(); return -1; } Py_XDECREF(*str); Py_INCREF(v); *str = v; return 0; } static PyObject * get_nullchar_as_None(char c) { if (c == '\0') { Py_INCREF(Py_None); return Py_None; } else return PyString_FromStringAndSize((char*)&c, 1); } static int set_None_as_nullchar(char * addr, PyObject *v) { if (check_delattr(v) < 0) return -1; if (v == Py_None) *addr = '\0'; else if (!PyString_Check(v) || PyString_Size(v) != 1) { PyErr_BadArgument(); return -1; } else { char *s = PyString_AsString(v); if (s == NULL) return -1; *addr = s[0]; } return 0; } static PyObject * Dialect_get_lineterminator(DialectObj *self) { return get_string(self->lineterminator); } static int Dialect_set_lineterminator(DialectObj *self, PyObject *value) { return set_string(&self->lineterminator, value); } static PyObject * Dialect_get_escapechar(DialectObj *self) { return get_nullchar_as_None(self->escapechar); } static int Dialect_set_escapechar(DialectObj *self, PyObject *value) { return set_None_as_nullchar(&self->escapechar, value); } static PyObject * Dialect_get_quoting(DialectObj *self) { return PyInt_FromLong(self->quoting); } static int Dialect_set_quoting(DialectObj *self, PyObject *v) { int quoting; StyleDesc *qs = quote_styles; if (check_delattr(v) < 0) return -1; if (!PyInt_Check(v)) { PyErr_BadArgument(); return -1; } quoting = PyInt_AsLong(v); for (qs = quote_styles; qs->name; qs++) { if (qs->style == quoting) { self->quoting = quoting; return 0; } } PyErr_BadArgument(); return -1; } static struct PyMethodDef Dialect_methods[] = { { NULL, NULL } }; #define D_OFF(x) offsetof(DialectObj, x) static struct PyMemberDef Dialect_memberlist[] = { { "quotechar", T_CHAR, D_OFF(quotechar) }, { "delimiter", T_CHAR, D_OFF(delimiter) }, { "skipinitialspace", T_INT, D_OFF(skipinitialspace) }, { "doublequote", T_INT, D_OFF(doublequote) }, { "strict", T_INT, D_OFF(strict) }, { NULL } }; static PyGetSetDef Dialect_getsetlist[] = { { "escapechar", (getter)Dialect_get_escapechar, (setter)Dialect_set_escapechar }, { "lineterminator", (getter)Dialect_get_lineterminator, (setter)Dialect_set_lineterminator }, { "quoting", (getter)Dialect_get_quoting, (setter)Dialect_set_quoting }, {NULL}, }; static void Dialect_dealloc(DialectObj *self) { Py_XDECREF(self->lineterminator); self->ob_type->tp_free((PyObject *)self); } static int dialect_init(DialectObj * self, PyObject * args, PyObject * kwargs) { PyObject *dialect = NULL, *name_obj, *value_obj; self->quotechar = '"'; self->delimiter = ','; self->escapechar = '\0'; self->skipinitialspace = 0; Py_XDECREF(self->lineterminator); self->lineterminator = PyString_FromString("\r\n"); if (self->lineterminator == NULL) return -1; self->quoting = QUOTE_MINIMAL; self->doublequote = 1; self->strict = 0; if (!PyArg_ParseTuple(args, "|O", &dialect)) return -1; Py_XINCREF(dialect); if (kwargs != NULL) { PyObject * key = PyString_FromString("dialect"); PyObject * d; d = PyDict_GetItem(kwargs, key); if (d) { Py_INCREF(d); Py_XDECREF(dialect); PyDict_DelItem(kwargs, key); dialect = d; } Py_DECREF(key); } if (dialect != NULL) { int i; PyObject * dir_list; /* If dialect is a string, look it up in our registry */ if (PyString_Check(dialect) #ifdef Py_USING_UNICODE || PyUnicode_Check(dialect) #endif ) { PyObject * new_dia; new_dia = get_dialect_from_registry(dialect); Py_DECREF(dialect); if (new_dia == NULL) return -1; dialect = new_dia; } /* A class rather than an instance? Instantiate */ if (PyObject_TypeCheck(dialect, &PyClass_Type)) { PyObject * new_dia; new_dia = PyObject_CallFunction(dialect, ""); Py_DECREF(dialect); if (new_dia == NULL) return -1; dialect = new_dia; } /* Make sure we finally have an instance */ if (!PyInstance_Check(dialect) || (dir_list = PyObject_Dir(dialect)) == NULL) { PyErr_SetString(PyExc_TypeError, "dialect must be an instance"); Py_DECREF(dialect); return -1; } /* And extract the attributes */ for (i = 0; i < PyList_GET_SIZE(dir_list); ++i) { char *s; name_obj = PyList_GET_ITEM(dir_list, i); s = PyString_AsString(name_obj); if (s == NULL) return -1; if (s[0] == '_') continue; value_obj = PyObject_GetAttr(dialect, name_obj); if (value_obj) { if (PyObject_SetAttr((PyObject *)self, name_obj, value_obj)) { Py_DECREF(value_obj); Py_DECREF(dir_list); Py_DECREF(dialect); return -1; } Py_DECREF(value_obj); } } Py_DECREF(dir_list); Py_DECREF(dialect); } if (kwargs != NULL) { int pos = 0; while (PyDict_Next(kwargs, &pos, &name_obj, &value_obj)) { if (PyObject_SetAttr((PyObject *)self, name_obj, value_obj)) return -1; } } return 0; } static PyObject * dialect_new(PyTypeObject *type, PyObject *args, PyObject *kwargs) { DialectObj *self; self = (DialectObj *)type->tp_alloc(type, 0); if (self != NULL) { self->lineterminator = NULL; } return (PyObject *)self; } PyDoc_STRVAR(Dialect_Type_doc, "CSV dialect\n" "\n" "The Dialect type records CSV parsing and generation options.\n"); static PyTypeObject Dialect_Type = { PyObject_HEAD_INIT(NULL) 0, /* ob_size */ "_csv.Dialect", /* tp_name */ sizeof(DialectObj), /* tp_basicsize */ 0, /* tp_itemsize */ /* methods */ (destructor)Dialect_dealloc, /* tp_dealloc */ (printfunc)0, /* tp_print */ (getattrfunc)0, /* tp_getattr */ (setattrfunc)0, /* tp_setattr */ (cmpfunc)0, /* tp_compare */ (reprfunc)0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ (hashfunc)0, /* tp_hash */ (ternaryfunc)0, /* tp_call */ (reprfunc)0, /* tp_str */ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /* tp_flags */ Dialect_Type_doc, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ Dialect_methods, /* tp_methods */ Dialect_memberlist, /* tp_members */ Dialect_getsetlist, /* tp_getset */ 0, /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ (initproc)dialect_init, /* tp_init */ PyType_GenericAlloc, /* tp_alloc */ dialect_new, /* tp_new */ 0, /* tp_free */ }; static void parse_save_field(ReaderObj *self) { PyObject *field; field = PyString_FromStringAndSize(self->field, self->field_len); if (field != NULL) { PyList_Append(self->fields, field); Py_XDECREF(field); } self->field_len = 0; } static int parse_grow_buff(ReaderObj *self) { if (self->field_size == 0) { self->field_size = 4096; if (self->field != NULL) PyMem_Free(self->field); self->field = PyMem_Malloc(self->field_size); } else { if (self->field_size > INT_MAX / 2) { PyErr_NoMemory(); return 0; } self->field_size *= 2; self->field = PyMem_Realloc(self->field, self->field_size); } if (self->field == NULL) { PyErr_NoMemory(); return 0; } return 1; } static void parse_add_char(ReaderObj *self, char c) { if (self->field_len == self->field_size && !parse_grow_buff(self)) return; self->field[self->field_len++] = c; } static void parse_process_char(ReaderObj *self, char c) { DialectObj *dialect = self->dialect; switch (self->state) { case START_RECORD: /* start of record */ if (c == '\n') /* empty line - return [] */ break; /* normal character - handle as START_FIELD */ self->state = START_FIELD; /* fallthru */ case START_FIELD: /* expecting field */ if (c == '\n') { /* save empty field - return [fields] */ parse_save_field(self); self->state = START_RECORD; } else if (c == dialect->quotechar) { /* start quoted field */ self->state = IN_QUOTED_FIELD; } else if (c == dialect->escapechar) { /* possible escaped character */ self->state = ESCAPED_CHAR; } else if (c == ' ' && dialect->skipinitialspace) /* ignore space at start of field */ ; else if (c == dialect->delimiter) { /* save empty field */ parse_save_field(self); } else { /* begin new unquoted field */ parse_add_char(self, c); self->state = IN_FIELD; } break; case ESCAPED_CHAR: if (c != dialect->escapechar && c != dialect->delimiter && c != dialect->quotechar) parse_add_char(self, dialect->escapechar); parse_add_char(self, c); self->state = IN_FIELD; break; case IN_FIELD: /* in unquoted field */ if (c == '\n') { /* end of line - return [fields] */ parse_save_field(self); self->state = START_RECORD; } else if (c == dialect->escapechar) { /* possible escaped character */ self->state = ESCAPED_CHAR; } else if (c == dialect->delimiter) { /* save field - wait for new field */ parse_save_field(self); self->state = START_FIELD; } else { /* normal character - save in field */ parse_add_char(self, c); } break; case IN_QUOTED_FIELD: /* in quoted field */ if (c == '\n') { /* end of line - save '\n' in field */ parse_add_char(self, '\n'); } else if (c == dialect->escapechar) { /* Possible escape character */ self->state = ESCAPE_IN_QUOTED_FIELD; } else if (c == dialect->quotechar) { if (dialect->doublequote) { /* doublequote; " represented by "" */ self->state = QUOTE_IN_QUOTED_FIELD; } else { /* end of quote part of field */ self->state = IN_FIELD; } } else { /* normal character - save in field */ parse_add_char(self, c); } break; case ESCAPE_IN_QUOTED_FIELD: if (c != dialect->escapechar && c != dialect->delimiter && c != dialect->quotechar) parse_add_char(self, dialect->escapechar); parse_add_char(self, c); self->state = IN_QUOTED_FIELD; break; case QUOTE_IN_QUOTED_FIELD: /* doublequote - seen a quote in an quoted field */ if (dialect->quoting != QUOTE_NONE && c == dialect->quotechar) { /* save "" as " */ parse_add_char(self, c); self->state = IN_QUOTED_FIELD; } else if (c == dialect->delimiter) { /* save field - wait for new field */ parse_save_field(self); self->state = START_FIELD; } else if (c == '\n') { /* end of line - return [fields] */ parse_save_field(self); self->state = START_RECORD; } else if (!dialect->strict) { parse_add_char(self, c); self->state = IN_FIELD; } else { /* illegal */ self->had_parse_error = 1; PyErr_Format(error_obj, "%c expected after %c", dialect->delimiter, dialect->quotechar); } break; } } /* * READER */ #define R_OFF(x) offsetof(ReaderObj, x) static struct PyMemberDef Reader_memberlist[] = { { "dialect", T_OBJECT, R_OFF(dialect), RO }, { NULL } }; static PyObject * Reader_getiter(ReaderObj *self) { Py_INCREF(self); return (PyObject *)self; } static PyObject * Reader_iternext(ReaderObj *self) { PyObject *lineobj; PyObject *fields; char *line; do { lineobj = PyIter_Next(self->input_iter); if (lineobj == NULL) { /* End of input OR exception */ if (!PyErr_Occurred() && self->field_len != 0) return PyErr_Format(error_obj, "newline inside string"); return NULL; } if (self->had_parse_error) { if (self->fields) { Py_XDECREF(self->fields); } self->fields = PyList_New(0); self->field_len = 0; self->state = START_RECORD; self->had_parse_error = 0; } line = PyString_AsString(lineobj); if (line == NULL) { Py_DECREF(lineobj); return NULL; } if (strlen(line) < (size_t)PyString_GET_SIZE(lineobj)) { self->had_parse_error = 1; Py_DECREF(lineobj); return PyErr_Format(error_obj, "string with NUL bytes"); } /* Process line of text - send '\n' to processing code to represent end of line. End of line which is not at end of string is an error. */ while (*line) { char c; c = *line++; if (c == '\r') { c = *line++; if (c == '\0') /* macintosh end of line */ break; if (c == '\n') { c = *line++; if (c == '\0') /* DOS end of line */ break; } self->had_parse_error = 1; Py_DECREF(lineobj); return PyErr_Format(error_obj, "newline inside string"); } if (c == '\n') { c = *line++; if (c == '\0') /* unix end of line */ break; self->had_parse_error = 1; Py_DECREF(lineobj); return PyErr_Format(error_obj, "newline inside string"); } parse_process_char(self, c); if (PyErr_Occurred()) { Py_DECREF(lineobj); return NULL; } } parse_process_char(self, '\n'); Py_DECREF(lineobj); } while (self->state != START_RECORD); fields = self->fields; self->fields = PyList_New(0); return fields; } static void Reader_dealloc(ReaderObj *self) { Py_XDECREF(self->dialect); Py_XDECREF(self->input_iter); Py_XDECREF(self->fields); if (self->field != NULL) PyMem_Free(self->field); PyObject_GC_Del(self); } static int Reader_traverse(ReaderObj *self, visitproc visit, void *arg) { int err; #define VISIT(SLOT) \ if (SLOT) { \ err = visit((PyObject *)(SLOT), arg); \ if (err) \ return err; \ } VISIT(self->dialect); VISIT(self->input_iter); VISIT(self->fields); return 0; } static int Reader_clear(ReaderObj *self) { Py_XDECREF(self->dialect); Py_XDECREF(self->input_iter); Py_XDECREF(self->fields); self->dialect = NULL; self->input_iter = NULL; self->fields = NULL; return 0; } PyDoc_STRVAR(Reader_Type_doc, "CSV reader\n" "\n" "Reader objects are responsible for reading and parsing tabular data\n" "in CSV format.\n" ); static struct PyMethodDef Reader_methods[] = { { NULL, NULL } }; static PyTypeObject Reader_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "_csv.reader", /*tp_name*/ sizeof(ReaderObj), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)Reader_dealloc, /*tp_dealloc*/ (printfunc)0, /*tp_print*/ (getattrfunc)0, /*tp_getattr*/ (setattrfunc)0, /*tp_setattr*/ (cmpfunc)0, /*tp_compare*/ (reprfunc)0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ (hashfunc)0, /*tp_hash*/ (ternaryfunc)0, /*tp_call*/ (reprfunc)0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, /*tp_flags*/ Reader_Type_doc, /*tp_doc*/ (traverseproc)Reader_traverse, /*tp_traverse*/ (inquiry)Reader_clear, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ (getiterfunc)Reader_getiter, /*tp_iter*/ (getiterfunc)Reader_iternext, /*tp_iternext*/ Reader_methods, /*tp_methods*/ Reader_memberlist, /*tp_members*/ 0, /*tp_getset*/ }; static PyObject * csv_reader(PyObject *module, PyObject *args, PyObject *keyword_args) { PyObject * iterator, * dialect = NULL, *ctor_args; ReaderObj * self = PyObject_GC_New(ReaderObj, &Reader_Type); if (!self) return NULL; self->dialect = NULL; self->input_iter = self->fields = NULL; self->fields = NULL; self->input_iter = NULL; self->had_parse_error = 0; self->field = NULL; self->field_size = 0; self->field_len = 0; self->state = START_RECORD; if (!PyArg_ParseTuple(args, "O|O", &iterator, &dialect)) { Py_DECREF(self); return NULL; } self->input_iter = PyObject_GetIter(iterator); if (self->input_iter == NULL) { PyErr_SetString(PyExc_TypeError, "argument 1 must be an iterator"); Py_DECREF(self); return NULL; } ctor_args = Py_BuildValue(dialect ? "(O)" : "()", dialect); if (ctor_args == NULL) { Py_DECREF(self); return NULL; } self->dialect = (DialectObj *)PyObject_Call((PyObject *)&Dialect_Type, ctor_args, keyword_args); Py_DECREF(ctor_args); if (self->dialect == NULL) { Py_DECREF(self); return NULL; } self->fields = PyList_New(0); if (self->fields == NULL) { Py_DECREF(self); return NULL; } return (PyObject *)self; } /* * WRITER */ /* ---------------------------------------------------------------- */ static void join_reset(WriterObj *self) { self->rec_len = 0; self->num_fields = 0; } #define MEM_INCR 32768 /* Calculate new record length or append field to record. Return new * record length. */ static int join_append_data(WriterObj *self, char *field, int quote_empty, int *quoted, int copy_phase) { DialectObj *dialect = self->dialect; int i, rec_len; rec_len = self->rec_len; /* If this is not the first field we need a field separator. */ if (self->num_fields > 0) { if (copy_phase) self->rec[rec_len] = dialect->delimiter; rec_len++; } /* Handle preceding quote. */ switch (dialect->quoting) { case QUOTE_ALL: *quoted = 1; if (copy_phase) self->rec[rec_len] = dialect->quotechar; rec_len++; break; case QUOTE_MINIMAL: case QUOTE_NONNUMERIC: /* We only know about quoted in the copy phase. */ if (copy_phase && *quoted) { self->rec[rec_len] = dialect->quotechar; rec_len++; } break; case QUOTE_NONE: break; } /* Copy/count field data. */ for (i = 0;; i++) { char c = field[i]; if (c == '\0') break; /* If in doublequote mode we escape quote chars with a * quote. */ if (dialect->quoting != QUOTE_NONE && c == dialect->quotechar && dialect->doublequote) { if (copy_phase) self->rec[rec_len] = dialect->quotechar; *quoted = 1; rec_len++; } /* Some special characters need to be escaped. If we have a * quote character switch to quoted field instead of escaping * individual characters. */ if (!*quoted && (c == dialect->delimiter || c == dialect->escapechar || c == '\n' || c == '\r')) { if (dialect->quoting != QUOTE_NONE) *quoted = 1; else if (dialect->escapechar) { if (copy_phase) self->rec[rec_len] = dialect->escapechar; rec_len++; } else { PyErr_Format(error_obj, "delimiter must be quoted or escaped"); return -1; } } /* Copy field character into record buffer. */ if (copy_phase) self->rec[rec_len] = c; rec_len++; } /* If field is empty check if it needs to be quoted. */ if (i == 0 && quote_empty) { if (dialect->quoting == QUOTE_NONE) { PyErr_Format(error_obj, "single empty field record must be quoted"); return -1; } else *quoted = 1; } /* Handle final quote character on field. */ if (*quoted) { if (copy_phase) self->rec[rec_len] = dialect->quotechar; else /* Didn't know about leading quote until we found it * necessary in field data - compensate for it now. */ rec_len++; rec_len++; } return rec_len; } static int join_check_rec_size(WriterObj *self, int rec_len) { if (rec_len < 0 || rec_len > INT_MAX - MEM_INCR) { PyErr_NoMemory(); return 0; } if (rec_len > self->rec_size) { if (self->rec_size == 0) { self->rec_size = (rec_len / MEM_INCR + 1) * MEM_INCR; if (self->rec != NULL) PyMem_Free(self->rec); self->rec = PyMem_Malloc(self->rec_size); } else { char *old_rec = self->rec; self->rec_size = (rec_len / MEM_INCR + 1) * MEM_INCR; self->rec = PyMem_Realloc(self->rec, self->rec_size); if (self->rec == NULL) PyMem_Free(old_rec); } if (self->rec == NULL) { PyErr_NoMemory(); return 0; } } return 1; } static int join_append(WriterObj *self, char *field, int *quoted, int quote_empty) { int rec_len; rec_len = join_append_data(self, field, quote_empty, quoted, 0); if (rec_len < 0) return 0; /* grow record buffer if necessary */ if (!join_check_rec_size(self, rec_len)) return 0; self->rec_len = join_append_data(self, field, quote_empty, quoted, 1); self->num_fields++; return 1; } static int join_append_lineterminator(WriterObj *self) { int terminator_len; terminator_len = PyString_Size(self->dialect->lineterminator); /* grow record buffer if necessary */ if (!join_check_rec_size(self, self->rec_len + terminator_len)) return 0; memmove(self->rec + self->rec_len, /* should not be NULL */ PyString_AsString(self->dialect->lineterminator), terminator_len); self->rec_len += terminator_len; return 1; } PyDoc_STRVAR(csv_writerow_doc, "writerow(sequence)\n" "\n" "Construct and write a CSV record from a sequence of fields. Non-string\n" "elements will be converted to string."); static PyObject * csv_writerow(WriterObj *self, PyObject *seq) { DialectObj *dialect = self->dialect; int len, i; if (!PySequence_Check(seq)) return PyErr_Format(error_obj, "sequence expected"); len = PySequence_Length(seq); if (len < 0) return NULL; /* Join all fields in internal buffer. */ join_reset(self); for (i = 0; i < len; i++) { PyObject *field; int append_ok; int quoted; field = PySequence_GetItem(seq, i); if (field == NULL) return NULL; quoted = 0; if (dialect->quoting == QUOTE_NONNUMERIC) { PyObject *num; num = PyNumber_Float(field); if (num == NULL) { quoted = 1; PyErr_Clear(); } else { Py_DECREF(num); } } if (PyString_Check(field)) { append_ok = join_append(self, PyString_AS_STRING(field), "ed, len == 1); Py_DECREF(field); } else if (field == Py_None) { append_ok = join_append(self, "", "ed, len == 1); Py_DECREF(field); } else { PyObject *str; str = PyObject_Str(field); Py_DECREF(field); if (str == NULL) return NULL; append_ok = join_append(self, PyString_AS_STRING(str), "ed, len == 1); Py_DECREF(str); } if (!append_ok) return NULL; } /* Add line terminator. */ if (!join_append_lineterminator(self)) return 0; return PyObject_CallFunction(self->writeline, "(s#)", self->rec, self->rec_len); } PyDoc_STRVAR(csv_writerows_doc, "writerows(sequence of sequences)\n" "\n" "Construct and write a series of sequences to a csv file. Non-string\n" "elements will be converted to string."); static PyObject * csv_writerows(WriterObj *self, PyObject *seqseq) { PyObject *row_iter, *row_obj, *result; row_iter = PyObject_GetIter(seqseq); if (row_iter == NULL) { PyErr_SetString(PyExc_TypeError, "writerows() argument must be iterable"); return NULL; } while ((row_obj = PyIter_Next(row_iter))) { result = csv_writerow(self, row_obj); Py_DECREF(row_obj); if (!result) { Py_DECREF(row_iter); return NULL; } else Py_DECREF(result); } Py_DECREF(row_iter); if (PyErr_Occurred()) return NULL; Py_INCREF(Py_None); return Py_None; } static struct PyMethodDef Writer_methods[] = { { "writerow", (PyCFunction)csv_writerow, METH_O, csv_writerow_doc}, { "writerows", (PyCFunction)csv_writerows, METH_O, csv_writerows_doc}, { NULL, NULL } }; #define W_OFF(x) offsetof(WriterObj, x) static struct PyMemberDef Writer_memberlist[] = { { "dialect", T_OBJECT, W_OFF(dialect), RO }, { NULL } }; static void Writer_dealloc(WriterObj *self) { Py_XDECREF(self->dialect); Py_XDECREF(self->writeline); if (self->rec != NULL) PyMem_Free(self->rec); PyObject_GC_Del(self); } static int Writer_traverse(WriterObj *self, visitproc visit, void *arg) { int err; #define VISIT(SLOT) \ if (SLOT) { \ err = visit((PyObject *)(SLOT), arg); \ if (err) \ return err; \ } VISIT(self->dialect); VISIT(self->writeline); return 0; } static int Writer_clear(WriterObj *self) { Py_XDECREF(self->dialect); Py_XDECREF(self->writeline); self->dialect = NULL; self->writeline = NULL; return 0; } PyDoc_STRVAR(Writer_Type_doc, "CSV writer\n" "\n" "Writer objects are responsible for generating tabular data\n" "in CSV format from sequence input.\n" ); static PyTypeObject Writer_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "_csv.writer", /*tp_name*/ sizeof(WriterObj), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)Writer_dealloc, /*tp_dealloc*/ (printfunc)0, /*tp_print*/ (getattrfunc)0, /*tp_getattr*/ (setattrfunc)0, /*tp_setattr*/ (cmpfunc)0, /*tp_compare*/ (reprfunc)0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ (hashfunc)0, /*tp_hash*/ (ternaryfunc)0, /*tp_call*/ (reprfunc)0, /*tp_str*/ 0, /*tp_getattro*/ 0, /*tp_setattro*/ 0, /*tp_as_buffer*/ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_GC, /*tp_flags*/ Writer_Type_doc, (traverseproc)Writer_traverse, /*tp_traverse*/ (inquiry)Writer_clear, /*tp_clear*/ 0, /*tp_richcompare*/ 0, /*tp_weaklistoffset*/ (getiterfunc)0, /*tp_iter*/ (getiterfunc)0, /*tp_iternext*/ Writer_methods, /*tp_methods*/ Writer_memberlist, /*tp_members*/ 0, /*tp_getset*/ }; static PyObject * csv_writer(PyObject *module, PyObject *args, PyObject *keyword_args) { PyObject * output_file, * dialect = NULL, *ctor_args; WriterObj * self = PyObject_GC_New(WriterObj, &Writer_Type); if (!self) return NULL; self->dialect = NULL; self->writeline = NULL; self->rec = NULL; self->rec_size = 0; self->rec_len = 0; self->num_fields = 0; if (!PyArg_ParseTuple(args, "O|O", &output_file, &dialect)) { Py_DECREF(self); return NULL; } self->writeline = PyObject_GetAttrString(output_file, "write"); if (self->writeline == NULL || !PyCallable_Check(self->writeline)) { PyErr_SetString(PyExc_TypeError, "argument 1 must be an instance with a write method"); Py_DECREF(self); return NULL; } ctor_args = Py_BuildValue(dialect ? "(O)" : "()", dialect); if (ctor_args == NULL) { Py_DECREF(self); return NULL; } self->dialect = (DialectObj *)PyObject_Call((PyObject *)&Dialect_Type, ctor_args, keyword_args); Py_DECREF(ctor_args); if (self->dialect == NULL) { Py_DECREF(self); return NULL; } return (PyObject *)self; } /* * DIALECT REGISTRY */ static PyObject * csv_list_dialects(PyObject *module, PyObject *args) { return PyDict_Keys(dialects); } static PyObject * csv_register_dialect(PyObject *module, PyObject *args) { PyObject *name_obj, *dialect_obj; if (!PyArg_ParseTuple(args, "OO", &name_obj, &dialect_obj)) return NULL; if (!PyString_Check(name_obj) #ifdef Py_USING_UNICODE && !PyUnicode_Check(name_obj) #endif ) { PyErr_SetString(PyExc_TypeError, "dialect name must be a string or unicode"); return NULL; } Py_INCREF(dialect_obj); /* A class rather than an instance? Instanciate */ if (PyObject_TypeCheck(dialect_obj, &PyClass_Type)) { PyObject * new_dia; new_dia = PyObject_CallFunction(dialect_obj, ""); Py_DECREF(dialect_obj); if (new_dia == NULL) return NULL; dialect_obj = new_dia; } /* Make sure we finally have an instance */ if (!PyInstance_Check(dialect_obj)) { PyErr_SetString(PyExc_TypeError, "dialect must be an instance"); Py_DECREF(dialect_obj); return NULL; } if (PyObject_SetAttrString(dialect_obj, "_name", name_obj) < 0) { Py_DECREF(dialect_obj); return NULL; } if (PyDict_SetItem(dialects, name_obj, dialect_obj) < 0) { Py_DECREF(dialect_obj); return NULL; } Py_DECREF(dialect_obj); Py_INCREF(Py_None); return Py_None; } static PyObject * csv_unregister_dialect(PyObject *module, PyObject *name_obj) { if (PyDict_DelItem(dialects, name_obj) < 0) return PyErr_Format(error_obj, "unknown dialect"); Py_INCREF(Py_None); return Py_None; } static PyObject * csv_get_dialect(PyObject *module, PyObject *name_obj) { return get_dialect_from_registry(name_obj); } /* * MODULE */ PyDoc_STRVAR(csv_module_doc, "CSV parsing and writing.\n" "\n" "This module provides classes that assist in the reading and writing\n" "of Comma Separated Value (CSV) files, and implements the interface\n" "described by PEP 305. Although many CSV files are simple to parse,\n" "the format is not formally defined by a stable specification and\n" "is subtle enough that parsing lines of a CSV file with something\n" "like line.split(\",\") is bound to fail. The module supports three\n" "basic APIs: reading, writing, and registration of dialects.\n" "\n" "\n" "DIALECT REGISTRATION:\n" "\n" "Readers and writers support a dialect argument, which is a convenient\n" "handle on a group of settings. When the dialect argument is a string,\n" "it identifies one of the dialects previously registered with the module.\n" "If it is a class or instance, the attributes of the argument are used as\n" "the settings for the reader or writer:\n" "\n" " class excel:\n" " delimiter = ','\n" " quotechar = '\"'\n" " escapechar = None\n" " doublequote = True\n" " skipinitialspace = False\n" " lineterminator = '\r\n'\n" " quoting = QUOTE_MINIMAL\n" "\n" "SETTINGS:\n" "\n" " * quotechar - specifies a one-character string to use as the \n" " quoting character. It defaults to '\"'.\n" " * delimiter - specifies a one-character string to use as the \n" " field separator. It defaults to ','.\n" " * skipinitialspace - specifies how to interpret whitespace which\n" " immediately follows a delimiter. It defaults to False, which\n" " means that whitespace immediately following a delimiter is part\n" " of the following field.\n" " * lineterminator - specifies the character sequence which should \n" " terminate rows.\n" " * quoting - controls when quotes should be generated by the writer.\n" " It can take on any of the following module constants:\n" "\n" " csv.QUOTE_MINIMAL means only when required, for example, when a\n" " field contains either the quotechar or the delimiter\n" " csv.QUOTE_ALL means that quotes are always placed around fields.\n" " csv.QUOTE_NONNUMERIC means that quotes are always placed around\n" " fields which do not parse as integers or floating point\n" " numbers.\n" " csv.QUOTE_NONE means that quotes are never placed around fields.\n" " * escapechar - specifies a one-character string used to escape \n" " the delimiter when quoting is set to QUOTE_NONE.\n" " * doublequote - controls the handling of quotes inside fields. When\n" " True, two consecutive quotes are interpreted as one during read,\n" " and when writing, each quote character embedded in the data is\n" " written as two quotes\n"); PyDoc_STRVAR(csv_reader_doc, " csv_reader = reader(iterable [, dialect='excel']\n" " [optional keyword args])\n" " for row in csv_reader:\n" " process(row)\n" "\n" "The \"iterable\" argument can be any object that returns a line\n" "of input for each iteration, such as a file object or a list. The\n" "optional \"dialect\" parameter is discussed below. The function\n" "also accepts optional keyword arguments which override settings\n" "provided by the dialect.\n" "\n" "The returned object is an iterator. Each iteration returns a row\n" "of the CSV file (which can span multiple input lines):\n"); PyDoc_STRVAR(csv_writer_doc, " csv_writer = csv.writer(fileobj [, dialect='excel']\n" " [optional keyword args])\n" " for row in csv_writer:\n" " csv_writer.writerow(row)\n" "\n" " [or]\n" "\n" " csv_writer = csv.writer(fileobj [, dialect='excel']\n" " [optional keyword args])\n" " csv_writer.writerows(rows)\n" "\n" "The \"fileobj\" argument can be any object that supports the file API.\n"); PyDoc_STRVAR(csv_list_dialects_doc, "Return a list of all know dialect names.\n" " names = csv.list_dialects()"); PyDoc_STRVAR(csv_get_dialect_doc, "Return the dialect instance associated with name.\n" " dialect = csv.get_dialect(name)"); PyDoc_STRVAR(csv_register_dialect_doc, "Create a mapping from a string name to a dialect class.\n" " dialect = csv.register_dialect(name, dialect)"); PyDoc_STRVAR(csv_unregister_dialect_doc, "Delete the name/dialect mapping associated with a string name.\n" " csv.unregister_dialect(name)"); static struct PyMethodDef csv_methods[] = { { "reader", (PyCFunction)csv_reader, METH_VARARGS | METH_KEYWORDS, csv_reader_doc}, { "writer", (PyCFunction)csv_writer, METH_VARARGS | METH_KEYWORDS, csv_writer_doc}, { "list_dialects", (PyCFunction)csv_list_dialects, METH_NOARGS, csv_list_dialects_doc}, { "register_dialect", (PyCFunction)csv_register_dialect, METH_VARARGS, csv_register_dialect_doc}, { "unregister_dialect", (PyCFunction)csv_unregister_dialect, METH_O, csv_unregister_dialect_doc}, { "get_dialect", (PyCFunction)csv_get_dialect, METH_O, csv_get_dialect_doc}, { NULL, NULL } }; PyMODINIT_FUNC init_csv(void) { PyObject *module; StyleDesc *style; if (PyType_Ready(&Dialect_Type) < 0) return; if (PyType_Ready(&Reader_Type) < 0) return; if (PyType_Ready(&Writer_Type) < 0) return; /* Create the module and add the functions */ module = Py_InitModule3("_csv", csv_methods, csv_module_doc); if (module == NULL) return; /* Add version to the module. */ if (PyModule_AddStringConstant(module, "__version__", MODULE_VERSION) == -1) return; /* Add _dialects dictionary */ dialects = PyDict_New(); if (dialects == NULL) return; if (PyModule_AddObject(module, "_dialects", dialects)) return; /* Add quote styles into dictionary */ for (style = quote_styles; style->name; style++) { if (PyModule_AddIntConstant(module, style->name, style->style) == -1) return; } /* Add the Dialect type */ if (PyModule_AddObject(module, "Dialect", (PyObject *)&Dialect_Type)) return; /* Add the CSV exception object to the module. */ error_obj = PyErr_NewException("_csv.Error", NULL, NULL); if (error_obj == NULL) return; PyModule_AddObject(module, "Error", error_obj); } Python-2.3.7/Modules/cgen.py0000644001241000117560000003033107453154776015170 0ustar loewishpifb6######################################################################## # Copyright (c) 2000, BeOpen.com. # Copyright (c) 1995-2000, Corporation for National Research Initiatives. # Copyright (c) 1990-1995, Stichting Mathematisch Centrum. # All rights reserved. # # See the file "Misc/COPYRIGHT" for information on usage and # redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. ######################################################################## # Python script to parse cstubs file for gl and generate C stubs. # usage: python cgen.py glmodule.c # # NOTE: You must first make a python binary without the "GL" option # before you can run this, when building Python for the first time. # See comments in the Makefile. # # XXX BUG return arrays generate wrong code # XXX need to change error returns into gotos to free mallocked arrays import string import sys # Function to print to stderr # def err(*args): savestdout = sys.stdout try: sys.stdout = sys.stderr for i in args: print i, print finally: sys.stdout = savestdout # The set of digits that form a number # digits = '0123456789' # Function to extract a string of digits from the front of the string. # Returns the leading string of digits and the remaining string. # If no number is found, returns '' and the original string. # def getnum(s): n = '' while s and s[0] in digits: n = n + s[0] s = s[1:] return n, s # Function to check if a string is a number # def isnum(s): if not s: return False for c in s: if not c in digits: return False return True # Allowed function return types # return_types = ['void', 'short', 'long'] # Allowed function argument types # arg_types = ['char', 'string', 'short', 'u_short', 'float', 'long', 'double'] # Need to classify arguments as follows # simple input variable # simple output variable # input array # output array # input giving size of some array # # Array dimensions can be specified as follows # constant # argN # constant * argN # retval # constant * retval # # The dimensions given as constants * something are really # arrays of points where points are 2- 3- or 4-tuples # # We have to consider three lists: # python input arguments # C stub arguments (in & out) # python output arguments (really return values) # # There is a mapping from python input arguments to the input arguments # of the C stub, and a further mapping from C stub arguments to the # python return values # Exception raised by checkarg() and generate() # arg_error = 'bad arg' # Function to check one argument. # Arguments: the type and the arg "name" (really mode plus subscript). # Raises arg_error if something's wrong. # Return type, mode, factor, rest of subscript; factor and rest may be empty. # def checkarg(type, arg): # # Turn "char *x" into "string x". # if type == 'char' and arg[0] == '*': type = 'string' arg = arg[1:] # # Check that the type is supported. # if type not in arg_types: raise arg_error, ('bad type', type) if type[:2] == 'u_': type = 'unsigned ' + type[2:] # # Split it in the mode (first character) and the rest. # mode, rest = arg[:1], arg[1:] # # The mode must be 's' for send (= input) or 'r' for return argument. # if mode not in ('r', 's'): raise arg_error, ('bad arg mode', mode) # # Is it a simple argument: if so, we are done. # if not rest: return type, mode, '', '' # # Not a simple argument; must be an array. # The 'rest' must be a subscript enclosed in [ and ]. # The subscript must be one of the following forms, # otherwise we don't handle it (where N is a number): # N # argN # retval # N*argN # N*retval # if rest[:1] <> '[' or rest[-1:] <> ']': raise arg_error, ('subscript expected', rest) sub = rest[1:-1] # # Is there a leading number? # num, sub = getnum(sub) if num: # There is a leading number if not sub: # The subscript is just a number return type, mode, num, '' if sub[:1] == '*': # There is a factor prefix sub = sub[1:] else: raise arg_error, ('\'*\' expected', sub) if sub == 'retval': # size is retval -- must be a reply argument if mode <> 'r': raise arg_error, ('non-r mode with [retval]', mode) elif not isnum(sub) and (sub[:3] <> 'arg' or not isnum(sub[3:])): raise arg_error, ('bad subscript', sub) # return type, mode, num, sub # List of functions for which we have generated stubs # functions = [] # Generate the stub for the given function, using the database of argument # information build by successive calls to checkarg() # def generate(type, func, database): # # Check that we can handle this case: # no variable size reply arrays yet # n_in_args = 0 n_out_args = 0 # for a_type, a_mode, a_factor, a_sub in database: if a_mode == 's': n_in_args = n_in_args + 1 elif a_mode == 'r': n_out_args = n_out_args + 1 else: # Can't happen raise arg_error, ('bad a_mode', a_mode) if (a_mode == 'r' and a_sub) or a_sub == 'retval': err('Function', func, 'too complicated:', a_type, a_mode, a_factor, a_sub) print '/* XXX Too complicated to generate code for */' return # functions.append(func) # # Stub header # print print 'static PyObject *' print 'gl_' + func + '(self, args)' print '\tPyObject *self;' print '\tPyObject *args;' print '{' # # Declare return value if any # if type <> 'void': print '\t' + type, 'retval;' # # Declare arguments # for i in range(len(database)): a_type, a_mode, a_factor, a_sub = database[i] print '\t' + a_type, brac = ket = '' if a_sub and not isnum(a_sub): if a_factor: brac = '(' ket = ')' print brac + '*', print 'arg' + `i+1` + ket, if a_sub and isnum(a_sub): print '[', a_sub, ']', if a_factor: print '[', a_factor, ']', print ';' # # Find input arguments derived from array sizes # for i in range(len(database)): a_type, a_mode, a_factor, a_sub = database[i] if a_mode == 's' and a_sub[:3] == 'arg' and isnum(a_sub[3:]): # Sending a variable-length array n = eval(a_sub[3:]) if 1 <= n <= len(database): b_type, b_mode, b_factor, b_sub = database[n-1] if b_mode == 's': database[n-1] = b_type, 'i', a_factor, `i` n_in_args = n_in_args - 1 # # Assign argument positions in the Python argument list # in_pos = [] i_in = 0 for i in range(len(database)): a_type, a_mode, a_factor, a_sub = database[i] if a_mode == 's': in_pos.append(i_in) i_in = i_in + 1 else: in_pos.append(-1) # # Get input arguments # for i in range(len(database)): a_type, a_mode, a_factor, a_sub = database[i] if a_type[:9] == 'unsigned ': xtype = a_type[9:] else: xtype = a_type if a_mode == 'i': # # Implicit argument; # a_factor is divisor if present, # a_sub indicates which arg (`database index`) # j = eval(a_sub) print '\tif', print '(!geti' + xtype + 'arraysize(args,', print `n_in_args` + ',', print `in_pos[j]` + ',', if xtype <> a_type: print '('+xtype+' *)', print '&arg' + `i+1` + '))' print '\t\treturn NULL;' if a_factor: print '\targ' + `i+1`, print '= arg' + `i+1`, print '/', a_factor + ';' elif a_mode == 's': if a_sub and not isnum(a_sub): # Allocate memory for varsize array print '\tif ((arg' + `i+1`, '=', if a_factor: print '('+a_type+'(*)['+a_factor+'])', print 'PyMem_NEW(' + a_type, ',', if a_factor: print a_factor, '*', print a_sub, ')) == NULL)' print '\t\treturn PyErr_NoMemory();' print '\tif', if a_factor or a_sub: # Get a fixed-size array array print '(!geti' + xtype + 'array(args,', print `n_in_args` + ',', print `in_pos[i]` + ',', if a_factor: print a_factor, if a_factor and a_sub: print '*', if a_sub: print a_sub, print ',', if (a_sub and a_factor) or xtype <> a_type: print '('+xtype+' *)', print 'arg' + `i+1` + '))' else: # Get a simple variable print '(!geti' + xtype + 'arg(args,', print `n_in_args` + ',', print `in_pos[i]` + ',', if xtype <> a_type: print '('+xtype+' *)', print '&arg' + `i+1` + '))' print '\t\treturn NULL;' # # Begin of function call # if type <> 'void': print '\tretval =', func + '(', else: print '\t' + func + '(', # # Argument list # for i in range(len(database)): if i > 0: print ',', a_type, a_mode, a_factor, a_sub = database[i] if a_mode == 'r' and not a_factor: print '&', print 'arg' + `i+1`, # # End of function call # print ');' # # Free varsize arrays # for i in range(len(database)): a_type, a_mode, a_factor, a_sub = database[i] if a_mode == 's' and a_sub and not isnum(a_sub): print '\tPyMem_DEL(arg' + `i+1` + ');' # # Return # if n_out_args: # # Multiple return values -- construct a tuple # if type <> 'void': n_out_args = n_out_args + 1 if n_out_args == 1: for i in range(len(database)): a_type, a_mode, a_factor, a_sub = database[i] if a_mode == 'r': break else: raise arg_error, 'expected r arg not found' print '\treturn', print mkobject(a_type, 'arg' + `i+1`) + ';' else: print '\t{ PyObject *v = PyTuple_New(', print n_out_args, ');' print '\t if (v == NULL) return NULL;' i_out = 0 if type <> 'void': print '\t PyTuple_SetItem(v,', print `i_out` + ',', print mkobject(type, 'retval') + ');' i_out = i_out + 1 for i in range(len(database)): a_type, a_mode, a_factor, a_sub = database[i] if a_mode == 'r': print '\t PyTuple_SetItem(v,', print `i_out` + ',', s = mkobject(a_type, 'arg' + `i+1`) print s + ');' i_out = i_out + 1 print '\t return v;' print '\t}' else: # # Simple function return # Return None or return value # if type == 'void': print '\tPy_INCREF(Py_None);' print '\treturn Py_None;' else: print '\treturn', mkobject(type, 'retval') + ';' # # Stub body closing brace # print '}' # Subroutine to return a function call to mknewobject() # def mkobject(type, arg): if type[:9] == 'unsigned ': type = type[9:] return 'mknew' + type + 'object((' + type + ') ' + arg + ')' return 'mknew' + type + 'object(' + arg + ')' defined_archs = [] # usage: cgen [ -Dmach ... ] [ file ] for arg in sys.argv[1:]: if arg[:2] == '-D': defined_archs.append(arg[2:]) else: # Open optional file argument sys.stdin = open(arg, 'r') # Input line number lno = 0 # Input is divided in two parts, separated by a line containing '%%'. # -- literally copied to stdout # -- stub definitions # Variable indicating the current input part. # part = 1 # Main loop over the input # while 1: try: line = raw_input() except EOFError: break # lno = lno+1 words = string.split(line) # if part == 1: # # In part 1, copy everything literally # except look for a line of just '%%' # if words == ['%%']: part = part + 1 else: # # Look for names of manually written # stubs: a single percent followed by the name # of the function in Python. # The stub name is derived by prefixing 'gl_'. # if words and words[0][0] == '%': func = words[0][1:] if (not func) and words[1:]: func = words[1] if func: functions.append(func) else: print line continue if not words: continue # skip empty line elif words[0] == 'if': # if XXX rest # if !XXX rest if words[1][0] == '!': if words[1][1:] in defined_archs: continue elif words[1] not in defined_archs: continue words = words[2:] if words[0] == '#include': print line elif words[0][:1] == '#': pass # ignore comment elif words[0] not in return_types: err('Line', lno, ': bad return type :', words[0]) elif len(words) < 2: err('Line', lno, ': no funcname :', line) else: if len(words) % 2 <> 0: err('Line', lno, ': odd argument list :', words[2:]) else: database = [] try: for i in range(2, len(words), 2): x = checkarg(words[i], words[i+1]) database.append(x) print print '/*', for w in words: print w, print '*/' generate(words[0], words[1], database) except arg_error, msg: err('Line', lno, ':', msg) print print 'static struct PyMethodDef gl_methods[] = {' for func in functions: print '\t{"' + func + '", gl_' + func + '},' print '\t{NULL, NULL} /* Sentinel */' print '};' print print 'void' print 'initgl()' print '{' print '\t(void) Py_InitModule("gl", gl_methods);' print '}' Python-2.3.7/Modules/xxsubtype.c0000644001241000117560000001676107526333101016112 0ustar loewishpifb6#include "Python.h" #include "structmember.h" PyDoc_STRVAR(xxsubtype__doc__, "xxsubtype is an example module showing how to subtype builtin types from C.\n" "test_descr.py in the standard test suite requires it in order to complete.\n" "If you don't care about the examples, and don't intend to run the Python\n" "test suite, you can recompile Python without Modules/xxsubtype.c."); /* We link this module statically for convenience. If compiled as a shared library instead, some compilers don't allow addresses of Python objects defined in other libraries to be used in static initializers here. The DEFERRED_ADDRESS macro is used to tag the slots where such addresses appear; the module init function must fill in the tagged slots at runtime. The argument is for documentation -- the macro ignores it. */ #define DEFERRED_ADDRESS(ADDR) 0 /* spamlist -- a list subtype */ typedef struct { PyListObject list; int state; } spamlistobject; static PyObject * spamlist_getstate(spamlistobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":getstate")) return NULL; return PyInt_FromLong(self->state); } static PyObject * spamlist_setstate(spamlistobject *self, PyObject *args) { int state; if (!PyArg_ParseTuple(args, "i:setstate", &state)) return NULL; self->state = state; Py_INCREF(Py_None); return Py_None; } static PyObject * spamlist_specialmeth(PyObject *self, PyObject *args, PyObject *kw) { PyObject *result = PyTuple_New(3); if (result != NULL) { if (self == NULL) self = Py_None; if (kw == NULL) kw = Py_None; Py_INCREF(self); PyTuple_SET_ITEM(result, 0, self); Py_INCREF(args); PyTuple_SET_ITEM(result, 1, args); Py_INCREF(kw); PyTuple_SET_ITEM(result, 2, kw); } return result; } static PyMethodDef spamlist_methods[] = { {"getstate", (PyCFunction)spamlist_getstate, METH_VARARGS, PyDoc_STR("getstate() -> state")}, {"setstate", (PyCFunction)spamlist_setstate, METH_VARARGS, PyDoc_STR("setstate(state)")}, /* These entries differ only in the flags; they are used by the tests in test.test_descr. */ {"classmeth", (PyCFunction)spamlist_specialmeth, METH_VARARGS | METH_KEYWORDS | METH_CLASS, PyDoc_STR("classmeth(*args, **kw)")}, {"staticmeth", (PyCFunction)spamlist_specialmeth, METH_VARARGS | METH_KEYWORDS | METH_STATIC, PyDoc_STR("staticmeth(*args, **kw)")}, {NULL, NULL}, }; static PyTypeObject spamlist_type; static int spamlist_init(spamlistobject *self, PyObject *args, PyObject *kwds) { if (PyList_Type.tp_init((PyObject *)self, args, kwds) < 0) return -1; self->state = 0; return 0; } static PyObject * spamlist_state_get(spamlistobject *self) { return PyInt_FromLong(self->state); } static PyGetSetDef spamlist_getsets[] = { {"state", (getter)spamlist_state_get, NULL, PyDoc_STR("an int variable for demonstration purposes")}, {0} }; static PyTypeObject spamlist_type = { PyObject_HEAD_INIT(DEFERRED_ADDRESS(&PyType_Type)) 0, "xxsubtype.spamlist", sizeof(spamlistobject), 0, 0, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /* tp_flags */ 0, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ spamlist_methods, /* tp_methods */ 0, /* tp_members */ spamlist_getsets, /* tp_getset */ DEFERRED_ADDRESS(&PyList_Type), /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ (initproc)spamlist_init, /* tp_init */ 0, /* tp_alloc */ 0, /* tp_new */ }; /* spamdict -- a dict subtype */ typedef struct { PyDictObject dict; int state; } spamdictobject; static PyObject * spamdict_getstate(spamdictobject *self, PyObject *args) { if (!PyArg_ParseTuple(args, ":getstate")) return NULL; return PyInt_FromLong(self->state); } static PyObject * spamdict_setstate(spamdictobject *self, PyObject *args) { int state; if (!PyArg_ParseTuple(args, "i:setstate", &state)) return NULL; self->state = state; Py_INCREF(Py_None); return Py_None; } static PyMethodDef spamdict_methods[] = { {"getstate", (PyCFunction)spamdict_getstate, METH_VARARGS, PyDoc_STR("getstate() -> state")}, {"setstate", (PyCFunction)spamdict_setstate, METH_VARARGS, PyDoc_STR("setstate(state)")}, {NULL, NULL}, }; static PyTypeObject spamdict_type; static int spamdict_init(spamdictobject *self, PyObject *args, PyObject *kwds) { if (PyDict_Type.tp_init((PyObject *)self, args, kwds) < 0) return -1; self->state = 0; return 0; } static PyMemberDef spamdict_members[] = { {"state", T_INT, offsetof(spamdictobject, state), READONLY, PyDoc_STR("an int variable for demonstration purposes")}, {0} }; static PyTypeObject spamdict_type = { PyObject_HEAD_INIT(DEFERRED_ADDRESS(&PyType_Type)) 0, "xxsubtype.spamdict", sizeof(spamdictobject), 0, 0, /* tp_dealloc */ 0, /* tp_print */ 0, /* tp_getattr */ 0, /* tp_setattr */ 0, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ 0, /* tp_getattro */ 0, /* tp_setattro */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE, /* tp_flags */ 0, /* tp_doc */ 0, /* tp_traverse */ 0, /* tp_clear */ 0, /* tp_richcompare */ 0, /* tp_weaklistoffset */ 0, /* tp_iter */ 0, /* tp_iternext */ spamdict_methods, /* tp_methods */ spamdict_members, /* tp_members */ 0, /* tp_getset */ DEFERRED_ADDRESS(&PyDict_Type), /* tp_base */ 0, /* tp_dict */ 0, /* tp_descr_get */ 0, /* tp_descr_set */ 0, /* tp_dictoffset */ (initproc)spamdict_init, /* tp_init */ 0, /* tp_alloc */ 0, /* tp_new */ }; static PyObject * spam_bench(PyObject *self, PyObject *args) { PyObject *obj, *name, *res; int n = 1000; time_t t0, t1; if (!PyArg_ParseTuple(args, "OS|i", &obj, &name, &n)) return NULL; t0 = clock(); while (--n >= 0) { res = PyObject_GetAttr(obj, name); if (res == NULL) return NULL; Py_DECREF(res); } t1 = clock(); return PyFloat_FromDouble((double)(t1-t0) / CLOCKS_PER_SEC); } static PyMethodDef xxsubtype_functions[] = { {"bench", spam_bench, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; PyMODINIT_FUNC initxxsubtype(void) { PyObject *m; /* Fill in deferred data addresses. This must be done before PyType_Ready() is called. Note that PyType_Ready() automatically initializes the ob.ob_type field to &PyType_Type if it's NULL, so it's not necessary to fill in ob_type first. */ spamdict_type.tp_base = &PyDict_Type; if (PyType_Ready(&spamdict_type) < 0) return; spamlist_type.tp_base = &PyList_Type; if (PyType_Ready(&spamlist_type) < 0) return; m = Py_InitModule3("xxsubtype", xxsubtype_functions, xxsubtype__doc__); if (m == NULL) return; if (PyType_Ready(&spamlist_type) < 0) return; if (PyType_Ready(&spamdict_type) < 0) return; Py_INCREF(&spamlist_type); if (PyModule_AddObject(m, "spamlist", (PyObject *) &spamlist_type) < 0) return; Py_INCREF(&spamdict_type); if (PyModule_AddObject(m, "spamdict", (PyObject *) &spamdict_type) < 0) return; } Python-2.3.7/Modules/dlmodule.c0000644001241000117560000001245107522367001015636 0ustar loewishpifb6 /* dl module */ #include "Python.h" #include #ifndef RTLD_LAZY #define RTLD_LAZY 1 #endif typedef void *PyUnivPtr; typedef struct { PyObject_HEAD PyUnivPtr *dl_handle; } dlobject; static PyTypeObject Dltype; static PyObject *Dlerror; static PyObject * newdlobject(PyUnivPtr *handle) { dlobject *xp; xp = PyObject_New(dlobject, &Dltype); if (xp == NULL) return NULL; xp->dl_handle = handle; return (PyObject *)xp; } static void dl_dealloc(dlobject *xp) { if (xp->dl_handle != NULL) dlclose(xp->dl_handle); PyObject_Del(xp); } static PyObject * dl_close(dlobject *xp) { if (xp->dl_handle != NULL) { dlclose(xp->dl_handle); xp->dl_handle = NULL; } Py_INCREF(Py_None); return Py_None; } static PyObject * dl_sym(dlobject *xp, PyObject *args) { char *name; PyUnivPtr *func; if (PyString_Check(args)) { name = PyString_AS_STRING(args); } else { PyErr_Format(PyExc_TypeError, "expected string, found %.200s", args->ob_type->tp_name); return NULL; } func = dlsym(xp->dl_handle, name); if (func == NULL) { Py_INCREF(Py_None); return Py_None; } return PyInt_FromLong((long)func); } static PyObject * dl_call(dlobject *xp, PyObject *args) { PyObject *name; long (*func)(long, long, long, long, long, long, long, long, long, long); long alist[10]; long res; int i; int n = PyTuple_Size(args); if (n < 1) { PyErr_SetString(PyExc_TypeError, "at least a name is needed"); return NULL; } name = PyTuple_GetItem(args, 0); if (!PyString_Check(name)) { PyErr_SetString(PyExc_TypeError, "function name must be a string"); return NULL; } func = (long (*)(long, long, long, long, long, long, long, long, long, long)) dlsym(xp->dl_handle, PyString_AsString(name)); if (func == NULL) { PyErr_SetString(PyExc_ValueError, dlerror()); return NULL; } if (n-1 > 10) { PyErr_SetString(PyExc_TypeError, "too many arguments (max 10)"); return NULL; } for (i = 1; i < n; i++) { PyObject *v = PyTuple_GetItem(args, i); if (PyInt_Check(v)) alist[i-1] = PyInt_AsLong(v); else if (PyString_Check(v)) alist[i-1] = (long)PyString_AsString(v); else if (v == Py_None) alist[i-1] = (long) ((char *)NULL); else { PyErr_SetString(PyExc_TypeError, "arguments must be int, string or None"); return NULL; } } for (; i <= 10; i++) alist[i-1] = 0; res = (*func)(alist[0], alist[1], alist[2], alist[3], alist[4], alist[5], alist[6], alist[7], alist[8], alist[9]); return PyInt_FromLong(res); } static PyMethodDef dlobject_methods[] = { {"call", (PyCFunction)dl_call, METH_VARARGS}, {"sym", (PyCFunction)dl_sym, METH_O}, {"close", (PyCFunction)dl_close, METH_NOARGS}, {NULL, NULL} /* Sentinel */ }; static PyObject * dl_getattr(dlobject *xp, char *name) { return Py_FindMethod(dlobject_methods, (PyObject *)xp, name); } static PyTypeObject Dltype = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "dl.dl", /*tp_name*/ sizeof(dlobject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)dl_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)dl_getattr,/*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; static PyObject * dl_open(PyObject *self, PyObject *args) { char *name; int mode; PyUnivPtr *handle; if (sizeof(int) != sizeof(long) || sizeof(long) != sizeof(char *)) { PyErr_SetString(PyExc_SystemError, "module dl requires sizeof(int) == sizeof(long) == sizeof(char*)"); return NULL; } if (PyArg_ParseTuple(args, "z:open", &name)) mode = RTLD_LAZY; else { PyErr_Clear(); if (!PyArg_ParseTuple(args, "zi:open", &name, &mode)) return NULL; #ifndef RTLD_NOW if (mode != RTLD_LAZY) { PyErr_SetString(PyExc_ValueError, "mode must be 1"); return NULL; } #endif } handle = dlopen(name, mode); if (handle == NULL) { PyErr_SetString(Dlerror, dlerror()); return NULL; } return newdlobject(handle); } static PyMethodDef dl_methods[] = { {"open", dl_open, METH_VARARGS}, {NULL, NULL} /* sentinel */ }; /* From socketmodule.c * Convenience routine to export an integer value. * * Errors are silently ignored, for better or for worse... */ static void insint(PyObject *d, char *name, int value) { PyObject *v = PyInt_FromLong((long) value); if (!v || PyDict_SetItemString(d, name, v)) PyErr_Clear(); Py_XDECREF(v); } PyMODINIT_FUNC initdl(void) { PyObject *m, *d, *x; /* Initialize object type */ Dltype.ob_type = &PyType_Type; /* Create the module and add the functions */ m = Py_InitModule("dl", dl_methods); /* Add some symbolic constants to the module */ d = PyModule_GetDict(m); Dlerror = x = PyErr_NewException("dl.error", NULL, NULL); PyDict_SetItemString(d, "error", x); x = PyInt_FromLong((long)RTLD_LAZY); PyDict_SetItemString(d, "RTLD_LAZY", x); #define INSINT(X) insint(d,#X,X) #ifdef RTLD_NOW INSINT(RTLD_NOW); #endif #ifdef RTLD_NOLOAD INSINT(RTLD_NOLOAD); #endif #ifdef RTLD_GLOBAL INSINT(RTLD_GLOBAL); #endif #ifdef RTLD_LOCAL INSINT(RTLD_LOCAL); #endif #ifdef RTLD_PARENT INSINT(RTLD_PARENT); #endif #ifdef RTLD_GROUP INSINT(RTLD_GROUP); #endif #ifdef RTLD_WORLD INSINT(RTLD_WORLD); #endif #ifdef RTLD_NODELETE INSINT(RTLD_NODELETE); #endif } Python-2.3.7/Modules/parsermodule.c0000644001241000117560000025407007706773723016560 0ustar loewishpifb6/* parsermodule.c * * Copyright 1995-1996 by Fred L. Drake, Jr. and Virginia Polytechnic * Institute and State University, Blacksburg, Virginia, USA. * Portions copyright 1991-1995 by Stichting Mathematisch Centrum, * Amsterdam, The Netherlands. Copying is permitted under the terms * associated with the main Python distribution, with the additional * restriction that this additional notice be included and maintained * on all distributed copies. * * This module serves to replace the original parser module written * by Guido. The functionality is not matched precisely, but the * original may be implemented on top of this. This is desirable * since the source of the text to be parsed is now divorced from * this interface. * * Unlike the prior interface, the ability to give a parse tree * produced by Python code as a tuple to the compiler is enabled by * this module. See the documentation for more details. * * I've added some annotations that help with the lint code-checking * program, but they're not complete by a long shot. The real errors * that lint detects are gone, but there are still warnings with * Py_[X]DECREF() and Py_[X]INCREF() macros. The lint annotations * look like "NOTE(...)". */ #include "Python.h" /* general Python API */ #include "graminit.h" /* symbols defined in the grammar */ #include "node.h" /* internal parser structure */ #include "errcode.h" /* error codes for PyNode_*() */ #include "token.h" /* token definitions */ /* ISTERMINAL() / ISNONTERMINAL() */ #include "compile.h" /* PyNode_Compile() */ #ifdef lint #include #else #define NOTE(x) #endif #ifdef macintosh char *strdup(char *); #endif /* String constants used to initialize module attributes. * */ static char parser_copyright_string[] = "Copyright 1995-1996 by Virginia Polytechnic Institute & State\n\ University, Blacksburg, Virginia, USA, and Fred L. Drake, Jr., Reston,\n\ Virginia, USA. Portions copyright 1991-1995 by Stichting Mathematisch\n\ Centrum, Amsterdam, The Netherlands."; PyDoc_STRVAR(parser_doc_string, "This is an interface to Python's internal parser."); static char parser_version_string[] = "0.5"; typedef PyObject* (*SeqMaker) (int length); typedef int (*SeqInserter) (PyObject* sequence, int index, PyObject* element); /* The function below is copyrighted by Stichting Mathematisch Centrum. The * original copyright statement is included below, and continues to apply * in full to the function immediately following. All other material is * original, copyrighted by Fred L. Drake, Jr. and Virginia Polytechnic * Institute and State University. Changes were made to comply with the * new naming conventions. Added arguments to provide support for creating * lists as well as tuples, and optionally including the line numbers. */ static PyObject* node2tuple(node *n, /* node to convert */ SeqMaker mkseq, /* create sequence */ SeqInserter addelem, /* func. to add elem. in seq. */ int lineno) /* include line numbers? */ { if (n == NULL) { Py_INCREF(Py_None); return (Py_None); } if (ISNONTERMINAL(TYPE(n))) { int i; PyObject *v; PyObject *w; v = mkseq(1 + NCH(n) + (TYPE(n) == encoding_decl)); if (v == NULL) return (v); w = PyInt_FromLong(TYPE(n)); if (w == NULL) { Py_DECREF(v); return ((PyObject*) NULL); } (void) addelem(v, 0, w); for (i = 0; i < NCH(n); i++) { w = node2tuple(CHILD(n, i), mkseq, addelem, lineno); if (w == NULL) { Py_DECREF(v); return ((PyObject*) NULL); } (void) addelem(v, i+1, w); } if (TYPE(n) == encoding_decl) (void) addelem(v, i+1, PyString_FromString(STR(n))); return (v); } else if (ISTERMINAL(TYPE(n))) { PyObject *result = mkseq(2 + lineno); if (result != NULL) { (void) addelem(result, 0, PyInt_FromLong(TYPE(n))); (void) addelem(result, 1, PyString_FromString(STR(n))); if (lineno == 1) (void) addelem(result, 2, PyInt_FromLong(n->n_lineno)); } return (result); } else { PyErr_SetString(PyExc_SystemError, "unrecognized parse tree node type"); return ((PyObject*) NULL); } } /* * End of material copyrighted by Stichting Mathematisch Centrum. */ /* There are two types of intermediate objects we're interested in: * 'eval' and 'exec' types. These constants can be used in the st_type * field of the object type to identify which any given object represents. * These should probably go in an external header to allow other extensions * to use them, but then, we really should be using C++ too. ;-) */ #define PyST_EXPR 1 #define PyST_SUITE 2 /* These are the internal objects and definitions required to implement the * ST type. Most of the internal names are more reminiscent of the 'old' * naming style, but the code uses the new naming convention. */ static PyObject* parser_error = 0; typedef struct { PyObject_HEAD /* standard object header */ node* st_node; /* the node* returned by the parser */ int st_type; /* EXPR or SUITE ? */ } PyST_Object; static void parser_free(PyST_Object *st); static int parser_compare(PyST_Object *left, PyST_Object *right); static PyObject *parser_getattr(PyObject *self, char *name); static PyTypeObject PyST_Type = { PyObject_HEAD_INIT(NULL) 0, "parser.st", /* tp_name */ (int) sizeof(PyST_Object), /* tp_basicsize */ 0, /* tp_itemsize */ (destructor)parser_free, /* tp_dealloc */ 0, /* tp_print */ parser_getattr, /* tp_getattr */ 0, /* tp_setattr */ (cmpfunc)parser_compare, /* tp_compare */ 0, /* tp_repr */ 0, /* tp_as_number */ 0, /* tp_as_sequence */ 0, /* tp_as_mapping */ 0, /* tp_hash */ 0, /* tp_call */ 0, /* tp_str */ 0, /* tp_getattro */ 0, /* tp_setattro */ /* Functions to access object as input/output buffer */ 0, /* tp_as_buffer */ Py_TPFLAGS_DEFAULT, /* tp_flags */ /* __doc__ */ "Intermediate representation of a Python parse tree." }; /* PyST_Type */ static int parser_compare_nodes(node *left, node *right) { int j; if (TYPE(left) < TYPE(right)) return (-1); if (TYPE(right) < TYPE(left)) return (1); if (ISTERMINAL(TYPE(left))) return (strcmp(STR(left), STR(right))); if (NCH(left) < NCH(right)) return (-1); if (NCH(right) < NCH(left)) return (1); for (j = 0; j < NCH(left); ++j) { int v = parser_compare_nodes(CHILD(left, j), CHILD(right, j)); if (v != 0) return (v); } return (0); } /* int parser_compare(PyST_Object* left, PyST_Object* right) * * Comparison function used by the Python operators ==, !=, <, >, <=, >= * This really just wraps a call to parser_compare_nodes() with some easy * checks and protection code. * */ static int parser_compare(PyST_Object *left, PyST_Object *right) { if (left == right) return (0); if ((left == 0) || (right == 0)) return (-1); return (parser_compare_nodes(left->st_node, right->st_node)); } /* parser_newstobject(node* st) * * Allocates a new Python object representing an ST. This is simply the * 'wrapper' object that holds a node* and allows it to be passed around in * Python code. * */ static PyObject* parser_newstobject(node *st, int type) { PyST_Object* o = PyObject_New(PyST_Object, &PyST_Type); if (o != 0) { o->st_node = st; o->st_type = type; } else { PyNode_Free(st); } return ((PyObject*)o); } /* void parser_free(PyST_Object* st) * * This is called by a del statement that reduces the reference count to 0. * */ static void parser_free(PyST_Object *st) { PyNode_Free(st->st_node); PyObject_Del(st); } /* parser_st2tuple(PyObject* self, PyObject* args, PyObject* kw) * * This provides conversion from a node* to a tuple object that can be * returned to the Python-level caller. The ST object is not modified. * */ static PyObject* parser_st2tuple(PyST_Object *self, PyObject *args, PyObject *kw) { PyObject *line_option = 0; PyObject *res = 0; int ok; static char *keywords[] = {"ast", "line_info", NULL}; if (self == NULL) { ok = PyArg_ParseTupleAndKeywords(args, kw, "O!|O:st2tuple", keywords, &PyST_Type, &self, &line_option); } else ok = PyArg_ParseTupleAndKeywords(args, kw, "|O:totuple", &keywords[1], &line_option); if (ok != 0) { int lineno = 0; if (line_option != NULL) { lineno = (PyObject_IsTrue(line_option) != 0) ? 1 : 0; } /* * Convert ST into a tuple representation. Use Guido's function, * since it's known to work already. */ res = node2tuple(((PyST_Object*)self)->st_node, PyTuple_New, PyTuple_SetItem, lineno); } return (res); } /* parser_st2list(PyObject* self, PyObject* args, PyObject* kw) * * This provides conversion from a node* to a list object that can be * returned to the Python-level caller. The ST object is not modified. * */ static PyObject* parser_st2list(PyST_Object *self, PyObject *args, PyObject *kw) { PyObject *line_option = 0; PyObject *res = 0; int ok; static char *keywords[] = {"ast", "line_info", NULL}; if (self == NULL) ok = PyArg_ParseTupleAndKeywords(args, kw, "O!|O:st2list", keywords, &PyST_Type, &self, &line_option); else ok = PyArg_ParseTupleAndKeywords(args, kw, "|O:tolist", &keywords[1], &line_option); if (ok) { int lineno = 0; if (line_option != 0) { lineno = PyObject_IsTrue(line_option) ? 1 : 0; } /* * Convert ST into a tuple representation. Use Guido's function, * since it's known to work already. */ res = node2tuple(self->st_node, PyList_New, PyList_SetItem, lineno); } return (res); } /* parser_compilest(PyObject* self, PyObject* args) * * This function creates code objects from the parse tree represented by * the passed-in data object. An optional file name is passed in as well. * */ static PyObject* parser_compilest(PyST_Object *self, PyObject *args, PyObject *kw) { PyObject* res = 0; char* str = ""; int ok; static char *keywords[] = {"ast", "filename", NULL}; if (self == NULL) ok = PyArg_ParseTupleAndKeywords(args, kw, "O!|s:compilest", keywords, &PyST_Type, &self, &str); else ok = PyArg_ParseTupleAndKeywords(args, kw, "|s:compile", &keywords[1], &str); if (ok) res = (PyObject *)PyNode_Compile(self->st_node, str); return (res); } /* PyObject* parser_isexpr(PyObject* self, PyObject* args) * PyObject* parser_issuite(PyObject* self, PyObject* args) * * Checks the passed-in ST object to determine if it is an expression or * a statement suite, respectively. The return is a Python truth value. * */ static PyObject* parser_isexpr(PyST_Object *self, PyObject *args, PyObject *kw) { PyObject* res = 0; int ok; static char *keywords[] = {"ast", NULL}; if (self == NULL) ok = PyArg_ParseTupleAndKeywords(args, kw, "O!:isexpr", keywords, &PyST_Type, &self); else ok = PyArg_ParseTupleAndKeywords(args, kw, ":isexpr", &keywords[1]); if (ok) { /* Check to see if the ST represents an expression or not. */ res = (self->st_type == PyST_EXPR) ? Py_True : Py_False; Py_INCREF(res); } return (res); } static PyObject* parser_issuite(PyST_Object *self, PyObject *args, PyObject *kw) { PyObject* res = 0; int ok; static char *keywords[] = {"ast", NULL}; if (self == NULL) ok = PyArg_ParseTupleAndKeywords(args, kw, "O!:issuite", keywords, &PyST_Type, &self); else ok = PyArg_ParseTupleAndKeywords(args, kw, ":issuite", &keywords[1]); if (ok) { /* Check to see if the ST represents an expression or not. */ res = (self->st_type == PyST_EXPR) ? Py_False : Py_True; Py_INCREF(res); } return (res); } #define PUBLIC_METHOD_TYPE (METH_VARARGS|METH_KEYWORDS) static PyMethodDef parser_methods[] = { {"compile", (PyCFunction)parser_compilest, PUBLIC_METHOD_TYPE, PyDoc_STR("Compile this ST object into a code object.")}, {"isexpr", (PyCFunction)parser_isexpr, PUBLIC_METHOD_TYPE, PyDoc_STR("Determines if this ST object was created from an expression.")}, {"issuite", (PyCFunction)parser_issuite, PUBLIC_METHOD_TYPE, PyDoc_STR("Determines if this ST object was created from a suite.")}, {"tolist", (PyCFunction)parser_st2list, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates a list-tree representation of this ST.")}, {"totuple", (PyCFunction)parser_st2tuple, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates a tuple-tree representation of this ST.")}, {NULL, NULL, 0, NULL} }; static PyObject* parser_getattr(PyObject *self, char *name) { return (Py_FindMethod(parser_methods, self, name)); } /* err_string(char* message) * * Sets the error string for an exception of type ParserError. * */ static void err_string(char *message) { PyErr_SetString(parser_error, message); } /* PyObject* parser_do_parse(PyObject* args, int type) * * Internal function to actually execute the parse and return the result if * successful or set an exception if not. * */ static PyObject* parser_do_parse(PyObject *args, PyObject *kw, char *argspec, int type) { char* string = 0; PyObject* res = 0; static char *keywords[] = {"source", NULL}; if (PyArg_ParseTupleAndKeywords(args, kw, argspec, keywords, &string)) { node* n = PyParser_SimpleParseString(string, (type == PyST_EXPR) ? eval_input : file_input); if (n) res = parser_newstobject(n, type); } return (res); } /* PyObject* parser_expr(PyObject* self, PyObject* args) * PyObject* parser_suite(PyObject* self, PyObject* args) * * External interfaces to the parser itself. Which is called determines if * the parser attempts to recognize an expression ('eval' form) or statement * suite ('exec' form). The real work is done by parser_do_parse() above. * */ static PyObject* parser_expr(PyST_Object *self, PyObject *args, PyObject *kw) { NOTE(ARGUNUSED(self)) return (parser_do_parse(args, kw, "s:expr", PyST_EXPR)); } static PyObject* parser_suite(PyST_Object *self, PyObject *args, PyObject *kw) { NOTE(ARGUNUSED(self)) return (parser_do_parse(args, kw, "s:suite", PyST_SUITE)); } /* This is the messy part of the code. Conversion from a tuple to an ST * object requires that the input tuple be valid without having to rely on * catching an exception from the compiler. This is done to allow the * compiler itself to remain fast, since most of its input will come from * the parser directly, and therefore be known to be syntactically correct. * This validation is done to ensure that we don't core dump the compile * phase, returning an exception instead. * * Two aspects can be broken out in this code: creating a node tree from * the tuple passed in, and verifying that it is indeed valid. It may be * advantageous to expand the number of ST types to include funcdefs and * lambdadefs to take advantage of the optimizer, recognizing those STs * here. They are not necessary, and not quite as useful in a raw form. * For now, let's get expressions and suites working reliably. */ static node* build_node_tree(PyObject *tuple); static int validate_expr_tree(node *tree); static int validate_file_input(node *tree); static int validate_encoding_decl(node *tree); /* PyObject* parser_tuple2st(PyObject* self, PyObject* args) * * This is the public function, called from the Python code. It receives a * single tuple object from the caller, and creates an ST object if the * tuple can be validated. It does this by checking the first code of the * tuple, and, if acceptable, builds the internal representation. If this * step succeeds, the internal representation is validated as fully as * possible with the various validate_*() routines defined below. * * This function must be changed if support is to be added for PyST_FRAGMENT * ST objects. * */ static PyObject* parser_tuple2st(PyST_Object *self, PyObject *args, PyObject *kw) { NOTE(ARGUNUSED(self)) PyObject *st = 0; PyObject *tuple; node *tree; static char *keywords[] = {"sequence", NULL}; if (!PyArg_ParseTupleAndKeywords(args, kw, "O:sequence2st", keywords, &tuple)) return (0); if (!PySequence_Check(tuple)) { PyErr_SetString(PyExc_ValueError, "sequence2st() requires a single sequence argument"); return (0); } /* * Convert the tree to the internal form before checking it. */ tree = build_node_tree(tuple); if (tree != 0) { int start_sym = TYPE(tree); if (start_sym == eval_input) { /* Might be an eval form. */ if (validate_expr_tree(tree)) st = parser_newstobject(tree, PyST_EXPR); else PyNode_Free(tree); } else if (start_sym == file_input) { /* This looks like an exec form so far. */ if (validate_file_input(tree)) st = parser_newstobject(tree, PyST_SUITE); else PyNode_Free(tree); } else if (start_sym == encoding_decl) { /* This looks like an encoding_decl so far. */ if (validate_encoding_decl(tree)) st = parser_newstobject(tree, PyST_SUITE); else PyNode_Free(tree); } else { /* This is a fragment, at best. */ PyNode_Free(tree); err_string("parse tree does not use a valid start symbol"); } } /* Make sure we throw an exception on all errors. We should never * get this, but we'd do well to be sure something is done. */ if (st == NULL && !PyErr_Occurred()) err_string("unspecified ST error occurred"); return st; } /* node* build_node_children() * * Iterate across the children of the current non-terminal node and build * their structures. If successful, return the root of this portion of * the tree, otherwise, 0. Any required exception will be specified already, * and no memory will have been deallocated. * */ static node* build_node_children(PyObject *tuple, node *root, int *line_num) { int len = PyObject_Size(tuple); int i, err; for (i = 1; i < len; ++i) { /* elem must always be a sequence, however simple */ PyObject* elem = PySequence_GetItem(tuple, i); int ok = elem != NULL; long type = 0; char *strn = 0; if (ok) ok = PySequence_Check(elem); if (ok) { PyObject *temp = PySequence_GetItem(elem, 0); if (temp == NULL) ok = 0; else { ok = PyInt_Check(temp); if (ok) type = PyInt_AS_LONG(temp); Py_DECREF(temp); } } if (!ok) { PyErr_SetObject(parser_error, Py_BuildValue("os", elem, "Illegal node construct.")); Py_XDECREF(elem); return (0); } if (ISTERMINAL(type)) { int len = PyObject_Size(elem); PyObject *temp; if ((len != 2) && (len != 3)) { err_string("terminal nodes must have 2 or 3 entries"); return 0; } temp = PySequence_GetItem(elem, 1); if (temp == NULL) return 0; if (!PyString_Check(temp)) { PyErr_Format(parser_error, "second item in terminal node must be a string," " found %s", temp->ob_type->tp_name); Py_DECREF(temp); return 0; } if (len == 3) { PyObject *o = PySequence_GetItem(elem, 2); if (o != NULL) { if (PyInt_Check(o)) *line_num = PyInt_AS_LONG(o); else { PyErr_Format(parser_error, "third item in terminal node must be an" " integer, found %s", temp->ob_type->tp_name); Py_DECREF(o); Py_DECREF(temp); return 0; } Py_DECREF(o); } } len = PyString_GET_SIZE(temp) + 1; strn = (char *)PyMem_MALLOC(len); if (strn != NULL) (void) memcpy(strn, PyString_AS_STRING(temp), len); Py_DECREF(temp); } else if (!ISNONTERMINAL(type)) { /* * It has to be one or the other; this is an error. * Throw an exception. */ PyErr_SetObject(parser_error, Py_BuildValue("os", elem, "unknown node type.")); Py_XDECREF(elem); return (0); } err = PyNode_AddChild(root, type, strn, *line_num); if (err == E_NOMEM) { PyMem_DEL(strn); return (node *) PyErr_NoMemory(); } if (err == E_OVERFLOW) { PyMem_DEL(strn); PyErr_SetString(PyExc_ValueError, "unsupported number of child nodes"); return NULL; } if (ISNONTERMINAL(type)) { node* new_child = CHILD(root, i - 1); if (new_child != build_node_children(elem, new_child, line_num)) { Py_XDECREF(elem); return (0); } } else if (type == NEWLINE) { /* It's true: we increment the */ ++(*line_num); /* line number *after* the newline! */ } Py_XDECREF(elem); } return (root); } static node* build_node_tree(PyObject *tuple) { node* res = 0; PyObject *temp = PySequence_GetItem(tuple, 0); long num = -1; if (temp != NULL) num = PyInt_AsLong(temp); Py_XDECREF(temp); if (ISTERMINAL(num)) { /* * The tuple is simple, but it doesn't start with a start symbol. * Throw an exception now and be done with it. */ tuple = Py_BuildValue("os", tuple, "Illegal syntax-tree; cannot start with terminal symbol."); PyErr_SetObject(parser_error, tuple); } else if (ISNONTERMINAL(num)) { /* * Not efficient, but that can be handled later. */ int line_num = 0; PyObject *encoding = NULL; if (num == encoding_decl) { encoding = PySequence_GetItem(tuple, 2); /* tuple isn't borrowed anymore here, need to DECREF */ tuple = PySequence_GetSlice(tuple, 0, 2); } res = PyNode_New(num); if (res != NULL) { if (res != build_node_children(tuple, res, &line_num)) { PyNode_Free(res); res = NULL; } if (res && encoding) { int len; len = PyString_GET_SIZE(encoding) + 1; res->n_str = (char *)PyMem_MALLOC(len); if (res->n_str != NULL) (void) memcpy(res->n_str, PyString_AS_STRING(encoding), len); Py_DECREF(encoding); Py_DECREF(tuple); } } } else /* The tuple is illegal -- if the number is neither TERMINAL nor * NONTERMINAL, we can't use it. Not sure the implementation * allows this condition, but the API doesn't preclude it. */ PyErr_SetObject(parser_error, Py_BuildValue("os", tuple, "Illegal component tuple.")); return (res); } /* * Validation routines used within the validation section: */ static int validate_terminal(node *terminal, int type, char *string); #define validate_ampersand(ch) validate_terminal(ch, AMPER, "&") #define validate_circumflex(ch) validate_terminal(ch, CIRCUMFLEX, "^") #define validate_colon(ch) validate_terminal(ch, COLON, ":") #define validate_comma(ch) validate_terminal(ch, COMMA, ",") #define validate_dedent(ch) validate_terminal(ch, DEDENT, "") #define validate_equal(ch) validate_terminal(ch, EQUAL, "=") #define validate_indent(ch) validate_terminal(ch, INDENT, (char*)NULL) #define validate_lparen(ch) validate_terminal(ch, LPAR, "(") #define validate_newline(ch) validate_terminal(ch, NEWLINE, (char*)NULL) #define validate_rparen(ch) validate_terminal(ch, RPAR, ")") #define validate_semi(ch) validate_terminal(ch, SEMI, ";") #define validate_star(ch) validate_terminal(ch, STAR, "*") #define validate_vbar(ch) validate_terminal(ch, VBAR, "|") #define validate_doublestar(ch) validate_terminal(ch, DOUBLESTAR, "**") #define validate_dot(ch) validate_terminal(ch, DOT, ".") #define validate_name(ch, str) validate_terminal(ch, NAME, str) #define VALIDATER(n) static int validate_##n(node *tree) VALIDATER(node); VALIDATER(small_stmt); VALIDATER(class); VALIDATER(node); VALIDATER(parameters); VALIDATER(suite); VALIDATER(testlist); VALIDATER(varargslist); VALIDATER(fpdef); VALIDATER(fplist); VALIDATER(stmt); VALIDATER(simple_stmt); VALIDATER(expr_stmt); VALIDATER(power); VALIDATER(print_stmt); VALIDATER(del_stmt); VALIDATER(return_stmt); VALIDATER(list_iter); VALIDATER(raise_stmt); VALIDATER(import_stmt); VALIDATER(global_stmt); VALIDATER(list_if); VALIDATER(assert_stmt); VALIDATER(list_for); VALIDATER(exec_stmt); VALIDATER(compound_stmt); VALIDATER(while); VALIDATER(for); VALIDATER(try); VALIDATER(except_clause); VALIDATER(test); VALIDATER(and_test); VALIDATER(not_test); VALIDATER(comparison); VALIDATER(comp_op); VALIDATER(expr); VALIDATER(xor_expr); VALIDATER(and_expr); VALIDATER(shift_expr); VALIDATER(arith_expr); VALIDATER(term); VALIDATER(factor); VALIDATER(atom); VALIDATER(lambdef); VALIDATER(trailer); VALIDATER(subscript); VALIDATER(subscriptlist); VALIDATER(sliceop); VALIDATER(exprlist); VALIDATER(dictmaker); VALIDATER(arglist); VALIDATER(argument); VALIDATER(listmaker); VALIDATER(yield_stmt); VALIDATER(testlist1); #undef VALIDATER #define is_even(n) (((n) & 1) == 0) #define is_odd(n) (((n) & 1) == 1) static int validate_ntype(node *n, int t) { if (TYPE(n) != t) { PyErr_Format(parser_error, "Expected node type %d, got %d.", t, TYPE(n)); return 0; } return 1; } /* Verifies that the number of child nodes is exactly 'num', raising * an exception if it isn't. The exception message does not indicate * the exact number of nodes, allowing this to be used to raise the * "right" exception when the wrong number of nodes is present in a * specific variant of a statement's syntax. This is commonly used * in that fashion. */ static int validate_numnodes(node *n, int num, const char *const name) { if (NCH(n) != num) { PyErr_Format(parser_error, "Illegal number of children for %s node.", name); return 0; } return 1; } static int validate_terminal(node *terminal, int type, char *string) { int res = (validate_ntype(terminal, type) && ((string == 0) || (strcmp(string, STR(terminal)) == 0))); if (!res && !PyErr_Occurred()) { PyErr_Format(parser_error, "Illegal terminal: expected \"%s\"", string); } return (res); } /* X (',' X) [','] */ static int validate_repeating_list(node *tree, int ntype, int (*vfunc)(node *), const char *const name) { int nch = NCH(tree); int res = (nch && validate_ntype(tree, ntype) && vfunc(CHILD(tree, 0))); if (!res && !PyErr_Occurred()) (void) validate_numnodes(tree, 1, name); else { if (is_even(nch)) res = validate_comma(CHILD(tree, --nch)); if (res && nch > 1) { int pos = 1; for ( ; res && pos < nch; pos += 2) res = (validate_comma(CHILD(tree, pos)) && vfunc(CHILD(tree, pos + 1))); } } return (res); } /* validate_class() * * classdef: * 'class' NAME ['(' testlist ')'] ':' suite */ static int validate_class(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, classdef) && ((nch == 4) || (nch == 7)); if (res) { res = (validate_name(CHILD(tree, 0), "class") && validate_ntype(CHILD(tree, 1), NAME) && validate_colon(CHILD(tree, nch - 2)) && validate_suite(CHILD(tree, nch - 1))); } else (void) validate_numnodes(tree, 4, "class"); if (res && (nch == 7)) { res = (validate_lparen(CHILD(tree, 2)) && validate_testlist(CHILD(tree, 3)) && validate_rparen(CHILD(tree, 4))); } return (res); } /* if_stmt: * 'if' test ':' suite ('elif' test ':' suite)* ['else' ':' suite] */ static int validate_if(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, if_stmt) && (nch >= 4) && validate_name(CHILD(tree, 0), "if") && validate_test(CHILD(tree, 1)) && validate_colon(CHILD(tree, 2)) && validate_suite(CHILD(tree, 3))); if (res && ((nch % 4) == 3)) { /* ... 'else' ':' suite */ res = (validate_name(CHILD(tree, nch - 3), "else") && validate_colon(CHILD(tree, nch - 2)) && validate_suite(CHILD(tree, nch - 1))); nch -= 3; } else if (!res && !PyErr_Occurred()) (void) validate_numnodes(tree, 4, "if"); if ((nch % 4) != 0) /* Will catch the case for nch < 4 */ res = validate_numnodes(tree, 0, "if"); else if (res && (nch > 4)) { /* ... ('elif' test ':' suite)+ ... */ int j = 4; while ((j < nch) && res) { res = (validate_name(CHILD(tree, j), "elif") && validate_colon(CHILD(tree, j + 2)) && validate_test(CHILD(tree, j + 1)) && validate_suite(CHILD(tree, j + 3))); j += 4; } } return (res); } /* parameters: * '(' [varargslist] ')' * */ static int validate_parameters(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, parameters) && ((nch == 2) || (nch == 3)); if (res) { res = (validate_lparen(CHILD(tree, 0)) && validate_rparen(CHILD(tree, nch - 1))); if (res && (nch == 3)) res = validate_varargslist(CHILD(tree, 1)); } else { (void) validate_numnodes(tree, 2, "parameters"); } return (res); } /* validate_suite() * * suite: * simple_stmt * | NEWLINE INDENT stmt+ DEDENT */ static int validate_suite(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, suite) && ((nch == 1) || (nch >= 4))); if (res && (nch == 1)) res = validate_simple_stmt(CHILD(tree, 0)); else if (res) { /* NEWLINE INDENT stmt+ DEDENT */ res = (validate_newline(CHILD(tree, 0)) && validate_indent(CHILD(tree, 1)) && validate_stmt(CHILD(tree, 2)) && validate_dedent(CHILD(tree, nch - 1))); if (res && (nch > 4)) { int i = 3; --nch; /* forget the DEDENT */ for ( ; res && (i < nch); ++i) res = validate_stmt(CHILD(tree, i)); } else if (nch < 4) res = validate_numnodes(tree, 4, "suite"); } return (res); } static int validate_testlist(node *tree) { return (validate_repeating_list(tree, testlist, validate_test, "testlist")); } static int validate_testlist1(node *tree) { return (validate_repeating_list(tree, testlist1, validate_test, "testlist1")); } static int validate_testlist_safe(node *tree) { return (validate_repeating_list(tree, testlist_safe, validate_test, "testlist_safe")); } /* '*' NAME [',' '**' NAME] | '**' NAME */ static int validate_varargslist_trailer(node *tree, int start) { int nch = NCH(tree); int res = 0; int sym; if (nch <= start) { err_string("expected variable argument trailer for varargslist"); return 0; } sym = TYPE(CHILD(tree, start)); if (sym == STAR) { /* * ('*' NAME [',' '**' NAME] */ if (nch-start == 2) res = validate_name(CHILD(tree, start+1), NULL); else if (nch-start == 5) res = (validate_name(CHILD(tree, start+1), NULL) && validate_comma(CHILD(tree, start+2)) && validate_doublestar(CHILD(tree, start+3)) && validate_name(CHILD(tree, start+4), NULL)); } else if (sym == DOUBLESTAR) { /* * '**' NAME */ if (nch-start == 2) res = validate_name(CHILD(tree, start+1), NULL); } if (!res) err_string("illegal variable argument trailer for varargslist"); return res; } /* validate_varargslist() * * varargslist: * (fpdef ['=' test] ',')* * ('*' NAME [',' '**' NAME] * | '**' NAME) * | fpdef ['=' test] (',' fpdef ['=' test])* [','] * */ static int validate_varargslist(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, varargslist) && (nch != 0); int sym; if (!res) return 0; if (nch < 1) { err_string("varargslist missing child nodes"); return 0; } sym = TYPE(CHILD(tree, 0)); if (sym == STAR || sym == DOUBLESTAR) /* whole thing matches: * '*' NAME [',' '**' NAME] | '**' NAME */ res = validate_varargslist_trailer(tree, 0); else if (sym == fpdef) { int i = 0; sym = TYPE(CHILD(tree, nch-1)); if (sym == NAME) { /* * (fpdef ['=' test] ',')+ * ('*' NAME [',' '**' NAME] * | '**' NAME) */ /* skip over (fpdef ['=' test] ',')+ */ while (res && (i+2 <= nch)) { res = validate_fpdef(CHILD(tree, i)); ++i; if (res && TYPE(CHILD(tree, i)) == EQUAL && (i+2 <= nch)) { res = (validate_equal(CHILD(tree, i)) && validate_test(CHILD(tree, i+1))); if (res) i += 2; } if (res && i < nch) { res = validate_comma(CHILD(tree, i)); ++i; if (res && i < nch && (TYPE(CHILD(tree, i)) == DOUBLESTAR || TYPE(CHILD(tree, i)) == STAR)) break; } } /* ... '*' NAME [',' '**' NAME] | '**' NAME * i --^^^ */ if (res) res = validate_varargslist_trailer(tree, i); } else { /* * fpdef ['=' test] (',' fpdef ['=' test])* [','] */ /* strip trailing comma node */ if (sym == COMMA) { res = validate_comma(CHILD(tree, nch-1)); if (!res) return 0; --nch; } /* * fpdef ['=' test] (',' fpdef ['=' test])* */ res = validate_fpdef(CHILD(tree, 0)); ++i; if (res && (i+2 <= nch) && TYPE(CHILD(tree, i)) == EQUAL) { res = (validate_equal(CHILD(tree, i)) && validate_test(CHILD(tree, i+1))); i += 2; } /* * ... (',' fpdef ['=' test])* * i ---^^^ */ while (res && (nch - i) >= 2) { res = (validate_comma(CHILD(tree, i)) && validate_fpdef(CHILD(tree, i+1))); i += 2; if (res && (nch - i) >= 2 && TYPE(CHILD(tree, i)) == EQUAL) { res = (validate_equal(CHILD(tree, i)) && validate_test(CHILD(tree, i+1))); i += 2; } } if (res && nch - i != 0) { res = 0; err_string("illegal formation for varargslist"); } } } return res; } /* list_iter: list_for | list_if */ static int validate_list_iter(node *tree) { int res = (validate_ntype(tree, list_iter) && validate_numnodes(tree, 1, "list_iter")); if (res && TYPE(CHILD(tree, 0)) == list_for) res = validate_list_for(CHILD(tree, 0)); else res = validate_list_if(CHILD(tree, 0)); return res; } /* list_for: 'for' exprlist 'in' testlist [list_iter] */ static int validate_list_for(node *tree) { int nch = NCH(tree); int res; if (nch == 5) res = validate_list_iter(CHILD(tree, 4)); else res = validate_numnodes(tree, 4, "list_for"); if (res) res = (validate_name(CHILD(tree, 0), "for") && validate_exprlist(CHILD(tree, 1)) && validate_name(CHILD(tree, 2), "in") && validate_testlist_safe(CHILD(tree, 3))); return res; } /* list_if: 'if' test [list_iter] */ static int validate_list_if(node *tree) { int nch = NCH(tree); int res; if (nch == 3) res = validate_list_iter(CHILD(tree, 2)); else res = validate_numnodes(tree, 2, "list_if"); if (res) res = (validate_name(CHILD(tree, 0), "if") && validate_test(CHILD(tree, 1))); return res; } /* validate_fpdef() * * fpdef: * NAME * | '(' fplist ')' */ static int validate_fpdef(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, fpdef); if (res) { if (nch == 1) res = validate_ntype(CHILD(tree, 0), NAME); else if (nch == 3) res = (validate_lparen(CHILD(tree, 0)) && validate_fplist(CHILD(tree, 1)) && validate_rparen(CHILD(tree, 2))); else res = validate_numnodes(tree, 1, "fpdef"); } return (res); } static int validate_fplist(node *tree) { return (validate_repeating_list(tree, fplist, validate_fpdef, "fplist")); } /* simple_stmt | compound_stmt * */ static int validate_stmt(node *tree) { int res = (validate_ntype(tree, stmt) && validate_numnodes(tree, 1, "stmt")); if (res) { tree = CHILD(tree, 0); if (TYPE(tree) == simple_stmt) res = validate_simple_stmt(tree); else res = validate_compound_stmt(tree); } return (res); } /* small_stmt (';' small_stmt)* [';'] NEWLINE * */ static int validate_simple_stmt(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, simple_stmt) && (nch >= 2) && validate_small_stmt(CHILD(tree, 0)) && validate_newline(CHILD(tree, nch - 1))); if (nch < 2) res = validate_numnodes(tree, 2, "simple_stmt"); --nch; /* forget the NEWLINE */ if (res && is_even(nch)) res = validate_semi(CHILD(tree, --nch)); if (res && (nch > 2)) { int i; for (i = 1; res && (i < nch); i += 2) res = (validate_semi(CHILD(tree, i)) && validate_small_stmt(CHILD(tree, i + 1))); } return (res); } static int validate_small_stmt(node *tree) { int nch = NCH(tree); int res = validate_numnodes(tree, 1, "small_stmt"); if (res) { int ntype = TYPE(CHILD(tree, 0)); if ( (ntype == expr_stmt) || (ntype == print_stmt) || (ntype == del_stmt) || (ntype == pass_stmt) || (ntype == flow_stmt) || (ntype == import_stmt) || (ntype == global_stmt) || (ntype == assert_stmt) || (ntype == exec_stmt)) res = validate_node(CHILD(tree, 0)); else { res = 0; err_string("illegal small_stmt child type"); } } else if (nch == 1) { res = 0; PyErr_Format(parser_error, "Unrecognized child node of small_stmt: %d.", TYPE(CHILD(tree, 0))); } return (res); } /* compound_stmt: * if_stmt | while_stmt | for_stmt | try_stmt | funcdef | classdef */ static int validate_compound_stmt(node *tree) { int res = (validate_ntype(tree, compound_stmt) && validate_numnodes(tree, 1, "compound_stmt")); int ntype; if (!res) return (0); tree = CHILD(tree, 0); ntype = TYPE(tree); if ( (ntype == if_stmt) || (ntype == while_stmt) || (ntype == for_stmt) || (ntype == try_stmt) || (ntype == funcdef) || (ntype == classdef)) res = validate_node(tree); else { res = 0; PyErr_Format(parser_error, "Illegal compound statement type: %d.", TYPE(tree)); } return (res); } static int validate_expr_stmt(node *tree) { int j; int nch = NCH(tree); int res = (validate_ntype(tree, expr_stmt) && is_odd(nch) && validate_testlist(CHILD(tree, 0))); if (res && nch == 3 && TYPE(CHILD(tree, 1)) == augassign) { res = (validate_numnodes(CHILD(tree, 1), 1, "augassign") && validate_testlist(CHILD(tree, 2))); if (res) { char *s = STR(CHILD(CHILD(tree, 1), 0)); res = (strcmp(s, "+=") == 0 || strcmp(s, "-=") == 0 || strcmp(s, "*=") == 0 || strcmp(s, "/=") == 0 || strcmp(s, "//=") == 0 || strcmp(s, "%=") == 0 || strcmp(s, "&=") == 0 || strcmp(s, "|=") == 0 || strcmp(s, "^=") == 0 || strcmp(s, "<<=") == 0 || strcmp(s, ">>=") == 0 || strcmp(s, "**=") == 0); if (!res) err_string("illegal augmmented assignment operator"); } } else { for (j = 1; res && (j < nch); j += 2) res = (validate_equal(CHILD(tree, j)) && validate_testlist(CHILD(tree, j + 1))); } return (res); } /* print_stmt: * * 'print' ( [ test (',' test)* [','] ] * | '>>' test [ (',' test)+ [','] ] ) */ static int validate_print_stmt(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, print_stmt) && (nch > 0) && validate_name(CHILD(tree, 0), "print")); if (res && nch > 1) { int sym = TYPE(CHILD(tree, 1)); int i = 1; int allow_trailing_comma = 1; if (sym == test) res = validate_test(CHILD(tree, i++)); else { if (nch < 3) res = validate_numnodes(tree, 3, "print_stmt"); else { res = (validate_ntype(CHILD(tree, i), RIGHTSHIFT) && validate_test(CHILD(tree, i+1))); i += 2; allow_trailing_comma = 0; } } if (res) { /* ... (',' test)* [','] */ while (res && i+2 <= nch) { res = (validate_comma(CHILD(tree, i)) && validate_test(CHILD(tree, i+1))); allow_trailing_comma = 1; i += 2; } if (res && !allow_trailing_comma) res = validate_numnodes(tree, i, "print_stmt"); else if (res && i < nch) res = validate_comma(CHILD(tree, i)); } } return (res); } static int validate_del_stmt(node *tree) { return (validate_numnodes(tree, 2, "del_stmt") && validate_name(CHILD(tree, 0), "del") && validate_exprlist(CHILD(tree, 1))); } static int validate_return_stmt(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, return_stmt) && ((nch == 1) || (nch == 2)) && validate_name(CHILD(tree, 0), "return")); if (res && (nch == 2)) res = validate_testlist(CHILD(tree, 1)); return (res); } static int validate_raise_stmt(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, raise_stmt) && ((nch == 1) || (nch == 2) || (nch == 4) || (nch == 6))); if (res) { res = validate_name(CHILD(tree, 0), "raise"); if (res && (nch >= 2)) res = validate_test(CHILD(tree, 1)); if (res && nch > 2) { res = (validate_comma(CHILD(tree, 2)) && validate_test(CHILD(tree, 3))); if (res && (nch > 4)) res = (validate_comma(CHILD(tree, 4)) && validate_test(CHILD(tree, 5))); } } else (void) validate_numnodes(tree, 2, "raise"); if (res && (nch == 4)) res = (validate_comma(CHILD(tree, 2)) && validate_test(CHILD(tree, 3))); return (res); } /* yield_stmt: 'yield' testlist */ static int validate_yield_stmt(node *tree) { return (validate_ntype(tree, yield_stmt) && validate_numnodes(tree, 2, "yield_stmt") && validate_name(CHILD(tree, 0), "yield") && validate_testlist(CHILD(tree, 1))); } static int validate_import_as_name(node *tree) { int nch = NCH(tree); int ok = validate_ntype(tree, import_as_name); if (ok) { if (nch == 1) ok = validate_name(CHILD(tree, 0), NULL); else if (nch == 3) ok = (validate_name(CHILD(tree, 0), NULL) && validate_name(CHILD(tree, 1), "as") && validate_name(CHILD(tree, 2), NULL)); else ok = validate_numnodes(tree, 3, "import_as_name"); } return ok; } /* dotted_name: NAME ("." NAME)* */ static int validate_dotted_name(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, dotted_name) && is_odd(nch) && validate_name(CHILD(tree, 0), NULL)); int i; for (i = 1; res && (i < nch); i += 2) { res = (validate_dot(CHILD(tree, i)) && validate_name(CHILD(tree, i+1), NULL)); } return res; } /* dotted_as_name: dotted_name [NAME NAME] */ static int validate_dotted_as_name(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, dotted_as_name); if (res) { if (nch == 1) res = validate_dotted_name(CHILD(tree, 0)); else if (nch == 3) res = (validate_dotted_name(CHILD(tree, 0)) && validate_name(CHILD(tree, 1), "as") && validate_name(CHILD(tree, 2), NULL)); else { res = 0; err_string("illegal number of children for dotted_as_name"); } } return res; } /* import_stmt: * * 'import' dotted_as_name (',' dotted_as_name)* * | 'from' dotted_name 'import' ('*' | import_as_name (',' import_as_name)*) */ static int validate_import_stmt(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, import_stmt) && (nch >= 2) && is_even(nch) && validate_ntype(CHILD(tree, 0), NAME)); if (res && (strcmp(STR(CHILD(tree, 0)), "import") == 0)) { int j; res = validate_dotted_as_name(CHILD(tree, 1)); for (j = 2; res && (j < nch); j += 2) res = (validate_comma(CHILD(tree, j)) && validate_dotted_as_name(CHILD(tree, j + 1))); } else if (res && (res = validate_name(CHILD(tree, 0), "from"))) { res = ((nch >= 4) && is_even(nch) && validate_dotted_name(CHILD(tree, 1)) && validate_name(CHILD(tree, 2), "import")); if (nch == 4) { if (TYPE(CHILD(tree, 3)) == import_as_name) res = validate_import_as_name(CHILD(tree, 3)); else res = validate_star(CHILD(tree, 3)); } else { /* 'from' dotted_name 'import' import_as_name * (',' import_as_name)+ */ int j; res = validate_import_as_name(CHILD(tree, 3)); for (j = 4; res && (j < nch); j += 2) res = (validate_comma(CHILD(tree, j)) && validate_import_as_name(CHILD(tree, j + 1))); } } else res = 0; return (res); } static int validate_global_stmt(node *tree) { int j; int nch = NCH(tree); int res = (validate_ntype(tree, global_stmt) && is_even(nch) && (nch >= 2)); if (!res && !PyErr_Occurred()) err_string("illegal global statement"); if (res) res = (validate_name(CHILD(tree, 0), "global") && validate_ntype(CHILD(tree, 1), NAME)); for (j = 2; res && (j < nch); j += 2) res = (validate_comma(CHILD(tree, j)) && validate_ntype(CHILD(tree, j + 1), NAME)); return (res); } /* exec_stmt: * * 'exec' expr ['in' test [',' test]] */ static int validate_exec_stmt(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, exec_stmt) && ((nch == 2) || (nch == 4) || (nch == 6)) && validate_name(CHILD(tree, 0), "exec") && validate_expr(CHILD(tree, 1))); if (!res && !PyErr_Occurred()) err_string("illegal exec statement"); if (res && (nch > 2)) res = (validate_name(CHILD(tree, 2), "in") && validate_test(CHILD(tree, 3))); if (res && (nch == 6)) res = (validate_comma(CHILD(tree, 4)) && validate_test(CHILD(tree, 5))); return (res); } /* assert_stmt: * * 'assert' test [',' test] */ static int validate_assert_stmt(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, assert_stmt) && ((nch == 2) || (nch == 4)) && (validate_name(CHILD(tree, 0), "assert")) && validate_test(CHILD(tree, 1))); if (!res && !PyErr_Occurred()) err_string("illegal assert statement"); if (res && (nch > 2)) res = (validate_comma(CHILD(tree, 2)) && validate_test(CHILD(tree, 3))); return (res); } static int validate_while(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, while_stmt) && ((nch == 4) || (nch == 7)) && validate_name(CHILD(tree, 0), "while") && validate_test(CHILD(tree, 1)) && validate_colon(CHILD(tree, 2)) && validate_suite(CHILD(tree, 3))); if (res && (nch == 7)) res = (validate_name(CHILD(tree, 4), "else") && validate_colon(CHILD(tree, 5)) && validate_suite(CHILD(tree, 6))); return (res); } static int validate_for(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, for_stmt) && ((nch == 6) || (nch == 9)) && validate_name(CHILD(tree, 0), "for") && validate_exprlist(CHILD(tree, 1)) && validate_name(CHILD(tree, 2), "in") && validate_testlist(CHILD(tree, 3)) && validate_colon(CHILD(tree, 4)) && validate_suite(CHILD(tree, 5))); if (res && (nch == 9)) res = (validate_name(CHILD(tree, 6), "else") && validate_colon(CHILD(tree, 7)) && validate_suite(CHILD(tree, 8))); return (res); } /* try_stmt: * 'try' ':' suite (except_clause ':' suite)+ ['else' ':' suite] * | 'try' ':' suite 'finally' ':' suite * */ static int validate_try(node *tree) { int nch = NCH(tree); int pos = 3; int res = (validate_ntype(tree, try_stmt) && (nch >= 6) && ((nch % 3) == 0)); if (res) res = (validate_name(CHILD(tree, 0), "try") && validate_colon(CHILD(tree, 1)) && validate_suite(CHILD(tree, 2)) && validate_colon(CHILD(tree, nch - 2)) && validate_suite(CHILD(tree, nch - 1))); else if (!PyErr_Occurred()) { const char* name = "except"; if (TYPE(CHILD(tree, nch - 3)) != except_clause) name = STR(CHILD(tree, nch - 3)); PyErr_Format(parser_error, "Illegal number of children for try/%s node.", name); } /* Skip past except_clause sections: */ while (res && (TYPE(CHILD(tree, pos)) == except_clause)) { res = (validate_except_clause(CHILD(tree, pos)) && validate_colon(CHILD(tree, pos + 1)) && validate_suite(CHILD(tree, pos + 2))); pos += 3; } if (res && (pos < nch)) { res = validate_ntype(CHILD(tree, pos), NAME); if (res && (strcmp(STR(CHILD(tree, pos)), "finally") == 0)) res = (validate_numnodes(tree, 6, "try/finally") && validate_colon(CHILD(tree, 4)) && validate_suite(CHILD(tree, 5))); else if (res) { if (nch == (pos + 3)) { res = ((strcmp(STR(CHILD(tree, pos)), "except") == 0) || (strcmp(STR(CHILD(tree, pos)), "else") == 0)); if (!res) err_string("illegal trailing triple in try statement"); } else if (nch == (pos + 6)) { res = (validate_name(CHILD(tree, pos), "except") && validate_colon(CHILD(tree, pos + 1)) && validate_suite(CHILD(tree, pos + 2)) && validate_name(CHILD(tree, pos + 3), "else")); } else res = validate_numnodes(tree, pos + 3, "try/except"); } } return (res); } static int validate_except_clause(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, except_clause) && ((nch == 1) || (nch == 2) || (nch == 4)) && validate_name(CHILD(tree, 0), "except")); if (res && (nch > 1)) res = validate_test(CHILD(tree, 1)); if (res && (nch == 4)) res = (validate_comma(CHILD(tree, 2)) && validate_test(CHILD(tree, 3))); return (res); } static int validate_test(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, test) && is_odd(nch); if (res && (TYPE(CHILD(tree, 0)) == lambdef)) res = ((nch == 1) && validate_lambdef(CHILD(tree, 0))); else if (res) { int pos; res = validate_and_test(CHILD(tree, 0)); for (pos = 1; res && (pos < nch); pos += 2) res = (validate_name(CHILD(tree, pos), "or") && validate_and_test(CHILD(tree, pos + 1))); } return (res); } static int validate_and_test(node *tree) { int pos; int nch = NCH(tree); int res = (validate_ntype(tree, and_test) && is_odd(nch) && validate_not_test(CHILD(tree, 0))); for (pos = 1; res && (pos < nch); pos += 2) res = (validate_name(CHILD(tree, pos), "and") && validate_not_test(CHILD(tree, 0))); return (res); } static int validate_not_test(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, not_test) && ((nch == 1) || (nch == 2)); if (res) { if (nch == 2) res = (validate_name(CHILD(tree, 0), "not") && validate_not_test(CHILD(tree, 1))); else if (nch == 1) res = validate_comparison(CHILD(tree, 0)); } return (res); } static int validate_comparison(node *tree) { int pos; int nch = NCH(tree); int res = (validate_ntype(tree, comparison) && is_odd(nch) && validate_expr(CHILD(tree, 0))); for (pos = 1; res && (pos < nch); pos += 2) res = (validate_comp_op(CHILD(tree, pos)) && validate_expr(CHILD(tree, pos + 1))); return (res); } static int validate_comp_op(node *tree) { int res = 0; int nch = NCH(tree); if (!validate_ntype(tree, comp_op)) return (0); if (nch == 1) { /* * Only child will be a terminal with a well-defined symbolic name * or a NAME with a string of either 'is' or 'in' */ tree = CHILD(tree, 0); switch (TYPE(tree)) { case LESS: case GREATER: case EQEQUAL: case EQUAL: case LESSEQUAL: case GREATEREQUAL: case NOTEQUAL: res = 1; break; case NAME: res = ((strcmp(STR(tree), "in") == 0) || (strcmp(STR(tree), "is") == 0)); if (!res) { PyErr_Format(parser_error, "illegal operator '%s'", STR(tree)); } break; default: err_string("illegal comparison operator type"); break; } } else if ((res = validate_numnodes(tree, 2, "comp_op")) != 0) { res = (validate_ntype(CHILD(tree, 0), NAME) && validate_ntype(CHILD(tree, 1), NAME) && (((strcmp(STR(CHILD(tree, 0)), "is") == 0) && (strcmp(STR(CHILD(tree, 1)), "not") == 0)) || ((strcmp(STR(CHILD(tree, 0)), "not") == 0) && (strcmp(STR(CHILD(tree, 1)), "in") == 0)))); if (!res && !PyErr_Occurred()) err_string("unknown comparison operator"); } return (res); } static int validate_expr(node *tree) { int j; int nch = NCH(tree); int res = (validate_ntype(tree, expr) && is_odd(nch) && validate_xor_expr(CHILD(tree, 0))); for (j = 2; res && (j < nch); j += 2) res = (validate_xor_expr(CHILD(tree, j)) && validate_vbar(CHILD(tree, j - 1))); return (res); } static int validate_xor_expr(node *tree) { int j; int nch = NCH(tree); int res = (validate_ntype(tree, xor_expr) && is_odd(nch) && validate_and_expr(CHILD(tree, 0))); for (j = 2; res && (j < nch); j += 2) res = (validate_circumflex(CHILD(tree, j - 1)) && validate_and_expr(CHILD(tree, j))); return (res); } static int validate_and_expr(node *tree) { int pos; int nch = NCH(tree); int res = (validate_ntype(tree, and_expr) && is_odd(nch) && validate_shift_expr(CHILD(tree, 0))); for (pos = 1; res && (pos < nch); pos += 2) res = (validate_ampersand(CHILD(tree, pos)) && validate_shift_expr(CHILD(tree, pos + 1))); return (res); } static int validate_chain_two_ops(node *tree, int (*termvalid)(node *), int op1, int op2) { int pos = 1; int nch = NCH(tree); int res = (is_odd(nch) && (*termvalid)(CHILD(tree, 0))); for ( ; res && (pos < nch); pos += 2) { if (TYPE(CHILD(tree, pos)) != op1) res = validate_ntype(CHILD(tree, pos), op2); if (res) res = (*termvalid)(CHILD(tree, pos + 1)); } return (res); } static int validate_shift_expr(node *tree) { return (validate_ntype(tree, shift_expr) && validate_chain_two_ops(tree, validate_arith_expr, LEFTSHIFT, RIGHTSHIFT)); } static int validate_arith_expr(node *tree) { return (validate_ntype(tree, arith_expr) && validate_chain_two_ops(tree, validate_term, PLUS, MINUS)); } static int validate_term(node *tree) { int pos = 1; int nch = NCH(tree); int res = (validate_ntype(tree, term) && is_odd(nch) && validate_factor(CHILD(tree, 0))); for ( ; res && (pos < nch); pos += 2) res = (((TYPE(CHILD(tree, pos)) == STAR) || (TYPE(CHILD(tree, pos)) == SLASH) || (TYPE(CHILD(tree, pos)) == DOUBLESLASH) || (TYPE(CHILD(tree, pos)) == PERCENT)) && validate_factor(CHILD(tree, pos + 1))); return (res); } /* factor: * * factor: ('+'|'-'|'~') factor | power */ static int validate_factor(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, factor) && (((nch == 2) && ((TYPE(CHILD(tree, 0)) == PLUS) || (TYPE(CHILD(tree, 0)) == MINUS) || (TYPE(CHILD(tree, 0)) == TILDE)) && validate_factor(CHILD(tree, 1))) || ((nch == 1) && validate_power(CHILD(tree, 0))))); return (res); } /* power: * * power: atom trailer* ('**' factor)* */ static int validate_power(node *tree) { int pos = 1; int nch = NCH(tree); int res = (validate_ntype(tree, power) && (nch >= 1) && validate_atom(CHILD(tree, 0))); while (res && (pos < nch) && (TYPE(CHILD(tree, pos)) == trailer)) res = validate_trailer(CHILD(tree, pos++)); if (res && (pos < nch)) { if (!is_even(nch - pos)) { err_string("illegal number of nodes for 'power'"); return (0); } for ( ; res && (pos < (nch - 1)); pos += 2) res = (validate_doublestar(CHILD(tree, pos)) && validate_factor(CHILD(tree, pos + 1))); } return (res); } static int validate_atom(node *tree) { int pos; int nch = NCH(tree); int res = validate_ntype(tree, atom); if (res && nch < 1) res = validate_numnodes(tree, nch+1, "atom"); if (res) { switch (TYPE(CHILD(tree, 0))) { case LPAR: res = ((nch <= 3) && (validate_rparen(CHILD(tree, nch - 1)))); if (res && (nch == 3)) res = validate_testlist(CHILD(tree, 1)); break; case LSQB: if (nch == 2) res = validate_ntype(CHILD(tree, 1), RSQB); else if (nch == 3) res = (validate_listmaker(CHILD(tree, 1)) && validate_ntype(CHILD(tree, 2), RSQB)); else { res = 0; err_string("illegal list display atom"); } break; case LBRACE: res = ((nch <= 3) && validate_ntype(CHILD(tree, nch - 1), RBRACE)); if (res && (nch == 3)) res = validate_dictmaker(CHILD(tree, 1)); break; case BACKQUOTE: res = ((nch == 3) && validate_testlist1(CHILD(tree, 1)) && validate_ntype(CHILD(tree, 2), BACKQUOTE)); break; case NAME: case NUMBER: res = (nch == 1); break; case STRING: for (pos = 1; res && (pos < nch); ++pos) res = validate_ntype(CHILD(tree, pos), STRING); break; default: res = 0; break; } } return (res); } /* listmaker: * test ( list_for | (',' test)* [','] ) */ static int validate_listmaker(node *tree) { int nch = NCH(tree); int ok = nch; if (nch == 0) err_string("missing child nodes of listmaker"); else ok = validate_test(CHILD(tree, 0)); /* * list_iter | (',' test)* [','] */ if (nch == 2 && TYPE(CHILD(tree, 1)) == list_for) ok = validate_list_for(CHILD(tree, 1)); else { /* (',' test)* [','] */ int i = 1; while (ok && nch - i >= 2) { ok = (validate_comma(CHILD(tree, i)) && validate_test(CHILD(tree, i+1))); i += 2; } if (ok && i == nch-1) ok = validate_comma(CHILD(tree, i)); else if (i != nch) { ok = 0; err_string("illegal trailing nodes for listmaker"); } } return ok; } /* funcdef: * 'def' NAME parameters ':' suite * */ static int validate_funcdef(node *tree) { return (validate_ntype(tree, funcdef) && validate_numnodes(tree, 5, "funcdef") && validate_name(CHILD(tree, 0), "def") && validate_ntype(CHILD(tree, 1), NAME) && validate_colon(CHILD(tree, 3)) && validate_parameters(CHILD(tree, 2)) && validate_suite(CHILD(tree, 4))); } static int validate_lambdef(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, lambdef) && ((nch == 3) || (nch == 4)) && validate_name(CHILD(tree, 0), "lambda") && validate_colon(CHILD(tree, nch - 2)) && validate_test(CHILD(tree, nch - 1))); if (res && (nch == 4)) res = validate_varargslist(CHILD(tree, 1)); else if (!res && !PyErr_Occurred()) (void) validate_numnodes(tree, 3, "lambdef"); return (res); } /* arglist: * * (argument ',')* (argument [','] | '*' test [',' '**' test] | '**' test) */ static int validate_arglist(node *tree) { int nch = NCH(tree); int i = 0; int ok = 1; if (nch <= 0) /* raise the right error from having an invalid number of children */ return validate_numnodes(tree, nch + 1, "arglist"); while (ok && nch-i >= 2) { /* skip leading (argument ',') */ ok = (validate_argument(CHILD(tree, i)) && validate_comma(CHILD(tree, i+1))); if (ok) i += 2; else PyErr_Clear(); } ok = 1; if (nch-i > 0) { /* * argument | '*' test [',' '**' test] | '**' test */ int sym = TYPE(CHILD(tree, i)); if (sym == argument) { ok = validate_argument(CHILD(tree, i)); if (ok && i+1 != nch) { err_string("illegal arglist specification" " (extra stuff on end)"); ok = 0; } } else if (sym == STAR) { ok = validate_star(CHILD(tree, i)); if (ok && (nch-i == 2)) ok = validate_test(CHILD(tree, i+1)); else if (ok && (nch-i == 5)) ok = (validate_test(CHILD(tree, i+1)) && validate_comma(CHILD(tree, i+2)) && validate_doublestar(CHILD(tree, i+3)) && validate_test(CHILD(tree, i+4))); else { err_string("illegal use of '*' in arglist"); ok = 0; } } else if (sym == DOUBLESTAR) { if (nch-i == 2) ok = (validate_doublestar(CHILD(tree, i)) && validate_test(CHILD(tree, i+1))); else { err_string("illegal use of '**' in arglist"); ok = 0; } } else { err_string("illegal arglist specification"); ok = 0; } } return (ok); } /* argument: * * [test '='] test */ static int validate_argument(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, argument) && ((nch == 1) || (nch == 3)) && validate_test(CHILD(tree, 0))); if (res && (nch == 3)) res = (validate_equal(CHILD(tree, 1)) && validate_test(CHILD(tree, 2))); return (res); } /* trailer: * * '(' [arglist] ')' | '[' subscriptlist ']' | '.' NAME */ static int validate_trailer(node *tree) { int nch = NCH(tree); int res = validate_ntype(tree, trailer) && ((nch == 2) || (nch == 3)); if (res) { switch (TYPE(CHILD(tree, 0))) { case LPAR: res = validate_rparen(CHILD(tree, nch - 1)); if (res && (nch == 3)) res = validate_arglist(CHILD(tree, 1)); break; case LSQB: res = (validate_numnodes(tree, 3, "trailer") && validate_subscriptlist(CHILD(tree, 1)) && validate_ntype(CHILD(tree, 2), RSQB)); break; case DOT: res = (validate_numnodes(tree, 2, "trailer") && validate_ntype(CHILD(tree, 1), NAME)); break; default: res = 0; break; } } else { (void) validate_numnodes(tree, 2, "trailer"); } return (res); } /* subscriptlist: * * subscript (',' subscript)* [','] */ static int validate_subscriptlist(node *tree) { return (validate_repeating_list(tree, subscriptlist, validate_subscript, "subscriptlist")); } /* subscript: * * '.' '.' '.' | test | [test] ':' [test] [sliceop] */ static int validate_subscript(node *tree) { int offset = 0; int nch = NCH(tree); int res = validate_ntype(tree, subscript) && (nch >= 1) && (nch <= 4); if (!res) { if (!PyErr_Occurred()) err_string("invalid number of arguments for subscript node"); return (0); } if (TYPE(CHILD(tree, 0)) == DOT) /* take care of ('.' '.' '.') possibility */ return (validate_numnodes(tree, 3, "subscript") && validate_dot(CHILD(tree, 0)) && validate_dot(CHILD(tree, 1)) && validate_dot(CHILD(tree, 2))); if (nch == 1) { if (TYPE(CHILD(tree, 0)) == test) res = validate_test(CHILD(tree, 0)); else res = validate_colon(CHILD(tree, 0)); return (res); } /* Must be [test] ':' [test] [sliceop], * but at least one of the optional components will * be present, but we don't know which yet. */ if ((TYPE(CHILD(tree, 0)) != COLON) || (nch == 4)) { res = validate_test(CHILD(tree, 0)); offset = 1; } if (res) res = validate_colon(CHILD(tree, offset)); if (res) { int rem = nch - ++offset; if (rem) { if (TYPE(CHILD(tree, offset)) == test) { res = validate_test(CHILD(tree, offset)); ++offset; --rem; } if (res && rem) res = validate_sliceop(CHILD(tree, offset)); } } return (res); } static int validate_sliceop(node *tree) { int nch = NCH(tree); int res = ((nch == 1) || validate_numnodes(tree, 2, "sliceop")) && validate_ntype(tree, sliceop); if (!res && !PyErr_Occurred()) { res = validate_numnodes(tree, 1, "sliceop"); } if (res) res = validate_colon(CHILD(tree, 0)); if (res && (nch == 2)) res = validate_test(CHILD(tree, 1)); return (res); } static int validate_exprlist(node *tree) { return (validate_repeating_list(tree, exprlist, validate_expr, "exprlist")); } static int validate_dictmaker(node *tree) { int nch = NCH(tree); int res = (validate_ntype(tree, dictmaker) && (nch >= 3) && validate_test(CHILD(tree, 0)) && validate_colon(CHILD(tree, 1)) && validate_test(CHILD(tree, 2))); if (res && ((nch % 4) == 0)) res = validate_comma(CHILD(tree, --nch)); else if (res) res = ((nch % 4) == 3); if (res && (nch > 3)) { int pos = 3; /* ( ',' test ':' test )* */ while (res && (pos < nch)) { res = (validate_comma(CHILD(tree, pos)) && validate_test(CHILD(tree, pos + 1)) && validate_colon(CHILD(tree, pos + 2)) && validate_test(CHILD(tree, pos + 3))); pos += 4; } } return (res); } static int validate_eval_input(node *tree) { int pos; int nch = NCH(tree); int res = (validate_ntype(tree, eval_input) && (nch >= 2) && validate_testlist(CHILD(tree, 0)) && validate_ntype(CHILD(tree, nch - 1), ENDMARKER)); for (pos = 1; res && (pos < (nch - 1)); ++pos) res = validate_ntype(CHILD(tree, pos), NEWLINE); return (res); } static int validate_node(node *tree) { int nch = 0; /* num. children on current node */ int res = 1; /* result value */ node* next = 0; /* node to process after this one */ while (res && (tree != 0)) { nch = NCH(tree); next = 0; switch (TYPE(tree)) { /* * Definition nodes. */ case funcdef: res = validate_funcdef(tree); break; case classdef: res = validate_class(tree); break; /* * "Trivial" parse tree nodes. * (Why did I call these trivial?) */ case stmt: res = validate_stmt(tree); break; case small_stmt: /* * expr_stmt | print_stmt | del_stmt | pass_stmt | flow_stmt * | import_stmt | global_stmt | exec_stmt | assert_stmt */ res = validate_small_stmt(tree); break; case flow_stmt: res = (validate_numnodes(tree, 1, "flow_stmt") && ((TYPE(CHILD(tree, 0)) == break_stmt) || (TYPE(CHILD(tree, 0)) == continue_stmt) || (TYPE(CHILD(tree, 0)) == yield_stmt) || (TYPE(CHILD(tree, 0)) == return_stmt) || (TYPE(CHILD(tree, 0)) == raise_stmt))); if (res) next = CHILD(tree, 0); else if (nch == 1) err_string("illegal flow_stmt type"); break; case yield_stmt: res = validate_yield_stmt(tree); break; /* * Compound statements. */ case simple_stmt: res = validate_simple_stmt(tree); break; case compound_stmt: res = validate_compound_stmt(tree); break; /* * Fundamental statements. */ case expr_stmt: res = validate_expr_stmt(tree); break; case print_stmt: res = validate_print_stmt(tree); break; case del_stmt: res = validate_del_stmt(tree); break; case pass_stmt: res = (validate_numnodes(tree, 1, "pass") && validate_name(CHILD(tree, 0), "pass")); break; case break_stmt: res = (validate_numnodes(tree, 1, "break") && validate_name(CHILD(tree, 0), "break")); break; case continue_stmt: res = (validate_numnodes(tree, 1, "continue") && validate_name(CHILD(tree, 0), "continue")); break; case return_stmt: res = validate_return_stmt(tree); break; case raise_stmt: res = validate_raise_stmt(tree); break; case import_stmt: res = validate_import_stmt(tree); break; case global_stmt: res = validate_global_stmt(tree); break; case exec_stmt: res = validate_exec_stmt(tree); break; case assert_stmt: res = validate_assert_stmt(tree); break; case if_stmt: res = validate_if(tree); break; case while_stmt: res = validate_while(tree); break; case for_stmt: res = validate_for(tree); break; case try_stmt: res = validate_try(tree); break; case suite: res = validate_suite(tree); break; /* * Expression nodes. */ case testlist: res = validate_testlist(tree); break; case testlist1: res = validate_testlist1(tree); break; case test: res = validate_test(tree); break; case and_test: res = validate_and_test(tree); break; case not_test: res = validate_not_test(tree); break; case comparison: res = validate_comparison(tree); break; case exprlist: res = validate_exprlist(tree); break; case comp_op: res = validate_comp_op(tree); break; case expr: res = validate_expr(tree); break; case xor_expr: res = validate_xor_expr(tree); break; case and_expr: res = validate_and_expr(tree); break; case shift_expr: res = validate_shift_expr(tree); break; case arith_expr: res = validate_arith_expr(tree); break; case term: res = validate_term(tree); break; case factor: res = validate_factor(tree); break; case power: res = validate_power(tree); break; case atom: res = validate_atom(tree); break; default: /* Hopefully never reached! */ err_string("unrecognized node type"); res = 0; break; } tree = next; } return (res); } static int validate_expr_tree(node *tree) { int res = validate_eval_input(tree); if (!res && !PyErr_Occurred()) err_string("could not validate expression tuple"); return (res); } /* file_input: * (NEWLINE | stmt)* ENDMARKER */ static int validate_file_input(node *tree) { int j; int nch = NCH(tree) - 1; int res = ((nch >= 0) && validate_ntype(CHILD(tree, nch), ENDMARKER)); for (j = 0; res && (j < nch); ++j) { if (TYPE(CHILD(tree, j)) == stmt) res = validate_stmt(CHILD(tree, j)); else res = validate_newline(CHILD(tree, j)); } /* This stays in to prevent any internal failures from getting to the * user. Hopefully, this won't be needed. If a user reports getting * this, we have some debugging to do. */ if (!res && !PyErr_Occurred()) err_string("VALIDATION FAILURE: report this to the maintainer!"); return (res); } static int validate_encoding_decl(node *tree) { int nch = NCH(tree); int res = ((nch == 1) && validate_file_input(CHILD(tree, 0))); if (!res && !PyErr_Occurred()) err_string("Error Parsing encoding_decl"); return res; } static PyObject* pickle_constructor = NULL; static PyObject* parser__pickler(PyObject *self, PyObject *args) { NOTE(ARGUNUSED(self)) PyObject *result = NULL; PyObject *st = NULL; PyObject *empty_dict = NULL; if (PyArg_ParseTuple(args, "O!:_pickler", &PyST_Type, &st)) { PyObject *newargs; PyObject *tuple; if ((empty_dict = PyDict_New()) == NULL) goto finally; if ((newargs = Py_BuildValue("Oi", st, 1)) == NULL) goto finally; tuple = parser_st2tuple((PyST_Object*)NULL, newargs, empty_dict); if (tuple != NULL) { result = Py_BuildValue("O(O)", pickle_constructor, tuple); Py_DECREF(tuple); } Py_DECREF(empty_dict); Py_DECREF(newargs); } finally: Py_XDECREF(empty_dict); return (result); } /* Functions exported by this module. Most of this should probably * be converted into an ST object with methods, but that is better * done directly in Python, allowing subclasses to be created directly. * We'd really have to write a wrapper around it all anyway to allow * inheritance. */ static PyMethodDef parser_functions[] = { {"ast2tuple", (PyCFunction)parser_st2tuple, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates a tuple-tree representation of an ST.")}, {"ast2list", (PyCFunction)parser_st2list, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates a list-tree representation of an ST.")}, {"compileast", (PyCFunction)parser_compilest, PUBLIC_METHOD_TYPE, PyDoc_STR("Compiles an ST object into a code object.")}, {"compilest", (PyCFunction)parser_compilest, PUBLIC_METHOD_TYPE, PyDoc_STR("Compiles an ST object into a code object.")}, {"expr", (PyCFunction)parser_expr, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates an ST object from an expression.")}, {"isexpr", (PyCFunction)parser_isexpr, PUBLIC_METHOD_TYPE, PyDoc_STR("Determines if an ST object was created from an expression.")}, {"issuite", (PyCFunction)parser_issuite, PUBLIC_METHOD_TYPE, PyDoc_STR("Determines if an ST object was created from a suite.")}, {"suite", (PyCFunction)parser_suite, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates an ST object from a suite.")}, {"sequence2ast", (PyCFunction)parser_tuple2st, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates an ST object from a tree representation.")}, {"sequence2st", (PyCFunction)parser_tuple2st, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates an ST object from a tree representation.")}, {"st2tuple", (PyCFunction)parser_st2tuple, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates a tuple-tree representation of an ST.")}, {"st2list", (PyCFunction)parser_st2list, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates a list-tree representation of an ST.")}, {"tuple2ast", (PyCFunction)parser_tuple2st, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates an ST object from a tree representation.")}, {"tuple2st", (PyCFunction)parser_tuple2st, PUBLIC_METHOD_TYPE, PyDoc_STR("Creates an ST object from a tree representation.")}, /* private stuff: support pickle module */ {"_pickler", (PyCFunction)parser__pickler, METH_VARARGS, PyDoc_STR("Returns the pickle magic to allow ST objects to be pickled.")}, {NULL, NULL, 0, NULL} }; PyMODINIT_FUNC initparser(void); /* supply a prototype */ PyMODINIT_FUNC initparser(void) { PyObject *module, *copyreg; PyST_Type.ob_type = &PyType_Type; module = Py_InitModule("parser", parser_functions); if (parser_error == 0) parser_error = PyErr_NewException("parser.ParserError", NULL, NULL); if (parser_error == 0) /* caller will check PyErr_Occurred() */ return; /* CAUTION: The code next used to skip bumping the refcount on * parser_error. That's a disaster if initparser() gets called more * than once. By incref'ing, we ensure that each module dict that * gets created owns its reference to the shared parser_error object, * and the file static parser_error vrbl owns a reference too. */ Py_INCREF(parser_error); if (PyModule_AddObject(module, "ParserError", parser_error) != 0) return; Py_INCREF(&PyST_Type); PyModule_AddObject(module, "ASTType", (PyObject*)&PyST_Type); Py_INCREF(&PyST_Type); PyModule_AddObject(module, "STType", (PyObject*)&PyST_Type); PyModule_AddStringConstant(module, "__copyright__", parser_copyright_string); PyModule_AddStringConstant(module, "__doc__", parser_doc_string); PyModule_AddStringConstant(module, "__version__", parser_version_string); /* Register to support pickling. * If this fails, the import of this module will fail because an * exception will be raised here; should we clear the exception? */ copyreg = PyImport_ImportModule("copy_reg"); if (copyreg != NULL) { PyObject *func, *pickler; func = PyObject_GetAttrString(copyreg, "pickle"); pickle_constructor = PyObject_GetAttrString(module, "sequence2st"); pickler = PyObject_GetAttrString(module, "_pickler"); Py_XINCREF(pickle_constructor); if ((func != NULL) && (pickle_constructor != NULL) && (pickler != NULL)) { PyObject *res; res = PyObject_CallFunction(func, "OOO", &PyST_Type, pickler, pickle_constructor); Py_XDECREF(res); } Py_XDECREF(func); Py_XDECREF(pickle_constructor); Py_XDECREF(pickler); Py_DECREF(copyreg); } } Python-2.3.7/Modules/unicodedata_db.h0000644001241000117560000100120607570364701016767 0ustar loewishpifb6/* this file was generated by Tools/unicode/makeunicodedata.py 2.2 */ #define UNIDATA_VERSION "3.2.0" /* a list of unique database records */ const _PyUnicode_DatabaseRecord _PyUnicode_Database_Records[] = { {0, 0, 0, 0}, {13, 0, 15, 0}, {13, 0, 17, 0}, {13, 0, 16, 0}, {13, 0, 18, 0}, {10, 0, 18, 0}, {26, 0, 19, 0}, {26, 0, 11, 0}, {28, 0, 11, 0}, {22, 0, 19, 1}, {23, 0, 19, 1}, {27, 0, 11, 0}, {26, 0, 13, 0}, {21, 0, 11, 0}, {26, 0, 10, 0}, {7, 0, 9, 0}, {27, 0, 19, 1}, {27, 0, 19, 0}, {1, 0, 1, 0}, {29, 0, 19, 0}, {20, 0, 19, 0}, {2, 0, 1, 0}, {10, 0, 13, 0}, {30, 0, 19, 0}, {24, 0, 19, 1}, {21, 0, 19, 0}, {30, 0, 11, 0}, {9, 0, 9, 0}, {25, 0, 19, 1}, {9, 0, 19, 0}, {19, 0, 1, 0}, {3, 0, 1, 0}, {18, 0, 1, 0}, {4, 230, 14, 0}, {4, 232, 14, 0}, {4, 220, 14, 0}, {4, 216, 14, 0}, {4, 202, 14, 0}, {4, 1, 14, 0}, {4, 240, 14, 0}, {4, 0, 14, 0}, {4, 234, 14, 0}, {4, 233, 14, 0}, {30, 0, 1, 0}, {6, 0, 14, 0}, {26, 0, 1, 0}, {4, 222, 14, 0}, {4, 228, 14, 0}, {4, 10, 14, 0}, {4, 11, 14, 0}, {4, 12, 14, 0}, {4, 13, 14, 0}, {4, 14, 14, 0}, {4, 15, 14, 0}, {4, 16, 14, 0}, {4, 17, 14, 0}, {4, 18, 14, 0}, {4, 19, 14, 0}, {4, 20, 14, 0}, {4, 21, 14, 0}, {4, 22, 14, 0}, {26, 0, 4, 0}, {4, 23, 14, 0}, {4, 24, 14, 0}, {4, 25, 14, 0}, {19, 0, 4, 0}, {26, 0, 5, 0}, {19, 0, 5, 0}, {18, 0, 5, 0}, {4, 27, 14, 0}, {4, 28, 14, 0}, {4, 29, 14, 0}, {4, 30, 14, 0}, {4, 31, 14, 0}, {4, 32, 14, 0}, {4, 33, 14, 0}, {4, 34, 14, 0}, {7, 0, 12, 0}, {26, 0, 12, 0}, {4, 35, 14, 0}, {14, 0, 5, 0}, {30, 0, 5, 0}, {14, 0, 15, 0}, {4, 36, 14, 0}, {5, 0, 1, 0}, {4, 7, 14, 0}, {4, 9, 14, 0}, {7, 0, 1, 0}, {9, 0, 1, 0}, {4, 84, 14, 0}, {4, 91, 14, 0}, {4, 103, 14, 0}, {4, 107, 14, 0}, {4, 118, 14, 0}, {4, 122, 14, 0}, {22, 0, 19, 0}, {23, 0, 19, 0}, {4, 129, 14, 0}, {4, 130, 14, 0}, {4, 132, 14, 0}, {8, 0, 1, 0}, {10, 0, 15, 0}, {14, 0, 1, 0}, {14, 0, 4, 0}, {24, 0, 19, 0}, {25, 0, 19, 0}, {11, 0, 18, 0}, {12, 0, 16, 0}, {14, 0, 2, 0}, {14, 0, 6, 0}, {14, 0, 8, 0}, {14, 0, 3, 0}, {14, 0, 7, 0}, {4, 218, 14, 0}, {4, 224, 14, 0}, {4, 8, 14, 0}, {15, 0, 1, 0}, {16, 0, 1, 0}, {4, 26, 14, 0}, {28, 0, 5, 0}, {5, 216, 1, 0}, {5, 226, 1, 0}, {27, 0, 1, 0}, }; /* Reindexing of NFC first characters. */ #define TOTAL_FIRST 356 #define TOTAL_LAST 53 struct reindex{int start;short count,index;}; struct reindex nfc_first[] = { { 60, 2, 0}, { 65, 15, 3}, { 82, 8, 19}, { 97, 15, 28}, { 114, 8, 44}, { 168, 0, 53}, { 194, 0, 54}, { 196, 3, 55}, { 202, 0, 59}, { 207, 0, 60}, { 212, 2, 61}, { 216, 0, 64}, { 220, 0, 65}, { 226, 0, 66}, { 228, 3, 67}, { 234, 0, 71}, { 239, 0, 72}, { 244, 2, 73}, { 248, 0, 76}, { 252, 0, 77}, { 258, 1, 78}, { 274, 1, 80}, { 332, 1, 82}, { 346, 1, 84}, { 352, 1, 86}, { 360, 3, 88}, { 383, 0, 92}, { 416, 1, 93}, { 431, 1, 95}, { 439, 0, 97}, { 490, 1, 98}, { 550, 3, 100}, { 558, 1, 104}, { 658, 0, 106}, { 913, 0, 107}, { 917, 0, 108}, { 919, 0, 109}, { 921, 0, 110}, { 927, 0, 111}, { 929, 0, 112}, { 933, 0, 113}, { 937, 0, 114}, { 940, 0, 115}, { 942, 0, 116}, { 945, 0, 117}, { 949, 0, 118}, { 951, 0, 119}, { 953, 0, 120}, { 959, 0, 121}, { 961, 0, 122}, { 965, 0, 123}, { 969, 2, 124}, { 974, 0, 127}, { 978, 0, 128}, { 1030, 0, 129}, { 1040, 0, 130}, { 1043, 0, 131}, { 1045, 3, 132}, { 1050, 0, 136}, { 1054, 0, 137}, { 1059, 0, 138}, { 1063, 0, 139}, { 1067, 0, 140}, { 1069, 0, 141}, { 1072, 0, 142}, { 1075, 0, 143}, { 1077, 3, 144}, { 1082, 0, 148}, { 1086, 0, 149}, { 1091, 0, 150}, { 1095, 0, 151}, { 1099, 0, 152}, { 1101, 0, 153}, { 1110, 0, 154}, { 1140, 1, 155}, { 1240, 1, 157}, { 1256, 1, 159}, { 1575, 0, 161}, { 1608, 0, 162}, { 1610, 0, 163}, { 1729, 0, 164}, { 1746, 0, 165}, { 1749, 0, 166}, { 2344, 0, 167}, { 2352, 0, 168}, { 2355, 0, 169}, { 2503, 0, 170}, { 2887, 0, 171}, { 2962, 0, 172}, { 3014, 1, 173}, { 3142, 0, 175}, { 3263, 0, 176}, { 3270, 0, 177}, { 3274, 0, 178}, { 3398, 1, 179}, { 3545, 0, 181}, { 3548, 0, 182}, { 4133, 0, 183}, { 7734, 1, 184}, { 7770, 1, 186}, { 7778, 1, 188}, { 7840, 1, 190}, { 7864, 1, 192}, { 7884, 1, 194}, { 7936, 17, 196}, { 7960, 1, 214}, { 7968, 17, 216}, { 7992, 1, 234}, { 8000, 1, 236}, { 8008, 1, 238}, { 8016, 1, 240}, { 8025, 0, 242}, { 8032, 16, 243}, { 8052, 0, 260}, { 8060, 0, 261}, { 8118, 0, 262}, { 8127, 0, 263}, { 8134, 0, 264}, { 8182, 0, 265}, { 8190, 0, 266}, { 8592, 0, 267}, { 8594, 0, 268}, { 8596, 0, 269}, { 8656, 0, 270}, { 8658, 0, 271}, { 8660, 0, 272}, { 8707, 0, 273}, { 8712, 0, 274}, { 8715, 0, 275}, { 8739, 0, 276}, { 8741, 0, 277}, { 8764, 0, 278}, { 8771, 0, 279}, { 8773, 0, 280}, { 8776, 0, 281}, { 8781, 0, 282}, { 8801, 0, 283}, { 8804, 1, 284}, { 8818, 1, 286}, { 8822, 1, 288}, { 8826, 3, 290}, { 8834, 1, 294}, { 8838, 1, 296}, { 8849, 1, 298}, { 8866, 0, 300}, { 8872, 1, 301}, { 8875, 0, 303}, { 8882, 3, 304}, { 12358, 0, 308}, { 12363, 0, 309}, { 12365, 0, 310}, { 12367, 0, 311}, { 12369, 0, 312}, { 12371, 0, 313}, { 12373, 0, 314}, { 12375, 0, 315}, { 12377, 0, 316}, { 12379, 0, 317}, { 12381, 0, 318}, { 12383, 0, 319}, { 12385, 0, 320}, { 12388, 0, 321}, { 12390, 0, 322}, { 12392, 0, 323}, { 12399, 0, 324}, { 12402, 0, 325}, { 12405, 0, 326}, { 12408, 0, 327}, { 12411, 0, 328}, { 12445, 0, 329}, { 12454, 0, 330}, { 12459, 0, 331}, { 12461, 0, 332}, { 12463, 0, 333}, { 12465, 0, 334}, { 12467, 0, 335}, { 12469, 0, 336}, { 12471, 0, 337}, { 12473, 0, 338}, { 12475, 0, 339}, { 12477, 0, 340}, { 12479, 0, 341}, { 12481, 0, 342}, { 12484, 0, 343}, { 12486, 0, 344}, { 12488, 0, 345}, { 12495, 0, 346}, { 12498, 0, 347}, { 12501, 0, 348}, { 12504, 0, 349}, { 12507, 0, 350}, { 12527, 3, 351}, { 12541, 0, 355}, {0,0,0} }; struct reindex nfc_last[] = { { 768, 4, 0}, { 774, 6, 5}, { 783, 0, 12}, { 785, 0, 13}, { 787, 1, 14}, { 795, 0, 16}, { 803, 5, 17}, { 813, 1, 23}, { 816, 1, 25}, { 824, 0, 27}, { 834, 0, 28}, { 837, 0, 29}, { 1619, 2, 30}, { 2364, 0, 33}, { 2494, 0, 34}, { 2519, 0, 35}, { 2878, 0, 36}, { 2902, 1, 37}, { 3006, 0, 39}, { 3031, 0, 40}, { 3158, 0, 41}, { 3266, 0, 42}, { 3285, 1, 43}, { 3390, 0, 45}, { 3415, 0, 46}, { 3530, 0, 47}, { 3535, 0, 48}, { 3551, 0, 49}, { 4142, 0, 50}, { 12441, 1, 51}, {0,0,0} }; /* string literals */ const char *_PyUnicode_CategoryNames[] = { "Cn", "Lu", "Ll", "Lt", "Mn", "Mc", "Me", "Nd", "Nl", "No", "Zs", "Zl", "Zp", "Cc", "Cf", "Cs", "Co", "Cn", "Lm", "Lo", "Pc", "Pd", "Ps", "Pe", "Pi", "Pf", "Po", "Sm", "Sc", "Sk", "So", NULL }; const char *_PyUnicode_BidirectionalNames[] = { "", "L", "LRE", "LRO", "R", "AL", "RLE", "RLO", "PDF", "EN", "ES", "ET", "AN", "CS", "NSM", "BN", "B", "S", "WS", "ON", NULL }; static const char *decomp_prefix[] = { "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", NULL }; /* index tables for the database records */ #define SHIFT 8 static unsigned char index1[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 8, 8, 8, 8, 8, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 8, 8, 8, 38, 39, 40, 41, 42, 43, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 44, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 45, 21, 21, 21, 21, 46, 8, 8, 8, 8, 8, 8, 8, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 47, 48, 48, 48, 48, 48, 48, 48, 48, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 21, 50, 51, 52, 53, 54, 55, 8, 8, 8, 56, 57, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 58, 59, 8, 8, 60, 61, 62, 63, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 64, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 21, 21, 65, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 66, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 67, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 49, 67, }; static unsigned char index2[] = { 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 2, 4, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 2, 5, 6, 6, 7, 8, 7, 6, 6, 9, 10, 6, 11, 12, 13, 12, 14, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 12, 6, 16, 17, 16, 6, 6, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 9, 6, 10, 19, 20, 19, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 9, 17, 10, 17, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 22, 6, 8, 8, 8, 8, 23, 23, 19, 23, 21, 24, 17, 25, 23, 19, 26, 11, 27, 27, 19, 21, 23, 6, 19, 27, 21, 28, 29, 29, 29, 6, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 17, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 17, 21, 21, 21, 21, 21, 21, 21, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 18, 21, 18, 21, 18, 21, 21, 21, 18, 18, 21, 18, 21, 18, 18, 21, 18, 18, 18, 21, 21, 18, 18, 18, 18, 21, 18, 18, 21, 18, 18, 18, 21, 21, 21, 18, 18, 21, 18, 18, 21, 18, 21, 18, 21, 18, 18, 21, 18, 21, 21, 18, 21, 18, 18, 21, 18, 18, 18, 21, 18, 21, 18, 18, 21, 21, 30, 18, 21, 21, 21, 30, 30, 30, 30, 18, 31, 21, 18, 31, 21, 18, 31, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 21, 18, 31, 21, 18, 21, 18, 18, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 0, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 0, 0, 32, 32, 32, 32, 32, 32, 32, 32, 32, 19, 19, 32, 32, 32, 32, 32, 32, 32, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 32, 32, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 32, 32, 32, 32, 32, 19, 19, 19, 19, 19, 19, 19, 19, 19, 32, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 34, 35, 35, 35, 35, 34, 36, 35, 35, 35, 35, 35, 37, 37, 35, 35, 35, 35, 37, 37, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 35, 38, 38, 38, 38, 38, 35, 35, 35, 35, 33, 33, 33, 33, 33, 33, 33, 33, 39, 33, 35, 35, 35, 33, 33, 33, 35, 35, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 41, 41, 42, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 33, 0, 0, 0, 0, 19, 19, 0, 0, 0, 0, 32, 0, 0, 0, 6, 0, 0, 0, 0, 0, 19, 19, 18, 6, 18, 18, 18, 0, 18, 0, 18, 18, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 0, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 0, 21, 21, 18, 18, 18, 21, 21, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 21, 21, 21, 21, 18, 21, 17, 0, 0, 0, 0, 0, 0, 0, 0, 0, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 43, 33, 33, 33, 33, 0, 44, 44, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 0, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 0, 0, 18, 21, 0, 0, 0, 0, 0, 0, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 0, 0, 32, 45, 45, 45, 45, 45, 45, 0, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 0, 45, 25, 0, 0, 0, 0, 0, 0, 35, 33, 33, 33, 33, 35, 33, 33, 33, 46, 35, 33, 33, 33, 33, 33, 33, 0, 35, 35, 35, 35, 35, 33, 33, 35, 33, 33, 46, 47, 33, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 0, 58, 59, 60, 61, 62, 61, 63, 64, 61, 33, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 0, 0, 0, 0, 0, 65, 65, 65, 61, 61, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 66, 0, 0, 0, 66, 0, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 0, 0, 0, 0, 0, 68, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 69, 70, 71, 72, 73, 74, 75, 76, 33, 33, 35, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 77, 77, 77, 77, 77, 77, 77, 77, 77, 7, 78, 78, 66, 67, 67, 79, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 66, 67, 33, 33, 33, 33, 33, 33, 33, 80, 44, 33, 33, 33, 33, 35, 33, 68, 68, 33, 33, 23, 35, 33, 33, 35, 0, 0, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 67, 67, 67, 81, 81, 0, 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, 66, 0, 82, 67, 83, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 0, 0, 0, 33, 35, 33, 33, 35, 33, 33, 35, 35, 35, 33, 35, 35, 33, 35, 33, 33, 33, 35, 33, 35, 33, 35, 33, 35, 33, 33, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 67, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 40, 40, 84, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 85, 30, 84, 84, 84, 40, 40, 40, 40, 40, 40, 40, 40, 84, 84, 84, 84, 86, 0, 0, 30, 33, 35, 33, 33, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 40, 40, 45, 45, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 45, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 40, 84, 84, 0, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 0, 0, 30, 30, 30, 30, 0, 0, 85, 0, 84, 84, 84, 40, 40, 40, 40, 0, 0, 84, 84, 0, 0, 84, 84, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 0, 0, 0, 0, 30, 30, 0, 30, 30, 30, 40, 40, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 30, 30, 8, 8, 88, 88, 88, 88, 88, 88, 43, 0, 0, 0, 0, 0, 0, 0, 40, 0, 0, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 0, 30, 30, 0, 30, 30, 0, 0, 85, 0, 84, 84, 84, 40, 40, 0, 0, 0, 0, 40, 40, 0, 0, 40, 40, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 0, 30, 0, 0, 0, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 40, 40, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 40, 40, 84, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 0, 30, 30, 30, 30, 30, 0, 0, 85, 30, 84, 84, 84, 40, 40, 40, 40, 40, 0, 40, 40, 84, 0, 84, 84, 86, 0, 0, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 0, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 40, 84, 84, 0, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 0, 0, 30, 30, 30, 30, 0, 0, 85, 30, 84, 40, 84, 40, 40, 40, 0, 0, 0, 84, 84, 0, 0, 84, 84, 86, 0, 0, 0, 0, 0, 0, 0, 0, 40, 84, 0, 0, 0, 0, 30, 30, 0, 30, 30, 30, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 43, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 40, 30, 0, 30, 30, 30, 30, 30, 30, 0, 0, 0, 30, 30, 30, 0, 30, 30, 30, 30, 0, 0, 0, 30, 30, 0, 30, 0, 30, 30, 0, 0, 0, 30, 30, 0, 0, 0, 30, 30, 30, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 0, 0, 0, 0, 84, 84, 40, 84, 84, 0, 0, 0, 84, 84, 84, 0, 84, 84, 84, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 88, 88, 88, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 84, 84, 0, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 0, 0, 0, 0, 40, 40, 40, 84, 84, 84, 84, 0, 40, 40, 40, 0, 40, 40, 40, 86, 0, 0, 0, 0, 0, 0, 0, 89, 90, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 84, 0, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 0, 0, 0, 0, 84, 40, 84, 84, 84, 84, 84, 0, 40, 84, 84, 0, 84, 84, 40, 86, 0, 0, 0, 0, 0, 0, 0, 84, 84, 0, 0, 0, 0, 0, 0, 0, 30, 0, 30, 30, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 84, 0, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 84, 84, 84, 40, 40, 40, 0, 0, 84, 84, 84, 0, 84, 84, 84, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 84, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 86, 0, 0, 0, 0, 84, 84, 84, 40, 40, 40, 0, 40, 0, 84, 84, 84, 84, 84, 84, 84, 84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 84, 84, 45, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 40, 30, 30, 40, 40, 40, 40, 91, 91, 86, 0, 0, 0, 0, 8, 30, 30, 30, 30, 30, 30, 32, 40, 92, 92, 92, 92, 40, 40, 40, 45, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 45, 45, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 0, 30, 0, 0, 30, 30, 0, 30, 0, 0, 30, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 0, 30, 0, 30, 0, 0, 30, 30, 0, 30, 30, 30, 30, 40, 30, 30, 40, 40, 40, 40, 93, 93, 0, 40, 40, 30, 0, 0, 30, 30, 30, 30, 30, 0, 32, 0, 94, 94, 94, 94, 40, 40, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 0, 0, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 43, 43, 43, 45, 45, 45, 45, 45, 45, 45, 45, 45, 45, 45, 45, 45, 45, 45, 43, 43, 43, 43, 43, 35, 35, 43, 43, 43, 43, 43, 43, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 43, 35, 43, 35, 43, 36, 95, 96, 95, 96, 84, 84, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 97, 98, 40, 99, 40, 40, 40, 40, 40, 98, 98, 98, 98, 40, 84, 98, 40, 33, 33, 86, 45, 33, 33, 30, 30, 30, 30, 0, 0, 0, 0, 40, 40, 40, 40, 40, 40, 40, 40, 0, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 0, 43, 43, 43, 43, 43, 43, 43, 43, 35, 43, 43, 43, 43, 43, 43, 0, 0, 43, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 0, 30, 30, 0, 84, 40, 40, 40, 40, 84, 40, 0, 0, 0, 40, 85, 84, 86, 0, 0, 0, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 45, 45, 45, 45, 45, 45, 30, 30, 30, 30, 30, 30, 84, 84, 40, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 45, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 0, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 45, 45, 45, 45, 45, 45, 45, 45, 87, 87, 87, 87, 87, 87, 87, 87, 87, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 45, 45, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 95, 96, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 45, 45, 45, 100, 100, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 30, 40, 40, 86, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 40, 40, 86, 45, 45, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 40, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 30, 30, 30, 0, 40, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 84, 84, 84, 40, 40, 40, 40, 40, 40, 40, 84, 84, 84, 84, 84, 84, 84, 84, 40, 84, 84, 40, 40, 40, 40, 40, 40, 40, 40, 40, 86, 40, 45, 45, 45, 32, 45, 45, 45, 8, 30, 0, 0, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 6, 6, 6, 6, 6, 25, 6, 6, 6, 6, 40, 40, 40, 82, 0, 87, 87, 87, 87, 87, 87, 87, 87, 87, 87, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 32, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 47, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 21, 21, 21, 21, 21, 21, 0, 0, 0, 0, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 18, 21, 0, 0, 0, 0, 0, 0, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 0, 0, 18, 18, 18, 18, 18, 18, 0, 0, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 0, 0, 18, 18, 18, 18, 18, 18, 0, 0, 21, 21, 21, 21, 21, 21, 21, 21, 0, 18, 0, 18, 0, 18, 0, 18, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 0, 0, 21, 21, 21, 21, 21, 21, 21, 21, 31, 31, 31, 31, 31, 31, 31, 31, 21, 21, 21, 21, 21, 21, 21, 21, 31, 31, 31, 31, 31, 31, 31, 31, 21, 21, 21, 21, 21, 21, 21, 21, 31, 31, 31, 31, 31, 31, 31, 31, 21, 21, 21, 21, 21, 0, 21, 21, 18, 18, 18, 18, 31, 19, 21, 19, 19, 19, 21, 21, 21, 0, 21, 21, 18, 18, 18, 18, 31, 19, 19, 19, 21, 21, 21, 21, 0, 0, 21, 21, 18, 18, 18, 18, 0, 19, 19, 19, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 19, 19, 19, 0, 0, 21, 21, 21, 0, 21, 21, 18, 18, 18, 18, 31, 19, 19, 0, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 101, 82, 82, 102, 103, 25, 25, 25, 25, 25, 25, 6, 6, 104, 105, 95, 104, 104, 105, 95, 104, 6, 6, 6, 6, 6, 6, 6, 6, 106, 107, 108, 109, 110, 111, 112, 5, 7, 7, 7, 7, 7, 6, 6, 6, 6, 24, 28, 6, 6, 6, 6, 20, 20, 6, 6, 6, 17, 9, 10, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 17, 0, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 5, 82, 82, 82, 82, 0, 0, 0, 0, 0, 0, 82, 82, 82, 82, 82, 82, 27, 21, 0, 0, 27, 27, 27, 27, 27, 27, 11, 11, 17, 9, 10, 21, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 11, 11, 17, 9, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 33, 33, 38, 38, 33, 33, 33, 33, 38, 38, 38, 33, 33, 44, 44, 44, 44, 33, 44, 44, 44, 38, 38, 33, 35, 33, 38, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23, 23, 18, 23, 23, 23, 23, 18, 23, 23, 21, 18, 18, 18, 21, 21, 18, 18, 18, 21, 23, 18, 23, 23, 23, 18, 18, 18, 18, 18, 23, 23, 23, 23, 23, 23, 18, 23, 18, 23, 18, 23, 18, 18, 18, 18, 26, 21, 18, 18, 23, 18, 21, 30, 30, 30, 30, 21, 23, 0, 0, 21, 18, 18, 16, 17, 17, 17, 17, 18, 21, 21, 21, 21, 23, 17, 0, 0, 0, 0, 0, 0, 0, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 17, 17, 17, 17, 17, 23, 23, 23, 23, 23, 17, 17, 23, 23, 23, 23, 17, 23, 23, 17, 23, 23, 17, 23, 23, 23, 23, 23, 23, 23, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 17, 17, 23, 23, 17, 23, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 16, 16, 17, 17, 17, 16, 16, 16, 16, 16, 16, 17, 17, 17, 16, 11, 11, 17, 16, 16, 17, 17, 17, 16, 16, 16, 16, 17, 16, 16, 16, 16, 17, 16, 17, 16, 17, 17, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 17, 16, 17, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 16, 16, 16, 17, 17, 16, 16, 17, 17, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 23, 23, 23, 23, 23, 23, 23, 23, 16, 16, 16, 16, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 16, 16, 23, 23, 23, 23, 23, 23, 23, 9, 10, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 23, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 43, 23, 23, 23, 23, 23, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 95, 96, 6, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 27, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 17, 17, 17, 17, 17, 17, 17, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 23, 23, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23, 23, 23, 23, 0, 23, 23, 23, 23, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 23, 0, 23, 23, 23, 23, 0, 0, 0, 23, 0, 23, 23, 23, 23, 23, 23, 23, 0, 0, 23, 23, 23, 23, 23, 23, 23, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 23, 0, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 17, 17, 17, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 16, 16, 17, 17, 17, 16, 16, 16, 16, 9, 10, 9, 10, 9, 10, 0, 0, 0, 0, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 16, 17, 17, 17, 17, 17, 17, 17, 16, 16, 16, 16, 16, 16, 17, 17, 17, 16, 17, 17, 17, 17, 16, 16, 16, 16, 16, 17, 16, 16, 17, 17, 9, 10, 9, 10, 16, 17, 17, 17, 17, 16, 17, 16, 16, 16, 17, 17, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 16, 16, 16, 16, 17, 17, 9, 10, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 16, 16, 16, 16, 17, 17, 16, 17, 16, 17, 17, 16, 17, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 16, 17, 17, 17, 17, 17, 17, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 16, 16, 17, 17, 17, 17, 16, 16, 16, 16, 17, 16, 16, 17, 17, 16, 16, 17, 17, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 16, 16, 16, 16, 16, 16, 16, 16, 17, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 17, 16, 17, 17, 17, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 16, 16, 16, 17, 17, 17, 17, 16, 17, 17, 17, 16, 16, 16, 16, 16, 17, 16, 17, 17, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 5, 6, 6, 6, 23, 32, 30, 100, 9, 10, 9, 10, 9, 10, 9, 10, 9, 10, 23, 23, 9, 10, 9, 10, 9, 10, 9, 10, 25, 95, 96, 96, 23, 100, 100, 100, 100, 100, 100, 100, 100, 100, 113, 47, 34, 46, 114, 114, 25, 32, 32, 32, 32, 32, 23, 23, 100, 100, 100, 32, 30, 6, 23, 23, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 115, 115, 19, 19, 32, 32, 30, 25, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 20, 32, 32, 32, 30, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 43, 43, 88, 88, 88, 88, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 43, 88, 88, 88, 88, 88, 88, 88, 88, 88, 88, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 116, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21, 21, 21, 21, 21, 21, 21, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 21, 21, 21, 21, 21, 0, 0, 0, 0, 0, 65, 118, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 11, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 0, 65, 65, 65, 65, 65, 0, 65, 0, 65, 65, 0, 65, 65, 0, 65, 65, 65, 65, 65, 65, 65, 65, 65, 65, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 95, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 0, 0, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 119, 0, 0, 0, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 33, 33, 33, 33, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 25, 25, 20, 20, 95, 96, 95, 96, 95, 96, 95, 96, 95, 96, 95, 96, 95, 96, 95, 96, 6, 6, 0, 0, 6, 6, 6, 6, 20, 20, 20, 12, 6, 12, 0, 6, 12, 6, 6, 25, 95, 96, 95, 96, 95, 96, 7, 6, 6, 11, 13, 17, 17, 17, 0, 6, 8, 7, 6, 0, 0, 0, 0, 67, 67, 67, 67, 67, 0, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 67, 0, 0, 82, 0, 6, 6, 7, 8, 7, 6, 6, 9, 10, 6, 11, 12, 13, 12, 14, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 12, 6, 16, 17, 16, 6, 6, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 9, 6, 10, 19, 20, 19, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 9, 17, 10, 17, 9, 10, 6, 9, 10, 6, 20, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 32, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 32, 32, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 30, 30, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 0, 0, 30, 30, 30, 30, 30, 30, 0, 0, 30, 30, 30, 0, 0, 0, 8, 8, 17, 19, 23, 8, 8, 0, 23, 17, 17, 17, 17, 23, 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 82, 82, 23, 23, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 88, 88, 88, 88, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 0, 0, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 120, 120, 38, 38, 38, 43, 43, 43, 121, 120, 120, 120, 120, 120, 82, 82, 82, 82, 82, 82, 82, 82, 35, 35, 35, 35, 35, 35, 35, 35, 43, 43, 33, 33, 33, 33, 33, 35, 35, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 33, 33, 33, 33, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 43, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 0, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 0, 18, 18, 0, 0, 18, 0, 0, 18, 18, 0, 0, 18, 18, 18, 18, 0, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 0, 21, 0, 21, 21, 21, 21, 0, 21, 21, 0, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 0, 18, 18, 18, 18, 0, 0, 18, 18, 18, 18, 18, 18, 18, 18, 0, 18, 18, 18, 18, 18, 18, 18, 0, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 0, 18, 18, 18, 18, 0, 18, 18, 18, 18, 18, 0, 18, 0, 0, 0, 18, 18, 18, 18, 18, 18, 18, 0, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 0, 0, 0, 0, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 122, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 122, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 122, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 122, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 122, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 122, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 122, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 122, 21, 21, 21, 21, 21, 21, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, 122, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 122, 21, 21, 21, 21, 21, 21, 0, 0, 0, 0, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 117, 0, 0, }; /* decomposition data */ static unsigned int decomp_data[] = { 0, 257, 32, 514, 32, 776, 259, 97, 514, 32, 772, 259, 50, 259, 51, 514, 32, 769, 258, 956, 514, 32, 807, 259, 49, 259, 111, 772, 49, 8260, 52, 772, 49, 8260, 50, 772, 51, 8260, 52, 512, 65, 768, 512, 65, 769, 512, 65, 770, 512, 65, 771, 512, 65, 776, 512, 65, 778, 512, 67, 807, 512, 69, 768, 512, 69, 769, 512, 69, 770, 512, 69, 776, 512, 73, 768, 512, 73, 769, 512, 73, 770, 512, 73, 776, 512, 78, 771, 512, 79, 768, 512, 79, 769, 512, 79, 770, 512, 79, 771, 512, 79, 776, 512, 85, 768, 512, 85, 769, 512, 85, 770, 512, 85, 776, 512, 89, 769, 512, 97, 768, 512, 97, 769, 512, 97, 770, 512, 97, 771, 512, 97, 776, 512, 97, 778, 512, 99, 807, 512, 101, 768, 512, 101, 769, 512, 101, 770, 512, 101, 776, 512, 105, 768, 512, 105, 769, 512, 105, 770, 512, 105, 776, 512, 110, 771, 512, 111, 768, 512, 111, 769, 512, 111, 770, 512, 111, 771, 512, 111, 776, 512, 117, 768, 512, 117, 769, 512, 117, 770, 512, 117, 776, 512, 121, 769, 512, 121, 776, 512, 65, 772, 512, 97, 772, 512, 65, 774, 512, 97, 774, 512, 65, 808, 512, 97, 808, 512, 67, 769, 512, 99, 769, 512, 67, 770, 512, 99, 770, 512, 67, 775, 512, 99, 775, 512, 67, 780, 512, 99, 780, 512, 68, 780, 512, 100, 780, 512, 69, 772, 512, 101, 772, 512, 69, 774, 512, 101, 774, 512, 69, 775, 512, 101, 775, 512, 69, 808, 512, 101, 808, 512, 69, 780, 512, 101, 780, 512, 71, 770, 512, 103, 770, 512, 71, 774, 512, 103, 774, 512, 71, 775, 512, 103, 775, 512, 71, 807, 512, 103, 807, 512, 72, 770, 512, 104, 770, 512, 73, 771, 512, 105, 771, 512, 73, 772, 512, 105, 772, 512, 73, 774, 512, 105, 774, 512, 73, 808, 512, 105, 808, 512, 73, 775, 514, 73, 74, 514, 105, 106, 512, 74, 770, 512, 106, 770, 512, 75, 807, 512, 107, 807, 512, 76, 769, 512, 108, 769, 512, 76, 807, 512, 108, 807, 512, 76, 780, 512, 108, 780, 514, 76, 183, 514, 108, 183, 512, 78, 769, 512, 110, 769, 512, 78, 807, 512, 110, 807, 512, 78, 780, 512, 110, 780, 514, 700, 110, 512, 79, 772, 512, 111, 772, 512, 79, 774, 512, 111, 774, 512, 79, 779, 512, 111, 779, 512, 82, 769, 512, 114, 769, 512, 82, 807, 512, 114, 807, 512, 82, 780, 512, 114, 780, 512, 83, 769, 512, 115, 769, 512, 83, 770, 512, 115, 770, 512, 83, 807, 512, 115, 807, 512, 83, 780, 512, 115, 780, 512, 84, 807, 512, 116, 807, 512, 84, 780, 512, 116, 780, 512, 85, 771, 512, 117, 771, 512, 85, 772, 512, 117, 772, 512, 85, 774, 512, 117, 774, 512, 85, 778, 512, 117, 778, 512, 85, 779, 512, 117, 779, 512, 85, 808, 512, 117, 808, 512, 87, 770, 512, 119, 770, 512, 89, 770, 512, 121, 770, 512, 89, 776, 512, 90, 769, 512, 122, 769, 512, 90, 775, 512, 122, 775, 512, 90, 780, 512, 122, 780, 258, 115, 512, 79, 795, 512, 111, 795, 512, 85, 795, 512, 117, 795, 514, 68, 381, 514, 68, 382, 514, 100, 382, 514, 76, 74, 514, 76, 106, 514, 108, 106, 514, 78, 74, 514, 78, 106, 514, 110, 106, 512, 65, 780, 512, 97, 780, 512, 73, 780, 512, 105, 780, 512, 79, 780, 512, 111, 780, 512, 85, 780, 512, 117, 780, 512, 220, 772, 512, 252, 772, 512, 220, 769, 512, 252, 769, 512, 220, 780, 512, 252, 780, 512, 220, 768, 512, 252, 768, 512, 196, 772, 512, 228, 772, 512, 550, 772, 512, 551, 772, 512, 198, 772, 512, 230, 772, 512, 71, 780, 512, 103, 780, 512, 75, 780, 512, 107, 780, 512, 79, 808, 512, 111, 808, 512, 490, 772, 512, 491, 772, 512, 439, 780, 512, 658, 780, 512, 106, 780, 514, 68, 90, 514, 68, 122, 514, 100, 122, 512, 71, 769, 512, 103, 769, 512, 78, 768, 512, 110, 768, 512, 197, 769, 512, 229, 769, 512, 198, 769, 512, 230, 769, 512, 216, 769, 512, 248, 769, 512, 65, 783, 512, 97, 783, 512, 65, 785, 512, 97, 785, 512, 69, 783, 512, 101, 783, 512, 69, 785, 512, 101, 785, 512, 73, 783, 512, 105, 783, 512, 73, 785, 512, 105, 785, 512, 79, 783, 512, 111, 783, 512, 79, 785, 512, 111, 785, 512, 82, 783, 512, 114, 783, 512, 82, 785, 512, 114, 785, 512, 85, 783, 512, 117, 783, 512, 85, 785, 512, 117, 785, 512, 83, 806, 512, 115, 806, 512, 84, 806, 512, 116, 806, 512, 72, 780, 512, 104, 780, 512, 65, 775, 512, 97, 775, 512, 69, 807, 512, 101, 807, 512, 214, 772, 512, 246, 772, 512, 213, 772, 512, 245, 772, 512, 79, 775, 512, 111, 775, 512, 558, 772, 512, 559, 772, 512, 89, 772, 512, 121, 772, 259, 104, 259, 614, 259, 106, 259, 114, 259, 633, 259, 635, 259, 641, 259, 119, 259, 121, 514, 32, 774, 514, 32, 775, 514, 32, 778, 514, 32, 808, 514, 32, 771, 514, 32, 779, 259, 611, 259, 108, 259, 115, 259, 120, 259, 661, 256, 768, 256, 769, 256, 787, 512, 776, 769, 256, 697, 514, 32, 837, 256, 59, 514, 32, 769, 512, 168, 769, 512, 913, 769, 256, 183, 512, 917, 769, 512, 919, 769, 512, 921, 769, 512, 927, 769, 512, 933, 769, 512, 937, 769, 512, 970, 769, 512, 921, 776, 512, 933, 776, 512, 945, 769, 512, 949, 769, 512, 951, 769, 512, 953, 769, 512, 971, 769, 512, 953, 776, 512, 965, 776, 512, 959, 769, 512, 965, 769, 512, 969, 769, 258, 946, 258, 952, 258, 933, 512, 978, 769, 512, 978, 776, 258, 966, 258, 960, 258, 954, 258, 961, 258, 962, 258, 920, 258, 949, 512, 1045, 768, 512, 1045, 776, 512, 1043, 769, 512, 1030, 776, 512, 1050, 769, 512, 1048, 768, 512, 1059, 774, 512, 1048, 774, 512, 1080, 774, 512, 1077, 768, 512, 1077, 776, 512, 1075, 769, 512, 1110, 776, 512, 1082, 769, 512, 1080, 768, 512, 1091, 774, 512, 1140, 783, 512, 1141, 783, 512, 1046, 774, 512, 1078, 774, 512, 1040, 774, 512, 1072, 774, 512, 1040, 776, 512, 1072, 776, 512, 1045, 774, 512, 1077, 774, 512, 1240, 776, 512, 1241, 776, 512, 1046, 776, 512, 1078, 776, 512, 1047, 776, 512, 1079, 776, 512, 1048, 772, 512, 1080, 772, 512, 1048, 776, 512, 1080, 776, 512, 1054, 776, 512, 1086, 776, 512, 1256, 776, 512, 1257, 776, 512, 1069, 776, 512, 1101, 776, 512, 1059, 772, 512, 1091, 772, 512, 1059, 776, 512, 1091, 776, 512, 1059, 779, 512, 1091, 779, 512, 1063, 776, 512, 1095, 776, 512, 1067, 776, 512, 1099, 776, 514, 1381, 1410, 512, 1575, 1619, 512, 1575, 1620, 512, 1608, 1620, 512, 1575, 1621, 512, 1610, 1620, 514, 1575, 1652, 514, 1608, 1652, 514, 1735, 1652, 514, 1610, 1652, 512, 1749, 1620, 512, 1729, 1620, 512, 1746, 1620, 512, 2344, 2364, 512, 2352, 2364, 512, 2355, 2364, 512, 2325, 2364, 512, 2326, 2364, 512, 2327, 2364, 512, 2332, 2364, 512, 2337, 2364, 512, 2338, 2364, 512, 2347, 2364, 512, 2351, 2364, 512, 2503, 2494, 512, 2503, 2519, 512, 2465, 2492, 512, 2466, 2492, 512, 2479, 2492, 512, 2610, 2620, 512, 2616, 2620, 512, 2582, 2620, 512, 2583, 2620, 512, 2588, 2620, 512, 2603, 2620, 512, 2887, 2902, 512, 2887, 2878, 512, 2887, 2903, 512, 2849, 2876, 512, 2850, 2876, 512, 2962, 3031, 512, 3014, 3006, 512, 3015, 3006, 512, 3014, 3031, 512, 3142, 3158, 512, 3263, 3285, 512, 3270, 3285, 512, 3270, 3286, 512, 3270, 3266, 512, 3274, 3285, 512, 3398, 3390, 512, 3399, 3390, 512, 3398, 3415, 512, 3545, 3530, 512, 3545, 3535, 512, 3548, 3530, 512, 3545, 3551, 514, 3661, 3634, 514, 3789, 3762, 514, 3755, 3737, 514, 3755, 3745, 257, 3851, 512, 3906, 4023, 512, 3916, 4023, 512, 3921, 4023, 512, 3926, 4023, 512, 3931, 4023, 512, 3904, 4021, 512, 3953, 3954, 512, 3953, 3956, 512, 4018, 3968, 514, 4018, 3969, 512, 4019, 3968, 514, 4019, 3969, 512, 3953, 3968, 512, 3986, 4023, 512, 3996, 4023, 512, 4001, 4023, 512, 4006, 4023, 512, 4011, 4023, 512, 3984, 4021, 512, 4133, 4142, 512, 65, 805, 512, 97, 805, 512, 66, 775, 512, 98, 775, 512, 66, 803, 512, 98, 803, 512, 66, 817, 512, 98, 817, 512, 199, 769, 512, 231, 769, 512, 68, 775, 512, 100, 775, 512, 68, 803, 512, 100, 803, 512, 68, 817, 512, 100, 817, 512, 68, 807, 512, 100, 807, 512, 68, 813, 512, 100, 813, 512, 274, 768, 512, 275, 768, 512, 274, 769, 512, 275, 769, 512, 69, 813, 512, 101, 813, 512, 69, 816, 512, 101, 816, 512, 552, 774, 512, 553, 774, 512, 70, 775, 512, 102, 775, 512, 71, 772, 512, 103, 772, 512, 72, 775, 512, 104, 775, 512, 72, 803, 512, 104, 803, 512, 72, 776, 512, 104, 776, 512, 72, 807, 512, 104, 807, 512, 72, 814, 512, 104, 814, 512, 73, 816, 512, 105, 816, 512, 207, 769, 512, 239, 769, 512, 75, 769, 512, 107, 769, 512, 75, 803, 512, 107, 803, 512, 75, 817, 512, 107, 817, 512, 76, 803, 512, 108, 803, 512, 7734, 772, 512, 7735, 772, 512, 76, 817, 512, 108, 817, 512, 76, 813, 512, 108, 813, 512, 77, 769, 512, 109, 769, 512, 77, 775, 512, 109, 775, 512, 77, 803, 512, 109, 803, 512, 78, 775, 512, 110, 775, 512, 78, 803, 512, 110, 803, 512, 78, 817, 512, 110, 817, 512, 78, 813, 512, 110, 813, 512, 213, 769, 512, 245, 769, 512, 213, 776, 512, 245, 776, 512, 332, 768, 512, 333, 768, 512, 332, 769, 512, 333, 769, 512, 80, 769, 512, 112, 769, 512, 80, 775, 512, 112, 775, 512, 82, 775, 512, 114, 775, 512, 82, 803, 512, 114, 803, 512, 7770, 772, 512, 7771, 772, 512, 82, 817, 512, 114, 817, 512, 83, 775, 512, 115, 775, 512, 83, 803, 512, 115, 803, 512, 346, 775, 512, 347, 775, 512, 352, 775, 512, 353, 775, 512, 7778, 775, 512, 7779, 775, 512, 84, 775, 512, 116, 775, 512, 84, 803, 512, 116, 803, 512, 84, 817, 512, 116, 817, 512, 84, 813, 512, 116, 813, 512, 85, 804, 512, 117, 804, 512, 85, 816, 512, 117, 816, 512, 85, 813, 512, 117, 813, 512, 360, 769, 512, 361, 769, 512, 362, 776, 512, 363, 776, 512, 86, 771, 512, 118, 771, 512, 86, 803, 512, 118, 803, 512, 87, 768, 512, 119, 768, 512, 87, 769, 512, 119, 769, 512, 87, 776, 512, 119, 776, 512, 87, 775, 512, 119, 775, 512, 87, 803, 512, 119, 803, 512, 88, 775, 512, 120, 775, 512, 88, 776, 512, 120, 776, 512, 89, 775, 512, 121, 775, 512, 90, 770, 512, 122, 770, 512, 90, 803, 512, 122, 803, 512, 90, 817, 512, 122, 817, 512, 104, 817, 512, 116, 776, 512, 119, 778, 512, 121, 778, 514, 97, 702, 512, 383, 775, 512, 65, 803, 512, 97, 803, 512, 65, 777, 512, 97, 777, 512, 194, 769, 512, 226, 769, 512, 194, 768, 512, 226, 768, 512, 194, 777, 512, 226, 777, 512, 194, 771, 512, 226, 771, 512, 7840, 770, 512, 7841, 770, 512, 258, 769, 512, 259, 769, 512, 258, 768, 512, 259, 768, 512, 258, 777, 512, 259, 777, 512, 258, 771, 512, 259, 771, 512, 7840, 774, 512, 7841, 774, 512, 69, 803, 512, 101, 803, 512, 69, 777, 512, 101, 777, 512, 69, 771, 512, 101, 771, 512, 202, 769, 512, 234, 769, 512, 202, 768, 512, 234, 768, 512, 202, 777, 512, 234, 777, 512, 202, 771, 512, 234, 771, 512, 7864, 770, 512, 7865, 770, 512, 73, 777, 512, 105, 777, 512, 73, 803, 512, 105, 803, 512, 79, 803, 512, 111, 803, 512, 79, 777, 512, 111, 777, 512, 212, 769, 512, 244, 769, 512, 212, 768, 512, 244, 768, 512, 212, 777, 512, 244, 777, 512, 212, 771, 512, 244, 771, 512, 7884, 770, 512, 7885, 770, 512, 416, 769, 512, 417, 769, 512, 416, 768, 512, 417, 768, 512, 416, 777, 512, 417, 777, 512, 416, 771, 512, 417, 771, 512, 416, 803, 512, 417, 803, 512, 85, 803, 512, 117, 803, 512, 85, 777, 512, 117, 777, 512, 431, 769, 512, 432, 769, 512, 431, 768, 512, 432, 768, 512, 431, 777, 512, 432, 777, 512, 431, 771, 512, 432, 771, 512, 431, 803, 512, 432, 803, 512, 89, 768, 512, 121, 768, 512, 89, 803, 512, 121, 803, 512, 89, 777, 512, 121, 777, 512, 89, 771, 512, 121, 771, 512, 945, 787, 512, 945, 788, 512, 7936, 768, 512, 7937, 768, 512, 7936, 769, 512, 7937, 769, 512, 7936, 834, 512, 7937, 834, 512, 913, 787, 512, 913, 788, 512, 7944, 768, 512, 7945, 768, 512, 7944, 769, 512, 7945, 769, 512, 7944, 834, 512, 7945, 834, 512, 949, 787, 512, 949, 788, 512, 7952, 768, 512, 7953, 768, 512, 7952, 769, 512, 7953, 769, 512, 917, 787, 512, 917, 788, 512, 7960, 768, 512, 7961, 768, 512, 7960, 769, 512, 7961, 769, 512, 951, 787, 512, 951, 788, 512, 7968, 768, 512, 7969, 768, 512, 7968, 769, 512, 7969, 769, 512, 7968, 834, 512, 7969, 834, 512, 919, 787, 512, 919, 788, 512, 7976, 768, 512, 7977, 768, 512, 7976, 769, 512, 7977, 769, 512, 7976, 834, 512, 7977, 834, 512, 953, 787, 512, 953, 788, 512, 7984, 768, 512, 7985, 768, 512, 7984, 769, 512, 7985, 769, 512, 7984, 834, 512, 7985, 834, 512, 921, 787, 512, 921, 788, 512, 7992, 768, 512, 7993, 768, 512, 7992, 769, 512, 7993, 769, 512, 7992, 834, 512, 7993, 834, 512, 959, 787, 512, 959, 788, 512, 8000, 768, 512, 8001, 768, 512, 8000, 769, 512, 8001, 769, 512, 927, 787, 512, 927, 788, 512, 8008, 768, 512, 8009, 768, 512, 8008, 769, 512, 8009, 769, 512, 965, 787, 512, 965, 788, 512, 8016, 768, 512, 8017, 768, 512, 8016, 769, 512, 8017, 769, 512, 8016, 834, 512, 8017, 834, 512, 933, 788, 512, 8025, 768, 512, 8025, 769, 512, 8025, 834, 512, 969, 787, 512, 969, 788, 512, 8032, 768, 512, 8033, 768, 512, 8032, 769, 512, 8033, 769, 512, 8032, 834, 512, 8033, 834, 512, 937, 787, 512, 937, 788, 512, 8040, 768, 512, 8041, 768, 512, 8040, 769, 512, 8041, 769, 512, 8040, 834, 512, 8041, 834, 512, 945, 768, 256, 940, 512, 949, 768, 256, 941, 512, 951, 768, 256, 942, 512, 953, 768, 256, 943, 512, 959, 768, 256, 972, 512, 965, 768, 256, 973, 512, 969, 768, 256, 974, 512, 7936, 837, 512, 7937, 837, 512, 7938, 837, 512, 7939, 837, 512, 7940, 837, 512, 7941, 837, 512, 7942, 837, 512, 7943, 837, 512, 7944, 837, 512, 7945, 837, 512, 7946, 837, 512, 7947, 837, 512, 7948, 837, 512, 7949, 837, 512, 7950, 837, 512, 7951, 837, 512, 7968, 837, 512, 7969, 837, 512, 7970, 837, 512, 7971, 837, 512, 7972, 837, 512, 7973, 837, 512, 7974, 837, 512, 7975, 837, 512, 7976, 837, 512, 7977, 837, 512, 7978, 837, 512, 7979, 837, 512, 7980, 837, 512, 7981, 837, 512, 7982, 837, 512, 7983, 837, 512, 8032, 837, 512, 8033, 837, 512, 8034, 837, 512, 8035, 837, 512, 8036, 837, 512, 8037, 837, 512, 8038, 837, 512, 8039, 837, 512, 8040, 837, 512, 8041, 837, 512, 8042, 837, 512, 8043, 837, 512, 8044, 837, 512, 8045, 837, 512, 8046, 837, 512, 8047, 837, 512, 945, 774, 512, 945, 772, 512, 8048, 837, 512, 945, 837, 512, 940, 837, 512, 945, 834, 512, 8118, 837, 512, 913, 774, 512, 913, 772, 512, 913, 768, 256, 902, 512, 913, 837, 514, 32, 787, 256, 953, 514, 32, 787, 514, 32, 834, 512, 168, 834, 512, 8052, 837, 512, 951, 837, 512, 942, 837, 512, 951, 834, 512, 8134, 837, 512, 917, 768, 256, 904, 512, 919, 768, 256, 905, 512, 919, 837, 512, 8127, 768, 512, 8127, 769, 512, 8127, 834, 512, 953, 774, 512, 953, 772, 512, 970, 768, 256, 912, 512, 953, 834, 512, 970, 834, 512, 921, 774, 512, 921, 772, 512, 921, 768, 256, 906, 512, 8190, 768, 512, 8190, 769, 512, 8190, 834, 512, 965, 774, 512, 965, 772, 512, 971, 768, 256, 944, 512, 961, 787, 512, 961, 788, 512, 965, 834, 512, 971, 834, 512, 933, 774, 512, 933, 772, 512, 933, 768, 256, 910, 512, 929, 788, 512, 168, 768, 256, 901, 256, 96, 512, 8060, 837, 512, 969, 837, 512, 974, 837, 512, 969, 834, 512, 8182, 837, 512, 927, 768, 256, 908, 512, 937, 768, 256, 911, 512, 937, 837, 256, 180, 514, 32, 788, 256, 8194, 256, 8195, 258, 32, 258, 32, 258, 32, 258, 32, 258, 32, 257, 32, 258, 32, 258, 32, 258, 32, 257, 8208, 514, 32, 819, 258, 46, 514, 46, 46, 770, 46, 46, 46, 257, 32, 514, 8242, 8242, 770, 8242, 8242, 8242, 514, 8245, 8245, 770, 8245, 8245, 8245, 514, 33, 33, 514, 32, 773, 514, 63, 63, 514, 63, 33, 514, 33, 63, 1026, 8242, 8242, 8242, 8242, 258, 32, 259, 48, 259, 105, 259, 52, 259, 53, 259, 54, 259, 55, 259, 56, 259, 57, 259, 43, 259, 8722, 259, 61, 259, 40, 259, 41, 259, 110, 261, 48, 261, 49, 261, 50, 261, 51, 261, 52, 261, 53, 261, 54, 261, 55, 261, 56, 261, 57, 261, 43, 261, 8722, 261, 61, 261, 40, 261, 41, 514, 82, 115, 770, 97, 47, 99, 770, 97, 47, 115, 262, 67, 514, 176, 67, 770, 99, 47, 111, 770, 99, 47, 117, 258, 400, 514, 176, 70, 262, 103, 262, 72, 262, 72, 262, 72, 262, 104, 262, 295, 262, 73, 262, 73, 262, 76, 262, 108, 262, 78, 514, 78, 111, 262, 80, 262, 81, 262, 82, 262, 82, 262, 82, 515, 83, 77, 770, 84, 69, 76, 515, 84, 77, 262, 90, 256, 937, 262, 90, 256, 75, 256, 197, 262, 66, 262, 67, 262, 101, 262, 69, 262, 70, 262, 77, 262, 111, 258, 1488, 258, 1489, 258, 1490, 258, 1491, 262, 105, 262, 947, 262, 915, 262, 928, 262, 8721, 262, 68, 262, 100, 262, 101, 262, 105, 262, 106, 772, 49, 8260, 51, 772, 50, 8260, 51, 772, 49, 8260, 53, 772, 50, 8260, 53, 772, 51, 8260, 53, 772, 52, 8260, 53, 772, 49, 8260, 54, 772, 53, 8260, 54, 772, 49, 8260, 56, 772, 51, 8260, 56, 772, 53, 8260, 56, 772, 55, 8260, 56, 516, 49, 8260, 258, 73, 514, 73, 73, 770, 73, 73, 73, 514, 73, 86, 258, 86, 514, 86, 73, 770, 86, 73, 73, 1026, 86, 73, 73, 73, 514, 73, 88, 258, 88, 514, 88, 73, 770, 88, 73, 73, 258, 76, 258, 67, 258, 68, 258, 77, 258, 105, 514, 105, 105, 770, 105, 105, 105, 514, 105, 118, 258, 118, 514, 118, 105, 770, 118, 105, 105, 1026, 118, 105, 105, 105, 514, 105, 120, 258, 120, 514, 120, 105, 770, 120, 105, 105, 258, 108, 258, 99, 258, 100, 258, 109, 512, 8592, 824, 512, 8594, 824, 512, 8596, 824, 512, 8656, 824, 512, 8660, 824, 512, 8658, 824, 512, 8707, 824, 512, 8712, 824, 512, 8715, 824, 512, 8739, 824, 512, 8741, 824, 514, 8747, 8747, 770, 8747, 8747, 8747, 514, 8750, 8750, 770, 8750, 8750, 8750, 512, 8764, 824, 512, 8771, 824, 512, 8773, 824, 512, 8776, 824, 512, 61, 824, 512, 8801, 824, 512, 8781, 824, 512, 60, 824, 512, 62, 824, 512, 8804, 824, 512, 8805, 824, 512, 8818, 824, 512, 8819, 824, 512, 8822, 824, 512, 8823, 824, 512, 8826, 824, 512, 8827, 824, 512, 8834, 824, 512, 8835, 824, 512, 8838, 824, 512, 8839, 824, 512, 8866, 824, 512, 8872, 824, 512, 8873, 824, 512, 8875, 824, 512, 8828, 824, 512, 8829, 824, 512, 8849, 824, 512, 8850, 824, 512, 8882, 824, 512, 8883, 824, 512, 8884, 824, 512, 8885, 824, 256, 12296, 256, 12297, 263, 49, 263, 50, 263, 51, 263, 52, 263, 53, 263, 54, 263, 55, 263, 56, 263, 57, 519, 49, 48, 519, 49, 49, 519, 49, 50, 519, 49, 51, 519, 49, 52, 519, 49, 53, 519, 49, 54, 519, 49, 55, 519, 49, 56, 519, 49, 57, 519, 50, 48, 770, 40, 49, 41, 770, 40, 50, 41, 770, 40, 51, 41, 770, 40, 52, 41, 770, 40, 53, 41, 770, 40, 54, 41, 770, 40, 55, 41, 770, 40, 56, 41, 770, 40, 57, 41, 1026, 40, 49, 48, 41, 1026, 40, 49, 49, 41, 1026, 40, 49, 50, 41, 1026, 40, 49, 51, 41, 1026, 40, 49, 52, 41, 1026, 40, 49, 53, 41, 1026, 40, 49, 54, 41, 1026, 40, 49, 55, 41, 1026, 40, 49, 56, 41, 1026, 40, 49, 57, 41, 1026, 40, 50, 48, 41, 514, 49, 46, 514, 50, 46, 514, 51, 46, 514, 52, 46, 514, 53, 46, 514, 54, 46, 514, 55, 46, 514, 56, 46, 514, 57, 46, 770, 49, 48, 46, 770, 49, 49, 46, 770, 49, 50, 46, 770, 49, 51, 46, 770, 49, 52, 46, 770, 49, 53, 46, 770, 49, 54, 46, 770, 49, 55, 46, 770, 49, 56, 46, 770, 49, 57, 46, 770, 50, 48, 46, 770, 40, 97, 41, 770, 40, 98, 41, 770, 40, 99, 41, 770, 40, 100, 41, 770, 40, 101, 41, 770, 40, 102, 41, 770, 40, 103, 41, 770, 40, 104, 41, 770, 40, 105, 41, 770, 40, 106, 41, 770, 40, 107, 41, 770, 40, 108, 41, 770, 40, 109, 41, 770, 40, 110, 41, 770, 40, 111, 41, 770, 40, 112, 41, 770, 40, 113, 41, 770, 40, 114, 41, 770, 40, 115, 41, 770, 40, 116, 41, 770, 40, 117, 41, 770, 40, 118, 41, 770, 40, 119, 41, 770, 40, 120, 41, 770, 40, 121, 41, 770, 40, 122, 41, 263, 65, 263, 66, 263, 67, 263, 68, 263, 69, 263, 70, 263, 71, 263, 72, 263, 73, 263, 74, 263, 75, 263, 76, 263, 77, 263, 78, 263, 79, 263, 80, 263, 81, 263, 82, 263, 83, 263, 84, 263, 85, 263, 86, 263, 87, 263, 88, 263, 89, 263, 90, 263, 97, 263, 98, 263, 99, 263, 100, 263, 101, 263, 102, 263, 103, 263, 104, 263, 105, 263, 106, 263, 107, 263, 108, 263, 109, 263, 110, 263, 111, 263, 112, 263, 113, 263, 114, 263, 115, 263, 116, 263, 117, 263, 118, 263, 119, 263, 120, 263, 121, 263, 122, 263, 48, 1026, 8747, 8747, 8747, 8747, 770, 58, 58, 61, 514, 61, 61, 770, 61, 61, 61, 512, 10973, 824, 258, 27597, 258, 40863, 258, 19968, 258, 20008, 258, 20022, 258, 20031, 258, 20057, 258, 20101, 258, 20108, 258, 20128, 258, 20154, 258, 20799, 258, 20837, 258, 20843, 258, 20866, 258, 20886, 258, 20907, 258, 20960, 258, 20981, 258, 20992, 258, 21147, 258, 21241, 258, 21269, 258, 21274, 258, 21304, 258, 21313, 258, 21340, 258, 21353, 258, 21378, 258, 21430, 258, 21448, 258, 21475, 258, 22231, 258, 22303, 258, 22763, 258, 22786, 258, 22794, 258, 22805, 258, 22823, 258, 22899, 258, 23376, 258, 23424, 258, 23544, 258, 23567, 258, 23586, 258, 23608, 258, 23662, 258, 23665, 258, 24027, 258, 24037, 258, 24049, 258, 24062, 258, 24178, 258, 24186, 258, 24191, 258, 24308, 258, 24318, 258, 24331, 258, 24339, 258, 24400, 258, 24417, 258, 24435, 258, 24515, 258, 25096, 258, 25142, 258, 25163, 258, 25903, 258, 25908, 258, 25991, 258, 26007, 258, 26020, 258, 26041, 258, 26080, 258, 26085, 258, 26352, 258, 26376, 258, 26408, 258, 27424, 258, 27490, 258, 27513, 258, 27571, 258, 27595, 258, 27604, 258, 27611, 258, 27663, 258, 27668, 258, 27700, 258, 28779, 258, 29226, 258, 29238, 258, 29243, 258, 29247, 258, 29255, 258, 29273, 258, 29275, 258, 29356, 258, 29572, 258, 29577, 258, 29916, 258, 29926, 258, 29976, 258, 29983, 258, 29992, 258, 30000, 258, 30091, 258, 30098, 258, 30326, 258, 30333, 258, 30382, 258, 30399, 258, 30446, 258, 30683, 258, 30690, 258, 30707, 258, 31034, 258, 31160, 258, 31166, 258, 31348, 258, 31435, 258, 31481, 258, 31859, 258, 31992, 258, 32566, 258, 32593, 258, 32650, 258, 32701, 258, 32769, 258, 32780, 258, 32786, 258, 32819, 258, 32895, 258, 32905, 258, 33251, 258, 33258, 258, 33267, 258, 33276, 258, 33292, 258, 33307, 258, 33311, 258, 33390, 258, 33394, 258, 33400, 258, 34381, 258, 34411, 258, 34880, 258, 34892, 258, 34915, 258, 35198, 258, 35211, 258, 35282, 258, 35328, 258, 35895, 258, 35910, 258, 35925, 258, 35960, 258, 35997, 258, 36196, 258, 36208, 258, 36275, 258, 36523, 258, 36554, 258, 36763, 258, 36784, 258, 36789, 258, 37009, 258, 37193, 258, 37318, 258, 37324, 258, 37329, 258, 38263, 258, 38272, 258, 38428, 258, 38582, 258, 38585, 258, 38632, 258, 38737, 258, 38750, 258, 38754, 258, 38761, 258, 38859, 258, 38893, 258, 38899, 258, 38913, 258, 39080, 258, 39131, 258, 39135, 258, 39318, 258, 39321, 258, 39340, 258, 39592, 258, 39640, 258, 39647, 258, 39717, 258, 39727, 258, 39730, 258, 39740, 258, 39770, 258, 40165, 258, 40565, 258, 40575, 258, 40613, 258, 40635, 258, 40643, 258, 40653, 258, 40657, 258, 40697, 258, 40701, 258, 40718, 258, 40723, 258, 40736, 258, 40763, 258, 40778, 258, 40786, 258, 40845, 258, 40860, 258, 40864, 264, 32, 258, 12306, 258, 21313, 258, 21316, 258, 21317, 512, 12363, 12441, 512, 12365, 12441, 512, 12367, 12441, 512, 12369, 12441, 512, 12371, 12441, 512, 12373, 12441, 512, 12375, 12441, 512, 12377, 12441, 512, 12379, 12441, 512, 12381, 12441, 512, 12383, 12441, 512, 12385, 12441, 512, 12388, 12441, 512, 12390, 12441, 512, 12392, 12441, 512, 12399, 12441, 512, 12399, 12442, 512, 12402, 12441, 512, 12402, 12442, 512, 12405, 12441, 512, 12405, 12442, 512, 12408, 12441, 512, 12408, 12442, 512, 12411, 12441, 512, 12411, 12442, 512, 12358, 12441, 514, 32, 12441, 514, 32, 12442, 512, 12445, 12441, 521, 12424, 12426, 512, 12459, 12441, 512, 12461, 12441, 512, 12463, 12441, 512, 12465, 12441, 512, 12467, 12441, 512, 12469, 12441, 512, 12471, 12441, 512, 12473, 12441, 512, 12475, 12441, 512, 12477, 12441, 512, 12479, 12441, 512, 12481, 12441, 512, 12484, 12441, 512, 12486, 12441, 512, 12488, 12441, 512, 12495, 12441, 512, 12495, 12442, 512, 12498, 12441, 512, 12498, 12442, 512, 12501, 12441, 512, 12501, 12442, 512, 12504, 12441, 512, 12504, 12442, 512, 12507, 12441, 512, 12507, 12442, 512, 12454, 12441, 512, 12527, 12441, 512, 12528, 12441, 512, 12529, 12441, 512, 12530, 12441, 512, 12541, 12441, 521, 12467, 12488, 258, 4352, 258, 4353, 258, 4522, 258, 4354, 258, 4524, 258, 4525, 258, 4355, 258, 4356, 258, 4357, 258, 4528, 258, 4529, 258, 4530, 258, 4531, 258, 4532, 258, 4533, 258, 4378, 258, 4358, 258, 4359, 258, 4360, 258, 4385, 258, 4361, 258, 4362, 258, 4363, 258, 4364, 258, 4365, 258, 4366, 258, 4367, 258, 4368, 258, 4369, 258, 4370, 258, 4449, 258, 4450, 258, 4451, 258, 4452, 258, 4453, 258, 4454, 258, 4455, 258, 4456, 258, 4457, 258, 4458, 258, 4459, 258, 4460, 258, 4461, 258, 4462, 258, 4463, 258, 4464, 258, 4465, 258, 4466, 258, 4467, 258, 4468, 258, 4469, 258, 4448, 258, 4372, 258, 4373, 258, 4551, 258, 4552, 258, 4556, 258, 4558, 258, 4563, 258, 4567, 258, 4569, 258, 4380, 258, 4573, 258, 4575, 258, 4381, 258, 4382, 258, 4384, 258, 4386, 258, 4387, 258, 4391, 258, 4393, 258, 4395, 258, 4396, 258, 4397, 258, 4398, 258, 4399, 258, 4402, 258, 4406, 258, 4416, 258, 4423, 258, 4428, 258, 4593, 258, 4594, 258, 4439, 258, 4440, 258, 4441, 258, 4484, 258, 4485, 258, 4488, 258, 4497, 258, 4498, 258, 4500, 258, 4510, 258, 4513, 259, 19968, 259, 20108, 259, 19977, 259, 22235, 259, 19978, 259, 20013, 259, 19979, 259, 30002, 259, 20057, 259, 19993, 259, 19969, 259, 22825, 259, 22320, 259, 20154, 770, 40, 4352, 41, 770, 40, 4354, 41, 770, 40, 4355, 41, 770, 40, 4357, 41, 770, 40, 4358, 41, 770, 40, 4359, 41, 770, 40, 4361, 41, 770, 40, 4363, 41, 770, 40, 4364, 41, 770, 40, 4366, 41, 770, 40, 4367, 41, 770, 40, 4368, 41, 770, 40, 4369, 41, 770, 40, 4370, 41, 1026, 40, 4352, 4449, 41, 1026, 40, 4354, 4449, 41, 1026, 40, 4355, 4449, 41, 1026, 40, 4357, 4449, 41, 1026, 40, 4358, 4449, 41, 1026, 40, 4359, 4449, 41, 1026, 40, 4361, 4449, 41, 1026, 40, 4363, 4449, 41, 1026, 40, 4364, 4449, 41, 1026, 40, 4366, 4449, 41, 1026, 40, 4367, 4449, 41, 1026, 40, 4368, 4449, 41, 1026, 40, 4369, 4449, 41, 1026, 40, 4370, 4449, 41, 1026, 40, 4364, 4462, 41, 770, 40, 19968, 41, 770, 40, 20108, 41, 770, 40, 19977, 41, 770, 40, 22235, 41, 770, 40, 20116, 41, 770, 40, 20845, 41, 770, 40, 19971, 41, 770, 40, 20843, 41, 770, 40, 20061, 41, 770, 40, 21313, 41, 770, 40, 26376, 41, 770, 40, 28779, 41, 770, 40, 27700, 41, 770, 40, 26408, 41, 770, 40, 37329, 41, 770, 40, 22303, 41, 770, 40, 26085, 41, 770, 40, 26666, 41, 770, 40, 26377, 41, 770, 40, 31038, 41, 770, 40, 21517, 41, 770, 40, 29305, 41, 770, 40, 36001, 41, 770, 40, 31069, 41, 770, 40, 21172, 41, 770, 40, 20195, 41, 770, 40, 21628, 41, 770, 40, 23398, 41, 770, 40, 30435, 41, 770, 40, 20225, 41, 770, 40, 36039, 41, 770, 40, 21332, 41, 770, 40, 31085, 41, 770, 40, 20241, 41, 770, 40, 33258, 41, 770, 40, 33267, 41, 519, 50, 49, 519, 50, 50, 519, 50, 51, 519, 50, 52, 519, 50, 53, 519, 50, 54, 519, 50, 55, 519, 50, 56, 519, 50, 57, 519, 51, 48, 519, 51, 49, 519, 51, 50, 519, 51, 51, 519, 51, 52, 519, 51, 53, 263, 4352, 263, 4354, 263, 4355, 263, 4357, 263, 4358, 263, 4359, 263, 4361, 263, 4363, 263, 4364, 263, 4366, 263, 4367, 263, 4368, 263, 4369, 263, 4370, 519, 4352, 4449, 519, 4354, 4449, 519, 4355, 4449, 519, 4357, 4449, 519, 4358, 4449, 519, 4359, 4449, 519, 4361, 4449, 519, 4363, 4449, 519, 4364, 4449, 519, 4366, 4449, 519, 4367, 4449, 519, 4368, 4449, 519, 4369, 4449, 519, 4370, 4449, 263, 19968, 263, 20108, 263, 19977, 263, 22235, 263, 20116, 263, 20845, 263, 19971, 263, 20843, 263, 20061, 263, 21313, 263, 26376, 263, 28779, 263, 27700, 263, 26408, 263, 37329, 263, 22303, 263, 26085, 263, 26666, 263, 26377, 263, 31038, 263, 21517, 263, 29305, 263, 36001, 263, 31069, 263, 21172, 263, 31192, 263, 30007, 263, 22899, 263, 36969, 263, 20778, 263, 21360, 263, 27880, 263, 38917, 263, 20241, 263, 20889, 263, 27491, 263, 19978, 263, 20013, 263, 19979, 263, 24038, 263, 21491, 263, 21307, 263, 23447, 263, 23398, 263, 30435, 263, 20225, 263, 36039, 263, 21332, 263, 22812, 519, 51, 54, 519, 51, 55, 519, 51, 56, 519, 51, 57, 519, 52, 48, 519, 52, 49, 519, 52, 50, 519, 52, 51, 519, 52, 52, 519, 52, 53, 519, 52, 54, 519, 52, 55, 519, 52, 56, 519, 52, 57, 519, 53, 48, 514, 49, 26376, 514, 50, 26376, 514, 51, 26376, 514, 52, 26376, 514, 53, 26376, 514, 54, 26376, 514, 55, 26376, 514, 56, 26376, 514, 57, 26376, 770, 49, 48, 26376, 770, 49, 49, 26376, 770, 49, 50, 26376, 263, 12450, 263, 12452, 263, 12454, 263, 12456, 263, 12458, 263, 12459, 263, 12461, 263, 12463, 263, 12465, 263, 12467, 263, 12469, 263, 12471, 263, 12473, 263, 12475, 263, 12477, 263, 12479, 263, 12481, 263, 12484, 263, 12486, 263, 12488, 263, 12490, 263, 12491, 263, 12492, 263, 12493, 263, 12494, 263, 12495, 263, 12498, 263, 12501, 263, 12504, 263, 12507, 263, 12510, 263, 12511, 263, 12512, 263, 12513, 263, 12514, 263, 12516, 263, 12518, 263, 12520, 263, 12521, 263, 12522, 263, 12523, 263, 12524, 263, 12525, 263, 12527, 263, 12528, 263, 12529, 263, 12530, 1034, 12450, 12497, 12540, 12488, 1034, 12450, 12523, 12501, 12449, 1034, 12450, 12531, 12506, 12450, 778, 12450, 12540, 12523, 1034, 12452, 12491, 12531, 12464, 778, 12452, 12531, 12481, 778, 12454, 12457, 12531, 1290, 12456, 12473, 12463, 12540, 12489, 1034, 12456, 12540, 12459, 12540, 778, 12458, 12531, 12473, 778, 12458, 12540, 12512, 778, 12459, 12452, 12522, 1034, 12459, 12521, 12483, 12488, 1034, 12459, 12525, 12522, 12540, 778, 12460, 12525, 12531, 778, 12460, 12531, 12510, 522, 12462, 12460, 778, 12462, 12491, 12540, 1034, 12461, 12517, 12522, 12540, 1034, 12462, 12523, 12480, 12540, 522, 12461, 12525, 1290, 12461, 12525, 12464, 12521, 12512, 1546, 12461, 12525, 12513, 12540, 12488, 12523, 1290, 12461, 12525, 12527, 12483, 12488, 778, 12464, 12521, 12512, 1290, 12464, 12521, 12512, 12488, 12531, 1290, 12463, 12523, 12476, 12452, 12525, 1034, 12463, 12525, 12540, 12493, 778, 12465, 12540, 12473, 778, 12467, 12523, 12490, 778, 12467, 12540, 12509, 1034, 12469, 12452, 12463, 12523, 1290, 12469, 12531, 12481, 12540, 12512, 1034, 12471, 12522, 12531, 12464, 778, 12475, 12531, 12481, 778, 12475, 12531, 12488, 778, 12480, 12540, 12473, 522, 12487, 12471, 522, 12489, 12523, 522, 12488, 12531, 522, 12490, 12494, 778, 12494, 12483, 12488, 778, 12495, 12452, 12484, 1290, 12497, 12540, 12475, 12531, 12488, 778, 12497, 12540, 12484, 1034, 12496, 12540, 12524, 12523, 1290, 12500, 12450, 12473, 12488, 12523, 778, 12500, 12463, 12523, 522, 12500, 12467, 522, 12499, 12523, 1290, 12501, 12449, 12521, 12483, 12489, 1034, 12501, 12451, 12540, 12488, 1290, 12502, 12483, 12471, 12455, 12523, 778, 12501, 12521, 12531, 1290, 12504, 12463, 12479, 12540, 12523, 522, 12506, 12477, 778, 12506, 12491, 12498, 778, 12504, 12523, 12484, 778, 12506, 12531, 12473, 778, 12506, 12540, 12472, 778, 12505, 12540, 12479, 1034, 12509, 12452, 12531, 12488, 778, 12508, 12523, 12488, 522, 12507, 12531, 778, 12509, 12531, 12489, 778, 12507, 12540, 12523, 778, 12507, 12540, 12531, 1034, 12510, 12452, 12463, 12525, 778, 12510, 12452, 12523, 778, 12510, 12483, 12495, 778, 12510, 12523, 12463, 1290, 12510, 12531, 12471, 12519, 12531, 1034, 12511, 12463, 12525, 12531, 522, 12511, 12522, 1290, 12511, 12522, 12496, 12540, 12523, 522, 12513, 12460, 1034, 12513, 12460, 12488, 12531, 1034, 12513, 12540, 12488, 12523, 778, 12516, 12540, 12489, 778, 12516, 12540, 12523, 778, 12518, 12450, 12531, 1034, 12522, 12483, 12488, 12523, 522, 12522, 12521, 778, 12523, 12500, 12540, 1034, 12523, 12540, 12502, 12523, 522, 12524, 12512, 1290, 12524, 12531, 12488, 12466, 12531, 778, 12527, 12483, 12488, 514, 48, 28857, 514, 49, 28857, 514, 50, 28857, 514, 51, 28857, 514, 52, 28857, 514, 53, 28857, 514, 54, 28857, 514, 55, 28857, 514, 56, 28857, 514, 57, 28857, 770, 49, 48, 28857, 770, 49, 49, 28857, 770, 49, 50, 28857, 770, 49, 51, 28857, 770, 49, 52, 28857, 770, 49, 53, 28857, 770, 49, 54, 28857, 770, 49, 55, 28857, 770, 49, 56, 28857, 770, 49, 57, 28857, 770, 50, 48, 28857, 770, 50, 49, 28857, 770, 50, 50, 28857, 770, 50, 51, 28857, 770, 50, 52, 28857, 778, 104, 80, 97, 522, 100, 97, 522, 65, 85, 778, 98, 97, 114, 522, 111, 86, 522, 112, 99, 522, 24179, 25104, 522, 26157, 21644, 522, 22823, 27491, 522, 26126, 27835, 1034, 26666, 24335, 20250, 31038, 522, 112, 65, 522, 110, 65, 522, 956, 65, 522, 109, 65, 522, 107, 65, 522, 75, 66, 522, 77, 66, 522, 71, 66, 778, 99, 97, 108, 1034, 107, 99, 97, 108, 522, 112, 70, 522, 110, 70, 522, 956, 70, 522, 956, 103, 522, 109, 103, 522, 107, 103, 522, 72, 122, 778, 107, 72, 122, 778, 77, 72, 122, 778, 71, 72, 122, 778, 84, 72, 122, 522, 956, 8467, 522, 109, 8467, 522, 100, 8467, 522, 107, 8467, 522, 102, 109, 522, 110, 109, 522, 956, 109, 522, 109, 109, 522, 99, 109, 522, 107, 109, 778, 109, 109, 178, 778, 99, 109, 178, 522, 109, 178, 778, 107, 109, 178, 778, 109, 109, 179, 778, 99, 109, 179, 522, 109, 179, 778, 107, 109, 179, 778, 109, 8725, 115, 1034, 109, 8725, 115, 178, 522, 80, 97, 778, 107, 80, 97, 778, 77, 80, 97, 778, 71, 80, 97, 778, 114, 97, 100, 1290, 114, 97, 100, 8725, 115, 1546, 114, 97, 100, 8725, 115, 178, 522, 112, 115, 522, 110, 115, 522, 956, 115, 522, 109, 115, 522, 112, 86, 522, 110, 86, 522, 956, 86, 522, 109, 86, 522, 107, 86, 522, 77, 86, 522, 112, 87, 522, 110, 87, 522, 956, 87, 522, 109, 87, 522, 107, 87, 522, 77, 87, 522, 107, 937, 522, 77, 937, 1034, 97, 46, 109, 46, 522, 66, 113, 522, 99, 99, 522, 99, 100, 1034, 67, 8725, 107, 103, 778, 67, 111, 46, 522, 100, 66, 522, 71, 121, 522, 104, 97, 522, 72, 80, 522, 105, 110, 522, 75, 75, 522, 75, 77, 522, 107, 116, 522, 108, 109, 522, 108, 110, 778, 108, 111, 103, 522, 108, 120, 522, 109, 98, 778, 109, 105, 108, 778, 109, 111, 108, 522, 80, 72, 1034, 112, 46, 109, 46, 778, 80, 80, 77, 522, 80, 82, 522, 115, 114, 522, 83, 118, 522, 87, 98, 514, 49, 26085, 514, 50, 26085, 514, 51, 26085, 514, 52, 26085, 514, 53, 26085, 514, 54, 26085, 514, 55, 26085, 514, 56, 26085, 514, 57, 26085, 770, 49, 48, 26085, 770, 49, 49, 26085, 770, 49, 50, 26085, 770, 49, 51, 26085, 770, 49, 52, 26085, 770, 49, 53, 26085, 770, 49, 54, 26085, 770, 49, 55, 26085, 770, 49, 56, 26085, 770, 49, 57, 26085, 770, 50, 48, 26085, 770, 50, 49, 26085, 770, 50, 50, 26085, 770, 50, 51, 26085, 770, 50, 52, 26085, 770, 50, 53, 26085, 770, 50, 54, 26085, 770, 50, 55, 26085, 770, 50, 56, 26085, 770, 50, 57, 26085, 770, 51, 48, 26085, 770, 51, 49, 26085, 256, 35912, 256, 26356, 256, 36554, 256, 36040, 256, 28369, 256, 20018, 256, 21477, 256, 40860, 256, 40860, 256, 22865, 256, 37329, 256, 21895, 256, 22856, 256, 25078, 256, 30313, 256, 32645, 256, 34367, 256, 34746, 256, 35064, 256, 37007, 256, 27138, 256, 27931, 256, 28889, 256, 29662, 256, 33853, 256, 37226, 256, 39409, 256, 20098, 256, 21365, 256, 27396, 256, 29211, 256, 34349, 256, 40478, 256, 23888, 256, 28651, 256, 34253, 256, 35172, 256, 25289, 256, 33240, 256, 34847, 256, 24266, 256, 26391, 256, 28010, 256, 29436, 256, 37070, 256, 20358, 256, 20919, 256, 21214, 256, 25796, 256, 27347, 256, 29200, 256, 30439, 256, 32769, 256, 34310, 256, 34396, 256, 36335, 256, 38706, 256, 39791, 256, 40442, 256, 30860, 256, 31103, 256, 32160, 256, 33737, 256, 37636, 256, 40575, 256, 35542, 256, 22751, 256, 24324, 256, 31840, 256, 32894, 256, 29282, 256, 30922, 256, 36034, 256, 38647, 256, 22744, 256, 23650, 256, 27155, 256, 28122, 256, 28431, 256, 32047, 256, 32311, 256, 38475, 256, 21202, 256, 32907, 256, 20956, 256, 20940, 256, 31260, 256, 32190, 256, 33777, 256, 38517, 256, 35712, 256, 25295, 256, 27138, 256, 35582, 256, 20025, 256, 23527, 256, 24594, 256, 29575, 256, 30064, 256, 21271, 256, 30971, 256, 20415, 256, 24489, 256, 19981, 256, 27852, 256, 25976, 256, 32034, 256, 21443, 256, 22622, 256, 30465, 256, 33865, 256, 35498, 256, 27578, 256, 36784, 256, 27784, 256, 25342, 256, 33509, 256, 25504, 256, 30053, 256, 20142, 256, 20841, 256, 20937, 256, 26753, 256, 31975, 256, 33391, 256, 35538, 256, 37327, 256, 21237, 256, 21570, 256, 22899, 256, 24300, 256, 26053, 256, 28670, 256, 31018, 256, 38317, 256, 39530, 256, 40599, 256, 40654, 256, 21147, 256, 26310, 256, 27511, 256, 36706, 256, 24180, 256, 24976, 256, 25088, 256, 25754, 256, 28451, 256, 29001, 256, 29833, 256, 31178, 256, 32244, 256, 32879, 256, 36646, 256, 34030, 256, 36899, 256, 37706, 256, 21015, 256, 21155, 256, 21693, 256, 28872, 256, 35010, 256, 35498, 256, 24265, 256, 24565, 256, 25467, 256, 27566, 256, 31806, 256, 29557, 256, 20196, 256, 22265, 256, 23527, 256, 23994, 256, 24604, 256, 29618, 256, 29801, 256, 32666, 256, 32838, 256, 37428, 256, 38646, 256, 38728, 256, 38936, 256, 20363, 256, 31150, 256, 37300, 256, 38584, 256, 24801, 256, 20102, 256, 20698, 256, 23534, 256, 23615, 256, 26009, 256, 27138, 256, 29134, 256, 30274, 256, 34044, 256, 36988, 256, 40845, 256, 26248, 256, 38446, 256, 21129, 256, 26491, 256, 26611, 256, 27969, 256, 28316, 256, 29705, 256, 30041, 256, 30827, 256, 32016, 256, 39006, 256, 20845, 256, 25134, 256, 38520, 256, 20523, 256, 23833, 256, 28138, 256, 36650, 256, 24459, 256, 24900, 256, 26647, 256, 29575, 256, 38534, 256, 21033, 256, 21519, 256, 23653, 256, 26131, 256, 26446, 256, 26792, 256, 27877, 256, 29702, 256, 30178, 256, 32633, 256, 35023, 256, 35041, 256, 37324, 256, 38626, 256, 21311, 256, 28346, 256, 21533, 256, 29136, 256, 29848, 256, 34298, 256, 38563, 256, 40023, 256, 40607, 256, 26519, 256, 28107, 256, 33256, 256, 31435, 256, 31520, 256, 31890, 256, 29376, 256, 28825, 256, 35672, 256, 20160, 256, 33590, 256, 21050, 256, 20999, 256, 24230, 256, 25299, 256, 31958, 256, 23429, 256, 27934, 256, 26292, 256, 36667, 256, 34892, 256, 38477, 256, 35211, 256, 24275, 256, 20800, 256, 21952, 256, 22618, 256, 26228, 256, 20958, 256, 29482, 256, 30410, 256, 31036, 256, 31070, 256, 31077, 256, 31119, 256, 38742, 256, 31934, 256, 32701, 256, 34322, 256, 35576, 256, 36920, 256, 37117, 256, 39151, 256, 39164, 256, 39208, 256, 40372, 256, 20398, 256, 20711, 256, 20813, 256, 21193, 256, 21220, 256, 21329, 256, 21917, 256, 22022, 256, 22120, 256, 22592, 256, 22696, 256, 23652, 256, 23662, 256, 24724, 256, 24936, 256, 24974, 256, 25074, 256, 25935, 256, 26082, 256, 26257, 256, 26757, 256, 28023, 256, 28186, 256, 28450, 256, 29038, 256, 29227, 256, 29730, 256, 30865, 256, 31038, 256, 31049, 256, 31048, 256, 31056, 256, 31062, 256, 31069, 256, 31117, 256, 31118, 256, 31296, 256, 31361, 256, 31680, 256, 32244, 256, 32265, 256, 32321, 256, 32626, 256, 32773, 256, 33261, 256, 33401, 256, 33401, 256, 33879, 256, 35088, 256, 35222, 256, 35585, 256, 35641, 256, 36051, 256, 36104, 256, 36790, 256, 36920, 256, 38627, 256, 38911, 256, 38971, 514, 102, 102, 514, 102, 105, 514, 102, 108, 770, 102, 102, 105, 770, 102, 102, 108, 514, 383, 116, 514, 115, 116, 514, 1396, 1398, 514, 1396, 1381, 514, 1396, 1387, 514, 1406, 1398, 514, 1396, 1389, 512, 1497, 1460, 512, 1522, 1463, 262, 1506, 262, 1488, 262, 1491, 262, 1492, 262, 1499, 262, 1500, 262, 1501, 262, 1512, 262, 1514, 262, 43, 512, 1513, 1473, 512, 1513, 1474, 512, 64329, 1473, 512, 64329, 1474, 512, 1488, 1463, 512, 1488, 1464, 512, 1488, 1468, 512, 1489, 1468, 512, 1490, 1468, 512, 1491, 1468, 512, 1492, 1468, 512, 1493, 1468, 512, 1494, 1468, 512, 1496, 1468, 512, 1497, 1468, 512, 1498, 1468, 512, 1499, 1468, 512, 1500, 1468, 512, 1502, 1468, 512, 1504, 1468, 512, 1505, 1468, 512, 1507, 1468, 512, 1508, 1468, 512, 1510, 1468, 512, 1511, 1468, 512, 1512, 1468, 512, 1513, 1468, 512, 1514, 1468, 512, 1493, 1465, 512, 1489, 1471, 512, 1499, 1471, 512, 1508, 1471, 514, 1488, 1500, 267, 1649, 268, 1649, 267, 1659, 268, 1659, 269, 1659, 270, 1659, 267, 1662, 268, 1662, 269, 1662, 270, 1662, 267, 1664, 268, 1664, 269, 1664, 270, 1664, 267, 1658, 268, 1658, 269, 1658, 270, 1658, 267, 1663, 268, 1663, 269, 1663, 270, 1663, 267, 1657, 268, 1657, 269, 1657, 270, 1657, 267, 1700, 268, 1700, 269, 1700, 270, 1700, 267, 1702, 268, 1702, 269, 1702, 270, 1702, 267, 1668, 268, 1668, 269, 1668, 270, 1668, 267, 1667, 268, 1667, 269, 1667, 270, 1667, 267, 1670, 268, 1670, 269, 1670, 270, 1670, 267, 1671, 268, 1671, 269, 1671, 270, 1671, 267, 1677, 268, 1677, 267, 1676, 268, 1676, 267, 1678, 268, 1678, 267, 1672, 268, 1672, 267, 1688, 268, 1688, 267, 1681, 268, 1681, 267, 1705, 268, 1705, 269, 1705, 270, 1705, 267, 1711, 268, 1711, 269, 1711, 270, 1711, 267, 1715, 268, 1715, 269, 1715, 270, 1715, 267, 1713, 268, 1713, 269, 1713, 270, 1713, 267, 1722, 268, 1722, 267, 1723, 268, 1723, 269, 1723, 270, 1723, 267, 1728, 268, 1728, 267, 1729, 268, 1729, 269, 1729, 270, 1729, 267, 1726, 268, 1726, 269, 1726, 270, 1726, 267, 1746, 268, 1746, 267, 1747, 268, 1747, 267, 1709, 268, 1709, 269, 1709, 270, 1709, 267, 1735, 268, 1735, 267, 1734, 268, 1734, 267, 1736, 268, 1736, 267, 1655, 267, 1739, 268, 1739, 267, 1733, 268, 1733, 267, 1737, 268, 1737, 267, 1744, 268, 1744, 269, 1744, 270, 1744, 269, 1609, 270, 1609, 523, 1574, 1575, 524, 1574, 1575, 523, 1574, 1749, 524, 1574, 1749, 523, 1574, 1608, 524, 1574, 1608, 523, 1574, 1735, 524, 1574, 1735, 523, 1574, 1734, 524, 1574, 1734, 523, 1574, 1736, 524, 1574, 1736, 523, 1574, 1744, 524, 1574, 1744, 525, 1574, 1744, 523, 1574, 1609, 524, 1574, 1609, 525, 1574, 1609, 267, 1740, 268, 1740, 269, 1740, 270, 1740, 523, 1574, 1580, 523, 1574, 1581, 523, 1574, 1605, 523, 1574, 1609, 523, 1574, 1610, 523, 1576, 1580, 523, 1576, 1581, 523, 1576, 1582, 523, 1576, 1605, 523, 1576, 1609, 523, 1576, 1610, 523, 1578, 1580, 523, 1578, 1581, 523, 1578, 1582, 523, 1578, 1605, 523, 1578, 1609, 523, 1578, 1610, 523, 1579, 1580, 523, 1579, 1605, 523, 1579, 1609, 523, 1579, 1610, 523, 1580, 1581, 523, 1580, 1605, 523, 1581, 1580, 523, 1581, 1605, 523, 1582, 1580, 523, 1582, 1581, 523, 1582, 1605, 523, 1587, 1580, 523, 1587, 1581, 523, 1587, 1582, 523, 1587, 1605, 523, 1589, 1581, 523, 1589, 1605, 523, 1590, 1580, 523, 1590, 1581, 523, 1590, 1582, 523, 1590, 1605, 523, 1591, 1581, 523, 1591, 1605, 523, 1592, 1605, 523, 1593, 1580, 523, 1593, 1605, 523, 1594, 1580, 523, 1594, 1605, 523, 1601, 1580, 523, 1601, 1581, 523, 1601, 1582, 523, 1601, 1605, 523, 1601, 1609, 523, 1601, 1610, 523, 1602, 1581, 523, 1602, 1605, 523, 1602, 1609, 523, 1602, 1610, 523, 1603, 1575, 523, 1603, 1580, 523, 1603, 1581, 523, 1603, 1582, 523, 1603, 1604, 523, 1603, 1605, 523, 1603, 1609, 523, 1603, 1610, 523, 1604, 1580, 523, 1604, 1581, 523, 1604, 1582, 523, 1604, 1605, 523, 1604, 1609, 523, 1604, 1610, 523, 1605, 1580, 523, 1605, 1581, 523, 1605, 1582, 523, 1605, 1605, 523, 1605, 1609, 523, 1605, 1610, 523, 1606, 1580, 523, 1606, 1581, 523, 1606, 1582, 523, 1606, 1605, 523, 1606, 1609, 523, 1606, 1610, 523, 1607, 1580, 523, 1607, 1605, 523, 1607, 1609, 523, 1607, 1610, 523, 1610, 1580, 523, 1610, 1581, 523, 1610, 1582, 523, 1610, 1605, 523, 1610, 1609, 523, 1610, 1610, 523, 1584, 1648, 523, 1585, 1648, 523, 1609, 1648, 779, 32, 1612, 1617, 779, 32, 1613, 1617, 779, 32, 1614, 1617, 779, 32, 1615, 1617, 779, 32, 1616, 1617, 779, 32, 1617, 1648, 524, 1574, 1585, 524, 1574, 1586, 524, 1574, 1605, 524, 1574, 1606, 524, 1574, 1609, 524, 1574, 1610, 524, 1576, 1585, 524, 1576, 1586, 524, 1576, 1605, 524, 1576, 1606, 524, 1576, 1609, 524, 1576, 1610, 524, 1578, 1585, 524, 1578, 1586, 524, 1578, 1605, 524, 1578, 1606, 524, 1578, 1609, 524, 1578, 1610, 524, 1579, 1585, 524, 1579, 1586, 524, 1579, 1605, 524, 1579, 1606, 524, 1579, 1609, 524, 1579, 1610, 524, 1601, 1609, 524, 1601, 1610, 524, 1602, 1609, 524, 1602, 1610, 524, 1603, 1575, 524, 1603, 1604, 524, 1603, 1605, 524, 1603, 1609, 524, 1603, 1610, 524, 1604, 1605, 524, 1604, 1609, 524, 1604, 1610, 524, 1605, 1575, 524, 1605, 1605, 524, 1606, 1585, 524, 1606, 1586, 524, 1606, 1605, 524, 1606, 1606, 524, 1606, 1609, 524, 1606, 1610, 524, 1609, 1648, 524, 1610, 1585, 524, 1610, 1586, 524, 1610, 1605, 524, 1610, 1606, 524, 1610, 1609, 524, 1610, 1610, 525, 1574, 1580, 525, 1574, 1581, 525, 1574, 1582, 525, 1574, 1605, 525, 1574, 1607, 525, 1576, 1580, 525, 1576, 1581, 525, 1576, 1582, 525, 1576, 1605, 525, 1576, 1607, 525, 1578, 1580, 525, 1578, 1581, 525, 1578, 1582, 525, 1578, 1605, 525, 1578, 1607, 525, 1579, 1605, 525, 1580, 1581, 525, 1580, 1605, 525, 1581, 1580, 525, 1581, 1605, 525, 1582, 1580, 525, 1582, 1605, 525, 1587, 1580, 525, 1587, 1581, 525, 1587, 1582, 525, 1587, 1605, 525, 1589, 1581, 525, 1589, 1582, 525, 1589, 1605, 525, 1590, 1580, 525, 1590, 1581, 525, 1590, 1582, 525, 1590, 1605, 525, 1591, 1581, 525, 1592, 1605, 525, 1593, 1580, 525, 1593, 1605, 525, 1594, 1580, 525, 1594, 1605, 525, 1601, 1580, 525, 1601, 1581, 525, 1601, 1582, 525, 1601, 1605, 525, 1602, 1581, 525, 1602, 1605, 525, 1603, 1580, 525, 1603, 1581, 525, 1603, 1582, 525, 1603, 1604, 525, 1603, 1605, 525, 1604, 1580, 525, 1604, 1581, 525, 1604, 1582, 525, 1604, 1605, 525, 1604, 1607, 525, 1605, 1580, 525, 1605, 1581, 525, 1605, 1582, 525, 1605, 1605, 525, 1606, 1580, 525, 1606, 1581, 525, 1606, 1582, 525, 1606, 1605, 525, 1606, 1607, 525, 1607, 1580, 525, 1607, 1605, 525, 1607, 1648, 525, 1610, 1580, 525, 1610, 1581, 525, 1610, 1582, 525, 1610, 1605, 525, 1610, 1607, 526, 1574, 1605, 526, 1574, 1607, 526, 1576, 1605, 526, 1576, 1607, 526, 1578, 1605, 526, 1578, 1607, 526, 1579, 1605, 526, 1579, 1607, 526, 1587, 1605, 526, 1587, 1607, 526, 1588, 1605, 526, 1588, 1607, 526, 1603, 1604, 526, 1603, 1605, 526, 1604, 1605, 526, 1606, 1605, 526, 1606, 1607, 526, 1610, 1605, 526, 1610, 1607, 782, 1600, 1614, 1617, 782, 1600, 1615, 1617, 782, 1600, 1616, 1617, 523, 1591, 1609, 523, 1591, 1610, 523, 1593, 1609, 523, 1593, 1610, 523, 1594, 1609, 523, 1594, 1610, 523, 1587, 1609, 523, 1587, 1610, 523, 1588, 1609, 523, 1588, 1610, 523, 1581, 1609, 523, 1581, 1610, 523, 1580, 1609, 523, 1580, 1610, 523, 1582, 1609, 523, 1582, 1610, 523, 1589, 1609, 523, 1589, 1610, 523, 1590, 1609, 523, 1590, 1610, 523, 1588, 1580, 523, 1588, 1581, 523, 1588, 1582, 523, 1588, 1605, 523, 1588, 1585, 523, 1587, 1585, 523, 1589, 1585, 523, 1590, 1585, 524, 1591, 1609, 524, 1591, 1610, 524, 1593, 1609, 524, 1593, 1610, 524, 1594, 1609, 524, 1594, 1610, 524, 1587, 1609, 524, 1587, 1610, 524, 1588, 1609, 524, 1588, 1610, 524, 1581, 1609, 524, 1581, 1610, 524, 1580, 1609, 524, 1580, 1610, 524, 1582, 1609, 524, 1582, 1610, 524, 1589, 1609, 524, 1589, 1610, 524, 1590, 1609, 524, 1590, 1610, 524, 1588, 1580, 524, 1588, 1581, 524, 1588, 1582, 524, 1588, 1605, 524, 1588, 1585, 524, 1587, 1585, 524, 1589, 1585, 524, 1590, 1585, 525, 1588, 1580, 525, 1588, 1581, 525, 1588, 1582, 525, 1588, 1605, 525, 1587, 1607, 525, 1588, 1607, 525, 1591, 1605, 526, 1587, 1580, 526, 1587, 1581, 526, 1587, 1582, 526, 1588, 1580, 526, 1588, 1581, 526, 1588, 1582, 526, 1591, 1605, 526, 1592, 1605, 524, 1575, 1611, 523, 1575, 1611, 781, 1578, 1580, 1605, 780, 1578, 1581, 1580, 781, 1578, 1581, 1580, 781, 1578, 1581, 1605, 781, 1578, 1582, 1605, 781, 1578, 1605, 1580, 781, 1578, 1605, 1581, 781, 1578, 1605, 1582, 780, 1580, 1605, 1581, 781, 1580, 1605, 1581, 780, 1581, 1605, 1610, 780, 1581, 1605, 1609, 781, 1587, 1581, 1580, 781, 1587, 1580, 1581, 780, 1587, 1580, 1609, 780, 1587, 1605, 1581, 781, 1587, 1605, 1581, 781, 1587, 1605, 1580, 780, 1587, 1605, 1605, 781, 1587, 1605, 1605, 780, 1589, 1581, 1581, 781, 1589, 1581, 1581, 780, 1589, 1605, 1605, 780, 1588, 1581, 1605, 781, 1588, 1581, 1605, 780, 1588, 1580, 1610, 780, 1588, 1605, 1582, 781, 1588, 1605, 1582, 780, 1588, 1605, 1605, 781, 1588, 1605, 1605, 780, 1590, 1581, 1609, 780, 1590, 1582, 1605, 781, 1590, 1582, 1605, 780, 1591, 1605, 1581, 781, 1591, 1605, 1581, 781, 1591, 1605, 1605, 780, 1591, 1605, 1610, 780, 1593, 1580, 1605, 780, 1593, 1605, 1605, 781, 1593, 1605, 1605, 780, 1593, 1605, 1609, 780, 1594, 1605, 1605, 780, 1594, 1605, 1610, 780, 1594, 1605, 1609, 780, 1601, 1582, 1605, 781, 1601, 1582, 1605, 780, 1602, 1605, 1581, 780, 1602, 1605, 1605, 780, 1604, 1581, 1605, 780, 1604, 1581, 1610, 780, 1604, 1581, 1609, 781, 1604, 1580, 1580, 780, 1604, 1580, 1580, 780, 1604, 1582, 1605, 781, 1604, 1582, 1605, 780, 1604, 1605, 1581, 781, 1604, 1605, 1581, 781, 1605, 1581, 1580, 781, 1605, 1581, 1605, 780, 1605, 1581, 1610, 781, 1605, 1580, 1581, 781, 1605, 1580, 1605, 781, 1605, 1582, 1580, 781, 1605, 1582, 1605, 781, 1605, 1580, 1582, 781, 1607, 1605, 1580, 781, 1607, 1605, 1605, 781, 1606, 1581, 1605, 780, 1606, 1581, 1609, 780, 1606, 1580, 1605, 781, 1606, 1580, 1605, 780, 1606, 1580, 1609, 780, 1606, 1605, 1610, 780, 1606, 1605, 1609, 780, 1610, 1605, 1605, 781, 1610, 1605, 1605, 780, 1576, 1582, 1610, 780, 1578, 1580, 1610, 780, 1578, 1580, 1609, 780, 1578, 1582, 1610, 780, 1578, 1582, 1609, 780, 1578, 1605, 1610, 780, 1578, 1605, 1609, 780, 1580, 1605, 1610, 780, 1580, 1581, 1609, 780, 1580, 1605, 1609, 780, 1587, 1582, 1609, 780, 1589, 1581, 1610, 780, 1588, 1581, 1610, 780, 1590, 1581, 1610, 780, 1604, 1580, 1610, 780, 1604, 1605, 1610, 780, 1610, 1581, 1610, 780, 1610, 1580, 1610, 780, 1610, 1605, 1610, 780, 1605, 1605, 1610, 780, 1602, 1605, 1610, 780, 1606, 1581, 1610, 781, 1602, 1605, 1581, 781, 1604, 1581, 1605, 780, 1593, 1605, 1610, 780, 1603, 1605, 1610, 781, 1606, 1580, 1581, 780, 1605, 1582, 1610, 781, 1604, 1580, 1605, 780, 1603, 1605, 1605, 780, 1604, 1580, 1605, 780, 1606, 1580, 1581, 780, 1580, 1581, 1610, 780, 1581, 1580, 1610, 780, 1605, 1580, 1610, 780, 1601, 1605, 1610, 780, 1576, 1581, 1610, 781, 1603, 1605, 1605, 781, 1593, 1580, 1605, 781, 1589, 1605, 1605, 780, 1587, 1582, 1610, 780, 1606, 1580, 1610, 779, 1589, 1604, 1746, 779, 1602, 1604, 1746, 1035, 1575, 1604, 1604, 1607, 1035, 1575, 1603, 1576, 1585, 1035, 1605, 1581, 1605, 1583, 1035, 1589, 1604, 1593, 1605, 1035, 1585, 1587, 1608, 1604, 1035, 1593, 1604, 1610, 1607, 1035, 1608, 1587, 1604, 1605, 779, 1589, 1604, 1609, 4619, 1589, 1604, 1609, 32, 1575, 1604, 1604, 1607, 32, 1593, 1604, 1610, 1607, 32, 1608, 1587, 1604, 1605, 2059, 1580, 1604, 32, 1580, 1604, 1575, 1604, 1607, 1035, 1585, 1740, 1575, 1604, 265, 8229, 265, 8212, 265, 8211, 265, 95, 265, 95, 265, 40, 265, 41, 265, 123, 265, 125, 265, 12308, 265, 12309, 265, 12304, 265, 12305, 265, 12298, 265, 12299, 265, 12296, 265, 12297, 265, 12300, 265, 12301, 265, 12302, 265, 12303, 258, 8254, 258, 8254, 258, 8254, 258, 8254, 258, 95, 258, 95, 258, 95, 271, 44, 271, 12289, 271, 46, 271, 59, 271, 58, 271, 63, 271, 33, 271, 8212, 271, 40, 271, 41, 271, 123, 271, 125, 271, 12308, 271, 12309, 271, 35, 271, 38, 271, 42, 271, 43, 271, 45, 271, 60, 271, 62, 271, 61, 271, 92, 271, 36, 271, 37, 271, 64, 523, 32, 1611, 526, 1600, 1611, 523, 32, 1612, 523, 32, 1613, 523, 32, 1614, 526, 1600, 1614, 523, 32, 1615, 526, 1600, 1615, 523, 32, 1616, 526, 1600, 1616, 523, 32, 1617, 526, 1600, 1617, 523, 32, 1618, 526, 1600, 1618, 267, 1569, 267, 1570, 268, 1570, 267, 1571, 268, 1571, 267, 1572, 268, 1572, 267, 1573, 268, 1573, 267, 1574, 268, 1574, 269, 1574, 270, 1574, 267, 1575, 268, 1575, 267, 1576, 268, 1576, 269, 1576, 270, 1576, 267, 1577, 268, 1577, 267, 1578, 268, 1578, 269, 1578, 270, 1578, 267, 1579, 268, 1579, 269, 1579, 270, 1579, 267, 1580, 268, 1580, 269, 1580, 270, 1580, 267, 1581, 268, 1581, 269, 1581, 270, 1581, 267, 1582, 268, 1582, 269, 1582, 270, 1582, 267, 1583, 268, 1583, 267, 1584, 268, 1584, 267, 1585, 268, 1585, 267, 1586, 268, 1586, 267, 1587, 268, 1587, 269, 1587, 270, 1587, 267, 1588, 268, 1588, 269, 1588, 270, 1588, 267, 1589, 268, 1589, 269, 1589, 270, 1589, 267, 1590, 268, 1590, 269, 1590, 270, 1590, 267, 1591, 268, 1591, 269, 1591, 270, 1591, 267, 1592, 268, 1592, 269, 1592, 270, 1592, 267, 1593, 268, 1593, 269, 1593, 270, 1593, 267, 1594, 268, 1594, 269, 1594, 270, 1594, 267, 1601, 268, 1601, 269, 1601, 270, 1601, 267, 1602, 268, 1602, 269, 1602, 270, 1602, 267, 1603, 268, 1603, 269, 1603, 270, 1603, 267, 1604, 268, 1604, 269, 1604, 270, 1604, 267, 1605, 268, 1605, 269, 1605, 270, 1605, 267, 1606, 268, 1606, 269, 1606, 270, 1606, 267, 1607, 268, 1607, 269, 1607, 270, 1607, 267, 1608, 268, 1608, 267, 1609, 268, 1609, 267, 1610, 268, 1610, 269, 1610, 270, 1610, 523, 1604, 1570, 524, 1604, 1570, 523, 1604, 1571, 524, 1604, 1571, 523, 1604, 1573, 524, 1604, 1573, 523, 1604, 1575, 524, 1604, 1575, 264, 33, 264, 34, 264, 35, 264, 36, 264, 37, 264, 38, 264, 39, 264, 40, 264, 41, 264, 42, 264, 43, 264, 44, 264, 45, 264, 46, 264, 47, 264, 48, 264, 49, 264, 50, 264, 51, 264, 52, 264, 53, 264, 54, 264, 55, 264, 56, 264, 57, 264, 58, 264, 59, 264, 60, 264, 61, 264, 62, 264, 63, 264, 64, 264, 65, 264, 66, 264, 67, 264, 68, 264, 69, 264, 70, 264, 71, 264, 72, 264, 73, 264, 74, 264, 75, 264, 76, 264, 77, 264, 78, 264, 79, 264, 80, 264, 81, 264, 82, 264, 83, 264, 84, 264, 85, 264, 86, 264, 87, 264, 88, 264, 89, 264, 90, 264, 91, 264, 92, 264, 93, 264, 94, 264, 95, 264, 96, 264, 97, 264, 98, 264, 99, 264, 100, 264, 101, 264, 102, 264, 103, 264, 104, 264, 105, 264, 106, 264, 107, 264, 108, 264, 109, 264, 110, 264, 111, 264, 112, 264, 113, 264, 114, 264, 115, 264, 116, 264, 117, 264, 118, 264, 119, 264, 120, 264, 121, 264, 122, 264, 123, 264, 124, 264, 125, 264, 126, 264, 10629, 264, 10630, 272, 12290, 272, 12300, 272, 12301, 272, 12289, 272, 12539, 272, 12530, 272, 12449, 272, 12451, 272, 12453, 272, 12455, 272, 12457, 272, 12515, 272, 12517, 272, 12519, 272, 12483, 272, 12540, 272, 12450, 272, 12452, 272, 12454, 272, 12456, 272, 12458, 272, 12459, 272, 12461, 272, 12463, 272, 12465, 272, 12467, 272, 12469, 272, 12471, 272, 12473, 272, 12475, 272, 12477, 272, 12479, 272, 12481, 272, 12484, 272, 12486, 272, 12488, 272, 12490, 272, 12491, 272, 12492, 272, 12493, 272, 12494, 272, 12495, 272, 12498, 272, 12501, 272, 12504, 272, 12507, 272, 12510, 272, 12511, 272, 12512, 272, 12513, 272, 12514, 272, 12516, 272, 12518, 272, 12520, 272, 12521, 272, 12522, 272, 12523, 272, 12524, 272, 12525, 272, 12527, 272, 12531, 272, 12441, 272, 12442, 272, 12644, 272, 12593, 272, 12594, 272, 12595, 272, 12596, 272, 12597, 272, 12598, 272, 12599, 272, 12600, 272, 12601, 272, 12602, 272, 12603, 272, 12604, 272, 12605, 272, 12606, 272, 12607, 272, 12608, 272, 12609, 272, 12610, 272, 12611, 272, 12612, 272, 12613, 272, 12614, 272, 12615, 272, 12616, 272, 12617, 272, 12618, 272, 12619, 272, 12620, 272, 12621, 272, 12622, 272, 12623, 272, 12624, 272, 12625, 272, 12626, 272, 12627, 272, 12628, 272, 12629, 272, 12630, 272, 12631, 272, 12632, 272, 12633, 272, 12634, 272, 12635, 272, 12636, 272, 12637, 272, 12638, 272, 12639, 272, 12640, 272, 12641, 272, 12642, 272, 12643, 264, 162, 264, 163, 264, 172, 264, 175, 264, 166, 264, 165, 264, 8361, 272, 9474, 272, 8592, 272, 8593, 272, 8594, 272, 8595, 272, 9632, 272, 9675, 512, 119127, 119141, 512, 119128, 119141, 512, 119135, 119150, 512, 119135, 119151, 512, 119135, 119152, 512, 119135, 119153, 512, 119135, 119154, 512, 119225, 119141, 512, 119226, 119141, 512, 119227, 119150, 512, 119228, 119150, 512, 119227, 119151, 512, 119228, 119151, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 67, 262, 68, 262, 71, 262, 74, 262, 75, 262, 78, 262, 79, 262, 80, 262, 81, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 102, 262, 104, 262, 105, 262, 106, 262, 107, 262, 109, 262, 110, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 68, 262, 69, 262, 70, 262, 71, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 68, 262, 69, 262, 70, 262, 71, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 79, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 65, 262, 66, 262, 67, 262, 68, 262, 69, 262, 70, 262, 71, 262, 72, 262, 73, 262, 74, 262, 75, 262, 76, 262, 77, 262, 78, 262, 79, 262, 80, 262, 81, 262, 82, 262, 83, 262, 84, 262, 85, 262, 86, 262, 87, 262, 88, 262, 89, 262, 90, 262, 97, 262, 98, 262, 99, 262, 100, 262, 101, 262, 102, 262, 103, 262, 104, 262, 105, 262, 106, 262, 107, 262, 108, 262, 109, 262, 110, 262, 111, 262, 112, 262, 113, 262, 114, 262, 115, 262, 116, 262, 117, 262, 118, 262, 119, 262, 120, 262, 121, 262, 122, 262, 913, 262, 914, 262, 915, 262, 916, 262, 917, 262, 918, 262, 919, 262, 920, 262, 921, 262, 922, 262, 923, 262, 924, 262, 925, 262, 926, 262, 927, 262, 928, 262, 929, 262, 1012, 262, 931, 262, 932, 262, 933, 262, 934, 262, 935, 262, 936, 262, 937, 262, 8711, 262, 945, 262, 946, 262, 947, 262, 948, 262, 949, 262, 950, 262, 951, 262, 952, 262, 953, 262, 954, 262, 955, 262, 956, 262, 957, 262, 958, 262, 959, 262, 960, 262, 961, 262, 962, 262, 963, 262, 964, 262, 965, 262, 966, 262, 967, 262, 968, 262, 969, 262, 8706, 262, 1013, 262, 977, 262, 1008, 262, 981, 262, 1009, 262, 982, 262, 913, 262, 914, 262, 915, 262, 916, 262, 917, 262, 918, 262, 919, 262, 920, 262, 921, 262, 922, 262, 923, 262, 924, 262, 925, 262, 926, 262, 927, 262, 928, 262, 929, 262, 1012, 262, 931, 262, 932, 262, 933, 262, 934, 262, 935, 262, 936, 262, 937, 262, 8711, 262, 945, 262, 946, 262, 947, 262, 948, 262, 949, 262, 950, 262, 951, 262, 952, 262, 953, 262, 954, 262, 955, 262, 956, 262, 957, 262, 958, 262, 959, 262, 960, 262, 961, 262, 962, 262, 963, 262, 964, 262, 965, 262, 966, 262, 967, 262, 968, 262, 969, 262, 8706, 262, 1013, 262, 977, 262, 1008, 262, 981, 262, 1009, 262, 982, 262, 913, 262, 914, 262, 915, 262, 916, 262, 917, 262, 918, 262, 919, 262, 920, 262, 921, 262, 922, 262, 923, 262, 924, 262, 925, 262, 926, 262, 927, 262, 928, 262, 929, 262, 1012, 262, 931, 262, 932, 262, 933, 262, 934, 262, 935, 262, 936, 262, 937, 262, 8711, 262, 945, 262, 946, 262, 947, 262, 948, 262, 949, 262, 950, 262, 951, 262, 952, 262, 953, 262, 954, 262, 955, 262, 956, 262, 957, 262, 958, 262, 959, 262, 960, 262, 961, 262, 962, 262, 963, 262, 964, 262, 965, 262, 966, 262, 967, 262, 968, 262, 969, 262, 8706, 262, 1013, 262, 977, 262, 1008, 262, 981, 262, 1009, 262, 982, 262, 913, 262, 914, 262, 915, 262, 916, 262, 917, 262, 918, 262, 919, 262, 920, 262, 921, 262, 922, 262, 923, 262, 924, 262, 925, 262, 926, 262, 927, 262, 928, 262, 929, 262, 1012, 262, 931, 262, 932, 262, 933, 262, 934, 262, 935, 262, 936, 262, 937, 262, 8711, 262, 945, 262, 946, 262, 947, 262, 948, 262, 949, 262, 950, 262, 951, 262, 952, 262, 953, 262, 954, 262, 955, 262, 956, 262, 957, 262, 958, 262, 959, 262, 960, 262, 961, 262, 962, 262, 963, 262, 964, 262, 965, 262, 966, 262, 967, 262, 968, 262, 969, 262, 8706, 262, 1013, 262, 977, 262, 1008, 262, 981, 262, 1009, 262, 982, 262, 913, 262, 914, 262, 915, 262, 916, 262, 917, 262, 918, 262, 919, 262, 920, 262, 921, 262, 922, 262, 923, 262, 924, 262, 925, 262, 926, 262, 927, 262, 928, 262, 929, 262, 1012, 262, 931, 262, 932, 262, 933, 262, 934, 262, 935, 262, 936, 262, 937, 262, 8711, 262, 945, 262, 946, 262, 947, 262, 948, 262, 949, 262, 950, 262, 951, 262, 952, 262, 953, 262, 954, 262, 955, 262, 956, 262, 957, 262, 958, 262, 959, 262, 960, 262, 961, 262, 962, 262, 963, 262, 964, 262, 965, 262, 966, 262, 967, 262, 968, 262, 969, 262, 8706, 262, 1013, 262, 977, 262, 1008, 262, 981, 262, 1009, 262, 982, 262, 48, 262, 49, 262, 50, 262, 51, 262, 52, 262, 53, 262, 54, 262, 55, 262, 56, 262, 57, 262, 48, 262, 49, 262, 50, 262, 51, 262, 52, 262, 53, 262, 54, 262, 55, 262, 56, 262, 57, 262, 48, 262, 49, 262, 50, 262, 51, 262, 52, 262, 53, 262, 54, 262, 55, 262, 56, 262, 57, 262, 48, 262, 49, 262, 50, 262, 51, 262, 52, 262, 53, 262, 54, 262, 55, 262, 56, 262, 57, 262, 48, 262, 49, 262, 50, 262, 51, 262, 52, 262, 53, 262, 54, 262, 55, 262, 56, 262, 57, 256, 20029, 256, 20024, 256, 20033, 256, 131362, 256, 20320, 256, 20398, 256, 20411, 256, 20482, 256, 20602, 256, 20633, 256, 20711, 256, 20687, 256, 13470, 256, 132666, 256, 20813, 256, 20820, 256, 20836, 256, 20855, 256, 132380, 256, 13497, 256, 20839, 256, 20877, 256, 132427, 256, 20887, 256, 20900, 256, 20172, 256, 20908, 256, 20917, 256, 168415, 256, 20981, 256, 20995, 256, 13535, 256, 21051, 256, 21062, 256, 21106, 256, 21111, 256, 13589, 256, 21191, 256, 21193, 256, 21220, 256, 21242, 256, 21253, 256, 21254, 256, 21271, 256, 21321, 256, 21329, 256, 21338, 256, 21363, 256, 21373, 256, 21375, 256, 21375, 256, 21375, 256, 133676, 256, 28784, 256, 21450, 256, 21471, 256, 133987, 256, 21483, 256, 21489, 256, 21510, 256, 21662, 256, 21560, 256, 21576, 256, 21608, 256, 21666, 256, 21750, 256, 21776, 256, 21843, 256, 21859, 256, 21892, 256, 21892, 256, 21913, 256, 21931, 256, 21939, 256, 21954, 256, 22294, 256, 22022, 256, 22295, 256, 22097, 256, 22132, 256, 20999, 256, 22766, 256, 22478, 256, 22516, 256, 22541, 256, 22411, 256, 22578, 256, 22577, 256, 22700, 256, 136420, 256, 22770, 256, 22775, 256, 22790, 256, 22810, 256, 22818, 256, 22882, 256, 136872, 256, 136938, 256, 23020, 256, 23067, 256, 23079, 256, 23000, 256, 23142, 256, 14062, 256, 136042, 256, 23304, 256, 23358, 256, 23358, 256, 137672, 256, 23491, 256, 23512, 256, 23527, 256, 23539, 256, 138008, 256, 23551, 256, 23558, 256, 24371, 256, 23586, 256, 14209, 256, 23648, 256, 23662, 256, 23744, 256, 23693, 256, 138724, 256, 23875, 256, 138726, 256, 23918, 256, 23915, 256, 23932, 256, 24033, 256, 24034, 256, 14383, 256, 24061, 256, 24104, 256, 24125, 256, 24169, 256, 14434, 256, 139651, 256, 14460, 256, 24240, 256, 24243, 256, 24246, 256, 24266, 256, 172946, 256, 24318, 256, 140081, 256, 140081, 256, 33281, 256, 24354, 256, 24354, 256, 14535, 256, 144056, 256, 156122, 256, 24418, 256, 24427, 256, 14563, 256, 24474, 256, 24525, 256, 24535, 256, 24569, 256, 24705, 256, 14650, 256, 14620, 256, 24724, 256, 141012, 256, 24775, 256, 24904, 256, 24908, 256, 24910, 256, 24908, 256, 24954, 256, 24974, 256, 25010, 256, 24996, 256, 25007, 256, 25054, 256, 25074, 256, 25078, 256, 25104, 256, 25115, 256, 25181, 256, 25265, 256, 25300, 256, 25424, 256, 142092, 256, 25405, 256, 25340, 256, 25448, 256, 25475, 256, 25572, 256, 142321, 256, 25634, 256, 25541, 256, 25513, 256, 14894, 256, 25705, 256, 25726, 256, 25757, 256, 25719, 256, 14956, 256, 25935, 256, 25964, 256, 143370, 256, 26083, 256, 26360, 256, 26185, 256, 15129, 256, 26257, 256, 15112, 256, 15076, 256, 20882, 256, 20885, 256, 26368, 256, 26268, 256, 32941, 256, 17369, 256, 26391, 256, 26395, 256, 26401, 256, 26462, 256, 26451, 256, 144323, 256, 15177, 256, 26618, 256, 26501, 256, 26706, 256, 26757, 256, 144493, 256, 26766, 256, 26655, 256, 26900, 256, 15261, 256, 26946, 256, 27043, 256, 27114, 256, 27304, 256, 145059, 256, 27355, 256, 15384, 256, 27425, 256, 145575, 256, 27476, 256, 15438, 256, 27506, 256, 27551, 256, 27578, 256, 27579, 256, 146061, 256, 138507, 256, 146170, 256, 27726, 256, 146620, 256, 27839, 256, 27853, 256, 27751, 256, 27926, 256, 27966, 256, 28023, 256, 27969, 256, 28009, 256, 28024, 256, 28037, 256, 146718, 256, 27956, 256, 28207, 256, 28270, 256, 15667, 256, 28363, 256, 28359, 256, 147153, 256, 28153, 256, 28526, 256, 147294, 256, 147342, 256, 28614, 256, 28729, 256, 28702, 256, 28699, 256, 15766, 256, 28746, 256, 28797, 256, 28791, 256, 28845, 256, 132389, 256, 28997, 256, 148067, 256, 29084, 256, 17323, 256, 29224, 256, 29237, 256, 29264, 256, 149000, 256, 29312, 256, 29333, 256, 149301, 256, 149524, 256, 29562, 256, 29579, 256, 16044, 256, 29605, 256, 16056, 256, 16056, 256, 29767, 256, 29788, 256, 29809, 256, 29829, 256, 29898, 256, 16155, 256, 29988, 256, 150582, 256, 30014, 256, 150674, 256, 30064, 256, 139679, 256, 30224, 256, 151457, 256, 151480, 256, 151620, 256, 16380, 256, 16392, 256, 30452, 256, 151795, 256, 151794, 256, 151833, 256, 151859, 256, 30494, 256, 30495, 256, 30495, 256, 30538, 256, 16441, 256, 30603, 256, 16454, 256, 16534, 256, 152605, 256, 30798, 256, 30860, 256, 30924, 256, 16611, 256, 153126, 256, 31062, 256, 153242, 256, 153285, 256, 31119, 256, 31211, 256, 16687, 256, 31296, 256, 31306, 256, 31311, 256, 153980, 256, 154279, 256, 154279, 256, 31406, 256, 16898, 256, 154539, 256, 31686, 256, 31689, 256, 16935, 256, 154752, 256, 31954, 256, 17056, 256, 31976, 256, 31971, 256, 32000, 256, 155526, 256, 32099, 256, 17153, 256, 32199, 256, 32258, 256, 32325, 256, 17204, 256, 156200, 256, 156231, 256, 17241, 256, 156377, 256, 32634, 256, 156478, 256, 32661, 256, 32762, 256, 32773, 256, 156890, 256, 156963, 256, 32864, 256, 157096, 256, 32880, 256, 144223, 256, 17365, 256, 32946, 256, 33027, 256, 17419, 256, 33086, 256, 23221, 256, 157607, 256, 157621, 256, 144275, 256, 144284, 256, 33281, 256, 33284, 256, 36766, 256, 17515, 256, 33425, 256, 33419, 256, 33437, 256, 21171, 256, 33457, 256, 33459, 256, 33469, 256, 33510, 256, 158524, 256, 33509, 256, 33565, 256, 33635, 256, 33709, 256, 33571, 256, 33725, 256, 33767, 256, 33879, 256, 33619, 256, 33738, 256, 33740, 256, 33756, 256, 158774, 256, 159083, 256, 158933, 256, 17707, 256, 34033, 256, 34035, 256, 34070, 256, 160714, 256, 34148, 256, 159532, 256, 17757, 256, 17761, 256, 159665, 256, 159954, 256, 17771, 256, 34384, 256, 34396, 256, 34407, 256, 34409, 256, 34473, 256, 34440, 256, 34574, 256, 34530, 256, 34681, 256, 34600, 256, 34667, 256, 34694, 256, 19799, 256, 34785, 256, 34817, 256, 17913, 256, 34912, 256, 34915, 256, 161383, 256, 35031, 256, 35038, 256, 17973, 256, 35066, 256, 13499, 256, 161966, 256, 162150, 256, 18110, 256, 18119, 256, 35488, 256, 35565, 256, 35722, 256, 35925, 256, 162984, 256, 36011, 256, 36033, 256, 36123, 256, 36215, 256, 163631, 256, 133124, 256, 36299, 256, 36284, 256, 36336, 256, 133342, 256, 36564, 256, 36664, 256, 165330, 256, 165357, 256, 37012, 256, 37105, 256, 37137, 256, 165678, 256, 37147, 256, 37432, 256, 37591, 256, 37592, 256, 37500, 256, 37881, 256, 37909, 256, 166906, 256, 38283, 256, 18837, 256, 38327, 256, 167287, 256, 18918, 256, 38595, 256, 23986, 256, 38691, 256, 168261, 256, 168474, 256, 19054, 256, 19062, 256, 38880, 256, 168970, 256, 19122, 256, 169110, 256, 38923, 256, 38923, 256, 38953, 256, 169398, 256, 39138, 256, 19251, 256, 39209, 256, 39335, 256, 39362, 256, 39422, 256, 19406, 256, 170800, 256, 39698, 256, 40000, 256, 40189, 256, 19662, 256, 19693, 256, 40295, 256, 172238, 256, 19704, 256, 172293, 256, 172558, 256, 172689, 256, 40635, 256, 19798, 256, 40697, 256, 40702, 256, 40709, 256, 40719, 256, 40726, 256, 40763, 256, 173568, }; /* index tables for the decomposition data */ #define DECOMP_SHIFT 8 static unsigned char decomp_index1[] = { 0, 1, 2, 3, 4, 5, 6, 7, 7, 8, 9, 10, 11, 12, 13, 14, 15, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 16, 17, 18, 19, 20, 21, 22, 7, 7, 7, 7, 7, 23, 7, 7, 7, 24, 25, 26, 27, 28, 29, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 30, 31, 32, 33, 34, 35, 36, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 37, 7, 7, 38, 39, 40, 41, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 42, 43, 44, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, }; static unsigned short decomp_index2[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 3, 0, 6, 0, 0, 0, 0, 8, 0, 0, 11, 13, 15, 18, 0, 0, 20, 23, 25, 0, 27, 31, 35, 0, 39, 42, 45, 48, 51, 54, 0, 57, 60, 63, 66, 69, 72, 75, 78, 81, 0, 84, 87, 90, 93, 96, 99, 0, 0, 102, 105, 108, 111, 114, 0, 0, 117, 120, 123, 126, 129, 132, 0, 135, 138, 141, 144, 147, 150, 153, 156, 159, 0, 162, 165, 168, 171, 174, 177, 0, 0, 180, 183, 186, 189, 192, 0, 195, 198, 201, 204, 207, 210, 213, 216, 219, 222, 225, 228, 231, 234, 237, 240, 243, 0, 0, 246, 249, 252, 255, 258, 261, 264, 267, 270, 273, 276, 279, 282, 285, 288, 291, 294, 297, 300, 303, 0, 0, 306, 309, 312, 315, 318, 321, 324, 327, 330, 0, 333, 336, 339, 342, 345, 348, 0, 351, 354, 357, 360, 363, 366, 369, 372, 0, 0, 375, 378, 381, 384, 387, 390, 393, 0, 0, 396, 399, 402, 405, 408, 411, 0, 0, 414, 417, 420, 423, 426, 429, 432, 435, 438, 441, 444, 447, 450, 453, 456, 459, 462, 465, 0, 0, 468, 471, 474, 477, 480, 483, 486, 489, 492, 495, 498, 501, 504, 507, 510, 513, 516, 519, 522, 525, 528, 531, 534, 537, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 539, 542, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 545, 548, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 551, 554, 557, 560, 563, 566, 569, 572, 575, 578, 581, 584, 587, 590, 593, 596, 599, 602, 605, 608, 611, 614, 617, 620, 623, 0, 626, 629, 632, 635, 638, 641, 0, 0, 644, 647, 650, 653, 656, 659, 662, 665, 668, 671, 674, 677, 680, 683, 686, 689, 0, 0, 692, 695, 698, 701, 704, 707, 710, 713, 716, 719, 722, 725, 728, 731, 734, 737, 740, 743, 746, 749, 752, 755, 758, 761, 764, 767, 770, 773, 776, 779, 782, 785, 788, 791, 794, 797, 0, 0, 800, 803, 0, 0, 0, 0, 0, 0, 806, 809, 812, 815, 818, 821, 824, 827, 830, 833, 836, 839, 842, 845, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 848, 850, 852, 854, 856, 858, 860, 862, 864, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 866, 869, 872, 875, 878, 881, 0, 0, 884, 886, 888, 890, 892, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 894, 896, 0, 898, 900, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 903, 0, 0, 0, 0, 0, 905, 0, 0, 0, 908, 0, 0, 0, 0, 0, 910, 913, 916, 919, 921, 924, 927, 0, 930, 0, 933, 936, 939, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 942, 945, 948, 951, 954, 957, 960, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 963, 966, 969, 972, 975, 0, 978, 980, 982, 984, 987, 990, 992, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 994, 996, 998, 0, 1000, 1002, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1004, 1007, 0, 1010, 0, 0, 0, 1013, 0, 0, 0, 0, 1016, 1019, 1022, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1025, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1028, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1031, 1034, 0, 1037, 0, 0, 0, 1040, 0, 0, 0, 0, 1043, 1046, 1049, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1052, 1055, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1058, 1061, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1064, 1067, 1070, 1073, 0, 0, 1076, 1079, 0, 0, 1082, 1085, 1088, 1091, 1094, 1097, 0, 0, 1100, 1103, 1106, 1109, 1112, 1115, 0, 0, 1118, 1121, 1124, 1127, 1130, 1133, 1136, 1139, 1142, 1145, 1148, 1151, 0, 0, 1154, 1157, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1160, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1163, 1166, 1169, 1172, 1175, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1178, 1181, 1184, 1187, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1190, 0, 1193, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1196, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1199, 0, 0, 0, 0, 0, 0, 0, 1202, 0, 0, 1205, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1208, 1211, 1214, 1217, 1220, 1223, 1226, 1229, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1232, 1235, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1238, 1241, 0, 1244, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1247, 0, 0, 1250, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1253, 1256, 1259, 0, 0, 1262, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1265, 0, 0, 1268, 1271, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1274, 1277, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1280, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1283, 1286, 1289, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1292, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1295, 0, 0, 0, 0, 0, 0, 1298, 1301, 0, 1304, 1307, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1310, 1313, 1316, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1319, 0, 1322, 1325, 1328, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1331, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1334, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1337, 1340, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1343, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1345, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1348, 0, 0, 0, 0, 1351, 0, 0, 0, 0, 1354, 0, 0, 0, 0, 1357, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1360, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1363, 0, 1366, 1369, 1372, 1375, 1378, 0, 0, 0, 0, 0, 0, 0, 1381, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1384, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1387, 0, 0, 0, 0, 1390, 0, 0, 0, 0, 1393, 0, 0, 0, 0, 1396, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1399, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1402, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1405, 1408, 1411, 1414, 1417, 1420, 1423, 1426, 1429, 1432, 1435, 1438, 1441, 1444, 1447, 1450, 1453, 1456, 1459, 1462, 1465, 1468, 1471, 1474, 1477, 1480, 1483, 1486, 1489, 1492, 1495, 1498, 1501, 1504, 1507, 1510, 1513, 1516, 1519, 1522, 1525, 1528, 1531, 1534, 1537, 1540, 1543, 1546, 1549, 1552, 1555, 1558, 1561, 1564, 1567, 1570, 1573, 1576, 1579, 1582, 1585, 1588, 1591, 1594, 1597, 1600, 1603, 1606, 1609, 1612, 1615, 1618, 1621, 1624, 1627, 1630, 1633, 1636, 1639, 1642, 1645, 1648, 1651, 1654, 1657, 1660, 1663, 1666, 1669, 1672, 1675, 1678, 1681, 1684, 1687, 1690, 1693, 1696, 1699, 1702, 1705, 1708, 1711, 1714, 1717, 1720, 1723, 1726, 1729, 1732, 1735, 1738, 1741, 1744, 1747, 1750, 1753, 1756, 1759, 1762, 1765, 1768, 1771, 1774, 1777, 1780, 1783, 1786, 1789, 1792, 1795, 1798, 1801, 1804, 1807, 1810, 1813, 1816, 1819, 1822, 1825, 1828, 1831, 1834, 1837, 1840, 1843, 1846, 1849, 1852, 1855, 1858, 1861, 1864, 1867, 1870, 0, 0, 0, 0, 1873, 1876, 1879, 1882, 1885, 1888, 1891, 1894, 1897, 1900, 1903, 1906, 1909, 1912, 1915, 1918, 1921, 1924, 1927, 1930, 1933, 1936, 1939, 1942, 1945, 1948, 1951, 1954, 1957, 1960, 1963, 1966, 1969, 1972, 1975, 1978, 1981, 1984, 1987, 1990, 1993, 1996, 1999, 2002, 2005, 2008, 2011, 2014, 2017, 2020, 2023, 2026, 2029, 2032, 2035, 2038, 2041, 2044, 2047, 2050, 2053, 2056, 2059, 2062, 2065, 2068, 2071, 2074, 2077, 2080, 2083, 2086, 2089, 2092, 2095, 2098, 2101, 2104, 2107, 2110, 2113, 2116, 2119, 2122, 2125, 2128, 2131, 2134, 2137, 2140, 0, 0, 0, 0, 0, 0, 2143, 2146, 2149, 2152, 2155, 2158, 2161, 2164, 2167, 2170, 2173, 2176, 2179, 2182, 2185, 2188, 2191, 2194, 2197, 2200, 2203, 2206, 0, 0, 2209, 2212, 2215, 2218, 2221, 2224, 0, 0, 2227, 2230, 2233, 2236, 2239, 2242, 2245, 2248, 2251, 2254, 2257, 2260, 2263, 2266, 2269, 2272, 2275, 2278, 2281, 2284, 2287, 2290, 2293, 2296, 2299, 2302, 2305, 2308, 2311, 2314, 2317, 2320, 2323, 2326, 2329, 2332, 2335, 2338, 0, 0, 2341, 2344, 2347, 2350, 2353, 2356, 0, 0, 2359, 2362, 2365, 2368, 2371, 2374, 2377, 2380, 0, 2383, 0, 2386, 0, 2389, 0, 2392, 2395, 2398, 2401, 2404, 2407, 2410, 2413, 2416, 2419, 2422, 2425, 2428, 2431, 2434, 2437, 2440, 2443, 2446, 2448, 2451, 2453, 2456, 2458, 2461, 2463, 2466, 2468, 2471, 2473, 2476, 0, 0, 2478, 2481, 2484, 2487, 2490, 2493, 2496, 2499, 2502, 2505, 2508, 2511, 2514, 2517, 2520, 2523, 2526, 2529, 2532, 2535, 2538, 2541, 2544, 2547, 2550, 2553, 2556, 2559, 2562, 2565, 2568, 2571, 2574, 2577, 2580, 2583, 2586, 2589, 2592, 2595, 2598, 2601, 2604, 2607, 2610, 2613, 2616, 2619, 2622, 2625, 2628, 2631, 2634, 0, 2637, 2640, 2643, 2646, 2649, 2652, 2654, 2657, 2660, 2662, 2665, 2668, 2671, 2674, 2677, 0, 2680, 2683, 2686, 2689, 2691, 2694, 2696, 2699, 2702, 2705, 2708, 2711, 2714, 2717, 0, 0, 2719, 2722, 2725, 2728, 2731, 2734, 0, 2736, 2739, 2742, 2745, 2748, 2751, 2754, 2756, 2759, 2762, 2765, 2768, 2771, 2774, 2777, 2779, 2782, 2785, 2787, 0, 0, 2789, 2792, 2795, 0, 2798, 2801, 2804, 2807, 2809, 2812, 2814, 2817, 2819, 0, 2822, 2824, 2826, 2828, 2830, 2832, 2834, 2836, 2838, 2840, 2842, 0, 0, 0, 0, 0, 0, 2844, 0, 0, 0, 0, 0, 2846, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2849, 2851, 2854, 0, 0, 0, 0, 0, 0, 0, 0, 2858, 0, 0, 0, 2860, 2863, 0, 2867, 2870, 0, 0, 0, 0, 2874, 0, 2877, 0, 0, 0, 0, 0, 0, 0, 0, 2880, 2883, 2886, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2889, 0, 0, 0, 0, 0, 0, 0, 2894, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2896, 2898, 0, 0, 2900, 2902, 2904, 2906, 2908, 2910, 2912, 2914, 2916, 2918, 2920, 2922, 2924, 2926, 2928, 2930, 2932, 2934, 2936, 2938, 2940, 2942, 2944, 2946, 2948, 2950, 2952, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2954, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2957, 2961, 2965, 2967, 0, 2970, 2974, 2978, 0, 2980, 2983, 2985, 2987, 2989, 2991, 2993, 2995, 2997, 2999, 3001, 0, 3003, 3005, 0, 0, 3008, 3010, 3012, 3014, 3016, 0, 0, 3018, 3021, 3025, 0, 3028, 0, 3030, 0, 3032, 0, 3034, 3036, 3038, 3040, 0, 3042, 3044, 3046, 0, 3048, 3050, 3052, 3054, 3056, 3058, 3060, 0, 0, 0, 3062, 3064, 3066, 3068, 0, 0, 0, 0, 3070, 3072, 3074, 3076, 3078, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3080, 3084, 3088, 3092, 3096, 3100, 3104, 3108, 3112, 3116, 3120, 3124, 3128, 3131, 3133, 3136, 3140, 3143, 3145, 3148, 3152, 3157, 3160, 3162, 3165, 3169, 3171, 3173, 3175, 3177, 3179, 3182, 3186, 3189, 3191, 3194, 3198, 3203, 3206, 3208, 3211, 3215, 3217, 3219, 3221, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3223, 3226, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3229, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3232, 3235, 3238, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3241, 0, 0, 0, 0, 3244, 0, 0, 3247, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3250, 0, 3253, 0, 0, 0, 0, 0, 3256, 3259, 0, 3263, 3266, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3270, 0, 0, 3273, 0, 0, 3276, 0, 3279, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3282, 0, 3285, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3288, 3291, 3294, 3297, 3300, 0, 0, 3303, 3306, 0, 0, 3309, 3312, 0, 0, 0, 0, 0, 0, 3315, 3318, 0, 0, 3321, 3324, 0, 0, 3327, 3330, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3333, 3336, 3339, 3342, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3345, 3348, 3351, 3354, 0, 0, 0, 0, 0, 0, 3357, 3360, 3363, 3366, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3369, 3371, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3373, 3375, 3377, 3379, 3381, 3383, 3385, 3387, 3389, 3391, 3394, 3397, 3400, 3403, 3406, 3409, 3412, 3415, 3418, 3421, 3424, 3428, 3432, 3436, 3440, 3444, 3448, 3452, 3456, 3460, 3465, 3470, 3475, 3480, 3485, 3490, 3495, 3500, 3505, 3510, 3515, 3518, 3521, 3524, 3527, 3530, 3533, 3536, 3539, 3542, 3546, 3550, 3554, 3558, 3562, 3566, 3570, 3574, 3578, 3582, 3586, 3590, 3594, 3598, 3602, 3606, 3610, 3614, 3618, 3622, 3626, 3630, 3634, 3638, 3642, 3646, 3650, 3654, 3658, 3662, 3666, 3670, 3674, 3678, 3682, 3686, 3690, 3692, 3694, 3696, 3698, 3700, 3702, 3704, 3706, 3708, 3710, 3712, 3714, 3716, 3718, 3720, 3722, 3724, 3726, 3728, 3730, 3732, 3734, 3736, 3738, 3740, 3742, 3744, 3746, 3748, 3750, 3752, 3754, 3756, 3758, 3760, 3762, 3764, 3766, 3768, 3770, 3772, 3774, 3776, 3778, 3780, 3782, 3784, 3786, 3788, 3790, 3792, 3794, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3796, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3801, 3805, 3808, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3812, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3815, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3817, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3819, 3821, 3823, 3825, 3827, 3829, 3831, 3833, 3835, 3837, 3839, 3841, 3843, 3845, 3847, 3849, 3851, 3853, 3855, 3857, 3859, 3861, 3863, 3865, 3867, 3869, 3871, 3873, 3875, 3877, 3879, 3881, 3883, 3885, 3887, 3889, 3891, 3893, 3895, 3897, 3899, 3901, 3903, 3905, 3907, 3909, 3911, 3913, 3915, 3917, 3919, 3921, 3923, 3925, 3927, 3929, 3931, 3933, 3935, 3937, 3939, 3941, 3943, 3945, 3947, 3949, 3951, 3953, 3955, 3957, 3959, 3961, 3963, 3965, 3967, 3969, 3971, 3973, 3975, 3977, 3979, 3981, 3983, 3985, 3987, 3989, 3991, 3993, 3995, 3997, 3999, 4001, 4003, 4005, 4007, 4009, 4011, 4013, 4015, 4017, 4019, 4021, 4023, 4025, 4027, 4029, 4031, 4033, 4035, 4037, 4039, 4041, 4043, 4045, 4047, 4049, 4051, 4053, 4055, 4057, 4059, 4061, 4063, 4065, 4067, 4069, 4071, 4073, 4075, 4077, 4079, 4081, 4083, 4085, 4087, 4089, 4091, 4093, 4095, 4097, 4099, 4101, 4103, 4105, 4107, 4109, 4111, 4113, 4115, 4117, 4119, 4121, 4123, 4125, 4127, 4129, 4131, 4133, 4135, 4137, 4139, 4141, 4143, 4145, 4147, 4149, 4151, 4153, 4155, 4157, 4159, 4161, 4163, 4165, 4167, 4169, 4171, 4173, 4175, 4177, 4179, 4181, 4183, 4185, 4187, 4189, 4191, 4193, 4195, 4197, 4199, 4201, 4203, 4205, 4207, 4209, 4211, 4213, 4215, 4217, 4219, 4221, 4223, 4225, 4227, 4229, 4231, 4233, 4235, 4237, 4239, 4241, 4243, 4245, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4247, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4249, 0, 4251, 4253, 4255, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4257, 0, 4260, 0, 4263, 0, 4266, 0, 4269, 0, 4272, 0, 4275, 0, 4278, 0, 4281, 0, 4284, 0, 4287, 0, 4290, 0, 0, 4293, 0, 4296, 0, 4299, 0, 0, 0, 0, 0, 0, 4302, 4305, 0, 4308, 4311, 0, 4314, 4317, 0, 4320, 4323, 0, 4326, 4329, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4332, 0, 0, 0, 0, 0, 0, 4335, 4338, 0, 4341, 4344, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4347, 0, 4350, 0, 4353, 0, 4356, 0, 4359, 0, 4362, 0, 4365, 0, 4368, 0, 4371, 0, 4374, 0, 4377, 0, 4380, 0, 0, 4383, 0, 4386, 0, 4389, 0, 0, 0, 0, 0, 0, 4392, 4395, 0, 4398, 4401, 0, 4404, 4407, 0, 4410, 4413, 0, 4416, 4419, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4422, 0, 0, 4425, 4428, 4431, 4434, 0, 0, 0, 4437, 4440, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4443, 4445, 4447, 4449, 4451, 4453, 4455, 4457, 4459, 4461, 4463, 4465, 4467, 4469, 4471, 4473, 4475, 4477, 4479, 4481, 4483, 4485, 4487, 4489, 4491, 4493, 4495, 4497, 4499, 4501, 4503, 4505, 4507, 4509, 4511, 4513, 4515, 4517, 4519, 4521, 4523, 4525, 4527, 4529, 4531, 4533, 4535, 4537, 4539, 4541, 4543, 4545, 4547, 4549, 4551, 4553, 4555, 4557, 4559, 4561, 4563, 4565, 4567, 4569, 4571, 4573, 4575, 4577, 4579, 4581, 4583, 4585, 4587, 4589, 4591, 4593, 4595, 4597, 4599, 4601, 4603, 4605, 4607, 4609, 4611, 4613, 4615, 4617, 4619, 4621, 4623, 4625, 4627, 4629, 0, 0, 0, 4631, 4633, 4635, 4637, 4639, 4641, 4643, 4645, 4647, 4649, 4651, 4653, 4655, 4657, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4659, 4663, 4667, 4671, 4675, 4679, 4683, 4687, 4691, 4695, 4699, 4703, 4707, 4711, 4715, 4720, 4725, 4730, 4735, 4740, 4745, 4750, 4755, 4760, 4765, 4770, 4775, 4780, 4785, 0, 0, 0, 4790, 4794, 4798, 4802, 4806, 4810, 4814, 4818, 4822, 4826, 4830, 4834, 4838, 4842, 4846, 4850, 4854, 4858, 4862, 4866, 4870, 4874, 4878, 4882, 4886, 4890, 4894, 4898, 4902, 4906, 4910, 4914, 4918, 4922, 4926, 4930, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4934, 4937, 4940, 4943, 4946, 4949, 4952, 4955, 4958, 4961, 4964, 4967, 4970, 4973, 4976, 4979, 4981, 4983, 4985, 4987, 4989, 4991, 4993, 4995, 4997, 4999, 5001, 5003, 5005, 5007, 5010, 5013, 5016, 5019, 5022, 5025, 5028, 5031, 5034, 5037, 5040, 5043, 5046, 0, 0, 0, 0, 5049, 5051, 5053, 5055, 5057, 5059, 5061, 5063, 5065, 5067, 5069, 5071, 5073, 5075, 5077, 5079, 5081, 5083, 5085, 5087, 5089, 5091, 5093, 5095, 5097, 5099, 5101, 5103, 5105, 5107, 5109, 5111, 5113, 5115, 5117, 5119, 5121, 5123, 5125, 5127, 5129, 5131, 5133, 5135, 5137, 5139, 5141, 5143, 5145, 5147, 5150, 5153, 5156, 5159, 5162, 5165, 5168, 5171, 5174, 5177, 5180, 5183, 5186, 5189, 5192, 5195, 5198, 5201, 5204, 5207, 5210, 5213, 5216, 5219, 5223, 5227, 0, 0, 0, 0, 5231, 5233, 5235, 5237, 5239, 5241, 5243, 5245, 5247, 5249, 5251, 5253, 5255, 5257, 5259, 5261, 5263, 5265, 5267, 5269, 5271, 5273, 5275, 5277, 5279, 5281, 5283, 5285, 5287, 5289, 5291, 5293, 5295, 5297, 5299, 5301, 5303, 5305, 5307, 5309, 5311, 5313, 5315, 5317, 5319, 5321, 5323, 0, 5325, 5330, 5335, 5340, 5344, 5349, 5353, 5357, 5363, 5368, 5372, 5376, 5380, 5385, 5390, 5394, 5398, 5401, 5405, 5410, 5415, 5418, 5424, 5431, 5437, 5441, 5447, 5453, 5458, 5462, 5466, 5470, 5475, 5481, 5486, 5490, 5494, 5498, 5501, 5504, 5507, 5510, 5514, 5518, 5524, 5528, 5533, 5539, 5543, 5546, 5549, 5555, 5560, 5566, 5570, 5576, 5579, 5583, 5587, 5591, 5595, 5599, 5604, 5608, 5611, 5615, 5619, 5623, 5628, 5632, 5636, 5640, 5646, 5651, 5654, 5660, 5663, 5668, 5673, 5677, 5681, 5685, 5690, 5693, 5697, 5702, 5705, 5711, 5715, 5718, 5721, 5724, 5727, 5730, 5733, 5736, 5739, 5742, 5745, 5749, 5753, 5757, 5761, 5765, 5769, 5773, 5777, 5781, 5785, 5789, 5793, 5797, 5801, 5805, 5809, 5812, 5815, 5819, 5822, 0, 0, 0, 0, 5825, 5828, 5831, 5834, 5837, 5842, 5845, 5848, 5851, 5854, 5857, 5860, 5863, 5866, 5870, 5875, 5878, 5881, 5884, 5887, 5890, 5893, 5896, 5900, 5904, 5908, 5912, 5915, 5918, 5921, 5924, 5927, 5930, 5933, 5936, 5939, 5942, 5946, 5950, 5953, 5957, 5961, 5965, 5968, 5972, 5976, 5981, 5984, 5988, 5992, 5996, 6000, 6006, 6013, 6016, 6019, 6022, 6025, 6028, 6031, 6034, 6037, 6040, 6043, 6046, 6049, 6052, 6055, 6058, 6061, 6064, 6067, 6072, 6075, 6078, 6081, 6086, 6090, 6093, 6096, 6099, 6102, 6105, 6108, 6111, 6114, 6117, 6120, 6124, 6127, 6130, 6134, 6138, 6141, 6146, 6150, 6153, 6156, 6159, 0, 0, 6162, 6165, 6168, 6171, 6174, 6177, 6180, 6183, 6186, 6189, 6193, 6197, 6201, 6205, 6209, 6213, 6217, 6221, 6225, 6229, 6233, 6237, 6241, 6245, 6249, 6253, 6257, 6261, 6265, 6269, 6273, 0, 6277, 6279, 6281, 6283, 6285, 6287, 6289, 6291, 6293, 6295, 6297, 6299, 6301, 6303, 6305, 6307, 6309, 6311, 6313, 6315, 6317, 6319, 6321, 6323, 6325, 6327, 6329, 6331, 6333, 6335, 6337, 6339, 6341, 6343, 6345, 6347, 6349, 6351, 6353, 6355, 6357, 6359, 6361, 6363, 6365, 6367, 6369, 6371, 6373, 6375, 6377, 6379, 6381, 6383, 6385, 6387, 6389, 6391, 6393, 6395, 6397, 6399, 6401, 6403, 6405, 6407, 6409, 6411, 6413, 6415, 6417, 6419, 6421, 6423, 6425, 6427, 6429, 6431, 6433, 6435, 6437, 6439, 6441, 6443, 6445, 6447, 6449, 6451, 6453, 6455, 6457, 6459, 6461, 6463, 6465, 6467, 6469, 6471, 6473, 6475, 6477, 6479, 6481, 6483, 6485, 6487, 6489, 6491, 6493, 6495, 6497, 6499, 6501, 6503, 6505, 6507, 6509, 6511, 6513, 6515, 6517, 6519, 6521, 6523, 6525, 6527, 6529, 6531, 6533, 6535, 6537, 6539, 6541, 6543, 6545, 6547, 6549, 6551, 6553, 6555, 6557, 6559, 6561, 6563, 6565, 6567, 6569, 6571, 6573, 6575, 6577, 6579, 6581, 6583, 6585, 6587, 6589, 6591, 6593, 6595, 6597, 6599, 6601, 6603, 6605, 6607, 6609, 6611, 6613, 6615, 6617, 6619, 6621, 6623, 6625, 6627, 6629, 6631, 6633, 6635, 6637, 6639, 6641, 6643, 6645, 6647, 6649, 6651, 6653, 6655, 6657, 6659, 6661, 6663, 6665, 6667, 6669, 6671, 6673, 6675, 6677, 6679, 6681, 6683, 6685, 6687, 6689, 6691, 6693, 6695, 6697, 6699, 6701, 6703, 6705, 6707, 6709, 6711, 6713, 6715, 6717, 6719, 6721, 6723, 6725, 6727, 6729, 6731, 6733, 6735, 6737, 6739, 6741, 6743, 6745, 6747, 6749, 6751, 6753, 6755, 6757, 6759, 6761, 6763, 6765, 6767, 6769, 6771, 6773, 6775, 6777, 6779, 6781, 6783, 6785, 6787, 6789, 6791, 6793, 6795, 6797, 6799, 6801, 6803, 6805, 6807, 6809, 6811, 6813, 6815, 0, 0, 6817, 0, 6819, 0, 0, 6821, 6823, 6825, 6827, 6829, 6831, 6833, 6835, 6837, 6839, 0, 6841, 0, 6843, 0, 0, 6845, 6847, 0, 0, 0, 6849, 6851, 6853, 6855, 0, 0, 6857, 6859, 6861, 6863, 6865, 6867, 6869, 6871, 6873, 6875, 6877, 6879, 6881, 6883, 6885, 6887, 6889, 6891, 6893, 6895, 6897, 6899, 6901, 6903, 6905, 6907, 6909, 6911, 6913, 6915, 6917, 6919, 6921, 6923, 6925, 6927, 6929, 6931, 6933, 6935, 6937, 6939, 6941, 6943, 6945, 6947, 6949, 6951, 6953, 6955, 6957, 6959, 6961, 6963, 6965, 6967, 6969, 6971, 6973, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6975, 6978, 6981, 6984, 6988, 6992, 6995, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6998, 7001, 7004, 7007, 7010, 0, 0, 0, 0, 0, 7013, 0, 7016, 7019, 7021, 7023, 7025, 7027, 7029, 7031, 7033, 7035, 7037, 7039, 7042, 7045, 7048, 7051, 7054, 7057, 7060, 7063, 7066, 7069, 7072, 7075, 0, 7078, 7081, 7084, 7087, 7090, 0, 7093, 0, 7096, 7099, 0, 7102, 7105, 0, 7108, 7111, 7114, 7117, 7120, 7123, 7126, 7129, 7132, 7135, 7138, 7140, 7142, 7144, 7146, 7148, 7150, 7152, 7154, 7156, 7158, 7160, 7162, 7164, 7166, 7168, 7170, 7172, 7174, 7176, 7178, 7180, 7182, 7184, 7186, 7188, 7190, 7192, 7194, 7196, 7198, 7200, 7202, 7204, 7206, 7208, 7210, 7212, 7214, 7216, 7218, 7220, 7222, 7224, 7226, 7228, 7230, 7232, 7234, 7236, 7238, 7240, 7242, 7244, 7246, 7248, 7250, 7252, 7254, 7256, 7258, 7260, 7262, 7264, 7266, 7268, 7270, 7272, 7274, 7276, 7278, 7280, 7282, 7284, 7286, 7288, 7290, 7292, 7294, 7296, 7298, 7300, 7302, 7304, 7306, 7308, 7310, 7312, 7314, 7316, 7318, 7320, 7322, 7324, 7326, 7328, 7330, 7332, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7334, 7336, 7338, 7340, 7342, 7344, 7346, 7348, 7350, 7352, 7354, 7356, 7358, 7360, 7362, 7364, 7366, 7368, 7370, 7372, 7374, 7376, 7378, 7380, 7383, 7386, 7389, 7392, 7395, 7398, 7401, 7404, 7407, 7410, 7413, 7416, 7419, 7422, 7425, 7428, 7431, 7434, 7436, 7438, 7440, 7442, 7445, 7448, 7451, 7454, 7457, 7460, 7463, 7466, 7469, 7472, 7475, 7478, 7481, 7484, 7487, 7490, 7493, 7496, 7499, 7502, 7505, 7508, 7511, 7514, 7517, 7520, 7523, 7526, 7529, 7532, 7535, 7538, 7541, 7544, 7547, 7550, 7553, 7556, 7559, 7562, 7565, 7568, 7571, 7574, 7577, 7580, 7583, 7586, 7589, 7592, 7595, 7598, 7601, 7604, 7607, 7610, 7613, 7616, 7619, 7622, 7625, 7628, 7631, 7634, 7637, 7640, 7643, 7646, 7649, 7652, 7655, 7658, 7661, 7664, 7667, 7670, 7673, 7676, 7679, 7682, 7685, 7688, 7691, 7694, 7697, 7700, 7703, 7706, 7709, 7712, 7715, 7718, 7721, 7724, 7728, 7732, 7736, 7740, 7744, 7748, 7751, 7754, 7757, 7760, 7763, 7766, 7769, 7772, 7775, 7778, 7781, 7784, 7787, 7790, 7793, 7796, 7799, 7802, 7805, 7808, 7811, 7814, 7817, 7820, 7823, 7826, 7829, 7832, 7835, 7838, 7841, 7844, 7847, 7850, 7853, 7856, 7859, 7862, 7865, 7868, 7871, 7874, 7877, 7880, 7883, 7886, 7889, 7892, 7895, 7898, 7901, 7904, 7907, 7910, 7913, 7916, 7919, 7922, 7925, 7928, 7931, 7934, 7937, 7940, 7943, 7946, 7949, 7952, 7955, 7958, 7961, 7964, 7967, 7970, 7973, 7976, 7979, 7982, 7985, 7988, 7991, 7994, 7997, 8000, 8003, 8006, 8009, 8012, 8015, 8018, 8021, 8024, 8027, 8030, 8033, 8036, 8039, 8042, 8045, 8048, 8051, 8054, 8057, 8060, 8063, 8066, 8069, 8072, 8075, 8078, 8081, 8084, 8087, 8090, 8093, 8096, 8099, 8102, 8105, 8108, 8111, 8114, 8117, 8120, 8123, 8126, 8129, 8132, 8135, 8138, 8141, 8144, 8147, 8150, 8153, 8156, 8159, 8162, 8165, 8168, 8171, 8174, 8178, 8182, 8186, 8189, 8192, 8195, 8198, 8201, 8204, 8207, 8210, 8213, 8216, 8219, 8222, 8225, 8228, 8231, 8234, 8237, 8240, 8243, 8246, 8249, 8252, 8255, 8258, 8261, 8264, 8267, 8270, 8273, 8276, 8279, 8282, 8285, 8288, 8291, 8294, 8297, 8300, 8303, 8306, 8309, 8312, 8315, 8318, 8321, 8324, 8327, 8330, 8333, 8336, 8339, 8342, 8345, 8348, 8351, 8354, 8357, 8360, 8363, 8366, 8369, 8372, 8375, 8378, 8381, 8384, 8387, 8390, 8393, 8396, 8399, 8402, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8405, 8409, 8413, 8417, 8421, 8425, 8429, 8433, 8437, 8441, 8445, 8449, 8453, 8457, 8461, 8465, 8469, 8473, 8477, 8481, 8485, 8489, 8493, 8497, 8501, 8505, 8509, 8513, 8517, 8521, 8525, 8529, 8533, 8537, 8541, 8545, 8549, 8553, 8557, 8561, 8565, 8569, 8573, 8577, 8581, 8585, 8589, 8593, 8597, 8601, 8605, 8609, 8613, 8617, 8621, 8625, 8629, 8633, 8637, 8641, 8645, 8649, 8653, 8657, 0, 0, 8661, 8665, 8669, 8673, 8677, 8681, 8685, 8689, 8693, 8697, 8701, 8705, 8709, 8713, 8717, 8721, 8725, 8729, 8733, 8737, 8741, 8745, 8749, 8753, 8757, 8761, 8765, 8769, 8773, 8777, 8781, 8785, 8789, 8793, 8797, 8801, 8805, 8809, 8813, 8817, 8821, 8825, 8829, 8833, 8837, 8841, 8845, 8849, 8853, 8857, 8861, 8865, 8869, 8873, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8877, 8881, 8885, 8890, 8895, 8900, 8905, 8910, 8915, 8920, 8924, 8943, 8952, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8957, 8959, 8961, 8963, 8965, 8967, 8969, 8971, 8973, 8975, 8977, 8979, 8981, 8983, 8985, 8987, 8989, 8991, 8993, 8995, 8997, 0, 0, 0, 0, 8999, 9001, 9003, 9005, 9007, 9009, 9011, 9013, 9015, 9017, 0, 9019, 9021, 9023, 9025, 9027, 9029, 9031, 9033, 9035, 9037, 9039, 9041, 9043, 9045, 9047, 9049, 9051, 9053, 9055, 0, 9057, 9059, 9061, 9063, 0, 0, 0, 0, 9065, 9068, 9071, 0, 9074, 0, 9077, 9080, 9083, 9086, 9089, 9092, 9095, 9098, 9101, 9104, 9107, 9109, 9111, 9113, 9115, 9117, 9119, 9121, 9123, 9125, 9127, 9129, 9131, 9133, 9135, 9137, 9139, 9141, 9143, 9145, 9147, 9149, 9151, 9153, 9155, 9157, 9159, 9161, 9163, 9165, 9167, 9169, 9171, 9173, 9175, 9177, 9179, 9181, 9183, 9185, 9187, 9189, 9191, 9193, 9195, 9197, 9199, 9201, 9203, 9205, 9207, 9209, 9211, 9213, 9215, 9217, 9219, 9221, 9223, 9225, 9227, 9229, 9231, 9233, 9235, 9237, 9239, 9241, 9243, 9245, 9247, 9249, 9251, 9253, 9255, 9257, 9259, 9261, 9263, 9265, 9267, 9269, 9271, 9273, 9275, 9277, 9279, 9281, 9283, 9285, 9287, 9289, 9291, 9293, 9295, 9297, 9299, 9301, 9303, 9305, 9307, 9309, 9311, 9313, 9315, 9317, 9319, 9321, 9323, 9325, 9327, 9329, 9331, 9333, 9335, 9337, 9339, 9341, 9344, 9347, 9350, 9353, 9356, 9359, 9362, 0, 0, 0, 0, 9365, 9367, 9369, 9371, 9373, 9375, 9377, 9379, 9381, 9383, 9385, 9387, 9389, 9391, 9393, 9395, 9397, 9399, 9401, 9403, 9405, 9407, 9409, 9411, 9413, 9415, 9417, 9419, 9421, 9423, 9425, 9427, 9429, 9431, 9433, 9435, 9437, 9439, 9441, 9443, 9445, 9447, 9449, 9451, 9453, 9455, 9457, 9459, 9461, 9463, 9465, 9467, 9469, 9471, 9473, 9475, 9477, 9479, 9481, 9483, 9485, 9487, 9489, 9491, 9493, 9495, 9497, 9499, 9501, 9503, 9505, 9507, 9509, 9511, 9513, 9515, 9517, 9519, 9521, 9523, 9525, 9527, 9529, 9531, 9533, 9535, 9537, 9539, 9541, 9543, 9545, 9547, 9549, 9551, 9553, 9555, 9557, 9559, 9561, 9563, 9565, 9567, 9569, 9571, 9573, 9575, 9577, 9579, 9581, 9583, 9585, 9587, 9589, 9591, 9593, 9595, 9597, 9599, 9601, 9603, 9605, 9607, 9609, 9611, 9613, 9615, 9617, 9619, 9621, 9623, 9625, 9627, 9629, 9631, 9633, 9635, 9637, 9639, 9641, 9643, 9645, 9647, 9649, 9651, 9653, 9655, 9657, 9659, 9661, 9663, 9665, 9667, 9669, 9671, 9673, 9675, 9677, 9679, 9681, 9683, 9685, 9687, 9689, 9691, 9693, 9695, 9697, 9699, 9701, 9703, 9705, 9707, 9709, 9711, 9713, 9715, 9717, 9719, 9721, 9723, 9725, 9727, 9729, 9731, 9733, 9735, 9737, 9739, 9741, 9743, 0, 0, 0, 9745, 9747, 9749, 9751, 9753, 9755, 0, 0, 9757, 9759, 9761, 9763, 9765, 9767, 0, 0, 9769, 9771, 9773, 9775, 9777, 9779, 0, 0, 9781, 9783, 9785, 0, 0, 0, 9787, 9789, 9791, 9793, 9795, 9797, 9799, 0, 9801, 9803, 9805, 9807, 9809, 9811, 9813, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9815, 9818, 9821, 9824, 9827, 9830, 9833, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9836, 9839, 9842, 9845, 9848, 9851, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9854, 9856, 9858, 9860, 9862, 9864, 9866, 9868, 9870, 9872, 9874, 9876, 9878, 9880, 9882, 9884, 9886, 9888, 9890, 9892, 9894, 9896, 9898, 9900, 9902, 9904, 9906, 9908, 9910, 9912, 9914, 9916, 9918, 9920, 9922, 9924, 9926, 9928, 9930, 9932, 9934, 9936, 9938, 9940, 9942, 9944, 9946, 9948, 9950, 9952, 9954, 9956, 9958, 9960, 9962, 9964, 9966, 9968, 9970, 9972, 9974, 9976, 9978, 9980, 9982, 9984, 9986, 9988, 9990, 9992, 9994, 9996, 9998, 10000, 10002, 10004, 10006, 10008, 10010, 10012, 10014, 10016, 10018, 10020, 10022, 0, 10024, 10026, 10028, 10030, 10032, 10034, 10036, 10038, 10040, 10042, 10044, 10046, 10048, 10050, 10052, 10054, 10056, 10058, 10060, 10062, 10064, 10066, 10068, 10070, 10072, 10074, 10076, 10078, 10080, 10082, 10084, 10086, 10088, 10090, 10092, 10094, 10096, 10098, 10100, 10102, 10104, 10106, 10108, 10110, 10112, 10114, 10116, 10118, 10120, 10122, 10124, 10126, 10128, 10130, 10132, 10134, 10136, 10138, 10140, 10142, 10144, 10146, 10148, 10150, 10152, 10154, 10156, 10158, 10160, 10162, 10164, 0, 10166, 10168, 0, 0, 10170, 0, 0, 10172, 10174, 0, 0, 10176, 10178, 10180, 10182, 0, 10184, 10186, 10188, 10190, 10192, 10194, 10196, 10198, 10200, 10202, 10204, 10206, 0, 10208, 0, 10210, 10212, 10214, 10216, 0, 10218, 10220, 0, 10222, 10224, 10226, 10228, 10230, 10232, 10234, 10236, 10238, 10240, 10242, 10244, 10246, 10248, 10250, 10252, 10254, 10256, 10258, 10260, 10262, 10264, 10266, 10268, 10270, 10272, 10274, 10276, 10278, 10280, 10282, 10284, 10286, 10288, 10290, 10292, 10294, 10296, 10298, 10300, 10302, 10304, 10306, 10308, 10310, 10312, 10314, 10316, 10318, 10320, 10322, 10324, 10326, 10328, 10330, 10332, 10334, 10336, 10338, 10340, 10342, 10344, 10346, 10348, 10350, 0, 10352, 10354, 10356, 10358, 0, 0, 10360, 10362, 10364, 10366, 10368, 10370, 10372, 10374, 0, 10376, 10378, 10380, 10382, 10384, 10386, 10388, 0, 10390, 10392, 10394, 10396, 10398, 10400, 10402, 10404, 10406, 10408, 10410, 10412, 10414, 10416, 10418, 10420, 10422, 10424, 10426, 10428, 10430, 10432, 10434, 10436, 10438, 10440, 10442, 10444, 0, 10446, 10448, 10450, 10452, 0, 10454, 10456, 10458, 10460, 10462, 0, 10464, 0, 0, 0, 10466, 10468, 10470, 10472, 10474, 10476, 10478, 0, 10480, 10482, 10484, 10486, 10488, 10490, 10492, 10494, 10496, 10498, 10500, 10502, 10504, 10506, 10508, 10510, 10512, 10514, 10516, 10518, 10520, 10522, 10524, 10526, 10528, 10530, 10532, 10534, 10536, 10538, 10540, 10542, 10544, 10546, 10548, 10550, 10552, 10554, 10556, 10558, 10560, 10562, 10564, 10566, 10568, 10570, 10572, 10574, 10576, 10578, 10580, 10582, 10584, 10586, 10588, 10590, 10592, 10594, 10596, 10598, 10600, 10602, 10604, 10606, 10608, 10610, 10612, 10614, 10616, 10618, 10620, 10622, 10624, 10626, 10628, 10630, 10632, 10634, 10636, 10638, 10640, 10642, 10644, 10646, 10648, 10650, 10652, 10654, 10656, 10658, 10660, 10662, 10664, 10666, 10668, 10670, 10672, 10674, 10676, 10678, 10680, 10682, 10684, 10686, 10688, 10690, 10692, 10694, 10696, 10698, 10700, 10702, 10704, 10706, 10708, 10710, 10712, 10714, 10716, 10718, 10720, 10722, 10724, 10726, 10728, 10730, 10732, 10734, 10736, 10738, 10740, 10742, 10744, 10746, 10748, 10750, 10752, 10754, 10756, 10758, 10760, 10762, 10764, 10766, 10768, 10770, 10772, 10774, 10776, 10778, 10780, 10782, 10784, 10786, 10788, 10790, 10792, 10794, 10796, 10798, 10800, 10802, 10804, 10806, 10808, 10810, 10812, 10814, 10816, 10818, 10820, 10822, 10824, 10826, 10828, 10830, 10832, 10834, 10836, 10838, 10840, 10842, 10844, 10846, 10848, 10850, 10852, 10854, 10856, 10858, 10860, 10862, 10864, 10866, 10868, 10870, 10872, 10874, 10876, 10878, 10880, 10882, 10884, 10886, 10888, 10890, 10892, 10894, 10896, 10898, 10900, 10902, 10904, 10906, 10908, 10910, 10912, 10914, 10916, 10918, 10920, 10922, 10924, 10926, 10928, 10930, 10932, 10934, 10936, 10938, 10940, 10942, 10944, 10946, 10948, 10950, 10952, 10954, 10956, 10958, 10960, 10962, 10964, 10966, 10968, 10970, 10972, 10974, 10976, 10978, 10980, 10982, 10984, 10986, 10988, 10990, 10992, 10994, 10996, 10998, 11000, 11002, 11004, 11006, 11008, 11010, 11012, 11014, 11016, 11018, 11020, 11022, 11024, 11026, 11028, 11030, 11032, 11034, 11036, 11038, 11040, 11042, 11044, 11046, 11048, 11050, 11052, 11054, 11056, 11058, 11060, 11062, 11064, 11066, 11068, 11070, 11072, 11074, 11076, 11078, 11080, 11082, 11084, 11086, 11088, 11090, 11092, 11094, 11096, 11098, 11100, 11102, 11104, 11106, 11108, 11110, 11112, 11114, 11116, 11118, 11120, 11122, 11124, 11126, 11128, 11130, 11132, 11134, 11136, 11138, 11140, 11142, 11144, 11146, 11148, 11150, 11152, 11154, 0, 0, 0, 0, 11156, 11158, 11160, 11162, 11164, 11166, 11168, 11170, 11172, 11174, 11176, 11178, 11180, 11182, 11184, 11186, 11188, 11190, 11192, 11194, 11196, 11198, 11200, 11202, 11204, 11206, 11208, 11210, 11212, 11214, 11216, 11218, 11220, 11222, 11224, 11226, 11228, 11230, 11232, 11234, 11236, 11238, 11240, 11242, 11244, 11246, 11248, 11250, 11252, 11254, 11256, 11258, 11260, 11262, 11264, 11266, 11268, 11270, 11272, 11274, 11276, 11278, 11280, 11282, 11284, 11286, 11288, 11290, 11292, 11294, 11296, 11298, 11300, 11302, 11304, 11306, 11308, 11310, 11312, 11314, 11316, 11318, 11320, 11322, 11324, 11326, 11328, 11330, 11332, 11334, 11336, 11338, 11340, 11342, 11344, 11346, 11348, 11350, 11352, 11354, 11356, 11358, 11360, 11362, 11364, 11366, 11368, 11370, 11372, 11374, 11376, 11378, 11380, 11382, 11384, 11386, 11388, 11390, 11392, 11394, 11396, 11398, 11400, 11402, 11404, 11406, 11408, 11410, 11412, 11414, 11416, 11418, 11420, 11422, 11424, 11426, 11428, 11430, 11432, 11434, 11436, 11438, 11440, 11442, 11444, 11446, 11448, 11450, 11452, 11454, 11456, 11458, 11460, 11462, 11464, 11466, 11468, 11470, 11472, 11474, 11476, 11478, 11480, 11482, 11484, 11486, 11488, 11490, 11492, 11494, 11496, 11498, 11500, 11502, 11504, 11506, 11508, 11510, 11512, 11514, 11516, 11518, 11520, 11522, 11524, 11526, 11528, 11530, 11532, 11534, 11536, 11538, 11540, 11542, 11544, 11546, 11548, 11550, 11552, 11554, 11556, 11558, 11560, 11562, 11564, 11566, 11568, 11570, 11572, 11574, 11576, 11578, 11580, 11582, 11584, 11586, 11588, 11590, 11592, 11594, 11596, 11598, 11600, 11602, 11604, 11606, 11608, 11610, 11612, 11614, 11616, 11618, 11620, 11622, 11624, 11626, 11628, 11630, 11632, 11634, 11636, 11638, 11640, 11642, 11644, 11646, 11648, 11650, 11652, 11654, 11656, 11658, 11660, 11662, 11664, 11666, 11668, 11670, 11672, 11674, 11676, 11678, 11680, 11682, 11684, 11686, 11688, 11690, 11692, 11694, 11696, 11698, 11700, 11702, 11704, 11706, 11708, 11710, 11712, 11714, 11716, 11718, 11720, 11722, 11724, 11726, 11728, 11730, 11732, 11734, 0, 0, 0, 0, 11736, 11738, 11740, 11742, 11744, 11746, 11748, 11750, 11752, 11754, 11756, 11758, 11760, 11762, 11764, 11766, 11768, 11770, 11772, 11774, 11776, 11778, 11780, 11782, 11784, 11786, 11788, 11790, 11792, 11794, 11796, 11798, 11800, 11802, 11804, 11806, 11808, 11810, 11812, 11814, 11816, 11818, 11820, 11822, 11824, 11826, 11828, 11830, 11832, 11834, 11836, 11838, 11840, 11842, 11844, 11846, 11848, 11850, 11852, 11854, 11856, 11858, 11860, 11862, 11864, 11866, 11868, 11870, 11872, 11874, 11876, 11878, 11880, 11882, 11884, 11886, 11888, 11890, 11892, 11894, 11896, 11898, 11900, 11902, 11904, 11906, 11908, 11910, 11912, 11914, 11916, 11918, 11920, 11922, 11924, 11926, 11928, 11930, 11932, 11934, 11936, 11938, 11940, 11942, 11944, 11946, 11948, 11950, 11952, 11954, 11956, 11958, 11960, 11962, 11964, 11966, 11968, 11970, 11972, 11974, 11976, 11978, 11980, 11982, 11984, 11986, 11988, 11990, 11992, 11994, 11996, 11998, 12000, 12002, 12004, 12006, 12008, 12010, 12012, 12014, 12016, 12018, 12020, 12022, 12024, 12026, 12028, 12030, 12032, 12034, 12036, 12038, 12040, 12042, 12044, 12046, 12048, 12050, 12052, 12054, 12056, 12058, 12060, 12062, 12064, 12066, 12068, 12070, 12072, 12074, 12076, 12078, 12080, 12082, 12084, 12086, 12088, 12090, 12092, 12094, 12096, 12098, 12100, 12102, 12104, 12106, 12108, 12110, 12112, 12114, 12116, 12118, 12120, 12122, 12124, 12126, 12128, 12130, 12132, 12134, 12136, 12138, 12140, 12142, 12144, 12146, 12148, 12150, 12152, 12154, 12156, 12158, 12160, 12162, 12164, 12166, 12168, 12170, 12172, 12174, 12176, 12178, 12180, 12182, 12184, 12186, 12188, 12190, 12192, 12194, 12196, 12198, 12200, 12202, 12204, 12206, 12208, 12210, 12212, 12214, 12216, 12218, 12220, 12222, 12224, 12226, 12228, 12230, 12232, 12234, 12236, 12238, 12240, 12242, 12244, 12246, 12248, 12250, 12252, 12254, 12256, 12258, 12260, 12262, 12264, 12266, 12268, 12270, 12272, 12274, 12276, 12278, 12280, 12282, 12284, 12286, 12288, 12290, 12292, 12294, 12296, 12298, 12300, 12302, 12304, 12306, 12308, 12310, 12312, 12314, 12316, 12318, 12320, 12322, 12324, 12326, 12328, 12330, 12332, 12334, 12336, 12338, 12340, 12342, 12344, 12346, 12348, 12350, 12352, 12354, 12356, 12358, 12360, 12362, 12364, 12366, 12368, 12370, 12372, 12374, 12376, 12378, 12380, 12382, 12384, 12386, 12388, 12390, 12392, 12394, 12396, 12398, 12400, 12402, 12404, 12406, 12408, 12410, 12412, 12414, 12416, 12418, 12420, 12422, 12424, 12426, 12428, 12430, 12432, 12434, 12436, 12438, 12440, 12442, 12444, 12446, 12448, 12450, 12452, 12454, 12456, 12458, 12460, 12462, 12464, 12466, 12468, 12470, 12472, 12474, 12476, 12478, 12480, 12482, 12484, 12486, 12488, 12490, 12492, 12494, 12496, 12498, 12500, 12502, 12504, 12506, 12508, 12510, 12512, 12514, 12516, 12518, 12520, 12522, 12524, 12526, 12528, 12530, 12532, 12534, 12536, 12538, 12540, 12542, 12544, 12546, 12548, 12550, 12552, 12554, 12556, 12558, 12560, 12562, 12564, 12566, 12568, 12570, 12572, 12574, 12576, 12578, 12580, 12582, 12584, 12586, 12588, 12590, 12592, 12594, 12596, 12598, 12600, 12602, 12604, 12606, 12608, 12610, 12612, 12614, 12616, 12618, 12620, 12622, 12624, 12626, 12628, 12630, 12632, 12634, 12636, 12638, 12640, 12642, 12644, 12646, 12648, 12650, 12652, 12654, 12656, 12658, 12660, 12662, 12664, 12666, 12668, 12670, 12672, 12674, 12676, 12678, 12680, 12682, 12684, 12686, 12688, 12690, 12692, 12694, 12696, 12698, 12700, 12702, 12704, 12706, 12708, 12710, 12712, 12714, 12716, 12718, 12720, 12722, 12724, 12726, 12728, 12730, 12732, 12734, 12736, 12738, 12740, 12742, 12744, 12746, 12748, 12750, 12752, 12754, 12756, 12758, 12760, 12762, 12764, 12766, 12768, 12770, 12772, 12774, 12776, 12778, 12780, 12782, 12784, 12786, 12788, 12790, 12792, 12794, 12796, 12798, 12800, 12802, 12804, 12806, 12808, 12810, 12812, 12814, 12816, 12818, 12820, 12822, 12824, 12826, 12828, 12830, 12832, 12834, 12836, 12838, 12840, 12842, 12844, 12846, 12848, 12850, 12852, 12854, 12856, 12858, 12860, 12862, 12864, 12866, 12868, 12870, 12872, 12874, 12876, 12878, 12880, 12882, 12884, 12886, 12888, 12890, 12892, 12894, 12896, 12898, 12900, 12902, 12904, 12906, 12908, 12910, 12912, 12914, 12916, 12918, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; /* NFC pairs */ #define COMP_SHIFT 3 static unsigned short comp_index[] = { 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 3, 0, 0, 4, 5, 6, 7, 0, 0, 0, 0, 8, 9, 10, 0, 0, 0, 11, 12, 13, 0, 0, 0, 0, 14, 15, 16, 17, 0, 0, 18, 19, 20, 21, 0, 0, 0, 22, 0, 0, 0, 0, 0, 23, 24, 25, 26, 0, 0, 0, 27, 28, 29, 30, 0, 0, 31, 32, 33, 34, 35, 0, 0, 36, 0, 0, 0, 0, 0, 0, 37, 38, 39, 40, 0, 0, 41, 0, 42, 43, 44, 0, 0, 45, 46, 47, 0, 0, 0, 0, 48, 49, 50, 51, 0, 0, 52, 53, 54, 55, 0, 0, 0, 56, 57, 0, 0, 0, 0, 0, 58, 59, 60, 61, 0, 0, 62, 63, 64, 65, 0, 0, 0, 66, 67, 68, 69, 0, 0, 70, 71, 72, 73, 0, 0, 0, 74, 0, 75, 0, 0, 0, 0, 76, 0, 77, 0, 0, 0, 0, 78, 0, 0, 0, 0, 0, 79, 80, 81, 0, 0, 0, 0, 82, 83, 84, 85, 0, 0, 86, 87, 88, 89, 0, 0, 0, 90, 0, 91, 92, 0, 0, 93, 94, 95, 96, 0, 0, 0, 0, 97, 98, 99, 0, 0, 0, 100, 101, 102, 103, 0, 0, 0, 104, 0, 0, 0, 0, 0, 105, 106, 107, 0, 0, 0, 0, 108, 109, 110, 111, 0, 0, 112, 113, 114, 115, 0, 0, 0, 116, 117, 0, 0, 0, 0, 118, 0, 119, 120, 121, 0, 0, 122, 123, 124, 125, 0, 0, 0, 126, 0, 127, 0, 0, 0, 128, 129, 130, 131, 0, 0, 0, 132, 133, 134, 135, 0, 0, 0, 136, 0, 0, 0, 0, 0, 137, 138, 139, 140, 0, 0, 0, 141, 142, 143, 0, 0, 0, 0, 144, 145, 146, 147, 0, 0, 148, 149, 150, 151, 0, 0, 0, 152, 0, 153, 0, 0, 0, 154, 155, 156, 0, 0, 0, 0, 0, 157, 0, 0, 0, 0, 158, 159, 160, 161, 0, 0, 0, 162, 163, 164, 165, 0, 0, 0, 166, 0, 0, 167, 0, 0, 168, 169, 0, 0, 0, 0, 0, 170, 0, 0, 0, 0, 0, 0, 171, 0, 0, 0, 0, 0, 172, 173, 0, 0, 0, 0, 0, 174, 0, 0, 0, 0, 0, 175, 176, 0, 0, 0, 0, 0, 177, 0, 0, 0, 0, 0, 0, 178, 179, 0, 0, 0, 0, 180, 181, 0, 0, 0, 0, 0, 182, 0, 0, 0, 0, 0, 0, 183, 0, 0, 0, 0, 0, 184, 185, 186, 0, 0, 0, 0, 187, 188, 0, 0, 0, 0, 0, 189, 0, 0, 0, 0, 0, 190, 0, 0, 0, 0, 0, 0, 191, 0, 0, 0, 0, 0, 192, 0, 0, 0, 0, 0, 0, 193, 194, 0, 0, 0, 0, 0, 195, 0, 0, 0, 0, 0, 196, 197, 0, 0, 0, 0, 0, 198, 199, 0, 0, 0, 0, 0, 200, 0, 0, 0, 0, 0, 201, 0, 0, 0, 0, 0, 0, 202, 203, 0, 0, 0, 0, 204, 205, 0, 0, 0, 0, 0, 206, 207, 0, 0, 0, 0, 0, 208, 0, 0, 0, 0, 0, 209, 0, 0, 0, 0, 0, 0, 210, 0, 0, 0, 0, 0, 211, 212, 0, 0, 0, 0, 0, 0, 213, 0, 0, 0, 0, 0, 214, 0, 0, 0, 0, 0, 0, 215, 0, 0, 0, 0, 0, 0, 216, 0, 0, 0, 0, 0, 217, 0, 0, 0, 0, 0, 218, 0, 0, 0, 0, 0, 0, 0, 219, 0, 0, 0, 0, 0, 220, 0, 0, 0, 0, 0, 0, 221, 0, 0, 0, 0, 0, 222, 223, 224, 0, 0, 0, 225, 226, 227, 0, 0, 0, 0, 228, 229, 230, 0, 0, 0, 0, 231, 232, 233, 0, 0, 0, 0, 0, 234, 0, 0, 0, 0, 235, 0, 0, 0, 0, 0, 0, 236, 0, 0, 0, 0, 0, 0, 237, 0, 0, 0, 0, 0, 238, 0, 0, 0, 0, 0, 0, 239, 0, 0, 0, 0, 0, 0, 240, 0, 0, 0, 0, 0, 241, 0, 0, 0, 0, 0, 0, 242, 0, 0, 0, 0, 0, 0, 243, 0, 0, 0, 0, 244, 245, 246, 0, 247, 0, 0, 248, 0, 249, 0, 0, 0, 0, 250, 251, 252, 253, 0, 0, 254, 255, 256, 0, 0, 0, 0, 257, 0, 258, 0, 0, 0, 0, 0, 259, 0, 0, 0, 0, 260, 261, 262, 0, 0, 0, 0, 263, 0, 264, 265, 0, 0, 0, 0, 0, 0, 266, 0, 0, 0, 0, 0, 0, 267, 0, 0, 268, 269, 270, 271, 0, 0, 272, 0, 273, 0, 0, 0, 0, 274, 0, 275, 276, 277, 0, 0, 278, 279, 0, 280, 0, 0, 281, 0, 282, 0, 0, 0, 0, 0, 0, 283, 0, 0, 0, 284, 285, 286, 0, 287, 0, 0, 288, 0, 289, 0, 290, 0, 0, 291, 0, 0, 292, 0, 0, 293, 0, 0, 0, 294, 0, 0, 0, 0, 0, 0, 295, 0, 0, 296, 0, 0, 0, 0, 0, 0, 297, 0, 0, 0, 0, 0, 298, 299, 0, 0, 0, 0, 0, 300, 0, 0, 0, 0, 0, 301, 302, 0, 0, 0, 0, 0, 303, 304, 0, 0, 0, 0, 0, 305, 0, 0, 0, 0, 0, 306, 307, 0, 0, 0, 0, 0, 308, 0, 0, 0, 0, 0, 0, 309, 0, 0, 0, 0, 0, 310, 311, 0, 0, 0, 0, 0, 312, 0, 0, 0, 0, 0, 0, 313, 0, 0, 0, 0, 0, 0, 314, 0, 0, 0, 0, 0, 315, 0, 0, 0, 0, 0, 316, 0, 0, 0, 0, 0, 0, 317, 0, 0, 0, 0, 0, 0, 318, 0, 0, 0, 0, 0, 0, 319, 0, 0, 0, 0, 320, 321, 0, 0, 0, 0, 0, 322, 0, 0, 0, 0, 0, 0, 0, 323, 0, 0, 0, 0, 0, 324, 325, 0, 0, 0, 0, 0, 326, 0, 0, 0, 0, 0, 327, 0, 0, 0, 0, 0, 0, 328, 0, 0, 0, 0, 0, 0, 329, 0, 0, 0, 0, 0, 0, 330, 0, 0, 0, 0, 0, 0, 331, 0, 0, 0, 0, 0, 332, 0, 0, 0, 0, 0, 333, 0, 0, 0, 0, 0, 0, 334, 0, 0, 0, 0, 0, 335, 0, 0, 0, 0, 0, 0, 0, 0, 0, 336, 0, 0, 0, 0, 0, 0, 337, 0, 0, 0, 0, 0, 338, 0, 0, 0, 0, 0, 0, 339, 0, 0, 0, 0, 0, 0, 340, 0, 0, 0, 0, 0, 341, 0, 0, 0, 0, 0, 0, 342, 0, 0, 0, 0, 0, 0, 343, 0, 0, 0, 0, 0, 344, 0, 0, 0, 0, 0, 0, 345, 0, 0, 0, 0, 0, 0, 346, 0, 0, 0, 0, 0, 0, 347, 0, 0, 0, 0, 0, 0, 348, 0, 0, 0, 0, 0, 349, 0, 0, 0, 0, 0, 0, 350, 0, 0, 0, 0, 0, 0, 351, 0, 0, 0, 0, 0, 352, 353, 0, 0, 0, 0, 0, 354, 0, 0, 0, 0, 0, 0, 355, 0, 0, 0, 0, 0, 0, 356, 0, 0, 0, 0, 0, 0, 357, 0, 0, 0, 0, 0, 358, 0, 0, 0, 0, 0, 0, 359, 360, 0, 0, 0, 0, 0, 0, 361, 0, 0, 0, 0, 0, 362, 0, 0, 0, 0, 0, 0, 363, 0, 0, 0, 0, 0, 0, 364, 0, 0, 0, 0, 0, 365, 0, 0, 0, 0, 0, 0, 366, 0, 0, 0, 0, 0, 367, 368, 0, 0, 0, 0, 0, 369, 0, 0, 0, 0, 0, 370, 0, 0, 0, 0, 0, 0, 371, 0, 0, 0, 0, 0, 0, 372, 0, 0, 0, 0, 0, 373, 0, 0, 0, 374, 0, 0, 375, 0, 0, 376, 0, 0, 0, 0, 0, 0, 377, 0, 0, 0, 0, 0, 0, 378, 0, 0, 0, 0, 0, 379, 0, 0, 0, 0, 0, 0, 380, 0, 0, 0, 0, 0, 381, 0, 0, 0, 0, 0, 0, 382, 0, 0, 383, 0, 0, 0, 384, 0, 0, 385, 0, 0, 386, 0, 0, 0, 0, 0, 0, 387, 0, 0, 0, 0, 0, 0, 388, 0, 0, 0, 0, 0, 389, 0, 0, 0, 0, 0, 0, 390, 0, 0, 0, 0, 0, 391, 0, 0, 0, 0, 0, 0, 392, 0, 0, 393, 0, 0, 0, 0, 0, 0, 394, 0, 0, 0, 0, 0, 395, 0, 0, 0, 0, 0, 0, 396, 0, 0, 0, 0, 0, 0, 397, 0, 0, 398, 0, 0, 399, 0, 0, 0, 400, 0, 0, 0, 0, 0, 401, 0, 0, 0, 0, 0, 0, 402, 0, 0, 0, 0, 0, 0, 403, 0, 0, 0, 0, 0, 404, 0, 0, 0, 0, 0, 0, 405, 0, 0, 0, 0, 0, 0, 406, 0, 0, 407, 0, 0, 408, 0, 0, 409, 0, 0, 0, 410, 0, 0, 0, 0, 0, 411, 0, 0, 0, 0, 0, 0, 412, 0, 0, 0, 0, 0, 0, 413, 0, 0, 0, 0, 0, 414, 0, 0, 0, 0, 0, 0, 415, 0, 0, 0, 0, 0, 0, 416, 0, 0, 417, 0, 0, 418, 0, 0, 419, 0, 0, 0, 420, 0, 0, 421, 0, 0, 422, 0, 0, 423, 424, 0, 0, 425, 0, 0, 426, 0, 0, 0, 0, 0, 0, 427, 0, 0, 0, 0, 0, 428, 0, 0, 0, 0, 0, 0, 429, 0, 0, 0, 0, 0, 0, 430, 0, 0, 431, 0, 0, 432, 0, 0, 0, 433, 0, 0, 434, 0, 0, 435, 0, 0, 436, 437, 0, 0, 438, 0, 0, 439, 0, 0, 0, 440, 0, 0, 0, 0, 0, 441, 0, 0, 0, 0, 0, 0, 442, 0, 0, 0, 0, 0, 0, 443, 0, 0, 0, 0, 0, 444, 0, 0, 0, 0, 0, 0, 445, 0, 0, 0, 0, 0, 446, 0, 0, 447, 448, 0, 0, 449, 0, 0, 450, 0, 0, 0, 451, 0, 0, 0, 0, 0, 452, 0, 0, 0, 0, 0, 0, 453, 0, 0, 0, 0, 0, 0, 454, 0, 0, 0, 0, 0, 455, 0, 0, 0, 0, 0, 0, 456, 0, 0, 0, 0, 0, 457, 0, 0, 0, 0, 0, 0, 458, 0, 0, 0, 0, 0, 0, 459, 0, 0, 0, 0, 0, 460, 0, 0, 0, 0, 0, 0, 461, 0, 0, 462, 0, 0, 463, 0, 0, 0, 0, 0, 0, 464, 0, 0, 0, 0, 0, 0, 465, 0, 0, 466, 0, 0, 467, 0, 0, 0, 0, 0, 0, 468, 0, 0, 0, 0, 0, 469, 0, 0, 0, 0, 0, 0, 470, 0, 0, 0, 0, 0, 0, 471, 0, 0, 0, 0, 0, 472, 0, 0, 0, 0, 0, 0, 473, 0, 0, 0, 0, 0, 0, 474, 0, 0, 0, 0, 0, 475, 0, 0, 0, 0, 0, 0, 476, 0, 0, 0, 0, 0, 477, 0, 0, 0, 0, 0, 0, 478, 0, 0, 0, 0, 0, 0, 479, 0, 0, 0, 0, 0, 480, 0, 0, 0, 0, 0, 0, 481, 0, 0, 0, 0, 0, 0, 482, 0, 0, 0, 0, 0, 483, 0, 0, 0, 0, 0, 0, 484, 0, 0, 0, 0, 0, 485, 0, 0, 0, 0, 0, 0, 486, 0, 0, 0, 0, 0, 0, 487, 0, 0, 0, 0, 0, 488, 0, 0, 0, 0, 0, 0, 489, 0, 0, 0, 0, 0, 0, 490, 0, 0, 0, 0, 0, 491, 0, 0, 0, 0, 0, 0, 492, 0, 0, 0, 0, 0, 493, 0, 0, 0, 0, 0, 0, 494, 0, 0, 0, 0, 0, 0, 495, 0, 0, 0, 0, 0, 496, 0, 0, 0, 0, 0, 0, 497, 0, 0, 0, 0, 0, 0, 498, 0, 0, 0, 0, 0, 499, 0, 0, 0, 0, 0, 0, 500, 0, 0, 0, 0, 0, 501, 0, 0, 0, 0, 0, 0, 502, 0, 0, 0, 0, 0, 0, 503, 0, 0, 0, 0, 0, 504, 0, 0, 0, 0, 0, 0, 505, 0, 0, 0, 0, 0, 0, 506, 0, 0, 0, 0, 0, 507, 0, 0, 0, 0, 0, 0, 508, 0, 0, 0, 0, 0, 0, 0, 0, 509, 0, 0, 0, 0, 0, 0, 510, 0, 0, 0, 0, 0, 0, 511, 0, 0, 0, 0, 0, 512, 0, 0, 0, 0, 0, 0, 513, 0, 0, 0, 0, 0, 0, 514, 0, 0, 0, 0, 0, 515, 0, 0, 0, 0, 0, 0, 516, 0, 0, 0, 0, 0, 517, 0, 0, 0, 0, 0, 0, 518, 0, 0, 0, 0, 0, 0, 519, 0, 0, 0, 0, 0, 520, 0, 0, 0, 0, 0, 0, 521, 0, 0, 0, 0, 0, 0, 522, 0, 0, 0, 0, 0, 523, 0, 0, 0, 0, 0, 0, 524, 0, 0, 0, 0, 0, 525, 526, 0, 0, 0, 0, 0, 527, 0, 0, 0, 0, 0, 0, 528, 0, 0, 0, 0, 0, 529, 0, 0, 0, 0, 0, 0, 530, 0, 0, 0, 0, 0, 0, 531, 0, 0, 0, 0, 0, 532, 0, 0, 0, 0, 0, 0, 533, 0, 0, 0, 0, 0, 534, 0, 0, 0, 0, 0, 0, 535, 0, 0, 0, 0, 0, 0, 536, 0, 0, 0, 0, 0, 537, 0, 0, 0, 0, 0, 0, 538, 0, 0, 0, 0, 0, 0, 539, 0, 0, 0, 0, 0, 540, 0, 0, 0, 0, 0, 0, 541, 0, 0, 0, 0, 0, 542, 0, 0, 0, 0, 0, 0, 543, 0, 0, 0, 0, 0, 0, 544, 0, 0, 0, 0, 0, 545, 0, 0, 0, 0, 0, 0, 546, 0, 0, 0, 0, 0, 0, 547, 0, 0, 0, 0, 0, 548, 0, 0, 0, 0, 0, 0, 549, 0, 0, 0, 0, 0, 550, 551, 0, 0, 0, 0, 0, 552, 0, 0, 0, 0, 0, 0, 553, 0, 0, 0, 0, 0, 554, 0, 0, 0, 0, 0, 0, 555, 0, 0, 0, 0, 0, 0, 556, 0, 0, 0, 0, 0, 557, 0, 0, 0, 0, 0, 0, 558, }; static unsigned short comp_data[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8814, 0, 0, 0, 0, 8800, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8815, 0, 0, 0, 0, 0, 0, 0, 0, 0, 192, 193, 194, 195, 256, 258, 550, 196, 7842, 197, 0, 461, 512, 514, 0, 0, 0, 7840, 0, 7680, 0, 0, 260, 0, 0, 0, 0, 7682, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7684, 0, 0, 0, 0, 0, 0, 0, 0, 7686, 0, 0, 0, 262, 264, 0, 0, 0, 266, 0, 0, 0, 0, 268, 0, 0, 0, 0, 0, 0, 0, 0, 0, 199, 0, 0, 0, 0, 0, 7690, 0, 0, 0, 0, 270, 0, 0, 0, 0, 0, 7692, 0, 0, 0, 7696, 0, 7698, 0, 0, 7694, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 200, 201, 202, 7868, 274, 276, 278, 203, 7866, 0, 0, 282, 516, 518, 0, 0, 0, 7864, 0, 0, 0, 552, 280, 7704, 0, 7706, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7710, 0, 0, 0, 0, 0, 0, 0, 500, 284, 0, 7712, 286, 288, 0, 0, 0, 0, 486, 0, 0, 0, 0, 0, 0, 0, 0, 0, 290, 0, 0, 0, 0, 0, 0, 0, 0, 0, 292, 0, 0, 0, 7714, 7718, 0, 0, 0, 542, 0, 0, 0, 0, 0, 7716, 0, 0, 0, 7720, 0, 0, 7722, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 204, 205, 206, 296, 298, 300, 304, 207, 7880, 0, 0, 463, 520, 522, 0, 0, 0, 7882, 0, 0, 0, 0, 302, 0, 0, 7724, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 308, 0, 0, 0, 7728, 0, 0, 0, 0, 0, 0, 0, 0, 0, 488, 0, 0, 0, 0, 0, 7730, 0, 0, 0, 310, 0, 0, 0, 0, 7732, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 313, 0, 317, 0, 0, 0, 0, 0, 7734, 0, 0, 0, 315, 0, 7740, 0, 0, 7738, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7742, 0, 0, 0, 0, 7744, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7746, 0, 0, 0, 504, 323, 0, 209, 0, 0, 7748, 0, 0, 0, 0, 327, 0, 0, 0, 0, 0, 7750, 0, 0, 0, 325, 0, 7754, 0, 0, 7752, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 210, 211, 212, 213, 332, 334, 558, 214, 7886, 0, 336, 465, 524, 526, 0, 0, 416, 7884, 0, 0, 0, 0, 490, 0, 0, 0, 0, 0, 0, 0, 7764, 0, 0, 0, 0, 7766, 0, 0, 0, 0, 0, 0, 0, 340, 0, 0, 0, 0, 7768, 0, 0, 0, 0, 344, 528, 530, 0, 0, 0, 7770, 0, 0, 0, 342, 0, 0, 0, 0, 7774, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 346, 348, 0, 0, 0, 7776, 0, 0, 0, 0, 352, 0, 0, 0, 0, 0, 7778, 0, 0, 536, 350, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7786, 0, 0, 0, 0, 356, 0, 0, 0, 0, 0, 7788, 0, 0, 538, 354, 0, 7792, 0, 0, 7790, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 217, 218, 219, 360, 362, 364, 0, 220, 7910, 366, 368, 467, 532, 534, 0, 0, 431, 7908, 7794, 0, 0, 0, 370, 7798, 0, 7796, 0, 0, 0, 0, 0, 0, 7804, 0, 0, 0, 0, 0, 7806, 0, 0, 0, 7808, 7810, 372, 0, 0, 0, 7814, 7812, 0, 7816, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7818, 7820, 0, 0, 0, 0, 0, 7922, 221, 374, 7928, 562, 0, 7822, 376, 7926, 0, 0, 0, 0, 0, 0, 0, 0, 7924, 0, 0, 0, 0, 377, 7824, 0, 0, 0, 379, 0, 0, 0, 0, 381, 0, 0, 0, 0, 0, 7826, 0, 0, 0, 0, 0, 0, 0, 0, 7828, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 224, 225, 226, 227, 257, 259, 551, 228, 7843, 229, 0, 462, 513, 515, 0, 0, 0, 7841, 0, 7681, 0, 0, 261, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7683, 0, 0, 7685, 0, 0, 0, 0, 0, 0, 0, 0, 7687, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 263, 265, 0, 0, 0, 267, 0, 0, 0, 0, 269, 0, 0, 0, 0, 0, 0, 0, 0, 0, 231, 0, 0, 0, 0, 0, 7691, 0, 0, 0, 0, 271, 0, 0, 0, 0, 0, 7693, 0, 0, 0, 7697, 0, 7699, 0, 0, 7695, 0, 0, 232, 233, 234, 7869, 275, 277, 279, 235, 7867, 0, 0, 283, 517, 519, 0, 0, 0, 7865, 0, 0, 0, 553, 281, 7705, 0, 7707, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7711, 0, 0, 0, 0, 0, 0, 0, 501, 285, 0, 7713, 287, 289, 0, 0, 0, 0, 487, 0, 0, 0, 0, 0, 0, 0, 0, 0, 291, 0, 293, 0, 0, 0, 7715, 7719, 0, 0, 0, 543, 0, 0, 0, 0, 0, 7717, 0, 0, 0, 7721, 0, 0, 7723, 0, 7830, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 236, 237, 238, 297, 299, 301, 0, 239, 7881, 0, 0, 464, 521, 523, 0, 0, 0, 7883, 0, 0, 0, 0, 303, 0, 0, 7725, 0, 0, 0, 0, 0, 309, 0, 0, 0, 0, 0, 0, 0, 0, 496, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7729, 0, 489, 0, 0, 0, 0, 0, 7731, 0, 0, 0, 311, 0, 0, 0, 0, 7733, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 314, 0, 0, 0, 0, 0, 0, 0, 0, 0, 318, 0, 0, 0, 0, 0, 7735, 0, 0, 0, 316, 0, 7741, 0, 0, 7739, 0, 0, 0, 7743, 0, 0, 0, 0, 7745, 0, 0, 7747, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 505, 324, 0, 241, 0, 0, 7749, 0, 0, 0, 0, 328, 0, 0, 0, 0, 0, 7751, 0, 0, 0, 326, 0, 7755, 0, 0, 7753, 0, 0, 242, 243, 244, 245, 333, 335, 559, 246, 7887, 0, 337, 466, 525, 527, 0, 0, 417, 7885, 0, 0, 0, 0, 491, 0, 0, 0, 0, 0, 0, 0, 7765, 0, 0, 0, 0, 7767, 0, 0, 0, 0, 0, 0, 0, 341, 0, 0, 0, 0, 7769, 0, 0, 0, 0, 345, 529, 531, 0, 0, 0, 7771, 0, 0, 0, 343, 0, 0, 0, 0, 7775, 0, 0, 0, 347, 349, 0, 0, 0, 7777, 0, 0, 0, 0, 353, 0, 0, 0, 0, 0, 7779, 0, 0, 537, 351, 0, 0, 0, 0, 0, 7787, 7831, 0, 0, 0, 357, 0, 0, 0, 0, 0, 7789, 0, 0, 539, 355, 0, 7793, 0, 0, 7791, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 249, 250, 251, 361, 363, 365, 0, 252, 7911, 367, 369, 468, 533, 535, 0, 0, 432, 7909, 7795, 0, 0, 0, 371, 7799, 0, 7797, 0, 0, 0, 0, 0, 0, 7805, 0, 0, 0, 0, 0, 7807, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7809, 7811, 373, 0, 0, 0, 7815, 7813, 0, 7832, 0, 0, 0, 0, 0, 0, 0, 7817, 0, 7819, 7821, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7923, 253, 375, 7929, 563, 0, 7823, 255, 7927, 7833, 0, 0, 0, 0, 0, 0, 0, 7925, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 378, 7825, 0, 0, 0, 380, 0, 0, 0, 0, 382, 0, 0, 0, 0, 0, 7827, 0, 0, 0, 0, 0, 0, 0, 0, 7829, 0, 0, 8173, 901, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8129, 0, 0, 0, 0, 0, 0, 0, 0, 7846, 7844, 0, 7850, 0, 0, 0, 0, 7848, 0, 0, 0, 0, 0, 0, 0, 0, 478, 0, 506, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 508, 0, 0, 482, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7688, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7872, 7870, 0, 7876, 0, 0, 0, 0, 7874, 0, 0, 0, 0, 0, 7726, 0, 0, 0, 7890, 7888, 0, 7894, 0, 0, 0, 0, 7892, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7756, 0, 0, 556, 0, 0, 7758, 0, 0, 0, 0, 0, 0, 0, 0, 0, 554, 0, 510, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 475, 471, 0, 0, 469, 0, 0, 0, 0, 0, 0, 473, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7847, 7845, 0, 7851, 0, 0, 0, 0, 7849, 0, 0, 0, 0, 0, 0, 0, 0, 479, 0, 0, 0, 0, 0, 0, 0, 0, 0, 507, 0, 0, 0, 0, 509, 0, 0, 483, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7689, 0, 0, 0, 7873, 7871, 0, 7877, 0, 0, 0, 0, 7875, 0, 0, 0, 0, 0, 7727, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7891, 7889, 0, 7895, 0, 0, 0, 0, 7893, 0, 0, 0, 0, 0, 7757, 0, 0, 557, 0, 0, 7759, 0, 0, 0, 0, 0, 0, 0, 0, 0, 555, 0, 0, 0, 0, 0, 0, 0, 0, 0, 511, 0, 0, 0, 476, 472, 0, 0, 470, 0, 0, 0, 0, 0, 0, 474, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7856, 7854, 0, 7860, 0, 0, 0, 0, 7858, 0, 0, 0, 0, 7857, 7855, 0, 7861, 0, 0, 0, 0, 7859, 0, 0, 0, 0, 7700, 7702, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7701, 7703, 0, 0, 0, 7760, 7762, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7761, 7763, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7780, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7781, 0, 0, 0, 0, 7782, 0, 0, 0, 0, 7783, 0, 0, 0, 0, 0, 0, 0, 7800, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7801, 0, 0, 7802, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7803, 0, 0, 0, 7835, 0, 0, 0, 0, 0, 0, 7900, 7898, 0, 7904, 0, 0, 0, 0, 7902, 0, 0, 0, 0, 0, 0, 0, 0, 7906, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7901, 7899, 0, 7905, 0, 0, 0, 0, 7903, 0, 0, 0, 0, 0, 0, 0, 0, 7907, 0, 0, 0, 7914, 7912, 0, 7918, 0, 0, 0, 0, 7916, 0, 0, 0, 0, 0, 0, 0, 0, 7920, 0, 0, 0, 7915, 7913, 0, 7919, 0, 0, 0, 0, 7917, 0, 0, 0, 0, 0, 0, 0, 0, 7921, 0, 0, 0, 0, 0, 0, 494, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 492, 0, 0, 0, 0, 493, 0, 0, 0, 0, 480, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 481, 0, 0, 0, 0, 0, 7708, 0, 0, 0, 0, 7709, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 560, 0, 0, 0, 0, 561, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 495, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8122, 902, 0, 0, 8121, 8120, 0, 0, 0, 0, 0, 0, 0, 0, 7944, 7945, 0, 0, 0, 0, 0, 8124, 0, 0, 0, 0, 0, 0, 0, 8136, 904, 0, 0, 0, 0, 7960, 7961, 0, 0, 0, 0, 0, 8138, 905, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7976, 7977, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8140, 0, 0, 0, 0, 0, 0, 0, 8154, 906, 0, 0, 8153, 8152, 0, 938, 0, 0, 0, 0, 0, 0, 7992, 7993, 0, 0, 0, 0, 0, 8184, 908, 0, 0, 0, 0, 8008, 8009, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8172, 0, 0, 0, 0, 0, 8170, 910, 0, 0, 8169, 8168, 0, 939, 0, 0, 0, 0, 0, 0, 0, 8025, 0, 0, 0, 0, 0, 8186, 911, 0, 0, 0, 0, 8040, 8041, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8188, 0, 0, 0, 0, 8116, 0, 0, 0, 0, 8132, 0, 0, 0, 0, 0, 0, 0, 8048, 940, 0, 0, 8113, 8112, 0, 0, 0, 0, 0, 0, 0, 0, 7936, 7937, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8118, 8115, 0, 0, 0, 0, 0, 0, 0, 8050, 941, 0, 0, 0, 0, 7952, 7953, 0, 0, 0, 0, 0, 8052, 942, 0, 0, 0, 0, 7968, 7969, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8134, 8131, 0, 0, 0, 0, 0, 0, 0, 8054, 943, 0, 0, 8145, 8144, 0, 970, 0, 0, 0, 0, 0, 0, 7984, 7985, 0, 0, 0, 0, 8150, 0, 0, 0, 0, 0, 0, 0, 0, 8056, 972, 0, 0, 0, 0, 8000, 8001, 0, 0, 0, 8164, 8165, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8058, 973, 0, 0, 8161, 8160, 0, 971, 0, 0, 0, 0, 0, 0, 8016, 8017, 0, 0, 0, 0, 8166, 0, 0, 0, 0, 0, 0, 0, 0, 8060, 974, 0, 0, 0, 0, 8032, 8033, 0, 0, 0, 0, 8182, 8179, 0, 0, 0, 0, 0, 0, 0, 8146, 912, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8151, 0, 0, 0, 0, 0, 0, 0, 0, 8162, 944, 0, 0, 8167, 0, 0, 0, 0, 0, 8180, 0, 0, 0, 0, 0, 0, 0, 0, 979, 0, 0, 0, 0, 0, 980, 0, 0, 0, 0, 1031, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1232, 0, 1234, 0, 0, 0, 0, 0, 0, 1027, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1024, 0, 0, 0, 0, 1238, 0, 1025, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1217, 0, 1244, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1246, 0, 0, 0, 0, 0, 1037, 0, 0, 0, 1250, 1049, 0, 1252, 0, 0, 0, 0, 0, 0, 1036, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1254, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1262, 1038, 0, 1264, 0, 0, 1266, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1268, 0, 0, 0, 0, 1272, 0, 0, 0, 0, 1260, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1233, 0, 1235, 0, 0, 0, 0, 0, 0, 1107, 0, 0, 0, 1104, 0, 0, 0, 0, 1239, 0, 1105, 0, 0, 1218, 0, 1245, 0, 0, 0, 0, 1247, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1117, 0, 0, 0, 1251, 1081, 0, 1253, 0, 0, 0, 0, 0, 0, 1116, 0, 0, 1255, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1263, 1118, 0, 1265, 0, 0, 1267, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1269, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1273, 0, 0, 0, 0, 1261, 0, 0, 0, 0, 1111, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1142, 0, 0, 0, 0, 1143, 0, 0, 0, 0, 0, 0, 0, 1242, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1243, 0, 0, 0, 0, 1258, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1259, 0, 0, 0, 1570, 1571, 1573, 0, 0, 0, 1572, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1574, 0, 0, 0, 0, 1730, 0, 0, 0, 0, 1747, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1728, 0, 0, 0, 0, 0, 0, 2345, 0, 0, 0, 0, 2353, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2356, 0, 0, 0, 0, 0, 2507, 2508, 0, 0, 0, 0, 0, 2891, 2888, 2892, 0, 0, 0, 0, 0, 0, 2964, 0, 0, 0, 3018, 3020, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3019, 0, 0, 0, 0, 0, 0, 3144, 0, 0, 0, 0, 0, 0, 3264, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3274, 3271, 3272, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3275, 0, 0, 0, 0, 0, 0, 3402, 3404, 0, 0, 0, 3403, 0, 0, 0, 0, 0, 0, 3546, 3548, 3550, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3549, 0, 0, 0, 0, 0, 0, 0, 4134, 0, 0, 0, 0, 0, 0, 7736, 0, 0, 0, 0, 7737, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7772, 0, 0, 0, 0, 7773, 0, 0, 0, 0, 0, 0, 7784, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7785, 7852, 0, 0, 7862, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7853, 0, 0, 7863, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7878, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7879, 0, 0, 0, 0, 7896, 0, 0, 0, 0, 7897, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7938, 7940, 0, 0, 7942, 8064, 0, 0, 0, 0, 0, 0, 0, 7939, 7941, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7943, 8065, 0, 0, 0, 0, 8066, 0, 0, 0, 0, 8067, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8068, 0, 0, 0, 0, 8069, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8070, 0, 0, 0, 0, 8071, 0, 0, 0, 0, 0, 0, 0, 7946, 7948, 0, 0, 7950, 8072, 0, 0, 0, 0, 0, 0, 0, 7947, 7949, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7951, 8073, 0, 0, 0, 0, 8074, 0, 0, 0, 0, 8075, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8076, 0, 0, 0, 0, 8077, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8078, 0, 0, 0, 0, 8079, 0, 0, 0, 0, 0, 0, 0, 7954, 7956, 0, 0, 0, 7955, 7957, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7962, 7964, 0, 0, 0, 7963, 7965, 0, 0, 0, 7970, 7972, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7974, 8080, 0, 0, 0, 0, 0, 0, 0, 7971, 7973, 0, 0, 7975, 8081, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8082, 0, 0, 0, 0, 8083, 0, 0, 0, 0, 8084, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8085, 0, 0, 0, 0, 8086, 0, 0, 0, 0, 8087, 0, 0, 0, 0, 0, 0, 0, 7978, 7980, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7982, 8088, 0, 0, 0, 0, 0, 0, 0, 7979, 7981, 0, 0, 7983, 8089, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8090, 0, 0, 0, 0, 8091, 0, 0, 0, 0, 8092, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8093, 0, 0, 0, 0, 8094, 0, 0, 0, 0, 8095, 0, 0, 0, 0, 0, 0, 0, 7986, 7988, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7990, 0, 0, 0, 0, 0, 0, 0, 0, 7987, 7989, 0, 0, 7991, 0, 0, 0, 0, 0, 0, 0, 0, 7994, 7996, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7998, 0, 0, 0, 0, 0, 0, 0, 0, 7995, 7997, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7999, 0, 0, 0, 0, 0, 0, 0, 0, 8002, 8004, 0, 0, 0, 8003, 8005, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8010, 8012, 0, 0, 0, 8011, 8013, 0, 0, 0, 8018, 8020, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8022, 0, 0, 0, 0, 0, 0, 0, 0, 8019, 8021, 0, 0, 8023, 0, 0, 0, 0, 0, 0, 0, 0, 8027, 8029, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8031, 0, 0, 0, 0, 0, 0, 0, 0, 8034, 8036, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8038, 8096, 0, 0, 0, 0, 0, 0, 0, 8035, 8037, 0, 0, 8039, 8097, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8098, 0, 0, 0, 0, 8099, 0, 0, 0, 0, 8100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8101, 0, 0, 0, 0, 8102, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8103, 0, 0, 0, 0, 0, 0, 0, 8042, 8044, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8046, 8104, 0, 0, 0, 0, 0, 0, 0, 8043, 8045, 0, 0, 8047, 8105, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8106, 0, 0, 0, 0, 8107, 0, 0, 0, 0, 8108, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8109, 0, 0, 0, 0, 8110, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8111, 0, 0, 0, 0, 8114, 0, 0, 0, 0, 8130, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8178, 0, 0, 0, 0, 8119, 0, 0, 0, 0, 0, 0, 0, 8141, 8142, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8143, 0, 0, 0, 0, 0, 8135, 0, 0, 0, 0, 8183, 0, 0, 0, 0, 0, 0, 0, 8157, 8158, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8159, 0, 0, 0, 8602, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8603, 0, 0, 0, 0, 8622, 0, 0, 0, 0, 8653, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8655, 0, 0, 0, 0, 8654, 0, 0, 0, 0, 8708, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8713, 0, 0, 0, 0, 8716, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8740, 0, 0, 0, 0, 8742, 0, 0, 0, 0, 8769, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8772, 0, 0, 0, 0, 8775, 0, 0, 0, 0, 8777, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8813, 0, 0, 0, 0, 8802, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8816, 0, 0, 0, 0, 8817, 0, 0, 0, 0, 8820, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8821, 0, 0, 0, 0, 8824, 0, 0, 0, 0, 8825, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8832, 0, 0, 0, 0, 8833, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8928, 0, 0, 0, 0, 8929, 0, 0, 0, 0, 8836, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8837, 0, 0, 0, 0, 8840, 0, 0, 0, 0, 8841, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8930, 0, 0, 0, 0, 8931, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8876, 0, 0, 0, 0, 8877, 0, 0, 0, 0, 8878, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8879, 0, 0, 0, 0, 8938, 0, 0, 0, 0, 8939, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8940, 0, 0, 0, 0, 8941, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12436, 0, 0, 0, 0, 12364, 0, 0, 0, 0, 12366, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12368, 0, 0, 0, 0, 12370, 0, 0, 0, 0, 12372, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12374, 0, 0, 0, 0, 12376, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12378, 0, 0, 0, 0, 12380, 0, 0, 0, 0, 12382, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12384, 0, 0, 0, 0, 12386, 0, 0, 0, 0, 12389, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12391, 0, 0, 0, 0, 12393, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12400, 12401, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12403, 12404, 0, 0, 0, 12406, 12407, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12409, 12410, 0, 0, 0, 12412, 12413, 0, 0, 0, 12446, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12532, 0, 0, 0, 0, 12460, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12462, 0, 0, 0, 0, 12464, 0, 0, 0, 0, 12466, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12468, 0, 0, 0, 0, 12470, 0, 0, 0, 0, 12472, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12474, 0, 0, 0, 0, 12476, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12478, 0, 0, 0, 0, 12480, 0, 0, 0, 0, 12482, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12485, 0, 0, 0, 0, 12487, 0, 0, 0, 0, 12489, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12496, 12497, 0, 0, 0, 12499, 12500, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12502, 12503, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12505, 12506, 0, 0, 0, 12508, 12509, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12535, 0, 0, 0, 0, 12536, 0, 0, 0, 0, 12537, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12538, 0, 0, 0, 0, 12542, 0, }; Python-2.3.7/Modules/_ssl.c0000644001241000117560000004244710112733637015002 0ustar loewishpifb6/* SSL socket module SSL support based on patches by Brian E Gallew and Laszlo Kovacs. This module is imported by socket.py. It should *not* be used directly. */ #include "Python.h" enum py_ssl_error { /* these mirror ssl.h */ PY_SSL_ERROR_NONE, PY_SSL_ERROR_SSL, PY_SSL_ERROR_WANT_READ, PY_SSL_ERROR_WANT_WRITE, PY_SSL_ERROR_WANT_X509_LOOKUP, PY_SSL_ERROR_SYSCALL, /* look at error stack/return value/errno */ PY_SSL_ERROR_ZERO_RETURN, PY_SSL_ERROR_WANT_CONNECT, /* start of non ssl.h errorcodes */ PY_SSL_ERROR_EOF, /* special case of SSL_ERROR_SYSCALL */ PY_SSL_ERROR_INVALID_ERROR_CODE }; /* Include symbols from _socket module */ #include "socketmodule.h" /* Include OpenSSL header files */ #include "openssl/rsa.h" #include "openssl/crypto.h" #include "openssl/x509.h" #include "openssl/pem.h" #include "openssl/ssl.h" #include "openssl/err.h" #include "openssl/rand.h" /* SSL error object */ static PyObject *PySSLErrorObject; /* SSL socket object */ #define X509_NAME_MAXLEN 256 /* RAND_* APIs got added to OpenSSL in 0.9.5 */ #if OPENSSL_VERSION_NUMBER >= 0x0090500fL # define HAVE_OPENSSL_RAND 1 #else # undef HAVE_OPENSSL_RAND #endif typedef struct { PyObject_HEAD PySocketSockObject *Socket; /* Socket on which we're layered */ SSL_CTX* ctx; SSL* ssl; X509* server_cert; BIO* sbio; char server[X509_NAME_MAXLEN]; char issuer[X509_NAME_MAXLEN]; } PySSLObject; static PyTypeObject PySSL_Type; static PyObject *PySSL_SSLwrite(PySSLObject *self, PyObject *args); static PyObject *PySSL_SSLread(PySSLObject *self, PyObject *args); static int check_socket_and_wait_for_timeout(PySocketSockObject *s, int writing); #define PySSLObject_Check(v) ((v)->ob_type == &PySSL_Type) typedef enum { SOCKET_IS_NONBLOCKING, SOCKET_IS_BLOCKING, SOCKET_HAS_TIMED_OUT, SOCKET_HAS_BEEN_CLOSED, SOCKET_OPERATION_OK } timeout_state; /* XXX It might be helpful to augment the error message generated below with the name of the SSL function that generated the error. I expect it's obvious most of the time. */ static PyObject * PySSL_SetError(PySSLObject *obj, int ret) { PyObject *v, *n, *s; char *errstr; int err; enum py_ssl_error p; assert(ret <= 0); err = SSL_get_error(obj->ssl, ret); switch (err) { case SSL_ERROR_ZERO_RETURN: errstr = "TLS/SSL connection has been closed"; p = PY_SSL_ERROR_ZERO_RETURN; break; case SSL_ERROR_WANT_READ: errstr = "The operation did not complete (read)"; p = PY_SSL_ERROR_WANT_READ; break; case SSL_ERROR_WANT_WRITE: p = PY_SSL_ERROR_WANT_WRITE; errstr = "The operation did not complete (write)"; break; case SSL_ERROR_WANT_X509_LOOKUP: p = PY_SSL_ERROR_WANT_X509_LOOKUP; errstr = "The operation did not complete (X509 lookup)"; break; case SSL_ERROR_WANT_CONNECT: p = PY_SSL_ERROR_WANT_CONNECT; errstr = "The operation did not complete (connect)"; break; case SSL_ERROR_SYSCALL: { unsigned long e = ERR_get_error(); if (e == 0) { if (ret == 0 || !obj->Socket) { p = PY_SSL_ERROR_EOF; errstr = "EOF occurred in violation of protocol"; } else if (ret == -1) { /* the underlying BIO reported an I/O error */ return obj->Socket->errorhandler(); } else { /* possible? */ p = PY_SSL_ERROR_SYSCALL; errstr = "Some I/O error occurred"; } } else { p = PY_SSL_ERROR_SYSCALL; /* XXX Protected by global interpreter lock */ errstr = ERR_error_string(e, NULL); } break; } case SSL_ERROR_SSL: { unsigned long e = ERR_get_error(); p = PY_SSL_ERROR_SSL; if (e != 0) /* XXX Protected by global interpreter lock */ errstr = ERR_error_string(e, NULL); else { /* possible? */ errstr = "A failure in the SSL library occurred"; } break; } default: p = PY_SSL_ERROR_INVALID_ERROR_CODE; errstr = "Invalid error code"; } n = PyInt_FromLong((long) p); if (n == NULL) return NULL; v = PyTuple_New(2); if (v == NULL) { Py_DECREF(n); return NULL; } s = PyString_FromString(errstr); if (s == NULL) { Py_DECREF(v); Py_DECREF(n); } PyTuple_SET_ITEM(v, 0, n); PyTuple_SET_ITEM(v, 1, s); PyErr_SetObject(PySSLErrorObject, v); return NULL; } static PySSLObject * newPySSLObject(PySocketSockObject *Sock, char *key_file, char *cert_file) { PySSLObject *self; char *errstr = NULL; int ret; int err; int sockstate; self = PyObject_New(PySSLObject, &PySSL_Type); /* Create new object */ if (self == NULL){ errstr = "newPySSLObject error"; goto fail; } memset(self->server, '\0', sizeof(char) * X509_NAME_MAXLEN); memset(self->issuer, '\0', sizeof(char) * X509_NAME_MAXLEN); self->server_cert = NULL; self->ssl = NULL; self->ctx = NULL; self->Socket = NULL; if ((key_file && !cert_file) || (!key_file && cert_file)) { errstr = "Both the key & certificate files must be specified"; goto fail; } Py_BEGIN_ALLOW_THREADS self->ctx = SSL_CTX_new(SSLv23_method()); /* Set up context */ Py_END_ALLOW_THREADS if (self->ctx == NULL) { errstr = "SSL_CTX_new error"; goto fail; } if (key_file) { Py_BEGIN_ALLOW_THREADS ret = SSL_CTX_use_PrivateKey_file(self->ctx, key_file, SSL_FILETYPE_PEM); Py_END_ALLOW_THREADS if (ret < 1) { errstr = "SSL_CTX_use_PrivateKey_file error"; goto fail; } Py_BEGIN_ALLOW_THREADS ret = SSL_CTX_use_certificate_chain_file(self->ctx, cert_file); Py_END_ALLOW_THREADS if (ret < 1) { errstr = "SSL_CTX_use_certificate_chain_file error"; goto fail; } } Py_BEGIN_ALLOW_THREADS SSL_CTX_set_verify(self->ctx, SSL_VERIFY_NONE, NULL); /* set verify lvl */ SSL_CTX_set_options(self->ctx, SSL_OP_ALL); /* ssl compatibility */ self->ssl = SSL_new(self->ctx); /* New ssl struct */ Py_END_ALLOW_THREADS SSL_set_fd(self->ssl, Sock->sock_fd); /* Set the socket for SSL */ /* If the socket is in non-blocking mode or timeout mode, set the BIO * to non-blocking mode (blocking is the default) */ if (Sock->sock_timeout >= 0.0) { /* Set both the read and write BIO's to non-blocking mode */ BIO_set_nbio(SSL_get_rbio(self->ssl), 1); BIO_set_nbio(SSL_get_wbio(self->ssl), 1); } Py_BEGIN_ALLOW_THREADS SSL_set_connect_state(self->ssl); Py_END_ALLOW_THREADS /* Actually negotiate SSL connection */ /* XXX If SSL_connect() returns 0, it's also a failure. */ sockstate = 0; do { Py_BEGIN_ALLOW_THREADS ret = SSL_connect(self->ssl); err = SSL_get_error(self->ssl, ret); Py_END_ALLOW_THREADS if(PyErr_CheckSignals()) { goto fail; } if (err == SSL_ERROR_WANT_READ) { sockstate = check_socket_and_wait_for_timeout(Sock, 0); } else if (err == SSL_ERROR_WANT_WRITE) { sockstate = check_socket_and_wait_for_timeout(Sock, 1); } else sockstate = SOCKET_OPERATION_OK; if (sockstate == SOCKET_HAS_TIMED_OUT) { PyErr_SetString(PySSLErrorObject, "The connect operation timed out"); goto fail; } else if (sockstate == SOCKET_HAS_BEEN_CLOSED) { PyErr_SetString(PySSLErrorObject, "Underlying socket has been closed."); goto fail; } else if (sockstate == SOCKET_IS_NONBLOCKING) { break; } } while (err == SSL_ERROR_WANT_READ || err == SSL_ERROR_WANT_WRITE); if (ret <= 0) { PySSL_SetError(self, ret); goto fail; } self->ssl->debug = 1; Py_BEGIN_ALLOW_THREADS if ((self->server_cert = SSL_get_peer_certificate(self->ssl))) { X509_NAME_oneline(X509_get_subject_name(self->server_cert), self->server, X509_NAME_MAXLEN); X509_NAME_oneline(X509_get_issuer_name(self->server_cert), self->issuer, X509_NAME_MAXLEN); } Py_END_ALLOW_THREADS self->Socket = Sock; Py_INCREF(self->Socket); return self; fail: if (errstr) PyErr_SetString(PySSLErrorObject, errstr); Py_DECREF(self); return NULL; } static PyObject * PySocket_ssl(PyObject *self, PyObject *args) { PySSLObject *rv; PySocketSockObject *Sock; char *key_file = NULL; char *cert_file = NULL; if (!PyArg_ParseTuple(args, "O!|zz:ssl", PySocketModule.Sock_Type, (PyObject*)&Sock, &key_file, &cert_file)) return NULL; rv = newPySSLObject(Sock, key_file, cert_file); if (rv == NULL) return NULL; return (PyObject *)rv; } PyDoc_STRVAR(ssl_doc, "ssl(socket, [keyfile, certfile]) -> sslobject"); /* SSL object methods */ static PyObject * PySSL_server(PySSLObject *self) { return PyString_FromString(self->server); } static PyObject * PySSL_issuer(PySSLObject *self) { return PyString_FromString(self->issuer); } static void PySSL_dealloc(PySSLObject *self) { if (self->server_cert) /* Possible not to have one? */ X509_free (self->server_cert); if (self->ssl) SSL_free(self->ssl); if (self->ctx) SSL_CTX_free(self->ctx); Py_XDECREF(self->Socket); PyObject_Del(self); } /* If the socket has a timeout, do a select() on the socket. The argument writing indicates the direction. Returns one of the possibilities in the timeout_state enum (above). */ static int check_socket_and_wait_for_timeout(PySocketSockObject *s, int writing) { fd_set fds; struct timeval tv; int rc; /* Nothing to do unless we're in timeout mode (not non-blocking) */ if (s->sock_timeout < 0.0) return SOCKET_IS_BLOCKING; else if (s->sock_timeout == 0.0) return SOCKET_IS_NONBLOCKING; /* Guard against closed socket */ if (s->sock_fd < 0) return SOCKET_HAS_BEEN_CLOSED; /* Construct the arguments to select */ tv.tv_sec = (int)s->sock_timeout; tv.tv_usec = (int)((s->sock_timeout - tv.tv_sec) * 1e6); FD_ZERO(&fds); FD_SET(s->sock_fd, &fds); /* See if the socket is ready */ Py_BEGIN_ALLOW_THREADS if (writing) rc = select(s->sock_fd+1, NULL, &fds, NULL, &tv); else rc = select(s->sock_fd+1, &fds, NULL, NULL, &tv); Py_END_ALLOW_THREADS /* Return SOCKET_TIMED_OUT on timeout, SOCKET_OPERATION_OK otherwise (when we are able to write or when there's something to read) */ return rc == 0 ? SOCKET_HAS_TIMED_OUT : SOCKET_OPERATION_OK; } static PyObject *PySSL_SSLwrite(PySSLObject *self, PyObject *args) { char *data; int len; int count; int sockstate; int err; if (!PyArg_ParseTuple(args, "s#:write", &data, &count)) return NULL; sockstate = check_socket_and_wait_for_timeout(self->Socket, 1); if (sockstate == SOCKET_HAS_TIMED_OUT) { PyErr_SetString(PySSLErrorObject, "The write operation timed out"); return NULL; } else if (sockstate == SOCKET_HAS_BEEN_CLOSED) { PyErr_SetString(PySSLErrorObject, "Underlying socket has been closed."); return NULL; } do { err = 0; Py_BEGIN_ALLOW_THREADS len = SSL_write(self->ssl, data, count); err = SSL_get_error(self->ssl, len); Py_END_ALLOW_THREADS if(PyErr_CheckSignals()) { return NULL; } if (err == SSL_ERROR_WANT_READ) { sockstate = check_socket_and_wait_for_timeout(self->Socket, 0); } else if (err == SSL_ERROR_WANT_WRITE) { sockstate = check_socket_and_wait_for_timeout(self->Socket, 1); } else sockstate = SOCKET_OPERATION_OK; if (sockstate == SOCKET_HAS_TIMED_OUT) { PyErr_SetString(PySSLErrorObject, "The write operation timed out"); return NULL; } else if (sockstate == SOCKET_HAS_BEEN_CLOSED) { PyErr_SetString(PySSLErrorObject, "Underlying socket has been closed."); return NULL; } else if (sockstate == SOCKET_IS_NONBLOCKING) { break; } } while (err == SSL_ERROR_WANT_READ || err == SSL_ERROR_WANT_WRITE); if (len > 0) return PyInt_FromLong(len); else return PySSL_SetError(self, len); } PyDoc_STRVAR(PySSL_SSLwrite_doc, "write(s) -> len\n\ \n\ Writes the string s into the SSL object. Returns the number\n\ of bytes written."); static PyObject *PySSL_SSLread(PySSLObject *self, PyObject *args) { PyObject *buf; int count = 0; int len = 1024; int sockstate; int err; if (!PyArg_ParseTuple(args, "|i:read", &len)) return NULL; if (!(buf = PyString_FromStringAndSize((char *) 0, len))) return NULL; sockstate = check_socket_and_wait_for_timeout(self->Socket, 0); if (sockstate == SOCKET_HAS_TIMED_OUT) { PyErr_SetString(PySSLErrorObject, "The read operation timed out"); Py_DECREF(buf); return NULL; } do { err = 0; Py_BEGIN_ALLOW_THREADS count = SSL_read(self->ssl, PyString_AsString(buf), len); err = SSL_get_error(self->ssl, count); Py_END_ALLOW_THREADS if(PyErr_CheckSignals()) { Py_DECREF(buf); return NULL; } if (err == SSL_ERROR_WANT_READ) { sockstate = check_socket_and_wait_for_timeout(self->Socket, 0); } else if (err == SSL_ERROR_WANT_WRITE) { sockstate = check_socket_and_wait_for_timeout(self->Socket, 1); } else sockstate = SOCKET_OPERATION_OK; if (sockstate == SOCKET_HAS_TIMED_OUT) { PyErr_SetString(PySSLErrorObject, "The read operation timed out"); Py_DECREF(buf); return NULL; } else if (sockstate == SOCKET_IS_NONBLOCKING) { break; } } while (err == SSL_ERROR_WANT_READ || err == SSL_ERROR_WANT_WRITE); if (count <= 0) { Py_DECREF(buf); return PySSL_SetError(self, count); } if (count != len) _PyString_Resize(&buf, count); return buf; } PyDoc_STRVAR(PySSL_SSLread_doc, "read([len]) -> string\n\ \n\ Read up to len bytes from the SSL socket."); static PyMethodDef PySSLMethods[] = { {"write", (PyCFunction)PySSL_SSLwrite, METH_VARARGS, PySSL_SSLwrite_doc}, {"read", (PyCFunction)PySSL_SSLread, METH_VARARGS, PySSL_SSLread_doc}, {"server", (PyCFunction)PySSL_server, METH_NOARGS}, {"issuer", (PyCFunction)PySSL_issuer, METH_NOARGS}, {NULL, NULL} }; static PyObject *PySSL_getattr(PySSLObject *self, char *name) { return Py_FindMethod(PySSLMethods, (PyObject *)self, name); } static PyTypeObject PySSL_Type = { PyObject_HEAD_INIT(NULL) 0, /*ob_size*/ "socket.SSL", /*tp_name*/ sizeof(PySSLObject), /*tp_basicsize*/ 0, /*tp_itemsize*/ /* methods */ (destructor)PySSL_dealloc, /*tp_dealloc*/ 0, /*tp_print*/ (getattrfunc)PySSL_getattr, /*tp_getattr*/ 0, /*tp_setattr*/ 0, /*tp_compare*/ 0, /*tp_repr*/ 0, /*tp_as_number*/ 0, /*tp_as_sequence*/ 0, /*tp_as_mapping*/ 0, /*tp_hash*/ }; #ifdef HAVE_OPENSSL_RAND /* helper routines for seeding the SSL PRNG */ static PyObject * PySSL_RAND_add(PyObject *self, PyObject *args) { char *buf; int len; double entropy; if (!PyArg_ParseTuple(args, "s#d:RAND_add", &buf, &len, &entropy)) return NULL; RAND_add(buf, len, entropy); Py_INCREF(Py_None); return Py_None; } PyDoc_STRVAR(PySSL_RAND_add_doc, "RAND_add(string, entropy)\n\ \n\ Mix string into the OpenSSL PRNG state. entropy (a float) is a lower\n\ bound on the entropy contained in string."); static PyObject * PySSL_RAND_status(PyObject *self) { return PyInt_FromLong(RAND_status()); } PyDoc_STRVAR(PySSL_RAND_status_doc, "RAND_status() -> 0 or 1\n\ \n\ Returns 1 if the OpenSSL PRNG has been seeded with enough data and 0 if not.\n\ It is necessary to seed the PRNG with RAND_add() on some platforms before\n\ using the ssl() function."); static PyObject * PySSL_RAND_egd(PyObject *self, PyObject *arg) { int bytes; if (!PyString_Check(arg)) return PyErr_Format(PyExc_TypeError, "RAND_egd() expected string, found %s", arg->ob_type->tp_name); bytes = RAND_egd(PyString_AS_STRING(arg)); if (bytes == -1) { PyErr_SetString(PySSLErrorObject, "EGD connection failed or EGD did not return " "enough data to seed the PRNG"); return NULL; } return PyInt_FromLong(bytes); } PyDoc_STRVAR(PySSL_RAND_egd_doc, "RAND_egd(path) -> bytes\n\ \n\ Queries the entropy gather daemon (EGD) on socket path. Returns number\n\ of bytes read. Raises socket.sslerror if connection to EGD fails or\n\ if it does provide enough data to seed PRNG."); #endif /* List of functions exported by this module. */ static PyMethodDef PySSL_methods[] = { {"ssl", PySocket_ssl, METH_VARARGS, ssl_doc}, #ifdef HAVE_OPENSSL_RAND {"RAND_add", PySSL_RAND_add, METH_VARARGS, PySSL_RAND_add_doc}, {"RAND_egd", PySSL_RAND_egd, METH_O, PySSL_RAND_egd_doc}, {"RAND_status", (PyCFunction)PySSL_RAND_status, METH_NOARGS, PySSL_RAND_status_doc}, #endif {NULL, NULL} /* Sentinel */ }; PyDoc_STRVAR(module_doc, "Implementation module for SSL socket operations. See the socket module\n\ for documentation."); PyMODINIT_FUNC init_ssl(void) { PyObject *m, *d; PySSL_Type.ob_type = &PyType_Type; m = Py_InitModule3("_ssl", PySSL_methods, module_doc); d = PyModule_GetDict(m); /* Load _socket module and its C API */ if (PySocketModule_ImportModuleAndAPI()) return; /* Init OpenSSL */ SSL_load_error_strings(); SSLeay_add_ssl_algorithms(); /* Add symbols to module dict */ PySSLErrorObject = PyErr_NewException("socket.sslerror", NULL, NULL); if (PySSLErrorObject == NULL) return; PyDict_SetItemString(d, "sslerror", PySSLErrorObject); if (PyDict_SetItemString(d, "SSLType", (PyObject *)&PySSL_Type) != 0) return; PyModule_AddIntConstant(m, "SSL_ERROR_ZERO_RETURN", PY_SSL_ERROR_ZERO_RETURN); PyModule_AddIntConstant(m, "SSL_ERROR_WANT_READ", PY_SSL_ERROR_WANT_READ); PyModule_AddIntConstant(m, "SSL_ERROR_WANT_WRITE", PY_SSL_ERROR_WANT_WRITE); PyModule_AddIntConstant(m, "SSL_ERROR_WANT_X509_LOOKUP", PY_SSL_ERROR_WANT_X509_LOOKUP); PyModule_AddIntConstant(m, "SSL_ERROR_SYSCALL", PY_SSL_ERROR_SYSCALL); PyModule_AddIntConstant(m, "SSL_ERROR_SSL", PY_SSL_ERROR_SSL); PyModule_AddIntConstant(m, "SSL_ERROR_WANT_CONNECT", PY_SSL_ERROR_WANT_CONNECT); /* non ssl.h errorcodes */ PyModule_AddIntConstant(m, "SSL_ERROR_EOF", PY_SSL_ERROR_EOF); PyModule_AddIntConstant(m, "SSL_ERROR_INVALID_ERROR_CODE", PY_SSL_ERROR_INVALID_ERROR_CODE); } Python-2.3.7/Modules/mathmodule.c0000644001241000117560000002547407603621751016206 0ustar loewishpifb6/* Math module -- standard C math library functions, pi and e */ #include "Python.h" #include "longintrepr.h" #ifndef _MSC_VER #ifndef __STDC__ extern double fmod (double, double); extern double frexp (double, int *); extern double ldexp (double, int); extern double modf (double, double *); #endif /* __STDC__ */ #endif /* _MSC_VER */ /* Call is_error when errno != 0, and where x is the result libm * returned. is_error will usually set up an exception and return * true (1), but may return false (0) without setting up an exception. */ static int is_error(double x) { int result = 1; /* presumption of guilt */ assert(errno); /* non-zero errno is a precondition for calling */ if (errno == EDOM) PyErr_SetString(PyExc_ValueError, "math domain error"); else if (errno == ERANGE) { /* ANSI C generally requires libm functions to set ERANGE * on overflow, but also generally *allows* them to set * ERANGE on underflow too. There's no consistency about * the latter across platforms. * Alas, C99 never requires that errno be set. * Here we suppress the underflow errors (libm functions * should return a zero on underflow, and +- HUGE_VAL on * overflow, so testing the result for zero suffices to * distinguish the cases). */ if (x) PyErr_SetString(PyExc_OverflowError, "math range error"); else result = 0; } else /* Unexpected math error */ PyErr_SetFromErrno(PyExc_ValueError); return result; } static PyObject * math_1(PyObject *args, double (*func) (double), char *argsfmt) { double x; if (! PyArg_ParseTuple(args, argsfmt, &x)) return NULL; errno = 0; PyFPE_START_PROTECT("in math_1", return 0) x = (*func)(x); PyFPE_END_PROTECT(x) Py_SET_ERANGE_IF_OVERFLOW(x); if (errno && is_error(x)) return NULL; else return PyFloat_FromDouble(x); } static PyObject * math_2(PyObject *args, double (*func) (double, double), char *argsfmt) { double x, y; if (! PyArg_ParseTuple(args, argsfmt, &x, &y)) return NULL; errno = 0; PyFPE_START_PROTECT("in math_2", return 0) x = (*func)(x, y); PyFPE_END_PROTECT(x) Py_SET_ERANGE_IF_OVERFLOW(x); if (errno && is_error(x)) return NULL; else return PyFloat_FromDouble(x); } #define FUNC1(funcname, func, docstring) \ static PyObject * math_##funcname(PyObject *self, PyObject *args) { \ return math_1(args, func, "d:" #funcname); \ }\ PyDoc_STRVAR(math_##funcname##_doc, docstring); #define FUNC2(funcname, func, docstring) \ static PyObject * math_##funcname(PyObject *self, PyObject *args) { \ return math_2(args, func, "dd:" #funcname); \ }\ PyDoc_STRVAR(math_##funcname##_doc, docstring); FUNC1(acos, acos, "acos(x)\n\nReturn the arc cosine (measured in radians) of x.") FUNC1(asin, asin, "asin(x)\n\nReturn the arc sine (measured in radians) of x.") FUNC1(atan, atan, "atan(x)\n\nReturn the arc tangent (measured in radians) of x.") FUNC2(atan2, atan2, "atan2(y, x)\n\nReturn the arc tangent (measured in radians) of y/x.\n" "Unlike atan(y/x), the signs of both x and y are considered.") FUNC1(ceil, ceil, "ceil(x)\n\nReturn the ceiling of x as a float.\n" "This is the smallest integral value >= x.") FUNC1(cos, cos, "cos(x)\n\nReturn the cosine of x (measured in radians).") FUNC1(cosh, cosh, "cosh(x)\n\nReturn the hyperbolic cosine of x.") FUNC1(exp, exp, "exp(x)\n\nReturn e raised to the power of x.") FUNC1(fabs, fabs, "fabs(x)\n\nReturn the absolute value of the float x.") FUNC1(floor, floor, "floor(x)\n\nReturn the floor of x as a float.\n" "This is the largest integral value <= x.") FUNC2(fmod, fmod, "fmod(x,y)\n\nReturn fmod(x, y), according to platform C." " x % y may differ.") FUNC2(hypot, hypot, "hypot(x,y)\n\nReturn the Euclidean distance, sqrt(x*x + y*y).") #ifdef MPW_3_1 /* This hack is needed for MPW 3.1 but not for 3.2 ... */ FUNC2(pow, power, "pow(x,y)\n\nReturn x**y (x to the power of y).") #else FUNC2(pow, pow, "pow(x,y)\n\nReturn x**y (x to the power of y).") #endif FUNC1(sin, sin, "sin(x)\n\nReturn the sine of x (measured in radians).") FUNC1(sinh, sinh, "sinh(x)\n\nReturn the hyperbolic sine of x.") FUNC1(sqrt, sqrt, "sqrt(x)\n\nReturn the square root of x.") FUNC1(tan, tan, "tan(x)\n\nReturn the tangent of x (measured in radians).") FUNC1(tanh, tanh, "tanh(x)\n\nReturn the hyperbolic tangent of x.") static PyObject * math_frexp(PyObject *self, PyObject *args) { double x; int i; if (! PyArg_ParseTuple(args, "d:frexp", &x)) return NULL; errno = 0; x = frexp(x, &i); Py_SET_ERANGE_IF_OVERFLOW(x); if (errno && is_error(x)) return NULL; else return Py_BuildValue("(di)", x, i); } PyDoc_STRVAR(math_frexp_doc, "frexp(x)\n" "\n" "Return the mantissa and exponent of x, as pair (m, e).\n" "m is a float and e is an int, such that x = m * 2.**e.\n" "If x is 0, m and e are both 0. Else 0.5 <= abs(m) < 1.0."); static PyObject * math_ldexp(PyObject *self, PyObject *args) { double x; int exp; if (! PyArg_ParseTuple(args, "di:ldexp", &x, &exp)) return NULL; errno = 0; PyFPE_START_PROTECT("ldexp", return 0) x = ldexp(x, exp); PyFPE_END_PROTECT(x) Py_SET_ERANGE_IF_OVERFLOW(x); if (errno && is_error(x)) return NULL; else return PyFloat_FromDouble(x); } PyDoc_STRVAR(math_ldexp_doc, "ldexp(x, i) -> x * (2**i)"); static PyObject * math_modf(PyObject *self, PyObject *args) { double x, y; if (! PyArg_ParseTuple(args, "d:modf", &x)) return NULL; errno = 0; #ifdef MPW /* MPW C modf expects pointer to extended as second argument */ { extended e; x = modf(x, &e); y = e; } #else x = modf(x, &y); #endif Py_SET_ERANGE_IF_OVERFLOW(x); if (errno && is_error(x)) return NULL; else return Py_BuildValue("(dd)", x, y); } PyDoc_STRVAR(math_modf_doc, "modf(x)\n" "\n" "Return the fractional and integer parts of x. Both results carry the sign\n" "of x. The integer part is returned as a real."); /* A decent logarithm is easy to compute even for huge longs, but libm can't do that by itself -- loghelper can. func is log or log10, and name is "log" or "log10". Note that overflow isn't possible: a long can contain no more than INT_MAX * SHIFT bits, so has value certainly less than 2**(2**64 * 2**16) == 2**2**80, and log2 of that is 2**80, which is small enough to fit in an IEEE single. log and log10 are even smaller. */ static PyObject* loghelper(PyObject* args, double (*func)(double), char *format, PyObject *arg) { /* If it is long, do it ourselves. */ if (PyLong_Check(arg)) { double x; int e; x = _PyLong_AsScaledDouble(arg, &e); if (x <= 0.0) { PyErr_SetString(PyExc_ValueError, "math domain error"); return NULL; } /* Value is ~= x * 2**(e*SHIFT), so the log ~= log(x) + log(2) * e * SHIFT. CAUTION: e*SHIFT may overflow using int arithmetic, so force use of double. */ x = func(x) + (e * (double)SHIFT) * func(2.0); return PyFloat_FromDouble(x); } /* Else let libm handle it by itself. */ return math_1(args, func, format); } static PyObject * math_log(PyObject *self, PyObject *args) { PyObject *arg; PyObject *base = NULL; PyObject *num, *den; PyObject *ans; PyObject *newargs; if (!PyArg_UnpackTuple(args, "log", 1, 2, &arg, &base)) return NULL; if (base == NULL) return loghelper(args, log, "d:log", arg); newargs = PyTuple_New(1); if (newargs == NULL) return NULL; Py_INCREF(arg); PyTuple_SET_ITEM(newargs, 0, arg); num = loghelper(newargs, log, "d:log", arg); Py_DECREF(newargs); if (num == NULL) return NULL; newargs = PyTuple_New(1); if (newargs == NULL) { Py_DECREF(num); return NULL; } Py_INCREF(base); PyTuple_SET_ITEM(newargs, 0, base); den = loghelper(newargs, log, "d:log", base); Py_DECREF(newargs); if (den == NULL) { Py_DECREF(num); return NULL; } ans = PyNumber_Divide(num, den); Py_DECREF(num); Py_DECREF(den); return ans; } PyDoc_STRVAR(math_log_doc, "log(x[, base]) -> the logarithm of x to the given base.\n\ If the base not specified, returns the natural logarithm (base e) of x."); static PyObject * math_log10(PyObject *self, PyObject *args) { PyObject *arg; if (!PyArg_UnpackTuple(args, "log10", 1, 1, &arg)) return NULL; return loghelper(args, log10, "d:log10", arg); } PyDoc_STRVAR(math_log10_doc, "log10(x) -> the base 10 logarithm of x."); static const double degToRad = 3.141592653589793238462643383 / 180.0; static PyObject * math_degrees(PyObject *self, PyObject *args) { double x; if (! PyArg_ParseTuple(args, "d:degrees", &x)) return NULL; return PyFloat_FromDouble(x / degToRad); } PyDoc_STRVAR(math_degrees_doc, "degrees(x) -> converts angle x from radians to degrees"); static PyObject * math_radians(PyObject *self, PyObject *args) { double x; if (! PyArg_ParseTuple(args, "d:radians", &x)) return NULL; return PyFloat_FromDouble(x * degToRad); } PyDoc_STRVAR(math_radians_doc, "radians(x) -> converts angle x from degrees to radians"); static PyMethodDef math_methods[] = { {"acos", math_acos, METH_VARARGS, math_acos_doc}, {"asin", math_asin, METH_VARARGS, math_asin_doc}, {"atan", math_atan, METH_VARARGS, math_atan_doc}, {"atan2", math_atan2, METH_VARARGS, math_atan2_doc}, {"ceil", math_ceil, METH_VARARGS, math_ceil_doc}, {"cos", math_cos, METH_VARARGS, math_cos_doc}, {"cosh", math_cosh, METH_VARARGS, math_cosh_doc}, {"degrees", math_degrees, METH_VARARGS, math_degrees_doc}, {"exp", math_exp, METH_VARARGS, math_exp_doc}, {"fabs", math_fabs, METH_VARARGS, math_fabs_doc}, {"floor", math_floor, METH_VARARGS, math_floor_doc}, {"fmod", math_fmod, METH_VARARGS, math_fmod_doc}, {"frexp", math_frexp, METH_VARARGS, math_frexp_doc}, {"hypot", math_hypot, METH_VARARGS, math_hypot_doc}, {"ldexp", math_ldexp, METH_VARARGS, math_ldexp_doc}, {"log", math_log, METH_VARARGS, math_log_doc}, {"log10", math_log10, METH_VARARGS, math_log10_doc}, {"modf", math_modf, METH_VARARGS, math_modf_doc}, {"pow", math_pow, METH_VARARGS, math_pow_doc}, {"radians", math_radians, METH_VARARGS, math_radians_doc}, {"sin", math_sin, METH_VARARGS, math_sin_doc}, {"sinh", math_sinh, METH_VARARGS, math_sinh_doc}, {"sqrt", math_sqrt, METH_VARARGS, math_sqrt_doc}, {"tan", math_tan, METH_VARARGS, math_tan_doc}, {"tanh", math_tanh, METH_VARARGS, math_tanh_doc}, {NULL, NULL} /* sentinel */ }; PyDoc_STRVAR(module_doc, "This module is always available. It provides access to the\n" "mathematical functions defined by the C standard."); PyMODINIT_FUNC initmath(void) { PyObject *m, *d, *v; m = Py_InitModule3("math", math_methods, module_doc); d = PyModule_GetDict(m); if (!(v = PyFloat_FromDouble(atan(1.0) * 4.0))) goto finally; if (PyDict_SetItemString(d, "pi", v) < 0) goto finally; Py_DECREF(v); if (!(v = PyFloat_FromDouble(exp(1.0)))) goto finally; if (PyDict_SetItemString(d, "e", v) < 0) goto finally; Py_DECREF(v); finally: return; } Python-2.3.7/Modules/operator.c0000644001241000117560000002126207612360654015673 0ustar loewishpifb6 #include "Python.h" PyDoc_STRVAR(operator_doc, "Operator interface.\n\ \n\ This module exports a set of functions implemented in C corresponding\n\ to the intrinsic operators of Python. For example, operator.add(x, y)\n\ is equivalent to the expression x+y. The function names are those\n\ used for special class methods; variants without leading and trailing\n\ '__' are also provided for convenience."); #define spam1(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a1) { \ return AOP(a1); } #define spam2(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a) { \ PyObject *a1, *a2; \ if(! PyArg_UnpackTuple(a,#OP,2,2,&a1,&a2)) return NULL; \ return AOP(a1,a2); } #define spamoi(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a) { \ PyObject *a1; int a2; \ if(! PyArg_ParseTuple(a,"Oi:" #OP,&a1,&a2)) return NULL; \ return AOP(a1,a2); } #define spam2n(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a) { \ PyObject *a1, *a2; \ if(! PyArg_UnpackTuple(a,#OP,2,2,&a1,&a2)) return NULL; \ if(-1 == AOP(a1,a2)) return NULL; \ Py_INCREF(Py_None); \ return Py_None; } #define spam3n(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a) { \ PyObject *a1, *a2, *a3; \ if(! PyArg_UnpackTuple(a,#OP,3,3,&a1,&a2,&a3)) return NULL; \ if(-1 == AOP(a1,a2,a3)) return NULL; \ Py_INCREF(Py_None); \ return Py_None; } #define spami(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a1) { \ long r; \ if(-1 == (r=AOP(a1))) return NULL; \ return PyBool_FromLong(r); } #define spami2(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a) { \ PyObject *a1, *a2; long r; \ if(! PyArg_UnpackTuple(a,#OP,2,2,&a1,&a2)) return NULL; \ if(-1 == (r=AOP(a1,a2))) return NULL; \ return PyInt_FromLong(r); } #define spami2b(OP,AOP) static PyObject *OP(PyObject *s, PyObject *a) { \ PyObject *a1, *a2; long r; \ if(! PyArg_UnpackTuple(a,#OP,2,2,&a1,&a2)) return NULL; \ if(-1 == (r=AOP(a1,a2))) return NULL; \ return PyBool_FromLong(r); } #define spamrc(OP,A) static PyObject *OP(PyObject *s, PyObject *a) { \ PyObject *a1, *a2; \ if(! PyArg_UnpackTuple(a,#OP,2,2,&a1,&a2)) return NULL; \ return PyObject_RichCompare(a1,a2,A); } spami(isCallable , PyCallable_Check) spami(isNumberType , PyNumber_Check) spami(truth , PyObject_IsTrue) spam2(op_add , PyNumber_Add) spam2(op_sub , PyNumber_Subtract) spam2(op_mul , PyNumber_Multiply) spam2(op_div , PyNumber_Divide) spam2(op_floordiv , PyNumber_FloorDivide) spam2(op_truediv , PyNumber_TrueDivide) spam2(op_mod , PyNumber_Remainder) spam1(op_neg , PyNumber_Negative) spam1(op_pos , PyNumber_Positive) spam1(op_abs , PyNumber_Absolute) spam1(op_inv , PyNumber_Invert) spam1(op_invert , PyNumber_Invert) spam2(op_lshift , PyNumber_Lshift) spam2(op_rshift , PyNumber_Rshift) spami(op_not_ , PyObject_Not) spam2(op_and_ , PyNumber_And) spam2(op_xor , PyNumber_Xor) spam2(op_or_ , PyNumber_Or) spami(isSequenceType , PySequence_Check) spam2(op_concat , PySequence_Concat) spamoi(op_repeat , PySequence_Repeat) spami2b(op_contains , PySequence_Contains) spami2b(sequenceIncludes, PySequence_Contains) spami2(indexOf , PySequence_Index) spami2(countOf , PySequence_Count) spami(isMappingType , PyMapping_Check) spam2(op_getitem , PyObject_GetItem) spam2n(op_delitem , PyObject_DelItem) spam3n(op_setitem , PyObject_SetItem) spamrc(op_lt , Py_LT) spamrc(op_le , Py_LE) spamrc(op_eq , Py_EQ) spamrc(op_ne , Py_NE) spamrc(op_gt , Py_GT) spamrc(op_ge , Py_GE) static PyObject* op_pow(PyObject *s, PyObject *a) { PyObject *a1, *a2; if (PyArg_UnpackTuple(a,"pow", 2, 2, &a1, &a2)) return PyNumber_Power(a1, a2, Py_None); return NULL; } static PyObject* is_(PyObject *s, PyObject *a) { PyObject *a1, *a2, *result = NULL; if (PyArg_UnpackTuple(a,"is_", 2, 2, &a1, &a2)) { result = (a1 == a2) ? Py_True : Py_False; Py_INCREF(result); } return result; } static PyObject* is_not(PyObject *s, PyObject *a) { PyObject *a1, *a2, *result = NULL; if (PyArg_UnpackTuple(a,"is_not", 2, 2, &a1, &a2)) { result = (a1 != a2) ? Py_True : Py_False; Py_INCREF(result); } return result; } static PyObject* op_getslice(PyObject *s, PyObject *a) { PyObject *a1; int a2,a3; if (!PyArg_ParseTuple(a,"Oii:getslice",&a1,&a2,&a3)) return NULL; return PySequence_GetSlice(a1,a2,a3); } static PyObject* op_setslice(PyObject *s, PyObject *a) { PyObject *a1, *a4; int a2,a3; if (!PyArg_ParseTuple(a,"OiiO:setslice",&a1,&a2,&a3,&a4)) return NULL; if (-1 == PySequence_SetSlice(a1,a2,a3,a4)) return NULL; Py_INCREF(Py_None); return Py_None; } static PyObject* op_delslice(PyObject *s, PyObject *a) { PyObject *a1; int a2,a3; if(! PyArg_ParseTuple(a,"Oii:delslice",&a1,&a2,&a3)) return NULL; if (-1 == PySequence_DelSlice(a1,a2,a3)) return NULL; Py_INCREF(Py_None); return Py_None; } #undef spam1 #undef spam2 #undef spam1o #undef spam1o #define spam1(OP,DOC) {#OP, OP, METH_VARARGS, PyDoc_STR(DOC)}, #define spam2(OP,ALTOP,DOC) {#OP, op_##OP, METH_VARARGS, DOC}, \ {#ALTOP, op_##OP, METH_VARARGS, PyDoc_STR(DOC)}, #define spam1o(OP,DOC) {#OP, OP, METH_O, PyDoc_STR(DOC)}, #define spam2o(OP,ALTOP,DOC) {#OP, op_##OP, METH_O, DOC}, \ {#ALTOP, op_##OP, METH_O, PyDoc_STR(DOC)}, static struct PyMethodDef operator_methods[] = { spam1o(isCallable, "isCallable(a) -- Same as callable(a).") spam1o(isNumberType, "isNumberType(a) -- Return True if a has a numeric type, False otherwise.") spam1o(isSequenceType, "isSequenceType(a) -- Return True if a has a sequence type, False otherwise.") spam1o(truth, "truth(a) -- Return True if a is true, False otherwise.") spam2(contains,__contains__, "contains(a, b) -- Same as b in a (note reversed operands).") spam1(sequenceIncludes, "sequenceIncludes(a, b) -- Same as b in a (note reversed operands; deprecated).") spam1(indexOf, "indexOf(a, b) -- Return the first index of b in a.") spam1(countOf, "countOf(a, b) -- Return the number of times b occurs in a.") spam1o(isMappingType, "isMappingType(a) -- Return True if a has a mapping type, False otherwise.") spam1(is_, "is_(a, b) -- Same as a is b.") spam1(is_not, "is_not(a, b) -- Same as a is not b.") spam2(add,__add__, "add(a, b) -- Same as a + b.") spam2(sub,__sub__, "sub(a, b) -- Same as a - b.") spam2(mul,__mul__, "mul(a, b) -- Same as a * b.") spam2(div,__div__, "div(a, b) -- Same as a / b when __future__.division is not in effect.") spam2(floordiv,__floordiv__, "floordiv(a, b) -- Same as a // b.") spam2(truediv,__truediv__, "truediv(a, b) -- Same as a / b when __future__.division is in effect.") spam2(mod,__mod__, "mod(a, b) -- Same as a % b.") spam2o(neg,__neg__, "neg(a) -- Same as -a.") spam2o(pos,__pos__, "pos(a) -- Same as +a.") spam2o(abs,__abs__, "abs(a) -- Same as abs(a).") spam2o(inv,__inv__, "inv(a) -- Same as ~a.") spam2o(invert,__invert__, "invert(a) -- Same as ~a.") spam2(lshift,__lshift__, "lshift(a, b) -- Same as a << b.") spam2(rshift,__rshift__, "rshift(a, b) -- Same as a >> b.") spam2o(not_,__not__, "not_(a) -- Same as not a.") spam2(and_,__and__, "and_(a, b) -- Same as a & b.") spam2(xor,__xor__, "xor(a, b) -- Same as a ^ b.") spam2(or_,__or__, "or_(a, b) -- Same as a | b.") spam2(concat,__concat__, "concat(a, b) -- Same as a + b, for a and b sequences.") spam2(repeat,__repeat__, "repeat(a, b) -- Return a * b, where a is a sequence, and b is an integer.") spam2(getitem,__getitem__, "getitem(a, b) -- Same as a[b].") spam2(setitem,__setitem__, "setitem(a, b, c) -- Same as a[b] = c.") spam2(delitem,__delitem__, "delitem(a, b) -- Same as del a[b].") spam2(pow,__pow__, "pow(a, b) -- Same as a**b.") spam2(getslice,__getslice__, "getslice(a, b, c) -- Same as a[b:c].") spam2(setslice,__setslice__, "setslice(a, b, c, d) -- Same as a[b:c] = d.") spam2(delslice,__delslice__, "delslice(a, b, c) -- Same as del a[b:c].") spam2(lt,__lt__, "lt(a, b) -- Same as ab.") spam2(ge,__ge__, "ge(a, b) -- Same as a>=b.") {NULL, NULL} /* sentinel */ }; /* Initialization function for the module (*must* be called initoperator) */ PyMODINIT_FUNC initoperator(void) { /* Create the module and add the functions */ Py_InitModule4("operator", operator_methods, operator_doc, (PyObject*)NULL, PYTHON_API_VERSION); } Python-2.3.7/Modules/imgfile.c0000644001241000117560000002540307451627240015453 0ustar loewishpifb6 /* IMGFILE module - Interface to sgi libimage */ /* XXX This module should be done better at some point. It should return ** an object of image file class, and have routines to manipulate these ** image files in a neater way (so you can get rgb images off a greyscale ** file, for instance, or do a straight display without having to get the ** image bits into python, etc). ** ** Warning: this module is very non-reentrant (esp. the readscaled stuff) */ #include "Python.h" #include #include "/usr/people/4Dgifts/iristools/include/izoom.h" /* Bunch of missing extern decls; keep gcc -Wall happy... */ extern void i_seterror(); extern void iclose(); extern void filterzoom(); extern void putrow(); extern void getrow(); static PyObject * ImgfileError; /* Exception we raise for various trouble */ static int top_to_bottom; /* True if we want top-to-bottom images */ /* The image library does not always call the error hander :-(, therefore we have a global variable indicating that it was called. It is cleared by imgfile_open(). */ static int error_called; /* The error handler */ static void imgfile_error(char *str) { PyErr_SetString(ImgfileError, str); error_called = 1; return; /* To imglib, which will return a failure indicator */ } /* Open an image file and return a pointer to it. Make sure we raise an exception if we fail. */ static IMAGE * imgfile_open(char *fname) { IMAGE *image; i_seterror(imgfile_error); error_called = 0; errno = 0; if ( (image = iopen(fname, "r")) == NULL ) { /* Error may already be set by imgfile_error */ if ( !error_called ) { if (errno) PyErr_SetFromErrno(ImgfileError); else PyErr_SetString(ImgfileError, "Can't open image file"); } return NULL; } return image; } static PyObject * imgfile_ttob(PyObject *self, PyObject *args) { int newval; PyObject *rv; if (!PyArg_ParseTuple(args, "i:ttob", &newval)) return NULL; rv = PyInt_FromLong(top_to_bottom); top_to_bottom = newval; return rv; } static PyObject * imgfile_read(PyObject *self, PyObject *args) { char *fname; PyObject *rv; int xsize, ysize, zsize; char *cdatap; long *idatap; static short rs[8192], gs[8192], bs[8192]; int x, y; IMAGE *image; int yfirst, ylast, ystep; if ( !PyArg_ParseTuple(args, "s:read", &fname) ) return NULL; if ( (image = imgfile_open(fname)) == NULL ) return NULL; if ( image->colormap != CM_NORMAL ) { iclose(image); PyErr_SetString(ImgfileError, "Can only handle CM_NORMAL images"); return NULL; } if ( BPP(image->type) != 1 ) { iclose(image); PyErr_SetString(ImgfileError, "Can't handle imgfiles with bpp!=1"); return NULL; } xsize = image->xsize; ysize = image->ysize; zsize = image->zsize; if ( zsize != 1 && zsize != 3) { iclose(image); PyErr_SetString(ImgfileError, "Can only handle 1 or 3 byte pixels"); return NULL; } if ( xsize > 8192 ) { iclose(image); PyErr_SetString(ImgfileError, "Can't handle image with > 8192 columns"); return NULL; } if ( zsize == 3 ) zsize = 4; rv = PyString_FromStringAndSize((char *)NULL, xsize*ysize*zsize); if ( rv == NULL ) { iclose(image); return NULL; } cdatap = PyString_AsString(rv); idatap = (long *)cdatap; if (top_to_bottom) { yfirst = ysize-1; ylast = -1; ystep = -1; } else { yfirst = 0; ylast = ysize; ystep = 1; } for ( y=yfirst; y != ylast && !error_called; y += ystep ) { if ( zsize == 1 ) { getrow(image, rs, y, 0); for(x=0; x= 4; if ( !PyArg_ParseTuple(args, "sii|sd", &fname, &xwtd, &ywtd, &filter, &blur) ) return NULL; /* ** Check parameters, open file and check type, rows, etc. */ if ( extended ) { if ( strcmp(filter, "impulse") == 0 ) fmode = IMPULSE; else if ( strcmp( filter, "box") == 0 ) fmode = BOX; else if ( strcmp( filter, "triangle") == 0 ) fmode = TRIANGLE; else if ( strcmp( filter, "quadratic") == 0 ) fmode = QUADRATIC; else if ( strcmp( filter, "gaussian") == 0 ) fmode = GAUSSIAN; else { PyErr_SetString(ImgfileError, "Unknown filter type"); return NULL; } } if ( (image = imgfile_open(fname)) == NULL ) return NULL; if ( image->colormap != CM_NORMAL ) { iclose(image); PyErr_SetString(ImgfileError, "Can only handle CM_NORMAL images"); return NULL; } if ( BPP(image->type) != 1 ) { iclose(image); PyErr_SetString(ImgfileError, "Can't handle imgfiles with bpp!=1"); return NULL; } xsize = image->xsize; ysize = image->ysize; zsize = image->zsize; if ( zsize != 1 && zsize != 3) { iclose(image); PyErr_SetString(ImgfileError, "Can only handle 1 or 3 byte pixels"); return NULL; } if ( xsize > 8192 ) { iclose(image); PyErr_SetString(ImgfileError, "Can't handle image with > 8192 columns"); return NULL; } if ( zsize == 3 ) zsize = 4; rv = PyString_FromStringAndSize(NULL, xwtd*ywtd*zsize); if ( rv == NULL ) { iclose(image); return NULL; } PyFPE_START_PROTECT("readscaled", return 0) xfac = (float)xsize/(float)xwtd; yfac = (float)ysize/(float)ywtd; PyFPE_END_PROTECT(yfac) cdatap = PyString_AsString(rv); idatap = (long *)cdatap; if ( extended ) { xscale(image, xsize, ysize, zsize, idatap, xwtd, ywtd, fmode, blur); } else { if (top_to_bottom) { yfirst = ywtd-1; ylast = -1; ystep = -1; } else { yfirst = 0; ylast = ywtd; ystep = 1; } for ( y=yfirst; y != ylast && !error_called; y += ystep ) { yorig = (int)(y*yfac); if ( zsize == 1 ) { getrow(image, rs, yorig, 0); for(x=0; xxsize, image->ysize, image->zsize); iclose(image); return rv; } static PyObject * imgfile_write(PyObject *self, PyObject *args) { IMAGE *image; char *fname; int xsize, ysize, zsize, len; char *cdatap; long *idatap; short rs[8192], gs[8192], bs[8192]; short r, g, b; long rgb; int x, y; int yfirst, ylast, ystep; if ( !PyArg_ParseTuple(args, "ss#iii:write", &fname, &cdatap, &len, &xsize, &ysize, &zsize) ) return NULL; if ( zsize != 1 && zsize != 3 ) { PyErr_SetString(ImgfileError, "Can only handle 1 or 3 byte pixels"); return NULL; } if ( len != xsize * ysize * (zsize == 1 ? 1 : 4) ) { PyErr_SetString(ImgfileError, "Data does not match sizes"); return NULL; } if ( xsize > 8192 ) { PyErr_SetString(ImgfileError, "Can't handle image with > 8192 columns"); return NULL; } error_called = 0; errno = 0; image =iopen(fname, "w", RLE(1), 3, xsize, ysize, zsize); if ( image == 0 ) { if ( ! error_called ) { if (errno) PyErr_SetFromErrno(ImgfileError); else PyErr_SetString(ImgfileError, "Can't create image file"); } return NULL; } idatap = (long *)cdatap; if (top_to_bottom) { yfirst = ysize-1; ylast = -1; ystep = -1; } else { yfirst = 0; ylast = ysize; ystep = 1; } for ( y=yfirst; y != ylast && !error_called; y += ystep ) { if ( zsize == 1 ) { for( x=0; x> 8 ) & 0xff; b = (rgb >> 16 ) & 0xff; rs[x] = r; gs[x] = g; bs[x] = b; } putrow(image, rs, y, 0); putrow(image, gs, y, 1); putrow(image, bs, y, 2); } } iclose(image); if ( error_called ) return NULL; Py_INCREF(Py_None); return Py_None; } static PyMethodDef imgfile_methods[] = { { "getsizes", imgfile_getsizes, METH_VARARGS }, { "read", imgfile_read, METH_VARARGS }, { "readscaled", imgfile_readscaled, METH_VARARGS}, { "write", imgfile_write, METH_VARARGS }, { "ttob", imgfile_ttob, METH_VARARGS }, { NULL, NULL } /* Sentinel */ }; void initimgfile(void) { PyObject *m, *d; m = Py_InitModule("imgfile", imgfile_methods); d = PyModule_GetDict(m); ImgfileError = PyErr_NewException("imgfile.error", NULL, NULL); if (ImgfileError != NULL) PyDict_SetItemString(d, "error", ImgfileError); } Python-2.3.7/pyconfig.h.in0000644001241000117560000006132710123003321014636 0ustar loewishpifb6/* pyconfig.h.in. Generated from configure.in by autoheader. */ #ifndef Py_PYCONFIG_H #define Py_PYCONFIG_H /* Define for AIX if your compiler is a genuine IBM xlC/xlC_r and you want support for AIX C++ shared extension modules. */ #undef AIX_GENUINE_CPLUSPLUS /* Define this if you have AtheOS threads. */ #undef ATHEOS_THREADS /* Define if your contains bad prototypes for exec*() (as it does on SGI IRIX 4.x) */ #undef BAD_EXEC_PROTOTYPES /* Define this if you have BeOS threads. */ #undef BEOS_THREADS /* Define if you have the Mach cthreads package */ #undef C_THREADS /* Define if --enable-ipv6 is specified */ #undef ENABLE_IPV6 /* Define if getpgrp() must be called as getpgrp(0). */ #undef GETPGRP_HAVE_ARG /* Define if gettimeofday() does not have second (timezone) argument This is the case on Motorola V4 (R40V4.2) */ #undef GETTIMEOFDAY_NO_TZ /* struct addrinfo (netdb.h) */ #undef HAVE_ADDRINFO /* Define to 1 if you have the `alarm' function. */ #undef HAVE_ALARM /* Define this if your time.h defines altzone. */ #undef HAVE_ALTZONE /* Define if nice() returns success/failure instead of the new priority. */ #undef HAVE_BROKEN_NICE /* Define if poll() sets errno on invalid file descriptors. */ #undef HAVE_BROKEN_POLL /* Define if the Posix semaphores do not work on your system */ #undef HAVE_BROKEN_POSIX_SEMAPHORES /* Define if pthread_sigmask() does not work on your system. */ #undef HAVE_BROKEN_PTHREAD_SIGMASK /* Define to 1 if you have the `chown' function. */ #undef HAVE_CHOWN /* Define if you have the 'chroot' function. */ #undef HAVE_CHROOT /* Define to 1 if you have the `clock' function. */ #undef HAVE_CLOCK /* Define to 1 if you have the `confstr' function. */ #undef HAVE_CONFSTR /* Define to 1 if you have the `ctermid' function. */ #undef HAVE_CTERMID /* Define if you have the 'ctermid_r' function. */ #undef HAVE_CTERMID_R /* Define to 1 if you have the header file. */ #undef HAVE_CURSES_H /* Define to 1 if you have the device macros. */ #undef HAVE_DEVICE_MACROS /* Define if we have /dev/ptc. */ #undef HAVE_DEV_PTC /* Define if we have /dev/ptmx. */ #undef HAVE_DEV_PTMX /* Define to 1 if you have the header file, and it defines `DIR'. */ #undef HAVE_DIRENT_H /* Define to 1 if you have the header file. */ #undef HAVE_DLFCN_H /* Define to 1 if you have the `dlopen' function. */ #undef HAVE_DLOPEN /* Define to 1 if you have the `dup2' function. */ #undef HAVE_DUP2 /* Defined when any dynamic module loading is enabled. */ #undef HAVE_DYNAMIC_LOADING /* Define to 1 if you have the `execv' function. */ #undef HAVE_EXECV /* Define if you have the 'fchdir' function. */ #undef HAVE_FCHDIR /* Define to 1 if you have the header file. */ #undef HAVE_FCNTL_H /* Define if you have the 'fdatasync' function. */ #undef HAVE_FDATASYNC /* Define if you have the 'flock' function. */ #undef HAVE_FLOCK /* Define to 1 if you have the `fork' function. */ #undef HAVE_FORK /* Define to 1 if you have the `forkpty' function. */ #undef HAVE_FORKPTY /* Define to 1 if you have the `fpathconf' function. */ #undef HAVE_FPATHCONF /* Define to 1 if you have the `fseek64' function. */ #undef HAVE_FSEEK64 /* Define to 1 if you have the `fseeko' function. */ #undef HAVE_FSEEKO /* Define to 1 if you have the `fstatvfs' function. */ #undef HAVE_FSTATVFS /* Define if you have the 'fsync' function. */ #undef HAVE_FSYNC /* Define to 1 if you have the `ftell64' function. */ #undef HAVE_FTELL64 /* Define to 1 if you have the `ftello' function. */ #undef HAVE_FTELLO /* Define to 1 if you have the `ftime' function. */ #undef HAVE_FTIME /* Define to 1 if you have the `ftruncate' function. */ #undef HAVE_FTRUNCATE /* Define to 1 if you have the `gai_strerror' function. */ #undef HAVE_GAI_STRERROR /* Define if you have the getaddrinfo function. */ #undef HAVE_GETADDRINFO /* Define to 1 if you have the `getcwd' function. */ #undef HAVE_GETCWD /* Define this if you have flockfile(), getc_unlocked(), and funlockfile() */ #undef HAVE_GETC_UNLOCKED /* Define to 1 if you have the `getgroups' function. */ #undef HAVE_GETGROUPS /* Define to 1 if you have the `gethostbyname' function. */ #undef HAVE_GETHOSTBYNAME /* Define this if you have some version of gethostbyname_r() */ #undef HAVE_GETHOSTBYNAME_R /* Define this if you have the 3-arg version of gethostbyname_r(). */ #undef HAVE_GETHOSTBYNAME_R_3_ARG /* Define this if you have the 5-arg version of gethostbyname_r(). */ #undef HAVE_GETHOSTBYNAME_R_5_ARG /* Define this if you have the 6-arg version of gethostbyname_r(). */ #undef HAVE_GETHOSTBYNAME_R_6_ARG /* Define to 1 if you have the `getloadavg' function. */ #undef HAVE_GETLOADAVG /* Define to 1 if you have the `getlogin' function. */ #undef HAVE_GETLOGIN /* Define to 1 if you have the `getnameinfo' function. */ #undef HAVE_GETNAMEINFO /* Define if you have the 'getpagesize' function. */ #undef HAVE_GETPAGESIZE /* Define to 1 if you have the `getpeername' function. */ #undef HAVE_GETPEERNAME /* Define to 1 if you have the `getpgid' function. */ #undef HAVE_GETPGID /* Define to 1 if you have the `getpgrp' function. */ #undef HAVE_GETPGRP /* Define to 1 if you have the `getpid' function. */ #undef HAVE_GETPID /* Define to 1 if you have the `getpriority' function. */ #undef HAVE_GETPRIORITY /* Define to 1 if you have the `getpwent' function. */ #undef HAVE_GETPWENT /* Define to 1 if you have the `gettimeofday' function. */ #undef HAVE_GETTIMEOFDAY /* Define to 1 if you have the `getwd' function. */ #undef HAVE_GETWD /* Define to 1 if you have the header file. */ #undef HAVE_GRP_H /* Define if you have the 'hstrerror' function. */ #undef HAVE_HSTRERROR /* Define to 1 if you have the `hypot' function. */ #undef HAVE_HYPOT /* Define if you have the 'inet_aton' function. */ #undef HAVE_INET_ATON /* Define if you have the 'inet_pton' function. */ #undef HAVE_INET_PTON /* Define to 1 if you have the header file. */ #undef HAVE_INTTYPES_H /* Define to 1 if you have the `kill' function. */ #undef HAVE_KILL /* Define to 1 if you have the `killpg' function. */ #undef HAVE_KILLPG /* Define to 1 if you have the header file. */ #undef HAVE_LANGINFO_H /* Defined to enable large file support when an off_t is bigger than a long and long long is available and at least as big as an off_t. You may need to add some flags for configuration and compilation to enable this mode. (For Solaris and Linux, the necessary defines are already defined.) */ #undef HAVE_LARGEFILE_SUPPORT /* Define to 1 if you have the `lchown' function. */ #undef HAVE_LCHOWN /* Define to 1 if you have the `dl' library (-ldl). */ #undef HAVE_LIBDL /* Define to 1 if you have the `dld' library (-ldld). */ #undef HAVE_LIBDLD /* Define to 1 if you have the `ieee' library (-lieee). */ #undef HAVE_LIBIEEE /* Define to 1 if you have the header file. */ #undef HAVE_LIBINTL_H /* Define to 1 if you have the `resolv' library (-lresolv). */ #undef HAVE_LIBRESOLV /* Define to 1 if you have the header file. */ #undef HAVE_LIBUTIL_H /* Define to 1 if you have the header file. */ #undef HAVE_LIMITS_H /* Define if you have the 'link' function. */ #undef HAVE_LINK /* Define to 1 if you have the header file. */ #undef HAVE_LOCALE_H /* Define this if you have the type long long. */ #undef HAVE_LONG_LONG /* Define to 1 if you have the `lstat' function. */ #undef HAVE_LSTAT /* Define this if you have the makedev macro. */ #undef HAVE_MAKEDEV /* Define to 1 if you have the `memmove' function. */ #undef HAVE_MEMMOVE /* Define to 1 if you have the header file. */ #undef HAVE_MEMORY_H /* Define to 1 if you have the `mkfifo' function. */ #undef HAVE_MKFIFO /* Define to 1 if you have the `mknod' function. */ #undef HAVE_MKNOD /* Define to 1 if you have the `mktime' function. */ #undef HAVE_MKTIME /* Define to 1 if you have the `mremap' function. */ #undef HAVE_MREMAP /* Define to 1 if you have the header file. */ #undef HAVE_NCURSES_H /* Define to 1 if you have the header file, and it defines `DIR'. */ #undef HAVE_NDIR_H /* Define to 1 if you have the header file. */ #undef HAVE_NETPACKET_PACKET_H /* Define to 1 if you have the `nice' function. */ #undef HAVE_NICE /* Define to 1 if you have the `openpty' function. */ #undef HAVE_OPENPTY /* Define to 1 if you have the `pathconf' function. */ #undef HAVE_PATHCONF /* Define to 1 if you have the `pause' function. */ #undef HAVE_PAUSE /* Define to 1 if you have the `plock' function. */ #undef HAVE_PLOCK /* Define to 1 if you have the `poll' function. */ #undef HAVE_POLL /* Define to 1 if you have the header file. */ #undef HAVE_POLL_H /* Define if your compiler supports function prototype */ #undef HAVE_PROTOTYPES /* Define if you have GNU PTH threads. */ #undef HAVE_PTH /* Defined for Solaris 2.6 bug in pthread header. */ #undef HAVE_PTHREAD_DESTRUCTOR /* Define to 1 if you have the header file. */ #undef HAVE_PTHREAD_H /* Define to 1 if you have the `pthread_init' function. */ #undef HAVE_PTHREAD_INIT /* Define to 1 if you have the `pthread_sigmask' function. */ #undef HAVE_PTHREAD_SIGMASK /* Define to 1 if you have the header file. */ #undef HAVE_PTY_H /* Define to 1 if you have the `putenv' function. */ #undef HAVE_PUTENV /* Define to 1 if you have the `readlink' function. */ #undef HAVE_READLINK /* Define to 1 if you have the `realpath' function. */ #undef HAVE_REALPATH /* Define if you have readline 2.2 */ #undef HAVE_RL_COMPLETION_APPEND_CHARACTER /* Define if you have readline 4.2 */ #undef HAVE_RL_COMPLETION_MATCHES /* Define if you have readline 4.0 */ #undef HAVE_RL_PRE_INPUT_HOOK /* Define to 1 if you have the `select' function. */ #undef HAVE_SELECT /* Define to 1 if you have the `setegid' function. */ #undef HAVE_SETEGID /* Define to 1 if you have the `seteuid' function. */ #undef HAVE_SETEUID /* Define to 1 if you have the `setgid' function. */ #undef HAVE_SETGID /* Define if you have the 'setgroups' function. */ #undef HAVE_SETGROUPS /* Define to 1 if you have the `setlocale' function. */ #undef HAVE_SETLOCALE /* Define to 1 if you have the `setpgid' function. */ #undef HAVE_SETPGID /* Define to 1 if you have the `setpgrp' function. */ #undef HAVE_SETPGRP /* Define to 1 if you have the `setregid' function. */ #undef HAVE_SETREGID /* Define to 1 if you have the `setreuid' function. */ #undef HAVE_SETREUID /* Define to 1 if you have the `setsid' function. */ #undef HAVE_SETSID /* Define to 1 if you have the `setuid' function. */ #undef HAVE_SETUID /* Define to 1 if you have the `setvbuf' function. */ #undef HAVE_SETVBUF /* Define to 1 if you have the `sigaction' function. */ #undef HAVE_SIGACTION /* Define to 1 if you have the `siginterrupt' function. */ #undef HAVE_SIGINTERRUPT /* Define to 1 if you have the header file. */ #undef HAVE_SIGNAL_H /* Define to 1 if you have the `sigrelse' function. */ #undef HAVE_SIGRELSE /* Define to 1 if you have the `snprintf' function. */ #undef HAVE_SNPRINTF /* Define if sockaddr has sa_len member */ #undef HAVE_SOCKADDR_SA_LEN /* struct sockaddr_storage (sys/socket.h) */ #undef HAVE_SOCKADDR_STORAGE /* Define to 1 if you have the `statvfs' function. */ #undef HAVE_STATVFS /* Define if you have struct stat.st_mtim.tv_nsec */ #undef HAVE_STAT_TV_NSEC /* Define to 1 if you have the header file. */ #undef HAVE_STDARG_H /* Define if your compiler supports variable length function prototypes (e.g. void fprintf(FILE *, char *, ...);) *and* */ #undef HAVE_STDARG_PROTOTYPES /* Define to 1 if you have the header file. */ #undef HAVE_STDDEF_H /* Define to 1 if you have the header file. */ #undef HAVE_STDINT_H /* Define to 1 if you have the header file. */ #undef HAVE_STDLIB_H /* Define to 1 if you have the `strdup' function. */ #undef HAVE_STRDUP /* Define to 1 if you have the `strerror' function. */ #undef HAVE_STRERROR /* Define to 1 if you have the `strftime' function. */ #undef HAVE_STRFTIME /* Define to 1 if you have the header file. */ #undef HAVE_STRINGS_H /* Define to 1 if you have the header file. */ #undef HAVE_STRING_H /* Define to 1 if you have the header file. */ #undef HAVE_STROPTS_H /* Define to 1 if you have the `strptime' function. */ #undef HAVE_STRPTIME /* Define to 1 if `st_blksize' is member of `struct stat'. */ #undef HAVE_STRUCT_STAT_ST_BLKSIZE /* Define to 1 if `st_blocks' is member of `struct stat'. */ #undef HAVE_STRUCT_STAT_ST_BLOCKS /* Define to 1 if `st_rdev' is member of `struct stat'. */ #undef HAVE_STRUCT_STAT_ST_RDEV /* Define to 1 if `tm_zone' is member of `struct tm'. */ #undef HAVE_STRUCT_TM_TM_ZONE /* Define to 1 if your `struct stat' has `st_blocks'. Deprecated, use `HAVE_STRUCT_STAT_ST_BLOCKS' instead. */ #undef HAVE_ST_BLOCKS /* Define if you have the 'symlink' function. */ #undef HAVE_SYMLINK /* Define to 1 if you have the `sysconf' function. */ #undef HAVE_SYSCONF /* Define to 1 if you have the header file. */ #undef HAVE_SYSEXITS_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_AUDIOIO_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_BSDTTY_H /* Define to 1 if you have the header file, and it defines `DIR'. */ #undef HAVE_SYS_DIR_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_FILE_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_LOCK_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_MKDEV_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_MODEM_H /* Define to 1 if you have the header file, and it defines `DIR'. */ #undef HAVE_SYS_NDIR_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_PARAM_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_POLL_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_RESOURCE_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_SELECT_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_SOCKET_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_STAT_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_TIMES_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_TIME_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_TYPES_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_UN_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_UTSNAME_H /* Define to 1 if you have the header file. */ #undef HAVE_SYS_WAIT_H /* Define to 1 if you have the `tcgetpgrp' function. */ #undef HAVE_TCGETPGRP /* Define to 1 if you have the `tcsetpgrp' function. */ #undef HAVE_TCSETPGRP /* Define to 1 if you have the `tempnam' function. */ #undef HAVE_TEMPNAM /* Define to 1 if you have the header file. */ #undef HAVE_TERMIOS_H /* Define to 1 if you have the header file. */ #undef HAVE_TERM_H /* Define to 1 if you have the header file. */ #undef HAVE_THREAD_H /* Define to 1 if you have the `timegm' function. */ #undef HAVE_TIMEGM /* Define to 1 if you have the `times' function. */ #undef HAVE_TIMES /* Define to 1 if you have the `tmpfile' function. */ #undef HAVE_TMPFILE /* Define to 1 if you have the `tmpnam' function. */ #undef HAVE_TMPNAM /* Define to 1 if you have the `tmpnam_r' function. */ #undef HAVE_TMPNAM_R /* Define to 1 if your `struct tm' has `tm_zone'. Deprecated, use `HAVE_STRUCT_TM_TM_ZONE' instead. */ #undef HAVE_TM_ZONE /* Define to 1 if you have the `truncate' function. */ #undef HAVE_TRUNCATE /* Define to 1 if you don't have `tm_zone' but do have the external array `tzname'. */ #undef HAVE_TZNAME /* Define this if you have tcl and TCL_UTF_MAX==6 */ #undef HAVE_UCS4_TCL /* Define this if you have the type uintptr_t. */ #undef HAVE_UINTPTR_T /* Define to 1 if you have the `uname' function. */ #undef HAVE_UNAME /* Define to 1 if you have the header file. */ #undef HAVE_UNISTD_H /* Define to 1 if you have the `unsetenv' function. */ #undef HAVE_UNSETENV /* Define if you have a useable wchar_t type defined in wchar.h; useable means wchar_t must be 16-bit unsigned type. (see Include/unicodeobject.h). */ #undef HAVE_USABLE_WCHAR_T /* Define to 1 if you have the `utimes' function. */ #undef HAVE_UTIMES /* Define to 1 if you have the header file. */ #undef HAVE_UTIME_H /* Define to 1 if you have the `waitpid' function. */ #undef HAVE_WAITPID /* Define if the compiler provides a wchar.h header file. */ #undef HAVE_WCHAR_H /* Define to 1 if you have the `wcscoll' function. */ #undef HAVE_WCSCOLL /* Define if tzset() actually switches the local timezone in a meaningful way. */ #undef HAVE_WORKING_TZSET /* Define to 1 if you have the `_getpty' function. */ #undef HAVE__GETPTY /* Define if you are using Mach cthreads directly under /include */ #undef HURD_C_THREADS /* Define if you are using Mach cthreads under mach / */ #undef MACH_C_THREADS /* Define to 1 if `major', `minor', and `makedev' are declared in . */ #undef MAJOR_IN_MKDEV /* Define to 1 if `major', `minor', and `makedev' are declared in . */ #undef MAJOR_IN_SYSMACROS /* Define if mvwdelch in curses.h is an expression. */ #undef MVWDELCH_IS_EXPRESSION /* Define to the address where bug reports for this package should be sent. */ #undef PACKAGE_BUGREPORT /* Define to the full name of this package. */ #undef PACKAGE_NAME /* Define to the full name and version of this package. */ #undef PACKAGE_STRING /* Define to the one symbol short name of this package. */ #undef PACKAGE_TARNAME /* Define to the version of this package. */ #undef PACKAGE_VERSION /* Defined if PTHREAD_SCOPE_SYSTEM supported. */ #undef PTHREAD_SYSTEM_SCHED_SUPPORTED /* Define as the integral type used for Unicode representation. */ #undef PY_UNICODE_TYPE /* Define if you want to build an interpreter with many run-time checks. */ #undef Py_DEBUG /* Defined if Python is built as a shared library. */ #undef Py_ENABLE_SHARED /* Define as the size of the unicode type. */ #undef Py_UNICODE_SIZE /* Define if you want to have a Unicode type. */ #undef Py_USING_UNICODE /* Define as the return type of signal handlers (`int' or `void'). */ #undef RETSIGTYPE /* Define if setpgrp() must be called as setpgrp(0, 0). */ #undef SETPGRP_HAVE_ARG /* Define if i>>j for signed int i does not extend the sign bit when i < 0 */ #undef SIGNED_RIGHT_SHIFT_ZERO_FILLS /* The size of a `char', as computed by sizeof. */ #undef SIZEOF_CHAR /* The size of a `double', as computed by sizeof. */ #undef SIZEOF_DOUBLE /* The size of a `float', as computed by sizeof. */ #undef SIZEOF_FLOAT /* The size of a `fpos_t', as computed by sizeof. */ #undef SIZEOF_FPOS_T /* The size of a `int', as computed by sizeof. */ #undef SIZEOF_INT /* The size of a `long', as computed by sizeof. */ #undef SIZEOF_LONG /* The size of a `long long', as computed by sizeof. */ #undef SIZEOF_LONG_LONG /* The number of bytes in an off_t. */ #undef SIZEOF_OFF_T /* The number of bytes in a pthread_t. */ #undef SIZEOF_PTHREAD_T /* The size of a `short', as computed by sizeof. */ #undef SIZEOF_SHORT /* The number of bytes in a time_t. */ #undef SIZEOF_TIME_T /* The size of a `uintptr_t', as computed by sizeof. */ #undef SIZEOF_UINTPTR_T /* The size of a `void *', as computed by sizeof. */ #undef SIZEOF_VOID_P /* The size of a `wchar_t', as computed by sizeof. */ #undef SIZEOF_WCHAR_T /* Define to 1 if you have the ANSI C header files. */ #undef STDC_HEADERS /* Define if you can safely include both and (which you can't on SCO ODT 3.0). */ #undef SYS_SELECT_WITH_SYS_TIME /* Define to 1 if you can safely include both and . */ #undef TIME_WITH_SYS_TIME /* Define to 1 if your declares `struct tm'. */ #undef TM_IN_SYS_TIME /* Define if you want to use MacPython modules on MacOSX in unix-Python. */ #undef USE_TOOLBOX_OBJECT_GLUE /* Define if a va_list is an array of some kind */ #undef VA_LIST_IS_ARRAY /* Define if you want SIGFPE handled (see Include/pyfpe.h). */ #undef WANT_SIGFPE_HANDLER /* Define if you want wctype.h functions to be used instead of the one supplied by Python itself. (see Include/unicodectype.h). */ #undef WANT_WCTYPE_FUNCTIONS /* Define if WINDOW in curses.h offers a field _flags. */ #undef WINDOW_HAS_FLAGS /* Define if you want to emulate SGI (IRIX 4) dynamic linking. This is rumoured to work on VAX (Ultrix), Sun3 (SunOS 3.4), Sequent Symmetry (Dynix), and Atari ST. This requires the 'dl-dld' library, ftp://ftp.cwi.nl/pub/dynload/dl-dld-1.1.tar.Z, as well as the 'GNU dld' library, ftp://ftp.cwi.nl/pub/dynload/dld-3.2.3.tar.Z. Do not bother on SunOS 4 or 5, they already have dynamic linking using shared libraries. */ #undef WITH_DL_DLD /* Define if you want documentation strings in extension modules */ #undef WITH_DOC_STRINGS /* Define if you want to use the new-style (Openstep, Rhapsody, MacOS) dynamic linker (dyld) instead of the old-style (NextStep) dynamic linker (rld). Dyld is necessary to support frameworks. */ #undef WITH_DYLD /* Define to 1 if libintl is needed for locale functions. */ #undef WITH_LIBINTL /* Define if you want to produce an OpenStep/Rhapsody framework (shared library plus accessory files). */ #undef WITH_NEXT_FRAMEWORK /* Define if you want to compile in Python-specific mallocs */ #undef WITH_PYMALLOC /* Define if you want to use SGI (IRIX 4) dynamic linking. This requires the "dl" library by Jack Jansen, ftp://ftp.cwi.nl/pub/dynload/dl-1.6.tar.Z. Do not bother on IRIX 5, it already has dynamic linking using SunOS style shared libraries */ #undef WITH_SGI_DL /* Define if you want to compile in rudimentary thread support */ #undef WITH_THREAD /* Define if you want to read files with foreign newlines. */ #undef WITH_UNIVERSAL_NEWLINES /* Define to 1 if your processor stores words with the most significant byte first (like Motorola and SPARC, unlike Intel and VAX). */ #undef WORDS_BIGENDIAN /* Define to 1 if on AIX 3. System headers sometimes define this. We just want to avoid a redefinition error message. */ #ifndef _ALL_SOURCE # undef _ALL_SOURCE #endif /* Define on Irix to enable u_int */ #undef _BSD_TYPES /* This must be set to 64 on some systems to enable large file support. */ #undef _FILE_OFFSET_BITS /* Define on Linux to activate all library features */ #undef _GNU_SOURCE /* This must be defined on some systems to enable large file support. */ #undef _LARGEFILE_SOURCE /* Define to 1 if on MINIX. */ #undef _MINIX /* Define on NetBSD to activate all library features */ #undef _NETBSD_SOURCE /* Define _OSF_SOURCE to get the makedev macro. */ #undef _OSF_SOURCE /* Define to 2 if the system does not provide POSIX.1 features except with this defined. */ #undef _POSIX_1_SOURCE /* Define to activate features from IEEE Stds 1003.1-2001 */ #undef _POSIX_C_SOURCE /* Define to 1 if you need to in order for `stat' and other things to work. */ #undef _POSIX_SOURCE /* Define if you have POSIX threads, and your system does not define that. */ #undef _POSIX_THREADS /* Define to force use of thread-safe errno, h_errno, and other functions */ #undef _REENTRANT /* Define to the level of X/Open that your system supports */ #undef _XOPEN_SOURCE /* Define to activate Unix95-and-earlier features */ #undef _XOPEN_SOURCE_EXTENDED /* Define on FreeBSD to activate all library features */ #undef __BSD_VISIBLE /* Define to 1 if type `char' is unsigned and you are not using gcc. */ #ifndef __CHAR_UNSIGNED__ # undef __CHAR_UNSIGNED__ #endif /* Defined on Solaris to see additional function prototypes. */ #undef __EXTENSIONS__ /* Define to 'long' if doesn't define. */ #undef clock_t /* Define to empty if `const' does not conform to ANSI C. */ #undef const /* Define to `int' if doesn't define. */ #undef gid_t /* Define to `int' if does not define. */ #undef mode_t /* Define to `long' if does not define. */ #undef off_t /* Define to `int' if does not define. */ #undef pid_t /* Define to empty if the keyword does not work. */ #undef signed /* Define to `unsigned' if does not define. */ #undef size_t /* Define to `int' if does not define. */ #undef socklen_t /* Define to `int' if doesn't define. */ #undef uid_t /* Define to empty if the keyword does not work. */ #undef volatile /* Define the macros needed if on a UnixWare 7.x system. */ #if defined(__USLC__) && defined(__SCO_VERSION__) #define STRICT_SYSV_CURSES /* Don't use ncurses extensions */ #endif #endif /*Py_PYCONFIG_H*/ Python-2.3.7/Demo/0000755001241000117560000000000010765544472013152 5ustar loewishpifb6Python-2.3.7/Demo/curses/0000755001241000117560000000000010765544471014455 5ustar loewishpifb6Python-2.3.7/Demo/curses/ncurses.py0000644001241000117560000001504307220746211016500 0ustar loewishpifb6#!/usr/bin/env python # # $Id: ncurses.py 18505 2000-12-22 21:50:01Z akuchling $ # # (n)curses exerciser in Python, an interactive test for the curses # module. Currently, only the panel demos are ported. import curses from curses import panel def wGetchar(win = None): if win == None: win = stdscr return win.getch() def Getchar(): wGetchar() # # Panels tester # def wait_a_while(): if nap_msec == 1: Getchar() else: curses.napms(nap_msec) def saywhat(text): stdscr.move(curses.LINES - 1, 0) stdscr.clrtoeol() stdscr.addstr(text) def mkpanel(color, rows, cols, tly, tlx): win = curses.newwin(rows, cols, tly, tlx) pan = panel.new_panel(win) if curses.has_colors(): if color == curses.COLOR_BLUE: fg = curses.COLOR_WHITE else: fg = curses.COLOR_BLACK bg = color curses.init_pair(color, fg, bg) win.bkgdset(ord(' '), curses.color_pair(color)) else: win.bkgdset(ord(' '), curses.A_BOLD) return pan def pflush(): panel.update_panels() curses.doupdate() def fill_panel(pan): win = pan.window() num = pan.userptr()[1] win.move(1, 1) win.addstr("-pan%c-" % num) win.clrtoeol() win.box() maxy, maxx = win.getmaxyx() for y in range(2, maxy - 1): for x in range(1, maxx - 1): win.move(y, x) win.addch(num) def demo_panels(win): global stdscr, nap_msec, mod stdscr = win nap_msec = 1 mod = ["test", "TEST", "(**)", "*()*", "<-->", "LAST"] stdscr.refresh() for y in range(0, curses.LINES - 1): for x in range(0, curses.COLS): stdscr.addstr("%d" % ((y + x) % 10)) for y in range(0, 1): p1 = mkpanel(curses.COLOR_RED, curses.LINES / 2 - 2, curses.COLS / 8 + 1, 0, 0) p1.set_userptr("p1") p2 = mkpanel(curses.COLOR_GREEN, curses.LINES / 2 + 1, curses.COLS / 7, curses.LINES / 4, curses.COLS / 10) p2.set_userptr("p2") p3 = mkpanel(curses.COLOR_YELLOW, curses.LINES / 4, curses.COLS / 10, curses.LINES / 2, curses.COLS / 9) p3.set_userptr("p3") p4 = mkpanel(curses.COLOR_BLUE, curses.LINES / 2 - 2, curses.COLS / 8, curses.LINES / 2 - 2, curses.COLS / 3) p4.set_userptr("p4") p5 = mkpanel(curses.COLOR_MAGENTA, curses.LINES / 2 - 2, curses.COLS / 8, curses.LINES / 2, curses.COLS / 2 - 2) p5.set_userptr("p5") fill_panel(p1) fill_panel(p2) fill_panel(p3) fill_panel(p4) fill_panel(p5) p4.hide() p5.hide() pflush() saywhat("press any key to continue") wait_a_while() saywhat("h3 s1 s2 s4 s5;press any key to continue") p1.move(0, 0) p3.hide() p1.show() p2.show() p4.show() p5.show() pflush() wait_a_while() saywhat("s1; press any key to continue") p1.show() pflush() wait_a_while() saywhat("s2; press any key to continue") p2.show() pflush() wait_a_while() saywhat("m2; press any key to continue") p2.move(curses.LINES / 3 + 1, curses.COLS / 8) pflush() wait_a_while() saywhat("s3; press any key to continue") p3.show() pflush() wait_a_while() saywhat("m3; press any key to continue") p3.move(curses.LINES / 4 + 1, curses.COLS / 15) pflush() wait_a_while() saywhat("b3; press any key to continue") p3.bottom() pflush() wait_a_while() saywhat("s4; press any key to continue") p4.show() pflush() wait_a_while() saywhat("s5; press any key to continue") p5.show() pflush() wait_a_while() saywhat("t3; press any key to continue") p3.top() pflush() wait_a_while() saywhat("t1; press any key to continue") p1.show() pflush() wait_a_while() saywhat("t2; press any key to continue") p2.show() pflush() wait_a_while() saywhat("t3; press any key to continue") p3.show() pflush() wait_a_while() saywhat("t4; press any key to continue") p4.show() pflush() wait_a_while() for itmp in range(0, 6): w4 = p4.window() w5 = p5.window() saywhat("m4; press any key to continue") w4.move(curses.LINES / 8, 1) w4.addstr(mod[itmp]) p4.move(curses.LINES / 6, itmp * curses.COLS / 8) w5.move(curses.LINES / 6, 1) w5.addstr(mod[itmp]) pflush() wait_a_while() saywhat("m5; press any key to continue") w4.move(curses.LINES / 6, 1) w4.addstr(mod[itmp]) p5.move(curses.LINES / 3 - 1, itmp * 10 + 6) w5.move(curses.LINES / 8, 1) w5.addstr(mod[itmp]) pflush() wait_a_while() saywhat("m4; press any key to continue") p4.move(curses.LINES / 6, (itmp + 1) * curses.COLS / 8) pflush() wait_a_while() saywhat("t5; press any key to continue") p5.top() pflush() wait_a_while() saywhat("t2; press any key to continue") p2.top() pflush() wait_a_while() saywhat("t1; press any key to continue") p1.top() pflush() wait_a_while() saywhat("d2; press any key to continue") del p2 pflush() wait_a_while() saywhat("h3; press any key to continue") p3.hide() pflush() wait_a_while() saywhat("d1; press any key to continue") del p1 pflush() wait_a_while() saywhat("d4; press any key to continue") del p4 pflush() wait_a_while() saywhat("d5; press any key to continue") del p5 pflush() wait_a_while() if nap_msec == 1: break nap_msec = 100 # # one fine day there'll be the menu at this place # curses.wrapper(demo_panels) Python-2.3.7/Demo/curses/tclock.py0000644001241000117560000000644607221135652016306 0ustar loewishpifb6#!/usr/bin/env python # # $Id: tclock.py 18517 2000-12-23 14:50:18Z akuchling $ # # From tclock.c, Copyright Howard Jones , September 1994. from math import * import curses, time ASPECT = 2.2 def sign(_x): if _x < 0: return -1 return 1 def A2XY(angle, radius): return int(round(ASPECT * radius * sin(angle))), int(round(radius * cos(angle))) def plot(x, y, col): stdscr.addch(y, x, col) # draw a diagonal line using Bresenham's algorithm def dline(pair, from_x, from_y, x2, y2, ch): if curses.has_colors(): stdscr.attrset(curses.color_pair(pair)) dx = x2 - from_x dy = y2 - from_y ax = abs(dx * 2) ay = abs(dy * 2) sx = sign(dx) sy = sign(dy) x = from_x y = from_y if ax > ay: d = ay - ax / 2 while 1: plot(x, y, ch) if x == x2: return if d >= 0: y += sy d -= ax x += sx d += ay else: d = ax - ay / 2 while 1: plot(x, y, ch) if y == y2: return if d >= 0: x += sx d -= ay y += sy d += ax def main(win): global stdscr stdscr = win lastbeep = -1 my_bg = curses.COLOR_BLACK stdscr.nodelay(1) stdscr.timeout(0) # curses.curs_set(0) if curses.has_colors(): curses.init_pair(1, curses.COLOR_RED, my_bg) curses.init_pair(2, curses.COLOR_MAGENTA, my_bg) curses.init_pair(3, curses.COLOR_GREEN, my_bg) cx = (curses.COLS - 1) / 2 cy = curses.LINES / 2 ch = min( cy-1, int(cx / ASPECT) - 1) mradius = (3 * ch) / 4 hradius = ch / 2 sradius = 5 * ch / 6 for i in range(0, 12): sangle = (i + 1) * 2.0 * pi / 12.0 sdx, sdy = A2XY(sangle, sradius) stdscr.addstr(cy - sdy, cx + sdx, "%d" % (i + 1)) stdscr.addstr(0, 0, "ASCII Clock by Howard Jones , 1994") sradius = max(sradius-4, 8) while 1: curses.napms(1000) tim = time.time() t = time.localtime(tim) hours = t[3] + t[4] / 60.0 if hours > 12.0: hours -= 12.0 mangle = t[4] * 2 * pi / 60.0 mdx, mdy = A2XY(mangle, mradius) hangle = hours * 2 * pi / 12.0 hdx, hdy = A2XY(hangle, hradius) sangle = t[5] * 2 * pi / 60.0 sdx, sdy = A2XY(sangle, sradius) dline(3, cx, cy, cx + mdx, cy - mdy, ord('#')) stdscr.attrset(curses.A_REVERSE) dline(2, cx, cy, cx + hdx, cy - hdy, ord('.')) stdscr.attroff(curses.A_REVERSE) if curses.has_colors(): stdscr.attrset(curses.color_pair(1)) plot(cx + sdx, cy - sdy, ord('O')) if curses.has_colors(): stdscr.attrset(curses.color_pair(0)) stdscr.addstr(curses.LINES - 2, 0, time.ctime(tim)) stdscr.refresh() if (t[5] % 5) == 0 and t[5] != lastbeep: lastbeep = t[5] curses.beep() ch = stdscr.getch() if ch == ord('q'): return 0 plot(cx + sdx, cy - sdy, ord(' ')) dline(0, cx, cy, cx + hdx, cy - hdy, ord(' ')) dline(0, cx, cy, cx + mdx, cy - mdy, ord(' ')) curses.wrapper(main) Python-2.3.7/Demo/curses/rain.py0000644001241000117560000000474107216264314015756 0ustar loewishpifb6#!/usr/bin/env python # # $Id: rain.py 18434 2000-12-15 00:41:48Z akuchling $ # # somebody should probably check the randrange()s... import curses from random import randrange def next_j(j): if j == 0: j = 4 else: j -= 1 if curses.has_colors(): z = randrange(0, 3) color = curses.color_pair(z) if z: color = color | curses.A_BOLD stdscr.attrset(color) return j def main(win): # we know that the first argument from curses.wrapper() is stdscr. # Initialize it globally for convenience. global stdscr stdscr = win if curses.has_colors(): bg = curses.COLOR_BLACK curses.init_pair(1, curses.COLOR_BLUE, bg) curses.init_pair(2, curses.COLOR_CYAN, bg) curses.nl() curses.noecho() # XXX curs_set() always returns ERR # curses.curs_set(0) stdscr.timeout(0) c = curses.COLS - 4 r = curses.LINES - 4 xpos = [0] * c ypos = [0] * r for j in range(4, -1, -1): xpos[j] = randrange(0, c) + 2 ypos[j] = randrange(0, r) + 2 j = 0 while 1: x = randrange(0, c) + 2 y = randrange(0, r) + 2 stdscr.addch(y, x, ord('.')) stdscr.addch(ypos[j], xpos[j], ord('o')) j = next_j(j) stdscr.addch(ypos[j], xpos[j], ord('O')) j = next_j(j) stdscr.addch( ypos[j] - 1, xpos[j], ord('-')) stdscr.addstr(ypos[j], xpos[j] - 1, "|.|") stdscr.addch( ypos[j] + 1, xpos[j], ord('-')) j = next_j(j) stdscr.addch( ypos[j] - 2, xpos[j], ord('-')) stdscr.addstr(ypos[j] - 1, xpos[j] - 1, "/ \\") stdscr.addstr(ypos[j], xpos[j] - 2, "| O |") stdscr.addstr(ypos[j] + 1, xpos[j] - 1, "\\ /") stdscr.addch( ypos[j] + 2, xpos[j], ord('-')) j = next_j(j) stdscr.addch( ypos[j] - 2, xpos[j], ord(' ')) stdscr.addstr(ypos[j] - 1, xpos[j] - 1, " ") stdscr.addstr(ypos[j], xpos[j] - 2, " ") stdscr.addstr(ypos[j] + 1, xpos[j] - 1, " ") stdscr.addch( ypos[j] + 2, xpos[j], ord(' ')) xpos[j] = x ypos[j] = y ch = stdscr.getch() if ch == ord('q') or ch == ord('Q'): return 0 elif ch == ord('s'): stdscr.nodelay(0) elif ch == ord(' '): stdscr.nodelay(1) curses.napms(50) curses.wrapper(main) Python-2.3.7/Demo/curses/README0000644001241000117560000000200007225432157015317 0ustar loewishpifb6This is a collection of demos and tests for the curses module. ncurses demos ============= These demos are converted from the C versions in the ncurses distribution, and were contributed by Thomas Gellekum I didn't strive for a `pythonic' style, but bluntly copied the originals. I won't attempt to `beautify' the program anytime soon, but I wouldn't mind someone else making an effort in that direction, of course. ncurses.py -- currently only a panels demo XXX this won't work until panel support is checked in rain.py -- raindrops keep falling on my desktop tclock.py -- ASCII clock, by Howard Jones xmas.py -- I'm dreaming of an ASCII christmas Please send bugfixes and new contributions to me or, even better, submit them to the Python Bug Tracker on SourceForge (). Other demos =========== life.py -- Simple game of Life repeat.py -- Repeatedly execute a shell command (like watch(1)) Python-2.3.7/Demo/curses/repeat.py0000755001241000117560000000275307225432157016313 0ustar loewishpifb6#! /usr/bin/env python """repeat This simple program repeatedly (with 1-second intervals) executes the shell command given on the command line and displays the output (or as much of it as fits on the screen). It uses curses to paint each new output on top of the old output, so that if nothing changes, the screen doesn't change. This is handy to watch for changes in e.g. a directory or process listing. To end, hit Control-C. """ # Author: Guido van Rossum # Disclaimer: there's a Linux program named 'watch' that does the same # thing. Honestly, I didn't know of its existence when I wrote this! # To do: add features until it has the same functionality as watch(1); # then compare code size and development time. import os import sys import time import curses def main(): if not sys.argv[1:]: print __doc__ sys.exit(0) cmd = " ".join(sys.argv[1:]) p = os.popen(cmd, "r") text = p.read() sts = p.close() if sts: print >>sys.stderr, "Exit code:", sts sys.exit(sts) w = curses.initscr() try: while 1: w.erase() try: w.addstr(text) except curses.error: pass w.refresh() time.sleep(1) p = os.popen(cmd, "r") text = p.read() sts = p.close() if sts: print >>sys.stderr, "Exit code:", sts sys.exit(sts) finally: curses.endwin() main() Python-2.3.7/Demo/curses/life.py0000755001241000117560000001503307455050450015742 0ustar loewishpifb6#!/usr/bin/env python # life.py -- A curses-based version of Conway's Game of Life. # Contributed by AMK # # An empty board will be displayed, and the following commands are available: # E : Erase the board # R : Fill the board randomly # S : Step for a single generation # C : Update continuously until a key is struck # Q : Quit # Cursor keys : Move the cursor around the board # Space or Enter : Toggle the contents of the cursor's position # # TODO : # Support the mouse # Use colour if available # Make board updates faster # import random, string, traceback import curses class LifeBoard: """Encapsulates a Life board Attributes: X,Y : horizontal and vertical size of the board state : dictionary mapping (x,y) to 0 or 1 Methods: display(update_board) -- If update_board is true, compute the next generation. Then display the state of the board and refresh the screen. erase() -- clear the entire board makeRandom() -- fill the board randomly set(y,x) -- set the given cell to Live; doesn't refresh the screen toggle(y,x) -- change the given cell from live to dead, or vice versa, and refresh the screen display """ def __init__(self, scr, char=ord('*')): """Create a new LifeBoard instance. scr -- curses screen object to use for display char -- character used to render live cells (default: '*') """ self.state={} ; self.scr=scr Y, X = self.scr.getmaxyx() self.X, self.Y = X-2, Y-2-1 self.char = char self.scr.clear() # Draw a border around the board border_line='+'+(self.X*'-')+'+' self.scr.addstr(0, 0, border_line) self.scr.addstr(self.Y+1,0, border_line) for y in range(0, self.Y): self.scr.addstr(1+y, 0, '|') self.scr.addstr(1+y, self.X+1, '|') self.scr.refresh() def set(self, y, x): """Set a cell to the live state""" if x<0 or self.X<=x or y<0 or self.Y<=y: raise ValueError, "Coordinates out of range %i,%i"% (y,x) self.state[x,y] = 1 def toggle(self, y, x): """Toggle a cell's state between live and dead""" if x<0 or self.X<=x or y<0 or self.Y<=y: raise ValueError, "Coordinates out of range %i,%i"% (y,x) if self.state.has_key( (x,y) ): del self.state[x,y] self.scr.addch(y+1, x+1, ' ') else: self.state[x,y]=1 self.scr.addch(y+1, x+1, self.char) self.scr.refresh() def erase(self): """Clear the entire board and update the board display""" self.state={} self.display(update_board=0) def display(self, update_board=1): """Display the whole board, optionally computing one generation""" M,N = self.X, self.Y if not update_board: for i in range(0, M): for j in range(0, N): if self.state.has_key( (i,j) ): self.scr.addch(j+1, i+1, self.char) else: self.scr.addch(j+1, i+1, ' ') self.scr.refresh() return d={} ; self.boring=1 for i in range(0, M): L=range( max(0, i-1), min(M, i+2) ) for j in range(0, N): s=0 live=self.state.has_key( (i,j) ) for k in range( max(0, j-1), min(N, j+2) ): for l in L: if self.state.has_key( (l,k) ): s=s+1 s=s-live if s==3: # Birth d[i,j]=1 self.scr.addch(j+1, i+1, self.char) if not live: self.boring=0 elif s==2 and live: d[i,j]=1 # Survival elif live: # Death self.scr.addch(j+1, i+1, ' ') self.boring=0 self.state=d self.scr.refresh() def makeRandom(self): "Fill the board with a random pattern" self.state={} for i in range(0, self.X): for j in range(0, self.Y): if random.random() > 0.5: self.set(j,i) def erase_menu(stdscr, menu_y): "Clear the space where the menu resides" stdscr.move(menu_y, 0) ; stdscr.clrtoeol() stdscr.move(menu_y+1, 0) ; stdscr.clrtoeol() def display_menu(stdscr, menu_y): "Display the menu of possible keystroke commands" erase_menu(stdscr, menu_y) stdscr.addstr(menu_y, 4, 'Use the cursor keys to move, and space or Enter to toggle a cell.') stdscr.addstr(menu_y+1, 4, 'E)rase the board, R)andom fill, S)tep once or C)ontinuously, Q)uit') def main(stdscr): # Clear the screen and display the menu of keys stdscr.clear() stdscr_y, stdscr_x = stdscr.getmaxyx() menu_y=(stdscr_y-3)-1 display_menu(stdscr, menu_y) # Allocate a subwindow for the Life board and create the board object subwin=stdscr.subwin(stdscr_y-3, stdscr_x, 0, 0) board=LifeBoard(subwin, char=ord('*')) board.display(update_board=0) # xpos, ypos are the cursor's position xpos, ypos = board.X/2, board.Y/2 # Main loop: while (1): stdscr.move(1+ypos, 1+xpos) # Move the cursor c=stdscr.getch() # Get a keystroke if 00: ypos=ypos-1 elif c==curses.KEY_DOWN and ypos0: xpos=xpos-1 elif c==curses.KEY_RIGHT and xpos')) try: lildeer1.addch(1, 3, ord('~')) except curses.error: pass lildeer2.addch(0, 0, ord('V')) lildeer2.addch(1, 0, ord('@')) lildeer2.addch(1, 1, ord('|')) lildeer2.addch(1, 2, ord('|')) try: lildeer2.addch(1, 3, ord('~')) except curses.error: pass lildeer3.addch(0, 0, ord('V')) lildeer3.addch(1, 0, ord('@')) lildeer3.addch(1, 1, ord('>')) lildeer3.addch(1, 2, ord('<')) try: lildeer2.addch(1, 3, ord('~')) # XXX except curses.error: pass middeer1.addch(0, 2, ord('y')) middeer1.addch(0, 3, ord('y')) middeer1.addch(1, 2, ord('0')) middeer1.addch(1, 3, ord('(')) middeer1.addch(1, 4, ord('=')) middeer1.addch(1, 5, ord(')')) middeer1.addch(1, 6, ord('~')) middeer1.addch(2, 3, ord('\\')) middeer1.addch(2, 5, ord('/')) middeer2.addch(0, 2, ord('y')) middeer2.addch(0, 3, ord('y')) middeer2.addch(1, 2, ord('0')) middeer2.addch(1, 3, ord('(')) middeer2.addch(1, 4, ord('=')) middeer2.addch(1, 5, ord(')')) middeer2.addch(1, 6, ord('~')) middeer2.addch(2, 3, ord('|')) middeer2.addch(2, 5, ord('|')) middeer3.addch(0, 2, ord('y')) middeer3.addch(0, 3, ord('y')) middeer3.addch(1, 2, ord('0')) middeer3.addch(1, 3, ord('(')) middeer3.addch(1, 4, ord('=')) middeer3.addch(1, 5, ord(')')) middeer3.addch(1, 6, ord('~')) middeer3.addch(2, 3, ord('/')) middeer3.addch(2, 5, ord('\\')) bigdeer1.addch(0, 17, ord('\\')) bigdeer1.addch(0, 18, ord('/')) bigdeer1.addch(0, 19, ord('\\')) bigdeer1.addch(0, 20, ord('/')) bigdeer1.addch(1, 18, ord('\\')) bigdeer1.addch(1, 20, ord('/')) bigdeer1.addch(2, 19, ord('|')) bigdeer1.addch(2, 20, ord('_')) bigdeer1.addch(3, 18, ord('/')) bigdeer1.addch(3, 19, ord('^')) bigdeer1.addch(3, 20, ord('0')) bigdeer1.addch(3, 21, ord('\\')) bigdeer1.addch(4, 17, ord('/')) bigdeer1.addch(4, 18, ord('/')) bigdeer1.addch(4, 19, ord('\\')) bigdeer1.addch(4, 22, ord('\\')) bigdeer1.addstr(5, 7, "^~~~~~~~~// ~~U") bigdeer1.addstr(6, 7, "( \\_____( /") # )) bigdeer1.addstr(7, 8, "( ) /") bigdeer1.addstr(8, 9, "\\\\ /") bigdeer1.addstr(9, 11, "\\>/>") bigdeer2.addch(0, 17, ord('\\')) bigdeer2.addch(0, 18, ord('/')) bigdeer2.addch(0, 19, ord('\\')) bigdeer2.addch(0, 20, ord('/')) bigdeer2.addch(1, 18, ord('\\')) bigdeer2.addch(1, 20, ord('/')) bigdeer2.addch(2, 19, ord('|')) bigdeer2.addch(2, 20, ord('_')) bigdeer2.addch(3, 18, ord('/')) bigdeer2.addch(3, 19, ord('^')) bigdeer2.addch(3, 20, ord('0')) bigdeer2.addch(3, 21, ord('\\')) bigdeer2.addch(4, 17, ord('/')) bigdeer2.addch(4, 18, ord('/')) bigdeer2.addch(4, 19, ord('\\')) bigdeer2.addch(4, 22, ord('\\')) bigdeer2.addstr(5, 7, "^~~~~~~~~// ~~U") bigdeer2.addstr(6, 7, "(( )____( /") # )) bigdeer2.addstr(7, 7, "( / |") bigdeer2.addstr(8, 8, "\\/ |") bigdeer2.addstr(9, 9, "|> |>") bigdeer3.addch(0, 17, ord('\\')) bigdeer3.addch(0, 18, ord('/')) bigdeer3.addch(0, 19, ord('\\')) bigdeer3.addch(0, 20, ord('/')) bigdeer3.addch(1, 18, ord('\\')) bigdeer3.addch(1, 20, ord('/')) bigdeer3.addch(2, 19, ord('|')) bigdeer3.addch(2, 20, ord('_')) bigdeer3.addch(3, 18, ord('/')) bigdeer3.addch(3, 19, ord('^')) bigdeer3.addch(3, 20, ord('0')) bigdeer3.addch(3, 21, ord('\\')) bigdeer3.addch(4, 17, ord('/')) bigdeer3.addch(4, 18, ord('/')) bigdeer3.addch(4, 19, ord('\\')) bigdeer3.addch(4, 22, ord('\\')) bigdeer3.addstr(5, 7, "^~~~~~~~~// ~~U") bigdeer3.addstr(6, 6, "( ()_____( /") # )) bigdeer3.addstr(7, 6, "/ / /") bigdeer3.addstr(8, 5, "|/ \\") bigdeer3.addstr(9, 5, "/> \\>") bigdeer4.addch(0, 17, ord('\\')) bigdeer4.addch(0, 18, ord('/')) bigdeer4.addch(0, 19, ord('\\')) bigdeer4.addch(0, 20, ord('/')) bigdeer4.addch(1, 18, ord('\\')) bigdeer4.addch(1, 20, ord('/')) bigdeer4.addch(2, 19, ord('|')) bigdeer4.addch(2, 20, ord('_')) bigdeer4.addch(3, 18, ord('/')) bigdeer4.addch(3, 19, ord('^')) bigdeer4.addch(3, 20, ord('0')) bigdeer4.addch(3, 21, ord('\\')) bigdeer4.addch(4, 17, ord('/')) bigdeer4.addch(4, 18, ord('/')) bigdeer4.addch(4, 19, ord('\\')) bigdeer4.addch(4, 22, ord('\\')) bigdeer4.addstr(5, 7, "^~~~~~~~~// ~~U") bigdeer4.addstr(6, 6, "( )______( /") # ) bigdeer4.addstr(7, 5, "(/ \\") # ) bigdeer4.addstr(8, 0, "v___= ----^") lookdeer1.addstr(0, 16, "\\/ \\/") lookdeer1.addstr(1, 17, "\\Y/ \\Y/") lookdeer1.addstr(2, 19, "\\=/") lookdeer1.addstr(3, 17, "^\\o o/^") lookdeer1.addstr(4, 17, "//( )") lookdeer1.addstr(5, 7, "^~~~~~~~~// \\O/") lookdeer1.addstr(6, 7, "( \\_____( /") # )) lookdeer1.addstr(7, 8, "( ) /") lookdeer1.addstr(8, 9, "\\\\ /") lookdeer1.addstr(9, 11, "\\>/>") lookdeer2.addstr(0, 16, "\\/ \\/") lookdeer2.addstr(1, 17, "\\Y/ \\Y/") lookdeer2.addstr(2, 19, "\\=/") lookdeer2.addstr(3, 17, "^\\o o/^") lookdeer2.addstr(4, 17, "//( )") lookdeer2.addstr(5, 7, "^~~~~~~~~// \\O/") lookdeer2.addstr(6, 7, "(( )____( /") # )) lookdeer2.addstr(7, 7, "( / |") lookdeer2.addstr(8, 8, "\\/ |") lookdeer2.addstr(9, 9, "|> |>") lookdeer3.addstr(0, 16, "\\/ \\/") lookdeer3.addstr(1, 17, "\\Y/ \\Y/") lookdeer3.addstr(2, 19, "\\=/") lookdeer3.addstr(3, 17, "^\\o o/^") lookdeer3.addstr(4, 17, "//( )") lookdeer3.addstr(5, 7, "^~~~~~~~~// \\O/") lookdeer3.addstr(6, 6, "( ()_____( /") # )) lookdeer3.addstr(7, 6, "/ / /") lookdeer3.addstr(8, 5, "|/ \\") lookdeer3.addstr(9, 5, "/> \\>") lookdeer4.addstr(0, 16, "\\/ \\/") lookdeer4.addstr(1, 17, "\\Y/ \\Y/") lookdeer4.addstr(2, 19, "\\=/") lookdeer4.addstr(3, 17, "^\\o o/^") lookdeer4.addstr(4, 17, "//( )") lookdeer4.addstr(5, 7, "^~~~~~~~~// \\O/") lookdeer4.addstr(6, 6, "( )______( /") # ) lookdeer4.addstr(7, 5, "(/ \\") # ) lookdeer4.addstr(8, 0, "v___= ----^") ############################################### curses.cbreak() stdscr.nodelay(1) while 1: stdscr.clear() treescrn.erase() w_del_msg.touchwin() treescrn.touchwin() treescrn2.erase() treescrn2.touchwin() treescrn8.erase() treescrn8.touchwin() stdscr.refresh() look_out(150) boxit() stdscr.refresh() look_out(150) seas() stdscr.refresh() greet() stdscr.refresh() look_out(150) fromwho() stdscr.refresh() look_out(150) tree() look_out(150) balls() look_out(150) star() look_out(150) strng1() strng2() strng3() strng4() strng5() # set up the windows for our blinking trees # # treescrn3 treescrn.overlay(treescrn3) # balls treescrn3.addch(4, 18, ord(' ')) treescrn3.addch(7, 6, ord(' ')) treescrn3.addch(8, 19, ord(' ')) treescrn3.addch(11, 22, ord(' ')) # star treescrn3.addch(0, 12, ord('*')) # strng1 treescrn3.addch(3, 11, ord(' ')) # strng2 treescrn3.addch(5, 13, ord(' ')) treescrn3.addch(6, 10, ord(' ')) # strng3 treescrn3.addch(7, 16, ord(' ')) treescrn3.addch(7, 14, ord(' ')) # strng4 treescrn3.addch(10, 13, ord(' ')) treescrn3.addch(10, 10, ord(' ')) treescrn3.addch(11, 8, ord(' ')) # strng5 treescrn3.addch(11, 18, ord(' ')) treescrn3.addch(12, 13, ord(' ')) # treescrn4 treescrn.overlay(treescrn4) # balls treescrn4.addch(3, 9, ord(' ')) treescrn4.addch(4, 16, ord(' ')) treescrn4.addch(7, 6, ord(' ')) treescrn4.addch(8, 19, ord(' ')) treescrn4.addch(11, 2, ord(' ')) treescrn4.addch(12, 23, ord(' ')) # star treescrn4.standout() treescrn4.addch(0, 12, ord('*')) treescrn4.standend() # strng1 treescrn4.addch(3, 13, ord(' ')) # strng2 # strng3 treescrn4.addch(7, 15, ord(' ')) treescrn4.addch(8, 11, ord(' ')) # strng4 treescrn4.addch(9, 16, ord(' ')) treescrn4.addch(10, 12, ord(' ')) treescrn4.addch(11, 8, ord(' ')) # strng5 treescrn4.addch(11, 18, ord(' ')) treescrn4.addch(12, 14, ord(' ')) # treescrn5 treescrn.overlay(treescrn5) # balls treescrn5.addch(3, 15, ord(' ')) treescrn5.addch(10, 20, ord(' ')) treescrn5.addch(12, 1, ord(' ')) # star treescrn5.addch(0, 12, ord(' ')) # strng1 treescrn5.addch(3, 11, ord(' ')) # strng2 treescrn5.addch(5, 12, ord(' ')) # strng3 treescrn5.addch(7, 14, ord(' ')) treescrn5.addch(8, 10, ord(' ')) # strng4 treescrn5.addch(9, 15, ord(' ')) treescrn5.addch(10, 11, ord(' ')) treescrn5.addch(11, 7, ord(' ')) # strng5 treescrn5.addch(11, 17, ord(' ')) treescrn5.addch(12, 13, ord(' ')) # treescrn6 treescrn.overlay(treescrn6) # balls treescrn6.addch(6, 7, ord(' ')) treescrn6.addch(7, 18, ord(' ')) treescrn6.addch(10, 4, ord(' ')) treescrn6.addch(11, 23, ord(' ')) # star treescrn6.standout() treescrn6.addch(0, 12, ord('*')) treescrn6.standend() # strng1 # strng2 treescrn6.addch(5, 11, ord(' ')) # strng3 treescrn6.addch(7, 13, ord(' ')) treescrn6.addch(8, 9, ord(' ')) # strng4 treescrn6.addch(9, 14, ord(' ')) treescrn6.addch(10, 10, ord(' ')) treescrn6.addch(11, 6, ord(' ')) # strng5 treescrn6.addch(11, 16, ord(' ')) treescrn6.addch(12, 12, ord(' ')) # treescrn7 treescrn.overlay(treescrn7) # balls treescrn7.addch(3, 15, ord(' ')) treescrn7.addch(6, 7, ord(' ')) treescrn7.addch(7, 18, ord(' ')) treescrn7.addch(10, 4, ord(' ')) treescrn7.addch(11, 22, ord(' ')) # star treescrn7.addch(0, 12, ord('*')) # strng1 treescrn7.addch(3, 12, ord(' ')) # strng2 treescrn7.addch(5, 13, ord(' ')) treescrn7.addch(6, 9, ord(' ')) # strng3 treescrn7.addch(7, 15, ord(' ')) treescrn7.addch(8, 11, ord(' ')) # strng4 treescrn7.addch(9, 16, ord(' ')) treescrn7.addch(10, 12, ord(' ')) treescrn7.addch(11, 8, ord(' ')) # strng5 treescrn7.addch(11, 18, ord(' ')) treescrn7.addch(12, 14, ord(' ')) look_out(150) reindeer() w_holiday.touchwin() w_holiday.refresh() w_del_msg.refresh() look_out(500) for i in range(0, 20): blinkit() curses.wrapper(main) Python-2.3.7/Demo/tix/0000755001241000117560000000000010765544471013755 5ustar loewishpifb6Python-2.3.7/Demo/tix/samples/0000755001241000117560000000000010765544471015421 5ustar loewishpifb6Python-2.3.7/Demo/tix/samples/ComboBox.py0000755001241000117560000000653207445157041017506 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: ComboBox.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the tixComboBox widget, which is close # to the MS Window Combo Box control. # import Tix def RunSample(w): global demo_month, demo_year top = Tix.Frame(w, bd=1, relief=Tix.RAISED) demo_month = Tix.StringVar() demo_year = Tix.StringVar() # $w.top.a is a drop-down combo box. It is not editable -- who wants # to invent new months? # # [Hint] The -options switch sets the options of the subwidgets. # [Hint] We set the label.width subwidget option of both comboboxes to # be 10 so that their labels appear to be aligned. # a = Tix.ComboBox(top, label="Month: ", dropdown=1, command=select_month, editable=0, variable=demo_month, options='listbox.height 6 label.width 10 label.anchor e') # $w.top.b is a non-drop-down combo box. It is not editable: we provide # four choices for the user, but he can enter an alternative year if he # wants to. # # [Hint] Use the padY and anchor options of the label subwidget to # align the label with the entry subwidget. # [Hint] Notice that you should use padY (the NAME of the option) and not # pady (the SWITCH of the option). # b = Tix.ComboBox(top, label="Year: ", dropdown=0, command=select_year, editable=1, variable=demo_year, options='listbox.height 4 label.padY 5 label.width 10 label.anchor ne') a.pack(side=Tix.TOP, anchor=Tix.W) b.pack(side=Tix.TOP, anchor=Tix.W) a.insert(Tix.END, 'January') a.insert(Tix.END, 'February') a.insert(Tix.END, 'March') a.insert(Tix.END, 'April') a.insert(Tix.END, 'May') a.insert(Tix.END, 'June') a.insert(Tix.END, 'July') a.insert(Tix.END, 'August') a.insert(Tix.END, 'September') a.insert(Tix.END, 'October') a.insert(Tix.END, 'November') a.insert(Tix.END, 'December') b.insert(Tix.END, '1992') b.insert(Tix.END, '1993') b.insert(Tix.END, '1994') b.insert(Tix.END, '1995') b.insert(Tix.END, '1996') # Use "tixSetSilent" to set the values of the combo box if you # don't want your -command procedures (cbx:select_month and # cbx:select_year) to be called. # a.set_silent('January') b.set_silent('1995') box = Tix.ButtonBox(w, orientation=Tix.HORIZONTAL) box.add('ok', text='Ok', underline=0, width=6, command=lambda w=w: ok_command(w)) box.add('cancel', text='Cancel', underline=0, width=6, command=lambda w=w: w.destroy()) box.pack(side=Tix.BOTTOM, fill=Tix.X) top.pack(side=Tix.TOP, fill=Tix.BOTH, expand=1) def select_month(event=None): # tixDemo:Status "Month = %s" % demo_month.get() pass def select_year(event=None): # tixDemo:Status "Year = %s" % demo_year.get() pass def ok_command(w): # tixDemo:Status "Month = %s, Year= %s" % (demo_month.get(), demo_year.get()) w.destroy() if __name__ == '__main__': root = Tix.Tk() RunSample(root) root.mainloop() Python-2.3.7/Demo/tix/samples/SHList1.py0000755001241000117560000000765707445157041017236 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: SHList1.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program using tixwish. # This file demonstrates the use of the tixScrolledHList widget. # import Tix TCL_ALL_EVENTS = 0 def RunSample (root): shlist = DemoSHList(root) shlist.mainloop() shlist.destroy() class DemoSHList: def __init__(self, w): self.root = w self.exit = -1 z = w.winfo_toplevel() z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) # We create the frame and the ScrolledHList widget # at the top of the dialog box # top = Tix.Frame( w, relief=Tix.RAISED, bd=1) # Put a simple hierachy into the HList (two levels). Use colors and # separator widgets (frames) to make the list look fancy # top.a = Tix.ScrolledHList(top) top.a.pack( expand=1, fill=Tix.BOTH, padx=10, pady=10, side=Tix.TOP) # This is our little relational database # bosses = [ ('jeff', 'Jeff Waxman'), ('john', 'John Lee'), ('peter', 'Peter Kenson') ] employees = [ ('alex', 'john', 'Alex Kellman'), ('alan', 'john', 'Alan Adams'), ('andy', 'peter', 'Andreas Crawford'), ('doug', 'jeff', 'Douglas Bloom'), ('jon', 'peter', 'Jon Baraki'), ('chris', 'jeff', 'Chris Geoffrey'), ('chuck', 'jeff', 'Chuck McLean') ] hlist=top.a.hlist # Let configure the appearance of the HList subwidget # hlist.config( separator='.', width=25, drawbranch=0, indent=10) count=0 for boss,name in bosses : if count : f=Tix.Frame(hlist, name='sep%d' % count, height=2, width=150, bd=2, relief=Tix.SUNKEN ) hlist.add_child( itemtype=Tix.WINDOW, window=f, state=Tix.DISABLED ) hlist.add(boss, itemtype=Tix.TEXT, text=name) count = count+1 for person,boss,name in employees : # '.' is the separator character we chose above # key= boss + '.' + person # ^^^^ ^^^^^^ # parent entryPath / child's name hlist.add( key, text=name ) # [Hint] Make sure the keys (e.g. 'boss.person') you choose # are unique names. If you cannot be sure of this (because of # the structure of your database, e.g.) you can use the # "add_child" command instead: # # hlist.addchild( boss, text=name) # ^^^^ # parent entryPath # Use a ButtonBox to hold the buttons. # box= Tix.ButtonBox(top, orientation=Tix.HORIZONTAL ) box.add( 'ok', text='Ok', underline=0, width=6, command = self.okcmd) box.add( 'cancel', text='Cancel', underline=0, width=6, command = self.quitcmd) box.pack( side=Tix.BOTTOM, fill=Tix.X) top.pack( side=Tix.TOP, fill=Tix.BOTH, expand=1 ) def okcmd (self): self.quitcmd() def quitcmd (self): self.exit = 0 def mainloop(self): while self.exit < 0: self.root.tk.dooneevent(TCL_ALL_EVENTS) def destroy (self): self.root.destroy() # This "if" statement makes it possible to run this script file inside or # outside of the main demo program "tixwidgets.py". # if __name__== '__main__' : root=Tix.Tk() RunSample(root) Python-2.3.7/Demo/tix/samples/BtnBox.py0000755001241000117560000000306007445157041017163 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: BtnBox.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the tixButtonBox widget, which is a # group of TK buttons. You can use it to manage the buttons in a dialog box, # for example. # import Tix def RunSample(w): # Create the label on the top of the dialog box # top = Tix.Label(w, padx=20, pady=10, bd=1, relief=Tix.RAISED, anchor=Tix.CENTER, text='This dialog box is\n a demonstration of the\n tixButtonBox widget') # Create the button box and add a few buttons in it. Set the # -width of all the buttons to the same value so that they # appear in the same size. # # Note that the -text, -underline, -command and -width options are all # standard options of the button widgets. # box = Tix.ButtonBox(w, orientation=Tix.HORIZONTAL) box.add('ok', text='OK', underline=0, width=5, command=lambda w=w: w.destroy()) box.add('close', text='Cancel', underline=0, width=5, command=lambda w=w: w.destroy()) box.pack(side=Tix.BOTTOM, fill=Tix.X) top.pack(side=Tix.TOP, fill=Tix.BOTH, expand=1) if __name__ == '__main__': root = Tix.Tk() RunSample(root) root.mainloop() Python-2.3.7/Demo/tix/samples/DirTree.py0000755001241000117560000001002107445157041017320 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: DirTree.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program using tixwish. # This file demonstrates the use of the tixDirTree widget -- you can # use it for the user to select a directory. For example, an installation # program can use the tixDirTree widget to ask the user to select the # installation directory for an application. # import Tix, os, copy from Tkconstants import * TCL_ALL_EVENTS = 0 def RunSample (root): dirtree = DemoDirTree(root) dirtree.mainloop() dirtree.destroy() class DemoDirTree: def __init__(self, w): self.root = w self.exit = -1 z = w.winfo_toplevel() z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) # Create the tixDirTree and the tixLabelEntry widgets on the on the top # of the dialog box # bg = root.tk.eval('tix option get bg') # adding bg=bg crashes Windows pythonw tk8.3.3 Python 2.1.0 top = Tix.Frame( w, relief=RAISED, bd=1) # Create the DirTree widget. By default it will show the current # directory # # top.dir = Tix.DirTree(top) top.dir.hlist['width'] = 40 # When the user presses the ".." button, the selected directory # is "transferred" into the entry widget # top.btn = Tix.Button(top, text = " >> ", pady = 0) # We use a LabelEntry to hold the installation directory. The user # can choose from the DirTree widget, or he can type in the directory # manually # top.ent = Tix.LabelEntry(top, label="Installation Directory:", labelside = 'top', options = ''' entry.width 40 label.anchor w ''') self.dlist_dir = copy.copy(os.curdir) top.ent.entry['textvariable'] = self.dlist_dir top.btn['command'] = lambda dir=top.dir, ent=top.ent, self=self: \ self.copy_name(dir,ent) top.ent.entry.bind('', lambda self=self: self.okcmd () ) top.pack( expand='yes', fill='both', side=TOP) top.dir.pack( expand=1, fill=BOTH, padx=4, pady=4, side=LEFT) top.btn.pack( anchor='s', padx=4, pady=4, side=LEFT) top.ent.pack( expand=1, fill=X, anchor='s', padx=4, pady=4, side=LEFT) # Use a ButtonBox to hold the buttons. # box = Tix.ButtonBox (w, orientation='horizontal') box.add ('ok', text='Ok', underline=0, width=6, command = lambda self=self: self.okcmd () ) box.add ('cancel', text='Cancel', underline=0, width=6, command = lambda self=self: self.quitcmd () ) box.pack( anchor='s', fill='x', side=BOTTOM) def copy_name (self, dir, ent): # This should work as it is the entry's textvariable self.dlist_dir = dir.cget('value') # but it isn't so I'll do it manually ent.entry.delete(0,'end') ent.entry.insert(0, self.dlist_dir) def okcmd (self): # tixDemo:Status "You have selected the directory" + self.dlist_dir self.quitcmd() def quitcmd (self): # tixDemo:Status "You have selected the directory" + self.dlist_dir self.exit = 0 def mainloop(self): while self.exit < 0: self.root.tk.dooneevent(TCL_ALL_EVENTS) def destroy (self): self.root.destroy() # This "if" statement makes it possible to run this script file inside or # outside of the main demo program "tixwidgets.py". # if __name__== '__main__' : root=Tix.Tk() RunSample(root) Python-2.3.7/Demo/tix/samples/OptMenu.py0000755001241000117560000000450507445157041017363 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: OptMenu.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the tixOptionMenu widget -- you can # use it for the user to choose from a fixed set of options # import Tix options = {'text':'Plain Text', 'post':'PostScript', 'html':'HTML', 'tex':'LaTeX', 'rtf':'Rich Text Format'} def RunSample(w): global demo_opt_from, demo_opt_to demo_opt_from = Tix.StringVar() demo_opt_to = Tix.StringVar() top = Tix.Frame(w, bd=1, relief=Tix.RAISED) from_file = Tix.OptionMenu(top, label="From File Format : ", variable=demo_opt_from, options = 'label.width 19 label.anchor e menubutton.width 15') to_file = Tix.OptionMenu(top, label="To File Format : ", variable=demo_opt_to, options='label.width 19 label.anchor e menubutton.width 15') # Add the available options to the two OptionMenu widgets # # [Hint] You have to add the options first before you set the # global variables "demo_opt_from" and "demo_opt_to". Otherwise # the OptionMenu widget will complain about "unknown options"! # for opt in options.keys(): from_file.add_command(opt, label=options[opt]) to_file.add_command(opt, label=options[opt]) demo_opt_from.set('html') demo_opt_to.set('post') from_file.pack(side=Tix.TOP, anchor=Tix.W, pady=3, padx=6) to_file.pack(side=Tix.TOP, anchor=Tix.W, pady=3, padx=6) box = Tix.ButtonBox(w, orientation=Tix.HORIZONTAL) box.add('ok', text='Ok', underline=0, width=6, command=lambda w=w: ok_command(w)) box.add('cancel', text='Cancel', underline=0, width=6, command=lambda w=w: w.destroy()) box.pack(side=Tix.BOTTOM, fill=Tix.X) top.pack(side=Tix.TOP, fill=Tix.BOTH, expand=1) def ok_command(w): # tixDemo:Status "Convert file from %s to %s" % ( demo_opt_from.get(), demo_opt_to.get()) w.destroy() if __name__ == '__main__': root = Tix.Tk() RunSample(root) root.mainloop() Python-2.3.7/Demo/tix/samples/Balloon.py0000755001241000117560000000437507445157041017367 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: Balloon.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the tixBalloon widget, which provides # a interesting way to give help tips about elements in your user interface. # Your can display the help message in a "balloon" and a status bar widget. # import Tix TCL_ALL_EVENTS = 0 def RunSample (root): balloon = DemoBalloon(root) balloon.mainloop() balloon.destroy() class DemoBalloon: def __init__(self, w): self.root = w self.exit = -1 z = w.winfo_toplevel() z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) status = Tix.Label(w, width=40, relief=Tix.SUNKEN, bd=1) status.pack(side=Tix.BOTTOM, fill=Tix.Y, padx=2, pady=1) # Create two mysterious widgets that need balloon help button1 = Tix.Button(w, text='Something Unexpected', command=self.quitcmd) button2 = Tix.Button(w, text='Something Else Unexpected') button2['command'] = lambda w=button2: w.destroy() button1.pack(side=Tix.TOP, expand=1) button2.pack(side=Tix.TOP, expand=1) # Create the balloon widget and associate it with the widgets that we want # to provide tips for: b = Tix.Balloon(w, statusbar=status) b.bind_widget(button1, balloonmsg='Close Window', statusmsg='Press this button to close this window') b.bind_widget(button2, balloonmsg='Self-destruct button', statusmsg='Press this button and it will destroy itself') def quitcmd (self): self.exit = 0 def mainloop(self): foundEvent = 1 while self.exit < 0 and foundEvent > 0: foundEvent = self.root.tk.dooneevent(TCL_ALL_EVENTS) def destroy (self): self.root.destroy() if __name__ == '__main__': root = Tix.Tk() RunSample(root) Python-2.3.7/Demo/tix/samples/NoteBook.py0000755001241000117560000000761007445157041017514 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: NoteBook.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the tixNoteBook widget, which allows # you to lay out your interface using a "notebook" metaphore # import Tix def RunSample(w): global root root = w # We use these options to set the sizes of the subwidgets inside the # notebook, so that they are well-aligned on the screen. prefix = Tix.OptionName(w) if prefix: prefix = '*'+prefix else: prefix = '' w.option_add(prefix+'*TixControl*entry.width', 10) w.option_add(prefix+'*TixControl*label.width', 18) w.option_add(prefix+'*TixControl*label.anchor', Tix.E) w.option_add(prefix+'*TixNoteBook*tagPadX', 8) # Create the notebook widget and set its backpagecolor to gray. # Note that the -backpagecolor option belongs to the "nbframe" # subwidget. nb = Tix.NoteBook(w, name='nb', ipadx=6, ipady=6) nb['bg'] = 'gray' nb.nbframe['backpagecolor'] = 'gray' # Create the two tabs on the notebook. The -underline option # puts a underline on the first character of the labels of the tabs. # Keyboard accelerators will be defined automatically according # to the underlined character. nb.add('hard_disk', label="Hard Disk", underline=0) nb.add('network', label="Network", underline=0) nb.pack(expand=1, fill=Tix.BOTH, padx=5, pady=5 ,side=Tix.TOP) #---------------------------------------- # Create the first page #---------------------------------------- # Create two frames: one for the common buttons, one for the # other widgets # tab=nb.hard_disk f = Tix.Frame(tab) common = Tix.Frame(tab) f.pack(side=Tix.LEFT, padx=2, pady=2, fill=Tix.BOTH, expand=1) common.pack(side=Tix.RIGHT, padx=2, fill=Tix.Y) a = Tix.Control(f, value=12, label='Access time: ') w = Tix.Control(f, value=400, label='Write Throughput: ') r = Tix.Control(f, value=400, label='Read Throughput: ') c = Tix.Control(f, value=1021, label='Capacity: ') a.pack(side=Tix.TOP, padx=20, pady=2) w.pack(side=Tix.TOP, padx=20, pady=2) r.pack(side=Tix.TOP, padx=20, pady=2) c.pack(side=Tix.TOP, padx=20, pady=2) # Create the common buttons createCommonButtons(common) #---------------------------------------- # Create the second page #---------------------------------------- tab = nb.network f = Tix.Frame(tab) common = Tix.Frame(tab) f.pack(side=Tix.LEFT, padx=2, pady=2, fill=Tix.BOTH, expand=1) common.pack(side=Tix.RIGHT, padx=2, fill=Tix.Y) a = Tix.Control(f, value=12, label='Access time: ') w = Tix.Control(f, value=400, label='Write Throughput: ') r = Tix.Control(f, value=400, label='Read Throughput: ') c = Tix.Control(f, value=1021, label='Capacity: ') u = Tix.Control(f, value=10, label='Users: ') a.pack(side=Tix.TOP, padx=20, pady=2) w.pack(side=Tix.TOP, padx=20, pady=2) r.pack(side=Tix.TOP, padx=20, pady=2) c.pack(side=Tix.TOP, padx=20, pady=2) u.pack(side=Tix.TOP, padx=20, pady=2) createCommonButtons(common) def doDestroy(): global root root.destroy() def createCommonButtons(master): ok = Tix.Button(master, name='ok', text='OK', width=6, command=doDestroy) cancel = Tix.Button(master, name='cancel', text='Cancel', width=6, command=doDestroy) ok.pack(side=Tix.TOP, padx=2, pady=2) cancel.pack(side=Tix.TOP, padx=2, pady=2) if __name__ == '__main__': root = Tix.Tk() RunSample(root) root.mainloop() Python-2.3.7/Demo/tix/samples/PopMenu.py0000755001241000117560000000412107445157041017351 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: PopMenu.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program using tixwish. # This file demonstrates the use of the tixPopupMenu widget. # import Tix def RunSample(w): # We create the frame and the button, then we'll bind the PopupMenu # to both widgets. The result is, when you press the right mouse # button over $w.top or $w.top.but, the PopupMenu will come up. # top = Tix.Frame(w, relief=Tix.RAISED, bd=1) but = Tix.Button(top, text='Press the right mouse button over this button or its surrounding area') but.pack(expand=1, fill=Tix.BOTH, padx=50, pady=50) p = Tix.PopupMenu(top, title='Popup Test') p.bind_widget(top) p.bind_widget(but) # Set the entries inside the PopupMenu widget. # [Hint] You have to manipulate the "menu" subwidget. # $w.top.p itself is NOT a menu widget. # [Hint] Watch carefully how the sub-menu is created # p.menu.add_command(label='Desktop', underline=0) p.menu.add_command(label='Select', underline=0) p.menu.add_command(label='Find', underline=0) p.menu.add_command(label='System', underline=1) p.menu.add_command(label='Help', underline=0) m1 = Tix.Menu(p.menu) m1.add_command(label='Hello') p.menu.add_cascade(label='More', menu=m1) but.pack(side=Tix.TOP, padx=40, pady=50) box = Tix.ButtonBox(w, orientation=Tix.HORIZONTAL) box.add('ok', text='Ok', underline=0, width=6, command=lambda w=w: w.destroy()) box.add('cancel', text='Cancel', underline=0, width=6, command=lambda w=w: w.destroy()) box.pack(side=Tix.BOTTOM, fill=Tix.X) top.pack(side=Tix.TOP, fill=Tix.BOTH, expand=1) if __name__ == '__main__': root = Tix.Tk() RunSample(root) root.mainloop() Python-2.3.7/Demo/tix/samples/CmpImg.py0000755001241000117560000001575207445157041017156 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: CmpImg.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the compound images: it uses compound # images to display a text string together with a pixmap inside # buttons # import Tix network_pixmap = """/* XPM */ static char * netw_xpm[] = { /* width height ncolors chars_per_pixel */ "32 32 7 1", /* colors */ " s None c None", ". c #000000000000", "X c white", "o c #c000c000c000", "O c #404040", "+ c blue", "@ c red", /* pixels */ " ", " .............. ", " .XXXXXXXXXXXX. ", " .XooooooooooO. ", " .Xo.......XoO. ", " .Xo.++++o+XoO. ", " .Xo.++++o+XoO. ", " .Xo.++oo++XoO. ", " .Xo.++++++XoO. ", " .Xo.+o++++XoO. ", " .Xo.++++++XoO. ", " .Xo.XXXXXXXoO. ", " .XooooooooooO. ", " .Xo@ooo....oO. ", " .............. .XooooooooooO. ", " .XXXXXXXXXXXX. .XooooooooooO. ", " .XooooooooooO. .OOOOOOOOOOOO. ", " .Xo.......XoO. .............. ", " .Xo.++++o+XoO. @ ", " .Xo.++++o+XoO. @ ", " .Xo.++oo++XoO. @ ", " .Xo.++++++XoO. @ ", " .Xo.+o++++XoO. @ ", " .Xo.++++++XoO. ..... ", " .Xo.XXXXXXXoO. .XXX. ", " .XooooooooooO.@@@@@@.X O. ", " .Xo@ooo....oO. .OOO. ", " .XooooooooooO. ..... ", " .XooooooooooO. ", " .OOOOOOOOOOOO. ", " .............. ", " "}; """ hard_disk_pixmap = """/* XPM */ static char * drivea_xpm[] = { /* width height ncolors chars_per_pixel */ "32 32 5 1", /* colors */ " s None c None", ". c #000000000000", "X c white", "o c #c000c000c000", "O c #800080008000", /* pixels */ " ", " ", " ", " ", " ", " ", " ", " ", " ", " .......................... ", " .XXXXXXXXXXXXXXXXXXXXXXXo. ", " .XooooooooooooooooooooooO. ", " .Xooooooooooooooooo..oooO. ", " .Xooooooooooooooooo..oooO. ", " .XooooooooooooooooooooooO. ", " .Xoooooooo.......oooooooO. ", " .Xoo...................oO. ", " .Xoooooooo.......oooooooO. ", " .XooooooooooooooooooooooO. ", " .XooooooooooooooooooooooO. ", " .XooooooooooooooooooooooO. ", " .XooooooooooooooooooooooO. ", " .oOOOOOOOOOOOOOOOOOOOOOOO. ", " .......................... ", " ", " ", " ", " ", " ", " ", " ", " "}; """ network_bitmap = """ #define netw_width 32 #define netw_height 32 static unsigned char netw_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfe, 0x7f, 0x00, 0x00, 0x02, 0x40, 0x00, 0x00, 0xfa, 0x5f, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0x0a, 0x52, 0x00, 0x00, 0x0a, 0x52, 0x00, 0x00, 0x8a, 0x51, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0x4a, 0x50, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0xfa, 0x5f, 0x00, 0x00, 0x02, 0x40, 0xfe, 0x7f, 0x52, 0x55, 0x02, 0x40, 0xaa, 0x6a, 0xfa, 0x5f, 0xfe, 0x7f, 0x0a, 0x50, 0xfe, 0x7f, 0x0a, 0x52, 0x80, 0x00, 0x0a, 0x52, 0x80, 0x00, 0x8a, 0x51, 0x80, 0x00, 0x0a, 0x50, 0x80, 0x00, 0x4a, 0x50, 0x80, 0x00, 0x0a, 0x50, 0xe0, 0x03, 0x0a, 0x50, 0x20, 0x02, 0xfa, 0xdf, 0x3f, 0x03, 0x02, 0x40, 0xa0, 0x02, 0x52, 0x55, 0xe0, 0x03, 0xaa, 0x6a, 0x00, 0x00, 0xfe, 0x7f, 0x00, 0x00, 0xfe, 0x7f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; """ hard_disk_bitmap = """ #define drivea_width 32 #define drivea_height 32 static unsigned char drivea_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xf8, 0xff, 0xff, 0x1f, 0x08, 0x00, 0x00, 0x18, 0xa8, 0xaa, 0xaa, 0x1a, 0x48, 0x55, 0xd5, 0x1d, 0xa8, 0xaa, 0xaa, 0x1b, 0x48, 0x55, 0x55, 0x1d, 0xa8, 0xfa, 0xaf, 0x1a, 0xc8, 0xff, 0xff, 0x1d, 0xa8, 0xfa, 0xaf, 0x1a, 0x48, 0x55, 0x55, 0x1d, 0xa8, 0xaa, 0xaa, 0x1a, 0x48, 0x55, 0x55, 0x1d, 0xa8, 0xaa, 0xaa, 0x1a, 0xf8, 0xff, 0xff, 0x1f, 0xf8, 0xff, 0xff, 0x1f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; """ def RunSample(w): w.img0 = Tix.Image('pixmap', data=network_pixmap) if not w.img0: w.img0 = Tix.Image('bitmap', data=network_bitmap) w.img1 = Tix.Image('pixmap', data=hard_disk_pixmap) if not w.img0: w.img1 = Tix.Image('bitmap', data=hard_disk_bitmap) hdd = Tix.Button(w, padx=4, pady=1, width=120) net = Tix.Button(w, padx=4, pady=1, width=120) # Create the first image: we create a line, then put a string, # a space and a image into this line, from left to right. # The result: we have a one-line image that consists of three # individual items # # The tk.calls should be methods in Tix ... w.hdd_img = Tix.Image('compound', window=hdd) w.hdd_img.tk.call(str(w.hdd_img), 'add', 'line') w.hdd_img.tk.call(str(w.hdd_img), 'add', 'text', '-text', 'Hard Disk', '-underline', '0') w.hdd_img.tk.call(str(w.hdd_img), 'add', 'space', '-width', '7') w.hdd_img.tk.call(str(w.hdd_img), 'add', 'image', '-image', w.img1) # Put this image into the first button # hdd['image'] = w.hdd_img # Next button w.net_img = Tix.Image('compound', window=net) w.net_img.tk.call(str(w.net_img), 'add', 'line') w.net_img.tk.call(str(w.net_img), 'add', 'text', '-text', 'Network', '-underline', '0') w.net_img.tk.call(str(w.net_img), 'add', 'space', '-width', '7') w.net_img.tk.call(str(w.net_img), 'add', 'image', '-image', w.img0) # Put this image into the first button # net['image'] = w.net_img close = Tix.Button(w, pady=1, text='Close', command=lambda w=w: w.destroy()) hdd.pack(side=Tix.LEFT, padx=10, pady=10, fill=Tix.Y, expand=1) net.pack(side=Tix.LEFT, padx=10, pady=10, fill=Tix.Y, expand=1) close.pack(side=Tix.LEFT, padx=10, pady=10, fill=Tix.Y, expand=1) if __name__ == '__main__': root = Tix.Tk() RunSample(root) root.mainloop() Python-2.3.7/Demo/tix/samples/DirList.py0000755001241000117560000001103307445157041017340 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: DirList.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program using tixwish. # This file demonstrates the use of the tixDirList widget -- you can # use it for the user to select a directory. For example, an installation # program can use the tixDirList widget to ask the user to select the # installation directory for an application. # import Tix, os, copy from Tkconstants import * TCL_ALL_EVENTS = 0 def RunSample (root): dirlist = DemoDirList(root) dirlist.mainloop() dirlist.destroy() class DemoDirList: def __init__(self, w): self.root = w self.exit = -1 z = w.winfo_toplevel() z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) # Create the tixDirList and the tixLabelEntry widgets on the on the top # of the dialog box # bg = root.tk.eval('tix option get bg') # adding bg=bg crashes Windows pythonw tk8.3.3 Python 2.1.0 top = Tix.Frame( w, relief=RAISED, bd=1) # Create the DirList widget. By default it will show the current # directory # # top.dir = Tix.DirList(top) top.dir.hlist['width'] = 40 # When the user presses the ".." button, the selected directory # is "transferred" into the entry widget # top.btn = Tix.Button(top, text = " >> ", pady = 0) # We use a LabelEntry to hold the installation directory. The user # can choose from the DirList widget, or he can type in the directory # manually # top.ent = Tix.LabelEntry(top, label="Installation Directory:", labelside = 'top', options = ''' entry.width 40 label.anchor w ''') font = self.root.tk.eval('tix option get fixed_font') # font = self.root.master.tix_option_get('fixed_font') top.ent.entry['font'] = font self.dlist_dir = copy.copy(os.curdir) # This should work setting the entry's textvariable top.ent.entry['textvariable'] = self.dlist_dir top.btn['command'] = lambda dir=top.dir, ent=top.ent, self=self: \ self.copy_name(dir,ent) # top.ent.entry.insert(0,'tix'+`self`) top.ent.entry.bind('', lambda self=self: self.okcmd () ) top.pack( expand='yes', fill='both', side=TOP) top.dir.pack( expand=1, fill=BOTH, padx=4, pady=4, side=LEFT) top.btn.pack( anchor='s', padx=4, pady=4, side=LEFT) top.ent.pack( expand=1, fill=X, anchor='s', padx=4, pady=4, side=LEFT) # Use a ButtonBox to hold the buttons. # box = Tix.ButtonBox (w, orientation='horizontal') box.add ('ok', text='Ok', underline=0, width=6, command = lambda self=self: self.okcmd () ) box.add ('cancel', text='Cancel', underline=0, width=6, command = lambda self=self: self.quitcmd () ) box.pack( anchor='s', fill='x', side=BOTTOM) def copy_name (self, dir, ent): # This should work as it is the entry's textvariable self.dlist_dir = dir.cget('value') # but it isn't so I'll do it manually ent.entry.delete(0,'end') ent.entry.insert(0, self.dlist_dir) def okcmd (self): # tixDemo:Status "You have selected the directory" + self.dlist_dir self.quitcmd() def quitcmd (self): self.exit = 0 def mainloop(self): while self.exit < 0: self.root.tk.dooneevent(TCL_ALL_EVENTS) def destroy (self): self.root.destroy() # This "if" statement makes it possible to run this script file inside or # outside of the main demo program "tixwidgets.py". # if __name__== '__main__' : import tkMessageBox, traceback try: root=Tix.Tk() RunSample(root) except: t, v, tb = sys.exc_info() text = "Error running the demo script:\n" for line in traceback.format_exception(t,v,tb): text = text + line + '\n' d = tkMessageBox.showerror ( 'Tix Demo Error', text) Python-2.3.7/Demo/tix/samples/Tree.py0000755001241000117560000000525507445157041016676 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: Tree.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates how to use the TixTree widget to display # dynamic hierachical data (the files in the Unix file system) # import Tix, os def RunSample(w): top = Tix.Frame(w, relief=Tix.RAISED, bd=1) tree = Tix.Tree(top, options='separator "/"') tree.pack(expand=1, fill=Tix.BOTH, padx=10, pady=10, side=Tix.LEFT) tree['opencmd'] = lambda dir=None, w=tree: opendir(w, dir) # The / directory is added in the "open" mode. The user can open it # and then browse its subdirectories ... adddir(tree, "/") box = Tix.ButtonBox(w, orientation=Tix.HORIZONTAL) box.add('ok', text='Ok', underline=0, command=w.destroy, width=6) box.add('cancel', text='Cancel', underline=0, command=w.destroy, width=6) box.pack(side=Tix.BOTTOM, fill=Tix.X) top.pack(side=Tix.TOP, fill=Tix.BOTH, expand=1) def adddir(tree, dir): if dir == '/': text = '/' else: text = os.path.basename(dir) tree.hlist.add(dir, itemtype=Tix.IMAGETEXT, text=text, image=tree.tk.call('tix', 'getimage', 'folder')) try: os.listdir(dir) tree.setmode(dir, 'open') except os.error: # No read permission ? pass # This function is called whenever the user presses the (+) indicator or # double clicks on a directory whose mode is "open". It loads the files # inside that directory into the Tree widget. # # Note we didn't specify the closecmd option for the Tree widget, so it # performs the default action when the user presses the (-) indicator or # double clicks on a directory whose mode is "close": hide all of its child # entries def opendir(tree, dir): entries = tree.hlist.info_children(dir) if entries: # We have already loaded this directory. Let's just # show all the child entries # # Note: since we load the directory only once, it will not be # refreshed if the you add or remove files from this # directory. # for entry in entries: tree.hlist.show_entry(entry) files = os.listdir(dir) for file in files: if os.path.isdir(dir + '/' + file): adddir(tree, dir + '/' + file) else: tree.hlist.add(dir + '/' + file, itemtype=Tix.IMAGETEXT, text=file, image=tree.tk.call('tix', 'getimage', 'file')) if __name__ == '__main__': root = Tix.Tk() RunSample(root) root.mainloop() Python-2.3.7/Demo/tix/samples/PanedWin.py0000755001241000117560000000744007400202520017462 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: PanedWin.py 24350 2001-11-25 14:50:56Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the tixPanedWindow widget. This program # is a dummy news reader: the user can adjust the sizes of the list # of artical names and the size of the text widget that shows the body # of the article. import Tix TCL_ALL_EVENTS = 0 def RunSample (root): panedwin = DemoPanedwin(root) panedwin.mainloop() panedwin.destroy() class DemoPanedwin: def __init__(self, w): self.root = w self.exit = -1 z = w.winfo_toplevel() z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) group = Tix.LabelEntry(w, label='Newsgroup:', options='entry.width 25') group.entry.insert(0,'comp.lang.python') pane = Tix.PanedWindow(w, orientation='vertical') p1 = pane.add('list', min=70, size=100) p2 = pane.add('text', min=70) list = Tix.ScrolledListBox(p1) list.listbox['width'] = 80 list.listbox['height'] = 5 text = Tix.ScrolledText(p2) text.text['width'] = 80 text.text['height'] = 20 list.listbox.insert(Tix.END, " 12324 Re: Tkinter is good for your health") list.listbox.insert(Tix.END, "+ 12325 Re: Tkinter is good for your health") list.listbox.insert(Tix.END, "+ 12326 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, " 12327 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, "+ 12328 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, " 12329 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, "+ 12330 Re: Tix is even better for your health (Was: Tkinter is good...)") text.text['bg'] = list.listbox['bg'] text.text['wrap'] = 'none' text.text.insert(Tix.END, """ Mon, 19 Jun 1995 11:39:52 comp.lang.python Thread 34 of 220 Lines 353 A new way to put text and bitmaps together iNo responses ioi@blue.seas.upenn.edu Ioi K. Lam at University of Pennsylvania Hi, I have implemented a new image type called "compound". It allows you to glue together a bunch of bitmaps, images and text strings together to form a bigger image. Then you can use this image with widgets that support the -image option. For example, you can display a text string string together with a bitmap, at the same time, inside a TK button widget. """) text.text['state'] = 'disabled' list.pack(expand=1, fill=Tix.BOTH, padx=4, pady=6) text.pack(expand=1, fill=Tix.BOTH, padx=4, pady=6) group.pack(side=Tix.TOP, padx=3, pady=3, fill=Tix.BOTH) pane.pack(side=Tix.TOP, padx=3, pady=3, fill=Tix.BOTH, expand=1) box = Tix.ButtonBox(w, orientation=Tix.HORIZONTAL) box.add('ok', text='Ok', underline=0, width=6, command=self.quitcmd) box.add('cancel', text='Cancel', underline=0, width=6, command=self.quitcmd) box.pack(side=Tix.BOTTOM, fill=Tix.X) def quitcmd (self): self.exit = 0 def mainloop(self): while self.exit < 0: self.root.tk.dooneevent(TCL_ALL_EVENTS) def destroy (self): self.root.destroy() if __name__ == '__main__': root = Tix.Tk() RunSample(root) Python-2.3.7/Demo/tix/samples/SHList2.py0000755001241000117560000001274707445157041017233 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: SHList2.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidget": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program using tixwish. # This file demonstrates how to use multiple columns and multiple styles # in the tixHList widget # # In a tixHList widget, you can have one ore more columns. # import Tix TCL_ALL_EVENTS = 0 def RunSample (root): shlist = DemoSHList(root) shlist.mainloop() shlist.destroy() class DemoSHList: def __init__(self, w): self.root = w self.exit = -1 z = w.winfo_toplevel() z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) # We create the frame and the ScrolledHList widget # at the top of the dialog box # top = Tix.Frame( w, relief=Tix.RAISED, bd=1) # Put a simple hierachy into the HList (two levels). Use colors and # separator widgets (frames) to make the list look fancy # top.a = Tix.ScrolledHList(top, options='hlist.columns 3 hlist.header 1' ) top.a.pack( expand=1, fill=Tix.BOTH, padx=10, pady=10, side=Tix.TOP) hlist=top.a.hlist # Create the title for the HList widget # >> Notice that we have set the hlist.header subwidget option to true # so that the header is displayed # boldfont=hlist.tk.call('tix','option','get','bold_font') # First some styles for the headers style={} style['header'] = Tix.DisplayStyle(Tix.TEXT, refwindow=hlist, anchor=Tix.CENTER, padx=8, pady=2, font = boldfont ) hlist.header_create(0, itemtype=Tix.TEXT, text='Name', style=style['header']) hlist.header_create(1, itemtype=Tix.TEXT, text='Position', style=style['header']) # Notice that we use 3 columns in the hlist widget. This way when the user # expands the windows wide, the right side of the header doesn't look # chopped off. The following line ensures that the 3 column header is # not shown unless the hlist window is wider than its contents. # hlist.column_width(2,0) # This is our little relational database # boss = ('doe', 'John Doe', 'Director') managers = [ ('jeff', 'Jeff Waxman', 'Manager'), ('john', 'John Lee', 'Manager'), ('peter', 'Peter Kenson', 'Manager') ] employees = [ ('alex', 'john', 'Alex Kellman', 'Clerk'), ('alan', 'john', 'Alan Adams', 'Clerk'), ('andy', 'peter', 'Andreas Crawford', 'Salesman'), ('doug', 'jeff', 'Douglas Bloom', 'Clerk'), ('jon', 'peter', 'Jon Baraki', 'Salesman'), ('chris', 'jeff', 'Chris Geoffrey', 'Clerk'), ('chuck', 'jeff', 'Chuck McLean', 'Cleaner') ] style['mgr_name'] = Tix.DisplayStyle(Tix.TEXT, refwindow=hlist) style['mgr_posn'] = Tix.DisplayStyle(Tix.TEXT, padx=8, refwindow=hlist) style['empl_name'] = Tix.DisplayStyle(Tix.TEXT, refwindow=hlist) style['empl_posn'] = Tix.DisplayStyle(Tix.TEXT, padx=8, refwindow=hlist) # Let configure the appearance of the HList subwidget # hlist.config(separator='.', width=25, drawbranch=0, indent=10) hlist.column_width(0, chars=20) # Create the boss # hlist.add ('.', itemtype=Tix.TEXT, text=boss[1], style=style['mgr_name']) hlist.item_create('.', 1, itemtype=Tix.TEXT, text=boss[2], style=style['mgr_posn']) # Create the managers # for key,name,posn in managers : e= '.'+ key hlist.add(e, itemtype=Tix.TEXT, text=name, style=style['mgr_name']) hlist.item_create(e, 1, itemtype=Tix.TEXT, text=posn, style=style['mgr_posn']) for key,mgr,name,posn in employees : # "." is the separator character we chose above entrypath = '.' + mgr + '.' + key # ^^^^^^^^^^^^^^^ ^^^^^^^^^^^^^^^ # parent entryPath / child's name hlist.add(entrypath, text=name, style=style['empl_name']) hlist.item_create(entrypath, 1, itemtype=Tix.TEXT, text = posn, style = style['empl_posn'] ) # Use a ButtonBox to hold the buttons. # box= Tix.ButtonBox(top, orientation=Tix.HORIZONTAL ) box.add( 'ok', text='Ok', underline=0, width=6, command = self.okcmd ) box.add( 'cancel', text='Cancel', underline=0, width=6, command = self.quitcmd ) box.pack( side=Tix.BOTTOM, fill=Tix.X) top.pack( side=Tix.TOP, fill=Tix.BOTH, expand=1 ) def okcmd (self): self.quitcmd() def quitcmd (self): self.exit = 0 def mainloop(self): while self.exit < 0: self.root.tk.dooneevent(TCL_ALL_EVENTS) def destroy (self): self.root.destroy() # This "if" statement makes it possible to run this script file inside or # outside of the main demo program "tixwidgets.py". # if __name__== '__main__' : root=Tix.Tk() RunSample(root) Python-2.3.7/Demo/tix/samples/Control.py0000755001241000117560000001005707445157041017413 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: Control.py 25707 2002-03-17 18:19:13Z loewis $ # # Tix Demostration Program # # This sample program is structured in such a way so that it can be # executed from the Tix demo program "tixwidgets.py": it must have a # procedure called "RunSample". It should also have the "if" statment # at the end of this file so that it can be run as a standalone # program. # This file demonstrates the use of the tixControl widget -- it is an # entry widget with up/down arrow buttons. You can use the arrow buttons # to adjust the value inside the entry widget. # # This example program uses three Control widgets. One lets you select # integer values; one lets you select floating point values and the last # one lets you select a few names. import Tix TCL_ALL_EVENTS = 0 def RunSample (root): control = DemoControl(root) control.mainloop() control.destroy() class DemoControl: def __init__(self, w): self.root = w self.exit = -1 global demo_maker, demo_thrust, demo_num_engines demo_maker = Tix.StringVar() demo_thrust = Tix.DoubleVar() demo_num_engines = Tix.IntVar() demo_maker.set('P&W') demo_thrust.set(20000.0) demo_num_engines.set(2) top = Tix.Frame(w, bd=1, relief=Tix.RAISED) # $w.top.a allows only integer values # # [Hint] The -options switch sets the options of the subwidgets. # [Hint] We set the label.width subwidget option of the Controls to # be 16 so that their labels appear to be aligned. # a = Tix.Control(top, label='Number of Engines: ', integer=1, variable=demo_num_engines, min=1, max=4, options='entry.width 10 label.width 20 label.anchor e') b = Tix.Control(top, label='Thrust: ', integer=0, min='10000.0', max='60000.0', step=500, variable=demo_thrust, options='entry.width 10 label.width 20 label.anchor e') c = Tix.Control(top, label='Engine Maker: ', value='P&W', variable=demo_maker, options='entry.width 10 label.width 20 label.anchor e') # We can't define these in the init because the widget 'c' doesn't # exist yet and we need to reference it c['incrcmd'] = lambda w=c: adjust_maker(w, 1) c['decrcmd'] = lambda w=c: adjust_maker(w, -1) c['validatecmd'] = lambda w=c: validate_maker(w) a.pack(side=Tix.TOP, anchor=Tix.W) b.pack(side=Tix.TOP, anchor=Tix.W) c.pack(side=Tix.TOP, anchor=Tix.W) box = Tix.ButtonBox(w, orientation=Tix.HORIZONTAL) box.add('ok', text='Ok', underline=0, width=6, command=self.okcmd) box.add('cancel', text='Cancel', underline=0, width=6, command=self.quitcmd) box.pack(side=Tix.BOTTOM, fill=Tix.X) top.pack(side=Tix.TOP, fill=Tix.BOTH, expand=1) def okcmd (self): # tixDemo:Status "Selected %d of %s engines each of thrust %d", (demo_num_engines.get(), demo_maker.get(), demo_thrust.get()) self.quitcmd() def quitcmd (self): self.exit = 0 def mainloop(self): while self.exit < 0: self.root.tk.dooneevent(TCL_ALL_EVENTS) def destroy (self): self.root.destroy() maker_list = ['P&W', 'GE', 'Rolls Royce'] def adjust_maker(w, inc): i = maker_list.index(demo_maker.get()) i = i + inc if i >= len(maker_list): i = 0 elif i < 0: i = len(maker_list) - 1 # In Tcl/Tix we should return the string maker_list[i]. We can't # do that in Tkinter so we set the global variable. (This works). demo_maker.set(maker_list[i]) def validate_maker(w): try: i = maker_list.index(demo_maker.get()) except ValueError: # Works here though. Why ? Beats me. return maker_list[0] # Works here though. Why ? Beats me. return maker_list[i] if __name__ == '__main__': root = Tix.Tk() RunSample(root) Python-2.3.7/Demo/tix/INSTALL.txt0000644001241000117560000000733707373503051015624 0ustar loewishpifb6$Id: INSTALL.txt 24230 2001-11-11 14:07:37Z loewis $ Installing Tix.py ---------------- 0) To use Tix.py, you need Tcl/Tk (V8.3.3), Tix (V8.1.1) and Python (V2.1.1). Tix.py has been written and tested on a Intel Pentium running RH Linux 5.2 and Mandrake Linux 7.0 and Windows with the above mentioned packages. Older versions, e.g. Tix 4.1 and Tk 8.0, might also work. There is nothing OS-specific in Tix.py itself so it should work on any machine with Tix and Python installed. You can get Tcl and Tk from http://dev.scriptics.com and Tix from http://tix.sourceforge.net. 1) Build and install Tcl/Tk 8.3. Build and install Tix 8.1. Ensure that Tix is properly installed by running tixwish and executing the demo programs. Under Unix, use the --enable-shared configure option for all three. We recommend tcl8.3.3 for this release of Tix.py. 2a) If you have a distribution like ActiveState with a tcl subdirectory of $PYTHONHOME, which contains the directories tcl8.3 and tk8.3, make a directory tix8.1 as well. Recursively copy the files from /library to $PYTHONHOME/lib/tix8.1, and copy the dynamic library (tix8183.dll or libtix8.1.8.3.so) to the same place as the tcl dynamic libraries ($PYTHONHOME/Dlls or lib/python-2.1/lib-dynload). In this case you are all installed, and you can skip to the end. 2b) Modify Modules/Setup.dist and setup.py to change the version of the tix library from tix4.1.8.0 to tix8.1.8.3 These modified files can be used for Tkinter with or without Tix. 3) The default is to build dynamically, and use the Tcl 'package require'. To build statically, modify the Modules/Setup file to link in the Tix library according to the comments in the file. On Linux this looks like: # *** Always uncomment this (leave the leading underscore in!): _tkinter _tkinter.c tkappinit.c -DWITH_APPINIT \ # *** Uncomment and edit to reflect where your Tcl/Tk libraries are: -L/usr/local/lib \ # *** Uncomment and edit to reflect where your Tcl/Tk headers are: -I/usr/local/include \ # *** Uncomment and edit to reflect where your X11 header files are: -I/usr/X11R6/include \ # *** Or uncomment this for Solaris: # -I/usr/openwin/include \ # *** Uncomment and edit for BLT extension only: # -DWITH_BLT -I/usr/local/blt/blt8.0-unoff/include -lBLT8.0 \ # *** Uncomment and edit for PIL (TkImaging) extension only: # (See http://www.pythonware.com/products/pil/ for more info) # -DWITH_PIL -I../Extensions/Imaging/libImaging tkImaging.c \ # *** Uncomment and edit for TOGL extension only: # -DWITH_TOGL togl.c \ # *** Uncomment and edit for Tix extension only: -DWITH_TIX -ltix8.1.8.3 \ # *** Uncomment and edit to reflect your Tcl/Tk versions: -ltk8.3 -ltcl8.3 \ # *** Uncomment and edit to reflect where your X11 libraries are: -L/usr/X11R6/lib \ # *** Or uncomment this for Solaris: # -L/usr/openwin/lib \ # *** Uncomment these for TOGL extension only: # -lGL -lGLU -lXext -lXmu \ # *** Uncomment for AIX: # -lld \ # *** Always uncomment this; X11 libraries to link with: -lX11 4) Rebuild Python and reinstall. You should now have a working Tix implementation in Python. To see if all is as it should be, run the 'tixwidgets.py' script in the Demo/tix directory. Under X windows, do /usr/local/bin/python Demo/tix/tixwidgets.py If this does not work, you may need to tell python where to find the Tcl, Tk and Tix library files. This is done by setting the TCL_LIBRARY, TK_LIBRARY and TIX_LIBRARY environment variables. Try this: env TCL_LIBRARY=/usr/local/lib/tcl8.3 \ TK_LIBRARY=/usr/local/lib/tk8.3 \ TIX_LIBRARY=/usr/local/lib/tix8.1 \ /usr/local/bin/python Demo/tix/tixwidgets.py If you find any bugs or have suggestions for improvement, please report them via http://tix.sourceforge.net Python-2.3.7/Demo/tix/README.txt0000644001241000117560000000132607373503051015443 0ustar loewishpifb6About Tix.py ----------- Tix.py is based on an idea of Jean-Marc Lugrin (lugrin@ms.com) who wrote pytix (another Python-Tix marriage). Tix widgets are an attractive and useful extension to Tk. See http://tix.sourceforge.net for more details about Tix and how to get it. Features: 1) It is almost complete. 2) Tix widgets are represented by classes in Python. Sub-widgets are members of the mega-widget class. For example, if a particular TixWidget (e.g. ScrolledText) has an embedded widget (Text in this case), it is possible to call the methods of the child directly. 3) The members of the class are created automatically. In the case of widgets like ButtonBox, the members are added dynamically. Python-2.3.7/Demo/tix/tixwidgets.py0000644001241000117560000010634207604156041016516 0ustar loewishpifb6# -*-mode: python; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- # # $Id: tixwidgets.py 30388 2002-12-30 23:52:01Z nnorwitz $ # # tixwidgets.py -- # # For Tix, see http://tix.sourceforge.net # # This is a demo program of some of the Tix widgets available in Python. # If you have installed Python & Tix properly, you can execute this as # # % python tixwidgets.py # import os, os.path, sys, Tix from Tkconstants import * import traceback, tkMessageBox TCL_DONT_WAIT = 1<<1 TCL_WINDOW_EVENTS = 1<<2 TCL_FILE_EVENTS = 1<<3 TCL_TIMER_EVENTS = 1<<4 TCL_IDLE_EVENTS = 1<<5 TCL_ALL_EVENTS = 0 class Demo: def __init__(self, top): self.root = top self.exit = -1 self.dir = None # script directory self.balloon = None # balloon widget self.useBalloons = Tix.StringVar() self.useBalloons.set('0') self.statusbar = None # status bar widget self.welmsg = None # Msg widget self.welfont = '' # font name self.welsize = '' # font size progname = sys.argv[0] dirname = os.path.dirname(progname) if dirname and dirname != os.curdir: self.dir = dirname index = -1 for i in range(len(sys.path)): p = sys.path[i] if p in ("", os.curdir): index = i if index >= 0: sys.path[index] = dirname else: sys.path.insert(0, dirname) else: self.dir = os.getcwd() sys.path.insert(0, self.dir+'/samples') def MkMainMenu(self): top = self.root w = Tix.Frame(top, bd=2, relief=RAISED) file = Tix.Menubutton(w, text='File', underline=0, takefocus=0) help = Tix.Menubutton(w, text='Help', underline=0, takefocus=0) file.pack(side=LEFT) help.pack(side=RIGHT) fm = Tix.Menu(file, tearoff=0) file['menu'] = fm hm = Tix.Menu(help, tearoff=0) help['menu'] = hm fm.add_command(label='Exit', underline=1, command = lambda self=self: self.quitcmd () ) hm.add_checkbutton(label='BalloonHelp', underline=0, command=ToggleHelp, variable=self.useBalloons) # The trace variable option doesn't seem to work, instead I use 'command' #apply(w.tk.call, ('trace', 'variable', self.useBalloons, 'w', # ToggleHelp)) return w def MkMainNotebook(self): top = self.root w = Tix.NoteBook(top, ipadx=5, ipady=5, options=""" tagPadX 6 tagPadY 4 borderWidth 2 """) # This may be required if there is no *Background option top['bg'] = w['bg'] w.add('wel', label='Welcome', underline=0, createcmd=lambda w=w, name='wel': MkWelcome(w, name)) w.add('cho', label='Choosers', underline=0, createcmd=lambda w=w, name='cho': MkChoosers(w, name)) w.add('scr', label='Scrolled Widgets', underline=0, createcmd=lambda w=w, name='scr': MkScroll(w, name)) w.add('mgr', label='Manager Widgets', underline=0, createcmd=lambda w=w, name='mgr': MkManager(w, name)) w.add('dir', label='Directory List', underline=0, createcmd=lambda w=w, name='dir': MkDirList(w, name)) w.add('exp', label='Run Sample Programs', underline=0, createcmd=lambda w=w, name='exp': MkSample(w, name)) return w def MkMainStatus(self): global demo top = self.root w = Tix.Frame(top, relief=Tix.RAISED, bd=1) demo.statusbar = Tix.Label(w, relief=Tix.SUNKEN, bd=1) demo.statusbar.form(padx=3, pady=3, left=0, right='%70') return w def build(self): root = self.root z = root.winfo_toplevel() z.wm_title('Tix Widget Demonstration') if z.winfo_screenwidth() <= 800: z.geometry('790x590+10+10') else: z.geometry('890x640+10+10') demo.balloon = Tix.Balloon(root) frame1 = self.MkMainMenu() frame2 = self.MkMainNotebook() frame3 = self.MkMainStatus() frame1.pack(side=TOP, fill=X) frame3.pack(side=BOTTOM, fill=X) frame2.pack(side=TOP, expand=1, fill=BOTH, padx=4, pady=4) demo.balloon['statusbar'] = demo.statusbar z.wm_protocol("WM_DELETE_WINDOW", lambda self=self: self.quitcmd()) # To show Tcl errors - uncomment this to see the listbox bug. # Tkinter defines a Tcl tkerror procedure that in effect # silences all background Tcl error reporting. # root.tk.eval('if {[info commands tkerror] != ""} {rename tkerror pytkerror}') def quitcmd (self): """Quit our mainloop. It is up to you to call root.destroy() after.""" self.exit = 0 def loop(self): """This is an explict replacement for _tkinter mainloop() It lets you catch keyboard interrupts easier, and avoids the 20 msec. dead sleep() which burns a constant CPU.""" while self.exit < 0: # There are 2 whiles here. The outer one lets you continue # after a ^C interrupt. try: # This is the replacement for _tkinter mainloop() # It blocks waiting for the next Tcl event using select. while self.exit < 0: self.root.tk.dooneevent(TCL_ALL_EVENTS) except SystemExit: # Tkinter uses SystemExit to exit #print 'Exit' self.exit = 1 return except KeyboardInterrupt: if tkMessageBox.askquestion ('Interrupt', 'Really Quit?') == 'yes': # self.tk.eval('exit') self.exit = 1 return continue except: # Otherwise it's some other error - be nice and say why t, v, tb = sys.exc_info() text = "" for line in traceback.format_exception(t,v,tb): text += line + '\n' try: tkMessageBox.showerror ('Error', text) except: pass self.exit = 1 raise SystemExit, 1 def destroy (self): self.root.destroy() def RunMain(root): global demo demo = Demo(root) demo.build() demo.loop() demo.destroy() # Tabs def MkWelcome(nb, name): w = nb.page(name) bar = MkWelcomeBar(w) text = MkWelcomeText(w) bar.pack(side=TOP, fill=X, padx=2, pady=2) text.pack(side=TOP, fill=BOTH, expand=1) def MkWelcomeBar(top): global demo w = Tix.Frame(top, bd=2, relief=Tix.GROOVE) b1 = Tix.ComboBox(w, command=lambda w=top: MainTextFont(w)) b2 = Tix.ComboBox(w, command=lambda w=top: MainTextFont(w)) b1.entry['width'] = 15 b1.slistbox.listbox['height'] = 3 b2.entry['width'] = 4 b2.slistbox.listbox['height'] = 3 demo.welfont = b1 demo.welsize = b2 b1.insert(Tix.END, 'Courier') b1.insert(Tix.END, 'Helvetica') b1.insert(Tix.END, 'Lucida') b1.insert(Tix.END, 'Times Roman') b2.insert(Tix.END, '8') b2.insert(Tix.END, '10') b2.insert(Tix.END, '12') b2.insert(Tix.END, '14') b2.insert(Tix.END, '18') b1.pick(1) b2.pick(3) b1.pack(side=Tix.LEFT, padx=4, pady=4) b2.pack(side=Tix.LEFT, padx=4, pady=4) demo.balloon.bind_widget(b1, msg='Choose\na font', statusmsg='Choose a font for this page') demo.balloon.bind_widget(b2, msg='Point size', statusmsg='Choose the font size for this page') return w def MkWelcomeText(top): global demo w = Tix.ScrolledWindow(top, scrollbar='auto') win = w.window text = 'Welcome to TIX in Python' title = Tix.Label(win, bd=0, width=30, anchor=Tix.N, text=text) msg = Tix.Message(win, bd=0, width=400, anchor=Tix.N, text='Tix is a set of mega-widgets based on TK. This program \ demonstrates the widgets in the Tix widget set. You can choose the pages \ in this window to look at the corresponding widgets. \n\n\ To quit this program, choose the "File | Exit" command.\n\n\ For more information, see http://tix.sourceforge.net.') title.pack(expand=1, fill=Tix.BOTH, padx=10, pady=10) msg.pack(expand=1, fill=Tix.BOTH, padx=10, pady=10) demo.welmsg = msg return w def MainTextFont(w): global demo if not demo.welmsg: return font = demo.welfont['value'] point = demo.welsize['value'] if font == 'Times Roman': font = 'times' fontstr = '%s %s' % (font, point) demo.welmsg['font'] = fontstr def ToggleHelp(): if demo.useBalloons.get() == '1': demo.balloon['state'] = 'both' else: demo.balloon['state'] = 'none' def MkChoosers(nb, name): w = nb.page(name) options = "label.padX 4" til = Tix.LabelFrame(w, label='Chooser Widgets', options=options) cbx = Tix.LabelFrame(w, label='tixComboBox', options=options) ctl = Tix.LabelFrame(w, label='tixControl', options=options) sel = Tix.LabelFrame(w, label='tixSelect', options=options) opt = Tix.LabelFrame(w, label='tixOptionMenu', options=options) fil = Tix.LabelFrame(w, label='tixFileEntry', options=options) fbx = Tix.LabelFrame(w, label='tixFileSelectBox', options=options) tbr = Tix.LabelFrame(w, label='Tool Bar', options=options) MkTitle(til.frame) MkCombo(cbx.frame) MkControl(ctl.frame) MkSelect(sel.frame) MkOptMenu(opt.frame) MkFileEnt(fil.frame) MkFileBox(fbx.frame) MkToolBar(tbr.frame) # First column: comBox and selector cbx.form(top=0, left=0, right='%33') sel.form(left=0, right='&'+str(cbx), top=cbx) opt.form(left=0, right='&'+str(cbx), top=sel, bottom=-1) # Second column: title .. etc til.form(left=cbx, top=0,right='%66') ctl.form(left=cbx, right='&'+str(til), top=til) fil.form(left=cbx, right='&'+str(til), top=ctl) tbr.form(left=cbx, right='&'+str(til), top=fil, bottom=-1) # # Third column: file selection fbx.form(right=-1, top=0, left='%66') def MkCombo(w): options="label.width %d label.anchor %s entry.width %d" % (10, Tix.E, 14) static = Tix.ComboBox(w, label='Static', editable=0, options=options) editable = Tix.ComboBox(w, label='Editable', editable=1, options=options) history = Tix.ComboBox(w, label='History', editable=1, history=1, anchor=Tix.E, options=options) static.insert(Tix.END, 'January') static.insert(Tix.END, 'February') static.insert(Tix.END, 'March') static.insert(Tix.END, 'April') static.insert(Tix.END, 'May') static.insert(Tix.END, 'June') static.insert(Tix.END, 'July') static.insert(Tix.END, 'August') static.insert(Tix.END, 'September') static.insert(Tix.END, 'October') static.insert(Tix.END, 'November') static.insert(Tix.END, 'December') editable.insert(Tix.END, 'Angola') editable.insert(Tix.END, 'Bangladesh') editable.insert(Tix.END, 'China') editable.insert(Tix.END, 'Denmark') editable.insert(Tix.END, 'Ecuador') history.insert(Tix.END, '/usr/bin/ksh') history.insert(Tix.END, '/usr/local/lib/python') history.insert(Tix.END, '/var/adm') static.pack(side=Tix.TOP, padx=5, pady=3) editable.pack(side=Tix.TOP, padx=5, pady=3) history.pack(side=Tix.TOP, padx=5, pady=3) states = ['Bengal', 'Delhi', 'Karnataka', 'Tamil Nadu'] def spin_cmd(w, inc): idx = states.index(demo_spintxt.get()) + inc if idx < 0: idx = len(states) - 1 elif idx >= len(states): idx = 0 # following doesn't work. # return states[idx] demo_spintxt.set(states[idx]) # this works def spin_validate(w): global states, demo_spintxt try: i = states.index(demo_spintxt.get()) except ValueError: return states[0] return states[i] # why this procedure works as opposed to the previous one beats me. def MkControl(w): global demo_spintxt options="label.width %d label.anchor %s entry.width %d" % (10, Tix.E, 13) demo_spintxt = Tix.StringVar() demo_spintxt.set(states[0]) simple = Tix.Control(w, label='Numbers', options=options) spintxt = Tix.Control(w, label='States', variable=demo_spintxt, options=options) spintxt['incrcmd'] = lambda w=spintxt: spin_cmd(w, 1) spintxt['decrcmd'] = lambda w=spintxt: spin_cmd(w, -1) spintxt['validatecmd'] = lambda w=spintxt: spin_validate(w) simple.pack(side=Tix.TOP, padx=5, pady=3) spintxt.pack(side=Tix.TOP, padx=5, pady=3) def MkSelect(w): options = "label.anchor %s" % Tix.CENTER sel1 = Tix.Select(w, label='Mere Mortals', allowzero=1, radio=1, orientation=Tix.VERTICAL, labelside=Tix.TOP, options=options) sel2 = Tix.Select(w, label='Geeks', allowzero=1, radio=0, orientation=Tix.VERTICAL, labelside= Tix.TOP, options=options) sel1.add('eat', text='Eat') sel1.add('work', text='Work') sel1.add('play', text='Play') sel1.add('party', text='Party') sel1.add('sleep', text='Sleep') sel2.add('eat', text='Eat') sel2.add('prog1', text='Program') sel2.add('prog2', text='Program') sel2.add('prog3', text='Program') sel2.add('sleep', text='Sleep') sel1.pack(side=Tix.LEFT, padx=5, pady=3, fill=Tix.X) sel2.pack(side=Tix.LEFT, padx=5, pady=3, fill=Tix.X) def MkOptMenu(w): options='menubutton.width 15 label.anchor %s' % Tix.E m = Tix.OptionMenu(w, label='File Format : ', options=options) m.add_command('text', label='Plain Text') m.add_command('post', label='PostScript') m.add_command('format', label='Formatted Text') m.add_command('html', label='HTML') m.add_command('sep') m.add_command('tex', label='LaTeX') m.add_command('rtf', label='Rich Text Format') m.pack(fill=Tix.X, padx=5, pady=3) def MkFileEnt(w): msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='Press the "open file" icon button and a TixFileSelectDialog will popup.') ent = Tix.FileEntry(w, label='Select a file : ') msg.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=3, pady=3) ent.pack(side=Tix.TOP, fill=Tix.X, padx=3, pady=3) def MkFileBox(w): """The FileSelectBox is a Motif-style box with various enhancements. For example, you can adjust the size of the two listboxes and your past selections are recorded. """ msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='The Tix FileSelectBox is a Motif-style box with various enhancements. For example, you can adjust the size of the two listboxes and your past selections are recorded.') box = Tix.FileSelectBox(w) msg.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=3, pady=3) box.pack(side=Tix.TOP, fill=Tix.X, padx=3, pady=3) def MkToolBar(w): """The Select widget is also good for arranging buttons in a tool bar. """ global demo options='frame.borderWidth 1' msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='The Select widget is also good for arranging buttons in a tool bar.') bar = Tix.Frame(w, bd=2, relief=Tix.RAISED) font = Tix.Select(w, allowzero=1, radio=0, label='', options=options) para = Tix.Select(w, allowzero=0, radio=1, label='', options=options) font.add('bold', bitmap='@' + demo.dir + '/bitmaps/bold.xbm') font.add('italic', bitmap='@' + demo.dir + '/bitmaps/italic.xbm') font.add('underline', bitmap='@' + demo.dir + '/bitmaps/underline.xbm') font.add('capital', bitmap='@' + demo.dir + '/bitmaps/capital.xbm') para.add('left', bitmap='@' + demo.dir + '/bitmaps/leftj.xbm') para.add('right', bitmap='@' + demo.dir + '/bitmaps/rightj.xbm') para.add('center', bitmap='@' + demo.dir + '/bitmaps/centerj.xbm') para.add('justify', bitmap='@' + demo.dir + '/bitmaps/justify.xbm') msg.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=3, pady=3) bar.pack(side=Tix.TOP, fill=Tix.X, padx=3, pady=3) font.pack({'in':bar}, side=Tix.LEFT, padx=3, pady=3) para.pack({'in':bar}, side=Tix.LEFT, padx=3, pady=3) def MkTitle(w): msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='There are many types of "chooser" widgets that allow the user to input different types of information') msg.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=3, pady=3) def MkScroll(nb, name): w = nb.page(name) options='label.padX 4' sls = Tix.LabelFrame(w, label='Tix.ScrolledListBox', options=options) swn = Tix.LabelFrame(w, label='Tix.ScrolledWindow', options=options) stx = Tix.LabelFrame(w, label='Tix.ScrolledText', options=options) MkSList(sls.frame) MkSWindow(swn.frame) MkSText(stx.frame) sls.form(top=0, left=0, right='%33', bottom=-1) swn.form(top=0, left=sls, right='%66', bottom=-1) stx.form(top=0, left=swn, right=-1, bottom=-1) def MkSList(w): """This TixScrolledListBox is configured so that it uses scrollbars only when it is necessary. Use the handles to resize the listbox and watch the scrollbars automatically appear and disappear. """ top = Tix.Frame(w, width=300, height=330) bot = Tix.Frame(w) msg = Tix.Message(top, relief=Tix.FLAT, width=200, anchor=Tix.N, text='This TixScrolledListBox is configured so that it uses scrollbars only when it is necessary. Use the handles to resize the listbox and watch the scrollbars automatically appear and disappear.') list = Tix.ScrolledListBox(top, scrollbar='auto') list.place(x=50, y=150, width=120, height=80) list.listbox.insert(Tix.END, 'Alabama') list.listbox.insert(Tix.END, 'California') list.listbox.insert(Tix.END, 'Montana') list.listbox.insert(Tix.END, 'New Jersey') list.listbox.insert(Tix.END, 'New York') list.listbox.insert(Tix.END, 'Pennsylvania') list.listbox.insert(Tix.END, 'Washington') rh = Tix.ResizeHandle(top, bg='black', relief=Tix.RAISED, handlesize=8, gridded=1, minwidth=50, minheight=30) btn = Tix.Button(bot, text='Reset', command=lambda w=rh, x=list: SList_reset(w,x)) top.propagate(0) msg.pack(fill=Tix.X) btn.pack(anchor=Tix.CENTER) top.pack(expand=1, fill=Tix.BOTH) bot.pack(fill=Tix.BOTH) list.bind('', func=lambda arg=0, rh=rh, list=list: list.tk.call('tixDoWhenIdle', str(rh), 'attachwidget', str(list))) def SList_reset(rh, list): list.place(x=50, y=150, width=120, height=80) list.update() rh.attach_widget(list) def MkSWindow(w): """The ScrolledWindow widget allows you to scroll any kind of Tk widget. It is more versatile than a scrolled canvas widget. """ global demo text = 'The Tix ScrolledWindow widget allows you to scroll any kind of Tk widget. It is more versatile than a scrolled canvas widget.' file = os.path.join(demo.dir, 'bitmaps', 'tix.gif') if not os.path.isfile(file): text += ' (Image missing)' top = Tix.Frame(w, width=330, height=330) bot = Tix.Frame(w) msg = Tix.Message(top, relief=Tix.FLAT, width=200, anchor=Tix.N, text=text) win = Tix.ScrolledWindow(top, scrollbar='auto') image1 = win.window.image_create('photo', file=file) lbl = Tix.Label(win.window, image=image1) lbl.pack(expand=1, fill=Tix.BOTH) win.place(x=30, y=150, width=190, height=120) rh = Tix.ResizeHandle(top, bg='black', relief=Tix.RAISED, handlesize=8, gridded=1, minwidth=50, minheight=30) btn = Tix.Button(bot, text='Reset', command=lambda w=rh, x=win: SWindow_reset(w,x)) top.propagate(0) msg.pack(fill=Tix.X) btn.pack(anchor=Tix.CENTER) top.pack(expand=1, fill=Tix.BOTH) bot.pack(fill=Tix.BOTH) win.bind('', func=lambda arg=0, rh=rh, win=win: win.tk.call('tixDoWhenIdle', str(rh), 'attachwidget', str(win))) def SWindow_reset(rh, win): win.place(x=30, y=150, width=190, height=120) win.update() rh.attach_widget(win) def MkSText(w): """The TixScrolledWindow widget allows you to scroll any kind of Tk widget. It is more versatile than a scrolled canvas widget.""" top = Tix.Frame(w, width=330, height=330) bot = Tix.Frame(w) msg = Tix.Message(top, relief=Tix.FLAT, width=200, anchor=Tix.N, text='The Tix ScrolledWindow widget allows you to scroll any kind of Tk widget. It is more versatile than a scrolled canvas widget.') win = Tix.ScrolledText(top, scrollbar='auto') win.text['wrap'] = 'none' win.text.insert(Tix.END, '''When -scrollbar is set to "auto", the scrollbars are shown only when needed. Additional modifiers can be used to force a scrollbar to be shown or hidden. For example, "auto -y" means the horizontal scrollbar should be shown when needed but the vertical scrollbar should always be hidden; "auto +x" means the vertical scrollbar should be shown when needed but the horizontal scrollbar should always be shown, and so on.''' ) win.place(x=30, y=150, width=190, height=100) rh = Tix.ResizeHandle(top, bg='black', relief=Tix.RAISED, handlesize=8, gridded=1, minwidth=50, minheight=30) btn = Tix.Button(bot, text='Reset', command=lambda w=rh, x=win: SText_reset(w,x)) top.propagate(0) msg.pack(fill=Tix.X) btn.pack(anchor=Tix.CENTER) top.pack(expand=1, fill=Tix.BOTH) bot.pack(fill=Tix.BOTH) win.bind('', func=lambda arg=0, rh=rh, win=win: win.tk.call('tixDoWhenIdle', str(rh), 'attachwidget', str(win))) def SText_reset(rh, win): win.place(x=30, y=150, width=190, height=120) win.update() rh.attach_widget(win) def MkManager(nb, name): w = nb.page(name) options='label.padX 4' pane = Tix.LabelFrame(w, label='Tix.PanedWindow', options=options) note = Tix.LabelFrame(w, label='Tix.NoteBook', options=options) MkPanedWindow(pane.frame) MkNoteBook(note.frame) pane.form(top=0, left=0, right=note, bottom=-1) note.form(top=0, right=-1, bottom=-1) def MkPanedWindow(w): """The PanedWindow widget allows the user to interactively manipulate the sizes of several panes. The panes can be arranged either vertically or horizontally. """ msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='The PanedWindow widget allows the user to interactively manipulate the sizes of several panes. The panes can be arranged either vertically or horizontally.') group = Tix.LabelEntry(w, label='Newsgroup:', options='entry.width 25') group.entry.insert(0,'comp.lang.python') pane = Tix.PanedWindow(w, orientation='vertical') p1 = pane.add('list', min=70, size=100) p2 = pane.add('text', min=70) list = Tix.ScrolledListBox(p1) text = Tix.ScrolledText(p2) list.listbox.insert(Tix.END, " 12324 Re: Tkinter is good for your health") list.listbox.insert(Tix.END, "+ 12325 Re: Tkinter is good for your health") list.listbox.insert(Tix.END, "+ 12326 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, " 12327 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, "+ 12328 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, " 12329 Re: Tix is even better for your health (Was: Tkinter is good...)") list.listbox.insert(Tix.END, "+ 12330 Re: Tix is even better for your health (Was: Tkinter is good...)") text.text['bg'] = list.listbox['bg'] text.text['wrap'] = 'none' text.text.insert(Tix.END, """ Mon, 19 Jun 1995 11:39:52 comp.lang.python Thread 34 of 220 Lines 353 A new way to put text and bitmaps together iNo responses ioi@blue.seas.upenn.edu Ioi K. Lam at University of Pennsylvania Hi, I have implemented a new image type called "compound". It allows you to glue together a bunch of bitmaps, images and text strings together to form a bigger image. Then you can use this image with widgets that support the -image option. For example, you can display a text string string together with a bitmap, at the same time, inside a TK button widget. """) list.pack(expand=1, fill=Tix.BOTH, padx=4, pady=6) text.pack(expand=1, fill=Tix.BOTH, padx=4, pady=6) msg.pack(side=Tix.TOP, padx=3, pady=3, fill=Tix.BOTH) group.pack(side=Tix.TOP, padx=3, pady=3, fill=Tix.BOTH) pane.pack(side=Tix.TOP, padx=3, pady=3, fill=Tix.BOTH, expand=1) def MkNoteBook(w): msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='The NoteBook widget allows you to layout a complex interface into individual pages.') # prefix = Tix.OptionName(w) # if not prefix: prefix = '' # w.option_add('*' + prefix + '*TixNoteBook*tagPadX', 8) options = "entry.width %d label.width %d label.anchor %s" % (10, 18, Tix.E) nb = Tix.NoteBook(w, ipadx=6, ipady=6, options=options) nb.add('hard_disk', label="Hard Disk", underline=0) nb.add('network', label="Network", underline=0) # Frame for the buttons that are present on all pages common = Tix.Frame(nb.hard_disk) common.pack(side=Tix.RIGHT, padx=2, pady=2, fill=Tix.Y) CreateCommonButtons(common) # Widgets belonging only to this page a = Tix.Control(nb.hard_disk, value=12, label='Access Time: ') w = Tix.Control(nb.hard_disk, value=400, label='Write Throughput: ') r = Tix.Control(nb.hard_disk, value=400, label='Read Throughput: ') c = Tix.Control(nb.hard_disk, value=1021, label='Capacity: ') a.pack(side=Tix.TOP, padx=20, pady=2) w.pack(side=Tix.TOP, padx=20, pady=2) r.pack(side=Tix.TOP, padx=20, pady=2) c.pack(side=Tix.TOP, padx=20, pady=2) common = Tix.Frame(nb.network) common.pack(side=Tix.RIGHT, padx=2, pady=2, fill=Tix.Y) CreateCommonButtons(common) a = Tix.Control(nb.network, value=12, label='Access Time: ') w = Tix.Control(nb.network, value=400, label='Write Throughput: ') r = Tix.Control(nb.network, value=400, label='Read Throughput: ') c = Tix.Control(nb.network, value=1021, label='Capacity: ') u = Tix.Control(nb.network, value=10, label='Users: ') a.pack(side=Tix.TOP, padx=20, pady=2) w.pack(side=Tix.TOP, padx=20, pady=2) r.pack(side=Tix.TOP, padx=20, pady=2) c.pack(side=Tix.TOP, padx=20, pady=2) u.pack(side=Tix.TOP, padx=20, pady=2) msg.pack(side=Tix.TOP, padx=3, pady=3, fill=Tix.BOTH) nb.pack(side=Tix.TOP, padx=5, pady=5, fill=Tix.BOTH, expand=1) def CreateCommonButtons(f): ok = Tix.Button(f, text='OK', width = 6) cancel = Tix.Button(f, text='Cancel', width = 6) ok.pack(side=Tix.TOP, padx=2, pady=2) cancel.pack(side=Tix.TOP, padx=2, pady=2) def MkDirList(nb, name): w = nb.page(name) options = "label.padX 4" dir = Tix.LabelFrame(w, label='Tix.DirList', options=options) fsbox = Tix.LabelFrame(w, label='Tix.ExFileSelectBox', options=options) MkDirListWidget(dir.frame) MkExFileWidget(fsbox.frame) dir.form(top=0, left=0, right='%40', bottom=-1) fsbox.form(top=0, left='%40', right=-1, bottom=-1) def MkDirListWidget(w): """The TixDirList widget gives a graphical representation of the file system directory and makes it easy for the user to choose and access directories. """ msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='The Tix DirList widget gives a graphical representation of the file system directory and makes it easy for the user to choose and access directories.') dirlist = Tix.DirList(w, options='hlist.padY 1 hlist.width 25 hlist.height 16') msg.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=3, pady=3) dirlist.pack(side=Tix.TOP, padx=3, pady=3) def MkExFileWidget(w): """The TixExFileSelectBox widget is more user friendly than the Motif style FileSelectBox. """ msg = Tix.Message(w, relief=Tix.FLAT, width=240, anchor=Tix.N, text='The Tix ExFileSelectBox widget is more user friendly than the Motif style FileSelectBox.') # There's a bug in the ComboBoxes - the scrolledlistbox is destroyed box = Tix.ExFileSelectBox(w, bd=2, relief=Tix.RAISED) msg.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=3, pady=3) box.pack(side=Tix.TOP, padx=3, pady=3) ### ### List of all the demos we want to show off comments = {'widget' : 'Widget Demos', 'image' : 'Image Demos'} samples = {'Balloon' : 'Balloon', 'Button Box' : 'BtnBox', 'Combo Box' : 'ComboBox', 'Compound Image' : 'CmpImg', 'Directory List' : 'DirList', 'Directory Tree' : 'DirTree', 'Control' : 'Control', 'Notebook' : 'NoteBook', 'Option Menu' : 'OptMenu', 'Paned Window' : 'PanedWin', 'Popup Menu' : 'PopMenu', 'ScrolledHList (1)' : 'SHList1', 'ScrolledHList (2)' : 'SHList2', 'Tree (dynamic)' : 'Tree' } # There are still a lot of demos to be translated: ## set root { ## {d "File Selectors" file } ## {d "Hierachical ListBox" hlist } ## {d "Tabular ListBox" tlist {c tixTList}} ## {d "Grid Widget" grid {c tixGrid}} ## {d "Manager Widgets" manager } ## {d "Scrolled Widgets" scroll } ## {d "Miscellaneous Widgets" misc } ## {d "Image Types" image } ## } ## ## set image { ## {d "Compound Image" cmpimg } ## {d "XPM Image" xpm {i pixmap}} ## } ## ## set cmpimg { ##done {f "In Buttons" CmpImg.tcl } ## {f "In NoteBook" CmpImg2.tcl } ## {f "Notebook Color Tabs" CmpImg4.tcl } ## {f "Icons" CmpImg3.tcl } ## } ## ## set xpm { ## {f "In Button" Xpm.tcl {i pixmap}} ## {f "In Menu" Xpm1.tcl {i pixmap}} ## } ## ## set file { ##added {f DirList DirList.tcl } ##added {f DirTree DirTree.tcl } ## {f DirSelectDialog DirDlg.tcl } ## {f ExFileSelectDialog EFileDlg.tcl } ## {f FileSelectDialog FileDlg.tcl } ## {f FileEntry FileEnt.tcl } ## } ## ## set hlist { ## {f HList HList1.tcl } ## {f CheckList ChkList.tcl {c tixCheckList}} ##done {f "ScrolledHList (1)" SHList.tcl } ##done {f "ScrolledHList (2)" SHList2.tcl } ##done {f Tree Tree.tcl } ##done {f "Tree (Dynamic)" DynTree.tcl {v win}} ## } ## ## set tlist { ## {f "ScrolledTList (1)" STList1.tcl {c tixTList}} ## {f "ScrolledTList (2)" STList2.tcl {c tixTList}} ## } ## global tcl_platform ## # This demo hangs windows ## if {$tcl_platform(platform) != "windows"} { ##na lappend tlist {f "TList File Viewer" STList3.tcl {c tixTList}} ## } ## ## set grid { ##na {f "Simple Grid" SGrid0.tcl {c tixGrid}} ##na {f "ScrolledGrid" SGrid1.tcl {c tixGrid}} ##na {f "Editable Grid" EditGrid.tcl {c tixGrid}} ## } ## ## set scroll { ## {f ScrolledListBox SListBox.tcl } ## {f ScrolledText SText.tcl } ## {f ScrolledWindow SWindow.tcl } ##na {f "Canvas Object View" CObjView.tcl {c tixCObjView}} ## } ## ## set manager { ## {f ListNoteBook ListNBK.tcl } ##done {f NoteBook NoteBook.tcl } ##done {f PanedWindow PanedWin.tcl } ## } ## ## set misc { ##done {f Balloon Balloon.tcl } ##done {f ButtonBox BtnBox.tcl } ##done {f ComboBox ComboBox.tcl } ##done {f Control Control.tcl } ## {f LabelEntry LabEntry.tcl } ## {f LabelFrame LabFrame.tcl } ## {f Meter Meter.tcl {c tixMeter}} ##done {f OptionMenu OptMenu.tcl } ##done {f PopupMenu PopMenu.tcl } ## {f Select Select.tcl } ## {f StdButtonBox StdBBox.tcl } ## } ## stypes = {} stypes['widget'] = ['Balloon', 'Button Box', 'Combo Box', 'Control', 'Directory List', 'Directory Tree', 'Notebook', 'Option Menu', 'Popup Menu', 'Paned Window', 'ScrolledHList (1)', 'ScrolledHList (2)', 'Tree (dynamic)'] stypes['image'] = ['Compound Image'] def MkSample(nb, name): w = nb.page(name) options = "label.padX 4" pane = Tix.PanedWindow(w, orientation='horizontal') pane.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH) f1 = pane.add('list', expand='1') f2 = pane.add('text', expand='5') f1['relief'] = 'flat' f2['relief'] = 'flat' lab = Tix.LabelFrame(f1, label='Select a sample program:') lab.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=5, pady=5) lab1 = Tix.LabelFrame(f2, label='Source:') lab1.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=5, pady=5) slb = Tix.Tree(lab.frame, options='hlist.width 20') slb.pack(side=Tix.TOP, expand=1, fill=Tix.BOTH, padx=5) stext = Tix.ScrolledText(lab1.frame, name='stext') font = root.tk.eval('tix option get fixed_font') stext.text.config(font=font) frame = Tix.Frame(lab1.frame, name='frame') run = Tix.Button(frame, text='Run ...', name='run') view = Tix.Button(frame, text='View Source ...', name='view') run.pack(side=Tix.LEFT, expand=0, fill=Tix.NONE) view.pack(side=Tix.LEFT, expand=0, fill=Tix.NONE) stext.text['bg'] = slb.hlist['bg'] stext.text['state'] = 'disabled' stext.text['wrap'] = 'none' stext.text['width'] = 80 frame.pack(side=Tix.BOTTOM, expand=0, fill=Tix.X, padx=7) stext.pack(side=Tix.TOP, expand=0, fill=Tix.BOTH, padx=7) slb.hlist['separator'] = '.' slb.hlist['width'] = 25 slb.hlist['drawbranch'] = 0 slb.hlist['indent'] = 10 slb.hlist['wideselect'] = 1 slb.hlist['command'] = lambda args=0, w=w,slb=slb,stext=stext,run=run,view=view: Sample_Action(w, slb, stext, run, view, 'run') slb.hlist['browsecmd'] = lambda args=0, w=w,slb=slb,stext=stext,run=run,view=view: Sample_Action(w, slb, stext, run, view, 'browse') run['command'] = lambda args=0, w=w,slb=slb,stext=stext,run=run,view=view: Sample_Action(w, slb, stext, run, view, 'run') view['command'] = lambda args=0, w=w,slb=slb,stext=stext,run=run,view=view: Sample_Action(w, slb, stext, run, view, 'view') for type in ['widget', 'image']: if type != 'widget': x = Tix.Frame(slb.hlist, bd=2, height=2, width=150, relief=Tix.SUNKEN, bg=slb.hlist['bg']) slb.hlist.add_child(itemtype=Tix.WINDOW, window=x, state='disabled') x = slb.hlist.add_child(itemtype=Tix.TEXT, state='disabled', text=comments[type]) for key in stypes[type]: slb.hlist.add_child(x, itemtype=Tix.TEXT, data=key, text=key) slb.hlist.selection_clear() run['state'] = 'disabled' view['state'] = 'disabled' def Sample_Action(w, slb, stext, run, view, action): global demo hlist = slb.hlist anchor = hlist.info_anchor() if not anchor: run['state'] = 'disabled' view['state'] = 'disabled' elif not hlist.info_parent(anchor): # a comment return run['state'] = 'normal' view['state'] = 'normal' key = hlist.info_data(anchor) title = key prog = samples[key] if action == 'run': exec('import ' + prog) w = Tix.Toplevel() w.title(title) rtn = eval(prog + '.RunSample') rtn(w) elif action == 'view': w = Tix.Toplevel() w.title('Source view: ' + title) LoadFile(w, demo.dir + '/samples/' + prog + '.py') elif action == 'browse': ReadFile(stext.text, demo.dir + '/samples/' + prog + '.py') def LoadFile(w, fname): global root b = Tix.Button(w, text='Close', command=w.destroy) t = Tix.ScrolledText(w) # b.form(left=0, bottom=0, padx=4, pady=4) # t.form(left=0, bottom=b, right='-0', top=0) t.pack() b.pack() font = root.tk.eval('tix option get fixed_font') t.text.config(font=font) t.text['bd'] = 2 t.text['wrap'] = 'none' ReadFile(t.text, fname) def ReadFile(w, fname): old_state = w['state'] w['state'] = 'normal' w.delete('0.0', Tix.END) try: f = open(fname) lines = f.readlines() for s in lines: w.insert(Tix.END, s) f.close() finally: # w.see('1.0') w['state'] = old_state if __name__ == '__main__': root = Tix.Tk() RunMain(root) Python-2.3.7/Demo/tix/bitmaps/0000755001241000117560000000000010765544471015414 5ustar loewishpifb6Python-2.3.7/Demo/tix/bitmaps/exit.xpm0000755001241000117560000000436507256055517017125 0ustar loewishpifb6/* XPM */ static char * exit_xpm[] = { "50 40 5 1", " s None c None", ". c black", "X c white", "o c #000080800000", "O c yellow", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ....................................... ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. ", " .XoooooooooooooooooooooooooooooooooooX. ", " .XoooooooooooooooooooooooooooooooooooX. ", " .XoooooooooooooooooooooooOoooooooooooX. ", " .XoooooooooooooooooooooooOOooooooooooX. ", " .XoooooooooooooooooooooooOOOoooooooooX. ", " .XoooooOOOOOOOOOOOOOOOOOOOOOOooooooooX. ", " .XoooooOOOOOOOOOOOOOOOOOOOOOOOoooooooX. ", " .XoooooOOOOOOOOOOOOOOOOOOOOOOOOooooooX. ", " .XoooooOOOOOOOOOOOOOOOOOOOOOOOOOoooooX. ", " .XoooooOOOOOOOOOOOOOOOOOOOOOOOOooooooX. ", " .XoooooOOOOOOOOOOOOOOOOOOOOOOOoooooooX. ", " .XoooooOOOOOOOOOOOOOOOOOOOOOOooooooooX. ", " .XoooooooooooooooooooooooOOOoooooooooX. ", " .XoooooooooooooooooooooooOOooooooooooX. ", " .XoooooooooooooooooooooooOoooooooooooX. ", " .XoooooooooooooooooooooooooooooooooooX. ", " .XoooooooooooooooooooooooooooooooooooX. ", " .XoooooooooooooooooooooooooooooooooooX. ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. ", " ....................................... ", " ", " ", " ", " ", " ", " ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/filebox.xpm0000755001241000117560000000440607256055517017600 0ustar loewishpifb6/* XPM */ static char * filebox_xpm[] = { "50 40 6 1", " s None c None", ". c white", "X c gray80", "o c black", "O c #FFFF80808080", "+ c gray70", " ", " ", " ", " ............................................ ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXooXooXoXooXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXooXooXoXooXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXooooooooooooooooooooooooooooooooooooo.XXo ", " .XXoOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XXo ", " .XXoOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XXo ", " .XX......................................XXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXoooooooooooooooo.XXXXoooooooooooooooo.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XXo+++++++++++++++.XXXXo+++++++++++++++.XXo ", " .XX.................XXXX.................XXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXooXooXoXooXoXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXooXooXoXooXoXooXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXoooooooooooooooooooooooooooooooooooooo.Xo ", " .XXoOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO.Xo ", " .XXoOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO.Xo ", " .XX.......................................Xo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .ooooooooooooooooooooooooooooooooooooooooooo ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/underline.xbm0000755001241000117560000000045307256055517020115 0ustar loewishpifb6#define underline_width 16 #define underline_height 16 static unsigned char underline_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x38, 0x1c, 0x38, 0x1c, 0x30, 0x0c, 0x30, 0x0c, 0x30, 0x0c, 0x30, 0x0c, 0x30, 0x0c, 0x70, 0x0e, 0xf0, 0x0f, 0xe0, 0x07, 0x00, 0x00, 0xf8, 0x1f}; Python-2.3.7/Demo/tix/bitmaps/tix.gif0000755001241000117560000002544207256055517016720 0ustar loewishpifb6GIF87aüÕãÿÿÿÿ‚ÿ‚‚‚ÿÿ‚Âÿ‚‚,üÕ@ÿÈI«½8ëÍ»ÿ`(ŽdihŠé  ÂÏq»ôlϸÐÓƒ pHt }ÁÛ͘<‘L\qš\R¯Á€ÓÇ5v¹¹I†òμg,S¹ß*‰›íIïÊrµÛÄFûRh|fN€…cG@h?Kƒ_v‹g^”TuW—Skampor*,”|iVˆjŽiQu—¦™¤yl~®¨O~^±–D¼ºÀL±¤†O)/(¡ÈZ6¾Æ¯€‡À`Ò›ŠœUÖ•[²z³JÛ_œ«ÅwÐ[l³MσŠUÍÉËZ§‰…djce3Hà‹L`ᆀ!¨¬h¦" +8¤àpã„Žÿ@ ¸H„¢–ˆAÌÈQ£Ê8 8Ô•+cñÆY*œ­Ö 10ràÈpBh ©SB¢ÀRÜd PpàT¨`™‚µÕéÓ²fH›µiÕ¦\:–`Y¨k¡¦Ë–¬Ód^-÷3˜$6ƒâ©eT0¡¼ºÄ=P´kÁªzûžÕ6¤W®é®][µtÛmû¾uëtuÚ†@‡ÖL»væfW x¿ÇAßr³ìFãn½„c¡<@®e˵£ï}m· jéØÝb-ÝPìÝìàQœÞÝôá_²Šœ×©Œñ à“Ð;¡ õ€ý¸Ük=jf¶Pa¦ÿXV÷ÜàÑfZk)äÇ_Wà(Þv¨U5J4ê¥^aNàÓL Åeò›0þðÃIrÉ”@G+ªäW²yu`W1.#cAkÐØ AŸ|òà~3²äbA*%é‘T£<·Opª¬R-Þ¢{Ü$ +D\dß—`†)æ˜b*`€™ ¤‰f€úYÇ‚¹–`t^ ¦Sú±•§{òÙTš¨‰¦ ‚îfh:­LIb9›(ve ɇÉ¥x!™—Úç瞦y¦§f¦E¨ iŸL_†„Vvp†÷V ˜ê÷妚²…槣暦ŒpX £¾ÕðèD¾ÂçË”™ÆzW¬ö)P&ÿ r‘ª@Ur5w_\«Î™ÝjÜ5“êdùaÚªšŸ:5¨³²6Ë«#†eF£Ä1† &¦hª“Ý—,™z]Ê'nf…«©sBFem˜¬ÂõT€lM¸U…Þ2{gSœòùeš +±pÜ›MæŒcï4lìD,p“æRe©ê‹_Ë#¬°wY™¯¦DúG[foMÕã[ÅvÀRö5wsÌÌ‚•g¾|šp¥T#ˆ »ÛÞ¨ˆˆ—â@qQ} iØcj¬)µGv5d‘l·mWT0ºÈ,µúAËl¨‚@î`DEBȈìšX5VpY¶{là†™ïdQÝÙ²Y}þiî™\]Jäÿچװãþú+*®äžkú ¦YKÊvX);,ö†c4%¾!$³¸2[lqº`:+üib‚Ëyçš™†š[C?þ²ï²šY·f¹^~®6¾r=Ï!ðû! (?–ƒæš7îòÑ×jn @šÀü$òÉ¿¡Ÿ©úN>p åúîÿž£:Q>5@ 9Ó8Vë0䘫1ƒvác°¤ }ûcÊ·Â n0gß‚KgV%ž­¨¦„‘ó Ä ¼1ÁcƒŠO*º†œ'Uc"8lFqŠÁÈCækáîv‡¾¸4‡<“–œ7¤òufFk[ÛT2À¦àÆh‘ÛµÂÄ"ÿowN‰xø ª1F€Ãá$e¬)D%šx£$ ”¼q!H@D|x8Ò" ±áà8@ä…tc½ÔašÀ U›Á#ó²EÚ.9»ˆDb’á½ãD0Ÿ ¥(s%tèBk˜l(µU’h“<~õ«O,#'?¥ø¾AF]öc _dX'²UÚÄ@@ 5 ÁÆ,˜¬ìå<92_ÎË•¾¥ mÁÊõ˜±™Ù4f• çpRøHccÐÈgRsßCã9FÏͳž:¹g=͹ƒà@íL†qöIPöô ­ç=šÐ{rò¡uŒ VG‡M:jÿvíL`ëÞYˆ‹®@=hfQOa=Ôoðg|b,1 ‡¡j,'d©ùfˆƒ%ɶ׈ôhˆGMLùfˆ–‡9£0FDZÀb”jiºÐœªç7¦ÌêÈž´5ø­v¥¬f/žZÆŸ^²¬¹ '(§Õvð@¡2EÜ)ƘJ±ž•m=Ì9ÈZS¤FâiÝȪ¢d2¥jÉ]°L+.Õ‡U8ð=V¢×a¡Ôª)'©ÆRcÚ½sšEèl„ð¡DÀÀ©]«a½‘ËwÁƒ®E½ 6ÿê¡«Uq” ¤5˜óy&," Í@–r©À}\AŠc ³*¦èlfoÿ"®û¦KË,Å“ÌÍŒs»´P÷»Õ…ŠLŽ:ËÙ øð§EÈÍW"6­>ØÜÊR•¼(…=[\ºÎì;ô«_ƒÖ–­ºd+À¨qš;²F1¢1¦çh³$ÛÂ@!E3òíµÅÝؾ òï¶N£•ÖlEFþáK€ãÄ-òðfÁ'1„ÃŒÇúD|N-f\–âœqwà Sh‚{ൠØ5õô1ÍŽ¬ UÑ}Sc]9Ì/Ôø–šÔŒ¯ð5\ë[[|ÐŒzܶ¯°-FÀ·|D•·-Åd>†}æŸm2±µXÏ».Ù˜g~t—¿P,FP$6LýN È#ÿn\ã™´‰Y*MZÈò>Ö¦&úíÕŽœ)­DP-¬eÒbÑeÉò¢ãº}Ÿ€Ù4×23ä8í¦"Áè쨡ʰ…6#Ž„_ ã]¿–§#Ä°™$ܯօïgêdq=ê°‹;ºýðe ÕèF§¦ÌedHœ!þš¨¨Ä9e‘Õ¸tÅùÎOYm¥å­<Ϫ¾º«óª°!”UŸt±pS¿+®¸D¬òrê9ólnsØã‰èŠ_ê†7R´¬¸m)„ÍMµ2Áܱ‚¾Á%÷q²Ô¾eÝaÔäÊOëãSéjÕ§PPQýjlu* )•^¦‰q>÷8ÝÄ¡í¯X¯Ø€v-­ÿ3õ+\C>s·4û·d Ó3$–r? {G*ìÓz6oG.Ö6zÂ.Ö€CXp×Vð3DI3&7Ã4bb*.ÇEÏÁ)ȶ‘øG‚Êbq±'tç¶+B±8TrOãQVŸ”hD¨hS@é"‰6Ñ7úDa’G @zu€t#‘‰FˆDºõF•õH(Ñ7€GŸY YpÔx¶T[ÅZï°^ÿM$kògMí5“N VF Ä(=µ:1¦‡ï0U: ;‘"Myˆ Ádˆú&%éñ Tc5CÞ°VÛIÙP/­•~QÓJ‚ÃuØ×Ôÿˆ¨¨Vª§Š 8ÉzK§~¨ˆŠ}Jï‘MlmÅ)¹˜Š¤Ä%Y;Ø!.à Ê2òtÎPÊÐI‹aÒ8ÔXÖxؘ"SÜÈ×pÀîdP84aÃAŽ%R5ŽÞø ☋VÂŽ~ÆP#…S§eQt UìZ]UxPŒYsŠì@ER^æ°jþÆ ¾xZ~Cú¨öÈŽ uRE[ÁòWT"u`…JÏöS’¢(£ÄV ùLx-…z’‘êEPùwkÐOQÕoŒˆ‰©~€õ‡%‡Vx’×0K 2”e3ÄwÅ4%,©Z.WÈxUì×+}HÿFH“Ã$p5™ þhIv‰ý(hy¨M¥O´x2&ÙJzXÄHYYeˆ"#78TבwµøIÛd"+IŠµUŠ'CI‚WDILðATøæ†çU;…wnù–¬³eò—Uwzà( %r„‰[‚ù¿äaùx¶ZÀ¢‘M'X¡G•t%Kt9“5É‹zWQPMjÈ=öR—"’ &aV‡›ÚV†Áj©Åw{U^­hY Ä%Iÿäš••rmè±g:dx†“T*1™;ðØ|\D@Ä#ôTEáLY0Ç1 Ó9‡$†~tH¡2‹`F©VW´ägÅx;™HHœØ-pÿZÜ5Ãu\ q\•;ÓõH±wÄ%]š —Ñ E^Ê `!î¡Š#wG;µI}öoª•Ÿ‡µ‘Åšfg0â \j÷sô´ Ÿ1hi† y!yK1i2ú\)„£Ï¥£Eúò£‘v/ ^$Q^«™Wõ0¥ô¹ˆ©i• Xô mV_&!Ý4&æa¡1éÖ£ã'„-ÓU`HJ?SâASˆcƒ…ŽìÅM¹‹o÷5i¿– vq\ÚE†r¢¦ô£il !†{r¢`ë’rY¦i„ŽtÄQöɧTà æÞ¥02ƒ¿õÿõõ p‰ª{¯Á-¬¡<ÜÁ¢ŽJy<£†Âtw(N4F‹—j‹wå•FóAǨi*rÈÓ-¯š_?W©¹áb6¥)ã‰EZœtÀJ”^‰mÒ‚ýl…*p¨F– Ó#A£ahJyc!åQT¢·©l©—Šq8»i^>@ûê©ø!BÁõc;ªBFfD†{Ëó '&«å*°žƒ_ÊódWŒÛÊ!‚xŒ¯yzËd^íé<žfOÄ9ÒÕñ¢n Éš¨="_ò £3Rg¦ê2>Aµ§@A­ðô=Mœ8 ʇÄ{ô­-;f'Û[Žö[7ò#mÿ'Ý·²]êxgFPW›]<2üe,œ> £q¨“:¸|Ü­¦4ª(0‚1ÃÁSÅ…Ü¿9iÂÓê¹îéƯ A´©o.‚œ?bã¬g¡*äE›ƒ¤<ê µ®~Za Êuü¯×4wÍ•ô› š‘W‹™–;‰qw¼…ö[aC6¾ÜÉ?| 6j]¡ada»øã8-×z°Fì)a‚‚3-臹¯“!®•è`Í¡OXI æ”…'0ÌÜÌÛ˜¾žR mǦ›1«Òº¶»û•i³*å§k!(A]| L.,·%²ù&}uÿ8)<¼§t ØFvlklº¹vNô¢ÚÇ)›}™Ï¢2ÄÖ»lä4‹•ˆ%s¶M)„™) §ì;7³À”c¿¤ƒ9Dzo­®û„ÜrœL1ç·¿C\|ƒQ±éZ' M¬™#Ü©8üÏ{ 9‡ÊT<<¤r}Ì;²j̻ǂóøD|ÔS=éK@”\ŸþȽþ6d釆À"HvƒœÈüó>kADå<Ê’W0¨_]”Ãæ;o•ƒØúKÔ„tÉ$&”ÈôÚÐhœ¬è­. Æ!D††&g}8ƒ6Ó¼ÅjibªB3wh B~T.¹‹&tÖTÉL8z:Y¢ÿ5H CK>ùÞöÌ×óÖ/¼#_ç†nœQg]Œ­Þ7·&µVÕó–פ:4D­:¹‰@Áå¤^ùj ôgsL³u.$£ü'ªíŒ}Jã<k€ NÞ KÈ­Ýšb:º{á#Çš\¥™¹ÉX–߶w»ìÍ”ÍD™3&3ø¯Þ¼]òs×À†d¦!4{,4}]÷)•Û•ù‡5¶„%W©M´ ДÝÕfc=Õ'‹ÝÖñ 9§¼Baâz¡ƒä5˜¬ _. Ù|D(Ee“}td þ%v÷%Që>`¡ÖU]Q˜•»…!qG¹0`’þƒÌ‚ÿfÈ~T¦¯œNË÷‹YP—ÞœMÐ…C€GpDë°ÞväwdGa(†€„d0Ip†Gõ…ȤçI0Iå ÒÆ$c ;ÞûX}×)¡[`(Jª^ÖŽM fìÊx¥À [Е [ßN2ýÖÔ(Œìþuu™Ì­É“‚åÜ€ã“*w±Ogc¹ÚîÈ é¤•‚´«˜ŸØ®cÝTÀ|x› ™|ù—çæôªØÖ´’”P‰X ñq´¿‹C©¯¨©YÁ!¶Y¼Oñþ¾òGɱPÍSŽù—Ý~eËœN|¹N*¼òûJÓ¾¶Øð–JÂ,ß`ôòoµì£äÿI¯öóD/Ÿ›Š@´ˆ¹ZUÀvyî'ýÅq9„X~íæ¨çòMá„á)íÔœt!½êOÇOÝ@kŸ ˆs2:è´ö=~ ßH³Ë¹O/uPAŽxZöŠ/b¹øsàøW‘?ù”_ùeßø–Ÿù‚”OSµXè´NÎàùˆhÿõñdz%a&QRÆá &…ùš¯ú|Žˆã¨øƒŸŽý;4ÛOR…S€yŒ€5úŽ’QiÔ²¼R%#üùˆSˆ(,êÄû&Ucìc}—’:ð÷›ß#ÅY é~^õÖ4Áåb+–h .ÅüÙo÷iÔW É™ÜàüÖ?ÿ=@ûõ’uÿky‘¾iñ0¤ƒÚzñ¬}[Mó:¡,GÔ A£^–5Åñšï³ fNÆï]@8$…€10Xî~OŸÀ)Í@W—kUËô>4Ž­ žÀ¼ä:ƃµªXðË+×ÅѧiÈTI#&¦¼¼¹.•³/¹›Å:E¯ «»3ž/»œË¶¬ÆHÐ2º8‘*ß>¥¿")BԵ̮Ы9OÓ,¬ËÏZŸÉÜÌÍbϵ]µÓ`+YÔTU"V"WIN›áaßßÊgäÄ­^Ú” â­F37»°Ýu³òxy’ÓÆÂéiÀ!kÓìžIÿàÌ£ÑéÛºpˆÆ©©Á,¡3trÿÒ(Ú4Ïb<\ö‘’¿%´ {4IáE.°N¶ƒÎ")g1LÔJ”a»åªãª}B¬™“È+`K]‘Ä%­ùÙ¡˜Ý`Æ‘I㘕8«jÂöîNG ~öñY²Â˜²¬cÚ §ÅœÂ–ŽÚk»0íÄ‹fïj­¹ì`²·Aôízô‘Uz-Ë1,èp.¡R¢X.XwäTyù’[ pq1Àuœ ®&ë­âÍÊ6†f¨ä¿w]Ÿ…›M2xsbÅÄK&h€ÙHƒ$%ŒÒÍÔ¶–µN‘ÒCÙPéD.el›QÄ¿ÎÒm =¢ÁG‚ /È‘o¸8™.æÛð„hä$ÿɶ:-qßÜÚ«—¹Í”²³"¼>"¯¼øB)­½<'¡É†2O,ªÐƒ '¬0Ã䩦0m”°q¿WŠbJµ&~*p¼A(àÐ8µfÉë˜Y”Qh$àG zì±¼†4Ñ ¶4hbFÑzb ,Áè”ÛC9KÊK¹†äN(ɨ ¿Ó°da‡xäq€ øãM({$l#ð°ƒ;1dÓÎ 6$k #Û,²  ÍM”È „¤óÇ!M´ íâM?ƒ[¬;¿”ÊbIñŠàm+¨Œ§Çò`Èá\ÕU‚J"V ¤õÊFƒÒÑ% ýÑ`kÿ­µ€ QB‰m3Y%èaQG{ô•` €Çˆ-ôPB‰ ¶ˆ43K£V0‚CW*u“à9…˜tØ_­¥öÞD“eVHé=UI%µ7XE -ôàdøGƒ‰ðÑ…­WÒ†NØàDÕL³NPr÷ WÂû ]NHu!Ïn •wh™Úƒ¸Öcó)bÒbžyâB žÙZ ­%´Ú€fø`cuU”`{afØg‰vh`‹¾—Šp±K Z bä}ȼ Àx¬^š‹-¢e¬vZê´¿%"m#ÆXh¦m»Þjáºj¢û<Øî.4ï_}ü^©ÿ¼Z ˆ|ò’“Ñësƒªh"ÿ°Ò àH[¾¹í¿”eÑUI=`Ñ%ŽšZ«gÜô¾]œvÓ‹-_ׇ½t™af»Ú·}r‘Ë) ]¼t¬ÉFí|s  ó´!}™Z—…¿½ZÔû¨=Ò¨…¸ñØ¿ÿÞöõW? ià¥N_ýÁ‹7^rüUR¾*“ÒŠÉÄ4¥3\ ö F0íy~Ã#Bßð57ï™Ov@›ßÁ§>–É+{2[ã·@û Îe”kŽÇ²š>ýéy´ÅÇ®BhEÌw´`µxG¾b‘®[~ûû0X;‚onÙÓIWCÁ…ð~ȃB]Ò€Bÿ&T4á†Rª¤ìqa T ᇳœ%Q.##Ûh;4}>Ä5˜Ã"z±}Tõã®uÙå!)‹vL¤® P†j›[ãäh4îÉKbm(ºáY°Œ\c Á¥Íîç‹äíì8›}lÿÃ@áÂŽeÇZT”Úø¶I rñWÝ3cîÚ(Ç4–s £!; Ë5.r˜ØˆVÆôS®p4¥´Š|Tù® mP†¯„¥Á×»·q“æ ŸI¾àÑ°š@Ä’òC“›ˆ4É Õ2«èÌݠͬtÝ8;h:l~°hö"7wI¾v‘Ÿµ¤][rñÌ¥²,ÿà Už8*e`Ïw‚Œ#5å(<á…±wêc$.Ýh³œÁ~Uc- ¹¬ÄfS/d¦‹¨ÑhY,E³÷>:P œä Û–S’RR îˤE=úO]ZX2ÅÍØ6ƒ²€<”:a7ÒB,Úmò¬¨Q'˜MŸn´izÛ). :¾q¬›¼WëF-û‘>Tdé$Hó°‚Jurå-V¸ uÅ#x­êG ¨nt5±UYw^ÂÚíé6[ò“?Â/EÃÈ£D!›ð„c•BEÊë˜Ùßz Ò'©ò£K;ÁKL8"`Kfqe¶®iÖÊÿò²º1Vd¿Àˆ`id¯ÀîyËŠOµ­ª•A¢,m¨:‰\1[2IQYÌâ<‹FåøÕet² 0ÒJeÛ'±ª–-F.ËŒ0£ì͸K·UÁ‹ÊY̲_¸Ïž.ŽwêäLÿ¦'dˆ…3!W3«¨«³ÍYÑï[t£`Ï~ ¨˜_'´2 ÏEÃ3sù½ÛŠ´T®V•q*8œ@”®¥W½j£Á´ª H|·“â2™/ôEæÙh`{ È"«]]iµæw6¤$?C­ßEßίvFµ±a}lÁ­š„PVÍa6ì‰=öö™¨ü£h-ltÏ™ØÃ~µ\Í=F“õg Ž$Ùú²0Îyž <õ¾…ÓW¼Ý€TŠ˜þ]Ã:] w(ñÒ—v)ݦF÷±þjxKWœö^ìËgRû[}ý>5ÀÝ}ñ‹<¸rå¶7pðµá¸®ax L ÿìs—šÑ¿v5¬Ý}ò‹g\Î?­!Ç·‰ï›“ºß¥þ7ÉemŸ÷<å'2Ë7<€8ITÌ{ŒÐù‚‰Š6ÅwÞïGè‡w_å,O$N²ãRÀùÙ÷Íh¿bûçkOûÔzè«/`øàº2û¸ÙR$á|EwÎwÞjb}pAoöðûvè"ñÇ Ü¥ä„ÐèsO[ä}³8ßQNpî§Sܼ6B¤Ìc®t\&{Ò-H9û^ë6½ÀŸ®€¶Ÿ÷F_àæµÉÀ‰ÛY“{·øéQŽ—Ô5?³ÑìɃø— e´Á6ZîÕ-zU³åÁO+îÅ©¾åsÞ–•w»°} ùvÿ“^àÓ68“ý…ç!×TÝÌejdQ»½ ÀE[7ñSµ€#H±ÐK¶{£Ÿ`B&h?÷»­æcµ§ã»i;€˜P(»#|Ø?¼r*T Üùy";`3Àb{Aà[Àúµ›ó*’Š@–™@*#-Û«2f£–kó9ùûðãÀOB-é…—#® ¡+^£‰kéAE£Aj½"Tºa+-Kš§³©Á Ê® Š4Kµò½Ä)˜I»yŠ?„ wI§îД34»hˆi5IÁ\´*Ü@;ã½k@èJ±å¼óã'ž:뫹ǛA”+Àð38ªÃ o“©Õsƒ»·ÿ0Á#ƈÂ=ôCÜ9˜©#5aiº¤³'ZÒ.!Ò®$ÄäcºÌ£²U“BE£ÄðÀJ¨Œ{¸6¸+]3A^®ÛC\Ì*ï›AZÅÜ«šÂ<‰B?zË¡ö ÃXL>½S\µäS9@«ßRí{Md¡â’)Ü3-ó[ĺ=¬²TLÁ›Ó<`Ò-ÑQDmL5,»t³¿*!´ûðDl´LA®‡.ÀÌ+C=œÅ´Dñ’Æ=´ Œ¢£4¢¡ú<‹TÆt;ż{AS;7å;‘¦²‰êS¦Ü5´0†ˆ\A³È$»_Ë›“Âœ,¾¨i#^ª,#¸$>üHÿ3D[¼—³³<¿:Ï©¨TQpž—BÇìãpGE»Ç~”·óÙI|ÄØJ¬Y‚E#J†ºyìGeTÊ»{Ÿ“¤=Î8(¯@²9tI&ƒCËÁ { ËÜÊ­üÉÒÆ9sÇ™„,§Yš)º¹$Bɪµ¶d|;·|.¸l†½¢Ës²Ë–\²ë£µÁXaKaƒ–ü¸K­„L"bÄè²—3ØYÓAK*ƒ¶Ó,-¿‚™P¤Lg!B¹Ž¹ô¶–»×óÌÃKÉ&ƒ2 MtûƒD=Ýi×lÄòcÁ§ +|z1š šúª#;Aj~œÂt[µ¸õd°¿Xÿ_œépžá­¯“=É 9`ψi± «1îb5l:EÃ0ЕٮKРdдQ™ã[O“P#xµ!PO!XÀ⡺=À‡é;àŠª)èLÃ[’#ù„N)ŽvDJ[¤Ì‰?ùÃÀø£­æ ¨{R6D´–猣Ǔ¿ß Bç;½ж>ûÐØ@ë úœ“«D‰@¿äÊ‘ÌÅb»c“<¬BòD¤˜iã3+BŒš¡C»+Ò õ½âyŠÏ° nû3õ¬äÌ#‹0,ŠÒ’ܽI,Ii›¼ŸËRìÙQVúª/"Û›Á1U Óë=©»¶¥ªDN41Ïá s|Ó ˆ‘ä ÇlÿÌÝųS Ìƒ?wË!F Ô.úRõ;ŸÂŒ·xCµeÔEÒ““àÌH(q=ªq³*þÑ àÔ¿ªEð»=Fc»1,UÁºQD” Ú„L-=Ö¾6É‹Qßc>W;)…l23¹‡Â+Ñû4“м¬6ÜAZ|KI´8h|.Ã$:kÊQÔéNݼ»im:J{ „¿›Ucs‹±Y‘õx%U0þSGNDiA·¿ÄÂbU:vK”¡/ü§z£Ìiô·|Å×ÑËÀ‹c¾>Õ6¹€(<ÂÌ©Œ†}ÉKU%£”B=ìC"„Áðë4VmËeõɸÃ. ˡ³×ÈöS‹U¾ Ùÿsj¹àˆ<Ù%W«„I– Ït‹Ha#6ªU5ð—|×C¤7ú(Ôùž ½»“º¦›<”Û»“KS‡pß*ÙZ£T“•Mƒk‰¦¾t»,ƒÚƳڪÅÀdmKz,ú1>guűÂ;u5«íÉÅí½]5@Kí í†j‘¹]S]QËöË2ƒ ÉVs·Il$ˤÀÓZjä<¡ Ÿ¼õ¾˜Í;ôƲíÉW 8¥‚\¤å³¾YÚð%[Ò@ÈÜp˜‡S~Ä}óCÒݼڤƒG›B]®…À\úÚkÝšÜ@Œ›]TTëÒZ].bPBˆ" ­I¡?1X¹ÝËH=Iÿ2¼©ÂdA}³Ò>UÀ`¡¥ökGŠšÁÄD Â(e¬û_O%Bb+CÍ;,µ¸w‰=r-R§ì>*Q®›[\U®y<×¾²ÌQ£Â¥‰AûuW—å\óKLŲ¨ÂÍ0Ü›4»nøÌRƒYÀtWeDœô[?Gê'42J÷‹Ùœ¤R¬í»®:nÓ;˜* ãaÞºÔ™ÛÜ¢4µÕ”̱bM|2Ý›’_áë_fŸ_RáÃ2Ö|F†¾å@"cê­Q0Æᵈ†Zsu؉ ½EÌÛ„ÙÙÍ&jËŒŠbÚâÿìLèzÝ´!"V¢ŽÍñŸe(‡Ë\cX)NäîU,;OáÛ*¸køåMî‚EU]åÉ,ãÞìÃØEã]wR6¼^ù8cNÕdcÝTÈ«3¬³:kGïZ˜iÜßZ$Ñ ¡1Ì[xìMžEäöû99<åN쌅BÈÞcœH€5¡*I:˜5Ö\ÕU=:a$:18Y•.äáÑüÚŠi"º]1›]!-ýªââIeÎ_è:˜4½¿þ% Ù¿_ã'uç'yzRÑB4#1’ïMþ2 iDpçG¡!Qi@˜F /f'%ÓDå:|˜ž¾ÿþƒ¢$Ôb˜S!Ï ¢ö€€'ÍxRñÍ€8•6 ”ù¸<±êK€;Qi¯Ž’;ñg—–®š6kšk´Þ†g(‰4()V•µNëÀkIuŽ’0™í‹oMêt4¦•Šºîg³æµNé ˜i¢i³ˆ±F™ h;¡½»>kQB¯~x…è;´8\ b€9SfçÄ“B6é³^mÔîgÍ^ǵFÀÏyxí½¦=Í°Â6ÆS mÃmLírHk˜vÚ öí 2ÀmLü»á<ßåÏ߆[B¶`â&îL¤Žqý#åa*rLG•Œ`ê¨hÅ;“ü‚ÌnÿöFfæd[í^o? m8<¹L8ó–¯/Ø¿¦moÿ†Ið†„…m“q¤p¦©e;<¸oKoõ6í84çÿŽðZ¸ŒøÚ…¬ãV©Ðp/1Ò2Q [ ¨¼CÑÇ#HêcpdþзœZKn4¼Á^6uBärŒù Pç6mñüvJÍœðNð?QæÍ¢ —Ó¢+ÿ:ìcï Ç:Iòþ-‘È\P6‹þpv¶‘…TG(ÿ’8p4goðã¿K/$¼¿Œles 1s,OsäÆóìþ°§µ*YÛÎs·ëžq§ZóøÖs.ß;ÅsEO îa”à×äÈDc9ô­à†7ÚßJñüÞ’^íàý«èïA·t"$N'„2_Yu17ïJ_p5ðL ]ƒò¹­Gêàñ‹Xÿº© &½„øÀô]˜bïbf2]#äAk¯I'%Å1à- f¿¾Ï”©LIJŒ–òö|àƒÎ¤O)wÏ `¸\ç‡mGßRjP™-ððb² u÷öAF°‹þ‰~W…‡9÷wøÙ liøw†gö­sp~x‹¿x‹xŒßxŽïxÿxùŽ€;Python-2.3.7/Demo/tix/bitmaps/about.xpm0000755001241000117560000000440607256055517017262 0ustar loewishpifb6/* XPM */ static char * about_xpm[] = { "50 40 7 1", " s None c None", ". c black", "X c white", "o c gray70", "O c navy", "+ c red", "@ c yellow", " ", " ", " ", " ................................. ", " ..XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXoo. ", " .XooooooooooooooooooooooooooooooXo. ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXooXo. ", " ..oooooooooooooooooooooooooooooooXo. ", " ...............................XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo.++++ ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo+++ ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.Xo+++++ ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.Xo++++++ ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.Xo+++ + ", " .OOOOO@@@@@OOOOOOOOOOOOOOOOOOO.Xo++. ", " .OOOOOOO@OOOOO@OOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOO@OOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOO@OOOO@@OOO@OOO@OOOOOOO.XoXo. ", " .OOOOOOO@OOOOO@OOOO@O@OOOOOOOO.XoXo. ", " .OOOOOOO@OOOOO@OOOOO@OOOOOOOOO.XoXo. ", " .OOOOOOO@OOOOO@OOOOO@OOOOOOOOO.XoXo. ", " .OOOOOOO@OOOOO@OOOO@O@OOOOOOOO.XoXo. ", " .OOOOOOO@OOOO@@@OO@OOO@OOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.XoXo. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.Xo.. ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.Xo ", " OOOOOOOOOOOOOOOOOOOOOOOOOOOOO.X. ", " ............................. ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/rightj.xbm0000755001241000117560000000044207256055517017415 0ustar loewishpifb6#define rightj_width 16 #define rightj_height 16 static unsigned char rightj_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xf0, 0xdb, 0x00, 0x00, 0x70, 0xdb, 0x00, 0x00, 0x00, 0xef, 0x00, 0x00, 0xd8, 0xde, 0x00, 0x00, 0xc0, 0xdd, 0x00, 0x00, 0xa0, 0xef, 0x00, 0x00, 0xd8, 0xde}; Python-2.3.7/Demo/tix/bitmaps/filebox.xbm0000755001241000117560000000157507256055517017566 0ustar loewishpifb6#define filebox_width 32 #define filebox_height 32 static unsigned char filebox_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0xff, 0x3f, 0x04, 0x00, 0x00, 0x20, 0xe4, 0xff, 0xff, 0x27, 0x24, 0x00, 0x00, 0x24, 0x24, 0x00, 0x00, 0x24, 0xe4, 0xff, 0xff, 0x27, 0x04, 0x00, 0x00, 0x20, 0xe4, 0x7f, 0xfe, 0x27, 0x24, 0x50, 0x02, 0x25, 0x24, 0x40, 0x02, 0x24, 0x24, 0x50, 0x02, 0x25, 0x24, 0x40, 0x02, 0x24, 0x24, 0x50, 0x02, 0x25, 0x24, 0x40, 0x02, 0x24, 0x24, 0x50, 0x02, 0x25, 0xe4, 0x7f, 0xfe, 0x27, 0x04, 0x00, 0x00, 0x20, 0xe4, 0xff, 0xff, 0x27, 0x24, 0x00, 0x00, 0x24, 0x24, 0x00, 0x00, 0x24, 0xe4, 0xff, 0xff, 0x27, 0x04, 0x00, 0x00, 0x20, 0xfc, 0xff, 0xff, 0x3f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; Python-2.3.7/Demo/tix/bitmaps/italic.xbm0000755001241000117560000000044207256055517017373 0ustar loewishpifb6#define italic_width 16 #define italic_height 16 static unsigned char italic_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x80, 0x3f, 0x80, 0x3f, 0x00, 0x06, 0x00, 0x06, 0x00, 0x03, 0x00, 0x03, 0x80, 0x01, 0x80, 0x01, 0xc0, 0x00, 0xc0, 0x00, 0x60, 0x00, 0x60, 0x00, 0xfc, 0x01, 0xfc, 0x01}; Python-2.3.7/Demo/tix/bitmaps/leftj.xbm0000755001241000117560000000043707256055517017236 0ustar loewishpifb6#define leftj_width 16 #define leftj_height 16 static unsigned char leftj_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xcc, 0x6d, 0x00, 0x00, 0xdc, 0x01, 0x00, 0x00, 0xec, 0x0e, 0x00, 0x00, 0xfc, 0x7e, 0x00, 0x00, 0xdc, 0x03, 0x00, 0x00, 0x6c, 0x3b, 0x00, 0x00, 0x6c, 0x1f}; Python-2.3.7/Demo/tix/bitmaps/capital.xbm0000755001241000117560000000044507256055517017546 0ustar loewishpifb6#define capital_width 16 #define capital_height 16 static unsigned char capital_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x30, 0x08, 0x30, 0x0c, 0x30, 0x06, 0x30, 0x03, 0xb0, 0x01, 0xf0, 0x00, 0xf0, 0x00, 0xf0, 0x01, 0xb0, 0x03, 0x30, 0x07, 0x30, 0x0e, 0x30, 0x1c, 0x00, 0x00}; Python-2.3.7/Demo/tix/bitmaps/bold.xbm0000755001241000117560000000043407256055517017047 0ustar loewishpifb6#define bold_width 16 #define bold_height 16 static unsigned char bold_bits[] = { 0x00, 0x00, 0x00, 0x00, 0xfc, 0x07, 0xfc, 0x0f, 0x18, 0x1c, 0x18, 0x18, 0x18, 0x18, 0x18, 0x1c, 0xf8, 0x0f, 0xf8, 0x0f, 0x18, 0x18, 0x18, 0x30, 0x18, 0x30, 0x18, 0x38, 0xfc, 0x3f, 0xfc, 0x1f}; Python-2.3.7/Demo/tix/bitmaps/centerj.xbm0000755001241000117560000000044507256055517017563 0ustar loewishpifb6#define centerj_width 16 #define centerj_height 16 static unsigned char centerj_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xf0, 0x3e, 0x00, 0x00, 0xc0, 0x0d, 0x00, 0x00, 0x58, 0x77, 0x00, 0x00, 0xb0, 0x3b, 0x00, 0x00, 0xdc, 0xf7, 0x00, 0x00, 0xf0, 0x3e, 0x00, 0x00, 0xd8, 0x7e}; Python-2.3.7/Demo/tix/bitmaps/drivea.xbm0000755001241000117560000000157207256055517017405 0ustar loewishpifb6#define drivea_width 32 #define drivea_height 32 static unsigned char drivea_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xf8, 0xff, 0xff, 0x1f, 0x08, 0x00, 0x00, 0x18, 0xa8, 0xaa, 0xaa, 0x1a, 0x48, 0x55, 0xd5, 0x1d, 0xa8, 0xaa, 0xaa, 0x1b, 0x48, 0x55, 0x55, 0x1d, 0xa8, 0xfa, 0xaf, 0x1a, 0xc8, 0xff, 0xff, 0x1d, 0xa8, 0xfa, 0xaf, 0x1a, 0x48, 0x55, 0x55, 0x1d, 0xa8, 0xaa, 0xaa, 0x1a, 0x48, 0x55, 0x55, 0x1d, 0xa8, 0xaa, 0xaa, 0x1a, 0xf8, 0xff, 0xff, 0x1f, 0xf8, 0xff, 0xff, 0x1f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; Python-2.3.7/Demo/tix/bitmaps/netw.xpm0000755001241000117560000000255207256055517017125 0ustar loewishpifb6/* XPM */ static char * netw_xpm[] = { /* width height ncolors chars_per_pixel */ "32 32 7 1", /* colors */ " s None c None", ". c #000000000000", "X c white", "o c #c000c000c000", "O c #404040", "+ c blue", "@ c red", /* pixels */ " ", " .............. ", " .XXXXXXXXXXXX. ", " .XooooooooooO. ", " .Xo.......XoO. ", " .Xo.++++o+XoO. ", " .Xo.++++o+XoO. ", " .Xo.++oo++XoO. ", " .Xo.++++++XoO. ", " .Xo.+o++++XoO. ", " .Xo.++++++XoO. ", " .Xo.XXXXXXXoO. ", " .XooooooooooO. ", " .Xo@ooo....oO. ", " .............. .XooooooooooO. ", " .XXXXXXXXXXXX. .XooooooooooO. ", " .XooooooooooO. .OOOOOOOOOOOO. ", " .Xo.......XoO. .............. ", " .Xo.++++o+XoO. @ ", " .Xo.++++o+XoO. @ ", " .Xo.++oo++XoO. @ ", " .Xo.++++++XoO. @ ", " .Xo.+o++++XoO. @ ", " .Xo.++++++XoO. ..... ", " .Xo.XXXXXXXoO. .XXX. ", " .XooooooooooO.@@@@@@.X O. ", " .Xo@ooo....oO. .OOO. ", " .XooooooooooO. ..... ", " .XooooooooooO. ", " .OOOOOOOOOOOO. ", " .............. ", " "}; Python-2.3.7/Demo/tix/bitmaps/select.xpm0000755001241000117560000000446407256055517017433 0ustar loewishpifb6/* XPM */ static char * select_xpm[] = { "50 40 9 1", " s None c None", ". c black", "X c gray95", "o c gray50", "O c gray70", "+ c navy", "@ c #000080800000", "# c #808000000000", "$ c white", " ", " ", " ", " ", " ", " ", " ", " ", " ", " .............................................. ", " .XXXXXXXXXXooooooooooooXXXXXXXXXXXoXXXXXXXXXX. ", " .X ooOOOOOOOOOOXX oX o. ", " .X ooOOOOOOOOOOXX oX o. ", " .X ++++ ooOOOOOOOOOOXX ... oX @ o. ", " .X +++++ ooOOOOOOOOOOXX . . oX @@@ o. ", " .X +++ + ooOOOOOOOOOOXX . . oX @ @ o. ", " .X + + ooOO#####OOOXX . . oX @ @ o. ", " .X + + ooOO#OOO##OOXX . oX @ @ o. ", " .X + + ooO##OOOO##OXX . oX @ @ o. ", " .X ++ ++ ooO###OOO#OOXX . oX @ @ o. ", " .X +++++++ ooO#######OOXX . oX @ @ o. ", " .X + + ooO##O#OO#OOXX . oX @ @ o. ", " .X + ++ ooO##OOOOO#OXX . . oX @ @ o. ", " .X + + ooOO#OOOOO#OXX . . oX @ @@ o. ", " .X + ++ ooOO#OOOOO#OXX .... oX @@@@@ o. ", " .X ooOO######OOXX oX o. ", " .X ooOOOOOOOOOOXX $oX o. ", " .XoooooooooooXXXXXXXXXXXoooooooooooXooooooooo. ", " .............................................. ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/optmenu.xpm0000755001241000117560000000436107256055517017637 0ustar loewishpifb6/* XPM */ static char * optmenu_xpm[] = { "50 40 5 1", " s None c None", ". c white", "X c gray80", "o c gray50", "O c black", " ", " ", " .............................. ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXOXOXXOXXOXXXXOOXXXXXXXXXXo ", " .XXXOXOXXOXOXXXOXXOXXXXXXXXXXo ", " .XXXXOXXOXXOXXXOXXXOXXXXXXXXXo ", " .XXXXOXXXOXXOOXXOXOXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo.............o ", " .............................o o ", " ..XXXOXXXXXOXXXXXXXXOXXXXXXXOo o ", " ..XXOXOXOXXOXOXXXOXXOXXXXXXXOo ...... o ", " ..XXXOXXXOXXOXXXOXXXOXXXXXXXOo . o o ", " ..XXOXXXOXXXOXOXXOXXOXXXXXXXOo . o o ", " ..XXXXXXXXXXXXXXXXXXXXXXXXXXOo .ooooo o ", " .OOOOOOOOOOOOOOOOOOOOOOOOOOOOo o ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo o ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXooooooooooooooo ", " .XXXXOXXXXXOXXXXXXXXXXXXXXXXXo ", " .XXXOXXXXXXXXXOXXXXXXXXXXXXXXo ", " .XXXXOXXOXXOXOXOXXXXXXXXXXXXXo ", " .XXXXXOXXOXOXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXOXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXOXOXXXXXXXOXOXXXXXOXXXXXXo ", " .XXXXXOXOXOXXOXXXXXOXXOXXXXXXo ", " .XXXXOXXOXOXOXXXOXOXOXXOXXXXXo ", " .XXXOXXXXOXXOXXXOXXOXXXXOXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXo ", " oooooooooooooooooooooooooooooo ", " ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/drivea.xpm0000755001241000117560000000253307256055517017421 0ustar loewishpifb6/* XPM */ static char * drivea_xpm[] = { /* width height ncolors chars_per_pixel */ "32 32 5 1", /* colors */ " s None c None", ". c #000000000000", "X c white", "o c #c000c000c000", "O c #800080008000", /* pixels */ " ", " ", " ", " ", " ", " ", " ", " ", " ", " .......................... ", " .XXXXXXXXXXXXXXXXXXXXXXXo. ", " .XooooooooooooooooooooooO. ", " .Xooooooooooooooooo..oooO. ", " .Xooooooooooooooooo..oooO. ", " .XooooooooooooooooooooooO. ", " .Xoooooooo.......oooooooO. ", " .Xoo...................oO. ", " .Xoooooooo.......oooooooO. ", " .XooooooooooooooooooooooO. ", " .XooooooooooooooooooooooO. ", " .XooooooooooooooooooooooO. ", " .XooooooooooooooooooooooO. ", " .oOOOOOOOOOOOOOOOOOOOOOOO. ", " .......................... ", " ", " ", " ", " ", " ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/combobox.xpm.10000755001241000117560000000435407256055517020121 0ustar loewishpifb6/* XPM */ static char * combobox_xpm[] = { "50 40 4 1", " s None c None", ". c black", "X c #FFFF80808080", "o c gray70", " ", " ", " ", " .................................... ....... ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. . . . ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. . . . ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. . . . ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. . . . ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. . ... . ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. . . . ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. . . ", " .................................... ....... ", " ", " ............................................. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .o...................................o.ooooo. ", " .o...................................o.ooooo. ", " .o...................................o.ooooo. ", " .o...................................o.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " .ooooooooooooooooooooooooooooooooooooo.ooooo. ", " ............................................. ", " ", " ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/netw.xbm0000755001241000117560000000156407256055517017111 0ustar loewishpifb6#define netw_width 32 #define netw_height 32 static unsigned char netw_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfe, 0x7f, 0x00, 0x00, 0x02, 0x40, 0x00, 0x00, 0xfa, 0x5f, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0x0a, 0x52, 0x00, 0x00, 0x0a, 0x52, 0x00, 0x00, 0x8a, 0x51, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0x4a, 0x50, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0x0a, 0x50, 0x00, 0x00, 0xfa, 0x5f, 0x00, 0x00, 0x02, 0x40, 0xfe, 0x7f, 0x52, 0x55, 0x02, 0x40, 0xaa, 0x6a, 0xfa, 0x5f, 0xfe, 0x7f, 0x0a, 0x50, 0xfe, 0x7f, 0x0a, 0x52, 0x80, 0x00, 0x0a, 0x52, 0x80, 0x00, 0x8a, 0x51, 0x80, 0x00, 0x0a, 0x50, 0x80, 0x00, 0x4a, 0x50, 0x80, 0x00, 0x0a, 0x50, 0xe0, 0x03, 0x0a, 0x50, 0x20, 0x02, 0xfa, 0xdf, 0x3f, 0x03, 0x02, 0x40, 0xa0, 0x02, 0x52, 0x55, 0xe0, 0x03, 0xaa, 0x6a, 0x00, 0x00, 0xfe, 0x7f, 0x00, 0x00, 0xfe, 0x7f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; Python-2.3.7/Demo/tix/bitmaps/combobox.xpm0000755001241000117560000000441607256055517017761 0ustar loewishpifb6/* XPM */ static char * combobox_xpm[] = { "50 40 6 1", " s None c None", ". c black", "X c white", "o c #FFFF80808080", "O c gray70", "+ c #808000008080", " ", " ", " ", " .................................... XXXXXXX ", " .ooooooooooooooooooooooooooooooooooX X . . ", " .ooooooooooooooooooooooooooooooooooX X . . ", " .oooo.oooooooooooooooooooooooooooooX X . . ", " .oo.o..oo.o.oo.o.ooooooooooooooooooX X . . ", " .o..o.o.o.oo.oo.oo.ooooooooooooooooX X ... . ", " .oo.oo.oo.o.oo.ooo.ooooooooooooooooX X . . ", " .ooooooooooooooooooooooooooooooooooX X . ", " .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX X...... ", " ", " ", " ", " XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ", " X............................................ ", " X.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOX.OOOOX. ", " X.O+OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOX.OX OX. ", " X.O++OOO+OO+++OOOOOOOOOOOOOOOOOOOOOOOX.X ..X. ", " X.O+O+O+OOO+O+OOOOOOOOOOOOOOOOOOOOOOOX.OOOOX. ", " X.O++OOO+OO+++OOOOOOOOOOOOOOOOOOOOOOOX.OOOOX. ", " X.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOX.XXXXX. ", " X.O.....X..........................OOX.X .X. ", " X.OX...XXX.X.XX.XX.................OOX.X .X. ", " X.OX.X..X..X.XX..XX.X..............OOX.X .X. ", " X.O.X...X..X.X...X..X..............OOX.X .X. ", " X.OOOOOOOOOOOOOOOOOOOOOOOO+OOOOOOOOOOX.X .X. ", " X.OOOOOOOOO+OOO+OOOOO+OOOO+OOOOOOOOOOX.X .X. ", " X.O+++OO+OO+O+OO++O++OO+OO+OOOOOOOOOOX.X...X. ", " X.OO+OO++OO+O+OO+OOO+OO+O++OOOOOOOOOOX.OOOOX. ", " X.OOOOOOOO+OOOOO++OO+OOOOOOOOOOOOOOOOX.OOOOX. ", " X.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOX.X .X. ", " X.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOX.O .OX. ", " X.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOX.OOOOX. ", " X.XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX.XXXXX. ", " X............................................ ", " ", " ", " "}; Python-2.3.7/Demo/tix/bitmaps/justify.xbm0000755001241000117560000000044507256055517017626 0ustar loewishpifb6#define justify_width 16 #define justify_height 16 static unsigned char justify_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xec, 0xdb, 0x00, 0x00, 0x7c, 0xdb, 0x00, 0x00, 0xbc, 0xf7, 0x00, 0x00, 0xdc, 0xde, 0x00, 0x00, 0x6c, 0xdf, 0x00, 0x00, 0x6c, 0xef, 0x00, 0x00, 0xdc, 0xdf}; Python-2.3.7/Demo/tix/bitmaps/combobox.xbm0000755001241000117560000000160007256055517017733 0ustar loewishpifb6#define combobox_width 32 #define combobox_height 32 static unsigned char combobox_bits[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xff, 0xff, 0x3e, 0x04, 0x00, 0x80, 0x2a, 0x04, 0x00, 0x80, 0x2a, 0x04, 0x00, 0x80, 0x2a, 0x04, 0x00, 0x80, 0x2b, 0xfc, 0xff, 0xff, 0x3e, 0x08, 0x00, 0x00, 0x20, 0x08, 0x00, 0x00, 0x3e, 0x08, 0x00, 0x00, 0x2a, 0x28, 0x49, 0x00, 0x2a, 0x08, 0x00, 0x00, 0x3e, 0x08, 0x00, 0x00, 0x22, 0x08, 0x00, 0x00, 0x22, 0x28, 0x49, 0x12, 0x22, 0x08, 0x00, 0x00, 0x22, 0x08, 0x00, 0x00, 0x22, 0x08, 0x00, 0x00, 0x22, 0x28, 0x49, 0x02, 0x22, 0x08, 0x00, 0x00, 0x3e, 0x08, 0x00, 0x00, 0x2a, 0x08, 0x00, 0x00, 0x2a, 0xf8, 0xff, 0xff, 0x3f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}; Python-2.3.7/Demo/imputil/0000755001241000117560000000000010765544470014633 5ustar loewishpifb6Python-2.3.7/Demo/imputil/importers.py0000644001241000117560000001720307135017334017223 0ustar loewishpifb6# # importers.py # # Demonstration subclasses of imputil.Importer # # There should be consideration for the imports below if it is desirable # to have "all" modules be imported through the imputil system. # these are C extensions import sys import imp import struct import marshal # these are .py modules import imputil import os ###################################################################### _TupleType = type(()) _StringType = type('') ###################################################################### # byte-compiled file suffic character _suffix_char = __debug__ and 'c' or 'o' # byte-compiled file suffix _suffix = '.py' + _suffix_char # the C_EXTENSION suffixes _c_suffixes = filter(lambda x: x[2] == imp.C_EXTENSION, imp.get_suffixes()) def _timestamp(pathname): "Return the file modification time as a Long." try: s = os.stat(pathname) except OSError: return None return long(s[8]) def _fs_import(dir, modname, fqname): "Fetch a module from the filesystem." pathname = os.path.join(dir, modname) if os.path.isdir(pathname): values = { '__pkgdir__' : pathname, '__path__' : [ pathname ] } ispkg = 1 pathname = os.path.join(pathname, '__init__') else: values = { } ispkg = 0 # look for dynload modules for desc in _c_suffixes: file = pathname + desc[0] try: fp = open(file, desc[1]) except IOError: pass else: module = imp.load_module(fqname, fp, file, desc) values['__file__'] = file return 0, module, values t_py = _timestamp(pathname + '.py') t_pyc = _timestamp(pathname + _suffix) if t_py is None and t_pyc is None: return None code = None if t_py is None or (t_pyc is not None and t_pyc >= t_py): file = pathname + _suffix f = open(file, 'rb') if f.read(4) == imp.get_magic(): t = struct.unpack('., where can be located using a subclass-specific mechanism and the is found in the archive using a subclass-specific mechanism. This class defines two hooks for subclasses: one to locate an archive (and possibly return some context for future subfile lookups), and one to locate subfiles. """ def get_code(self, parent, modname, fqname): if parent: # the Importer._finish_import logic ensures that we handle imports # under the top level module (package / archive). assert parent.__importer__ == self # if a parent "package" is provided, then we are importing a # sub-file from the archive. result = self.get_subfile(parent.__archive__, modname) if result is None: return None if isinstance(result, _TupleType): assert len(result) == 2 return (0,) + result return 0, result, {} # no parent was provided, so the archive should exist somewhere on the # default "path". archive = self.get_archive(modname) if archive is None: return None return 1, "", {'__archive__':archive} def get_archive(self, modname): """Get an archive of modules. This method should locate an archive and return a value which can be used by get_subfile to load modules from it. The value may be a simple pathname, an open file, or a complex object that caches information for future imports. Return None if the archive was not found. """ raise RuntimeError, "get_archive not implemented" def get_subfile(self, archive, modname): """Get code from a subfile in the specified archive. Given the specified archive (as returned by get_archive()), locate and return a code object for the specified module name. A 2-tuple may be returned, consisting of a code object and a dict of name/values to place into the target module. Return None if the subfile was not found. """ raise RuntimeError, "get_subfile not implemented" class PackageArchive(PackageArchiveImporter): "PackageArchiveImporter subclass that refers to a specific archive." def __init__(self, modname, archive_pathname): self.__modname = modname self.__path = archive_pathname def get_archive(self, modname): if modname == self.__modname: return self.__path return None # get_subfile is passed the full pathname of the archive ###################################################################### # # Emulate the standard directory-based import mechanism # class DirectoryImporter(imputil.Importer): "Importer subclass to emulate the standard importer." def __init__(self, dir): self.dir = dir def get_code(self, parent, modname, fqname): if parent: dir = parent.__pkgdir__ else: dir = self.dir # Return the module (and other info) if found in the specified # directory. Otherwise, return None. return _fs_import(dir, modname, fqname) def __repr__(self): return '<%s.%s for "%s" at 0x%x>' % (self.__class__.__module__, self.__class__.__name__, self.dir, id(self)) ###################################################################### # # Emulate the standard path-style import mechanism # class PathImporter(imputil.Importer): def __init__(self, path=sys.path): self.path = path def get_code(self, parent, modname, fqname): if parent: # we are looking for a module inside of a specific package return _fs_import(parent.__pkgdir__, modname, fqname) # scan sys.path, looking for the requested module for dir in self.path: if isinstance(dir, _StringType): result = _fs_import(dir, modname, fqname) if result: return result # not found return None ###################################################################### def _test_dir(): "Debug/test function to create DirectoryImporters from sys.path." imputil.ImportManager().install() path = sys.path[:] path.reverse() for d in path: sys.path.insert(0, DirectoryImporter(d)) sys.path.insert(0, imputil.BuiltinImporter()) def _test_revamp(): "Debug/test function for the revamped import system." imputil.ImportManager().install() sys.path.insert(0, PathImporter()) sys.path.insert(0, imputil.BuiltinImporter()) Python-2.3.7/Demo/imputil/knee.py0000644001241000117560000000663207454071760016134 0ustar loewishpifb6"""An Python re-implementation of hierarchical module import. This code is intended to be read, not executed. However, it does work -- all you need to do to enable it is "import knee". (The name is a pun on the klunkier predecessor of this module, "ni".) """ import sys, imp, __builtin__ # Replacement for __import__() def import_hook(name, globals=None, locals=None, fromlist=None): parent = determine_parent(globals) q, tail = find_head_package(parent, name) m = load_tail(q, tail) if not fromlist: return q if hasattr(m, "__path__"): ensure_fromlist(m, fromlist) return m def determine_parent(globals): if not globals or not globals.has_key("__name__"): return None pname = globals['__name__'] if globals.has_key("__path__"): parent = sys.modules[pname] assert globals is parent.__dict__ return parent if '.' in pname: i = pname.rfind('.') pname = pname[:i] parent = sys.modules[pname] assert parent.__name__ == pname return parent return None def find_head_package(parent, name): if '.' in name: i = name.find('.') head = name[:i] tail = name[i+1:] else: head = name tail = "" if parent: qname = "%s.%s" % (parent.__name__, head) else: qname = head q = import_module(head, qname, parent) if q: return q, tail if parent: qname = head parent = None q = import_module(head, qname, parent) if q: return q, tail raise ImportError, "No module named " + qname def load_tail(q, tail): m = q while tail: i = tail.find('.') if i < 0: i = len(tail) head, tail = tail[:i], tail[i+1:] mname = "%s.%s" % (m.__name__, head) m = import_module(head, mname, m) if not m: raise ImportError, "No module named " + mname return m def ensure_fromlist(m, fromlist, recursive=0): for sub in fromlist: if sub == "*": if not recursive: try: all = m.__all__ except AttributeError: pass else: ensure_fromlist(m, all, 1) continue if sub != "*" and not hasattr(m, sub): subname = "%s.%s" % (m.__name__, sub) submod = import_module(sub, subname, m) if not submod: raise ImportError, "No module named " + subname def import_module(partname, fqname, parent): try: return sys.modules[fqname] except KeyError: pass try: fp, pathname, stuff = imp.find_module(partname, parent and parent.__path__) except ImportError: return None try: m = imp.load_module(fqname, fp, pathname, stuff) finally: if fp: fp.close() if parent: setattr(parent, partname, m) return m # Replacement for reload() def reload_hook(module): name = module.__name__ if '.' not in name: return import_module(name, name, None) i = name.rfind('.') pname = name[:i] parent = sys.modules[pname] return import_module(name[i+1:], name, parent) # Save the original hooks original_import = __builtin__.__import__ original_reload = __builtin__.reload # Now install our hooks __builtin__.__import__ = import_hook __builtin__.reload = reload_hook Python-2.3.7/Demo/xmlrpc/0000755001241000117560000000000010765544471014456 5ustar loewishpifb6Python-2.3.7/Demo/xmlrpc/xmlrpc_handler.py0000644001241000117560000000545207452674203020034 0ustar loewishpifb6# # XML-RPC SERVER # $Id: xmlrpc_handler.py 26144 2002-04-03 21:47:47Z fdrake $ # # an asynchronous XML-RPC server for Medusa # # written by Sam Rushing # # Based on "xmlrpcserver.py" by Fredrik Lundh (fredrik@pythonware.com) # import http_server import xmlrpclib import sys class xmlrpc_handler: def match (self, request): # Note: /RPC2 is not required by the spec, so you may override this method. if request.uri[:5] == '/RPC2': return 1 else: return 0 def handle_request (self, request): [path, params, query, fragment] = request.split_uri() if request.command in ('post', 'put'): request.collector = collector (self, request) else: request.error (400) def continue_request (self, data, request): params, method = xmlrpclib.loads (data) try: # generate response try: response = self.call (method, params) response = (response,) except: # report exception back to server response = xmlrpclib.dumps ( xmlrpclib.Fault (1, "%s:%s" % sys.exc_info()[:2]) ) else: response = xmlrpclib.dumps (response, methodresponse=1) except: # internal error, report as HTTP server error request.error (500) else: # got a valid XML RPC response request['Content-Type'] = 'text/xml' request.push (response) request.done() def call (self, method, params): # override this method to implement RPC methods raise "NotYetImplemented" class collector: "gathers input for POST and PUT requests" def __init__ (self, handler, request): self.handler = handler self.request = request self.data = '' # make sure there's a content-length header cl = request.get_header ('content-length') if not cl: request.error (411) else: cl = int (cl) # using a 'numeric' terminator self.request.channel.set_terminator (cl) def collect_incoming_data (self, data): self.data = self.data + data def found_terminator (self): # set the terminator back to the default self.request.channel.set_terminator ('\r\n\r\n') self.handler.continue_request (self.data, self.request) if __name__ == '__main__': class rpc_demo (xmlrpc_handler): def call (self, method, params): print 'method="%s" params=%s' % (method, params) return "Sure, that works" import asyncore import http_server hs = http_server.http_server ('', 8000) rpc = rpc_demo() hs.install_handler (rpc) asyncore.loop() Python-2.3.7/Demo/xmlrpc/xmlrpcserver.py0000644001241000117560000000452507452674203017566 0ustar loewishpifb6# # XML-RPC SERVER # $Id: xmlrpcserver.py 26144 2002-04-03 21:47:47Z fdrake $ # # a simple XML-RPC server for Python # # History: # 1999-02-01 fl added to xmlrpclib distribution # # written by Fredrik Lundh, January 1999. # # Copyright (c) 1999 by Secret Labs AB. # Copyright (c) 1999 by Fredrik Lundh. # # fredrik@pythonware.com # http://www.pythonware.com # # -------------------------------------------------------------------- # Permission to use, copy, modify, and distribute this software and # its associated documentation for any purpose and without fee is # hereby granted. This software is provided as is. # -------------------------------------------------------------------- # import SocketServer, BaseHTTPServer import xmlrpclib import sys class RequestHandler(BaseHTTPServer.BaseHTTPRequestHandler): def do_POST(self): try: # get arguments data = self.rfile.read(int(self.headers["content-length"])) params, method = xmlrpclib.loads(data) # generate response try: response = self.call(method, params) # wrap response in a singleton tuple response = (response,) except: # report exception back to server response = xmlrpclib.dumps( xmlrpclib.Fault(1, "%s:%s" % sys.exc_info()[:2]) ) else: response = xmlrpclib.dumps( response, methodresponse=1 ) except: # internal error, report as HTTP server error self.send_response(500) self.end_headers() else: # got a valid XML RPC response self.send_response(200) self.send_header("Content-type", "text/xml") self.send_header("Content-length", str(len(response))) self.end_headers() self.wfile.write(response) # shut down the connection (from Skip Montanaro) self.wfile.flush() self.connection.shutdown(1) def call(self, method, params): # override this method to implement RPC methods print "CALL", method, params return params if __name__ == '__main__': server = SocketServer.TCPServer(('', 8000), RequestHandler) server.serve_forever() Python-2.3.7/Demo/pdist/0000755001241000117560000000000010765544470014273 5ustar loewishpifb6Python-2.3.7/Demo/pdist/client.py0000755001241000117560000000765506035552230016127 0ustar loewishpifb6"""RPC Client module.""" import sys import socket import pickle import __builtin__ import os # Default verbosity (0 = silent, 1 = print connections, 2 = print requests too) VERBOSE = 1 class Client: """RPC Client class. No need to derive a class -- it's fully generic.""" def __init__(self, address, verbose = VERBOSE): self._pre_init(address, verbose) self._post_init() def _pre_init(self, address, verbose = VERBOSE): if type(address) == type(0): address = ('', address) self._address = address self._verbose = verbose if self._verbose: print "Connecting to %s ..." % repr(address) self._socket = socket.socket(socket.AF_INET, socket.SOCK_STREAM) self._socket.connect(address) if self._verbose: print "Connected." self._lastid = 0 # Last id for which a reply has been received self._nextid = 1 # Id of next request self._replies = {} # Unprocessed replies self._rf = self._socket.makefile('r') self._wf = self._socket.makefile('w') def _post_init(self): self._methods = self._call('.methods') def __del__(self): self._close() def _close(self): if self._rf: self._rf.close() self._rf = None if self._wf: self._wf.close() self._wf = None if self._socket: self._socket.close() self._socket = None def __getattr__(self, name): if name in self._methods: method = _stub(self, name) setattr(self, name, method) # XXX circular reference return method raise AttributeError, name def _setverbose(self, verbose): self._verbose = verbose def _call(self, name, *args): return self._vcall(name, args) def _vcall(self, name, args): return self._recv(self._vsend(name, args)) def _send(self, name, *args): return self._vsend(name, args) def _send_noreply(self, name, *args): return self._vsend(name, args, 0) def _vsend_noreply(self, name, args): return self._vsend(name, args, 0) def _vsend(self, name, args, wantreply = 1): id = self._nextid self._nextid = id+1 if not wantreply: id = -id request = (name, args, id) if self._verbose > 1: print "sending request: %s" % repr(request) wp = pickle.Pickler(self._wf) wp.dump(request) return id def _recv(self, id): exception, value, rid = self._vrecv(id) if rid != id: raise RuntimeError, "request/reply id mismatch: %d/%d" % (id, rid) if exception is None: return value x = exception if hasattr(__builtin__, exception): x = getattr(__builtin__, exception) elif exception in ('posix.error', 'mac.error'): x = os.error if x == exception: exception = x raise exception, value def _vrecv(self, id): self._flush() if self._replies.has_key(id): if self._verbose > 1: print "retrieving previous reply, id = %d" % id reply = self._replies[id] del self._replies[id] return reply aid = abs(id) while 1: if self._verbose > 1: print "waiting for reply, id = %d" % id rp = pickle.Unpickler(self._rf) reply = rp.load() del rp if self._verbose > 1: print "got reply: %s" % repr(reply) rid = reply[2] arid = abs(rid) if arid == aid: if self._verbose > 1: print "got it" return reply self._replies[rid] = reply if arid > aid: if self._verbose > 1: print "got higher id, assume all ok" return (None, None, id) def _flush(self): self._wf.flush() from security import Security class SecureClient(Client, Security): def __init__(self, *args): import string apply(self._pre_init, args) Security.__init__(self) self._wf.flush() line = self._rf.readline() challenge = string.atoi(string.strip(line)) response = self._encode_challenge(challenge) line = `long(response)` if line[-1] in 'Ll': line = line[:-1] self._wf.write(line + '\n') self._wf.flush() self._post_init() class _stub: """Helper class for Client -- each instance serves as a method of the client.""" def __init__(self, client, name): self._client = client self._name = name def __call__(self, *args): return self._client._vcall(self._name, args) Python-2.3.7/Demo/pdist/cvslock.py0000755001241000117560000001276205772635060016322 0ustar loewishpifb6"""CVS locking algorithm. CVS locking strategy ==================== As reverse engineered from the CVS 1.3 sources (file lock.c): - Locking is done on a per repository basis (but a process can hold write locks for multiple directories); all lock files are placed in the repository and have names beginning with "#cvs.". - Before even attempting to lock, a file "#cvs.tfl." is created (and removed again), to test that we can write the repository. [The algorithm can still be fooled (1) if the repository's mode is changed while attempting to lock; (2) if this file exists and is writable but the directory is not.] - While creating the actual read/write lock files (which may exist for a long time), a "meta-lock" is held. The meta-lock is a directory named "#cvs.lock" in the repository. The meta-lock is also held while a write lock is held. - To set a read lock: - acquire the meta-lock - create the file "#cvs.rfl." - release the meta-lock - To set a write lock: - acquire the meta-lock - check that there are no files called "#cvs.rfl.*" - if there are, release the meta-lock, sleep, try again - create the file "#cvs.wfl." - To release a write lock: - remove the file "#cvs.wfl." - rmdir the meta-lock - To release a read lock: - remove the file "#cvs.rfl." Additional notes ---------------- - A process should read-lock at most one repository at a time. - A process may write-lock as many repositories as it wishes (to avoid deadlocks, I presume it should always lock them top-down in the directory hierarchy). - A process should make sure it removes all its lock files and directories when it crashes. - Limitation: one user id should not be committing files into the same repository at the same time. Turn this into Python code -------------------------- rl = ReadLock(repository, waittime) wl = WriteLock(repository, waittime) list = MultipleWriteLock([repository1, repository2, ...], waittime) """ import os import time import stat import pwd # Default wait time DELAY = 10 # XXX This should be the same on all Unix versions EEXIST = 17 # Files used for locking (must match cvs.h in the CVS sources) CVSLCK = "#cvs.lck" CVSRFL = "#cvs.rfl." CVSWFL = "#cvs.wfl." class Error: def __init__(self, msg): self.msg = msg def __repr__(self): return repr(self.msg) def __str__(self): return str(self.msg) class Locked(Error): pass class Lock: def __init__(self, repository = ".", delay = DELAY): self.repository = repository self.delay = delay self.lockdir = None self.lockfile = None pid = `os.getpid()` self.cvslck = self.join(CVSLCK) self.cvsrfl = self.join(CVSRFL + pid) self.cvswfl = self.join(CVSWFL + pid) def __del__(self): print "__del__" self.unlock() def setlockdir(self): while 1: try: self.lockdir = self.cvslck os.mkdir(self.cvslck, 0777) return except os.error, msg: self.lockdir = None if msg[0] == EEXIST: try: st = os.stat(self.cvslck) except os.error: continue self.sleep(st) continue raise Error("failed to lock %s: %s" % ( self.repository, msg)) def unlock(self): self.unlockfile() self.unlockdir() def unlockfile(self): if self.lockfile: print "unlink", self.lockfile try: os.unlink(self.lockfile) except os.error: pass self.lockfile = None def unlockdir(self): if self.lockdir: print "rmdir", self.lockdir try: os.rmdir(self.lockdir) except os.error: pass self.lockdir = None def sleep(self, st): sleep(st, self.repository, self.delay) def join(self, name): return os.path.join(self.repository, name) def sleep(st, repository, delay): if delay <= 0: raise Locked(st) uid = st[stat.ST_UID] try: pwent = pwd.getpwuid(uid) user = pwent[0] except KeyError: user = "uid %d" % uid print "[%s]" % time.ctime(time.time())[11:19], print "Waiting for %s's lock in" % user, repository time.sleep(delay) class ReadLock(Lock): def __init__(self, repository, delay = DELAY): Lock.__init__(self, repository, delay) ok = 0 try: self.setlockdir() self.lockfile = self.cvsrfl fp = open(self.lockfile, 'w') fp.close() ok = 1 finally: if not ok: self.unlockfile() self.unlockdir() class WriteLock(Lock): def __init__(self, repository, delay = DELAY): Lock.__init__(self, repository, delay) self.setlockdir() while 1: uid = self.readers_exist() if not uid: break self.unlockdir() self.sleep(uid) self.lockfile = self.cvswfl fp = open(self.lockfile, 'w') fp.close() def readers_exist(self): n = len(CVSRFL) for name in os.listdir(self.repository): if name[:n] == CVSRFL: try: st = os.stat(self.join(name)) except os.error: continue return st return None def MultipleWriteLock(repositories, delay = DELAY): while 1: locks = [] for r in repositories: try: locks.append(WriteLock(r, 0)) except Locked, instance: del locks break else: break sleep(instance.msg, r, delay) return list def test(): import sys if sys.argv[1:]: repository = sys.argv[1] else: repository = "." rl = None wl = None try: print "attempting write lock ..." wl = WriteLock(repository) print "got it." wl.unlock() print "attempting read lock ..." rl = ReadLock(repository) print "got it." rl.unlock() finally: print [1] sys.exc_traceback = None print [2] if rl: rl.unlock() print [3] if wl: wl.unlock() print [4] rl = None print [5] wl = None print [6] if __name__ == '__main__': test() Python-2.3.7/Demo/pdist/rrcs.py0000755001241000117560000000654507524770010015621 0ustar loewishpifb6#! /usr/bin/env python "Remote RCS -- command line interface" import sys import os import getopt import string import md5 import tempfile from rcsclient import openrcsclient def main(): sys.stdout = sys.stderr try: opts, rest = getopt.getopt(sys.argv[1:], 'h:p:d:qvL') if not rest: cmd = 'head' else: cmd, rest = rest[0], rest[1:] if not commands.has_key(cmd): raise getopt.error, "unknown command" coptset, func = commands[cmd] copts, files = getopt.getopt(rest, coptset) except getopt.error, msg: print msg print "usage: rrcs [options] command [options] [file] ..." print "where command can be:" print " ci|put # checkin the given files" print " co|get # checkout" print " info # print header info" print " head # print revision of head branch" print " list # list filename if valid" print " log # print full log" print " diff # diff rcs file and work file" print "if no files are given, all remote rcs files are assumed" sys.exit(2) x = openrcsclient(opts) if not files: files = x.listfiles() for fn in files: try: func(x, copts, fn) except (IOError, os.error), msg: print "%s: %s" % (fn, msg) def checkin(x, copts, fn): f = open(fn) data = f.read() f.close() new = not x.isvalid(fn) if not new and same(x, copts, fn, data): print "%s: unchanged since last checkin" % fn return print "Checking in", fn, "..." message = asklogmessage(new) messages = x.put(fn, data, message) if messages: print messages def checkout(x, copts, fn): data = x.get(fn) f = open(fn, 'w') f.write(data) f.close() def lock(x, copts, fn): x.lock(fn) def unlock(x, copts, fn): x.unlock(fn) def info(x, copts, fn): dict = x.info(fn) keys = dict.keys() keys.sort() for key in keys: print key + ':', dict[key] print '='*70 def head(x, copts, fn): head = x.head(fn) print fn, head def list(x, copts, fn): if x.isvalid(fn): print fn def log(x, copts, fn): flags = '' for o, a in copts: flags = flags + ' ' + o + a flags = flags[1:] messages = x.log(fn, flags) print messages def diff(x, copts, fn): if same(x, copts, fn): return flags = '' for o, a in copts: flags = flags + ' ' + o + a flags = flags[1:] data = x.get(fn) tf = tempfile.NamedTemporaryFile() tf.write(data) tf.flush() print 'diff %s -r%s %s' % (flags, x.head(fn), fn) sts = os.system('diff %s %s %s' % (flags, tf.name, fn)) if sts: print '='*70 def same(x, copts, fn, data = None): if data is None: f = open(fn) data = f.read() f.close() lsum = md5.new(data).digest() rsum = x.sum(fn) return lsum == rsum def asklogmessage(new): if new: print "enter description,", else: print "enter log message,", print "terminate with single '.' or end of file:" if new: print "NOTE: This is NOT the log message!" message = "" while 1: sys.stderr.write(">> ") sys.stderr.flush() line = sys.stdin.readline() if not line or line == '.\n': break message = message + line return message def remove(fn): try: os.unlink(fn) except os.error: pass commands = { 'ci': ('', checkin), 'put': ('', checkin), 'co': ('', checkout), 'get': ('', checkout), 'info': ('', info), 'head': ('', head), 'list': ('', list), 'lock': ('', lock), 'unlock': ('', unlock), 'log': ('bhLRtd:l:r:s:w:V:', log), 'diff': ('c', diff), } if __name__ == '__main__': main() Python-2.3.7/Demo/pdist/rrcs0000755001241000117560000000016506672262615015174 0ustar loewishpifb6#!/usr/bin/env python import addpack addpack.addpack('/home/guido/src/python/Demo/pdist') import rrcs rrcs.main() Python-2.3.7/Demo/pdist/sumtree.py0000755001241000117560000000071505742214504016326 0ustar loewishpifb6import time import FSProxy def main(): t1 = time.time() #proxy = FSProxy.FSProxyClient(('voorn.cwi.nl', 4127)) proxy = FSProxy.FSProxyLocal() sumtree(proxy) proxy._close() t2 = time.time() print t2-t1, "seconds" raw_input("[Return to exit] ") def sumtree(proxy): print "PWD =", proxy.pwd() files = proxy.listfiles() proxy.infolist(files) subdirs = proxy.listsubdirs() for name in subdirs: proxy.cd(name) sumtree(proxy) proxy.back() main() Python-2.3.7/Demo/pdist/rcsclient.py0000755001241000117560000000275706577243737016661 0ustar loewishpifb6"""Customize this file to change the default client etc. (In general, it is probably be better to make local operation the default and to require something like an RCSSERVER environment variable to enable remote operation.) """ import string import os # These defaults don't belong here -- they should be taken from the # environment or from a hidden file in the current directory HOST = 'voorn.cwi.nl' PORT = 4127 VERBOSE = 1 LOCAL = 0 import client class RCSProxyClient(client.SecureClient): def __init__(self, address, verbose = client.VERBOSE): client.SecureClient.__init__(self, address, verbose) def openrcsclient(opts = []): "open an RCSProxy client based on a list of options returned by getopt" import RCSProxy host = HOST port = PORT verbose = VERBOSE local = LOCAL directory = None for o, a in opts: if o == '-h': host = a if ':' in host: i = string.find(host, ':') host, p = host[:i], host[i+1:] if p: port = string.atoi(p) if o == '-p': port = string.atoi(a) if o == '-d': directory = a if o == '-v': verbose = verbose + 1 if o == '-q': verbose = 0 if o == '-L': local = 1 if local: import RCSProxy x = RCSProxy.RCSProxyLocal() else: address = (host, port) x = RCSProxyClient(address, verbose) if not directory: try: directory = open(os.path.join("CVS", "Repository")).readline() except IOError: pass else: if directory[-1] == '\n': directory = directory[:-1] if directory: x.cd(directory) return x Python-2.3.7/Demo/pdist/rcsbump0000755001241000117560000000135706672262615015702 0ustar loewishpifb6#!/usr/bin/env python # -*- python -*- # # guido's version, from rcsbump,v 1.2 1995/06/22 21:27:27 bwarsaw Exp # # Python script for bumping up an RCS major revision number. import sys import regex import rcslib import string WITHLOCK = 1 majorrev_re = regex.compile('^[0-9]+') dir = rcslib.RCS() if sys.argv[1:]: files = sys.argv[1:] else: files = dir.listfiles() for file in files: # get the major revnumber of the file headbranch = dir.info(file)['head'] majorrev_re.match(headbranch) majorrev = string.atoi(majorrev_re.group(0)) + 1 if not dir.islocked(file): dir.checkout(file, WITHLOCK) msg = "Bumping major revision number (to %d)" % majorrev dir.checkin((file, "%s.0" % majorrev), msg, "-f") Python-2.3.7/Demo/pdist/makechangelog.py0000755001241000117560000000570606577243737017455 0ustar loewishpifb6#! /usr/bin/env python """Turn a pile of RCS log output into ChangeLog file entries. """ import sys import string import regex import getopt import time def main(): args = sys.argv[1:] opts, args = getopt.getopt(args, 'p:') prefix = '' for o, a in opts: if p == '-p': prefix = a f = sys.stdin allrevs = [] while 1: file = getnextfile(f) if not file: break revs = [] while 1: rev = getnextrev(f, file) if not rev: break revs.append(rev) if revs: allrevs[len(allrevs):] = revs allrevs.sort() allrevs.reverse() for rev in allrevs: formatrev(rev, prefix) parsedateprog = regex.compile( '^date: \([0-9]+\)/\([0-9]+\)/\([0-9]+\) ' + '\([0-9]+\):\([0-9]+\):\([0-9]+\); author: \([^ ;]+\)') authormap = { 'guido': 'Guido van Rossum ', 'jack': 'Jack Jansen ', 'sjoerd': 'Sjoerd Mullender ', } def formatrev(rev, prefix): dateline, file, revline, log = rev if parsedateprog.match(dateline) >= 0: fields = parsedateprog.group(1, 2, 3, 4, 5, 6) author = parsedateprog.group(7) if authormap.has_key(author): author = authormap[author] tfields = map(string.atoi, fields) + [0, 0, 0] tfields[5] = tfields[5] - time.timezone t = time.mktime(tuple(tfields)) print time.ctime(t), '', author words = string.split(log) words[:0] = ['*', prefix + file + ':'] maxcol = 72-8 col = maxcol for word in words: if col > 0 and col + len(word) >= maxcol: print print '\t' + word, col = -1 else: print word, col = col + 1 + len(word) print print startprog = regex.compile("^Working file: \(.*\)$") def getnextfile(f): while 1: line = f.readline() if not line: return None if startprog.match(line) >= 0: file = startprog.group(1) # Skip until first revision while 1: line = f.readline() if not line: return None if line[:10] == '='*10: return None if line[:10] == '-'*10: break ## print "Skipped", line, return file ## else: ## print "Ignored", line, def getnextrev(f, file): # This is called when we are positioned just after a '---' separator revline = f.readline() dateline = f.readline() log = '' while 1: line = f.readline() if not line: break if line[:10] == '='*10: # Ignore the *last* log entry for each file since it # is the revision since which we are logging. return None if line[:10] == '-'*10: break log = log + line return dateline, file, revline, log if __name__ == '__main__': main() Python-2.3.7/Demo/pdist/README0000644001241000117560000001025005772636006015150 0ustar loewishpifb6Filesystem, RCS and CVS client and server classes ================================================= *** See the security warning at the end of this file! *** This directory contains various modules and classes that support remote file system operations. CVS stuff --------- rcvs Script to put in your bin directory rcvs.py Remote CVS client command line interface cvslib.py CVS admin files classes (used by rrcs) cvslock.py CVS locking algorithms RCS stuff --------- rrcs Script to put in your bin directory rrcs.py Remote RCS client command line interface rcsclient.py Return an RCSProxyClient instance (has reasonable default server/port/directory) RCSProxy.py RCS proxy and server classes (on top of rcslib.py) rcslib.py Local-only RCS base class (affects stdout & local work files) FSProxy stuff ------------- sumtree.py Old demo for FSProxy cmptree.py First FSProxy client (used to sync from the Mac) FSProxy.py Filesystem interface classes Generic client/server stuff --------------------------- client.py Client class server.py Server class security.py Security mix-in class (not very secure I think) Other generic stuff ------------------- cmdfw.py CommandFrameWork class (used by rcvs, should be used by rrcs as well) Client/Server operation ----------------------- The Client and Server classes implement a simple-minded RPC protocol, using Python's pickle module to transfer arguments, return values and exceptions with the most generality. The Server class is instantiated with a port number on which it should listen for requests; the Client class is instantiated with a host name and a port number where it should connect to. Once a client is connected, a TCP connection is maintained between client and server. The Server class currently handles only one connection at a time; however it could be rewritten to allow various modes of operations, using multiple threads or processes or the select() system call as desired to serve multiple clients simultaneously (when using select(), still handling one request at a time). This would not require rewriting of the Client class. It may also be possible to adapt the code to use UDP instead of TCP, but then both classes will have to be rewritten (and unless extensive acknowlegements and request serial numbers are used, the server should handle duplicate requests, so its semantics should be idempotent -- shrudder). Even though the FSProxy and RCSProxy modules define client classes, the client class is fully generic -- what methods it supports is determined entirely by the server. The server class, however, must be derived from. This is generally done as follows: from server import Server from client import Client # Define a class that performs the operations locally class MyClassLocal: def __init__(self): ... def _close(self): ... # Derive a server class using multiple inheritance class MyClassServer(MyClassLocal, Server): def __init__(self, address): # Must initialize MyClassLocal as well as Server MyClassLocal.__init__(self) Server.__init__(self, address) def _close(self): Server._close() MyClassLocal._close() # A dummy client class class MyClassClient(Client): pass Note that because MyClassLocal isn't used in the definition of MyClassClient, it would actually be better to place it in a separate module so the definition of MyClassLocal isn't executed when we only instantiate a client. The modules client and server should probably be renamed to Client and Server in order to match the class names. *** Security warning: this version requires that you have a file $HOME/.python_keyfile at the server and client side containing two comma- separated numbers. The security system at the moment makes no guarantees of actuallng being secure -- however it requires that the key file exists and contains the same numbers at both ends for this to work. (You can specify an alternative keyfile in $PYTHON_KEYFILE). Have a look at the Security class in security.py for details; basically, if the key file contains (x, y), then the security server class chooses a random number z (the challenge) in the range 10..100000 and the client must be able to produce pow(z, x, y) (i.e. z**x mod y). Python-2.3.7/Demo/pdist/server.py0000755001241000117560000000734605771677630016176 0ustar loewishpifb6"""RPC Server module.""" import sys import socket import pickle from fnmatch import fnmatch from repr import repr # Default verbosity (0 = silent, 1 = print connections, 2 = print requests too) VERBOSE = 1 class Server: """RPC Server class. Derive a class to implement a particular service.""" def __init__(self, address, verbose = VERBOSE): if type(address) == type(0): address = ('', address) self._address = address self._verbose = verbose self._socket = None self._socket = socket.socket(socket.AF_INET, socket.SOCK_STREAM) self._socket.bind(address) self._socket.listen(1) self._listening = 1 def _setverbose(self, verbose): self._verbose = verbose def __del__(self): self._close() def _close(self): self._listening = 0 if self._socket: self._socket.close() self._socket = None def _serverloop(self): while self._listening: self._serve() def _serve(self): if self._verbose: print "Wait for connection ..." conn, address = self._socket.accept() if self._verbose: print "Accepted connection from %s" % repr(address) if not self._verify(conn, address): print "*** Connection from %s refused" % repr(address) conn.close() return rf = conn.makefile('r') wf = conn.makefile('w') ok = 1 while ok: wf.flush() if self._verbose > 1: print "Wait for next request ..." ok = self._dorequest(rf, wf) _valid = ['192.16.201.*', '192.16.197.*', '132.151.1.*', '129.6.64.*'] def _verify(self, conn, address): host, port = address for pat in self._valid: if fnmatch(host, pat): return 1 return 0 def _dorequest(self, rf, wf): rp = pickle.Unpickler(rf) try: request = rp.load() except EOFError: return 0 if self._verbose > 1: print "Got request: %s" % repr(request) try: methodname, args, id = request if '.' in methodname: reply = (None, self._special(methodname, args), id) elif methodname[0] == '_': raise NameError, "illegal method name %s" % repr(methodname) else: method = getattr(self, methodname) reply = (None, apply(method, args), id) except: reply = (sys.exc_type, sys.exc_value, id) if id < 0 and reply[:2] == (None, None): if self._verbose > 1: print "Suppress reply" return 1 if self._verbose > 1: print "Send reply: %s" % repr(reply) wp = pickle.Pickler(wf) wp.dump(reply) return 1 def _special(self, methodname, args): if methodname == '.methods': if not hasattr(self, '_methods'): self._methods = tuple(self._listmethods()) return self._methods raise NameError, "unrecognized special method name %s" % repr(methodname) def _listmethods(self, cl=None): if not cl: cl = self.__class__ names = cl.__dict__.keys() names = filter(lambda x: x[0] != '_', names) names.sort() for base in cl.__bases__: basenames = self._listmethods(base) basenames = filter(lambda x, names=names: x not in names, basenames) names[len(names):] = basenames return names from security import Security class SecureServer(Server, Security): def __init__(self, *args): apply(Server.__init__, (self,) + args) Security.__init__(self) def _verify(self, conn, address): import string challenge = self._generate_challenge() conn.send("%d\n" % challenge) response = "" while "\n" not in response and len(response) < 100: data = conn.recv(100) if not data: break response = response + data try: response = string.atol(string.strip(response)) except string.atol_error: if self._verbose > 0: print "Invalid response syntax", `response` return 0 if not self._compare_challenge_response(challenge, response): if self._verbose > 0: print "Invalid response value", `response` return 0 if self._verbose > 1: print "Response matches challenge. Go ahead!" return 1 Python-2.3.7/Demo/pdist/rcvs.py0000755001241000117560000002467207524770010015626 0ustar loewishpifb6#! /usr/bin/env python """Remote CVS -- command line interface""" # XXX To do: # # Bugs: # - if the remote file is deleted, "rcvs update" will fail # # Functionality: # - cvs rm # - descend into directories (alraedy done for update) # - conflict resolution # - other relevant commands? # - branches # # - Finesses: # - retain file mode's x bits # - complain when "nothing known about filename" # - edit log message the way CVS lets you edit it # - cvs diff -rREVA -rREVB # - send mail the way CVS sends it # # Performance: # - cache remote checksums (for every revision ever seen!) # - translate symbolic revisions to numeric revisions # # Reliability: # - remote locking # # Security: # - Authenticated RPC? from cvslib import CVS, File import md5 import os import string import sys from cmdfw import CommandFrameWork DEF_LOCAL = 1 # Default -l class MyFile(File): def action(self): """Return a code indicating the update status of this file. The possible return values are: '=' -- everything's fine '0' -- file doesn't exist anywhere '?' -- exists locally only 'A' -- new locally 'R' -- deleted locally 'U' -- changed remotely, no changes locally (includes new remotely or deleted remotely) 'M' -- changed locally, no changes remotely 'C' -- conflict: changed locally as well as remotely (includes cases where the file has been added or removed locally and remotely) 'D' -- deleted remotely 'N' -- new remotely 'r' -- get rid of entry 'c' -- create entry 'u' -- update entry (and probably others :-) """ if not self.lseen: self.getlocal() if not self.rseen: self.getremote() if not self.eseen: if not self.lsum: if not self.rsum: return '0' # Never heard of else: return 'N' # New remotely else: # self.lsum if not self.rsum: return '?' # Local only # Local and remote, but no entry if self.lsum == self.rsum: return 'c' # Restore entry only else: return 'C' # Real conflict else: # self.eseen if not self.lsum: if self.edeleted: if self.rsum: return 'R' # Removed else: return 'r' # Get rid of entry else: # not self.edeleted if self.rsum: print "warning:", print self.file, print "was lost" return 'U' else: return 'r' # Get rid of entry else: # self.lsum if not self.rsum: if self.enew: return 'A' # New locally else: return 'D' # Deleted remotely else: # self.rsum if self.enew: if self.lsum == self.rsum: return 'u' else: return 'C' if self.lsum == self.esum: if self.esum == self.rsum: return '=' else: return 'U' elif self.esum == self.rsum: return 'M' elif self.lsum == self.rsum: return 'u' else: return 'C' def update(self): code = self.action() if code == '=': return print code, self.file if code in ('U', 'N'): self.get() elif code == 'C': print "%s: conflict resolution not yet implemented" % \ self.file elif code == 'D': remove(self.file) self.eseen = 0 elif code == 'r': self.eseen = 0 elif code in ('c', 'u'): self.eseen = 1 self.erev = self.rrev self.enew = 0 self.edeleted = 0 self.esum = self.rsum self.emtime, self.ectime = os.stat(self.file)[-2:] self.extra = '' def commit(self, message = ""): code = self.action() if code in ('A', 'M'): self.put(message) return 1 elif code == 'R': print "%s: committing removes not yet implemented" % \ self.file elif code == 'C': print "%s: conflict resolution not yet implemented" % \ self.file def diff(self, opts = []): self.action() # To update lseen, rseen flags = '' rev = self.rrev # XXX should support two rev options too! for o, a in opts: if o == '-r': rev = a else: flags = flags + ' ' + o + a if rev == self.rrev and self.lsum == self.rsum: return flags = flags[1:] fn = self.file data = self.proxy.get((fn, rev)) sum = md5.new(data).digest() if self.lsum == sum: return import tempfile tf = tempfile.NamedTemporaryFile() tf.write(data) tf.flush() print 'diff %s -r%s %s' % (flags, rev, fn) sts = os.system('diff %s %s %s' % (flags, tf.name, fn)) if sts: print '='*70 def commitcheck(self): return self.action() != 'C' def put(self, message = ""): print "Checking in", self.file, "..." data = open(self.file).read() if not self.enew: self.proxy.lock(self.file) messages = self.proxy.put(self.file, data, message) if messages: print messages self.setentry(self.proxy.head(self.file), self.lsum) def get(self): data = self.proxy.get(self.file) f = open(self.file, 'w') f.write(data) f.close() self.setentry(self.rrev, self.rsum) def log(self, otherflags): print self.proxy.log(self.file, otherflags) def add(self): self.eseen = 0 # While we're hacking... self.esum = self.lsum self.emtime, self.ectime = 0, 0 self.erev = '' self.enew = 1 self.edeleted = 0 self.eseen = 1 # Done self.extra = '' def setentry(self, erev, esum): self.eseen = 0 # While we're hacking... self.esum = esum self.emtime, self.ectime = os.stat(self.file)[-2:] self.erev = erev self.enew = 0 self.edeleted = 0 self.eseen = 1 # Done self.extra = '' SENDMAIL = "/usr/lib/sendmail -t" MAILFORM = """To: %s Subject: CVS changes: %s ...Message from rcvs... Committed files: %s Log message: %s """ class RCVS(CVS): FileClass = MyFile def __init__(self): CVS.__init__(self) def update(self, files): for e in self.whichentries(files, 1): e.update() def commit(self, files, message = ""): list = self.whichentries(files) if not list: return ok = 1 for e in list: if not e.commitcheck(): ok = 0 if not ok: print "correct above errors first" return if not message: message = raw_input("One-liner: ") committed = [] for e in list: if e.commit(message): committed.append(e.file) self.mailinfo(committed, message) def mailinfo(self, files, message = ""): towhom = "sjoerd@cwi.nl, jack@cwi.nl" # XXX mailtext = MAILFORM % (towhom, string.join(files), string.join(files), message) print '-'*70 print mailtext print '-'*70 ok = raw_input("OK to mail to %s? " % towhom) if string.lower(string.strip(ok)) in ('y', 'ye', 'yes'): p = os.popen(SENDMAIL, "w") p.write(mailtext) sts = p.close() if sts: print "Sendmail exit status %s" % str(sts) else: print "Mail sent." else: print "No mail sent." def report(self, files): for e in self.whichentries(files): e.report() def diff(self, files, opts): for e in self.whichentries(files): e.diff(opts) def add(self, files): if not files: raise RuntimeError, "'cvs add' needs at least one file" list = [] for e in self.whichentries(files, 1): e.add() def rm(self, files): if not files: raise RuntimeError, "'cvs rm' needs at least one file" raise RuntimeError, "'cvs rm' not yet imlemented" def log(self, files, opts): flags = '' for o, a in opts: flags = flags + ' ' + o + a for e in self.whichentries(files): e.log(flags) def whichentries(self, files, localfilestoo = 0): if files: list = [] for file in files: if self.entries.has_key(file): e = self.entries[file] else: e = self.FileClass(file) self.entries[file] = e list.append(e) else: list = self.entries.values() for file in self.proxy.listfiles(): if self.entries.has_key(file): continue e = self.FileClass(file) self.entries[file] = e list.append(e) if localfilestoo: for file in os.listdir(os.curdir): if not self.entries.has_key(file) \ and not self.ignored(file): e = self.FileClass(file) self.entries[file] = e list.append(e) list.sort() if self.proxy: for e in list: if e.proxy is None: e.proxy = self.proxy return list class rcvs(CommandFrameWork): GlobalFlags = 'd:h:p:qvL' UsageMessage = \ "usage: rcvs [-d directory] [-h host] [-p port] [-q] [-v] [subcommand arg ...]" PostUsageMessage = \ "If no subcommand is given, the status of all files is listed" def __init__(self): """Constructor.""" CommandFrameWork.__init__(self) self.proxy = None self.cvs = RCVS() def close(self): if self.proxy: self.proxy._close() self.proxy = None def recurse(self): self.close() names = os.listdir(os.curdir) for name in names: if name == os.curdir or name == os.pardir: continue if name == "CVS": continue if not os.path.isdir(name): continue if os.path.islink(name): continue print "--- entering subdirectory", name, "---" os.chdir(name) try: if os.path.isdir("CVS"): self.__class__().run() else: self.recurse() finally: os.chdir(os.pardir) print "--- left subdirectory", name, "---" def options(self, opts): self.opts = opts def ready(self): import rcsclient self.proxy = rcsclient.openrcsclient(self.opts) self.cvs.setproxy(self.proxy) self.cvs.getentries() def default(self): self.cvs.report([]) def do_report(self, opts, files): self.cvs.report(files) def do_update(self, opts, files): """update [-l] [-R] [file] ...""" local = DEF_LOCAL for o, a in opts: if o == '-l': local = 1 if o == '-R': local = 0 self.cvs.update(files) self.cvs.putentries() if not local and not files: self.recurse() flags_update = '-lR' do_up = do_update flags_up = flags_update def do_commit(self, opts, files): """commit [-m message] [file] ...""" message = "" for o, a in opts: if o == '-m': message = a self.cvs.commit(files, message) self.cvs.putentries() flags_commit = 'm:' do_com = do_commit flags_com = flags_commit def do_diff(self, opts, files): """diff [difflags] [file] ...""" self.cvs.diff(files, opts) flags_diff = 'cbitwcefhnlr:sD:S:' do_dif = do_diff flags_dif = flags_diff def do_add(self, opts, files): """add file ...""" if not files: print "'rcvs add' requires at least one file" return self.cvs.add(files) self.cvs.putentries() def do_remove(self, opts, files): """remove file ...""" if not files: print "'rcvs remove' requires at least one file" return self.cvs.remove(files) self.cvs.putentries() do_rm = do_remove def do_log(self, opts, files): """log [rlog-options] [file] ...""" self.cvs.log(files, opts) flags_log = 'bhLNRtd:s:V:r:' def remove(fn): try: os.unlink(fn) except os.error: pass def main(): r = rcvs() try: r.run() finally: r.close() if __name__ == "__main__": main() Python-2.3.7/Demo/pdist/FSProxy.py0000755001241000117560000001561205742214504016216 0ustar loewishpifb6"""File System Proxy. Provide an OS-neutral view on a file system, locally or remotely. The functionality is geared towards implementing some sort of rdist-like utility between a Mac and a UNIX system. The module defines three classes: FSProxyLocal -- used for local access FSProxyServer -- used on the server side of remote access FSProxyClient -- used on the client side of remote access The remote classes are instantiated with an IP address and an optional verbosity flag. """ import server import client import md5 import os import fnmatch from stat import * import time import fnmatch if os.name == 'mac': import macfs maxnamelen = 31 else: macfs = None maxnamelen = 255 skipnames = (os.curdir, os.pardir) class FSProxyLocal: def __init__(self): self._dirstack = [] self._ignore = ['*.pyc'] + self._readignore() def _close(self): while self._dirstack: self.back() def _readignore(self): file = self._hide('ignore') try: f = open(file) except IOError: file = self._hide('synctree.ignorefiles') try: f = open(file) except IOError: return [] ignore = [] while 1: line = f.readline() if not line: break if line[-1] == '\n': line = line[:-1] ignore.append(line) f.close() return ignore def _hidden(self, name): if os.name == 'mac': return name[0] == '(' and name[-1] == ')' else: return name[0] == '.' def _hide(self, name): if os.name == 'mac': return '(%s)' % name else: return '.%s' % name def visible(self, name): if len(name) > maxnamelen: return 0 if name[-1] == '~': return 0 if name in skipnames: return 0 if self._hidden(name): return 0 head, tail = os.path.split(name) if head or not tail: return 0 if macfs: if os.path.exists(name) and not os.path.isdir(name): try: fs = macfs.FSSpec(name) c, t = fs.GetCreatorType() if t != 'TEXT': return 0 except macfs.error, msg: print "***", name, msg return 0 else: if os.path.islink(name): return 0 if '\0' in open(name, 'rb').read(512): return 0 for ign in self._ignore: if fnmatch.fnmatch(name, ign): return 0 return 1 def check(self, name): if not self.visible(name): raise os.error, "protected name %s" % repr(name) def checkfile(self, name): self.check(name) if not os.path.isfile(name): raise os.error, "not a plain file %s" % repr(name) def pwd(self): return os.getcwd() def cd(self, name): self.check(name) save = os.getcwd(), self._ignore os.chdir(name) self._dirstack.append(save) self._ignore = self._ignore + self._readignore() def back(self): if not self._dirstack: raise os.error, "empty directory stack" dir, ignore = self._dirstack[-1] os.chdir(dir) del self._dirstack[-1] self._ignore = ignore def _filter(self, files, pat = None): if pat: def keep(name, pat = pat): return fnmatch.fnmatch(name, pat) files = filter(keep, files) files = filter(self.visible, files) files.sort() return files def list(self, pat = None): files = os.listdir(os.curdir) return self._filter(files, pat) def listfiles(self, pat = None): files = os.listdir(os.curdir) files = filter(os.path.isfile, files) return self._filter(files, pat) def listsubdirs(self, pat = None): files = os.listdir(os.curdir) files = filter(os.path.isdir, files) return self._filter(files, pat) def exists(self, name): return self.visible(name) and os.path.exists(name) def isdir(self, name): return self.visible(name) and os.path.isdir(name) def islink(self, name): return self.visible(name) and os.path.islink(name) def isfile(self, name): return self.visible(name) and os.path.isfile(name) def sum(self, name): self.checkfile(name) BUFFERSIZE = 1024*8 f = open(name) sum = md5.new() while 1: buffer = f.read(BUFFERSIZE) if not buffer: break sum.update(buffer) return sum.digest() def size(self, name): self.checkfile(name) return os.stat(name)[ST_SIZE] def mtime(self, name): self.checkfile(name) return time.localtime(os.stat(name)[ST_MTIME]) def stat(self, name): self.checkfile(name) size = os.stat(name)[ST_SIZE] mtime = time.localtime(os.stat(name)[ST_MTIME]) return size, mtime def info(self, name): sum = self.sum(name) size = os.stat(name)[ST_SIZE] mtime = time.localtime(os.stat(name)[ST_MTIME]) return sum, size, mtime def _list(self, function, list): if list is None: list = self.listfiles() res = [] for name in list: try: res.append((name, function(name))) except (os.error, IOError): res.append((name, None)) return res def sumlist(self, list = None): return self._list(self.sum, list) def statlist(self, list = None): return self._list(self.stat, list) def mtimelist(self, list = None): return self._list(self.mtime, list) def sizelist(self, list = None): return self._list(self.size, list) def infolist(self, list = None): return self._list(self.info, list) def _dict(self, function, list): if list is None: list = self.listfiles() dict = {} for name in list: try: dict[name] = function(name) except (os.error, IOError): pass return dict def sumdict(self, list = None): return self.dict(self.sum, list) def sizedict(self, list = None): return self.dict(self.size, list) def mtimedict(self, list = None): return self.dict(self.mtime, list) def statdict(self, list = None): return self.dict(self.stat, list) def infodict(self, list = None): return self._dict(self.info, list) def read(self, name, offset = 0, length = -1): self.checkfile(name) f = open(name) f.seek(offset) if length == 0: data = '' elif length < 0: data = f.read() else: data = f.read(length) f.close() return data def create(self, name): self.check(name) if os.path.exists(name): self.checkfile(name) bname = name + '~' try: os.unlink(bname) except os.error: pass os.rename(name, bname) f = open(name, 'w') f.close() def write(self, name, data, offset = 0): self.checkfile(name) f = open(name, 'r+') f.seek(offset) f.write(data) f.close() def mkdir(self, name): self.check(name) os.mkdir(name, 0777) def rmdir(self, name): self.check(name) os.rmdir(name) class FSProxyServer(FSProxyLocal, server.Server): def __init__(self, address, verbose = server.VERBOSE): FSProxyLocal.__init__(self) server.Server.__init__(self, address, verbose) def _close(self): server.Server._close(self) FSProxyLocal._close(self) def _serve(self): server.Server._serve(self) # Retreat into start directory while self._dirstack: self.back() class FSProxyClient(client.Client): def __init__(self, address, verbose = client.VERBOSE): client.Client.__init__(self, address, verbose) def test(): import string import sys if sys.argv[1:]: port = string.atoi(sys.argv[1]) else: port = 4127 proxy = FSProxyServer(('', port)) proxy._serverloop() if __name__ == '__main__': test() Python-2.3.7/Demo/pdist/rcslib.py0000755001241000117560000002414607524770010016123 0ustar loewishpifb6"""RCS interface module. Defines the class RCS, which represents a directory with rcs version files and (possibly) corresponding work files. """ import fnmatch import os import regsub import string import tempfile class RCS: """RCS interface class (local filesystem version). An instance of this class represents a directory with rcs version files and (possible) corresponding work files. Methods provide access to most rcs operations such as checkin/checkout, access to the rcs metadata (revisions, logs, branches etc.) as well as some filesystem operations such as listing all rcs version files. XXX BUGS / PROBLEMS - The instance always represents the current directory so it's not very useful to have more than one instance around simultaneously """ # Characters allowed in work file names okchars = string.ascii_letters + string.digits + '-_=+' def __init__(self): """Constructor.""" pass def __del__(self): """Destructor.""" pass # --- Informational methods about a single file/revision --- def log(self, name_rev, otherflags = ''): """Return the full log text for NAME_REV as a string. Optional OTHERFLAGS are passed to rlog. """ f = self._open(name_rev, 'rlog ' + otherflags) data = f.read() status = self._closepipe(f) if status: data = data + "%s: %s" % status elif data[-1] == '\n': data = data[:-1] return data def head(self, name_rev): """Return the head revision for NAME_REV""" dict = self.info(name_rev) return dict['head'] def info(self, name_rev): """Return a dictionary of info (from rlog -h) for NAME_REV The dictionary's keys are the keywords that rlog prints (e.g. 'head' and its values are the corresponding data (e.g. '1.3'). XXX symbolic names and locks are not returned """ f = self._open(name_rev, 'rlog -h') dict = {} while 1: line = f.readline() if not line: break if line[0] == '\t': # XXX could be a lock or symbolic name # Anything else? continue i = string.find(line, ':') if i > 0: key, value = line[:i], string.strip(line[i+1:]) dict[key] = value status = self._closepipe(f) if status: raise IOError, status return dict # --- Methods that change files --- def lock(self, name_rev): """Set an rcs lock on NAME_REV.""" name, rev = self.checkfile(name_rev) cmd = "rcs -l%s %s" % (rev, name) return self._system(cmd) def unlock(self, name_rev): """Clear an rcs lock on NAME_REV.""" name, rev = self.checkfile(name_rev) cmd = "rcs -u%s %s" % (rev, name) return self._system(cmd) def checkout(self, name_rev, withlock=0, otherflags=""): """Check out NAME_REV to its work file. If optional WITHLOCK is set, check out locked, else unlocked. The optional OTHERFLAGS is passed to co without interpretation. Any output from co goes to directly to stdout. """ name, rev = self.checkfile(name_rev) if withlock: lockflag = "-l" else: lockflag = "-u" cmd = 'co %s%s %s %s' % (lockflag, rev, otherflags, name) return self._system(cmd) def checkin(self, name_rev, message=None, otherflags=""): """Check in NAME_REV from its work file. The optional MESSAGE argument becomes the checkin message (default "" if None); or the file description if this is a new file. The optional OTHERFLAGS argument is passed to ci without interpretation. Any output from ci goes to directly to stdout. """ name, rev = self._unmangle(name_rev) new = not self.isvalid(name) if not message: message = "" if message and message[-1] != '\n': message = message + '\n' lockflag = "-u" if new: f = tempfile.NamedTemporaryFile() f.write(message) f.flush() cmd = 'ci %s%s -t%s %s %s' % \ (lockflag, rev, f.name, otherflags, name) else: message = regsub.gsub('\([\\"$`]\)', '\\\\\\1', message) cmd = 'ci %s%s -m"%s" %s %s' % \ (lockflag, rev, message, otherflags, name) return self._system(cmd) # --- Exported support methods --- def listfiles(self, pat = None): """Return a list of all version files matching optional PATTERN.""" files = os.listdir(os.curdir) files = filter(self._isrcs, files) if os.path.isdir('RCS'): files2 = os.listdir('RCS') files2 = filter(self._isrcs, files2) files = files + files2 files = map(self.realname, files) return self._filter(files, pat) def isvalid(self, name): """Test whether NAME has a version file associated.""" namev = self.rcsname(name) return (os.path.isfile(namev) or os.path.isfile(os.path.join('RCS', namev))) def rcsname(self, name): """Return the pathname of the version file for NAME. The argument can be a work file name or a version file name. If the version file does not exist, the name of the version file that would be created by "ci" is returned. """ if self._isrcs(name): namev = name else: namev = name + ',v' if os.path.isfile(namev): return namev namev = os.path.join('RCS', os.path.basename(namev)) if os.path.isfile(namev): return namev if os.path.isdir('RCS'): return os.path.join('RCS', namev) else: return namev def realname(self, namev): """Return the pathname of the work file for NAME. The argument can be a work file name or a version file name. If the work file does not exist, the name of the work file that would be created by "co" is returned. """ if self._isrcs(namev): name = namev[:-2] else: name = namev if os.path.isfile(name): return name name = os.path.basename(name) return name def islocked(self, name_rev): """Test whether FILE (which must have a version file) is locked. XXX This does not tell you which revision number is locked and ignores any revision you may pass in (by virtue of using rlog -L -R). """ f = self._open(name_rev, 'rlog -L -R') line = f.readline() status = self._closepipe(f) if status: raise IOError, status if not line: return None if line[-1] == '\n': line = line[:-1] return self.realname(name_rev) == self.realname(line) def checkfile(self, name_rev): """Normalize NAME_REV into a (NAME, REV) tuple. Raise an exception if there is no corresponding version file. """ name, rev = self._unmangle(name_rev) if not self.isvalid(name): raise os.error, 'not an rcs file %s' % `name` return name, rev # --- Internal methods --- def _open(self, name_rev, cmd = 'co -p', rflag = '-r'): """INTERNAL: open a read pipe to NAME_REV using optional COMMAND. Optional FLAG is used to indicate the revision (default -r). Default COMMAND is "co -p". Return a file object connected by a pipe to the command's output. """ name, rev = self.checkfile(name_rev) namev = self.rcsname(name) if rev: cmd = cmd + ' ' + rflag + rev return os.popen("%s %s" % (cmd, `namev`)) def _unmangle(self, name_rev): """INTERNAL: Normalize NAME_REV argument to (NAME, REV) tuple. Raise an exception if NAME contains invalid characters. A NAME_REV argument is either NAME string (implying REV='') or a tuple of the form (NAME, REV). """ if type(name_rev) == type(''): name_rev = name, rev = name_rev, '' else: name, rev = name_rev for c in rev: if c not in self.okchars: raise ValueError, "bad char in rev" return name_rev def _closepipe(self, f): """INTERNAL: Close PIPE and print its exit status if nonzero.""" sts = f.close() if not sts: return None detail, reason = divmod(sts, 256) if reason == 0: return 'exit', detail # Exit status signal = reason&0x7F if signal == 0x7F: code = 'stopped' signal = detail else: code = 'killed' if reason&0x80: code = code + '(coredump)' return code, signal def _system(self, cmd): """INTERNAL: run COMMAND in a subshell. Standard input for the command is taken from /dev/null. Raise IOError when the exit status is not zero. Return whatever the calling method should return; normally None. A derived class may override this method and redefine it to capture stdout/stderr of the command and return it. """ cmd = cmd + " . Flags for the subcommand are defined by defining class or instance variables named flags_. If there's no command, method default() is called. The __doc__ strings for the do_ methods are used for the usage message, printed after the general usage message which is the class variable UsageMessage. The class variable PostUsageMessage is printed after all the do_ methods' __doc__ strings. The method's return value can be a suggested exit status. [XXX Need to rewrite this to clarify it.] Common usage is to derive a class, instantiate it, and then call its run() method; by default this takes its arguments from sys.argv[1:]. """ UsageMessage = \ "usage: (name)s [flags] subcommand [subflags] [argument] ..." PostUsageMessage = None GlobalFlags = '' def __init__(self): """Constructor, present for completeness.""" pass def run(self, args = None): """Process flags, subcommand and options, then run it.""" import getopt, sys if args is None: args = sys.argv[1:] try: opts, args = getopt.getopt(args, self.GlobalFlags) except getopt.error, msg: return self.usage(msg) self.options(opts) if not args: self.ready() return self.default() else: cmd = args[0] mname = 'do_' + cmd fname = 'flags_' + cmd try: method = getattr(self, mname) except AttributeError: return self.usage("command %s unknown" % `cmd`) try: flags = getattr(self, fname) except AttributeError: flags = '' try: opts, args = getopt.getopt(args[1:], flags) except getopt.error, msg: return self.usage( "subcommand %s: " % cmd + str(msg)) self.ready() return method(opts, args) def options(self, opts): """Process the options retrieved by getopt. Override this if you have any options.""" if opts: print "-"*40 print "Options:" for o, a in opts: print 'option', o, 'value', `a` print "-"*40 def ready(self): """Called just before calling the subcommand.""" pass def usage(self, msg = None): """Print usage message. Return suitable exit code (2).""" if msg: print msg print self.UsageMessage % {'name': self.__class__.__name__} docstrings = {} c = self.__class__ while 1: for name in dir(c): if name[:3] == 'do_': if docstrings.has_key(name): continue try: doc = getattr(c, name).__doc__ except: doc = None if doc: docstrings[name] = doc if not c.__bases__: break c = c.__bases__[0] if docstrings: print "where subcommand can be:" names = docstrings.keys() names.sort() for name in names: print docstrings[name] if self.PostUsageMessage: print self.PostUsageMessage return 2 def default(self): """Default method, called when no subcommand is given. You should always override this.""" print "Nobody expects the Spanish Inquisition!" def test(): """Test script -- called when this module is run as a script.""" import sys class Hello(CommandFrameWork): def do_hello(self, opts, args): "hello -- print 'hello world', needs no arguments" print "Hello, world" x = Hello() tests = [ [], ['hello'], ['spam'], ['-x'], ['hello', '-x'], None, ] for t in tests: print '-'*10, t, '-'*10 sts = x.run(t) print "Exit status:", `sts` if __name__ == '__main__': test() Python-2.3.7/Demo/pdist/security.py0000755001241000117560000000153206530607435016514 0ustar loewishpifb6class Security: def __init__(self): import os env = os.environ if env.has_key('PYTHON_KEYFILE'): keyfile = env['PYTHON_KEYFILE'] else: keyfile = '.python_keyfile' if env.has_key('HOME'): keyfile = os.path.join(env['HOME'], keyfile) if not os.path.exists(keyfile): import sys for dir in sys.path: kf = os.path.join(dir, keyfile) if os.path.exists(kf): keyfile = kf break try: self._key = eval(open(keyfile).readline()) except IOError: raise IOError, "python keyfile %s: cannot open" % keyfile def _generate_challenge(self): import random return random.randint(100, 100000) def _compare_challenge_response(self, challenge, response): return self._encode_challenge(challenge) == response def _encode_challenge(self, challenge): p, m = self._key return pow(long(challenge), p, m) Python-2.3.7/Demo/pdist/cvslib.py0000755001241000117560000002043507457367321016140 0ustar loewishpifb6"""Utilities for CVS administration.""" import string import os import time import md5 import fnmatch if not hasattr(time, 'timezone'): time.timezone = 0 class File: """Represent a file's status. Instance variables: file -- the filename (no slashes), None if uninitialized lseen -- true if the data for the local file is up to date eseen -- true if the data from the CVS/Entries entry is up to date (this implies that the entry must be written back) rseen -- true if the data for the remote file is up to date proxy -- RCSProxy instance used to contact the server, or None Note that lseen and rseen don't necessary mean that a local or remote file *exists* -- they indicate that we've checked it. However, eseen means that this instance corresponds to an entry in the CVS/Entries file. If lseen is true: lsum -- checksum of the local file, None if no local file lctime -- ctime of the local file, None if no local file lmtime -- mtime of the local file, None if no local file If eseen is true: erev -- revision, None if this is a no revision (not '0') enew -- true if this is an uncommitted added file edeleted -- true if this is an uncommitted removed file ectime -- ctime of last local file corresponding to erev emtime -- mtime of last local file corresponding to erev extra -- 5th string from CVS/Entries file If rseen is true: rrev -- revision of head, None if non-existent rsum -- checksum of that revision, Non if non-existent If eseen and rseen are both true: esum -- checksum of revision erev, None if no revision Note """ def __init__(self, file = None): if file and '/' in file: raise ValueError, "no slash allowed in file" self.file = file self.lseen = self.eseen = self.rseen = 0 self.proxy = None def __cmp__(self, other): return cmp(self.file, other.file) def getlocal(self): try: self.lmtime, self.lctime = os.stat(self.file)[-2:] except os.error: self.lmtime = self.lctime = self.lsum = None else: self.lsum = md5.new(open(self.file).read()).digest() self.lseen = 1 def getentry(self, line): words = string.splitfields(line, '/') if self.file and words[1] != self.file: raise ValueError, "file name mismatch" self.file = words[1] self.erev = words[2] self.edeleted = 0 self.enew = 0 self.ectime = self.emtime = None if self.erev[:1] == '-': self.edeleted = 1 self.erev = self.erev[1:] if self.erev == '0': self.erev = None self.enew = 1 else: dates = words[3] self.ectime = unctime(dates[:24]) self.emtime = unctime(dates[25:]) self.extra = words[4] if self.rseen: self.getesum() self.eseen = 1 def getremote(self, proxy = None): if proxy: self.proxy = proxy try: self.rrev = self.proxy.head(self.file) except (os.error, IOError): self.rrev = None if self.rrev: self.rsum = self.proxy.sum(self.file) else: self.rsum = None if self.eseen: self.getesum() self.rseen = 1 def getesum(self): if self.erev == self.rrev: self.esum = self.rsum elif self.erev: name = (self.file, self.erev) self.esum = self.proxy.sum(name) else: self.esum = None def putentry(self): """Return a line suitable for inclusion in CVS/Entries. The returned line is terminated by a newline. If no entry should be written for this file, return "". """ if not self.eseen: return "" rev = self.erev or '0' if self.edeleted: rev = '-' + rev if self.enew: dates = 'Initial ' + self.file else: dates = gmctime(self.ectime) + ' ' + \ gmctime(self.emtime) return "/%s/%s/%s/%s/\n" % ( self.file, rev, dates, self.extra) def report(self): print '-'*50 def r(key, repr=repr, self=self): try: value = repr(getattr(self, key)) except AttributeError: value = "?" print "%-15s:" % key, value r("file") if self.lseen: r("lsum", hexify) r("lctime", gmctime) r("lmtime", gmctime) if self.eseen: r("erev") r("enew") r("edeleted") r("ectime", gmctime) r("emtime", gmctime) if self.rseen: r("rrev") r("rsum", hexify) if self.eseen: r("esum", hexify) class CVS: """Represent the contents of a CVS admin file (and more). Class variables: FileClass -- the class to be instantiated for entries (this should be derived from class File above) IgnoreList -- shell patterns for local files to be ignored Instance variables: entries -- a dictionary containing File instances keyed by their file name proxy -- an RCSProxy instance, or None """ FileClass = File IgnoreList = ['.*', '@*', ',*', '*~', '*.o', '*.a', '*.so', '*.pyc'] def __init__(self): self.entries = {} self.proxy = None def setproxy(self, proxy): if proxy is self.proxy: return self.proxy = proxy for e in self.entries.values(): e.rseen = 0 def getentries(self): """Read the contents of CVS/Entries""" self.entries = {} f = self.cvsopen("Entries") while 1: line = f.readline() if not line: break e = self.FileClass() e.getentry(line) self.entries[e.file] = e f.close() def putentries(self): """Write CVS/Entries back""" f = self.cvsopen("Entries", 'w') for e in self.values(): f.write(e.putentry()) f.close() def getlocalfiles(self): list = self.entries.keys() addlist = os.listdir(os.curdir) for name in addlist: if name in list: continue if not self.ignored(name): list.append(name) list.sort() for file in list: try: e = self.entries[file] except KeyError: e = self.entries[file] = self.FileClass(file) e.getlocal() def getremotefiles(self, proxy = None): if proxy: self.proxy = proxy if not self.proxy: raise RuntimeError, "no RCS proxy" addlist = self.proxy.listfiles() for file in addlist: try: e = self.entries[file] except KeyError: e = self.entries[file] = self.FileClass(file) e.getremote(self.proxy) def report(self): for e in self.values(): e.report() print '-'*50 def keys(self): keys = self.entries.keys() keys.sort() return keys def values(self): def value(key, self=self): return self.entries[key] return map(value, self.keys()) def items(self): def item(key, self=self): return (key, self.entries[key]) return map(item, self.keys()) def cvsexists(self, file): file = os.path.join("CVS", file) return os.path.exists(file) def cvsopen(self, file, mode = 'r'): file = os.path.join("CVS", file) if 'r' not in mode: self.backup(file) return open(file, mode) def backup(self, file): if os.path.isfile(file): bfile = file + '~' try: os.unlink(bfile) except os.error: pass os.rename(file, bfile) def ignored(self, file): if os.path.isdir(file): return True for pat in self.IgnoreList: if fnmatch.fnmatch(file, pat): return True return False # hexify and unhexify are useful to print MD5 checksums in hex format hexify_format = '%02x' * 16 def hexify(sum): "Return a hex representation of a 16-byte string (e.g. an MD5 digest)" if sum is None: return "None" return hexify_format % tuple(map(ord, sum)) def unhexify(hexsum): "Return the original from a hexified string" if hexsum == "None": return None sum = '' for i in range(0, len(hexsum), 2): sum = sum + chr(string.atoi(hexsum[i:i+2], 16)) return sum unctime_monthmap = {} def unctime(date): if date == "None": return None if not unctime_monthmap: months = ['Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec'] i = 0 for m in months: i = i+1 unctime_monthmap[m] = i words = string.split(date) # Day Mon DD HH:MM:SS YEAR year = string.atoi(words[4]) month = unctime_monthmap[words[1]] day = string.atoi(words[2]) [hh, mm, ss] = map(string.atoi, string.splitfields(words[3], ':')) ss = ss - time.timezone return time.mktime((year, month, day, hh, mm, ss, 0, 0, 0)) def gmctime(t): if t is None: return "None" return time.asctime(time.gmtime(t)) def test_unctime(): now = int(time.time()) t = time.gmtime(now) at = time.asctime(t) print 'GMT', now, at print 'timezone', time.timezone print 'local', time.ctime(now) u = unctime(at) print 'unctime()', u gu = time.gmtime(u) print '->', gu print time.asctime(gu) def test(): x = CVS() x.getentries() x.getlocalfiles() ## x.report() import rcsclient proxy = rcsclient.openrcsclient() x.getremotefiles(proxy) x.report() if __name__ == "__main__": test() Python-2.3.7/Demo/pdist/cmptree.py0000755001241000117560000001123105747547710016311 0ustar loewishpifb6"""Compare local and remote dictionaries and transfer differing files -- like rdist.""" import sys from repr import repr import FSProxy import time import os def main(): pwd = os.getcwd() s = raw_input("chdir [%s] " % pwd) if s: os.chdir(s) pwd = os.getcwd() host = ask("host", 'voorn.cwi.nl') port = 4127 verbose = 1 mode = '' print """\ Mode should be a string of characters, indicating what to do with differences. r - read different files to local file system w - write different files to remote file system c - create new files, either remote or local d - delete disappearing files, either remote or local """ s = raw_input("mode [%s] " % mode) if s: mode = s address = (host, port) t1 = time.time() local = FSProxy.FSProxyLocal() remote = FSProxy.FSProxyClient(address, verbose) compare(local, remote, mode) remote._close() local._close() t2 = time.time() dt = t2-t1 mins, secs = divmod(dt, 60) print mins, "minutes and", round(secs), "seconds" raw_input("[Return to exit] ") def ask(prompt, default): s = raw_input("%s [%s] " % (prompt, default)) return s or default def askint(prompt, default): s = raw_input("%s [%s] " % (prompt, str(default))) if s: return string.atoi(s) return default def compare(local, remote, mode): print print "PWD =", `os.getcwd()` sums_id = remote._send('sumlist') subdirs_id = remote._send('listsubdirs') remote._flush() print "calculating local sums ..." lsumdict = {} for name, info in local.sumlist(): lsumdict[name] = info print "getting remote sums ..." sums = remote._recv(sums_id) print "got", len(sums) rsumdict = {} for name, rsum in sums: rsumdict[name] = rsum if not lsumdict.has_key(name): print `name`, "only remote" if 'r' in mode and 'c' in mode: recvfile(local, remote, name) else: lsum = lsumdict[name] if lsum != rsum: print `name`, rmtime = remote.mtime(name) lmtime = local.mtime(name) if rmtime > lmtime: print "remote newer", if 'r' in mode: recvfile(local, remote, name) elif lmtime > rmtime: print "local newer", if 'w' in mode: sendfile(local, remote, name) else: print "same mtime but different sum?!?!", print for name in lsumdict.keys(): if not rsumdict.keys(): print `name`, "only locally", fl() if 'w' in mode and 'c' in mode: sendfile(local, remote, name) elif 'r' in mode and 'd' in mode: os.unlink(name) print "removed." print print "gettin subdirs ..." subdirs = remote._recv(subdirs_id) common = [] for name in subdirs: if local.isdir(name): print "Common subdirectory", repr(name) common.append(name) else: print "Remote subdirectory", repr(name), "not found locally" if 'r' in mode and 'c' in mode: pr = "Create local subdirectory %s? [y] " % \ repr(name) if 'y' in mode: ok = 'y' else: ok = ask(pr, "y") if ok[:1] in ('y', 'Y'): local.mkdir(name) print "Subdirectory %s made" % \ repr(name) common.append(name) lsubdirs = local.listsubdirs() for name in lsubdirs: if name not in subdirs: print "Local subdirectory", repr(name), "not found remotely" for name in common: print "Entering subdirectory", repr(name) local.cd(name) remote.cd(name) compare(local, remote, mode) remote.back() local.back() def sendfile(local, remote, name): try: remote.create(name) except (IOError, os.error), msg: print "cannot create:", msg return print "sending ...", fl() data = open(name).read() t1 = time.time() remote._send_noreply('write', name, data) remote._flush() t2 = time.time() dt = t2-t1 print len(data), "bytes in", round(dt), "seconds", if dt: print "i.e.", round(len(data)/dt), "bytes/sec", print def recvfile(local, remote, name): ok = 0 try: rv = recvfile_real(local, remote, name) ok = 1 return rv finally: if not ok: print "*** recvfile of %s failed, deleting" % `name` local.delete(name) def recvfile_real(local, remote, name): try: local.create(name) except (IOError, os.error), msg: print "cannot create:", msg return print "receiving ...", fl() f = open(name, 'w') t1 = time.time() length = 4*1024 offset = 0 id = remote._send('read', name, offset, length) remote._flush() while 1: newoffset = offset + length newid = remote._send('read', name, newoffset, length) data = remote._recv(id) id = newid if not data: break f.seek(offset) f.write(data) offset = newoffset size = f.tell() t2 = time.time() f.close() dt = t2-t1 print size, "bytes in", round(dt), "seconds", if dt: print "i.e.", int(size/dt), "bytes/sec", print remote._recv(id) # ignored def fl(): sys.stdout.flush() if __name__ == '__main__': main() Python-2.3.7/Demo/pdist/RCSProxy.py0000755001241000117560000001116006577243737016350 0ustar loewishpifb6#! /usr/bin/env python """RCS Proxy. Provide a simplified interface on RCS files, locally or remotely. The functionality is geared towards implementing some sort of remote CVS like utility. It is modeled after the similar module FSProxy. The module defines two classes: RCSProxyLocal -- used for local access RCSProxyServer -- used on the server side of remote access The corresponding client class, RCSProxyClient, is defined in module rcsclient. The remote classes are instantiated with an IP address and an optional verbosity flag. """ import server import md5 import os import fnmatch import string import tempfile import rcslib class DirSupport: def __init__(self): self._dirstack = [] def __del__(self): self._close() def _close(self): while self._dirstack: self.back() def pwd(self): return os.getcwd() def cd(self, name): save = os.getcwd() os.chdir(name) self._dirstack.append(save) def back(self): if not self._dirstack: raise os.error, "empty directory stack" dir = self._dirstack[-1] os.chdir(dir) del self._dirstack[-1] def listsubdirs(self, pat = None): files = os.listdir(os.curdir) files = filter(os.path.isdir, files) return self._filter(files, pat) def isdir(self, name): return os.path.isdir(name) def mkdir(self, name): os.mkdir(name, 0777) def rmdir(self, name): os.rmdir(name) class RCSProxyLocal(rcslib.RCS, DirSupport): def __init__(self): rcslib.RCS.__init__(self) DirSupport.__init__(self) def __del__(self): DirSupport.__del__(self) rcslib.RCS.__del__(self) def sumlist(self, list = None): return self._list(self.sum, list) def sumdict(self, list = None): return self._dict(self.sum, list) def sum(self, name_rev): f = self._open(name_rev) BUFFERSIZE = 1024*8 sum = md5.new() while 1: buffer = f.read(BUFFERSIZE) if not buffer: break sum.update(buffer) self._closepipe(f) return sum.digest() def get(self, name_rev): f = self._open(name_rev) data = f.read() self._closepipe(f) return data def put(self, name_rev, data, message=None): name, rev = self._unmangle(name_rev) f = open(name, 'w') f.write(data) f.close() self.checkin(name_rev, message) self._remove(name) def _list(self, function, list = None): """INTERNAL: apply FUNCTION to all files in LIST. Return a list of the results. The list defaults to all files in the directory if None. """ if list is None: list = self.listfiles() res = [] for name in list: try: res.append((name, function(name))) except (os.error, IOError): res.append((name, None)) return res def _dict(self, function, list = None): """INTERNAL: apply FUNCTION to all files in LIST. Return a dictionary mapping files to results. The list defaults to all files in the directory if None. """ if list is None: list = self.listfiles() dict = {} for name in list: try: dict[name] = function(name) except (os.error, IOError): pass return dict class RCSProxyServer(RCSProxyLocal, server.SecureServer): def __init__(self, address, verbose = server.VERBOSE): RCSProxyLocal.__init__(self) server.SecureServer.__init__(self, address, verbose) def _close(self): server.SecureServer._close(self) RCSProxyLocal._close(self) def _serve(self): server.SecureServer._serve(self) # Retreat into start directory while self._dirstack: self.back() def test_server(): import string import sys if sys.argv[1:]: port = string.atoi(sys.argv[1]) else: port = 4127 proxy = RCSProxyServer(('', port)) proxy._serverloop() def test(): import sys if not sys.argv[1:] or sys.argv[1] and sys.argv[1][0] in '0123456789': test_server() sys.exit(0) proxy = RCSProxyLocal() what = sys.argv[1] if hasattr(proxy, what): attr = getattr(proxy, what) if callable(attr): print apply(attr, tuple(sys.argv[2:])) else: print `attr` else: print "%s: no such attribute" % what sys.exit(2) if __name__ == '__main__': test() Python-2.3.7/Demo/zlib/0000755001241000117560000000000010765544471014111 5ustar loewishpifb6Python-2.3.7/Demo/zlib/zlibdemo.py0000755001241000117560000000205406672263017016270 0ustar loewishpifb6#!/usr/bin/env python import zlib, sys if len(sys.argv)>1: filename=sys.argv[1] else: filename='zlibdemo.py' print 'Reading', filename f=open(filename, 'r') # Get the data to compress s=f.read() f.close() # First, we'll compress the string in one step comptext=zlib.compress(s, 1) decomp=zlib.decompress(comptext) print '1-step compression: (level 1)' print ' Original:', len(s), 'Compressed:', len(comptext), print 'Uncompressed:', len(decomp) # Now, let's compress the string in stages; set chunk to work in smaller steps chunk=256 compressor=zlib.compressobj(9) decompressor=zlib.decompressobj() comptext=decomp='' for i in range(0, len(s), chunk): comptext=comptext+compressor.compress(s[i:i+chunk]) comptext=comptext+compressor.flush() # Don't forget to call flush()!! for i in range(0, len(comptext), chunk): decomp=decomp+decompressor.decompress(comptext[i:i+chunk]) decomp=decomp+decompressor.flush() print 'Progressive compression (level 9):' print ' Original:', len(s), 'Compressed:', len(comptext), print 'Uncompressed:', len(decomp) Python-2.3.7/Demo/zlib/minigzip.py0000755001241000117560000000737606672263017016325 0ustar loewishpifb6#!/usr/bin/env python # Demo program for zlib; it compresses or decompresses files, but *doesn't* # delete the original. This doesn't support all of gzip's options. FTEXT, FHCRC, FEXTRA, FNAME, FCOMMENT = 1, 2, 4, 8, 16 def write32(output, value): output.write(chr(value & 255)) ; value=value / 256 output.write(chr(value & 255)) ; value=value / 256 output.write(chr(value & 255)) ; value=value / 256 output.write(chr(value & 255)) def read32(input): v=ord(input.read(1)) v=v+ (ord(input.read(1))<<8 ) v=v+ (ord(input.read(1))<<16) v=v+ (ord(input.read(1))<<24) return v import zlib, sys if len(sys.argv)!=2: print 'Usage: minigzip.py ' print ' The file will be compressed or decompressed.' sys.exit(0) filename=sys.argv[1] compressing=1 ; outputname=filename+'.gz' if filename[-3:]=='.gz': compressing=0 ; outputname=filename[:-3] input=open(filename) ; output=open(outputname, 'w') if compressing: output.write('\037\213\010') # Write the header, ... output.write(chr(FNAME)) # ... flag byte ... import os # ... modification time ... statval=os.stat(filename) mtime=statval[8] write32(output, mtime) output.write('\002') # ... slowest compression alg. ... output.write('\377') # ... OS (=unknown) ... output.write(filename+'\000') # ... original filename ... crcval=zlib.crc32("") compobj=zlib.compressobj(9, zlib.DEFLATED, -zlib.MAX_WBITS, zlib.DEF_MEM_LEVEL, 0) while (1): data=input.read(1024) if data=="": break crcval=zlib.crc32(data, crcval) output.write(compobj.compress(data)) output.write(compobj.flush()) write32(output, crcval) # ... the CRC ... write32(output, statval[6]) # and the file size. else: magic=input.read(2) if magic!='\037\213': print 'Not a gzipped file' ; sys.exit(0) if ord(input.read(1))!=8: print 'Unknown compression method' ; sys.exit(0) flag=ord(input.read(1)) input.read(4+1+1) # Discard modification time, # extra flags, and OS byte. if flag & FEXTRA: # Read & discard the extra field, if present xlen=ord(input.read(1)) xlen=xlen+256*ord(input.read(1)) input.read(xlen) if flag & FNAME: # Read and discard a null-terminated string containing the filename while (1): s=input.read(1) if s=='\000': break if flag & FCOMMENT: # Read and discard a null-terminated string containing a comment while (1): s=input.read(1) if s=='\000': break if flag & FHCRC: input.read(2) # Read & discard the 16-bit header CRC decompobj=zlib.decompressobj(-zlib.MAX_WBITS) crcval=zlib.crc32("") length=0 while (1): data=input.read(1024) if data=="": break decompdata=decompobj.decompress(data) print len(decompdata) output.write(decompdata) ; length=length+len(decompdata) crcval=zlib.crc32(decompdata, crcval) decompdata=decompobj.flush() output.write(decompdata) ; length=length+len(decompdata) crcval=zlib.crc32(decompdata, crcval) # We've read to the end of the file, so we have to rewind in order # to reread the 8 bytes containing the CRC and the file size. The # decompressor is smart and knows when to stop, so feeding it # extra data is harmless. input.seek(-8, 2) crc32=read32(input) isize=read32(input) if crc32!=crcval: print 'CRC check failed.' if isize!=length: print 'Incorrect length of data produced' input.close() ; output.close() Python-2.3.7/Demo/cgi/0000755001241000117560000000000010765544471013713 5ustar loewishpifb6Python-2.3.7/Demo/cgi/cgi0.sh0000755001241000117560000000023207553351647015073 0ustar loewishpifb6#! /bin/sh # If you can't get this to work, your web server isn't set up right echo Content-type: text/plain echo echo Hello world echo This is cgi0.sh Python-2.3.7/Demo/cgi/wiki.py0000644001241000117560000000770507553627423015241 0ustar loewishpifb6"""Wiki main program. Imported and run by cgi3.py.""" import os, re, cgi, sys, tempfile escape = cgi.escape def main(): form = cgi.FieldStorage() print "Content-type: text/html" print cmd = form.getvalue("cmd", "view") page = form.getvalue("page", "FrontPage") wiki = WikiPage(page) method = getattr(wiki, 'cmd_' + cmd, None) or wiki.cmd_view method(form) class WikiPage: homedir = tempfile.gettempdir() scripturl = os.path.basename(sys.argv[0]) def __init__(self, name): if not self.iswikiword(name): raise ValueError, "page name is not a wiki word" self.name = name self.load() def cmd_view(self, form): print "

", escape(self.splitwikiword(self.name)), "

" print "

" for line in self.data.splitlines(): line = line.rstrip() if not line: print "

" else: print self.formatline(line) print "

" print "

", self.mklink("edit", self.name, "Edit this page") + ";" print self.mklink("view", "FrontPage", "go to front page") + "." def formatline(self, line): words = [] for word in re.split('(\W+)', line): if self.iswikiword(word): if os.path.isfile(self.mkfile(word)): word = self.mklink("view", word, word) else: word = self.mklink("new", word, word + "*") else: word = escape(word) words.append(word) return "".join(words) def cmd_edit(self, form, label="Change"): print "

", label, self.name, "

" print '
' % self.scripturl s = '' print s % self.data print '' print '' % self.name print '
' print '' % label print "
" def cmd_create(self, form): self.data = form.getvalue("text", "").strip() error = self.store() if error: print "

I'm sorry. That didn't work

" print "

An error occurred while attempting to write the file:" print "

", escape(error) else: # Use a redirect directive, to avoid "reload page" problems print "" s = '' print s % (self.scripturl + "?cmd=view&page=" + self.name) print "" print "

OK

" print "

If nothing happens, please click here:", print self.mklink("view", self.name, self.name) def cmd_new(self, form): self.cmd_edit(form, label="Create") def iswikiword(self, word): return re.match("[A-Z][a-z]+([A-Z][a-z]*)+", word) def splitwikiword(self, word): chars = [] for c in word: if chars and c.isupper(): chars.append(' ') chars.append(c) return "".join(chars) def mkfile(self, name=None): if name is None: name = self.name return os.path.join(self.homedir, name + ".txt") def mklink(self, cmd, page, text): link = self.scripturl + "?cmd=" + cmd + "&page=" + page return '%s' % (link, text) def load(self): try: f = open(self.mkfile()) data = f.read().strip() f.close() except IOError: data = "" self.data = data def store(self): data = self.data try: f = open(self.mkfile(), "w") f.write(data) if data and not data.endswith('\n'): f.write('\n') f.close() return "" except IOError, err: return "IOError: %s" % str(err) Python-2.3.7/Demo/cgi/cgi3.py0000755001241000117560000000023107553556336015115 0ustar loewishpifb6#!/usr/local/bin/python """CGI test 3 (persistent data).""" import cgitb; cgitb.enable() from wiki import main if __name__ == "__main__": main() Python-2.3.7/Demo/cgi/cgi2.py0000755001241000117560000000073007553351647015116 0ustar loewishpifb6#!/usr/local/bin/python """CGI test 2 - basic use of cgi module.""" import cgitb; cgitb.enable() import cgi def main(): form = cgi.FieldStorage() print "Content-type: text/html" print if not form: print "

No Form Keys

" else: print "

Form Keys

" for key in form.keys(): value = form[key].value print "

", cgi.escape(key), ":", cgi.escape(value) if __name__ == "__main__": main() Python-2.3.7/Demo/cgi/README0000644001241000117560000000066507554025116014572 0ustar loewishpifb6CGI Examples ------------ Here are some example CGI programs. For a larger example, see ../../Tools/faqwiz/. cgi0.sh -- A shell script to test your server is configured for CGI cgi1.py -- A Python script to test your server is configured for CGI cgi2.py -- A Python script showing how to parse a form cgi3.py -- A Python script for driving an arbitrary CGI application wiki.py -- Sample CGI application: a minimal Wiki implementation Python-2.3.7/Demo/cgi/cgi1.py0000755001241000117560000000062207553563144015112 0ustar loewishpifb6#!/usr/local/bin/python """CGI test 1 - check server setup.""" # Until you get this to work, your web server isn't set up right or # your Python isn't set up right. # If cgi0.sh works but cgi1.py doesn't, check the #! line and the file # permissions. The docs for the cgi.py module have debugging tips. print "Content-type: text/html" print print "

Hello world

" print "

This is cgi1.py" Python-2.3.7/Demo/classes/0000755001241000117560000000000010765544471014606 5ustar loewishpifb6Python-2.3.7/Demo/classes/Dates.py0000755001241000117560000001721007670437614016225 0ustar loewishpifb6# Class Date supplies date objects that support date arithmetic. # # Date(month,day,year) returns a Date object. An instance prints as, # e.g., 'Mon 16 Aug 1993'. # # Addition, subtraction, comparison operators, min, max, and sorting # all work as expected for date objects: int+date or date+int returns # the date `int' days from `date'; date+date raises an exception; # date-int returns the date `int' days before `date'; date2-date1 returns # an integer, the number of days from date1 to date2; int-date raises an # exception; date1 < date2 is true iff date1 occurs before date2 (& # similarly for other comparisons); min(date1,date2) is the earlier of # the two dates and max(date1,date2) the later; and date objects can be # used as dictionary keys. # # Date objects support one visible method, date.weekday(). This returns # the day of the week the date falls on, as a string. # # Date objects also have 4 read-only data attributes: # .month in 1..12 # .day in 1..31 # .year int or long int # .ord the ordinal of the date relative to an arbitrary staring point # # The Dates module also supplies function today(), which returns the # current date as a date object. # # Those entranced by calendar trivia will be disappointed, as no attempt # has been made to accommodate the Julian (etc) system. On the other # hand, at least this package knows that 2000 is a leap year but 2100 # isn't, and works fine for years with a hundred decimal digits . # Tim Peters tim@ksr.com # not speaking for Kendall Square Research Corp # Adapted to Python 1.1 (where some hacks to overcome coercion are unnecessary) # by Guido van Rossum # Note that as of Python 2.3, a datetime module is included in the stardard # library. # vi:set tabsize=8: _MONTH_NAMES = [ 'January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December' ] _DAY_NAMES = [ 'Friday', 'Saturday', 'Sunday', 'Monday', 'Tuesday', 'Wednesday', 'Thursday' ] _DAYS_IN_MONTH = [ 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 ] _DAYS_BEFORE_MONTH = [] dbm = 0 for dim in _DAYS_IN_MONTH: _DAYS_BEFORE_MONTH.append(dbm) dbm = dbm + dim del dbm, dim _INT_TYPES = type(1), type(1L) def _is_leap( year ): # 1 if leap year, else 0 if year % 4 != 0: return 0 if year % 400 == 0: return 1 return year % 100 != 0 def _days_in_year( year ): # number of days in year return 365 + _is_leap(year) def _days_before_year( year ): # number of days before year return year*365L + (year+3)/4 - (year+99)/100 + (year+399)/400 def _days_in_month( month, year ): # number of days in month of year if month == 2 and _is_leap(year): return 29 return _DAYS_IN_MONTH[month-1] def _days_before_month( month, year ): # number of days in year before month return _DAYS_BEFORE_MONTH[month-1] + (month > 2 and _is_leap(year)) def _date2num( date ): # compute ordinal of date.month,day,year return _days_before_year( date.year ) + \ _days_before_month( date.month, date.year ) + \ date.day _DI400Y = _days_before_year( 400 ) # number of days in 400 years def _num2date( n ): # return date with ordinal n if type(n) not in _INT_TYPES: raise TypeError, 'argument must be integer: ' + `type(n)` ans = Date(1,1,1) # arguments irrelevant; just getting a Date obj del ans.ord, ans.month, ans.day, ans.year # un-initialize it ans.ord = n n400 = (n-1)/_DI400Y # # of 400-year blocks preceding year, n = 400 * n400, n - _DI400Y * n400 more = n / 365 dby = _days_before_year( more ) if dby >= n: more = more - 1 dby = dby - _days_in_year( more ) year, n = year + more, int(n - dby) try: year = int(year) # chop to int, if it fits except (ValueError, OverflowError): pass month = min( n/29 + 1, 12 ) dbm = _days_before_month( month, year ) if dbm >= n: month = month - 1 dbm = dbm - _days_in_month( month, year ) ans.month, ans.day, ans.year = month, n-dbm, year return ans def _num2day( n ): # return weekday name of day with ordinal n return _DAY_NAMES[ int(n % 7) ] class Date: def __init__( self, month, day, year ): if not 1 <= month <= 12: raise ValueError, 'month must be in 1..12: ' + `month` dim = _days_in_month( month, year ) if not 1 <= day <= dim: raise ValueError, 'day must be in 1..' + `dim` + ': ' + `day` self.month, self.day, self.year = month, day, year self.ord = _date2num( self ) # don't allow setting existing attributes def __setattr__( self, name, value ): if self.__dict__.has_key(name): raise AttributeError, 'read-only attribute ' + name self.__dict__[name] = value def __cmp__( self, other ): return cmp( self.ord, other.ord ) # define a hash function so dates can be used as dictionary keys def __hash__( self ): return hash( self.ord ) # print as, e.g., Mon 16 Aug 1993 def __repr__( self ): return '%.3s %2d %.3s ' % ( self.weekday(), self.day, _MONTH_NAMES[self.month-1] ) + `self.year` # Python 1.1 coerces neither int+date nor date+int def __add__( self, n ): if type(n) not in _INT_TYPES: raise TypeError, 'can\'t add ' + `type(n)` + ' to date' return _num2date( self.ord + n ) __radd__ = __add__ # handle int+date # Python 1.1 coerces neither date-int nor date-date def __sub__( self, other ): if type(other) in _INT_TYPES: # date-int return _num2date( self.ord - other ) else: return self.ord - other.ord # date-date # complain about int-date def __rsub__( self, other ): raise TypeError, 'Can\'t subtract date from integer' def weekday( self ): return _num2day( self.ord ) def today(): import time local = time.localtime(time.time()) return Date( local[1], local[2], local[0] ) DateTestError = 'DateTestError' def test( firstyear, lastyear ): a = Date(9,30,1913) b = Date(9,30,1914) if `a` != 'Tue 30 Sep 1913': raise DateTestError, '__repr__ failure' if (not a < b) or a == b or a > b or b != b: raise DateTestError, '__cmp__ failure' if a+365 != b or 365+a != b: raise DateTestError, '__add__ failure' if b-a != 365 or b-365 != a: raise DateTestError, '__sub__ failure' try: x = 1 - a raise DateTestError, 'int-date should have failed' except TypeError: pass try: x = a + b raise DateTestError, 'date+date should have failed' except TypeError: pass if a.weekday() != 'Tuesday': raise DateTestError, 'weekday() failure' if max(a,b) is not b or min(a,b) is not a: raise DateTestError, 'min/max failure' d = {a-1:b, b:a+1} if d[b-366] != b or d[a+(b-a)] != Date(10,1,1913): raise DateTestError, 'dictionary failure' # verify date<->number conversions for first and last days for # all years in firstyear .. lastyear lord = _days_before_year( firstyear ) y = firstyear while y <= lastyear: ford = lord + 1 lord = ford + _days_in_year(y) - 1 fd, ld = Date(1,1,y), Date(12,31,y) if (fd.ord,ld.ord) != (ford,lord): raise DateTestError, ('date->num failed', y) fd, ld = _num2date(ford), _num2date(lord) if (1,1,y,12,31,y) != \ (fd.month,fd.day,fd.year,ld.month,ld.day,ld.year): raise DateTestError, ('num->date failed', y) y = y + 1 Python-2.3.7/Demo/classes/Vec.py0000755001241000117560000000217707652015456015704 0ustar loewishpifb6# A simple vector class def vec(*v): return apply(Vec, v) class Vec: def __init__(self, *v): self.v = [] for x in v: self.v.append(x) def fromlist(self, v): self.v = [] if type(v) <> type([]): raise TypeError self.v = v[:] return self def __repr__(self): return 'vec(' + `self.v`[1:-1] + ')' def __len__(self): return len(self.v) def __getitem__(self, i): return self.v[i] def __add__(a, b): # Element-wise addition v = [] for i in range(len(a)): v.append(a[i] + b[i]) return Vec().fromlist(v) def __sub__(a, b): # Element-wise subtraction v = [] for i in range(len(a)): v.append(a[i] - b[i]) return Vec().fromlist(v) def __mul__(self, scalar): # Multiply by scalar v = [] for i in range(len(self.v)): v.append(self.v[i]*scalar) return Vec().fromlist(v) def test(): a = vec(1, 2, 3) b = vec(3, 2, 1) print a print b print a+b print a*3.0 test() Python-2.3.7/Demo/classes/Rev.py0000755001241000117560000000422407652015456015716 0ustar loewishpifb6# A class which presents the reverse of a sequence without duplicating it. # From: "Steven D. Majewski" # It works on mutable or inmutable sequences. # # >>> for c in Rev( 'Hello World!' ) : sys.stdout.write( c ) # ... else: sys.stdout.write( '\n' ) # ... # !dlroW olleH # # The .forw is so you can use anonymous sequences in __init__, and still # keep a reference the forward sequence. ) # If you give it a non-anonymous mutable sequence, the reverse sequence # will track the updated values. ( but not reassignment! - another # good reason to use anonymous values in creating the sequence to avoid # confusion. Maybe it should be change to copy input sequence to break # the connection completely ? ) # # >>> nnn = range( 0, 3 ) # >>> rnn = Rev( nnn ) # >>> for n in rnn: print n # ... # 2 # 1 # 0 # >>> for n in range( 4, 6 ): nnn.append( n ) # update nnn # ... # >>> for n in rnn: print n # prints reversed updated values # ... # 5 # 4 # 2 # 1 # 0 # >>> nnn = nnn[1:-1] # >>> nnn # [1, 2, 4] # >>> for n in rnn: print n # prints reversed values of old nnn # ... # 5 # 4 # 2 # 1 # 0 # >>> # # WH = Rev( 'Hello World!' ) # print WH.forw, WH.back # nnn = Rev( range( 1, 10 ) ) # print nnn.forw # print nnn # # produces output: # # Hello World! !dlroW olleH # [1, 2, 3, 4, 5, 6, 7, 8, 9] # [9, 8, 7, 6, 5, 4, 3, 2, 1] # # >>>rrr = Rev( nnn ) # >>>rrr # <1, 2, 3, 4, 5, 6, 7, 8, 9> from string import joinfields class Rev: def __init__( self, seq ): self.forw = seq self.back = self def __len__( self ): return len( self.forw ) def __getitem__( self, j ): return self.forw[ -( j + 1 ) ] def __repr__( self ): seq = self.forw if type(seq) == type( [] ) : wrap = '[]' sep = ', ' elif type(seq) == type( () ) : wrap = '()' sep = ', ' elif type(seq) == type( '' ) : wrap = '' sep = '' else: wrap = '<>' sep = ', ' outstrs = [] for item in self.back : outstrs.append( str( item ) ) return wrap[:1] + joinfields( outstrs, sep ) + wrap[-1:] Python-2.3.7/Demo/classes/bitvec.py0000755001241000117560000002426207652015456016442 0ustar loewishpifb6# # this is a rather strict implementation of a bit vector class # it is accessed the same way as an array of python-ints, except # the value must be 0 or 1 # import sys; rprt = sys.stderr.write #for debugging error = 'bitvec.error' def _check_value(value): if type(value) != type(0) or not 0 <= value < 2: raise error, 'bitvec() items must have int value 0 or 1' import math def _compute_len(param): mant, l = math.frexp(float(param)) bitmask = 1L << l if bitmask <= param: raise 'FATAL', '(param, l) = ' + `param, l` while l: bitmask = bitmask >> 1 if param & bitmask: break l = l - 1 return l def _check_key(len, key): if type(key) != type(0): raise TypeError, 'sequence subscript not int' if key < 0: key = key + len if not 0 <= key < len: raise IndexError, 'list index out of range' return key def _check_slice(len, i, j): #the type is ok, Python already checked that i, j = max(i, 0), min(len, j) if i > j: i = j return i, j class BitVec: def __init__(self, *params): self._data = 0L self._len = 0 if not len(params): pass elif len(params) == 1: param, = params if type(param) == type([]): value = 0L bit_mask = 1L for item in param: # strict check #_check_value(item) if item: value = value | bit_mask bit_mask = bit_mask << 1 self._data = value self._len = len(param) elif type(param) == type(0L): if param < 0: raise error, 'bitvec() can\'t handle negative longs' self._data = param self._len = _compute_len(param) else: raise error, 'bitvec() requires array or long parameter' elif len(params) == 2: param, length = params if type(param) == type(0L): if param < 0: raise error, \ 'can\'t handle negative longs' self._data = param if type(length) != type(0): raise error, 'bitvec()\'s 2nd parameter must be int' computed_length = _compute_len(param) if computed_length > length: print 'warning: bitvec() value is longer than the length indicates, truncating value' self._data = self._data & \ ((1L << length) - 1) self._len = length else: raise error, 'bitvec() requires array or long parameter' else: raise error, 'bitvec() requires 0 -- 2 parameter(s)' def append(self, item): #_check_value(item) #self[self._len:self._len] = [item] self[self._len:self._len] = \ BitVec(long(not not item), 1) def count(self, value): #_check_value(value) if value: data = self._data else: data = (~self)._data count = 0 while data: data, count = data >> 1, count + (data & 1 != 0) return count def index(self, value): #_check_value(value): if value: data = self._data else: data = (~self)._data index = 0 if not data: raise ValueError, 'list.index(x): x not in list' while not (data & 1): data, index = data >> 1, index + 1 return index def insert(self, index, item): #_check_value(item) #self[index:index] = [item] self[index:index] = BitVec(long(not not item), 1) def remove(self, value): del self[self.index(value)] def reverse(self): #ouch, this one is expensive! #for i in self._len>>1: self[i], self[l-i] = self[l-i], self[i] data, result = self._data, 0L for i in range(self._len): if not data: result = result << (self._len - i) break result, data = (result << 1) | (data & 1), data >> 1 self._data = result def sort(self): c = self.count(1) self._data = ((1L << c) - 1) << (self._len - c) def copy(self): return BitVec(self._data, self._len) def seq(self): result = [] for i in self: result.append(i) return result def __repr__(self): ##rprt('.' + '__repr__()\n') return 'bitvec' + `self._data, self._len` def __cmp__(self, other, *rest): #rprt(`self`+'.__cmp__'+`(other, ) + rest`+'\n') if type(other) != type(self): other = apply(bitvec, (other, ) + rest) #expensive solution... recursive binary, with slicing length = self._len if length == 0 or other._len == 0: return cmp(length, other._len) if length != other._len: min_length = min(length, other._len) return cmp(self[:min_length], other[:min_length]) or \ cmp(self[min_length:], other[min_length:]) #the lengths are the same now... if self._data == other._data: return 0 if length == 1: return cmp(self[0], other[0]) else: length = length >> 1 return cmp(self[:length], other[:length]) or \ cmp(self[length:], other[length:]) def __len__(self): #rprt(`self`+'.__len__()\n') return self._len def __getitem__(self, key): #rprt(`self`+'.__getitem__('+`key`+')\n') key = _check_key(self._len, key) return self._data & (1L << key) != 0 def __setitem__(self, key, value): #rprt(`self`+'.__setitem__'+`key, value`+'\n') key = _check_key(self._len, key) #_check_value(value) if value: self._data = self._data | (1L << key) else: self._data = self._data & ~(1L << key) def __delitem__(self, key): #rprt(`self`+'.__delitem__('+`key`+')\n') key = _check_key(self._len, key) #el cheapo solution... self._data = self[:key]._data | self[key+1:]._data >> key self._len = self._len - 1 def __getslice__(self, i, j): #rprt(`self`+'.__getslice__'+`i, j`+'\n') i, j = _check_slice(self._len, i, j) if i >= j: return BitVec(0L, 0) if i: ndata = self._data >> i else: ndata = self._data nlength = j - i if j != self._len: #we'll have to invent faster variants here #e.g. mod_2exp ndata = ndata & ((1L << nlength) - 1) return BitVec(ndata, nlength) def __setslice__(self, i, j, sequence, *rest): #rprt(`self`+'.__setslice__'+`(i, j, sequence) + rest`+'\n') i, j = _check_slice(self._len, i, j) if type(sequence) != type(self): sequence = apply(bitvec, (sequence, ) + rest) #sequence is now of our own type ls_part = self[:i] ms_part = self[j:] self._data = ls_part._data | \ ((sequence._data | \ (ms_part._data << sequence._len)) << ls_part._len) self._len = self._len - j + i + sequence._len def __delslice__(self, i, j): #rprt(`self`+'.__delslice__'+`i, j`+'\n') i, j = _check_slice(self._len, i, j) if i == 0 and j == self._len: self._data, self._len = 0L, 0 elif i < j: self._data = self[:i]._data | (self[j:]._data >> i) self._len = self._len - j + i def __add__(self, other): #rprt(`self`+'.__add__('+`other`+')\n') retval = self.copy() retval[self._len:self._len] = other return retval def __mul__(self, multiplier): #rprt(`self`+'.__mul__('+`multiplier`+')\n') if type(multiplier) != type(0): raise TypeError, 'sequence subscript not int' if multiplier <= 0: return BitVec(0L, 0) elif multiplier == 1: return self.copy() #handle special cases all 0 or all 1... if self._data == 0L: return BitVec(0L, self._len * multiplier) elif (~self)._data == 0L: return ~BitVec(0L, self._len * multiplier) #otherwise el cheapo again... retval = BitVec(0L, 0) while multiplier: retval, multiplier = retval + self, multiplier - 1 return retval def __and__(self, otherseq, *rest): #rprt(`self`+'.__and__'+`(otherseq, ) + rest`+'\n') if type(otherseq) != type(self): otherseq = apply(bitvec, (otherseq, ) + rest) #sequence is now of our own type return BitVec(self._data & otherseq._data, \ min(self._len, otherseq._len)) def __xor__(self, otherseq, *rest): #rprt(`self`+'.__xor__'+`(otherseq, ) + rest`+'\n') if type(otherseq) != type(self): otherseq = apply(bitvec, (otherseq, ) + rest) #sequence is now of our own type return BitVec(self._data ^ otherseq._data, \ max(self._len, otherseq._len)) def __or__(self, otherseq, *rest): #rprt(`self`+'.__or__'+`(otherseq, ) + rest`+'\n') if type(otherseq) != type(self): otherseq = apply(bitvec, (otherseq, ) + rest) #sequence is now of our own type return BitVec(self._data | otherseq._data, \ max(self._len, otherseq._len)) def __invert__(self): #rprt(`self`+'.__invert__()\n') return BitVec(~self._data & ((1L << self._len) - 1), \ self._len) def __coerce__(self, otherseq, *rest): #needed for *some* of the arithmetic operations #rprt(`self`+'.__coerce__'+`(otherseq, ) + rest`+'\n') if type(otherseq) != type(self): otherseq = apply(bitvec, (otherseq, ) + rest) return self, otherseq def __int__(self): return int(self._data) def __long__(self): return long(self._data) def __float__(self): return float(self._data) bitvec = BitVec Python-2.3.7/Demo/classes/README0000644001241000117560000000104307554025535015461 0ustar loewishpifb6Examples of classes that implement special operators (see reference manual): Complex.py Complex numbers Dates.py Date manipulation package by Tim Peters Dbm.py Wrapper around built-in dbm, supporting arbitrary values Range.py Example of a generator: re-implement built-in range() Rat.py Rational numbers Rev.py Yield the reverse of a sequence Vec.py A simple vector class bitvec.py A bit-vector class by Jan-Hein B\"uhrman (For straightforward examples of basic class features, such as use of methods and inheritance, see the library code.) Python-2.3.7/Demo/classes/Rat.py0000755001241000117560000002121707652015456015711 0ustar loewishpifb6'''\ This module implements rational numbers. The entry point of this module is the function rat(numerator, denominator) If either numerator or denominator is of an integral or rational type, the result is a rational number, else, the result is the simplest of the types float and complex which can hold numerator/denominator. If denominator is omitted, it defaults to 1. Rational numbers can be used in calculations with any other numeric type. The result of the calculation will be rational if possible. There is also a test function with calling sequence test() The documentation string of the test function contains the expected output. ''' # Contributed by Sjoerd Mullender from types import * def gcd(a, b): '''Calculate the Greatest Common Divisor.''' while b: a, b = b, a%b return a def rat(num, den = 1): # must check complex before float if isinstance(num, complex) or isinstance(den, complex): # numerator or denominator is complex: return a complex return complex(num) / complex(den) if isinstance(num, float) or isinstance(den, float): # numerator or denominator is float: return a float return float(num) / float(den) # otherwise return a rational return Rat(num, den) class Rat: '''This class implements rational numbers.''' def __init__(self, num, den = 1): if den == 0: raise ZeroDivisionError, 'rat(x, 0)' # normalize # must check complex before float if (isinstance(num, complex) or isinstance(den, complex)): # numerator or denominator is complex: # normalized form has denominator == 1+0j self.__num = complex(num) / complex(den) self.__den = complex(1) return if isinstance(num, float) or isinstance(den, float): # numerator or denominator is float: # normalized form has denominator == 1.0 self.__num = float(num) / float(den) self.__den = 1.0 return if (isinstance(num, self.__class__) or isinstance(den, self.__class__)): # numerator or denominator is rational new = num / den if not isinstance(new, self.__class__): self.__num = new if isinstance(new, complex): self.__den = complex(1) else: self.__den = 1.0 else: self.__num = new.__num self.__den = new.__den else: # make sure numerator and denominator don't # have common factors # this also makes sure that denominator > 0 g = gcd(num, den) self.__num = num / g self.__den = den / g # try making numerator and denominator of IntType if they fit try: numi = int(self.__num) deni = int(self.__den) except (OverflowError, TypeError): pass else: if self.__num == numi and self.__den == deni: self.__num = numi self.__den = deni def __repr__(self): return 'Rat(%s,%s)' % (self.__num, self.__den) def __str__(self): if self.__den == 1: return str(self.__num) else: return '(%s/%s)' % (str(self.__num), str(self.__den)) # a + b def __add__(a, b): try: return rat(a.__num * b.__den + b.__num * a.__den, a.__den * b.__den) except OverflowError: return rat(long(a.__num) * long(b.__den) + long(b.__num) * long(a.__den), long(a.__den) * long(b.__den)) def __radd__(b, a): return Rat(a) + b # a - b def __sub__(a, b): try: return rat(a.__num * b.__den - b.__num * a.__den, a.__den * b.__den) except OverflowError: return rat(long(a.__num) * long(b.__den) - long(b.__num) * long(a.__den), long(a.__den) * long(b.__den)) def __rsub__(b, a): return Rat(a) - b # a * b def __mul__(a, b): try: return rat(a.__num * b.__num, a.__den * b.__den) except OverflowError: return rat(long(a.__num) * long(b.__num), long(a.__den) * long(b.__den)) def __rmul__(b, a): return Rat(a) * b # a / b def __div__(a, b): try: return rat(a.__num * b.__den, a.__den * b.__num) except OverflowError: return rat(long(a.__num) * long(b.__den), long(a.__den) * long(b.__num)) def __rdiv__(b, a): return Rat(a) / b # a % b def __mod__(a, b): div = a / b try: div = int(div) except OverflowError: div = long(div) return a - b * div def __rmod__(b, a): return Rat(a) % b # a ** b def __pow__(a, b): if b.__den != 1: if isinstance(a.__num, complex): a = complex(a) else: a = float(a) if isinstance(b.__num, complex): b = complex(b) else: b = float(b) return a ** b try: return rat(a.__num ** b.__num, a.__den ** b.__num) except OverflowError: return rat(long(a.__num) ** b.__num, long(a.__den) ** b.__num) def __rpow__(b, a): return Rat(a) ** b # -a def __neg__(a): try: return rat(-a.__num, a.__den) except OverflowError: # a.__num == sys.maxint return rat(-long(a.__num), a.__den) # abs(a) def __abs__(a): return rat(abs(a.__num), a.__den) # int(a) def __int__(a): return int(a.__num / a.__den) # long(a) def __long__(a): return long(a.__num) / long(a.__den) # float(a) def __float__(a): return float(a.__num) / float(a.__den) # complex(a) def __complex__(a): return complex(a.__num) / complex(a.__den) # cmp(a,b) def __cmp__(a, b): diff = Rat(a - b) if diff.__num < 0: return -1 elif diff.__num > 0: return 1 else: return 0 def __rcmp__(b, a): return cmp(Rat(a), b) # a != 0 def __nonzero__(a): return a.__num != 0 # coercion def __coerce__(a, b): return a, Rat(b) def test(): '''\ Test function for rat module. The expected output is (module some differences in floating precission): -1 -1 0 0L 0.1 (0.1+0j) [Rat(1,2), Rat(-3,10), Rat(1,25), Rat(1,4)] [Rat(-3,10), Rat(1,25), Rat(1,4), Rat(1,2)] 0 (11/10) (11/10) 1.1 OK 2 1.5 (3/2) (1.5+1.5j) (15707963/5000000) 2 2 2.0 (2+0j) 4 0 4 1 4 0 3.5 0.5 3.0 1.33333333333 2.82842712475 1 (7/2) (1/2) 3 (4/3) 2.82842712475 1 (3.5+1.5j) (0.5-1.5j) (3+3j) (0.666666666667-0.666666666667j) (1.43248815986+2.43884761145j) 1 1.5 1 1.5 (1.5+0j) 3.5 -0.5 3.0 0.75 2.25 -1 3.0 0.0 2.25 1.0 1.83711730709 0 3.0 0.0 2.25 1.0 1.83711730709 1 (3+1.5j) -1.5j (2.25+2.25j) (0.5-0.5j) (1.50768393746+1.04970907623j) -1 (3/2) 1 1.5 (1.5+0j) (7/2) (-1/2) 3 (3/4) (9/4) -1 3.0 0.0 2.25 1.0 1.83711730709 -1 3 0 (9/4) 1 1.83711730709 0 (3+1.5j) -1.5j (2.25+2.25j) (0.5-0.5j) (1.50768393746+1.04970907623j) -1 (1.5+1.5j) (1.5+1.5j) (3.5+1.5j) (-0.5+1.5j) (3+3j) (0.75+0.75j) 4.5j -1 (3+1.5j) 1.5j (2.25+2.25j) (1+1j) (1.18235814075+2.85446505899j) 1 (3+1.5j) 1.5j (2.25+2.25j) (1+1j) (1.18235814075+2.85446505899j) 1 (3+3j) 0j 4.5j (1+0j) (-0.638110484918+0.705394566962j) 0 ''' print rat(-1L, 1) print rat(1, -1) a = rat(1, 10) print int(a), long(a), float(a), complex(a) b = rat(2, 5) l = [a+b, a-b, a*b, a/b] print l l.sort() print l print rat(0, 1) print a+1 print a+1L print a+1.0 try: print rat(1, 0) raise SystemError, 'should have been ZeroDivisionError' except ZeroDivisionError: print 'OK' print rat(2), rat(1.5), rat(3, 2), rat(1.5+1.5j), rat(31415926,10000000) list = [2, 1.5, rat(3,2), 1.5+1.5j] for i in list: print i, if not isinstance(i, complex): print int(i), float(i), print complex(i) print for j in list: print i + j, i - j, i * j, i / j, i ** j, if not (isinstance(i, complex) or isinstance(j, complex)): print cmp(i, j) print if __name__ == '__main__': test() Python-2.3.7/Demo/classes/Complex.py0000755001241000117560000002173307652015456016575 0ustar loewishpifb6# Complex numbers # --------------- # [Now that Python has a complex data type built-in, this is not very # useful, but it's still a nice example class] # This module represents complex numbers as instances of the class Complex. # A Complex instance z has two data attribues, z.re (the real part) and z.im # (the imaginary part). In fact, z.re and z.im can have any value -- all # arithmetic operators work regardless of the type of z.re and z.im (as long # as they support numerical operations). # # The following functions exist (Complex is actually a class): # Complex([re [,im]) -> creates a complex number from a real and an imaginary part # IsComplex(z) -> true iff z is a complex number (== has .re and .im attributes) # ToComplex(z) -> a complex number equal to z; z itself if IsComplex(z) is true # if z is a tuple(re, im) it will also be converted # PolarToComplex([r [,phi [,fullcircle]]]) -> # the complex number z for which r == z.radius() and phi == z.angle(fullcircle) # (r and phi default to 0) # exp(z) -> returns the complex exponential of z. Equivalent to pow(math.e,z). # # Complex numbers have the following methods: # z.abs() -> absolute value of z # z.radius() == z.abs() # z.angle([fullcircle]) -> angle from positive X axis; fullcircle gives units # z.phi([fullcircle]) == z.angle(fullcircle) # # These standard functions and unary operators accept complex arguments: # abs(z) # -z # +z # not z # repr(z) == `z` # str(z) # hash(z) -> a combination of hash(z.re) and hash(z.im) such that if z.im is zero # the result equals hash(z.re) # Note that hex(z) and oct(z) are not defined. # # These conversions accept complex arguments only if their imaginary part is zero: # int(z) # long(z) # float(z) # # The following operators accept two complex numbers, or one complex number # and one real number (int, long or float): # z1 + z2 # z1 - z2 # z1 * z2 # z1 / z2 # pow(z1, z2) # cmp(z1, z2) # Note that z1 % z2 and divmod(z1, z2) are not defined, # nor are shift and mask operations. # # The standard module math does not support complex numbers. # (I suppose it would be easy to implement a cmath module.) # # Idea: # add a class Polar(r, phi) and mixed-mode arithmetic which # chooses the most appropriate type for the result: # Complex for +,-,cmp # Polar for *,/,pow import types, math twopi = math.pi*2.0 halfpi = math.pi/2.0 def IsComplex(obj): return hasattr(obj, 're') and hasattr(obj, 'im') def ToComplex(obj): if IsComplex(obj): return obj elif type(obj) == types.TupleType: return apply(Complex, obj) else: return Complex(obj) def PolarToComplex(r = 0, phi = 0, fullcircle = twopi): phi = phi * (twopi / fullcircle) return Complex(math.cos(phi)*r, math.sin(phi)*r) def Re(obj): if IsComplex(obj): return obj.re else: return obj def Im(obj): if IsComplex(obj): return obj.im else: return obj class Complex: def __init__(self, re=0, im=0): if IsComplex(re): im = i + Complex(0, re.im) re = re.re if IsComplex(im): re = re - im.im im = im.re self.__dict__['re'] = re self.__dict__['im'] = im def __setattr__(self, name, value): raise TypeError, 'Complex numbers are immutable' def __hash__(self): if not self.im: return hash(self.re) mod = sys.maxint + 1L return int((hash(self.re) + 2L*hash(self.im) + mod) % (2L*mod) - mod) def __repr__(self): if not self.im: return 'Complex(%s)' % `self.re` else: return 'Complex(%s, %s)' % (`self.re`, `self.im`) def __str__(self): if not self.im: return `self.re` else: return 'Complex(%s, %s)' % (`self.re`, `self.im`) def __neg__(self): return Complex(-self.re, -self.im) def __pos__(self): return self def __abs__(self): # XXX could be done differently to avoid overflow! return math.sqrt(self.re*self.re + self.im*self.im) def __int__(self): if self.im: raise ValueError, "can't convert Complex with nonzero im to int" return int(self.re) def __long__(self): if self.im: raise ValueError, "can't convert Complex with nonzero im to long" return long(self.re) def __float__(self): if self.im: raise ValueError, "can't convert Complex with nonzero im to float" return float(self.re) def __cmp__(self, other): other = ToComplex(other) return cmp((self.re, self.im), (other.re, other.im)) def __rcmp__(self, other): other = ToComplex(other) return cmp(other, self) def __nonzero__(self): return not (self.re == self.im == 0) abs = radius = __abs__ def angle(self, fullcircle = twopi): return (fullcircle/twopi) * ((halfpi - math.atan2(self.re, self.im)) % twopi) phi = angle def __add__(self, other): other = ToComplex(other) return Complex(self.re + other.re, self.im + other.im) __radd__ = __add__ def __sub__(self, other): other = ToComplex(other) return Complex(self.re - other.re, self.im - other.im) def __rsub__(self, other): other = ToComplex(other) return other - self def __mul__(self, other): other = ToComplex(other) return Complex(self.re*other.re - self.im*other.im, self.re*other.im + self.im*other.re) __rmul__ = __mul__ def __div__(self, other): other = ToComplex(other) d = float(other.re*other.re + other.im*other.im) if not d: raise ZeroDivisionError, 'Complex division' return Complex((self.re*other.re + self.im*other.im) / d, (self.im*other.re - self.re*other.im) / d) def __rdiv__(self, other): other = ToComplex(other) return other / self def __pow__(self, n, z=None): if z is not None: raise TypeError, 'Complex does not support ternary pow()' if IsComplex(n): if n.im: if self.im: raise TypeError, 'Complex to the Complex power' else: return exp(math.log(self.re)*n) n = n.re r = pow(self.abs(), n) phi = n*self.angle() return Complex(math.cos(phi)*r, math.sin(phi)*r) def __rpow__(self, base): base = ToComplex(base) return pow(base, self) def exp(z): r = math.exp(z.re) return Complex(math.cos(z.im)*r,math.sin(z.im)*r) def checkop(expr, a, b, value, fuzz = 1e-6): import sys print ' ', a, 'and', b, try: result = eval(expr) except: result = sys.exc_type print '->', result if (type(result) == type('') or type(value) == type('')): ok = result == value else: ok = abs(result - value) <= fuzz if not ok: print '!!\t!!\t!! should be', value, 'diff', abs(result - value) def test(): testsuite = { 'a+b': [ (1, 10, 11), (1, Complex(0,10), Complex(1,10)), (Complex(0,10), 1, Complex(1,10)), (Complex(0,10), Complex(1), Complex(1,10)), (Complex(1), Complex(0,10), Complex(1,10)), ], 'a-b': [ (1, 10, -9), (1, Complex(0,10), Complex(1,-10)), (Complex(0,10), 1, Complex(-1,10)), (Complex(0,10), Complex(1), Complex(-1,10)), (Complex(1), Complex(0,10), Complex(1,-10)), ], 'a*b': [ (1, 10, 10), (1, Complex(0,10), Complex(0, 10)), (Complex(0,10), 1, Complex(0,10)), (Complex(0,10), Complex(1), Complex(0,10)), (Complex(1), Complex(0,10), Complex(0,10)), ], 'a/b': [ (1., 10, 0.1), (1, Complex(0,10), Complex(0, -0.1)), (Complex(0, 10), 1, Complex(0, 10)), (Complex(0, 10), Complex(1), Complex(0, 10)), (Complex(1), Complex(0,10), Complex(0, -0.1)), ], 'pow(a,b)': [ (1, 10, 1), (1, Complex(0,10), 1), (Complex(0,10), 1, Complex(0,10)), (Complex(0,10), Complex(1), Complex(0,10)), (Complex(1), Complex(0,10), 1), (2, Complex(4,0), 16), ], 'cmp(a,b)': [ (1, 10, -1), (1, Complex(0,10), 1), (Complex(0,10), 1, -1), (Complex(0,10), Complex(1), -1), (Complex(1), Complex(0,10), 1), ], } exprs = testsuite.keys() exprs.sort() for expr in exprs: print expr + ':' t = (expr,) for item in testsuite[expr]: apply(checkop, t+item) if __name__ == '__main__': test() Python-2.3.7/Demo/classes/Range.py0000755001241000117560000000352607652015456016222 0ustar loewishpifb6# Example of a generator: re-implement the built-in range function # without actually constructing the list of values. (It turns out # that the built-in function is about 20 times faster -- that's why # it's built-in. :-) # Wrapper function to emulate the complicated range() arguments def range(*a): if len(a) == 1: start, stop, step = 0, a[0], 1 elif len(a) == 2: start, stop = a step = 1 elif len(a) == 3: start, stop, step = a else: raise TypeError, 'range() needs 1-3 arguments' return Range(start, stop, step) # Class implementing a range object. # To the user the instances feel like immutable sequences # (and you can't concatenate or slice them) class Range: # initialization -- should be called only by range() above def __init__(self, start, stop, step): if step == 0: raise ValueError, 'range() called with zero step' self.start = start self.stop = stop self.step = step self.len = max(0, int((self.stop - self.start) / self.step)) # implement `x` and is also used by print x def __repr__(self): return 'range' + `self.start, self.stop, self.step` # implement len(x) def __len__(self): return self.len # implement x[i] def __getitem__(self, i): if 0 <= i < self.len: return self.start + self.step * i else: raise IndexError, 'range[i] index out of range' # Small test program def test(): import time, __builtin__ print range(10), range(-10, 10), range(0, 10, 2) for i in range(100, -100, -10): print i, print t1 = time.time() for i in range(1000): pass t2 = time.time() for i in __builtin__.range(1000): pass t3 = time.time() print t2-t1, 'sec (class)' print t3-t2, 'sec (built-in)' test() Python-2.3.7/Demo/classes/Dbm.py0000755001241000117560000000301207652015456015656 0ustar loewishpifb6# A wrapper around the (optional) built-in class dbm, supporting keys # and values of almost any type instead of just string. # (Actually, this works only for keys and values that can be read back # correctly after being converted to a string.) class Dbm: def __init__(self, filename, mode, perm): import dbm self.db = dbm.open(filename, mode, perm) def __repr__(self): s = '' for key in self.keys(): t = `key` + ': ' + `self[key]` if s: t = ', ' + t s = s + t return '{' + s + '}' def __len__(self): return len(self.db) def __getitem__(self, key): return eval(self.db[`key`]) def __setitem__(self, key, value): self.db[`key`] = `value` def __delitem__(self, key): del self.db[`key`] def keys(self): res = [] for key in self.db.keys(): res.append(eval(key)) return res def has_key(self, key): return self.db.has_key(`key`) def test(): d = Dbm('@dbm', 'rw', 0600) print d while 1: try: key = input('key: ') if d.has_key(key): value = d[key] print 'currently:', value value = input('value: ') if value == None: del d[key] else: d[key] = value except KeyboardInterrupt: print '' print d except EOFError: print '[eof]' break print d test() Python-2.3.7/Demo/sockets/0000755001241000117560000000000010765544472014625 5ustar loewishpifb6Python-2.3.7/Demo/sockets/broadcast.py0000755001241000117560000000042105726170164017133 0ustar loewishpifb6# Send UDP broadcast packets MYPORT = 50000 import sys, time from socket import * s = socket(AF_INET, SOCK_DGRAM) s.bind(('', 0)) s.setsockopt(SOL_SOCKET, SO_BROADCAST, 1) while 1: data = `time.time()` + '\n' s.sendto(data, ('', MYPORT)) time.sleep(2) Python-2.3.7/Demo/sockets/rpython.py0000755001241000117560000000117106247115741016676 0ustar loewishpifb6#! /usr/bin/env python # Remote python client. # Execute Python commands remotely and send output back. import sys import string from socket import * PORT = 4127 BUFSIZE = 1024 def main(): if len(sys.argv) < 3: print "usage: rpython host command" sys.exit(2) host = sys.argv[1] port = PORT i = string.find(host, ':') if i >= 0: port = string.atoi(port[i+1:]) host = host[:i] command = string.join(sys.argv[2:]) s = socket(AF_INET, SOCK_STREAM) s.connect((host, port)) s.send(command) s.shutdown(1) reply = '' while 1: data = s.recv(BUFSIZE) if not data: break reply = reply + data print reply, main() Python-2.3.7/Demo/sockets/ftp.py0000755001241000117560000000705107151511401015753 0ustar loewishpifb6# A simple FTP client. # # The information to write this program was gathered from RFC 959, # but this is not a complete implementation! Yet it shows how a simple # FTP client can be built, and you are welcome to extend it to suit # it to your needs... # # How it works (assuming you've read the RFC): # # User commands are passed uninterpreted to the server. However, the # user never needs to send a PORT command. Rather, the client opens a # port right away and sends the appropriate PORT command to the server. # When a response code 150 is received, this port is used to receive # the data (which is written to stdout in this version), and when the # data is exhausted, a new port is opened and a corresponding PORT # command sent. In order to avoid errors when reusing ports quickly # (and because there is no s.getsockname() method in Python yet) we # cycle through a number of ports in the 50000 range. import sys, posix, string from socket import * BUFSIZE = 1024 # Default port numbers used by the FTP protocol. # FTP_PORT = 21 FTP_DATA_PORT = FTP_PORT - 1 # Change the data port to something not needing root permissions. # FTP_DATA_PORT = FTP_DATA_PORT + 50000 # Main program (called at the end of this file). # def main(): hostname = sys.argv[1] control(hostname) # Control process (user interface and user protocol interpreter). # def control(hostname): # # Create control connection # s = socket(AF_INET, SOCK_STREAM) s.connect((hostname, FTP_PORT)) f = s.makefile('r') # Reading the replies is easier from a file... # # Control loop # r = None while 1: code = getreply(f) if code in ('221', 'EOF'): break if code == '150': getdata(r) code = getreply(f) r = None if not r: r = newdataport(s, f) cmd = getcommand() if not cmd: break s.send(cmd + '\r\n') # Create a new data port and send a PORT command to the server for it. # (Cycle through a number of ports to avoid problems with reusing # a port within a short time.) # nextport = 0 # def newdataport(s, f): global nextport port = nextport + FTP_DATA_PORT nextport = (nextport+1) % 16 r = socket(AF_INET, SOCK_STREAM) r.bind((gethostbyname(gethostname()), port)) r.listen(1) sendportcmd(s, f, port) return r # Send an appropriate port command. # def sendportcmd(s, f, port): hostname = gethostname() hostaddr = gethostbyname(hostname) hbytes = string.splitfields(hostaddr, '.') pbytes = [`port/256`, `port%256`] bytes = hbytes + pbytes cmd = 'PORT ' + string.joinfields(bytes, ',') s.send(cmd + '\r\n') code = getreply(f) # Process an ftp reply and return the 3-digit reply code (as a string). # The reply should be a line of text starting with a 3-digit number. # If the 4th char is '-', it is a multi-line reply and is # terminate by a line starting with the same 3-digit number. # Any text while receiving the reply is echoed to the file. # def getreply(f): line = f.readline() if not line: return 'EOF' print line, code = line[:3] if line[3:4] == '-': while 1: line = f.readline() if not line: break # Really an error print line, if line[:3] == code and line[3:4] != '-': break return code # Get the data from the data connection. # def getdata(r): print '(accepting data connection)' conn, host = r.accept() print '(data connection accepted)' while 1: data = conn.recv(BUFSIZE) if not data: break sys.stdout.write(data) print '(end of data connection)' # Get a command from the user. # def getcommand(): try: while 1: line = raw_input('ftp.py> ') if line: return line except EOFError: return '' # Call the main program. # main() Python-2.3.7/Demo/sockets/rpythond.py0000755001241000117560000000201207151511401017021 0ustar loewishpifb6#! /usr/bin/env python # Remote python server. # Execute Python commands remotely and send output back. # WARNING: This version has a gaping security hole -- it accepts requests # from any host on the Internet! import sys from socket import * import StringIO import traceback PORT = 4127 BUFSIZE = 1024 def main(): if len(sys.argv) > 1: port = int(eval(sys.argv[1])) else: port = PORT s = socket(AF_INET, SOCK_STREAM) s.bind(('', port)) s.listen(1) while 1: conn, (remotehost, remoteport) = s.accept() print 'connected by', remotehost, remoteport request = '' while 1: data = conn.recv(BUFSIZE) if not data: break request = request + data reply = execute(request) conn.send(reply) conn.close() def execute(request): stdout = sys.stdout stderr = sys.stderr sys.stdout = sys.stderr = fakefile = StringIO.StringIO() try: try: exec request in {}, {} except: print traceback.print_exc(100) finally: sys.stderr = stderr sys.stdout = stdout return fakefile.getvalue() main() Python-2.3.7/Demo/sockets/mcast.py0000755001241000117560000000415606753036041016305 0ustar loewishpifb6# Send/receive UDP multicast packets. # Requires that your OS kernel supports IP multicast. # This is built-in on SGI, still optional for most other vendors. # # Usage: # mcast -s (sender) # mcast -b (sender, using broadcast instead multicast) # mcast (receivers) MYPORT = 8123 MYGROUP = '225.0.0.250' import sys import time import struct import regsub from socket import * # Main program def main(): flags = sys.argv[1:] # if flags: sender(flags[0]) else: receiver() # Sender subroutine (only one per local area network) def sender(flag): s = socket(AF_INET, SOCK_DGRAM) if flag == '-b': s.setsockopt(SOL_SOCKET, SO_BROADCAST, 1) mygroup = '' else: mygroup = MYGROUP ttl = struct.pack('b', 1) # Time-to-live s.setsockopt(IPPROTO_IP, IP_MULTICAST_TTL, ttl) while 1: data = `time.time()` ## data = data + (1400 - len(data)) * '\0' s.sendto(data, (mygroup, MYPORT)) time.sleep(1) # Receiver subroutine (as many as you like) def receiver(): # Open and initialize the socket s = openmcastsock(MYGROUP, MYPORT) # # Loop, printing any data we receive while 1: data, sender = s.recvfrom(1500) while data[-1:] == '\0': data = data[:-1] # Strip trailing \0's print sender, ':', `data` # Open a UDP socket, bind it to a port and select a multicast group def openmcastsock(group, port): # Import modules used only here import string import struct # # Create a socket s = socket(AF_INET, SOCK_DGRAM) # # Allow multiple copies of this program on one machine # (not strictly needed) s.setsockopt(SOL_SOCKET, SO_REUSEADDR, 1) # # Bind it to the port s.bind(('', port)) # # Look up multicast group address in name server # (doesn't hurt if it is already in ddd.ddd.ddd.ddd format) group = gethostbyname(group) # # Construct binary group address bytes = map(int, string.split(group, ".")) grpaddr = 0 for byte in bytes: grpaddr = (grpaddr << 8) | byte # # Construct struct mreq from grpaddr and ifaddr ifaddr = INADDR_ANY mreq = struct.pack('ll', htonl(grpaddr), htonl(ifaddr)) # # Add group membership s.setsockopt(IPPROTO_IP, IP_ADD_MEMBERSHIP, mreq) # return s main() Python-2.3.7/Demo/sockets/unixserver.py0000644001241000117560000000057606463777664017434 0ustar loewishpifb6# Echo server demo using Unix sockets (handles one connection only) # Piet van Oostrum from socket import * FILE = 'blabla' s = socket(AF_UNIX, SOCK_STREAM) s.bind(FILE) print 'Sock name is: ['+s.getsockname()+']' s.listen(1) conn, addr = s.accept() print 'Connected by', addr while 1: data = conn.recv(1024) if not data: break conn.send(data) conn.close() Python-2.3.7/Demo/sockets/throughput.py0000755001241000117560000000342607151511401017375 0ustar loewishpifb6#! /usr/bin/env python # Test network throughput. # # Usage: # 1) on host_A: throughput -s [port] # start a server # 2) on host_B: throughput -c count host_A [port] # start a client # # The server will service multiple clients until it is killed. # # The client performs one transfer of count*BUFSIZE bytes and # measures the time it takes (roundtrip!). import sys, time from socket import * MY_PORT = 50000 + 42 BUFSIZE = 1024 def main(): if len(sys.argv) < 2: usage() if sys.argv[1] == '-s': server() elif sys.argv[1] == '-c': client() else: usage() def usage(): sys.stdout = sys.stderr print 'Usage: (on host_A) throughput -s [port]' print 'and then: (on host_B) throughput -c count host_A [port]' sys.exit(2) def server(): if len(sys.argv) > 2: port = eval(sys.argv[2]) else: port = MY_PORT s = socket(AF_INET, SOCK_STREAM) s.bind(('', port)) s.listen(1) print 'Server ready...' while 1: conn, (host, remoteport) = s.accept() while 1: data = conn.recv(BUFSIZE) if not data: break del data conn.send('OK\n') conn.close() print 'Done with', host, 'port', remoteport def client(): if len(sys.argv) < 4: usage() count = int(eval(sys.argv[2])) host = sys.argv[3] if len(sys.argv) > 4: port = eval(sys.argv[4]) else: port = MY_PORT testdata = 'x' * (BUFSIZE-1) + '\n' t1 = time.time() s = socket(AF_INET, SOCK_STREAM) t2 = time.time() s.connect((host, port)) t3 = time.time() i = 0 while i < count: i = i+1 s.send(testdata) s.shutdown(1) # Send EOF t4 = time.time() data = s.recv(BUFSIZE) t5 = time.time() print data print 'Raw timers:', t1, t2, t3, t4, t5 print 'Intervals:', t2-t1, t3-t2, t4-t3, t5-t4 print 'Total:', t5-t1 print 'Throughput:', round((BUFSIZE*count*0.001) / (t5-t1), 3), print 'K/sec.' main() Python-2.3.7/Demo/sockets/unicast.py0000644001241000117560000000033406206666613016642 0ustar loewishpifb6# Send UDP broadcast packets MYPORT = 50000 import sys, time from socket import * s = socket(AF_INET, SOCK_DGRAM) s.bind(('', 0)) while 1: data = `time.time()` + '\n' s.sendto(data, ('', MYPORT)) time.sleep(2) Python-2.3.7/Demo/sockets/README0000644001241000117560000000155506463661250015505 0ustar loewishpifb6This directory contains some demonstrations of the socket module: broadcast.py Broadcast the time to radio.py. echosvr.py About the simplest TCP server possible. finger.py Client for the 'finger' protocol. ftp.py A very simple ftp client. gopher.py A simple gopher client. radio.py Receive time broadcasts from broadcast.py. telnet.py Client for the 'telnet' protocol. throughput.py Client and server to measure TCP throughput. unixclient.py Unix socket example, client side unixserver.py Unix socket example, server side udpecho.py Client and server for the UDP echo protocol. The following file is only relevant on SGI machines (or other systems that support multicast): mcast.py A Python translation of /usr/people/4Dgifts/examples/network/mcast.c (Note that IN.py is in ../../lib/sgi.) See also ../../lib/nntp.py for another example of socket code. Python-2.3.7/Demo/sockets/udpecho.py0000755001241000117560000000240407151511401016606 0ustar loewishpifb6#! /usr/bin/env python # Client and server for udp (datagram) echo. # # Usage: udpecho -s [port] (to start a server) # or: udpecho -c host [port] 2: port = eval(sys.argv[2]) else: port = ECHO_PORT s = socket(AF_INET, SOCK_DGRAM) s.bind(('', port)) print 'udp echo server ready' while 1: data, addr = s.recvfrom(BUFSIZE) print 'server received', `data`, 'from', `addr` s.sendto(data, addr) def client(): if len(sys.argv) < 3: usage() host = sys.argv[2] if len(sys.argv) > 3: port = eval(sys.argv[3]) else: port = ECHO_PORT addr = host, port s = socket(AF_INET, SOCK_DGRAM) s.bind(('', 0)) print 'udp echo client ready, reading stdin' while 1: line = sys.stdin.readline() if not line: break s.sendto(line, addr) data, fromaddr = s.recvfrom(BUFSIZE) print 'client received', `data`, 'from', `fromaddr` main() Python-2.3.7/Demo/sockets/radio.py0000755001241000117560000000042205645567554016305 0ustar loewishpifb6# Receive UDP packets transmitted by a broadcasting service MYPORT = 50000 import sys from socket import * s = socket(AF_INET, SOCK_DGRAM) s.bind(('', MYPORT)) while 1: data, wherefrom = s.recvfrom(1500, 0) sys.stderr.write(`wherefrom` + '\n') sys.stdout.write(data) Python-2.3.7/Demo/sockets/unixclient.py0000644001241000117560000000033506463661250017354 0ustar loewishpifb6# Echo client demo using Unix sockets # Piet van Oostrum from socket import * FILE = 'blabla' s = socket(AF_UNIX, SOCK_STREAM) s.connect(FILE) s.send('Hello, world') data = s.recv(1024) s.close() print 'Received', `data` Python-2.3.7/Demo/sockets/gopher.py0000755001241000117560000002010706247115741016457 0ustar loewishpifb6#! /usr/bin/env python # A simple gopher client. # # Usage: gopher [ [selector] host [port] ] import string import sys import os import socket # Default selector, host and port DEF_SELECTOR = '' DEF_HOST = 'gopher.micro.umn.edu' DEF_PORT = 70 # Recognized file types T_TEXTFILE = '0' T_MENU = '1' T_CSO = '2' T_ERROR = '3' T_BINHEX = '4' T_DOS = '5' T_UUENCODE = '6' T_SEARCH = '7' T_TELNET = '8' T_BINARY = '9' T_REDUNDANT = '+' T_SOUND = 's' # Dictionary mapping types to strings typename = {'0': '', '1': '

', '2': '', '3': '', \ '4': '', '5': '', '6': '', '7': '', \ '8': '', '9': '', '+': '', 's': ''} # Oft-used characters and strings CRLF = '\r\n' TAB = '\t' # Open a TCP connection to a given host and port def open_socket(host, port): if not port: port = DEF_PORT elif type(port) == type(''): port = string.atoi(port) s = socket.socket(socket.AF_INET, socket.SOCK_STREAM) s.connect((host, port)) return s # Send a selector to a given host and port, return a file with the reply def send_request(selector, host, port): s = open_socket(host, port) s.send(selector + CRLF) s.shutdown(1) return s.makefile('r') # Get a menu in the form of a list of entries def get_menu(selector, host, port): f = send_request(selector, host, port) list = [] while 1: line = f.readline() if not line: print '(Unexpected EOF from server)' break if line[-2:] == CRLF: line = line[:-2] elif line[-1:] in CRLF: line = line[:-1] if line == '.': break if not line: print '(Empty line from server)' continue typechar = line[0] parts = string.splitfields(line[1:], TAB) if len(parts) < 4: print '(Bad line from server:', `line`, ')' continue if len(parts) > 4: print '(Extra info from server:', parts[4:], ')' parts.insert(0, typechar) list.append(parts) f.close() return list # Get a text file as a list of lines, with trailing CRLF stripped def get_textfile(selector, host, port): list = [] get_alt_textfile(selector, host, port, list.append) return list # Get a text file and pass each line to a function, with trailing CRLF stripped def get_alt_textfile(selector, host, port, func): f = send_request(selector, host, port) while 1: line = f.readline() if not line: print '(Unexpected EOF from server)' break if line[-2:] == CRLF: line = line[:-2] elif line[-1:] in CRLF: line = line[:-1] if line == '.': break if line[:2] == '..': line = line[1:] func(line) f.close() # Get a binary file as one solid data block def get_binary(selector, host, port): f = send_request(selector, host, port) data = f.read() f.close() return data # Get a binary file and pass each block to a function def get_alt_binary(selector, host, port, func, blocksize): f = send_request(selector, host, port) while 1: data = f.read(blocksize) if not data: break func(data) # A *very* simple interactive browser # Browser main command, has default arguments def browser(*args): selector = DEF_SELECTOR host = DEF_HOST port = DEF_PORT n = len(args) if n > 0 and args[0]: selector = args[0] if n > 1 and args[1]: host = args[1] if n > 2 and args[2]: port = args[2] if n > 3: raise RuntimeError, 'too many args' try: browse_menu(selector, host, port) except socket.error, msg: print 'Socket error:', msg sys.exit(1) except KeyboardInterrupt: print '\n[Goodbye]' # Browse a menu def browse_menu(selector, host, port): list = get_menu(selector, host, port) while 1: print '----- MENU -----' print 'Selector:', `selector` print 'Host:', host, ' Port:', port print for i in range(len(list)): item = list[i] typechar, description = item[0], item[1] print string.rjust(`i+1`, 3) + ':', description, if typename.has_key(typechar): print typename[typechar] else: print '' print while 1: try: str = raw_input('Choice [CR == up a level]: ') except EOFError: print return if not str: return try: choice = string.atoi(str) except string.atoi_error: print 'Choice must be a number; try again:' continue if not 0 < choice <= len(list): print 'Choice out of range; try again:' continue break item = list[choice-1] typechar = item[0] [i_selector, i_host, i_port] = item[2:5] if typebrowser.has_key(typechar): browserfunc = typebrowser[typechar] try: browserfunc(i_selector, i_host, i_port) except (IOError, socket.error): print '***', sys.exc_type, ':', sys.exc_value else: print 'Unsupported object type' # Browse a text file def browse_textfile(selector, host, port): x = None try: p = os.popen('${PAGER-more}', 'w') x = SaveLines(p) get_alt_textfile(selector, host, port, x.writeln) except IOError, msg: print 'IOError:', msg if x: x.close() f = open_savefile() if not f: return x = SaveLines(f) try: get_alt_textfile(selector, host, port, x.writeln) print 'Done.' except IOError, msg: print 'IOError:', msg x.close() # Browse a search index def browse_search(selector, host, port): while 1: print '----- SEARCH -----' print 'Selector:', `selector` print 'Host:', host, ' Port:', port print try: query = raw_input('Query [CR == up a level]: ') except EOFError: print break query = string.strip(query) if not query: break if '\t' in query: print 'Sorry, queries cannot contain tabs' continue browse_menu(selector + TAB + query, host, port) # "Browse" telnet-based information, i.e. open a telnet session def browse_telnet(selector, host, port): if selector: print 'Log in as', `selector` if type(port) <> type(''): port = `port` sts = os.system('set -x; exec telnet ' + host + ' ' + port) if sts: print 'Exit status:', sts # "Browse" a binary file, i.e. save it to a file def browse_binary(selector, host, port): f = open_savefile() if not f: return x = SaveWithProgress(f) get_alt_binary(selector, host, port, x.write, 8*1024) x.close() # "Browse" a sound file, i.e. play it or save it def browse_sound(selector, host, port): browse_binary(selector, host, port) # Dictionary mapping types to browser functions typebrowser = {'0': browse_textfile, '1': browse_menu, \ '4': browse_binary, '5': browse_binary, '6': browse_textfile, \ '7': browse_search, \ '8': browse_telnet, '9': browse_binary, 's': browse_sound} # Class used to save lines, appending a newline to each line class SaveLines: def __init__(self, f): self.f = f def writeln(self, line): self.f.write(line + '\n') def close(self): sts = self.f.close() if sts: print 'Exit status:', sts # Class used to save data while showing progress class SaveWithProgress: def __init__(self, f): self.f = f def write(self, data): sys.stdout.write('#') sys.stdout.flush() self.f.write(data) def close(self): print sts = self.f.close() if sts: print 'Exit status:', sts # Ask for and open a save file, or return None if not to save def open_savefile(): try: savefile = raw_input( \ 'Save as file [CR == don\'t save; |pipeline or ~user/... OK]: ') except EOFError: print return None savefile = string.strip(savefile) if not savefile: return None if savefile[0] == '|': cmd = string.strip(savefile[1:]) try: p = os.popen(cmd, 'w') except IOError, msg: print `cmd`, ':', msg return None print 'Piping through', `cmd`, '...' return p if savefile[0] == '~': savefile = os.path.expanduser(savefile) try: f = open(savefile, 'w') except IOError, msg: print `savefile`, ':', msg return None print 'Saving to', `savefile`, '...' return f # Test program def test(): if sys.argv[4:]: print 'usage: gopher [ [selector] host [port] ]' sys.exit(2) elif sys.argv[3:]: browser(sys.argv[1], sys.argv[2], sys.argv[3]) elif sys.argv[2:]: try: port = string.atoi(sys.argv[2]) selector = '' host = sys.argv[1] except string.atoi_error: selector = sys.argv[1] host = sys.argv[2] port = '' browser(selector, host, port) elif sys.argv[1:]: browser('', sys.argv[1]) else: browser() # Call the test program as a main program test() Python-2.3.7/Demo/sockets/telnet.py0000755001241000117560000000442307151511401016455 0ustar loewishpifb6#! /usr/bin/env python # Minimal interface to the Internet telnet protocol. # # It refuses all telnet options and does not recognize any of the other # telnet commands, but can still be used to connect in line-by-line mode. # It's also useful to play with a number of other services, # like time, finger, smtp and even ftp. # # Usage: telnet host [port] # # The port may be a service name or a decimal port number; # it defaults to 'telnet'. import sys, posix, time from socket import * BUFSIZE = 1024 # Telnet protocol characters IAC = chr(255) # Interpret as command DONT = chr(254) DO = chr(253) WONT = chr(252) WILL = chr(251) def main(): host = sys.argv[1] try: hostaddr = gethostbyname(host) except error: sys.stderr.write(sys.argv[1] + ': bad host name\n') sys.exit(2) # if len(sys.argv) > 2: servname = sys.argv[2] else: servname = 'telnet' # if '0' <= servname[:1] <= '9': port = eval(servname) else: try: port = getservbyname(servname, 'tcp') except error: sys.stderr.write(servname + ': bad tcp service name\n') sys.exit(2) # s = socket(AF_INET, SOCK_STREAM) # try: s.connect((host, port)) except error, msg: sys.stderr.write('connect failed: ' + `msg` + '\n') sys.exit(1) # pid = posix.fork() # if pid == 0: # child -- read stdin, write socket while 1: line = sys.stdin.readline() s.send(line) else: # parent -- read socket, write stdout iac = 0 # Interpret next char as command opt = '' # Interpret next char as option while 1: data = s.recv(BUFSIZE) if not data: # EOF; kill child and exit sys.stderr.write( '(Closed by remote host)\n') posix.kill(pid, 9) sys.exit(1) cleandata = '' for c in data: if opt: print ord(c) s.send(opt + c) opt = '' elif iac: iac = 0 if c == IAC: cleandata = cleandata + c elif c in (DO, DONT): if c == DO: print '(DO)', else: print '(DONT)', opt = IAC + WONT elif c in (WILL, WONT): if c == WILL: print '(WILL)', else: print '(WONT)', opt = IAC + DONT else: print '(command)', ord(c) elif c == IAC: iac = 1 print '(IAC)', else: cleandata = cleandata + c sys.stdout.write(cleandata) sys.stdout.flush() try: main() except KeyboardInterrupt: pass Python-2.3.7/Demo/sockets/finger.py0000755001241000117560000000216107151511401016431 0ustar loewishpifb6#! /usr/bin/env python # Python interface to the Internet finger daemon. # # Usage: finger [options] [user][@host] ... # # If no host is given, the finger daemon on the local host is contacted. # Options are passed uninterpreted to the finger daemon! import sys, string from socket import * # Hardcode the number of the finger port here. # It's not likely to change soon... # FINGER_PORT = 79 # Function to do one remote finger invocation. # Output goes directly to stdout (although this can be changed). # def finger(host, args): s = socket(AF_INET, SOCK_STREAM) s.connect((host, FINGER_PORT)) s.send(args + '\n') while 1: buf = s.recv(1024) if not buf: break sys.stdout.write(buf) sys.stdout.flush() # Main function: argument parsing. # def main(): options = '' i = 1 while i < len(sys.argv) and sys.argv[i][:1] == '-': options = options + sys.argv[i] + ' ' i = i+1 args = sys.argv[i:] if not args: args = [''] for arg in args: if '@' in arg: at = string.index(arg, '@') host = arg[at+1:] arg = arg[:at] else: host = '' finger(host, options + arg) # Call the main function. # main() Python-2.3.7/Demo/sockets/echosvr.py0000755001241000117560000000124407151514317016642 0ustar loewishpifb6#! /usr/bin/env python # Python implementation of an 'echo' tcp server: echo all data it receives. # # This is the simplest possible server, servicing a single request only. import sys from socket import * # The standard echo port isn't very useful, it requires root permissions! # ECHO_PORT = 7 ECHO_PORT = 50000 + 7 BUFSIZE = 1024 def main(): if len(sys.argv) > 1: port = int(eval(sys.argv[1])) else: port = ECHO_PORT s = socket(AF_INET, SOCK_STREAM) s.bind(('', port)) s.listen(1) conn, (remotehost, remoteport) = s.accept() print 'connected by', remotehost, remoteport while 1: data = conn.recv(BUFSIZE) if not data: break conn.send(data) main() Python-2.3.7/Demo/metaclasses/0000755001241000117560000000000010765544471015455 5ustar loewishpifb6Python-2.3.7/Demo/metaclasses/index.html0000644001241000117560000005013707744771210017454 0ustar loewishpifb6 Metaclasses in Python 1.5

Metaclasses in Python 1.5

(A.k.a. The Killer Joke :-)

(Postscript: reading this essay is probably not the best way to understand the metaclass hook described here. See a message posted by Vladimir Marangozov which may give a gentler introduction to the matter. You may also want to search Deja News for messages with "metaclass" in the subject posted to comp.lang.python in July and August 1998.)

In previous Python releases (and still in 1.5), there is something called the ``Don Beaudry hook'', after its inventor and champion. This allows C extensions to provide alternate class behavior, thereby allowing the Python class syntax to be used to define other class-like entities. Don Beaudry has used this in his infamous MESS package; Jim Fulton has used it in his Extension Classes package. (It has also been referred to as the ``Don Beaudry hack,'' but that's a misnomer. There's nothing hackish about it -- in fact, it is rather elegant and deep, even though there's something dark to it.)

(On first reading, you may want to skip directly to the examples in the section "Writing Metaclasses in Python" below, unless you want your head to explode.)

Documentation of the Don Beaudry hook has purposefully been kept minimal, since it is a feature of incredible power, and is easily abused. Basically, it checks whether the type of the base class is callable, and if so, it is called to create the new class.

Note the two indirection levels. Take a simple example: 

class B:
    pass

class C(B):
    pass
Take a look at the second class definition, and try to fathom ``the type of the base class is callable.''

(Types are not classes, by the way. See questions 4.2, 4.19 and in particular 6.22 in the Python FAQ for more on this topic.)

  • The base class is B; this one's easy.

  • Since B is a class, its type is ``class''; so the type of the base class is the type ``class''. This is also known as types.ClassType, assuming the standard module types has been imported.

  • Now is the type ``class'' callable? No, because types (in core Python) are never callable. Classes are callable (calling a class creates a new instance) but types aren't.

So our conclusion is that in our example, the type of the base class (of C) is not callable. So the Don Beaudry hook does not apply, and the default class creation mechanism is used (which is also used when there is no base class). In fact, the Don Beaudry hook never applies when using only core Python, since the type of a core object is never callable.

So what do Don and Jim do in order to use Don's hook? Write an extension that defines at least two new Python object types. The first would be the type for ``class-like'' objects usable as a base class, to trigger Don's hook. This type must be made callable. That's why we need a second type. Whether an object is callable depends on its type. So whether a type object is callable depends on its type, which is a meta-type. (In core Python there is only one meta-type, the type ``type'' (types.TypeType), which is the type of all type objects, even itself.) A new meta-type must be defined that makes the type of the class-like objects callable. (Normally, a third type would also be needed, the new ``instance'' type, but this is not an absolute requirement -- the new class type could return an object of some existing type when invoked to create an instance.)

Still confused? Here's a simple device due to Don himself to explain metaclasses. Take a simple class definition; assume B is a special class that triggers Don's hook: 

class C(B):
    a = 1
    b = 2
This can be though of as equivalent to: 
C = type(B)('C', (B,), {'a': 1, 'b': 2})
If that's too dense for you, here's the same thing written out using temporary variables: 
creator = type(B)               # The type of the base class
name = 'C'                      # The name of the new class
bases = (B,)                    # A tuple containing the base class(es)
namespace = {'a': 1, 'b': 2}    # The namespace of the class statement
C = creator(name, bases, namespace)
This is analogous to what happens without the Don Beaudry hook, except that in that case the creator function is set to the default class creator.

In either case, the creator is called with three arguments. The first one, name, is the name of the new class (as given at the top of the class statement). The bases argument is a tuple of base classes (a singleton tuple if there's only one base class, like the example). Finally, namespace is a dictionary containing the local variables collected during execution of the class statement.

Note that the contents of the namespace dictionary is simply whatever names were defined in the class statement. A little-known fact is that when Python executes a class statement, it enters a new local namespace, and all assignments and function definitions take place in this namespace. Thus, after executing the following class statement: 

class C:
    a = 1
    def f(s): pass
the class namespace's contents would be {'a': 1, 'f': <function f ...>}.

But enough already about writing Python metaclasses in C; read the documentation of MESS or Extension Classes for more information.

Writing Metaclasses in Python

In Python 1.5, the requirement to write a C extension in order to write metaclasses has been dropped (though you can still do it, of course). In addition to the check ``is the type of the base class callable,'' there's a check ``does the base class have a __class__ attribute.'' If so, it is assumed that the __class__ attribute refers to a class.

Let's repeat our simple example from above: 

class C(B):
    a = 1
    b = 2
Assuming B has a __class__ attribute, this translates into: 
C = B.__class__('C', (B,), {'a': 1, 'b': 2})
This is exactly the same as before except that instead of type(B), B.__class__ is invoked. If you have read FAQ question 6.22 you will understand that while there is a big technical difference between type(B) and B.__class__, they play the same role at different abstraction levels. And perhaps at some point in the future they will really be the same thing (at which point you would be able to derive subclasses from built-in types).

At this point it may be worth mentioning that C.__class__ is the same object as B.__class__, i.e., C's metaclass is the same as B's metaclass. In other words, subclassing an existing class creates a new (meta)inststance of the base class's metaclass.

Going back to the example, the class B.__class__ is instantiated, passing its constructor the same three arguments that are passed to the default class constructor or to an extension's metaclass: name, bases, and namespace.

It is easy to be confused by what exactly happens when using a metaclass, because we lose the absolute distinction between classes and instances: a class is an instance of a metaclass (a ``metainstance''), but technically (i.e. in the eyes of the python runtime system), the metaclass is just a class, and the metainstance is just an instance. At the end of the class statement, the metaclass whose metainstance is used as a base class is instantiated, yielding a second metainstance (of the same metaclass). This metainstance is then used as a (normal, non-meta) class; instantiation of the class means calling the metainstance, and this will return a real instance. And what class is that an instance of? Conceptually, it is of course an instance of our metainstance; but in most cases the Python runtime system will see it as an instance of a a helper class used by the metaclass to implement its (non-meta) instances...

Hopefully an example will make things clearer. Let's presume we have a metaclass MetaClass1. It's helper class (for non-meta instances) is callled HelperClass1. We now (manually) instantiate MetaClass1 once to get an empty special base class: 

BaseClass1 = MetaClass1("BaseClass1", (), {})
We can now use BaseClass1 as a base class in a class statement: 
class MySpecialClass(BaseClass1):
    i = 1
    def f(s): pass
At this point, MySpecialClass is defined; it is a metainstance of MetaClass1 just like BaseClass1, and in fact the expression ``BaseClass1.__class__ == MySpecialClass.__class__ == MetaClass1'' yields true.

We are now ready to create instances of MySpecialClass. Let's assume that no constructor arguments are required: 

x = MySpecialClass()
y = MySpecialClass()
print x.__class__, y.__class__
The print statement shows that x and y are instances of HelperClass1. How did this happen? MySpecialClass is an instance of MetaClass1 (``meta'' is irrelevant here); when an instance is called, its __call__ method is invoked, and presumably the __call__ method defined by MetaClass1 returns an instance of HelperClass1.

Now let's see how we could use metaclasses -- what can we do with metaclasses that we can't easily do without them? Here's one idea: a metaclass could automatically insert trace calls for all method calls. Let's first develop a simplified example, without support for inheritance or other ``advanced'' Python features (we'll add those later). 

import types

class Tracing:
    def __init__(self, name, bases, namespace):
        """Create a new class."""
        self.__name__ = name
        self.__bases__ = bases
        self.__namespace__ = namespace
    def __call__(self):
        """Create a new instance."""
        return Instance(self)

class Instance:
    def __init__(self, klass):
        self.__klass__ = klass
    def __getattr__(self, name):
        try:
            value = self.__klass__.__namespace__[name]
        except KeyError:
            raise AttributeError, name
        if type(value) is not types.FunctionType:
            return value
        return BoundMethod(value, self)

class BoundMethod:
    def __init__(self, function, instance):
        self.function = function
        self.instance = instance
    def __call__(self, *args):
        print "calling", self.function, "for", self.instance, "with", args
        return apply(self.function, (self.instance,) + args)

Trace = Tracing('Trace', (), {})

class MyTracedClass(Trace):
    def method1(self, a):
        self.a = a
    def method2(self):
        return self.a

aninstance = MyTracedClass()

aninstance.method1(10)

print "the answer is %d" % aninstance.method2()
Confused already? The intention is to read this from top down. The Tracing class is the metaclass we're defining. Its structure is really simple.

  • The __init__ method is invoked when a new Tracing instance is created, e.g. the definition of class MyTracedClass later in the example. It simply saves the class name, base classes and namespace as instance variables.

  • The __call__ method is invoked when a Tracing instance is called, e.g. the creation of aninstance later in the example. It returns an instance of the class Instance, which is defined next.

The class Instance is the class used for all instances of classes built using the Tracing metaclass, e.g. aninstance. It has two methods:

  • The __init__ method is invoked from the Tracing.__call__ method above to initialize a new instance. It saves the class reference as an instance variable. It uses a funny name because the user's instance variables (e.g. self.a later in the example) live in the same namespace.

  • The __getattr__ method is invoked whenever the user code references an attribute of the instance that is not an instance variable (nor a class variable; but except for __init__ and __getattr__ there are no class variables). It will be called, for example, when aninstance.method1 is referenced in the example, with self set to aninstance and name set to the string "method1".

The __getattr__ method looks the name up in the __namespace__ dictionary. If it isn't found, it raises an AttributeError exception. (In a more realistic example, it would first have to look through the base classes as well.) If it is found, there are two possibilities: it's either a function or it isn't. If it's not a function, it is assumed to be a class variable, and its value is returned. If it's a function, we have to ``wrap'' it in instance of yet another helper class, BoundMethod.

The BoundMethod class is needed to implement a familiar feature: when a method is defined, it has an initial argument, self, which is automatically bound to the relevant instance when it is called. For example, aninstance.method1(10) is equivalent to method1(aninstance, 10). In the example if this call, first a temporary BoundMethod instance is created with the following constructor call: temp = BoundMethod(method1, aninstance); then this instance is called as temp(10). After the call, the temporary instance is discarded.

  • The __init__ method is invoked for the constructor call BoundMethod(method1, aninstance). It simply saves away its arguments.

  • The __call__ method is invoked when the bound method instance is called, as in temp(10). It needs to call method1(aninstance, 10). However, even though self.function is now method1 and self.instance is aninstance, it can't call self.function(self.instance, args) directly, because it should work regardless of the number of arguments passed. (For simplicity, support for keyword arguments has been omitted.)

In order to be able to support arbitrary argument lists, the __call__ method first constructs a new argument tuple. Conveniently, because of the notation *args in __call__'s own argument list, the arguments to __call__ (except for self) are placed in the tuple args. To construct the desired argument list, we concatenate a singleton tuple containing the instance with the args tuple: (self.instance,) + args. (Note the trailing comma used to construct the singleton tuple.) In our example, the resulting argument tuple is (aninstance, 10).

The intrinsic function apply() takes a function and an argument tuple and calls the function for it. In our example, we are calling apply(method1, (aninstance, 10)) which is equivalent to calling method(aninstance, 10).

From here on, things should come together quite easily. The output of the example code is something like this: 

calling <function method1 at ae8d8> for <Instance instance at 95ab0> with (10,)
calling <function method2 at ae900> for <Instance instance at 95ab0> with ()
the answer is 10

That was about the shortest meaningful example that I could come up with. A real tracing metaclass (for example, Trace.py discussed below) needs to be more complicated in two dimensions.

First, it needs to support more advanced Python features such as class variables, inheritance, __init__ methods, and keyword arguments.

Second, it needs to provide a more flexible way to handle the actual tracing information; perhaps it should be possible to write your own tracing function that gets called, perhaps it should be possible to enable and disable tracing on a per-class or per-instance basis, and perhaps a filter so that only interesting calls are traced; it should also be able to trace the return value of the call (or the exception it raised if an error occurs). Even the Trace.py example doesn't support all these features yet.

Real-life Examples

Have a look at some very preliminary examples that I coded up to teach myself how to write metaclasses:

Enum.py
This (ab)uses the class syntax as an elegant way to define enumerated types. The resulting classes are never instantiated -- rather, their class attributes are the enumerated values. For example: 
class Color(Enum):
    red = 1
    green = 2
    blue = 3
print Color.red
will print the string ``Color.red'', while ``Color.red==1'' is true, and ``Color.red + 1'' raise a TypeError exception.

Trace.py
The resulting classes work much like standard classes, but by setting a special class or instance attribute __trace_output__ to point to a file, all calls to the class's methods are traced. It was a bit of a struggle to get this right. This should probably redone using the generic metaclass below.

Meta.py
A generic metaclass. This is an attempt at finding out how much standard class behavior can be mimicked by a metaclass. The preliminary answer appears to be that everything's fine as long as the class (or its clients) don't look at the instance's __class__ attribute, nor at the class's __dict__ attribute. The use of __getattr__ internally makes the classic implementation of __getattr__ hooks tough; we provide a similar hook _getattr_ instead. (__setattr__ and __delattr__ are not affected.) (XXX Hm. Could detect presence of __getattr__ and rename it.)

Eiffel.py
Uses the above generic metaclass to implement Eiffel style pre-conditions and post-conditions.

Synch.py
Uses the above generic metaclass to implement synchronized methods.

Simple.py
The example module used above.

A pattern seems to be emerging: almost all these uses of metaclasses (except for Enum, which is probably more cute than useful) mostly work by placing wrappers around method calls. An obvious problem with that is that it's not easy to combine the features of different metaclasses, while this would actually be quite useful: for example, I wouldn't mind getting a trace from the test run of the Synch module, and it would be interesting to add preconditions to it as well. This needs more research. Perhaps a metaclass could be provided that allows stackable wrappers...

Things You Could Do With Metaclasses

There are lots of things you could do with metaclasses. Most of these can also be done with creative use of __getattr__, but metaclasses make it easier to modify the attribute lookup behavior of classes. Here's a partial list.

  • Enforce different inheritance semantics, e.g. automatically call base class methods when a derived class overrides

  • Implement class methods (e.g. if the first argument is not named 'self')

  • Implement that each instance is initialized with copies of all class variables

  • Implement a different way to store instance variables (e.g. in a list kept outside the instance but indexed by the instance's id())

  • Automatically wrap or trap all or certain methods
    • for tracing
    • for precondition and postcondition checking
    • for synchronized methods
    • for automatic value caching

  • When an attribute is a parameterless function, call it on reference (to mimic it being an instance variable); same on assignment

  • Instrumentation: see how many times various attributes are used

  • Different semantics for __setattr__ and __getattr__ (e.g. disable them when they are being used recursively)

  • Abuse class syntax for other things

  • Experiment with automatic type checking

  • Delegation (or acquisition)

  • Dynamic inheritance patterns

  • Automatic caching of methods

Credits

Many thanks to David Ascher and Donald Beaudry for their comments on earlier draft of this paper. Also thanks to Matt Conway and Tommy Burnette for putting a seed for the idea of metaclasses in my mind, nearly three years ago, even though at the time my response was ``you can do that with __getattr__ hooks...'' :-)

Python-2.3.7/Demo/metaclasses/meta-vladimir.txt0000644001241000117560000002640706563571423020760 0ustar loewishpifb6Subject: Re: The metaclass saga using Python From: Vladimir Marangozov To: tim_one@email.msn.com (Tim Peters) Cc: python-list@cwi.nl Date: Wed, 5 Aug 1998 15:59:06 +0200 (DFT) [Tim] > > building-on-examples-tends-to-prevent-abstract-thrashing-ly y'rs - tim > OK, I stand corrected. I understand that anybody's interpretation of the meta-class concept is likely to be difficult to digest by others. Here's another try, expressing the same thing, but using the Python programming model, examples and, perhaps, more popular terms. 1. Classes. This is pure Python of today. Sorry about the tutorial, but it is meant to illustrate the second part, which is the one we're interested in and which will follow the same development scenario. Besides, newbies are likely to understand that the discussion is affordable even for them :-) a) Class definition A class is meant to define the common properties of a set of objects. A class is a "package" of properties. The assembly of properties in a class package is sometimes called a class structure (which isn't always appropriate). >>> class A: attr1 = "Hello" # an attribute of A def method1(self, *args): pass # method1 of A def method2(self, *args): pass # method2 of A >>> So far, we defined the structure of the class A. The class A is of type . We can check this by asking Python: "what is A?" >>> A # What is A? b) Class instantiation Creating an object with the properties defined in the class A is called instantiation of the class A. After an instantiation of A, we obtain a new object, called an instance, which has the properties packaged in the class A. >>> a = A() # 'a' is the 1st instance of A >>> a # What is 'a'? <__main__.A instance at 2022b9d0> >>> b = A() # 'b' is another instance of A >>> b # What is 'b'? <__main__.A instance at 2022b9c0> The objects, 'a' and 'b', are of type and they both have the same properties. Note, that 'a' and 'b' are different objects. (their adresses differ). This is a bit hard to see, so let's ask Python: >>> a == b # Is 'a' the same object as 'b'? 0 # No. Instance objects have one more special property, indicating the class they are an instance of. This property is named __class__. >>> a.__class__ # What is the class of 'a'? # 'a' is an instance of A >>> b.__class__ # What is the class of 'b'? # 'b' is an instance of A >>> a.__class__ == b.__class__ # Is it really the same class A? 1 # Yes. c) Class inheritance (class composition and specialization) Classes can be defined in terms of other existing classes (and only classes! -- don't bug me on this now). Thus, we can compose property packages and create new ones. We reuse the property set defined in a class by defining a new class, which "inherits" from the former. In other words, a class B which inherits from the class A, inherits the properties defined in A, or, B inherits the structure of A. In the same time, at the definition of the new class B, we can enrich the inherited set of properties by adding new ones and/or modify some of the inherited properties. >>> class B(A): # B inherits A's properties attr2 = "World" # additional attr2 def method2(self, arg1): pass # method2 is redefined def method3(self, *args): pass # additional method3 >>> B # What is B? >>> B == A # Is B the same class as A? 0 # No. Classes define one special property, indicating whether a class inherits the properties of another class. This property is called __bases__ and it contains a list (a tuple) of the classes the new class inherits from. The classes from which a class is inheriting the properties are called superclasses (in Python, we call them also -- base classes). >>> A.__bases__ # Does A have any superclasses? () # No. >>> B.__bases__ # Does B have any superclasses? (,) # Yes. It has one superclass. >>> B.__bases__[0] == A # Is it really the class A? 1 # Yes, it is. -------- Congratulations on getting this far! This was the hard part. Now, let's continue with the easy one. -------- 2. Meta-classes You have to admit, that an anonymous group of Python wizards are not satisfied with the property packaging facilities presented above. They say, that the Real-World bugs them with problems that cannot be modelled successfully with classes. Or, that the way classes are implemented in Python and the way classes and instances behave at runtime isn't always appropriate for reproducing the Real-World's behavior in a way that satisfies them. Hence, what they want is the following: a) leave objects as they are (instances of classes) b) leave classes as they are (property packages and object creators) BUT, at the same time: c) consider classes as being instances of mysterious objects. d) label mysterious objects "meta-classes". Easy, eh? You may ask: "Why on earth do they want to do that?". They answer: "Poor soul... Go and see how cruel the Real-World is!". You - fuzzy: "OK, will do!" And here we go for another round of what I said in section 1 -- Classes. However, be warned! The features we're going to talk about aren't fully implemented yet, because the Real-World don't let wizards to evaluate precisely how cruel it is, so the features are still highly-experimental. a) Meta-class definition A meta-class is meant to define the common properties of a set of classes. A meta-class is a "package" of properties. The assembly of properties in a meta-class package is sometimes called a meta-class structure (which isn't always appropriate). In Python, a meta-class definition would have looked like this: >>> metaclass M: attr1 = "Hello" # an attribute of M def method1(self, *args): pass # method1 of M def method2(self, *args): pass # method2 of M >>> So far, we defined the structure of the meta-class M. The meta-class M is of type . We cannot check this by asking Python, but if we could, it would have answered: >>> M # What is M? b) Meta-class instantiation Creating an object with the properties defined in the meta-class M is called instantiation of the meta-class M. After an instantiation of M, we obtain a new object, called an class, but now it is called also a meta-instance, which has the properties packaged in the meta-class M. In Python, instantiating a meta-class would have looked like this: >>> A = M() # 'A' is the 1st instance of M >>> A # What is 'A'? >>> B = M() # 'B' is another instance of M >>> B # What is 'B'? The metaclass-instances, A and B, are of type and they both have the same properties. Note, that A and B are different objects. (their adresses differ). This is a bit hard to see, but if it was possible to ask Python, it would have answered: >>> A == B # Is A the same class as B? 0 # No. Class objects have one more special property, indicating the meta-class they are an instance of. This property is named __metaclass__. >>> A.__metaclass__ # What is the meta-class of A? # A is an instance of M >>> A.__metaclass__ # What is the meta-class of B? # B is an instance of M >>> A.__metaclass__ == B.__metaclass__ # Is it the same meta-class M? 1 # Yes. c) Meta-class inheritance (meta-class composition and specialization) Meta-classes can be defined in terms of other existing meta-classes (and only meta-classes!). Thus, we can compose property packages and create new ones. We reuse the property set defined in a meta-class by defining a new meta-class, which "inherits" from the former. In other words, a meta-class N which inherits from the meta-class M, inherits the properties defined in M, or, N inherits the structure of M. In the same time, at the definition of the new meta-class N, we can enrich the inherited set of properties by adding new ones and/or modify some of the inherited properties. >>> metaclass N(M): # N inherits M's properties attr2 = "World" # additional attr2 def method2(self, arg1): pass # method2 is redefined def method3(self, *args): pass # additional method3 >>> N # What is N? >>> N == M # Is N the same meta-class as M? 0 # No. Meta-classes define one special property, indicating whether a meta-class inherits the properties of another meta-class. This property is called __metabases__ and it contains a list (a tuple) of the meta-classes the new meta-class inherits from. The meta-classes from which a meta-class is inheriting the properties are called super-meta-classes (in Python, we call them also -- super meta-bases). >>> M.__metabases__ # Does M have any supermetaclasses? () # No. >>> N.__metabases__ # Does N have any supermetaclasses? (,) # Yes. It has a supermetaclass. >>> N.__metabases__[0] == M # Is it really the meta-class M? 1 # Yes, it is. -------- Triple congratulations on getting this far! Now you know everything about meta-classes and the Real-World! -- Vladimir MARANGOZOV | Vladimir.Marangozov@inrialpes.fr http://sirac.inrialpes.fr/~marangoz | tel:(+33-4)76615277 fax:76615252 Python-2.3.7/Demo/metaclasses/Eiffel.py0000644001241000117560000000662007513364363017222 0ustar loewishpifb6"""Support Eiffel-style preconditions and postconditions. For example, class C: def m1(self, arg): require arg > 0 return whatever ensure Result > arg can be written (clumsily, I agree) as: class C(Eiffel): def m1(self, arg): return whatever def m1_pre(self, arg): assert arg > 0 def m1_post(self, Result, arg): assert Result > arg Pre- and post-conditions for a method, being implemented as methods themselves, are inherited independently from the method. This gives much of the same effect of Eiffel, where pre- and post-conditions are inherited when a method is overridden by a derived class. However, when a derived class in Python needs to extend a pre- or post-condition, it must manually merge the base class' pre- or post-condition with that defined in the derived class', for example: class D(C): def m1(self, arg): return arg**2 def m1_post(self, Result, arg): C.m1_post(self, Result, arg) assert Result < 100 This gives derived classes more freedom but also more responsibility than in Eiffel, where the compiler automatically takes care of this. In Eiffel, pre-conditions combine using contravariance, meaning a derived class can only make a pre-condition weaker; in Python, this is up to the derived class. For example, a derived class that takes away the requirement that arg > 0 could write: def m1_pre(self, arg): pass but one could equally write a derived class that makes a stronger requirement: def m1_pre(self, arg): require arg > 50 It would be easy to modify the classes shown here so that pre- and post-conditions can be disabled (separately, on a per-class basis). A different design would have the pre- or post-condition testing functions return true for success and false for failure. This would make it possible to implement automatic combination of inherited and new pre-/post-conditions. All this is left as an exercise to the reader. """ from Meta import MetaClass, MetaHelper, MetaMethodWrapper class EiffelMethodWrapper(MetaMethodWrapper): def __init__(self, func, inst): MetaMethodWrapper.__init__(self, func, inst) # Note that the following causes recursive wrappers around # the pre-/post-condition testing methods. These are harmless # but inefficient; to avoid them, the lookup must be done # using the class. try: self.pre = getattr(inst, self.__name__ + "_pre") except AttributeError: self.pre = None try: self.post = getattr(inst, self.__name__ + "_post") except AttributeError: self.post = None def __call__(self, *args, **kw): if self.pre: apply(self.pre, args, kw) Result = apply(self.func, (self.inst,) + args, kw) if self.post: apply(self.post, (Result,) + args, kw) return Result class EiffelHelper(MetaHelper): __methodwrapper__ = EiffelMethodWrapper class EiffelMetaClass(MetaClass): __helper__ = EiffelHelper Eiffel = EiffelMetaClass('Eiffel', (), {}) def _test(): class C(Eiffel): def m1(self, arg): return arg+1 def m1_pre(self, arg): assert arg > 0, "precondition for m1 failed" def m1_post(self, Result, arg): assert Result > arg x = C() x.m1(12) ## x.m1(-1) if __name__ == '__main__': _test() Python-2.3.7/Demo/metaclasses/Trace.py0000644001241000117560000001004506577243737017074 0ustar loewishpifb6"""Tracing metaclass. XXX This is very much a work in progress. """ import types, sys class TraceMetaClass: """Metaclass for tracing. Classes defined using this metaclass have an automatic tracing feature -- by setting the __trace_output__ instance (or class) variable to a file object, trace messages about all calls are written to the file. The trace formatting can be changed by defining a suitable __trace_call__ method. """ __inited = 0 def __init__(self, name, bases, dict): self.__name__ = name self.__bases__ = bases self.__dict = dict # XXX Can't define __dict__, alas self.__inited = 1 def __getattr__(self, name): try: return self.__dict[name] except KeyError: for base in self.__bases__: try: return base.__getattr__(name) except AttributeError: pass raise AttributeError, name def __setattr__(self, name, value): if not self.__inited: self.__dict__[name] = value else: self.__dict[name] = value def __call__(self, *args, **kw): inst = TracingInstance() inst.__meta_init__(self) try: init = inst.__getattr__('__init__') except AttributeError: init = lambda: None apply(init, args, kw) return inst __trace_output__ = None class TracingInstance: """Helper class to represent an instance of a tracing class.""" def __trace_call__(self, fp, fmt, *args): fp.write((fmt+'\n') % args) def __meta_init__(self, klass): self.__class = klass def __getattr__(self, name): # Invoked for any attr not in the instance's __dict__ try: raw = self.__class.__getattr__(name) except AttributeError: raise AttributeError, name if type(raw) != types.FunctionType: return raw # It's a function fullname = self.__class.__name__ + "." + name if not self.__trace_output__ or name == '__trace_call__': return NotTracingWrapper(fullname, raw, self) else: return TracingWrapper(fullname, raw, self) class NotTracingWrapper: def __init__(self, name, func, inst): self.__name__ = name self.func = func self.inst = inst def __call__(self, *args, **kw): return apply(self.func, (self.inst,) + args, kw) class TracingWrapper(NotTracingWrapper): def __call__(self, *args, **kw): self.inst.__trace_call__(self.inst.__trace_output__, "calling %s, inst=%s, args=%s, kw=%s", self.__name__, self.inst, args, kw) try: rv = apply(self.func, (self.inst,) + args, kw) except: t, v, tb = sys.exc_info() self.inst.__trace_call__(self.inst.__trace_output__, "returning from %s with exception %s: %s", self.__name__, t, v) raise t, v, tb else: self.inst.__trace_call__(self.inst.__trace_output__, "returning from %s with value %s", self.__name__, rv) return rv Traced = TraceMetaClass('Traced', (), {'__trace_output__': None}) def _test(): global C, D class C(Traced): def __init__(self, x=0): self.x = x def m1(self, x): self.x = x def m2(self, y): return self.x + y __trace_output__ = sys.stdout class D(C): def m2(self, y): print "D.m2(%s)" % `y`; return C.m2(self, y) __trace_output__ = None x = C(4321) print x print x.x print x.m1(100) print x.m1(10) print x.m2(33) print x.m1(5) print x.m2(4000) print x.x print C.__init__ print C.m2 print D.__init__ print D.m2 y = D() print y print y.m1(10) print y.m2(100) print y.x if __name__ == '__main__': _test() Python-2.3.7/Demo/metaclasses/Simple.py0000644001241000117560000000225006400417223017240 0ustar loewishpifb6import types class Tracing: def __init__(self, name, bases, namespace): """Create a new class.""" self.__name__ = name self.__bases__ = bases self.__namespace__ = namespace def __call__(self): """Create a new instance.""" return Instance(self) class Instance: def __init__(self, klass): self.__klass__ = klass def __getattr__(self, name): try: value = self.__klass__.__namespace__[name] except KeyError: raise AttributeError, name if type(value) is not types.FunctionType: return value return BoundMethod(value, self) class BoundMethod: def __init__(self, function, instance): self.function = function self.instance = instance def __call__(self, *args): print "calling", self.function, "for", self.instance, "with", args return apply(self.function, (self.instance,) + args) Trace = Tracing('Trace', (), {}) class MyTracedClass(Trace): def method1(self, a): self.a = a def method2(self): return self.a aninstance = MyTracedClass() aninstance.method1(10) print aninstance.method2() Python-2.3.7/Demo/metaclasses/Synch.py0000644001241000117560000001740606577243737017132 0ustar loewishpifb6"""Synchronization metaclass. This metaclass makes it possible to declare synchronized methods. """ import thread # First we need to define a reentrant lock. # This is generally useful and should probably be in a standard Python # library module. For now, we in-line it. class Lock: """Reentrant lock. This is a mutex-like object which can be acquired by the same thread more than once. It keeps a reference count of the number of times it has been acquired by the same thread. Each acquire() call must be matched by a release() call and only the last release() call actually releases the lock for acquisition by another thread. The implementation uses two locks internally: __mutex is a short term lock used to protect the instance variables __wait is the lock for which other threads wait A thread intending to acquire both locks should acquire __wait first. The implementation uses two other instance variables, protected by locking __mutex: __tid is the thread ID of the thread that currently has the lock __count is the number of times the current thread has acquired it When the lock is released, __tid is None and __count is zero. """ def __init__(self): """Constructor. Initialize all instance variables.""" self.__mutex = thread.allocate_lock() self.__wait = thread.allocate_lock() self.__tid = None self.__count = 0 def acquire(self, flag=1): """Acquire the lock. If the optional flag argument is false, returns immediately when it cannot acquire the __wait lock without blocking (it may still block for a little while in order to acquire the __mutex lock). The return value is only relevant when the flag argument is false; it is 1 if the lock is acquired, 0 if not. """ self.__mutex.acquire() try: if self.__tid == thread.get_ident(): self.__count = self.__count + 1 return 1 finally: self.__mutex.release() locked = self.__wait.acquire(flag) if not flag and not locked: return 0 try: self.__mutex.acquire() assert self.__tid == None assert self.__count == 0 self.__tid = thread.get_ident() self.__count = 1 return 1 finally: self.__mutex.release() def release(self): """Release the lock. If this thread doesn't currently have the lock, an assertion error is raised. Only allow another thread to acquire the lock when the count reaches zero after decrementing it. """ self.__mutex.acquire() try: assert self.__tid == thread.get_ident() assert self.__count > 0 self.__count = self.__count - 1 if self.__count == 0: self.__tid = None self.__wait.release() finally: self.__mutex.release() def _testLock(): done = [] def f2(lock, done=done): lock.acquire() print "f2 running in thread %d\n" % thread.get_ident(), lock.release() done.append(1) def f1(lock, f2=f2, done=done): lock.acquire() print "f1 running in thread %d\n" % thread.get_ident(), try: f2(lock) finally: lock.release() done.append(1) lock = Lock() lock.acquire() f1(lock) # Adds 2 to done lock.release() lock.acquire() thread.start_new_thread(f1, (lock,)) # Adds 2 thread.start_new_thread(f1, (lock, f1)) # Adds 3 thread.start_new_thread(f2, (lock,)) # Adds 1 thread.start_new_thread(f2, (lock,)) # Adds 1 lock.release() import time while len(done) < 9: print len(done) time.sleep(0.001) print len(done) # Now, the Locking metaclass is a piece of cake. # As an example feature, methods whose name begins with exactly one # underscore are not synchronized. from Meta import MetaClass, MetaHelper, MetaMethodWrapper class LockingMethodWrapper(MetaMethodWrapper): def __call__(self, *args, **kw): if self.__name__[:1] == '_' and self.__name__[1:] != '_': return apply(self.func, (self.inst,) + args, kw) self.inst.__lock__.acquire() try: return apply(self.func, (self.inst,) + args, kw) finally: self.inst.__lock__.release() class LockingHelper(MetaHelper): __methodwrapper__ = LockingMethodWrapper def __helperinit__(self, formalclass): MetaHelper.__helperinit__(self, formalclass) self.__lock__ = Lock() class LockingMetaClass(MetaClass): __helper__ = LockingHelper Locking = LockingMetaClass('Locking', (), {}) def _test(): # For kicks, take away the Locking base class and see it die class Buffer(Locking): def __init__(self, initialsize): assert initialsize > 0 self.size = initialsize self.buffer = [None]*self.size self.first = self.last = 0 def put(self, item): # Do we need to grow the buffer? if (self.last+1) % self.size != self.first: # Insert the new item self.buffer[self.last] = item self.last = (self.last+1) % self.size return # Double the buffer size # First normalize it so that first==0 and last==size-1 print "buffer =", self.buffer print "first = %d, last = %d, size = %d" % ( self.first, self.last, self.size) if self.first <= self.last: temp = self.buffer[self.first:self.last] else: temp = self.buffer[self.first:] + self.buffer[:self.last] print "temp =", temp self.buffer = temp + [None]*(self.size+1) self.first = 0 self.last = self.size-1 self.size = self.size*2 print "Buffer size doubled to", self.size print "new buffer =", self.buffer print "first = %d, last = %d, size = %d" % ( self.first, self.last, self.size) self.put(item) # Recursive call to test the locking def get(self): # Is the buffer empty? if self.first == self.last: raise EOFError # Avoid defining a new exception item = self.buffer[self.first] self.first = (self.first+1) % self.size return item def producer(buffer, wait, n=1000): import time i = 0 while i < n: print "put", i buffer.put(i) i = i+1 print "Producer: done producing", n, "items" wait.release() def consumer(buffer, wait, n=1000): import time i = 0 tout = 0.001 while i < n: try: x = buffer.get() if x != i: raise AssertionError, \ "get() returned %s, expected %s" % (x, i) print "got", i i = i+1 tout = 0.001 except EOFError: time.sleep(tout) tout = tout*2 print "Consumer: done consuming", n, "items" wait.release() pwait = thread.allocate_lock() pwait.acquire() cwait = thread.allocate_lock() cwait.acquire() buffer = Buffer(1) n = 1000 thread.start_new_thread(consumer, (buffer, cwait, n)) thread.start_new_thread(producer, (buffer, pwait, n)) pwait.acquire() print "Producer done" cwait.acquire() print "All done" print "buffer size ==", len(buffer.buffer) if __name__ == '__main__': _testLock() _test() Python-2.3.7/Demo/metaclasses/Enum.py0000644001241000117560000001051106577243737016740 0ustar loewishpifb6"""Enumeration metaclass. XXX This is very much a work in progress. """ import string class EnumMetaClass: """Metaclass for enumeration. To define your own enumeration, do something like class Color(Enum): red = 1 green = 2 blue = 3 Now, Color.red, Color.green and Color.blue behave totally different: they are enumerated values, not integers. Enumerations cannot be instantiated; however they can be subclassed. """ def __init__(self, name, bases, dict): """Constructor -- create an enumeration. Called at the end of the class statement. The arguments are the name of the new class, a tuple containing the base classes, and a dictionary containing everything that was entered in the class' namespace during execution of the class statement. In the above example, it would be {'red': 1, 'green': 2, 'blue': 3}. """ for base in bases: if base.__class__ is not EnumMetaClass: raise TypeError, "Enumeration base class must be enumeration" bases = filter(lambda x: x is not Enum, bases) self.__name__ = name self.__bases__ = bases self.__dict = {} for key, value in dict.items(): self.__dict[key] = EnumInstance(name, key, value) def __getattr__(self, name): """Return an enumeration value. For example, Color.red returns the value corresponding to red. XXX Perhaps the values should be created in the constructor? This looks in the class dictionary and if it is not found there asks the base classes. The special attribute __members__ returns the list of names defined in this class (it does not merge in the names defined in base classes). """ if name == '__members__': return self.__dict.keys() try: return self.__dict[name] except KeyError: for base in self.__bases__: try: return getattr(base, name) except AttributeError: continue raise AttributeError, name def __repr__(self): s = self.__name__ if self.__bases__: s = s + '(' + string.join(map(lambda x: x.__name__, self.__bases__), ", ") + ')' if self.__dict: list = [] for key, value in self.__dict.items(): list.append("%s: %s" % (key, int(value))) s = "%s: {%s}" % (s, string.join(list, ", ")) return s class EnumInstance: """Class to represent an enumeration value. EnumInstance('Color', 'red', 12) prints as 'Color.red' and behaves like the integer 12 when compared, but doesn't support arithmetic. XXX Should it record the actual enumeration rather than just its name? """ def __init__(self, classname, enumname, value): self.__classname = classname self.__enumname = enumname self.__value = value def __int__(self): return self.__value def __repr__(self): return "EnumInstance(%s, %s, %s)" % (`self.__classname`, `self.__enumname`, `self.__value`) def __str__(self): return "%s.%s" % (self.__classname, self.__enumname) def __cmp__(self, other): return cmp(self.__value, int(other)) # Create the base class for enumerations. # It is an empty enumeration. Enum = EnumMetaClass("Enum", (), {}) def _test(): class Color(Enum): red = 1 green = 2 blue = 3 print Color.red print dir(Color) print Color.red == Color.red print Color.red == Color.blue print Color.red == 1 print Color.red == 2 class ExtendedColor(Color): white = 0 orange = 4 yellow = 5 purple = 6 black = 7 print ExtendedColor.orange print ExtendedColor.red print Color.red == ExtendedColor.red class OtherColor(Enum): white = 4 blue = 5 class MergedColor(Color, OtherColor): pass print MergedColor.red print MergedColor.white print Color print ExtendedColor print OtherColor print MergedColor if __name__ == '__main__': _test() Python-2.3.7/Demo/metaclasses/Meta.py0000644001241000117560000000557507230625446016724 0ustar loewishpifb6"""Generic metaclass. XXX This is very much a work in progress. """ import types class MetaMethodWrapper: def __init__(self, func, inst): self.func = func self.inst = inst self.__name__ = self.func.__name__ def __call__(self, *args, **kw): return apply(self.func, (self.inst,) + args, kw) class MetaHelper: __methodwrapper__ = MetaMethodWrapper # For derived helpers to override def __helperinit__(self, formalclass): self.__formalclass__ = formalclass def __getattr__(self, name): # Invoked for any attr not in the instance's __dict__ try: raw = self.__formalclass__.__getattr__(name) except AttributeError: try: ga = self.__formalclass__.__getattr__('__usergetattr__') except (KeyError, AttributeError): raise AttributeError, name return ga(self, name) if type(raw) != types.FunctionType: return raw return self.__methodwrapper__(raw, self) class MetaClass: """A generic metaclass. This can be subclassed to implement various kinds of meta-behavior. """ __helper__ = MetaHelper # For derived metaclasses to override __inited = 0 def __init__(self, name, bases, dict): try: ga = dict['__getattr__'] except KeyError: pass else: dict['__usergetattr__'] = ga del dict['__getattr__'] self.__name__ = name self.__bases__ = bases self.__realdict__ = dict self.__inited = 1 def __getattr__(self, name): try: return self.__realdict__[name] except KeyError: for base in self.__bases__: try: return base.__getattr__(name) except AttributeError: pass raise AttributeError, name def __setattr__(self, name, value): if not self.__inited: self.__dict__[name] = value else: self.__realdict__[name] = value def __call__(self, *args, **kw): inst = self.__helper__() inst.__helperinit__(self) try: init = inst.__getattr__('__init__') except AttributeError: init = lambda: None apply(init, args, kw) return inst Meta = MetaClass('Meta', (), {}) def _test(): class C(Meta): def __init__(self, *args): print "__init__, args =", args def m1(self, x): print "m1(x=%s)" %`x` print C x = C() print x x.m1(12) class D(C): def __getattr__(self, name): if name[:2] == '__': raise AttributeError, name return "getattr:%s" % name x = D() print x.foo print x._foo ## print x.__foo ## print x.__foo__ if __name__ == '__main__': _test() Python-2.3.7/Demo/comparisons/0000755001241000117560000000000010765544471015506 5ustar loewishpifb6Python-2.3.7/Demo/comparisons/systemtest.py0000755001241000117560000000436007652015456020307 0ustar loewishpifb6#! /usr/bin/env python # 3) System Test # # Given a list of directories, report any bogus symbolic links contained # anywhere in those subtrees. A bogus symbolic link is one that cannot # be resolved because it points to a nonexistent or otherwise # unresolvable file. Do *not* use an external find executable. # Directories may be very very deep. Print a warning immediately if the # system you're running on doesn't support symbolic links. # This implementation: # - takes one optional argument, using the current directory as default # - uses chdir to increase performance # - sorts the names per directory # - prints output lines of the form "path1 -> path2" as it goes # - prints error messages about directories it can't list or chdir into import os import sys from stat import * def main(): try: # Note: can't test for presence of lstat -- it's always there dummy = os.readlink except AttributeError: print "This system doesn't have symbolic links" sys.exit(0) if sys.argv[1:]: prefix = sys.argv[1] else: prefix = '' if prefix: os.chdir(prefix) if prefix[-1:] != '/': prefix = prefix + '/' reportboguslinks(prefix) else: reportboguslinks('') def reportboguslinks(prefix): try: names = os.listdir('.') except os.error, msg: print "%s%s: can't list: %s" % (prefix, '.', msg) return names.sort() for name in names: if name == os.curdir or name == os.pardir: continue try: mode = os.lstat(name)[ST_MODE] except os.error: print "%s%s: can't stat: %s" % (prefix, name, msg) continue if S_ISLNK(mode): try: os.stat(name) except os.error: print "%s%s -> %s" % \ (prefix, name, os.readlink(name)) elif S_ISDIR(mode): try: os.chdir(name) except os.error, msg: print "%s%s: can't chdir: %s" % \ (prefix, name, msg) continue try: reportboguslinks(prefix + name + '/') finally: os.chdir('..') main() Python-2.3.7/Demo/comparisons/regextest.py0000755001241000117560000000271407652016474020077 0ustar loewishpifb6#! /usr/bin/env python # 1) Regular Expressions Test # # Read a file of (extended per egrep) regular expressions (one per line), # and apply those to all files whose names are listed on the command line. # Basically, an 'egrep -f' simulator. Test it with 20 "vt100" patterns # against a five /etc/termcap files. Tests using more elaborate patters # would also be interesting. Your code should not break if given hundreds # of regular expressions or binary files to scan. # This implementation: # - combines all patterns into a single one using ( ... | ... | ... ) # - reads patterns from stdin, scans files given as command line arguments # - produces output in the format :: # - is only about 2.5 times as slow as egrep (though I couldn't run # Tom's test -- this system, a vanilla SGI, only has /etc/terminfo) import string import sys import re def main(): pats = map(chomp, sys.stdin.readlines()) bigpat = '(' + '|'.join(pats) + ')' prog = re.compile(bigpat) for file in sys.argv[1:]: try: fp = open(file, 'r') except IOError, msg: print "%s: %s" % (file, msg) continue lineno = 0 while 1: line = fp.readline() if not line: break lineno = lineno + 1 if prog.search(line): print "%s:%s:%s" % (file, lineno, line), def chomp(s): return s.rstrip('\n') main() Python-2.3.7/Demo/comparisons/sortingtest.py0000755001241000117560000000253607652016104020442 0ustar loewishpifb6#! /usr/bin/env python # 2) Sorting Test # # Sort an input file that consists of lines like this # # var1=23 other=14 ditto=23 fred=2 # # such that each output line is sorted WRT to the number. Order # of output lines does not change. Resolve collisions using the # variable name. e.g. # # fred=2 other=14 ditto=23 var1=23 # # Lines may be up to several kilobytes in length and contain # zillions of variables. # This implementation: # - Reads stdin, writes stdout # - Uses any amount of whitespace to separate fields # - Allows signed numbers # - Treats illegally formatted fields as field=0 # - Outputs the sorted fields with exactly one space between them # - Handles blank input lines correctly import re import string import sys def main(): prog = re.compile('^(.*)=([-+]?[0-9]+)') def makekey(item, prog=prog): match = prog.match(item) if match: var, num = match.group(1, 2) return string.atoi(num), var else: # Bad input -- pretend it's a var with value 0 return 0, item while 1: line = sys.stdin.readline() if not line: break items = line.split() items = map(makekey, items) items.sort() for num, var in items: print "%s=%s" % (var, num), print main() Python-2.3.7/Demo/comparisons/README0000644001241000117560000000444005742214452016360 0ustar loewishpifb6Subject: Re: What language would you use? From: Tom Christiansen Date: 6 Nov 1994 15:14:51 GMT Newsgroups: comp.lang.python,comp.lang.tcl,comp.lang.scheme,comp.lang.misc,comp.lang.perl Message-Id: <39irtb$3t4@csnews.cs.Colorado.EDU> References: <39b7ha$j9v@zeno.nscf.org> <39hhjp$lgn@csnews.cs.Colorado.EDU> <39hvsu$dus@mathserv.mps.ohio-state.edu> [...] If you're really into benchmarks, I'd love it if someone were to code up the following problems in tcl, python, and scheme (and whatever else you'd like). Separate versions (one optimized for speed, one for beauty :-) are ok. Post your code so we can time it on our own systems. 0) Factorial Test (numerics and function calls) (we did this already) 1) Regular Expressions Test Read a file of (extended per egrep) regular expressions (one per line), and apply those to all files whose names are listed on the command line. Basically, an 'egrep -f' simulator. Test it with 20 "vt100" patterns against a five /etc/termcap files. Tests using more elaborate patters would also be interesting. Your code should not break if given hundreds of regular expressions or binary files to scan. 2) Sorting Test Sort an input file that consists of lines like this var1=23 other=14 ditto=23 fred=2 such that each output line is sorted WRT to the number. Order of output lines does not change. Resolve collisions using the variable name. e.g. fred=2 other=14 ditto=23 var1=23 Lines may be up to several kilobytes in length and contain zillions of variables. 3) System Test Given a list of directories, report any bogus symbolic links contained anywhere in those subtrees. A bogus symbolic link is one that cannot be resolved because it points to a nonexistent or otherwise unresolvable file. Do *not* use an external find executable. Directories may be very very deep. Print a warning immediately if the system you're running on doesn't support symbolic links. I'll post perl solutions if people post the others. --tom -- Tom Christiansen Perl Consultant, Gamer, Hiker tchrist@mox.perl.com "But Billy! A *small* allowance prepares you for a lifetime of small salaries and for your Social Security payments." --Family Circus Python-2.3.7/Demo/comparisons/patterns0000755001241000117560000000003605742214452017263 0ustar loewishpifb6^def ^class ^import ^from Python-2.3.7/Demo/README0000644001241000117560000000402307554025177014027 0ustar loewishpifb6This directory contains various demonstrations of what you can do with Python. They were all written by me except where explicitly stated otherwise -- in general, demos contributed by others ends up in the ../Contrib directory, unless I think they're of utmost general importance (like Matt Conway's Tk demos). A fair number of utilities that are useful when while developing Python code can be found in the ../Tools directory -- some of these can also be considered good examples of how to write Python code. Finally, in order to save disk space and net bandwidth, not all subdirectories listed here are distributed. They are listed just in case I change my mind about them. cgi CGI examples (see also ../Tools/faqwiz/.) classes Some examples of how to use classes. comparisons A set of responses to a really old language-comparison challenge. curses A set of curses demos. embed An example of embedding Python in another application (see also pysvr). imputil Demonstration subclasses of imputil.Importer. md5test Test program for the optional md5 module. metaclasses The code from the 1.5 metaclasses paper on the web. parser Example using the parser module. pdist Old, unfinished code messing with CVS, RCS and remote files. pysvr An example of embedding Python in a threaded application. rpc A set of classes for building clients and servers for Sun RPC. scripts Some useful Python scripts that I put in my bin directory. No optional built-in modules needed. sockets Examples for the new built-in module 'socket'. threads Demos that use the 'thread' module. (Currently these only run on SGIs, but this may change in the future.) tix Demos using the Tix widget set addition to Tkinter. tkinter Demos using the Tk interface (including Matt Conway's excellent set of demos). xml Some XML demos. xmlrpc XML-RPC server framework (but see the standard library module SimpleXMLRPCServer.py for a replacement). zlib Some demos for the zlib module (see also the standard library module gzip.py). Python-2.3.7/Demo/parser/0000755001241000117560000000000010765544470014444 5ustar loewishpifb6Python-2.3.7/Demo/parser/example.py0000644001241000117560000001313207015343744016444 0ustar loewishpifb6"""Simple code to extract class & function docstrings from a module. This code is used as an example in the library reference manual in the section on using the parser module. Refer to the manual for a thorough discussion of the operation of this code. """ import os import parser import symbol import token import types from types import ListType, TupleType def get_docs(fileName): """Retrieve information from the parse tree of a source file. fileName Name of the file to read Python source code from. """ source = open(fileName).read() basename = os.path.basename(os.path.splitext(fileName)[0]) ast = parser.suite(source) return ModuleInfo(ast.totuple(), basename) class SuiteInfoBase: _docstring = '' _name = '' def __init__(self, tree = None): self._class_info = {} self._function_info = {} if tree: self._extract_info(tree) def _extract_info(self, tree): # extract docstring if len(tree) == 2: found, vars = match(DOCSTRING_STMT_PATTERN[1], tree[1]) else: found, vars = match(DOCSTRING_STMT_PATTERN, tree[3]) if found: self._docstring = eval(vars['docstring']) # discover inner definitions for node in tree[1:]: found, vars = match(COMPOUND_STMT_PATTERN, node) if found: cstmt = vars['compound'] if cstmt[0] == symbol.funcdef: name = cstmt[2][1] self._function_info[name] = FunctionInfo(cstmt) elif cstmt[0] == symbol.classdef: name = cstmt[2][1] self._class_info[name] = ClassInfo(cstmt) def get_docstring(self): return self._docstring def get_name(self): return self._name def get_class_names(self): return self._class_info.keys() def get_class_info(self, name): return self._class_info[name] def __getitem__(self, name): try: return self._class_info[name] except KeyError: return self._function_info[name] class SuiteFuncInfo: # Mixin class providing access to function names and info. def get_function_names(self): return self._function_info.keys() def get_function_info(self, name): return self._function_info[name] class FunctionInfo(SuiteInfoBase, SuiteFuncInfo): def __init__(self, tree = None): self._name = tree[2][1] SuiteInfoBase.__init__(self, tree and tree[-1] or None) class ClassInfo(SuiteInfoBase): def __init__(self, tree = None): self._name = tree[2][1] SuiteInfoBase.__init__(self, tree and tree[-1] or None) def get_method_names(self): return self._function_info.keys() def get_method_info(self, name): return self._function_info[name] class ModuleInfo(SuiteInfoBase, SuiteFuncInfo): def __init__(self, tree = None, name = ""): self._name = name SuiteInfoBase.__init__(self, tree) if tree: found, vars = match(DOCSTRING_STMT_PATTERN, tree[1]) if found: self._docstring = vars["docstring"] def match(pattern, data, vars=None): """Match `data' to `pattern', with variable extraction. pattern Pattern to match against, possibly containing variables. data Data to be checked and against which variables are extracted. vars Dictionary of variables which have already been found. If not provided, an empty dictionary is created. The `pattern' value may contain variables of the form ['varname'] which are allowed to match anything. The value that is matched is returned as part of a dictionary which maps 'varname' to the matched value. 'varname' is not required to be a string object, but using strings makes patterns and the code which uses them more readable. This function returns two values: a boolean indicating whether a match was found and a dictionary mapping variable names to their associated values. """ if vars is None: vars = {} if type(pattern) is ListType: # 'variables' are ['varname'] vars[pattern[0]] = data return 1, vars if type(pattern) is not TupleType: return (pattern == data), vars if len(data) != len(pattern): return 0, vars for pattern, data in map(None, pattern, data): same, vars = match(pattern, data, vars) if not same: break return same, vars # This pattern identifies compound statements, allowing them to be readily # differentiated from simple statements. # COMPOUND_STMT_PATTERN = ( symbol.stmt, (symbol.compound_stmt, ['compound']) ) # This pattern will match a 'stmt' node which *might* represent a docstring; # docstrings require that the statement which provides the docstring be the # first statement in the class or function, which this pattern does not check. # DOCSTRING_STMT_PATTERN = ( symbol.stmt, (symbol.simple_stmt, (symbol.small_stmt, (symbol.expr_stmt, (symbol.testlist, (symbol.test, (symbol.and_test, (symbol.not_test, (symbol.comparison, (symbol.expr, (symbol.xor_expr, (symbol.and_expr, (symbol.shift_expr, (symbol.arith_expr, (symbol.term, (symbol.factor, (symbol.power, (symbol.atom, (token.STRING, ['docstring']) )))))))))))))))), (token.NEWLINE, '') )) Python-2.3.7/Demo/parser/FILES0000644001241000117560000000013306216004455015214 0ustar loewishpifb6Demo/parser Doc/libparser.tex Lib/AST.py Lib/symbol.py Lib/token.py Modules/parsermodule.c Python-2.3.7/Demo/parser/README0000644001241000117560000000134407175122217015316 0ustar loewishpifb6These files are from the large example of using the `parser' module. Refer to the Python Library Reference for more information. Files: ------ FILES -- list of files associated with the parser module. README -- this file. example.py -- module that uses the `parser' module to extract information from the parse tree of Python source code. docstring.py -- sample source file containing only a module docstring. simple.py -- sample source containing a "short form" definition. source.py -- sample source code used to demonstrate ability to handle nested constructs easily using the functions and classes in example.py. test_parser.py program to put the parser module through it's paces. Enjoy! Python-2.3.7/Demo/parser/simple.py0000644001241000117560000000003506210170331016262 0ustar loewishpifb6def f(): "maybe a docstring" Python-2.3.7/Demo/parser/test_parser.py0000755001241000117560000000225107151031113017330 0ustar loewishpifb6#! /usr/bin/env python # (Force the script to use the latest build.) # # test_parser.py import parser, traceback _numFailed = 0 def testChunk(t, fileName): global _numFailed print '----', fileName, try: ast = parser.suite(t) tup = parser.ast2tuple(ast) # this discards the first AST; a huge memory savings when running # against a large source file like Tkinter.py. ast = None new = parser.tuple2ast(tup) except parser.ParserError, err: print print 'parser module raised exception on input file', fileName + ':' traceback.print_exc() _numFailed = _numFailed + 1 else: if tup != parser.ast2tuple(new): print print 'parser module failed on input file', fileName _numFailed = _numFailed + 1 else: print 'o.k.' def testFile(fileName): t = open(fileName).read() testChunk(t, fileName) def test(): import sys args = sys.argv[1:] if not args: import glob args = glob.glob("*.py") args.sort() map(testFile, args) sys.exit(_numFailed != 0) if __name__ == '__main__': test() Python-2.3.7/Demo/parser/docstring.py0000644001241000117560000000003306206634505017000 0ustar loewishpifb6"""Some documentation. """ Python-2.3.7/Demo/parser/texipre.dat0000644001241000117560000001037406216004455016611 0ustar loewishpifb6\input texinfo @c -*-texinfo-*- @c %**start of header @setfilename parser.info @settitle Python Parser Module Reference @setchapternewpage odd @footnotestyle end @c %**end of header @ifinfo This file describes the interfaces published by the optional @code{parser} module and gives examples of how they may be used. It contains the same text as the chapter on the @code{parser} module in the @cite{Python Library Reference}, but is presented as a separate document. Copyright 1995-1996 by Fred L. Drake, Jr., Reston, Virginia, USA, and Virginia Polytechnic Institute and State University, Blacksburg, Virginia, USA. Portions of the software copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, The Netherlands. Copying is permitted under the terms associated with the main Python distribution, with the additional restriction that this additional notice be included and maintained on all distributed copies. All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the names of Fred L. Drake, Jr. and Virginia Polytechnic Institute and State University not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. FRED L. DRAKE, JR. AND VIRGINIA POLYTECHNIC INSTITUTE AND STATE UNIVERSITY DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL FRED L. DRAKE, JR. OR VIRGINIA POLYTECHNIC INSTITUTE AND STATE UNIVERSITY BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. @end ifinfo @titlepage @title Python Parser Module Reference @author Fred L. Drake, Jr. @c The following two commands start the copyright page. @page @vskip 0pt plus 1filll Copyright 1995-1996 by Fred L. Drake, Jr., Reston, Virginia, USA, and Virginia Polytechnic Institute and State University, Blacksburg, Virginia, USA. Portions of the software copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, The Netherlands. Copying is permitted under the terms associated with the main Python distribution, with the additional restriction that this additional notice be included and maintained on all distributed copies. @center All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the names of Fred L. Drake, Jr. and Virginia Polytechnic Institute and State University not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. FRED L. DRAKE, JR. AND VIRGINIA POLYTECHNIC INSTITUTE AND STATE UNIVERSITY DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL FRED L. DRAKE, JR. OR VIRGINIA POLYTECHNIC INSTITUTE AND STATE UNIVERSITY BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. @end titlepage @node Top, Overview, (dir), (dir) @top The Python Parser Module @ifinfo This file describes the interfaces published by the optional @code{parser} module and gives examples of how they may be used. It contains the same text as the chapter on the @code{parser} module in the @cite{Python Library Reference}, but is presented as a separate document. This version corresponds to Python version 1.4 (1 Sept. 1996). @end ifinfo @c placeholder for the master menu -- patched by texinfo-all-menus-update @menu @end menu Python-2.3.7/Demo/parser/source.py0000644001241000117560000000134506577243737016331 0ustar loewishpifb6"""Exmaple file to be parsed for the parsermodule example. The classes and functions in this module exist only to exhibit the ability of the handling information extraction from nested definitions using parse trees. They shouldn't interest you otherwise! """ class Simple: "This class does very little." def method(self): "This method does almost nothing." return 1 class Nested: "This is a nested class." def nested_method(self): "Method of Nested class." def nested_function(): "Function in method of Nested class." pass return nested_function def function(): "This function lives at the module level." return 0 Python-2.3.7/Demo/pysvr/0000755001241000117560000000000010765544470014333 5ustar loewishpifb6Python-2.3.7/Demo/pysvr/Makefile0000644001241000117560000000247507345501054015772 0ustar loewishpifb6# Makefile for 'pysvr' application embedding Python. # Tailored for Python 1.5a3 or later. # Some details are specific for Solaris or CNRI. # Also see ## comments for tailoring. # Which C compiler CC=gcc ##PURIFY=/usr/local/pure/purify LINKCC=$(PURIFY) $(CC) # Optimization preferences OPT=-g # Which Python version we're using VER=2.2 # Expressions using the above definitions PYVER=python$(VER) # Use these defs when compiling against installed Python ##INST=/usr/local ##PYC=$(INST)/lib/$(PYVER)/config ##PYINCL=-I$(INST)/include/$(PYVER) -I$(PYC) ##PYLIBS=$(PYC)/lib$(PYVER).a # Use these defs when compiling against built Python PLAT=linux PYINCL=-I../../Include -I../../$(PLAT) PYLIBS=../../$(PLAT)/lib$(PYVER).a # Libraries to link with -- very installation dependent # (See LIBS= in Modules/Makefile in build tree) RLLIBS=-lreadline -ltermcap OTHERLIBS=-lnsl -lpthread -ldl -lm -ldb -lutil # Compilation and link flags -- no need to change normally CFLAGS=$(OPT) CPPFLAGS=$(PYINCL) LIBS=$(PYLIBS) $(RLLIBS) $(OTHERLIBS) # Default port for the pysvr application PORT=4000 # Default target all: pysvr # Target to build pysvr pysvr: pysvr.o $(PYOBJS) $(PYLIBS) $(LINKCC) pysvr.o $(LIBS) -o pysvr # Target to build and run pysvr run: pysvr pysvr $(PORT) # Target to clean up the directory clean: -rm -f pysvr *.o *~ core Python-2.3.7/Demo/pysvr/README0000644001241000117560000000050506364225377015215 0ustar loewishpifb6This is an example of a multi-threaded C application embedding a Python interpreter. The particular application is a multi-threaded telnet-like server that provides you with a Python prompt (instead of a shell prompt). The file pysvr.py is a prototype in Python. THIS APPLICATION IS NOT SECURE -- ONLY USE IT FOR TESTING! Python-2.3.7/Demo/pysvr/pysvr.c0000644001241000117560000001623507437677362015702 0ustar loewishpifb6/* A multi-threaded telnet-like server that gives a Python prompt. Usage: pysvr [port] For security reasons, it only accepts requests from the current host. This can still be insecure, but restricts violations from people who can log in on your machine. Use with caution! */ #include #include #include #include #include #include #include #include #include #include /* XXX Umpfh. Python.h defines a typedef destructor, which conflicts with pthread.h. So Python.h must be included after pthread.h. */ #include "Python.h" extern int Py_VerboseFlag; #ifndef PORT #define PORT 4000 #endif struct workorder { int conn; struct sockaddr_in addr; }; /* Forward */ static void init_python(void); static void usage(void); static void oprogname(void); static void main_thread(int); static void create_thread(int, struct sockaddr_in *); static void *service_thread(struct workorder *); static void run_interpreter(FILE *, FILE *); static int run_command(char *, PyObject *); static void ps(void); static char *progname = "pysvr"; static PyThreadState *gtstate; main(int argc, char **argv) { int port = PORT; int c; if (argc > 0 && argv[0] != NULL && argv[0][0] != '\0') progname = argv[0]; while ((c = getopt(argc, argv, "v")) != EOF) { switch (c) { case 'v': Py_VerboseFlag++; break; default: usage(); } } if (optind < argc) { if (optind+1 < argc) { oprogname(); fprintf(stderr, "too many arguments\n"); usage(); } port = atoi(argv[optind]); if (port <= 0) { fprintf(stderr, "bad port (%s)\n", argv[optind]); usage(); } } main_thread(port); fprintf(stderr, "Bye.\n"); exit(0); } static char usage_line[] = "usage: %s [port]\n"; static void usage(void) { fprintf(stderr, usage_line, progname); exit(2); } static void main_thread(int port) { int sock, conn, size, i; struct sockaddr_in addr, clientaddr; sock = socket(PF_INET, SOCK_STREAM, 0); if (sock < 0) { oprogname(); perror("can't create socket"); exit(1); } #ifdef SO_REUSEADDR i = 1; setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (char *) &i, sizeof i); #endif memset((char *)&addr, '\0', sizeof addr); addr.sin_family = AF_INET; addr.sin_port = htons(port); addr.sin_addr.s_addr = 0L; if (bind(sock, (struct sockaddr *)&addr, sizeof addr) < 0) { oprogname(); perror("can't bind socket to address"); exit(1); } if (listen(sock, 5) < 0) { oprogname(); perror("can't listen on socket"); exit(1); } fprintf(stderr, "Listening on port %d...\n", port); for (i = 0; ; i++) { size = sizeof clientaddr; memset((char *) &clientaddr, '\0', size); conn = accept(sock, (struct sockaddr *) &clientaddr, &size); if (conn < 0) { oprogname(); perror("can't accept connection from socket"); exit(1); } size = sizeof addr; memset((char *) &addr, '\0', size); if (getsockname(conn, (struct sockaddr *)&addr, &size) < 0) { oprogname(); perror("can't get socket name of connection"); exit(1); } if (clientaddr.sin_addr.s_addr != addr.sin_addr.s_addr) { oprogname(); perror("connection from non-local host refused"); fprintf(stderr, "(addr=%lx, clientaddr=%lx)\n", ntohl(addr.sin_addr.s_addr), ntohl(clientaddr.sin_addr.s_addr)); close(conn); continue; } if (i == 4) { close(conn); break; } create_thread(conn, &clientaddr); } close(sock); if (gtstate) { PyEval_AcquireThread(gtstate); gtstate = NULL; Py_Finalize(); /* And a second time, just because we can. */ Py_Finalize(); /* This should be harmless. */ } exit(0); } static void create_thread(int conn, struct sockaddr_in *addr) { struct workorder *work; pthread_t tdata; work = malloc(sizeof(struct workorder)); if (work == NULL) { oprogname(); fprintf(stderr, "out of memory for thread.\n"); close(conn); return; } work->conn = conn; work->addr = *addr; init_python(); if (pthread_create(&tdata, NULL, (void *)service_thread, work) < 0) { oprogname(); perror("can't create new thread"); close(conn); return; } if (pthread_detach(tdata) < 0) { oprogname(); perror("can't detach from thread"); } } static PyThreadState *the_tstate; static PyInterpreterState *the_interp; static PyObject *the_builtins; static void init_python(void) { if (gtstate) return; Py_Initialize(); /* Initialize the interpreter */ PyEval_InitThreads(); /* Create (and acquire) the interpreter lock */ gtstate = PyEval_SaveThread(); /* Release the thread state */ } static void * service_thread(struct workorder *work) { FILE *input, *output; fprintf(stderr, "Start thread for connection %d.\n", work->conn); ps(); input = fdopen(work->conn, "r"); if (input == NULL) { oprogname(); perror("can't create input stream"); goto done; } output = fdopen(work->conn, "w"); if (output == NULL) { oprogname(); perror("can't create output stream"); fclose(input); goto done; } setvbuf(input, NULL, _IONBF, 0); setvbuf(output, NULL, _IONBF, 0); run_interpreter(input, output); fclose(input); fclose(output); done: fprintf(stderr, "End thread for connection %d.\n", work->conn); close(work->conn); free(work); } static void oprogname(void) { int save = errno; fprintf(stderr, "%s: ", progname); errno = save; } static void run_interpreter(FILE *input, FILE *output) { PyThreadState *tstate; PyObject *new_stdin, *new_stdout; PyObject *mainmod, *globals; char buffer[1000]; char *p, *q; int n, end; PyEval_AcquireLock(); tstate = Py_NewInterpreter(); if (tstate == NULL) { fprintf(output, "Sorry -- can't create an interpreter\n"); return; } mainmod = PyImport_AddModule("__main__"); globals = PyModule_GetDict(mainmod); Py_INCREF(globals); new_stdin = PyFile_FromFile(input, "", "r", NULL); new_stdout = PyFile_FromFile(output, "", "w", NULL); PySys_SetObject("stdin", new_stdin); PySys_SetObject("stdout", new_stdout); PySys_SetObject("stderr", new_stdout); for (n = 1; !PyErr_Occurred(); n++) { Py_BEGIN_ALLOW_THREADS fprintf(output, "%d> ", n); p = fgets(buffer, sizeof buffer, input); Py_END_ALLOW_THREADS if (p == NULL) break; if (p[0] == '\377' && p[1] == '\354') break; q = strrchr(p, '\r'); if (q && q[1] == '\n' && q[2] == '\0') { *q++ = '\n'; *q++ = '\0'; } while (*p && isspace(*p)) p++; if (p[0] == '#' || p[0] == '\0') continue; end = run_command(buffer, globals); if (end < 0) PyErr_Print(); if (end) break; } Py_XDECREF(globals); Py_XDECREF(new_stdin); Py_XDECREF(new_stdout); Py_EndInterpreter(tstate); PyEval_ReleaseLock(); fprintf(output, "Goodbye!\n"); } static int run_command(char *buffer, PyObject *globals) { PyObject *m, *d, *v; fprintf(stderr, "run_command: %s", buffer); if (strchr(buffer, '\n') == NULL) fprintf(stderr, "\n"); v = PyRun_String(buffer, Py_single_input, globals, globals); if (v == NULL) { if (PyErr_Occurred() == PyExc_SystemExit) { PyErr_Clear(); return 1; } PyErr_Print(); return 0; } Py_DECREF(v); return 0; } static void ps(void) { char buffer[100]; PyOS_snprintf(buffer, sizeof(buffer), "ps -l -p %d 1: raise getopt.error, "Too many arguments." except getopt.error, msg: usage(msg) for o, a in opts: pass if args: try: port = string.atoi(args[0]) except ValueError, msg: usage(msg) else: port = PORT main_thread(port) def usage(msg=None): sys.stdout = sys.stderr if msg: print msg print "\n", __doc__, sys.exit(2) def main_thread(port): sock = socket.socket(socket.AF_INET, socket.SOCK_STREAM) sock.bind(("", port)) sock.listen(5) print "Listening on port", port, "..." while 1: (conn, addr) = sock.accept() if addr[0] != conn.getsockname()[0]: conn.close() print "Refusing connection from non-local host", addr[0], "." continue thread.start_new_thread(service_thread, (conn, addr)) del conn, addr def service_thread(conn, addr): (caddr, cport) = addr print "Thread %s has connection from %s.\n" % (str(thread.get_ident()), caddr), stdin = conn.makefile("r") stdout = conn.makefile("w", 0) run_interpreter(stdin, stdout) print "Thread %s is done.\n" % str(thread.get_ident()), def run_interpreter(stdin, stdout): globals = {} try: str(sys.ps1) except: sys.ps1 = ">>> " source = "" while 1: stdout.write(sys.ps1) line = stdin.readline() if line[:2] == '\377\354': line = "" if not line and not source: break if line[-2:] == '\r\n': line = line[:-2] + '\n' source = source + line try: code = compile_command(source) except SyntaxError, err: source = "" traceback.print_exception(SyntaxError, err, None, file=stdout) continue if not code: continue source = "" try: run_command(code, stdin, stdout, globals) except SystemExit, how: if how: try: how = str(how) except: how = "" stdout.write("Exit %s\n" % how) break stdout.write("\nGoodbye.\n") def run_command(code, stdin, stdout, globals): save = sys.stdin, sys.stdout, sys.stderr try: sys.stdout = sys.stderr = stdout sys.stdin = stdin try: exec code in globals except SystemExit, how: raise SystemExit, how, sys.exc_info()[2] except: type, value, tb = sys.exc_info() if tb: tb = tb.tb_next traceback.print_exception(type, value, tb) del tb finally: sys.stdin, sys.stdout, sys.stderr = save from code import compile_command main() Python-2.3.7/Demo/rpc/0000755001241000117560000000000010765544470013734 5ustar loewishpifb6Python-2.3.7/Demo/rpc/rpc.py0000644001241000117560000005511106174310562015065 0ustar loewishpifb6# Sun RPC version 2 -- RFC1057. # XXX There should be separate exceptions for the various reasons why # XXX an RPC can fail, rather than using RuntimeError for everything # XXX The UDP version of the protocol resends requests when it does # XXX not receive a timely reply -- use only for idempotent calls! # XXX There is no provision for call timeout on TCP connections import xdr import socket import os RPCVERSION = 2 CALL = 0 REPLY = 1 AUTH_NULL = 0 AUTH_UNIX = 1 AUTH_SHORT = 2 AUTH_DES = 3 MSG_ACCEPTED = 0 MSG_DENIED = 1 SUCCESS = 0 # RPC executed successfully PROG_UNAVAIL = 1 # remote hasn't exported program PROG_MISMATCH = 2 # remote can't support version # PROC_UNAVAIL = 3 # program can't support procedure GARBAGE_ARGS = 4 # procedure can't decode params RPC_MISMATCH = 0 # RPC version number != 2 AUTH_ERROR = 1 # remote can't authenticate caller AUTH_BADCRED = 1 # bad credentials (seal broken) AUTH_REJECTEDCRED = 2 # client must begin new session AUTH_BADVERF = 3 # bad verifier (seal broken) AUTH_REJECTEDVERF = 4 # verifier expired or replayed AUTH_TOOWEAK = 5 # rejected for security reasons class Packer(xdr.Packer): def pack_auth(self, auth): flavor, stuff = auth self.pack_enum(flavor) self.pack_opaque(stuff) def pack_auth_unix(self, stamp, machinename, uid, gid, gids): self.pack_uint(stamp) self.pack_string(machinename) self.pack_uint(uid) self.pack_uint(gid) self.pack_uint(len(gids)) for i in gids: self.pack_uint(i) def pack_callheader(self, xid, prog, vers, proc, cred, verf): self.pack_uint(xid) self.pack_enum(CALL) self.pack_uint(RPCVERSION) self.pack_uint(prog) self.pack_uint(vers) self.pack_uint(proc) self.pack_auth(cred) self.pack_auth(verf) # Caller must add procedure-specific part of call def pack_replyheader(self, xid, verf): self.pack_uint(xid) self.pack_enum(REPLY) self.pack_uint(MSG_ACCEPTED) self.pack_auth(verf) self.pack_enum(SUCCESS) # Caller must add procedure-specific part of reply # Exceptions BadRPCFormat = 'rpc.BadRPCFormat' BadRPCVersion = 'rpc.BadRPCVersion' GarbageArgs = 'rpc.GarbageArgs' class Unpacker(xdr.Unpacker): def unpack_auth(self): flavor = self.unpack_enum() stuff = self.unpack_opaque() return (flavor, stuff) def unpack_callheader(self): xid = self.unpack_uint(xid) temp = self.unpack_enum() if temp <> CALL: raise BadRPCFormat, 'no CALL but ' + `temp` temp = self.unpack_uint() if temp <> RPCVERSION: raise BadRPCVerspion, 'bad RPC version ' + `temp` prog = self.unpack_uint() vers = self.unpack_uint() proc = self.unpack_uint() cred = self.unpack_auth() verf = self.unpack_auth() return xid, prog, vers, proc, cred, verf # Caller must add procedure-specific part of call def unpack_replyheader(self): xid = self.unpack_uint() mtype = self.unpack_enum() if mtype <> REPLY: raise RuntimeError, 'no REPLY but ' + `mtype` stat = self.unpack_enum() if stat == MSG_DENIED: stat = self.unpack_enum() if stat == RPC_MISMATCH: low = self.unpack_uint() high = self.unpack_uint() raise RuntimeError, \ 'MSG_DENIED: RPC_MISMATCH: ' + `low, high` if stat == AUTH_ERROR: stat = self.unpack_uint() raise RuntimeError, \ 'MSG_DENIED: AUTH_ERROR: ' + `stat` raise RuntimeError, 'MSG_DENIED: ' + `stat` if stat <> MSG_ACCEPTED: raise RuntimeError, \ 'Neither MSG_DENIED nor MSG_ACCEPTED: ' + `stat` verf = self.unpack_auth() stat = self.unpack_enum() if stat == PROG_UNAVAIL: raise RuntimeError, 'call failed: PROG_UNAVAIL' if stat == PROG_MISMATCH: low = self.unpack_uint() high = self.unpack_uint() raise RuntimeError, \ 'call failed: PROG_MISMATCH: ' + `low, high` if stat == PROC_UNAVAIL: raise RuntimeError, 'call failed: PROC_UNAVAIL' if stat == GARBAGE_ARGS: raise RuntimeError, 'call failed: GARBAGE_ARGS' if stat <> SUCCESS: raise RuntimeError, 'call failed: ' + `stat` return xid, verf # Caller must get procedure-specific part of reply # Subroutines to create opaque authentication objects def make_auth_null(): return '' def make_auth_unix(seed, host, uid, gid, groups): p = Packer() p.pack_auth_unix(seed, host, uid, gid, groups) return p.get_buf() def make_auth_unix_default(): try: from os import getuid, getgid uid = getuid() gid = getgid() except ImportError: uid = gid = 0 import time return make_auth_unix(int(time.time()-unix_epoch()), \ socket.gethostname(), uid, gid, []) _unix_epoch = -1 def unix_epoch(): """Very painful calculation of when the Unix Epoch is. This is defined as the return value of time.time() on Jan 1st, 1970, 00:00:00 GMT. On a Unix system, this should always return 0.0. On a Mac, the calculations are needed -- and hard because of integer overflow and other limitations. """ global _unix_epoch if _unix_epoch >= 0: return _unix_epoch import time now = time.time() localt = time.localtime(now) # (y, m, d, hh, mm, ss, ..., ..., ...) gmt = time.gmtime(now) offset = time.mktime(localt) - time.mktime(gmt) y, m, d, hh, mm, ss = 1970, 1, 1, 0, 0, 0 offset, ss = divmod(ss + offset, 60) offset, mm = divmod(mm + offset, 60) offset, hh = divmod(hh + offset, 24) d = d + offset _unix_epoch = time.mktime((y, m, d, hh, mm, ss, 0, 0, 0)) print "Unix epoch:", time.ctime(_unix_epoch) return _unix_epoch # Common base class for clients class Client: def __init__(self, host, prog, vers, port): self.host = host self.prog = prog self.vers = vers self.port = port self.makesocket() # Assigns to self.sock self.bindsocket() self.connsocket() self.lastxid = 0 # XXX should be more random? self.addpackers() self.cred = None self.verf = None def close(self): self.sock.close() def makesocket(self): # This MUST be overridden raise RuntimeError, 'makesocket not defined' def connsocket(self): # Override this if you don't want/need a connection self.sock.connect((self.host, self.port)) def bindsocket(self): # Override this to bind to a different port (e.g. reserved) self.sock.bind(('', 0)) def addpackers(self): # Override this to use derived classes from Packer/Unpacker self.packer = Packer() self.unpacker = Unpacker('') def make_call(self, proc, args, pack_func, unpack_func): # Don't normally override this (but see Broadcast) if pack_func is None and args is not None: raise TypeError, 'non-null args with null pack_func' self.start_call(proc) if pack_func: pack_func(args) self.do_call() if unpack_func: result = unpack_func() else: result = None self.unpacker.done() return result def start_call(self, proc): # Don't override this self.lastxid = xid = self.lastxid + 1 cred = self.mkcred() verf = self.mkverf() p = self.packer p.reset() p.pack_callheader(xid, self.prog, self.vers, proc, cred, verf) def do_call(self): # This MUST be overridden raise RuntimeError, 'do_call not defined' def mkcred(self): # Override this to use more powerful credentials if self.cred == None: self.cred = (AUTH_NULL, make_auth_null()) return self.cred def mkverf(self): # Override this to use a more powerful verifier if self.verf == None: self.verf = (AUTH_NULL, make_auth_null()) return self.verf def call_0(self): # Procedure 0 is always like this return self.make_call(0, None, None, None) # Record-Marking standard support def sendfrag(sock, last, frag): x = len(frag) if last: x = x | 0x80000000L header = (chr(int(x>>24 & 0xff)) + chr(int(x>>16 & 0xff)) + \ chr(int(x>>8 & 0xff)) + chr(int(x & 0xff))) sock.send(header + frag) def sendrecord(sock, record): sendfrag(sock, 1, record) def recvfrag(sock): header = sock.recv(4) if len(header) < 4: raise EOFError x = long(ord(header[0]))<<24 | ord(header[1])<<16 | \ ord(header[2])<<8 | ord(header[3]) last = ((x & 0x80000000) != 0) n = int(x & 0x7fffffff) frag = '' while n > 0: buf = sock.recv(n) if not buf: raise EOFError n = n - len(buf) frag = frag + buf return last, frag def recvrecord(sock): record = '' last = 0 while not last: last, frag = recvfrag(sock) record = record + frag return record # Try to bind to a reserved port (must be root) last_resv_port_tried = None def bindresvport(sock, host): global last_resv_port_tried FIRST, LAST = 600, 1024 # Range of ports to try if last_resv_port_tried == None: import os last_resv_port_tried = FIRST + os.getpid() % (LAST-FIRST) for i in range(last_resv_port_tried, LAST) + \ range(FIRST, last_resv_port_tried): last_resv_port_tried = i try: sock.bind((host, i)) return last_resv_port_tried except socket.error, (errno, msg): if errno <> 114: raise socket.error, (errno, msg) raise RuntimeError, 'can\'t assign reserved port' # Client using TCP to a specific port class RawTCPClient(Client): def makesocket(self): self.sock = socket.socket(socket.AF_INET, socket.SOCK_STREAM) def do_call(self): call = self.packer.get_buf() sendrecord(self.sock, call) reply = recvrecord(self.sock) u = self.unpacker u.reset(reply) xid, verf = u.unpack_replyheader() if xid <> self.lastxid: # Can't really happen since this is TCP... raise RuntimeError, 'wrong xid in reply ' + `xid` + \ ' instead of ' + `self.lastxid` # Client using UDP to a specific port class RawUDPClient(Client): def makesocket(self): self.sock = socket.socket(socket.AF_INET, socket.SOCK_DGRAM) def do_call(self): call = self.packer.get_buf() self.sock.send(call) try: from select import select except ImportError: print 'WARNING: select not found, RPC may hang' select = None BUFSIZE = 8192 # Max UDP buffer size timeout = 1 count = 5 while 1: r, w, x = [self.sock], [], [] if select: r, w, x = select(r, w, x, timeout) if self.sock not in r: count = count - 1 if count < 0: raise RuntimeError, 'timeout' if timeout < 25: timeout = timeout *2 ## print 'RESEND', timeout, count self.sock.send(call) continue reply = self.sock.recv(BUFSIZE) u = self.unpacker u.reset(reply) xid, verf = u.unpack_replyheader() if xid <> self.lastxid: ## print 'BAD xid' continue break # Client using UDP broadcast to a specific port class RawBroadcastUDPClient(RawUDPClient): def __init__(self, bcastaddr, prog, vers, port): RawUDPClient.__init__(self, bcastaddr, prog, vers, port) self.reply_handler = None self.timeout = 30 def connsocket(self): # Don't connect -- use sendto self.sock.setsockopt(socket.SOL_SOCKET, socket.SO_BROADCAST, 1) def set_reply_handler(self, reply_handler): self.reply_handler = reply_handler def set_timeout(self, timeout): self.timeout = timeout # Use None for infinite timeout def make_call(self, proc, args, pack_func, unpack_func): if pack_func is None and args is not None: raise TypeError, 'non-null args with null pack_func' self.start_call(proc) if pack_func: pack_func(args) call = self.packer.get_buf() self.sock.sendto(call, (self.host, self.port)) try: from select import select except ImportError: print 'WARNING: select not found, broadcast will hang' select = None BUFSIZE = 8192 # Max UDP buffer size (for reply) replies = [] if unpack_func is None: def dummy(): pass unpack_func = dummy while 1: r, w, x = [self.sock], [], [] if select: if self.timeout is None: r, w, x = select(r, w, x) else: r, w, x = select(r, w, x, self.timeout) if self.sock not in r: break reply, fromaddr = self.sock.recvfrom(BUFSIZE) u = self.unpacker u.reset(reply) xid, verf = u.unpack_replyheader() if xid <> self.lastxid: ## print 'BAD xid' continue reply = unpack_func() self.unpacker.done() replies.append((reply, fromaddr)) if self.reply_handler: self.reply_handler(reply, fromaddr) return replies # Port mapper interface # Program number, version and (fixed!) port number PMAP_PROG = 100000 PMAP_VERS = 2 PMAP_PORT = 111 # Procedure numbers PMAPPROC_NULL = 0 # (void) -> void PMAPPROC_SET = 1 # (mapping) -> bool PMAPPROC_UNSET = 2 # (mapping) -> bool PMAPPROC_GETPORT = 3 # (mapping) -> unsigned int PMAPPROC_DUMP = 4 # (void) -> pmaplist PMAPPROC_CALLIT = 5 # (call_args) -> call_result # A mapping is (prog, vers, prot, port) and prot is one of: IPPROTO_TCP = 6 IPPROTO_UDP = 17 # A pmaplist is a variable-length list of mappings, as follows: # either (1, mapping, pmaplist) or (0). # A call_args is (prog, vers, proc, args) where args is opaque; # a call_result is (port, res) where res is opaque. class PortMapperPacker(Packer): def pack_mapping(self, mapping): prog, vers, prot, port = mapping self.pack_uint(prog) self.pack_uint(vers) self.pack_uint(prot) self.pack_uint(port) def pack_pmaplist(self, list): self.pack_list(list, self.pack_mapping) def pack_call_args(self, ca): prog, vers, proc, args = ca self.pack_uint(prog) self.pack_uint(vers) self.pack_uint(proc) self.pack_opaque(args) class PortMapperUnpacker(Unpacker): def unpack_mapping(self): prog = self.unpack_uint() vers = self.unpack_uint() prot = self.unpack_uint() port = self.unpack_uint() return prog, vers, prot, port def unpack_pmaplist(self): return self.unpack_list(self.unpack_mapping) def unpack_call_result(self): port = self.unpack_uint() res = self.unpack_opaque() return port, res class PartialPortMapperClient: def addpackers(self): self.packer = PortMapperPacker() self.unpacker = PortMapperUnpacker('') def Set(self, mapping): return self.make_call(PMAPPROC_SET, mapping, \ self.packer.pack_mapping, \ self.unpacker.unpack_uint) def Unset(self, mapping): return self.make_call(PMAPPROC_UNSET, mapping, \ self.packer.pack_mapping, \ self.unpacker.unpack_uint) def Getport(self, mapping): return self.make_call(PMAPPROC_GETPORT, mapping, \ self.packer.pack_mapping, \ self.unpacker.unpack_uint) def Dump(self): return self.make_call(PMAPPROC_DUMP, None, \ None, \ self.unpacker.unpack_pmaplist) def Callit(self, ca): return self.make_call(PMAPPROC_CALLIT, ca, \ self.packer.pack_call_args, \ self.unpacker.unpack_call_result) class TCPPortMapperClient(PartialPortMapperClient, RawTCPClient): def __init__(self, host): RawTCPClient.__init__(self, \ host, PMAP_PROG, PMAP_VERS, PMAP_PORT) class UDPPortMapperClient(PartialPortMapperClient, RawUDPClient): def __init__(self, host): RawUDPClient.__init__(self, \ host, PMAP_PROG, PMAP_VERS, PMAP_PORT) class BroadcastUDPPortMapperClient(PartialPortMapperClient, \ RawBroadcastUDPClient): def __init__(self, bcastaddr): RawBroadcastUDPClient.__init__(self, \ bcastaddr, PMAP_PROG, PMAP_VERS, PMAP_PORT) # Generic clients that find their server through the Port mapper class TCPClient(RawTCPClient): def __init__(self, host, prog, vers): pmap = TCPPortMapperClient(host) port = pmap.Getport((prog, vers, IPPROTO_TCP, 0)) pmap.close() if port == 0: raise RuntimeError, 'program not registered' RawTCPClient.__init__(self, host, prog, vers, port) class UDPClient(RawUDPClient): def __init__(self, host, prog, vers): pmap = UDPPortMapperClient(host) port = pmap.Getport((prog, vers, IPPROTO_UDP, 0)) pmap.close() if port == 0: raise RuntimeError, 'program not registered' RawUDPClient.__init__(self, host, prog, vers, port) class BroadcastUDPClient(Client): def __init__(self, bcastaddr, prog, vers): self.pmap = BroadcastUDPPortMapperClient(bcastaddr) self.pmap.set_reply_handler(self.my_reply_handler) self.prog = prog self.vers = vers self.user_reply_handler = None self.addpackers() def close(self): self.pmap.close() def set_reply_handler(self, reply_handler): self.user_reply_handler = reply_handler def set_timeout(self, timeout): self.pmap.set_timeout(timeout) def my_reply_handler(self, reply, fromaddr): port, res = reply self.unpacker.reset(res) result = self.unpack_func() self.unpacker.done() self.replies.append((result, fromaddr)) if self.user_reply_handler is not None: self.user_reply_handler(result, fromaddr) def make_call(self, proc, args, pack_func, unpack_func): self.packer.reset() if pack_func: pack_func(args) if unpack_func is None: def dummy(): pass self.unpack_func = dummy else: self.unpack_func = unpack_func self.replies = [] packed_args = self.packer.get_buf() dummy_replies = self.pmap.Callit( \ (self.prog, self.vers, proc, packed_args)) return self.replies # Server classes # These are not symmetric to the Client classes # XXX No attempt is made to provide authorization hooks yet class Server: def __init__(self, host, prog, vers, port): self.host = host # Should normally be '' for default interface self.prog = prog self.vers = vers self.port = port # Should normally be 0 for random port self.makesocket() # Assigns to self.sock and self.prot self.bindsocket() self.host, self.port = self.sock.getsockname() self.addpackers() def register(self): mapping = self.prog, self.vers, self.prot, self.port p = TCPPortMapperClient(self.host) if not p.Set(mapping): raise RuntimeError, 'register failed' def unregister(self): mapping = self.prog, self.vers, self.prot, self.port p = TCPPortMapperClient(self.host) if not p.Unset(mapping): raise RuntimeError, 'unregister failed' def handle(self, call): # Don't use unpack_header but parse the header piecewise # XXX I have no idea if I am using the right error responses! self.unpacker.reset(call) self.packer.reset() xid = self.unpacker.unpack_uint() self.packer.pack_uint(xid) temp = self.unpacker.unpack_enum() if temp <> CALL: return None # Not worthy of a reply self.packer.pack_uint(REPLY) temp = self.unpacker.unpack_uint() if temp <> RPCVERSION: self.packer.pack_uint(MSG_DENIED) self.packer.pack_uint(RPC_MISMATCH) self.packer.pack_uint(RPCVERSION) self.packer.pack_uint(RPCVERSION) return self.packer.get_buf() self.packer.pack_uint(MSG_ACCEPTED) self.packer.pack_auth((AUTH_NULL, make_auth_null())) prog = self.unpacker.unpack_uint() if prog <> self.prog: self.packer.pack_uint(PROG_UNAVAIL) return self.packer.get_buf() vers = self.unpacker.unpack_uint() if vers <> self.vers: self.packer.pack_uint(PROG_MISMATCH) self.packer.pack_uint(self.vers) self.packer.pack_uint(self.vers) return self.packer.get_buf() proc = self.unpacker.unpack_uint() methname = 'handle_' + `proc` try: meth = getattr(self, methname) except AttributeError: self.packer.pack_uint(PROC_UNAVAIL) return self.packer.get_buf() cred = self.unpacker.unpack_auth() verf = self.unpacker.unpack_auth() try: meth() # Unpack args, call turn_around(), pack reply except (EOFError, GarbageArgs): # Too few or too many arguments self.packer.reset() self.packer.pack_uint(xid) self.packer.pack_uint(REPLY) self.packer.pack_uint(MSG_ACCEPTED) self.packer.pack_auth((AUTH_NULL, make_auth_null())) self.packer.pack_uint(GARBAGE_ARGS) return self.packer.get_buf() def turn_around(self): try: self.unpacker.done() except RuntimeError: raise GarbageArgs self.packer.pack_uint(SUCCESS) def handle_0(self): # Handle NULL message self.turn_around() def makesocket(self): # This MUST be overridden raise RuntimeError, 'makesocket not defined' def bindsocket(self): # Override this to bind to a different port (e.g. reserved) self.sock.bind((self.host, self.port)) def addpackers(self): # Override this to use derived classes from Packer/Unpacker self.packer = Packer() self.unpacker = Unpacker('') class TCPServer(Server): def makesocket(self): self.sock = socket.socket(socket.AF_INET, socket.SOCK_STREAM) self.prot = IPPROTO_TCP def loop(self): self.sock.listen(0) while 1: self.session(self.sock.accept()) def session(self, connection): sock, (host, port) = connection while 1: try: call = recvrecord(sock) except EOFError: break except socket.error, msg: print 'socket error:', msg break reply = self.handle(call) if reply is not None: sendrecord(sock, reply) def forkingloop(self): # Like loop but uses forksession() self.sock.listen(0) while 1: self.forksession(self.sock.accept()) def forksession(self, connection): # Like session but forks off a subprocess import os # Wait for deceased children try: while 1: pid, sts = os.waitpid(0, 1) except os.error: pass pid = None try: pid = os.fork() if pid: # Parent connection[0].close() return # Child self.session(connection) finally: # Make sure we don't fall through in the parent if pid == 0: os._exit(0) class UDPServer(Server): def makesocket(self): self.sock = socket.socket(socket.AF_INET, socket.SOCK_DGRAM) self.prot = IPPROTO_UDP def loop(self): while 1: self.session() def session(self): call, host_port = self.sock.recvfrom(8192) reply = self.handle(call) if reply <> None: self.sock.sendto(reply, host_port) # Simple test program -- dump local portmapper status def test(): pmap = UDPPortMapperClient('') list = pmap.Dump() list.sort() for prog, vers, prot, port in list: print prog, vers, if prot == IPPROTO_TCP: print 'tcp', elif prot == IPPROTO_UDP: print 'udp', else: print prot, print port # Test program for broadcast operation -- dump everybody's portmapper status def testbcast(): import sys if sys.argv[1:]: bcastaddr = sys.argv[1] else: bcastaddr = '' def rh(reply, fromaddr): host, port = fromaddr print host + '\t' + `reply` pmap = BroadcastUDPPortMapperClient(bcastaddr) pmap.set_reply_handler(rh) pmap.set_timeout(5) replies = pmap.Getport((100002, 1, IPPROTO_UDP, 0)) # Test program for server, with corresponding client # On machine A: python -c 'import rpc; rpc.testsvr()' # On machine B: python -c 'import rpc; rpc.testclt()' A # (A may be == B) def testsvr(): # Simple test class -- proc 1 doubles its string argument as reply class S(UDPServer): def handle_1(self): arg = self.unpacker.unpack_string() self.turn_around() print 'RPC function 1 called, arg', `arg` self.packer.pack_string(arg + arg) # s = S('', 0x20000000, 1, 0) try: s.unregister() except RuntimeError, msg: print 'RuntimeError:', msg, '(ignored)' s.register() print 'Service started...' try: s.loop() finally: s.unregister() print 'Service interrupted.' def testclt(): import sys if sys.argv[1:]: host = sys.argv[1] else: host = '' # Client for above server class C(UDPClient): def call_1(self, arg): return self.make_call(1, arg, \ self.packer.pack_string, \ self.unpacker.unpack_string) c = C(host, 0x20000000, 1) print 'making call...' reply = c.call_1('hello, world, ') print 'call returned', `reply` Python-2.3.7/Demo/rpc/nfsclient.py0000644001241000117560000001050206607154500016260 0ustar loewishpifb6# NFS RPC client -- RFC 1094 # XXX This is not yet complete. # XXX Only GETATTR, SETTTR, LOOKUP and READDIR are supported. # (See mountclient.py for some hints on how to write RPC clients in # Python in general) import rpc from rpc import UDPClient, TCPClient from mountclient import FHSIZE, MountPacker, MountUnpacker NFS_PROGRAM = 100003 NFS_VERSION = 2 # enum stat NFS_OK = 0 # (...many error values...) # enum ftype NFNON = 0 NFREG = 1 NFDIR = 2 NFBLK = 3 NFCHR = 4 NFLNK = 5 class NFSPacker(MountPacker): def pack_sattrargs(self, sa): file, attributes = sa self.pack_fhandle(file) self.pack_sattr(attributes) def pack_sattr(self, sa): mode, uid, gid, size, atime, mtime = sa self.pack_uint(mode) self.pack_uint(uid) self.pack_uint(gid) self.pack_uint(size) self.pack_timeval(atime) self.pack_timeval(mtime) def pack_diropargs(self, da): dir, name = da self.pack_fhandle(dir) self.pack_string(name) def pack_readdirargs(self, ra): dir, cookie, count = ra self.pack_fhandle(dir) self.pack_uint(cookie) self.pack_uint(count) def pack_timeval(self, tv): secs, usecs = tv self.pack_uint(secs) self.pack_uint(usecs) class NFSUnpacker(MountUnpacker): def unpack_readdirres(self): status = self.unpack_enum() if status == NFS_OK: entries = self.unpack_list(self.unpack_entry) eof = self.unpack_bool() rest = (entries, eof) else: rest = None return (status, rest) def unpack_entry(self): fileid = self.unpack_uint() name = self.unpack_string() cookie = self.unpack_uint() return (fileid, name, cookie) def unpack_diropres(self): status = self.unpack_enum() if status == NFS_OK: fh = self.unpack_fhandle() fa = self.unpack_fattr() rest = (fh, fa) else: rest = None return (status, rest) def unpack_attrstat(self): status = self.unpack_enum() if status == NFS_OK: attributes = self.unpack_fattr() else: attributes = None return status, attributes def unpack_fattr(self): type = self.unpack_enum() mode = self.unpack_uint() nlink = self.unpack_uint() uid = self.unpack_uint() gid = self.unpack_uint() size = self.unpack_uint() blocksize = self.unpack_uint() rdev = self.unpack_uint() blocks = self.unpack_uint() fsid = self.unpack_uint() fileid = self.unpack_uint() atime = self.unpack_timeval() mtime = self.unpack_timeval() ctime = self.unpack_timeval() return (type, mode, nlink, uid, gid, size, blocksize, \ rdev, blocks, fsid, fileid, atime, mtime, ctime) def unpack_timeval(self): secs = self.unpack_uint() usecs = self.unpack_uint() return (secs, usecs) class NFSClient(UDPClient): def __init__(self, host): UDPClient.__init__(self, host, NFS_PROGRAM, NFS_VERSION) def addpackers(self): self.packer = NFSPacker() self.unpacker = NFSUnpacker('') def mkcred(self): if self.cred == None: self.cred = rpc.AUTH_UNIX, rpc.make_auth_unix_default() return self.cred def Getattr(self, fh): return self.make_call(1, fh, \ self.packer.pack_fhandle, \ self.unpacker.unpack_attrstat) def Setattr(self, sa): return self.make_call(2, sa, \ self.packer.pack_sattrargs, \ self.unpacker.unpack_attrstat) # Root() is obsolete def Lookup(self, da): return self.make_call(4, da, \ self.packer.pack_diropargs, \ self.unpacker.unpack_diropres) # ... def Readdir(self, ra): return self.make_call(16, ra, \ self.packer.pack_readdirargs, \ self.unpacker.unpack_readdirres) # Shorthand to get the entire contents of a directory def Listdir(self, dir): list = [] ra = (dir, 0, 2000) while 1: (status, rest) = self.Readdir(ra) if status <> NFS_OK: break entries, eof = rest last_cookie = None for fileid, name, cookie in entries: list.append((fileid, name)) last_cookie = cookie if eof or last_cookie == None: break ra = (ra[0], last_cookie, ra[2]) return list def test(): import sys if sys.argv[1:]: host = sys.argv[1] else: host = '' if sys.argv[2:]: filesys = sys.argv[2] else: filesys = None from mountclient import UDPMountClient, TCPMountClient mcl = TCPMountClient(host) if filesys == None: list = mcl.Export() for item in list: print item return sf = mcl.Mnt(filesys) print sf fh = sf[1] if fh: ncl = NFSClient(host) as = ncl.Getattr(fh) print as list = ncl.Listdir(fh) for item in list: print item mcl.Umnt(filesys) Python-2.3.7/Demo/rpc/T.py0000644001241000117560000000103405530662352014501 0ustar loewishpifb6# Simple interface to report execution times of program fragments. # Call TSTART() to reset the timer, TSTOP(...) to report times. import sys, os, time def TSTART(): global t0, t1 u, s, cu, cs = os.times() t0 = u+cu, s+cs, time.time() def TSTOP(*label): global t0, t1 u, s, cu, cs = os.times() t1 = u+cu, s+cs, time.time() tt = [] for i in range(3): tt.append(t1[i] - t0[i]) [u, s, r] = tt msg = '' for x in label: msg = msg + (x + ' ') msg = msg + `u` + ' user, ' + `s` + ' sys, ' + `r` + ' real\n' sys.stderr.write(msg) Python-2.3.7/Demo/rpc/README0000644001241000117560000000235507361370660014615 0ustar loewishpifb6This is a Python interface to Sun RPC, designed and implemented mostly by reading the Internet RFCs about the subject. *** NOTE: xdr.py has evolved into the standard module xdrlib.py *** There are two library modules, xdr.py and rpc.py, and several example clients: mountclient.py, nfsclient.py, and rnusersclient.py, implementing the NFS Mount protocol, (part of) the NFS protocol, and the "rnusers" protocol (used by rusers(1)), respectively. The latter demonstrates the use of broadcast via the Port mapper's CALLIT procedure. There is also a way to create servers in Python. To test the nfs client, run it from the shell with something like this: python -c 'import nfsclient; nfsclient.test()' [hostname [filesystemname]] When called without a filesystemname, it lists the filesystems at the host; default host is the local machine. Other clients are tested similarly. For hostname, use e.g. wuarchive.wustl.edu or gatekeeper.dec.com (two hosts that are known to export NFS filesystems with little restrictions). There are now two different RPC compilers: 1) Wim Lewis rpcgen.py found on http://www.omnigroup.com/~wiml/soft/stale-index.html#python. 2) Peter Åstrands rpcgen.py, which is part of "pynfs" (http://www.cendio.se/~peter/pynfs/). Python-2.3.7/Demo/rpc/MANIFEST0000644001241000117560000000055105504341372015055 0ustar loewishpifb6 File Name Archive # Description ----------------------------------------------------------- MANIFEST 1 This shipping list README 1 T.py 1 mountclient.py 1 nfsclient.py 1 rpc.py 1 test 1 xdr.py 1 Python-2.3.7/Demo/rpc/rnusersclient.py0000644001241000117560000000436005504341372017200 0ustar loewishpifb6# Remote nusers client interface import rpc from rpc import Packer, Unpacker, UDPClient, BroadcastUDPClient class RnusersPacker(Packer): def pack_utmp(self, ui): ut_line, ut_name, ut_host, ut_time = utmp self.pack_string(ut_line) self.pack_string(ut_name) self.pack_string(ut_host) self.pack_int(ut_time) def pack_utmpidle(self, ui): ui_itmp, ui_idle = ui self.pack_utmp(ui_utmp) self.pack_uint(ui_idle) def pack_utmpidlearr(self, list): self.pack_array(list, self.pack_itmpidle) class RnusersUnpacker(Unpacker): def unpack_utmp(self): ut_line = self.unpack_string() ut_name = self.unpack_string() ut_host = self.unpack_string() ut_time = self.unpack_int() return ut_line, ut_name, ut_host, ut_time def unpack_utmpidle(self): ui_utmp = self.unpack_utmp() ui_idle = self.unpack_uint() return ui_utmp, ui_idle def unpack_utmpidlearr(self): return self.unpack_array(self.unpack_utmpidle) class PartialRnusersClient: def addpackers(self): self.packer = RnusersPacker() self.unpacker = RnusersUnpacker('') def Num(self): return self.make_call(1, None, None, self.unpacker.unpack_int) def Names(self): return self.make_call(2, None, \ None, self.unpacker.unpack_utmpidlearr) def Allnames(self): return self.make_call(3, None, \ None, self.unpacker.unpack_utmpidlearr) class RnusersClient(PartialRnusersClient, UDPClient): def __init__(self, host): UDPClient.__init__(self, host, 100002, 2) class BroadcastRnusersClient(PartialRnusersClient, BroadcastUDPClient): def __init__(self, bcastaddr): BroadcastUDPClient.__init__(self, bcastaddr, 100002, 2) def test(): import sys if not sys.argv[1:]: testbcast() return else: host = sys.argv[1] c = RnusersClient(host) list = c.Names() for (line, name, host, time), idle in list: line = strip0(line) name = strip0(name) host = strip0(host) print `name`, `host`, `line`, time, idle def testbcast(): c = BroadcastRnusersClient('') def listit(list, fromaddr): host, port = fromaddr print host + '\t:', for (line, name, host, time), idle in list: print strip0(name), print c.set_reply_handler(listit) all = c.Names() print 'Total Count:', len(all) def strip0(s): while s and s[-1] == '\0': s = s[:-1] return s test() Python-2.3.7/Demo/rpc/xdr.py0000644001241000117560000001005606463643744015111 0ustar loewishpifb6# Implement (a subset of) Sun XDR -- RFC1014. try: import struct except ImportError: struct = None Long = type(0L) class Packer: def __init__(self): self.reset() def reset(self): self.buf = '' def get_buf(self): return self.buf def pack_uint(self, x): self.buf = self.buf + \ (chr(int(x>>24 & 0xff)) + chr(int(x>>16 & 0xff)) + \ chr(int(x>>8 & 0xff)) + chr(int(x & 0xff))) if struct and struct.pack('l', 1) == '\0\0\0\1': def pack_uint(self, x): if type(x) == Long: x = int((x + 0x80000000L) % 0x100000000L \ - 0x80000000L) self.buf = self.buf + struct.pack('l', x) pack_int = pack_uint pack_enum = pack_int def pack_bool(self, x): if x: self.buf = self.buf + '\0\0\0\1' else: self.buf = self.buf + '\0\0\0\0' def pack_uhyper(self, x): self.pack_uint(int(x>>32 & 0xffffffff)) self.pack_uint(int(x & 0xffffffff)) pack_hyper = pack_uhyper def pack_float(self, x): # XXX self.buf = self.buf + struct.pack('f', x) def pack_double(self, x): # XXX self.buf = self.buf + struct.pack('d', x) def pack_fstring(self, n, s): if n < 0: raise ValueError, 'fstring size must be nonnegative' n = ((n+3)/4)*4 data = s[:n] data = data + (n - len(data)) * '\0' self.buf = self.buf + data pack_fopaque = pack_fstring def pack_string(self, s): n = len(s) self.pack_uint(n) self.pack_fstring(n, s) pack_opaque = pack_string def pack_list(self, list, pack_item): for item in list: self.pack_uint(1) pack_item(item) self.pack_uint(0) def pack_farray(self, n, list, pack_item): if len(list) <> n: raise ValueError, 'wrong array size' for item in list: pack_item(item) def pack_array(self, list, pack_item): n = len(list) self.pack_uint(n) self.pack_farray(n, list, pack_item) class Unpacker: def __init__(self, data): self.reset(data) def reset(self, data): self.buf = data self.pos = 0 def done(self): if self.pos < len(self.buf): raise RuntimeError, 'unextracted data remains' def unpack_uint(self): i = self.pos self.pos = j = i+4 data = self.buf[i:j] if len(data) < 4: raise EOFError x = long(ord(data[0]))<<24 | ord(data[1])<<16 | \ ord(data[2])<<8 | ord(data[3]) # Return a Python long only if the value is not representable # as a nonnegative Python int if x < 0x80000000L: x = int(x) return x if struct and struct.unpack('l', '\0\0\0\1') == 1: def unpack_uint(self): i = self.pos self.pos = j = i+4 data = self.buf[i:j] if len(data) < 4: raise EOFError return struct.unpack('l', data) def unpack_int(self): x = self.unpack_uint() if x >= 0x80000000L: x = x - 0x100000000L return int(x) unpack_enum = unpack_int unpack_bool = unpack_int def unpack_uhyper(self): hi = self.unpack_uint() lo = self.unpack_uint() return long(hi)<<32 | lo def unpack_hyper(self): x = self.unpack_uhyper() if x >= 0x8000000000000000L: x = x - 0x10000000000000000L return x def unpack_float(self): # XXX i = self.pos self.pos = j = i+4 data = self.buf[i:j] if len(data) < 4: raise EOFError return struct.unpack('f', data)[0] def unpack_double(self): # XXX i = self.pos self.pos = j = i+8 data = self.buf[i:j] if len(data) < 8: raise EOFError return struct.unpack('d', data)[0] def unpack_fstring(self, n): if n < 0: raise ValueError, 'fstring size must be nonnegative' i = self.pos j = i + (n+3)/4*4 if j > len(self.buf): raise EOFError self.pos = j return self.buf[i:i+n] unpack_fopaque = unpack_fstring def unpack_string(self): n = self.unpack_uint() return self.unpack_fstring(n) unpack_opaque = unpack_string def unpack_list(self, unpack_item): list = [] while 1: x = self.unpack_uint() if x == 0: break if x <> 1: raise RuntimeError, \ '0 or 1 expected, got ' + `x` item = unpack_item() list.append(item) return list def unpack_farray(self, n, unpack_item): list = [] for i in range(n): list.append(unpack_item()) return list def unpack_array(self, unpack_item): n = self.unpack_uint() return self.unpack_farray(n, unpack_item) Python-2.3.7/Demo/rpc/test0000755001241000117560000000127106037011327014625 0ustar loewishpifb6: ${PYTHON=python} : ${SERVER=charon.cwi.nl} set -xe $PYTHON -c 'from rpc import test; test()' $PYTHON -c 'from rpc import test; test()' ${SERVER} $PYTHON -c 'from rpc import testsvr; testsvr()' & PID=$! sleep 2 $PYTHON -c 'from rpc import testclt; testclt()' kill -2 $PID $PYTHON -c 'from mountclient import test; test()' $PYTHON -c 'from mountclient import test; test()' gatekeeper.dec.com $PYTHON -c 'from nfsclient import test; test()' $PYTHON -c 'from nfsclient import test; test()' gatekeeper.dec.com $PYTHON -c 'from nfsclient import test; test()' gatekeeper.dec.com /archive $PYTHON -c 'from rnusersclient import test; test()' '' $PYTHON -c 'from rpc import testbcast; testbcast()' Python-2.3.7/Demo/rpc/mountclient.py0000644001241000117560000001362407361370660016651 0ustar loewishpifb6# Mount RPC client -- RFC 1094 (NFS), Appendix A # This module demonstrates how to write your own RPC client in Python. # When this example was written, there was no RPC compiler for # Python. Without such a compiler, you must first create classes # derived from Packer and Unpacker to handle the data types for the # server you want to interface to. You then write the client class. # If you want to support both the TCP and the UDP version of a # protocol, use multiple inheritance as shown below. import rpc from rpc import Packer, Unpacker, TCPClient, UDPClient # Program number and version for the mount protocol MOUNTPROG = 100005 MOUNTVERS = 1 # Size of the 'fhandle' opaque structure FHSIZE = 32 # Packer derived class for Mount protocol clients. # The only thing we need to pack beyond basic types is an 'fhandle' class MountPacker(Packer): def pack_fhandle(self, fhandle): self.pack_fopaque(FHSIZE, fhandle) # Unpacker derived class for Mount protocol clients. # The important types we need to unpack are fhandle, fhstatus, # mountlist and exportlist; mountstruct, exportstruct and groups are # used to unpack components of mountlist and exportlist and the # corresponding functions are passed as function argument to the # generic unpack_list function. class MountUnpacker(Unpacker): def unpack_fhandle(self): return self.unpack_fopaque(FHSIZE) def unpack_fhstatus(self): status = self.unpack_uint() if status == 0: fh = self.unpack_fhandle() else: fh = None return status, fh def unpack_mountlist(self): return self.unpack_list(self.unpack_mountstruct) def unpack_mountstruct(self): hostname = self.unpack_string() directory = self.unpack_string() return (hostname, directory) def unpack_exportlist(self): return self.unpack_list(self.unpack_exportstruct) def unpack_exportstruct(self): filesys = self.unpack_string() groups = self.unpack_groups() return (filesys, groups) def unpack_groups(self): return self.unpack_list(self.unpack_string) # These are the procedures specific to the Mount client class. # Think of this as a derived class of either TCPClient or UDPClient. class PartialMountClient: # This method is called by Client.__init__ to initialize # self.packer and self.unpacker def addpackers(self): self.packer = MountPacker() self.unpacker = MountUnpacker('') # This method is called by Client.__init__ to bind the socket # to a particular network interface and port. We use the # default network interface, but if we're running as root, # we want to bind to a reserved port def bindsocket(self): import os try: uid = os.getuid() except AttributeError: uid = 1 if uid == 0: port = rpc.bindresvport(self.sock, '') # 'port' is not used else: self.sock.bind(('', 0)) # This function is called to cough up a suitable # authentication object for a call to procedure 'proc'. def mkcred(self): if self.cred == None: self.cred = rpc.AUTH_UNIX, rpc.make_auth_unix_default() return self.cred # The methods Mnt, Dump etc. each implement one Remote # Procedure Call. This is done by calling self.make_call() # with as arguments: # # - the procedure number # - the arguments (or None) # - the "packer" function for the arguments (or None) # - the "unpacker" function for the return value (or None) # # The packer and unpacker function, if not None, *must* be # methods of self.packer and self.unpacker, respectively. # A value of None means that there are no arguments or is no # return value, respectively. # # The return value from make_call() is the return value from # the remote procedure call, as unpacked by the "unpacker" # function, or None if the unpacker function is None. # # (Even if you expect a result of None, you should still # return the return value from make_call(), since this may be # needed by a broadcasting version of the class.) # # If the call fails, make_call() raises an exception # (this includes time-outs and invalid results). # # Note that (at least with the UDP protocol) there is no # guarantee that a call is executed at most once. When you do # get a reply, you know it has been executed at least once; # when you don't get a reply, you know nothing. def Mnt(self, directory): return self.make_call(1, directory, \ self.packer.pack_string, \ self.unpacker.unpack_fhstatus) def Dump(self): return self.make_call(2, None, \ None, self.unpacker.unpack_mountlist) def Umnt(self, directory): return self.make_call(3, directory, \ self.packer.pack_string, None) def Umntall(self): return self.make_call(4, None, None, None) def Export(self): return self.make_call(5, None, \ None, self.unpacker.unpack_exportlist) # We turn the partial Mount client into a full one for either protocol # by use of multiple inheritance. (In general, when class C has base # classes B1...Bn, if x is an instance of class C, methods of x are # searched first in C, then in B1, then in B2, ..., finally in Bn.) class TCPMountClient(PartialMountClient, TCPClient): def __init__(self, host): TCPClient.__init__(self, host, MOUNTPROG, MOUNTVERS) class UDPMountClient(PartialMountClient, UDPClient): def __init__(self, host): UDPClient.__init__(self, host, MOUNTPROG, MOUNTVERS) # A little test program for the Mount client. This takes a host as # command line argument (default the local machine), prints its export # list, and attempts to mount and unmount each exported files system. # An optional first argument of -t or -u specifies the protocol to use # (TCP or UDP), default is UDP. def test(): import sys if sys.argv[1:] and sys.argv[1] == '-t': C = TCPMountClient del sys.argv[1] elif sys.argv[1:] and sys.argv[1] == '-u': C = UDPMountClient del sys.argv[1] else: C = UDPMountClient if sys.argv[1:]: host = sys.argv[1] else: host = '' mcl = C(host) list = mcl.Export() for item in list: print item try: mcl.Mnt(item[0]) except: print 'Sorry' continue mcl.Umnt(item[0]) Python-2.3.7/Demo/xml/0000755001241000117560000000000010765544471013751 5ustar loewishpifb6Python-2.3.7/Demo/xml/elem_count.py0000644001241000117560000000175507172617111016453 0ustar loewishpifb6import sys from xml.sax import make_parser, handler class FancyCounter(handler.ContentHandler): def __init__(self): self._elems = 0 self._attrs = 0 self._elem_types = {} self._attr_types = {} def startElement(self, name, attrs): self._elems = self._elems + 1 self._attrs = self._attrs + len(attrs) self._elem_types[name] = self._elem_types.get(name, 0) + 1 for name in attrs.keys(): self._attr_types[name] = self._attr_types.get(name, 0) + 1 def endDocument(self): print "There were", self._elems, "elements." print "There were", self._attrs, "attributes." print "---ELEMENT TYPES" for pair in self._elem_types.items(): print "%20s %d" % pair print "---ATTRIBUTE TYPES" for pair in self._attr_types.items(): print "%20s %d" % pair parser = make_parser() parser.setContentHandler(FancyCounter()) parser.parse(sys.argv[1]) Python-2.3.7/Demo/xml/rss2html.py0000644001241000117560000000402207172617111016065 0ustar loewishpifb6import sys from xml.sax import make_parser, handler # --- Templates top = \ """ %s

%s

""" bottom = \ """
Converted to HTML by sax_rss2html.py.
""" # --- The ContentHandler class RSSHandler(handler.ContentHandler): def __init__(self, out = sys.stdout): handler.ContentHandler.__init__(self) self._out = out self._text = "" self._parent = None self._list_started = 0 self._title = None self._link = None self._descr = "" # ContentHandler methods def startElement(self, name, attrs): if name == "channel" or name == "image" or name == "item": self._parent = name self._text = "" def endElement(self, name): if self._parent == "channel": if name == "title": self._out.write(top % (self._text, self._text)) elif name == "description": self._out.write("

%s

\n" % self._text) elif self._parent == "item": if name == "title": self._title = self._text elif name == "link": self._link = self._text elif name == "description": self._descr = self._text elif name == "item": if not self._list_started: self._out.write("