mirror of
https://github.com/php/php-src.git
synced 2024-10-01 06:46:08 +00:00
6194 lines
188 KiB
C
6194 lines
188 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 5 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997-2014 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 3.01 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available through the world-wide-web at the following url: |
|
|
| http://www.php.net/license/3_01.txt |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Authors: Timm Friebe <thekid@thekid.de> |
|
|
| George Schlossnagle <george@omniti.com> |
|
|
| Andrei Zmievski <andrei@gravitonic.com> |
|
|
| Marcus Boerger <helly@php.net> |
|
|
| Johannes Schlueter <johannes@php.net> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include "php.h"
|
|
#include "php_ini.h"
|
|
#include "php_reflection.h"
|
|
#include "ext/standard/info.h"
|
|
|
|
#include "zend.h"
|
|
#include "zend_API.h"
|
|
#include "zend_exceptions.h"
|
|
#include "zend_operators.h"
|
|
#include "zend_constants.h"
|
|
#include "zend_ini.h"
|
|
#include "zend_interfaces.h"
|
|
#include "zend_closures.h"
|
|
#include "zend_extensions.h"
|
|
|
|
#define reflection_update_property(object, name, value) do { \
|
|
zval member; \
|
|
ZVAL_STRINGL(&member, name, sizeof(name)-1); \
|
|
zend_std_write_property(object, &member, value, -1 TSRMLS_CC); \
|
|
if (Z_REFCOUNTED_P(value)) Z_DELREF_P(value); \
|
|
zval_ptr_dtor(&member); \
|
|
} while (0)
|
|
|
|
/* Class entry pointers */
|
|
PHPAPI zend_class_entry *reflector_ptr;
|
|
PHPAPI zend_class_entry *reflection_exception_ptr;
|
|
PHPAPI zend_class_entry *reflection_ptr;
|
|
PHPAPI zend_class_entry *reflection_function_abstract_ptr;
|
|
PHPAPI zend_class_entry *reflection_function_ptr;
|
|
PHPAPI zend_class_entry *reflection_parameter_ptr;
|
|
PHPAPI zend_class_entry *reflection_class_ptr;
|
|
PHPAPI zend_class_entry *reflection_object_ptr;
|
|
PHPAPI zend_class_entry *reflection_method_ptr;
|
|
PHPAPI zend_class_entry *reflection_property_ptr;
|
|
PHPAPI zend_class_entry *reflection_extension_ptr;
|
|
PHPAPI zend_class_entry *reflection_zend_extension_ptr;
|
|
|
|
#if MBO_0
|
|
ZEND_BEGIN_MODULE_GLOBALS(reflection)
|
|
int dummy;
|
|
ZEND_END_MODULE_GLOBALS(reflection)
|
|
|
|
#ifdef ZTS
|
|
# define REFLECTION_G(v) \
|
|
TSRMG(reflection_globals_id, zend_reflection_globals*, v)
|
|
extern int reflection_globals_id;
|
|
#else
|
|
# define REFLECTION_G(v) (reflection_globals.v)
|
|
extern zend_reflection_globals reflectionglobals;
|
|
#endif
|
|
|
|
ZEND_DECLARE_MODULE_GLOBALS(reflection)
|
|
#endif /* MBO_0 */
|
|
|
|
/* Method macros */
|
|
|
|
#define METHOD_NOTSTATIC(ce) \
|
|
if (!Z_OBJ(EG(This)) || !instanceof_function(Z_OBJCE(EG(This)), ce TSRMLS_CC)) { \
|
|
php_error_docref(NULL TSRMLS_CC, E_ERROR, "%s() cannot be called statically", get_active_function_name(TSRMLS_C)); \
|
|
return; \
|
|
} \
|
|
|
|
/* Exception throwing macro */
|
|
#define _DO_THROW(msg) \
|
|
zend_throw_exception(reflection_exception_ptr, msg, 0 TSRMLS_CC); \
|
|
return; \
|
|
|
|
#define RETURN_ON_EXCEPTION \
|
|
if (EG(exception) && EG(exception)->ce == reflection_exception_ptr) { \
|
|
return; \
|
|
}
|
|
|
|
#define GET_REFLECTION_OBJECT_PTR(target) \
|
|
intern = Z_REFLECTION_P(getThis()); \
|
|
if (intern == NULL || intern->ptr == NULL) { \
|
|
RETURN_ON_EXCEPTION \
|
|
php_error_docref(NULL TSRMLS_CC, E_ERROR, "Internal error: Failed to retrieve the reflection object"); \
|
|
} \
|
|
target = intern->ptr; \
|
|
|
|
/* Class constants */
|
|
#define REGISTER_REFLECTION_CLASS_CONST_LONG(class_name, const_name, value) \
|
|
zend_declare_class_constant_long(reflection_ ## class_name ## _ptr, const_name, sizeof(const_name)-1, (long)value TSRMLS_CC);
|
|
|
|
/* {{{ Smart string functions */
|
|
typedef struct _string {
|
|
zend_string *buf;
|
|
int alloced;
|
|
} string;
|
|
|
|
static void string_init(string *str)
|
|
{
|
|
str->buf= STR_ALLOC(1024, 0);
|
|
str->alloced = 1024;
|
|
str->buf->val[0] = '\0';
|
|
str->buf->len = 0;
|
|
}
|
|
|
|
static string *string_printf(string *str, const char *format, ...)
|
|
{
|
|
int len;
|
|
va_list arg;
|
|
char *s_tmp;
|
|
|
|
va_start(arg, format);
|
|
len = zend_vspprintf(&s_tmp, 0, format, arg);
|
|
if (len) {
|
|
register int nlen = (str->buf->len + 1 + len + (1024 - 1)) & ~(1024 - 1);
|
|
if (str->alloced < nlen) {
|
|
int old_len = str->buf->len;
|
|
str->alloced = nlen;
|
|
str->buf = STR_REALLOC(str->buf, str->alloced, 0);
|
|
str->buf->len = old_len;
|
|
}
|
|
memcpy(str->buf->val + str->buf->len, s_tmp, len + 1);
|
|
str->buf->len += len;
|
|
}
|
|
efree(s_tmp);
|
|
va_end(arg);
|
|
return str;
|
|
}
|
|
|
|
static string *string_write(string *str, char *buf, int len)
|
|
{
|
|
register int nlen = (str->buf->len + 1 + len + (1024 - 1)) & ~(1024 - 1);
|
|
if (str->alloced < nlen) {
|
|
int old_len = str->buf->len;
|
|
str->alloced = nlen;
|
|
str->buf = STR_REALLOC(str->buf, str->alloced, 0);
|
|
str->buf->len = old_len;
|
|
}
|
|
memcpy(str->buf->val + str->buf->len, buf, len);
|
|
str->buf->len += len;
|
|
str->buf->val[str->buf->len] = '\0';
|
|
return str;
|
|
}
|
|
|
|
static string *string_append(string *str, string *append)
|
|
{
|
|
if (append->buf->len > 0) {
|
|
string_write(str, append->buf->val, append->buf->len);
|
|
}
|
|
return str;
|
|
}
|
|
|
|
static void string_free(string *str)
|
|
{
|
|
STR_RELEASE(str->buf);
|
|
str->alloced = 0;
|
|
str->buf = NULL;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ Object structure */
|
|
|
|
/* Struct for properties */
|
|
typedef struct _property_reference {
|
|
zend_class_entry *ce;
|
|
zend_property_info prop;
|
|
} property_reference;
|
|
|
|
/* Struct for parameters */
|
|
typedef struct _parameter_reference {
|
|
zend_uint offset;
|
|
zend_uint required;
|
|
struct _zend_arg_info *arg_info;
|
|
zend_function *fptr;
|
|
} parameter_reference;
|
|
|
|
typedef enum {
|
|
REF_TYPE_OTHER, /* Must be 0 */
|
|
REF_TYPE_FUNCTION,
|
|
REF_TYPE_PARAMETER,
|
|
REF_TYPE_PROPERTY,
|
|
REF_TYPE_DYNAMIC_PROPERTY
|
|
} reflection_type_t;
|
|
|
|
/* Struct for reflection objects */
|
|
typedef struct {
|
|
zval dummy; /* holder for the second property */
|
|
void *ptr;
|
|
reflection_type_t ref_type;
|
|
zval obj;
|
|
zend_class_entry *ce;
|
|
unsigned int ignore_visibility:1;
|
|
zend_object zo;
|
|
} reflection_object;
|
|
|
|
static inline reflection_object *reflection_object_from_obj(zend_object *obj) /* {{{ */ {
|
|
return (reflection_object*)((char*)(obj) - XtOffsetOf(reflection_object, zo));
|
|
}
|
|
|
|
#define Z_REFLECTION_P(zv) reflection_object_from_obj(Z_OBJ_P((zv)))
|
|
/* }}} */
|
|
|
|
static zend_object_handlers reflection_object_handlers;
|
|
|
|
static zval *_default_load_entry(zval *object, char *name, int name_len TSRMLS_DC) /* {{{ */
|
|
{
|
|
zval *value;
|
|
|
|
if ((value = zend_hash_str_find_ind(Z_OBJPROP_P(object), name, name_len)) == NULL) {
|
|
return NULL;
|
|
}
|
|
return value;
|
|
}
|
|
|
|
static void _default_get_entry(zval *object, char *name, int name_len, zval *return_value TSRMLS_DC) /* {{{ */
|
|
{
|
|
zval *value;
|
|
|
|
if ((value = _default_load_entry(object, name, name_len TSRMLS_CC)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
ZVAL_DUP(return_value, value);
|
|
}
|
|
/* }}} */
|
|
|
|
#ifdef ilia_0
|
|
static void _default_lookup_entry(zval *object, char *name, int name_len, zval **return_value TSRMLS_DC) /* {{{ */
|
|
{
|
|
zval **value;
|
|
|
|
if (zend_hash_find(Z_OBJPROP_P(object), name, name_len, (void **) &value) == FAILURE) {
|
|
*return_value = NULL;
|
|
} else {
|
|
*return_value = *value;
|
|
}
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
static void reflection_register_implement(zend_class_entry *class_entry, zend_class_entry *interface_entry TSRMLS_DC) /* {{{ */
|
|
{
|
|
zend_uint num_interfaces = ++class_entry->num_interfaces;
|
|
|
|
class_entry->interfaces = (zend_class_entry **) realloc(class_entry->interfaces, sizeof(zend_class_entry *) * num_interfaces);
|
|
class_entry->interfaces[num_interfaces - 1] = interface_entry;
|
|
}
|
|
/* }}} */
|
|
|
|
static zend_function *_copy_function(zend_function *fptr TSRMLS_DC) /* {{{ */
|
|
{
|
|
if (fptr
|
|
&& fptr->type == ZEND_INTERNAL_FUNCTION
|
|
&& (fptr->internal_function.fn_flags & ZEND_ACC_CALL_VIA_HANDLER) != 0)
|
|
{
|
|
zend_function *copy_fptr;
|
|
copy_fptr = emalloc(sizeof(zend_function));
|
|
memcpy(copy_fptr, fptr, sizeof(zend_function));
|
|
copy_fptr->internal_function.function_name = STR_COPY(fptr->internal_function.function_name);
|
|
return copy_fptr;
|
|
} else {
|
|
/* no copy needed */
|
|
return fptr;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
static void _free_function(zend_function *fptr TSRMLS_DC) /* {{{ */
|
|
{
|
|
if (fptr
|
|
&& fptr->type == ZEND_INTERNAL_FUNCTION
|
|
&& (fptr->internal_function.fn_flags & ZEND_ACC_CALL_VIA_HANDLER) != 0)
|
|
{
|
|
STR_RELEASE(fptr->internal_function.function_name);
|
|
efree(fptr);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
static void reflection_free_objects_storage(zend_object *object TSRMLS_DC) /* {{{ */
|
|
{
|
|
reflection_object *intern = reflection_object_from_obj(object);
|
|
parameter_reference *reference;
|
|
property_reference *prop_reference;
|
|
|
|
if (intern->ptr) {
|
|
switch (intern->ref_type) {
|
|
case REF_TYPE_PARAMETER:
|
|
reference = (parameter_reference*)intern->ptr;
|
|
_free_function(reference->fptr TSRMLS_CC);
|
|
efree(intern->ptr);
|
|
break;
|
|
case REF_TYPE_FUNCTION:
|
|
_free_function(intern->ptr TSRMLS_CC);
|
|
break;
|
|
case REF_TYPE_PROPERTY:
|
|
efree(intern->ptr);
|
|
break;
|
|
case REF_TYPE_DYNAMIC_PROPERTY:
|
|
prop_reference = (property_reference*)intern->ptr;
|
|
STR_RELEASE(prop_reference->prop.name);
|
|
efree(intern->ptr);
|
|
break;
|
|
case REF_TYPE_OTHER:
|
|
break;
|
|
}
|
|
}
|
|
intern->ptr = NULL;
|
|
zval_ptr_dtor(&intern->obj);
|
|
zend_object_std_dtor(object TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
static zend_object *reflection_objects_new(zend_class_entry *class_type TSRMLS_DC) /* {{{ */
|
|
{
|
|
reflection_object *intern;
|
|
|
|
intern = ecalloc(1, sizeof(reflection_object) + sizeof(zval) * (class_type->default_properties_count - 1));
|
|
intern->zo.ce = class_type;
|
|
|
|
zend_object_std_init(&intern->zo, class_type TSRMLS_CC);
|
|
object_properties_init(&intern->zo, class_type);
|
|
intern->zo.handlers = &reflection_object_handlers;
|
|
return &intern->zo;
|
|
}
|
|
/* }}} */
|
|
|
|
static zval *reflection_instantiate(zend_class_entry *pce, zval *object TSRMLS_DC) /* {{{ */
|
|
{
|
|
object_init_ex(object, pce);
|
|
return object;
|
|
}
|
|
/* }}} */
|
|
|
|
static void _const_string(string *str, char *name, zval *value, char *indent TSRMLS_DC);
|
|
static void _function_string(string *str, zend_function *fptr, zend_class_entry *scope, char* indent TSRMLS_DC);
|
|
static void _property_string(string *str, zend_property_info *prop, char *prop_name, char* indent TSRMLS_DC);
|
|
static void _class_string(string *str, zend_class_entry *ce, zval *obj, char *indent TSRMLS_DC);
|
|
static void _extension_string(string *str, zend_module_entry *module, char *indent TSRMLS_DC);
|
|
static void _zend_extension_string(string *str, zend_extension *extension, char *indent TSRMLS_DC);
|
|
|
|
/* {{{ _class_string */
|
|
static void _class_string(string *str, zend_class_entry *ce, zval *obj, char *indent TSRMLS_DC)
|
|
{
|
|
int count, count_static_props = 0, count_static_funcs = 0, count_shadow_props = 0;
|
|
string sub_indent;
|
|
|
|
string_init(&sub_indent);
|
|
string_printf(&sub_indent, "%s ", indent);
|
|
|
|
/* TBD: Repair indenting of doc comment (or is this to be done in the parser?) */
|
|
if (ce->type == ZEND_USER_CLASS && ce->info.user.doc_comment) {
|
|
string_printf(str, "%s%s", indent, ce->info.user.doc_comment);
|
|
string_write(str, "\n", 1);
|
|
}
|
|
|
|
if (obj && Z_TYPE_P(obj) == IS_OBJECT) {
|
|
string_printf(str, "%sObject of class [ ", indent);
|
|
} else {
|
|
char *kind = "Class";
|
|
if (ce->ce_flags & ZEND_ACC_INTERFACE) {
|
|
kind = "Interface";
|
|
} else if ((ce->ce_flags & ZEND_ACC_TRAIT) == ZEND_ACC_TRAIT) {
|
|
kind = "Trait";
|
|
}
|
|
string_printf(str, "%s%s [ ", indent, kind);
|
|
}
|
|
string_printf(str, (ce->type == ZEND_USER_CLASS) ? "<user" : "<internal");
|
|
if (ce->type == ZEND_INTERNAL_CLASS && ce->info.internal.module) {
|
|
string_printf(str, ":%s", ce->info.internal.module->name);
|
|
}
|
|
string_printf(str, "> ");
|
|
if (ce->get_iterator != NULL) {
|
|
string_printf(str, "<iterateable> ");
|
|
}
|
|
if (ce->ce_flags & ZEND_ACC_INTERFACE) {
|
|
string_printf(str, "interface ");
|
|
} else if ((ce->ce_flags & ZEND_ACC_TRAIT) == ZEND_ACC_TRAIT) {
|
|
string_printf(str, "trait ");
|
|
} else {
|
|
if (ce->ce_flags & (ZEND_ACC_IMPLICIT_ABSTRACT_CLASS|ZEND_ACC_EXPLICIT_ABSTRACT_CLASS)) {
|
|
string_printf(str, "abstract ");
|
|
}
|
|
if (ce->ce_flags & ZEND_ACC_FINAL_CLASS) {
|
|
string_printf(str, "final ");
|
|
}
|
|
string_printf(str, "class ");
|
|
}
|
|
string_printf(str, "%s", ce->name->val);
|
|
if (ce->parent) {
|
|
string_printf(str, " extends %s", ce->parent->name->val);
|
|
}
|
|
|
|
if (ce->num_interfaces) {
|
|
zend_uint i;
|
|
|
|
if (ce->ce_flags & ZEND_ACC_INTERFACE) {
|
|
string_printf(str, " extends %s", ce->interfaces[0]->name->val);
|
|
} else {
|
|
string_printf(str, " implements %s", ce->interfaces[0]->name->val);
|
|
}
|
|
for (i = 1; i < ce->num_interfaces; ++i) {
|
|
string_printf(str, ", %s", ce->interfaces[i]->name->val);
|
|
}
|
|
}
|
|
string_printf(str, " ] {\n");
|
|
|
|
/* The information where a class is declared is only available for user classes */
|
|
if (ce->type == ZEND_USER_CLASS) {
|
|
string_printf(str, "%s @@ %s %d-%d\n", indent, ce->info.user.filename->val,
|
|
ce->info.user.line_start, ce->info.user.line_end);
|
|
}
|
|
|
|
/* Constants */
|
|
if (&ce->constants_table) {
|
|
zend_hash_apply_with_argument(&ce->constants_table, (apply_func_arg_t) zval_update_constant, (void*)1 TSRMLS_CC);
|
|
string_printf(str, "\n");
|
|
count = zend_hash_num_elements(&ce->constants_table);
|
|
string_printf(str, "%s - Constants [%d] {\n", indent, count);
|
|
if (count > 0) {
|
|
HashPosition pos;
|
|
zval *value;
|
|
zend_string *key;
|
|
ulong num_index;
|
|
|
|
zend_hash_internal_pointer_reset_ex(&ce->constants_table, &pos);
|
|
|
|
while ((value = zend_hash_get_current_data_ex(&ce->constants_table, &pos)) != NULL) {
|
|
zend_hash_get_current_key_ex(&ce->constants_table, &key, &num_index, 0, &pos);
|
|
|
|
_const_string(str, key->val, value, indent TSRMLS_CC);
|
|
zend_hash_move_forward_ex(&ce->constants_table, &pos);
|
|
}
|
|
}
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
|
|
/* Static properties */
|
|
if (&ce->properties_info) {
|
|
/* counting static properties */
|
|
count = zend_hash_num_elements(&ce->properties_info);
|
|
if (count > 0) {
|
|
HashPosition pos;
|
|
zend_property_info *prop;
|
|
|
|
zend_hash_internal_pointer_reset_ex(&ce->properties_info, &pos);
|
|
|
|
while ((prop = zend_hash_get_current_data_ptr_ex(&ce->properties_info, &pos)) != NULL) {
|
|
if(prop->flags & ZEND_ACC_SHADOW) {
|
|
count_shadow_props++;
|
|
} else if (prop->flags & ZEND_ACC_STATIC) {
|
|
count_static_props++;
|
|
}
|
|
zend_hash_move_forward_ex(&ce->properties_info, &pos);
|
|
}
|
|
}
|
|
|
|
/* static properties */
|
|
string_printf(str, "\n%s - Static properties [%d] {\n", indent, count_static_props);
|
|
if (count_static_props > 0) {
|
|
HashPosition pos;
|
|
zend_property_info *prop;
|
|
|
|
zend_hash_internal_pointer_reset_ex(&ce->properties_info, &pos);
|
|
|
|
while ((prop = zend_hash_get_current_data_ptr_ex(&ce->properties_info, &pos)) != NULL) {
|
|
if ((prop->flags & ZEND_ACC_STATIC) && !(prop->flags & ZEND_ACC_SHADOW)) {
|
|
_property_string(str, prop, NULL, sub_indent.buf->val TSRMLS_CC);
|
|
}
|
|
|
|
zend_hash_move_forward_ex(&ce->properties_info, &pos);
|
|
}
|
|
}
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
|
|
/* Static methods */
|
|
if (&ce->function_table) {
|
|
/* counting static methods */
|
|
count = zend_hash_num_elements(&ce->function_table);
|
|
if (count > 0) {
|
|
HashPosition pos;
|
|
zend_function *mptr;
|
|
|
|
zend_hash_internal_pointer_reset_ex(&ce->function_table, &pos);
|
|
|
|
while ((mptr = zend_hash_get_current_data_ptr_ex(&ce->function_table, &pos)) != NULL) {
|
|
if (mptr->common.fn_flags & ZEND_ACC_STATIC
|
|
&& ((mptr->common.fn_flags & ZEND_ACC_PRIVATE) == 0 || mptr->common.scope == ce))
|
|
{
|
|
count_static_funcs++;
|
|
}
|
|
zend_hash_move_forward_ex(&ce->function_table, &pos);
|
|
}
|
|
}
|
|
|
|
/* static methods */
|
|
string_printf(str, "\n%s - Static methods [%d] {", indent, count_static_funcs);
|
|
if (count_static_funcs > 0) {
|
|
HashPosition pos;
|
|
zend_function *mptr;
|
|
|
|
zend_hash_internal_pointer_reset_ex(&ce->function_table, &pos);
|
|
|
|
while ((mptr = zend_hash_get_current_data_ptr_ex(&ce->function_table, &pos)) != NULL) {
|
|
if (mptr->common.fn_flags & ZEND_ACC_STATIC
|
|
&& ((mptr->common.fn_flags & ZEND_ACC_PRIVATE) == 0 || mptr->common.scope == ce))
|
|
{
|
|
string_printf(str, "\n");
|
|
_function_string(str, mptr, ce, sub_indent.buf->val TSRMLS_CC);
|
|
}
|
|
zend_hash_move_forward_ex(&ce->function_table, &pos);
|
|
}
|
|
} else {
|
|
string_printf(str, "\n");
|
|
}
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
|
|
/* Default/Implicit properties */
|
|
if (&ce->properties_info) {
|
|
count = zend_hash_num_elements(&ce->properties_info) - count_static_props - count_shadow_props;
|
|
string_printf(str, "\n%s - Properties [%d] {\n", indent, count);
|
|
if (count > 0) {
|
|
HashPosition pos;
|
|
zend_property_info *prop;
|
|
|
|
zend_hash_internal_pointer_reset_ex(&ce->properties_info, &pos);
|
|
|
|
while ((prop = zend_hash_get_current_data_ptr_ex(&ce->properties_info, &pos)) != NULL) {
|
|
if (!(prop->flags & (ZEND_ACC_STATIC|ZEND_ACC_SHADOW))) {
|
|
_property_string(str, prop, NULL, sub_indent.buf->val TSRMLS_CC);
|
|
}
|
|
zend_hash_move_forward_ex(&ce->properties_info, &pos);
|
|
}
|
|
}
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
|
|
if (obj && Z_TYPE_P(obj) == IS_OBJECT && Z_OBJ_HT_P(obj)->get_properties) {
|
|
string dyn;
|
|
HashTable *properties = Z_OBJ_HT_P(obj)->get_properties(obj TSRMLS_CC);
|
|
HashPosition pos;
|
|
zval **prop;
|
|
|
|
string_init(&dyn);
|
|
count = 0;
|
|
|
|
if (properties && zend_hash_num_elements(properties)) {
|
|
zend_hash_internal_pointer_reset_ex(properties, &pos);
|
|
|
|
while ((prop = zend_hash_get_current_data_ptr_ex(properties, &pos)) != NULL) {
|
|
zend_string *prop_name;
|
|
ulong index;
|
|
|
|
if (zend_hash_get_current_key_ex(properties, &prop_name, &index, 0, &pos) == HASH_KEY_IS_STRING) {
|
|
if (prop_name->len && prop_name->val[0]) { /* skip all private and protected properties */
|
|
if (!zend_hash_exists(&ce->properties_info, prop_name)) {
|
|
count++;
|
|
_property_string(&dyn, NULL, prop_name->val, sub_indent.buf->val TSRMLS_CC);
|
|
}
|
|
}
|
|
}
|
|
zend_hash_move_forward_ex(properties, &pos);
|
|
}
|
|
}
|
|
|
|
string_printf(str, "\n%s - Dynamic properties [%d] {\n", indent, count);
|
|
string_append(str, &dyn);
|
|
string_printf(str, "%s }\n", indent);
|
|
string_free(&dyn);
|
|
}
|
|
|
|
/* Non static methods */
|
|
if (&ce->function_table) {
|
|
count = zend_hash_num_elements(&ce->function_table) - count_static_funcs;
|
|
if (count > 0) {
|
|
HashPosition pos;
|
|
zend_function *mptr;
|
|
string dyn;
|
|
|
|
count = 0;
|
|
string_init(&dyn);
|
|
zend_hash_internal_pointer_reset_ex(&ce->function_table, &pos);
|
|
|
|
while ((mptr = zend_hash_get_current_data_ptr_ex(&ce->function_table, &pos)) != NULL) {
|
|
if ((mptr->common.fn_flags & ZEND_ACC_STATIC) == 0
|
|
&& ((mptr->common.fn_flags & ZEND_ACC_PRIVATE) == 0 || mptr->common.scope == ce))
|
|
{
|
|
zend_string *key;
|
|
ulong num_index;
|
|
uint len = mptr->common.function_name->len;
|
|
|
|
/* Do not display old-style inherited constructors */
|
|
if ((mptr->common.fn_flags & ZEND_ACC_CTOR) == 0
|
|
|| mptr->common.scope == ce
|
|
|| zend_hash_get_current_key_ex(&ce->function_table, &key, &num_index, 0, &pos) != HASH_KEY_IS_STRING
|
|
|| zend_binary_strcasecmp(key->val, key->len, mptr->common.function_name->val, len) == 0)
|
|
{
|
|
zend_function *closure;
|
|
/* see if this is a closure */
|
|
if (ce == zend_ce_closure && obj && (len == sizeof(ZEND_INVOKE_FUNC_NAME)-1)
|
|
&& memcmp(mptr->common.function_name->val, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME)-1) == 0
|
|
&& (closure = zend_get_closure_invoke_method(Z_OBJ_P(obj) TSRMLS_CC)) != NULL)
|
|
{
|
|
mptr = closure;
|
|
} else {
|
|
closure = NULL;
|
|
}
|
|
string_printf(&dyn, "\n");
|
|
_function_string(&dyn, mptr, ce, sub_indent.buf->val TSRMLS_CC);
|
|
count++;
|
|
_free_function(closure TSRMLS_CC);
|
|
}
|
|
}
|
|
zend_hash_move_forward_ex(&ce->function_table, &pos);
|
|
}
|
|
string_printf(str, "\n%s - Methods [%d] {", indent, count);
|
|
if (!count) {
|
|
string_printf(str, "\n");
|
|
}
|
|
string_append(str, &dyn);
|
|
string_free(&dyn);
|
|
} else {
|
|
string_printf(str, "\n%s - Methods [0] {\n", indent);
|
|
}
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
|
|
string_printf(str, "%s}\n", indent);
|
|
string_free(&sub_indent);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _const_string */
|
|
static void _const_string(string *str, char *name, zval *value, char *indent TSRMLS_DC)
|
|
{
|
|
char *type = zend_zval_type_name(value);
|
|
zend_string *value_str = zval_get_string(value);
|
|
|
|
string_printf(str, "%s Constant [ %s %s ] { %s }\n",
|
|
indent, type, name, value_str->val);
|
|
|
|
STR_RELEASE(value_str);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _get_recv_opcode */
|
|
static zend_op* _get_recv_op(zend_op_array *op_array, zend_uint offset)
|
|
{
|
|
zend_op *op = op_array->opcodes;
|
|
zend_op *end = op + op_array->last;
|
|
|
|
++offset;
|
|
while (op < end) {
|
|
if ((op->opcode == ZEND_RECV || op->opcode == ZEND_RECV_INIT
|
|
|| op->opcode == ZEND_RECV_VARIADIC) && op->op1.num == (long)offset)
|
|
{
|
|
return op;
|
|
}
|
|
++op;
|
|
}
|
|
return NULL;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _parameter_string */
|
|
static void _parameter_string(string *str, zend_function *fptr, struct _zend_arg_info *arg_info, zend_uint offset, zend_uint required, char* indent TSRMLS_DC)
|
|
{
|
|
string_printf(str, "Parameter #%d [ ", offset);
|
|
if (offset >= required) {
|
|
string_printf(str, "<optional> ");
|
|
} else {
|
|
string_printf(str, "<required> ");
|
|
}
|
|
if (arg_info->class_name) {
|
|
string_printf(str, "%s ", arg_info->class_name);
|
|
if (arg_info->allow_null) {
|
|
string_printf(str, "or NULL ");
|
|
}
|
|
} else if (arg_info->type_hint) {
|
|
string_printf(str, "%s ", zend_get_type_by_const(arg_info->type_hint));
|
|
if (arg_info->allow_null) {
|
|
string_printf(str, "or NULL ");
|
|
}
|
|
}
|
|
if (arg_info->pass_by_reference) {
|
|
string_write(str, "&", sizeof("&")-1);
|
|
}
|
|
if (arg_info->is_variadic) {
|
|
string_write(str, "...", sizeof("...")-1);
|
|
}
|
|
if (arg_info->name) {
|
|
string_printf(str, "$%s", arg_info->name);
|
|
} else {
|
|
string_printf(str, "$param%d", offset);
|
|
}
|
|
if (fptr->type == ZEND_USER_FUNCTION && offset >= required) {
|
|
zend_op *precv = _get_recv_op((zend_op_array*)fptr, offset);
|
|
if (precv && precv->opcode == ZEND_RECV_INIT && precv->op2_type != IS_UNUSED) {
|
|
zval zv;
|
|
string_write(str, " = ", sizeof(" = ")-1);
|
|
ZVAL_DUP(&zv, precv->op2.zv);
|
|
zval_update_constant_ex(&zv, (void*)1, fptr->common.scope TSRMLS_CC);
|
|
if (Z_TYPE(zv) == IS_BOOL) {
|
|
if (Z_LVAL(zv)) {
|
|
string_write(str, "true", sizeof("true")-1);
|
|
} else {
|
|
string_write(str, "false", sizeof("false")-1);
|
|
}
|
|
} else if (Z_TYPE(zv) == IS_NULL) {
|
|
string_write(str, "NULL", sizeof("NULL")-1);
|
|
} else if (Z_TYPE(zv) == IS_STRING) {
|
|
string_write(str, "'", sizeof("'")-1);
|
|
string_write(str, Z_STRVAL(zv), MIN(Z_STRLEN(zv), 15));
|
|
if (Z_STRLEN(zv) > 15) {
|
|
string_write(str, "...", sizeof("...")-1);
|
|
}
|
|
string_write(str, "'", sizeof("'")-1);
|
|
} else if (Z_TYPE(zv) == IS_ARRAY) {
|
|
string_write(str, "Array", sizeof("Array")-1);
|
|
} else {
|
|
zend_string *zv_str = zval_get_string(&zv);
|
|
string_write(str, zv_str->val, zv_str->len);
|
|
STR_RELEASE(zv_str);
|
|
}
|
|
zval_ptr_dtor(&zv);
|
|
}
|
|
}
|
|
string_write(str, " ]", sizeof(" ]")-1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _function_parameter_string */
|
|
static void _function_parameter_string(string *str, zend_function *fptr, char* indent TSRMLS_DC)
|
|
{
|
|
struct _zend_arg_info *arg_info = fptr->common.arg_info;
|
|
zend_uint i, required = fptr->common.required_num_args;
|
|
|
|
if (!arg_info) {
|
|
return;
|
|
}
|
|
|
|
string_printf(str, "\n");
|
|
string_printf(str, "%s- Parameters [%d] {\n", indent, fptr->common.num_args);
|
|
for (i = 0; i < fptr->common.num_args; i++) {
|
|
string_printf(str, "%s ", indent);
|
|
_parameter_string(str, fptr, arg_info, i, required, indent TSRMLS_CC);
|
|
string_write(str, "\n", sizeof("\n")-1);
|
|
arg_info++;
|
|
}
|
|
string_printf(str, "%s}\n", indent);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _function_closure_string */
|
|
static void _function_closure_string(string *str, zend_function *fptr, char* indent TSRMLS_DC)
|
|
{
|
|
zend_uint i, count;
|
|
ulong num_index;
|
|
zend_string *key;
|
|
HashTable *static_variables;
|
|
HashPosition pos;
|
|
|
|
if (fptr->type != ZEND_USER_FUNCTION || !fptr->op_array.static_variables) {
|
|
return;
|
|
}
|
|
|
|
static_variables = fptr->op_array.static_variables;
|
|
count = zend_hash_num_elements(static_variables);
|
|
|
|
if (!count) {
|
|
return;
|
|
}
|
|
|
|
string_printf(str, "\n");
|
|
string_printf(str, "%s- Bound Variables [%d] {\n", indent, zend_hash_num_elements(static_variables));
|
|
zend_hash_internal_pointer_reset_ex(static_variables, &pos);
|
|
i = 0;
|
|
while (i < count) {
|
|
zend_hash_get_current_key_ex(static_variables, &key, &num_index, 0, &pos);
|
|
string_printf(str, "%s Variable #%d [ $%s ]\n", indent, i++, key->val);
|
|
zend_hash_move_forward_ex(static_variables, &pos);
|
|
}
|
|
string_printf(str, "%s}\n", indent);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _function_string */
|
|
static void _function_string(string *str, zend_function *fptr, zend_class_entry *scope, char* indent TSRMLS_DC)
|
|
{
|
|
string param_indent;
|
|
zend_function *overwrites;
|
|
zend_string *lc_name;
|
|
unsigned int lc_name_len;
|
|
|
|
/* TBD: Repair indenting of doc comment (or is this to be done in the parser?)
|
|
* What's "wrong" is that any whitespace before the doc comment start is
|
|
* swallowed, leading to an unaligned comment.
|
|
*/
|
|
if (fptr->type == ZEND_USER_FUNCTION && fptr->op_array.doc_comment) {
|
|
string_printf(str, "%s%s\n", indent, fptr->op_array.doc_comment->val);
|
|
}
|
|
|
|
string_write(str, indent, strlen(indent));
|
|
string_printf(str, fptr->common.fn_flags & ZEND_ACC_CLOSURE ? "Closure [ " : (fptr->common.scope ? "Method [ " : "Function [ "));
|
|
string_printf(str, (fptr->type == ZEND_USER_FUNCTION) ? "<user" : "<internal");
|
|
if (fptr->common.fn_flags & ZEND_ACC_DEPRECATED) {
|
|
string_printf(str, ", deprecated");
|
|
}
|
|
if (fptr->type == ZEND_INTERNAL_FUNCTION && ((zend_internal_function*)fptr)->module) {
|
|
string_printf(str, ":%s", ((zend_internal_function*)fptr)->module->name);
|
|
}
|
|
|
|
if (scope && fptr->common.scope) {
|
|
if (fptr->common.scope != scope) {
|
|
string_printf(str, ", inherits %s", fptr->common.scope->name->val);
|
|
} else if (fptr->common.scope->parent) {
|
|
lc_name_len = fptr->common.function_name->len;
|
|
lc_name = STR_ALLOC(lc_name_len, 0);
|
|
zend_str_tolower_copy(lc_name->val, fptr->common.function_name->val, lc_name_len);
|
|
if ((overwrites = zend_hash_find_ptr(&fptr->common.scope->parent->function_table, lc_name)) != NULL) {
|
|
if (fptr->common.scope != overwrites->common.scope) {
|
|
string_printf(str, ", overwrites %s", overwrites->common.scope->name->val);
|
|
}
|
|
}
|
|
efree(lc_name);
|
|
}
|
|
}
|
|
if (fptr->common.prototype && fptr->common.prototype->common.scope) {
|
|
string_printf(str, ", prototype %s", fptr->common.prototype->common.scope->name->val);
|
|
}
|
|
if (fptr->common.fn_flags & ZEND_ACC_CTOR) {
|
|
string_printf(str, ", ctor");
|
|
}
|
|
if (fptr->common.fn_flags & ZEND_ACC_DTOR) {
|
|
string_printf(str, ", dtor");
|
|
}
|
|
string_printf(str, "> ");
|
|
|
|
if (fptr->common.fn_flags & ZEND_ACC_ABSTRACT) {
|
|
string_printf(str, "abstract ");
|
|
}
|
|
if (fptr->common.fn_flags & ZEND_ACC_FINAL) {
|
|
string_printf(str, "final ");
|
|
}
|
|
if (fptr->common.fn_flags & ZEND_ACC_STATIC) {
|
|
string_printf(str, "static ");
|
|
}
|
|
|
|
if (fptr->common.scope) {
|
|
/* These are mutually exclusive */
|
|
switch (fptr->common.fn_flags & ZEND_ACC_PPP_MASK) {
|
|
case ZEND_ACC_PUBLIC:
|
|
string_printf(str, "public ");
|
|
break;
|
|
case ZEND_ACC_PRIVATE:
|
|
string_printf(str, "private ");
|
|
break;
|
|
case ZEND_ACC_PROTECTED:
|
|
string_printf(str, "protected ");
|
|
break;
|
|
default:
|
|
string_printf(str, "<visibility error> ");
|
|
break;
|
|
}
|
|
string_printf(str, "method ");
|
|
} else {
|
|
string_printf(str, "function ");
|
|
}
|
|
|
|
if (fptr->op_array.fn_flags & ZEND_ACC_RETURN_REFERENCE) {
|
|
string_printf(str, "&");
|
|
}
|
|
string_printf(str, "%s ] {\n", fptr->common.function_name->val);
|
|
/* The information where a function is declared is only available for user classes */
|
|
if (fptr->type == ZEND_USER_FUNCTION) {
|
|
string_printf(str, "%s @@ %s %d - %d\n", indent,
|
|
fptr->op_array.filename->val,
|
|
fptr->op_array.line_start,
|
|
fptr->op_array.line_end);
|
|
}
|
|
string_init(¶m_indent);
|
|
string_printf(¶m_indent, "%s ", indent);
|
|
if (fptr->common.fn_flags & ZEND_ACC_CLOSURE) {
|
|
_function_closure_string(str, fptr, param_indent.buf->val TSRMLS_CC);
|
|
}
|
|
_function_parameter_string(str, fptr, param_indent.buf->val TSRMLS_CC);
|
|
string_free(¶m_indent);
|
|
string_printf(str, "%s}\n", indent);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _property_string */
|
|
static void _property_string(string *str, zend_property_info *prop, char *prop_name, char* indent TSRMLS_DC)
|
|
{
|
|
const char *class_name;
|
|
|
|
string_printf(str, "%sProperty [ ", indent);
|
|
if (!prop) {
|
|
string_printf(str, "<dynamic> public $%s", prop_name);
|
|
} else {
|
|
if (!(prop->flags & ZEND_ACC_STATIC)) {
|
|
if (prop->flags & ZEND_ACC_IMPLICIT_PUBLIC) {
|
|
string_write(str, "<implicit> ", sizeof("<implicit> ") - 1);
|
|
} else {
|
|
string_write(str, "<default> ", sizeof("<default> ") - 1);
|
|
}
|
|
}
|
|
|
|
/* These are mutually exclusive */
|
|
switch (prop->flags & ZEND_ACC_PPP_MASK) {
|
|
case ZEND_ACC_PUBLIC:
|
|
string_printf(str, "public ");
|
|
break;
|
|
case ZEND_ACC_PRIVATE:
|
|
string_printf(str, "private ");
|
|
break;
|
|
case ZEND_ACC_PROTECTED:
|
|
string_printf(str, "protected ");
|
|
break;
|
|
}
|
|
if(prop->flags & ZEND_ACC_STATIC) {
|
|
string_printf(str, "static ");
|
|
}
|
|
|
|
zend_unmangle_property_name(prop->name->val, prop->name->len, &class_name, (const char**)&prop_name);
|
|
string_printf(str, "$%s", prop_name);
|
|
}
|
|
|
|
string_printf(str, " ]\n");
|
|
}
|
|
/* }}} */
|
|
|
|
static int _extension_ini_string(zval *el TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key) /* {{{ */
|
|
{
|
|
zend_ini_entry *ini_entry = (zend_ini_entry*)Z_PTR_P(el);
|
|
string *str = va_arg(args, string *);
|
|
char *indent = va_arg(args, char *);
|
|
int number = va_arg(args, int);
|
|
char *comma = "";
|
|
|
|
if (number == ini_entry->module_number) {
|
|
string_printf(str, " %sEntry [ %s <", indent, ini_entry->name);
|
|
if (ini_entry->modifiable == ZEND_INI_ALL) {
|
|
string_printf(str, "ALL");
|
|
} else {
|
|
if (ini_entry->modifiable & ZEND_INI_USER) {
|
|
string_printf(str, "USER");
|
|
comma = ",";
|
|
}
|
|
if (ini_entry->modifiable & ZEND_INI_PERDIR) {
|
|
string_printf(str, "%sPERDIR", comma);
|
|
comma = ",";
|
|
}
|
|
if (ini_entry->modifiable & ZEND_INI_SYSTEM) {
|
|
string_printf(str, "%sSYSTEM", comma);
|
|
}
|
|
}
|
|
|
|
string_printf(str, "> ]\n");
|
|
string_printf(str, " %s Current = '%s'\n", indent, ini_entry->value ? ini_entry->value : "");
|
|
if (ini_entry->modified) {
|
|
string_printf(str, " %s Default = '%s'\n", indent, ini_entry->orig_value ? ini_entry->orig_value : "");
|
|
}
|
|
string_printf(str, " %s}\n", indent);
|
|
}
|
|
return ZEND_HASH_APPLY_KEEP;
|
|
}
|
|
/* }}} */
|
|
|
|
static int _extension_class_string(zval *el TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key) /* {{{ */
|
|
{
|
|
zend_class_entry *ce = (zend_class_entry*)Z_PTR_P(el);
|
|
string *str = va_arg(args, string *);
|
|
char *indent = va_arg(args, char *);
|
|
struct _zend_module_entry *module = va_arg(args, struct _zend_module_entry*);
|
|
int *num_classes = va_arg(args, int*);
|
|
|
|
if ((ce->type == ZEND_INTERNAL_CLASS) && ce->info.internal.module && !strcasecmp(ce->info.internal.module->name, module->name)) {
|
|
string_printf(str, "\n");
|
|
_class_string(str, ce, NULL, indent TSRMLS_CC);
|
|
(*num_classes)++;
|
|
}
|
|
return ZEND_HASH_APPLY_KEEP;
|
|
}
|
|
/* }}} */
|
|
|
|
static int _extension_const_string(zval *el TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key) /* {{{ */
|
|
{
|
|
zend_constant *constant = (zend_constant*)Z_PTR_P(el);
|
|
string *str = va_arg(args, string *);
|
|
char *indent = va_arg(args, char *);
|
|
struct _zend_module_entry *module = va_arg(args, struct _zend_module_entry*);
|
|
int *num_classes = va_arg(args, int*);
|
|
|
|
if (constant->module_number == module->module_number) {
|
|
_const_string(str, constant->name->val, &constant->value, indent TSRMLS_CC);
|
|
(*num_classes)++;
|
|
}
|
|
return ZEND_HASH_APPLY_KEEP;
|
|
}
|
|
/* }}} */
|
|
|
|
static void _extension_string(string *str, zend_module_entry *module, char *indent TSRMLS_DC) /* {{{ */
|
|
{
|
|
string_printf(str, "%sExtension [ ", indent);
|
|
if (module->type == MODULE_PERSISTENT) {
|
|
string_printf(str, "<persistent>");
|
|
}
|
|
if (module->type == MODULE_TEMPORARY) {
|
|
string_printf(str, "<temporary>" );
|
|
}
|
|
string_printf(str, " extension #%d %s version %s ] {\n",
|
|
module->module_number, module->name,
|
|
(module->version == NO_VERSION_YET) ? "<no_version>" : module->version);
|
|
|
|
if (module->deps) {
|
|
const zend_module_dep* dep = module->deps;
|
|
|
|
string_printf(str, "\n - Dependencies {\n");
|
|
|
|
while(dep->name) {
|
|
string_printf(str, "%s Dependency [ %s (", indent, dep->name);
|
|
|
|
switch(dep->type) {
|
|
case MODULE_DEP_REQUIRED:
|
|
string_write(str, "Required", sizeof("Required") - 1);
|
|
break;
|
|
case MODULE_DEP_CONFLICTS:
|
|
string_write(str, "Conflicts", sizeof("Conflicts") - 1);
|
|
break;
|
|
case MODULE_DEP_OPTIONAL:
|
|
string_write(str, "Optional", sizeof("Optional") - 1);
|
|
break;
|
|
default:
|
|
string_write(str, "Error", sizeof("Error") - 1); /* shouldn't happen */
|
|
break;
|
|
}
|
|
|
|
if (dep->rel) {
|
|
string_printf(str, " %s", dep->rel);
|
|
}
|
|
if (dep->version) {
|
|
string_printf(str, " %s", dep->version);
|
|
}
|
|
string_write(str, ") ]\n", sizeof(") ]\n") - 1);
|
|
dep++;
|
|
}
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
|
|
{
|
|
string str_ini;
|
|
string_init(&str_ini);
|
|
zend_hash_apply_with_arguments(EG(ini_directives) TSRMLS_CC, (apply_func_args_t) _extension_ini_string, 3, &str_ini, indent, module->module_number);
|
|
if (str_ini.buf->len > 0) {
|
|
string_printf(str, "\n - INI {\n");
|
|
string_append(str, &str_ini);
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
string_free(&str_ini);
|
|
}
|
|
|
|
{
|
|
string str_constants;
|
|
int num_constants = 0;
|
|
|
|
string_init(&str_constants);
|
|
zend_hash_apply_with_arguments(EG(zend_constants) TSRMLS_CC, (apply_func_args_t) _extension_const_string, 4, &str_constants, indent, module, &num_constants);
|
|
if (num_constants) {
|
|
string_printf(str, "\n - Constants [%d] {\n", num_constants);
|
|
string_append(str, &str_constants);
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
string_free(&str_constants);
|
|
}
|
|
|
|
{
|
|
HashPosition iterator;
|
|
zend_function *fptr;
|
|
int first = 1;
|
|
|
|
zend_hash_internal_pointer_reset_ex(CG(function_table), &iterator);
|
|
while ((fptr = zend_hash_get_current_data_ptr_ex(CG(function_table), &iterator)) != NULL) {
|
|
if (fptr->common.type==ZEND_INTERNAL_FUNCTION
|
|
&& fptr->internal_function.module == module) {
|
|
if (first) {
|
|
string_printf(str, "\n - Functions {\n");
|
|
first = 0;
|
|
}
|
|
_function_string(str, fptr, NULL, " " TSRMLS_CC);
|
|
}
|
|
zend_hash_move_forward_ex(CG(function_table), &iterator);
|
|
}
|
|
if (!first) {
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
}
|
|
|
|
{
|
|
string str_classes;
|
|
string sub_indent;
|
|
int num_classes = 0;
|
|
|
|
string_init(&sub_indent);
|
|
string_printf(&sub_indent, "%s ", indent);
|
|
string_init(&str_classes);
|
|
zend_hash_apply_with_arguments(EG(class_table) TSRMLS_CC, (apply_func_args_t) _extension_class_string, 4, &str_classes, sub_indent.buf->val, module, &num_classes);
|
|
if (num_classes) {
|
|
string_printf(str, "\n - Classes [%d] {", num_classes);
|
|
string_append(str, &str_classes);
|
|
string_printf(str, "%s }\n", indent);
|
|
}
|
|
string_free(&str_classes);
|
|
string_free(&sub_indent);
|
|
}
|
|
|
|
string_printf(str, "%s}\n", indent);
|
|
}
|
|
/* }}} */
|
|
|
|
static void _zend_extension_string(string *str, zend_extension *extension, char *indent TSRMLS_DC) /* {{{ */
|
|
{
|
|
string_printf(str, "%sZend Extension [ %s ", indent, extension->name);
|
|
|
|
if (extension->version) {
|
|
string_printf(str, "%s ", extension->version);
|
|
}
|
|
if (extension->copyright) {
|
|
string_printf(str, "%s ", extension->copyright);
|
|
}
|
|
if (extension->author) {
|
|
string_printf(str, "by %s ", extension->author);
|
|
}
|
|
if (extension->URL) {
|
|
string_printf(str, "<%s> ", extension->URL);
|
|
}
|
|
|
|
string_printf(str, "]\n");
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _function_check_flag */
|
|
static void _function_check_flag(INTERNAL_FUNCTION_PARAMETERS, int mask)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
RETURN_BOOL(mptr->common.fn_flags & mask);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ zend_reflection_class_factory */
|
|
PHPAPI void zend_reflection_class_factory(zend_class_entry *ce, zval *object TSRMLS_DC)
|
|
{
|
|
reflection_object *intern;
|
|
zval name;
|
|
|
|
ZVAL_STR(&name, STR_COPY(ce->name));
|
|
reflection_instantiate(reflection_class_ptr, object TSRMLS_CC);
|
|
intern = Z_REFLECTION_P(object);
|
|
intern->ptr = ce;
|
|
intern->ref_type = REF_TYPE_OTHER;
|
|
intern->ce = ce;
|
|
reflection_update_property(object, "name", &name);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ reflection_extension_factory */
|
|
static void reflection_extension_factory(zval *object, const char *name_str TSRMLS_DC)
|
|
{
|
|
reflection_object *intern;
|
|
zval name;
|
|
int name_len = strlen(name_str);
|
|
zend_string *lcname;
|
|
struct _zend_module_entry *module;
|
|
|
|
lcname = STR_ALLOC(name_len, 0);
|
|
zend_str_tolower_copy(lcname->val, name_str, name_len);
|
|
module = zend_hash_find_ptr(&module_registry, lcname);
|
|
STR_FREE(lcname);
|
|
if (!module) {
|
|
return;
|
|
}
|
|
|
|
reflection_instantiate(reflection_extension_ptr, object TSRMLS_CC);
|
|
intern = Z_REFLECTION_P(object);
|
|
ZVAL_STRINGL(&name, module->name, name_len);
|
|
intern->ptr = module;
|
|
intern->ref_type = REF_TYPE_OTHER;
|
|
intern->ce = NULL;
|
|
reflection_update_property(object, "name", &name);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ reflection_parameter_factory */
|
|
static void reflection_parameter_factory(zend_function *fptr, zval *closure_object, struct _zend_arg_info *arg_info, zend_uint offset, zend_uint required, zval *object TSRMLS_DC)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *reference;
|
|
zval name;
|
|
|
|
if (arg_info->name) {
|
|
ZVAL_STRINGL(&name, arg_info->name, arg_info->name_len);
|
|
} else {
|
|
ZVAL_NULL(&name);
|
|
}
|
|
reflection_instantiate(reflection_parameter_ptr, object TSRMLS_CC);
|
|
intern = Z_REFLECTION_P(object);
|
|
reference = (parameter_reference*) emalloc(sizeof(parameter_reference));
|
|
reference->arg_info = arg_info;
|
|
reference->offset = offset;
|
|
reference->required = required;
|
|
reference->fptr = fptr;
|
|
intern->ptr = reference;
|
|
intern->ref_type = REF_TYPE_PARAMETER;
|
|
intern->ce = fptr->common.scope;
|
|
if (closure_object) {
|
|
Z_ADDREF_P(closure_object);
|
|
ZVAL_COPY_VALUE(&intern->obj, closure_object);
|
|
}
|
|
reflection_update_property(object, "name", &name);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ reflection_function_factory */
|
|
static void reflection_function_factory(zend_function *function, zval *closure_object, zval *object TSRMLS_DC)
|
|
{
|
|
reflection_object *intern;
|
|
zval name;
|
|
|
|
ZVAL_STR(&name, STR_COPY(function->common.function_name));
|
|
|
|
reflection_instantiate(reflection_function_ptr, object TSRMLS_CC);
|
|
intern = Z_REFLECTION_P(object);
|
|
intern->ptr = function;
|
|
intern->ref_type = REF_TYPE_FUNCTION;
|
|
intern->ce = NULL;
|
|
if (closure_object) {
|
|
Z_ADDREF_P(closure_object);
|
|
ZVAL_COPY_VALUE(&intern->obj, closure_object);
|
|
}
|
|
reflection_update_property(object, "name", &name);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ reflection_method_factory */
|
|
static void reflection_method_factory(zend_class_entry *ce, zend_function *method, zval *closure_object, zval *object TSRMLS_DC)
|
|
{
|
|
reflection_object *intern;
|
|
zval name;
|
|
zval classname;
|
|
|
|
ZVAL_STR(&name, STR_COPY((method->common.scope && method->common.scope->trait_aliases)?
|
|
zend_resolve_method_name(ce, method) : method->common.function_name));
|
|
ZVAL_STR(&classname, STR_COPY(method->common.scope->name));
|
|
reflection_instantiate(reflection_method_ptr, object TSRMLS_CC);
|
|
intern = Z_REFLECTION_P(object);
|
|
intern->ptr = method;
|
|
intern->ref_type = REF_TYPE_FUNCTION;
|
|
intern->ce = ce;
|
|
if (closure_object) {
|
|
Z_ADDREF_P(closure_object);
|
|
ZVAL_COPY_VALUE(&intern->obj, closure_object);
|
|
}
|
|
reflection_update_property(object, "name", &name);
|
|
reflection_update_property(object, "class", &classname);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ reflection_property_factory */
|
|
static void reflection_property_factory(zend_class_entry *ce, zend_property_info *prop, zval *object TSRMLS_DC)
|
|
{
|
|
reflection_object *intern;
|
|
zval name;
|
|
zval classname;
|
|
property_reference *reference;
|
|
const char *class_name, *prop_name;
|
|
|
|
zend_unmangle_property_name(prop->name->val, prop->name->len, &class_name, &prop_name);
|
|
|
|
if (!(prop->flags & ZEND_ACC_PRIVATE)) {
|
|
/* we have to search the class hierarchy for this (implicit) public or protected property */
|
|
zend_class_entry *tmp_ce = ce, *store_ce = ce;
|
|
zend_property_info *tmp_info = NULL;
|
|
|
|
while (tmp_ce && (tmp_info = zend_hash_str_find_ptr(&tmp_ce->properties_info, prop_name, strlen(prop_name))) == NULL) {
|
|
ce = tmp_ce;
|
|
tmp_ce = tmp_ce->parent;
|
|
}
|
|
|
|
if (tmp_info && !(tmp_info->flags & ZEND_ACC_SHADOW)) { /* found something and it's not a parent's private */
|
|
prop = tmp_info;
|
|
} else { /* not found, use initial value */
|
|
ce = store_ce;
|
|
}
|
|
}
|
|
|
|
ZVAL_STRING(&name, prop_name);
|
|
ZVAL_STR(&classname, STR_COPY(prop->ce->name));
|
|
|
|
reflection_instantiate(reflection_property_ptr, object TSRMLS_CC);
|
|
intern = Z_REFLECTION_P(object);
|
|
reference = (property_reference*) emalloc(sizeof(property_reference));
|
|
reference->ce = ce;
|
|
reference->prop = *prop;
|
|
intern->ptr = reference;
|
|
intern->ref_type = REF_TYPE_PROPERTY;
|
|
intern->ce = ce;
|
|
intern->ignore_visibility = 0;
|
|
reflection_update_property(object, "name", &name);
|
|
reflection_update_property(object, "class", &classname);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _reflection_export */
|
|
static void _reflection_export(INTERNAL_FUNCTION_PARAMETERS, zend_class_entry *ce_ptr, int ctor_argc)
|
|
{
|
|
zval reflector;
|
|
zval output, *output_ptr = &output;
|
|
zval *argument_ptr, *argument2_ptr;
|
|
zval retval, params[2];
|
|
int result;
|
|
int return_output = 0;
|
|
zend_fcall_info fci;
|
|
zend_fcall_info_cache fcc;
|
|
|
|
if (ctor_argc == 1) {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z|b", &argument_ptr, &return_output) == FAILURE) {
|
|
return;
|
|
}
|
|
ZVAL_COPY_VALUE(¶ms[0], argument_ptr);
|
|
ZVAL_NULL(¶ms[1]);
|
|
} else {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zz|b", &argument_ptr, &argument2_ptr, &return_output) == FAILURE) {
|
|
return;
|
|
}
|
|
ZVAL_COPY_VALUE(¶ms[0], argument_ptr);
|
|
ZVAL_COPY_VALUE(¶ms[1], argument2_ptr);
|
|
}
|
|
|
|
/* Create object */
|
|
if (object_and_properties_init(&reflector, ce_ptr, NULL) == FAILURE) {
|
|
_DO_THROW("Could not create reflector");
|
|
}
|
|
|
|
/* Call __construct() */
|
|
|
|
fci.size = sizeof(fci);
|
|
fci.function_table = NULL;
|
|
ZVAL_UNDEF(&fci.function_name);
|
|
fci.symbol_table = NULL;
|
|
fci.object = Z_OBJ(reflector);
|
|
fci.retval = &retval;
|
|
fci.param_count = ctor_argc;
|
|
fci.params = params;
|
|
fci.no_separation = 1;
|
|
|
|
fcc.initialized = 1;
|
|
fcc.function_handler = ce_ptr->constructor;
|
|
fcc.calling_scope = ce_ptr;
|
|
fcc.called_scope = Z_OBJCE(reflector);
|
|
fcc.object = Z_OBJ(reflector);
|
|
|
|
result = zend_call_function(&fci, &fcc TSRMLS_CC);
|
|
|
|
zval_ptr_dtor(&retval);
|
|
|
|
if (EG(exception)) {
|
|
zval_ptr_dtor(&reflector);
|
|
return;
|
|
}
|
|
if (result == FAILURE) {
|
|
zval_ptr_dtor(&reflector);
|
|
_DO_THROW("Could not create reflector");
|
|
}
|
|
|
|
/* Call static reflection::export */
|
|
ZVAL_BOOL(&output, return_output);
|
|
ZVAL_COPY_VALUE(¶ms[0], &reflector);
|
|
ZVAL_COPY_VALUE(¶ms[1], output_ptr);
|
|
|
|
ZVAL_STRINGL(&fci.function_name, "reflection::export", sizeof("reflection::export") - 1);
|
|
fci.function_table = &reflection_ptr->function_table;
|
|
fci.object = NULL;
|
|
fci.retval = &retval;
|
|
fci.param_count = 2;
|
|
fci.params = params;
|
|
fci.no_separation = 1;
|
|
|
|
result = zend_call_function(&fci, NULL TSRMLS_CC);
|
|
|
|
zval_ptr_dtor(&fci.function_name);
|
|
|
|
if (result == FAILURE && EG(exception) == NULL) {
|
|
zval_ptr_dtor(&reflector);
|
|
zval_ptr_dtor(&retval);
|
|
_DO_THROW("Could not execute reflection::export()");
|
|
}
|
|
|
|
if (return_output) {
|
|
ZVAL_COPY_VALUE(return_value, &retval);
|
|
} else {
|
|
zval_ptr_dtor(&retval);
|
|
}
|
|
|
|
/* Destruct reflector which is no longer needed */
|
|
zval_ptr_dtor(&reflector);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _reflection_param_get_default_param */
|
|
static parameter_reference *_reflection_param_get_default_param(INTERNAL_FUNCTION_PARAMETERS)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
intern = Z_REFLECTION_P(getThis());
|
|
if (intern == NULL || intern->ptr == NULL) {
|
|
if (EG(exception) && EG(exception)->ce == reflection_exception_ptr) {
|
|
return NULL;
|
|
}
|
|
php_error_docref(NULL TSRMLS_CC, E_ERROR, "Internal error: Failed to retrieve the reflection object");
|
|
}
|
|
|
|
param = intern->ptr;
|
|
if (param->fptr->type != ZEND_USER_FUNCTION) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Cannot determine default value for internal functions");
|
|
return NULL;
|
|
}
|
|
|
|
return param;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _reflection_param_get_default_precv */
|
|
static zend_op *_reflection_param_get_default_precv(INTERNAL_FUNCTION_PARAMETERS, parameter_reference *param)
|
|
{
|
|
zend_op *precv;
|
|
|
|
if (param == NULL) {
|
|
return NULL;
|
|
}
|
|
|
|
precv = _get_recv_op((zend_op_array*)param->fptr, param->offset);
|
|
if (!precv || precv->opcode != ZEND_RECV_INIT || precv->op2_type == IS_UNUSED) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Internal error: Failed to retrieve the default value");
|
|
return NULL;
|
|
}
|
|
|
|
return precv;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ Preventing __clone from being called */
|
|
ZEND_METHOD(reflection, __clone)
|
|
{
|
|
/* Should never be executable */
|
|
_DO_THROW("Cannot clone object using __clone()");
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed Reflection::export(Reflector r [, bool return])
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection, export)
|
|
{
|
|
zval *object, fname, retval;
|
|
int result;
|
|
zend_bool return_output = 0;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "O|b", &object, reflector_ptr, &return_output) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
/* Invoke the __toString() method */
|
|
ZVAL_STRINGL(&fname, "__tostring", sizeof("__tostring") - 1);
|
|
result= call_user_function_ex(NULL, object, &fname, &retval, 0, NULL, 0, NULL TSRMLS_CC);
|
|
zval_dtor(&fname);
|
|
|
|
if (result == FAILURE) {
|
|
_DO_THROW("Invocation of method __toString() failed");
|
|
/* Returns from this function */
|
|
}
|
|
|
|
if (Z_TYPE(retval) == IS_UNDEF) {
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s::__toString() did not return anything", Z_OBJCE_P(object)->name->val);
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
if (return_output) {
|
|
ZVAL_COPY_VALUE(return_value, &retval);
|
|
} else {
|
|
/* No need for _r variant, return of __toString should always be a string */
|
|
zend_print_zval(&retval, 0 TSRMLS_CC);
|
|
zend_printf("\n");
|
|
zval_ptr_dtor(&retval);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static array Reflection::getModifierNames(int modifiers)
|
|
Returns an array of modifier names */
|
|
ZEND_METHOD(reflection, getModifierNames)
|
|
{
|
|
long modifiers;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &modifiers) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
array_init(return_value);
|
|
|
|
if (modifiers & (ZEND_ACC_ABSTRACT | ZEND_ACC_EXPLICIT_ABSTRACT_CLASS)) {
|
|
add_next_index_stringl(return_value, "abstract", sizeof("abstract")-1);
|
|
}
|
|
if (modifiers & (ZEND_ACC_FINAL | ZEND_ACC_FINAL_CLASS)) {
|
|
add_next_index_stringl(return_value, "final", sizeof("final")-1);
|
|
}
|
|
if (modifiers & ZEND_ACC_IMPLICIT_PUBLIC) {
|
|
add_next_index_stringl(return_value, "public", sizeof("public")-1);
|
|
}
|
|
|
|
/* These are mutually exclusive */
|
|
switch (modifiers & ZEND_ACC_PPP_MASK) {
|
|
case ZEND_ACC_PUBLIC:
|
|
add_next_index_stringl(return_value, "public", sizeof("public")-1);
|
|
break;
|
|
case ZEND_ACC_PRIVATE:
|
|
add_next_index_stringl(return_value, "private", sizeof("private")-1);
|
|
break;
|
|
case ZEND_ACC_PROTECTED:
|
|
add_next_index_stringl(return_value, "protected", sizeof("protected")-1);
|
|
break;
|
|
}
|
|
|
|
if (modifiers & ZEND_ACC_STATIC) {
|
|
add_next_index_stringl(return_value, "static", sizeof("static")-1);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionFunction::export(string name [, bool return])
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_function, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_function_ptr, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionFunction::__construct(string name)
|
|
Constructor. Throws an Exception in case the given function does not exist */
|
|
ZEND_METHOD(reflection_function, __construct)
|
|
{
|
|
zval name;
|
|
zval *object;
|
|
zval *closure = NULL;
|
|
char *lcname;
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
char *name_str;
|
|
int name_len;
|
|
|
|
object = getThis();
|
|
intern = Z_REFLECTION_P(object);
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
if (zend_parse_parameters_ex(ZEND_PARSE_PARAMS_QUIET, ZEND_NUM_ARGS() TSRMLS_CC, "O", &closure, zend_ce_closure) == SUCCESS) {
|
|
fptr = (zend_function*)zend_get_closure_method_def(closure TSRMLS_CC);
|
|
Z_ADDREF_P(closure);
|
|
} else if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name_str, &name_len) == SUCCESS) {
|
|
char *nsname;
|
|
|
|
lcname = zend_str_tolower_dup(name_str, name_len);
|
|
|
|
/* Ignore leading "\" */
|
|
nsname = lcname;
|
|
if (lcname[0] == '\\') {
|
|
nsname = &lcname[1];
|
|
name_len--;
|
|
}
|
|
|
|
if ((fptr = zend_hash_str_find_ptr(EG(function_table), nsname, name_len)) == NULL) {
|
|
efree(lcname);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Function %s() does not exist", name_str);
|
|
return;
|
|
}
|
|
efree(lcname);
|
|
} else {
|
|
return;
|
|
}
|
|
|
|
ZVAL_STR(&name, STR_COPY(fptr->common.function_name));
|
|
reflection_update_property(object, "name", &name);
|
|
intern->ptr = fptr;
|
|
intern->ref_type = REF_TYPE_FUNCTION;
|
|
if (closure) {
|
|
ZVAL_COPY_VALUE(&intern->obj, closure);
|
|
} else {
|
|
ZVAL_UNDEF(&intern->obj);
|
|
}
|
|
intern->ce = NULL;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionFunction::__toString()
|
|
Returns a string representation */
|
|
ZEND_METHOD(reflection_function, __toString)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
string str;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
string_init(&str);
|
|
_function_string(&str, fptr, intern->ce, "" TSRMLS_CC);
|
|
RETURN_STR(str.buf);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionFunction::getName()
|
|
Returns this function's name */
|
|
ZEND_METHOD(reflection_function, getName)
|
|
{
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
_default_get_entry(getThis(), "name", sizeof("name")-1, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::isClosure()
|
|
Returns whether this is a closure */
|
|
ZEND_METHOD(reflection_function, isClosure)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
RETURN_BOOL(fptr->common.fn_flags & ZEND_ACC_CLOSURE);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::getClosureThis()
|
|
Returns this pointer bound to closure */
|
|
ZEND_METHOD(reflection_function, getClosureThis)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
zval* closure_this;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
if (!ZVAL_IS_UNDEF(&intern->obj)) {
|
|
closure_this = zend_get_closure_this_ptr(&intern->obj TSRMLS_CC);
|
|
if (!ZVAL_IS_UNDEF(closure_this)) {
|
|
RETURN_ZVAL(closure_this, 1, 0);
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass ReflectionFunction::getClosureScopeClass()
|
|
Returns the scope associated to the closure */
|
|
ZEND_METHOD(reflection_function, getClosureScopeClass)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
const zend_function *closure_func;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
if (!ZVAL_IS_UNDEF(&intern->obj)) {
|
|
closure_func = zend_get_closure_method_def(&intern->obj TSRMLS_CC);
|
|
if (closure_func && closure_func->common.scope) {
|
|
zend_reflection_class_factory(closure_func->common.scope, return_value TSRMLS_CC);
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionFunction::getClosure()
|
|
Returns a dynamically created closure for the function */
|
|
ZEND_METHOD(reflection_function, getClosure)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
zend_create_closure(return_value, fptr, NULL, NULL TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::isInternal()
|
|
Returns whether this is an internal function */
|
|
ZEND_METHOD(reflection_function, isInternal)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
RETURN_BOOL(fptr->type == ZEND_INTERNAL_FUNCTION);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::isUserDefined()
|
|
Returns whether this is an user-defined function */
|
|
ZEND_METHOD(reflection_function, isUserDefined)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
RETURN_BOOL(fptr->type == ZEND_USER_FUNCTION);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::isDisabled()
|
|
Returns whether this function has been disabled or not */
|
|
ZEND_METHOD(reflection_function, isDisabled)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
RETURN_BOOL(fptr->type == ZEND_INTERNAL_FUNCTION && fptr->internal_function.handler == zif_display_disabled_function);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionFunction::getFileName()
|
|
Returns the filename of the file this function was declared in */
|
|
ZEND_METHOD(reflection_function, getFileName)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
if (fptr->type == ZEND_USER_FUNCTION) {
|
|
// TODO: we have to duplicate it, becaise it may be in opcache SHM ???
|
|
RETURN_STR(STR_DUP(fptr->op_array.filename, 0));
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionFunction::getStartLine()
|
|
Returns the line this function's declaration starts at */
|
|
ZEND_METHOD(reflection_function, getStartLine)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
if (fptr->type == ZEND_USER_FUNCTION) {
|
|
RETURN_LONG(fptr->op_array.line_start);
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionFunction::getEndLine()
|
|
Returns the line this function's declaration ends at */
|
|
ZEND_METHOD(reflection_function, getEndLine)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
if (fptr->type == ZEND_USER_FUNCTION) {
|
|
RETURN_LONG(fptr->op_array.line_end);
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionFunction::getDocComment()
|
|
Returns the doc comment for this function */
|
|
ZEND_METHOD(reflection_function, getDocComment)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
if (fptr->type == ZEND_USER_FUNCTION && fptr->op_array.doc_comment) {
|
|
// TODO: we have to duplicate it, becaise it may be stored in opcache SHM ???
|
|
RETURN_STR(STR_DUP(fptr->op_array.doc_comment, 0));
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionFunction::getStaticVariables()
|
|
Returns an associative array containing this function's static variables and their values */
|
|
ZEND_METHOD(reflection_function, getStaticVariables)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
/* Return an empty array in case no static variables exist */
|
|
array_init(return_value);
|
|
if (fptr->type == ZEND_USER_FUNCTION && fptr->op_array.static_variables != NULL) {
|
|
zend_hash_apply_with_argument(fptr->op_array.static_variables, (apply_func_arg_t) zval_update_constant_inline_change, fptr->common.scope TSRMLS_CC);
|
|
zend_hash_copy(Z_ARRVAL_P(return_value), fptr->op_array.static_variables, zval_add_ref);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionFunction::invoke([mixed* args])
|
|
Invokes the function */
|
|
ZEND_METHOD(reflection_function, invoke)
|
|
{
|
|
zval retval;
|
|
zval *params = NULL;
|
|
int result, num_args = 0;
|
|
zend_fcall_info fci;
|
|
zend_fcall_info_cache fcc;
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "*", ¶ms, &num_args) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
fci.size = sizeof(fci);
|
|
fci.function_table = NULL;
|
|
ZVAL_UNDEF(&fci.function_name);
|
|
fci.symbol_table = NULL;
|
|
fci.object = NULL;
|
|
fci.retval = &retval;
|
|
fci.param_count = num_args;
|
|
fci.params = params;
|
|
fci.no_separation = 1;
|
|
|
|
fcc.initialized = 1;
|
|
fcc.function_handler = fptr;
|
|
fcc.calling_scope = EG(scope);
|
|
fcc.called_scope = NULL;
|
|
fcc.object = NULL;
|
|
|
|
result = zend_call_function(&fci, &fcc TSRMLS_CC);
|
|
|
|
if (result == FAILURE) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Invocation of function %s() failed", fptr->common.function_name->val);
|
|
return;
|
|
}
|
|
|
|
if (Z_TYPE(retval) != IS_UNDEF) {
|
|
ZVAL_COPY_VALUE(return_value, &retval);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
static int _zval_array_to_c_array(zval *arg, zval **params TSRMLS_DC) /* {{{ */
|
|
{
|
|
ZVAL_COPY((*params), arg);
|
|
(*params)++;
|
|
return ZEND_HASH_APPLY_KEEP;
|
|
} /* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionFunction::invokeArgs(array args)
|
|
Invokes the function and pass its arguments as array. */
|
|
ZEND_METHOD(reflection_function, invokeArgs)
|
|
{
|
|
zval retval;
|
|
zval *params;
|
|
int result;
|
|
int i, argc;
|
|
zend_fcall_info fci;
|
|
zend_fcall_info_cache fcc;
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
zval *param_array;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", ¶m_array) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
argc = zend_hash_num_elements(Z_ARRVAL_P(param_array));
|
|
|
|
params = safe_emalloc(sizeof(zval), argc, 0);
|
|
zend_hash_apply_with_argument(Z_ARRVAL_P(param_array), (apply_func_arg_t)_zval_array_to_c_array, ¶ms TSRMLS_CC);
|
|
params -= argc;
|
|
|
|
fci.size = sizeof(fci);
|
|
fci.function_table = NULL;
|
|
ZVAL_UNDEF(&fci.function_name);
|
|
fci.symbol_table = NULL;
|
|
fci.object = NULL;
|
|
fci.retval = &retval;
|
|
fci.param_count = argc;
|
|
fci.params = params;
|
|
fci.no_separation = 1;
|
|
|
|
fcc.initialized = 1;
|
|
fcc.function_handler = fptr;
|
|
fcc.calling_scope = EG(scope);
|
|
fcc.called_scope = NULL;
|
|
fcc.object = NULL;
|
|
|
|
result = zend_call_function(&fci, &fcc TSRMLS_CC);
|
|
|
|
for (i = 0; i < argc; i++) {
|
|
zval_ptr_dtor(¶ms[i]);
|
|
}
|
|
efree(params);
|
|
|
|
if (result == FAILURE) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Invocation of function %s() failed", fptr->common.function_name->val);
|
|
return;
|
|
}
|
|
|
|
if (Z_TYPE(retval) != IS_UNDEF) {
|
|
ZVAL_COPY_VALUE(return_value, &retval);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::returnsReference()
|
|
Gets whether this function returns a reference */
|
|
ZEND_METHOD(reflection_function, returnsReference)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_abstract_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
RETURN_BOOL((fptr->op_array.fn_flags & ZEND_ACC_RETURN_REFERENCE) != 0);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::getNumberOfParameters()
|
|
Gets the number of required parameters */
|
|
ZEND_METHOD(reflection_function, getNumberOfParameters)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_abstract_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
RETURN_LONG(fptr->common.num_args);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::getNumberOfRequiredParameters()
|
|
Gets the number of required parameters */
|
|
ZEND_METHOD(reflection_function, getNumberOfRequiredParameters)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_abstract_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
RETURN_LONG(fptr->common.required_num_args);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionParameter[] ReflectionFunction::getParameters()
|
|
Returns an array of parameter objects for this function */
|
|
ZEND_METHOD(reflection_function, getParameters)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
zend_uint i;
|
|
struct _zend_arg_info *arg_info;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_abstract_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
arg_info= fptr->common.arg_info;
|
|
|
|
array_init(return_value);
|
|
for (i = 0; i < fptr->common.num_args; i++) {
|
|
zval parameter;
|
|
|
|
reflection_parameter_factory(_copy_function(fptr TSRMLS_CC), ZVAL_IS_UNDEF(&intern->obj)? NULL : &intern->obj, arg_info, i, fptr->common.required_num_args, ¶meter TSRMLS_CC);
|
|
add_next_index_zval(return_value, ¶meter);
|
|
|
|
arg_info++;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionExtension|NULL ReflectionFunction::getExtension()
|
|
Returns NULL or the extension the function belongs to */
|
|
ZEND_METHOD(reflection_function, getExtension)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
zend_internal_function *internal;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_abstract_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
if (fptr->type != ZEND_INTERNAL_FUNCTION) {
|
|
RETURN_NULL();
|
|
}
|
|
|
|
internal = (zend_internal_function *)fptr;
|
|
if (internal->module) {
|
|
reflection_extension_factory(return_value, internal->module->name TSRMLS_CC);
|
|
} else {
|
|
RETURN_NULL();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string|false ReflectionFunction::getExtensionName()
|
|
Returns false or the name of the extension the function belongs to */
|
|
ZEND_METHOD(reflection_function, getExtensionName)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
zend_internal_function *internal;
|
|
|
|
METHOD_NOTSTATIC(reflection_function_abstract_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(fptr);
|
|
|
|
if (fptr->type != ZEND_INTERNAL_FUNCTION) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
internal = (zend_internal_function *)fptr;
|
|
if (internal->module) {
|
|
RETURN_STRING(internal->module->name);
|
|
} else {
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionParameter::export(mixed function, mixed parameter [, bool return]) throws ReflectionException
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_parameter, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_parameter_ptr, 2);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionParameter::__construct(mixed function, mixed parameter)
|
|
Constructor. Throws an Exception in case the given method does not exist */
|
|
ZEND_METHOD(reflection_parameter, __construct)
|
|
{
|
|
parameter_reference *ref;
|
|
zval *reference, *parameter;
|
|
zval *object;
|
|
zval name;
|
|
reflection_object *intern;
|
|
zend_function *fptr;
|
|
struct _zend_arg_info *arg_info;
|
|
int position;
|
|
zend_class_entry *ce = NULL;
|
|
zend_bool is_closure = 0;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zz", &reference, ¶meter) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
object = getThis();
|
|
intern = Z_REFLECTION_P(object);
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
/* First, find the function */
|
|
switch (Z_TYPE_P(reference)) {
|
|
case IS_STRING: {
|
|
unsigned int lcname_len;
|
|
char *lcname;
|
|
|
|
lcname_len = Z_STRLEN_P(reference);
|
|
lcname = zend_str_tolower_dup(Z_STRVAL_P(reference), lcname_len);
|
|
if ((fptr = zend_hash_str_find_ptr(EG(function_table), lcname, lcname_len)) == NULL) {
|
|
efree(lcname);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Function %s() does not exist", Z_STRVAL_P(reference));
|
|
return;
|
|
}
|
|
efree(lcname);
|
|
}
|
|
ce = fptr->common.scope;
|
|
break;
|
|
|
|
case IS_ARRAY: {
|
|
zval *classref;
|
|
zval *method;
|
|
unsigned int lcname_len;
|
|
char *lcname;
|
|
|
|
if (((classref =zend_hash_index_find(Z_ARRVAL_P(reference), 0)) == NULL)
|
|
|| ((method = zend_hash_index_find(Z_ARRVAL_P(reference), 1)) == NULL))
|
|
{
|
|
_DO_THROW("Expected array($object, $method) or array($classname, $method)");
|
|
/* returns out of this function */
|
|
}
|
|
|
|
if (Z_TYPE_P(classref) == IS_OBJECT) {
|
|
ce = Z_OBJCE_P(classref);
|
|
} else {
|
|
convert_to_string_ex(classref);
|
|
if ((ce = zend_lookup_class(Z_STR_P(classref) TSRMLS_CC)) == NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Class %s does not exist", Z_STRVAL_P(classref));
|
|
return;
|
|
}
|
|
}
|
|
|
|
convert_to_string_ex(method);
|
|
lcname_len = Z_STRLEN_P(method);
|
|
lcname = zend_str_tolower_dup(Z_STRVAL_P(method), lcname_len);
|
|
if (ce == zend_ce_closure && Z_TYPE_P(classref) == IS_OBJECT
|
|
&& (lcname_len == sizeof(ZEND_INVOKE_FUNC_NAME)-1)
|
|
&& memcmp(lcname, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME)-1) == 0
|
|
&& (fptr = zend_get_closure_invoke_method(Z_OBJ_P(classref) TSRMLS_CC)) != NULL)
|
|
{
|
|
/* nothing to do. don't set is_closure since is the invoke handler,
|
|
- not the closure itself */
|
|
} else if ((fptr = zend_hash_str_find_ptr(&ce->function_table, lcname, lcname_len)) == NULL) {
|
|
efree(lcname);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Method %s::%s() does not exist", ce->name->val, Z_STRVAL_P(method));
|
|
return;
|
|
}
|
|
efree(lcname);
|
|
}
|
|
break;
|
|
|
|
case IS_OBJECT: {
|
|
ce = Z_OBJCE_P(reference);
|
|
|
|
if (instanceof_function(ce, zend_ce_closure TSRMLS_CC)) {
|
|
fptr = (zend_function *)zend_get_closure_method_def(reference TSRMLS_CC);
|
|
Z_ADDREF_P(reference);
|
|
is_closure = 1;
|
|
} else if ((fptr = zend_hash_str_find_ptr(&ce->function_table, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME))) == NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Method %s::%s() does not exist", ce->name->val, ZEND_INVOKE_FUNC_NAME);
|
|
return;
|
|
}
|
|
}
|
|
break;
|
|
|
|
default:
|
|
_DO_THROW("The parameter class is expected to be either a string, an array(class, method) or a callable object");
|
|
/* returns out of this function */
|
|
}
|
|
|
|
/* Now, search for the parameter */
|
|
arg_info = fptr->common.arg_info;
|
|
if (Z_TYPE_P(parameter) == IS_LONG) {
|
|
position= Z_LVAL_P(parameter);
|
|
if (position < 0 || (zend_uint)position >= fptr->common.num_args) {
|
|
if (fptr->common.fn_flags & ZEND_ACC_CALL_VIA_HANDLER) {
|
|
if (fptr->type != ZEND_OVERLOADED_FUNCTION) {
|
|
STR_RELEASE(fptr->common.function_name);
|
|
}
|
|
efree(fptr);
|
|
}
|
|
if (is_closure) {
|
|
zval_ptr_dtor(reference);
|
|
}
|
|
_DO_THROW("The parameter specified by its offset could not be found");
|
|
/* returns out of this function */
|
|
}
|
|
} else {
|
|
zend_uint i;
|
|
|
|
position= -1;
|
|
convert_to_string_ex(parameter);
|
|
for (i = 0; i < fptr->common.num_args; i++) {
|
|
if (arg_info[i].name && strcmp(arg_info[i].name, Z_STRVAL_P(parameter)) == 0) {
|
|
position= i;
|
|
break;
|
|
}
|
|
}
|
|
if (position == -1) {
|
|
if (fptr->common.fn_flags & ZEND_ACC_CALL_VIA_HANDLER) {
|
|
if (fptr->type != ZEND_OVERLOADED_FUNCTION) {
|
|
STR_RELEASE(fptr->common.function_name);
|
|
}
|
|
efree(fptr);
|
|
}
|
|
if (is_closure) {
|
|
zval_ptr_dtor(reference);
|
|
}
|
|
_DO_THROW("The parameter specified by its name could not be found");
|
|
/* returns out of this function */
|
|
}
|
|
}
|
|
|
|
if (arg_info[position].name) {
|
|
ZVAL_STRINGL(&name, arg_info[position].name, arg_info[position].name_len);
|
|
} else {
|
|
ZVAL_NULL(&name);
|
|
}
|
|
reflection_update_property(object, "name", &name);
|
|
|
|
ref = (parameter_reference*) emalloc(sizeof(parameter_reference));
|
|
ref->arg_info = &arg_info[position];
|
|
ref->offset = (zend_uint)position;
|
|
ref->required = fptr->common.required_num_args;
|
|
ref->fptr = fptr;
|
|
/* TODO: copy fptr */
|
|
intern->ptr = ref;
|
|
intern->ref_type = REF_TYPE_PARAMETER;
|
|
intern->ce = ce;
|
|
if (reference && is_closure) {
|
|
ZVAL_COPY_VALUE(&intern->obj, reference);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionParameter::__toString()
|
|
Returns a string representation */
|
|
ZEND_METHOD(reflection_parameter, __toString)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
string str;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
string_init(&str);
|
|
_parameter_string(&str, param->fptr, param->arg_info, param->offset, param->required, "" TSRMLS_CC);
|
|
RETURN_STR(str.buf);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionParameter::getName()
|
|
Returns this parameters's name */
|
|
ZEND_METHOD(reflection_parameter, getName)
|
|
{
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
_default_get_entry(getThis(), "name", sizeof("name")-1, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionFunction ReflectionParameter::getDeclaringFunction()
|
|
Returns the ReflectionFunction for the function of this parameter */
|
|
ZEND_METHOD(reflection_parameter, getDeclaringFunction)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
if (!param->fptr->common.scope) {
|
|
reflection_function_factory(_copy_function(param->fptr TSRMLS_CC), ZVAL_IS_UNDEF(&intern->obj)? NULL : &intern->obj, return_value TSRMLS_CC);
|
|
} else {
|
|
reflection_method_factory(param->fptr->common.scope, _copy_function(param->fptr TSRMLS_CC), ZVAL_IS_UNDEF(&intern->obj)? NULL : &intern->obj, return_value TSRMLS_CC);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass|NULL ReflectionParameter::getDeclaringClass()
|
|
Returns in which class this parameter is defined (not the typehint of the parameter) */
|
|
ZEND_METHOD(reflection_parameter, getDeclaringClass)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
if (param->fptr->common.scope) {
|
|
zend_reflection_class_factory(param->fptr->common.scope, return_value TSRMLS_CC);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass|NULL ReflectionParameter::getClass()
|
|
Returns this parameters's class hint or NULL if there is none */
|
|
ZEND_METHOD(reflection_parameter, getClass)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
if (param->arg_info->class_name) {
|
|
/* Class name is stored as a string, we might also get "self" or "parent"
|
|
* - For "self", simply use the function scope. If scope is NULL then
|
|
* the function is global and thus self does not make any sense
|
|
*
|
|
* - For "parent", use the function scope's parent. If scope is NULL then
|
|
* the function is global and thus parent does not make any sense.
|
|
* If the parent is NULL then the class does not extend anything and
|
|
* thus parent does not make any sense, either.
|
|
*
|
|
* TODO: Think about moving these checks to the compiler or some sort of
|
|
* lint-mode.
|
|
*/
|
|
if (0 == zend_binary_strcasecmp(param->arg_info->class_name, param->arg_info->class_name_len, "self", sizeof("self")- 1)) {
|
|
ce = param->fptr->common.scope;
|
|
if (!ce) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Parameter uses 'self' as type hint but function is not a class member!");
|
|
return;
|
|
}
|
|
} else if (0 == zend_binary_strcasecmp(param->arg_info->class_name, param->arg_info->class_name_len, "parent", sizeof("parent")- 1)) {
|
|
ce = param->fptr->common.scope;
|
|
if (!ce) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Parameter uses 'parent' as type hint but function is not a class member!");
|
|
return;
|
|
}
|
|
if (!ce->parent) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Parameter uses 'parent' as type hint although class does not have a parent!");
|
|
return;
|
|
}
|
|
ce = ce->parent;
|
|
} else {
|
|
zend_string *name = STR_INIT(param->arg_info->class_name, param->arg_info->class_name_len, 0);
|
|
ce = zend_lookup_class(name TSRMLS_CC);
|
|
STR_FREE(name);
|
|
if (!ce) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Class %s does not exist", param->arg_info->class_name);
|
|
return;
|
|
}
|
|
}
|
|
zend_reflection_class_factory(ce, return_value TSRMLS_CC);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::isArray()
|
|
Returns whether parameter MUST be an array */
|
|
ZEND_METHOD(reflection_parameter, isArray)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
RETVAL_BOOL(param->arg_info->type_hint == IS_ARRAY);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::isCallable()
|
|
Returns whether parameter MUST be callable */
|
|
ZEND_METHOD(reflection_parameter, isCallable)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
RETVAL_BOOL(param->arg_info->type_hint == IS_CALLABLE);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::allowsNull()
|
|
Returns whether NULL is allowed as this parameters's value */
|
|
ZEND_METHOD(reflection_parameter, allowsNull)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
RETVAL_BOOL(param->arg_info->allow_null);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::isPassedByReference()
|
|
Returns whether this parameters is passed to by reference */
|
|
ZEND_METHOD(reflection_parameter, isPassedByReference)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
RETVAL_BOOL(param->arg_info->pass_by_reference);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::canBePassedByValue()
|
|
Returns whether this parameter can be passed by value */
|
|
ZEND_METHOD(reflection_parameter, canBePassedByValue)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
/* true if it's ZEND_SEND_BY_VAL or ZEND_SEND_PREFER_REF */
|
|
RETVAL_BOOL(param->arg_info->pass_by_reference != ZEND_SEND_BY_REF);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::getPosition()
|
|
Returns whether this parameter is an optional parameter */
|
|
ZEND_METHOD(reflection_parameter, getPosition)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
RETVAL_LONG(param->offset);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::isOptional()
|
|
Returns whether this parameter is an optional parameter */
|
|
ZEND_METHOD(reflection_parameter, isOptional)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
RETVAL_BOOL(param->offset >= param->required);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::isDefaultValueAvailable()
|
|
Returns whether the default value of this parameter is available */
|
|
ZEND_METHOD(reflection_parameter, isDefaultValueAvailable)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
zend_op *precv;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
if (param->fptr->type != ZEND_USER_FUNCTION)
|
|
{
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
precv = _get_recv_op((zend_op_array*)param->fptr, param->offset);
|
|
if (!precv || precv->opcode != ZEND_RECV_INIT || precv->op2_type == IS_UNUSED) {
|
|
RETURN_FALSE;
|
|
}
|
|
RETURN_TRUE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::getDefaultValue()
|
|
Returns the default value of this parameter or throws an exception */
|
|
ZEND_METHOD(reflection_parameter, getDefaultValue)
|
|
{
|
|
parameter_reference *param;
|
|
zend_op *precv;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
param = _reflection_param_get_default_param(INTERNAL_FUNCTION_PARAM_PASSTHRU);
|
|
if (!param) {
|
|
return;
|
|
}
|
|
|
|
precv = _reflection_param_get_default_precv(INTERNAL_FUNCTION_PARAM_PASSTHRU, param);
|
|
if (!precv) {
|
|
return;
|
|
}
|
|
|
|
ZVAL_COPY_VALUE(return_value, precv->op2.zv);
|
|
if (Z_CONSTANT_P(return_value)) {
|
|
zval_update_constant_ex(return_value, (void*)0, param->fptr->common.scope TSRMLS_CC);
|
|
} else {
|
|
zval_copy_ctor(return_value);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::isDefaultValueConstant()
|
|
Returns whether the default value of this parameter is constant */
|
|
ZEND_METHOD(reflection_parameter, isDefaultValueConstant)
|
|
{
|
|
zend_op *precv;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
param = _reflection_param_get_default_param(INTERNAL_FUNCTION_PARAM_PASSTHRU);
|
|
if (!param) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
precv = _reflection_param_get_default_precv(INTERNAL_FUNCTION_PARAM_PASSTHRU, param);
|
|
if (precv && Z_TYPE_P(precv->op2.zv) == IS_CONSTANT) {
|
|
RETURN_TRUE;
|
|
}
|
|
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionParameter::getDefaultValueConstantName()
|
|
Returns the default value's constant name if default value is constant or null */
|
|
ZEND_METHOD(reflection_parameter, getDefaultValueConstantName)
|
|
{
|
|
zend_op *precv;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
param = _reflection_param_get_default_param(INTERNAL_FUNCTION_PARAM_PASSTHRU);
|
|
if (!param) {
|
|
return;
|
|
}
|
|
|
|
precv = _reflection_param_get_default_precv(INTERNAL_FUNCTION_PARAM_PASSTHRU, param);
|
|
if (precv && Z_TYPE_P(precv->op2.zv) == IS_CONSTANT) {
|
|
RETURN_STR(STR_COPY(Z_STR_P(precv->op2.zv)));
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionParameter::isVariadic()
|
|
Returns whether this parameter is a variadic parameter */
|
|
ZEND_METHOD(reflection_parameter, isVariadic)
|
|
{
|
|
reflection_object *intern;
|
|
parameter_reference *param;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(param);
|
|
|
|
RETVAL_BOOL(param->arg_info->is_variadic);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionMethod::export(mixed class, string name [, bool return]) throws ReflectionException
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_method, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_method_ptr, 2);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionMethod::__construct(mixed class_or_method [, string name])
|
|
Constructor. Throws an Exception in case the given method does not exist */
|
|
ZEND_METHOD(reflection_method, __construct)
|
|
{
|
|
zval name, *classname;
|
|
zval *object, *orig_obj;
|
|
reflection_object *intern;
|
|
char *lcname;
|
|
zend_class_entry *ce;
|
|
zend_function *mptr;
|
|
char *name_str, *tmp;
|
|
int name_len, tmp_len;
|
|
zval ztmp;
|
|
|
|
if (zend_parse_parameters_ex(ZEND_PARSE_PARAMS_QUIET, ZEND_NUM_ARGS() TSRMLS_CC, "zs", &classname, &name_str, &name_len) == FAILURE) {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name_str, &name_len) == FAILURE) {
|
|
return;
|
|
}
|
|
if ((tmp = strstr(name_str, "::")) == NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Invalid method name %s", name_str);
|
|
return;
|
|
}
|
|
classname = &ztmp;
|
|
tmp_len = tmp - name_str;
|
|
ZVAL_STRINGL(classname, name_str, tmp_len);
|
|
name_len = name_len - (tmp_len + 2);
|
|
name_str = tmp + 2;
|
|
orig_obj = NULL;
|
|
} else if (Z_TYPE_P(classname) == IS_OBJECT) {
|
|
orig_obj = classname;
|
|
} else {
|
|
orig_obj = NULL;
|
|
}
|
|
|
|
object = getThis();
|
|
intern = Z_REFLECTION_P(object);
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
/* Find the class entry */
|
|
switch (Z_TYPE_P(classname)) {
|
|
case IS_STRING:
|
|
if ((ce = zend_lookup_class(Z_STR_P(classname) TSRMLS_CC)) == NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Class %s does not exist", Z_STRVAL_P(classname));
|
|
if (classname == &ztmp) {
|
|
zval_dtor(&ztmp);
|
|
}
|
|
return;
|
|
}
|
|
break;
|
|
|
|
case IS_OBJECT:
|
|
ce = Z_OBJCE_P(classname);
|
|
break;
|
|
|
|
default:
|
|
if (classname == &ztmp) {
|
|
zval_dtor(&ztmp);
|
|
}
|
|
_DO_THROW("The parameter class is expected to be either a string or an object");
|
|
/* returns out of this function */
|
|
}
|
|
|
|
if (classname == &ztmp) {
|
|
zval_dtor(&ztmp);
|
|
}
|
|
|
|
lcname = zend_str_tolower_dup(name_str, name_len);
|
|
|
|
if (ce == zend_ce_closure && orig_obj && (name_len == sizeof(ZEND_INVOKE_FUNC_NAME)-1)
|
|
&& memcmp(lcname, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME)-1) == 0
|
|
&& (mptr = zend_get_closure_invoke_method(Z_OBJ_P(orig_obj) TSRMLS_CC)) != NULL)
|
|
{
|
|
/* do nothing, mptr already set */
|
|
} else if ((mptr = zend_hash_str_find_ptr(&ce->function_table, lcname, name_len)) == NULL) {
|
|
efree(lcname);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Method %s::%s() does not exist", ce->name->val, name_str);
|
|
return;
|
|
}
|
|
efree(lcname);
|
|
|
|
ZVAL_STR(&name, STR_COPY(mptr->common.scope->name));
|
|
reflection_update_property(object, "class", &name);
|
|
ZVAL_STR(&name, STR_COPY(mptr->common.function_name));
|
|
reflection_update_property(object, "name", &name);
|
|
intern->ptr = mptr;
|
|
intern->ref_type = REF_TYPE_FUNCTION;
|
|
intern->ce = ce;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionMethod::__toString()
|
|
Returns a string representation */
|
|
ZEND_METHOD(reflection_method, __toString)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
string str;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
string_init(&str);
|
|
_function_string(&str, mptr, intern->ce, "" TSRMLS_CC);
|
|
RETURN_STR(str.buf);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionMethod::getClosure([mixed object])
|
|
Invokes the function */
|
|
ZEND_METHOD(reflection_method, getClosure)
|
|
{
|
|
reflection_object *intern;
|
|
zval *obj;
|
|
zend_function *mptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_method_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
|
|
if (mptr->common.fn_flags & ZEND_ACC_STATIC) {
|
|
zend_create_closure(return_value, mptr, mptr->common.scope, NULL TSRMLS_CC);
|
|
} else {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o", &obj) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (!instanceof_function(Z_OBJCE_P(obj), mptr->common.scope TSRMLS_CC)) {
|
|
_DO_THROW("Given object is not an instance of the class this method was declared in");
|
|
/* Returns from this function */
|
|
}
|
|
|
|
/* This is an original closure object and __invoke is to be called. */
|
|
if (Z_OBJCE_P(obj) == zend_ce_closure && mptr->type == ZEND_INTERNAL_FUNCTION &&
|
|
(mptr->internal_function.fn_flags & ZEND_ACC_CALL_VIA_HANDLER) != 0)
|
|
{
|
|
RETURN_ZVAL(obj, 1, 0);
|
|
} else {
|
|
zend_create_closure(return_value, mptr, mptr->common.scope, obj TSRMLS_CC);
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionMethod::invoke(mixed object, mixed* args)
|
|
Invokes the method. */
|
|
ZEND_METHOD(reflection_method, invoke)
|
|
{
|
|
zval retval;
|
|
zval *params = NULL;
|
|
zend_object *object;
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
int result, num_args = 0;
|
|
zend_fcall_info fci;
|
|
zend_fcall_info_cache fcc;
|
|
zend_class_entry *obj_ce;
|
|
|
|
METHOD_NOTSTATIC(reflection_method_ptr);
|
|
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
|
|
if ((!(mptr->common.fn_flags & ZEND_ACC_PUBLIC)
|
|
|| (mptr->common.fn_flags & ZEND_ACC_ABSTRACT))
|
|
&& intern->ignore_visibility == 0)
|
|
{
|
|
if (mptr->common.fn_flags & ZEND_ACC_ABSTRACT) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Trying to invoke abstract method %s::%s()",
|
|
mptr->common.scope->name->val, mptr->common.function_name->val);
|
|
} else {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Trying to invoke %s method %s::%s() from scope %s",
|
|
mptr->common.fn_flags & ZEND_ACC_PROTECTED ? "protected" : "private",
|
|
mptr->common.scope->name->val, mptr->common.function_name->val,
|
|
Z_OBJCE_P(getThis())->name->val);
|
|
}
|
|
return;
|
|
}
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "+", ¶ms, &num_args) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
/* In case this is a static method, we should'nt pass an object_ptr
|
|
* (which is used as calling context aka $this). We can thus ignore the
|
|
* first parameter.
|
|
*
|
|
* Else, we verify that the given object is an instance of the class.
|
|
*/
|
|
if (mptr->common.fn_flags & ZEND_ACC_STATIC) {
|
|
object = NULL;
|
|
obj_ce = mptr->common.scope;
|
|
} else {
|
|
if (Z_TYPE(params[0]) != IS_OBJECT) {
|
|
_DO_THROW("Non-object passed to Invoke()");
|
|
/* Returns from this function */
|
|
}
|
|
|
|
obj_ce = Z_OBJCE(params[0]);
|
|
|
|
if (!instanceof_function(obj_ce, mptr->common.scope TSRMLS_CC)) {
|
|
_DO_THROW("Given object is not an instance of the class this method was declared in");
|
|
/* Returns from this function */
|
|
}
|
|
|
|
object = Z_OBJ(params[0]);
|
|
}
|
|
|
|
fci.size = sizeof(fci);
|
|
fci.function_table = NULL;
|
|
ZVAL_UNDEF(&fci.function_name);
|
|
fci.symbol_table = NULL;
|
|
fci.object = object;
|
|
fci.retval = &retval;
|
|
fci.param_count = num_args - 1;
|
|
fci.params = params + 1;
|
|
fci.no_separation = 1;
|
|
|
|
fcc.initialized = 1;
|
|
fcc.function_handler = mptr;
|
|
fcc.calling_scope = obj_ce;
|
|
fcc.called_scope = intern->ce;
|
|
fcc.object = object;
|
|
|
|
result = zend_call_function(&fci, &fcc TSRMLS_CC);
|
|
|
|
if (result == FAILURE) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Invocation of method %s::%s() failed", mptr->common.scope->name->val, mptr->common.function_name->val);
|
|
return;
|
|
}
|
|
|
|
if (Z_TYPE(retval) != IS_UNDEF) {
|
|
ZVAL_COPY_VALUE(return_value, &retval);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionMethod::invokeArgs(mixed object, array args)
|
|
Invokes the function and pass its arguments as array. */
|
|
ZEND_METHOD(reflection_method, invokeArgs)
|
|
{
|
|
zval retval;
|
|
zval *params;
|
|
zval *object;
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
int i, argc;
|
|
int result;
|
|
zend_fcall_info fci;
|
|
zend_fcall_info_cache fcc;
|
|
zend_class_entry *obj_ce;
|
|
zval *param_array;
|
|
|
|
METHOD_NOTSTATIC(reflection_method_ptr);
|
|
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o!a", &object, ¶m_array) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if ((!(mptr->common.fn_flags & ZEND_ACC_PUBLIC)
|
|
|| (mptr->common.fn_flags & ZEND_ACC_ABSTRACT))
|
|
&& intern->ignore_visibility == 0)
|
|
{
|
|
if (mptr->common.fn_flags & ZEND_ACC_ABSTRACT) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Trying to invoke abstract method %s::%s()",
|
|
mptr->common.scope->name->val, mptr->common.function_name->val);
|
|
} else {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Trying to invoke %s method %s::%s() from scope %s",
|
|
mptr->common.fn_flags & ZEND_ACC_PROTECTED ? "protected" : "private",
|
|
mptr->common.scope->name->val, mptr->common.function_name->val,
|
|
Z_OBJCE_P(getThis())->name->val);
|
|
}
|
|
return;
|
|
}
|
|
|
|
argc = zend_hash_num_elements(Z_ARRVAL_P(param_array));
|
|
|
|
params = safe_emalloc(sizeof(zval), argc, 0);
|
|
zend_hash_apply_with_argument(Z_ARRVAL_P(param_array), (apply_func_arg_t)_zval_array_to_c_array, ¶ms TSRMLS_CC);
|
|
params -= argc;
|
|
|
|
/* In case this is a static method, we should'nt pass an object_ptr
|
|
* (which is used as calling context aka $this). We can thus ignore the
|
|
* first parameter.
|
|
*
|
|
* Else, we verify that the given object is an instance of the class.
|
|
*/
|
|
if (mptr->common.fn_flags & ZEND_ACC_STATIC) {
|
|
object = NULL;
|
|
obj_ce = mptr->common.scope;
|
|
} else {
|
|
if (!object) {
|
|
efree(params);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Trying to invoke non static method %s::%s() without an object",
|
|
mptr->common.scope->name->val, mptr->common.function_name->val);
|
|
return;
|
|
}
|
|
|
|
obj_ce = Z_OBJCE_P(object);
|
|
|
|
if (!instanceof_function(obj_ce, mptr->common.scope TSRMLS_CC)) {
|
|
efree(params);
|
|
_DO_THROW("Given object is not an instance of the class this method was declared in");
|
|
/* Returns from this function */
|
|
}
|
|
}
|
|
|
|
fci.size = sizeof(fci);
|
|
fci.function_table = NULL;
|
|
ZVAL_UNDEF(&fci.function_name);
|
|
fci.symbol_table = NULL;
|
|
fci.object = object ? Z_OBJ_P(object) : NULL;
|
|
fci.retval = &retval;
|
|
fci.param_count = argc;
|
|
fci.params = params;
|
|
fci.no_separation = 1;
|
|
|
|
fcc.initialized = 1;
|
|
fcc.function_handler = mptr;
|
|
fcc.calling_scope = obj_ce;
|
|
fcc.called_scope = intern->ce;
|
|
fcc.object = (object) ? Z_OBJ_P(object) : NULL;
|
|
|
|
/*
|
|
* Copy the zend_function when calling via handler (e.g. Closure::__invoke())
|
|
*/
|
|
if (mptr->type == ZEND_INTERNAL_FUNCTION &&
|
|
(mptr->internal_function.fn_flags & ZEND_ACC_CALL_VIA_HANDLER) != 0) {
|
|
fcc.function_handler = _copy_function(mptr TSRMLS_CC);
|
|
}
|
|
|
|
result = zend_call_function(&fci, &fcc TSRMLS_CC);
|
|
|
|
for (i = 0; i < argc; i++) {
|
|
zval_ptr_dtor(¶ms[i]);
|
|
}
|
|
efree(params);
|
|
|
|
if (result == FAILURE) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Invocation of method %s::%s() failed", mptr->common.scope->name->val, mptr->common.function_name->val);
|
|
return;
|
|
}
|
|
|
|
if (Z_TYPE(retval) != IS_UNDEF) {
|
|
ZVAL_COPY_VALUE(return_value, &retval);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isFinal()
|
|
Returns whether this method is final */
|
|
ZEND_METHOD(reflection_method, isFinal)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_FINAL);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isAbstract()
|
|
Returns whether this method is abstract */
|
|
ZEND_METHOD(reflection_method, isAbstract)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_ABSTRACT);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isPublic()
|
|
Returns whether this method is public */
|
|
ZEND_METHOD(reflection_method, isPublic)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_PUBLIC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isPrivate()
|
|
Returns whether this method is private */
|
|
ZEND_METHOD(reflection_method, isPrivate)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_PRIVATE);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isProtected()
|
|
Returns whether this method is protected */
|
|
ZEND_METHOD(reflection_method, isProtected)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_PROTECTED);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isStatic()
|
|
Returns whether this method is static */
|
|
ZEND_METHOD(reflection_method, isStatic)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_STATIC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::isDeprecated()
|
|
Returns whether this function is deprecated */
|
|
ZEND_METHOD(reflection_function, isDeprecated)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_DEPRECATED);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::isGenerator()
|
|
Returns whether this function is a generator */
|
|
ZEND_METHOD(reflection_function, isGenerator)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_GENERATOR);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::isVariadic()
|
|
Returns whether this function is variadic */
|
|
ZEND_METHOD(reflection_function, isVariadic)
|
|
{
|
|
_function_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_VARIADIC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionFunction::inNamespace()
|
|
Returns whether this function is defined in namespace */
|
|
ZEND_METHOD(reflection_function, inNamespace)
|
|
{
|
|
zval *name;
|
|
const char *backslash;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
if ((name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
if (Z_TYPE_P(name) == IS_STRING
|
|
&& (backslash = zend_memrchr(Z_STRVAL_P(name), '\\', Z_STRLEN_P(name)))
|
|
&& backslash > Z_STRVAL_P(name))
|
|
{
|
|
RETURN_TRUE;
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionFunction::getNamespaceName()
|
|
Returns the name of namespace where this function is defined */
|
|
ZEND_METHOD(reflection_function, getNamespaceName)
|
|
{
|
|
zval *name;
|
|
const char *backslash;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
if ((name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
if (Z_TYPE_P(name) == IS_STRING
|
|
&& (backslash = zend_memrchr(Z_STRVAL_P(name), '\\', Z_STRLEN_P(name)))
|
|
&& backslash > Z_STRVAL_P(name))
|
|
{
|
|
RETURN_STRINGL(Z_STRVAL_P(name), backslash - Z_STRVAL_P(name));
|
|
}
|
|
RETURN_EMPTY_STRING();
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionFunction::getShortName()
|
|
Returns the short name of the function (without namespace part) */
|
|
ZEND_METHOD(reflection_function, getShortName)
|
|
{
|
|
zval *name;
|
|
const char *backslash;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
if ((name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
if (Z_TYPE_P(name) == IS_STRING
|
|
&& (backslash = zend_memrchr(Z_STRVAL_P(name), '\\', Z_STRLEN_P(name)))
|
|
&& backslash > Z_STRVAL_P(name))
|
|
{
|
|
RETURN_STRINGL(backslash + 1, Z_STRLEN_P(name) - (backslash - Z_STRVAL_P(name) + 1));
|
|
}
|
|
RETURN_ZVAL(name, 1, 0);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isConstructor()
|
|
Returns whether this method is the constructor */
|
|
ZEND_METHOD(reflection_method, isConstructor)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
/* we need to check if the ctor is the ctor of the class level we we
|
|
* looking at since we might be looking at an inherited old style ctor
|
|
* defined in base class. */
|
|
RETURN_BOOL(mptr->common.fn_flags & ZEND_ACC_CTOR && intern->ce->constructor && intern->ce->constructor->common.scope == mptr->common.scope);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionMethod::isDestructor()
|
|
Returns whether this method is static */
|
|
ZEND_METHOD(reflection_method, isDestructor)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
RETURN_BOOL(mptr->common.fn_flags & ZEND_ACC_DTOR);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionMethod::getModifiers()
|
|
Returns a bitfield of the access modifiers for this method */
|
|
ZEND_METHOD(reflection_method, getModifiers)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
|
|
RETURN_LONG(mptr->common.fn_flags);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass ReflectionMethod::getDeclaringClass()
|
|
Get the declaring class */
|
|
ZEND_METHOD(reflection_method, getDeclaringClass)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_method_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
zend_reflection_class_factory(mptr->common.scope, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass ReflectionMethod::getPrototype()
|
|
Get the prototype */
|
|
ZEND_METHOD(reflection_method, getPrototype)
|
|
{
|
|
reflection_object *intern;
|
|
zend_function *mptr;
|
|
|
|
METHOD_NOTSTATIC(reflection_method_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(mptr);
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (!mptr->common.prototype) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Method %s::%s does not have a prototype", intern->ce->name->val, mptr->common.function_name->val);
|
|
return;
|
|
}
|
|
|
|
reflection_method_factory(mptr->common.prototype->common.scope, mptr->common.prototype, NULL, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionMethod::setAccessible(bool visible)
|
|
Sets whether non-public methods can be invoked */
|
|
ZEND_METHOD(reflection_method, setAccessible)
|
|
{
|
|
reflection_object *intern;
|
|
zend_bool visible;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "b", &visible) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
intern = Z_REFLECTION_P(getThis());
|
|
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
intern->ignore_visibility = visible;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionClass::export(mixed argument [, bool return]) throws ReflectionException
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_class, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_class_ptr, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ reflection_class_object_ctor */
|
|
static void reflection_class_object_ctor(INTERNAL_FUNCTION_PARAMETERS, int is_object)
|
|
{
|
|
zval *argument;
|
|
zval *object;
|
|
zval classname;
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (is_object) {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o", &argument) == FAILURE) {
|
|
return;
|
|
}
|
|
} else {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z/", &argument) == FAILURE) {
|
|
return;
|
|
}
|
|
}
|
|
|
|
object = getThis();
|
|
intern = Z_REFLECTION_P(object);
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
if (Z_TYPE_P(argument) == IS_OBJECT) {
|
|
ZVAL_STR(&classname, STR_COPY(Z_OBJCE_P(argument)->name));
|
|
reflection_update_property(object, "name", &classname);
|
|
intern->ptr = Z_OBJCE_P(argument);
|
|
if (is_object) {
|
|
ZVAL_COPY_VALUE(&intern->obj, argument);
|
|
zval_add_ref(argument);
|
|
}
|
|
} else {
|
|
convert_to_string_ex(argument);
|
|
if ((ce = zend_lookup_class(Z_STR_P(argument) TSRMLS_CC)) == NULL) {
|
|
if (!EG(exception)) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, -1 TSRMLS_CC, "Class %s does not exist", Z_STRVAL_P(argument));
|
|
}
|
|
return;
|
|
}
|
|
|
|
ZVAL_STR(&classname, STR_COPY(ce->name));
|
|
reflection_update_property(object, "name", &classname);
|
|
|
|
intern->ptr = ce;
|
|
}
|
|
intern->ref_type = REF_TYPE_OTHER;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionClass::__construct(mixed argument) throws ReflectionException
|
|
Constructor. Takes a string or an instance as an argument */
|
|
ZEND_METHOD(reflection_class, __construct)
|
|
{
|
|
reflection_class_object_ctor(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ add_class_vars */
|
|
static void add_class_vars(zend_class_entry *ce, int statics, zval *return_value TSRMLS_DC)
|
|
{
|
|
HashPosition pos;
|
|
zend_property_info *prop_info;
|
|
zval *prop, prop_copy;
|
|
zend_string *key;
|
|
ulong num_index;
|
|
|
|
zend_hash_internal_pointer_reset_ex(&ce->properties_info, &pos);
|
|
while ((prop_info = zend_hash_get_current_data_ptr_ex(&ce->properties_info, &pos)) != NULL) {
|
|
zend_hash_get_current_key_ex(&ce->properties_info, &key, &num_index, 0, &pos);
|
|
zend_hash_move_forward_ex(&ce->properties_info, &pos);
|
|
if (((prop_info->flags & ZEND_ACC_SHADOW) &&
|
|
prop_info->ce != ce) ||
|
|
((prop_info->flags & ZEND_ACC_PROTECTED) &&
|
|
!zend_check_protected(prop_info->ce, ce)) ||
|
|
((prop_info->flags & ZEND_ACC_PRIVATE) &&
|
|
prop_info->ce != ce)) {
|
|
continue;
|
|
}
|
|
prop = NULL;
|
|
if (prop_info->offset >= 0) {
|
|
if (statics && (prop_info->flags & ZEND_ACC_STATIC) != 0) {
|
|
prop = &ce->default_static_members_table[prop_info->offset];
|
|
} else if (!statics && (prop_info->flags & ZEND_ACC_STATIC) == 0) {
|
|
prop = &ce->default_properties_table[prop_info->offset];
|
|
}
|
|
}
|
|
if (!prop) {
|
|
continue;
|
|
}
|
|
|
|
/* copy: enforce read only access */
|
|
ZVAL_DUP(&prop_copy, prop);
|
|
|
|
/* this is necessary to make it able to work with default array
|
|
* properties, returned to user */
|
|
if (Z_CONSTANT(prop_copy)) {
|
|
zval_update_constant(&prop_copy, (void *) 1 TSRMLS_CC);
|
|
}
|
|
|
|
zend_hash_update(Z_ARRVAL_P(return_value), key, &prop_copy);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionClass::getStaticProperties()
|
|
Returns an associative array containing all static property values of the class */
|
|
ZEND_METHOD(reflection_class, getStaticProperties)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
zend_update_class_constants(ce TSRMLS_CC);
|
|
|
|
array_init(return_value);
|
|
add_class_vars(ce, 1, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionClass::getStaticPropertyValue(string name [, mixed default])
|
|
Returns the value of a static property */
|
|
ZEND_METHOD(reflection_class, getStaticPropertyValue)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_string *name;
|
|
zval *prop, *def_value = NULL;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "S|z", &name, &def_value) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
zend_update_class_constants(ce TSRMLS_CC);
|
|
prop = zend_std_get_static_property(ce, name, 1, -1 TSRMLS_CC);
|
|
if (!prop) {
|
|
if (def_value) {
|
|
RETURN_ZVAL(def_value, 1, 0);
|
|
} else {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Class %s does not have a property named %s", ce->name->val, name->val);
|
|
}
|
|
return;
|
|
} else {
|
|
RETURN_ZVAL(prop, 1, 0);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionClass::setStaticPropertyValue($name, $value)
|
|
Sets the value of a static property */
|
|
ZEND_METHOD(reflection_class, setStaticPropertyValue)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_string *name;
|
|
zval *variable_ptr, *value;
|
|
//??? int refcount;
|
|
//??? zend_uchar is_ref;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "Sz", &name, &value) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
zend_update_class_constants(ce TSRMLS_CC);
|
|
variable_ptr = zend_std_get_static_property(ce, name, 1, -1 TSRMLS_CC);
|
|
if (!variable_ptr) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Class %s does not have a property named %s", ce->name->val, name->val);
|
|
return;
|
|
}
|
|
//??? refcount = Z_REFCOUNT_PP(variable_ptr);
|
|
//??? is_ref = Z_ISREF_PP(variable_ptr);
|
|
zval_dtor(variable_ptr);
|
|
ZVAL_DUP(variable_ptr, value);
|
|
//??? Z_SET_REFCOUNT_PP(variable_ptr, refcount);
|
|
//??? Z_SET_ISREF_TO_PP(variable_ptr, is_ref);
|
|
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionClass::getDefaultProperties()
|
|
Returns an associative array containing copies of all default property values of the class */
|
|
ZEND_METHOD(reflection_class, getDefaultProperties)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
array_init(return_value);
|
|
zend_update_class_constants(ce TSRMLS_CC);
|
|
add_class_vars(ce, 1, return_value TSRMLS_CC);
|
|
add_class_vars(ce, 0, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionClass::__toString()
|
|
Returns a string representation */
|
|
ZEND_METHOD(reflection_class, __toString)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
string str;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
string_init(&str);
|
|
_class_string(&str, ce, &intern->obj, "" TSRMLS_CC);
|
|
RETURN_STR(str.buf);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionClass::getName()
|
|
Returns the class' name */
|
|
ZEND_METHOD(reflection_class, getName)
|
|
{
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
_default_get_entry(getThis(), "name", sizeof("name")-1, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isInternal()
|
|
Returns whether this class is an internal class */
|
|
ZEND_METHOD(reflection_class, isInternal)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
RETURN_BOOL(ce->type == ZEND_INTERNAL_CLASS);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isUserDefined()
|
|
Returns whether this class is user-defined */
|
|
ZEND_METHOD(reflection_class, isUserDefined)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
RETURN_BOOL(ce->type == ZEND_USER_CLASS);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionClass::getFileName()
|
|
Returns the filename of the file this class was declared in */
|
|
ZEND_METHOD(reflection_class, getFileName)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if (ce->type == ZEND_USER_CLASS) {
|
|
// TODO: we have to duplicate it, becaise it may be stored in opcache SHM ???
|
|
RETURN_STR(STR_DUP(ce->info.user.filename, 0));
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionClass::getStartLine()
|
|
Returns the line this class' declaration starts at */
|
|
ZEND_METHOD(reflection_class, getStartLine)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if (ce->type == ZEND_USER_FUNCTION) {
|
|
RETURN_LONG(ce->info.user.line_start);
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionClass::getEndLine()
|
|
Returns the line this class' declaration ends at */
|
|
ZEND_METHOD(reflection_class, getEndLine)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if (ce->type == ZEND_USER_CLASS) {
|
|
RETURN_LONG(ce->info.user.line_end);
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionClass::getDocComment()
|
|
Returns the doc comment for this class */
|
|
ZEND_METHOD(reflection_class, getDocComment)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if (ce->type == ZEND_USER_CLASS && ce->info.user.doc_comment) {
|
|
RETURN_STR(STR_COPY(ce->info.user.doc_comment));
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionMethod ReflectionClass::getConstructor()
|
|
Returns the class' constructor if there is one, NULL otherwise */
|
|
ZEND_METHOD(reflection_class, getConstructor)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if (ce->constructor) {
|
|
reflection_method_factory(ce, ce->constructor, NULL, return_value TSRMLS_CC);
|
|
} else {
|
|
RETURN_NULL();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::hasMethod(string name)
|
|
Returns whether a method exists or not */
|
|
ZEND_METHOD(reflection_class, hasMethod)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
char *name, *lc_name;
|
|
int name_len;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name, &name_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
lc_name = zend_str_tolower_dup(name, name_len);
|
|
if ((ce == zend_ce_closure && (name_len == sizeof(ZEND_INVOKE_FUNC_NAME)-1)
|
|
&& memcmp(lc_name, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME)-1) == 0)
|
|
|| zend_hash_str_exists(&ce->function_table, lc_name, name_len)) {
|
|
efree(lc_name);
|
|
RETURN_TRUE;
|
|
} else {
|
|
efree(lc_name);
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionMethod ReflectionClass::getMethod(string name) throws ReflectionException
|
|
Returns the class' method specified by its name */
|
|
ZEND_METHOD(reflection_class, getMethod)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_function *mptr;
|
|
zval obj_tmp;
|
|
char *name, *lc_name;
|
|
int name_len;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name, &name_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
lc_name = zend_str_tolower_dup(name, name_len);
|
|
if (ce == zend_ce_closure && !ZVAL_IS_UNDEF(&intern->obj) && (name_len == sizeof(ZEND_INVOKE_FUNC_NAME)-1)
|
|
&& memcmp(lc_name, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME)-1) == 0
|
|
&& (mptr = zend_get_closure_invoke_method(Z_OBJ(intern->obj) TSRMLS_CC)) != NULL)
|
|
{
|
|
/* don't assign closure_object since we only reflect the invoke handler
|
|
method and not the closure definition itself */
|
|
reflection_method_factory(ce, mptr, NULL, return_value TSRMLS_CC);
|
|
efree(lc_name);
|
|
} else if (ce == zend_ce_closure && ZVAL_IS_UNDEF(&intern->obj) && (name_len == sizeof(ZEND_INVOKE_FUNC_NAME)-1)
|
|
&& memcmp(lc_name, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME)-1) == 0
|
|
&& object_init_ex(&obj_tmp, ce) == SUCCESS && (mptr = zend_get_closure_invoke_method(Z_OBJ(obj_tmp) TSRMLS_CC)) != NULL) {
|
|
/* don't assign closure_object since we only reflect the invoke handler
|
|
method and not the closure definition itself */
|
|
reflection_method_factory(ce, mptr, NULL, return_value TSRMLS_CC);
|
|
zval_dtor(&obj_tmp);
|
|
efree(lc_name);
|
|
} else if ((mptr = zend_hash_str_find_ptr(&ce->function_table, lc_name, name_len)) != NULL) {
|
|
reflection_method_factory(ce, mptr, NULL, return_value TSRMLS_CC);
|
|
efree(lc_name);
|
|
} else {
|
|
efree(lc_name);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Method %s does not exist", name);
|
|
return;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _addmethod */
|
|
static void _addmethod(zend_function *mptr, zend_class_entry *ce, zval *retval, long filter, zval *obj TSRMLS_DC)
|
|
{
|
|
zval method;
|
|
uint len = mptr->common.function_name->len;
|
|
zend_function *closure;
|
|
if (mptr->common.fn_flags & filter) {
|
|
if (ce == zend_ce_closure && obj && (len == sizeof(ZEND_INVOKE_FUNC_NAME)-1)
|
|
&& memcmp(mptr->common.function_name->val, ZEND_INVOKE_FUNC_NAME, sizeof(ZEND_INVOKE_FUNC_NAME)-1) == 0
|
|
&& (closure = zend_get_closure_invoke_method(Z_OBJ_P(obj) TSRMLS_CC)) != NULL)
|
|
{
|
|
mptr = closure;
|
|
}
|
|
/* don't assign closure_object since we only reflect the invoke handler
|
|
method and not the closure definition itself, even if we have a
|
|
closure */
|
|
reflection_method_factory(ce, mptr, NULL, &method TSRMLS_CC);
|
|
add_next_index_zval(retval, &method);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _addmethod */
|
|
static int _addmethod_va(zval *el TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key)
|
|
{
|
|
zend_function *mptr = (zend_function*)Z_PTR_P(el);
|
|
zend_class_entry *ce = *va_arg(args, zend_class_entry**);
|
|
zval *retval = va_arg(args, zval*);
|
|
long filter = va_arg(args, long);
|
|
zval *obj = va_arg(args, zval *);
|
|
|
|
_addmethod(mptr, ce, retval, filter, obj TSRMLS_CC);
|
|
return ZEND_HASH_APPLY_KEEP;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionMethod[] ReflectionClass::getMethods([long $filter])
|
|
Returns an array of this class' methods */
|
|
ZEND_METHOD(reflection_class, getMethods)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
long filter = 0;
|
|
int argc = ZEND_NUM_ARGS();
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (argc) {
|
|
if (zend_parse_parameters(argc TSRMLS_CC, "|l", &filter) == FAILURE) {
|
|
return;
|
|
}
|
|
} else {
|
|
/* No parameters given, default to "return all" */
|
|
filter = ZEND_ACC_PPP_MASK | ZEND_ACC_ABSTRACT | ZEND_ACC_FINAL | ZEND_ACC_STATIC;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
array_init(return_value);
|
|
zend_hash_apply_with_arguments(&ce->function_table TSRMLS_CC, (apply_func_args_t) _addmethod_va, 4, &ce, return_value, filter, intern->obj);
|
|
if (Z_TYPE(intern->obj) != IS_UNDEF && instanceof_function(ce, zend_ce_closure TSRMLS_CC)) {
|
|
zend_function *closure = zend_get_closure_invoke_method(Z_OBJ(intern->obj) TSRMLS_CC);
|
|
if (closure) {
|
|
_addmethod(closure, ce, return_value, filter, &intern->obj TSRMLS_CC);
|
|
_free_function(closure TSRMLS_CC);
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::hasProperty(string name)
|
|
Returns whether a property exists or not */
|
|
ZEND_METHOD(reflection_class, hasProperty)
|
|
{
|
|
reflection_object *intern;
|
|
zend_property_info *property_info;
|
|
zend_class_entry *ce;
|
|
zend_string *name;
|
|
zval property;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "S", &name) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if ((property_info = zend_hash_find_ptr(&ce->properties_info, name)) != NULL) {
|
|
if (property_info->flags & ZEND_ACC_SHADOW) {
|
|
RETURN_FALSE;
|
|
}
|
|
RETURN_TRUE;
|
|
} else {
|
|
if (Z_TYPE(intern->obj) != IS_UNDEF && Z_OBJ_HANDLER(intern->obj, has_property)) {
|
|
ZVAL_STR(&property, STR_COPY(name));
|
|
if (Z_OBJ_HANDLER(intern->obj, has_property)(&intern->obj, &property, 2, -1 TSRMLS_CC)) {
|
|
zval_ptr_dtor(&property);
|
|
RETURN_TRUE;
|
|
}
|
|
zval_ptr_dtor(&property);
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionProperty ReflectionClass::getProperty(string name) throws ReflectionException
|
|
Returns the class' property specified by its name */
|
|
ZEND_METHOD(reflection_class, getProperty)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce, *ce2;
|
|
zend_property_info *property_info;
|
|
zend_string *name, *classname;
|
|
char *tmp, *str_name;
|
|
int classname_len, str_name_len;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "S", &name) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if ((property_info = zend_hash_find_ptr(&ce->properties_info, name)) != NULL) {
|
|
if ((property_info->flags & ZEND_ACC_SHADOW) == 0) {
|
|
reflection_property_factory(ce, property_info, return_value TSRMLS_CC);
|
|
return;
|
|
}
|
|
} else if (Z_TYPE(intern->obj) != IS_UNDEF) {
|
|
/* Check for dynamic properties */
|
|
if (zend_hash_exists(Z_OBJ_HT(intern->obj)->get_properties(&intern->obj TSRMLS_CC), name)) {
|
|
zend_property_info property_info_tmp;
|
|
property_info_tmp.flags = ZEND_ACC_IMPLICIT_PUBLIC;
|
|
property_info_tmp.name = STR_COPY(name);
|
|
property_info_tmp.doc_comment = NULL;
|
|
property_info_tmp.ce = ce;
|
|
|
|
reflection_property_factory(ce, &property_info_tmp, return_value TSRMLS_CC);
|
|
intern = Z_REFLECTION_P(return_value);
|
|
intern->ref_type = REF_TYPE_DYNAMIC_PROPERTY;
|
|
return;
|
|
}
|
|
}
|
|
str_name = name->val;
|
|
str_name_len = name->len;
|
|
if ((tmp = strstr(name->val, "::")) != NULL) {
|
|
classname_len = tmp - name->val;
|
|
classname = STR_ALLOC(classname_len, 0);
|
|
zend_str_tolower_copy(classname->val, name->val, classname_len);
|
|
classname->val[classname_len] = '\0';
|
|
str_name_len = name->len - (classname_len + 2);
|
|
str_name = tmp + 2;
|
|
|
|
ce2 = zend_lookup_class(classname TSRMLS_CC);
|
|
if (!ce2) {
|
|
if (!EG(exception)) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, -1 TSRMLS_CC, "Class %s does not exist", classname->val);
|
|
}
|
|
STR_FREE(classname);
|
|
return;
|
|
}
|
|
STR_FREE(classname);
|
|
|
|
if (!instanceof_function(ce, ce2 TSRMLS_CC)) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, -1 TSRMLS_CC, "Fully qualified property name %s::%s does not specify a base class of %s", ce2->name->val, str_name, ce->name->val);
|
|
return;
|
|
}
|
|
ce = ce2;
|
|
|
|
if ((property_info = zend_hash_str_find_ptr(&ce->properties_info, str_name, str_name_len)) != NULL && (property_info->flags & ZEND_ACC_SHADOW) == 0) {
|
|
reflection_property_factory(ce, property_info, return_value TSRMLS_CC);
|
|
return;
|
|
}
|
|
}
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Property %s does not exist", str_name);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _addproperty */
|
|
static int _addproperty(zval *el TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key)
|
|
{
|
|
zval property;
|
|
zend_property_info *pptr = (zend_property_info*)Z_PTR_P(el);
|
|
zend_class_entry *ce = *va_arg(args, zend_class_entry**);
|
|
zval *retval = va_arg(args, zval*);
|
|
long filter = va_arg(args, long);
|
|
|
|
if (pptr->flags & ZEND_ACC_SHADOW) {
|
|
return 0;
|
|
}
|
|
|
|
if (pptr->flags & filter) {
|
|
reflection_property_factory(ce, pptr, &property TSRMLS_CC);
|
|
add_next_index_zval(retval, &property);
|
|
}
|
|
return 0;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _adddynproperty */
|
|
static int _adddynproperty(zval *ptr TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key)
|
|
{
|
|
zval property;
|
|
zend_class_entry *ce = *va_arg(args, zend_class_entry**);
|
|
zval *retval = va_arg(args, zval*), member;
|
|
|
|
/* under some circumstances, the properties hash table may contain numeric
|
|
* properties (e.g. when casting from array). This is a WONT FIX bug, at
|
|
* least for the moment. Ignore these */
|
|
if (hash_key->key == NULL) {
|
|
return 0;
|
|
}
|
|
|
|
if (hash_key->key->val[0] == '\0') {
|
|
return 0; /* non public cannot be dynamic */
|
|
}
|
|
|
|
ZVAL_STR(&member, hash_key->key);
|
|
if (zend_get_property_info(ce, &member, 1 TSRMLS_CC) == &EG(std_property_info)) {
|
|
EG(std_property_info).flags = ZEND_ACC_IMPLICIT_PUBLIC;
|
|
reflection_property_factory(ce, &EG(std_property_info), &property TSRMLS_CC);
|
|
add_next_index_zval(retval, &property);
|
|
}
|
|
return 0;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionProperty[] ReflectionClass::getProperties([long $filter])
|
|
Returns an array of this class' properties */
|
|
ZEND_METHOD(reflection_class, getProperties)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
long filter = 0;
|
|
int argc = ZEND_NUM_ARGS();
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (argc) {
|
|
if (zend_parse_parameters(argc TSRMLS_CC, "|l", &filter) == FAILURE) {
|
|
return;
|
|
}
|
|
} else {
|
|
/* No parameters given, default to "return all" */
|
|
filter = ZEND_ACC_PPP_MASK | ZEND_ACC_STATIC;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
array_init(return_value);
|
|
zend_hash_apply_with_arguments(&ce->properties_info TSRMLS_CC, (apply_func_args_t) _addproperty, 3, &ce, return_value, filter);
|
|
|
|
if (Z_TYPE(intern->obj) != IS_UNDEF && (filter & ZEND_ACC_PUBLIC) != 0 && Z_OBJ_HT(intern->obj)->get_properties) {
|
|
HashTable *properties = Z_OBJ_HT(intern->obj)->get_properties(&intern->obj TSRMLS_CC);
|
|
zend_hash_apply_with_arguments(properties TSRMLS_CC, (apply_func_args_t) _adddynproperty, 2, &ce, return_value);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::hasConstant(string name)
|
|
Returns whether a constant exists or not */
|
|
ZEND_METHOD(reflection_class, hasConstant)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_string *name;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "S", &name) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if (zend_hash_exists(&ce->constants_table, name)) {
|
|
RETURN_TRUE;
|
|
} else {
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionClass::getConstants()
|
|
Returns an associative array containing this class' constants and their values */
|
|
ZEND_METHOD(reflection_class, getConstants)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
array_init(return_value);
|
|
zend_hash_apply_with_argument(&ce->constants_table, (apply_func_arg_t)zval_update_constant_inline_change, ce TSRMLS_CC);
|
|
zend_hash_copy(Z_ARRVAL_P(return_value), &ce->constants_table, zval_add_ref_unref);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionClass::getConstant(string name)
|
|
Returns the class' constant specified by its name */
|
|
ZEND_METHOD(reflection_class, getConstant)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zval *value;
|
|
zend_string *name;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "S", &name) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
zend_hash_apply_with_argument(&ce->constants_table, (apply_func_arg_t)zval_update_constant_inline_change, ce TSRMLS_CC);
|
|
if ((value = zend_hash_find(&ce->constants_table, name)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
ZVAL_DUP(return_value, value);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _class_check_flag */
|
|
static void _class_check_flag(INTERNAL_FUNCTION_PARAMETERS, int mask)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
RETVAL_BOOL(ce->ce_flags & mask);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isInstantiable()
|
|
Returns whether this class is instantiable */
|
|
ZEND_METHOD(reflection_class, isInstantiable)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if (ce->ce_flags & (ZEND_ACC_INTERFACE | ZEND_ACC_EXPLICIT_ABSTRACT_CLASS | ZEND_ACC_IMPLICIT_ABSTRACT_CLASS)) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
/* Basically, the class is instantiable. Though, if there is a constructor
|
|
* and it is not publicly accessible, it isn't! */
|
|
if (!ce->constructor) {
|
|
RETURN_TRUE;
|
|
}
|
|
|
|
RETURN_BOOL(ce->constructor->common.fn_flags & ZEND_ACC_PUBLIC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isCloneable()
|
|
Returns whether this class is cloneable */
|
|
ZEND_METHOD(reflection_class, isCloneable)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zval obj;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
if (ce->ce_flags & (ZEND_ACC_INTERFACE | ZEND_ACC_TRAIT | ZEND_ACC_EXPLICIT_ABSTRACT_CLASS | ZEND_ACC_IMPLICIT_ABSTRACT_CLASS)) {
|
|
RETURN_FALSE;
|
|
}
|
|
if (!ZVAL_IS_UNDEF(&intern->obj)) {
|
|
if (ce->clone) {
|
|
RETURN_BOOL(ce->clone->common.fn_flags & ZEND_ACC_PUBLIC);
|
|
} else {
|
|
RETURN_BOOL(Z_OBJ_HANDLER(intern->obj, clone_obj) != NULL);
|
|
}
|
|
} else {
|
|
if (ce->clone) {
|
|
RETURN_BOOL(ce->clone->common.fn_flags & ZEND_ACC_PUBLIC);
|
|
} else {
|
|
object_init_ex(&obj, ce);
|
|
RETVAL_BOOL(Z_OBJ_HANDLER(obj, clone_obj) != NULL);
|
|
zval_dtor(&obj);
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isInterface()
|
|
Returns whether this is an interface or a class */
|
|
ZEND_METHOD(reflection_class, isInterface)
|
|
{
|
|
_class_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_INTERFACE);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isTrait()
|
|
Returns whether this is a trait */
|
|
ZEND_METHOD(reflection_class, isTrait)
|
|
{
|
|
_class_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_TRAIT & ~ZEND_ACC_EXPLICIT_ABSTRACT_CLASS);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isFinal()
|
|
Returns whether this class is final */
|
|
ZEND_METHOD(reflection_class, isFinal)
|
|
{
|
|
_class_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_FINAL_CLASS);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isAbstract()
|
|
Returns whether this class is abstract */
|
|
ZEND_METHOD(reflection_class, isAbstract)
|
|
{
|
|
_class_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_IMPLICIT_ABSTRACT_CLASS|ZEND_ACC_EXPLICIT_ABSTRACT_CLASS);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionClass::getModifiers()
|
|
Returns a bitfield of the access modifiers for this class */
|
|
ZEND_METHOD(reflection_class, getModifiers)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
RETURN_LONG(ce->ce_flags);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isInstance(stdclass object)
|
|
Returns whether the given object is an instance of this class */
|
|
ZEND_METHOD(reflection_class, isInstance)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zval *object;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o", &object) == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
RETURN_BOOL(HAS_CLASS_ENTRY(*object) && instanceof_function(Z_OBJCE_P(object), ce TSRMLS_CC));
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public stdclass ReflectionClass::newInstance(mixed* args, ...)
|
|
Returns an instance of this class */
|
|
ZEND_METHOD(reflection_class, newInstance)
|
|
{
|
|
zval retval;
|
|
reflection_object *intern;
|
|
zend_class_entry *ce, *old_scope;
|
|
zend_function *constructor;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
object_init_ex(return_value, ce);
|
|
|
|
old_scope = EG(scope);
|
|
EG(scope) = ce;
|
|
constructor = Z_OBJ_HT_P(return_value)->get_constructor(Z_OBJ_P(return_value) TSRMLS_CC);
|
|
EG(scope) = old_scope;
|
|
|
|
/* Run the constructor if there is one */
|
|
if (constructor) {
|
|
zval *params = NULL;
|
|
int ret, i, num_args = 0;
|
|
zend_fcall_info fci;
|
|
zend_fcall_info_cache fcc;
|
|
|
|
if (!(constructor->common.fn_flags & ZEND_ACC_PUBLIC)) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Access to non-public constructor of class %s", ce->name->val);
|
|
zval_dtor(return_value);
|
|
RETURN_NULL();
|
|
}
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "*", ¶ms, &num_args) == FAILURE) {
|
|
zval_dtor(return_value);
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
for (i = 0; i < num_args; i++) {
|
|
if (Z_REFCOUNTED(params[i])) Z_ADDREF(params[i]);
|
|
}
|
|
|
|
fci.size = sizeof(fci);
|
|
fci.function_table = EG(function_table);
|
|
ZVAL_UNDEF(&fci.function_name);
|
|
fci.symbol_table = NULL;
|
|
fci.object = Z_OBJ_P(return_value);
|
|
fci.retval = &retval;
|
|
fci.param_count = num_args;
|
|
fci.params = params;
|
|
fci.no_separation = 1;
|
|
|
|
fcc.initialized = 1;
|
|
fcc.function_handler = constructor;
|
|
fcc.calling_scope = EG(scope);
|
|
fcc.called_scope = Z_OBJCE_P(return_value);
|
|
fcc.object = Z_OBJ_P(return_value);
|
|
|
|
ret = zend_call_function(&fci, &fcc TSRMLS_CC);
|
|
zval_ptr_dtor(&retval);
|
|
for (i = 0; i < num_args; i++) {
|
|
zval_ptr_dtor(¶ms[i]);
|
|
}
|
|
if (ret == FAILURE) {
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invocation of %s's constructor failed", ce->name->val);
|
|
zval_dtor(return_value);
|
|
RETURN_NULL();
|
|
}
|
|
} else if (ZEND_NUM_ARGS()) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Class %s does not have a constructor, so you cannot pass any constructor arguments", ce->name->val);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public stdclass ReflectionClass::newInstanceWithoutConstructor()
|
|
Returns an instance of this class without invoking its constructor */
|
|
ZEND_METHOD(reflection_class, newInstanceWithoutConstructor)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if (ce->create_object != NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Class %s is an internal class that cannot be instantiated without invoking its constructor", ce->name->val);
|
|
}
|
|
|
|
object_init_ex(return_value, ce);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public stdclass ReflectionClass::newInstanceArgs([array args])
|
|
Returns an instance of this class */
|
|
ZEND_METHOD(reflection_class, newInstanceArgs)
|
|
{
|
|
zval retval;
|
|
reflection_object *intern;
|
|
zend_class_entry *ce, *old_scope;
|
|
int ret, i, argc = 0;
|
|
HashTable *args;
|
|
zend_function *constructor;
|
|
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|h", &args) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (ZEND_NUM_ARGS() > 0) {
|
|
argc = args->nNumOfElements;
|
|
}
|
|
|
|
object_init_ex(return_value, ce);
|
|
|
|
old_scope = EG(scope);
|
|
EG(scope) = ce;
|
|
constructor = Z_OBJ_HT_P(return_value)->get_constructor(Z_OBJ_P(return_value) TSRMLS_CC);
|
|
EG(scope) = old_scope;
|
|
|
|
/* Run the constructor if there is one */
|
|
if (constructor) {
|
|
zval *params = NULL;
|
|
zend_fcall_info fci;
|
|
zend_fcall_info_cache fcc;
|
|
|
|
if (!(constructor->common.fn_flags & ZEND_ACC_PUBLIC)) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Access to non-public constructor of class %s", ce->name->val);
|
|
zval_dtor(return_value);
|
|
RETURN_NULL();
|
|
}
|
|
|
|
if (argc) {
|
|
params = safe_emalloc(sizeof(zval), argc, 0);
|
|
zend_hash_apply_with_argument(args, (apply_func_arg_t)_zval_array_to_c_array, ¶ms TSRMLS_CC);
|
|
params -= argc;
|
|
}
|
|
|
|
fci.size = sizeof(fci);
|
|
fci.function_table = EG(function_table);
|
|
ZVAL_UNDEF(&fci.function_name);
|
|
fci.symbol_table = NULL;
|
|
fci.object = Z_OBJ_P(return_value);
|
|
fci.retval = &retval;
|
|
fci.param_count = argc;
|
|
fci.params = params;
|
|
fci.no_separation = 1;
|
|
|
|
fcc.initialized = 1;
|
|
fcc.function_handler = constructor;
|
|
fcc.calling_scope = EG(scope);
|
|
fcc.called_scope = Z_OBJCE_P(return_value);
|
|
fcc.object = Z_OBJ_P(return_value);
|
|
|
|
ret = zend_call_function(&fci, &fcc TSRMLS_CC);
|
|
zval_ptr_dtor(&retval);
|
|
if (params) {
|
|
for (i = 0; i < argc; i++) {
|
|
zval_ptr_dtor(¶ms[i]);
|
|
}
|
|
efree(params);
|
|
}
|
|
if (ret == FAILURE) {
|
|
zval_ptr_dtor(&retval);
|
|
php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invocation of %s's constructor failed", ce->name->val);
|
|
zval_dtor(return_value);
|
|
RETURN_NULL();
|
|
}
|
|
} else if (argc) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Class %s does not have a constructor, so you cannot pass any constructor arguments", ce->name->val);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass[] ReflectionClass::getInterfaces()
|
|
Returns an array of interfaces this class implements */
|
|
ZEND_METHOD(reflection_class, getInterfaces)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
/* Return an empty array if this class implements no interfaces */
|
|
array_init(return_value);
|
|
|
|
if (ce->num_interfaces) {
|
|
zend_uint i;
|
|
|
|
for (i=0; i < ce->num_interfaces; i++) {
|
|
zval interface;
|
|
zend_reflection_class_factory(ce->interfaces[i], &interface TSRMLS_CC);
|
|
zend_hash_update(Z_ARRVAL_P(return_value), ce->interfaces[i]->name, &interface);
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public String[] ReflectionClass::getInterfaceNames()
|
|
Returns an array of names of interfaces this class implements */
|
|
ZEND_METHOD(reflection_class, getInterfaceNames)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_uint i;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
/* Return an empty array if this class implements no interfaces */
|
|
array_init(return_value);
|
|
|
|
for (i=0; i < ce->num_interfaces; i++) {
|
|
add_next_index_str(return_value, STR_COPY(ce->interfaces[i]->name));
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass[] ReflectionClass::getTraits()
|
|
Returns an array of traits used by this class */
|
|
ZEND_METHOD(reflection_class, getTraits)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_uint i;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
array_init(return_value);
|
|
|
|
for (i=0; i < ce->num_traits; i++) {
|
|
zval trait;
|
|
zend_reflection_class_factory(ce->traits[i], &trait TSRMLS_CC);
|
|
zend_hash_update(Z_ARRVAL_P(return_value), ce->traits[i]->name, &trait);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public String[] ReflectionClass::getTraitNames()
|
|
Returns an array of names of traits used by this class */
|
|
ZEND_METHOD(reflection_class, getTraitNames)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_uint i;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
array_init(return_value);
|
|
|
|
for (i=0; i < ce->num_traits; i++) {
|
|
add_next_index_str(return_value, STR_COPY(ce->traits[i]->name));
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public arra ReflectionClass::getTraitaliases()
|
|
Returns an array of trait aliases */
|
|
ZEND_METHOD(reflection_class, getTraitAliases)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
array_init(return_value);
|
|
|
|
if (ce->trait_aliases) {
|
|
zend_uint i = 0;
|
|
while (ce->trait_aliases[i]) {
|
|
zend_string *mname;
|
|
zend_trait_method_reference *cur_ref = ce->trait_aliases[i]->trait_method;
|
|
|
|
if (ce->trait_aliases[i]->alias) {
|
|
|
|
mname = STR_ALLOC(cur_ref->ce->name->len + cur_ref->method_name->len + 2, 0);
|
|
snprintf(mname->val, mname->len + 1, "%s::%s", cur_ref->ce->name->val, cur_ref->method_name->val);
|
|
add_assoc_str_ex(return_value, ce->trait_aliases[i]->alias->val, ce->trait_aliases[i]->alias->len, mname);
|
|
}
|
|
i++;
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass ReflectionClass::getParentClass()
|
|
Returns the class' parent class, or, if none exists, FALSE */
|
|
ZEND_METHOD(reflection_class, getParentClass)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if (ce->parent) {
|
|
zend_reflection_class_factory(ce->parent, return_value TSRMLS_CC);
|
|
} else {
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isSubclassOf(string|ReflectionClass class)
|
|
Returns whether this class is a subclass of another class */
|
|
ZEND_METHOD(reflection_class, isSubclassOf)
|
|
{
|
|
reflection_object *intern, *argument;
|
|
zend_class_entry *ce, *class_ce;
|
|
zval *class_name;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &class_name) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
switch (Z_TYPE_P(class_name)) {
|
|
case IS_STRING:
|
|
if ((class_ce = zend_lookup_class(Z_STR_P(class_name) TSRMLS_CC)) == NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Class %s does not exist", Z_STRVAL_P(class_name));
|
|
return;
|
|
}
|
|
break;
|
|
case IS_OBJECT:
|
|
if (instanceof_function(Z_OBJCE_P(class_name), reflection_class_ptr TSRMLS_CC)) {
|
|
argument = Z_REFLECTION_P(class_name);
|
|
if (argument == NULL || argument->ptr == NULL) {
|
|
php_error_docref(NULL TSRMLS_CC, E_ERROR, "Internal error: Failed to retrieve the argument's reflection object");
|
|
/* Bails out */
|
|
}
|
|
class_ce = argument->ptr;
|
|
break;
|
|
}
|
|
/* no break */
|
|
default:
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Parameter one must either be a string or a ReflectionClass object");
|
|
return;
|
|
}
|
|
|
|
RETURN_BOOL((ce != class_ce && instanceof_function(ce, class_ce TSRMLS_CC)));
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::implementsInterface(string|ReflectionClass interface_name)
|
|
Returns whether this class is a subclass of another class */
|
|
ZEND_METHOD(reflection_class, implementsInterface)
|
|
{
|
|
reflection_object *intern, *argument;
|
|
zend_class_entry *ce, *interface_ce;
|
|
zval *interface;
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &interface) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
switch (Z_TYPE_P(interface)) {
|
|
case IS_STRING:
|
|
if ((interface_ce = zend_lookup_class(Z_STR_P(interface) TSRMLS_CC)) == NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Interface %s does not exist", Z_STRVAL_P(interface));
|
|
return;
|
|
}
|
|
break;
|
|
case IS_OBJECT:
|
|
if (instanceof_function(Z_OBJCE_P(interface), reflection_class_ptr TSRMLS_CC)) {
|
|
argument = Z_REFLECTION_P(interface);
|
|
if (argument == NULL || argument->ptr == NULL) {
|
|
php_error_docref(NULL TSRMLS_CC, E_ERROR, "Internal error: Failed to retrieve the argument's reflection object");
|
|
/* Bails out */
|
|
}
|
|
interface_ce = argument->ptr;
|
|
break;
|
|
}
|
|
/* no break */
|
|
default:
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Parameter one must either be a string or a ReflectionClass object");
|
|
return;
|
|
}
|
|
|
|
if (!(interface_ce->ce_flags & ZEND_ACC_INTERFACE)) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Interface %s is a Class", interface_ce->name->val);
|
|
return;
|
|
}
|
|
RETURN_BOOL(instanceof_function(ce, interface_ce TSRMLS_CC));
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::isIterateable()
|
|
Returns whether this class is iterateable (can be used inside foreach) */
|
|
ZEND_METHOD(reflection_class, isIterateable)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
RETURN_BOOL(ce->get_iterator != NULL);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionExtension|NULL ReflectionClass::getExtension()
|
|
Returns NULL or the extension the class belongs to */
|
|
ZEND_METHOD(reflection_class, getExtension)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if ((ce->type == ZEND_INTERNAL_CLASS) && ce->info.internal.module) {
|
|
reflection_extension_factory(return_value, ce->info.internal.module->name TSRMLS_CC);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string|false ReflectionClass::getExtensionName()
|
|
Returns false or the name of the extension the class belongs to */
|
|
ZEND_METHOD(reflection_class, getExtensionName)
|
|
{
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
METHOD_NOTSTATIC(reflection_class_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ce);
|
|
|
|
if ((ce->type == ZEND_INTERNAL_CLASS) && ce->info.internal.module) {
|
|
RETURN_STRING(ce->info.internal.module->name);
|
|
} else {
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionClass::inNamespace()
|
|
Returns whether this class is defined in namespace */
|
|
ZEND_METHOD(reflection_class, inNamespace)
|
|
{
|
|
zval *name;
|
|
const char *backslash;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
if ((name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
if (Z_TYPE_P(name) == IS_STRING
|
|
&& (backslash = zend_memrchr(Z_STRVAL_P(name), '\\', Z_STRLEN_P(name)))
|
|
&& backslash > Z_STRVAL_P(name))
|
|
{
|
|
RETURN_TRUE;
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionClass::getNamespaceName()
|
|
Returns the name of namespace where this class is defined */
|
|
ZEND_METHOD(reflection_class, getNamespaceName)
|
|
{
|
|
zval *name;
|
|
const char *backslash;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
if ((name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
if (Z_TYPE_P(name) == IS_STRING
|
|
&& (backslash = zend_memrchr(Z_STRVAL_P(name), '\\', Z_STRLEN_P(name)))
|
|
&& backslash > Z_STRVAL_P(name))
|
|
{
|
|
RETURN_STRINGL(Z_STRVAL_P(name), backslash - Z_STRVAL_P(name));
|
|
}
|
|
RETURN_EMPTY_STRING();
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionClass::getShortName()
|
|
Returns the short name of the class (without namespace part) */
|
|
ZEND_METHOD(reflection_class, getShortName)
|
|
{
|
|
zval *name;
|
|
const char *backslash;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
if ((name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC)) == NULL) {
|
|
RETURN_FALSE;
|
|
}
|
|
if (Z_TYPE_P(name) == IS_STRING
|
|
&& (backslash = zend_memrchr(Z_STRVAL_P(name), '\\', Z_STRLEN_P(name)))
|
|
&& backslash > Z_STRVAL_P(name))
|
|
{
|
|
RETURN_STRINGL(backslash + 1, Z_STRLEN_P(name) - (backslash - Z_STRVAL_P(name) + 1));
|
|
}
|
|
RETURN_ZVAL(name, 1, 0);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionObject::export(mixed argument [, bool return]) throws ReflectionException
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_object, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_object_ptr, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionObject::__construct(mixed argument) throws ReflectionException
|
|
Constructor. Takes an instance as an argument */
|
|
ZEND_METHOD(reflection_object, __construct)
|
|
{
|
|
reflection_class_object_ctor(INTERNAL_FUNCTION_PARAM_PASSTHRU, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionProperty::export(mixed class, string name [, bool return]) throws ReflectionException
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_property, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_property_ptr, 2);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionProperty::__construct(mixed class, string name)
|
|
Constructor. Throws an Exception in case the given property does not exist */
|
|
ZEND_METHOD(reflection_property, __construct)
|
|
{
|
|
zval propname, cname, *classname;
|
|
char *name_str;
|
|
const char *class_name, *prop_name;
|
|
int name_len, dynam_prop = 0;
|
|
zval *object;
|
|
reflection_object *intern;
|
|
zend_class_entry *ce;
|
|
zend_property_info *property_info = NULL;
|
|
property_reference *reference;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zs", &classname, &name_str, &name_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
object = getThis();
|
|
intern = Z_REFLECTION_P(object);
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
/* Find the class entry */
|
|
switch (Z_TYPE_P(classname)) {
|
|
case IS_STRING:
|
|
if ((ce = zend_lookup_class(Z_STR_P(classname) TSRMLS_CC)) == NULL) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Class %s does not exist", Z_STRVAL_P(classname));
|
|
return;
|
|
}
|
|
break;
|
|
|
|
case IS_OBJECT:
|
|
ce = Z_OBJCE_P(classname);
|
|
break;
|
|
|
|
default:
|
|
_DO_THROW("The parameter class is expected to be either a string or an object");
|
|
/* returns out of this function */
|
|
}
|
|
|
|
if ((property_info = zend_hash_str_find_ptr(&ce->properties_info, name_str, name_len)) == NULL || (property_info->flags & ZEND_ACC_SHADOW)) {
|
|
/* Check for dynamic properties */
|
|
if (property_info == NULL && Z_TYPE_P(classname) == IS_OBJECT && Z_OBJ_HT_P(classname)->get_properties) {
|
|
if (zend_hash_str_exists(Z_OBJ_HT_P(classname)->get_properties(classname TSRMLS_CC), name_str, name_len)) {
|
|
dynam_prop = 1;
|
|
}
|
|
}
|
|
if (dynam_prop == 0) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC, "Property %s::$%s does not exist", ce->name->val, name_str);
|
|
return;
|
|
}
|
|
}
|
|
|
|
if (dynam_prop == 0 && (property_info->flags & ZEND_ACC_PRIVATE) == 0) {
|
|
/* we have to search the class hierarchy for this (implicit) public or protected property */
|
|
zend_class_entry *tmp_ce = ce;
|
|
zend_property_info *tmp_info;
|
|
|
|
while (tmp_ce && (tmp_info = zend_hash_str_find_ptr(&tmp_ce->properties_info, name_str, name_len)) == NULL) {
|
|
ce = tmp_ce;
|
|
property_info = tmp_info;
|
|
tmp_ce = tmp_ce->parent;
|
|
}
|
|
}
|
|
|
|
if (dynam_prop == 0) {
|
|
zend_unmangle_property_name(property_info->name->val, property_info->name->len, &class_name, &prop_name);
|
|
ZVAL_STR(&cname, STR_COPY(property_info->ce->name));
|
|
ZVAL_STRING(&propname, prop_name);
|
|
} else {
|
|
ZVAL_STR(&cname, STR_COPY(ce->name));
|
|
ZVAL_STRINGL(&propname, name_str, name_len);
|
|
}
|
|
reflection_update_property(object, "class", &cname);
|
|
reflection_update_property(object, "name", &propname);
|
|
|
|
reference = (property_reference*) emalloc(sizeof(property_reference));
|
|
if (dynam_prop) {
|
|
reference->prop.flags = ZEND_ACC_IMPLICIT_PUBLIC;
|
|
reference->prop.name = Z_STR(propname);
|
|
reference->prop.doc_comment = NULL;
|
|
reference->prop.ce = ce;
|
|
} else {
|
|
reference->prop = *property_info;
|
|
}
|
|
reference->ce = ce;
|
|
intern->ptr = reference;
|
|
intern->ref_type = REF_TYPE_PROPERTY;
|
|
intern->ce = ce;
|
|
intern->ignore_visibility = 0;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionProperty::__toString()
|
|
Returns a string representation */
|
|
ZEND_METHOD(reflection_property, __toString)
|
|
{
|
|
reflection_object *intern;
|
|
property_reference *ref;
|
|
string str;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ref);
|
|
string_init(&str);
|
|
_property_string(&str, &ref->prop, NULL, "" TSRMLS_CC);
|
|
RETURN_STR(str.buf);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionProperty::getName()
|
|
Returns the class' name */
|
|
ZEND_METHOD(reflection_property, getName)
|
|
{
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
_default_get_entry(getThis(), "name", sizeof("name")-1, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
static void _property_check_flag(INTERNAL_FUNCTION_PARAMETERS, int mask) /* {{{ */
|
|
{
|
|
reflection_object *intern;
|
|
property_reference *ref;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ref);
|
|
RETURN_BOOL(ref->prop.flags & mask);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionProperty::isPublic()
|
|
Returns whether this property is public */
|
|
ZEND_METHOD(reflection_property, isPublic)
|
|
{
|
|
_property_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_PUBLIC | ZEND_ACC_IMPLICIT_PUBLIC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionProperty::isPrivate()
|
|
Returns whether this property is private */
|
|
ZEND_METHOD(reflection_property, isPrivate)
|
|
{
|
|
_property_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_PRIVATE);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionProperty::isProtected()
|
|
Returns whether this property is protected */
|
|
ZEND_METHOD(reflection_property, isProtected)
|
|
{
|
|
_property_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_PROTECTED);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionProperty::isStatic()
|
|
Returns whether this property is static */
|
|
ZEND_METHOD(reflection_property, isStatic)
|
|
{
|
|
_property_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ZEND_ACC_STATIC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionProperty::isDefault()
|
|
Returns whether this property is default (declared at compilation time). */
|
|
ZEND_METHOD(reflection_property, isDefault)
|
|
{
|
|
_property_check_flag(INTERNAL_FUNCTION_PARAM_PASSTHRU, ~ZEND_ACC_IMPLICIT_PUBLIC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionProperty::getModifiers()
|
|
Returns a bitfield of the access modifiers for this property */
|
|
ZEND_METHOD(reflection_property, getModifiers)
|
|
{
|
|
reflection_object *intern;
|
|
property_reference *ref;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ref);
|
|
|
|
RETURN_LONG(ref->prop.flags);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public mixed ReflectionProperty::getValue([stdclass object])
|
|
Returns this property's value */
|
|
ZEND_METHOD(reflection_property, getValue)
|
|
{
|
|
reflection_object *intern;
|
|
property_reference *ref;
|
|
zval *object, *name;
|
|
zval *member_p = NULL;
|
|
|
|
METHOD_NOTSTATIC(reflection_property_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ref);
|
|
|
|
if (!(ref->prop.flags & (ZEND_ACC_PUBLIC | ZEND_ACC_IMPLICIT_PUBLIC)) && intern->ignore_visibility == 0) {
|
|
name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Cannot access non-public member %s::%s", intern->ce->name->val, Z_STRVAL_P(name));
|
|
return;
|
|
}
|
|
|
|
if ((ref->prop.flags & ZEND_ACC_STATIC)) {
|
|
zend_update_class_constants(intern->ce TSRMLS_CC);
|
|
if (Z_TYPE(CE_STATIC_MEMBERS(intern->ce)[ref->prop.offset]) == IS_UNDEF) {
|
|
php_error_docref(NULL TSRMLS_CC, E_ERROR, "Internal error: Could not find the property %s::%s", intern->ce->name->val, ref->prop.name->val);
|
|
/* Bails out */
|
|
}
|
|
ZVAL_DUP(return_value, &CE_STATIC_MEMBERS(intern->ce)[ref->prop.offset]);
|
|
} else {
|
|
const char *class_name, *prop_name;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o", &object) == FAILURE) {
|
|
return;
|
|
}
|
|
zend_unmangle_property_name(ref->prop.name->val, ref->prop.name->len, &class_name, &prop_name);
|
|
member_p = zend_read_property(ref->ce, object, prop_name, strlen(prop_name), 1 TSRMLS_CC);
|
|
ZVAL_DUP(return_value, member_p);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionProperty::setValue([stdclass object,] mixed value)
|
|
Sets this property's value */
|
|
ZEND_METHOD(reflection_property, setValue)
|
|
{
|
|
reflection_object *intern;
|
|
property_reference *ref;
|
|
zval *variable_ptr;
|
|
zval *object, *name;
|
|
zval *value;
|
|
zval *tmp;
|
|
|
|
METHOD_NOTSTATIC(reflection_property_ptr);
|
|
GET_REFLECTION_OBJECT_PTR(ref);
|
|
|
|
if (!(ref->prop.flags & ZEND_ACC_PUBLIC) && intern->ignore_visibility == 0) {
|
|
name = _default_load_entry(getThis(), "name", sizeof("name")-1 TSRMLS_CC);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Cannot access non-public member %s::%s", intern->ce->name->val, Z_STRVAL_P(name));
|
|
return;
|
|
}
|
|
|
|
if ((ref->prop.flags & ZEND_ACC_STATIC)) {
|
|
if (zend_parse_parameters_ex(ZEND_PARSE_PARAMS_QUIET, ZEND_NUM_ARGS() TSRMLS_CC, "z", &value) == FAILURE) {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zz", &tmp, &value) == FAILURE) {
|
|
return;
|
|
}
|
|
}
|
|
zend_update_class_constants(intern->ce TSRMLS_CC);
|
|
|
|
if (Z_TYPE(CE_STATIC_MEMBERS(intern->ce)[ref->prop.offset]) == IS_UNDEF) {
|
|
php_error_docref(NULL TSRMLS_CC, E_ERROR, "Internal error: Could not find the property %s::%s", intern->ce->name->val, ref->prop.name->val);
|
|
/* Bails out */
|
|
}
|
|
variable_ptr = &CE_STATIC_MEMBERS(intern->ce)[ref->prop.offset];
|
|
if (variable_ptr != value) {
|
|
if (Z_ISREF_P(variable_ptr)) {
|
|
zval garbage;
|
|
|
|
ZVAL_COPY_VALUE(&garbage, variable_ptr); /* old value should be destroyed */
|
|
|
|
/* To check: can't *variable_ptr be some system variable like error_zval here? */
|
|
ZVAL_COPY_VALUE(variable_ptr, value);
|
|
if (Z_REFCOUNTED_P(value) && Z_REFCOUNT_P(value) > 0) {
|
|
zval_copy_ctor(variable_ptr);
|
|
}
|
|
zval_dtor(&garbage);
|
|
} else {
|
|
zval garbage;
|
|
|
|
ZVAL_COPY_VALUE(&garbage, variable_ptr);
|
|
/* if we assign referenced variable, we should separate it */
|
|
if (Z_REFCOUNTED_P(value)) {
|
|
Z_ADDREF_P(value);
|
|
}
|
|
if (Z_ISREF_P(value)) {
|
|
SEPARATE_ZVAL(value);
|
|
}
|
|
ZVAL_COPY_VALUE(variable_ptr, value);
|
|
zval_ptr_dtor(&garbage);
|
|
}
|
|
}
|
|
} else {
|
|
const char *class_name, *prop_name;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "oz", &object, &value) == FAILURE) {
|
|
return;
|
|
}
|
|
zend_unmangle_property_name(ref->prop.name->val, ref->prop.name->len, &class_name, &prop_name);
|
|
zend_update_property(ref->ce, object, prop_name, strlen(prop_name), value TSRMLS_CC);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass ReflectionProperty::getDeclaringClass()
|
|
Get the declaring class */
|
|
ZEND_METHOD(reflection_property, getDeclaringClass)
|
|
{
|
|
reflection_object *intern;
|
|
property_reference *ref;
|
|
zend_class_entry *tmp_ce, *ce;
|
|
zend_property_info *tmp_info;
|
|
const char *prop_name, *class_name;
|
|
int prop_name_len;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ref);
|
|
|
|
if (zend_unmangle_property_name(ref->prop.name->val, ref->prop.name->len, &class_name, &prop_name) != SUCCESS) {
|
|
RETURN_FALSE;
|
|
}
|
|
|
|
prop_name_len = strlen(prop_name);
|
|
ce = tmp_ce = ref->ce;
|
|
while (tmp_ce && (tmp_info = zend_hash_str_find_ptr(&tmp_ce->properties_info, prop_name, prop_name_len)) != NULL) {
|
|
if (tmp_info->flags & ZEND_ACC_PRIVATE || tmp_info->flags & ZEND_ACC_SHADOW) {
|
|
/* it's a private property, so it can't be inherited */
|
|
break;
|
|
}
|
|
ce = tmp_ce;
|
|
if (tmp_ce == tmp_info->ce) {
|
|
/* declared in this class, done */
|
|
break;
|
|
}
|
|
tmp_ce = tmp_ce->parent;
|
|
}
|
|
|
|
zend_reflection_class_factory(ce, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionProperty::getDocComment()
|
|
Returns the doc comment for this property */
|
|
ZEND_METHOD(reflection_property, getDocComment)
|
|
{
|
|
reflection_object *intern;
|
|
property_reference *ref;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(ref);
|
|
if (ref->prop.doc_comment) {
|
|
RETURN_STR(STR_COPY(ref->prop.doc_comment));
|
|
}
|
|
RETURN_FALSE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public int ReflectionProperty::setAccessible(bool visible)
|
|
Sets whether non-public properties can be requested */
|
|
ZEND_METHOD(reflection_property, setAccessible)
|
|
{
|
|
reflection_object *intern;
|
|
zend_bool visible;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "b", &visible) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
intern = Z_REFLECTION_P(getThis());
|
|
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
intern->ignore_visibility = visible;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionExtension::export(string name [, bool return]) throws ReflectionException
|
|
Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_extension, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_extension_ptr, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionExtension::__construct(string name)
|
|
Constructor. Throws an Exception in case the given extension does not exist */
|
|
ZEND_METHOD(reflection_extension, __construct)
|
|
{
|
|
zval name;
|
|
zval *object;
|
|
char *lcname;
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
char *name_str;
|
|
int name_len;
|
|
ALLOCA_FLAG(use_heap)
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name_str, &name_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
object = getThis();
|
|
intern = Z_REFLECTION_P(object);
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
lcname = do_alloca(name_len + 1, use_heap);
|
|
zend_str_tolower_copy(lcname, name_str, name_len);
|
|
if ((module = zend_hash_str_find_ptr(&module_registry, lcname, name_len)) == NULL) {
|
|
free_alloca(lcname, use_heap);
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Extension %s does not exist", name_str);
|
|
return;
|
|
}
|
|
free_alloca(lcname, use_heap);
|
|
ZVAL_STRING(&name, module->name);
|
|
reflection_update_property(object, "name", &name);
|
|
intern->ptr = module;
|
|
intern->ref_type = REF_TYPE_OTHER;
|
|
intern->ce = NULL;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionExtension::__toString()
|
|
Returns a string representation */
|
|
ZEND_METHOD(reflection_extension, __toString)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
string str;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
string_init(&str);
|
|
_extension_string(&str, module, "" TSRMLS_CC);
|
|
RETURN_STR(str.buf);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionExtension::getName()
|
|
Returns this extension's name */
|
|
ZEND_METHOD(reflection_extension, getName)
|
|
{
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
_default_get_entry(getThis(), "name", sizeof("name")-1, return_value TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionExtension::getVersion()
|
|
Returns this extension's version */
|
|
ZEND_METHOD(reflection_extension, getVersion)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
/* An extension does not necessarily have a version number */
|
|
if (module->version == NO_VERSION_YET) {
|
|
RETURN_NULL();
|
|
} else {
|
|
RETURN_STRING(module->version);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionFunction[] ReflectionExtension::getFunctions()
|
|
Returns an array of this extension's functions */
|
|
ZEND_METHOD(reflection_extension, getFunctions)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
HashPosition iterator;
|
|
zval function;
|
|
zend_function *fptr;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
array_init(return_value);
|
|
zend_hash_internal_pointer_reset_ex(CG(function_table), &iterator);
|
|
while ((fptr = zend_hash_get_current_data_ptr_ex(CG(function_table), &iterator)) != NULL) {
|
|
if (fptr->common.type==ZEND_INTERNAL_FUNCTION
|
|
&& fptr->internal_function.module == module) {
|
|
reflection_function_factory(fptr, NULL, &function TSRMLS_CC);
|
|
zend_hash_update(Z_ARRVAL_P(return_value), fptr->common.function_name, &function);
|
|
}
|
|
zend_hash_move_forward_ex(CG(function_table), &iterator);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
static int _addconstant(zval *el TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key) /* {{{ */
|
|
{
|
|
zval const_val;
|
|
zend_constant *constant = (zend_constant*)Z_PTR_P(el);
|
|
zval *retval = va_arg(args, zval*);
|
|
int number = va_arg(args, int);
|
|
|
|
if (number == constant->module_number) {
|
|
ZVAL_DUP(&const_val, &constant->value);
|
|
zend_hash_update(Z_ARRVAL_P(retval), constant->name, &const_val);
|
|
}
|
|
return 0;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionExtension::getConstants()
|
|
Returns an associative array containing this extension's constants and their values */
|
|
ZEND_METHOD(reflection_extension, getConstants)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
array_init(return_value);
|
|
zend_hash_apply_with_arguments(EG(zend_constants) TSRMLS_CC, (apply_func_args_t) _addconstant, 2, return_value, module->module_number);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ _addinientry */
|
|
static int _addinientry(zval *el TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key)
|
|
{
|
|
zend_ini_entry *ini_entry = (zend_ini_entry*)Z_PTR_P(el);
|
|
zval *retval = va_arg(args, zval*);
|
|
int number = va_arg(args, int);
|
|
|
|
if (number == ini_entry->module_number) {
|
|
if (ini_entry->value) {
|
|
add_assoc_stringl(retval, ini_entry->name, ini_entry->value, ini_entry->value_length);
|
|
} else {
|
|
add_assoc_null(retval, ini_entry->name);
|
|
}
|
|
}
|
|
return ZEND_HASH_APPLY_KEEP;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionExtension::getINIEntries()
|
|
Returns an associative array containing this extension's INI entries and their values */
|
|
ZEND_METHOD(reflection_extension, getINIEntries)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
array_init(return_value);
|
|
zend_hash_apply_with_arguments(EG(ini_directives) TSRMLS_CC, (apply_func_args_t) _addinientry, 2, return_value, module->module_number);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ add_extension_class */
|
|
static int add_extension_class(zval *zv TSRMLS_DC, int num_args, va_list args, zend_hash_key *hash_key)
|
|
{
|
|
zend_class_entry *ce = Z_PTR_P(zv);
|
|
zval *class_array = va_arg(args, zval*), zclass;
|
|
struct _zend_module_entry *module = va_arg(args, struct _zend_module_entry*);
|
|
int add_reflection_class = va_arg(args, int);
|
|
|
|
if ((ce->type == ZEND_INTERNAL_CLASS) && ce->info.internal.module && !strcasecmp(ce->info.internal.module->name, module->name)) {
|
|
if (add_reflection_class) {
|
|
zend_reflection_class_factory(ce, &zclass TSRMLS_CC);
|
|
zend_hash_update(Z_ARRVAL_P(class_array), ce->name, &zclass);
|
|
} else {
|
|
add_next_index_str(class_array, STR_COPY(ce->name));
|
|
}
|
|
}
|
|
return ZEND_HASH_APPLY_KEEP;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public ReflectionClass[] ReflectionExtension::getClasses()
|
|
Returns an array containing ReflectionClass objects for all classes of this extension */
|
|
ZEND_METHOD(reflection_extension, getClasses)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
array_init(return_value);
|
|
zend_hash_apply_with_arguments(EG(class_table) TSRMLS_CC, (apply_func_args_t) add_extension_class, 3, return_value, module, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionExtension::getClassNames()
|
|
Returns an array containing all names of all classes of this extension */
|
|
ZEND_METHOD(reflection_extension, getClassNames)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
array_init(return_value);
|
|
zend_hash_apply_with_arguments(EG(class_table) TSRMLS_CC, (apply_func_args_t) add_extension_class, 3, return_value, module, 0);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public array ReflectionExtension::getDependencies()
|
|
Returns an array containing all names of all extensions this extension depends on */
|
|
ZEND_METHOD(reflection_extension, getDependencies)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
const zend_module_dep *dep;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
array_init(return_value);
|
|
|
|
dep = module->deps;
|
|
|
|
if (!dep)
|
|
{
|
|
return;
|
|
}
|
|
|
|
while(dep->name) {
|
|
zend_string *relation;
|
|
char *rel_type;
|
|
int len = 0;
|
|
|
|
switch(dep->type) {
|
|
case MODULE_DEP_REQUIRED:
|
|
rel_type = "Required";
|
|
len += sizeof("Required") - 1;
|
|
break;
|
|
case MODULE_DEP_CONFLICTS:
|
|
rel_type = "Conflicts";
|
|
len += sizeof("Conflicts") - 1;
|
|
break;
|
|
case MODULE_DEP_OPTIONAL:
|
|
rel_type = "Optional";
|
|
len += sizeof("Optional") - 1;
|
|
break;
|
|
default:
|
|
rel_type = "Error"; /* shouldn't happen */
|
|
len += sizeof("Error") - 1;
|
|
break;
|
|
}
|
|
|
|
if (dep->rel) {
|
|
len += strlen(dep->rel) + 1;
|
|
}
|
|
|
|
if (dep->version) {
|
|
len += strlen(dep->version) + 1;
|
|
}
|
|
|
|
relation = STR_ALLOC(len, 0);
|
|
snprintf(relation->val, relation->len + 1, "%s%s%s%s%s",
|
|
rel_type,
|
|
dep->rel ? " " : "",
|
|
dep->rel ? dep->rel : "",
|
|
dep->version ? " " : "",
|
|
dep->version ? dep->version : "");
|
|
add_assoc_str(return_value, dep->name, relation);
|
|
dep++;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionExtension::info()
|
|
Prints phpinfo block for the extension */
|
|
ZEND_METHOD(reflection_extension, info)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
php_info_print_module(module TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionExtension::isPersistent()
|
|
Returns whether this extension is persistent */
|
|
ZEND_METHOD(reflection_extension, isPersistent)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
RETURN_BOOL(module->type == MODULE_PERSISTENT);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public bool ReflectionExtension::isTemporary()
|
|
Returns whether this extension is temporary */
|
|
ZEND_METHOD(reflection_extension, isTemporary)
|
|
{
|
|
reflection_object *intern;
|
|
zend_module_entry *module;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(module);
|
|
|
|
RETURN_BOOL(module->type == MODULE_TEMPORARY);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public static mixed ReflectionZendExtension::export(string name [, bool return]) throws ReflectionException
|
|
* Exports a reflection object. Returns the output if TRUE is specified for return, printing it otherwise. */
|
|
ZEND_METHOD(reflection_zend_extension, export)
|
|
{
|
|
_reflection_export(INTERNAL_FUNCTION_PARAM_PASSTHRU, reflection_zend_extension_ptr, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionZendExtension::__construct(string name)
|
|
Constructor. Throws an Exception in case the given Zend extension does not exist */
|
|
ZEND_METHOD(reflection_zend_extension, __construct)
|
|
{
|
|
zval name;
|
|
zval *object;
|
|
reflection_object *intern;
|
|
zend_extension *extension;
|
|
char *name_str;
|
|
int name_len;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name_str, &name_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
object = getThis();
|
|
intern = Z_REFLECTION_P(object);
|
|
if (intern == NULL) {
|
|
return;
|
|
}
|
|
|
|
extension = zend_get_extension(name_str);
|
|
if (!extension) {
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Zend Extension %s does not exist", name_str);
|
|
return;
|
|
}
|
|
ZVAL_STRING(&name, extension->name);
|
|
reflection_update_property(object, "name", &name);
|
|
intern->ptr = extension;
|
|
intern->ref_type = REF_TYPE_OTHER;
|
|
intern->ce = NULL;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionZendExtension::__toString()
|
|
Returns a string representation */
|
|
ZEND_METHOD(reflection_zend_extension, __toString)
|
|
{
|
|
reflection_object *intern;
|
|
zend_extension *extension;
|
|
string str;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(extension);
|
|
string_init(&str);
|
|
_zend_extension_string(&str, extension, "" TSRMLS_CC);
|
|
RETURN_STR(str.buf);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionZendExtension::getName()
|
|
Returns the name of this Zend extension */
|
|
ZEND_METHOD(reflection_zend_extension, getName)
|
|
{
|
|
reflection_object *intern;
|
|
zend_extension *extension;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(extension);
|
|
|
|
RETURN_STRING(extension->name);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public string ReflectionZendExtension::getVersion()
|
|
Returns the version information of this Zend extension */
|
|
ZEND_METHOD(reflection_zend_extension, getVersion)
|
|
{
|
|
reflection_object *intern;
|
|
zend_extension *extension;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(extension);
|
|
|
|
if (extension->version) {
|
|
RETURN_STRING(extension->version);
|
|
} else {
|
|
RETURN_EMPTY_STRING();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionZendExtension::getAuthor()
|
|
* Returns the name of this Zend extension's author */
|
|
ZEND_METHOD(reflection_zend_extension, getAuthor)
|
|
{
|
|
reflection_object *intern;
|
|
zend_extension *extension;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(extension);
|
|
|
|
if (extension->author) {
|
|
RETURN_STRING(extension->author);
|
|
} else {
|
|
RETURN_EMPTY_STRING();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionZendExtension::getURL()
|
|
Returns this Zend extension's URL*/
|
|
ZEND_METHOD(reflection_zend_extension, getURL)
|
|
{
|
|
reflection_object *intern;
|
|
zend_extension *extension;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(extension);
|
|
|
|
if (extension->URL) {
|
|
RETURN_STRING(extension->URL);
|
|
} else {
|
|
RETURN_EMPTY_STRING();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto public void ReflectionZendExtension::getCopyright()
|
|
Returns this Zend extension's copyright information */
|
|
ZEND_METHOD(reflection_zend_extension, getCopyright)
|
|
{
|
|
reflection_object *intern;
|
|
zend_extension *extension;
|
|
|
|
if (zend_parse_parameters_none() == FAILURE) {
|
|
return;
|
|
}
|
|
GET_REFLECTION_OBJECT_PTR(extension);
|
|
|
|
if (extension->copyright) {
|
|
RETURN_STRING(extension->copyright);
|
|
} else {
|
|
RETURN_EMPTY_STRING();
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ method tables */
|
|
static const zend_function_entry reflection_exception_functions[] = {
|
|
PHP_FE_END
|
|
};
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection__void, 0)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_getModifierNames, 0)
|
|
ZEND_ARG_INFO(0, modifiers)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_export, 0, 0, 1)
|
|
ZEND_ARG_OBJ_INFO(0, reflector, Reflector, 0)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_functions[] = {
|
|
ZEND_ME(reflection, getModifierNames, arginfo_reflection_getModifierNames, ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
|
|
ZEND_ME(reflection, export, arginfo_reflection_export, ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
|
|
PHP_FE_END
|
|
};
|
|
|
|
static const zend_function_entry reflector_functions[] = {
|
|
ZEND_FENTRY(export, NULL, NULL, ZEND_ACC_STATIC|ZEND_ACC_ABSTRACT|ZEND_ACC_PUBLIC)
|
|
ZEND_ABSTRACT_ME(reflector, __toString, arginfo_reflection__void)
|
|
PHP_FE_END
|
|
};
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_function_export, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_function___construct, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_function_invoke, 0, 0, 0)
|
|
ZEND_ARG_INFO(0, args)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_function_invokeArgs, 0)
|
|
ZEND_ARG_ARRAY_INFO(0, args, 0)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_function_abstract_functions[] = {
|
|
ZEND_ME(reflection, __clone, arginfo_reflection__void, ZEND_ACC_PRIVATE|ZEND_ACC_FINAL)
|
|
PHP_ABSTRACT_ME(reflection_function, __toString, arginfo_reflection__void)
|
|
ZEND_ME(reflection_function, inNamespace, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, isClosure, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, isDeprecated, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, isInternal, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, isUserDefined, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, isGenerator, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, isVariadic, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getClosureThis, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getClosureScopeClass, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getDocComment, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getEndLine, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getExtension, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getExtensionName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getFileName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getNamespaceName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getNumberOfParameters, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getNumberOfRequiredParameters, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getParameters, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getShortName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getStartLine, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, getStaticVariables, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, returnsReference, arginfo_reflection__void, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
static const zend_function_entry reflection_function_functions[] = {
|
|
ZEND_ME(reflection_function, __construct, arginfo_reflection_function___construct, 0)
|
|
ZEND_ME(reflection_function, __toString, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, export, arginfo_reflection_function_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_function, isDisabled, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_function, invoke, arginfo_reflection_function_invoke, 0)
|
|
ZEND_ME(reflection_function, invokeArgs, arginfo_reflection_function_invokeArgs, 0)
|
|
ZEND_ME(reflection_function, getClosure, arginfo_reflection__void, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_method_export, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, class)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_method___construct, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, class_or_method)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_method_invoke, 0)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_ARG_INFO(0, args)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_method_invokeArgs, 0)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_ARG_ARRAY_INFO(0, args, 0)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_method_setAccessible, 0)
|
|
ZEND_ARG_INFO(0, value)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_method_getClosure, 0)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_method_functions[] = {
|
|
ZEND_ME(reflection_method, export, arginfo_reflection_method_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_method, __construct, arginfo_reflection_method___construct, 0)
|
|
ZEND_ME(reflection_method, __toString, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isPublic, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isPrivate, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isProtected, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isAbstract, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isFinal, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isStatic, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isConstructor, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, isDestructor, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, getClosure, arginfo_reflection_method_getClosure, 0)
|
|
ZEND_ME(reflection_method, getModifiers, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, invoke, arginfo_reflection_method_invoke, 0)
|
|
ZEND_ME(reflection_method, invokeArgs, arginfo_reflection_method_invokeArgs, 0)
|
|
ZEND_ME(reflection_method, getDeclaringClass, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_method, getPrototype, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, setAccessible, arginfo_reflection_method_setAccessible, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_class_export, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, argument)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class___construct, 0)
|
|
ZEND_ARG_INFO(0, argument)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_class_getStaticPropertyValue, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_ARG_INFO(0, default)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_setStaticPropertyValue, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_ARG_INFO(0, value)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_hasMethod, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_getMethod, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_class_getMethods, 0, 0, 0)
|
|
ZEND_ARG_INFO(0, filter)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_hasProperty, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_getProperty, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_class_getProperties, 0, 0, 0)
|
|
ZEND_ARG_INFO(0, filter)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_hasConstant, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_getConstant, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_isInstance, 0)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_newInstance, 0)
|
|
ZEND_ARG_INFO(0, args)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_newInstanceWithoutConstructor, 0)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_class_newInstanceArgs, 0, 0, 0)
|
|
ZEND_ARG_ARRAY_INFO(0, args, 0)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_isSubclassOf, 0)
|
|
ZEND_ARG_INFO(0, class)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_class_implementsInterface, 0)
|
|
ZEND_ARG_INFO(0, interface)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_class_functions[] = {
|
|
ZEND_ME(reflection, __clone, arginfo_reflection__void, ZEND_ACC_PRIVATE|ZEND_ACC_FINAL)
|
|
ZEND_ME(reflection_class, export, arginfo_reflection_class_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_class, __construct, arginfo_reflection_class___construct, 0)
|
|
ZEND_ME(reflection_class, __toString, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isInternal, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isUserDefined, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isInstantiable, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isCloneable, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getFileName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getStartLine, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getEndLine, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getDocComment, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getConstructor, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, hasMethod, arginfo_reflection_class_hasMethod, 0)
|
|
ZEND_ME(reflection_class, getMethod, arginfo_reflection_class_getMethod, 0)
|
|
ZEND_ME(reflection_class, getMethods, arginfo_reflection_class_getMethods, 0)
|
|
ZEND_ME(reflection_class, hasProperty, arginfo_reflection_class_hasProperty, 0)
|
|
ZEND_ME(reflection_class, getProperty, arginfo_reflection_class_getProperty, 0)
|
|
ZEND_ME(reflection_class, getProperties, arginfo_reflection_class_getProperties, 0)
|
|
ZEND_ME(reflection_class, hasConstant, arginfo_reflection_class_hasConstant, 0)
|
|
ZEND_ME(reflection_class, getConstants, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getConstant, arginfo_reflection_class_getConstant, 0)
|
|
ZEND_ME(reflection_class, getInterfaces, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getInterfaceNames, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isInterface, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getTraits, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getTraitNames, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getTraitAliases, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isTrait, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isAbstract, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isFinal, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getModifiers, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isInstance, arginfo_reflection_class_isInstance, 0)
|
|
ZEND_ME(reflection_class, newInstance, arginfo_reflection_class_newInstance, 0)
|
|
ZEND_ME(reflection_class, newInstanceWithoutConstructor, arginfo_reflection_class_newInstanceWithoutConstructor, 0)
|
|
ZEND_ME(reflection_class, newInstanceArgs, arginfo_reflection_class_newInstanceArgs, 0)
|
|
ZEND_ME(reflection_class, getParentClass, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isSubclassOf, arginfo_reflection_class_isSubclassOf, 0)
|
|
ZEND_ME(reflection_class, getStaticProperties, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getStaticPropertyValue, arginfo_reflection_class_getStaticPropertyValue, 0)
|
|
ZEND_ME(reflection_class, setStaticPropertyValue, arginfo_reflection_class_setStaticPropertyValue, 0)
|
|
ZEND_ME(reflection_class, getDefaultProperties, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, isIterateable, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, implementsInterface, arginfo_reflection_class_implementsInterface, 0)
|
|
ZEND_ME(reflection_class, getExtension, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getExtensionName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, inNamespace, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getNamespaceName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_class, getShortName, arginfo_reflection__void, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_object_export, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, argument)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_object___construct, 0)
|
|
ZEND_ARG_INFO(0, argument)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_object_functions[] = {
|
|
ZEND_ME(reflection_object, export, arginfo_reflection_object_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_object, __construct, arginfo_reflection_object___construct, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_property_export, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, class)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_property___construct, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, class)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_property_getValue, 0, 0, 0)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_property_setValue, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_ARG_INFO(0, value)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_property_setAccessible, 0)
|
|
ZEND_ARG_INFO(0, visible)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_property_functions[] = {
|
|
ZEND_ME(reflection, __clone, arginfo_reflection__void, ZEND_ACC_PRIVATE|ZEND_ACC_FINAL)
|
|
ZEND_ME(reflection_property, export, arginfo_reflection_property_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_property, __construct, arginfo_reflection_property___construct, 0)
|
|
ZEND_ME(reflection_property, __toString, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, getName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, getValue, arginfo_reflection_property_getValue, 0)
|
|
ZEND_ME(reflection_property, setValue, arginfo_reflection_property_setValue, 0)
|
|
ZEND_ME(reflection_property, isPublic, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, isPrivate, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, isProtected, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, isStatic, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, isDefault, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, getModifiers, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, getDeclaringClass, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, getDocComment, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_property, setAccessible, arginfo_reflection_property_setAccessible, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_parameter_export, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, function)
|
|
ZEND_ARG_INFO(0, parameter)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_parameter___construct, 0)
|
|
ZEND_ARG_INFO(0, function)
|
|
ZEND_ARG_INFO(0, parameter)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_parameter_functions[] = {
|
|
ZEND_ME(reflection, __clone, arginfo_reflection__void, ZEND_ACC_PRIVATE|ZEND_ACC_FINAL)
|
|
ZEND_ME(reflection_parameter, export, arginfo_reflection_parameter_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_parameter, __construct, arginfo_reflection_parameter___construct, 0)
|
|
ZEND_ME(reflection_parameter, __toString, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, getName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, isPassedByReference, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, canBePassedByValue, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, getDeclaringFunction, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, getDeclaringClass, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, getClass, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, isArray, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, isCallable, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, allowsNull, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, getPosition, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, isOptional, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, isDefaultValueAvailable, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, getDefaultValue, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, isDefaultValueConstant, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, getDefaultValueConstantName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_parameter, isVariadic, arginfo_reflection__void, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_reflection_extension_export, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_ARG_INFO(0, return)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_extension___construct, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_extension_functions[] = {
|
|
ZEND_ME(reflection, __clone, arginfo_reflection__void, ZEND_ACC_PRIVATE|ZEND_ACC_FINAL)
|
|
ZEND_ME(reflection_extension, export, arginfo_reflection_extension_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_extension, __construct, arginfo_reflection_extension___construct, 0)
|
|
ZEND_ME(reflection_extension, __toString, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getVersion, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getFunctions, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getConstants, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getINIEntries, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getClasses, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getClassNames, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, getDependencies, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, info, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, isPersistent, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_extension, isTemporary, arginfo_reflection__void, 0)
|
|
PHP_FE_END
|
|
};
|
|
|
|
ZEND_BEGIN_ARG_INFO(arginfo_reflection_zend_extension___construct, 0)
|
|
ZEND_ARG_INFO(0, name)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry reflection_zend_extension_functions[] = {
|
|
ZEND_ME(reflection, __clone, arginfo_reflection__void, ZEND_ACC_PRIVATE|ZEND_ACC_FINAL)
|
|
ZEND_ME(reflection_zend_extension, export, arginfo_reflection_extension_export, ZEND_ACC_STATIC|ZEND_ACC_PUBLIC)
|
|
ZEND_ME(reflection_zend_extension, __construct, arginfo_reflection_extension___construct, 0)
|
|
ZEND_ME(reflection_zend_extension, __toString, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_zend_extension, getName, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_zend_extension, getVersion, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_zend_extension, getAuthor, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_zend_extension, getURL, arginfo_reflection__void, 0)
|
|
ZEND_ME(reflection_zend_extension, getCopyright, arginfo_reflection__void, 0)
|
|
PHP_FE_END
|
|
};
|
|
/* }}} */
|
|
|
|
const zend_function_entry reflection_ext_functions[] = { /* {{{ */
|
|
PHP_FE_END
|
|
}; /* }}} */
|
|
|
|
static zend_object_handlers *zend_std_obj_handlers;
|
|
|
|
/* {{{ _reflection_write_property */
|
|
static void _reflection_write_property(zval *object, zval *member, zval *value, zend_uint cache_slot TSRMLS_DC)
|
|
{
|
|
if ((Z_TYPE_P(member) == IS_STRING)
|
|
&& zend_hash_exists(&Z_OBJCE_P(object)->properties_info, Z_STR_P(member))
|
|
&& ((Z_STRLEN_P(member) == sizeof("name") - 1 && !memcmp(Z_STRVAL_P(member), "name", sizeof("name")))
|
|
|| (Z_STRLEN_P(member) == sizeof("class") - 1 && !memcmp(Z_STRVAL_P(member), "class", sizeof("class")))))
|
|
{
|
|
zend_throw_exception_ex(reflection_exception_ptr, 0 TSRMLS_CC,
|
|
"Cannot set read-only property %s::$%s", Z_OBJCE_P(object)->name->val, Z_STRVAL_P(member));
|
|
}
|
|
else
|
|
{
|
|
zend_std_obj_handlers->write_property(object, member, value, cache_slot TSRMLS_CC);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
PHP_MINIT_FUNCTION(reflection) /* {{{ */
|
|
{
|
|
zend_class_entry _reflection_entry;
|
|
|
|
zend_std_obj_handlers = zend_get_std_object_handlers();
|
|
memcpy(&reflection_object_handlers, zend_get_std_object_handlers(), sizeof(zend_object_handlers));
|
|
reflection_object_handlers.offset = XtOffsetOf(reflection_object, zo);
|
|
reflection_object_handlers.free_obj = reflection_free_objects_storage;
|
|
reflection_object_handlers.clone_obj = NULL;
|
|
reflection_object_handlers.write_property = _reflection_write_property;
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionException", reflection_exception_functions);
|
|
reflection_exception_ptr = zend_register_internal_class_ex(&_reflection_entry, zend_exception_get_default(TSRMLS_C) TSRMLS_CC);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "Reflection", reflection_functions);
|
|
reflection_ptr = zend_register_internal_class(&_reflection_entry TSRMLS_CC);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "Reflector", reflector_functions);
|
|
reflector_ptr = zend_register_internal_interface(&_reflection_entry TSRMLS_CC);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionFunctionAbstract", reflection_function_abstract_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_function_abstract_ptr = zend_register_internal_class(&_reflection_entry TSRMLS_CC);
|
|
reflection_register_implement(reflection_function_abstract_ptr, reflector_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_function_abstract_ptr, "name", sizeof("name")-1, "", ZEND_ACC_ABSTRACT TSRMLS_CC);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionFunction", reflection_function_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_function_ptr = zend_register_internal_class_ex(&_reflection_entry, reflection_function_abstract_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_function_ptr, "name", sizeof("name")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(function, "IS_DEPRECATED", ZEND_ACC_DEPRECATED);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionParameter", reflection_parameter_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_parameter_ptr = zend_register_internal_class(&_reflection_entry TSRMLS_CC);
|
|
reflection_register_implement(reflection_parameter_ptr, reflector_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_parameter_ptr, "name", sizeof("name")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionMethod", reflection_method_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_method_ptr = zend_register_internal_class_ex(&_reflection_entry, reflection_function_abstract_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_method_ptr, "name", sizeof("name")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
zend_declare_property_string(reflection_method_ptr, "class", sizeof("class")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(method, "IS_STATIC", ZEND_ACC_STATIC);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(method, "IS_PUBLIC", ZEND_ACC_PUBLIC);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(method, "IS_PROTECTED", ZEND_ACC_PROTECTED);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(method, "IS_PRIVATE", ZEND_ACC_PRIVATE);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(method, "IS_ABSTRACT", ZEND_ACC_ABSTRACT);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(method, "IS_FINAL", ZEND_ACC_FINAL);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionClass", reflection_class_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_class_ptr = zend_register_internal_class(&_reflection_entry TSRMLS_CC);
|
|
reflection_register_implement(reflection_class_ptr, reflector_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_class_ptr, "name", sizeof("name")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(class, "IS_IMPLICIT_ABSTRACT", ZEND_ACC_IMPLICIT_ABSTRACT_CLASS);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(class, "IS_EXPLICIT_ABSTRACT", ZEND_ACC_EXPLICIT_ABSTRACT_CLASS);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(class, "IS_FINAL", ZEND_ACC_FINAL_CLASS);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionObject", reflection_object_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_object_ptr = zend_register_internal_class_ex(&_reflection_entry, reflection_class_ptr TSRMLS_CC);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionProperty", reflection_property_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_property_ptr = zend_register_internal_class(&_reflection_entry TSRMLS_CC);
|
|
reflection_register_implement(reflection_property_ptr, reflector_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_property_ptr, "name", sizeof("name")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
zend_declare_property_string(reflection_property_ptr, "class", sizeof("class")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(property, "IS_STATIC", ZEND_ACC_STATIC);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(property, "IS_PUBLIC", ZEND_ACC_PUBLIC);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(property, "IS_PROTECTED", ZEND_ACC_PROTECTED);
|
|
REGISTER_REFLECTION_CLASS_CONST_LONG(property, "IS_PRIVATE", ZEND_ACC_PRIVATE);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionExtension", reflection_extension_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_extension_ptr = zend_register_internal_class(&_reflection_entry TSRMLS_CC);
|
|
reflection_register_implement(reflection_extension_ptr, reflector_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_extension_ptr, "name", sizeof("name")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
|
|
INIT_CLASS_ENTRY(_reflection_entry, "ReflectionZendExtension", reflection_zend_extension_functions);
|
|
_reflection_entry.create_object = reflection_objects_new;
|
|
reflection_zend_extension_ptr = zend_register_internal_class(&_reflection_entry TSRMLS_CC);
|
|
reflection_register_implement(reflection_zend_extension_ptr, reflector_ptr TSRMLS_CC);
|
|
zend_declare_property_string(reflection_zend_extension_ptr, "name", sizeof("name")-1, "", ZEND_ACC_PUBLIC TSRMLS_CC);
|
|
|
|
return SUCCESS;
|
|
} /* }}} */
|
|
|
|
PHP_MINFO_FUNCTION(reflection) /* {{{ */
|
|
{
|
|
php_info_print_table_start();
|
|
php_info_print_table_header(2, "Reflection", "enabled");
|
|
|
|
php_info_print_table_row(2, "Version", "$Id$");
|
|
|
|
php_info_print_table_end();
|
|
} /* }}} */
|
|
|
|
zend_module_entry reflection_module_entry = { /* {{{ */
|
|
STANDARD_MODULE_HEADER,
|
|
"Reflection",
|
|
reflection_ext_functions,
|
|
PHP_MINIT(reflection),
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
PHP_MINFO(reflection),
|
|
"$Id$",
|
|
STANDARD_MODULE_PROPERTIES
|
|
}; /* }}} */
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* c-basic-offset: 4
|
|
* indent-tabs-mode: t
|
|
* End:
|
|
* vim600: noet sw=4 ts=4 fdm=marker
|
|
*/
|