Return to table.C CVS log

Up to [parser3project] / parser3 / src / classes

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

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.3     ! paf         6:        $Id: table.C,v 1.2 2001/03/12 17:00:46 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));
1.3     ! paf        30:        r.fail_if_junction_(true, *vdata, 
        !            31:                method_name, "body must not be a junction");
1.1       paf        32: 
1.2       paf        33:        // data or file_name
                     34:        char *data_or_filename=vdata->as_string().cstr();
                     35:        // data
                     36:        char *data=is_load?file_read(pool, r.absolute(data_or_filename)):data_or_filename;
1.1       paf        37: 
                     38:        // parse columns
                     39:        Array *columns;
                     40: #ifndef NO_STRING_ORIGIN
                     41:        const Origin& origin=method_name.origin();
1.2       paf        42:        const char *file=origin.file;
1.1       paf        43:        uint line=origin.line;
                     44: #endif
                     45:        if(params->size()==2) {
                     46:                columns=0;
                     47:        } else {
                     48:                columns=new(pool) Array(pool);
                     49: 
                     50:                if(char *row_chars=getrow(&data)) 
                     51:                        do {
                     52:                                String *name=new(pool) String(pool);
                     53:                                name->APPEND(lsplit(&row_chars, '\t'), 0, file, line++);
                     54:                                *columns+=name;
                     55:                        } while(row_chars);
                     56:        }
                     57: 
                     58:        // parse cells
                     59:        Table& table=*new(pool) Table(pool, method_name, columns);
                     60:        char *row_chars;
                     61:        while(row_chars=getrow(&data)) {
                     62:                Array *row=new(pool) Array(pool);
                     63:                while(char *cell_chars=lsplit(&row_chars, '\t')) {
                     64:                        String *cell=new(pool) String(pool);
                     65:                        cell->APPEND(cell_chars, 0, file, line);
                     66:                        *row+=cell;
                     67:                }
                     68:                line++;
                     69:                table+=row;
                     70:        };
                     71: 
                     72:        // replace any previous table value
                     73:        r.self->as_vtable().set_table(table);
                     74: }
                     75: 
1.2       paf        76: 
                     77: static void _set(Request& r, const String& method_name, Array *params) {
                     78:        set_or_load(r, method_name, params, false);
                     79: }
                     80: 
                     81: static void _load(Request& r, const String& method_name, Array *params) {
                     82:        set_or_load(r, method_name, params, true);
                     83: }
                     84: 
1.1       paf        85: void initialize_table_class(Pool& pool, VClass& vclass) {
1.2       paf        86:        // ^table.set[data]  ^table.set[nameless;data]
1.1       paf        87:        vclass.add_native_method("set", _set, 1, 2);
1.2       paf        88: 
                     89:        // ^table.load[data]  ^table.load[nameless;data]
                     90:        vclass.add_native_method("load", _load, 1, 2);
1.1       paf        91: }