1/*
2   +----------------------------------------------------------------------+
3   | Zend Engine                                                          |
4   +----------------------------------------------------------------------+
5   | Copyright (c) 1998-2014 Zend Technologies Ltd. (http://www.zend.com) |
6   +----------------------------------------------------------------------+
7   | This source file is subject to version 2.00 of the Zend license,     |
8   | that is bundled with this package in the file LICENSE, and is        |
9   | available through the world-wide-web at the following url:           |
10   | http://www.zend.com/license/2_00.txt.                                |
11   | If you did not receive a copy of the Zend license and are unable to  |
12   | obtain it through the world-wide-web, please send a note to          |
13   | license@zend.com so we can mail you a copy immediately.              |
14   +----------------------------------------------------------------------+
15   | Authors: Andi Gutmans <andi@zend.com>                                |
16   |          Zeev Suraski <zeev@zend.com>                                |
17   |          Andrei Zmievski <andrei@php.net>                            |
18   +----------------------------------------------------------------------+
19*/
20
21/* $Id$ */
22
23#ifndef ZEND_API_H
24#define ZEND_API_H
25
26#include "zend_modules.h"
27#include "zend_list.h"
28#include "zend_operators.h"
29#include "zend_variables.h"
30#include "zend_execute.h"
31
32
33BEGIN_EXTERN_C()
34
35typedef struct _zend_function_entry {
36    const char *fname;
37    void (*handler)(INTERNAL_FUNCTION_PARAMETERS);
38    const struct _zend_arg_info *arg_info;
39    zend_uint num_args;
40    zend_uint flags;
41} zend_function_entry;
42
43typedef struct _zend_fcall_info {
44    size_t size;
45    HashTable *function_table;
46    zval *function_name;
47    HashTable *symbol_table;
48    zval **retval_ptr_ptr;
49    zend_uint param_count;
50    zval ***params;
51    zval *object_ptr;
52    zend_bool no_separation;
53} zend_fcall_info;
54
55typedef struct _zend_fcall_info_cache {
56    zend_bool initialized;
57    zend_function *function_handler;
58    zend_class_entry *calling_scope;
59    zend_class_entry *called_scope;
60    zval *object_ptr;
61} zend_fcall_info_cache;
62
63#define ZEND_NS_NAME(ns, name)          ns "\\" name
64
65#define ZEND_FN(name) zif_##name
66#define ZEND_MN(name) zim_##name
67#define ZEND_NAMED_FUNCTION(name)       void name(INTERNAL_FUNCTION_PARAMETERS)
68#define ZEND_FUNCTION(name)             ZEND_NAMED_FUNCTION(ZEND_FN(name))
69#define ZEND_METHOD(classname, name)    ZEND_NAMED_FUNCTION(ZEND_MN(classname##_##name))
70
71#define ZEND_FENTRY(zend_name, name, arg_info, flags)   { #zend_name, name, arg_info, (zend_uint) (sizeof(arg_info)/sizeof(struct _zend_arg_info)-1), flags },
72
73#define ZEND_RAW_FENTRY(zend_name, name, arg_info, flags)   { zend_name, name, arg_info, (zend_uint) (sizeof(arg_info)/sizeof(struct _zend_arg_info)-1), flags },
74#define ZEND_RAW_NAMED_FE(zend_name, name, arg_info) ZEND_RAW_FENTRY(#zend_name, name, arg_info, 0)
75
76#define ZEND_NAMED_FE(zend_name, name, arg_info)    ZEND_FENTRY(zend_name, name, arg_info, 0)
77#define ZEND_FE(name, arg_info)                     ZEND_FENTRY(name, ZEND_FN(name), arg_info, 0)
78#define ZEND_DEP_FE(name, arg_info)                 ZEND_FENTRY(name, ZEND_FN(name), arg_info, ZEND_ACC_DEPRECATED)
79#define ZEND_FALIAS(name, alias, arg_info)          ZEND_FENTRY(name, ZEND_FN(alias), arg_info, 0)
80#define ZEND_DEP_FALIAS(name, alias, arg_info)      ZEND_FENTRY(name, ZEND_FN(alias), arg_info, ZEND_ACC_DEPRECATED)
81#define ZEND_NAMED_ME(zend_name, name, arg_info, flags) ZEND_FENTRY(zend_name, name, arg_info, flags)
82#define ZEND_ME(classname, name, arg_info, flags)   ZEND_FENTRY(name, ZEND_MN(classname##_##name), arg_info, flags)
83#define ZEND_ABSTRACT_ME(classname, name, arg_info) ZEND_FENTRY(name, NULL, arg_info, ZEND_ACC_PUBLIC|ZEND_ACC_ABSTRACT)
84#define ZEND_MALIAS(classname, name, alias, arg_info, flags) \
85                                                    ZEND_FENTRY(name, ZEND_MN(classname##_##alias), arg_info, flags)
86#define ZEND_ME_MAPPING(name, func_name, arg_types, flags) ZEND_NAMED_ME(name, ZEND_FN(func_name), arg_types, flags)
87
88#define ZEND_NS_FENTRY(ns, zend_name, name, arg_info, flags)        ZEND_RAW_FENTRY(ZEND_NS_NAME(ns, #zend_name), name, arg_info, flags)
89
90#define ZEND_NS_RAW_FENTRY(ns, zend_name, name, arg_info, flags)    ZEND_RAW_FENTRY(ZEND_NS_NAME(ns, zend_name), name, arg_info, flags)
91#define ZEND_NS_RAW_NAMED_FE(ns, zend_name, name, arg_info)         ZEND_NS_RAW_FENTRY(ns, #zend_name, name, arg_info, 0)
92
93#define ZEND_NS_NAMED_FE(ns, zend_name, name, arg_info) ZEND_NS_FENTRY(ns, zend_name, name, arg_info, 0)
94#define ZEND_NS_FE(ns, name, arg_info)                  ZEND_NS_FENTRY(ns, name, ZEND_FN(name), arg_info, 0)
95#define ZEND_NS_DEP_FE(ns, name, arg_info)              ZEND_NS_FENTRY(ns, name, ZEND_FN(name), arg_info, ZEND_ACC_DEPRECATED)
96#define ZEND_NS_FALIAS(ns, name, alias, arg_info)       ZEND_NS_FENTRY(ns, name, ZEND_FN(alias), arg_info, 0)
97#define ZEND_NS_DEP_FALIAS(ns, name, alias, arg_info)   ZEND_NS_FENTRY(ns, name, ZEND_FN(alias), arg_info, ZEND_ACC_DEPRECATED)
98
99#define ZEND_FE_END            { NULL, NULL, NULL, 0, 0 }
100
101#define ZEND_ARG_INFO(pass_by_ref, name)                            { #name, sizeof(#name)-1, NULL, 0, 0, pass_by_ref, 0, 0 },
102#define ZEND_ARG_PASS_INFO(pass_by_ref)                             { NULL, 0, NULL, 0, 0, pass_by_ref, 0, 0 },
103#define ZEND_ARG_OBJ_INFO(pass_by_ref, name, classname, allow_null) { #name, sizeof(#name)-1, #classname, sizeof(#classname)-1, IS_OBJECT, pass_by_ref, allow_null, 0 },
104#define ZEND_ARG_ARRAY_INFO(pass_by_ref, name, allow_null) { #name, sizeof(#name)-1, NULL, 0, IS_ARRAY, pass_by_ref, allow_null, 0 },
105#define ZEND_ARG_TYPE_INFO(pass_by_ref, name, type_hint, allow_null) { #name, sizeof(#name)-1, NULL, 0, type_hint, pass_by_ref, allow_null, 0 },
106#define ZEND_ARG_VARIADIC_INFO(pass_by_ref, name)                   { #name, sizeof(#name)-1, NULL, 0, 0, pass_by_ref, 0, 1 },
107
108#define ZEND_BEGIN_ARG_INFO_EX(name, _unused, return_reference, required_num_args)  \
109    static const zend_arg_info name[] = {                                                                       \
110        { NULL, 0, NULL, required_num_args, 0, return_reference, 0, 0 },
111#define ZEND_BEGIN_ARG_INFO(name, _unused)  \
112    ZEND_BEGIN_ARG_INFO_EX(name, 0, ZEND_RETURN_VALUE, -1)
113#define ZEND_END_ARG_INFO()     };
114
115/* Name macros */
116#define ZEND_MODULE_STARTUP_N(module)       zm_startup_##module
117#define ZEND_MODULE_SHUTDOWN_N(module)      zm_shutdown_##module
118#define ZEND_MODULE_ACTIVATE_N(module)      zm_activate_##module
119#define ZEND_MODULE_DEACTIVATE_N(module)    zm_deactivate_##module
120#define ZEND_MODULE_POST_ZEND_DEACTIVATE_N(module)  zm_post_zend_deactivate_##module
121#define ZEND_MODULE_INFO_N(module)          zm_info_##module
122#define ZEND_MODULE_GLOBALS_CTOR_N(module)  zm_globals_ctor_##module
123#define ZEND_MODULE_GLOBALS_DTOR_N(module)  zm_globals_dtor_##module
124
125/* Declaration macros */
126#define ZEND_MODULE_STARTUP_D(module)       int ZEND_MODULE_STARTUP_N(module)(INIT_FUNC_ARGS)
127#define ZEND_MODULE_SHUTDOWN_D(module)      int ZEND_MODULE_SHUTDOWN_N(module)(SHUTDOWN_FUNC_ARGS)
128#define ZEND_MODULE_ACTIVATE_D(module)      int ZEND_MODULE_ACTIVATE_N(module)(INIT_FUNC_ARGS)
129#define ZEND_MODULE_DEACTIVATE_D(module)    int ZEND_MODULE_DEACTIVATE_N(module)(SHUTDOWN_FUNC_ARGS)
130#define ZEND_MODULE_POST_ZEND_DEACTIVATE_D(module)  int ZEND_MODULE_POST_ZEND_DEACTIVATE_N(module)(void)
131#define ZEND_MODULE_INFO_D(module)          void ZEND_MODULE_INFO_N(module)(ZEND_MODULE_INFO_FUNC_ARGS)
132#define ZEND_MODULE_GLOBALS_CTOR_D(module)  void ZEND_MODULE_GLOBALS_CTOR_N(module)(zend_##module##_globals *module##_globals TSRMLS_DC)
133#define ZEND_MODULE_GLOBALS_DTOR_D(module)  void ZEND_MODULE_GLOBALS_DTOR_N(module)(zend_##module##_globals *module##_globals TSRMLS_DC)
134
135#define ZEND_GET_MODULE(name) \
136    BEGIN_EXTERN_C()\
137    ZEND_DLEXPORT zend_module_entry *get_module(void) { return &name##_module_entry; }\
138    END_EXTERN_C()
139
140#define ZEND_BEGIN_MODULE_GLOBALS(module_name)      \
141    typedef struct _zend_##module_name##_globals {
142#define ZEND_END_MODULE_GLOBALS(module_name)        \
143    } zend_##module_name##_globals;
144
145#ifdef ZTS
146
147#define ZEND_DECLARE_MODULE_GLOBALS(module_name)                            \
148    ts_rsrc_id module_name##_globals_id;
149#define ZEND_EXTERN_MODULE_GLOBALS(module_name)                             \
150    extern ts_rsrc_id module_name##_globals_id;
151#define ZEND_INIT_MODULE_GLOBALS(module_name, globals_ctor, globals_dtor)   \
152    ts_allocate_id(&module_name##_globals_id, sizeof(zend_##module_name##_globals), (ts_allocate_ctor) globals_ctor, (ts_allocate_dtor) globals_dtor);
153
154#else
155
156#define ZEND_DECLARE_MODULE_GLOBALS(module_name)                            \
157    zend_##module_name##_globals module_name##_globals;
158#define ZEND_EXTERN_MODULE_GLOBALS(module_name)                             \
159    extern zend_##module_name##_globals module_name##_globals;
160#define ZEND_INIT_MODULE_GLOBALS(module_name, globals_ctor, globals_dtor)   \
161    globals_ctor(&module_name##_globals);
162
163#endif
164
165#define INIT_CLASS_ENTRY(class_container, class_name, functions) \
166    INIT_OVERLOADED_CLASS_ENTRY(class_container, class_name, functions, NULL, NULL, NULL)
167
168#define INIT_CLASS_ENTRY_EX(class_container, class_name, class_name_len, functions) \
169    INIT_OVERLOADED_CLASS_ENTRY_EX(class_container, class_name, class_name_len, functions, NULL, NULL, NULL, NULL, NULL)
170
171#define INIT_OVERLOADED_CLASS_ENTRY_EX(class_container, class_name, class_name_len, functions, handle_fcall, handle_propget, handle_propset, handle_propunset, handle_propisset) \
172    {                                                           \
173        const char *cl_name = class_name;                               \
174        int _len = class_name_len;                              \
175        class_container.name = zend_new_interned_string(cl_name, _len+1, 0 TSRMLS_CC);  \
176        if (class_container.name == cl_name) {                  \
177            class_container.name = zend_strndup(cl_name, _len); \
178        }                                                       \
179        class_container.name_length = _len;                     \
180        INIT_CLASS_ENTRY_INIT_METHODS(class_container, functions, handle_fcall, handle_propget, handle_propset, handle_propunset, handle_propisset) \
181    }
182
183#define INIT_CLASS_ENTRY_INIT_METHODS(class_container, functions, handle_fcall, handle_propget, handle_propset, handle_propunset, handle_propisset) \
184    {                                                           \
185        class_container.constructor = NULL;                     \
186        class_container.destructor = NULL;                      \
187        class_container.clone = NULL;                           \
188        class_container.serialize = NULL;                       \
189        class_container.unserialize = NULL;                     \
190        class_container.create_object = NULL;                   \
191        class_container.interface_gets_implemented = NULL;      \
192        class_container.get_static_method = NULL;               \
193        class_container.__call = handle_fcall;                  \
194        class_container.__callstatic = NULL;                    \
195        class_container.__tostring = NULL;                      \
196        class_container.__get = handle_propget;                 \
197        class_container.__set = handle_propset;                 \
198        class_container.__unset = handle_propunset;             \
199        class_container.__isset = handle_propisset;             \
200        class_container.__debugInfo = NULL;                 \
201        class_container.serialize_func = NULL;                  \
202        class_container.unserialize_func = NULL;                \
203        class_container.serialize = NULL;                       \
204        class_container.unserialize = NULL;                     \
205        class_container.parent = NULL;                          \
206        class_container.num_interfaces = 0;                     \
207        class_container.traits = NULL;                          \
208        class_container.num_traits = 0;                         \
209        class_container.trait_aliases = NULL;                   \
210        class_container.trait_precedences = NULL;               \
211        class_container.interfaces = NULL;                      \
212        class_container.get_iterator = NULL;                    \
213        class_container.iterator_funcs.funcs = NULL;            \
214        class_container.info.internal.module = NULL;            \
215        class_container.info.internal.builtin_functions = functions;    \
216    }
217
218#define INIT_OVERLOADED_CLASS_ENTRY(class_container, class_name, functions, handle_fcall, handle_propget, handle_propset) \
219    INIT_OVERLOADED_CLASS_ENTRY_EX(class_container, class_name, sizeof(class_name)-1, functions, handle_fcall, handle_propget, handle_propset, NULL, NULL)
220
221#define INIT_NS_CLASS_ENTRY(class_container, ns, class_name, functions) \
222    INIT_CLASS_ENTRY(class_container, ZEND_NS_NAME(ns, class_name), functions)
223#define INIT_OVERLOADED_NS_CLASS_ENTRY_EX(class_container, ns, class_name, functions, handle_fcall, handle_propget, handle_propset, handle_propunset, handle_propisset) \
224    INIT_OVERLOADED_CLASS_ENTRY_EX(class_container, ZEND_NS_NAME(ns, class_name), sizeof(ZEND_NS_NAME(ns, class_name))-1, functions, handle_fcall, handle_propget, handle_propset, handle_propunset, handle_propisset)
225#define INIT_OVERLOADED_NS_CLASS_ENTRY(class_container, ns, class_name, functions, handle_fcall, handle_propget, handle_propset) \
226    INIT_OVERLOADED_CLASS_ENTRY(class_container, ZEND_NS_NAME(ns, class_name), functions, handle_fcall, handle_propget, handle_propset)
227
228#ifdef ZTS
229#   define CE_STATIC_MEMBERS(ce) (((ce)->type==ZEND_USER_CLASS)?(ce)->static_members_table:CG(static_members_table)[(zend_intptr_t)(ce)->static_members_table])
230#else
231#   define CE_STATIC_MEMBERS(ce) ((ce)->static_members_table)
232#endif
233
234#define ZEND_FCI_INITIALIZED(fci) ((fci).size != 0)
235
236int zend_next_free_module(void);
237
238BEGIN_EXTERN_C()
239ZEND_API int zend_get_parameters(int ht, int param_count, ...);
240ZEND_API int _zend_get_parameters_array(int ht, int param_count, zval **argument_array TSRMLS_DC);
241ZEND_API ZEND_ATTRIBUTE_DEPRECATED int zend_get_parameters_ex(int param_count, ...);
242ZEND_API int _zend_get_parameters_array_ex(int param_count, zval ***argument_array TSRMLS_DC);
243
244/* internal function to efficiently copy parameters when executing __call() */
245ZEND_API int zend_copy_parameters_array(int param_count, zval *argument_array TSRMLS_DC);
246
247#define zend_get_parameters_array(ht, param_count, argument_array)          \
248    _zend_get_parameters_array(ht, param_count, argument_array TSRMLS_CC)
249#define zend_get_parameters_array_ex(param_count, argument_array)           \
250    _zend_get_parameters_array_ex(param_count, argument_array TSRMLS_CC)
251#define zend_parse_parameters_none()                                        \
252    zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "")
253
254/* Parameter parsing API -- andrei */
255
256#define ZEND_PARSE_PARAMS_QUIET 1<<1
257ZEND_API int zend_parse_parameters(int num_args TSRMLS_DC, const char *type_spec, ...);
258ZEND_API int zend_parse_parameters_ex(int flags, int num_args TSRMLS_DC, const char *type_spec, ...);
259ZEND_API char *zend_zval_type_name(const zval *arg);
260
261ZEND_API int zend_parse_method_parameters(int num_args TSRMLS_DC, zval *this_ptr, const char *type_spec, ...);
262ZEND_API int zend_parse_method_parameters_ex(int flags, int num_args TSRMLS_DC, zval *this_ptr, const char *type_spec, ...);
263
264ZEND_API int zend_parse_parameter(int flags, int arg_num TSRMLS_DC, zval **arg, const char *spec, ...);
265
266/* End of parameter parsing API -- andrei */
267
268ZEND_API int zend_register_functions(zend_class_entry *scope, const zend_function_entry *functions, HashTable *function_table, int type TSRMLS_DC);
269ZEND_API void zend_unregister_functions(const zend_function_entry *functions, int count, HashTable *function_table TSRMLS_DC);
270ZEND_API int zend_startup_module(zend_module_entry *module_entry TSRMLS_DC);
271ZEND_API zend_module_entry* zend_register_internal_module(zend_module_entry *module_entry TSRMLS_DC);
272ZEND_API zend_module_entry* zend_register_module_ex(zend_module_entry *module TSRMLS_DC);
273ZEND_API int zend_startup_module_ex(zend_module_entry *module TSRMLS_DC);
274ZEND_API int zend_startup_modules(TSRMLS_D);
275ZEND_API void zend_collect_module_handlers(TSRMLS_D);
276ZEND_API void zend_destroy_modules(void);
277ZEND_API void zend_check_magic_method_implementation(const zend_class_entry *ce, const zend_function *fptr, int error_type TSRMLS_DC);
278
279ZEND_API zend_class_entry *zend_register_internal_class(zend_class_entry *class_entry TSRMLS_DC);
280ZEND_API zend_class_entry *zend_register_internal_class_ex(zend_class_entry *class_entry, zend_class_entry *parent_ce, char *parent_name TSRMLS_DC);
281ZEND_API zend_class_entry *zend_register_internal_interface(zend_class_entry *orig_class_entry TSRMLS_DC);
282ZEND_API void zend_class_implements(zend_class_entry *class_entry TSRMLS_DC, int num_interfaces, ...);
283
284ZEND_API int zend_register_class_alias_ex(const char *name, int name_len, zend_class_entry *ce TSRMLS_DC);
285
286#define zend_register_class_alias(name, ce) \
287    zend_register_class_alias_ex(name, sizeof(name)-1, ce TSRMLS_CC)
288#define zend_register_ns_class_alias(ns, name, ce) \
289    zend_register_class_alias_ex(ZEND_NS_NAME(ns, name), sizeof(ZEND_NS_NAME(ns, name))-1, ce TSRMLS_CC)
290
291ZEND_API int zend_disable_function(char *function_name, uint function_name_length TSRMLS_DC);
292ZEND_API int zend_disable_class(char *class_name, uint class_name_length TSRMLS_DC);
293
294ZEND_API void zend_wrong_param_count(TSRMLS_D);
295
296#define IS_CALLABLE_CHECK_SYNTAX_ONLY (1<<0)
297#define IS_CALLABLE_CHECK_NO_ACCESS   (1<<1)
298#define IS_CALLABLE_CHECK_IS_STATIC   (1<<2)
299#define IS_CALLABLE_CHECK_SILENT      (1<<3)
300
301#define IS_CALLABLE_STRICT  (IS_CALLABLE_CHECK_IS_STATIC)
302
303ZEND_API zend_bool zend_is_callable_ex(zval *callable, zval *object_ptr, uint check_flags, char **callable_name, int *callable_name_len, zend_fcall_info_cache *fcc, char **error TSRMLS_DC);
304ZEND_API zend_bool zend_is_callable(zval *callable, uint check_flags, char **callable_name TSRMLS_DC);
305ZEND_API zend_bool zend_make_callable(zval *callable, char **callable_name TSRMLS_DC);
306ZEND_API const char *zend_get_module_version(const char *module_name);
307ZEND_API int zend_get_module_started(const char *module_name);
308ZEND_API int zend_declare_property(zend_class_entry *ce, const char *name, int name_length, zval *property, int access_type TSRMLS_DC);
309ZEND_API int zend_declare_property_ex(zend_class_entry *ce, const char *name, int name_length, zval *property, int access_type, const char *doc_comment, int doc_comment_len TSRMLS_DC);
310ZEND_API int zend_declare_property_null(zend_class_entry *ce, const char *name, int name_length, int access_type TSRMLS_DC);
311ZEND_API int zend_declare_property_bool(zend_class_entry *ce, const char *name, int name_length, long value, int access_type TSRMLS_DC);
312ZEND_API int zend_declare_property_long(zend_class_entry *ce, const char *name, int name_length, long value, int access_type TSRMLS_DC);
313ZEND_API int zend_declare_property_double(zend_class_entry *ce, const char *name, int name_length, double value, int access_type TSRMLS_DC);
314ZEND_API int zend_declare_property_string(zend_class_entry *ce, const char *name, int name_length, const char *value, int access_type TSRMLS_DC);
315ZEND_API int zend_declare_property_stringl(zend_class_entry *ce, const char *name, int name_length, const char *value, int value_len, int access_type TSRMLS_DC);
316
317ZEND_API int zend_declare_class_constant(zend_class_entry *ce, const char *name, size_t name_length, zval *value TSRMLS_DC);
318ZEND_API int zend_declare_class_constant_null(zend_class_entry *ce, const char *name, size_t name_length TSRMLS_DC);
319ZEND_API int zend_declare_class_constant_long(zend_class_entry *ce, const char *name, size_t name_length, long value TSRMLS_DC);
320ZEND_API int zend_declare_class_constant_bool(zend_class_entry *ce, const char *name, size_t name_length, zend_bool value TSRMLS_DC);
321ZEND_API int zend_declare_class_constant_double(zend_class_entry *ce, const char *name, size_t name_length, double value TSRMLS_DC);
322ZEND_API int zend_declare_class_constant_stringl(zend_class_entry *ce, const char *name, size_t name_length, const char *value, size_t value_length TSRMLS_DC);
323ZEND_API int zend_declare_class_constant_string(zend_class_entry *ce, const char *name, size_t name_length, const char *value TSRMLS_DC);
324
325ZEND_API void zend_update_class_constants(zend_class_entry *class_type TSRMLS_DC);
326ZEND_API void zend_update_property(zend_class_entry *scope, zval *object, const char *name, int name_length, zval *value TSRMLS_DC);
327ZEND_API void zend_update_property_null(zend_class_entry *scope, zval *object, const char *name, int name_length TSRMLS_DC);
328ZEND_API void zend_update_property_bool(zend_class_entry *scope, zval *object, const char *name, int name_length, long value TSRMLS_DC);
329ZEND_API void zend_update_property_long(zend_class_entry *scope, zval *object, const char *name, int name_length, long value TSRMLS_DC);
330ZEND_API void zend_update_property_double(zend_class_entry *scope, zval *object, const char *name, int name_length, double value TSRMLS_DC);
331ZEND_API void zend_update_property_string(zend_class_entry *scope, zval *object, const char *name, int name_length, const char *value TSRMLS_DC);
332ZEND_API void zend_update_property_stringl(zend_class_entry *scope, zval *object, const char *name, int name_length, const char *value, int value_length TSRMLS_DC);
333
334ZEND_API int zend_update_static_property(zend_class_entry *scope, const char *name, int name_length, zval *value TSRMLS_DC);
335ZEND_API int zend_update_static_property_null(zend_class_entry *scope, const char *name, int name_length TSRMLS_DC);
336ZEND_API int zend_update_static_property_bool(zend_class_entry *scope, const char *name, int name_length, long value TSRMLS_DC);
337ZEND_API int zend_update_static_property_long(zend_class_entry *scope, const char *name, int name_length, long value TSRMLS_DC);
338ZEND_API int zend_update_static_property_double(zend_class_entry *scope, const char *name, int name_length, double value TSRMLS_DC);
339ZEND_API int zend_update_static_property_string(zend_class_entry *scope, const char *name, int name_length, const char *value TSRMLS_DC);
340ZEND_API int zend_update_static_property_stringl(zend_class_entry *scope, const char *name, int name_length, const char *value, int value_length TSRMLS_DC);
341
342ZEND_API zval *zend_read_property(zend_class_entry *scope, zval *object, const char *name, int name_length, zend_bool silent TSRMLS_DC);
343
344ZEND_API zval *zend_read_static_property(zend_class_entry *scope, const char *name, int name_length, zend_bool silent TSRMLS_DC);
345
346ZEND_API zend_class_entry *zend_get_class_entry(const zval *zobject TSRMLS_DC);
347ZEND_API int zend_get_object_classname(const zval *object, const char **class_name, zend_uint *class_name_len TSRMLS_DC);
348ZEND_API char *zend_get_type_by_const(int type);
349
350#define getThis() (this_ptr)
351
352#define WRONG_PARAM_COUNT                   ZEND_WRONG_PARAM_COUNT()
353#define WRONG_PARAM_COUNT_WITH_RETVAL(ret)  ZEND_WRONG_PARAM_COUNT_WITH_RETVAL(ret)
354#define ARG_COUNT(dummy)    (ht)
355#define ZEND_NUM_ARGS()     (ht)
356#define ZEND_WRONG_PARAM_COUNT()                    { zend_wrong_param_count(TSRMLS_C); return; }
357#define ZEND_WRONG_PARAM_COUNT_WITH_RETVAL(ret)     { zend_wrong_param_count(TSRMLS_C); return ret; }
358
359#ifndef ZEND_WIN32
360#define DLEXPORT
361#endif
362
363#define array_init(arg)         _array_init((arg), 0 ZEND_FILE_LINE_CC)
364#define array_init_size(arg, size) _array_init((arg), (size) ZEND_FILE_LINE_CC)
365#define object_init(arg)        _object_init((arg) ZEND_FILE_LINE_CC TSRMLS_CC)
366#define object_init_ex(arg, ce) _object_init_ex((arg), (ce) ZEND_FILE_LINE_CC TSRMLS_CC)
367#define object_and_properties_init(arg, ce, properties) _object_and_properties_init((arg), (ce), (properties) ZEND_FILE_LINE_CC TSRMLS_CC)
368ZEND_API int _array_init(zval *arg, uint size ZEND_FILE_LINE_DC);
369ZEND_API int _object_init(zval *arg ZEND_FILE_LINE_DC TSRMLS_DC);
370ZEND_API int _object_init_ex(zval *arg, zend_class_entry *ce ZEND_FILE_LINE_DC TSRMLS_DC);
371ZEND_API int _object_and_properties_init(zval *arg, zend_class_entry *ce, HashTable *properties ZEND_FILE_LINE_DC TSRMLS_DC);
372ZEND_API void object_properties_init(zend_object *object, zend_class_entry *class_type);
373
374ZEND_API void zend_merge_properties(zval *obj, HashTable *properties, int destroy_ht TSRMLS_DC);
375
376/* no longer supported */
377ZEND_API int add_assoc_function(zval *arg, const char *key, void (*function_ptr)(INTERNAL_FUNCTION_PARAMETERS));
378
379ZEND_API int add_assoc_long_ex(zval *arg, const char *key, uint key_len, long n);
380ZEND_API int add_assoc_null_ex(zval *arg, const char *key, uint key_len);
381ZEND_API int add_assoc_bool_ex(zval *arg, const char *key, uint key_len, int b);
382ZEND_API int add_assoc_resource_ex(zval *arg, const char *key, uint key_len, int r);
383ZEND_API int add_assoc_double_ex(zval *arg, const char *key, uint key_len, double d);
384ZEND_API int add_assoc_string_ex(zval *arg, const char *key, uint key_len, char *str, int duplicate);
385ZEND_API int add_assoc_stringl_ex(zval *arg, const char *key, uint key_len, char *str, uint length, int duplicate);
386ZEND_API int add_assoc_zval_ex(zval *arg, const char *key, uint key_len, zval *value);
387
388#define add_assoc_long(__arg, __key, __n) add_assoc_long_ex(__arg, __key, strlen(__key)+1, __n)
389#define add_assoc_null(__arg, __key) add_assoc_null_ex(__arg, __key, strlen(__key) + 1)
390#define add_assoc_bool(__arg, __key, __b) add_assoc_bool_ex(__arg, __key, strlen(__key)+1, __b)
391#define add_assoc_resource(__arg, __key, __r) add_assoc_resource_ex(__arg, __key, strlen(__key)+1, __r)
392#define add_assoc_double(__arg, __key, __d) add_assoc_double_ex(__arg, __key, strlen(__key)+1, __d)
393#define add_assoc_string(__arg, __key, __str, __duplicate) add_assoc_string_ex(__arg, __key, strlen(__key)+1, __str, __duplicate)
394#define add_assoc_stringl(__arg, __key, __str, __length, __duplicate) add_assoc_stringl_ex(__arg, __key, strlen(__key)+1, __str, __length, __duplicate)
395#define add_assoc_zval(__arg, __key, __value) add_assoc_zval_ex(__arg, __key, strlen(__key)+1, __value)
396
397/* unset() functions are only suported for legacy modules and null() functions should be used */
398#define add_assoc_unset(__arg, __key) add_assoc_null_ex(__arg, __key, strlen(__key) + 1)
399#define add_index_unset(__arg, __key) add_index_null(__arg, __key)
400#define add_next_index_unset(__arg) add_next_index_null(__arg)
401#define add_property_unset(__arg, __key) add_property_null(__arg, __key)
402
403ZEND_API int add_index_long(zval *arg, ulong idx, long n);
404ZEND_API int add_index_null(zval *arg, ulong idx);
405ZEND_API int add_index_bool(zval *arg, ulong idx, int b);
406ZEND_API int add_index_resource(zval *arg, ulong idx, int r);
407ZEND_API int add_index_double(zval *arg, ulong idx, double d);
408ZEND_API int add_index_string(zval *arg, ulong idx, const char *str, int duplicate);
409ZEND_API int add_index_stringl(zval *arg, ulong idx, const char *str, uint length, int duplicate);
410ZEND_API int add_index_zval(zval *arg, ulong index, zval *value);
411
412ZEND_API int add_next_index_long(zval *arg, long n);
413ZEND_API int add_next_index_null(zval *arg);
414ZEND_API int add_next_index_bool(zval *arg, int b);
415ZEND_API int add_next_index_resource(zval *arg, int r);
416ZEND_API int add_next_index_double(zval *arg, double d);
417ZEND_API int add_next_index_string(zval *arg, const char *str, int duplicate);
418ZEND_API int add_next_index_stringl(zval *arg, const char *str, uint length, int duplicate);
419ZEND_API int add_next_index_zval(zval *arg, zval *value);
420
421ZEND_API int add_get_assoc_string_ex(zval *arg, const char *key, uint key_len, const char *str, void **dest, int duplicate);
422ZEND_API int add_get_assoc_stringl_ex(zval *arg, const char *key, uint key_len, const char *str, uint length, void **dest, int duplicate);
423
424#define add_get_assoc_string(__arg, __key, __str, __dest, __duplicate) add_get_assoc_string_ex(__arg, __key, strlen(__key)+1, __str, __dest, __duplicate)
425#define add_get_assoc_stringl(__arg, __key, __str, __length, __dest, __duplicate) add_get_assoc_stringl_ex(__arg, __key, strlen(__key)+1, __str, __length, __dest, __duplicate)
426
427ZEND_API int add_get_index_long(zval *arg, ulong idx, long l, void **dest);
428ZEND_API int add_get_index_double(zval *arg, ulong idx, double d, void **dest);
429ZEND_API int add_get_index_string(zval *arg, ulong idx, const char *str, void **dest, int duplicate);
430ZEND_API int add_get_index_stringl(zval *arg, ulong idx, const char *str, uint length, void **dest, int duplicate);
431
432ZEND_API int array_set_zval_key(HashTable *ht, zval *key, zval *value);
433
434ZEND_API int add_property_long_ex(zval *arg, const char *key, uint key_len, long l TSRMLS_DC);
435ZEND_API int add_property_null_ex(zval *arg, const char *key, uint key_len TSRMLS_DC);
436ZEND_API int add_property_bool_ex(zval *arg, const char *key, uint key_len, int b TSRMLS_DC);
437ZEND_API int add_property_resource_ex(zval *arg, const char *key, uint key_len, long r TSRMLS_DC);
438ZEND_API int add_property_double_ex(zval *arg, const char *key, uint key_len, double d TSRMLS_DC);
439ZEND_API int add_property_string_ex(zval *arg, const char *key, uint key_len, const char *str, int duplicate TSRMLS_DC);
440ZEND_API int add_property_stringl_ex(zval *arg, const char *key, uint key_len,  const char *str, uint length, int duplicate TSRMLS_DC);
441ZEND_API int add_property_zval_ex(zval *arg, const char *key, uint key_len, zval *value TSRMLS_DC);
442
443#define add_property_long(__arg, __key, __n) add_property_long_ex(__arg, __key, strlen(__key)+1, __n TSRMLS_CC)
444#define add_property_null(__arg, __key) add_property_null_ex(__arg, __key, strlen(__key) + 1 TSRMLS_CC)
445#define add_property_bool(__arg, __key, __b) add_property_bool_ex(__arg, __key, strlen(__key)+1, __b TSRMLS_CC)
446#define add_property_resource(__arg, __key, __r) add_property_resource_ex(__arg, __key, strlen(__key)+1, __r TSRMLS_CC)
447#define add_property_double(__arg, __key, __d) add_property_double_ex(__arg, __key, strlen(__key)+1, __d TSRMLS_CC)
448#define add_property_string(__arg, __key, __str, __duplicate) add_property_string_ex(__arg, __key, strlen(__key)+1, __str, __duplicate TSRMLS_CC)
449#define add_property_stringl(__arg, __key, __str, __length, __duplicate) add_property_stringl_ex(__arg, __key, strlen(__key)+1, __str, __length, __duplicate TSRMLS_CC)
450#define add_property_zval(__arg, __key, __value) add_property_zval_ex(__arg, __key, strlen(__key)+1, __value TSRMLS_CC)
451
452
453ZEND_API int call_user_function(HashTable *function_table, zval **object_pp, zval *function_name, zval *retval_ptr, zend_uint param_count, zval *params[] TSRMLS_DC);
454ZEND_API int call_user_function_ex(HashTable *function_table, zval **object_pp, zval *function_name, zval **retval_ptr_ptr, zend_uint param_count, zval **params[], int no_separation, HashTable *symbol_table TSRMLS_DC);
455
456ZEND_API extern const zend_fcall_info empty_fcall_info;
457ZEND_API extern const zend_fcall_info_cache empty_fcall_info_cache;
458
459/** Build zend_call_info/cache from a zval*
460 *
461 * Caller is responsible to provide a return value, otherwise the we will crash.
462 * fci->retval_ptr_ptr = NULL;
463 * In order to pass parameters the following members need to be set:
464 * fci->param_count = 0;
465 * fci->params = NULL;
466 * The callable_name argument may be NULL.
467 * Set check_flags to IS_CALLABLE_STRICT for every new usage!
468 */
469ZEND_API int zend_fcall_info_init(zval *callable, uint check_flags, zend_fcall_info *fci, zend_fcall_info_cache *fcc, char **callable_name, char **error TSRMLS_DC);
470
471/** Clear arguments connected with zend_fcall_info *fci
472 * If free_mem is not zero then the params array gets free'd as well
473 */
474ZEND_API void zend_fcall_info_args_clear(zend_fcall_info *fci, int free_mem);
475
476/** Save current arguments from zend_fcall_info *fci
477 * params array will be set to NULL
478 */
479ZEND_API void zend_fcall_info_args_save(zend_fcall_info *fci, int *param_count, zval ****params);
480
481/** Free arguments connected with zend_fcall_info *fci andset back saved ones.
482 */
483ZEND_API void zend_fcall_info_args_restore(zend_fcall_info *fci, int param_count, zval ***params);
484
485/** Set or clear the arguments in the zend_call_info struct taking care of
486 * refcount. If args is NULL and arguments are set then those are cleared.
487 */
488ZEND_API int zend_fcall_info_args(zend_fcall_info *fci, zval *args TSRMLS_DC);
489
490/** Set arguments in the zend_fcall_info struct taking care of refcount.
491 * If argc is 0 the arguments which are set will be cleared, else pass
492 * a variable amount of zval** arguments.
493 */
494ZEND_API int zend_fcall_info_argp(zend_fcall_info *fci TSRMLS_DC, int argc, zval ***argv);
495
496/** Set arguments in the zend_fcall_info struct taking care of refcount.
497 * If argc is 0 the arguments which are set will be cleared, else pass
498 * a variable amount of zval** arguments.
499 */
500ZEND_API int zend_fcall_info_argv(zend_fcall_info *fci TSRMLS_DC, int argc, va_list *argv);
501
502/** Set arguments in the zend_fcall_info struct taking care of refcount.
503 * If argc is 0 the arguments which are set will be cleared, else pass
504 * a variable amount of zval** arguments.
505 */
506ZEND_API int zend_fcall_info_argn(zend_fcall_info *fci TSRMLS_DC, int argc, ...);
507
508/** Call a function using information created by zend_fcall_info_init()/args().
509 * If args is given then those replace the argument info in fci is temporarily.
510 */
511ZEND_API int zend_fcall_info_call(zend_fcall_info *fci, zend_fcall_info_cache *fcc, zval **retval, zval *args TSRMLS_DC);
512
513ZEND_API int zend_call_function(zend_fcall_info *fci, zend_fcall_info_cache *fci_cache TSRMLS_DC);
514
515ZEND_API int zend_set_hash_symbol(zval *symbol, const char *name, int name_length, zend_bool is_ref, int num_symbol_tables, ...);
516
517ZEND_API void zend_delete_variable(zend_execute_data *ex, HashTable *ht, const char *name, int name_len, ulong hash_value TSRMLS_DC);
518
519ZEND_API int zend_delete_global_variable(const char *name, int name_len TSRMLS_DC);
520
521ZEND_API int zend_delete_global_variable_ex(const char *name, int name_len, ulong hash_value TSRMLS_DC);
522
523ZEND_API void zend_reset_all_cv(HashTable *symbol_table TSRMLS_DC);
524
525ZEND_API void zend_rebuild_symbol_table(TSRMLS_D);
526
527ZEND_API const char* zend_find_alias_name(zend_class_entry *ce, const char *name, zend_uint len);
528ZEND_API const char* zend_resolve_method_name(zend_class_entry *ce, zend_function *f);
529
530#define add_method(arg, key, method)    add_assoc_function((arg), (key), (method))
531
532ZEND_API ZEND_FUNCTION(display_disabled_function);
533ZEND_API ZEND_FUNCTION(display_disabled_class);
534END_EXTERN_C()
535
536#if ZEND_DEBUG
537#define CHECK_ZVAL_STRING(z) \
538    if (Z_STRVAL_P(z)[ Z_STRLEN_P(z) ] != '\0') { zend_error(E_WARNING, "String is not zero-terminated (%s)", Z_STRVAL_P(z)); }
539#define CHECK_ZVAL_STRING_REL(z) \
540    if (Z_STRVAL_P(z)[ Z_STRLEN_P(z) ] != '\0') { zend_error(E_WARNING, "String is not zero-terminated (%s) (source: %s:%d)", Z_STRVAL_P(z) ZEND_FILE_LINE_RELAY_CC); }
541#else
542#define CHECK_ZVAL_STRING(z)
543#define CHECK_ZVAL_STRING_REL(z)
544#endif
545
546#define CHECK_ZVAL_NULL_PATH(p) (Z_STRLEN_P(p) != strlen(Z_STRVAL_P(p)))
547#define CHECK_NULL_PATH(p, l) (strlen(p) != l)
548
549#define ZVAL_RESOURCE(z, l) do {    \
550        zval *__z = (z);            \
551        Z_LVAL_P(__z) = l;          \
552        Z_TYPE_P(__z) = IS_RESOURCE;\
553    } while (0)
554
555#define ZVAL_BOOL(z, b) do {        \
556        zval *__z = (z);            \
557        Z_LVAL_P(__z) = ((b) != 0); \
558        Z_TYPE_P(__z) = IS_BOOL;    \
559    } while (0)
560
561#define ZVAL_NULL(z) {              \
562        Z_TYPE_P(z) = IS_NULL;      \
563    }
564
565#define ZVAL_LONG(z, l) {           \
566        zval *__z = (z);            \
567        Z_LVAL_P(__z) = l;          \
568        Z_TYPE_P(__z) = IS_LONG;    \
569    }
570
571#define ZVAL_DOUBLE(z, d) {         \
572        zval *__z = (z);            \
573        Z_DVAL_P(__z) = d;          \
574        Z_TYPE_P(__z) = IS_DOUBLE;  \
575    }
576
577#define ZVAL_STRING(z, s, duplicate) do {   \
578        const char *__s=(s);                \
579        zval *__z = (z);                    \
580        Z_STRLEN_P(__z) = strlen(__s);      \
581        Z_STRVAL_P(__z) = (duplicate?estrndup(__s, Z_STRLEN_P(__z)):(char*)__s);\
582        Z_TYPE_P(__z) = IS_STRING;          \
583    } while (0)
584
585#define ZVAL_STRINGL(z, s, l, duplicate) do {   \
586        const char *__s=(s); int __l=l;         \
587        zval *__z = (z);                        \
588        Z_STRLEN_P(__z) = __l;                  \
589        Z_STRVAL_P(__z) = (duplicate?estrndup(__s, __l):(char*)__s);\
590        Z_TYPE_P(__z) = IS_STRING;              \
591    } while (0)
592
593#define ZVAL_EMPTY_STRING(z) do {   \
594        zval *__z = (z);            \
595        Z_STRLEN_P(__z) = 0;        \
596        Z_STRVAL_P(__z) = STR_EMPTY_ALLOC();\
597        Z_TYPE_P(__z) = IS_STRING;  \
598    } while (0)
599
600#define ZVAL_ZVAL(z, zv, copy, dtor) do {       \
601        zval *__z = (z);                        \
602        zval *__zv = (zv);                      \
603        ZVAL_COPY_VALUE(__z, __zv);             \
604        if (copy) {                             \
605            zval_copy_ctor(__z);                \
606        }                                       \
607        if (dtor) {                             \
608            if (!copy) {                        \
609                ZVAL_NULL(__zv);                \
610            }                                   \
611            zval_ptr_dtor(&__zv);               \
612        }                                       \
613    } while (0)
614
615#define ZVAL_FALSE(z)                   ZVAL_BOOL(z, 0)
616#define ZVAL_TRUE(z)                    ZVAL_BOOL(z, 1)
617
618#define RETVAL_RESOURCE(l)              ZVAL_RESOURCE(return_value, l)
619#define RETVAL_BOOL(b)                  ZVAL_BOOL(return_value, b)
620#define RETVAL_NULL()                   ZVAL_NULL(return_value)
621#define RETVAL_LONG(l)                  ZVAL_LONG(return_value, l)
622#define RETVAL_DOUBLE(d)                ZVAL_DOUBLE(return_value, d)
623#define RETVAL_STRING(s, duplicate)         ZVAL_STRING(return_value, s, duplicate)
624#define RETVAL_STRINGL(s, l, duplicate)     ZVAL_STRINGL(return_value, s, l, duplicate)
625#define RETVAL_EMPTY_STRING()           ZVAL_EMPTY_STRING(return_value)
626#define RETVAL_ZVAL(zv, copy, dtor)     ZVAL_ZVAL(return_value, zv, copy, dtor)
627#define RETVAL_FALSE                    ZVAL_BOOL(return_value, 0)
628#define RETVAL_TRUE                     ZVAL_BOOL(return_value, 1)
629
630#define RETURN_RESOURCE(l)              { RETVAL_RESOURCE(l); return; }
631#define RETURN_BOOL(b)                  { RETVAL_BOOL(b); return; }
632#define RETURN_NULL()                   { RETVAL_NULL(); return;}
633#define RETURN_LONG(l)                  { RETVAL_LONG(l); return; }
634#define RETURN_DOUBLE(d)                { RETVAL_DOUBLE(d); return; }
635#define RETURN_STRING(s, duplicate)     { RETVAL_STRING(s, duplicate); return; }
636#define RETURN_STRINGL(s, l, duplicate) { RETVAL_STRINGL(s, l, duplicate); return; }
637#define RETURN_EMPTY_STRING()           { RETVAL_EMPTY_STRING(); return; }
638#define RETURN_ZVAL(zv, copy, dtor)     { RETVAL_ZVAL(zv, copy, dtor); return; }
639#define RETURN_FALSE                    { RETVAL_FALSE; return; }
640#define RETURN_TRUE                     { RETVAL_TRUE; return; }
641
642#define RETVAL_ZVAL_FAST(z) do {      \
643    zval *_z = (z);                   \
644    if (Z_ISREF_P(_z)) {              \
645        RETVAL_ZVAL(_z, 1, 0);        \
646    } else {                          \
647        zval_ptr_dtor(&return_value); \
648        Z_ADDREF_P(_z);               \
649        *return_value_ptr = _z;       \
650    }                                 \
651} while (0)
652#define RETURN_ZVAL_FAST(z) { RETVAL_ZVAL_FAST(z); return; }
653
654#define SET_VAR_STRING(n, v) {                                                                              \
655                                {                                                                           \
656                                    zval *var;                                                              \
657                                    ALLOC_ZVAL(var);                                                        \
658                                    ZVAL_STRING(var, v, 0);                                                 \
659                                    ZEND_SET_GLOBAL_VAR(n, var);                                            \
660                                }                                                                           \
661                            }
662
663#define SET_VAR_STRINGL(n, v, l) {                                                      \
664                                    {                                                   \
665                                        zval *var;                                      \
666                                        ALLOC_ZVAL(var);                                \
667                                        ZVAL_STRINGL(var, v, l, 0);                     \
668                                        ZEND_SET_GLOBAL_VAR(n, var);                    \
669                                    }                                                   \
670                                }
671
672#define SET_VAR_LONG(n, v)  {                                                           \
673                                {                                                       \
674                                    zval *var;                                          \
675                                    ALLOC_ZVAL(var);                                    \
676                                    ZVAL_LONG(var, v);                                  \
677                                    ZEND_SET_GLOBAL_VAR(n, var);                        \
678                                }                                                       \
679                            }
680
681#define SET_VAR_DOUBLE(n, v) {                                                          \
682                                {                                                       \
683                                    zval *var;                                          \
684                                    ALLOC_ZVAL(var);                                    \
685                                    ZVAL_DOUBLE(var, v);                                \
686                                    ZEND_SET_GLOBAL_VAR(n, var);                        \
687                                }                                                       \
688                            }
689
690
691#define ZEND_SET_SYMBOL(symtable, name, var)                                        \
692    {                                                                               \
693        char *_name = (name);                                                       \
694                                                                                    \
695        ZEND_SET_SYMBOL_WITH_LENGTH(symtable, _name, strlen(_name)+1, var, 1, 0);   \
696    }
697
698#define ZEND_SET_SYMBOL_WITH_LENGTH(symtable, name, name_length, var, _refcount, _is_ref)               \
699    {                                                                                                   \
700        zval **orig_var;                                                                                \
701                                                                                                        \
702        if (zend_hash_find(symtable, (name), (name_length), (void **) &orig_var)==SUCCESS               \
703            && PZVAL_IS_REF(*orig_var)) {                                                               \
704            Z_SET_REFCOUNT_P(var, Z_REFCOUNT_PP(orig_var));                                             \
705            Z_SET_ISREF_P(var);                                                                         \
706                                                                                                        \
707            if (_refcount) {                                                                            \
708                Z_SET_REFCOUNT_P(var, Z_REFCOUNT_P(var) + _refcount - 1);                               \
709            }                                                                                           \
710            zval_dtor(*orig_var);                                                                       \
711            **orig_var = *(var);                                                                        \
712            FREE_ZVAL(var);                                                                             \
713        } else {                                                                                        \
714            Z_SET_ISREF_TO_P(var, _is_ref);                                                             \
715            if (_refcount) {                                                                            \
716                Z_SET_REFCOUNT_P(var, _refcount);                                                       \
717            }                                                                                           \
718            zend_hash_update(symtable, (name), (name_length), &(var), sizeof(zval *), NULL);            \
719        }                                                                                               \
720    }
721
722
723#define ZEND_SET_GLOBAL_VAR(name, var)              \
724    ZEND_SET_SYMBOL(&EG(symbol_table), name, var)
725
726#define ZEND_SET_GLOBAL_VAR_WITH_LENGTH(name, name_length, var, _refcount, _is_ref) \
727    ZEND_SET_SYMBOL_WITH_LENGTH(&EG(symbol_table), name, name_length, var, _refcount, _is_ref)
728
729#define ZEND_DEFINE_PROPERTY(class_ptr, name, value, mask)                          \
730{                                                                                   \
731    char *_name = (name);                                                           \
732    int namelen = strlen(_name);                                                    \
733    zend_declare_property(class_ptr, _name, namelen, value, mask TSRMLS_CC);        \
734}
735
736#define HASH_OF(p) (Z_TYPE_P(p)==IS_ARRAY ? Z_ARRVAL_P(p) : ((Z_TYPE_P(p)==IS_OBJECT ? Z_OBJ_HT_P(p)->get_properties((p) TSRMLS_CC) : NULL)))
737#define ZVAL_IS_NULL(z) (Z_TYPE_P(z)==IS_NULL)
738
739/* For compatibility */
740#define ZEND_MINIT          ZEND_MODULE_STARTUP_N
741#define ZEND_MSHUTDOWN      ZEND_MODULE_SHUTDOWN_N
742#define ZEND_RINIT          ZEND_MODULE_ACTIVATE_N
743#define ZEND_RSHUTDOWN      ZEND_MODULE_DEACTIVATE_N
744#define ZEND_MINFO          ZEND_MODULE_INFO_N
745#define ZEND_GINIT(module)      ((void (*)(void* TSRMLS_DC))(ZEND_MODULE_GLOBALS_CTOR_N(module)))
746#define ZEND_GSHUTDOWN(module)  ((void (*)(void* TSRMLS_DC))(ZEND_MODULE_GLOBALS_DTOR_N(module)))
747
748#define ZEND_MINIT_FUNCTION         ZEND_MODULE_STARTUP_D
749#define ZEND_MSHUTDOWN_FUNCTION     ZEND_MODULE_SHUTDOWN_D
750#define ZEND_RINIT_FUNCTION         ZEND_MODULE_ACTIVATE_D
751#define ZEND_RSHUTDOWN_FUNCTION     ZEND_MODULE_DEACTIVATE_D
752#define ZEND_MINFO_FUNCTION         ZEND_MODULE_INFO_D
753#define ZEND_GINIT_FUNCTION         ZEND_MODULE_GLOBALS_CTOR_D
754#define ZEND_GSHUTDOWN_FUNCTION     ZEND_MODULE_GLOBALS_DTOR_D
755
756END_EXTERN_C()
757
758#endif /* ZEND_API_H */
759
760
761/*
762 * Local variables:
763 * tab-width: 4
764 * c-basic-offset: 4
765 * indent-tabs-mode: t
766 * End:
767 */
768