2003-05-01 23:28:28 +00:00
|
|
|
/*
|
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
| PHP version 4.0 |
|
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
| Copyright (c) 1997, 1998, 1999, 2000, 2001 The PHP Group |
|
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
| This source file is subject to version 2.02 of the PHP license, |
|
|
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
|
|
| available at through the world-wide-web at |
|
|
|
|
| http://www.php.net/license/2_02.txt. |
|
|
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
| Authors: Marcus Boerger <helly@php.net> |
|
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef SPL_ENGINE_H
|
|
|
|
#define SPL_ENGINE_H
|
|
|
|
|
|
|
|
#include "php.h"
|
|
|
|
#include "php_spl.h"
|
|
|
|
|
|
|
|
#include "zend_compile.h"
|
|
|
|
#include "zend_execute_locks.h"
|
|
|
|
|
|
|
|
#undef EX
|
|
|
|
#define EX(element) execute_data->element
|
|
|
|
#define EX_T(offset) (*(temp_variable *)((char *) EX(Ts) + offset))
|
|
|
|
#define T(offset) (*(temp_variable *)((char *) Ts + offset))
|
|
|
|
|
|
|
|
#define NEXT_OPCODE() \
|
|
|
|
EX(opline)++; \
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
int zend_do_fcall_common_helper(ZEND_OPCODE_HANDLER_ARGS);
|
|
|
|
|
2003-05-24 21:02:33 +00:00
|
|
|
int spl_call_method(zval **object_pp, zend_class_entry *obj_ce, zend_function **fn_proxy, char *function_name, int function_name_len, zval **retval_ptr, HashTable *symbol_table TSRMLS_DC, int param_count, ...);
|
|
|
|
|
|
|
|
/* {{{ zend_class_entry */
|
|
|
|
static inline zend_class_entry *spl_get_class_entry(zval *obj TSRMLS_DC)
|
|
|
|
{
|
|
|
|
if (obj && Z_TYPE_P(obj) == IS_OBJECT && Z_OBJ_HT_P(obj)->get_class_entry) {
|
|
|
|
return Z_OBJ_HT_P(obj)->get_class_entry(obj TSRMLS_CC);
|
|
|
|
} else {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
/* }}} */
|
2003-05-24 13:47:49 +00:00
|
|
|
|
|
|
|
/* {{{ spl_begin_method_call_arg */
|
2003-05-24 21:02:33 +00:00
|
|
|
static inline int spl_begin_method_call_arg(zval **ce, zend_class_entry *obj_ce, zend_function **fn_proxy, char *function_name, int fname_len, zval *retval, zval *arg1 TSRMLS_DC)
|
2003-05-24 13:47:49 +00:00
|
|
|
{
|
|
|
|
zval *local_retval;
|
2003-05-24 21:02:33 +00:00
|
|
|
int ret = spl_call_method(ce, obj_ce, fn_proxy, function_name, fname_len, &local_retval, NULL TSRMLS_CC, 1, arg1);
|
2003-05-24 13:47:49 +00:00
|
|
|
if (local_retval) {
|
|
|
|
COPY_PZVAL_TO_ZVAL(*retval, local_retval);
|
|
|
|
} else {
|
|
|
|
INIT_ZVAL(*retval);
|
|
|
|
}
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
|
|
|
/* {{{ spl_begin_method_call_this */
|
2003-05-24 21:02:33 +00:00
|
|
|
static inline int spl_begin_method_call_this(zval **ce, zend_class_entry *obj_ce, zend_function **fn_proxy, char *function_name, int fname_len, zval *retval TSRMLS_DC)
|
2003-05-24 13:47:49 +00:00
|
|
|
{
|
|
|
|
zval *local_retval;
|
2003-05-24 21:02:33 +00:00
|
|
|
int ret = spl_call_method(ce, obj_ce, fn_proxy, function_name, fname_len, &local_retval, NULL TSRMLS_CC, 0);
|
2003-05-24 13:47:49 +00:00
|
|
|
if (local_retval) {
|
|
|
|
COPY_PZVAL_TO_ZVAL(*retval, local_retval);
|
|
|
|
} else {
|
|
|
|
INIT_ZVAL(*retval);
|
|
|
|
}
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
|
|
|
/* {{{ spl_begin_method_call_ex */
|
2003-05-24 21:02:33 +00:00
|
|
|
static inline int spl_begin_method_call_ex(zval **ce, zend_class_entry *obj_ce, zend_function **fn_proxy, char *function_name, int fname_len, zval **retval TSRMLS_DC)
|
2003-05-24 13:47:49 +00:00
|
|
|
{
|
2003-05-24 21:02:33 +00:00
|
|
|
return spl_call_method(ce, obj_ce, fn_proxy, function_name, fname_len, retval, NULL TSRMLS_CC, 0);
|
2003-05-24 13:47:49 +00:00
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
|
|
|
/* {{{ spl_begin_method_call_arg_ex1 */
|
2003-05-24 21:02:33 +00:00
|
|
|
static inline int spl_begin_method_call_arg_ex1(zval **ce, zend_class_entry *obj_ce, zend_function **fn_proxy, char *function_name, int fname_len, zval **retval, zval *arg1 TSRMLS_DC)
|
2003-05-24 13:47:49 +00:00
|
|
|
{
|
2003-05-24 21:02:33 +00:00
|
|
|
return spl_call_method(ce, obj_ce, fn_proxy, function_name, fname_len, retval, NULL TSRMLS_CC, 1, arg1);
|
2003-05-24 13:47:49 +00:00
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
|
|
|
/* {{{ spl_begin_method_call_arg_ex2 */
|
2003-05-24 21:02:33 +00:00
|
|
|
static inline int spl_begin_method_call_arg_ex2(zval **ce, zend_class_entry *obj_ce, zend_function **fn_proxy, char *function_name, int fname_len, zval **retval, zval *arg1, zval *arg2 TSRMLS_DC)
|
2003-05-24 13:47:49 +00:00
|
|
|
{
|
2003-05-24 21:02:33 +00:00
|
|
|
return spl_call_method(ce, obj_ce, fn_proxy, function_name, fname_len, retval, NULL TSRMLS_CC, 2, arg1, arg2);
|
2003-05-24 13:47:49 +00:00
|
|
|
}
|
|
|
|
/* }}} */
|
2003-05-01 23:28:28 +00:00
|
|
|
|
|
|
|
void spl_instanciate(zend_class_entry *pce, zval **object TSRMLS_DC);
|
2003-05-24 13:47:49 +00:00
|
|
|
int spl_instanciate_arg_ex2(zend_class_entry *pce, zval **retval, zval *arg1, zval *arg2, HashTable *symbol_table TSRMLS_DC);
|
2003-05-01 23:28:28 +00:00
|
|
|
|
|
|
|
zval ** spl_get_zval_ptr_ptr(znode *node, temp_variable *Ts TSRMLS_DC);
|
|
|
|
void spl_unlock_zval_ptr_ptr(znode *node, temp_variable *Ts TSRMLS_DC);
|
|
|
|
zval * spl_get_zval_ptr(znode *node, temp_variable *Ts, zval **should_free TSRMLS_DC);
|
|
|
|
|
|
|
|
int spl_is_instance_of(zval **obj, zend_class_entry *ce TSRMLS_DC);
|
2003-05-02 15:39:12 +00:00
|
|
|
int spl_implements(zval **obj, zend_class_entry *ce TSRMLS_DC);
|
2003-05-01 23:28:28 +00:00
|
|
|
|
|
|
|
#endif /* SPL_ENGINE_H */
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Local Variables:
|
|
|
|
* c-basic-offset: 4
|
|
|
|
* tab-width: 4
|
|
|
|
* End:
|
|
|
|
* vim600: fdm=marker
|
|
|
|
* vim: noet sw=4 ts=4
|
|
|
|
*/
|