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

Diff for /parser3/src/classes/string.C between versions 1.38 and 1.41

version 1.38, 2001/04/15 13:12:18 version 1.41, 2001/04/28 08:43:48
Line 8 Line 8
         $Id$          $Id$
 */  */
   
   #include "classes.h"
 #include "pa_request.h"  #include "pa_request.h"
 #include "_string.h"  
 #include "pa_vdouble.h"  #include "pa_vdouble.h"
 #include "pa_vint.h"  #include "pa_vint.h"
 #include "pa_vtable.h"  #include "pa_vtable.h"
 #include "pa_vbool.h"  #include "pa_vbool.h"
 #include "pa_string.h"  #include "pa_string.h"
   
 // global var  // defines
   
 VStateless_class *string_class;  #define STRING_CLASS_NAME "string"
   
   // class
   
   class MString : public Methoded {
   public:
           MString(Pool& pool);
           bool used_directly() { return false; }
   };
   
 // methods  // methods
   
Line 136  static void search_action(Table& table, Line 144  static void search_action(Table& table,
                 table+=row;                  table+=row;
 }  }
   
   /// used by string: _match / replace_action
 struct Replace_action_info {  struct Replace_action_info {
         Request *request;  const String *origin;          Request *request;  const String *origin;
         const String *src;  String *dest;          const String *src;  String *dest;
Line 192  static void _match(Request& r, const Str Line 201  static void _match(Request& r, const Str
         Temp_lang temp_lang(r, String::UL_PASS_APPENDED);          Temp_lang temp_lang(r, String::UL_PASS_APPENDED);
         Table *table;          Table *table;
         if(params->size()<3) { // search          if(params->size()<3) { // search
                 if(src.match(&method_name,                   if(src.match(r.pcre_tables,
                           &method_name, 
                         regexp.as_string(), options,                          regexp.as_string(), options,
                         &table,                          &table,
                         search_action, 0)) {                          search_action, 0)) {
Line 214  static void _match(Request& r, const Str Line 224  static void _match(Request& r, const Str
                         &replacement_code,                          &replacement_code,
                         &src                          &src
                 };                  };
                 src.match(&method_name,                   src.match(r.pcre_tables,
                           &method_name, 
                         r.process(regexp).as_string(), options,                          r.process(regexp).as_string(), options,
                         &table,                          &table,
                         replace_action, &replace_action_info);                          replace_action, &replace_action_info);
Line 224  static void _match(Request& r, const Str Line 235  static void _match(Request& r, const Str
         r.write_assign_lang(*result);          r.write_assign_lang(*result);
 }  }
   
 // initialize  // constructor
   
   MString::MString(Pool& apool) : Methoded(apool) {
           set_name(*NEW String(pool(), STRING_CLASS_NAME));
   
   
 void initialize_string_class(Pool& pool, VStateless_class& vclass) {  
         // ^string.length[]          // ^string.length[]
         vclass.add_native_method("length", Method::CT_DYNAMIC, _length, 0, 0);          add_native_method("length", Method::CT_DYNAMIC, _length, 0, 0);
                   
         // ^string.int[]          // ^string.int[]
         vclass.add_native_method("int", Method::CT_DYNAMIC, _int, 0, 0);          add_native_method("int", Method::CT_DYNAMIC, _int, 0, 0);
                   
         // ^string.double[]          // ^string.double[]
         vclass.add_native_method("double", Method::CT_DYNAMIC, _double, 0, 0);          add_native_method("double", Method::CT_DYNAMIC, _double, 0, 0);
   
         // ^string.format{format}          // ^string.format{format}
         vclass.add_native_method("format", Method::CT_DYNAMIC, _string_format, 1, 1);          add_native_method("format", Method::CT_DYNAMIC, _string_format, 1, 1);
   
         // ^string.left(n)          // ^string.left(n)
         vclass.add_native_method("left", Method::CT_DYNAMIC, _left, 1, 1);          add_native_method("left", Method::CT_DYNAMIC, _left, 1, 1);
         // ^string.right(n)          // ^string.right(n)
         vclass.add_native_method("right", Method::CT_DYNAMIC, _right, 1, 1);          add_native_method("right", Method::CT_DYNAMIC, _right, 1, 1);
         // ^string.mid(p;n)          // ^string.mid(p;n)
         vclass.add_native_method("mid", Method::CT_DYNAMIC, _mid, 2, 2);          add_native_method("mid", Method::CT_DYNAMIC, _mid, 2, 2);
   
         // ^string.pos[substr]          // ^string.pos[substr]
         vclass.add_native_method("pos", Method::CT_DYNAMIC, _pos, 1, 1);          add_native_method("pos", Method::CT_DYNAMIC, _pos, 1, 1);
   
         // ^string.lsplit[delim]          // ^string.lsplit[delim]
         vclass.add_native_method("lsplit", Method::CT_DYNAMIC, _lsplit, 1, 1);          add_native_method("lsplit", Method::CT_DYNAMIC, _lsplit, 1, 1);
         // ^string.rsplit[delim]          // ^string.rsplit[delim]
         vclass.add_native_method("rsplit", Method::CT_DYNAMIC, _rsplit, 1, 1);          add_native_method("rsplit", Method::CT_DYNAMIC, _rsplit, 1, 1);
   
         // ^string.match[regexp][options]          // ^string.match[regexp][options]
         // ^string.match[regexp][options]{replacement-code}          // ^string.match[regexp][options]{replacement-code}
         vclass.add_native_method("match", Method::CT_DYNAMIC, _match, 1, 3);          add_native_method("match", Method::CT_DYNAMIC, _match, 1, 3);
 }         }       
   
   // global variable
   
   Methoded *string_class;
   
   // creator
   
   Methoded *MString_create(Pool& pool) {
           return string_class=new(pool) MString(pool);
   }
Removed from v.1.38  
changed lines
  Added in v.1.41

E-mail: