[BACK]Return to pa_globals.C CVS log [TXT] [DIR] Up to [parser3project] / parser3 / src / main

Diff for /parser3/src/main/pa_globals.C between versions 1.9 and 1.100

version 1.9, 2001/03/18 11:58:19 version 1.100, 2002/01/14 17:48:57
Line 1 Line 1
 /*  /** @file
         Parser          Parser: globals.
   
         Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)          Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
         Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)          Author: Alexander Petrosyan <paf@design.ru> (http://paf.design.ru)
   
         $Id$          $Id$
 */  */
   
 #include "pa_globals.h"  #include "pa_globals.h"
 #include "_string.h"  #include "pa_string.h"
 #include "_double.h"  #include "pa_hash.h"
 #include "_int.h"  #include "pa_sql_driver_manager.h"
 #include "_table.h"  #include "pa_dictionary.h"
 #include "_form.h"  #include "pa_stylesheet_manager.h"
 #include "_env.h"  #include "pa_sapi.h"
 #include "_request.h"  #include "pa_cache_managers.h"
 #include "_response.h"  #include "pa_charsets.h"
   #include "pa_charset.h"
 Service_funcs service_funcs;  
   #ifdef DB2
   #include "pa_db_manager.h"
   #endif
   
   #ifdef XML
   //#include "libxml/parser.h"
   //#include "libxslt/xslt.h"
   //#include "libxslt/libxslt.h"
   #include "libxslt/extensions.h"
   #include "libexslt/exslt.h"
   #endif
   
 String *content_type_name;  String *content_type_name;
   String *charset_name;
 String *body_name;  String *body_name;
   String *value_name;
   String *expires_name;
   String *path_name;
   String *name_name;
   String *size_name;
   String *text_name;
   
 String *exception_method_name;  String *exception_method_name;
   String *post_process_method_name;
   
   String *content_disposition_name;
   String *content_disposition_filename_name;
   
 String *unnamed_name;  String *unnamed_name;
 String *empty_string;  
   
 String *auto_method_name;  String *auto_method_name;
 String *main_method_name;  String *main_method_name;
   
 String *root_class_name;  
 String *main_class_name;  String *main_class_name;
 String *env_class_name;  
 String *table_class_name;  
 String *form_class_name;  
 String *request_class_name;  
 String *response_class_name;  
   
 String *result_var_name;  String *result_var_name;
   String *match_var_name;
   String *string_pre_match_name;
   String *string_match_name;
   String *string_post_match_name;
   
   String *charsets_name;
   String *mime_types_name;
   String *vfile_mime_type_name;
   String *origins_mode_name;
   
   String *class_path_name;
   
   String *switch_data_name;
   String *case_default_value;
   
 String *limits_name;  String *sql_limit_name;
 String *post_max_size_name;  String *sql_offset_name;
   String *sql_default_name;
   
 String *defaults_name;  String *charset_UTF8_name;
   
   String *hash_default_element_name;
   
 Hash *untaint_lang_name2enum;  Hash *untaint_lang_name2enum;
   
   GdomeDOMImplementation *domimpl;
   
   Charset *utf8_charset;
   
 short hex_value[0x100];  short hex_value[0x100];
   
 static void setup_hex_value() {  static void setup_hex_value() {
         int i;          memset(hex_value, 0, sizeof(hex_value));
         for (i=0; (i < 0x100); i++) {  
                 hex_value[i] = 0;  
         }  
         hex_value['0'] = 0;               hex_value['0'] = 0;     
         hex_value['1'] = 1;               hex_value['1'] = 1;     
         hex_value['2'] = 2;               hex_value['2'] = 2;     
Line 77  static void setup_hex_value() { Line 111  static void setup_hex_value() {
         hex_value['f'] = 15;          hex_value['f'] = 15;
 }  }
   
 void globals_init(Pool& pool) {  /*
   #ifdef XML
   static void
   xmlGenericErrorDefaultFunc2(void *ctx ATTRIBUTE_UNUSED, const char *msg, ...) {
       va_list args;
       va_start(args, msg);
       throw Exception(0, 0,
                   0,
                   msg, args);
       va_end(args);
   }
   #endif
   */
   
   void pa_globals_destroy(void *) {
           try {
   #ifdef XML
                   GdomeException exc;
                   gdome_di_unref (domimpl, &exc);
   #endif
                   if(cache_managers)
                           cache_managers->~Cache_managers();
   
                   charsets->~Charsets();
                   
           } catch(const Exception& e) {
                   SAPI::die("pa_globals_destroy failed: %s", e.comment());
           }
   }
   
   void pa_globals_init(Pool& pool) {
           pool.register_cleanup(pa_globals_destroy, 0);
   
           #undef NEW
           #define NEW new(pool)
   
         // hex value          // hex value
         setup_hex_value();          setup_hex_value();
   
         #define NEW_STRING(name, value)  name=new(pool) String(pool); name->APPEND_CONST(value)  
         #define LOCAL_STRING(name, value)  String name(pool); name.APPEND_CONST(value)  
   
         // names          // names
         NEW_STRING(content_type_name, CONTENT_TYPE_NAME);          content_type_name=NEW String(pool, CONTENT_TYPE_NAME);
         NEW_STRING(body_name, BODY_NAME);          charset_name=NEW String(pool, CHARSET_NAME);
           body_name=NEW String(pool, BODY_NAME);
           value_name=NEW String(pool, VALUE_NAME);
           expires_name=NEW String(pool, EXPIRES_NAME);
           path_name=NEW String(pool, PATH_NAME);
           name_name=NEW String(pool, NAME_NAME);
           size_name=NEW String(pool, SIZE_NAME);
           text_name=NEW String(pool, TEXT_NAME);
   
         NEW_STRING(exception_method_name, EXCEPTION_METHOD_NAME);          exception_method_name=NEW String(pool, EXCEPTION_METHOD_NAME);
           post_process_method_name=NEW String(pool, POST_PROCESS_METHOD_NAME);
   
         NEW_STRING(unnamed_name, UNNAMED_NAME);          content_disposition_name=NEW String(pool, CONTENT_DISPOSITION_NAME);
         empty_string=new(pool) String(pool);           content_disposition_filename_name=NEW String(pool, CONTENT_DISPOSITION_FILENAME_NAME);
   
         NEW_STRING(auto_method_name, AUTO_METHOD_NAME);          unnamed_name=NEW String(pool, UNNAMED_NAME);
         NEW_STRING(main_method_name, MAIN_METHOD_NAME);  
   
         NEW_STRING(root_class_name, ROOT_CLASS_NAME);          auto_method_name=NEW String(pool, AUTO_METHOD_NAME);
         NEW_STRING(main_class_name, MAIN_CLASS_NAME);          main_method_name=NEW String(pool, MAIN_METHOD_NAME);
         NEW_STRING(table_class_name, TABLE_CLASS_NAME);  
         NEW_STRING(env_class_name, ENV_CLASS_NAME);       
         NEW_STRING(form_class_name, FORM_CLASS_NAME);     
         NEW_STRING(request_class_name, REQUEST_CLASS_NAME);       
         NEW_STRING(response_class_name, RESPONSE_CLASS_NAME);  
   
         NEW_STRING(result_var_name, RESULT_VAR_NAME);          main_class_name=NEW String(pool, MAIN_CLASS_NAME);
   
           result_var_name=NEW String(pool, RESULT_VAR_NAME);
           match_var_name=NEW String(pool, MATCH_VAR_NAME);
           string_pre_match_name=NEW String(pool, STRING_PRE_MATCH_NAME);
           string_match_name=NEW String(pool, STRING_MATCH_NAME);
           string_post_match_name=NEW String(pool, STRING_POST_MATCH_NAME);
   
         NEW_STRING(limits_name, LIMITS_NAME);  
         NEW_STRING(post_max_size_name, POST_MAX_SIZE_NAME);  
   
         NEW_STRING(defaults_name, DEFAULTS_NAME);          charsets_name=NEW String(pool, CHARSETS_NAME);
           mime_types_name=NEW String(pool, MIME_TYPES_NAME);
           vfile_mime_type_name=NEW String(pool, VFILE_MIME_TYPE_NAME);
           origins_mode_name=NEW String(pool, ORIGINS_MODE_NAME);
   
           class_path_name=NEW String(pool, CLASS_PATH_NAME);
   
           //^switch ^case
           switch_data_name=NEW String(pool, SWITCH_DATA_NAME);
           case_default_value=NEW String(pool, CASE_DEFAULT_VALUE);
   
           // sql
           sql_limit_name=NEW String(pool, SQL_LIMIT_NAME);
           sql_offset_name=NEW String(pool, SQL_OFFSET_NAME);
           sql_default_name=NEW String(pool, SQL_DEFAULT_NAME);
   
           // charsets
           charset_UTF8_name=NEW String(pool, CHARSET_UTF8_NAME);
   
           // hash
           hash_default_element_name=NEW String(pool, HASH_DEFAULT_ELEMENT_NAME);
   
   
         // hashes          // hashes
         untaint_lang_name2enum=new(pool) Hash(pool);          untaint_lang_name2enum=NEW Hash(pool);
         LOCAL_STRING(as_is, "as-is");            #define ULN(cstr, LANG) \
         untaint_lang_name2enum->put(as_is, (int)String::Untaint_lang::AS_IS);                  untaint_lang_name2enum->put(*NEW String(pool, cstr), (int)String::UL_##LANG);
         LOCAL_STRING(table, "table");          ULN("as-is", AS_IS);
         untaint_lang_name2enum->put(table, (int)String::Untaint_lang::TABLE);          ULN("file-spec", FILE_SPEC);
         LOCAL_STRING(sql, "sql");          ULN("http-header", HTTP_HEADER);
         untaint_lang_name2enum->put(sql, (int)String::Untaint_lang::SQL);          ULN("mail-header", MAIL_HEADER);
         LOCAL_STRING(js, "js");          ULN("uri", URI);
         untaint_lang_name2enum->put(js, (int)String::Untaint_lang::JS);          ULN("table", TABLE);
         LOCAL_STRING(html, "html");          ULN("sql", SQL);
         untaint_lang_name2enum->put(html, (int)String::Untaint_lang::HTML);          ULN("js", JS);
         LOCAL_STRING(html_typo, "html-typo");          ULN("xml", XML);
         untaint_lang_name2enum->put(html_typo, (int)String::Untaint_lang::HTML_TYPO);          ULN("html", HTML);
           ULN("optimized-html", HTML|String::UL_OPTIMIZE_BIT);
         // read-only stateless classes  
         initialize_string_class(pool, *(string_class=new(pool) VStateless_class(pool)));  string_class->freeze();          // charsets
         initialize_double_class(pool, *(double_class=new(pool) VStateless_class(pool)));  double_class->freeze();          charsets=NEW Charsets(pool);
         initialize_int_class(pool, *(int_class=new(pool) VStateless_class(pool)));  int_class->freeze();          charsets->put(*charset_UTF8_name, 
         initialize_table_class(pool, *(table_class=new(pool) VStateless_class(pool)));  table_class->freeze();                  utf8_charset=NEW Charset(pool, *charset_UTF8_name, 0/*no file=system*/));
   
         // read-only stateless base classes          // Status registration, must be initialized before all registrants
         initialize_env_base_class(pool, *(env_base_class=new(pool) VStateless_class(pool)));  env_base_class->set_name(*env_class_name);  env_base_class->freeze();          cache_managers=NEW Cache_managers(pool);
         initialize_form_base_class(pool, *(form_base_class=new(pool) VStateless_class(pool)));  form_base_class->set_name(*form_class_name);  form_base_class->freeze();  
         initialize_request_base_class(pool, *(request_base_class=new(pool) VStateless_class(pool)));  request_base_class->set_name(*request_class_name);  request_base_class->freeze();          // SQL driver manager
         initialize_response_base_class(pool, *(response_base_class=new(pool) VStateless_class(pool)));  response_base_class->set_name(*response_class_name);  response_base_class->freeze();          cache_managers->put(*NEW String(pool, "sql"), 
                   SQL_driver_manager=NEW SQL_Driver_manager(pool));
   
   #ifdef DB2
           // DB driver manager
           cache_managers->put(*NEW String(pool, "db"), 
                   DB_manager=NEW DB_Manager(pool));
   #endif
   
   #ifdef XML
           // initializing xml libs
   
           /* First I get a DOMImplementation reference */
           domimpl = gdome_di_mkref ();
       /*
        * Register the EXSLT extensions and the test module
        */
       exsltRegisterAll();
       xsltRegisterTestModule();
       xmlDefaultSAXHandlerInit();
       /*
        * disable CDATA from being built in the document tree
        */
       xmlDefaultSAXHandler.cdataBlock = NULL;
   
           /*
            * Initialization function for the XML parser.
            * This is not reentrant. Call once before processing in case of
            * use in multithreaded programs.
           */
           xmlInitParser();
           
           // Bit in the loadsubset context field to tell to do ID/REFs lookups 
           xmlLoadExtDtdDefaultValue |= XML_DETECT_IDS;
           // Bit in the loadsubset context field to tell to do complete the elements attributes lists 
           // with the ones defaulted from the DTDs 
       //never added yet xmlLoadExtDtdDefaultValue |= XML_COMPLETE_ATTRS;
   
   ///     xmlSetGenericErrorFunc(0, xmlGenericErrorDefaultFunc2);
   
           // XSLT stylesheet manager
           cache_managers->put(*NEW String(pool, "stylesheet"), 
                   stylesheet_manager=NEW Stylesheet_manager(pool));
   #endif
 }  }
   
   #if defined(XML) && defined(_MSC_VER)
   #       define XML_LIBS "/parser3project/win32xml"
   #       pragma comment(lib, XML_LIBS "/glib/lib/libglib-1.3-11.lib")
   #       pragma comment(lib, XML_LIBS "/libxml2-2.4.12/win32/dsp/libxml2_so/libxml2.lib")
   #       pragma comment(lib, XML_LIBS "/libxslt-1.0.9/win32/dsp/libexslt_so/libexslt.lib")
   #       pragma comment(lib, XML_LIBS "/libxslt-1.0.9/win32/dsp/libxslt_a/libxslt.lib")
   #       ifdef _DEBUG
   #               pragma comment(lib, XML_LIBS "/gdome2-0.7.0/win32/dsp/Debug/libgdome.lib")
   #       else
   #               pragma comment(lib, XML_LIBS "/gdome2-0.7.0/win32/dsp/Release/libgdome.lib")
   #       endif
   #endif
   
   
   #if defined(DB2) && defined(_MSC_VER)
   #       define LIBDB2_WIN32_BUILD "/parser3project/win32db/lib"
   #       ifdef _DEBUG
   #               pragma comment(lib, LIBDB2_WIN32_BUILD "/debug/libdb.lib")
   #       else
   #               pragma comment(lib, LIBDB2_WIN32_BUILD "/release/libdb.lib")
   #       endif
   #endif
Removed from v.1.9  
changed lines
  Added in v.1.100

E-mail: