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

Diff for /parser3/src/main/untaint.C between versions 1.38 and 1.51

version 1.38, 2001/04/10 11:24:00 version 1.51, 2001/05/19 19:52:38
Line 8 Line 8
         $Id$          $Id$
 */  */
   
 #include "pa_config_includes.h"  
   
 #include "pa_pool.h"  #include "pa_pool.h"
 #include "pa_string.h"  #include "pa_string.h"
 #include "pa_hash.h"  #include "pa_hash.h"
Line 49  inline bool need_file_encode(unsigned ch Line 47  inline bool need_file_encode(unsigned ch
 #ifdef WIN32  #ifdef WIN32
                 ":\\~"                  ":\\~"
 #endif  #endif
                 "./()_", c);                  "./()_-", c);
 }  }
 inline bool need_uri_encode(unsigned char c){  inline bool need_uri_encode(unsigned char c){
     if((c>='0') &&(c<='9') ||(c>='A') &&(c<='Z') ||(c>='a') &&(c<='z'))       if((c>='0') &&(c<='9') ||(c>='A') &&(c<='Z') ||(c>='a') &&(c<='z')) 
Line 77  static bool typo_present(Array::Item *va Line 75  static bool typo_present(Array::Item *va
                 partial==1; // typo left column starts 'src'                  partial==1; // typo left column starts 'src'
 }  }
   
 /**  /*
         @test optimize whitespaces for all but 'html'  
         @todo fix theoretical \n mem overrun in TYPO replacements  HTTP-header    = field-name ":" [ field-value ] CRLF
         @test mail-header  
          field-name     = token
          field-value    = *( field-content | LWS )
   
          field-content  = <the OCTETs making up the field-value
                           and consisting of either *TEXT or combinations
                           of token, tspecials, and quoted-string>
   
   
   
   word           = token | quoted-string
   
   token          = 1*<any CHAR except CTLs or tspecials>
   
   
   
   tspecials      = "(" | ")" | "<" | ">" | "@"
                         | "," | ";" | ":" | "\" | <">
                         | "/" | "[" | "]" | "?" | "="
                         | "{" | "}" | SP | HT
   
   SP             = <US-ASCII SP, space (32)>
   HT             = <US-ASCII HT, horizontal-tab (9)>
   
   LWS            = [CRLF] 1*( SP | HT )
   TEXT           = <any OCTET except CTLs,
                           but including LWS>
   
   quoted-pair    = "\" CHAR
   
     if(strchr("()<>@,;:\\\"/[]?={} \t", *ptr))
 */  */
 char *String::store_to(char *dest, Untaint_lang lang, SQL_Connection *connection) const {  inline bool need_quote_http_header(const char *ptr, size_t size) {
           for(; size--; ptr++)
                   if(strchr(";\\\"= \t" /* excluded ()<>@, :/ ? []{} */, *ptr))
                           return true;
           return false;
   }
   
   /// @todo maybe additional check "are all pieces are clean?" would be profitable?
   size_t String::cstr_bufsize(Untaint_lang lang) const {
           return (lang==UL_AS_IS?size():size()*UNTAINT_TIMES_BIGGER) +1;
   }
   
   ///     @todo fix theoretical \n mem overrun in TYPO replacements
   char *String::store_to(char *dest, Untaint_lang lang, 
                                              SQL_Connection *connection,
                                              const char *charset) const {
         // $MAIN:html-typo table          // $MAIN:html-typo table
         Table *user_typo_table=static_cast<Table *>(pool().tag());          Table *user_typo_table=static_cast<Table *>(pool().tag());
         Table *typo_table=user_typo_table?user_typo_table:default_typo_table;          Table *typo_table=user_typo_table?user_typo_table:default_typo_table;
   
           bool whitespace=true;
         const Chunk *chunk=&head;           const Chunk *chunk=&head; 
         do {          do {
                 const Chunk::Row *row=chunk->rows;                  const Chunk::Row *row=chunk->rows;
Line 99  char *String::store_to(char *dest, Untai Line 143  char *String::store_to(char *dest, Untai
                         switch(lang==UL_UNSPECIFIED?row->item.lang:lang) {                          switch(lang==UL_UNSPECIFIED?row->item.lang:lang) {
                         case UL_CLEAN:                          case UL_CLEAN:
                                 // clean piece                                  // clean piece
                                   { // optimizing whitespace
                                           const char *src=row->item.ptr; 
                                           for(int size=row->item.size; size--; src++)
                                                   switch(*src) {
                                                   case ' ': case '\n': case '\r': case '\t':
                                                           if(!whitespace) {
                                                                   *dest++=*src;
                                                                   whitespace=true;
                                                           }
                                                           break;
                                                   default:
                                                           whitespace=false;
                                                           *dest++=*src;
                                                           break;
                                                   }
                                   }
                                   break;
                         case UL_TAINTED:                          case UL_TAINTED:
                                 // tainted piece, but undefined untaint language                                  // tainted piece, but undefined untaint language
                                 // for VString.as_double of tainted values                                  // for VString.as_double of tainted values
Line 112  char *String::store_to(char *dest, Untai Line 173  char *String::store_to(char *dest, Untai
                                 // tainted, untaint language: file [name]                                  // tainted, untaint language: file [name]
                                 escape(switch(*src) {                                  escape(switch(*src) {
                                         case ' ': to_char('_');  break;                                          case ' ': to_char('_');  break;
                                         encode(need_file_encode, '-');                                          encode(need_file_encode, '+');
                                 });                                  });
                                 break;                                  break;
                         case UL_URI:                          case UL_URI:
Line 124  char *String::store_to(char *dest, Untai Line 185  char *String::store_to(char *dest, Untai
                                 break;                                  break;
                         case UL_HTTP_HEADER:                          case UL_HTTP_HEADER:
                                 // tainted, untaint language: http-header                                  // tainted, untaint language: http-header
                                 escape(switch(*src) {                                  if(need_quote_http_header(row->item.ptr, row->item.size)) {
                                         encode(need_http_header_encode, '%');                                          *dest++='\"';
                                 });                                          escape(switch(*src) {
                                                   case '\"': to_string("\\\"", 2);  break;
                                                   _default;
                                           });
                                           *dest++='\"';
                                   } else {
                                           memcpy(dest, row->item.ptr, row->item.size); 
                                           dest+=row->item.size;
                                   }
                                 break;                                  break;
                         case UL_MAIL_HEADER:                          case UL_MAIL_HEADER:
                                 // tainted, untaint language: mail-header                                  // tainted, untaint language: mail-header
                                 memcpy(dest, row->item.ptr, row->item.size);                                   if(charset) {
                                 dest+=row->item.size;                                          // Subject: Re: parser3: =?koi8-r?Q?=D3=C5=CD=C9=CE=C1=D2?=
                                           const char *src=row->item.ptr; 
                                           bool to_base_64=false;
                                           for(int size=row->item.size; size--; src++) {
                                                   if(*src & 0x80) {
                                                           if(!to_base_64) {
                                                                   dest+=sprintf(dest, "=?%.15s?Q?", charset);
                                                                   to_base_64=true;
                                                           }
                                                           dest+=sprintf(dest, "=%02X", *src & 0xFF);
                                                   } else {
                                                           *dest++=*src;                                           
                                                   }
                                           }
                                           if(to_base_64) // close
                                                   dest+=sprintf(dest, "?=");
                                   } else {
                                           memcpy(dest, row->item.ptr, row->item.size); 
                                           dest+=row->item.size;
                                   }
                                 break;                                  break;
                         case UL_TABLE:                           case UL_TABLE: 
                                 // tainted, untaint language: table                                  // tainted, untaint language: table
Line 170  char *String::store_to(char *dest, Untai Line 258  char *String::store_to(char *dest, Untai
                                         _default;                                          _default;
                                 });                                  });
                                 break;                                  break;
                         case UL_HTML_TYPO: {                          case UL_USER_HTML: {
                                 // tainted, untaint language: html-typo                                  // tainted, untaint language: html-typo
                                 char *html_for_typo=(char *)malloc(size()*2/* '\n' -> '\' 'n' */+1);                                  char *html_for_typo=
                                           (char *)malloc(row->item.size*2/* '\n' -> '\' 'n' */+1);
                                 // note:                                  // note:
                                 //   there still is a possibility that user                                   //   there still is a possibility that user 
                                 //   would not replace \n as she supposed to                                  //   would not replace \n as she supposed to
Line 225  char *String::store_to(char *dest, Untai Line 314  char *String::store_to(char *dest, Untai
                                                                 &b,                                                                   &b, 
                                                                 "is %g times longer then '%s', "                                                                  "is %g times longer then '%s', "
                                                                 "while maximum, handled by Parser, is %d",                                                                   "while maximum, handled by Parser, is %d", 
                                                                 ((double)b.size())/a.size(),                                                                           ((double)b.size())/a.size(), 
                                                                 a.cstr(),                                                                           a.cstr(), 
                                                                 UNTAINT_TIMES_BIGGER);                                                                          UNTAINT_TIMES_BIGGER);
                                                 }                                                  }
                                                                                                   
                                                 // skip 'a' in 'src'                                                  // skip 'a' in 'src'
Line 246  char *String::store_to(char *dest, Untai Line 335  char *String::store_to(char *dest, Untai
                                         "unknown untaint language #%d of %d piece",                                           "unknown untaint language #%d of %d piece", 
                                                 static_cast<int>(row->item.lang),                                                   static_cast<int>(row->item.lang), 
                                                 i); // never                                                  i); // never
                                   break; // never
                         }                          }
   
                           if((lang==UL_UNSPECIFIED?row->item.lang:lang)!=UL_CLEAN)
                                   whitespace=false;
                 }                  }
                 chunk=row->link;                  chunk=row->link;
         } while(chunk);          } while(chunk);
Removed from v.1.38  
changed lines
  Added in v.1.51

E-mail: