Diff for /parser3/src/main/untaint.C between versions 1.113 and 1.115.2.12.2.1

version 1.113, 2002/12/15 15:58:34 version 1.115.2.12.2.1, 2003/03/18 15:14:19
Line 1 Line 1
 /** @file  /** @file
         Parser: String class part: untaint mechanizm.          Parser: String class part: untaint mechanizm.
   
         Copyright(c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)          Copyright(c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com)
         Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)          Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */  */
   
 static const char* IDENT_UNTAINT_C="$Date$";  static const char* IDENT_UNTAINT_C="$Date$";
   
 #include "pa_pool.h"  
 #include "pa_string.h"  #include "pa_string.h"
 #include "pa_hash.h"  #include "pa_hash.h"
 #include "pa_exception.h"  #include "pa_exception.h"
Line 17  static const char* IDENT_UNTAINT_C="$Dat Line 17  static const char* IDENT_UNTAINT_C="$Dat
 #include "pa_dictionary.h"  #include "pa_dictionary.h"
 #include "pa_common.h"  #include "pa_common.h"
 #include "pa_charset.h"  #include "pa_charset.h"
   #include "pa_request_charsets.h"
 //#define DEBUG_STRING_APPENDS_VS_EXPANDS  
   
 #ifdef DEBUG_STRING_APPENDS_VS_EXPANDS  
 ulong string_string_shortcut_economy=0;  
 #endif  
   
 #define escape(action) \  #define escape(action) \
         { \          { \
                 const char *src=row->item.ptr; \                  const char* src=fragment->ptr; \
                 for(int size=row->item.size; size--; src++) \                  for(int size=fragment->size; size--; src++) \
                         action \                          action \
         }          }
 #define _default  default: *dest++=*src; break  #define _default  default: *dest++=*src; break
 #define encode(need_encode_func, prefix)  \  #define encode(need_encode_func, prefix)  \
                         if(need_encode_func(*src)) { \                          if(need_encode_func(*src)) { \
                                 static const char *hex="0123456789ABCDEF"; \                                  static const char* hex="0123456789ABCDEF"; \
                                 char chunk[3]={prefix}; \                                  char chunk[3]={prefix}; \
                                 chunk[1]=hex[((unsigned char)*src)/0x10]; \                                  chunk[1]=hex[((unsigned char)*src)/0x10]; \
                                 chunk[2]=hex[((unsigned char)*src)%0x10]; \                                  chunk[2]=hex[((unsigned char)*src)%0x10]; \
Line 71  inline bool need_http_header_encode(unsi Line 66  inline bool need_http_header_encode(unsi
   
 //  //
   
 static const char * String_Untaint_lang_name[]={  static const char*  String_Untaint_lang_name[]={
         "U", ///< zero value handy for hash lookup @see untaint_lang_name2enum          "U", ///< zero value handy for hash lookup @see untaint_lang_name2enum
         "C", ///< clean          "C", ///< clean
         "T",  ///< tainted, untaint language as assigned later           "T",  ///< tainted, untaint language as assigned later 
Line 131  quoted-pair    = "\" CHAR Line 126  quoted-pair    = "\" CHAR
   
   if(strchr("()<>@,;:\\\"/[]?={} \t", *ptr))    if(strchr("()<>@,;:\\\"/[]?={} \t", *ptr))
 */  */
 inline bool need_quote_http_header(const char *ptr, size_t size) {  inline bool need_quote_http_header(const char* ptr, size_t size) {
         for(; size--; ptr++)          for(; size--; ptr++)
                 if(strchr(";\\\"= \t" /* excluded ()<>@, :/ ? []{} */, *ptr))                  if(strchr(";\\\"= \t" /* excluded ()<>@, :/ ? []{} */, *ptr))
                         return true;                          return true;
Line 140  inline bool need_quote_http_header(const Line 135  inline bool need_quote_http_header(const
   
 //#include "pa_sapi.h"  //#include "pa_sapi.h"
 /**   /** 
         appends other String,          appends to other String,
         marking all tainted pieces of it with @a lang.          marking all tainted pieces of it with @a lang.
         or marking ALL pieces of it with a @a lang when @a forced to,          or marking ALL pieces of it with a @a lang when @a forced to,
         and propagating OPTIMIZE language bit.          and propagating OPTIMIZE language bit.
   
     using architecture advantage: after string-to-string-append string never modified.  
         algorithm:  
         if no language-change specified and src not yet appended to some other string[last_chunk!=0]  
                 shrinking dest last_chunk[preparing it for linking],  
                 ///shrinking src last_chunk[preparing it to be linked, consequent dest.appends would go there],  
                 linking[dest.last_chunk = src.head.chunk]  
         if some language-change specified or src already appended to some other string[last_chunk==0]  
                 cloning pieces.  
 */  */
 String& String::append(const String& src, uchar lang, bool forced) {  String& String::append_to(String& dest, String_UL lang, bool forced) const {
         if(!last_chunk) // growth stopped [we're appended as string to somebody]          if(is_empty())
                 throw Exception(0,                  return dest;
                         this,  
                         "string growth stopped (append string)");          // without language-chage string?
           if(lang==UL_PASS_APPENDED) {
         if(src.is_empty())                  // can simply append elements
                 return *this;                  ssize_t delta=fused-(dest.fallocated-dest.fused);
                   if(delta>0) // they don't fit?
         // without language-chage, not-appended-before, big[not fitting our tail] string?                          dest.expand(delta);
         if(lang==UL_PASS_APPENDED   
                 && src.last_chunk                  // felements[fused...]=src.felements[0..fused], fused+=src.fused
                 && (uint(&last_chunk->rows[last_chunk->count]-append_here) < src.used_rows())) {                  memcpy(&dest.felements[dest.fused], felements, sizeof(felements[0])*fused);
 #ifdef DEBUG_STRING_APPENDS_VS_EXPANDS                  dest.fused+=fused;
                 string_string_shortcut_economy+=src.used_rows()*sizeof(String::Chunk::Row);                  dest.fsize+=fsize;
 #endif                  return dest;
   
                 // using fact:   
                 // src.head.chunk.count initally equeals this.head.chunk.count and shrinks-only,   
                 // so can't be more than this.head.chunk.count,   
                 // which means that we know that   
                 // src.head.chunk would fit into this.head.chunk  
                 if(is_empty()) { // our head.chunk is empty  
                         // they have more than head.chunk? we need all head.chunk : we need only filled-part of head.chunk  
                         Chunk *src_head_link=src.head.chunk.rows[src.head.chunk.count].link;  
                         size_t head_count=src_head_link?src.head.chunk.count:(src.append_here-src.head.chunk.rows);  
                         // "your head.chunk is my head.chunk"  
                         memcpy(head.chunk.rows, src.head.chunk.rows, sizeof(Chunk::Row)*(head_count));  
                         if(src_head_link) {  
                                 // "your body is my body"  
                                 head.chunk.rows[head.chunk.count=head_count].link=src_head_link;  
                                 // "your last_chunk is mine now"  
                                 last_chunk=src.last_chunk;  
                                 // "your append_here is mine now"  
                                 append_here=src.append_here;  
                         } else {  
                                 // "your last_chunk is mine now"  
                                 last_chunk=&head.chunk;  
                                 // "your append_here is recalc-mine now"  
                                 append_here=head.chunk.rows+head_count;  
                         }  
                 } else { // our head.chunk contains something  
                         // "chopping off my tail-reserve"  
                         last_chunk->count=append_here-last_chunk->rows;  
                         // "you is my tail"  
                         append_here->link=&src.head.chunk;  
                         // "your last_chunk is mine now"  
                         last_chunk=src.last_chunk;  
                         // "your append_here is mine now"  
                         append_here=src.append_here;  
                 }  
   
                 // stop-growing mark  
                 src.last_chunk=0;  
                 return *this;  
         }          }
   
         // manually unrolled code to avoid do{if(const)} constructs          // manually unrolled code to avoid do{if(const)} constructs
         if(forced)           if(forced) 
                 STRING_SRC_FOREACH_ROW(                  STRING_FOREACH_FRAGMENT(
                         APPEND(row->item.ptr, row->item.size,                           dest.APPEND(fragment->ptr, fragment->size, 
                                 lang, //forcing passed lang                                  lang, //forcing passed lang
                                 row->item.origin.file, row->item.origin.line);                                  fragment->origin.file, fragment->origin.line);
                 )                  )
         else if(lang==UL_PASS_APPENDED)           else if(lang==UL_PASS_APPENDED) 
                 STRING_SRC_FOREACH_ROW(                  STRING_FOREACH_FRAGMENT(
                         APPEND(row->item.ptr, row->item.size,                           dest.APPEND(fragment->ptr, fragment->size, 
                                 row->item.lang, // passing item's lang                                  fragment->lang, // passing item's lang
                                 row->item.origin.file, row->item.origin.line);                                  fragment->origin.file, fragment->origin.line);
                 )                  )
         else if(lang&UL_OPTIMIZE_BIT) // main idea here          else if(lang&UL_OPTIMIZE_BIT) // main idea here
                 // tainted piece would get OPTIMIZED bit from 'lang'                  // tainted piece would get OPTIMIZED bit from 'lang'
                 // clean piece would be marked OPTIMIZED manually                  // clean piece would be marked OPTIMIZED manually
                 // pieces with determined languages [not tainted|clean] would retain theirs langs                  // pieces with determined languages [not tainted|clean] would retain theirs langs
                 STRING_SRC_FOREACH_ROW(                  STRING_FOREACH_FRAGMENT(
                         APPEND(row->item.ptr, row->item.size,                           dest.APPEND(fragment->ptr, fragment->size, 
                                 row->item.lang==UL_TAINTED?lang:(                                  fragment->lang==UL_TAINTED?lang:(
                                         row->item.lang==UL_CLEAN?UL_CLEAN|UL_OPTIMIZE_BIT: // ORing with OPTIMIZED flag                                          fragment->lang==UL_CLEAN?UL_CLEAN|UL_OPTIMIZE_BIT: // ORing with OPTIMIZED flag
                                                 row->item.lang                                                  fragment->lang
                                 ),                                   ), 
                                 row->item.origin.file, row->item.origin.line);                                  fragment->origin.file, fragment->origin.line);
                 )                  )
         else          else
                 STRING_SRC_FOREACH_ROW(                  STRING_FOREACH_FRAGMENT(
                         APPEND(row->item.ptr, row->item.size,                           dest.APPEND(fragment->ptr, fragment->size, 
                                 row->item.lang==UL_TAINTED?lang:row->item.lang,                                  fragment->lang==UL_TAINTED?lang:fragment->lang,
                                 row->item.origin.file, row->item.origin.line);                                  fragment->origin.file, fragment->origin.line);
                 );                  );
 /*  
                         for(Chunk::Row *row=last_chunk->rows; row<append_here; row++)          return dest;
                                 if(row->link==(void*)0xcdcdcdcd)  
                                         _asm int 3;*/  
         return *this;  
 }  }
   
 size_t String::cstr_bufsize(Untaint_lang lang,  size_t String::cstr_bufsize(Untaint_lang lang,
                                                         SQL_Connection *connection,                                                          SQL_Connection *connection,
                                                         Charset *buf_charset) const {                                                          const Request_charsets *charsets) const {
         size_t dest=1; // for terminating 0          size_t dest=1; // for terminating 0
         STRING_FOREACH_ROW(          STRING_FOREACH_FRAGMENT(
                 uchar to_lang=lang==UL_UNSPECIFIED?row->item.lang:lang;                  String_UL to_lang=lang==UL_UNSPECIFIED?fragment->lang:lang;
   
                 switch(to_lang & ~UL_OPTIMIZE_BIT) {                  switch(to_lang & ~UL_OPTIMIZE_BIT) {
                 case UL_CLEAN:                  case UL_CLEAN:
Line 267  size_t String::cstr_bufsize(Untaint_lang Line 211  size_t String::cstr_bufsize(Untaint_lang
                         // for ^process{body} evaluation                          // for ^process{body} evaluation
   
                         // tainted, untaint language: as-is                          // tainted, untaint language: as-is
                         dest+=row->item.size;                          dest+=fragment->size;
                         break;                          break;
                 case UL_FILE_SPEC:                  case UL_FILE_SPEC:
                         // tainted, untaint language: file [name]                          // tainted, untaint language: file [name]
                         dest+=row->item.size*3/* worst: Z->%XX */;                          dest+=fragment->size*3/* worst: Z->%XX */;
                         break;                          break;
                 case UL_URI:                  case UL_URI:
                         // tainted, untaint language: uri                          // tainted, untaint language: uri
                         dest+=row->item.size*6*3/* worst utf8 x worst Z->%XX */;                          dest+=fragment->size*6*3/* worst utf8 x worst Z->%XX */;
                         break;                          break;
                 case UL_HTTP_HEADER:                  case UL_HTTP_HEADER:
                         // tainted, untaint language: http-field-content-text                          // tainted, untaint language: http-field-content-text
                         dest+=row->item.size*3/* worst: Z->%XX */;                          dest+=fragment->size*3/* worst: Z->%XX */;
                         break;                          break;
                 case UL_MAIL_HEADER:                  case UL_MAIL_HEADER:
                         // tainted, untaint language: mail-header                          // tainted, untaint language: mail-header
                         if(buf_charset) {                          if(charsets) {
                                 int parts_count=1;                                  int parts_count=1;
                                 const char *prev=row->item.ptr;                                  const char* prev=fragment->ptr;
                                 size_t size=row->item.size;                                  size_t size=fragment->size;
                                 while(const char *comma_at=(const char*)memchr(prev, ',', size)) {                                  while(const char* comma_at=(const char*)memchr(prev, ',', size)) {
                                         parts_count++;                                          parts_count++;
                                         size-=comma_at-prev;                                          size-=comma_at-prev;
                                         prev=comma_at+1;                                          prev=comma_at+1;
                                 }                                  }
                                 // Subject: Re: parser3: =?koi8-r?Q?=D3=C5=CD=C9=CE=C1=D2?=                                  // Subject: Re: parser3: =?koi8-r?Q?=D3=C5=CD=C9=CE=C1=D2?=
                                 dest+=                                  dest+=
                                         row->item.size*3+                                          fragment->size*3+
                                         parts_count*(buf_charset->name().size()+MAX_STRING/* worst: =?charset?Q?=%XX?= */);                                          parts_count*(charsets->mail().name()->size()+MAX_STRING/* worst: =?charset?Q?=%XX?= */);
                         } else                          } else
                                 dest+=row->item.size;                                  dest+=fragment->size;
                         break;                          break;
                 case UL_TABLE:                   case UL_TABLE: 
                         // tainted, untaint language: table                          // tainted, untaint language: table
                         dest+=row->item.size;                          dest+=fragment->size;
                         break;                          break;
                 case UL_SQL:                  case UL_SQL:
                         // tainted, untaint language: sql                          // tainted, untaint language: sql
                         if(connection)                          if(connection)
                                 dest+=connection->quote(0, row->item.ptr, row->item.size);                                  dest+=connection->quote(0, fragment->ptr, fragment->size);
                         break;                          break;
                 case UL_JS:                  case UL_JS:
                         escape(switch(*src) {                          escape(switch(*src) {
Line 375  static bool mail_header_char_valid_withi Line 319  static bool mail_header_char_valid_withi
 }  }
 char *String::store_to(char *dest, Untaint_lang lang,   char *String::store_to(char *dest, Untaint_lang lang, 
                                            SQL_Connection *connection,                                             SQL_Connection *connection,
                                            Charset *store_to_charset,                                             const Request_charsets *charsets) const {
                                            const char *store_to_charset_name) const {  
         // WARNING:          // WARNING:
         //       before any changes check cstr_bufsize first!!!          //       before any changes check cstr_bufsize first!!!
         bool whitespace=true;          bool whitespace=true;
 //debug  //      STRING_FOREACH_FRAGMENT(
         const Chunk *chunk=&(*this).head.chunk;  \          element_type *last = felements+fused; element_type *fragment = felements; for(; fragment<last; fragment++) { 
         const Chunk::Row *row=chunk->rows; \  
         uint countdown=chunk->count; \  
         while(row!=(*this).append_here) { \  
                 if(countdown==0) { \  
                         chunk=row->link; \  
                         row=chunk->rows; \  
                         countdown=chunk->count; \  
                 };  
 //*/  
 //      STRING_FOREACH_ROW(  
   
                 uchar to_lang=lang==UL_UNSPECIFIED?row->item.lang:lang;                  String_UL to_lang=lang==UL_UNSPECIFIED?fragment->lang:lang;
   
                 char *start=dest;                  char *start=dest;
   
Line 408  char *String::store_to(char *dest, Untai Line 341  char *String::store_to(char *dest, Untai
                         // for ^process{body} evaluation                          // for ^process{body} evaluation
   
                         // tainted, untaint language: as-is                          // tainted, untaint language: as-is
                         memcpy(dest, row->item.ptr, row->item.size);                           memcpy(dest, fragment->ptr, fragment->size); 
                         dest+=row->item.size;                          dest+=fragment->size;
                         break;                          break;
                 case UL_FILE_SPEC:                  case UL_FILE_SPEC:
                         // tainted, untaint language: file [name]                          // tainted, untaint language: file [name]
                         escape(                          escape(
                                 // Macintosh has problems with small Russian letter 'r'                                  // Macintosh has problems with small Russian letter 'r'
                                 if( *src=='\xF0' && pool().get_source_charset().name()=="windows-1251" ) {                                  if( *src=='\xF0' && charsets && *charsets->source().name()=="windows-1251" ) {
                                         // fixing that letter for most common charset                                          // fixing that letter for most common charset
                                         to_char('p');                                            to_char('p');
                                         continue;                                   } else // fallback to default
                                 }                                          encode(need_file_encode, '_'); 
                                 // fallback to default  
                                 encode(need_file_encode, '_');   
                         );                          );
                         break;                          break;
                 case UL_URI:                  case UL_URI:
                         // tainted, untaint language: uri                          // tainted, untaint language: uri
                         const void *client_ptr;                          const void *client_ptr;
                         size_t client_size;                          size_t client_size;
                         Charset::transcode(pool(),                           if(charsets) 
                                 pool().get_source_charset(), row->item.ptr, row->item.size,                                  Charset::transcode(charsets->pool(), 
                                 pool().get_client_charset(), client_ptr, client_size);                                          charsets->source(), fragment->ptr, fragment->size,
                                           charsets->client(), client_ptr, client_size);
                           else {
                                   client_ptr=fragment->ptr; 
                                   client_size=fragment->size;
                           }
   
                         {                          {
                                 const char *src=(const char *)client_ptr;                                  const char* src=(const char* )client_ptr;
                                 for(int size=client_size; size--; src++)                                   for(int size=client_size; size--; src++) 
                                         encode(need_uri_encode, '%');                                          encode(need_uri_encode, '%');
                         }                          }
Line 446  char *String::store_to(char *dest, Untai Line 383  char *String::store_to(char *dest, Untai
                 case UL_MAIL_HEADER:                  case UL_MAIL_HEADER:
                         // tainted, untaint language: mail-header                          // tainted, untaint language: mail-header
                         // http://www.ietf.org/rfc/rfc2047.txt                          // http://www.ietf.org/rfc/rfc2047.txt
                         if(store_to_charset && store_to_charset_name) {                          if(charsets) {
                                 const void *mail_ptr;                                  const void *mail_ptr=fragment->ptr;
                                 size_t mail_size;                                  size_t mail_size=fragment->size;
                                 Charset::transcode(pool(),                                   const char* charset_name=charsets->mail().name()->cstr();
                                         pool().get_source_charset(), row->item.ptr, row->item.size,  
                                         *store_to_charset, mail_ptr, mail_size);  
   
                                 // Subject: Re: parser3: =?koi8-r?Q?=D3=C5=CD=C9=CE=C1=D2?=                                  // Subject: Re: parser3: =?koi8-r?Q?=D3=C5=CD=C9=CE=C1=D2?=
                                 const char *src=(const char *)mail_ptr;                                  const char* src=(const char* )mail_ptr;
                                 bool to_quoted_printable=false;                                  bool to_quoted_printable=false;
   
                                 bool email=false;                                  bool email=false;
                                 for(const char *end=src+mail_size; src<end; src++) {                                  for(const char* end=src+mail_size; src<end; src++) {
                                         //RFC   + An 'encoded-word' MUST NOT appear in any portion of an 'addr-spec'.                                          //RFC   + An 'encoded-word' MUST NOT appear in any portion of an 'addr-spec'.
                                         if(to_quoted_printable && (*src==',' || *src=='<')) {                                          if(to_quoted_printable && (*src==',' || *src=='<')) {
                                                 email=*src=='<';                                                  email=*src=='<';
Line 470  char *String::store_to(char *dest, Untai Line 405  char *String::store_to(char *dest, Untai
                                                 || to_quoted_printable && !mail_header_char_valid_within_Qencoded(*src)                                                  || to_quoted_printable && !mail_header_char_valid_within_Qencoded(*src)
                                                 )) {                                                  )) {
                                                 if(!to_quoted_printable) {                                                  if(!to_quoted_printable) {
                                                         dest+=sprintf(dest, "=?%s?Q?", store_to_charset_name);                                                          dest+=sprintf(dest, "=?%s?Q?", charset_name.get());
                                                         to_quoted_printable=true;                                                          to_quoted_printable=true;
                                                 }                                                  }
                                                 //RFC Upper case should be used for hexadecimal digits "A" through "F"                                                  //RFC Upper case should be used for hexadecimal digits "A" through "F"
Line 487  char *String::store_to(char *dest, Untai Line 422  char *String::store_to(char *dest, Untai
                                         dest+=sprintf(dest, "?=");                                          dest+=sprintf(dest, "?=");
                                                   
                         } else {                          } else {
                                 memcpy(dest, row->item.ptr, row->item.size);                                   memcpy(dest, fragment->ptr, fragment->size); 
                                 dest+=row->item.size;                                  dest+=fragment->size;
                         }                          }
                         break;                          break;
                 case UL_TABLE:                   case UL_TABLE: 
Line 502  char *String::store_to(char *dest, Untai Line 437  char *String::store_to(char *dest, Untai
                 case UL_SQL:                  case UL_SQL:
                         // tainted, untaint language: sql                          // tainted, untaint language: sql
                         if(connection)                          if(connection)
                                 dest+=connection->quote(dest, row->item.ptr, row->item.size);                                  dest+=connection->quote(dest, fragment->ptr, fragment->size);
                         else                          else
                                 throw Exception(0,                                  throw Exception(Exception::undefined_type,
                                         this,                                          Exception::undefined_source,
                                         "untaint in SQL language failed - no connection specified");                                          "untaint in SQL language failed - no connection specified");
                         break;                          break;
                 case UL_JS:                  case UL_JS:
Line 538  char *String::store_to(char *dest, Untai Line 473  char *String::store_to(char *dest, Untai
                         });                          });
                         break;                          break;
                 default:                  default:
                         throw Exception(0,                           throw Exception(Exception::undefined_type, 
                                 this,                                   Exception::undefined_source, 
                                 "unknown untaint language #%d",                                   "unknown untaint language #%d", 
                                         static_cast<int>(to_lang)); // should never                                          static_cast<int>(to_lang)); // should never
                         break; // never                          break; // never
Line 563  char *String::store_to(char *dest, Untai Line 498  char *String::store_to(char *dest, Untai
                                         break;                                          break;
                                 };                                  };
                 } else // piece without optimization                  } else // piece without optimization
 //debug  
                         whitespace=false;                          whitespace=false;
                 row++; countdown--; \  //      );
         }           }
 /*  
         );  
 */  
         return dest;          return dest;
 }  }
   
 char *String::cstr_debug_origins() const {  char *String::cstr_debug_origins() const {
         //_asm int 3;          //_asm int 3;
         char *result=(char *)malloc(size()+used_rows()*MAX_STRING*2);          char *result=new char[size()+fused*MAX_STRING*2];
         char *dest=result;          char *dest=result;
                   
         STRING_FOREACH_ROW(          STRING_FOREACH_FRAGMENT(
 IFNDEF_NO_STRING_ORIGIN(  IFNDEF_NO_STRING_ORIGIN(
                 if(row->item.origin.file)                  if(fragment->origin.file)
                         dest+=sprintf(dest, ORIGIN_FILE_LINE_FORMAT,                          dest+=sprintf(dest, ORIGIN_FILE_LINE_FORMAT,
                                 row->item.origin.file,                                  fragment->origin.file,
                                 1+row->item.origin.line);                                  1+fragment->origin.line);
                 else                  else
                         dest+=sprintf(dest, "<unknown>");                          dest+=sprintf(dest, "<unknown>");
 );  );
                 uchar show_lang=row->item.lang & ~UL_OPTIMIZE_BIT;                  String_UL show_lang=fragment->lang & ~UL_OPTIMIZE_BIT;
                 if(show_lang>=sizeof(String_Untaint_lang_name)/sizeof(String_Untaint_lang_name[0]))                  if(show_lang>=sizeof(String_Untaint_lang_name)/sizeof(String_Untaint_lang_name[0]))
                         throw Exception(0,                           throw Exception(Exception::undefined_type, 
                                 this,                                   Exception::undefined_source, 
                                 "unknown untaint language #%d",                                   "unknown untaint language #%d", 
                                         static_cast<int>(show_lang)); // sould never                                          static_cast<int>(show_lang)); // sould never
   
                 dest+=sprintf(dest, "#%s%s: ",                  dest+=sprintf(dest, "#%s%s: ",
                         String_Untaint_lang_name[show_lang],                          String_Untaint_lang_name[show_lang],
                         row->item.lang & UL_OPTIMIZE_BIT?".O":"");                          fragment->lang & UL_OPTIMIZE_BIT?".O":"");
                 char *dest_after_origins=dest;                  char *dest_after_origins=dest;
   
                 memcpy(dest, row->item.ptr, row->item.size);                   memcpy(dest, fragment->ptr, fragment->size); 
                 dest+=row->item.size;                  dest+=fragment->size;
   
                 remove_crlf(dest_after_origins, dest);                  remove_crlf(dest_after_origins, dest);
                 to_char('\n');                  to_char('\n');

Removed from v.1.113  
changed lines
  Added in v.1.115.2.12.2.1


E-mail: