mirror of
https://github.com/php/php-src.git
synced 2024-10-22 16:57:05 +00:00
810 lines
24 KiB
C
Executable File
810 lines
24 KiB
C
Executable File
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 5 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997-2004 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 3.0 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available through the world-wide-web at the following url: |
|
|
| http://www.php.net/license/3_0.txt. |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Author: Marcus Boerger <helly@php.net> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
#include "php.h"
|
|
#include "php_ini.h"
|
|
#include "ext/standard/info.h"
|
|
#include "zend_compile.h"
|
|
#include "zend_exceptions.h"
|
|
#include "zend_interfaces.h"
|
|
|
|
#include "php_spl.h"
|
|
#include "spl_functions.h"
|
|
#include "spl_engine.h"
|
|
#include "spl_iterators.h"
|
|
#include "spl_directory.h"
|
|
|
|
#include "php.h"
|
|
#include "fopen_wrappers.h"
|
|
|
|
#include "ext/standard/basic_functions.h"
|
|
#include "ext/standard/php_filestat.h"
|
|
|
|
/* declare the class handlers */
|
|
static zend_object_handlers spl_ce_dir_handlers;
|
|
|
|
|
|
/* decalre the class entry */
|
|
PHPAPI zend_class_entry *spl_ce_DirectoryIterator;
|
|
PHPAPI zend_class_entry *spl_ce_RecursiveDirectoryIterator;
|
|
|
|
|
|
/* {{{ spl_ce_dir_object_free_storage */
|
|
/* close all resources and the memory allocated for the object */
|
|
static void spl_ce_dir_object_free_storage(void *object TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object *)object;
|
|
|
|
zend_hash_destroy(intern->std.properties);
|
|
FREE_HASHTABLE(intern->std.properties);
|
|
|
|
if (intern->path) {
|
|
efree(intern->path);
|
|
}
|
|
if (intern->dirp) {
|
|
php_stream_close(intern->dirp);
|
|
}
|
|
if (intern->path_name) {
|
|
efree(intern->path_name);
|
|
}
|
|
efree(object);
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_object_new */
|
|
/* creates the object by
|
|
- allocating memory
|
|
- initializing the object members
|
|
- storing the object
|
|
- setting it's handlers
|
|
|
|
called from
|
|
- clone
|
|
- new
|
|
*/
|
|
static zend_object_value spl_ce_dir_object_new_ex(zend_class_entry *class_type, spl_ce_dir_object **obj TSRMLS_DC)
|
|
{
|
|
zend_object_value retval;
|
|
spl_ce_dir_object *intern;
|
|
zval *tmp;
|
|
|
|
intern = emalloc(sizeof(spl_ce_dir_object));
|
|
memset(intern, 0, sizeof(spl_ce_dir_object));
|
|
intern->std.ce = class_type;
|
|
*obj = intern;
|
|
|
|
ALLOC_HASHTABLE(intern->std.properties);
|
|
zend_hash_init(intern->std.properties, 0, NULL, ZVAL_PTR_DTOR, 0);
|
|
zend_hash_copy(intern->std.properties, &class_type->default_properties, (copy_ctor_func_t) zval_add_ref, (void *) &tmp, sizeof(zval *));
|
|
|
|
retval.handle = zend_objects_store_put(intern, NULL, (zend_objects_free_object_storage_t) spl_ce_dir_object_free_storage, NULL TSRMLS_CC);
|
|
retval.handlers = &spl_ce_dir_handlers;
|
|
return retval;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_object_new */
|
|
/* See spl_ce_dir_object_new_ex */
|
|
static zend_object_value spl_ce_dir_object_new(zend_class_entry *class_type TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_object *tmp;
|
|
return spl_ce_dir_object_new_ex(class_type, &tmp TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_open */
|
|
/* open a directory resource */
|
|
static void spl_ce_dir_open(spl_ce_dir_object* intern, char *path TSRMLS_DC)
|
|
{
|
|
int path_len = strlen(path);
|
|
|
|
intern->dirp = php_stream_opendir(path, ENFORCE_SAFE_MODE|REPORT_ERRORS, NULL);
|
|
|
|
if (path_len && (path[path_len-1] == '/' || path[path_len-1] == '\\')) {
|
|
intern->path = estrndup(path, --path_len);
|
|
} else {
|
|
intern->path = estrndup(path, path_len);
|
|
}
|
|
intern->index = 0;
|
|
|
|
if (intern->dirp == NULL) {
|
|
/* throw exception: should've been already happened */
|
|
intern->entry.d_name[0] = '\0';
|
|
} else {
|
|
if (!php_stream_readdir(intern->dirp, &intern->entry)) {
|
|
intern->entry.d_name[0] = '\0';
|
|
}
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ spl_ce_dir_object_clone */
|
|
/* Local zend_object_value creation (on stack)
|
|
Load the 'other' object
|
|
Create a new empty object (See spl_ce_dir_object_new_ex)
|
|
Open the directory
|
|
Clone other members (properties)
|
|
*/
|
|
static zend_object_value spl_ce_dir_object_clone(zval *zobject TSRMLS_DC)
|
|
{
|
|
zend_object_value new_obj_val;
|
|
zend_object *old_object;
|
|
zend_object *new_object;
|
|
zend_object_handle handle = Z_OBJ_HANDLE_P(zobject);
|
|
spl_ce_dir_object *intern;
|
|
|
|
old_object = zend_objects_get_address(zobject TSRMLS_CC);
|
|
new_obj_val = spl_ce_dir_object_new_ex(old_object->ce, &intern TSRMLS_CC);
|
|
new_object = &intern->std;
|
|
|
|
spl_ce_dir_open(intern, ((spl_ce_dir_object*)old_object)->path TSRMLS_CC);
|
|
|
|
zend_objects_clone_members(new_object, new_obj_val, old_object, handle TSRMLS_CC);
|
|
|
|
return new_obj_val;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto void DirectoryIterator::__construct(string path)
|
|
Cronstructs a new dir iterator from a path. */
|
|
/* php_set_error_handling() is used to throw exceptions in case
|
|
the constructor fails. Here we use this to ensure the object
|
|
has a valid directory resource.
|
|
|
|
When the constructor gets called the object is already created
|
|
by the engine, so we must only call 'additional' initializations.
|
|
*/
|
|
SPL_METHOD(DirectoryIterator, __construct)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern;
|
|
char *path;
|
|
int len;
|
|
|
|
php_set_error_handling(EH_THROW, zend_exception_get_default() TSRMLS_CC);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &path, &len) == FAILURE) {
|
|
php_set_error_handling(EH_NORMAL, NULL TSRMLS_CC);
|
|
return;
|
|
}
|
|
|
|
intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
spl_ce_dir_open(intern, path TSRMLS_CC);
|
|
|
|
php_set_error_handling(EH_NORMAL, NULL TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto void DirectoryIterator::rewind()
|
|
Rewind dir back to the start */
|
|
SPL_METHOD(DirectoryIterator, rewind)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
intern->index = 0;
|
|
if (intern->dirp) {
|
|
php_stream_rewinddir(intern->dirp);
|
|
}
|
|
if (!intern->dirp || !php_stream_readdir(intern->dirp, &intern->entry)) {
|
|
intern->entry.d_name[0] = '\0';
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string DirectoryIterator::key()
|
|
Return current dir entry */
|
|
SPL_METHOD(DirectoryIterator, key)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
if (intern->dirp) {
|
|
RETURN_LONG(intern->index);
|
|
} else {
|
|
RETURN_FALSE;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto DirectoryIterator DirectoryIterator::current()
|
|
Return this (needed for Iterator interface) */
|
|
SPL_METHOD(DirectoryIterator, current)
|
|
{
|
|
RETURN_ZVAL(getThis(), 1, 0);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto void DirectoryIterator::next()
|
|
Move to next entry */
|
|
SPL_METHOD(DirectoryIterator, next)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
intern->index++;
|
|
if (!intern->dirp || !php_stream_readdir(intern->dirp, &intern->entry)) {
|
|
intern->entry.d_name[0] = '\0';
|
|
}
|
|
if (intern->path_name) {
|
|
efree(intern->path_name);
|
|
intern->path_name = NULL;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string DirectoryIterator::valid()
|
|
Check whether dir contains more entries */
|
|
SPL_METHOD(DirectoryIterator, valid)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
RETURN_BOOL(intern->entry.d_name[0] != '\0');
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string DirectoryIterator::getPath()
|
|
Return directory path */
|
|
SPL_METHOD(DirectoryIterator, getPath)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
RETURN_STRING(intern->path, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string DirectoryIterator::getFilename()
|
|
Return filename of current dir entry */
|
|
SPL_METHOD(DirectoryIterator, getFilename)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
RETURN_STRING(intern->entry.d_name, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
static inline void spl_dir_get_path_name(spl_ce_dir_object *intern)
|
|
{
|
|
if (!intern->path_name) {
|
|
intern->path_name_len = spprintf(&intern->path_name, 0, "%s/%s", intern->path, intern->entry.d_name);
|
|
}
|
|
}
|
|
|
|
/* {{{ proto string DirectoryIterator::getPathname()
|
|
Return path and filename of current dir entry */
|
|
SPL_METHOD(DirectoryIterator, getPathname)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
if (intern->entry.d_name[0]) {
|
|
spl_dir_get_path_name(intern);
|
|
RETURN_STRINGL(intern->path_name, intern->path_name_len, 1);
|
|
} else {
|
|
RETURN_BOOL(0);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto string RecursiveDirectoryIterator::key()
|
|
Return path and filename of current dir entry */
|
|
SPL_METHOD(RecursiveDirectoryIterator, key)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
spl_dir_get_path_name(intern);
|
|
RETURN_STRINGL(intern->path_name, intern->path_name_len, 1);
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool DirectoryIterator::isDot()
|
|
Returns true if current entry is '.' or '..' */
|
|
SPL_METHOD(DirectoryIterator, isDot)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
RETURN_BOOL(!strcmp(intern->entry.d_name, ".") || !strcmp(intern->entry.d_name, ".."));
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ FileFunction */
|
|
#define FileFunction(func_name, func_num) \
|
|
SPL_METHOD(DirectoryIterator, func_name) \
|
|
{ \
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(getThis() TSRMLS_CC); \
|
|
\
|
|
spl_dir_get_path_name(intern); \
|
|
php_stat(intern->path_name, intern->path_name_len, func_num, return_value TSRMLS_CC); \
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getPerms()
|
|
Get file permissions */
|
|
FileFunction(getPerms, FS_PERMS)
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getInode()
|
|
Get file inode */
|
|
FileFunction(getInode, FS_INODE)
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getSize()
|
|
Get file size */
|
|
FileFunction(getSize, FS_SIZE)
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getOwner()
|
|
Get file owner */
|
|
FileFunction(getOwner, FS_OWNER)
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getGroup()
|
|
Get file group */
|
|
FileFunction(getGroup, FS_GROUP)
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getATime()
|
|
Get last access time of file */
|
|
FileFunction(getATime, FS_ATIME)
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getMTime()
|
|
Get last modification time of file */
|
|
FileFunction(getMTime, FS_MTIME)
|
|
/* }}} */
|
|
|
|
/* {{{ proto int DirectoryIterator::getCTime()
|
|
Get inode modification time of file */
|
|
FileFunction(getCTime, FS_CTIME)
|
|
/* }}} */
|
|
|
|
/* {{{ proto string DirectoryIterator::getType()
|
|
Get file type */
|
|
FileFunction(getType, FS_TYPE)
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool DirectoryIterator::isWritable()
|
|
Returns true if file can be written */
|
|
FileFunction(isWritable, FS_IS_W)
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool DirectoryIterator::isReadable()
|
|
Returns true if file can be read */
|
|
FileFunction(isReadable, FS_IS_R)
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool DirectoryIterator::isExecutable()
|
|
Returns true if file is executable */
|
|
FileFunction(isExecutable, FS_IS_X)
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool DirectoryIterator::isFile()
|
|
Returns true if file is a regular file */
|
|
FileFunction(isFile, FS_IS_FILE)
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool DirectoryIterator::isDir()
|
|
Returns true if file is directory */
|
|
FileFunction(isDir, FS_IS_DIR)
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool DirectoryIterator::isLink()
|
|
Returns true if file is symbolic link */
|
|
FileFunction(isLink, FS_IS_LINK)
|
|
/* }}} */
|
|
|
|
/* {{{ proto void RecursiveDirectoryIterator::rewind()
|
|
Rewind dir back to the start */
|
|
SPL_METHOD(RecursiveDirectoryIterator, rewind)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
intern->index = 0;
|
|
if (intern->dirp) {
|
|
php_stream_rewinddir(intern->dirp);
|
|
}
|
|
do {
|
|
if (!intern->dirp || !php_stream_readdir(intern->dirp, &intern->entry)) {
|
|
intern->entry.d_name[0] = '\0';
|
|
}
|
|
} while (!strcmp(intern->entry.d_name, ".") || !strcmp(intern->entry.d_name, ".."));
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto void RecursiveDirectoryIterator::next()
|
|
Move to next entry */
|
|
SPL_METHOD(RecursiveDirectoryIterator, next)
|
|
{
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
intern->index++;
|
|
do {
|
|
if (!intern->dirp || !php_stream_readdir(intern->dirp, &intern->entry)) {
|
|
intern->entry.d_name[0] = '\0';
|
|
}
|
|
} while (!strcmp(intern->entry.d_name, ".") || !strcmp(intern->entry.d_name, ".."));
|
|
if (intern->path_name) {
|
|
efree(intern->path_name);
|
|
intern->path_name = NULL;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto bool RecursiveDirectoryIterator::hasChildren([bool $allow_links = false])
|
|
Returns whether current entry is a directory and not '.' or '..' */
|
|
SPL_METHOD(RecursiveDirectoryIterator, hasChildren)
|
|
{
|
|
zend_bool allow_links = 0;
|
|
zval *object = getThis();
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
if (!strcmp(intern->entry.d_name, ".") || !strcmp(intern->entry.d_name, "..")) {
|
|
RETURN_BOOL(0);
|
|
} else {
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &allow_links) == FAILURE) {
|
|
return;
|
|
}
|
|
spl_dir_get_path_name(intern);
|
|
if (!allow_links) {
|
|
php_stat(intern->path_name, intern->path_name_len, FS_IS_LINK, return_value TSRMLS_CC);
|
|
if (zend_is_true(return_value)) {
|
|
RETURN_BOOL(0);
|
|
}
|
|
}
|
|
php_stat(intern->path_name, intern->path_name_len, FS_IS_DIR, return_value TSRMLS_CC);
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ proto RecursiveDirectoryIterator DirectoryIterator::getChildren()
|
|
Returns an iterator fo rthe current entry if it is a directory */
|
|
SPL_METHOD(RecursiveDirectoryIterator, getChildren)
|
|
{
|
|
zval *object = getThis(), zpath;
|
|
spl_ce_dir_object *intern = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
spl_dir_get_path_name(intern);
|
|
|
|
INIT_PZVAL(&zpath);
|
|
ZVAL_STRINGL(&zpath, intern->path_name, intern->path_name_len, 0);
|
|
|
|
spl_instantiate_arg_ex1(spl_ce_RecursiveDirectoryIterator, &return_value, 0, &zpath TSRMLS_CC);
|
|
}
|
|
/* }}} */
|
|
|
|
/* define an overloaded iterator structure */
|
|
typedef struct {
|
|
zend_object_iterator intern;
|
|
zval *current;
|
|
spl_ce_dir_object *object;
|
|
} spl_ce_dir_it;
|
|
|
|
/* forward declarations to the iterator handlers */
|
|
static void spl_ce_dir_it_dtor(zend_object_iterator *iter TSRMLS_DC);
|
|
static int spl_ce_dir_it_valid(zend_object_iterator *iter TSRMLS_DC);
|
|
static void spl_ce_dir_it_current_data(zend_object_iterator *iter, zval ***data TSRMLS_DC);
|
|
static int spl_ce_dir_it_current_key(zend_object_iterator *iter, char **str_key, uint *str_key_len, ulong *int_key TSRMLS_DC);
|
|
static void spl_ce_dir_it_move_forward(zend_object_iterator *iter TSRMLS_DC);
|
|
static void spl_ce_dir_it_rewind(zend_object_iterator *iter TSRMLS_DC);
|
|
|
|
|
|
/* iterator handler table */
|
|
zend_object_iterator_funcs spl_ce_dir_it_funcs = {
|
|
spl_ce_dir_it_dtor,
|
|
spl_ce_dir_it_valid,
|
|
spl_ce_dir_it_current_data,
|
|
spl_ce_dir_it_current_key,
|
|
spl_ce_dir_it_move_forward,
|
|
spl_ce_dir_it_rewind
|
|
};
|
|
|
|
|
|
/* {{{ spl_ce_dir_get_iterator */
|
|
zend_object_iterator *spl_ce_dir_get_iterator(zend_class_entry *ce, zval *object TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = emalloc(sizeof(spl_ce_dir_it));
|
|
spl_ce_dir_object *dir_object = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
object->refcount++;
|
|
iterator->intern.data = (void*)object;
|
|
iterator->intern.funcs = &spl_ce_dir_it_funcs;
|
|
iterator->current = object;
|
|
object->refcount++;
|
|
iterator->object = dir_object;
|
|
|
|
return (zend_object_iterator*)iterator;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_it_dtor */
|
|
static void spl_ce_dir_it_dtor(zend_object_iterator *iter TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
|
|
zval_ptr_dtor(&iterator->current);
|
|
zval_ptr_dtor((zval**)&iterator->intern.data);
|
|
|
|
efree(iterator);
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_it_valid */
|
|
static int spl_ce_dir_it_valid(zend_object_iterator *iter TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
spl_ce_dir_object *object = iterator->object;
|
|
|
|
return object->entry.d_name[0] != '\0' ? SUCCESS : FAILURE;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_it_current_data */
|
|
static void spl_ce_dir_it_current_data(zend_object_iterator *iter, zval ***data TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
|
|
*data = &iterator->current;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_it_current_key */
|
|
static int spl_ce_dir_it_current_key(zend_object_iterator *iter, char **str_key, uint *str_key_len, ulong *int_key TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
spl_ce_dir_object *object = iterator->object;
|
|
|
|
*int_key = object->index;
|
|
return HASH_KEY_IS_LONG;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_it_move_forward */
|
|
static void spl_ce_dir_it_move_forward(zend_object_iterator *iter TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
spl_ce_dir_object *object = iterator->object;
|
|
|
|
object->index++;
|
|
if (!object->dirp || !php_stream_readdir(object->dirp, &object->entry)) {
|
|
object->entry.d_name[0] = '\0';
|
|
}
|
|
if (object->path_name) {
|
|
efree(object->path_name);
|
|
object->path_name = NULL;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_it_rewind */
|
|
static void spl_ce_dir_it_rewind(zend_object_iterator *iter TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
spl_ce_dir_object *object = iterator->object;
|
|
|
|
object->index = 0;
|
|
if (object->dirp) {
|
|
php_stream_rewinddir(object->dirp);
|
|
}
|
|
if (!object->dirp || !php_stream_readdir(object->dirp, &object->entry)) {
|
|
object->entry.d_name[0] = '\0';
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_tree_it_current_key */
|
|
static int spl_ce_dir_tree_it_current_key(zend_object_iterator *iter, char **str_key, uint *str_key_len, ulong *int_key TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
spl_ce_dir_object *object = iterator->object;
|
|
|
|
spl_dir_get_path_name(object);
|
|
*str_key_len = object->path_name_len + 1;
|
|
*str_key = estrndup(object->path_name, object->path_name_len);
|
|
return HASH_KEY_IS_STRING;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ spl_ce_dir_tree_it_move_forward */
|
|
static void spl_ce_dir_tree_it_move_forward(zend_object_iterator *iter TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
spl_ce_dir_object *object = iterator->object;
|
|
|
|
object->index++;
|
|
do {
|
|
if (!object->dirp || !php_stream_readdir(object->dirp, &object->entry)) {
|
|
object->entry.d_name[0] = '\0';
|
|
}
|
|
} while (!strcmp(object->entry.d_name, ".") || !strcmp(object->entry.d_name, ".."));
|
|
if (object->path_name) {
|
|
efree(object->path_name);
|
|
object->path_name = NULL;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ spl_ce_dir_tree_it_rewind */
|
|
static void spl_ce_dir_tree_it_rewind(zend_object_iterator *iter TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = (spl_ce_dir_it *)iter;
|
|
spl_ce_dir_object *object = iterator->object;
|
|
|
|
object->index = 0;
|
|
if (object->dirp) {
|
|
php_stream_rewinddir(object->dirp);
|
|
}
|
|
do {
|
|
if (!object->dirp || !php_stream_readdir(object->dirp, &object->entry)) {
|
|
object->entry.d_name[0] = '\0';
|
|
}
|
|
} while (!strcmp(object->entry.d_name, ".") || !strcmp(object->entry.d_name, ".."));
|
|
}
|
|
/* }}} */
|
|
|
|
/* iterator handler table */
|
|
zend_object_iterator_funcs spl_ce_dir_tree_it_funcs = {
|
|
spl_ce_dir_it_dtor,
|
|
spl_ce_dir_it_valid,
|
|
spl_ce_dir_it_current_data,
|
|
spl_ce_dir_tree_it_current_key,
|
|
spl_ce_dir_tree_it_move_forward,
|
|
spl_ce_dir_tree_it_rewind
|
|
};
|
|
|
|
/* {{{ spl_ce_dir_get_iterator */
|
|
zend_object_iterator *spl_ce_dir_tree_get_iterator(zend_class_entry *ce, zval *object TSRMLS_DC)
|
|
{
|
|
spl_ce_dir_it *iterator = emalloc(sizeof(spl_ce_dir_it));
|
|
spl_ce_dir_object *dir_object = (spl_ce_dir_object*)zend_object_store_get_object(object TSRMLS_CC);
|
|
|
|
object->refcount++;
|
|
iterator->intern.data = (void*)object;
|
|
iterator->intern.funcs = &spl_ce_dir_tree_it_funcs;
|
|
iterator->current = object;
|
|
object->refcount++;
|
|
iterator->object = dir_object;
|
|
|
|
return (zend_object_iterator*)iterator;
|
|
}
|
|
/* }}} */
|
|
|
|
/* {{{ spl_ce_dir_cast */
|
|
static int spl_ce_dir_cast(zval *readobj, zval *writeobj, int type, int should_free TSRMLS_DC)
|
|
{
|
|
zval free_obj;
|
|
spl_ce_dir_object *dir_object = (spl_ce_dir_object*)zend_object_store_get_object(readobj TSRMLS_CC);
|
|
|
|
if (type ==IS_STRING && *dir_object->entry.d_name) {
|
|
if (should_free) {
|
|
free_obj = *writeobj;
|
|
}
|
|
ZVAL_STRING(writeobj, dir_object->entry.d_name, 1);
|
|
if (should_free) {
|
|
zval_dtor(&free_obj);
|
|
}
|
|
return SUCCESS;
|
|
}
|
|
return FAILURE;
|
|
}
|
|
/* }}} */
|
|
|
|
/* declare method parameters */
|
|
/* supply a name and default to call by parameter */
|
|
static
|
|
ZEND_BEGIN_ARG_INFO(arginfo_dir___construct, 0)
|
|
ZEND_ARG_INFO(0, path) /* parameter name */
|
|
ZEND_END_ARG_INFO();
|
|
|
|
|
|
/* the method table */
|
|
/* each method can have its own parameters and visibility */
|
|
static zend_function_entry spl_ce_dir_class_functions[] = {
|
|
SPL_ME(DirectoryIterator, __construct, arginfo_dir___construct, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, rewind, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, valid, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, key, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, current, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, next, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getPath, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getFilename, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getPathname, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getPerms, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getInode, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getSize, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getOwner, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getGroup, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getATime, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getMTime, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getCTime, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, getType, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, isWritable, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, isReadable, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, isExecutable, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, isFile, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, isDir, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, isLink, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(DirectoryIterator, isDot, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_MA(DirectoryIterator, __toString, DirectoryIterator, getFilename, NULL, ZEND_ACC_PUBLIC)
|
|
{NULL, NULL, NULL}
|
|
};
|
|
|
|
static zend_function_entry spl_ce_dir_tree_class_functions[] = {
|
|
SPL_ME(RecursiveDirectoryIterator, rewind, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(RecursiveDirectoryIterator, next, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(RecursiveDirectoryIterator, key, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(RecursiveDirectoryIterator, hasChildren, NULL, ZEND_ACC_PUBLIC)
|
|
SPL_ME(RecursiveDirectoryIterator, getChildren, NULL, ZEND_ACC_PUBLIC)
|
|
{NULL, NULL, NULL}
|
|
};
|
|
|
|
|
|
/* {{{ PHP_MINIT_FUNCTION(spl_directory)
|
|
*/
|
|
PHP_MINIT_FUNCTION(spl_directory)
|
|
{
|
|
REGISTER_SPL_STD_CLASS_EX(DirectoryIterator, spl_ce_dir_object_new, spl_ce_dir_class_functions);
|
|
zend_class_implements(spl_ce_DirectoryIterator TSRMLS_CC, 1, zend_ce_iterator);
|
|
memcpy(&spl_ce_dir_handlers, zend_get_std_object_handlers(), sizeof(zend_object_handlers));
|
|
spl_ce_dir_handlers.clone_obj = spl_ce_dir_object_clone;
|
|
spl_ce_dir_handlers.cast_object = spl_ce_dir_cast;
|
|
|
|
spl_ce_DirectoryIterator->get_iterator = spl_ce_dir_get_iterator;
|
|
|
|
REGISTER_SPL_SUB_CLASS_EX(RecursiveDirectoryIterator, DirectoryIterator, spl_ce_dir_object_new, spl_ce_dir_tree_class_functions);
|
|
REGISTER_SPL_IMPLEMENTS(RecursiveDirectoryIterator, RecursiveIterator);
|
|
|
|
spl_ce_RecursiveDirectoryIterator->get_iterator = spl_ce_dir_tree_get_iterator;
|
|
|
|
return SUCCESS;
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* c-basic-offset: 4
|
|
* End:
|
|
* vim600: noet sw=4 ts=4 fdm=marker
|
|
* vim<600: noet sw=4 ts=4
|
|
*/
|