Annotation of parser3/src/classes/string.C, revision 1.134

1.24      paf         1: /** @file
                      2:        Parser: @b string parser class.
                      3: 
1.132     paf         4:        Copyright (c) 2001-2004 ArtLebedev Group (http://www.artlebedev.com)
1.97      paf         5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.113     paf         6: */
1.24      paf         7: 
1.134   ! paf         8: static const char * const IDENT_STRING_C="$Date: 2004/02/27 15:07:46 $";
1.1       paf         9: 
1.43      paf        10: #include "classes.h"
1.126     paf        11: #include "pa_vmethod_frame.h"
                     12: 
1.1       paf        13: #include "pa_request.h"
                     14: #include "pa_vdouble.h"
                     15: #include "pa_vint.h"
1.17      paf        16: #include "pa_vtable.h"
1.25      paf        17: #include "pa_vbool.h"
1.27      paf        18: #include "pa_string.h"
1.53      parser     19: #include "pa_sql_connection.h"
1.71      parser     20: #include "pa_dictionary.h"
1.119     paf        21: #include "pa_vmethod_frame.h"
1.1       paf        22: 
1.41      paf        23: // class
                     24: 
1.126     paf        25: class MString: public Methoded {
1.41      paf        26: public:
1.126     paf        27:        MString();
1.44      paf        28: public: // Methoded
1.53      parser     29:        bool used_directly() { return true; }
1.41      paf        30: };
1.1       paf        31: 
1.126     paf        32: // global variable
                     33: 
                     34: DECLARE_CLASS_VAR(string, new MString, 0);
                     35: 
                     36: // defines for statics
                     37: 
                     38: #define MATCH_VAR_NAME "match"
1.133     paf        39: #define TRIM_START_OPTION "start"
                     40: #define TRIM_BOTH_OPTION "both"
                     41: #define TRIM_END_OPTION "end"
1.126     paf        42: 
                     43: // statics
                     44: 
                     45: static const String match_var_name(MATCH_VAR_NAME);
                     46: 
1.1       paf        47: // methods
                     48: 
1.126     paf        49: static void _length(Request& r, MethodParams&) {
                     50:        double result=GET_SELF(r, VString).string().length();
                     51:        r.write_no_lang(*new VDouble(result));
1.1       paf        52: }
                     53: 
1.126     paf        54: static void _int(Request& r, MethodParams& params) {
                     55:        const String& self_string=GET_SELF(r, VString).string();
1.72      parser     56:        int converted;
1.126     paf        57:        Value* default_code=params.count()>0?&params.as_junction(0, "default must be int")
                     58:                :0; // (default)
1.84      parser     59:        try {
1.126     paf        60:                if(self_string.is_empty())
1.121     paf        61:                        throw Exception("parser.runtime",
1.126     paf        62:                                0,
1.121     paf        63:                                "parameter is empty string, error converting");
1.126     paf        64:                converted=self_string.as_int();
1.84      parser     65:        } catch(...) { // convert problem
1.126     paf        66:                if(default_code)
                     67:                        converted=r.process_to_value(*default_code).as_int();
1.84      parser     68:                else
1.126     paf        69:                        rethrow; // we have a problem when no default                   
1.72      parser     70:        }
1.126     paf        71:        r.write_no_lang(*new VInt(converted));
1.1       paf        72: }
                     73: 
1.126     paf        74: static void _double(Request& r, MethodParams& params) {
                     75:        const String& self_string=GET_SELF(r, VString).string();
1.72      parser     76:        double converted;
1.126     paf        77:        Value* default_code=params.count()>0?&params.as_junction(0, "default must be double")
                     78:                :0; // (default)
1.84      parser     79:        try {
1.126     paf        80:                if(self_string.is_empty())
1.121     paf        81:                        throw Exception("parser.runtime",
1.126     paf        82:                                0,
1.121     paf        83:                                "parameter is empty string, error converting");
1.126     paf        84:                converted=self_string.as_double();
1.84      parser     85:        } catch(...) { // convert problem
1.126     paf        86:                if(default_code)
                     87:                        converted=r.process_to_value(*default_code).as_double();
1.84      parser     88:                else
1.126     paf        89:                        rethrow; // we have a problem when no default
1.72      parser     90:        }
                     91: 
1.126     paf        92:        r.write_no_lang(*new VDouble(converted));
1.1       paf        93: }
                     94: 
1.126     paf        95: /*not static*/void _string_format(Request& r, MethodParams& params) {
1.9       paf        96: 
1.126     paf        97:        Value& fmt_maybe_code=params[0];
1.95      paf        98:        // for some time due to stupid {} in original design
1.99      paf        99:        const String& fmt=r.process_to_string(fmt_maybe_code);
1.9       paf       100: 
1.126     paf       101:        const char* buf=format(r.get_self().as_double(), fmt.cstrm());
1.63      parser    102: 
1.126     paf       103:        r.write_no_lang(String(buf));
1.9       paf       104: }
1.11      paf       105: 
1.126     paf       106: static void _left(Request& r, MethodParams& params) {
                    107:        size_t n=(size_t)params.as_int(0, "n must be int", r);
1.15      paf       108:        
1.126     paf       109:        const String& string=GET_SELF(r, VString).string();
1.102     paf       110:        r.write_assign_lang(string.mid(0, n));
1.15      paf       111: }
                    112: 
1.126     paf       113: static void _right(Request& r, MethodParams& params) {
                    114:        size_t n=(size_t)params.as_int(0, "n must be int", r);
1.15      paf       115:        
1.126     paf       116:        const String& string=GET_SELF(r, VString).string();
1.127     paf       117:        size_t length=string.length();
                    118:        r.write_assign_lang(n<length?string.mid(length-n, string.length()):string);
1.15      paf       119: }
                    120: 
1.126     paf       121: static void _mid(Request& r, MethodParams& params) {
                    122:        const String& string=GET_SELF(r, VString).string();
1.83      parser    123: 
1.126     paf       124:        size_t p=(size_t)max(0, params.as_int(0, "p must be int", r));
                    125:        size_t n=params.count()>1?
                    126:                (size_t)max(0, params.as_int(1, "n must be int", r)):string.length();
1.15      paf       127:        
1.102     paf       128:        r.write_assign_lang(string.mid(p, p+n));
1.15      paf       129: }
                    130: 
1.126     paf       131: static void _pos(Request& r, MethodParams& params) {
                    132:        Value& substr=params.as_no_junction(0, "substr must not be code");
1.16      paf       133:        
1.126     paf       134:        const String& string=GET_SELF(r, VString).string();
                    135:        r.write_assign_lang(*new VInt((int)string.pos(substr.as_string())));
1.16      paf       136: }
                    137: 
1.128     paf       138: static void split_list(MethodParams& params, int paramIndex,
1.126     paf       139:                       const String& string, 
                    140:                       ArrayString& result) {
                    141:        Value& delim_value=params.as_no_junction(paramIndex, "delimiter must not be code");
1.23      paf       142: 
1.126     paf       143:        size_t pos_after=0;
                    144:        string.split(result, pos_after, delim_value.as_string());
1.19      paf       145: }
                    146: 
1.118     paf       147: #define SPLIT_LEFT 0x0001
                    148: #define SPLIT_RIGHT 0x0010
                    149: #define SPLIT_HORIZONTAL 0x0100
                    150: #define SPLIT_VERTICAL 0x1000
                    151: 
1.126     paf       152: static int split_options(const String* options) {
1.118     paf       153:     struct Split_option {
1.126     paf       154:                const char* keyL;
                    155:                const char* keyU;
1.118     paf       156:                int setBit;
                    157:                int checkBit;
                    158:     } split_option[]={
                    159:                {"l", "L", SPLIT_LEFT, SPLIT_RIGHT}, // 0xVHRL
                    160:                {"r", "R", SPLIT_RIGHT, SPLIT_LEFT},
                    161:                {"h", "H", SPLIT_HORIZONTAL, SPLIT_VERTICAL},
                    162:                {"v", "V", SPLIT_VERTICAL, SPLIT_HORIZONTAL},
1.130     paf       163:                {0, 0, 0, 0}
1.118     paf       164:     };
                    165: 
                    166:        int result=0;
1.126     paf       167:        if(options) {
1.118     paf       168:                for(Split_option *o=split_option; o->keyL; o++) 
1.126     paf       169:                        if(options->pos(o->keyL)!=STRING_NOT_FOUND 
                    170:                                || (o->keyU && options->pos(o->keyU)!=STRING_NOT_FOUND)) {
1.118     paf       171:                                if(result & o->checkBit)
                    172:                                        throw Exception("parser.runtime",
                    173:                                                options,
                    174:                                                "conflicting split options");
                    175:                                result |= o->setBit;
                    176:                        }
                    177:        }
                    178: 
                    179:        return result;
                    180: }
                    181: 
1.128     paf       182: static Table& split_vertical(ArrayString& pieces, bool right) {
1.126     paf       183:        Table::columns_type columns(new ArrayString);
                    184:        *columns+=new String("piece");
1.19      paf       185: 
1.126     paf       186:        Table& table=*new Table(columns, pieces.count());
1.118     paf       187:        if(right) { // right
1.126     paf       188:                for(int i=pieces.count(); --i>=0; ) {
                    189:                        Table::element_type row(new ArrayString);
                    190:                        *row+=pieces[i];
                    191:                        table+=row;
1.118     paf       192:                }
                    193:        } else { // left
1.126     paf       194:                Array_iterator<const String*> i(pieces);
1.118     paf       195:                while(i.has_next()) {
1.126     paf       196:                        Table::element_type row(new ArrayString);
                    197:                        *row+=i.next();
                    198:                        table+=row;
1.118     paf       199:                }
1.61      parser    200:        }
1.118     paf       201: 
1.126     paf       202:        return table;
1.19      paf       203: }
                    204: 
1.128     paf       205: static Table& split_horizontal(ArrayString& pieces, bool right) {
1.126     paf       206:        Table& table=*new Table(Table::columns_type(0) /* nameless */);
                    207:        Table::element_type row(new ArrayString(pieces.count()));
1.118     paf       208:        if(right) { // right
1.131     paf       209:                for(int i=pieces.count(); --i>=0; )
1.126     paf       210:                        *row+=pieces[i];
1.118     paf       211:        } else { // left
1.126     paf       212:                for(Array_iterator<const String*> i(pieces); i.has_next(); )
                    213:                        *row+=i.next();
1.118     paf       214:        }
1.126     paf       215:        table+=row;
1.118     paf       216: 
1.126     paf       217:        return table;
1.118     paf       218: }
                    219: 
1.126     paf       220: static void split_with_options(Request& r, MethodParams& params,
1.118     paf       221:                                                           int bits) {
1.126     paf       222:        const String& string=GET_SELF(r, VString).string();
1.19      paf       223: 
1.126     paf       224:        ArrayString pieces;
1.128     paf       225:        split_list(params, 0, string, pieces);
1.19      paf       226: 
1.118     paf       227:        if(!bits) {
1.126     paf       228:                const String* options=0;
                    229:                if(params.count()>1)
                    230:                        options=&params.as_string(1, "options must not be code");
                    231:                
1.118     paf       232:                bits=split_options(options);
                    233:        }
1.21      paf       234: 
1.118     paf       235:        bool right=(bits & SPLIT_RIGHT) != 0;
                    236:        bool horizontal=(bits & SPLIT_HORIZONTAL) !=0;
1.128     paf       237:        Table& table=horizontal?split_horizontal(pieces, right)
                    238:                :split_vertical(pieces, right);
1.17      paf       239: 
1.126     paf       240:        r.write_no_lang(*new VTable(&table));
1.118     paf       241: }
1.126     paf       242: static void _split(Request& r, MethodParams& params) {
                    243:        split_with_options(r, params, 0 /* maybe-determine from param #2 */);
1.118     paf       244: }
1.126     paf       245: static void _lsplit(Request& r, MethodParams& params) {
                    246:        split_with_options(r, params, SPLIT_LEFT);
1.118     paf       247: }
1.126     paf       248: static void _rsplit(Request& r, MethodParams& params) {
                    249:        split_with_options(r, params, SPLIT_RIGHT);
1.17      paf       250: }
                    251: 
1.126     paf       252: static void search_action(Table& table, Table::element_type row, int, int, int, int, void *) {
1.28      paf       253:        if(row)
                    254:                table+=row;
1.27      paf       255: }
                    256: 
1.74      parser    257: #ifndef DOXYGEN
1.27      paf       258: struct Replace_action_info {
1.126     paf       259:        Request* request;  
                    260:        const String* src;  String* dest;
                    261:        VTable* vtable;
                    262:        Value* replacement_code;
1.27      paf       263: };
1.74      parser    264: #endif
1.105     paf       265: /// @todo they can do $global[$result] there, getting pointer to later-invalid local var, kill this
1.126     paf       266: static void replace_action(Table& table, ArrayString* row, 
                    267:                           int prestart, int prefinish, 
                    268:                           int poststart, int postfinish,
                    269:                           void *info) {
1.27      paf       270:        Replace_action_info& ai=*static_cast<Replace_action_info *>(info);
1.31      paf       271:        if(row) { // begin&middle
1.104     paf       272:                // piece from last match['prestart'] to beginning of this match['prefinish']
                    273:                if(prestart!=prefinish)
                    274:                        *ai.dest << ai.src->mid(prestart, prefinish);//ai.dest->APPEND_CONST("-");
1.51      parser    275:                // store found parts in one-record VTable
1.126     paf       276:                if(table.count()) // middle
1.32      paf       277:                        table.put(0, row);
                    278:                else // begin
1.30      paf       279:                        table+=row;
                    280:                { // execute 'replacement_code' in 'table' context
1.105     paf       281:                        ai.vtable->set_table(table);
1.30      paf       282: 
1.105     paf       283:                        *ai.dest << ai.request->process_to_string(*ai.replacement_code);
1.29      paf       284:                }
                    285:        } else // end
1.104     paf       286:                *ai.dest << ai.src->mid(poststart, postfinish);
1.27      paf       287: }
                    288: 
1.50      parser    289: /// @todo use pcre:study somehow
1.126     paf       290: static void _match(Request& r, MethodParams& params) {
                    291:        Value& regexp=params.as_no_junction(0, "regexp must not be code");
                    292: 
                    293:        const String* options=
                    294:                params.count()>1?
                    295:                &params.as_no_junction(1, "options must not be code").as_string():0;
                    296: 
                    297:        Temp_lang temp_lang(r, String::L_PASS_APPENDED);
                    298:        const String& src=GET_SELF(r, VString).string();
                    299:        bool just_matched;
                    300:        if(params.count()<3) { // search
                    301:                Table* table=src.match(r.charsets.source(),
1.32      paf       302:                        regexp.as_string(), options,
1.64      parser    303:                        search_action, 0,
1.126     paf       304:                        just_matched);
                    305:                Value* result;
                    306:                if(table) 
                    307:                        result=new VTable(table); // table of pre/match/post+substrings
1.64      parser    308:                else 
1.126     paf       309:                        result=new VBool(just_matched);
1.102     paf       310:                r.write_assign_lang(*result);
1.27      paf       311:        } else { // replace
1.126     paf       312:                Value& replacement_code=params.as_junction(2, "replacement param must be code");
1.106     paf       313: 
1.126     paf       314:                String result;
                    315:                VTable* vtable=new VTable;
1.130     paf       316:                Replace_action_info info={
                    317:                        &r,
                    318:                        &src,
                    319:                        &result,
                    320:                        vtable,
                    321:                        &replacement_code
                    322:                };
1.105     paf       323:                Temp_value_element temp_match_var(
1.119     paf       324:                        *replacement_code.get_junction()->method_frame, 
1.126     paf       325:                        match_var_name, vtable);
                    326:                src.match(r.charsets.source(),
1.99      paf       327:                        r.process_to_string(regexp), options,
1.126     paf       328:                        replace_action, &info,
                    329:                        just_matched);
1.102     paf       330:                r.write_assign_lang(result);
1.27      paf       331:        }
1.24      paf       332: }
                    333: 
1.128     paf       334: static void change_case(Request& r, MethodParams&, 
1.49      parser    335:                                                String::Change_case_kind kind) {
1.126     paf       336:        const String& src=GET_SELF(r, VString).string();
1.49      parser    337: 
1.126     paf       338:        r.write_assign_lang(src.change_case(r.charsets.source(), kind));
1.49      parser    339: }
1.126     paf       340: static void _upper(Request& r, MethodParams& params) {
                    341:        change_case(r, params, String::CC_UPPER);
1.49      parser    342: }
1.126     paf       343: static void _lower(Request& r, MethodParams& params) {
                    344:        change_case(r, params, String::CC_LOWER);
1.49      parser    345: }
                    346: 
1.65      parser    347: #ifndef DOXYGEN
1.126     paf       348: class String_sql_event_handlers: public SQL_Driver_query_event_handlers {
                    349:        const String& statement_string; const char* statement_cstr;
                    350:        bool got_column;
1.65      parser    351: public:
1.126     paf       352:        bool got_cell;
                    353:        String& result;
                    354: public:
                    355:        String_sql_event_handlers(
                    356:                const String& astatement_string, const char* astatement_cstr):
                    357:                statement_string(astatement_string), statement_cstr(astatement_cstr),
                    358:                got_column(false),
                    359:                got_cell(false),
                    360:                result(*new String) {}
1.65      parser    361: 
1.128     paf       362:        bool add_column(SQL_Error& error, const char* /*str*/, size_t /*length*/) {
1.124     paf       363:                if(got_column) {
                    364:                        error=SQL_Error("parser.runtime",
1.126     paf       365:                                //statement_string,
1.65      parser    366:                                "result must contain exactly one column");
1.124     paf       367:                        return true;
                    368:                }
1.65      parser    369:                got_column=true;
1.124     paf       370:                return false;
1.65      parser    371:        }
1.124     paf       372:        bool before_rows(SQL_Error& /*error*/ ) { /* ignore */ return false; }
                    373:        bool add_row(SQL_Error& /*error*/) { /* ignore */ return false; }
1.126     paf       374:        bool add_row_cell(SQL_Error& error, const char* str, size_t length) {
1.124     paf       375:                if(got_cell) {
                    376:                        error=SQL_Error("parser.runtime",
1.126     paf       377:                                //statement_string,
1.65      parser    378:                                "result must not contain more then one row");
1.124     paf       379:                        return true;
                    380:                }
1.65      parser    381: 
1.124     paf       382:                try {
                    383:                        got_cell=true;
1.126     paf       384:                        result.append_know_length(str, length, String::L_TAINTED);
1.124     paf       385:                        return false;
                    386:                } catch(...) {
                    387:                        error=SQL_Error("exception occured in String_sql_event_handlers::add_row_cell");
                    388:                        return true;
                    389:                }
1.65      parser    390:        }
                    391: };
                    392: #endif
1.126     paf       393: extern String sql_limit_name;
                    394: extern String sql_offset_name;
                    395: extern String sql_default_name;
                    396: extern String sql_distinct_name;
                    397: const String* sql_result_string(Request& r, MethodParams& params,
                    398:                                HashStringValue*& options, Value*& default_code) {
                    399:        Value& statement=params.as_junction(0, "statement must be code");
1.53      parser    400: 
1.70      parser    401:        ulong limit=0;
                    402:        ulong offset=0;
1.81      parser    403:        default_code=0;
1.126     paf       404:        if(params.count()>1) {
                    405:                Value& voptions=params.as_no_junction(1, "options must be hash, not code");
1.115     paf       406:                if(!voptions.is_string())
1.130     paf       407:                        if((options=voptions.get_hash())) {
1.126     paf       408:                                if(Value* vlimit=options->get(sql_limit_name))
1.99      paf       409:                                        limit=(ulong)r.process_to_value(*vlimit).as_double();
1.126     paf       410:                                if(Value* voffset=options->get(sql_offset_name))
1.99      paf       411:                                        offset=(ulong)r.process_to_value(*voffset).as_double();
1.130     paf       412:                                if((default_code=options->get(sql_default_name))) {
                    413:                                        if(!default_code->get_junction())
1.98      paf       414:                                                throw Exception("parser.runtime",
1.126     paf       415:                                                        0,
1.81      parser    416:                                                        "default option must be code");
                    417:                                }
1.73      parser    418:                        } else
1.98      paf       419:                                throw Exception("parser.runtime",
1.126     paf       420:                                        0,
1.73      parser    421:                                        "options must be hash");
1.70      parser    422:        } else
                    423:                options=0;
                    424: 
1.126     paf       425:        Temp_lang temp_lang(r, String::L_SQL);
1.99      paf       426:        const String& statement_string=r.process_to_string(statement);
1.126     paf       427:        const char* statement_cstr=
                    428:                statement_string.cstr(String::L_UNSPECIFIED, r.connection());
                    429:        String_sql_event_handlers handlers(statement_string, statement_cstr);
                    430:        r.connection()->query(
1.117     paf       431:                statement_cstr, offset, limit, 
                    432:                handlers,
                    433:                statement_string);
1.53      parser    434:        
1.65      parser    435:        if(!handlers.got_cell)
                    436:                return 0; // no lines, caller should return second param[default value]
1.62      parser    437: 
1.126     paf       438:        return &handlers.result;
1.53      parser    439: }
                    440: 
1.126     paf       441: static void _sql(Request& r, MethodParams& params) {
1.53      parser    442: 
1.126     paf       443:        HashStringValue* options;
                    444:        Value* default_code;
                    445:        const String* string=sql_result_string(r, params, options, default_code);
1.62      parser    446:        if(!string) {
1.81      parser    447:                if(default_code) {
1.99      paf       448:                        string=&r.process_to_string(*default_code);
1.68      parser    449:                } else
1.98      paf       450:                        throw Exception("parser.runtime",
1.126     paf       451:                                0,
1.81      parser    452:                                "produced no result, but no default option specified");
1.62      parser    453:        }
1.100     paf       454: 
1.102     paf       455:        r.write_assign_lang(*string);
1.53      parser    456: }
                    457: 
1.126     paf       458: static void _replace(Request& r, MethodParams& params) {
                    459:        const String& src=GET_SELF(r, VString).string();
1.71      parser    460: 
1.126     paf       461:        Table* table=params.as_no_junction(0, "parameter must not be code").get_table();
1.71      parser    462:        if(!table)
1.98      paf       463:                throw Exception("parser.runtime",
1.126     paf       464:                        0,
1.71      parser    465:                        "parameter must be table");
                    466: 
                    467:        Dictionary dict(*table);
1.126     paf       468:        r.write_assign_lang(src.replace(dict));
1.71      parser    469: }
1.79      parser    470: 
1.126     paf       471: static void _save(Request& r, MethodParams& params) {
                    472:        const String& file_name=params.as_string(params.count()-1, 
1.87      paf       473:                "file name must be string");
1.79      parser    474: 
1.126     paf       475:        const String& src=GET_SELF(r, VString).string();
1.79      parser    476: 
1.87      paf       477:        bool do_append=false;
1.126     paf       478:        if(params.count()>1) {
                    479:                const String& mode=params.as_string(0, "mode must be string");
1.87      paf       480:                if(mode=="append")
                    481:                        do_append=true;
                    482:                else
1.98      paf       483:                        throw Exception("parser.runtime",
1.87      paf       484:                                &mode,
                    485:                                "unknown mode, must be 'append'");
                    486:        }               
                    487: 
1.79      parser    488:        // write
1.126     paf       489:        const char* buf=src.cstr(String::L_UNSPECIFIED, r.connection(false/*no error if none*/));
1.94      paf       490:        file_write(r.absolute(file_name), 
1.89      paf       491:                buf, strlen(buf), true, do_append);
1.79      parser    492: }
                    493: 
1.126     paf       494: static void _normalize(Request& r, MethodParams&) {
                    495:        const String& src=GET_SELF(r, VString).string();
                    496: 
                    497:        r.write_assign_lang(src);
1.109     paf       498: }
                    499: 
1.133     paf       500: static void _trim(Request& r, MethodParams& params) {
                    501:        const String& src=GET_SELF(r, VString).string();
                    502: 
                    503:        String::Trim_kind kind=String::TRIM_BOTH;
                    504:        const char* chars=0;
                    505:        if(params.count()>0) {
1.134   ! paf       506:                if(params.count()>1) { // [>>kind<<;chars]
        !           507:                        const String& skind=params.as_string(0, 
        !           508:                                "'where' must be string");
        !           509:                        if(skind==TRIM_START_OPTION)
        !           510:                                kind=String::TRIM_START;
        !           511:                        else if(skind==TRIM_END_OPTION)
        !           512:                                kind=String::TRIM_END;
        !           513:                        else if(skind==TRIM_BOTH_OPTION)
        !           514:                                kind=String::TRIM_BOTH;
        !           515:                        else
        !           516:                                throw Exception("parser.runtime",
        !           517:                                        &skind,
        !           518:                                        "'kind' should be one of "TRIM_START_OPTION", "TRIM_BOTH_OPTION", "TRIM_END_OPTION);
        !           519:                }
1.133     paf       520: 
1.134   ! paf       521:                chars=params.as_string(params.count()-1, 
1.133     paf       522:                        "'chars' must be string").cstr();
                    523:        }
                    524: 
                    525:        r.write_assign_lang(src.trim(kind, chars));
                    526: }
                    527: 
1.41      paf       528: // constructor
                    529: 
1.126     paf       530: MString::MString(): Methoded("string") {
1.1       paf       531:        // ^string.length[]
1.41      paf       532:        add_native_method("length", Method::CT_DYNAMIC, _length, 0, 0);
1.6       paf       533:        
1.1       paf       534:        // ^string.int[]
1.72      parser    535:        // ^string.int(default)
                    536:        add_native_method("int", Method::CT_DYNAMIC, _int, 0, 1);
1.1       paf       537:        // ^string.double[]
1.72      parser    538:        // ^string.double(default)
                    539:        add_native_method("double", Method::CT_DYNAMIC, _double, 0, 1);
1.9       paf       540: 
1.24      paf       541:        // ^string.format{format}
1.41      paf       542:        add_native_method("format", Method::CT_DYNAMIC, _string_format, 1, 1);
1.14      paf       543: 
1.15      paf       544:        // ^string.left(n)
1.41      paf       545:        add_native_method("left", Method::CT_DYNAMIC, _left, 1, 1);
1.15      paf       546:        // ^string.right(n)
1.41      paf       547:        add_native_method("right", Method::CT_DYNAMIC, _right, 1, 1);
1.15      paf       548:        // ^string.mid(p;n)
1.82      parser    549:        add_native_method("mid", Method::CT_DYNAMIC, _mid, 1, 2);
1.16      paf       550: 
                    551:        // ^string.pos[substr]
1.41      paf       552:        add_native_method("pos", Method::CT_DYNAMIC, _pos, 1, 1);
1.17      paf       553: 
1.118     paf       554:        // ^string.split[delim]
                    555:        // ^string.split[delim][options]
                    556:        add_native_method("split", Method::CT_DYNAMIC, _split, 1, 2);
                    557:                // old names for backward compatibility
                    558:                // ^string.lsplit[delim]
                    559:                add_native_method("lsplit", Method::CT_DYNAMIC, _lsplit, 1, 1);
                    560:                // ^string.rsplit[delim]
                    561:                add_native_method("rsplit", Method::CT_DYNAMIC, _rsplit, 1, 1);
                    562:        
1.32      paf       563:        // ^string.match[regexp][options]
                    564:        // ^string.match[regexp][options]{replacement-code}
1.41      paf       565:        add_native_method("match", Method::CT_DYNAMIC, _match, 1, 3);
1.49      parser    566: 
                    567:        // ^string.toupper[]
                    568:        add_native_method("upper", Method::CT_DYNAMIC, _upper, 0, 0);
                    569:        // ^string.tolower[]
                    570:        add_native_method("lower", Method::CT_DYNAMIC, _lower, 0, 0);
1.53      parser    571: 
1.70      parser    572:        // ^sql[query]
                    573:        // ^sql[query][$.limit(1) $.offset(2) $.default[n/a]]
1.67      parser    574:        add_native_method("sql", Method::CT_STATIC, _sql, 1, 2);
1.71      parser    575: 
                    576:        // ^string.replace[table]
                    577:        add_native_method("replace", Method::CT_DYNAMIC, _replace, 1, 1);
1.79      parser    578: 
                    579:        // ^string.save[file]  
1.87      paf       580:        add_native_method("save", Method::CT_DYNAMIC, _save, 1, 2);
1.109     paf       581: 
1.112     paf       582:        // ^string.normalize[]  
                    583:        add_native_method("normalize", Method::CT_DYNAMIC, _normalize, 0, 0);
1.133     paf       584: 
                    585:        // ^string.trim[[start|both|end][;chars]]
                    586:        add_native_method("trim", Method::CT_DYNAMIC, _trim, 0, 2);
1.2       paf       587: }      

E-mail: