|
|
| version 1.152.2.13, 2003/02/04 12:08:57 | version 1.152.2.19.2.17, 2003/04/21 12:11:30 |
|---|---|
| Line 10 static const char* IDENT_GLOBALS_C="$Dat | Line 10 static const char* IDENT_GLOBALS_C="$Dat |
| #include "pa_config_includes.h" | #include "pa_config_includes.h" |
| #ifdef XML | #ifdef XML |
| #include "libxml/xmlversion.h" | |
| #include "libxslt/extensions.h" | #include "libxslt/extensions.h" |
| #include "libxslt/xsltutils.h" | #include "libxslt/xsltutils.h" |
| extern "C" { | extern "C" { |
| Line 17 extern "C" { | Line 18 extern "C" { |
| }; | }; |
| #endif | #endif |
| #include "pcre.h" | |
| #include "pa_globals.h" | #include "pa_globals.h" |
| #include "pa_string.h" | #include "pa_string.h" |
| #include "pa_sapi.h" | #include "pa_sapi.h" |
| #include "pa_threads.h" | #include "pa_threads.h" |
| #ifdef XML | |
| #include "pa_stylesheet_manager.h" | |
| #endif | |
| #define DEFAULTS_NAME "DEFAULTS" | |
| #define MATCH_VAR_NAME "match" | |
| #define EXCEPTION_VAR_NAME "exception" | |
| #define EXCEPTION_TYPE_PART_NAME "type" | |
| #define EXCEPTION_SOURCE_PART_NAME "source" | |
| #define EXCEPTION_COMMENT_PART_NAME "comment" | |
| #define EXCEPTION_HANDLED_PART_NAME "handled" | |
| #define DATE_CALENDAR_WEEKNO_NAME "week" | |
| #define DATE_CALENDAR_WEEKYEAR_NAME "year" | |
| #define SWITCH_DATA_NAME "SWITCH-DATA" | |
| #define CACHE_DATA_NAME "CACHE-DATA" | |
| #define SQL_LIMIT_NAME "limit" | |
| #define SQL_OFFSET_NAME "offset" | |
| #define SQL_DEFAULT_NAME "default" | |
| #define SQL_DISTINCT_NAME "distinct" | |
| #define HASH_DEFAULT_ELEMENT_NAME "_default" | |
| StringPtr match_var_name(new String(MATCH_VAR_NAME)); | |
| StringPtr exception_var_name(new String(EXCEPTION_VAR_NAME)); | // defines |
| StringPtr exception_type_part_name(new String(EXCEPTION_TYPE_PART_NAME)); | |
| StringPtr exception_source_part_name(new String(EXCEPTION_SOURCE_PART_NAME)); | |
| StringPtr exception_comment_part_name(new String(EXCEPTION_COMMENT_PART_NAME)); | |
| StringPtr exception_handled_part_name(new String(EXCEPTION_HANDLED_PART_NAME)); | |
| #define PA_DEBUG_XML_GC_MEMORY | |
| //^switch ^case | // globals |
| StringPtr switch_data_name(new String(SWITCH_DATA_NAME)); | |
| //^cache | |
| StringPtr cache_data_name(new String(CACHE_DATA_NAME)); | |
| // sql | |
| StringPtr sql_limit_name(new String(SQL_LIMIT_NAME)); | |
| StringPtr sql_offset_name(new String(SQL_OFFSET_NAME)); | |
| StringPtr sql_default_name(new String(SQL_DEFAULT_NAME)); | |
| StringPtr sql_distinct_name(new String(SQL_DISTINCT_NAME)); | |
| // hash | |
| StringPtr hash_default_element_name(new String(HASH_DEFAULT_ELEMENT_NAME)); | |
| short hex_value[0x100]; | short hex_value[0x100]; |
| Line 116 static void setup_hex_value() { | Line 68 static void setup_hex_value() { |
| const int MAX_CONCURRENT_XML_GENERIC_ERROR_THREADS=10; | const int MAX_CONCURRENT_XML_GENERIC_ERROR_THREADS=10; |
| struct XML_Generic_error_info { | class XML_Generic_error_info { |
| public: | |
| pa_thread_t thread_id; | pa_thread_t thread_id; |
| char *message; | char buf[MAX_STRING]; |
| size_t used; | |
| public: | |
| XML_Generic_error_info() { | |
| reset(); | |
| } | |
| void reset() { | |
| thread_id=0; | |
| buf[used=0]=0; | |
| } | |
| const char* getnd_reset() { | |
| char* result=new(PointerFreeGC) char[used+1]; | |
| memcpy(result, buf, used+1); | |
| reset(); | |
| return result; | |
| } | |
| } xml_generic_error_infos[MAX_CONCURRENT_XML_GENERIC_ERROR_THREADS]; | } xml_generic_error_infos[MAX_CONCURRENT_XML_GENERIC_ERROR_THREADS]; |
| XML_Generic_error_info *xml_generic_error_info(pa_thread_t thread_id) { | XML_Generic_error_info *xml_generic_error_info(pa_thread_t thread_id) { |
| Line 147 xmlParserGenericErrorFunc(void *ctx, con | Line 115 xmlParserGenericErrorFunc(void *ctx, con |
| } | } |
| p->thread_id=thread_id; | p->thread_id=thread_id; |
| size_t offset=p->message?strlen(p->message):0; | |
| p->message=(char *)realloc(p->message, offset+MAX_STRING); | |
| if(!p->message) | |
| SAPI::die( | |
| "out of memory in 'xmlParserGenericErrorFunc', failed to reallocate to %u bytes", | |
| offset+MAX_STRING); | |
| va_list args; | va_list args; |
| va_start(args, msg); | va_start(args, msg); |
| vsnprintf(p->message+offset, MAX_STRING, msg, args); | p->used+=vsnprintf(p->buf+p->used, sizeof(p->buf)-p->used, msg, args); |
| va_end(args); | va_end(args); |
| break; | break; |
| Line 180 const char* xmlGenericErrors() { | Line 142 const char* xmlGenericErrors() { |
| if(!p) // no errors for our thread_id registered | if(!p) // no errors for our thread_id registered |
| return 0; | return 0; |
| const char* result=p->message; | return p->getnd_reset(); |
| // free slot up | |
| memset(p, 0, sizeof(*p)); | |
| // it is up to caller to free it | |
| return result; | |
| } | } |
| /** | /** |
| Line 269 void pa_globals_destroy(void *) { | Line 225 void pa_globals_destroy(void *) { |
| gdome_di_unref (domimpl, &exc); | gdome_di_unref (domimpl, &exc); |
| #endif | #endif |
| } catch(const Exception& e) { | } catch(const Exception& e) { |
| SAPI::die("pa_globals_destroy failed: %s", e.comment()); | SAPI::abort("pa_globals_destroy failed: %s", e.comment()); |
| } | } |
| } | } |
| /// @test hint on one should call this for each thread xmlSubstituteEntitiesDefault(1); | #ifdef XML |
| static char *pa_GC_strdup(const char *s) { | |
| if(!s) | |
| return 0; | |
| size_t size=strlen(s)+1; | |
| char *result=(char *)GC_malloc_atomic(size); | |
| memcpy(result, s, size); | |
| return result; | |
| } | |
| #endif | |
| void pa_CORD_oom_fn(void) { | |
| SAPI::abort("out of memory (while expanding string)"); | |
| } | |
| /** | |
| @todo LIBXML_VERSION with xmlGcMemSetup will be 2.5.7 | |
| @todo gc: libltdl: substitute lt_dlmalloc & co | |
| */ | |
| static void gc_substitute_memory_management_functions() { | |
| // in libxml & libxslt | |
| #ifdef XML | |
| // asking to use GC memory | |
| #if LIBXML_VERSION >= 20506 | |
| xmlGcMemSetup( | |
| /*xmlFreeFunc */pa_gc_free, | |
| /*xmlMallocFunc */pa_gc_malloc, | |
| /*xmlMallocFunc */pa_gc_malloc_atomic, | |
| /*xmlReallocFunc */pa_gc_realloc, | |
| /*xmlStrdupFunc */pa_GC_strdup); | |
| #else | |
| xmlMemSetup( | |
| /*xmlFreeFunc */pa_gc_free, | |
| /*xmlMallocFunc */pa_gc_malloc, | |
| /*xmlReallocFunc */pa_gc_realloc, | |
| /*xmlStrdupFunc */pa_GC_strdup); | |
| #endif | |
| #endif | |
| // pcre | |
| pcre_malloc=pa_gc_malloc; | |
| pcre_free=pa_gc_free; | |
| // cord | |
| CORD_oom_fn=pa_CORD_oom_fn; | |
| } | |
| /** | |
| @test hint on one should call this for each thread xmlSubstituteEntitiesDefault(1); | |
| */ | |
| void pa_globals_init() { | void pa_globals_init() { |
| // in various libraries | |
| gc_substitute_memory_management_functions(); | |
| // hex value | // hex value |
| setup_hex_value(); | setup_hex_value(); |
| Line 283 void pa_globals_init() { | Line 293 void pa_globals_init() { |
| #ifdef XML | #ifdef XML |
| // initializing xml libs | // initializing xml libs |
| /* First I get a DOMImplementation reference */ | /* First get a DOMImplementation reference */ |
| domimpl = gdome_di_mkref (); | domimpl = gdome_di_mkref (); |
| /* | /* |
| * Register the EXSLT extensions and the test module | * Register the EXSLT extensions and the test module |
| */ | */ |
| exsltRegisterAll(); | exsltRegisterAll(); |
| xsltRegisterTestModule(); | xsltRegisterTestModule(); |
| xmlDefaultSAXHandlerInit(); | xmlDefaultSAXHandlerInit(); |
| /* | /* |
| * disable CDATA from being built in the document tree | * disable CDATA from being built in the document tree |
| */ | */ |
| // never added yet xmlDefaultSAXHandler.cdataBlock = NULL; | // never added yet xmlDefaultSAXHandler.cdataBlock = NULL; |
| /* | /* |
| * Initialization function for the XML parser. | * Initialization function for the XML parser. |
| * This is not reentrant. Call once before processing in case of | * This is not reentrant. Call once before processing in case of |
| Line 316 void pa_globals_init() { | Line 326 void pa_globals_init() { |
| xmlLoadExtDtdDefaultValue |= XML_DETECT_IDS; | xmlLoadExtDtdDefaultValue |= XML_DETECT_IDS; |
| // Bit in the loadsubset context field to tell to do complete the elements attributes lists | // Bit in the loadsubset context field to tell to do complete the elements attributes lists |
| // with the ones defaulted from the DTDs | // with the ones defaulted from the DTDs |
| xmlLoadExtDtdDefaultValue |= XML_COMPLETE_ATTRS; | xmlLoadExtDtdDefaultValue |= XML_COMPLETE_ATTRS; |
| // validate each document after load/create (?) | // validate each document after load/create (?) |
| //xmlDoValidityCheckingDefaultValue = 1; | //xmlDoValidityCheckingDefaultValue = 1; |
| Line 324 void pa_globals_init() { | Line 334 void pa_globals_init() { |
| //regretfully this not only replaces entities on parse, but also on generate xmlSubstituteEntitiesDefault(1); | //regretfully this not only replaces entities on parse, but also on generate xmlSubstituteEntitiesDefault(1); |
| // never switched this on xmlIndentTreeOutput=1; | // never switched this on xmlIndentTreeOutput=1; |
| memset(xml_generic_error_infos, 0, sizeof(xml_generic_error_infos)); | |
| xmlSetGenericErrorFunc(0, xmlParserGenericErrorFunc); | xmlSetGenericErrorFunc(0, xmlParserGenericErrorFunc); |
| xsltSetGenericErrorFunc(0, xmlParserGenericErrorFunc); | xsltSetGenericErrorFunc(0, xmlParserGenericErrorFunc); |
| // FILE *f=fopen("y:\\xslt.log", "wt"); | // FILE *f=fopen("y:\\xslt.log", "wt"); |
| Line 334 void pa_globals_init() { | Line 343 void pa_globals_init() { |
| xmlRegisterInputCallbacks( | xmlRegisterInputCallbacks( |
| xmlFileMatchLocalhost, xmlFileOpenLocalhost, | xmlFileMatchLocalhost, xmlFileOpenLocalhost, |
| pa_xmlFileRead, pa_xmlFileClose); | pa_xmlFileRead, pa_xmlFileClose); |
| // XSLT stylesheet manager | |
| cache_managers->put(*NEW String(pool, "stylesheet"), | |
| stylesheet_manager=NEW Stylesheet_manager(pool)); | |
| #endif | #endif |
| } | } |
| #if defined(XML) && defined(_MSC_VER) | #ifdef _MSC_VER |
| #ifndef PA_DEBUG_DISABLE_GC | |
| # define GC_LIB "/parser3project/win32/gc" | |
| # ifdef _DEBUG | |
| # pragma comment(lib, GC_LIB "/Debug/gc.lib") | |
| # else | |
| # pragma comment(lib, GC_LIB "/Release/gc.lib") | |
| # endif | |
| #endif | |
| #ifdef XML | |
| # define GNOME_LIBS "/parser3project/win32xml/win32/gnome" | # define GNOME_LIBS "/parser3project/win32xml/win32/gnome" |
| # pragma comment(lib, GNOME_LIBS "/glib/lib/libglib-1.3-11.lib") | # pragma comment(lib, GNOME_LIBS "/glib/lib/libglib-1.3-11.lib") |
| # ifdef _DEBUG | # ifdef _DEBUG |
| # pragma comment(lib, GNOME_LIBS "/libxml2-x.x.x/win32/dsp/libxml2_so_debug/libxml2.lib") | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libexslt_so_debug/libexslt.lib") | # ifdef LIBXML_STATIC |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libxslt_so_debug/libxslt.lib") | # pragma comment(lib, GNOME_LIBS "/gnome-xml/win32/dsp/libxml2_DebugStatic/libxml2.lib") |
| # pragma comment(lib, GNOME_LIBS "/gdome2-x.x.x/win32/dsp/Debug/libgdome.lib") | # else |
| # else | # pragma comment(lib, GNOME_LIBS "/gnome-xml/win32/dsp/libxml2_DebugDynamic/libxml2.lib") |
| # pragma comment(lib, GNOME_LIBS "/libxml2-x.x.x/win32/dsp/libxml2_so_release/libxml2.lib") | # endif |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libexslt_so_release/libexslt.lib") | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libxslt_so_release/libxslt.lib") | # ifdef LIBXSLT_STATIC |
| # pragma comment(lib, GNOME_LIBS "/gdome2-x.x.x/win32/dsp/Release/libgdome.lib") | # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libxslt_DebugStatic/libxslt.lib") |
| # else | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libxslt_DebugDynamic/libxslt.lib") | |
| # endif | |
| # ifdef LIBEXSLT_STATIC | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libexslt_DebugStatic/libexslt.lib") | |
| # else | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libexslt_DebugDynamic/libexslt.lib") | |
| # endif | |
| # ifdef LIBGDOME_STATIC | |
| # pragma comment(lib, GNOME_LIBS "/gdome2-x.x.x/win32/dsp/libgdome_DebugStatic/libgdome.lib") | |
| # else | |
| # pragma comment(lib, GNOME_LIBS "/gdome2-x.x.x/win32/dsp/libgdome_DebugDynamic/libgdome.lib") | |
| # endif | |
| #else | |
| # ifdef LIBXML_STATIC | |
| # pragma comment(lib, GNOME_LIBS "/gnome-xml/win32/dsp/libxml2_ReleaseStatic/libxml2.lib") | |
| # else | |
| # pragma comment(lib, GNOME_LIBS "/gnome-xml/win32/dsp/libxml2_ReleaseDynamic/libxml2.lib") | |
| # endif | |
| # ifdef LIBXSLT_STATIC | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libxslt_ReleaseStatic/libxslt.lib") | |
| # else | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libxslt_ReleaseDynamic/libxslt.lib") | |
| # endif | |
| # ifdef LIBEXSLT_STATIC | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libexslt_ReleaseStatic/libexslt.lib") | |
| # else | |
| # pragma comment(lib, GNOME_LIBS "/libxslt-x.x.x/win32/dsp/libexslt_ReleaseDynamic/libexslt.lib") | |
| # endif | |
| # ifdef LIBGDOME_STATIC | |
| # pragma comment(lib, GNOME_LIBS "/gdome2-x.x.x/win32/dsp/libgdome_ReleaseStatic/libgdome.lib") | |
| # else | |
| # pragma comment(lib, GNOME_LIBS "/gdome2-x.x.x/win32/dsp/libgdome_ReleaseDynamic/libgdome.lib") | |
| # endif | |
| # endif | # endif |
| #endif | #endif |
| #endif |