Annotation of parser3/src/classes/void.C, revision 1.21.2.2
1.1 parser 1: /** @file
2: Parser: @b VOID parser class.
3:
1.15 paf 4: Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
1.16 paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
1.20 paf 6: */
1.1 parser 7:
1.21.2.2! paf 8: static const char* IDENT_VOID_C="$Date: 2002/08/20 08:17:28 $";
1.1 parser 9:
10: #include "classes.h"
11: #include "pa_request.h"
12: #include "pa_vint.h"
13: #include "pa_vdouble.h"
14: #include "pa_vvoid.h"
15: #include "pa_sql_connection.h"
16:
17: // class
18:
19: class MVoid : public Methoded {
20: public:
21: MVoid(Pool& pool);
22: public: // Methoded
23: bool used_directly() { return true; }
24: };
25:
26: // methods
27:
1.21.2.1 paf 28: static void _length(Request& r, const String&, MethodParams *params) {
29: Pool& pool=r.pool();
1.21.2.2! paf 30: // always zero
1.21.2.1 paf 31: r.write_no_lang(*new(pool) VInt(pool, 0));
32: }
33:
1.21.2.2! paf 34: static void _pos(Request& r, const String& method_name, MethodParams *params) {
! 35: Pool& pool=r.pool();
! 36:
! 37: Value& substr=params->as_no_junction(0, "substr must not be code");
! 38: // never found
! 39: r.write_assign_lang(*new(pool) VInt(pool, -1));
! 40: }
! 41:
1.8 parser 42: static void _int(Request& r, const String&, MethodParams *params) {
1.1 parser 43: Pool& pool=r.pool();
1.6 parser 44: VVoid *vvoid=static_cast<VVoid *>(r.self);
1.8 parser 45: r.write_no_lang(*new(pool) VInt(pool,
1.11 parser 46: params->size()==0?vvoid->as_int():params->as_int(0, "default must be int", r)));
1.1 parser 47: }
48:
1.8 parser 49: static void _double(Request& r, const String&, MethodParams *params) {
1.1 parser 50: Pool& pool=r.pool();
1.6 parser 51: VVoid *vvoid=static_cast<VVoid *>(r.self);
1.8 parser 52: r.write_no_lang(*new(pool) VDouble(pool,
1.11 parser 53: params->size()==0?vvoid->as_double():params->as_double(0, "default must be double", r)));
1.1 parser 54: }
55:
1.5 parser 56: #ifndef DOXYGEN
57: class Void_sql_event_handlers : public SQL_Driver_query_event_handlers {
58: public:
59: Void_sql_event_handlers(Pool& apool, const String& astatement_string) :
60: pool(apool), statement_string(astatement_string) {
61: }
62: void add_column(void *ptr, size_t size) { /* ignore */ }
63: void before_rows() {
64: // there are some result rows, which is wrong
1.17 paf 65: throw Exception("parser.runtime",
1.5 parser 66: &statement_string,
67: "must return nothing");
68: }
69: void add_row() { /* never */ }
70: void add_row_cell(void *ptr, size_t size) { /* never */ }
71:
72: private:
73: Pool& pool;
74: const String& statement_string;
75: };
76: #endif
1.1 parser 77: static void _sql(Request& r, const String& method_name, MethodParams *params) {
78: Pool& pool=r.pool();
79:
1.4 parser 80: Value& statement=params->as_junction(0, "statement must be code");
1.1 parser 81:
82: Temp_lang temp_lang(r, String::UL_SQL);
1.18 paf 83: const String& statement_string=r.process_to_string(statement);
1.1 parser 84: const char *statement_cstr=
1.14 paf 85: statement_string.cstr(String::UL_UNSPECIFIED, r.connection(&method_name));
1.5 parser 86: Void_sql_event_handlers handlers(pool, statement_string);
1.12 parser 87: try {
1.14 paf 88: r.connection(&method_name)->query(
1.1 parser 89: statement_cstr, 0, 0,
1.5 parser 90: handlers);
1.12 parser 91: } catch(const Exception& e) {
92: // more specific source [were url]
1.17 paf 93: throw Exception("sql.execute",
1.12 parser 94: &statement_string,
95: "%s", e.comment());
1.1 parser 96: }
97: }
98:
99: // constructor
100:
1.19 paf 101: MVoid::MVoid(Pool& apool) : Methoded(apool, "void") {
1.21.2.1 paf 102: // ^void.length[]
103: add_native_method("length", Method::CT_DYNAMIC, _length, 0, 0);
1.21.2.2! paf 104:
! 105: // ^void.pos[substr]
! 106: add_native_method("pos", Method::CT_DYNAMIC, _pos, 1, 1);
1.21.2.1 paf 107:
1.9 parser 108: // ^void.int[]
109: // ^void.int(default)
1.8 parser 110: add_native_method("int", Method::CT_DYNAMIC, _int, 0, 1);
1.1 parser 111:
1.9 parser 112: // ^void.double[]
113: // ^void.double(default)
1.8 parser 114: add_native_method("double", Method::CT_DYNAMIC, _double, 0, 1);
1.1 parser 115:
116: // ^sql[query]
117: add_native_method("sql", Method::CT_STATIC, _sql, 1, 1);
118: }
119:
120: // global variable
121:
122: Methoded *void_class;
123:
124: // creator
125:
126: Methoded *MVoid_create(Pool& pool) {
127: return void_class=new(pool) MVoid(pool);
128: }
E-mail: