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: