|
|
| version 1.217, 2015/05/16 22:24:38 | version 1.232, 2016/10/26 15:44:49 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: @b string parser class. | Parser: @b string parser class. |
| Copyright (c) 2001-2012 Art. Lebedev Studio (http://www.artlebedev.com) | Copyright (c) 2001-2015 Art. Lebedev Studio (http://www.artlebedev.com) |
| Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) | Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) |
| */ | */ |
| Line 31 public: | Line 31 public: |
| // global variable | // global variable |
| DECLARE_CLASS_VAR(string, new MString, 0); | DECLARE_CLASS_VAR(string, new MString); |
| // void class, inherited from string and thus should be inited afterwards | // void class, inherited from string and thus should be inited afterwards |
| Line 42 public: | Line 42 public: |
| // void global variable should be after string global variable | // void global variable should be after string global variable |
| DECLARE_CLASS_VAR(void, new MVoid, 0); | DECLARE_CLASS_VAR(void, new MVoid); |
| // defines for statics | // defines for statics |
| Line 53 DECLARE_CLASS_VAR(void, new MVoid, 0); | Line 53 DECLARE_CLASS_VAR(void, new MVoid, 0); |
| #define MODE_APPEND "append" | #define MODE_APPEND "append" |
| #define UNESCAPE_MODE_JS "js" | |
| #define UNESCAPE_MODE_URI "uri" | |
| // statics | // statics |
| static const String match_var_name(MATCH_VAR_NAME); | static const String match_var_name(MATCH_VAR_NAME); |
| Line 89 static void _int(Request& r, MethodParam | Line 92 static void _int(Request& r, MethodParam |
| 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; | |
| if(self_string.is_empty()) { | if(self_string.is_empty()) { |
| if(params.count()>0) | if(params.count()>0) |
| converted=params.as_double(0, "default must be double", r); // (default) | r.write_no_lang(*new VDouble(params.as_double(0, "default must be double", r))); // (default) |
| else | else |
| throw Exception(PARSER_RUNTIME, 0, "unable to convert empty string without default specified"); | throw Exception(PARSER_RUNTIME, 0, "unable to convert empty string without default specified"); |
| } else { | } else { |
| try { | try { |
| converted=self_string.as_double(); | r.write_no_lang(*new VDouble(self_string.as_double())); |
| } catch(...) { // convert problem | } catch(...) { // convert problem |
| if(params.count()>0) | if(params.count()>0) |
| converted=params.as_double(0, "default must be double", r); // (default) | r.write_no_lang(*new VDouble(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 |
| } | } |
| } | } |
| r.write_no_lang(*new VDouble(converted)); | |
| } | } |
| static void _bool(Request& r, MethodParams& params) { | static void _bool(Request& r, MethodParams& params) { |
| Line 154 static void _bool(Request& r, MethodPara | Line 154 static void _bool(Request& r, MethodPara |
| static void _left(Request& r, MethodParams& params) { | static void _left(Request& r, MethodParams& params) { |
| ssize_t sn=params.as_int(0, "n must be int", r); | ssize_t sn=params.as_int(0, "n must be int", r); |
| const String& string=GET_SELF(r, VString).string(); | const String& string=GET_SELF(r, VString).string(); |
| r.write_assign_lang(sn<0 ? string : string.mid(r.charsets.source(), 0, (size_t)sn)); | r.write_pass_lang(sn<0 ? string : string.mid(r.charsets.source(), 0, (size_t)sn)); |
| } | } |
| static void _right(Request& r, MethodParams& params) { | static void _right(Request& r, MethodParams& params) { |
| Line 163 static void _right(Request& r, MethodPar | Line 163 static void _right(Request& r, MethodPar |
| 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(r.charsets.source()); | size_t length=string.length(r.charsets.source()); |
| r.write_assign_lang(n<length ? string.mid(r.charsets.source(), length-n, length, length) : string); | r.write_pass_lang(n<length ? string.mid(r.charsets.source(), length-n, length, length) : string); |
| } | } |
| } | } |
| Line 191 static void _mid(Request& r, MethodParam | Line 191 static void _mid(Request& r, MethodParam |
| end=length; | end=length; |
| } | } |
| r.write_assign_lang(string.mid(r.charsets.source(), begin, end, length)); | r.write_pass_lang(string.mid(r.charsets.source(), begin, end, length)); |
| } | } |
| static void _pos(Request& r, MethodParams& params) { | static void _pos(Request& r, MethodParams& params) { |
| Line 202 static void _pos(Request& r, MethodParam | Line 202 static void _pos(Request& r, MethodParam |
| if(params.count()>1){ | if(params.count()>1){ |
| offset=params.as_int(1, "n must be int", r); | offset=params.as_int(1, "n must be int", r); |
| if(offset<0) | if(offset<0) |
| throw Exception(PARSER_RUNTIME, | throw Exception(PARSER_RUNTIME, 0, "n(%d) must be >=0", offset); |
| 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))); | 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, const String& string, ArrayString& result) { |
| const String& string, | |
| 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"); |
| string.split(result, 0, delim_value.as_string()); | |
| size_t pos_after=0; | |
| string.split(result, pos_after, delim_value.as_string()); | |
| } | } |
| #define SPLIT_LEFT 0x0001 | #define SPLIT_LEFT 0x0001 |
| Line 400 static void _match(Request& r, MethodPar | Line 394 static void _match(Request& r, MethodPar |
| vrcleaner.vregex=vregex; | vrcleaner.vregex=vregex; |
| } | } |
| 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(); |
| int matches_count=0; | int matches_count=0; |
| Line 454 static void _match(Request& r, MethodPar | Line 447 static void _match(Request& r, MethodPar |
| if(!matches_count && default_code) | if(!matches_count && default_code) |
| r.process_write(*default_code); | r.process_write(*default_code); |
| else | else |
| r.write_assign_lang(result); | r.write_pass_lang(result); |
| } | } |
| } | } |
| Line 462 static void change_case(Request& r, Meth | Line 455 static void change_case(Request& r, Meth |
| 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_pass_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); |
| Line 541 const String* sql_result_string(Request& | Line 534 const String* sql_result_string(Request& |
| } | } |
| if(Value* vlimit=options->get(sql_limit_name)) { | if(Value* vlimit=options->get(sql_limit_name)) { |
| valid_options++; | valid_options++; |
| limit=(ulong)r.process_to_value(*vlimit).as_double(); | limit=(ulong)r.process(*vlimit).as_double(); |
| } | } |
| if(Value* voffset=options->get(sql_offset_name)) { | if(Value* voffset=options->get(sql_offset_name)) { |
| valid_options++; | valid_options++; |
| offset=(ulong)r.process_to_value(*voffset).as_double(); | offset=(ulong)r.process(*voffset).as_double(); |
| } | } |
| if((default_code=options->get(sql_default_name))) { | if((default_code=options->get(sql_default_name))) { |
| valid_options++; | valid_options++; |
| Line 559 const String* sql_result_string(Request& | Line 552 const String* sql_result_string(Request& |
| if(bind) | if(bind) |
| placeholders_count=marshal_binds(*bind, placeholders); | placeholders_count=marshal_binds(*bind, placeholders); |
| 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=statement_string.untaint_cstr(r.flang, r.connection()); | const char* statement_cstr=statement_string.untaint_cstr(String::L_SQL, r.connection()); |
| String_sql_event_handlers handlers(statement_string, statement_cstr); | String_sql_event_handlers handlers(statement_string, statement_cstr); |
| Line 594 static void _sql(Request& r, MethodParam | Line 586 static void _sql(Request& r, MethodParam |
| "produced no result, but no default option specified"); | "produced no result, but no default option specified"); |
| } | } |
| r.write_assign_lang(*string); | r.write_pass_lang(*string); |
| } | } |
| static void _replace(Request& r, MethodParams& params) { | static void _replace(Request& r, MethodParams& params) { |
| Line 604 static void _replace(Request& r, MethodP | Line 596 static void _replace(Request& r, MethodP |
| // ^string.replace[table] | // ^string.replace[table] |
| Table* table=params.as_table(0, "param"); | Table* table=params.as_table(0, "param"); |
| Dictionary dict(*table); | Dictionary dict(*table); |
| r.write_assign_lang(src.replace(dict)); | r.write_pass_lang(src.replace(dict)); |
| } else { | } else { |
| // ^string.replace[from-string;to-string] | // ^string.replace[from-string;to-string] |
| Dictionary dict( | Dictionary dict( |
| params.as_string(0, "from must be string"), | params.as_string(0, "from must be string"), |
| params.as_string(1, "to must be string") | params.as_string(1, "to must be string") |
| ); | ); |
| r.write_assign_lang(src.replace(dict)); | r.write_pass_lang(src.replace(dict)); |
| } | } |
| } | } |
| Line 626 static void _save(Request& r, MethodPara | Line 618 static void _save(Request& r, MethodPara |
| // ^file.save[filespec;$.charset[] $.append(true)] | // ^file.save[filespec;$.charset[] $.append(true)] |
| int valid_options=0; | int valid_options=0; |
| if(Value* vcharset_name=options->get(PA_CHARSET_NAME)){ | if(Value* vcharset_name=options->get(PA_CHARSET_NAME)){ |
| asked_charset=&::charsets.get(vcharset_name->as_string().change_case(r.charsets.source(), String::CC_UPPER)); | asked_charset=&pa_charsets.get(vcharset_name->as_string()); |
| valid_options++; | valid_options++; |
| } | } |
| if(Value* vappend=options->get(MODE_APPEND)){ | if(Value* vappend=options->get(MODE_APPEND)){ |
| Line 660 static void _save(Request& r, MethodPara | Line 652 static void _save(Request& r, MethodPara |
| static void _normalize(Request& r, MethodParams&) { | 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_pass_lang(src); |
| } | } |
| static void _trim(Request& r, MethodParams& params) { | static void _trim(Request& r, MethodParams& params) { |
| Line 678 static void _trim(Request& r, MethodPara | Line 670 static void _trim(Request& r, MethodPara |
| kind=String::TRIM_START; | kind=String::TRIM_START; |
| else if(skind==TRIM_END_OPTION || skind=="end") | else if(skind==TRIM_END_OPTION || skind=="end") |
| kind=String::TRIM_END; | kind=String::TRIM_END; |
| else if(params_count==1) | |
| chars=skind.cstr(); | |
| else | else |
| throw Exception(PARSER_RUNTIME, | throw Exception(PARSER_RUNTIME, |
| &skind, | &skind, |
| Line 691 static void _trim(Request& r, MethodPara | Line 685 static void _trim(Request& r, MethodPara |
| } | } |
| } | } |
| r.write_assign_lang(src.trim(kind, chars, &r.charsets.source())); | r.write_pass_lang(src.trim(kind, chars, &r.charsets.source())); |
| } | } |
| static void _base64(Request& r, MethodParams& params) { | static void _base64(Request& r, MethodParams& params) { |
| if(params.count()) { | if(&r.get_self() == string_class) { |
| // decode: ^string:base64[encoded[;$.strict(true|false)]] | // decode: ^string:base64[encoded[;$.strict(true|false)]] |
| const char* cstr=params.as_string(0, PARAMETER_MUST_BE_STRING).cstr(); | const char* cstr=params.count() ? params.as_string(0, PARAMETER_MUST_BE_STRING).cstr() : ""; |
| char* decoded=0; | char* decoded=0; |
| size_t length=0; | size_t length=0; |
| Line 706 static void _base64(Request& r, MethodPa | Line 700 static void _base64(Request& r, MethodPa |
| if(HashStringValue* options=params.as_hash(1)) { | if(HashStringValue* options=params.as_hash(1)) { |
| int valid_options=0; | int valid_options=0; |
| if(Value* vstrict=options->get(BASE64_STRICT_OPTION_NAME)) { | if(Value* vstrict=options->get(BASE64_STRICT_OPTION_NAME)) { |
| strict=r.process_to_value(*vstrict).as_bool(); | strict=r.process(*vstrict).as_bool(); |
| valid_options++; | valid_options++; |
| } | } |
| if(valid_options!=options->count()) | if(valid_options!=options->count()) |
| Line 722 static void _base64(Request& r, MethodPa | Line 716 static void _base64(Request& r, MethodPa |
| fix_line_breaks(decoded, length); | fix_line_breaks(decoded, length); |
| if(length) | if(length) |
| r.write_assign_lang(*new String(decoded, String::L_TAINTED)); | r.write_pass_lang(*new String(decoded, String::L_TAINTED)); |
| } | } |
| } else { | } else { |
| // encode: ^str.base64[] | // encode: ^str.base64[] |
| VString& self=GET_SELF(r, VString); | VString& self=GET_SELF(r, VString); |
| const char* cstr=self.string().cstr(); | const char* cstr=self.string().cstr(); |
| const char* encoded=pa_base64_encode(cstr, strlen(cstr)); | const char* encoded=pa_base64_encode(cstr, strlen(cstr)); |
| r.write_assign_lang(*new String(encoded, String::L_TAINTED/*once ?param=base64(something) was needed*/)); | r.write_pass_lang(*new String(encoded, String::L_TAINTED/*once ?param=base64(something) was needed*/)); |
| } | } |
| } | } |
| static void _idna(Request& r, MethodParams& params) { | static void _idna(Request& r, MethodParams& params) { |
| if(params.count()) { | if(&r.get_self() == string_class) { |
| // decode: ^string:idna[encoded] | // decode: ^string:idna[encoded] |
| const char* cstr=params.as_string(0, PARAMETER_MUST_BE_STRING).cstr(); | const char* cstr=params.count() ? params.as_string(0, PARAMETER_MUST_BE_STRING).cstr() : ""; |
| r.write_assign_lang(*new String(pa_idna_decode(cstr, r.charsets.source()), String::L_TAINTED)); | r.write_pass_lang(*new String(pa_idna_decode(cstr, r.charsets.source()), String::L_TAINTED)); |
| } else { | } else { |
| // encode: ^str.idna[] | // encode: ^str.idna[] |
| VString& self=GET_SELF(r, VString); | VString& self=GET_SELF(r, VString); |
| const char* cstr=self.string().cstr(); | const char* cstr=self.string().cstr(); |
| r.write_assign_lang(*new String(pa_idna_encode(cstr, r.charsets.source()), String::L_TAINTED)); | r.write_pass_lang(*new String(pa_idna_encode(cstr, r.charsets.source()), String::L_TAINTED)); |
| } | } |
| } | } |
| static void _escape(Request& r, MethodParams&){ | static void _js_escape(Request& r, MethodParams&){ |
| const String& src=GET_SELF(r, VString).string(); | const String& src=GET_SELF(r, VString).string(); |
| r.write_assign_lang(src.escape(r.charsets.source())); | r.write_pass_lang(src.escape(r.charsets.source())); |
| } | } |
| static void _unescape(Request& r, MethodParams& params){ | static void _js_unescape(Request& r, MethodParams& params){ |
| const String& src=params.as_string(0, PARAMETER_MUST_BE_STRING); | const String& src=params.as_string(0, PARAMETER_MUST_BE_STRING); |
| if(const char* result=unescape_chars(src.cstr(), src.length(), &r.charsets.source(), true)) | if(const char* result=unescape_chars(src.cstr(), src.length(), &r.charsets.source(), true)) |
| r.write_assign_lang(*new String(result, String::L_TAINTED)); | r.write_pass_lang(*new String(result, String::L_TAINTED)); |
| } | |
| static void _unescape(Request& r, MethodParams& params){ | |
| const String& mode=params.as_string(0, MODE_MUST_NOT_BE_CODE); | |
| const String& src=params.as_string(1, PARAMETER_MUST_BE_STRING); | |
| Charset* from_charset=&r.charsets.client(); | |
| if(params.count() > 2) | |
| if(HashStringValue* options=params.as_hash(2)) { | |
| int valid_options=0; | |
| if(Value* vcharset_name=options->get(PA_CHARSET_NAME)){ | |
| from_charset=&pa_charsets.get(vcharset_name->as_string()); | |
| valid_options++; | |
| } | |
| if(valid_options!=options->count()) | |
| throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION); | |
| } | |
| bool mode_js; | |
| if(mode==UNESCAPE_MODE_JS){ | |
| mode_js=true; | |
| } else if(mode==UNESCAPE_MODE_URI){ | |
| mode_js=false; | |
| } else { | |
| throw Exception(PARSER_RUNTIME, &mode, "is invalid mode, must be either '" UNESCAPE_MODE_JS "' or '" UNESCAPE_MODE_URI "'"); | |
| } | |
| const char* unescaped=unescape_chars(src.cstr(), src.length(), from_charset, mode_js); | |
| if(*unescaped){ | |
| const String* result=new String(Charset::transcode(unescaped, *from_charset, r.charsets.source()), String::L_TAINTED); | |
| r.write_pass_lang(*result); | |
| } | |
| } | |
| static void _contains(Request& r, MethodParams& params) { | |
| // empty or whitespace string is hash compatible | |
| GET_SELF(r, VString).get_element(params.as_string(0, "key must be string")); | |
| // ignoring result as it allways null | |
| r.write_no_lang(VBool::get(false)); | |
| } | } |
| // constructor | // constructor |
| Line 835 MString::MString(): Methoded("string") { | Line 869 MString::MString(): Methoded("string") { |
| add_native_method("idna", Method::CT_ANY, _idna, 0, 1); | add_native_method("idna", Method::CT_ANY, _idna, 0, 1); |
| // ^string.js-escape[] | // ^string.js-escape[] |
| add_native_method("js-escape", Method::CT_ANY, _escape, 0, 0); | add_native_method("js-escape", Method::CT_DYNAMIC, _js_escape, 0, 0); |
| // ^string:js-unescape[escaped%uXXXXstring] | // ^string:js-unescape[escaped%uXXXXstring] |
| add_native_method("js-unescape", Method::CT_STATIC, _unescape, 1, 1); | add_native_method("js-unescape", Method::CT_STATIC, _js_unescape, 1, 1); |
| } | |
| // ^string:unescape[js|uri;escaped;$.charset[...]] | |
| add_native_method("unescape", Method::CT_STATIC, _unescape, 2, 3); | |
| // ^string.contains[key] for hash compatibility | |
| add_native_method("contains", Method::CT_DYNAMIC, _contains, 1, 1); | |
| } |