Annotation of parser3/src/classes/table.C, revision 1.2

1.1       paf         1: /*
                      2:        Parser
                      3:        Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
                      4:        Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
                      5: 
1.2     ! paf         6:        $Id: table.C,v 1.1 2001/03/12 13:40:01 paf Exp $
1.1       paf         7: */
                      8: 
                      9: #include "pa_request.h"
                     10: #include "_table.h"
                     11: #include "pa_vtable.h"
1.2     ! paf        12: #include "pa_common.h"
1.1       paf        13: 
                     14: // global var
                     15: 
                     16: VClass *table_class;
                     17: 
                     18: // methods
                     19: 
                     20: 
                     21: // TODO: проверить ^set в ^menu & co
                     22: 
1.2     ! paf        23: static void set_or_load(
        !            24:                                                Request& r, 
        !            25:                                                const String& method_name, Array *params, 
        !            26:                                                bool is_load) {
1.1       paf        27:        Pool& pool=r.pool();
                     28:        // data is last parameter
                     29:        Value *vdata=static_cast<Value *>(params->get(params->size()-1));
                     30:        if(vdata->get_junction())
                     31:                R_THROW(0, 0,
                     32:                        &method_name,
                     33:                        "body must not be a junction");
                     34: 
1.2     ! paf        35:        // data or file_name
        !            36:        char *data_or_filename=vdata->as_string().cstr();
        !            37:        // data
        !            38:        char *data=is_load?file_read(pool, r.absolute(data_or_filename)):data_or_filename;
1.1       paf        39: 
                     40:        // parse columns
                     41:        Array *columns;
                     42: #ifndef NO_STRING_ORIGIN
                     43:        const Origin& origin=method_name.origin();
1.2     ! paf        44:        const char *file=origin.file;
1.1       paf        45:        uint line=origin.line;
                     46: #endif
                     47:        if(params->size()==2) {
                     48:                columns=0;
                     49:        } else {
                     50:                columns=new(pool) Array(pool);
                     51: 
                     52:                if(char *row_chars=getrow(&data)) 
                     53:                        do {
                     54:                                String *name=new(pool) String(pool);
                     55:                                name->APPEND(lsplit(&row_chars, '\t'), 0, file, line++);
                     56:                                *columns+=name;
                     57:                        } while(row_chars);
                     58:        }
                     59: 
                     60:        // parse cells
                     61:        Table& table=*new(pool) Table(pool, method_name, columns);
                     62:        char *row_chars;
                     63:        while(row_chars=getrow(&data)) {
                     64:                Array *row=new(pool) Array(pool);
                     65:                while(char *cell_chars=lsplit(&row_chars, '\t')) {
                     66:                        String *cell=new(pool) String(pool);
                     67:                        cell->APPEND(cell_chars, 0, file, line);
                     68:                        *row+=cell;
                     69:                }
                     70:                line++;
                     71:                table+=row;
                     72:        };
                     73: 
                     74:        // replace any previous table value
                     75:        r.self->as_vtable().set_table(table);
                     76: }
                     77: 
1.2     ! paf        78: 
        !            79: static void _set(Request& r, const String& method_name, Array *params) {
        !            80:        set_or_load(r, method_name, params, false);
        !            81: }
        !            82: 
        !            83: static void _load(Request& r, const String& method_name, Array *params) {
        !            84:        set_or_load(r, method_name, params, true);
        !            85: }
        !            86: 
1.1       paf        87: void initialize_table_class(Pool& pool, VClass& vclass) {
1.2     ! paf        88:        // ^table.set[data]  ^table.set[nameless;data]
1.1       paf        89:        vclass.add_native_method("set", _set, 1, 2);
1.2     ! paf        90: 
        !            91:        // ^table.load[data]  ^table.load[nameless;data]
        !            92:        vclass.add_native_method("load", _load, 1, 2);
1.1       paf        93: }      

E-mail: