|
|
| version 1.82, 2017/01/29 20:28:44 | version 1.91, 2024/09/17 18:09:59 |
|---|---|
| Line 1 | Line 1 |
| /** @file | /** @file |
| Parser: @b reflection parser class. | Parser: @b reflection parser class. |
| Copyright (c) 2001-2015 Art. Lebedev Studio (http://www.artlebedev.com) | Copyright (c) 2001-2023 Art. Lebedev Studio (http://www.artlebedev.com) |
| Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru) | Authors: Konstantin Morshnev <moko@design.ru>, Alexandr Petrosian <paf@design.ru> |
| */ | */ |
| #include "pa_vmethod_frame.h" | #include "pa_vmethod_frame.h" |
| Line 66 static void _create(Request& r, MethodPa | Line 66 static void _create(Request& r, MethodPa |
| valid_options++; | valid_options++; |
| params_hash=vparams_hash->as_hash("arguments"); | params_hash=vparams_hash->as_hash("arguments"); |
| if(params.count()>1) | if(params.count()>1) |
| throw Exception(PARSER_RUNTIME, 0, "agruments should not be specified as hash and as create params"); | throw Exception(PARSER_RUNTIME, 0, "arguments should not be specified as hash and as create params"); |
| } | } |
| if(valid_options!=options->count()) | if(valid_options!=options->count()) |
| throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION); | throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION); |
| Line 88 static void _create(Request& r, MethodPa | Line 88 static void _create(Request& r, MethodPa |
| params_offset=2; | params_offset=2; |
| } | } |
| VStateless_class* vclass=r.get_class(*class_name); | VStateless_class& vclass=r.get_class_ref(*class_name); |
| if(!vclass) | |
| throw Exception(PARSER_RUNTIME, class_name, "class is undefined"); | |
| const Method* method=vclass->get_method(*constructor_name); | const Method* method=vclass.get_method(*constructor_name); |
| if(!method) | if(!method) |
| throw Exception(PARSER_RUNTIME, constructor_name, "constructor not found in class '%s'", vclass->type()); | throw Exception(PARSER_RUNTIME, constructor_name, "constructor not found in class '%s'", vclass.type()); |
| Value &object = r.construct(*vclass, *method); | Value &object = r.construct(vclass, *method); |
| int nparams=params_hash ? params_hash->count() : (params.count()-params_offset); | int nparams=params_hash ? params_hash->count() : (params.count()-params_offset); |
| if(nparams>MAX_CREATE_PARAMS) | if(nparams>MAX_CREATE_PARAMS) |
| Line 162 static void _class_name(Request& r, Meth | Line 160 static void _class_name(Request& r, Meth |
| static void _class_by_name(Request& r, MethodParams& params) { | static void _class_by_name(Request& r, MethodParams& params) { |
| const String& class_name=params.as_string(0, "class_name must be string"); | const String& class_name=params.as_string(0, "class_name must be string"); |
| Value* class_value=r.get_class(class_name); | r.write(r.get_class_ref(class_name)); |
| if(!class_value) | } |
| throw Exception(PARSER_RUNTIME, &class_name, "class is undefined"); | |
| r.write(*class_value); | static void _class_alias(Request& r, MethodParams& params) { |
| const String& src_class_name=params.as_string(0, "source class_name must be string"); | |
| const String& new_class_name=params.as_string(1, "alias class_name must be string"); | |
| VStateless_class &src_class=r.get_class_ref(src_class_name); | |
| if(!r.add_class(new_class_name.cstr(), &src_class)) | |
| throw Exception(PARSER_RUNTIME, &new_class_name, "class is already defined"); | |
| } | } |
| static void _base(Request& r, MethodParams& params) { | static void _base(Request& r, MethodParams& params) { |
| Line 199 static void _def(Request& r, MethodParam | Line 203 static void _def(Request& r, MethodParam |
| static void _methods(Request& r, MethodParams& params) { | static void _methods(Request& r, MethodParams& params) { |
| const String& class_name=params.as_string(0, "class_name must be string"); | const String& class_name=params.as_string(0, "class_name must be string"); |
| VStateless_class* vclass=r.get_class(class_name); | VStateless_class& vclass=r.get_class_ref(class_name); |
| if(!vclass) | |
| throw Exception(PARSER_RUNTIME, &class_name, "class is undefined"); | bool reverse=true; |
| if(params.count()>1) | |
| if(HashStringValue* options=params.as_hash(1, "methods options")) { | |
| int valid_options=0; | |
| for(HashStringValue::Iterator i(*options); i; i.next() ){ | |
| String::Body key=i.key(); | |
| Value* value=i.value(); | |
| if(key == "reverse") { | |
| reverse=r.process(*value).as_bool(); | |
| valid_options++; | |
| } | |
| } | |
| if(valid_options!=options->count()) | |
| throw Exception(PARSER_RUNTIME, 0, CALLED_WITH_INVALID_OPTION); | |
| } | |
| VHash& result=*new VHash; | VHash& result=*new VHash; |
| for(HashStringMethod::Iterator i(vclass->get_methods()); i; i.next()){ | |
| result.hash().put(i.key(), new VString(i.value()->native_code ? method_type_native : method_type_parser)); | #ifdef HASH_ORDER |
| if(reverse){ | |
| for(HashStringMethod::ReverseIterator i(vclass.get_methods()); i; i.prev()){ | |
| result.hash().put(i.key(), new VString(i.value()->native_code ? method_type_native : method_type_parser)); | |
| } | |
| } else { | |
| #else | |
| { | |
| #endif | |
| for(HashStringMethod::Iterator i(vclass.get_methods()); i; i.next()){ | |
| result.hash().put(i.key(), new VString(i.value()->native_code ? method_type_native : method_type_parser)); | |
| } | |
| } | } |
| r.write(result); | r.write(result); |
| Line 289 static void _method_info(Request& r, Met | Line 319 static void _method_info(Request& r, Met |
| } else { | } else { |
| const String& class_name=params.as_string(0, "param must be class name or method junction"); | const String& class_name=params.as_string(0, "param must be class name or method junction"); |
| VStateless_class* vclass=r.get_class(class_name); | VStateless_class& vclass=r.get_class_ref(class_name); |
| if(!vclass) | |
| throw Exception(PARSER_RUNTIME, &class_name, "class is undefined"); | |
| if(params.count()==1) | if(params.count()==1) |
| throw Exception(PARSER_RUNTIME, 0, "method name must be specified"); | throw Exception(PARSER_RUNTIME, 0, "method name must be specified"); |
| const String& method_name=params.as_string(1, "method name must be string"); | const String& method_name=params.as_string(1, "method name must be string"); |
| if(!(method=vclass->get_method(method_name))) | if(!(method=vclass.get_method(method_name))) |
| throw Exception(PARSER_RUNTIME, &method_name, "method not found in class '%s'", vclass->type()); | throw Exception(PARSER_RUNTIME, &method_name, "method not found in class '%s'", vclass.type()); |
| Method* base_method; | Method* base_method; |
| if(vclass && vclass->base() && (base_method=vclass->base()->get_method(*method->name))){ | if(vclass.base() && (base_method=vclass.base()->get_method(*method->name))){ |
| VStateless_class* c=vclass->base()->get_class(); | VStateless_class* c=vclass.base()->get_class(); |
| while(c->base() && base_method==c->base()->get_method(*method->name)) | while(c->base() && base_method==c->base()->get_method(*method->name)) |
| c=c->base()->get_class(); | c=c->base()->get_class(); |
| hash->put((base_method==method) ? method_inherited : method_overridden, new VString(*new String(c->type()))); | hash->put((base_method==method) ? method_inherited : method_overridden, new VString(*new String(c->type()))); |
| Line 338 static void _method_info(Request& r, Met | Line 365 static void _method_info(Request& r, Met |
| if(method->params_names) | if(method->params_names) |
| for(size_t i=0; i<method->params_names->count(); i++) | for(size_t i=0; i<method->params_names->count(); i++) |
| hash->put(String::Body::Format(i), new VString(*method->params_names->get(i))); | hash->put(pa_uitoa(i), new VString(*method->params_names->get(i))); |
| if(method->extra_params) | if(method->extra_params) |
| hash->put(method_extra_param, new VString(*method->extra_params)); | hash->put(method_extra_param, new VString(*method->extra_params)); |
| Line 652 MReflection::MReflection(): Methoded("re | Line 679 MReflection::MReflection(): Methoded("re |
| // ^reflection:class_by_name[class_name] | // ^reflection:class_by_name[class_name] |
| add_native_method("class_by_name", Method::CT_STATIC, _class_by_name, 1, 1); | add_native_method("class_by_name", Method::CT_STATIC, _class_by_name, 1, 1); |
| // ^reflection:class_alias[class_name;new_class_name] | |
| add_native_method("class_alias", Method::CT_STATIC, _class_alias, 2, 2); | |
| // ^reflection:base_class[object] | // ^reflection:base_class[object] |
| add_native_method("base", Method::CT_STATIC, _base, 1, 1); | add_native_method("base", Method::CT_STATIC, _base, 1, 1); |
| Line 662 MReflection::MReflection(): Methoded("re | Line 692 MReflection::MReflection(): Methoded("re |
| add_native_method("def", Method::CT_STATIC, _def, 2, 2); | add_native_method("def", Method::CT_STATIC, _def, 2, 2); |
| // ^reflection:methods[class_name] | // ^reflection:methods[class_name] |
| add_native_method("methods", Method::CT_STATIC, _methods, 1, 1); | add_native_method("methods", Method::CT_STATIC, _methods, 1, 2); |
| // ^reflection:method[object or class;method_name[;self]] | // ^reflection:method[object or class;method_name[;self]] |
| // ^reflection:method[junction[;self]] | // ^reflection:method[junction[;self]] |