|
|
| version 1.154, 2007/08/20 10:02:51 | version 1.166, 2008/07/18 09:12:17 |
|---|---|
| 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_START_OPTION "left" |
| #define TRIM_END_OPTION "right" | |
| #define TRIM_BOTH_OPTION "both" | #define TRIM_BOTH_OPTION "both" |
| #define TRIM_END_OPTION "end" | |
| // statics | // statics |
| Line 47 static const String match_var_name(MATCH | Line 47 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.charsets.source()); |
| r.write_no_lang(*new VDouble(result)); | r.write_no_lang(*new VDouble(result)); |
| } | } |
| Line 96 static void _bool(Request& r, MethodPara | Line 96 static void _bool(Request& r, MethodPara |
| 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_bool(); | |
| try { | |
| converted=self_string.as_bool(); | |
| } catch(...) { | |
| const String& lower_string=self_string.change_case(r.charsets.source(), String::CC_LOWER); | |
| if(lower_string == "true"){ | |
| converted=true; | |
| } else if (lower_string == "false"){ | |
| converted=false; | |
| } else { | |
| rethrow; | |
| } | |
| } | |
| } catch(...) { // convert problem | } catch(...) { // convert problem |
| if(params.count()>0) | if(params.count()>0) |
| converted=params.as_bool(0, "default must be bool", r); // (default) | converted=params.as_bool(0, "default must be bool", r); // (default) |
| Line 113 static void _bool(Request& r, MethodPara | Line 125 static void _bool(Request& r, MethodPara |
| // 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); |
| const char* buf=format(r.get_self().as_double(), fmt.cstrm()); | const char* buf=format(r.get_self().as_double(), fmt.trim().cstrm()); |
| r.write_no_lang(String(buf)); | r.write_no_lang(String(buf)); |
| } | } |
| Line 127 static void _left(Request& r, MethodPara | Line 139 static void _left(Request& r, MethodPara |
| size_t n=(size_t)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(r.charsets.source(), 0, n)); |
| } | } |
| static void _right(Request& r, MethodParams& params) { | static void _right(Request& r, MethodParams& params) { |
| Line 137 static void _right(Request& r, MethodPar | Line 149 static void _right(Request& r, MethodPar |
| 0, | 0, |
| "n(%d) must be >=0", sn); | "n(%d) must be >=0", sn); |
| size_t n=(size_t)sn; | size_t n=(size_t)sn; |
| const String& string=GET_SELF(r, VString).string(); | const String& string=GET_SELF(r, VString).string(); |
| size_t length=string.length(); | size_t length=string.length(r.charsets.source()); |
| r.write_assign_lang(n<length?string.mid(length-n, string.length()):string); | r.write_assign_lang(n<length?string.mid(r.charsets.source(), length-n, length, length):string); |
| } | } |
| static void _mid(Request& r, MethodParams& params) { | static void _mid(Request& r, MethodParams& params) { |
| Line 155 static void _mid(Request& r, MethodParam | Line 166 static void _mid(Request& r, MethodParam |
| size_t begin=(size_t)sbegin; | size_t begin=(size_t)sbegin; |
| size_t end; | size_t end; |
| size_t length=0; | |
| if(params.count()>1) { | if(params.count()>1) { |
| ssize_t sn=params.as_int(1, "n must be int", r); | ssize_t sn=params.as_int(1, "n must be int", r); |
| if(sn<0) | if(sn<0) |
| Line 162 static void _mid(Request& r, MethodParam | Line 174 static void _mid(Request& r, MethodParam |
| 0, | 0, |
| "n(%d) must be >=0", sn); | "n(%d) must be >=0", sn); |
| end=begin+(size_t)sn; | end=begin+(size_t)sn; |
| } else | } else { |
| end=string.length(); | length=string.length(r.charsets.source()); |
| end=length; | |
| r.write_assign_lang(string.mid(begin, end)); | } |
| r.write_assign_lang(string.mid(r.charsets.source(), begin, end, length)); | |
| } | } |
| 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((int)string.pos(substr.as_string()))); | ssize_t offset=0; |
| if(params.count()>1){ | |
| offset=params.as_int(1, "n must be int", r); | |
| if(offset<0) | |
| throw Exception(PARSER_RUNTIME, | |
| 0, | |
| "n(%d) must be >=0", offset); | |
| } | |
| r.write_no_lang(*new VInt((int)string.pos(r.charsets.source(), substr.as_string(), (size_t)offset))); | |
| } | } |
| static void split_list(MethodParams& params, int paramIndex, | static void split_list(MethodParams& params, int paramIndex, |
| Line 219 static int split_options(const String* o | Line 242 static int split_options(const String* o |
| return result; | return result; |
| } | } |
| static Table& split_vertical(ArrayString& pieces, bool right) { | static Table& split_vertical(ArrayString& pieces, bool right, const String* column_name) { |
| Table::columns_type columns(new ArrayString); | Table::columns_type columns(new ArrayString); |
| *columns+=new String("piece"); | *columns+=column_name; |
| Table& table=*new Table(columns, pieces.count()); | Table& table=*new Table(columns, pieces.count()); |
| if(right) { // right | if(right) { // right |
| Line 274 static void split_with_options(Request& | Line 297 static void split_with_options(Request& |
| 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(pieces, right) | |
| :split_vertical(pieces, right); | const String* column_name=0; |
| if(params.count()>2){ | |
| column_name=¶ms.as_string(2, COLUMN_NAME_MUST_BE_STRING); | |
| if (horizontal && column_name->length()) | |
| throw Exception(PARSER_RUNTIME, | |
| column_name, | |
| "column name can't be specified with horisontal split"); | |
| } | |
| if(!column_name || !column_name->length()) | |
| column_name=new String("piece"); | |
| Table& table=horizontal?split_horizontal(pieces, right):split_vertical(pieces, right, column_name); | |
| r.write_no_lang(*new VTable(&table)); | r.write_no_lang(*new VTable(&table)); |
| } | } |
| Line 344 static void _match(Request& r, MethodPar | Line 378 static void _match(Request& r, MethodPar |
| matches_count); | matches_count); |
| // r.write_assign_lang(*new VTable(table)); | // r.write_assign_lang(*new VTable(table)); |
| if(table){ | if(table){ |
| r.write_assign_lang(*new VTable(table)); | r.write_assign_lang(*new VTable(table)); |
| } else { | } else { |
| r.write_assign_lang(*new VInt(matches_count)); | r.write_assign_lang(*new VInt(matches_count)); |
| } | } |
| Line 444 const String* sql_result_string(Request& | Line 478 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"); |
| HashStringValue* bind=0; | HashStringValue* bind=0; |
| ulong limit=0; | ulong limit=SQL_NO_LIMIT; |
| ulong offset=0; | ulong offset=0; |
| default_code=0; | default_code=0; |
| if(params.count()>1) { | if(params.count()>1) { |
| Line 488 const String* sql_result_string(Request& | Line 522 const String* sql_result_string(Request& |
| 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, | statement_cstr, |
| placeholders_count, placeholders, | placeholders_count, placeholders, |
| Line 524 static void _sql(Request& r, MethodParam | Line 559 static void _sql(Request& r, MethodParam |
| 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, PARAM_MUST_NOT_BE_CODE).get_table(); |
| if(!table) | if(!table) |
| throw Exception(PARSER_RUNTIME, | throw Exception(PARSER_RUNTIME, |
| 0, | 0, |
| Line 571 static void _trim(Request& r, MethodPara | Line 606 static void _trim(Request& r, MethodPara |
| const String& skind=params.as_string(0, | const String& skind=params.as_string(0, |
| "'where' must be string"); | "'where' must be string"); |
| if(skind.length()) | if(skind.length()) |
| if(skind==TRIM_START_OPTION) | if(skind==TRIM_BOTH_OPTION) |
| kind=String::TRIM_BOTH; | |
| else if(skind==TRIM_START_OPTION || skind=="start") | |
| kind=String::TRIM_START; | kind=String::TRIM_START; |
| else if(skind==TRIM_END_OPTION) | else if(skind==TRIM_END_OPTION || skind=="end") |
| kind=String::TRIM_END; | kind=String::TRIM_END; |
| else if(skind==TRIM_BOTH_OPTION) | |
| kind=String::TRIM_BOTH; | |
| else | else |
| throw Exception(PARSER_RUNTIME, | throw Exception(PARSER_RUNTIME, |
| &skind, | &skind, |
| Line 596 static void _append(Request& r, MethodPa | Line 631 static void _append(Request& r, MethodPa |
| // c=a+b | // c=a+b |
| VString& va=GET_SELF(r, VString); | VString& va=GET_SELF(r, VString); |
| const String& a=va.string(); | const String& a=va.string(); |
| const String& b=params.as_string(0, "parameter must be string"); | const String& b=params.as_string(0, PARAMETER_MUST_BE_STRING); |
| String& c=*new String(a); | String& c=*new String(a); |
| c.append(b, String::L_PASS_APPENDED); | c.append(b, String::L_PASS_APPENDED); |
| va.set_string(c); | va.set_string(c); |
| Line 605 static void _append(Request& r, MethodPa | Line 640 static void _append(Request& r, MethodPa |
| static void _base64(Request& r, MethodParams& params) { | static void _base64(Request& r, MethodParams& params) { |
| if(params.count()) { | if(params.count()) { |
| // decode | // decode |
| const char* cstr=params.as_string(0, "parameter must be string").cstr(); | const char* cstr=params.as_string(0, PARAMETER_MUST_BE_STRING).cstr(); |
| char* decoded_cstr=0; | char* decoded_cstr=0; |
| size_t decoded_size=0; | size_t decoded_size=0; |
| pa_base64_decode(cstr, strlen(cstr), decoded_cstr, decoded_size); | pa_base64_decode(cstr, strlen(cstr), decoded_cstr, decoded_size); |
| Line 636 MString::MString(): Methoded("string") { | Line 671 MString::MString(): Methoded("string") { |
| // ^void.bool(default) | // ^void.bool(default) |
| add_native_method("bool", Method::CT_DYNAMIC, _bool, 0, 1); | 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); |
| // ^string.left(n) | // ^string.left(n) |
| 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) |
| add_native_method("right", Method::CT_DYNAMIC, _right, 1, 1); | add_native_method("right", Method::CT_DYNAMIC, _right, 1, 1); |
| // ^string.mid(p) | |
| // ^string.mid(p;n) | // ^string.mid(p;n) |
| add_native_method("mid", Method::CT_DYNAMIC, _mid, 1, 2); | add_native_method("mid", Method::CT_DYNAMIC, _mid, 1, 2); |
| // ^string.pos[substr] | // ^string.pos[substr] |
| add_native_method("pos", Method::CT_DYNAMIC, _pos, 1, 1); | // ^string.pos[substr](n) |
| add_native_method("pos", Method::CT_DYNAMIC, _pos, 1, 2); | |
| // ^string.split[delim] | // ^string.split[delim] |
| // ^string.split[delim][options] | // ^string.split[delim][options] |
| add_native_method("split", Method::CT_DYNAMIC, _split, 1, 2); | // ^string.split[delim][options][column name] |
| add_native_method("split", Method::CT_DYNAMIC, _split, 1, 3); | |
| // old names for backward compatibility | // old names for backward compatibility |
| // ^string.lsplit[delim] | // ^string.lsplit[delim] |
| add_native_method("lsplit", Method::CT_DYNAMIC, _lsplit, 1, 1); | add_native_method("lsplit", Method::CT_DYNAMIC, _lsplit, 1, 1); |
| Line 662 MString::MString(): Methoded("string") { | Line 700 MString::MString(): Methoded("string") { |
| // ^string.match[regexp][options]{replacement-code} | // ^string.match[regexp][options]{replacement-code} |
| add_native_method("match", Method::CT_DYNAMIC, _match, 1, 3); | add_native_method("match", Method::CT_DYNAMIC, _match, 1, 3); |
| // ^string.toupper[] | // ^string.upper[] |
| add_native_method("upper", Method::CT_DYNAMIC, _upper, 0, 0); | add_native_method("upper", Method::CT_DYNAMIC, _upper, 0, 0); |
| // ^string.tolower[] | // ^string.lower[] |
| add_native_method("lower", Method::CT_DYNAMIC, _lower, 0, 0); | add_native_method("lower", Method::CT_DYNAMIC, _lower, 0, 0); |
| // ^sql[query] | // ^sql[query] |