|
|
| version 1.125.2.15.2.14, 2003/03/24 11:45:28 | version 1.155, 2007/08/20 10:37:21 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: @b string parser class. | Parser: @b string parser class. |
| Copyright (c) 2001-2003 ArtLebedev Group (http://www.artlebedev.com) | Copyright (c) 2001-2005 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_STRING_C="$Date$"; | static const char * const IDENT_STRING_C="$Date$"; |
| #include "classes.h" | #include "classes.h" |
| #include "pa_vmethod_frame.h" | #include "pa_vmethod_frame.h" |
| Line 36 DECLARE_CLASS_VAR(string, new MString, 0 | Line 36 DECLARE_CLASS_VAR(string, new MString, 0 |
| // defines for statics | // defines for statics |
| #define MATCH_VAR_NAME "match" | #define MATCH_VAR_NAME "match" |
| #define TRIM_START_OPTION "start" | |
| #define TRIM_BOTH_OPTION "both" | |
| #define TRIM_END_OPTION "end" | |
| // statics | // statics |
| Line 43 static const String match_var_name(MATCH | Line 46 static const String match_var_name(MATCH |
| // methods | // methods |
| static void _length(Request& r, MethodParams* ) { | static void _length(Request& r, MethodParams&) { |
| double result=GET_SELF(r, VString).string().length(); | double result=GET_SELF(r, VString).string().length(); |
| r.write_no_lang(*new VDouble(result)); | r.write_no_lang(*new VDouble(result)); |
| } | } |
| static void _int(Request& r, MethodParams* params) { | static void _int(Request& r, MethodParams& params) { |
| const String& self_string=GET_SELF(r, VString).string(); | const String& self_string=GET_SELF(r, VString).string(); |
| int converted; | int converted; |
| Value* default_code=params->count()>0?¶ms->as_junction(0, "default must be int") | |
| :0; // (default) | |
| try { | try { |
| if(self_string.is_empty()) | if(self_string.is_empty()) |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "parameter is empty string, error converting"); | "parameter is empty string, error converting"); |
| converted=self_string.as_int(); | converted=self_string.as_int(); |
| } catch(...) { // convert problem | } catch(...) { // convert problem |
| if(default_code) | if(params.count()>0) |
| converted=r.process_to_value(*default_code).as_int(); | converted=params.as_int(0, "default must be int", r); // (default) |
| else | else |
| rethrow; // we have a problem when no default | rethrow; // we have a problem when no default |
| } | } |
| r.write_no_lang(*new VInt(converted)); | r.write_no_lang(*new VInt(converted)); |
| } | } |
| static void _double(Request& r, MethodParams* params) { | static void _double(Request& r, MethodParams& params) { |
| const String& self_string=GET_SELF(r, VString).string(); | const String& self_string=GET_SELF(r, VString).string(); |
| double converted; | double converted; |
| Value* default_code=params->count()>0?¶ms->as_junction(0, "default must be double") | |
| :0; // (default) | |
| try { | try { |
| if(self_string.is_empty()) | if(self_string.is_empty()) |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "parameter is empty string, error converting"); | "parameter is empty string, error converting"); |
| converted=self_string.as_double(); | converted=self_string.as_double(); |
| } catch(...) { // convert problem | } catch(...) { // convert problem |
| if(default_code) | if(params.count()>0) |
| converted=r.process_to_value(*default_code).as_double(); | converted=params.as_double(0, "default must be double", r); // (default) |
| else | else |
| rethrow; // we have a problem when no default | rethrow; // we have a problem when no default |
| } | } |
| Line 89 static void _double(Request& r, MethodPa | Line 88 static void _double(Request& r, MethodPa |
| r.write_no_lang(*new VDouble(converted)); | r.write_no_lang(*new VDouble(converted)); |
| } | } |
| /*not static*/void _string_format(Request& r, MethodParams* params) { | static void _bool(Request& r, MethodParams& params) { |
| const String& self_string=GET_SELF(r, VString).string(); | |
| bool converted; | |
| try { | |
| if(self_string.is_empty()) | |
| throw Exception(PARSER_RUNTIME, | |
| 0, | |
| "parameter is empty string, error converting"); | |
| converted=self_string.as_bool(); | |
| } catch(...) { // convert problem | |
| if(params.count()>0) | |
| converted=params.as_bool(0, "default must be bool", r); // (default) | |
| else | |
| rethrow; // we have a problem when no default | |
| } | |
| r.write_no_lang(*new VBool(converted)); | |
| } | |
| Value& fmt_maybe_code=*(*params)[0]; | /*not static*/void _string_format(Request& r, MethodParams& params) { |
| Value& fmt_maybe_code=params[0]; | |
| // for some time due to stupid {} in original design | // for some time due to stupid {} in original design |
| const String& fmt=r.process_to_string(fmt_maybe_code); | const String& fmt=r.process_to_string(fmt_maybe_code); |
| Line 100 static void _double(Request& r, MethodPa | Line 118 static void _double(Request& r, MethodPa |
| r.write_no_lang(String(buf)); | r.write_no_lang(String(buf)); |
| } | } |
| static void _left(Request& r, MethodParams* params) { | static void _left(Request& r, MethodParams& params) { |
| size_t n=(size_t)params->as_int(0, "n must be int", r); | ssize_t sn=params.as_int(0, "n must be int", r); |
| if(sn<0) | |
| throw Exception(PARSER_RUNTIME, | |
| 0, | |
| "n(%d) must be >=0", sn); | |
| size_t n=(size_t)sn; | |
| const String& string=GET_SELF(r, VString).string(); | const String& string=GET_SELF(r, VString).string(); |
| r.write_assign_lang(string.mid(0, n)); | r.write_assign_lang(string.mid(0, n)); |
| } | } |
| static void _right(Request& r, MethodParams* params) { | static void _right(Request& r, MethodParams& params) { |
| size_t n=(size_t)params->as_int(0, "n must be int", r); | ssize_t sn=(size_t)params.as_int(0, "n must be int", r); |
| if(sn<0) | |
| throw Exception(PARSER_RUNTIME, | |
| 0, | |
| "n(%d) must be >=0", sn); | |
| size_t n=(size_t)sn; | |
| const String& string=GET_SELF(r, VString).string(); | const String& string=GET_SELF(r, VString).string(); |
| r.write_assign_lang(string.mid(string.length()-n, string.length())); | size_t length=string.length(); |
| r.write_assign_lang(n<length?string.mid(length-n, string.length()):string); | |
| } | } |
| static void _mid(Request& r, MethodParams* params) { | static void _mid(Request& r, MethodParams& params) { |
| const String& string=GET_SELF(r, VString).string(); | const String& string=GET_SELF(r, VString).string(); |
| size_t p=(size_t)max(0, params->as_int(0, "p must be int", r)); | ssize_t sbegin=params.as_int(0, "p must be int", r); |
| size_t n=params->count()>1? | if(sbegin<0) |
| (size_t)max(0, params->as_int(1, "n must be int", r)):string.length(); | throw Exception(PARSER_RUNTIME, |
| 0, | |
| "p(%d) must be >=0", sbegin); | |
| size_t begin=(size_t)sbegin; | |
| size_t end; | |
| if(params.count()>1) { | |
| ssize_t sn=params.as_int(1, "n must be int", r); | |
| if(sn<0) | |
| throw Exception(PARSER_RUNTIME, | |
| 0, | |
| "n(%d) must be >=0", sn); | |
| end=begin+(size_t)sn; | |
| } else | |
| end=string.length(); | |
| r.write_assign_lang(string.mid(p, p+n)); | r.write_assign_lang(string.mid(begin, end)); |
| } | } |
| static void _pos(Request& r, MethodParams* params) { | static void _pos(Request& r, MethodParams& params) { |
| Value& substr=params->as_no_junction(0, "substr must not be code"); | Value& substr=params.as_no_junction(0, "substr must not be code"); |
| const String& string=GET_SELF(r, VString).string(); | const String& string=GET_SELF(r, VString).string(); |
| r.write_assign_lang(*new VInt(string.pos(substr.as_string()))); | r.write_assign_lang(*new VInt((int)string.pos(substr.as_string()))); |
| } | } |
| static void split_list(Request& r, | static void split_list(MethodParams& params, int paramIndex, |
| MethodParams* params, int paramIndex, | |
| const String& string, | const String& string, |
| ArrayString& result) { | ArrayString& result) { |
| Value& delim_value=params->as_no_junction(paramIndex, "delimiter must not be code"); | Value& delim_value=params.as_no_junction(paramIndex, "delimiter must not be code"); |
| size_t pos_after=0; | size_t pos_after=0; |
| string.split(result, pos_after, delim_value.as_string()); | string.split(result, pos_after, delim_value.as_string()); |
| Line 157 static int split_options(const String* o | Line 200 static int split_options(const String* o |
| {"r", "R", SPLIT_RIGHT, SPLIT_LEFT}, | {"r", "R", SPLIT_RIGHT, SPLIT_LEFT}, |
| {"h", "H", SPLIT_HORIZONTAL, SPLIT_VERTICAL}, | {"h", "H", SPLIT_HORIZONTAL, SPLIT_VERTICAL}, |
| {"v", "V", SPLIT_VERTICAL, SPLIT_HORIZONTAL}, | {"v", "V", SPLIT_VERTICAL, SPLIT_HORIZONTAL}, |
| {0} | {0, 0, 0, 0} |
| }; | }; |
| int result=0; | int result=0; |
| if(options) { | if(options) { |
| for(Split_option *o=split_option; o->keyL; o++) | for(Split_option *o=split_option; o->keyL; o++) |
| if(options->pos(o->keyL)>=0 | if(options->pos(o->keyL)!=STRING_NOT_FOUND |
| || (o->keyU && options->pos(o->keyU)>=0)) { | || (o->keyU && options->pos(o->keyU)!=STRING_NOT_FOUND)) { |
| if(result & o->checkBit) | if(result & o->checkBit) |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| options, | options, |
| "conflicting split options"); | "conflicting split options"); |
| result |= o->setBit; | result |= o->setBit; |
| Line 176 static int split_options(const String* o | Line 219 static int split_options(const String* o |
| return result; | return result; |
| } | } |
| static Table& split_vertical(Request& r, ArrayString& pieces, bool right) { | static Table& split_vertical(ArrayString& pieces, bool right) { |
| Table::columns_type columns(new ArrayString); | Table::columns_type columns(new ArrayString); |
| *columns+=new String("piece"); | *columns+=new String("piece"); |
| Line 200 static Table& split_vertical(Request& r, | Line 242 static Table& split_vertical(Request& r, |
| return table; | return table; |
| } | } |
| static Table& split_horizontal(Request& r, ArrayString& pieces, bool right) { | static Table& split_horizontal(ArrayString& pieces, bool right) { |
| Table& table=*new Table(Table::columns_type(0) /* nameless */); | Table& table=*new Table(Table::columns_type(0) /* nameless */); |
| Table::element_type row(new ArrayString(pieces.count())); | Table::element_type row(new ArrayString(pieces.count())); |
| if(right) { // right | if(right) { // right |
| for(int i=pieces.count(); --i>=0; ) { | for(int i=pieces.count(); --i>=0; ) |
| *row+=pieces[i]; | *row+=pieces[i]; |
| } | |
| } else { // left | } else { // left |
| Array_iterator<const String*> i(pieces); | for(Array_iterator<const String*> i(pieces); i.has_next(); ) |
| while(i.has_next()) { | |
| *row+=i.next(); | *row+=i.next(); |
| } | |
| } | } |
| table+=row; | table+=row; |
| return table; | return table; |
| } | } |
| static void split_with_options(Request& r, MethodParams* params, | static void split_with_options(Request& r, MethodParams& params, |
| int bits) { | int bits) { |
| const String& string=GET_SELF(r, VString).string(); | const String& string=GET_SELF(r, VString).string(); |
| ArrayString pieces; | ArrayString pieces; |
| split_list(r, params, 0, string, pieces); | split_list(params, 0, string, pieces); |
| if(!bits) { | if(!bits) { |
| const String* options=0; | const String* options=0; |
| if(params->count()>1) | if(params.count()>1) |
| options=¶ms->as_string(1, "options must not be code"); | options=¶ms.as_string(1, "options must not be code"); |
| bits=split_options(options); | bits=split_options(options); |
| } | } |
| bool right=(bits & SPLIT_RIGHT) != 0; | bool right=(bits & SPLIT_RIGHT) != 0; |
| bool horizontal=(bits & SPLIT_HORIZONTAL) !=0; | bool horizontal=(bits & SPLIT_HORIZONTAL) !=0; |
| Table& table=horizontal?split_horizontal(r, pieces, right) | Table& table=horizontal?split_horizontal(pieces, right) |
| :split_vertical(r, pieces, right); | :split_vertical(pieces, right); |
| r.write_no_lang(*new VTable(&table)); | r.write_no_lang(*new VTable(&table)); |
| } | } |
| static void _split(Request& r, MethodParams* params) { | static void _split(Request& r, MethodParams& params) { |
| split_with_options(r, params, 0 /* maybe-determine from param #2 */); | split_with_options(r, params, 0 /* maybe-determine from param #2 */); |
| } | } |
| static void _lsplit(Request& r, MethodParams* params) { | static void _lsplit(Request& r, MethodParams& params) { |
| split_with_options(r, params, SPLIT_LEFT); | split_with_options(r, params, SPLIT_LEFT); |
| } | } |
| static void _rsplit(Request& r, MethodParams* params) { | static void _rsplit(Request& r, MethodParams& params) { |
| split_with_options(r, params, SPLIT_RIGHT); | split_with_options(r, params, SPLIT_RIGHT); |
| } | } |
| Line 288 static void replace_action(Table& table, | Line 327 static void replace_action(Table& table, |
| } | } |
| /// @todo use pcre:study somehow | /// @todo use pcre:study somehow |
| static void _match(Request& r, MethodParams* params) { | static void _match(Request& r, MethodParams& params) { |
| Value& regexp=params->as_no_junction(0, "regexp must not be code"); | Value& regexp=params.as_no_junction(0, "regexp must not be code"); |
| const String* options= | const String* options= |
| params->count()>1? | params.count()>1? |
| ¶ms->as_no_junction(1, "options must not be code").as_string():0; | ¶ms.as_no_junction(1, "options must not be code").as_string():0; |
| Temp_lang temp_lang(r, String::L_PASS_APPENDED); | Temp_lang temp_lang(r, String::L_PASS_APPENDED); |
| const String& src=GET_SELF(r, VString).string(); | const String& src=GET_SELF(r, VString).string(); |
| bool just_matched; | int matches_count=0; |
| if(params->count()<3) { // search | if(params.count()<3) { // search |
| Table* table=src.match(r.charsets.source(), | Table* table=src.match(r.charsets.source(), |
| regexp.as_string(), options, | regexp.as_string(), options, |
| search_action, 0, | search_action, 0, |
| just_matched); | matches_count); |
| Value* result; | // r.write_assign_lang(*new VTable(table)); |
| if(table) | if(table){ |
| result=new VTable(table); // table of pre/match/post+substrings | r.write_assign_lang(*new VTable(table)); |
| else | } else { |
| result=new VBool(just_matched); | r.write_assign_lang(*new VInt(matches_count)); |
| r.write_assign_lang(*result); | } |
| } else { // replace | } else { // replace |
| Value& replacement_code=params->as_junction(2, "replacement param must be code"); | Value& replacement_code=params.as_junction(2, "replacement param must be code"); |
| String result; | String result; |
| VTable* vtable=new VTable; | VTable* vtable=new VTable; |
| Replace_action_info info; | Replace_action_info info={ |
| info.request=&r; | &r, |
| info.src=&src; | &src, |
| info.dest=&result; | &result, |
| info.vtable=vtable; | vtable, |
| info.replacement_code=&replacement_code; | &replacement_code |
| }; | |
| Temp_value_element temp_match_var( | Temp_value_element temp_match_var( |
| *replacement_code.get_junction()->method_frame, | *replacement_code.get_junction()->method_frame, |
| match_var_name, vtable); | match_var_name, vtable); |
| src.match(r.charsets.source(), | src.match(r.charsets.source(), |
| r.process_to_string(regexp), options, | r.process_to_string(regexp), options, |
| replace_action, &info, | replace_action, &info, |
| just_matched); | matches_count); |
| r.write_assign_lang(result); | r.write_assign_lang(result); |
| } | } |
| } | } |
| static void change_case(Request& r, MethodParams* params, | static void change_case(Request& r, MethodParams&, |
| String::Change_case_kind kind) { | String::Change_case_kind kind) { |
| const String& src=GET_SELF(r, VString).string(); | const String& src=GET_SELF(r, VString).string(); |
| r.write_assign_lang(src.change_case(r.charsets.source(), kind)); | r.write_assign_lang(src.change_case(r.charsets.source(), kind)); |
| } | } |
| static void _upper(Request& r, MethodParams* params) { | static void _upper(Request& r, MethodParams& params) { |
| change_case(r, params, String::CC_UPPER); | change_case(r, params, String::CC_UPPER); |
| } | } |
| static void _lower(Request& r, MethodParams* params) { | static void _lower(Request& r, MethodParams& params) { |
| change_case(r, params, String::CC_LOWER); | change_case(r, params, String::CC_LOWER); |
| } | } |
| Line 359 public: | Line 400 public: |
| got_cell(false), | got_cell(false), |
| result(*new String) {} | result(*new String) {} |
| bool add_column(SQL_Error& error, void *ptr, size_t size) { | bool add_column(SQL_Error& error, const char* /*str*/, size_t /*length*/) { |
| if(got_column) { | if(got_column) { |
| error=SQL_Error("parser.runtime", | error=SQL_Error(PARSER_RUNTIME, |
| //statement_string, | //statement_string, |
| "result must contain exactly one column"); | "result must contain exactly one column"); |
| return true; | return true; |
| Line 371 public: | Line 412 public: |
| } | } |
| bool before_rows(SQL_Error& /*error*/ ) { /* ignore */ return false; } | bool before_rows(SQL_Error& /*error*/ ) { /* ignore */ return false; } |
| bool add_row(SQL_Error& /*error*/) { /* ignore */ return false; } | bool add_row(SQL_Error& /*error*/) { /* ignore */ return false; } |
| bool add_row_cell(SQL_Error& error, void *ptr, size_t size) { | bool add_row_cell(SQL_Error& error, const char* str, size_t length) { |
| if(got_cell) { | if(got_cell) { |
| error=SQL_Error("parser.runtime", | error=SQL_Error(PARSER_RUNTIME, |
| //statement_string, | //statement_string, |
| "result must not contain more then one row"); | "result must not contain more then one row"); |
| return true; | return true; |
| Line 381 public: | Line 422 public: |
| try { | try { |
| got_cell=true; | got_cell=true; |
| result.append((const char* )ptr, size, String::L_TAINTED); | result.append_know_length(str, length, String::L_TAINTED); |
| return false; | return false; |
| } catch(...) { | } catch(...) { |
| error=SQL_Error("exception occured in String_sql_event_handlers::add_row_cell"); | error=SQL_Error("exception occured in String_sql_event_handlers::add_row_cell"); |
| Line 390 public: | Line 431 public: |
| } | } |
| }; | }; |
| #endif | #endif |
| extern const String& sql_limit_name; | extern String sql_bind_name; |
| extern const String& sql_offset_name; | extern String sql_limit_name; |
| extern const String& sql_default_name; | extern String sql_offset_name; |
| extern const String& sql_distinct_name; | extern String sql_default_name; |
| const String* sql_result_string(Request& r, MethodParams* params, | extern String sql_distinct_name; |
| extern int marshal_binds(HashStringValue& hash, SQL_Driver::Placeholder*& placeholders); | |
| extern void unmarshal_bind_updates(HashStringValue& hash, int placeholder_count, SQL_Driver::Placeholder* placeholders); | |
| const String* sql_result_string(Request& r, MethodParams& params, | |
| HashStringValue*& options, Value*& default_code) { | HashStringValue*& options, Value*& default_code) { |
| Value& statement=params->as_junction(0, "statement must be code"); | Value& statement=params.as_junction(0, "statement must be code"); |
| HashStringValue* bind=0; | |
| ulong limit=0; | ulong limit=0; |
| ulong offset=0; | ulong offset=0; |
| default_code=0; | default_code=0; |
| if(params->count()>1) { | if(params.count()>1) { |
| Value& voptions=params->as_no_junction(1, "options must be hash, not code"); | Value& voptions=params.as_no_junction(1, "options must be hash, not code"); |
| if(!voptions.is_string()) | if(voptions.is_defined() && !voptions.is_string()) |
| if(options=voptions.get_hash()) { | if((options=voptions.get_hash())) { |
| if(Value* vlimit=options->get(sql_limit_name)) | int valid_options=0; |
| if(Value* vbind=options->get(sql_bind_name)) { | |
| valid_options++; | |
| bind=vbind->get_hash(); | |
| } | |
| if(Value* vlimit=options->get(sql_limit_name)) { | |
| valid_options++; | |
| limit=(ulong)r.process_to_value(*vlimit).as_double(); | limit=(ulong)r.process_to_value(*vlimit).as_double(); |
| if(Value* voffset=options->get(sql_offset_name)) | } |
| if(Value* voffset=options->get(sql_offset_name)) { | |
| valid_options++; | |
| offset=(ulong)r.process_to_value(*voffset).as_double(); | offset=(ulong)r.process_to_value(*voffset).as_double(); |
| if(default_code=options->get(sql_default_name)) { | |
| if(Junction* default_junction=default_code->get_junction()) | |
| ;//default_junction->change_context(statement.get_junction()); | |
| else | |
| throw Exception("parser.runtime", | |
| 0, | |
| "default option must be code"); | |
| } | } |
| if((default_code=options->get(sql_default_name))) { | |
| valid_options++; | |
| } | |
| if(valid_options!=options->count()) | |
| throw Exception(PARSER_RUNTIME, | |
| 0, | |
| "called with invalid option"); | |
| } else | } else |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "options must be hash"); | "options must be hash"); |
| } else | } else |
| options=0; | options=0; |
| SQL_Driver::Placeholder* placeholders=0; | |
| uint placeholders_count=0; | |
| if(bind) | |
| placeholders_count=marshal_binds(*bind, placeholders); | |
| Temp_lang temp_lang(r, String::L_SQL); | Temp_lang temp_lang(r, String::L_SQL); |
| const String& statement_string=r.process_to_string(statement); | const String& statement_string=r.process_to_string(statement); |
| const char* statement_cstr= | const char* statement_cstr= |
| statement_string.cstr(String::L_UNSPECIFIED, r.connection()); | statement_string.cstr(String::L_UNSPECIFIED, r.connection()); |
| String_sql_event_handlers handlers(statement_string, statement_cstr); | String_sql_event_handlers handlers(statement_string, statement_cstr); |
| r.connection()->query( | r.connection()->query( |
| statement_cstr, offset, limit, | statement_cstr, |
| placeholders_count, placeholders, | |
| offset, limit, | |
| handlers, | handlers, |
| statement_string); | statement_string); |
| if(bind) | |
| unmarshal_bind_updates(*bind, placeholders_count, placeholders); | |
| if(!handlers.got_cell) | if(!handlers.got_cell) |
| return 0; // no lines, caller should return second param[default value] | return 0; // no lines, caller should return second param[default value] |
| return &handlers.result; | return &handlers.result; |
| } | } |
| static void _sql(Request& r, MethodParams* params) { | static void _sql(Request& r, MethodParams& params) { |
| HashStringValue* options; | HashStringValue* options; |
| Value* default_code; | Value* default_code; |
| Line 449 static void _sql(Request& r, MethodParam | Line 513 static void _sql(Request& r, MethodParam |
| if(default_code) { | if(default_code) { |
| string=&r.process_to_string(*default_code); | string=&r.process_to_string(*default_code); |
| } else | } else |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "produced no result, but no default option specified"); | "produced no result, but no default option specified"); |
| } | } |
| Line 457 static void _sql(Request& r, MethodParam | Line 521 static void _sql(Request& r, MethodParam |
| r.write_assign_lang(*string); | r.write_assign_lang(*string); |
| } | } |
| static void _replace(Request& r, MethodParams* params) { | static void _replace(Request& r, MethodParams& params) { |
| const String& src=GET_SELF(r, VString).string(); | const String& src=GET_SELF(r, VString).string(); |
| Table* table=params->as_no_junction(0, "parameter must not be code").get_table(); | Table* table=params.as_no_junction(0, "parameter must not be code").get_table(); |
| if(!table) | if(!table) |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| "parameter must be table"); | "parameter must be table"); |
| Line 470 static void _replace(Request& r, MethodP | Line 534 static void _replace(Request& r, MethodP |
| r.write_assign_lang(src.replace(dict)); | r.write_assign_lang(src.replace(dict)); |
| } | } |
| static void _save(Request& r, MethodParams* params) { | static void _save(Request& r, MethodParams& params) { |
| const String& file_name=params->as_string(params->count()-1, | const String& file_name=params.as_string(params.count()-1, FILE_NAME_MUST_BE_STRING); |
| "file name must be string"); | |
| const String& src=GET_SELF(r, VString).string(); | const String& src=GET_SELF(r, VString).string(); |
| bool do_append=false; | bool do_append=false; |
| if(params->count()>1) { | if(params.count()>1) { |
| const String& mode=params->as_string(0, "mode must be string"); | const String& mode=params.as_string(0, "mode must be string"); |
| if(mode=="append") | if(mode=="append") |
| do_append=true; | do_append=true; |
| else | else |
| throw Exception("parser.runtime", | throw Exception(PARSER_RUNTIME, |
| &mode, | &mode, |
| "unknown mode, must be 'append'"); | "unknown mode, must be 'append'"); |
| } | } |
| Line 493 static void _save(Request& r, MethodPara | Line 556 static void _save(Request& r, MethodPara |
| buf, strlen(buf), true, do_append); | buf, strlen(buf), true, do_append); |
| } | } |
| static void _normalize(Request& r, MethodParams* /*params*/) { | static void _normalize(Request& r, MethodParams&) { |
| const String& src=GET_SELF(r, VString).string(); | const String& src=GET_SELF(r, VString).string(); |
| r.write_assign_lang(src); | r.write_assign_lang(src); |
| } | } |
| static void _trim(Request& r, MethodParams& params) { | |
| const String& src=GET_SELF(r, VString).string(); | |
| String::Trim_kind kind=String::TRIM_BOTH; | |
| const char* chars=0; | |
| if(params.count()>0) { | |
| const String& skind=params.as_string(0, | |
| "'where' must be string"); | |
| if(skind.length()) | |
| if(skind==TRIM_START_OPTION) | |
| kind=String::TRIM_START; | |
| else if(skind==TRIM_END_OPTION) | |
| kind=String::TRIM_END; | |
| else if(skind==TRIM_BOTH_OPTION) | |
| kind=String::TRIM_BOTH; | |
| else | |
| throw Exception(PARSER_RUNTIME, | |
| &skind, | |
| "'kind' must be one of "TRIM_START_OPTION", "TRIM_BOTH_OPTION", "TRIM_END_OPTION); | |
| if(params.count()>1) { | |
| const String& schars=params.as_string(1, "'chars' must be string"); | |
| if(schars.length()) | |
| chars=schars.cstr(); | |
| } | |
| } | |
| r.write_assign_lang(src.trim(kind, chars)); | |
| } | |
| static void _append(Request& r, MethodParams& params) { | |
| // c=a+b | |
| VString& va=GET_SELF(r, VString); | |
| const String& a=va.string(); | |
| const String& b=params.as_string(0, PARAMETER_MUST_BE_STRING); | |
| String& c=*new String(a); | |
| c.append(b, String::L_PASS_APPENDED); | |
| va.set_string(c); | |
| } | |
| static void _base64(Request& r, MethodParams& params) { | |
| if(params.count()) { | |
| // decode | |
| const char* cstr=params.as_string(0, PARAMETER_MUST_BE_STRING).cstr(); | |
| char* decoded_cstr=0; | |
| size_t decoded_size=0; | |
| pa_base64_decode(cstr, strlen(cstr), decoded_cstr, decoded_size); | |
| if(decoded_cstr && decoded_size) | |
| r.write_assign_lang(*new String(decoded_cstr, decoded_size, true)); | |
| } else { | |
| // encode | |
| VString& self=GET_SELF(r, VString); | |
| const char* cstr=self.string().cstr(); | |
| const char* encoded=pa_base64_encode(cstr, strlen(cstr)); | |
| r.write_assign_lang(*new String(encoded, 0, true/*once ?param=base64(something) was needed*/)); | |
| } | |
| } | |
| // constructor | // constructor |
| MString::MString(): Methoded("string") { | MString::MString(): Methoded("string") { |
| Line 511 MString::MString(): Methoded("string") { | Line 632 MString::MString(): Methoded("string") { |
| // ^string.double[] | // ^string.double[] |
| // ^string.double(default) | // ^string.double(default) |
| add_native_method("double", Method::CT_DYNAMIC, _double, 0, 1); | add_native_method("double", Method::CT_DYNAMIC, _double, 0, 1); |
| // ^void.bool[] | |
| // ^void.bool(default) | |
| add_native_method("bool", Method::CT_DYNAMIC, _bool, 0, 1); | |
| // ^string.format{format} | // ^string.format{format} |
| add_native_method("format", Method::CT_DYNAMIC, _string_format, 1, 1); | add_native_method("format", Method::CT_DYNAMIC, _string_format, 1, 1); |
| Line 544 MString::MString(): Methoded("string") { | Line 668 MString::MString(): Methoded("string") { |
| add_native_method("lower", Method::CT_DYNAMIC, _lower, 0, 0); | add_native_method("lower", Method::CT_DYNAMIC, _lower, 0, 0); |
| // ^sql[query] | // ^sql[query] |
| // ^sql[query][$.limit(1) $.offset(2) $.default[n/a]] | // ^sql[query][options hash] |
| add_native_method("sql", Method::CT_STATIC, _sql, 1, 2); | add_native_method("sql", Method::CT_STATIC, _sql, 1, 2); |
| // ^string.replace[table] | // ^string.replace[table] |
| Line 555 MString::MString(): Methoded("string") { | Line 679 MString::MString(): Methoded("string") { |
| // ^string.normalize[] | // ^string.normalize[] |
| add_native_method("normalize", Method::CT_DYNAMIC, _normalize, 0, 0); | add_native_method("normalize", Method::CT_DYNAMIC, _normalize, 0, 0); |
| // ^string.trim[[start|both|end][;chars]] | |
| add_native_method("trim", Method::CT_DYNAMIC, _trim, 0, 2); | |
| // ^string.append[string] | |
| add_native_method("append", Method::CT_DYNAMIC, _append, 1, 1); | |
| // ^string.base64[] << encode | |
| // ^string:base64[encoded string] << decode | |
| add_native_method("base64", Method::CT_ANY, _base64, 0, 1); | |
| } | } |