Annotation of parser3/src/classes/reflection.C, revision 1.74

1.1       misha       1: /** @file
                      2:        Parser: @b reflection parser class.
                      3: 
1.38      moko        4:        Copyright (c) 2001-2015 Art. Lebedev Studio (http://www.artlebedev.com)
1.1       misha       5:        Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
                      6: */
                      7: 
                      8: #include "pa_vmethod_frame.h"
                      9: #include "pa_request.h"
                     10: #include "pa_vbool.h"
1.50      moko       11: #include "pa_vobject.h"
1.1       misha      12: 
1.74    ! moko       13: volatile const char * IDENT_REFLECTION_C="$Id: reflection.C,v 1.73 2016/12/01 23:42:35 moko Exp $";
1.24      moko       14: 
1.3       misha      15: static const String class_type_methoded("methoded");
1.2       misha      16: 
1.3       misha      17: static const String method_type_native("native");
                     18: static const String method_type_parser("parser");
1.2       misha      19: 
1.59      moko       20: static const String method_name("name");
1.71      moko       21: static const String method_class_name("class");
1.5       misha      22: static const String method_call_type("call_type");
1.8       misha      23: static const String method_inherited("inherited");
1.23      misha      24: static const String method_overridden("overridden");
1.2       misha      25: 
1.3       misha      26: static const String method_min_params("min_params");
                     27: static const String method_max_params("max_params");
1.29      misha      28: static const String method_extra_param("extra_param");
1.2       misha      29: 
1.30      misha      30: static const String def_class("class");
                     31: 
1.1       misha      32: // class
                     33: 
                     34: class MReflection: public Methoded {
                     35: public:
                     36:        MReflection();
                     37: };
                     38: 
                     39: // global variable
                     40: 
1.40      moko       41: DECLARE_CLASS_VAR(reflection, new MReflection);
1.1       misha      42: 
                     43: // methods
                     44: 
1.73      moko       45: const int MAX_CREATE_PARAMS = 100;
1.2       misha      46: 
                     47: static void _create(Request& r, MethodParams& params) {
1.73      moko       48:        int params_offset;
                     49:        HashStringValue* params_hash=0;
                     50: 
                     51:        const String* class_name=0;
                     52:        const String* constructor_name=0;
                     53: 
                     54:        Value& voptions=params.as_no_junction(0, "params must not be code");
                     55:        if(HashStringValue* options=voptions.get_hash()) {
                     56:                int valid_options=0;
                     57:                if(Value* vclass_name=options->get("class")) {
                     58:                        valid_options++;
                     59:                        class_name=&vclass_name->as_string();
                     60:                }
                     61:                if(Value* vconstructor_name=options->get("constructor")) {
                     62:                        valid_options++;
                     63:                        constructor_name=&vconstructor_name->as_string();
                     64:                }
                     65:                if(Value* vparams_hash=options->get("arguments")) {
                     66:                        valid_options++;
                     67:                        params_hash=vparams_hash->as_hash("arguments");
                     68:                        if(params.count()>1)
                     69:                                throw Exception(PARSER_RUNTIME, 0, "agruments should not be specified as hash and as create params");
                     70:                }
                     71:                if(valid_options!=options->count())
                     72:                        throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION);
                     73: 
                     74:                if(!class_name)
                     75:                        throw Exception(PARSER_RUNTIME, 0, "class name must be specified");
                     76:                if(!constructor_name)
                     77:                        throw Exception(PARSER_RUNTIME, 0, "constructor name must be specified");
                     78: 
                     79:                params_offset=1;
                     80:        } else {
                     81:                class_name=&params.as_string(0, "param must be string or hash");
                     82: 
                     83:                if(params.count()==1)
                     84:                        throw Exception(PARSER_RUNTIME, 0, "constructor name must be specified");
                     85: 
                     86:                constructor_name=&params.as_string(1, "constructor name must be string");
                     87: 
                     88:                params_offset=2;
                     89:        }
1.1       misha      90: 
1.73      moko       91:        VStateless_class* vclass=r.get_class(*class_name);
1.48      moko       92:        if(!vclass)
1.73      moko       93:                throw Exception(PARSER_RUNTIME, class_name, "class is undefined");
1.1       misha      94: 
1.73      moko       95:        const Method* method=vclass->get_method(*constructor_name);
                     96:        if(!method)
                     97:                throw Exception(PARSER_RUNTIME, constructor_name, "constructor not found in class '%s'", vclass->type());
1.1       misha      98: 
1.72      moko       99:        Value &object = r.construct(*vclass, *method);
1.2       misha     100: 
1.73      moko      101:        int nparams=params_hash ? params_hash->count() : (params.count()-params_offset);
                    102:        if(nparams>MAX_CREATE_PARAMS)
                    103:                throw Exception(PARSER_RUNTIME, 0, "arguments count should not exceed %d", MAX_CREATE_PARAMS);
1.1       misha     104: 
1.74    ! moko      105:        Value* args[MAX_CREATE_PARAMS];
1.65      moko      106:        CONSTRUCTOR_FRAME_ACTION(*method, r.get_method_frame(), object, {
                    107:                if(nparams>0){
1.73      moko      108:                        if(params_hash){
1.74    ! moko      109:                                int i=0;
        !           110:                                for(HashStringValue::Iterator h(*params_hash); h; h.next())
        !           111:                                        args[i++]=h.value();
1.73      moko      112:                        } else {
                    113:                                for(int i=0; i<nparams; i++)
1.74    ! moko      114:                                        args[i]=&r.process(params[i+params_offset]);
1.73      moko      115:                        }
1.74    ! moko      116:                        frame.store_params((Value**)&args, nparams);
1.65      moko      117:                } else {
                    118:                        frame.empty_params();
                    119:                }
                    120:                r.call(frame);
                    121:                object.enable_default_setter();
                    122:                r.write(frame.result());
                    123:        });
1.1       misha     124: }
                    125: 
1.2       misha     126: 
1.3       misha     127: static void _classes(Request& r, MethodParams&) {
                    128:        VHash& result=*new VHash;
1.47      moko      129:        for(HashString<VStateless_class*>::Iterator i(r.classes()); i; i.next()){
                    130:                result.hash().put(i.key(), i.value()->get_methods().count()>0 ? new VString(class_type_methoded) : VVoid::get() );
                    131:        }
1.64      moko      132:        r.write(result);
1.3       misha     133: }
                    134: 
                    135: 
1.53      moko      136: static Value& get_class(Value& value){
                    137:        if(VStateless_class* result=value.get_class())
                    138:                return *result;
                    139:        else {
                    140:                // we can't return code junction to outside as it's stack value
                    141:                if(Junction *j=value.get_junction())
                    142:                        if(j->code)
                    143:                                throw Exception(PARSER_RUNTIME, 0, "param must not be code junction");
                    144:                // method junction
1.3       misha     145:                return value;
1.53      moko      146:        }
1.3       misha     147: }
                    148: 
1.53      moko      149: static const String& get_class_name(Value& value){
                    150:        return *new String(get_class(value).type());
1.3       misha     151: }
                    152: 
                    153: 
1.1       misha     154: static void _class(Request& r, MethodParams& params) {
1.64      moko      155:        r.write(get_class(params[0]));
1.1       misha     156: }
                    157: 
1.2       misha     158: 
1.1       misha     159: static void _class_name(Request& r, MethodParams& params) {
1.64      moko      160:        r.write(get_class_name(params[0]));
1.1       misha     161: }
                    162: 
1.34      moko      163: static void _class_by_name(Request& r, MethodParams& params) {
                    164:        const String& class_name=params.as_string(0, "class_name must be string");
                    165:        Value* class_value=r.get_class(class_name);
                    166:        if(!class_value)
                    167:                throw Exception(PARSER_RUNTIME, &class_name, "class is undefined");
1.64      moko      168:        r.write(*class_value);
1.34      moko      169: }
1.1       misha     170: 
1.2       misha     171: static void _base(Request& r, MethodParams& params) {
1.49      moko      172:        if(VStateless_class* vclass=params[0].get_class())
                    173:                if(Value* base=vclass->base()){
1.64      moko      174:                        r.write(get_class(*base));
1.3       misha     175:                        return;
                    176:                }
                    177: 
                    178:        // classes with fields only, like env & console or without base
1.52      moko      179:        r.write_value(*VVoid::get());
1.2       misha     180: }
1.1       misha     181: 
                    182: 
1.2       misha     183: static void _base_name(Request& r, MethodParams& params) {
1.49      moko      184:        if(VStateless_class* vclass=params[0].get_class())
                    185:                if(Value* base=vclass->base())
1.64      moko      186:                        r.write(get_class_name(*base));
1.2       misha     187: }
1.1       misha     188: 
1.30      misha     189: static void _def(Request& r, MethodParams& params) {
                    190:        const String& type=params.as_string(0, "type must be string");
                    191:        if(type == def_class) {
                    192:                const String& name=params.as_string(1, "name must be string");
1.47      moko      193:                // can't use get_class because it will call @autouse[] if the class wasn't loaded
1.64      moko      194:                r.write(VBool::get(r.classes().get(name)!=0));
1.30      misha     195:        } else {
1.31      misha     196:                throw Exception(PARSER_RUNTIME, &type, "is invalid type, must be '%s'", def_class.cstr());
1.30      misha     197:        }
                    198: }
                    199: 
1.1       misha     200: static void _methods(Request& r, MethodParams& params) {
                    201:        const String& class_name=params.as_string(0, "class_name must be string");
1.49      moko      202:        VStateless_class* vclass=r.get_class(class_name);
                    203:        if(!vclass)
                    204:                throw Exception(PARSER_RUNTIME, &class_name, "class is undefined");
1.1       misha     205: 
                    206:        VHash& result=*new VHash;
1.49      moko      207:        for(HashStringMethod::Iterator i(vclass->get_methods()); i; i.next()){
                    208:                result.hash().put(i.key(), new VString(i.value()->native_code ? method_type_native : method_type_parser));
1.1       misha     209:        }
1.49      moko      210: 
1.64      moko      211:        r.write(result);
1.1       misha     212: }
                    213: 
1.57      moko      214: static VJunction &method_junction(Value &self, Method &method){
1.50      moko      215:        if(method.native_code)
1.57      moko      216:                throw Exception(PARSER_RUNTIME, method.name, "method must not be native");
1.50      moko      217: 
1.51      moko      218:        if(!(dynamic_cast<VObject*>(&self) || dynamic_cast<VClass*>(&self)))
                    219:                throw Exception(PARSER_RUNTIME, 0, "self must be parser object or class");
1.50      moko      220: 
                    221:        return *method.get_vjunction(self);
                    222: }
                    223: 
1.28      misha     224: static void _method(Request& r, MethodParams& params) {
1.62      moko      225:        Value &source=params[0];
1.50      moko      226: 
                    227:        if(Junction *j=source.get_junction()){
                    228:                if(Method* method=const_cast<Method*>(j->method)){
                    229:                        Value& self=params.count()>1 ? params.as_no_junction(1, "self must be object, not junction") : r.get_method_frame()->caller()->self();
1.64      moko      230:                        r.write(method_junction(self, *method));
1.50      moko      231:                        return;
                    232:                }
1.51      moko      233:                throw Exception(PARSER_RUNTIME, 0, "param must be method junction");
1.50      moko      234:        }
                    235: 
                    236:        if(params.count()==1)
1.51      moko      237:                throw Exception(PARSER_RUNTIME, 0, "method name must be specified");
1.50      moko      238: 
1.28      misha     239:        const String& name=params.as_string(1, "method name must be string");
                    240: 
1.50      moko      241:        if(VStateless_class* vclass=source.get_class()) {
                    242:                if(Method* method=vclass->get_method(name)){
1.64      moko      243:                        r.write( params.count()>2 ? method_junction(params.as_no_junction(2, "self must be object, not junction"), *method) : *method->get_vjunction(source) );
1.50      moko      244:                        return;
                    245:                }
1.28      misha     246:        }
1.52      moko      247:        r.write_value(*VVoid::get());
1.28      misha     248: }
                    249: 
1.13      misha     250: static void _fields(Request& r, MethodParams& params) {
1.28      misha     251:        Value& o=params.as_no_junction(0, "param must be object or class, not junction");
                    252: 
1.44      moko      253:        if(HashStringValue* fields=o.get_fields())
1.64      moko      254:                r.write(*new VHash(*fields));
1.44      moko      255:        else
1.64      moko      256:                r.write(*new VHash());
1.13      misha     257: }
1.2       misha     258: 
1.44      moko      259: static void _fields_reference(Request& r, MethodParams& params) {
1.46      moko      260:        Value& o=params.as_no_junction(0, "param must be object or hash, not junction");
1.44      moko      261: 
1.45      moko      262:        if(HashStringValue* fields=o.get_fields_reference())
1.64      moko      263:                r.write(*new VHashReference(*fields));
1.44      moko      264:        else
1.46      moko      265:                throw Exception(PARSER_RUNTIME, 0, "param must be object or hash");
1.44      moko      266: }
                    267: 
1.28      misha     268: static void _field(Request& r, MethodParams& params) {
                    269:        Value& o=params.as_no_junction(0, "first param must be object or class, not junction");
                    270:        const String& name=params.as_string(1, "field name must be string");
                    271: 
                    272:        if(HashStringValue* fields=o.get_fields())
                    273:                if(Value* value=fields->get(name))
1.64      moko      274:                        r.write(*value);
1.28      misha     275: }
                    276: 
1.8       misha     277: static void _method_info(Request& r, MethodParams& params) {
1.59      moko      278:        const Method* method;
1.66      moko      279: 
                    280:        VHash& result=*new VHash;
                    281:        HashStringValue* hash=result.get_hash();
1.2       misha     282: 
1.62      moko      283:        if(Junction *j=params[0].get_junction()){
1.59      moko      284:                if(!(method=j->method))
                    285:                        throw Exception(PARSER_RUNTIME, 0, "param must be class name or method junction");
1.66      moko      286: 
                    287:                hash->put(method_name, new VString(*method->name));
1.71      moko      288:                hash->put(method_class_name, new VString(*new String(j->self.type())));
                    289: 
1.59      moko      290:        } else {
                    291:                const String& class_name=params.as_string(0, "param must be class name or method junction");
1.66      moko      292:                VStateless_class* vclass=r.get_class(class_name);
                    293: 
                    294:                if(!vclass)
1.59      moko      295:                        throw Exception(PARSER_RUNTIME, &class_name, "class is undefined");
                    296: 
                    297:                if(params.count()==1)
                    298:                        throw Exception(PARSER_RUNTIME, 0, "method name must be specified");
                    299: 
                    300:                const String& method_name=params.as_string(1, "method name must be string");
                    301:                if(!(method=vclass->get_method(method_name)))
                    302:                        throw Exception(PARSER_RUNTIME, &method_name, "method not found in class '%s'", vclass->type());
1.2       misha     303: 
1.66      moko      304:                Method* base_method;
                    305:                if(vclass && vclass->base() && (base_method=vclass->base()->get_method(*method->name))){
                    306:                        VStateless_class* c=vclass->base()->get_class();
                    307:                        while(c->base() && base_method==c->base()->get_method(*method->name))
                    308:                                c=c->base()->get_class();
                    309:                        hash->put((base_method==method) ? method_inherited : method_overridden, new VString(*new String(c->type())));
                    310:                }
1.23      misha     311:        }
1.8       misha     312: 
1.29      misha     313:        Value* call_type=0;
                    314:        switch(method->call_type){
                    315:                case Method::CT_DYNAMIC:
1.42      moko      316:                        call_type=new VString(Symbols::DYNAMIC_SYMBOL);
1.29      misha     317:                        break;
                    318:                case Method::CT_STATIC:
1.42      moko      319:                        call_type=new VString(Symbols::STATIC_SYMBOL);
1.29      misha     320:                        break;
1.32      moko      321:                case Method::CT_ANY:
                    322:                        break;
1.29      misha     323:        }
                    324:        if(call_type)
                    325:                hash->put(method_call_type, call_type);
                    326: 
1.2       misha     327:        if(method->native_code){
                    328:                // native code
                    329:                hash->put(method_min_params, new VInt(method->min_numbered_params_count));
                    330:                hash->put(method_max_params, new VInt(method->max_numbered_params_count));
                    331:        } else {
                    332:                // parser code
1.68      moko      333:                const String* filespec = r.get_method_filespec(method);
1.16      misha     334:                if( filespec )
                    335:                        hash->put("file", new VString(*filespec));
1.29      misha     336: 
                    337:                hash->put(method_max_params, new VInt(method->params_names ? method->params_names->count() : 0));
                    338: 
1.2       misha     339:                if(method->params_names)
                    340:                        for(size_t i=0; i<method->params_names->count(); i++)
                    341:                                hash->put(String::Body::Format(i), new VString(*method->params_names->get(i)));
1.29      misha     342: 
                    343:                if(method->extra_params)
                    344:                        hash->put(method_extra_param, new VString(*method->extra_params));
1.2       misha     345:        }
                    346: 
1.64      moko      347:        r.write(result);
1.2       misha     348: }
                    349: 
1.67      moko      350: static void _filename(Request& r, MethodParams& params) {
1.68      moko      351:        if(Junction *j=params[0].get_junction()){
                    352:                if(const Method* method=j->method){
                    353:                        if(!method->native_code)
                    354:                                if(const String* filespec = r.get_method_filespec(method))
                    355:                                        r.write(*new VString(*filespec));
                    356:                        return;
                    357:                }
                    358:                throw Exception(PARSER_RUNTIME, 0, "param must be object, class or method junction");
                    359:        }
1.67      moko      360: 
1.68      moko      361:        if(VClass* vclass = dynamic_cast<VClass*>(params[0].get_class())){
                    362:                r.write(*new VString(vclass->get_filespec()));
1.67      moko      363:        }
                    364: }
                    365: 
1.9       misha     366: static void _dynamical(Request& r, MethodParams& params) {
                    367:        if(params.count()){
1.64      moko      368:                r.write(VBool::get(params[0].get_class() != &params[0]));
1.9       misha     369:        } else {
                    370:                VMethodFrame* caller=r.get_method_frame()->caller();
1.64      moko      371:                r.write(VBool::get(caller && caller->get_class() != &caller->self()));
1.9       misha     372:        }
                    373: }
                    374: 
1.35      moko      375: static void _is(Request& r, MethodParams& params) {
1.39      moko      376:        const String& name=params.as_string(0, "element name must be string");
                    377:        const String& type=params.as_string(1, "class name must be string");
                    378:        Value *context=params.count()==3 ? &(params.as_no_junction(2, "context must not be code")) : r.get_method_frame()->caller();
1.37      moko      379:        Value *value=context ? context->get_element(name) : 0;
1.35      moko      380: 
                    381:        if(value) {
                    382:                if(type == "code" || type == "method") {
                    383:                        Junction *junction=value->get_junction();
1.64      moko      384:                        r.write(VBool::get(junction && ((junction->code==0) ^ (type == "code"))) );
1.35      moko      385:                } else {
1.64      moko      386:                        r.write(VBool::get( value->is(type.cstr()) ));
1.35      moko      387:                }
                    388:        } else
1.64      moko      389:                r.write(VBool::get(type == "void"));
1.35      moko      390: }
                    391: 
1.19      moko      392: static void _copy(Request& r, MethodParams& params) {
                    393:        HashStringValue* src=params.as_no_junction(0, "source must not be code").get_hash();
                    394: 
1.44      moko      395:        if(src==NULL)
1.19      moko      396:                throw Exception(PARSER_RUNTIME, 0, "source must have hash representation");
                    397: 
                    398:        Value& dst=params.as_no_junction(1, "destination must not be code");
                    399: 
                    400:        for(HashStringValue::Iterator i(*src); i; i.next())
1.20      moko      401:                r.put_element(dst, *new String(i.key(), String::L_TAINTED), i.value());
1.19      moko      402: }
                    403: 
1.25      moko      404: static void _uid(Request& r, MethodParams& params) {
                    405:        Value& obj=params.as_no_junction(0, "object must not be code");
                    406: 
                    407:        char local_buf[MAX_NUMBER];
                    408:        int size=snprintf(local_buf, sizeof(local_buf), "%p", &obj);
                    409: 
1.64      moko      410:        r.write(*new String(String::C(pa_strdup(local_buf, (size_t)size), size)));
1.25      moko      411: }
                    412: 
1.27      moko      413: static void _delete(Request&, MethodParams& params) {
1.58      moko      414:        Value* v=&params.as_no_junction(0, "param must be object or class, not junction");
1.26      misha     415:        const String& key=params.as_string(1, "field name must be string");
1.58      moko      416: 
                    417:        if(VObject* o=dynamic_cast<VObject*>(v)){
                    418:                o->get_fields()->remove(key);
                    419:        } else if(VClass* c=dynamic_cast<VClass*>(v)){
                    420:                HashStringProperty &p=*c->get_properties();
                    421:                if(Property* property=p.get(key))
                    422:                        if(property->value)
                    423:                                p.remove(key);
1.26      misha     424:        }
                    425: }
                    426: 
1.55      moko      427: static void _mixin(Request& r, MethodParams& params) {
                    428:        Value& vsource=params.as_no_junction(0, "source must not be code");
                    429: 
                    430:        Value* vtarget=0;
                    431:        const String *name=0;
                    432:        bool copy_methods=true;
                    433:        bool copy_fields=true;
1.60      moko      434:        bool overwrite=false;
1.55      moko      435: 
                    436:        if(params.count()>1)
                    437:                if(HashStringValue* options=params.as_hash(1, "mixin options")) {
                    438:                        int valid_options=0;
                    439:                        if(vtarget=options->get("to")) {
                    440:                                valid_options++;
                    441:                        }
                    442:                        if(Value* vname=options->get("name")) {
                    443:                                name=&vname->as_string();
                    444:                                valid_options++;
                    445:                        }
                    446:                        if(Value* vmethods=options->get("methods")) {
1.61      moko      447:                                copy_methods=r.process(*vmethods).as_bool();
1.55      moko      448:                                valid_options++;
                    449:                        }
                    450:                        if(Value* vfields=options->get("fields")) {
1.61      moko      451:                                copy_fields=r.process(*vfields).as_bool();
1.55      moko      452:                                valid_options++;
                    453:                        }
                    454:                        if(Value* voverwrite=options->get("overwrite")) {
1.61      moko      455:                                overwrite=r.process(*voverwrite).as_bool();
1.55      moko      456:                                valid_options++;
                    457:                        }
                    458:                        if(valid_options!=options->count())
                    459:                                throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION);
                    460:                }
                    461: 
                    462:        if(!vtarget)
                    463:                vtarget=&r.get_method_frame()->caller()->self();
                    464: 
                    465:        VClass* source=dynamic_cast<VClass*>(vsource.get_class());
                    466:        VClass* target=dynamic_cast<VClass*>(vtarget->get_class());
                    467: 
                    468:        if(!source)
                    469:                throw Exception(PARSER_RUNTIME, 0, "source must be parser object or class");
                    470:        if(!target)
                    471:                throw Exception(PARSER_RUNTIME, 0, "destination must be parser object or class");
                    472: 
                    473:        if(name){
                    474:                if(copy_methods)
                    475:                        if(Method* method=source->get_method(*name))
                    476:                                if(overwrite || !target->get_method(*name)){
1.59      moko      477:                                        target->set_method(*name, new Method(*method));
1.55      moko      478:                                }
                    479: 
                    480:                if(copy_fields)
                    481:                        if(Property* property=source->get_properties()->get(*name))
                    482:                                if(property->value && (overwrite || !target->get_properties()->get(*name))){
                    483:                                        target->put_element(*target, *name, property->value);
                    484:                                }
                    485: 
                    486:        } else {
                    487:                if(copy_methods)
                    488:                        for(HashStringMethod::Iterator i(source->get_methods()); i; i.next()){
                    489:                                if(overwrite || !target->get_method(i.key()))
1.59      moko      490:                                        target->set_method(*i.value()->name, new Method(*i.value()));
1.55      moko      491:                        }
                    492:                if(copy_fields)
                    493:                        for(HashStringProperty::Iterator i(*source->get_properties()); i; i.next()){
                    494:                                if(i.value()->value && ( overwrite || !target->get_properties()->get(i.key()) ))
                    495:                                        target->put_element(*target, *new String(i.key(), String::L_TAINTED), i.value()->value);
                    496:                        }
                    497:        }
                    498: }
                    499: 
1.26      misha     500: 
1.1       misha     501: // constructor
                    502: MReflection::MReflection(): Methoded("reflection") {
1.2       misha     503:        // ^reflection:create[class_name;constructor_name[;param1[;param2[;...]]]]
1.73      moko      504:        // ^reflection:create[ $.class[name] $.constructor[name] $.arguments[ $.1[param1] $.2[param2] ...] ]
                    505:        add_native_method("create", Method::CT_STATIC, _create, 1, MAX_CREATE_PARAMS + 2);
1.1       misha     506: 
1.3       misha     507:        // ^reflection:classes[]
                    508:        add_native_method("classes", Method::CT_STATIC, _classes, 0, 0);
                    509: 
1.1       misha     510:        // ^reflection:class[object]
                    511:        add_native_method("class", Method::CT_STATIC, _class, 1, 1);
                    512: 
                    513:        // ^reflection:class_name[object]
                    514:        add_native_method("class_name", Method::CT_STATIC, _class_name, 1, 1);
                    515: 
1.34      moko      516:        // ^reflection:class_by_name[class_name]
                    517:        add_native_method("class_by_name", Method::CT_STATIC, _class_by_name, 1, 1);
                    518: 
1.2       misha     519:        // ^reflection:base_class[object]
                    520:        add_native_method("base", Method::CT_STATIC, _base, 1, 1);
                    521: 
                    522:        // ^reflection:base_class_name[object]
                    523:        add_native_method("base_name", Method::CT_STATIC, _base_name, 1, 1);
                    524: 
1.30      misha     525:        // ^reflection:def[class|...;name]
                    526:        add_native_method("def", Method::CT_STATIC, _def, 2, 2);
                    527: 
1.2       misha     528:        // ^reflection:methods[class_name]
1.1       misha     529:        add_native_method("methods", Method::CT_STATIC, _methods, 1, 1);
1.2       misha     530: 
1.54      moko      531:        // ^reflection:method[object or class;method_name[;self]]
                    532:        // ^reflection:method[junction[;self]]
1.50      moko      533:        add_native_method("method", Method::CT_STATIC, _method, 1, 3);
1.28      misha     534: 
                    535:        // ^reflection:method_info[class_name;method_name]
1.59      moko      536:        // ^reflection:method_info[junction]
                    537:        add_native_method("method_info", Method::CT_STATIC, _method_info, 1, 2);
1.28      misha     538: 
1.67      moko      539:        // ^reflection:filename[object or class]
                    540:        add_native_method("filename", Method::CT_STATIC, _filename, 1, 1);
                    541: 
1.13      misha     542:        // ^reflection:fields[object or class]
                    543:        add_native_method("fields", Method::CT_STATIC, _fields, 1, 1);
                    544: 
1.44      moko      545:        // ^reflection:fields_reference[object]
                    546:        add_native_method("fields_reference", Method::CT_STATIC, _fields_reference, 1, 1);
                    547: 
1.28      misha     548:        // ^reflection:field[object or class;field_name]
                    549:        add_native_method("field", Method::CT_STATIC, _field, 2, 2);
1.9       misha     550: 
                    551:        // ^reflection:dynamical[[object or class, caller if absent]]
                    552:        add_native_method("dynamical", Method::CT_STATIC, _dynamical, 0, 1);
1.19      moko      553: 
1.39      moko      554:        // ^reflection:is[element_name;class_name|code|method[;context]]
1.35      moko      555:        add_native_method("is", Method::CT_STATIC, _is, 2, 3);
                    556: 
1.19      moko      557:        // ^reflection:copy[src;dst]
                    558:        add_native_method("copy", Method::CT_STATIC, _copy, 2, 2);
1.25      moko      559: 
                    560:        // ^reflection:uid[object or class]
                    561:        add_native_method("uid", Method::CT_STATIC, _uid, 1, 1);
1.26      misha     562: 
                    563:        // ^reflection:delete[object or class;field_name]
                    564:        add_native_method("delete", Method::CT_STATIC, _delete, 2, 2);
1.54      moko      565: 
                    566:        // ^reflection:mixin[object or class or junction;options]
1.55      moko      567:        add_native_method("mixin", Method::CT_STATIC, _mixin, 1, 2);
1.54      moko      568: 
1.1       misha     569: }

E-mail: