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

Diff for /parser3/src/main/pa_charsets.C between versions 1.9 and 1.27

version 1.9, 2002/08/01 11:26:49 version 1.27, 2024/11/04 03:53:25
Line 1 Line 1
 /** @file  /** @file
         Parser: sql driver manager implementation.          Parser: sql driver manager implementation.
   
         Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)          Copyright (c) 2001-2024 Art. Lebedev Studio (http://www.artlebedev.com)
         Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)          Authors: Konstantin Morshnev <moko@design.ru>, Alexandr Petrosian <paf@design.ru>
 */  */
   
 static const char* IDENT_CHARSETS_C="$Id$";  
   
 #include "pa_charsets.h"  #include "pa_charsets.h"
 #include "pa_charset.h"  
   volatile const char * IDENT_PA_CHARSETS_C="$Id$" IDENT_PA_CHARSETS_H;
   
   // defines for globals
   
   #define CHARSET_UTF8_NAME "UTF-8"
   
 // globals  // globals
   
 Charsets *charsets;  Charset pa_UTF8_charset(0, *new String(CHARSET_UTF8_NAME), 0/*no file=system*/);
   
 //  Charsets pa_charsets;
   
 Charsets::Charsets(Pool& apool) : Hash(apool) {  // methods
 }  
   
 static void destroy_charset(const Hash::Key& , Hash::Val *& value, void *) {  Charsets::Charsets() {
         static_cast<Charset *>(value)->~Charset();                put(pa_UTF8_charset.NAME(), &pa_UTF8_charset);
 }  }
   
 Charsets::~Charsets() {  Charset& Charsets::get(String::Body ANAME) {
         for_each(destroy_charset);          ANAME=str_upper(ANAME.cstr(), ANAME.length());
           if(Charset* result=HashString<value_type>::get(ANAME))
                   return *result;
           else
                   throw Exception(PARSER_RUNTIME, new String(ANAME, String::L_TAINTED), "unknown charset");
 }  }
   
 Charset& Charsets::get_charset(const String& name) {  Charset& Charsets::get_direct(const char *ANAME) {
         if(Charset *result=(Charset *)get(name))          if(Charset* result=HashString<value_type>::get(ANAME))
                 return *result;                  return *result;
         else          else
                 throw Exception("parser.runtime",                  throw Exception(PARSER_RUNTIME, new String(ANAME, String::L_TAINTED), "unknown charset");
                         &name,  }
                         "unknown charset");  
   Charset* Charsets::checkBOM(char *&body,size_t &body_size, Charset* enforced_charset){
           if((!enforced_charset || enforced_charset->isUTF8()) && (body_size>=3 && strncmp(body, "\xEF\xBB\xBF", 3)==0)){
                   // skip UTF-8 signature (BOM code)
                   body+=3;
                   body_size-=3;
                   return &pa_UTF8_charset;
           }
           return enforced_charset;
 }  }
   
 void Charsets::load_charset(const String& request_name, const String& request_file_spec) {  void Charsets::load_charset(Request_charsets& charsets, String::Body ANAME, const String& afile_spec) {
           ANAME=str_upper(ANAME.cstr(), ANAME.length());
         //we know that charset?          //we know that charset?
         if(get(request_name))           if(HashString<value_type>::get(ANAME))
                 return; // don't load it then                  return; // don't load it then
   
         const char *name_cstr=request_name.cstr();          put(ANAME, new Charset(&charsets, ANAME, &afile_spec));
         char *global_name_cstr=(char *)malloc(strlen(name_cstr)+1);  
         strcpy(global_name_cstr, name_cstr);  
         // make global_name string on global pool  
         String& global_name=*NEW String(pool(), global_name_cstr);  
           
         put(global_name, NEW Charset(pool(), global_name, &request_file_spec));  
 }  }
Removed from v.1.9  
changed lines
  Added in v.1.27

E-mail: