#include <php.h>
#include <ext/standard/info.h>
-#include "php_propro.h"
+#include "php_propro_api.h"
#define DEBUG_PROPRO 0
return ref;
}
-php_property_proxy_t *php_property_proxy_init(zval *container,
- zend_string *member TSRMLS_DC)
+php_property_proxy_t *php_property_proxy_init(zval *container, zend_string *member)
{
php_property_proxy_t *proxy = ecalloc(1, sizeof(*proxy));
ZVAL_COPY(&proxy->container, get_referenced_zval(container));
- zend_string_addref(member);
- proxy->member = member;
+ proxy->member = zend_string_copy(member);
return proxy;
}
}
static inline php_property_proxy_object_t *get_propro(zval *object);
-static zval *get_parent_proxied_value(zval *object, zval *return_value TSRMLS_DC);
-static zval *get_proxied_value(zval *object, zval *return_value TSRMLS_DC);
-static zval *read_dimension(zval *object, zval *offset, int type, zval *return_value TSRMLS_DC);
-static ZEND_RESULT_CODE cast_proxied_value(zval *object, zval *return_value, int type TSRMLS_DC);
-static void write_dimension(zval *object, zval *offset, zval *value TSRMLS_DC);
-static void set_proxied_value(zval *object, zval *value TSRMLS_DC);
+static zval *get_parent_proxied_value(zval *object, zval *return_value);
+static zval *get_proxied_value(zval *object, zval *return_value);
+static zval *read_dimension(zval *object, zval *offset, int type, zval *return_value);
+static ZEND_RESULT_CODE cast_proxied_value(zval *object, zval *return_value, int type);
+static void write_dimension(zval *object, zval *offset, zval *value);
+static void set_proxied_value(zval *object, zval *value);
#if DEBUG_PROPRO
/* we do not really care about TS when debugging */
#define debug_propro(l, f, obj, off, val)
#endif
-static php_property_proxy_object_t *new_propro(zend_class_entry *ce,
- php_property_proxy_t *proxy TSRMLS_DC)
+php_property_proxy_object_t *php_property_proxy_object_new_ex(
+ zend_class_entry *ce, php_property_proxy_t *proxy)
{
php_property_proxy_object_t *o;
}
o = ecalloc(1, sizeof(*o) + sizeof(zval) * (ce->default_properties_count - 1));
- zend_object_std_init(&o->zo, ce TSRMLS_CC);
+ zend_object_std_init(&o->zo, ce);
object_properties_init(&o->zo, ce);
o->proxy = proxy;
o->zo.handlers = &php_property_proxy_object_handlers;
- debug_propro(0, "init", o, NULL, NULL TSRMLS_CC);
+ debug_propro(0, "init", o, NULL, NULL);
return o;
}
-static zend_object *create_obj(zend_class_entry *ce TSRMLS_DC)
+zend_object *php_property_proxy_object_new(zend_class_entry *ce)
{
- return &new_propro(ce, NULL TSRMLS_CC)->zo;
+ return &php_property_proxy_object_new_ex(ce, NULL)->zo;
}
-static void destroy_obj(zend_object *object TSRMLS_DC)
+static void destroy_obj(zend_object *object)
{
php_property_proxy_object_t *o = PHP_PROPRO_PTR(object);
- debug_propro(0, "dtor", o, NULL, NULL TSRMLS_CC);
+ debug_propro(0, "dtor", o, NULL, NULL);
if (o->proxy) {
php_property_proxy_free(&o->proxy);
zval_ptr_dtor(&o->parent);
ZVAL_UNDEF(&o->parent);
}
+ zend_object_std_dtor(object);
}
static inline php_property_proxy_object_t *get_propro(zval *object)
return PHP_PROPRO_PTR(Z_OBJ_P(object));
}
-static inline zend_bool got_value(zval *container, zval *value TSRMLS_DC)
+static inline zend_bool got_value(zval *container, zval *value)
{
zval identical;
if (!Z_ISUNDEF_P(value)) {
- if (SUCCESS == is_identical_function(&identical, value, container TSRMLS_CC)) {
+ if (SUCCESS == is_identical_function(&identical, value, container)) {
if (Z_TYPE(identical) != IS_TRUE) {
return 1;
}
return 0;
}
-static zval *get_parent_proxied_value(zval *object, zval *return_value TSRMLS_DC)
+static zval *get_parent_proxied_value(zval *object, zval *return_value)
{
php_property_proxy_object_t *obj;
obj = get_propro(object);
- debug_propro(1, "parent_get", obj, NULL, NULL TSRMLS_CC);
+ debug_propro(1, "parent_get", obj, NULL, NULL);
if (obj->proxy) {
if (!Z_ISUNDEF(obj->parent)) {
- get_proxied_value(&obj->parent, return_value TSRMLS_CC);
+ get_proxied_value(&obj->parent, return_value);
}
}
- debug_propro(-1, "parent_get", obj, NULL, return_value TSRMLS_CC);
+ debug_propro(-1, "parent_get", obj, NULL, return_value);
return return_value;
}
-static zval *get_proxied_value(zval *object, zval *return_value TSRMLS_DC)
+static zval *get_proxied_value(zval *object, zval *return_value)
{
- zval *hash_value, *ref;
+ zval *hash_value, *ref, prop_tmp;
php_property_proxy_object_t *obj;
obj = get_propro(object);
- debug_propro(1, "get", obj, NULL, NULL TSRMLS_CC);
+ debug_propro(1, "get", obj, NULL, NULL);
if (obj->proxy) {
if (!Z_ISUNDEF(obj->parent)) {
zval parent_value;
ZVAL_UNDEF(&parent_value);
- get_parent_proxied_value(object, &parent_value TSRMLS_CC);
+ get_parent_proxied_value(object, &parent_value);
- if (got_value(&obj->proxy->container, &parent_value TSRMLS_CC)) {
+ if (got_value(&obj->proxy->container, &parent_value)) {
zval_ptr_dtor(&obj->proxy->container);
ZVAL_COPY(&obj->proxy->container, &parent_value);
}
switch (Z_TYPE_P(ref)) {
case IS_OBJECT:
RETVAL_ZVAL(zend_read_property(Z_OBJCE_P(ref), ref,
- obj->proxy->member->val, obj->proxy->member->len, 0 TSRMLS_CC),
+ obj->proxy->member->val, obj->proxy->member->len, 0, &prop_tmp),
0, 0);
break;
}
}
- debug_propro(-1, "get", obj, NULL, return_value TSRMLS_CC);
+ debug_propro(-1, "get", obj, NULL, return_value);
return return_value;
}
static ZEND_RESULT_CODE cast_proxied_value(zval *object, zval *return_value,
- int type TSRMLS_DC)
+ int type)
{
- get_proxied_value(object, return_value TSRMLS_CC);
+ get_proxied_value(object, return_value);
- debug_propro(0, "cast", get_propro(object), NULL, return_value TSRMLS_CC);
+ debug_propro(0, "cast", get_propro(object), NULL, return_value);
if (!Z_ISUNDEF_P(return_value)) {
convert_to_explicit_type_ex(return_value, type);
return FAILURE;
}
-static void set_proxied_value(zval *object, zval *value TSRMLS_DC)
+static void set_proxied_value(zval *object, zval *value)
{
php_property_proxy_object_t *obj;
zval *ref;
zval parent_value;
ZVAL_UNDEF(&parent_value);
- get_parent_proxied_value(object, &parent_value TSRMLS_CC);
+ get_parent_proxied_value(object, &parent_value);
- if (got_value(&obj->proxy->container, &parent_value TSRMLS_CC)) {
+ if (got_value(&obj->proxy->container, &parent_value)) {
zval_ptr_dtor(&obj->proxy->container);
ZVAL_COPY(&obj->proxy->container, &parent_value);
}
switch (Z_TYPE_P(ref)) {
case IS_OBJECT:
zend_update_property(Z_OBJCE_P(ref), ref, obj->proxy->member->val,
- obj->proxy->member->len, value TSRMLS_CC);
+ obj->proxy->member->len, value);
break;
default:
}
if (!Z_ISUNDEF(obj->parent)) {
- set_proxied_value(&obj->parent, &obj->proxy->container TSRMLS_CC);
+ set_proxied_value(&obj->parent, &obj->proxy->container);
}
}
- debug_propro(-1, "set", obj, NULL, NULL TSRMLS_CC);
+ debug_propro(-1, "set", obj, NULL, NULL);
}
-static zval *read_dimension(zval *object, zval *offset, int type, zval *return_value TSRMLS_DC)
+static zval *read_dimension(zval *object, zval *offset, int type, zval *return_value)
{
zval proxied_value;
- zval *o = offset;
+ zend_string *member = offset ? zval_get_string(offset) : NULL;
debug_propro(1, type == BP_VAR_R ? "dim_read" : "dim_read_ref",
- get_propro(object), offset, NULL TSRMLS_CC);
+ get_propro(object), offset, NULL);
ZVAL_UNDEF(&proxied_value);
- get_proxied_value(object, &proxied_value TSRMLS_CC);
+ get_proxied_value(object, &proxied_value);
- if (o) {
- convert_to_string_ex(o);
- }
-
- if (BP_VAR_R == type && o && !Z_ISUNDEF(proxied_value)) {
+ if (BP_VAR_R == type && member && !Z_ISUNDEF(proxied_value)) {
if (Z_TYPE(proxied_value) == IS_ARRAY) {
zval *hash_value = zend_symtable_find(Z_ARRVAL(proxied_value),
- Z_STR_P(o));
+ member);
if (hash_value) {
RETVAL_ZVAL(hash_value, 1, 0);
}
}
} else {
- zend_string *member;
php_property_proxy_t *proxy;
php_property_proxy_object_t *proxy_obj;
Z_ADDREF(proxied_value);
} else {
array_init(&proxied_value);
- set_proxied_value(object, &proxied_value TSRMLS_CC);
+ set_proxied_value(object, &proxied_value);
}
- if (o) {
- member = Z_STR_P(o);
- } else {
+ if (!member) {
member = zend_long_to_str(zend_hash_next_free_element(
Z_ARRVAL(proxied_value)));
}
- proxy = php_property_proxy_init(&proxied_value, member TSRMLS_CC);
+ proxy = php_property_proxy_init(&proxied_value, member);
zval_ptr_dtor(&proxied_value);
- if (!o) {
- zend_string_release(member);
- }
-
- proxy_obj = new_propro(NULL, proxy TSRMLS_CC);
+ proxy_obj = php_property_proxy_object_new_ex(NULL, proxy);
ZVAL_COPY(&proxy_obj->parent, object);
RETVAL_OBJ(&proxy_obj->zo);
}
- if (o && o != offset) {
- zval_ptr_dtor(o);
+ if (member) {
+ zend_string_release(member);
}
debug_propro(-1, type == BP_VAR_R ? "dim_read" : "dim_read_ref",
- get_propro(object), offset, return_value TSRMLS_CC);
+ get_propro(object), offset, return_value);
return return_value;
}
-static int has_dimension(zval *object, zval *offset, int check_empty TSRMLS_DC)
+static int has_dimension(zval *object, zval *offset, int check_empty)
{
zval proxied_value;
int exists = 0;
- debug_propro(1, "dim_exists", get_propro(object), offset, NULL TSRMLS_CC);
+ debug_propro(1, "dim_exists", get_propro(object), offset, NULL);
ZVAL_UNDEF(&proxied_value);
- get_proxied_value(object, &proxied_value TSRMLS_CC);
+ get_proxied_value(object, &proxied_value);
if (Z_ISUNDEF(proxied_value)) {
exists = 0;
} else {
- zval *o = offset;
-
- convert_to_string_ex(o);
+ zend_string *zs = zval_get_string(offset);
if (Z_TYPE(proxied_value) == IS_ARRAY) {
- zval *zentry = zend_symtable_find(Z_ARRVAL(proxied_value), Z_STR_P(o));
+ zval *zentry = zend_symtable_find(Z_ARRVAL(proxied_value), zs);
if (!zentry) {
exists = 0;
}
}
- if (o != offset) {
- zval_ptr_dtor(o);
- }
+ zend_string_release(zs);
}
- debug_propro(-1, "dim_exists", get_propro(object), offset, NULL TSRMLS_CC);
+ debug_propro(-1, "dim_exists", get_propro(object), offset, NULL);
return exists;
}
-static void write_dimension(zval *object, zval *offset, zval *value TSRMLS_DC)
+static void write_dimension(zval *object, zval *offset, zval *value)
{
- zval proxied_value, *o = offset;
+ zval proxied_value;
- debug_propro(1, "dim_write", get_propro(object), offset, value TSRMLS_CC);
+ debug_propro(1, "dim_write", get_propro(object), offset, value);
ZVAL_UNDEF(&proxied_value);
- get_proxied_value(object, &proxied_value TSRMLS_CC);
+ get_proxied_value(object, &proxied_value);
if (!Z_ISUNDEF(proxied_value)) {
if (Z_TYPE(proxied_value) == IS_ARRAY) {
SEPARATE_ZVAL(value);
Z_TRY_ADDREF_P(value);
- if (o) {
- convert_to_string_ex(o);
- zend_symtable_update(Z_ARRVAL(proxied_value), Z_STR_P(o), value);
+ if (offset) {
+ zend_string *zs = zval_get_string(offset);
+ zend_symtable_update(Z_ARRVAL(proxied_value), zs, value);
+ zend_string_release(zs);
} else {
zend_hash_next_index_insert(Z_ARRVAL(proxied_value), value);
}
- if (o && o != offset) {
- zval_ptr_dtor(o);
- }
-
- set_proxied_value(object, &proxied_value TSRMLS_CC);
+ set_proxied_value(object, &proxied_value);
- debug_propro(-1, "dim_write", get_propro(object), offset, &proxied_value TSRMLS_CC);
+ debug_propro(-1, "dim_write", get_propro(object), offset, &proxied_value);
zval_ptr_dtor(&proxied_value);
}
-static void unset_dimension(zval *object, zval *offset TSRMLS_DC)
+static void unset_dimension(zval *object, zval *offset)
{
zval proxied_value;
- debug_propro(1, "dim_unset", get_propro(object), offset, NULL TSRMLS_CC);
+ debug_propro(1, "dim_unset", get_propro(object), offset, NULL);
- get_proxied_value(object, &proxied_value TSRMLS_CC);
+ ZVAL_UNDEF(&proxied_value);
+ get_proxied_value(object, &proxied_value);
if (Z_TYPE(proxied_value) == IS_ARRAY) {
zval *o = offset;
convert_to_string_ex(o);
rv = zend_symtable_del(Z_ARRVAL(proxied_value), Z_STR_P(o));
if (SUCCESS == rv) {
- set_proxied_value(object, &proxied_value TSRMLS_CC);
+ set_proxied_value(object, &proxied_value);
}
if (o != offset) {
}
}
- debug_propro(-1, "dim_unset", get_propro(object), offset, &proxied_value TSRMLS_CC);
+ debug_propro(-1, "dim_unset", get_propro(object), offset, &proxied_value);
}
ZEND_BEGIN_ARG_INFO_EX(ai_propro_construct, 0, 0, 2)
zval *container, *parent = NULL;
zend_string *member;
- zend_replace_error_handling(EH_THROW, NULL, &zeh TSRMLS_CC);
- if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zS|O!",
+ zend_replace_error_handling(EH_THROW, NULL, &zeh);
+ if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS(), "zS|O!",
&container, &member, &parent,
php_property_proxy_class_entry)) {
php_property_proxy_object_t *obj;
convert_to_array(ref);
}
obj = get_propro(getThis());
- obj->proxy = php_property_proxy_init(container, member TSRMLS_CC);
+ obj->proxy = php_property_proxy_init(container, member);
if (parent) {
ZVAL_COPY(&obj->parent, parent);
}
}
- zend_restore_error_handling(&zeh TSRMLS_CC);
+ zend_restore_error_handling(&zeh);
}
static const zend_function_entry php_property_proxy_method_entry[] = {
INIT_NS_CLASS_ENTRY(ce, "php", "PropertyProxy",
php_property_proxy_method_entry);
- php_property_proxy_class_entry = zend_register_internal_class(&ce TSRMLS_CC);
- php_property_proxy_class_entry->create_object = create_obj;
+ php_property_proxy_class_entry = zend_register_internal_class(&ce);
+ php_property_proxy_class_entry->create_object = php_property_proxy_object_new;
php_property_proxy_class_entry->ce_flags |= ZEND_ACC_FINAL;
memcpy(&php_property_proxy_object_handlers, zend_get_std_object_handlers(),
sizeof(zend_object_handlers));
php_property_proxy_object_handlers.offset = XtOffsetOf(php_property_proxy_object_t, zo);
- php_property_proxy_object_handlers.dtor_obj = destroy_obj;
+ php_property_proxy_object_handlers.free_obj = destroy_obj;
php_property_proxy_object_handlers.set = set_proxied_value;
php_property_proxy_object_handlers.get = get_proxied_value;
php_property_proxy_object_handlers.cast_object = cast_proxied_value;