mirror of
https://github.com/php/php-src.git
synced 2024-12-02 06:13:40 +08:00
e9914e9d06
[DOC]
650 lines
20 KiB
C
Executable File
650 lines
20 KiB
C
Executable File
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 5 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997-2008 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is SplSubject 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: Marcus Boerger <helly@php.net> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
#include "php.h"
|
|
#include "php_ini.h"
|
|
#include "ext/standard/info.h"
|
|
#include "ext/standard/php_var.h"
|
|
#include "ext/standard/php_smart_str.h"
|
|
#include "zend_interfaces.h"
|
|
#include "zend_exceptions.h"
|
|
|
|
#include "php_spl.h"
|
|
#include "spl_functions.h"
|
|
#include "spl_engine.h"
|
|
#include "spl_observer.h"
|
|
#include "spl_iterators.h"
|
|
#include "spl_array.h"
|
|
#include "spl_exceptions.h"
|
|
|
|
SPL_METHOD(SplObserver, update);
|
|
SPL_METHOD(SplSubject, attach);
|
|
SPL_METHOD(SplSubject, detach);
|
|
SPL_METHOD(SplSubject, notify);
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO(arginfo_SplObserver_update, 0)
|
|
ZEND_ARG_OBJ_INFO(0, SplSubject, SplSubject, 0)
|
|
ZEND_END_ARG_INFO();
|
|
|
|
static const zend_function_entry spl_funcs_SplObserver[] = {
|
|
SPL_ABSTRACT_ME(SplObserver, update, arginfo_SplObserver_update)
|
|
{NULL, NULL, NULL}
|
|
};
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO(arginfo_SplSubject_attach, 0)
|
|
ZEND_ARG_OBJ_INFO(0, SplObserver, SplObserver, 0)
|
|
ZEND_END_ARG_INFO();
|
|
|
|
/*static
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_SplSubject_notify, 0, 0, 1)
|
|
ZEND_ARG_OBJ_INFO(0, ignore, SplObserver, 1)
|
|
ZEND_END_ARG_INFO();*/
|
|
|
|
static const zend_function_entry spl_funcs_SplSubject[] = {
|
|
SPL_ABSTRACT_ME(SplSubject, attach, arginfo_SplSubject_attach)
|
|
SPL_ABSTRACT_ME(SplSubject, detach, arginfo_SplSubject_attach)
|
|
SPL_ABSTRACT_ME(SplSubject, notify, NULL)
|
|
{NULL, NULL, NULL}
|
|
};
|
|
|
|
PHPAPI zend_class_entry *spl_ce_SplObserver;
|
|
PHPAPI zend_class_entry *spl_ce_SplSubject;
|
|
PHPAPI zend_class_entry *spl_ce_SplObjectStorage;
|
|
PHPAPI zend_object_handlers spl_handler_SplObjectStorage;
|
|
|
|
typedef struct _spl_SplObjectStorage { /* {{{ */
|
|
zend_object std;
|
|
HashTable storage;
|
|
long index;
|
|
HashPosition pos;
|
|
} spl_SplObjectStorage; /* }}} */
|
|
|
|
/* {{{ storage is an assoc aray of [zend_object_value]=>[zval *obj, zval *inf] */
|
|
typedef struct _spl_SplObjectStorageElement {
|
|
zval* obj;
|
|
zval* inf;
|
|
} spl_SplObjectStorageElement; /* }}} */
|
|
|
|
void spl_SplOjectStorage_free_storage(void *object TSRMLS_DC) /* {{{ */
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage *)object;
|
|
|
|
zend_object_std_dtor(&intern->std TSRMLS_CC);
|
|
|
|
zend_hash_destroy(&intern->storage);
|
|
|
|
efree(object);
|
|
} /* }}} */
|
|
|
|
static void spl_object_storage_dtor(spl_SplObjectStorageElement *element) /* {{{ */
|
|
{
|
|
zval_ptr_dtor(&element->obj);
|
|
zval_ptr_dtor(&element->inf);
|
|
} /* }}} */
|
|
|
|
static zend_object_value spl_object_storage_new_ex(zend_class_entry *class_type, spl_SplObjectStorage **obj, zval *orig TSRMLS_DC) /* {{{ */
|
|
{
|
|
zend_object_value retval;
|
|
spl_SplObjectStorage *intern;
|
|
zval *tmp;
|
|
|
|
intern = emalloc(sizeof(spl_SplObjectStorage));
|
|
memset(intern, 0, sizeof(spl_SplObjectStorage));
|
|
*obj = intern;
|
|
|
|
zend_object_std_init(&intern->std, class_type TSRMLS_CC);
|
|
zend_hash_copy(intern->std.properties, &class_type->default_properties, (copy_ctor_func_t) zval_add_ref, (void *) &tmp, sizeof(zval *));
|
|
|
|
zend_hash_init(&intern->storage, 0, NULL, (void (*)(void *))spl_object_storage_dtor, 0);
|
|
|
|
retval.handle = zend_objects_store_put(intern, (zend_objects_store_dtor_t)zend_objects_destroy_object, (zend_objects_free_object_storage_t) spl_SplOjectStorage_free_storage, NULL TSRMLS_CC);
|
|
retval.handlers = &spl_handler_SplObjectStorage;
|
|
return retval;
|
|
}
|
|
/* }}} */
|
|
|
|
static HashTable* spl_object_storage_debug_info(zval *obj, int *is_temp TSRMLS_DC) /* {{{ */
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(obj TSRMLS_CC);
|
|
spl_SplObjectStorageElement *element;
|
|
HashTable *rv, *props;
|
|
HashPosition pos;
|
|
zval *tmp, *storage;
|
|
char md5str[33];
|
|
int name_len;
|
|
char *zname;
|
|
|
|
*is_temp = 1;
|
|
|
|
props = Z_OBJPROP_P(obj);
|
|
ALLOC_HASHTABLE(rv);
|
|
ZEND_INIT_SYMTABLE_EX(rv, zend_hash_num_elements(props) + 1, 0);
|
|
|
|
zend_hash_copy(rv, props, (copy_ctor_func_t) zval_add_ref, (void *) &tmp, sizeof(zval *));
|
|
|
|
MAKE_STD_ZVAL(storage);
|
|
array_init(storage);
|
|
|
|
zend_hash_internal_pointer_reset_ex(&intern->storage, &pos);
|
|
while (zend_hash_get_current_data_ex(&intern->storage, (void **)&element, &pos) == SUCCESS) {
|
|
php_spl_object_hash(element->obj, md5str TSRMLS_CC);
|
|
Z_ADDREF_P(element->obj);
|
|
Z_ADDREF_P(element->inf);
|
|
MAKE_STD_ZVAL(tmp);
|
|
array_init(tmp);
|
|
add_assoc_zval_ex(tmp, "obj", sizeof("obj"), element->obj);
|
|
add_assoc_zval_ex(tmp, "inf", sizeof("inf"), element->inf);
|
|
add_assoc_zval_ex(storage, md5str, 33, tmp);
|
|
zend_hash_move_forward_ex(&intern->storage, &pos);
|
|
}
|
|
|
|
zname = spl_gen_private_prop_name(spl_ce_SplObjectStorage, "storage", sizeof("storage")-1, &name_len TSRMLS_CC);
|
|
zend_symtable_update(rv, zname, name_len+1, &storage, sizeof(zval *), NULL);
|
|
efree(zname);
|
|
|
|
return rv;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ spl_array_object_new */
|
|
static zend_object_value spl_SplObjectStorage_new(zend_class_entry *class_type TSRMLS_DC)
|
|
{
|
|
spl_SplObjectStorage *tmp;
|
|
return spl_object_storage_new_ex(class_type, &tmp, NULL TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
int spl_object_storage_contains(spl_SplObjectStorage *intern, zval *obj TSRMLS_DC) /* {{{ */
|
|
{
|
|
#if HAVE_PACKED_OBJECT_VALUE
|
|
return zend_hash_exists(&intern->storage, (char*)&Z_OBJVAL_P(obj), sizeof(zend_object_value));
|
|
#else
|
|
{
|
|
zend_object_value zvalue;
|
|
memset(&zvalue, 0, sizeof(zend_object_value));
|
|
zvalue.handle = Z_OBJ_HANDLE_P(obj);
|
|
zvalue.handlers = Z_OBJ_HT_P(obj);
|
|
return zend_hash_exists(&intern->storage, (char*)&zvalue, sizeof(zend_object_value));
|
|
}
|
|
#endif
|
|
} /* }}} */
|
|
|
|
spl_SplObjectStorageElement* spl_object_storage_get(spl_SplObjectStorage *intern, zval *obj TSRMLS_DC) /* {{{ */
|
|
{
|
|
spl_SplObjectStorageElement *element;
|
|
zend_object_value *pzvalue;
|
|
#if HAVE_PACKED_OBJECT_VALUE
|
|
pzvalue = &Z_OBJVAL_P(obj);
|
|
#else
|
|
zend_object_value zvalue;
|
|
memset(&zvalue, 0, sizeof(zend_object_value));
|
|
zvalue.handle = Z_OBJ_HANDLE_P(obj);
|
|
zvalue.handlers = Z_OBJ_HT_P(obj);
|
|
pzvalue = &zvalue;
|
|
#endif
|
|
if (zend_hash_find(&intern->storage, (char*)pzvalue, sizeof(zend_object_value), (void**)&element) == SUCCESS) {
|
|
return element;
|
|
} else {
|
|
return NULL;
|
|
}
|
|
} /* }}} */
|
|
|
|
|
|
void spl_object_storage_attach(spl_SplObjectStorage *intern, zval *obj, zval *inf TSRMLS_DC) /* {{{ */
|
|
{
|
|
spl_SplObjectStorageElement *pelement, element;
|
|
pelement = spl_object_storage_get(intern, obj TSRMLS_CC);
|
|
if (inf) {
|
|
Z_ADDREF_P(inf);
|
|
} else {
|
|
ALLOC_INIT_ZVAL(inf);
|
|
}
|
|
if (pelement) {
|
|
zval_ptr_dtor(&pelement->inf);
|
|
pelement->inf = inf;
|
|
return;
|
|
}
|
|
Z_ADDREF_P(obj);
|
|
element.obj = obj;
|
|
element.inf = inf;
|
|
#if HAVE_PACKED_OBJECT_VALUE
|
|
zend_hash_update(&intern->storage, (char*)&Z_OBJVAL_P(obj), sizeof(zend_object_value), &element, sizeof(spl_SplObjectStorageElement), NULL);
|
|
#else
|
|
{
|
|
zend_object_value zvalue;
|
|
memset(&zvalue, 0, sizeof(zend_object_value));
|
|
zvalue.handle = Z_OBJ_HANDLE_P(obj);
|
|
zvalue.handlers = Z_OBJ_HT_P(obj);
|
|
zend_hash_update(&intern->storage, (char*)&zvalue, sizeof(zend_object_value), &element, sizeof(spl_SplObjectStorageElement), NULL);
|
|
}
|
|
#endif
|
|
} /* }}} */
|
|
|
|
void spl_object_storage_detach(spl_SplObjectStorage *intern, zval *obj TSRMLS_DC) /* {{{ */
|
|
{
|
|
#if HAVE_PACKED_OBJECT_VALUE
|
|
zend_hash_del(&intern->storage, (char*)&Z_OBJVAL_P(obj), sizeof(zend_object_value));
|
|
#else
|
|
{
|
|
zend_object_value zvalue;
|
|
memset(&zvalue, 0, sizeof(zend_object_value));
|
|
zvalue.handle = Z_OBJ_HANDLE_P(obj);
|
|
zvalue.handlers = Z_OBJ_HT_P(obj);
|
|
zend_hash_del(&intern->storage, (char*)&zvalue, sizeof(zend_object_value));
|
|
}
|
|
#endif
|
|
} /* }}}*/
|
|
|
|
/* {{{ proto void SplObjectStorage::attach($obj, $inf = NULL)
|
|
Attaches an object to the storage if not yet contained */
|
|
SPL_METHOD(SplObjectStorage, attach)
|
|
{
|
|
zval *obj, *inf = NULL;
|
|
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o|z!", &obj, &inf) == FAILURE) {
|
|
return;
|
|
}
|
|
spl_object_storage_attach(intern, obj, inf TSRMLS_CC);
|
|
} /* }}} */
|
|
|
|
/* {{{ proto void SplObjectStorage::detach($obj)
|
|
Detaches an object from the storage */
|
|
SPL_METHOD(SplObjectStorage, detach)
|
|
{
|
|
zval *obj;
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o", &obj) == FAILURE) {
|
|
return;
|
|
}
|
|
spl_object_storage_detach(intern, obj TSRMLS_CC);
|
|
|
|
zend_hash_internal_pointer_reset_ex(&intern->storage, &intern->pos);
|
|
intern->index = 0;
|
|
} /* }}} */
|
|
|
|
/* {{{ proto mixed SplObjectStorage::offsetGet($object)
|
|
Returns associated information for a stored object */
|
|
SPL_METHOD(SplObjectStorage, offsetGet)
|
|
{
|
|
zval *obj;
|
|
spl_SplObjectStorageElement *element;
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o", &obj) == FAILURE) {
|
|
return;
|
|
}
|
|
element = spl_object_storage_get(intern, obj TSRMLS_CC);
|
|
if (!element) {
|
|
zend_throw_exception_ex(spl_ce_UnexpectedValueException, 0 TSRMLS_CC, "Object not found");
|
|
} else {
|
|
RETURN_ZVAL(element->inf,1, 0);
|
|
}
|
|
} /* }}} */
|
|
|
|
/* {{{ proto bool SplObjectStorage::contains($obj)
|
|
Determine whethe an object is contained in the storage */
|
|
SPL_METHOD(SplObjectStorage, contains)
|
|
{
|
|
zval *obj;
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o", &obj) == FAILURE) {
|
|
return;
|
|
}
|
|
RETURN_BOOL(spl_object_storage_contains(intern, obj TSRMLS_CC));
|
|
} /* }}} */
|
|
|
|
/* {{{ proto int SplObjectStorage::count()
|
|
Determine number of objects in storage */
|
|
SPL_METHOD(SplObjectStorage, count)
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
RETURN_LONG(zend_hash_num_elements(&intern->storage));
|
|
} /* }}} */
|
|
|
|
/* {{{ proto void SplObjectStorage::rewind()
|
|
Rewind to first position */
|
|
SPL_METHOD(SplObjectStorage, rewind)
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
zend_hash_internal_pointer_reset_ex(&intern->storage, &intern->pos);
|
|
intern->index = 0;
|
|
} /* }}} */
|
|
|
|
/* {{{ proto bool SplObjectStorage::valid()
|
|
Returns whether current position is valid */
|
|
SPL_METHOD(SplObjectStorage, valid)
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
RETURN_BOOL(zend_hash_has_more_elements_ex(&intern->storage, &intern->pos) == SUCCESS);
|
|
} /* }}} */
|
|
|
|
/* {{{ proto mixed SplObjectStorage::key()
|
|
Returns current key */
|
|
SPL_METHOD(SplObjectStorage, key)
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
RETURN_LONG(intern->index);
|
|
} /* }}} */
|
|
|
|
/* {{{ proto mixed SplObjectStorage::current()
|
|
Returns current element */
|
|
SPL_METHOD(SplObjectStorage, current)
|
|
{
|
|
spl_SplObjectStorageElement *element;
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
if (zend_hash_get_current_data_ex(&intern->storage, (void**)&element, &intern->pos) == FAILURE) {
|
|
return;
|
|
}
|
|
RETVAL_ZVAL(element->obj, 1, 0);
|
|
} /* }}} */
|
|
|
|
/* {{{ proto mixed SplObjectStorage::getInfo()
|
|
Returns associated information to current element */
|
|
SPL_METHOD(SplObjectStorage, getInfo)
|
|
{
|
|
spl_SplObjectStorageElement *element;
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
if (zend_hash_get_current_data_ex(&intern->storage, (void**)&element, &intern->pos) == FAILURE) {
|
|
return;
|
|
}
|
|
RETVAL_ZVAL(element->inf, 1, 0);
|
|
} /* }}} */
|
|
|
|
/* {{{ proto mixed SplObjectStorage::setInfo(mixed $inf)
|
|
Sets associated information of current element to $inf */
|
|
SPL_METHOD(SplObjectStorage, setInfo)
|
|
{
|
|
spl_SplObjectStorageElement *element;
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
zval *inf;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &inf) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (zend_hash_get_current_data_ex(&intern->storage, (void**)&element, &intern->pos) == FAILURE) {
|
|
return;
|
|
}
|
|
zval_ptr_dtor(&element->inf);
|
|
element->inf = inf;
|
|
Z_ADDREF_P(inf);
|
|
} /* }}} */
|
|
|
|
/* {{{ proto void SplObjectStorage::next()
|
|
Moves position forward */
|
|
SPL_METHOD(SplObjectStorage, next)
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
zend_hash_move_forward_ex(&intern->storage, &intern->pos);
|
|
intern->index++;
|
|
} /* }}} */
|
|
|
|
/* {{{ proto string SplObjectStorage::serialize()
|
|
Serializes storage */
|
|
SPL_METHOD(SplObjectStorage, serialize)
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
spl_SplObjectStorageElement *element;
|
|
zval members, *pmembers;
|
|
HashPosition pos;
|
|
php_serialize_data_t var_hash;
|
|
smart_str buf = {0};
|
|
|
|
PHP_VAR_SERIALIZE_INIT(var_hash);
|
|
|
|
/* storage */
|
|
smart_str_appendl(&buf, "x:i:", 4);
|
|
smart_str_append_long(&buf, zend_hash_num_elements(&intern->storage));
|
|
smart_str_appendc(&buf, ';');
|
|
|
|
zend_hash_internal_pointer_reset_ex(&intern->storage, &pos);
|
|
|
|
while(zend_hash_has_more_elements_ex(&intern->storage, &pos) == SUCCESS) {
|
|
if (zend_hash_get_current_data_ex(&intern->storage, (void**)&element, &pos) == FAILURE) {
|
|
smart_str_free(&buf);
|
|
PHP_VAR_SERIALIZE_DESTROY(var_hash);
|
|
RETURN_NULL();
|
|
}
|
|
php_var_serialize(&buf, &element->obj, &var_hash TSRMLS_CC);
|
|
smart_str_appendc(&buf, ',');
|
|
php_var_serialize(&buf, &element->inf, &var_hash TSRMLS_CC);
|
|
smart_str_appendc(&buf, ';');
|
|
zend_hash_move_forward_ex(&intern->storage, &pos);
|
|
}
|
|
|
|
/* members */
|
|
smart_str_appendl(&buf, "m:", 2);
|
|
INIT_PZVAL(&members);
|
|
Z_ARRVAL(members) = intern->std.properties;
|
|
Z_TYPE(members) = IS_ARRAY;
|
|
pmembers = &members;
|
|
php_var_serialize(&buf, &pmembers, &var_hash TSRMLS_CC); /* finishes the string */
|
|
|
|
/* done */
|
|
PHP_VAR_SERIALIZE_DESTROY(var_hash);
|
|
|
|
if (buf.c) {
|
|
RETURN_STRINGL(buf.c, buf.len, 0);
|
|
} else {
|
|
RETURN_NULL();
|
|
}
|
|
|
|
} /* }}} */
|
|
|
|
/* {{{ proto void SplObjectStorage::unserialize(string serialized)
|
|
Unserializes storage */
|
|
SPL_METHOD(SplObjectStorage, unserialize)
|
|
{
|
|
spl_SplObjectStorage *intern = (spl_SplObjectStorage*)zend_object_store_get_object(getThis() TSRMLS_CC);
|
|
|
|
char *buf;
|
|
int buf_len;
|
|
const unsigned char *p, *s;
|
|
php_unserialize_data_t var_hash;
|
|
zval *pentry, *pmembers, *pcount = NULL, *pinf;
|
|
long count;
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &buf, &buf_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (buf_len == 0) {
|
|
zend_throw_exception_ex(spl_ce_UnexpectedValueException, 0 TSRMLS_CC, "Empty serialized string cannot be empty");
|
|
return;
|
|
}
|
|
|
|
/* storage */
|
|
s = p = (const unsigned char*)buf;
|
|
PHP_VAR_UNSERIALIZE_INIT(var_hash);
|
|
|
|
if (*p!= 'x' || *++p != ':') {
|
|
goto outexcept;
|
|
}
|
|
++p;
|
|
|
|
ALLOC_INIT_ZVAL(pcount);
|
|
if (!php_var_unserialize(&pcount, &p, s + buf_len, &var_hash TSRMLS_CC) || Z_TYPE_P(pcount) != IS_LONG) {
|
|
zval_ptr_dtor(&pcount);
|
|
goto outexcept;
|
|
}
|
|
|
|
--p; /* for ';' */
|
|
count = Z_LVAL_P(pcount);
|
|
zval_ptr_dtor(&pcount);
|
|
|
|
while(count-- > 0) {
|
|
if (*p != ';') {
|
|
goto outexcept;
|
|
}
|
|
++p;
|
|
ALLOC_INIT_ZVAL(pentry);
|
|
if (!php_var_unserialize(&pentry, &p, s + buf_len, &var_hash TSRMLS_CC)) {
|
|
zval_ptr_dtor(&pentry);
|
|
goto outexcept;
|
|
}
|
|
ALLOC_INIT_ZVAL(pinf);
|
|
if (*p == ',') { /* new version has inf */
|
|
++p;
|
|
if (!php_var_unserialize(&pinf, &p, s + buf_len, &var_hash TSRMLS_CC)) {
|
|
zval_ptr_dtor(&pinf);
|
|
goto outexcept;
|
|
}
|
|
}
|
|
spl_object_storage_attach(intern, pentry, pinf TSRMLS_CC);
|
|
zval_ptr_dtor(&pentry);
|
|
zval_ptr_dtor(&pinf);
|
|
}
|
|
|
|
if (*p != ';') {
|
|
goto outexcept;
|
|
}
|
|
++p;
|
|
|
|
/* members */
|
|
if (*p!= 'm' || *++p != ':') {
|
|
goto outexcept;
|
|
}
|
|
++p;
|
|
|
|
ALLOC_INIT_ZVAL(pmembers);
|
|
if (!php_var_unserialize(&pmembers, &p, s + buf_len, &var_hash TSRMLS_CC)) {
|
|
zval_ptr_dtor(&pmembers);
|
|
goto outexcept;
|
|
}
|
|
|
|
/* copy members */
|
|
zend_hash_copy(intern->std.properties, Z_ARRVAL_P(pmembers), (copy_ctor_func_t) zval_add_ref, (void *) NULL, sizeof(zval *));
|
|
zval_ptr_dtor(&pmembers);
|
|
|
|
/* done reading $serialized */
|
|
|
|
PHP_VAR_UNSERIALIZE_DESTROY(var_hash);
|
|
return;
|
|
|
|
outexcept:
|
|
PHP_VAR_UNSERIALIZE_DESTROY(var_hash);
|
|
zend_throw_exception_ex(spl_ce_UnexpectedValueException, 0 TSRMLS_CC, "Error at offset %ld of %d bytes", (long)((char*)p - buf), buf_len);
|
|
return;
|
|
|
|
} /* }}} */
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO(arginfo_Object, 0)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_END_ARG_INFO();
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_attach, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_ARG_INFO(0, inf)
|
|
ZEND_END_ARG_INFO();
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO(arginfo_Serialized, 0)
|
|
ZEND_ARG_INFO(0, serialized)
|
|
ZEND_END_ARG_INFO();
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO(arginfo_setInfo, 0)
|
|
ZEND_ARG_INFO(0, info)
|
|
ZEND_END_ARG_INFO();
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_offsetGet, 0, 0, 1)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static
|
|
ZEND_BEGIN_ARG_INFO_EX(arginfo_offsetSet, 0, 0, 2)
|
|
ZEND_ARG_INFO(0, object)
|
|
ZEND_ARG_INFO(0, info)
|
|
ZEND_END_ARG_INFO()
|
|
|
|
static const zend_function_entry spl_funcs_SplObjectStorage[] = {
|
|
SPL_ME(SplObjectStorage, attach, arginfo_attach, 0)
|
|
SPL_ME(SplObjectStorage, detach, arginfo_Object, 0)
|
|
SPL_ME(SplObjectStorage, contains, arginfo_Object, 0)
|
|
SPL_ME(SplObjectStorage, getInfo, NULL, 0)
|
|
SPL_ME(SplObjectStorage, setInfo, arginfo_setInfo, 0)
|
|
/* Countable */
|
|
SPL_ME(SplObjectStorage, count, NULL, 0)
|
|
/* Iterator */
|
|
SPL_ME(SplObjectStorage, rewind, NULL, 0)
|
|
SPL_ME(SplObjectStorage, valid, NULL, 0)
|
|
SPL_ME(SplObjectStorage, key, NULL, 0)
|
|
SPL_ME(SplObjectStorage, current, NULL, 0)
|
|
SPL_ME(SplObjectStorage, next, NULL, 0)
|
|
/* Serializable */
|
|
SPL_ME(SplObjectStorage, unserialize, arginfo_Serialized, 0)
|
|
SPL_ME(SplObjectStorage, serialize, NULL, 0)
|
|
/* ArrayAccess */
|
|
SPL_MA(SplObjectStorage, offsetExists, SplObjectStorage, contains, arginfo_offsetGet, 0)
|
|
SPL_MA(SplObjectStorage, offsetSet, SplObjectStorage, attach, arginfo_offsetSet, 0)
|
|
SPL_MA(SplObjectStorage, offsetUnset, SplObjectStorage, detach, arginfo_offsetGet, 0)
|
|
SPL_ME(SplObjectStorage, offsetGet, arginfo_offsetGet, 0)
|
|
{NULL, NULL, NULL}
|
|
};
|
|
|
|
/* {{{ PHP_MINIT_FUNCTION(spl_observer) */
|
|
PHP_MINIT_FUNCTION(spl_observer)
|
|
{
|
|
REGISTER_SPL_INTERFACE(SplObserver);
|
|
REGISTER_SPL_INTERFACE(SplSubject);
|
|
|
|
REGISTER_SPL_STD_CLASS_EX(SplObjectStorage, spl_SplObjectStorage_new, spl_funcs_SplObjectStorage);
|
|
memcpy(&spl_handler_SplObjectStorage, zend_get_std_object_handlers(), sizeof(zend_object_handlers));
|
|
spl_handler_SplObjectStorage.get_debug_info = spl_object_storage_debug_info;
|
|
|
|
REGISTER_SPL_IMPLEMENTS(SplObjectStorage, Countable);
|
|
REGISTER_SPL_IMPLEMENTS(SplObjectStorage, Iterator);
|
|
REGISTER_SPL_IMPLEMENTS(SplObjectStorage, Serializable);
|
|
REGISTER_SPL_IMPLEMENTS(SplObjectStorage, ArrayAccess);
|
|
|
|
return SUCCESS;
|
|
}
|
|
/* }}} */
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* c-basic-offset: 4
|
|
* End:
|
|
* vim600: fdm=marker
|
|
* vim: noet sw=4 ts=4
|
|
*/
|