2003-11-09 22:05:36 +08:00
/*
+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
| PHP Version 5 |
+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
2006-01-01 20:51:34 +08:00
| Copyright ( c ) 1997 - 2006 The PHP Group |
2003-11-09 22:05:36 +08:00
+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
2006-01-01 20:51:34 +08:00
| This source file is subject to version 3.01 of the PHP license , |
2003-11-09 22:05:36 +08:00
| that is bundled with this package in the file LICENSE , and is |
| available through the world - wide - web at the following url : |
2006-01-01 20:51:34 +08:00
| http : //www.php.net/license/3_01.txt |
2003-11-09 22:05:36 +08:00
| 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 > |
+ - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
*/
2004-01-21 04:59:45 +08:00
/* $Id$ */
2003-11-09 22:05:36 +08:00
# ifdef HAVE_CONFIG_H
# include "config.h"
# endif
# include "php.h"
# include "php_ini.h"
# include "ext/standard/info.h"
2004-02-12 18:43:27 +08:00
# include "zend_exceptions.h"
2003-11-09 22:05:36 +08:00
# include "zend_interfaces.h"
# include "php_spl.h"
# include "spl_functions.h"
# include "spl_engine.h"
# include "spl_iterators.h"
2003-12-02 15:18:05 +08:00
# include "spl_directory.h"
2004-11-01 08:26:59 +08:00
# include "spl_array.h"
2004-11-02 01:39:59 +08:00
# include "spl_exceptions.h"
2003-11-09 22:05:36 +08:00
2006-04-13 21:21:43 +08:00
# ifdef accept
# undef accept
# endif
2004-11-02 04:57:23 +08:00
PHPAPI zend_class_entry * spl_ce_RecursiveIterator ;
PHPAPI zend_class_entry * spl_ce_RecursiveIteratorIterator ;
PHPAPI zend_class_entry * spl_ce_FilterIterator ;
2005-09-15 11:33:04 +08:00
PHPAPI zend_class_entry * spl_ce_RecursiveFilterIterator ;
2004-11-02 04:57:23 +08:00
PHPAPI zend_class_entry * spl_ce_ParentIterator ;
PHPAPI zend_class_entry * spl_ce_SeekableIterator ;
PHPAPI zend_class_entry * spl_ce_LimitIterator ;
PHPAPI zend_class_entry * spl_ce_CachingIterator ;
2005-09-19 01:15:04 +08:00
PHPAPI zend_class_entry * spl_ce_RecursiveCachingIterator ;
2004-11-02 04:57:23 +08:00
PHPAPI zend_class_entry * spl_ce_OuterIterator ;
PHPAPI zend_class_entry * spl_ce_IteratorIterator ;
PHPAPI zend_class_entry * spl_ce_NoRewindIterator ;
PHPAPI zend_class_entry * spl_ce_InfiniteIterator ;
PHPAPI zend_class_entry * spl_ce_EmptyIterator ;
PHPAPI zend_class_entry * spl_ce_AppendIterator ;
2006-05-11 00:50:57 +08:00
PHPAPI zend_class_entry * spl_ce_RegexIterator ;
PHPAPI zend_class_entry * spl_ce_RecursiveRegexIterator ;
2003-11-09 22:05:36 +08:00
2005-12-06 10:00:14 +08:00
zend_function_entry spl_funcs_RecursiveIterator [ ] = {
2003-11-09 22:05:36 +08:00
SPL_ABSTRACT_ME ( RecursiveIterator , hasChildren , NULL )
SPL_ABSTRACT_ME ( RecursiveIterator , getChildren , NULL )
{ NULL , NULL , NULL }
} ;
2003-11-11 08:25:26 +08:00
typedef enum {
RIT_LEAVES_ONLY = 0 ,
RIT_SELF_FIRST = 1 ,
RIT_CHILD_FIRST = 2
} RecursiveIteratorMode ;
2005-07-29 05:09:02 +08:00
# define RIT_CATCH_GET_CHILD CIT_CATCH_GET_CHILD
2005-07-28 06:19:01 +08:00
2003-11-11 08:25:26 +08:00
typedef enum {
RS_NEXT = 0 ,
RS_TEST = 1 ,
RS_SELF = 2 ,
RS_CHILD = 3 ,
RS_START = 4
} RecursiveIteratorState ;
2003-11-09 22:05:36 +08:00
typedef struct _spl_sub_iterator {
zend_object_iterator * iterator ;
zval * zobject ;
zend_class_entry * ce ;
2003-11-11 08:25:26 +08:00
RecursiveIteratorState state ;
2003-11-09 22:05:36 +08:00
} spl_sub_iterator ;
typedef struct _spl_recursive_it_object {
zend_object std ;
spl_sub_iterator * iterators ;
int level ;
2003-11-11 08:25:26 +08:00
RecursiveIteratorMode mode ;
2005-07-28 06:19:01 +08:00
int flags ;
2005-10-06 05:59:13 +08:00
int max_depth ;
zend_bool in_iteration ;
zend_function * beginIteration ;
zend_function * endIteration ;
2005-03-13 07:03:33 +08:00
zend_function * callHasChildren ;
zend_function * callGetChildren ;
2004-11-02 07:02:10 +08:00
zend_function * beginChildren ;
zend_function * endChildren ;
2005-09-15 11:33:04 +08:00
zend_function * nextElement ;
2004-11-02 07:02:10 +08:00
zend_class_entry * ce ;
2003-11-09 22:05:36 +08:00
} spl_recursive_it_object ;
typedef struct _spl_recursive_it_iterator {
zend_object_iterator intern ;
zval * zobject ;
} spl_recursive_it_iterator ;
2003-12-08 16:39:18 +08:00
static zend_object_handlers spl_handlers_rec_it_it ;
static zend_object_handlers spl_handlers_dual_it ;
2003-11-09 22:05:36 +08:00
static void spl_recursive_it_dtor ( zend_object_iterator * _iter TSRMLS_DC )
{
spl_recursive_it_iterator * iter = ( spl_recursive_it_iterator * ) _iter ;
spl_recursive_it_object * object = ( spl_recursive_it_object * ) _iter - > data ;
zend_object_iterator * sub_iter ;
while ( object - > level ) {
sub_iter = object - > iterators [ object - > level ] . iterator ;
sub_iter - > funcs - > dtor ( sub_iter TSRMLS_CC ) ;
zval_ptr_dtor ( & object - > iterators [ object - > level - - ] . zobject ) ;
}
2005-10-06 05:59:13 +08:00
object - > iterators = erealloc ( object - > iterators , sizeof ( spl_sub_iterator ) ) ;
2003-11-09 22:05:36 +08:00
object - > level = 0 ;
zval_ptr_dtor ( & iter - > zobject ) ;
efree ( iter ) ;
}
2005-10-06 05:59:13 +08:00
static int spl_recursive_it_valid_ex ( spl_recursive_it_object * object , zval * zthis TSRMLS_DC )
2003-11-09 22:05:36 +08:00
{
zend_object_iterator * sub_iter ;
int level = object - > level ;
while ( level > = 0 ) {
sub_iter = object - > iterators [ level ] . iterator ;
2004-03-09 02:05:41 +08:00
if ( sub_iter - > funcs - > valid ( sub_iter TSRMLS_CC ) = = SUCCESS ) {
2003-11-09 22:05:36 +08:00
return SUCCESS ;
}
level - - ;
}
2005-10-06 05:59:13 +08:00
if ( object - > endIteration & & object - > in_iteration ) {
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > endIteration , " endIteration " , NULL ) ;
}
object - > in_iteration = 0 ;
2003-11-09 22:05:36 +08:00
return FAILURE ;
}
2004-03-09 02:05:41 +08:00
static int spl_recursive_it_valid ( zend_object_iterator * iter TSRMLS_DC )
2003-11-09 22:05:36 +08:00
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) iter - > data ;
2005-10-06 05:59:13 +08:00
return spl_recursive_it_valid_ex ( object , ( ( spl_recursive_it_iterator * ) iter ) - > zobject TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
}
static void spl_recursive_it_get_current_data ( zend_object_iterator * iter , zval * * * data TSRMLS_DC )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) iter - > data ;
zend_object_iterator * sub_iter = object - > iterators [ object - > level ] . iterator ;
2003-11-17 08:57:01 +08:00
sub_iter - > funcs - > get_current_data ( sub_iter , data TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
}
static int spl_recursive_it_get_current_key ( zend_object_iterator * iter , char * * str_key , uint * str_key_len , ulong * int_key TSRMLS_DC )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) iter - > data ;
zend_object_iterator * sub_iter = object - > iterators [ object - > level ] . iterator ;
if ( sub_iter - > funcs - > get_current_key ) {
return sub_iter - > funcs - > get_current_key ( sub_iter , str_key , str_key_len , int_key TSRMLS_CC ) ;
} else {
* int_key = iter - > index ;
return HASH_KEY_IS_LONG ;
}
}
2004-11-02 06:54:12 +08:00
static void spl_recursive_it_move_forward_ex ( spl_recursive_it_object * object , zval * zthis TSRMLS_DC )
2003-11-09 22:05:36 +08:00
{
zend_object_iterator * iterator ;
zval * zobject ;
zend_class_entry * ce ;
zval * retval , * child ;
zend_object_iterator * sub_iter ;
2005-03-07 06:57:05 +08:00
int has_children ;
2003-11-09 22:05:36 +08:00
2005-03-07 07:07:43 +08:00
while ( ! EG ( exception ) ) {
2003-11-11 08:25:26 +08:00
next_step :
2003-11-09 22:05:36 +08:00
iterator = object - > iterators [ object - > level ] . iterator ;
2003-11-11 08:25:26 +08:00
switch ( object - > iterators [ object - > level ] . state ) {
case RS_NEXT :
iterator - > funcs - > move_forward ( iterator TSRMLS_CC ) ;
2006-05-22 02:13:37 +08:00
if ( EG ( exception ) ) {
if ( ! ( object - > flags & RIT_CATCH_GET_CHILD ) ) {
return ;
} else {
zend_clear_exception ( TSRMLS_C ) ;
}
}
2003-11-11 08:25:26 +08:00
case RS_START :
2004-03-09 02:05:41 +08:00
if ( iterator - > funcs - > valid ( iterator TSRMLS_CC ) = = FAILURE ) {
2003-11-11 08:25:26 +08:00
break ;
}
object - > iterators [ object - > level ] . state = RS_TEST ;
/* break; */
case RS_TEST :
ce = object - > iterators [ object - > level ] . ce ;
zobject = object - > iterators [ object - > level ] . zobject ;
2005-03-13 07:03:33 +08:00
if ( object - > callHasChildren ) {
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > callHasChildren , " callHasChildren " , & retval ) ;
} else {
zend_call_method_with_0_params ( & zobject , ce , NULL , " haschildren " , & retval ) ;
}
2006-05-22 02:13:37 +08:00
if ( EG ( exception ) ) {
if ( ! ( object - > flags & RIT_CATCH_GET_CHILD ) ) {
object - > iterators [ object - > level ] . state = RS_NEXT ;
return ;
} else {
zend_clear_exception ( TSRMLS_C ) ;
}
}
2005-03-07 06:57:05 +08:00
if ( retval ) {
has_children = zend_is_true ( retval ) ;
2003-11-11 08:25:26 +08:00
zval_ptr_dtor ( & retval ) ;
2005-03-07 06:57:05 +08:00
if ( has_children ) {
2005-10-06 05:59:13 +08:00
if ( object - > max_depth = = - 1 | | object - > max_depth > object - > level ) {
2005-12-22 08:37:07 +08:00
switch ( object - > mode ) {
case RIT_LEAVES_ONLY :
case RIT_CHILD_FIRST :
object - > iterators [ object - > level ] . state = RS_CHILD ;
goto next_step ;
case RIT_SELF_FIRST :
object - > iterators [ object - > level ] . state = RS_SELF ;
goto next_step ;
}
2005-10-06 05:59:13 +08:00
} else {
/* do not recurse into */
if ( object - > mode = = RIT_LEAVES_ONLY ) {
/* this is not a leave, so skip it */
object - > iterators [ object - > level ] . state = RS_NEXT ;
goto next_step ;
}
}
2003-11-11 08:25:26 +08:00
}
}
2005-09-15 11:33:04 +08:00
if ( object - > nextElement ) {
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > nextElement , " nextelement " , NULL ) ;
}
2003-11-11 08:25:26 +08:00
object - > iterators [ object - > level ] . state = RS_NEXT ;
2006-05-22 02:13:37 +08:00
if ( EG ( exception ) ) {
if ( ! ( object - > flags & RIT_CATCH_GET_CHILD ) ) {
return ;
} else {
zend_clear_exception ( TSRMLS_C ) ;
}
}
2003-11-11 08:25:26 +08:00
return /* self */ ;
case RS_SELF :
2005-09-15 11:33:04 +08:00
if ( object - > nextElement & & ( object - > mode = = RIT_SELF_FIRST | | object - > mode = = RIT_CHILD_FIRST ) ) {
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > nextElement , " nextelement " , NULL ) ;
}
2003-11-11 08:25:26 +08:00
if ( object - > mode = = RIT_SELF_FIRST ) {
object - > iterators [ object - > level ] . state = RS_CHILD ;
} else {
object - > iterators [ object - > level ] . state = RS_NEXT ;
}
return /* self */ ;
case RS_CHILD :
ce = object - > iterators [ object - > level ] . ce ;
zobject = object - > iterators [ object - > level ] . zobject ;
2005-03-13 07:03:33 +08:00
if ( object - > callGetChildren ) {
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > callGetChildren , " callGetChildren " , & child ) ;
} else {
zend_call_method_with_0_params ( & zobject , ce , NULL , " getchildren " , & child ) ;
}
2005-07-28 06:19:01 +08:00
if ( EG ( exception ) ) {
if ( ! ( object - > flags & RIT_CATCH_GET_CHILD ) ) {
return ;
} else {
zend_clear_exception ( TSRMLS_C ) ;
if ( child ) {
zval_ptr_dtor ( & child ) ;
}
object - > iterators [ object - > level ] . state = RS_NEXT ;
goto next_step ;
}
}
2005-03-13 07:03:33 +08:00
ce = child & & Z_TYPE_P ( child ) = = IS_OBJECT ? Z_OBJCE_P ( child ) : NULL ;
2003-11-09 22:05:36 +08:00
if ( ! ce | | ! instanceof_function ( ce , spl_ce_RecursiveIterator TSRMLS_CC ) ) {
2004-04-28 01:12:11 +08:00
if ( child ) {
zval_ptr_dtor ( & child ) ;
}
2005-03-13 07:03:33 +08:00
zend_throw_exception ( spl_ce_UnexpectedValueException , " Objects returned by RecursiveIterator::getChildren() must implement RecursiveIterator " , 0 TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
return ;
}
2003-11-11 08:25:26 +08:00
if ( object - > mode = = RIT_CHILD_FIRST ) {
object - > iterators [ object - > level ] . state = RS_SELF ;
} else {
object - > iterators [ object - > level ] . state = RS_NEXT ;
}
2003-11-09 22:05:36 +08:00
object - > iterators = erealloc ( object - > iterators , sizeof ( spl_sub_iterator ) * ( + + object - > level + 1 ) ) ;
2006-05-10 08:03:38 +08:00
sub_iter = ce - > get_iterator ( ce , child , 0 TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
object - > iterators [ object - > level ] . iterator = sub_iter ;
object - > iterators [ object - > level ] . zobject = child ;
object - > iterators [ object - > level ] . ce = ce ;
2003-11-11 08:25:26 +08:00
object - > iterators [ object - > level ] . state = RS_START ;
2003-12-02 15:18:05 +08:00
if ( sub_iter - > funcs - > rewind ) {
sub_iter - > funcs - > rewind ( sub_iter TSRMLS_CC ) ;
}
2005-03-13 07:03:33 +08:00
if ( object - > beginChildren ) {
2004-11-02 07:16:43 +08:00
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > beginChildren , " beginchildren " , NULL ) ;
2006-05-22 02:13:37 +08:00
if ( EG ( exception ) ) {
if ( ! ( object - > flags & RIT_CATCH_GET_CHILD ) ) {
return ;
} else {
zend_clear_exception ( TSRMLS_C ) ;
}
}
2004-11-02 07:16:43 +08:00
}
2003-11-11 08:25:26 +08:00
goto next_step ;
2003-11-09 22:05:36 +08:00
}
/* no more elements */
if ( object - > level > 0 ) {
2005-03-13 07:03:33 +08:00
if ( object - > endChildren ) {
2004-11-02 07:16:43 +08:00
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > endChildren , " endchildren " , NULL ) ;
2006-05-22 02:13:37 +08:00
if ( EG ( exception ) ) {
if ( ! ( object - > flags & RIT_CATCH_GET_CHILD ) ) {
return ;
} else {
zend_clear_exception ( TSRMLS_C ) ;
}
}
2004-11-02 07:16:43 +08:00
}
2005-05-15 00:40:58 +08:00
iterator - > funcs - > dtor ( iterator TSRMLS_CC ) ;
zval_ptr_dtor ( & object - > iterators [ object - > level ] . zobject ) ;
object - > level - - ;
2003-11-09 22:05:36 +08:00
} else {
return ; /* done completeley */
}
}
}
2004-11-02 06:54:12 +08:00
static void spl_recursive_it_rewind_ex ( spl_recursive_it_object * object , zval * zthis TSRMLS_DC )
2003-11-09 22:05:36 +08:00
{
zend_object_iterator * sub_iter ;
while ( object - > level ) {
sub_iter = object - > iterators [ object - > level ] . iterator ;
sub_iter - > funcs - > dtor ( sub_iter TSRMLS_CC ) ;
zval_ptr_dtor ( & object - > iterators [ object - > level - - ] . zobject ) ;
2006-05-22 02:13:37 +08:00
if ( ! EG ( exception ) & & ( ! object - > endChildren | | object - > endChildren - > common . scope ! = spl_ce_RecursiveIteratorIterator ) ) {
2004-11-02 07:16:43 +08:00
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > endChildren , " endchildren " , NULL ) ;
}
2003-11-09 22:05:36 +08:00
}
2005-12-06 03:54:47 +08:00
object - > iterators = erealloc ( object - > iterators , sizeof ( spl_sub_iterator ) ) ;
2003-11-11 08:25:26 +08:00
object - > iterators [ 0 ] . state = RS_START ;
2003-11-09 22:05:36 +08:00
sub_iter = object - > iterators [ 0 ] . iterator ;
if ( sub_iter - > funcs - > rewind ) {
sub_iter - > funcs - > rewind ( sub_iter TSRMLS_CC ) ;
}
2006-05-22 02:13:37 +08:00
if ( ! EG ( exception ) & & object - > beginIteration & & ! object - > in_iteration ) {
2005-10-06 05:59:13 +08:00
zend_call_method_with_0_params ( & zthis , object - > ce , & object - > beginIteration , " beginIteration " , NULL ) ;
}
object - > in_iteration = 1 ;
2004-11-02 06:54:12 +08:00
spl_recursive_it_move_forward_ex ( object , zthis TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
}
static void spl_recursive_it_move_forward ( zend_object_iterator * iter TSRMLS_DC )
{
2004-11-02 06:54:12 +08:00
spl_recursive_it_move_forward_ex ( ( spl_recursive_it_object * ) iter - > data , ( ( spl_recursive_it_iterator * ) iter ) - > zobject TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
}
static void spl_recursive_it_rewind ( zend_object_iterator * iter TSRMLS_DC )
{
2004-11-02 06:54:12 +08:00
spl_recursive_it_rewind_ex ( ( spl_recursive_it_object * ) iter - > data , ( ( spl_recursive_it_iterator * ) iter ) - > zobject TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
}
2006-05-10 08:03:38 +08:00
static zend_object_iterator * spl_recursive_it_get_iterator ( zend_class_entry * ce , zval * zobject , int by_ref TSRMLS_DC )
2003-11-09 22:05:36 +08:00
{
2006-05-10 08:03:38 +08:00
spl_recursive_it_iterator * iterator ;
spl_recursive_it_object * object ;
if ( by_ref ) {
zend_error ( E_ERROR , " An iterator cannot be used with foreach by reference " ) ;
}
iterator = emalloc ( sizeof ( spl_recursive_it_iterator ) ) ;
object = ( spl_recursive_it_object * ) zend_object_store_get_object ( zobject TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
zobject - > refcount + + ;
iterator - > intern . data = ( void * ) object ;
iterator - > intern . funcs = ce - > iterator_funcs . funcs ;
iterator - > zobject = zobject ;
return ( zend_object_iterator * ) iterator ;
}
zend_object_iterator_funcs spl_recursive_it_iterator_funcs = {
spl_recursive_it_dtor ,
2004-03-09 02:05:41 +08:00
spl_recursive_it_valid ,
2003-11-09 22:05:36 +08:00
spl_recursive_it_get_current_data ,
spl_recursive_it_get_current_key ,
spl_recursive_it_move_forward ,
spl_recursive_it_rewind
} ;
2006-03-06 17:50:44 +08:00
/* {{{ proto void RecursiveIteratorIterator::__construct(RecursiveIterator|IteratorAggregate it [, int mode = RIT_LEAVES_ONLY [, int flags = 0]]) throws InvalidArgumentException
2004-05-06 17:01:31 +08:00
Creates a RecursiveIteratorIterator from a RecursiveIterator . */
2003-11-09 22:05:36 +08:00
SPL_METHOD ( RecursiveIteratorIterator , __construct )
{
zval * object = getThis ( ) ;
spl_recursive_it_object * intern ;
zval * iterator ;
zend_class_entry * ce_iterator ;
2005-07-29 05:09:02 +08:00
long mode = RIT_LEAVES_ONLY , flags = 0 ;
2005-12-20 20:41:24 +08:00
int inc_refcount = 1 ;
2003-11-09 22:05:36 +08:00
2004-11-08 21:44:34 +08:00
php_set_error_handling ( EH_THROW , spl_ce_InvalidArgumentException TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
2005-07-29 05:09:02 +08:00
if ( zend_parse_parameters_ex ( ZEND_PARSE_PARAMS_QUIET , ZEND_NUM_ARGS ( ) TSRMLS_CC , " o|ll " , & iterator , & mode , & flags ) = = SUCCESS ) {
2004-11-08 21:44:34 +08:00
if ( instanceof_function ( Z_OBJCE_P ( iterator ) , zend_ce_aggregate TSRMLS_CC ) ) {
zval * aggregate = iterator ;
zend_call_method_with_0_params ( & aggregate , Z_OBJCE_P ( aggregate ) , & Z_OBJCE_P ( aggregate ) - > iterator_funcs . zf_new_iterator , " getiterator " , & iterator ) ;
2005-12-20 20:41:24 +08:00
inc_refcount = 0 ;
2004-11-08 21:44:34 +08:00
}
} else {
iterator = NULL ;
}
if ( ! iterator | | ! instanceof_function ( Z_OBJCE_P ( iterator ) , spl_ce_RecursiveIterator TSRMLS_CC ) ) {
2005-12-22 08:35:37 +08:00
if ( iterator & & ! inc_refcount ) {
zval_ptr_dtor ( & iterator ) ;
}
2003-11-09 22:05:36 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
2004-11-08 21:44:34 +08:00
zend_throw_exception ( spl_ce_InvalidArgumentException , " An instance of RecursiveIterator or IteratorAggregate creating it is required " , 0 TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
return ;
}
intern = ( spl_recursive_it_object * ) zend_object_store_get_object ( object TSRMLS_CC ) ;
intern - > iterators = emalloc ( sizeof ( spl_sub_iterator ) ) ;
intern - > level = 0 ;
2005-07-29 05:09:02 +08:00
intern - > mode = mode ;
intern - > flags = flags ;
2005-10-06 05:59:13 +08:00
intern - > max_depth = - 1 ;
intern - > in_iteration = 0 ;
2004-11-02 07:02:10 +08:00
intern - > ce = Z_OBJCE_P ( object ) ;
2005-10-06 05:59:13 +08:00
zend_hash_find ( & intern - > ce - > function_table , " beginiteration " , sizeof ( " beginiteration " ) , ( void * * ) & intern - > beginIteration ) ;
if ( intern - > beginIteration - > common . scope = = spl_ce_RecursiveIteratorIterator ) {
intern - > beginIteration = NULL ;
}
zend_hash_find ( & intern - > ce - > function_table , " enditeration " , sizeof ( " enditeration " ) , ( void * * ) & intern - > endIteration ) ;
if ( intern - > endIteration - > common . scope = = spl_ce_RecursiveIteratorIterator ) {
intern - > endIteration = NULL ;
}
2005-03-13 07:03:33 +08:00
zend_hash_find ( & intern - > ce - > function_table , " callhaschildren " , sizeof ( " callHasChildren " ) , ( void * * ) & intern - > callHasChildren ) ;
if ( intern - > callHasChildren - > common . scope = = spl_ce_RecursiveIteratorIterator ) {
intern - > callHasChildren = NULL ;
}
zend_hash_find ( & intern - > ce - > function_table , " callgetchildren " , sizeof ( " callGetChildren " ) , ( void * * ) & intern - > callGetChildren ) ;
if ( intern - > callGetChildren - > common . scope = = spl_ce_RecursiveIteratorIterator ) {
intern - > callGetChildren = NULL ;
}
zend_hash_find ( & intern - > ce - > function_table , " beginchildren " , sizeof ( " beginchildren " ) , ( void * * ) & intern - > beginChildren ) ;
if ( intern - > beginChildren - > common . scope = = spl_ce_RecursiveIteratorIterator ) {
intern - > beginChildren = NULL ;
}
zend_hash_find ( & intern - > ce - > function_table , " endchildren " , sizeof ( " endchildren " ) , ( void * * ) & intern - > endChildren ) ;
if ( intern - > endChildren - > common . scope = = spl_ce_RecursiveIteratorIterator ) {
intern - > endChildren = NULL ;
}
2005-09-15 11:33:04 +08:00
zend_hash_find ( & intern - > ce - > function_table , " nextelement " , sizeof ( " nextElement " ) , ( void * * ) & intern - > nextElement ) ;
if ( intern - > nextElement - > common . scope = = spl_ce_RecursiveIteratorIterator ) {
intern - > nextElement = NULL ;
}
2003-11-09 22:05:36 +08:00
ce_iterator = Z_OBJCE_P ( iterator ) ; /* respect inheritance, don't use spl_ce_RecursiveIterator */
2006-05-10 08:03:38 +08:00
intern - > iterators [ 0 ] . iterator = ce_iterator - > get_iterator ( ce_iterator , iterator , 0 TSRMLS_CC ) ;
2005-12-20 20:41:24 +08:00
if ( inc_refcount ) {
iterator - > refcount + + ;
}
2003-11-09 22:05:36 +08:00
intern - > iterators [ 0 ] . zobject = iterator ;
intern - > iterators [ 0 ] . ce = ce_iterator ;
2003-11-11 08:25:26 +08:00
intern - > iterators [ 0 ] . state = RS_START ;
2003-11-09 22:05:36 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-09 22:05:36 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void RecursiveIteratorIterator::rewind()
Rewind the iterator to the first element of the top level inner iterator . */
2003-11-09 22:05:36 +08:00
SPL_METHOD ( RecursiveIteratorIterator , rewind )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2004-11-02 06:54:12 +08:00
spl_recursive_it_rewind_ex ( object , getThis ( ) TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-09 22:05:36 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto bool RecursiveIteratorIterator::valid()
2004-05-06 17:01:31 +08:00
Check whether the current position is valid */
2004-03-09 01:33:31 +08:00
SPL_METHOD ( RecursiveIteratorIterator , valid )
2003-11-09 22:05:36 +08:00
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2005-10-06 05:59:13 +08:00
RETURN_BOOL ( spl_recursive_it_valid_ex ( object , getThis ( ) TSRMLS_CC ) = = SUCCESS ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-09 22:05:36 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto mixed RecursiveIteratorIterator::key()
Access the current key */
2003-11-09 22:05:36 +08:00
SPL_METHOD ( RecursiveIteratorIterator , key )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_object_iterator * iterator = object - > iterators [ object - > level ] . iterator ;
if ( iterator - > funcs - > get_current_key ) {
char * str_key ;
uint str_key_len ;
ulong int_key ;
if ( iterator - > funcs - > get_current_key ( iterator , & str_key , & str_key_len , & int_key TSRMLS_CC ) = = HASH_KEY_IS_LONG ) {
RETURN_LONG ( int_key ) ;
} else {
2003-11-17 08:57:01 +08:00
RETURN_STRINGL ( str_key , str_key_len - 1 , 0 ) ;
2003-11-09 22:05:36 +08:00
}
} else {
RETURN_NULL ( ) ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-09 22:05:36 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto mixed RecursiveIteratorIterator::current()
Access the current element value */
2003-11-09 22:05:36 +08:00
SPL_METHOD ( RecursiveIteratorIterator , current )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_object_iterator * iterator = object - > iterators [ object - > level ] . iterator ;
zval * * data ;
iterator - > funcs - > get_current_data ( iterator , & data TSRMLS_CC ) ;
2003-11-30 02:31:24 +08:00
RETURN_ZVAL ( * data , 1 , 0 ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-09 22:05:36 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void RecursiveIteratorIterator::next()
Move forward to the next element */
2003-11-09 22:05:36 +08:00
SPL_METHOD ( RecursiveIteratorIterator , next )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2004-11-02 06:54:12 +08:00
spl_recursive_it_move_forward_ex ( object , getThis ( ) TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-09 22:05:36 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto int RecursiveIteratorIterator::getDepth()
Get the current depth of the recursive iteration */
2003-11-23 04:49:15 +08:00
SPL_METHOD ( RecursiveIteratorIterator , getDepth )
2003-11-09 22:05:36 +08:00
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_LONG ( object - > level ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-09 22:05:36 +08:00
2004-10-30 04:12:57 +08:00
/* {{{ proto RecursiveIterator RecursiveIteratorIterator::getSubIterator([int level])
The current active sub iterator or the iterator at specified level */
2003-11-19 06:14:19 +08:00
SPL_METHOD ( RecursiveIteratorIterator , getSubIterator )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2004-02-26 04:16:27 +08:00
long level = object - > level ;
2003-11-19 06:14:19 +08:00
2003-11-23 04:49:15 +08:00
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " |l " , & level ) = = FAILURE ) {
2003-11-19 06:14:19 +08:00
return ;
}
if ( level < 0 | | level > object - > level ) {
RETURN_NULL ( ) ;
}
2003-12-10 18:19:43 +08:00
RETURN_ZVAL ( object - > iterators [ level ] . zobject , 1 , 0 ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-11-19 06:14:19 +08:00
2004-10-30 04:12:57 +08:00
/* {{{ proto RecursiveIterator RecursiveIteratorIterator::getInnerIterator()
The current active sub iterator */
SPL_METHOD ( RecursiveIteratorIterator , getInnerIterator )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
long level = object - > level ;
RETURN_ZVAL ( object - > iterators [ level ] . zobject , 1 , 0 ) ;
} /* }}} */
2005-10-06 05:59:13 +08:00
/* {{{ proto RecursiveIterator RecursiveIteratorIterator::beginIteration()
Called when iteration begins ( after first rewind ( ) call ) */
SPL_METHOD ( RecursiveIteratorIterator , beginIteration )
{
/* nothing to do */
} /* }}} */
/* {{{ proto RecursiveIterator RecursiveIteratorIterator::endIteration()
Called when iteration ends ( when valid ( ) first returns false */
SPL_METHOD ( RecursiveIteratorIterator , endIteration )
{
/* nothing to do */
} /* }}} */
2005-03-13 07:03:33 +08:00
/* {{{ proto bool RecursiveIteratorIterator::callHasChildren()
Called for each element to test whether it has children */
SPL_METHOD ( RecursiveIteratorIterator , callHasChildren )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_class_entry * ce = object - > iterators [ object - > level ] . ce ;
zval * retval , * zobject ;
zobject = object - > iterators [ object - > level ] . zobject ;
if ( ! zobject ) {
RETURN_FALSE ;
} else {
zend_call_method_with_0_params ( & zobject , ce , NULL , " haschildren " , & retval ) ;
2006-05-22 02:13:37 +08:00
if ( retval ) {
RETURN_ZVAL ( retval , 0 , 1 ) ;
} else {
RETURN_FALSE ;
}
2005-03-13 07:03:33 +08:00
}
} /* }}} */
/* {{{ proto RecursiveIterator RecursiveIteratorIterator::callGetChildren()
Return children of current element */
SPL_METHOD ( RecursiveIteratorIterator , callGetChildren )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_class_entry * ce = object - > iterators [ object - > level ] . ce ;
zval * retval , * zobject ;
zobject = object - > iterators [ object - > level ] . zobject ;
if ( ! zobject ) {
return ;
} else {
zend_call_method_with_0_params ( & zobject , ce , NULL , " getchildren " , & retval ) ;
2005-09-15 11:33:04 +08:00
if ( retval ) {
RETURN_ZVAL ( retval , 0 , 1 ) ;
}
2005-03-13 07:03:33 +08:00
}
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void RecursiveIteratorIterator::beginChildren()
2004-11-02 06:54:12 +08:00
Called when recursing one level down */
SPL_METHOD ( RecursiveIteratorIterator , beginChildren )
{
/* nothing to do */
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void RecursiveIteratorIterator::endChildren()
2004-11-02 06:54:12 +08:00
Called when end recursing one level */
SPL_METHOD ( RecursiveIteratorIterator , endChildren )
{
/* nothing to do */
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void RecursiveIteratorIterator::nextElement()
2005-09-15 11:33:04 +08:00
Called when the next element is available */
SPL_METHOD ( RecursiveIteratorIterator , nextElement )
{
/* nothing to do */
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void RecursiveIteratorIterator::setMaxDepth([$max_depth = -1])
2005-10-06 05:59:13 +08:00
Set the maximum allowed depth ( or any depth if pmax_depth = - 1 ] */
SPL_METHOD ( RecursiveIteratorIterator , setMaxDepth )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
long max_depth = - 1 ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " |l " , & max_depth ) = = FAILURE ) {
return ;
}
if ( max_depth < - 1 ) {
zend_throw_exception ( spl_ce_OutOfRangeException , " Parameter max_depth must be >= -1 " , 0 TSRMLS_CC ) ;
return ;
}
object - > max_depth = max_depth ;
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto int|false RecursiveIteratorIterator::getMaxDepth()
2005-10-06 05:59:13 +08:00
Return the maximum accepted depth or false if any depth is allowed */
SPL_METHOD ( RecursiveIteratorIterator , getMaxDepth )
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( object - > max_depth = = - 1 ) {
RETURN_FALSE ;
} else {
RETURN_LONG ( object - > max_depth ) ;
}
} /* }}} */
2004-11-01 03:05:19 +08:00
static union _zend_function * spl_recursive_it_get_method ( zval * * object_ptr , char * method , int method_len TSRMLS_DC )
{
union _zend_function * function_handler ;
spl_recursive_it_object * object = ( spl_recursive_it_object * ) zend_object_store_get_object ( * object_ptr TSRMLS_CC ) ;
long level = object - > level ;
zval * zobj = object - > iterators [ level ] . zobject ;
function_handler = std_object_handlers . get_method ( object_ptr , method , method_len TSRMLS_CC ) ;
if ( ! function_handler ) {
if ( zend_hash_find ( & Z_OBJCE_P ( zobj ) - > function_table , method , method_len + 1 , ( void * * ) & function_handler ) = = FAILURE ) {
if ( Z_OBJ_HT_P ( zobj ) - > get_method ) {
* object_ptr = zobj ;
function_handler = Z_OBJ_HT_P ( * object_ptr ) - > get_method ( object_ptr , method , method_len TSRMLS_CC ) ;
}
}
}
return function_handler ;
}
2003-12-08 16:39:18 +08:00
/* {{{ spl_RecursiveIteratorIterator_dtor */
2004-02-04 20:45:47 +08:00
static void spl_RecursiveIteratorIterator_free_storage ( void * _object TSRMLS_DC )
2003-11-09 22:05:36 +08:00
{
spl_recursive_it_object * object = ( spl_recursive_it_object * ) _object ;
zend_object_iterator * sub_iter ;
if ( object - > iterators ) {
while ( object - > level > = 0 ) {
sub_iter = object - > iterators [ object - > level ] . iterator ;
sub_iter - > funcs - > dtor ( sub_iter TSRMLS_CC ) ;
zval_ptr_dtor ( & object - > iterators [ object - > level - - ] . zobject ) ;
}
efree ( object - > iterators ) ;
2005-10-06 05:59:13 +08:00
object - > iterators = NULL ;
2003-11-09 22:05:36 +08:00
}
2006-03-29 22:28:43 +08:00
zend_object_std_dtor ( & object - > std TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
efree ( object ) ;
}
/* }}} */
2003-12-08 16:39:18 +08:00
/* {{{ spl_RecursiveIteratorIterator_new */
static zend_object_value spl_RecursiveIteratorIterator_new ( zend_class_entry * class_type TSRMLS_DC )
2003-11-09 22:05:36 +08:00
{
zend_object_value retval ;
spl_recursive_it_object * intern ;
zval * tmp ;
intern = emalloc ( sizeof ( spl_recursive_it_object ) ) ;
memset ( intern , 0 , sizeof ( spl_recursive_it_object ) ) ;
2006-03-29 22:28:43 +08:00
zend_object_std_init ( & intern - > std , class_type TSRMLS_CC ) ;
2003-11-09 22:05:36 +08:00
zend_hash_copy ( intern - > std . properties , & class_type - > default_properties , ( copy_ctor_func_t ) zval_add_ref , ( void * ) & tmp , sizeof ( zval * ) ) ;
2005-11-15 06:03:02 +08:00
retval . handle = zend_objects_store_put ( intern , ( zend_objects_store_dtor_t ) zend_objects_destroy_object , ( zend_objects_free_object_storage_t ) spl_RecursiveIteratorIterator_free_storage , NULL TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
retval . handlers = & spl_handlers_rec_it_it ;
2003-12-02 15:18:05 +08:00
return retval ;
}
/* }}} */
2004-11-02 06:54:12 +08:00
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO_EX ( arginfo_recursive_it___construct , 0 , 0 , 1 )
2004-11-08 21:44:34 +08:00
ZEND_ARG_OBJ_INFO ( 0 , iterator , Traversable , 0 )
2004-11-02 06:54:12 +08:00
ZEND_ARG_INFO ( 0 , mode )
2006-11-07 07:20:11 +08:00
ZEND_ARG_INFO ( 0 , flags )
2004-11-02 06:54:12 +08:00
ZEND_END_ARG_INFO ( ) ;
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO_EX ( arginfo_recursive_it_getSubIterator , 0 , 0 , 0 )
2004-11-02 06:54:12 +08:00
ZEND_ARG_INFO ( 0 , level )
ZEND_END_ARG_INFO ( ) ;
2005-10-06 05:59:13 +08:00
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO_EX ( arginfo_recursive_it_setMaxDepth , 0 , 0 , 0 )
2005-10-06 05:59:13 +08:00
ZEND_ARG_INFO ( 0 , max_depth )
ZEND_END_ARG_INFO ( ) ;
2004-11-02 06:54:12 +08:00
static zend_function_entry spl_funcs_RecursiveIteratorIterator [ ] = {
2005-10-06 05:59:13 +08:00
SPL_ME ( RecursiveIteratorIterator , __construct , arginfo_recursive_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , rewind , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , next , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , getDepth , NULL , ZEND_ACC_PUBLIC )
2005-03-13 07:03:33 +08:00
SPL_ME ( RecursiveIteratorIterator , getSubIterator , arginfo_recursive_it_getSubIterator , ZEND_ACC_PUBLIC )
2005-10-06 05:59:13 +08:00
SPL_ME ( RecursiveIteratorIterator , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , beginIteration , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , endIteration , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , callHasChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , callGetChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , beginChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , endChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , nextElement , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , setMaxDepth , arginfo_recursive_it_setMaxDepth , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveIteratorIterator , getMaxDepth , NULL , ZEND_ACC_PUBLIC )
2004-11-02 06:54:12 +08:00
{ NULL , NULL , NULL }
} ;
2003-12-02 15:18:05 +08:00
# if MBO_0
static int spl_dual_it_gets_implemented ( zend_class_entry * interface , zend_class_entry * class_type TSRMLS_DC )
{
2004-03-09 02:05:41 +08:00
class_type - > iterator_funcs . zf_valid = NULL ;
2003-12-02 15:18:05 +08:00
class_type - > iterator_funcs . zf_current = NULL ;
class_type - > iterator_funcs . zf_key = NULL ;
class_type - > iterator_funcs . zf_next = NULL ;
class_type - > iterator_funcs . zf_rewind = NULL ;
if ( ! class_type - > iterator_funcs . funcs ) {
class_type - > iterator_funcs . funcs = & zend_interface_iterator_funcs_iterator ;
}
return SUCCESS ;
}
# endif
2004-10-31 03:12:14 +08:00
static union _zend_function * spl_dual_it_get_method ( zval * * object_ptr , char * method , int method_len TSRMLS_DC )
2003-12-08 16:39:18 +08:00
{
union _zend_function * function_handler ;
spl_dual_it_object * intern ;
2004-10-31 03:12:14 +08:00
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( * object_ptr TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
2004-10-31 03:12:14 +08:00
function_handler = std_object_handlers . get_method ( object_ptr , method , method_len TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
if ( ! function_handler ) {
if ( zend_hash_find ( & intern - > inner . ce - > function_table , method , method_len + 1 , ( void * * ) & function_handler ) = = FAILURE ) {
if ( Z_OBJ_HT_P ( intern - > inner . zobject ) - > get_method ) {
2004-10-31 03:12:14 +08:00
* object_ptr = intern - > inner . zobject ;
function_handler = Z_OBJ_HT_P ( * object_ptr ) - > get_method ( object_ptr , method , method_len TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
}
}
}
return function_handler ;
}
# if MBO_0
int spl_dual_it_call_method ( char * method , INTERNAL_FUNCTION_PARAMETERS )
{
zval * * * func_params , func ;
zval * retval_ptr ;
int arg_count ;
int current = 0 ;
int success ;
void * * p ;
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
ZVAL_STRING ( & func , method , 0 ) ;
if ( ! zend_is_callable ( & func , 0 , & method ) ) {
php_error_docref ( NULL TSRMLS_CC , E_ERROR , " Method %s::%s() does not exist " , intern - > inner . ce - > name , method ) ;
return FAILURE ;
}
2003-12-07 03:21:02 +08:00
2003-12-08 16:39:18 +08:00
p = EG ( argument_stack ) . top_element - 2 ;
arg_count = ( ulong ) * p ;
func_params = safe_emalloc ( sizeof ( zval * * ) , arg_count , 0 ) ;
current = 0 ;
while ( arg_count - - > 0 ) {
func_params [ current ] = ( zval * * ) p - ( arg_count - current ) ;
current + + ;
}
if ( call_user_function_ex ( EG ( function_table ) , NULL , & func , & retval_ptr , arg_count , func_params , 0 , NULL TSRMLS_CC ) = = SUCCESS & & retval_ptr ) {
RETURN_ZVAL ( retval_ptr , 0 , 1 ) ;
success = SUCCESS ;
} else {
php_error_docref ( NULL TSRMLS_CC , E_ERROR , " Unable to call %s::%s() " , intern - > inner . ce - > name , method ) ;
success = FAILURE ;
}
efree ( func_params ) ;
return success ;
}
# endif
2006-03-06 01:39:49 +08:00
# define SPL_CHECK_CTOR(intern, classname) \
if ( intern - > dit_type = = DIT_Unknown ) { \
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " Classes derived from %s must call %s::__construct() " , \
2006-03-06 01:39:49 +08:00
( spl_ce_ # # classname ) - > name , ( spl_ce_ # # classname ) - > name ) ; \
return ; \
}
# define APPENDIT_CHECK_CTOR(intern) SPL_CHECK_CTOR(intern, AppendIterator)
2005-12-26 00:04:15 +08:00
static inline int spl_dual_it_fetch ( spl_dual_it_object * intern , int check_more TSRMLS_DC ) ;
2004-11-01 02:43:00 +08:00
2006-05-19 05:42:58 +08:00
static inline int spl_cit_check_flags ( int flags )
{
int cnt = 0 ;
cnt + = ( flags & CIT_CALL_TOSTRING ) ? 1 : 0 ;
cnt + = ( flags & CIT_TOSTRING_USE_KEY ) ? 1 : 0 ;
cnt + = ( flags & CIT_TOSTRING_USE_CURRENT ) ? 1 : 0 ;
cnt + = ( flags & CIT_TOSTRING_USE_INNER ) ? 1 : 0 ;
return cnt < = 1 ? SUCCESS : FAILURE ;
}
2006-03-06 01:39:49 +08:00
static spl_dual_it_object * spl_dual_it_construct ( INTERNAL_FUNCTION_PARAMETERS , zend_class_entry * ce_base , zend_class_entry * ce_inner , dual_it_type dit_type )
2003-12-02 15:18:05 +08:00
{
2005-12-19 08:45:28 +08:00
zval * zobject , * retval ;
2003-12-02 15:18:05 +08:00
spl_dual_it_object * intern ;
2006-02-06 19:28:41 +08:00
zend_class_entry * ce = NULL ;
2005-12-19 08:32:51 +08:00
int inc_refcount = 1 ;
2003-12-02 15:18:05 +08:00
2003-12-07 03:21:02 +08:00
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2006-03-06 01:39:49 +08:00
if ( intern - > dit_type ! = DIT_Unknown ) {
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " %s::getIterator() must be called exactly once per instance " , ce_base - > name ) ;
2006-03-06 01:39:49 +08:00
return NULL ;
}
php_set_error_handling ( EH_THROW , spl_ce_InvalidArgumentException TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
2003-12-08 16:39:18 +08:00
intern - > dit_type = dit_type ;
2003-12-07 03:21:02 +08:00
switch ( dit_type ) {
2003-12-08 16:39:18 +08:00
case DIT_LimitIterator : {
2004-05-19 04:39:35 +08:00
intern - > u . limit . offset = 0 ; /* start at beginning */
2003-12-07 03:21:02 +08:00
intern - > u . limit . count = - 1 ; /* get all */
2004-05-19 04:39:35 +08:00
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " O|ll " , & zobject , ce_inner , & intern - > u . limit . offset , & intern - > u . limit . count ) = = FAILURE ) {
2003-12-07 03:21:02 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
if ( intern - > u . limit . offset < 0 ) {
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
2004-11-02 01:39:59 +08:00
zend_throw_exception ( spl_ce_OutOfRangeException , " Parameter offset must be > 0 " , 0 TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
return NULL ;
}
if ( intern - > u . limit . count < 0 & & intern - > u . limit . count ! = - 1 ) {
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
2004-11-02 01:39:59 +08:00
zend_throw_exception ( spl_ce_OutOfRangeException , " Parameter count must either be -1 or a value greater than or equal 0 " , 0 TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
return NULL ;
}
break ;
}
2003-12-08 16:39:18 +08:00
case DIT_CachingIterator :
2005-09-19 01:15:04 +08:00
case DIT_RecursiveCachingIterator : {
2003-12-08 16:39:18 +08:00
long flags = CIT_CALL_TOSTRING ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " O|l " , & zobject , ce_inner , & flags ) = = FAILURE ) {
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
2006-05-19 05:42:58 +08:00
if ( spl_cit_check_flags ( flags ) ! = SUCCESS ) {
2005-10-04 00:05:08 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
2006-05-19 05:42:58 +08:00
zend_throw_exception ( spl_ce_InvalidArgumentException , " Flags must contain only one of CALL_TOSTRING, TOSTRING_USE_KEY, TOSTRING_USE_CURRENT, TOSTRING_USE_CURRENT " , 0 TSRMLS_CC ) ;
2005-10-04 00:05:08 +08:00
return NULL ;
}
2003-12-08 16:39:18 +08:00
intern - > u . caching . flags | = flags & CIT_PUBLIC ;
2006-05-10 08:03:38 +08:00
MAKE_STD_ZVAL ( intern - > u . caching . zcache ) ;
array_init ( intern - > u . caching . zcache ) ;
2003-12-08 16:39:18 +08:00
break ;
}
2004-11-01 02:43:00 +08:00
case DIT_IteratorIterator : {
2005-02-23 09:03:16 +08:00
zend_class_entry * * pce_cast ;
char * class_name ;
int class_name_len ;
2004-11-01 02:43:00 +08:00
2005-02-23 09:03:16 +08:00
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " O|s " , & zobject , ce_inner , & class_name , & class_name_len ) = = FAILURE ) {
2004-11-01 02:43:00 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
ce = Z_OBJCE_P ( zobject ) ;
if ( ! instanceof_function ( ce , zend_ce_iterator TSRMLS_CC ) ) {
2005-02-23 09:03:16 +08:00
if ( ZEND_NUM_ARGS ( ) > 1 ) {
if ( zend_lookup_class ( class_name , class_name_len , & pce_cast TSRMLS_CC ) = = FAILURE
| | ! instanceof_function ( ce , * pce_cast TSRMLS_CC )
| | ! ( * pce_cast ) - > get_iterator
) {
zend_throw_exception ( spl_ce_LogicException , " Class to downcast to not found or not base class or does not implement Traversable " , 0 TSRMLS_CC ) ;
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
ce = * pce_cast ;
}
2004-11-01 02:43:00 +08:00
if ( instanceof_function ( ce , zend_ce_aggregate TSRMLS_CC ) ) {
2005-12-19 08:45:28 +08:00
zend_call_method_with_0_params ( & zobject , ce , & ce - > iterator_funcs . zf_new_iterator , " getiterator " , & retval ) ;
2006-05-22 02:13:37 +08:00
if ( EG ( exception ) ) {
if ( retval ) {
zval_ptr_dtor ( & retval ) ;
}
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
2005-12-19 08:45:28 +08:00
if ( ! retval | | Z_TYPE_P ( retval ) ! = IS_OBJECT | | ! instanceof_function ( Z_OBJCE_P ( retval ) , zend_ce_traversable TSRMLS_CC ) ) {
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_LogicException , 0 TSRMLS_CC , " %s::getIterator() must return an object that implememnts Traversable " , ce - > name ) ;
2005-12-19 08:45:28 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
zobject = retval ;
2005-03-01 18:05:12 +08:00
ce = Z_OBJCE_P ( zobject ) ;
2005-12-19 08:32:51 +08:00
inc_refcount = 0 ;
2004-11-01 02:43:00 +08:00
}
}
break ;
}
2004-11-01 08:26:59 +08:00
case DIT_AppendIterator :
spl_instantiate ( spl_ce_ArrayIterator , & intern - > u . append . zarrayit , 1 TSRMLS_CC ) ;
zend_call_method_with_0_params ( & intern - > u . append . zarrayit , spl_ce_ArrayIterator , & spl_ce_ArrayIterator - > constructor , " __construct " , NULL ) ;
2006-05-10 08:03:38 +08:00
intern - > u . append . iterator = spl_ce_ArrayIterator - > get_iterator ( spl_ce_ArrayIterator , intern - > u . append . zarrayit , 0 TSRMLS_CC ) ;
2004-11-01 08:26:59 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return intern ;
2006-05-10 08:03:38 +08:00
# if HAVE_PCRE || HAVE_BUNDLED_PCRE
2006-05-11 00:50:57 +08:00
case DIT_RegexIterator :
case DIT_RecursiveRegexIterator : {
2006-05-10 08:03:38 +08:00
char * regex ;
2006-07-21 06:54:21 +08:00
int regex_len ;
2006-07-17 05:12:32 +08:00
long mode = REGIT_MODE_MATCH ;
2006-05-10 08:03:38 +08:00
2006-07-21 06:54:21 +08:00
intern - > u . regex . use_flags = ZEND_NUM_ARGS ( ) > = 5 ;
2006-05-10 08:03:38 +08:00
intern - > u . regex . flags = 0 ;
2006-07-17 05:12:32 +08:00
intern - > u . regex . preg_flags = 0 ;
2006-07-21 06:54:21 +08:00
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " Os|lll " , & zobject , ce_inner , & regex , & regex_len , & mode , & intern - > u . regex . flags , & intern - > u . regex . preg_flags ) = = FAILURE ) {
2006-05-10 08:03:38 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
2006-07-17 05:12:32 +08:00
if ( mode < 0 | | mode > = REGIT_MODE_MAX ) {
zend_throw_exception_ex ( spl_ce_InvalidArgumentException , 0 TSRMLS_CC , " Illegal mode %ld " , mode ) ;
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
intern - > u . regex . mode = mode ;
2006-07-21 06:54:21 +08:00
intern - > u . regex . regex = estrndup ( regex , regex_len ) ;
intern - > u . regex . pce = pcre_get_compiled_regex_cache ( regex , regex_len TSRMLS_CC ) ;
2006-11-03 22:11:23 +08:00
if ( intern - > u . regex . pce = = NULL ) {
/* pcre_get_compiled_regex_cache has already sent error */
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
2006-05-10 08:03:38 +08:00
intern - > u . regex . pce - > refcount + + ;
2006-11-03 22:11:23 +08:00
break ;
2006-05-10 08:03:38 +08:00
}
# endif
2003-12-07 03:21:02 +08:00
default :
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " O " , & zobject , ce_inner ) = = FAILURE ) {
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
return NULL ;
}
break ;
2003-12-02 15:18:05 +08:00
}
2006-05-10 08:03:38 +08:00
php_set_error_handling ( EH_THROW , zend_exception_get_default ( TSRMLS_C ) TSRMLS_CC ) ;
2004-11-12 03:36:27 +08:00
2005-12-19 08:32:51 +08:00
if ( inc_refcount ) {
zobject - > refcount + + ;
}
2003-12-02 15:18:05 +08:00
intern - > inner . zobject = zobject ;
2005-02-23 09:03:16 +08:00
intern - > inner . ce = dit_type = = DIT_IteratorIterator ? ce : Z_OBJCE_P ( zobject ) ;
2003-12-02 15:18:05 +08:00
intern - > inner . object = zend_object_store_get_object ( zobject TSRMLS_CC ) ;
2006-05-10 08:03:38 +08:00
intern - > inner . iterator = intern - > inner . ce - > get_iterator ( intern - > inner . ce , zobject , 0 TSRMLS_CC ) ;
2003-12-02 15:18:05 +08:00
php_set_error_handling ( EH_NORMAL , NULL TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
return intern ;
2003-12-02 15:18:05 +08:00
}
2006-03-06 17:50:44 +08:00
/* {{{ proto void FilterIterator::__construct(Iterator it)
2004-05-06 17:01:31 +08:00
Create an Iterator from another iterator */
2006-03-06 01:39:49 +08:00
SPL_METHOD ( FilterIterator , __construct )
2003-12-02 15:18:05 +08:00
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_FilterIterator , zend_ce_iterator , DIT_FilterIterator ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto Iterator FilterIterator::getInnerIterator()
proto Iterator CachingIterator : : getInnerIterator ( )
proto Iterator LimitIterator : : getInnerIterator ( )
proto Iterator ParentIterator : : getInnerIterator ( )
Get the inner iterator */
2004-03-10 01:35:18 +08:00
SPL_METHOD ( dual_it , getInnerIterator )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( intern - > inner . zobject ) {
2004-04-15 07:26:56 +08:00
RETVAL_ZVAL ( intern - > inner . zobject , 1 , 0 ) ;
2004-03-10 01:35:18 +08:00
} else {
RETURN_NULL ( ) ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2004-03-10 01:35:18 +08:00
2005-12-26 00:04:15 +08:00
static inline void spl_dual_it_require ( spl_dual_it_object * intern TSRMLS_DC )
2004-07-29 06:53:10 +08:00
{
if ( ! intern - > inner . iterator ) {
php_error_docref ( NULL TSRMLS_CC , E_ERROR , " The inner constructor wasn't initialized with an iterator instance " ) ;
}
}
2005-12-26 00:04:15 +08:00
static inline void spl_dual_it_free ( spl_dual_it_object * intern TSRMLS_DC )
2003-12-02 15:18:05 +08:00
{
2004-04-28 01:12:11 +08:00
if ( intern - > inner . iterator & & intern - > inner . iterator - > funcs - > invalidate_current ) {
2004-04-27 23:41:26 +08:00
intern - > inner . iterator - > funcs - > invalidate_current ( intern - > inner . iterator TSRMLS_CC ) ;
}
2003-12-10 18:19:43 +08:00
if ( intern - > current . data ) {
zval_ptr_dtor ( & intern - > current . data ) ;
2003-12-02 15:18:05 +08:00
intern - > current . data = NULL ;
}
if ( intern - > current . str_key ) {
efree ( intern - > current . str_key ) ;
intern - > current . str_key = NULL ;
}
2005-09-19 01:15:04 +08:00
if ( intern - > dit_type = = DIT_CachingIterator | | intern - > dit_type = = DIT_RecursiveCachingIterator ) {
2003-12-08 16:39:18 +08:00
if ( intern - > u . caching . zstr ) {
zval_ptr_dtor ( & intern - > u . caching . zstr ) ;
intern - > u . caching . zstr = NULL ;
}
if ( intern - > u . caching . zchildren ) {
zval_ptr_dtor ( & intern - > u . caching . zchildren ) ;
intern - > u . caching . zchildren = NULL ;
}
}
2003-12-02 15:18:05 +08:00
}
2005-12-26 00:04:15 +08:00
static inline void spl_dual_it_rewind ( spl_dual_it_object * intern TSRMLS_DC )
2003-12-02 15:18:05 +08:00
{
spl_dual_it_free ( intern TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
intern - > current . pos = 0 ;
2003-12-02 15:18:05 +08:00
if ( intern - > inner . iterator - > funcs - > rewind ) {
intern - > inner . iterator - > funcs - > rewind ( intern - > inner . iterator TSRMLS_CC ) ;
}
}
2005-12-26 00:04:15 +08:00
static inline int spl_dual_it_valid ( spl_dual_it_object * intern TSRMLS_DC )
2003-12-02 15:18:05 +08:00
{
/* FAILURE / SUCCESS */
2004-03-09 02:05:41 +08:00
return intern - > inner . iterator - > funcs - > valid ( intern - > inner . iterator TSRMLS_CC ) ;
2003-12-02 15:18:05 +08:00
}
2005-12-26 00:04:15 +08:00
static inline int spl_dual_it_fetch ( spl_dual_it_object * intern , int check_more TSRMLS_DC )
2003-12-02 15:18:05 +08:00
{
2003-12-10 18:19:43 +08:00
zval * * data ;
2003-12-02 15:18:05 +08:00
spl_dual_it_free ( intern TSRMLS_CC ) ;
2004-03-09 02:05:41 +08:00
if ( ! check_more | | spl_dual_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) {
2003-12-10 18:19:43 +08:00
intern - > inner . iterator - > funcs - > get_current_data ( intern - > inner . iterator , & data TSRMLS_CC ) ;
intern - > current . data = * data ;
intern - > current . data - > refcount + + ;
2003-12-07 03:21:02 +08:00
if ( intern - > inner . iterator - > funcs - > get_current_key ) {
intern - > current . key_type = intern - > inner . iterator - > funcs - > get_current_key ( intern - > inner . iterator , & intern - > current . str_key , & intern - > current . str_key_len , & intern - > current . int_key TSRMLS_CC ) ;
} else {
intern - > current . key_type = HASH_KEY_IS_LONG ;
intern - > current . int_key = intern - > current . pos ;
}
2003-12-10 18:19:43 +08:00
return SUCCESS ;
2003-12-07 03:21:02 +08:00
}
2003-12-10 18:19:43 +08:00
return FAILURE ;
2003-12-02 15:18:05 +08:00
}
2005-12-26 00:04:15 +08:00
static inline void spl_dual_it_next ( spl_dual_it_object * intern , int do_free TSRMLS_DC )
2003-12-02 15:18:05 +08:00
{
2003-12-08 16:39:18 +08:00
if ( do_free ) {
spl_dual_it_free ( intern TSRMLS_CC ) ;
2004-07-29 06:53:10 +08:00
} else {
spl_dual_it_require ( intern TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
}
2003-12-07 03:21:02 +08:00
intern - > inner . iterator - > funcs - > move_forward ( intern - > inner . iterator TSRMLS_CC ) ;
intern - > current . pos + + ;
2003-12-02 15:18:05 +08:00
}
2004-05-06 17:01:31 +08:00
/* {{{ proto void ParentIterator::rewind()
2004-11-01 02:43:00 +08:00
proto void IteratorIterator : : rewind ( )
2004-05-06 17:01:31 +08:00
Rewind the iterator
*/
2003-12-07 03:21:02 +08:00
SPL_METHOD ( dual_it , rewind )
2003-12-02 15:18:05 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_dual_it_rewind ( intern TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
spl_dual_it_fetch ( intern , 1 TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto bool FilterIterator::valid()
proto bool ParentIterator : : valid ( )
proto bool IteratorIterator : : valid ( )
proto bool NoRewindIterator : : valid ( )
2004-05-06 17:01:31 +08:00
Check whether the current element is valid */
2004-03-09 01:33:31 +08:00
SPL_METHOD ( dual_it , valid )
2003-12-02 15:18:05 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_BOOL ( intern - > current . data ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto mixed FilterIterator::key()
proto mixed CachingIterator : : key ( )
proto mixed LimitIterator : : key ( )
proto mixed ParentIterator : : key ( )
2004-11-01 02:43:00 +08:00
proto mixed IteratorIterator : : key ( )
proto mixed NoRewindIterator : : key ( )
2004-11-01 08:26:59 +08:00
proto mixed AppendIterator : : key ( )
2004-05-06 17:01:31 +08:00
Get the current key */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( dual_it , key )
2003-12-02 15:18:05 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( intern - > current . data ) {
2004-04-25 19:14:11 +08:00
if ( intern - > current . key_type = = HASH_KEY_IS_STRING ) {
RETURN_STRINGL ( intern - > current . str_key , intern - > current . str_key_len - 1 , 1 ) ;
2003-12-02 15:18:05 +08:00
} else {
RETURN_LONG ( intern - > current . int_key ) ;
}
}
RETURN_NULL ( ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto mixed FilterIterator::current()
proto mixed CachingIterator : : current ( )
proto mixed LimitIterator : : current ( )
proto mixed ParentIterator : : current ( )
2004-11-01 02:43:00 +08:00
proto mixed IteratorIterator : : current ( )
proto mixed NoRewindIterator : : current ( )
2004-11-01 08:26:59 +08:00
proto mixed AppendIterator : : current ( )
2004-05-06 17:01:31 +08:00
Get the current element value */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( dual_it , current )
2003-12-02 15:18:05 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( intern - > current . data ) {
2003-12-10 18:19:43 +08:00
RETVAL_ZVAL ( intern - > current . data , 1 , 0 ) ;
2003-12-02 15:18:05 +08:00
} else {
RETURN_NULL ( ) ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void ParentIterator::next()
2004-11-01 02:43:00 +08:00
proto void IteratorIterator : : next ( )
proto void NoRewindIterator : : next ( )
2004-05-06 17:01:31 +08:00
Move the iterator forward */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( dual_it , next )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
spl_dual_it_next ( intern , 1 TSRMLS_CC ) ;
spl_dual_it_fetch ( intern , 1 TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-07 03:21:02 +08:00
2005-12-26 00:04:15 +08:00
static inline void spl_filter_it_fetch ( zval * zthis , spl_dual_it_object * intern TSRMLS_DC )
2003-12-07 03:21:02 +08:00
{
zval * retval ;
2003-12-10 18:19:43 +08:00
while ( spl_dual_it_fetch ( intern , 1 TSRMLS_CC ) = = SUCCESS ) {
zend_call_method_with_0_params ( & zthis , intern - > std . ce , NULL , " accept " , & retval ) ;
2004-04-28 01:12:11 +08:00
if ( retval ) {
if ( zend_is_true ( retval ) ) {
zval_ptr_dtor ( & retval ) ;
return ;
}
2003-12-07 03:21:02 +08:00
zval_ptr_dtor ( & retval ) ;
}
2006-05-16 16:21:08 +08:00
if ( EG ( exception ) ) {
return ;
}
2003-12-07 03:21:02 +08:00
intern - > inner . iterator - > funcs - > move_forward ( intern - > inner . iterator TSRMLS_CC ) ;
}
spl_dual_it_free ( intern TSRMLS_CC ) ;
}
2005-12-26 00:04:15 +08:00
static inline void spl_filter_it_rewind ( zval * zthis , spl_dual_it_object * intern TSRMLS_DC )
2003-12-10 18:19:43 +08:00
{
spl_dual_it_rewind ( intern TSRMLS_CC ) ;
spl_filter_it_fetch ( zthis , intern TSRMLS_CC ) ;
}
2005-12-26 00:04:15 +08:00
static inline void spl_filter_it_next ( zval * zthis , spl_dual_it_object * intern TSRMLS_DC )
2003-12-10 18:19:43 +08:00
{
spl_dual_it_next ( intern , 1 TSRMLS_CC ) ;
spl_filter_it_fetch ( zthis , intern TSRMLS_CC ) ;
}
2004-05-06 17:01:31 +08:00
/* {{{ proto void FilterIterator::rewind()
Rewind the iterator */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( FilterIterator , rewind )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2003-12-10 18:19:43 +08:00
spl_filter_it_rewind ( getThis ( ) , intern TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-07 03:21:02 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void FilterIterator::next()
Move the iterator forward */
2003-12-02 15:18:05 +08:00
SPL_METHOD ( FilterIterator , next )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2003-12-10 18:19:43 +08:00
spl_filter_it_next ( getThis ( ) , intern TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto void RecursiveFilterIterator::__construct(RecursiveIterator it)
2005-09-15 11:33:04 +08:00
Create a RecursiveFilterIterator from a RecursiveIterator */
SPL_METHOD ( RecursiveFilterIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_RecursiveFilterIterator , spl_ce_RecursiveIterator , DIT_RecursiveFilterIterator ) ;
2005-09-15 11:33:04 +08:00
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto bool RecursiveFilterIterator::hasChildren()
2005-09-15 11:33:04 +08:00
Check whether the inner iterator ' s current element has children */
SPL_METHOD ( RecursiveFilterIterator , hasChildren )
{
spl_dual_it_object * intern ;
zval * retval ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_call_method_with_0_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " haschildren " , & retval ) ;
2006-05-22 02:13:37 +08:00
if ( retval ) {
RETURN_ZVAL ( retval , 0 , 1 ) ;
} else {
RETURN_FALSE ;
}
2005-09-15 11:33:04 +08:00
} /* }}} */
/* {{{ proto RecursiveFilterIterator RecursiveFilterIterator::getChildren()
Return the inner iterator ' s children contained in a RecursiveFilterIterator */
SPL_METHOD ( RecursiveFilterIterator , getChildren )
{
spl_dual_it_object * intern ;
zval * retval ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_call_method_with_0_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " getchildren " , & retval ) ;
2006-05-22 02:13:37 +08:00
if ( ! EG ( exception ) & & retval ) {
spl_instantiate_arg_ex1 ( Z_OBJCE_P ( getThis ( ) ) , & return_value , 0 , retval TSRMLS_CC ) ;
}
if ( retval ) {
zval_ptr_dtor ( & retval ) ;
}
2005-09-15 11:33:04 +08:00
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void ParentIterator::__construct(RecursiveIterator it)
2004-05-06 17:01:31 +08:00
Create a ParentIterator from a RecursiveIterator */
2003-12-02 15:18:05 +08:00
SPL_METHOD ( ParentIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_ParentIterator , spl_ce_RecursiveIterator , DIT_ParentIterator ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto bool ParentIterator::hasChildren()
2004-05-06 17:01:31 +08:00
Check whether the inner iterator ' s current element has children */
2003-12-02 15:18:05 +08:00
SPL_METHOD ( ParentIterator , hasChildren )
{
spl_dual_it_object * intern ;
zval * retval ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_call_method_with_0_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " haschildren " , & retval ) ;
2006-05-22 02:13:37 +08:00
if ( retval ) {
RETURN_ZVAL ( retval , 0 , 1 ) ;
} else {
RETURN_FALSE ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto ParentIterator ParentIterator::getChildren()
Return the inner iterator ' s children contained in a ParentIterator */
2003-12-02 15:18:05 +08:00
SPL_METHOD ( ParentIterator , getChildren )
{
spl_dual_it_object * intern ;
zval * retval ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_call_method_with_0_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " getchildren " , & retval ) ;
2006-05-22 02:13:37 +08:00
if ( ! EG ( exception ) & & retval ) {
spl_instantiate_arg_ex1 ( Z_OBJCE_P ( getThis ( ) ) , & return_value , 0 , retval TSRMLS_CC ) ;
}
if ( retval ) {
zval_ptr_dtor ( & retval ) ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-02 15:18:05 +08:00
2006-05-10 08:03:38 +08:00
# if HAVE_PCRE || HAVE_BUNDLED_PCRE
2006-07-21 06:54:21 +08:00
/* {{{ proto void RegexIterator::__construct(Iterator it, string regex [, int mode [, int flags [, int preg_flags]]])
2006-05-11 00:50:57 +08:00
Create an RegexIterator from another iterator and a regular expression */
SPL_METHOD ( RegexIterator , __construct )
2006-05-10 08:03:38 +08:00
{
2006-05-11 00:50:57 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_RegexIterator , zend_ce_iterator , DIT_RegexIterator ) ;
2006-05-10 08:03:38 +08:00
} /* }}} */
2006-05-11 00:50:57 +08:00
/* {{{ proto bool RegexIterator::accept()
2006-05-10 08:03:38 +08:00
Match ( string ) current ( ) against regular expression */
2006-05-11 00:50:57 +08:00
SPL_METHOD ( RegexIterator , accept )
2006-05-10 08:03:38 +08:00
{
2006-07-17 05:12:32 +08:00
spl_dual_it_object * intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2006-07-21 06:54:21 +08:00
char * subject , tmp [ 32 ] , * result ;
int subject_len , use_copy , count , result_len ;
zval subject_copy , zcount , * replacement ;
2006-05-10 08:03:38 +08:00
if ( intern - > u . regex . flags & REGIT_USE_KEY ) {
if ( intern - > current . key_type = = HASH_KEY_IS_LONG ) {
subject_len = snprintf ( tmp , sizeof ( tmp ) , " %ld " , intern - > current . int_key ) ;
subject = & tmp [ 0 ] ;
2006-07-17 05:12:32 +08:00
use_copy = 0 ;
2006-05-10 08:03:38 +08:00
} else {
2006-07-17 05:12:32 +08:00
subject_len = intern - > current . str_key_len - 1 ;
subject = estrndup ( intern - > current . str_key , subject_len ) ;
use_copy = 1 ;
2006-05-10 08:03:38 +08:00
}
} else {
zend_make_printable_zval ( intern - > current . data , & subject_copy , & use_copy ) ;
if ( use_copy ) {
subject = Z_STRVAL ( subject_copy ) ;
subject_len = Z_STRLEN ( subject_copy ) ;
} else {
subject = Z_STRVAL_P ( intern - > current . data ) ;
subject_len = Z_STRLEN_P ( intern - > current . data ) ;
}
}
2006-07-17 05:12:32 +08:00
switch ( intern - > u . regex . mode )
{
case REGIT_MODE_MAX : /* won't happen but makes compiler happy */
case REGIT_MODE_MATCH :
2006-07-21 06:54:21 +08:00
count = pcre_exec ( intern - > u . regex . pce - > re , intern - > u . regex . pce - > extra , subject , subject_len , 0 , 0 , NULL , 0 ) ;
2006-07-17 05:12:32 +08:00
RETVAL_BOOL ( count > = 0 ) ;
break ;
2006-05-10 08:03:38 +08:00
2006-07-17 05:12:32 +08:00
case REGIT_MODE_ALL_MATCHES :
case REGIT_MODE_GET_MATCH :
if ( ! use_copy ) {
subject = estrndup ( subject , subject_len ) ;
use_copy = 1 ;
}
zval_ptr_dtor ( & intern - > current . data ) ;
2006-07-21 06:54:21 +08:00
ALLOC_INIT_ZVAL ( intern - > current . data ) ;
php_pcre_match_impl ( intern - > u . regex . pce , subject , subject_len , & zcount ,
intern - > current . data , intern - > u . regex . mode = = REGIT_MODE_ALL_MATCHES , intern - > u . regex . use_flags , intern - > u . regex . preg_flags , 0 TSRMLS_CC ) ;
2006-07-17 05:12:32 +08:00
count = zend_hash_num_elements ( Z_ARRVAL_P ( intern - > current . data ) ) ;
RETVAL_BOOL ( count > 0 ) ;
break ;
case REGIT_MODE_SPLIT :
if ( ! use_copy ) {
subject = estrndup ( subject , subject_len ) ;
use_copy = 1 ;
}
zval_ptr_dtor ( & intern - > current . data ) ;
2006-07-21 06:54:21 +08:00
ALLOC_INIT_ZVAL ( intern - > current . data ) ;
php_pcre_split_impl ( intern - > u . regex . pce , subject , subject_len , intern - > current . data , - 1 , intern - > u . regex . preg_flags TSRMLS_CC ) ;
2006-07-17 05:12:32 +08:00
count = zend_hash_num_elements ( Z_ARRVAL_P ( intern - > current . data ) ) ;
RETVAL_BOOL ( count > 1 ) ;
break ;
2006-07-21 06:54:21 +08:00
case REGIT_MODE_REPLACE :
replacement = zend_read_property ( intern - > std . ce , getThis ( ) , " replacement " , sizeof ( " replacement " ) - 1 , 1 TSRMLS_CC ) ;
result = php_pcre_replace_impl ( intern - > u . regex . pce , subject , subject_len , replacement , 0 , & result_len , 0 , NULL TSRMLS_CC ) ;
if ( intern - > u . regex . flags & REGIT_USE_KEY ) {
if ( intern - > current . key_type ! = HASH_KEY_IS_LONG ) {
efree ( intern - > current . str_key ) ;
}
intern - > current . key_type = HASH_KEY_IS_STRING ;
intern - > current . str_key = result ;
intern - > current . str_key_len = result_len + 1 ;
} else {
zval_ptr_dtor ( & intern - > current . data ) ;
MAKE_STD_ZVAL ( intern - > current . data ) ;
ZVAL_STRINGL ( intern - > current . data , result , result_len , 0 ) ;
}
2006-05-10 08:03:38 +08:00
}
2006-07-17 05:12:32 +08:00
if ( use_copy ) {
efree ( subject ) ;
}
2006-05-10 08:03:38 +08:00
} /* }}} */
2006-07-22 04:14:31 +08:00
/* {{{ proto bool RegexIterator::getMode()
Returns current operation mode */
SPL_METHOD ( RegexIterator , getMode )
{
spl_dual_it_object * intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_LONG ( intern - > u . regex . mode ) ;
} /* }}} */
/* {{{ proto bool RegexIterator::setMode(int new_mode)
Set new operation mode */
SPL_METHOD ( RegexIterator , setMode )
{
spl_dual_it_object * intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
long mode ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " l " , & mode ) = = FAILURE ) {
return ;
}
if ( mode < 0 | | mode > = REGIT_MODE_MAX ) {
zend_throw_exception_ex ( spl_ce_InvalidArgumentException , 0 TSRMLS_CC , " Illegal mode %ld " , mode ) ;
2006-11-07 23:19:11 +08:00
return ; /* NULL */
2006-07-22 04:14:31 +08:00
}
intern - > u . regex . mode = mode ;
} /* }}} */
/* {{{ proto bool RegexIterator::getFlags()
Returns current operation flags */
SPL_METHOD ( RegexIterator , getFlags )
{
spl_dual_it_object * intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_LONG ( intern - > u . regex . flags ) ;
} /* }}} */
/* {{{ proto bool RegexIterator::setFlags(int new_flags)
Set operation flags */
SPL_METHOD ( RegexIterator , setFlags )
{
spl_dual_it_object * intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
long flags ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " l " , & flags ) = = FAILURE ) {
return ;
}
intern - > u . regex . flags = flags ;
} /* }}} */
/* {{{ proto bool RegexIterator::getFlags()
Returns current PREG flags ( if in use or NULL ) */
SPL_METHOD ( RegexIterator , getPregFlags )
{
spl_dual_it_object * intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( intern - > u . regex . use_flags ) {
RETURN_LONG ( intern - > u . regex . preg_flags ) ;
} else {
return ;
}
} /* }}} */
2006-11-07 07:20:11 +08:00
/* {{{ proto bool RegexIterator::setPregFlags(int new_flags)
2006-07-22 04:14:31 +08:00
Set PREG flags */
SPL_METHOD ( RegexIterator , setPregFlags )
{
spl_dual_it_object * intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
long preg_flags ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " l " , & preg_flags ) = = FAILURE ) {
return ;
}
intern - > u . regex . preg_flags = preg_flags ;
intern - > u . regex . use_flags = 1 ;
} /* }}} */
2006-07-21 06:54:21 +08:00
/* {{{ proto void RecursiveRegexIterator::__construct(RecursiveIterator it, string regex [, int mode [, int flags [, int preg_flags]]])
2006-05-11 00:50:57 +08:00
Create an RecursiveRegexIterator from another recursive iterator and a regular expression */
SPL_METHOD ( RecursiveRegexIterator , __construct )
2006-05-10 08:03:38 +08:00
{
2006-05-11 00:50:57 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_RecursiveRegexIterator , spl_ce_RecursiveIterator , DIT_RecursiveRegexIterator ) ;
2006-05-10 08:03:38 +08:00
} /* }}} */
2006-05-22 02:13:37 +08:00
/* {{{ proto RecursiveRegexIterator RecursiveRegexIterator::getChildren()
Return the inner iterator ' s children contained in a RecursiveRegexIterator */
SPL_METHOD ( RecursiveRegexIterator , getChildren )
{
spl_dual_it_object * intern ;
zval * retval , * regex ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
zend_call_method_with_0_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " getchildren " , & retval ) ;
if ( ! EG ( exception ) ) {
MAKE_STD_ZVAL ( regex ) ;
ZVAL_STRING ( regex , intern - > u . regex . regex , 1 ) ;
spl_instantiate_arg_ex2 ( Z_OBJCE_P ( getThis ( ) ) , & return_value , 0 , retval , regex TSRMLS_CC ) ;
zval_ptr_dtor ( & regex ) ;
}
if ( retval ) {
zval_ptr_dtor ( & retval ) ;
}
} /* }}} */
2006-05-10 08:03:38 +08:00
# endif
2004-02-04 20:45:47 +08:00
/* {{{ spl_dual_it_free_storage */
2006-07-18 05:11:33 +08:00
static void spl_dual_it_free_storage ( void * _object TSRMLS_DC )
2003-12-02 15:18:05 +08:00
{
spl_dual_it_object * object = ( spl_dual_it_object * ) _object ;
spl_dual_it_free ( object TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
if ( object - > inner . iterator ) {
object - > inner . iterator - > funcs - > dtor ( object - > inner . iterator TSRMLS_CC ) ;
}
2003-12-02 15:18:05 +08:00
2003-12-10 18:19:43 +08:00
if ( object - > inner . zobject ) {
zval_ptr_dtor ( & object - > inner . zobject ) ;
}
2004-11-01 08:26:59 +08:00
if ( object - > dit_type = = DIT_AppendIterator ) {
object - > u . append . iterator - > funcs - > dtor ( object - > u . append . iterator TSRMLS_CC ) ;
2006-05-10 08:03:38 +08:00
if ( object - > u . append . zarrayit ) {
zval_ptr_dtor ( & object - > u . append . zarrayit ) ;
}
2004-11-01 08:26:59 +08:00
}
2003-12-10 18:19:43 +08:00
2006-05-10 08:03:38 +08:00
if ( object - > dit_type = = DIT_CachingIterator | | object - > dit_type = = DIT_RecursiveCachingIterator ) {
if ( object - > u . caching . zcache ) {
zval_ptr_dtor ( & object - > u . caching . zcache ) ;
object - > u . caching . zcache = NULL ;
}
}
# if HAVE_PCRE || HAVE_BUNDLED_PCRE
2006-05-11 00:50:57 +08:00
if ( object - > dit_type = = DIT_RegexIterator | | object - > dit_type = = DIT_RecursiveRegexIterator ) {
2006-05-10 08:03:38 +08:00
if ( object - > u . regex . pce ) {
object - > u . regex . pce - > refcount - - ;
}
2006-05-22 02:13:37 +08:00
if ( object - > u . regex . regex ) {
efree ( object - > u . regex . regex ) ;
}
2006-05-10 08:03:38 +08:00
}
# endif
2006-03-29 22:28:43 +08:00
zend_object_std_dtor ( & object - > std TSRMLS_CC ) ;
2003-12-02 15:18:05 +08:00
efree ( object ) ;
}
/* }}} */
2003-12-08 16:39:18 +08:00
/* {{{ spl_dual_it_new */
static zend_object_value spl_dual_it_new ( zend_class_entry * class_type TSRMLS_DC )
2003-12-02 15:18:05 +08:00
{
zend_object_value retval ;
spl_dual_it_object * intern ;
zval * tmp ;
intern = emalloc ( sizeof ( spl_dual_it_object ) ) ;
memset ( intern , 0 , sizeof ( spl_dual_it_object ) ) ;
2006-03-06 01:39:49 +08:00
intern - > dit_type = DIT_Unknown ;
2003-12-02 15:18:05 +08:00
2006-03-29 22:28:43 +08:00
zend_object_std_init ( & intern - > std , class_type TSRMLS_CC ) ;
2003-12-02 15:18:05 +08:00
zend_hash_copy ( intern - > std . properties , & class_type - > default_properties , ( copy_ctor_func_t ) zval_add_ref , ( void * ) & tmp , sizeof ( zval * ) ) ;
2005-11-15 06:03:02 +08:00
retval . handle = zend_objects_store_put ( intern , ( zend_objects_store_dtor_t ) zend_objects_destroy_object , ( zend_objects_free_object_storage_t ) spl_dual_it_free_storage , NULL TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
retval . handlers = & spl_handlers_dual_it ;
2003-11-09 22:05:36 +08:00
return retval ;
}
/* }}} */
2003-12-02 15:18:05 +08:00
static
ZEND_BEGIN_ARG_INFO ( arginfo_filter_it___construct , 0 )
2004-03-29 01:04:11 +08:00
ZEND_ARG_OBJ_INFO ( 0 , iterator , Iterator , 0 )
2003-12-02 15:18:05 +08:00
ZEND_END_ARG_INFO ( ) ;
static zend_function_entry spl_funcs_FilterIterator [ ] = {
2006-03-06 01:39:49 +08:00
SPL_ME ( FilterIterator , __construct , arginfo_filter_it___construct , ZEND_ACC_PUBLIC )
2004-03-10 01:35:18 +08:00
SPL_ME ( FilterIterator , rewind , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( FilterIterator , next , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
2003-12-02 15:18:05 +08:00
SPL_ABSTRACT_ME ( FilterIterator , accept , NULL )
{ NULL , NULL , NULL }
} ;
static
ZEND_BEGIN_ARG_INFO ( arginfo_parent_it___construct , 0 )
2005-09-15 11:33:04 +08:00
ZEND_ARG_OBJ_INFO ( 0 , iterator , RecursiveIterator , 0 )
2003-12-02 15:18:05 +08:00
ZEND_END_ARG_INFO ( ) ;
2005-09-15 11:33:04 +08:00
static zend_function_entry spl_funcs_RecursiveFilterIterator [ ] = {
SPL_ME ( RecursiveFilterIterator , __construct , arginfo_parent_it___construct , ZEND_ACC_PUBLIC )
SPL_MA ( ParentIterator , accept , RecursiveFilterIterator , hasChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveFilterIterator , hasChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveFilterIterator , getChildren , NULL , ZEND_ACC_PUBLIC )
{ NULL , NULL , NULL }
} ;
2003-12-02 15:18:05 +08:00
static zend_function_entry spl_funcs_ParentIterator [ ] = {
2004-03-10 01:35:18 +08:00
SPL_ME ( ParentIterator , __construct , arginfo_parent_it___construct , ZEND_ACC_PUBLIC )
SPL_MA ( ParentIterator , accept , ParentIterator , hasChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( ParentIterator , hasChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( ParentIterator , getChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
2003-12-02 15:18:05 +08:00
{ NULL , NULL , NULL }
2003-12-07 03:21:02 +08:00
} ;
2006-05-10 08:03:38 +08:00
# if HAVE_PCRE || HAVE_BUNDLED_PCRE
static
ZEND_BEGIN_ARG_INFO_EX ( arginfo_regex_it___construct , 0 , 0 , 2 )
ZEND_ARG_OBJ_INFO ( 0 , iterator , Iterator , 0 )
ZEND_ARG_INFO ( 0 , regex )
2006-07-17 05:12:32 +08:00
ZEND_ARG_INFO ( 0 , mode )
2006-07-21 06:54:21 +08:00
ZEND_ARG_INFO ( 0 , flags )
2006-07-17 05:12:32 +08:00
ZEND_ARG_INFO ( 0 , preg_flags )
2006-05-10 08:03:38 +08:00
ZEND_END_ARG_INFO ( ) ;
2006-07-22 04:14:31 +08:00
static
ZEND_BEGIN_ARG_INFO_EX ( arginfo_regex_it_set_mode , 0 , 0 , 1 )
ZEND_ARG_INFO ( 0 , mode )
ZEND_END_ARG_INFO ( ) ;
static
ZEND_BEGIN_ARG_INFO_EX ( arginfo_regex_it_set_flags , 0 , 0 , 1 )
ZEND_ARG_INFO ( 0 , flags )
ZEND_END_ARG_INFO ( ) ;
static
ZEND_BEGIN_ARG_INFO_EX ( arginfo_regex_it_set_preg_flags , 0 , 0 , 1 )
ZEND_ARG_INFO ( 0 , preg_flags )
ZEND_END_ARG_INFO ( ) ;
2006-05-11 00:50:57 +08:00
static zend_function_entry spl_funcs_RegexIterator [ ] = {
2006-07-22 04:14:31 +08:00
SPL_ME ( RegexIterator , __construct , arginfo_regex_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( RegexIterator , accept , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RegexIterator , getMode , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RegexIterator , setMode , arginfo_regex_it_set_mode , ZEND_ACC_PUBLIC )
SPL_ME ( RegexIterator , getFlags , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RegexIterator , setFlags , arginfo_regex_it_set_flags , ZEND_ACC_PUBLIC )
SPL_ME ( RegexIterator , getPregFlags , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RegexIterator , setPregFlags , arginfo_regex_it_set_preg_flags , ZEND_ACC_PUBLIC )
2006-05-10 08:03:38 +08:00
{ NULL , NULL , NULL }
} ;
static
ZEND_BEGIN_ARG_INFO_EX ( arginfo_rec_regex_it___construct , 0 , 0 , 2 )
ZEND_ARG_OBJ_INFO ( 0 , iterator , RecursiveIterator , 0 )
ZEND_ARG_INFO ( 0 , regex )
2006-07-22 05:26:11 +08:00
ZEND_ARG_INFO ( 0 , mode )
2006-05-10 08:03:38 +08:00
ZEND_ARG_INFO ( 0 , flags )
2006-07-22 05:26:11 +08:00
ZEND_ARG_INFO ( 0 , preg_flags )
2006-05-10 08:03:38 +08:00
ZEND_END_ARG_INFO ( ) ;
2006-05-11 00:50:57 +08:00
static zend_function_entry spl_funcs_RecursiveRegexIterator [ ] = {
SPL_ME ( RecursiveRegexIterator , __construct , arginfo_rec_regex_it___construct , ZEND_ACC_PUBLIC )
2006-05-10 08:03:38 +08:00
SPL_ME ( ParentIterator , hasChildren , NULL , ZEND_ACC_PUBLIC )
2006-05-22 02:13:37 +08:00
SPL_ME ( RecursiveRegexIterator , getChildren , NULL , ZEND_ACC_PUBLIC )
2006-05-10 08:03:38 +08:00
{ NULL , NULL , NULL }
} ;
# endif
2005-12-26 00:04:15 +08:00
static inline int spl_limit_it_valid ( spl_dual_it_object * intern TSRMLS_DC )
2004-01-29 06:59:03 +08:00
{
/* FAILURE / SUCCESS */
if ( intern - > u . limit . count ! = - 1 & & intern - > current . pos > = intern - > u . limit . offset + intern - > u . limit . count ) {
return FAILURE ;
} else {
2004-03-09 02:05:41 +08:00
return spl_dual_it_valid ( intern TSRMLS_CC ) ;
2004-01-29 06:59:03 +08:00
}
}
2005-12-26 00:04:15 +08:00
static inline void spl_limit_it_seek ( spl_dual_it_object * intern , long pos TSRMLS_DC )
2003-12-07 03:21:02 +08:00
{
2004-01-27 07:59:50 +08:00
zval * zpos ;
2003-12-07 03:21:02 +08:00
spl_dual_it_free ( intern TSRMLS_CC ) ;
if ( pos < intern - > u . limit . offset ) {
2004-11-02 01:39:59 +08:00
zend_throw_exception_ex ( spl_ce_OutOfBoundsException , 0 TSRMLS_CC , " Cannot seek to %ld which is below the offset %ld " , pos , intern - > u . limit . offset ) ;
2003-12-07 03:21:02 +08:00
return ;
}
2006-03-06 01:39:49 +08:00
if ( pos > = intern - > u . limit . offset + intern - > u . limit . count & & intern - > u . limit . count ! = - 1 ) {
2004-11-02 01:39:59 +08:00
zend_throw_exception_ex ( spl_ce_OutOfBoundsException , 0 TSRMLS_CC , " Cannot seek to %ld which is behind offest %ld plus count %ld " , pos , intern - > u . limit . offset , intern - > u . limit . count ) ;
2003-12-07 03:21:02 +08:00
return ;
}
if ( instanceof_function ( intern - > inner . ce , spl_ce_SeekableIterator TSRMLS_CC ) ) {
2004-01-27 07:59:50 +08:00
MAKE_STD_ZVAL ( zpos ) ;
ZVAL_LONG ( zpos , pos ) ;
2004-04-27 23:41:26 +08:00
spl_dual_it_free ( intern TSRMLS_CC ) ;
2004-01-27 07:59:50 +08:00
zend_call_method_with_1_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " seek " , NULL , zpos ) ;
zval_ptr_dtor ( & zpos ) ;
2006-05-22 02:13:37 +08:00
if ( ! EG ( exception ) ) {
intern - > current . pos = pos ;
if ( spl_limit_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) {
spl_dual_it_fetch ( intern , 0 TSRMLS_CC ) ;
}
2004-01-29 06:59:03 +08:00
}
2003-12-07 03:21:02 +08:00
} else {
/* emulate the forward seek, by next() calls */
/* a back ward seek is done by a previous rewind() */
if ( pos < intern - > current . pos ) {
spl_dual_it_rewind ( intern TSRMLS_CC ) ;
}
2004-03-09 02:05:41 +08:00
while ( pos > intern - > current . pos & & spl_dual_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) {
2003-12-08 16:39:18 +08:00
spl_dual_it_next ( intern , 1 TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
}
2004-03-09 02:05:41 +08:00
if ( spl_dual_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) {
2003-12-08 16:39:18 +08:00
spl_dual_it_fetch ( intern , 1 TSRMLS_CC ) ;
2003-12-07 03:21:02 +08:00
}
}
}
2004-10-30 18:18:10 +08:00
/* {{{ proto LimitIterator::__construct(Iterator it [, int offset, int count])
2004-05-06 17:01:31 +08:00
Construct a LimitIterator from an Iterator with a given starting offset and optionally a maximum count */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( LimitIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_LimitIterator , zend_ce_iterator , DIT_LimitIterator ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-07 03:21:02 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void LimitIterator::rewind()
Rewind the iterator to the specified starting offset */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( LimitIterator , rewind )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_dual_it_rewind ( intern TSRMLS_CC ) ;
spl_limit_it_seek ( intern , intern - > u . limit . offset TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-07 03:21:02 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto bool LimitIterator::valid()
2004-05-06 17:01:31 +08:00
Check whether the current element is valid */
2004-03-09 01:33:31 +08:00
SPL_METHOD ( LimitIterator , valid )
2003-12-07 03:21:02 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2004-03-09 02:05:41 +08:00
/* RETURN_BOOL(spl_limit_it_valid(intern TSRMLS_CC) == SUCCESS);*/
2003-12-07 03:21:02 +08:00
RETURN_BOOL ( ( intern - > u . limit . count = = - 1 | | intern - > current . pos < intern - > u . limit . offset + intern - > u . limit . count ) & & intern - > current . data ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-07 03:21:02 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void LimitIterator::next()
Move the iterator forward */
2004-01-29 06:59:03 +08:00
SPL_METHOD ( LimitIterator , next )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_dual_it_next ( intern , 1 TSRMLS_CC ) ;
if ( intern - > u . limit . count = = - 1 | | intern - > current . pos < intern - > u . limit . offset + intern - > u . limit . count ) {
spl_dual_it_fetch ( intern , 1 TSRMLS_CC ) ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2004-01-29 06:59:03 +08:00
2004-10-30 18:18:10 +08:00
/* {{{ proto void LimitIterator::seek(int position)
2004-05-06 17:01:31 +08:00
Seek to the given position */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( LimitIterator , seek )
{
spl_dual_it_object * intern ;
long pos ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " l " , & pos ) = = FAILURE ) {
return ;
}
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_limit_it_seek ( intern , pos TSRMLS_CC ) ;
RETURN_LONG ( intern - > current . pos ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-07 03:21:02 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto int LimitIterator::getPosition()
Return the current position */
2003-12-07 03:21:02 +08:00
SPL_METHOD ( LimitIterator , getPosition )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_LONG ( intern - > current . pos ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-07 03:21:02 +08:00
static
ZEND_BEGIN_ARG_INFO ( arginfo_seekable_it_seek , 0 )
ZEND_ARG_INFO ( 0 , position )
ZEND_END_ARG_INFO ( ) ;
static zend_function_entry spl_funcs_SeekableIterator [ ] = {
SPL_ABSTRACT_ME ( SeekableIterator , seek , arginfo_seekable_it_seek )
{ NULL , NULL , NULL }
} ;
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO_EX ( arginfo_limit_it___construct , 0 , 0 , 1 )
2004-03-29 01:04:11 +08:00
ZEND_ARG_OBJ_INFO ( 0 , iterator , Iterator , 0 )
2003-12-07 03:21:02 +08:00
ZEND_ARG_INFO ( 0 , offset )
ZEND_ARG_INFO ( 0 , count )
2003-12-02 15:18:05 +08:00
ZEND_END_ARG_INFO ( ) ;
2003-12-07 03:21:02 +08:00
static
ZEND_BEGIN_ARG_INFO ( arginfo_limit_it_seek , 0 )
ZEND_ARG_INFO ( 0 , position )
ZEND_END_ARG_INFO ( ) ;
static zend_function_entry spl_funcs_LimitIterator [ ] = {
2004-03-10 01:35:18 +08:00
SPL_ME ( LimitIterator , __construct , arginfo_limit_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( LimitIterator , rewind , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( LimitIterator , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( LimitIterator , next , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( LimitIterator , seek , arginfo_limit_it_seek , ZEND_ACC_PUBLIC )
SPL_ME ( LimitIterator , getPosition , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
2003-12-07 03:21:02 +08:00
{ NULL , NULL , NULL }
} ;
2005-12-26 00:04:15 +08:00
static inline int spl_caching_it_valid ( spl_dual_it_object * intern TSRMLS_DC )
2003-12-08 16:39:18 +08:00
{
2004-03-09 02:05:41 +08:00
return intern - > u . caching . flags & CIT_VALID ? SUCCESS : FAILURE ;
2003-12-08 16:39:18 +08:00
}
2005-12-26 00:04:15 +08:00
static inline int spl_caching_it_has_next ( spl_dual_it_object * intern TSRMLS_DC )
2003-12-08 16:39:18 +08:00
{
2004-03-09 02:05:41 +08:00
return spl_dual_it_valid ( intern TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
}
2005-12-26 00:04:15 +08:00
static inline void spl_caching_it_next ( spl_dual_it_object * intern TSRMLS_DC )
2003-12-08 16:39:18 +08:00
{
2003-12-10 18:19:43 +08:00
if ( spl_dual_it_fetch ( intern , 1 TSRMLS_CC ) = = SUCCESS ) {
2004-03-09 02:05:41 +08:00
intern - > u . caching . flags | = CIT_VALID ;
2006-05-10 08:03:38 +08:00
/* Full cache ? */
if ( intern - > u . caching . flags & CIT_FULL_CACHE ) {
zval * zcacheval ;
MAKE_STD_ZVAL ( zcacheval ) ;
ZVAL_ZVAL ( zcacheval , intern - > current . data , 1 , 0 ) ;
if ( intern - > current . key_type = = HASH_KEY_IS_LONG ) {
add_index_zval ( intern - > u . caching . zcache , intern - > current . int_key , zcacheval ) ;
} else {
zend_symtable_update ( HASH_OF ( intern - > u . caching . zcache ) , intern - > current . str_key , intern - > current . str_key_len , & zcacheval , sizeof ( void * ) , NULL ) ;
}
}
/* Recursion ? */
2005-09-19 01:15:04 +08:00
if ( intern - > dit_type = = DIT_RecursiveCachingIterator ) {
2003-12-08 16:39:18 +08:00
zval * retval , * zchildren , zflags ;
zend_call_method_with_0_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " haschildren " , & retval ) ;
2006-05-22 02:13:37 +08:00
if ( EG ( exception ) ) {
if ( retval ) {
zval_ptr_dtor ( & retval ) ;
}
if ( intern - > u . caching . flags & CIT_CATCH_GET_CHILD ) {
zend_clear_exception ( TSRMLS_C ) ;
} else {
return ;
}
} else {
if ( zend_is_true ( retval ) ) {
zend_call_method_with_0_params ( & intern - > inner . zobject , intern - > inner . ce , NULL , " getchildren " , & zchildren ) ;
if ( EG ( exception ) ) {
if ( zchildren ) {
zval_ptr_dtor ( & zchildren ) ;
}
if ( intern - > u . caching . flags & CIT_CATCH_GET_CHILD ) {
zend_clear_exception ( TSRMLS_C ) ;
} else {
2006-06-07 04:11:35 +08:00
zval_ptr_dtor ( & retval ) ;
2006-05-22 02:13:37 +08:00
return ;
}
} else {
INIT_PZVAL ( & zflags ) ;
ZVAL_LONG ( & zflags , intern - > u . caching . flags & CIT_PUBLIC ) ;
spl_instantiate_arg_ex2 ( spl_ce_RecursiveCachingIterator , & intern - > u . caching . zchildren , 1 , zchildren , & zflags TSRMLS_CC ) ;
2003-12-08 16:39:18 +08:00
zval_ptr_dtor ( & zchildren ) ;
}
2006-05-22 02:13:37 +08:00
}
zval_ptr_dtor ( & retval ) ;
if ( EG ( exception ) ) {
2006-05-16 16:21:08 +08:00
if ( intern - > u . caching . flags & CIT_CATCH_GET_CHILD ) {
zend_clear_exception ( TSRMLS_C ) ;
2006-05-19 05:42:58 +08:00
} else {
return ;
2006-05-16 16:21:08 +08:00
}
2003-12-08 16:39:18 +08:00
}
}
}
2006-05-19 05:42:58 +08:00
if ( intern - > u . caching . flags & ( CIT_TOSTRING_USE_INNER | CIT_CALL_TOSTRING ) ) {
int use_copy ;
zval expr_copy ;
ALLOC_ZVAL ( intern - > u . caching . zstr ) ;
if ( intern - > u . caching . flags & CIT_TOSTRING_USE_INNER ) {
* intern - > u . caching . zstr = * intern - > inner . zobject ;
2003-12-08 16:39:18 +08:00
} else {
2004-04-09 06:46:43 +08:00
* intern - > u . caching . zstr = * intern - > current . data ;
2006-05-19 05:42:58 +08:00
}
zend_make_printable_zval ( intern - > u . caching . zstr , & expr_copy , & use_copy ) ;
if ( use_copy ) {
* intern - > u . caching . zstr = expr_copy ;
INIT_PZVAL ( intern - > u . caching . zstr ) ;
zval_copy_ctor ( intern - > u . caching . zstr ) ;
zval_dtor ( & expr_copy ) ;
} else {
INIT_PZVAL ( intern - > u . caching . zstr ) ;
zval_copy_ctor ( intern - > u . caching . zstr ) ;
2004-03-18 03:58:32 +08:00
}
2003-12-08 16:39:18 +08:00
}
spl_dual_it_next ( intern , 0 TSRMLS_CC ) ;
} else {
2004-03-09 02:05:41 +08:00
intern - > u . caching . flags & = ~ CIT_VALID ;
2003-12-08 16:39:18 +08:00
}
}
2005-12-26 00:04:15 +08:00
static inline void spl_caching_it_rewind ( spl_dual_it_object * intern TSRMLS_DC )
2003-12-08 16:39:18 +08:00
{
spl_dual_it_rewind ( intern TSRMLS_CC ) ;
2006-05-10 08:03:38 +08:00
zend_hash_clean ( HASH_OF ( intern - > u . caching . zcache ) ) ;
2003-12-08 16:39:18 +08:00
spl_caching_it_next ( intern TSRMLS_CC ) ;
}
2006-03-06 17:50:44 +08:00
/* {{{ proto void CachingIterator::__construct(Iterator it [, flags = CIT_CALL_TOSTRING])
2004-05-06 17:01:31 +08:00
Construct a CachingIterator from an Iterator */
2003-12-08 16:39:18 +08:00
SPL_METHOD ( CachingIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_CachingIterator , zend_ce_iterator , DIT_CachingIterator ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void CachingIterator::rewind()
Rewind the iterator */
2003-12-08 16:39:18 +08:00
SPL_METHOD ( CachingIterator , rewind )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_caching_it_rewind ( intern TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto bool CachingIterator::valid()
2004-05-06 17:01:31 +08:00
Check whether the current element is valid */
2004-03-09 01:33:31 +08:00
SPL_METHOD ( CachingIterator , valid )
2003-12-08 16:39:18 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2004-03-09 02:05:41 +08:00
RETURN_BOOL ( spl_caching_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto void CachingIterator::next()
Move the iterator forward */
2003-12-08 16:39:18 +08:00
SPL_METHOD ( CachingIterator , next )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_caching_it_next ( intern TSRMLS_CC ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto bool CachingIterator::hasNext()
2004-12-29 21:53:40 +08:00
Check whether the inner iterator has a valid next element */
2003-12-08 16:39:18 +08:00
SPL_METHOD ( CachingIterator , hasNext )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_BOOL ( spl_caching_it_has_next ( intern TSRMLS_CC ) = = SUCCESS ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2004-05-06 17:01:31 +08:00
/* {{{ proto string CachingIterator::__toString()
2004-12-30 00:11:42 +08:00
Return the string representation of the current element */
2003-12-08 16:39:18 +08:00
SPL_METHOD ( CachingIterator , __toString )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2006-05-19 05:42:58 +08:00
if ( ! ( intern - > u . caching . flags & ( CIT_CALL_TOSTRING | CIT_TOSTRING_USE_KEY | CIT_TOSTRING_USE_CURRENT | CIT_TOSTRING_USE_INNER ) ) ) {
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " %s does not fetch string value (see CachingIterator::__construct) " , Z_OBJCE_P ( getThis ( ) ) - > name ) ;
2003-12-08 16:39:18 +08:00
}
2005-10-04 00:05:08 +08:00
if ( intern - > u . caching . flags & CIT_TOSTRING_USE_KEY ) {
if ( intern - > current . key_type = = HASH_KEY_IS_STRING ) {
2006-05-22 02:13:37 +08:00
RETURN_STRINGL ( intern - > current . str_key , intern - > current . str_key_len - 1 , 1 ) ;
2005-10-04 00:05:08 +08:00
} else {
RETVAL_LONG ( intern - > current . int_key ) ;
convert_to_string ( return_value ) ;
return ;
}
} else if ( intern - > u . caching . flags & CIT_TOSTRING_USE_CURRENT ) {
2006-05-19 05:42:58 +08:00
* return_value = * intern - > current . data ;
zval_copy_ctor ( return_value ) ;
convert_to_string ( return_value ) ;
INIT_PZVAL ( return_value ) ;
2005-10-04 00:05:08 +08:00
return ;
}
2003-12-08 16:39:18 +08:00
if ( intern - > u . caching . zstr ) {
RETURN_STRINGL ( Z_STRVAL_P ( intern - > u . caching . zstr ) , Z_STRLEN_P ( intern - > u . caching . zstr ) , 1 ) ;
} else {
RETURN_NULL ( ) ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2006-05-10 08:03:38 +08:00
/* {{{ proto void CachingIterator::offsetSet(mixed index, mixed newval)
Set given index in cache */
SPL_METHOD ( CachingIterator , offsetSet )
{
spl_dual_it_object * intern ;
char * arKey ;
uint nKeyLength ;
zval * value ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( ! ( intern - > u . caching . flags & CIT_FULL_CACHE ) ) {
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " %s does not use a full cache (see CachingIterator::__construct) " , Z_OBJCE_P ( getThis ( ) ) - > name ) ;
2006-05-10 08:03:38 +08:00
}
2006-05-10 08:29:42 +08:00
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " sz " , & arKey , & nKeyLength , & value ) = = FAILURE ) {
2006-05-10 08:03:38 +08:00
return ;
}
value - > refcount + + ;
zend_symtable_update ( HASH_OF ( intern - > u . caching . zcache ) , arKey , nKeyLength + 1 , & value , sizeof ( value ) , NULL ) ;
}
/* }}} */
/* {{{ proto string CachingIterator::offsetGet(mixed index)
Return the internal cache if used */
SPL_METHOD ( CachingIterator , offsetGet )
{
spl_dual_it_object * intern ;
char * arKey ;
uint nKeyLength ;
zval * * value ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( ! ( intern - > u . caching . flags & CIT_FULL_CACHE ) ) {
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " %s does not use a full cache (see CachingIterator::__construct) " , Z_OBJCE_P ( getThis ( ) ) - > name ) ;
2006-05-10 08:03:38 +08:00
}
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " s " , & arKey , & nKeyLength ) = = FAILURE ) {
return ;
}
if ( zend_symtable_find ( HASH_OF ( intern - > u . caching . zcache ) , arKey , nKeyLength + 1 , ( void * * ) & value ) = = FAILURE ) {
zend_error ( E_NOTICE , " Undefined index: %s " , arKey ) ;
return ;
}
RETURN_ZVAL ( * value , 1 , 0 ) ;
}
/* }}} */
/* {{{ proto void CachingIterator::offsetUnset(mixed index)
Unset given index in cache */
SPL_METHOD ( CachingIterator , offsetUnset )
{
spl_dual_it_object * intern ;
char * arKey ;
uint nKeyLength ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( ! ( intern - > u . caching . flags & CIT_FULL_CACHE ) ) {
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " %s does not use a full cache (see CachingIterator::__construct) " , Z_OBJCE_P ( getThis ( ) ) - > name ) ;
2006-05-10 08:03:38 +08:00
}
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " s " , & arKey , & nKeyLength ) = = FAILURE ) {
return ;
}
zend_symtable_del ( HASH_OF ( intern - > u . caching . zcache ) , arKey , nKeyLength + 1 ) ;
}
/* }}} */
/* {{{ proto bool CachingIterator::offsetExists(mixed index)
Return whether the requested index exists */
SPL_METHOD ( CachingIterator , offsetExists )
{
spl_dual_it_object * intern ;
char * arKey ;
uint nKeyLength ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( ! ( intern - > u . caching . flags & CIT_FULL_CACHE ) ) {
2006-05-19 05:48:33 +08:00
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " %s does not use a full cache (see CachingIterator::__construct) " , Z_OBJCE_P ( getThis ( ) ) - > name ) ;
2006-05-10 08:03:38 +08:00
}
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " s " , & arKey , & nKeyLength ) = = FAILURE ) {
return ;
}
RETURN_BOOL ( zend_symtable_exists ( HASH_OF ( intern - > u . caching . zcache ) , arKey , nKeyLength + 1 ) ) ;
}
/* }}} */
2006-05-22 02:13:37 +08:00
/* {{{ proto bool CachingIterator::getCache()
Return the cache */
SPL_METHOD ( CachingIterator , getCache )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( ! ( intern - > u . caching . flags & CIT_FULL_CACHE ) ) {
zend_throw_exception_ex ( spl_ce_BadMethodCallException , 0 TSRMLS_CC , " %v does not use a full cache (see CachingIterator::__construct) " , Z_OBJCE_P ( getThis ( ) ) - > name ) ;
return ;
}
RETURN_ZVAL ( intern - > u . caching . zcache , 1 , 0 ) ;
}
/* }}} */
2006-05-10 08:03:38 +08:00
/* {{{ proto int CachingIterator::getFlags()
Return the internal flags */
SPL_METHOD ( CachingIterator , getFlags )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_LONG ( intern - > u . caching . flags ) ;
}
/* }}} */
2006-11-07 07:20:11 +08:00
/* {{{ proto void CachingIterator::setFlags(int flags)
2006-05-10 08:03:38 +08:00
Set the internal flags */
SPL_METHOD ( CachingIterator , setFlags )
{
spl_dual_it_object * intern ;
long flags ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " l " , & flags ) = = FAILURE ) {
return ;
}
2006-05-19 05:42:58 +08:00
if ( spl_cit_check_flags ( flags ) ! = SUCCESS ) {
zend_throw_exception ( spl_ce_InvalidArgumentException , " Flags must contain only one of CALL_TOSTRING, TOSTRING_USE_KEY, TOSTRING_USE_CURRENT, TOSTRING_USE_INNER " , 0 TSRMLS_CC ) ;
2006-05-10 08:03:38 +08:00
return ;
}
2006-05-19 05:42:58 +08:00
if ( ( intern - > u . caching . flags & CIT_CALL_TOSTRING ) ! = 0 & & ( flags & CIT_CALL_TOSTRING ) = = 0 ) {
2006-05-10 08:03:38 +08:00
zend_throw_exception ( spl_ce_InvalidArgumentException , " Unsetting flag CALL_TO_STRING is not possible " , 0 TSRMLS_CC ) ;
return ;
}
2006-05-19 05:42:58 +08:00
if ( ( intern - > u . caching . flags & CIT_TOSTRING_USE_INNER ) ! = 0 & & ( flags & CIT_TOSTRING_USE_INNER ) = = 0 ) {
zend_throw_exception ( spl_ce_InvalidArgumentException , " Unsetting flag TOSTRING_USE_INNER is not possible " , 0 TSRMLS_CC ) ;
return ;
}
2006-05-10 08:03:38 +08:00
if ( ( flags & & CIT_FULL_CACHE ) ! = 0 & & ( intern - > u . caching . flags & CIT_FULL_CACHE ) = = 0 ) {
/* clear on (re)enable */
zend_hash_clean ( HASH_OF ( intern - > u . caching . zcache ) ) ;
}
intern - > u . caching . flags = ( intern - > u . caching . flags & ~ CIT_PUBLIC ) | ( flags & CIT_PUBLIC ) ;
}
/* }}} */
2003-12-08 16:39:18 +08:00
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO_EX ( arginfo_caching_it___construct , 0 , 0 , 1 )
2004-03-29 01:04:11 +08:00
ZEND_ARG_OBJ_INFO ( 0 , iterator , Iterator , 0 )
2004-11-01 02:43:00 +08:00
ZEND_ARG_INFO ( 0 , flags )
2003-12-08 16:39:18 +08:00
ZEND_END_ARG_INFO ( ) ;
2006-05-10 08:03:38 +08:00
static
ZEND_BEGIN_ARG_INFO ( arginfo_caching_it_setFlags , 0 )
ZEND_ARG_INFO ( 0 , flags )
ZEND_END_ARG_INFO ( ) ;
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO ( arginfo_caching_it_offsetGet , 0 )
2006-05-10 08:03:38 +08:00
ZEND_ARG_INFO ( 0 , index )
ZEND_END_ARG_INFO ( ) ;
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO ( arginfo_caching_it_offsetSet , 0 )
2006-05-10 08:03:38 +08:00
ZEND_ARG_INFO ( 0 , index )
ZEND_ARG_INFO ( 0 , newval )
ZEND_END_ARG_INFO ( ) ;
2003-12-08 16:39:18 +08:00
static zend_function_entry spl_funcs_CachingIterator [ ] = {
2004-03-10 01:35:18 +08:00
SPL_ME ( CachingIterator , __construct , arginfo_caching_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , rewind , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , next , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , hasNext , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , __toString , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
2006-05-10 08:03:38 +08:00
SPL_ME ( CachingIterator , getFlags , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , setFlags , arginfo_caching_it_setFlags , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , offsetGet , arginfo_caching_it_offsetGet , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , offsetSet , arginfo_caching_it_offsetSet , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , offsetUnset , arginfo_caching_it_offsetGet , ZEND_ACC_PUBLIC )
SPL_ME ( CachingIterator , offsetExists , arginfo_caching_it_offsetGet , ZEND_ACC_PUBLIC )
2006-05-22 02:13:37 +08:00
SPL_ME ( CachingIterator , getCache , NULL , ZEND_ACC_PUBLIC )
2003-12-08 16:39:18 +08:00
{ NULL , NULL , NULL }
} ;
2006-03-06 17:50:44 +08:00
/* {{{ proto void RecursiveCachingIterator::__construct(RecursiveIterator it [, flags = CIT_CALL_TOSTRING])
2004-05-06 17:01:31 +08:00
Create an iterator from a RecursiveIterator */
2005-09-19 01:15:04 +08:00
SPL_METHOD ( RecursiveCachingIterator , __construct )
2003-12-08 16:39:18 +08:00
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_RecursiveCachingIterator , spl_ce_RecursiveIterator , DIT_RecursiveCachingIterator ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto bool RecursiveCachingIterator::hasChildren()
2004-12-29 21:53:40 +08:00
Check whether the current element of the inner iterator has children */
2005-09-19 01:15:04 +08:00
SPL_METHOD ( RecursiveCachingIterator , hasChildren )
2003-12-08 16:39:18 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_BOOL ( intern - > u . caching . zchildren ) ;
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
2005-09-19 01:15:04 +08:00
/* {{{ proto RecursiveCachingIterator RecursiveCachingIterator::getChildren()
Return the inner iterator ' s children as a RecursiveCachingIterator */
SPL_METHOD ( RecursiveCachingIterator , getChildren )
2003-12-08 16:39:18 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
if ( intern - > u . caching . zchildren ) {
RETURN_ZVAL ( intern - > u . caching . zchildren , 1 , 0 ) ;
} else {
RETURN_NULL ( ) ;
}
2004-05-06 17:01:31 +08:00
} /* }}} */
2003-12-08 16:39:18 +08:00
static
2006-11-07 07:20:11 +08:00
ZEND_BEGIN_ARG_INFO_EX ( arginfo_caching_rec_it___construct , 0 , ZEND_RETURN_VALUE , 1 )
2004-03-29 01:04:11 +08:00
ZEND_ARG_OBJ_INFO ( 0 , iterator , Iterator , 0 )
2004-11-01 02:43:00 +08:00
ZEND_ARG_INFO ( 0 , flags )
2003-12-08 16:39:18 +08:00
ZEND_END_ARG_INFO ( ) ;
2005-09-19 01:15:04 +08:00
static zend_function_entry spl_funcs_RecursiveCachingIterator [ ] = {
SPL_ME ( RecursiveCachingIterator , __construct , arginfo_caching_rec_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveCachingIterator , hasChildren , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( RecursiveCachingIterator , getChildren , NULL , ZEND_ACC_PUBLIC )
2003-12-08 16:39:18 +08:00
{ NULL , NULL , NULL }
} ;
2006-03-06 17:50:44 +08:00
/* {{{ proto void IteratorIterator::__construct(Traversable it)
2004-11-01 02:43:00 +08:00
Create an iterator from anything that is traversable */
SPL_METHOD ( IteratorIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_IteratorIterator , zend_ce_traversable , DIT_IteratorIterator ) ;
2004-11-01 02:43:00 +08:00
} /* }}} */
static
ZEND_BEGIN_ARG_INFO ( arginfo_iterator_it___construct , 0 )
ZEND_ARG_OBJ_INFO ( 0 , iterator , Traversable , 0 )
ZEND_END_ARG_INFO ( ) ;
static zend_function_entry spl_funcs_IteratorIterator [ ] = {
SPL_ME ( IteratorIterator , __construct , arginfo_iterator_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , rewind , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , next , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
{ NULL , NULL , NULL }
} ;
2006-03-06 17:50:44 +08:00
/* {{{ proto void NoRewindIterator::__construct(Iterator it)
2004-11-01 02:43:00 +08:00
Create an iterator from another iterator */
SPL_METHOD ( NoRewindIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_NoRewindIterator , zend_ce_iterator , DIT_NoRewindIterator ) ;
2004-11-01 02:43:00 +08:00
} /* }}} */
2004-11-01 08:26:59 +08:00
/* {{{ proto void NoRewindIterator::rewind()
Prevent a call to inner iterators rewind ( ) */
2004-11-01 02:43:00 +08:00
SPL_METHOD ( NoRewindIterator , rewind )
2004-11-01 08:26:59 +08:00
{
/* nothing to do */
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto bool NoRewindIterator::valid()
2004-11-01 08:26:59 +08:00
Return inner iterators valid ( ) */
SPL_METHOD ( NoRewindIterator , valid )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_BOOL ( intern - > inner . iterator - > funcs - > valid ( intern - > inner . iterator TSRMLS_CC ) = = SUCCESS ) ;
} /* }}} */
/* {{{ proto mixed NoRewindIterator::key()
Return inner iterators key ( ) */
SPL_METHOD ( NoRewindIterator , key )
2004-11-01 02:43:00 +08:00
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2004-11-01 08:26:59 +08:00
if ( intern - > inner . iterator - > funcs - > get_current_key ) {
char * str_key ;
uint str_key_len ;
ulong int_key ;
if ( intern - > inner . iterator - > funcs - > get_current_key ( intern - > inner . iterator , & str_key , & str_key_len , & int_key TSRMLS_CC ) = = HASH_KEY_IS_LONG ) {
RETURN_LONG ( int_key ) ;
} else {
RETURN_STRINGL ( str_key , str_key_len - 1 , 0 ) ;
}
} else {
RETURN_NULL ( ) ;
}
} /* }}} */
/* {{{ proto mixed NoRewindIterator::current()
Return inner iterators current ( ) */
SPL_METHOD ( NoRewindIterator , current )
{
spl_dual_it_object * intern ;
zval * * data ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
intern - > inner . iterator - > funcs - > get_current_data ( intern - > inner . iterator , & data TSRMLS_CC ) ;
RETURN_ZVAL ( * data , 1 , 0 ) ;
} /* }}} */
/* {{{ proto void NoRewindIterator::next()
Return inner iterators next ( ) */
SPL_METHOD ( NoRewindIterator , next )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
intern - > inner . iterator - > funcs - > move_forward ( intern - > inner . iterator TSRMLS_CC ) ;
2004-11-01 02:43:00 +08:00
} /* }}} */
static
ZEND_BEGIN_ARG_INFO ( arginfo_norewind_it___construct , 0 )
ZEND_ARG_OBJ_INFO ( 0 , iterator , Iterator , 0 )
ZEND_END_ARG_INFO ( ) ;
static zend_function_entry spl_funcs_NoRewindIterator [ ] = {
SPL_ME ( NoRewindIterator , __construct , arginfo_norewind_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( NoRewindIterator , rewind , NULL , ZEND_ACC_PUBLIC )
2004-11-01 08:26:59 +08:00
SPL_ME ( NoRewindIterator , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( NoRewindIterator , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( NoRewindIterator , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( NoRewindIterator , next , NULL , ZEND_ACC_PUBLIC )
2004-11-01 02:43:00 +08:00
SPL_ME ( dual_it , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
{ NULL , NULL , NULL }
} ;
2006-03-06 17:50:44 +08:00
/* {{{ proto void InfiniteIterator::__construct(Iterator it)
2004-11-01 03:49:18 +08:00
Create an iterator from another iterator */
SPL_METHOD ( InfiniteIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_InfiniteIterator , zend_ce_iterator , DIT_InfiniteIterator ) ;
2004-11-01 03:49:18 +08:00
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void InfiniteIterator::next()
2004-11-01 03:49:18 +08:00
Prevent a call to inner iterators rewind ( ) ( internally the current data will be fetched if valid ( ) ) */
SPL_METHOD ( InfiniteIterator , next )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_dual_it_next ( intern , 1 TSRMLS_CC ) ;
if ( spl_dual_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) {
spl_dual_it_fetch ( intern , 0 TSRMLS_CC ) ;
} else {
spl_dual_it_rewind ( intern TSRMLS_CC ) ;
if ( spl_dual_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) {
spl_dual_it_fetch ( intern , 0 TSRMLS_CC ) ;
}
}
} /* }}} */
static zend_function_entry spl_funcs_InfiniteIterator [ ] = {
SPL_ME ( InfiniteIterator , __construct , arginfo_norewind_it___construct , ZEND_ACC_PUBLIC )
SPL_ME ( InfiniteIterator , next , NULL , ZEND_ACC_PUBLIC )
2004-11-03 09:16:10 +08:00
{ NULL , NULL , NULL }
2004-11-01 03:49:18 +08:00
} ;
2004-11-01 02:43:00 +08:00
2006-03-06 17:50:44 +08:00
/* {{{ proto void EmptyIterator::rewind()
2004-11-01 04:59:39 +08:00
Does nothing */
SPL_METHOD ( EmptyIterator , rewind )
{
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto false EmptyIterator::valid()
2004-11-01 04:59:39 +08:00
Return false */
SPL_METHOD ( EmptyIterator , valid )
{
RETURN_FALSE ;
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void EmptyIterator::key()
Throws exception BadMethodCallException */
2004-11-01 04:59:39 +08:00
SPL_METHOD ( EmptyIterator , key )
{
2004-11-02 01:39:59 +08:00
zend_throw_exception ( spl_ce_BadMethodCallException , " Accessing the key of an EmptyIterator " , 0 TSRMLS_CC ) ;
2004-11-01 04:59:39 +08:00
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void EmptyIterator::current()
Throws exception BadMethodCallException */
2004-11-01 04:59:39 +08:00
SPL_METHOD ( EmptyIterator , current )
{
2004-11-02 01:39:59 +08:00
zend_throw_exception ( spl_ce_BadMethodCallException , " Accessing the value of an EmptyIterator " , 0 TSRMLS_CC ) ;
2004-11-01 04:59:39 +08:00
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void EmptyIterator::next()
2004-11-01 04:59:39 +08:00
Does nothing */
SPL_METHOD ( EmptyIterator , next )
{
} /* }}} */
static zend_function_entry spl_funcs_EmptyIterator [ ] = {
SPL_ME ( EmptyIterator , rewind , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( EmptyIterator , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( EmptyIterator , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( EmptyIterator , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( EmptyIterator , next , NULL , ZEND_ACC_PUBLIC )
2004-11-03 09:20:16 +08:00
{ NULL , NULL , NULL }
2004-11-01 04:59:39 +08:00
} ;
2004-11-01 08:26:59 +08:00
int spl_append_it_next_iterator ( spl_dual_it_object * intern TSRMLS_DC ) /* { { { */
{
spl_dual_it_free ( intern TSRMLS_CC ) ;
if ( intern - > inner . zobject ) {
zval_ptr_dtor ( & intern - > inner . zobject ) ;
intern - > inner . zobject = NULL ;
intern - > inner . ce = NULL ;
intern - > inner . object = NULL ;
2005-12-22 08:06:38 +08:00
if ( intern - > inner . iterator ) {
intern - > inner . iterator - > funcs - > dtor ( intern - > inner . iterator TSRMLS_CC ) ;
intern - > inner . iterator = NULL ;
}
2004-11-01 08:26:59 +08:00
}
if ( intern - > u . append . iterator - > funcs - > valid ( intern - > u . append . iterator TSRMLS_CC ) = = SUCCESS ) {
zval * * it ;
intern - > u . append . iterator - > funcs - > get_current_data ( intern - > u . append . iterator , & it TSRMLS_CC ) ;
( * it ) - > refcount + + ;
intern - > inner . zobject = * it ;
intern - > inner . ce = Z_OBJCE_PP ( it ) ;
intern - > inner . object = zend_object_store_get_object ( * it TSRMLS_CC ) ;
2006-05-10 08:03:38 +08:00
intern - > inner . iterator = intern - > inner . ce - > get_iterator ( intern - > inner . ce , * it , 0 TSRMLS_CC ) ;
2004-11-01 08:26:59 +08:00
spl_dual_it_rewind ( intern TSRMLS_CC ) ;
return SUCCESS ;
} else {
return FAILURE ;
}
} /* }}} */
void spl_append_it_fetch ( spl_dual_it_object * intern TSRMLS_DC ) /* { { { */
{
while ( spl_dual_it_valid ( intern TSRMLS_CC ) ! = SUCCESS ) {
2006-03-06 01:39:49 +08:00
intern - > u . append . iterator - > funcs - > move_forward ( intern - > u . append . iterator TSRMLS_CC ) ;
2004-11-01 08:26:59 +08:00
if ( spl_append_it_next_iterator ( intern TSRMLS_CC ) ! = SUCCESS ) {
return ;
}
}
spl_dual_it_fetch ( intern , 0 TSRMLS_CC ) ;
} /* }}} */
void spl_append_it_next ( spl_dual_it_object * intern TSRMLS_DC ) /* { { { */
{
if ( spl_dual_it_valid ( intern TSRMLS_CC ) = = SUCCESS ) {
spl_dual_it_next ( intern , 1 TSRMLS_CC ) ;
}
spl_append_it_fetch ( intern TSRMLS_CC ) ;
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void AppendIterator::__construct()
2004-11-01 08:26:59 +08:00
Create an AppendIterator */
SPL_METHOD ( AppendIterator , __construct )
{
2006-03-06 01:39:49 +08:00
spl_dual_it_construct ( INTERNAL_FUNCTION_PARAM_PASSTHRU , spl_ce_AppendIterator , zend_ce_iterator , DIT_AppendIterator ) ;
2004-11-01 08:26:59 +08:00
} /* }}} */
/* {{{ proto void AppendIterator::append(Iterator it)
Append an iterator */
SPL_METHOD ( AppendIterator , append )
{
spl_dual_it_object * intern ;
zval * it ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
2006-03-06 01:39:49 +08:00
APPENDIT_CHECK_CTOR ( intern ) ;
2004-11-01 08:26:59 +08:00
2006-05-22 02:13:37 +08:00
if ( zend_parse_parameters_ex ( ZEND_PARSE_PARAMS_QUIET , ZEND_NUM_ARGS ( ) TSRMLS_CC , " O " , & it , zend_ce_iterator ) = = FAILURE ) {
2004-11-01 08:26:59 +08:00
return ;
}
spl_array_iterator_append ( intern - > u . append . zarrayit , it TSRMLS_CC ) ;
if ( ! intern - > inner . iterator | | spl_dual_it_valid ( intern TSRMLS_CC ) ! = SUCCESS ) {
if ( intern - > u . append . iterator - > funcs - > valid ( intern - > u . append . iterator TSRMLS_CC ) ! = SUCCESS ) {
intern - > u . append . iterator - > funcs - > rewind ( intern - > u . append . iterator TSRMLS_CC ) ;
}
do {
spl_append_it_next_iterator ( intern TSRMLS_CC ) ;
} while ( intern - > inner . zobject ! = it ) ;
spl_append_it_fetch ( intern TSRMLS_CC ) ;
}
} /* }}} */
/* {{{ proto void AppendIterator::rewind()
Rewind to the first iterator and rewind the first iterator , too */
SPL_METHOD ( AppendIterator , rewind )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
intern - > u . append . iterator - > funcs - > rewind ( intern - > u . append . iterator TSRMLS_CC ) ;
if ( spl_append_it_next_iterator ( intern TSRMLS_CC ) = = SUCCESS ) {
spl_append_it_fetch ( intern TSRMLS_CC ) ;
}
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto bool AppendIterator::valid()
2004-11-01 08:26:59 +08:00
Check if the current state is valid */
SPL_METHOD ( AppendIterator , valid )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
RETURN_BOOL ( intern - > current . data ) ;
} /* }}} */
2006-03-06 17:50:44 +08:00
/* {{{ proto void AppendIterator::next()
2004-11-01 08:26:59 +08:00
Forward to next element */
SPL_METHOD ( AppendIterator , next )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
spl_append_it_next ( intern TSRMLS_CC ) ;
} /* }}} */
2006-05-10 08:03:38 +08:00
/* {{{ proto int AppendIterator::getIteratorIndex()
Get index of iterator */
SPL_METHOD ( AppendIterator , getIteratorIndex )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
APPENDIT_CHECK_CTOR ( intern ) ;
spl_array_iterator_key ( intern - > u . append . zarrayit , return_value TSRMLS_CC ) ;
} /* }}} */
/* {{{ proto ArrayIterator AppendIterator::getArrayIterator()
Get access to inner ArrayIterator */
SPL_METHOD ( AppendIterator , getArrayIterator )
{
spl_dual_it_object * intern ;
intern = ( spl_dual_it_object * ) zend_object_store_get_object ( getThis ( ) TSRMLS_CC ) ;
APPENDIT_CHECK_CTOR ( intern ) ;
RETURN_ZVAL ( intern - > u . append . zarrayit , 1 , 0 ) ;
} /* }}} */
2004-11-01 08:26:59 +08:00
static
ZEND_BEGIN_ARG_INFO ( arginfo_append_it_append , 0 )
ZEND_ARG_OBJ_INFO ( 0 , iterator , Iterator , 0 )
ZEND_END_ARG_INFO ( ) ;
static zend_function_entry spl_funcs_AppendIterator [ ] = {
SPL_ME ( AppendIterator , __construct , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( AppendIterator , append , arginfo_append_it_append , ZEND_ACC_PUBLIC )
SPL_ME ( AppendIterator , rewind , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( AppendIterator , valid , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , key , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , current , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( AppendIterator , next , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( dual_it , getInnerIterator , NULL , ZEND_ACC_PUBLIC )
2006-05-10 08:03:38 +08:00
SPL_ME ( AppendIterator , getIteratorIndex , NULL , ZEND_ACC_PUBLIC )
SPL_ME ( AppendIterator , getArrayIterator , NULL , ZEND_ACC_PUBLIC )
2004-11-03 09:20:16 +08:00
{ NULL , NULL , NULL }
2004-11-01 08:26:59 +08:00
} ;
2006-05-21 05:01:42 +08:00
PHPAPI int spl_iterator_apply ( zval * obj , spl_iterator_apply_func_t apply_func , void * puser TSRMLS_DC )
2004-10-08 07:08:19 +08:00
{
zend_object_iterator * iter ;
2006-05-21 05:01:42 +08:00
zend_class_entry * ce = Z_OBJCE_P ( obj ) ;
2004-10-08 07:08:19 +08:00
2006-05-21 05:01:42 +08:00
iter = ce - > get_iterator ( ce , obj , 0 TSRMLS_CC ) ;
if ( EG ( exception ) ) {
goto done ;
2004-10-08 07:08:19 +08:00
}
2006-01-02 03:48:11 +08:00
if ( iter - > funcs - > rewind ) {
iter - > funcs - > rewind ( iter TSRMLS_CC ) ;
2006-05-21 05:01:42 +08:00
if ( EG ( exception ) ) {
goto done ;
}
2006-01-02 03:48:11 +08:00
}
2006-05-21 05:01:42 +08:00
2004-10-08 07:08:19 +08:00
while ( iter - > funcs - > valid ( iter TSRMLS_CC ) = = SUCCESS ) {
2006-05-12 17:42:56 +08:00
if ( EG ( exception ) ) {
2006-05-21 05:01:42 +08:00
goto done ;
2006-05-12 17:42:56 +08:00
}
2006-05-21 05:01:42 +08:00
if ( apply_func ( iter , puser TSRMLS_CC ) = = ZEND_HASH_APPLY_STOP | | EG ( exception ) ) {
goto done ;
2004-10-08 07:08:19 +08:00
}
iter - > funcs - > move_forward ( iter TSRMLS_CC ) ;
2006-05-12 17:42:56 +08:00
if ( EG ( exception ) ) {
2006-05-21 05:01:42 +08:00
goto done ;
2006-05-12 17:42:56 +08:00
}
2004-10-08 07:08:19 +08:00
}
2006-05-21 05:01:42 +08:00
done :
2004-10-08 07:08:19 +08:00
iter - > funcs - > dtor ( iter TSRMLS_CC ) ;
2006-05-21 05:01:42 +08:00
return EG ( exception ) ? FAILURE : SUCCESS ;
}
/* }}} */
static int spl_iterator_to_array_apply ( zend_object_iterator * iter , void * puser TSRMLS_DC ) /* { { { */
{
zval * * data , * return_value = ( zval * ) puser ;
char * str_key ;
uint str_key_len ;
ulong int_key ;
int key_type ;
iter - > funcs - > get_current_data ( iter , & data TSRMLS_CC ) ;
2006-05-12 17:42:56 +08:00
if ( EG ( exception ) ) {
2006-05-21 05:01:42 +08:00
return ZEND_HASH_APPLY_STOP ;
}
if ( iter - > funcs - > get_current_key ) {
key_type = iter - > funcs - > get_current_key ( iter , & str_key , & str_key_len , & int_key TSRMLS_CC ) ;
if ( EG ( exception ) ) {
return ZEND_HASH_APPLY_STOP ;
}
( * data ) - > refcount + + ;
switch ( key_type ) {
case HASH_KEY_IS_STRING :
add_assoc_zval_ex ( return_value , str_key , str_key_len , * data ) ;
efree ( str_key ) ;
break ;
case HASH_KEY_IS_LONG :
add_index_zval ( return_value , int_key , * data ) ;
break ;
}
} else {
( * data ) - > refcount + + ;
add_next_index_zval ( return_value , * data ) ;
}
return ZEND_HASH_APPLY_KEEP ;
}
/* }}} */
2006-11-21 03:58:01 +08:00
static int spl_iterator_to_values_apply ( zend_object_iterator * iter , void * puser TSRMLS_DC ) /* { { { */
{
zval * * data , * return_value = ( zval * ) puser ;
iter - > funcs - > get_current_data ( iter , & data TSRMLS_CC ) ;
if ( EG ( exception ) ) {
return ZEND_HASH_APPLY_STOP ;
}
( * data ) - > refcount + + ;
add_next_index_zval ( return_value , * data ) ;
return ZEND_HASH_APPLY_KEEP ;
}
/* }}} */
/* {{{ proto array iterator_to_array(Traversable it [, bool use_keys = true])
2006-05-21 05:01:42 +08:00
Copy the iterator into an array */
PHP_FUNCTION ( iterator_to_array )
{
2006-06-07 17:44:42 +08:00
zval * obj ;
2006-11-21 03:58:01 +08:00
zend_bool use_keys = 1 ;
2006-05-21 05:01:42 +08:00
2006-11-21 03:58:01 +08:00
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " O|b " , & obj , zend_ce_traversable , & use_keys ) = = FAILURE ) {
2006-05-21 05:01:42 +08:00
RETURN_FALSE ;
2006-05-12 17:42:56 +08:00
}
2006-05-21 05:01:42 +08:00
array_init ( return_value ) ;
2006-11-21 03:58:01 +08:00
if ( spl_iterator_apply ( obj , use_keys ? spl_iterator_to_array_apply : spl_iterator_to_values_apply , ( void * ) return_value TSRMLS_CC ) ! = SUCCESS ) {
2006-05-21 05:01:42 +08:00
zval_dtor ( return_value ) ;
RETURN_NULL ( ) ;
}
2006-11-21 03:58:01 +08:00
} /* }}} */
2006-05-21 05:01:42 +08:00
static int spl_iterator_count_apply ( zend_object_iterator * iter , void * puser TSRMLS_DC ) /* { { { */
{
( * ( long * ) puser ) + + ;
return ZEND_HASH_APPLY_KEEP ;
2004-10-08 07:08:19 +08:00
}
/* }}} */
2006-03-07 06:22:54 +08:00
/* {{{ proto int iterator_count(Traversable it)
2004-10-08 07:08:19 +08:00
Count the elements in an iterator */
PHP_FUNCTION ( iterator_count )
{
2006-06-07 17:44:42 +08:00
zval * obj ;
long count = 0 ;
2004-10-08 07:08:19 +08:00
2005-11-02 05:18:24 +08:00
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " O " , & obj , zend_ce_traversable ) = = FAILURE ) {
2004-10-08 07:08:19 +08:00
RETURN_FALSE ;
}
2006-05-21 05:01:42 +08:00
if ( spl_iterator_apply ( obj , spl_iterator_count_apply , ( void * ) & count TSRMLS_CC ) = = SUCCESS ) {
RETURN_LONG ( count ) ;
2006-01-02 03:55:27 +08:00
}
2004-10-08 07:08:19 +08:00
}
/* }}} */
2006-06-07 17:44:42 +08:00
typedef struct {
zval * obj ;
zval * args ;
long count ;
zend_fcall_info fci ;
zend_fcall_info_cache fcc ;
} spl_iterator_apply_info ;
static int spl_iterator_func_apply ( zend_object_iterator * iter , void * puser TSRMLS_DC ) /* { { { */
{
zval * retval ;
spl_iterator_apply_info * apply_info = ( spl_iterator_apply_info * ) puser ;
int result ;
apply_info - > count + + ;
zend_fcall_info_call ( & apply_info - > fci , & apply_info - > fcc , & retval , NULL TSRMLS_CC ) ;
if ( retval ) {
result = zend_is_true ( retval ) ? ZEND_HASH_APPLY_KEEP : ZEND_HASH_APPLY_STOP ;
zval_ptr_dtor ( & retval ) ;
} else {
result = ZEND_HASH_APPLY_STOP ;
}
return result ;
}
/* }}} */
/* {{{ proto int iterator_apply(Traversable it, mixed function [, mixed params])
Calls a function for every element in an iterator */
PHP_FUNCTION ( iterator_apply )
{
spl_iterator_apply_info apply_info ;
apply_info . args = NULL ;
if ( zend_parse_parameters ( ZEND_NUM_ARGS ( ) TSRMLS_CC , " Of|a! " , & apply_info . obj , zend_ce_traversable , & apply_info . fci , & apply_info . fcc , & apply_info . args ) = = FAILURE ) {
return ;
}
apply_info . count = 0 ;
zend_fcall_info_args ( & apply_info . fci , apply_info . args TSRMLS_CC ) ;
if ( spl_iterator_apply ( apply_info . obj , spl_iterator_func_apply , ( void * ) & apply_info TSRMLS_CC ) = = SUCCESS ) {
RETVAL_LONG ( apply_info . count ) ;
} else {
RETVAL_FALSE ;
}
zend_fcall_info_args ( & apply_info . fci , NULL TSRMLS_CC ) ;
}
/* }}} */
2004-10-30 04:12:57 +08:00
static zend_function_entry spl_funcs_OuterIterator [ ] = {
SPL_ABSTRACT_ME ( OuterIterator , getInnerIterator , NULL )
{ NULL , NULL , NULL }
} ;
2003-11-09 22:05:36 +08:00
/* {{{ PHP_MINIT_FUNCTION(spl_iterators)
*/
PHP_MINIT_FUNCTION ( spl_iterators )
{
REGISTER_SPL_INTERFACE ( RecursiveIterator ) ;
2003-12-08 16:39:18 +08:00
REGISTER_SPL_ITERATOR ( RecursiveIterator ) ;
REGISTER_SPL_STD_CLASS_EX ( RecursiveIteratorIterator , spl_RecursiveIteratorIterator_new , spl_funcs_RecursiveIteratorIterator ) ;
REGISTER_SPL_ITERATOR ( RecursiveIteratorIterator ) ;
2003-11-09 22:05:36 +08:00
2003-12-08 16:39:18 +08:00
memcpy ( & spl_handlers_rec_it_it , zend_get_std_object_handlers ( ) , sizeof ( zend_object_handlers ) ) ;
2004-11-01 03:05:19 +08:00
spl_handlers_rec_it_it . get_method = spl_recursive_it_get_method ;
2003-12-08 16:39:18 +08:00
spl_handlers_rec_it_it . clone_obj = NULL ;
2003-12-02 15:18:05 +08:00
2003-12-08 16:39:18 +08:00
memcpy ( & spl_handlers_dual_it , zend_get_std_object_handlers ( ) , sizeof ( zend_object_handlers ) ) ;
spl_handlers_dual_it . get_method = spl_dual_it_get_method ;
/*spl_handlers_dual_it.call_method = spl_dual_it_call_method;*/
spl_handlers_dual_it . clone_obj = NULL ;
2003-11-09 22:05:36 +08:00
spl_ce_RecursiveIteratorIterator - > get_iterator = spl_recursive_it_get_iterator ;
spl_ce_RecursiveIteratorIterator - > iterator_funcs . funcs = & spl_recursive_it_iterator_funcs ;
2005-09-15 11:33:04 +08:00
REGISTER_SPL_CLASS_CONST_LONG ( RecursiveIteratorIterator , " LEAVES_ONLY " , RIT_LEAVES_ONLY ) ;
REGISTER_SPL_CLASS_CONST_LONG ( RecursiveIteratorIterator , " SELF_FIRST " , RIT_SELF_FIRST ) ;
REGISTER_SPL_CLASS_CONST_LONG ( RecursiveIteratorIterator , " CHILD_FIRST " , RIT_CHILD_FIRST ) ;
REGISTER_SPL_CLASS_CONST_LONG ( RecursiveIteratorIterator , " CATCH_GET_CHILD " , RIT_CATCH_GET_CHILD ) ;
2003-12-02 15:18:05 +08:00
2006-03-26 10:25:03 +08:00
REGISTER_SPL_INTERFACE ( OuterIterator ) ;
REGISTER_SPL_ITERATOR ( OuterIterator ) ;
REGISTER_SPL_STD_CLASS_EX ( IteratorIterator , spl_dual_it_new , spl_funcs_IteratorIterator ) ;
REGISTER_SPL_ITERATOR ( IteratorIterator ) ;
2006-07-22 05:26:11 +08:00
REGISTER_SPL_IMPLEMENTS ( IteratorIterator , OuterIterator ) ;
2006-03-26 10:25:03 +08:00
REGISTER_SPL_SUB_CLASS_EX ( FilterIterator , IteratorIterator , spl_dual_it_new , spl_funcs_FilterIterator ) ;
2004-03-10 00:38:37 +08:00
spl_ce_FilterIterator - > ce_flags | = ZEND_ACC_EXPLICIT_ABSTRACT_CLASS ;
2003-12-02 15:18:05 +08:00
2005-09-15 11:33:04 +08:00
REGISTER_SPL_SUB_CLASS_EX ( RecursiveFilterIterator , FilterIterator , spl_dual_it_new , spl_funcs_RecursiveFilterIterator ) ;
REGISTER_SPL_IMPLEMENTS ( RecursiveFilterIterator , RecursiveIterator ) ;
REGISTER_SPL_SUB_CLASS_EX ( ParentIterator , RecursiveFilterIterator , spl_dual_it_new , spl_funcs_ParentIterator ) ;
2003-12-02 15:18:05 +08:00
2003-12-07 03:21:02 +08:00
REGISTER_SPL_INTERFACE ( SeekableIterator ) ;
2003-12-08 16:39:18 +08:00
REGISTER_SPL_ITERATOR ( SeekableIterator ) ;
2006-03-26 10:25:03 +08:00
REGISTER_SPL_SUB_CLASS_EX ( LimitIterator , IteratorIterator , spl_dual_it_new , spl_funcs_LimitIterator ) ;
2003-12-08 16:39:18 +08:00
2006-03-26 10:25:03 +08:00
REGISTER_SPL_SUB_CLASS_EX ( CachingIterator , IteratorIterator , spl_dual_it_new , spl_funcs_CachingIterator ) ;
2006-05-10 08:03:38 +08:00
REGISTER_SPL_IMPLEMENTS ( CachingIterator , ArrayAccess ) ;
2003-12-07 03:21:02 +08:00
2005-10-04 00:05:08 +08:00
REGISTER_SPL_CLASS_CONST_LONG ( CachingIterator , " CALL_TOSTRING " , CIT_CALL_TOSTRING ) ;
REGISTER_SPL_CLASS_CONST_LONG ( CachingIterator , " CATCH_GET_CHILD " , CIT_CATCH_GET_CHILD ) ;
REGISTER_SPL_CLASS_CONST_LONG ( CachingIterator , " TOSTRING_USE_KEY " , CIT_TOSTRING_USE_KEY ) ;
REGISTER_SPL_CLASS_CONST_LONG ( CachingIterator , " TOSTRING_USE_CURRENT " , CIT_TOSTRING_USE_CURRENT ) ;
2006-05-21 05:01:42 +08:00
REGISTER_SPL_CLASS_CONST_LONG ( CachingIterator , " TOSTRING_USE_INNER " , CIT_TOSTRING_USE_INNER ) ;
2006-05-10 08:03:38 +08:00
REGISTER_SPL_CLASS_CONST_LONG ( CachingIterator , " FULL_CACHE " , CIT_FULL_CACHE ) ;
2003-12-07 03:21:02 +08:00
2005-09-19 01:15:04 +08:00
REGISTER_SPL_SUB_CLASS_EX ( RecursiveCachingIterator , CachingIterator , spl_dual_it_new , spl_funcs_RecursiveCachingIterator ) ;
REGISTER_SPL_IMPLEMENTS ( RecursiveCachingIterator , RecursiveIterator ) ;
2004-10-30 04:12:57 +08:00
2006-03-26 10:25:03 +08:00
REGISTER_SPL_SUB_CLASS_EX ( NoRewindIterator , IteratorIterator , spl_dual_it_new , spl_funcs_NoRewindIterator ) ;
2004-10-30 04:12:57 +08:00
2006-03-26 10:25:03 +08:00
REGISTER_SPL_SUB_CLASS_EX ( AppendIterator , IteratorIterator , spl_dual_it_new , spl_funcs_AppendIterator ) ;
2004-11-01 08:26:59 +08:00
2004-10-30 04:12:57 +08:00
REGISTER_SPL_IMPLEMENTS ( RecursiveIteratorIterator , OuterIterator ) ;
2006-05-10 08:03:38 +08:00
2004-11-01 03:49:18 +08:00
REGISTER_SPL_SUB_CLASS_EX ( InfiniteIterator , IteratorIterator , spl_dual_it_new , spl_funcs_InfiniteIterator ) ;
2006-05-10 08:03:38 +08:00
# if HAVE_PCRE || HAVE_BUNDLED_PCRE
2006-05-11 00:50:57 +08:00
REGISTER_SPL_SUB_CLASS_EX ( RegexIterator , FilterIterator , spl_dual_it_new , spl_funcs_RegexIterator ) ;
2006-07-17 05:12:32 +08:00
REGISTER_SPL_CLASS_CONST_LONG ( RegexIterator , " USE_KEY " , REGIT_USE_KEY ) ;
REGISTER_SPL_CLASS_CONST_LONG ( RegexIterator , " MATCH " , REGIT_MODE_MATCH ) ;
REGISTER_SPL_CLASS_CONST_LONG ( RegexIterator , " GET_MATCH " , REGIT_MODE_GET_MATCH ) ;
REGISTER_SPL_CLASS_CONST_LONG ( RegexIterator , " ALL_MATCHES " , REGIT_MODE_ALL_MATCHES ) ;
REGISTER_SPL_CLASS_CONST_LONG ( RegexIterator , " SPLIT " , REGIT_MODE_SPLIT ) ;
2006-07-21 06:54:21 +08:00
REGISTER_SPL_CLASS_CONST_LONG ( RegexIterator , " REPLACE " , REGIT_MODE_REPLACE ) ;
REGISTER_SPL_PROPERTY ( RegexIterator , " replacement " , 0 ) ;
2006-05-11 00:50:57 +08:00
REGISTER_SPL_SUB_CLASS_EX ( RecursiveRegexIterator , RegexIterator , spl_dual_it_new , spl_funcs_RecursiveRegexIterator ) ;
REGISTER_SPL_IMPLEMENTS ( RecursiveRegexIterator , RecursiveIterator ) ;
2006-05-10 08:03:38 +08:00
# else
2006-05-11 00:50:57 +08:00
spl_ce_RegexIterator = NULL ;
spl_ce_RecursiveRegexIterator = NULL ;
2006-05-10 08:03:38 +08:00
# endif
2004-11-01 04:59:39 +08:00
REGISTER_SPL_STD_CLASS_EX ( EmptyIterator , NULL , spl_funcs_EmptyIterator ) ;
REGISTER_SPL_ITERATOR ( EmptyIterator ) ;
2004-11-01 03:49:18 +08:00
2003-11-09 22:05:36 +08:00
return SUCCESS ;
}
/* }}} */
/*
* Local variables :
* tab - width : 4
* c - basic - offset : 4
* End :
* vim600 : fdm = marker
* vim : noet sw = 4 ts = 4
*/