[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.69 and 1.71

version 1.69, 2001/08/02 09:58:33 version 1.71, 2001/08/28 09:27:42
Line 15  static const char *RCSId="$Id$"; Line 15  static const char *RCSId="$Id$";
 #include "pa_vbool.h"  #include "pa_vbool.h"
 #include "pa_string.h"  #include "pa_string.h"
 #include "pa_sql_connection.h"  #include "pa_sql_connection.h"
   #include "pa_dictionary.h"
   
 // defines  // defines
   
Line 304  public: Line 305  public:
         String *result;          String *result;
 };  };
 #endif  #endif
 const String* sql_result_string(Request& r, const String& method_name, MethodParams *params) {  const String* sql_result_string(Request& r, const String& method_name, MethodParams *params,
                                                                   Hash *&options) {
         Pool& pool=r.pool();          Pool& pool=r.pool();
   
         if(!r.connection)          if(!r.connection)
Line 314  const String* sql_result_string(Request& Line 316  const String* sql_result_string(Request&
   
         Value& statement=params->as_junction(0, "statement must be code");          Value& statement=params->as_junction(0, "statement must be code");
   
           ulong limit=0;
           ulong offset=0;
           if(params->size()>1) {
                   Value& options_param=params->as_no_junction(1, "options must be hash, not code");
                   if(options=options_param.get_hash()) {
                           if(Value *vlimit=(Value *)options->get(*sql_limit_name))
                                   limit=(ulong)r.process(*vlimit).as_double();
                           if(Value *voffset=(Value *)options->get(*sql_offset_name))
                                   offset=(ulong)r.process(*voffset).as_double();
                   } else
                           PTHROW(0, 0,
                                   &method_name,
                                   "options must be hash");
           } else
                   options=0;
   
         Temp_lang temp_lang(r, String::UL_SQL);          Temp_lang temp_lang(r, String::UL_SQL);
         const String& statement_string=r.process(statement).as_string();          const String& statement_string=r.process(statement).as_string();
         const char *statement_cstr=          const char *statement_cstr=
Line 322  const String* sql_result_string(Request& Line 340  const String* sql_result_string(Request&
         bool need_rethrow=false; Exception rethrow_me;          bool need_rethrow=false; Exception rethrow_me;
         PTRY {          PTRY {
                 r.connection->query(                  r.connection->query(
                         statement_cstr, 0, 0,                          statement_cstr, offset, limit, 
                         handlers);                          handlers);
         }          }
         PCATCH(e) { // query problem          PCATCH(e) { // query problem
Line 343  const String* sql_result_string(Request& Line 361  const String* sql_result_string(Request&
 static void _sql(Request& r, const String& method_name, MethodParams *params) {  static void _sql(Request& r, const String& method_name, MethodParams *params) {
         Pool& pool=r.pool();          Pool& pool=r.pool();
   
         const String *string=sql_result_string(r, method_name, params);          Hash *options;
           const String *string=sql_result_string(r, method_name, params, options);
         if(!string) {          if(!string) {
                 if(params->size()>1) {                  if(options) {
                         Value& default_code=params->as_junction(1, "default result must code");                          if(Value *vdefault=(Value *)options->get(*sql_default_name)) {
                         Value& processed_code=r.process(default_code);                                  if(!vdefault->get_junction())
                         string=processed_code.get_string();                                          PTHROW(0, 0,
                         if(!string)                                                  &method_name,
                                 string=empty_string;                                                  "default option must be code");
                                   string=r.process(*vdefault).get_string();
                                   if(!string)
                                           string=empty_string;
                           } else
                                   PTHROW(0, 0,
                                           &method_name,
                                           "produced no result, but no default option specified");
                 } else                  } else
                         PTHROW(0, 0,                          PTHROW(0, 0,
                                 &method_name,                                  &method_name,
                                 "produced no result, but no default specified");                                  "produced no result, but no options (no default) specified");
         }          }
         VString& result=*new(pool) VString(*string);          VString& result=*new(pool) VString(*string);
         result.set_name(method_name);          result.set_name(method_name);
         r.write_assign_lang(result);          r.write_assign_lang(result);
 }  }
   
   static void _replace(Request& r, const String& method_name, MethodParams *params) {
           Pool& pool=r.pool();
           const String& src=*static_cast<VString *>(r.self)->get_string();
   
           Table *table=params->as_no_junction(0, "parameter must not be code").get_table();
           if(!table)
                   PTHROW(0, 0,
                           &method_name,
                           "parameter must be table");
   
           Dictionary dict(*table);
           r.write_assign_lang(*new(pool) VString(src.replace(pool, dict)));
   }
 // constructor  // constructor
   
 MString::MString(Pool& apool) : Methoded(apool) {  MString::MString(Pool& apool) : Methoded(apool) {
Line 403  MString::MString(Pool& apool) : Methoded Line 442  MString::MString(Pool& apool) : Methoded
         // ^string.tolower[]          // ^string.tolower[]
         add_native_method("lower", Method::CT_DYNAMIC, _lower, 0, 0);          add_native_method("lower", Method::CT_DYNAMIC, _lower, 0, 0);
   
         // ^string:sql[query]          // ^sql[query]
         // ^string:sql[query]{default}          // ^sql[query][$.limit(1) $.offset(2) $.default[n/a]]
         add_native_method("sql", Method::CT_STATIC, _sql, 1, 2);          add_native_method("sql", Method::CT_STATIC, _sql, 1, 2);
   
           // ^string.replace[table]
           add_native_method("replace", Method::CT_DYNAMIC, _replace, 1, 1);
 }         }       
   
 // global variable  // global variable
Removed from v.1.69  
changed lines
  Added in v.1.71

E-mail: