1 /* 2 +----------------------------------------------------------------------+ 3 | Zend Engine | 4 +----------------------------------------------------------------------+ 5 | Copyright (c) 1998-2016 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 33 BEGIN_EXTERN_C() 34 35 typedef 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 43 typedef 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 55 typedef 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 236 ZEND_API int zend_next_free_module(void); 237 238 BEGIN_EXTERN_C() 239 ZEND_API int zend_get_parameters(int ht, int param_count, ...); 240 ZEND_API int _zend_get_parameters_array(int ht, int param_count, zval **argument_array TSRMLS_DC); 241 ZEND_API ZEND_ATTRIBUTE_DEPRECATED int zend_get_parameters_ex(int param_count, ...); 242 ZEND_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() */ 245 ZEND_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 257 ZEND_API int zend_parse_parameters(int num_args TSRMLS_DC, const char *type_spec, ...); 258 ZEND_API int zend_parse_parameters_ex(int flags, int num_args TSRMLS_DC, const char *type_spec, ...); 259 ZEND_API char *zend_zval_type_name(const zval *arg); 260 261 ZEND_API int zend_parse_method_parameters(int num_args TSRMLS_DC, zval *this_ptr, const char *type_spec, ...); 262 ZEND_API int zend_parse_method_parameters_ex(int flags, int num_args TSRMLS_DC, zval *this_ptr, const char *type_spec, ...); 263 264 ZEND_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 268 ZEND_API int zend_register_functions(zend_class_entry *scope, const zend_function_entry *functions, HashTable *function_table, int type TSRMLS_DC); 269 ZEND_API void zend_unregister_functions(const zend_function_entry *functions, int count, HashTable *function_table TSRMLS_DC); 270 ZEND_API int zend_startup_module(zend_module_entry *module_entry); 271 ZEND_API zend_module_entry* zend_register_internal_module(zend_module_entry *module_entry TSRMLS_DC); 272 ZEND_API zend_module_entry* zend_register_module_ex(zend_module_entry *module TSRMLS_DC); 273 ZEND_API int zend_startup_module_ex(zend_module_entry *module TSRMLS_DC); 274 ZEND_API int zend_startup_modules(TSRMLS_D); 275 ZEND_API void zend_collect_module_handlers(TSRMLS_D); 276 ZEND_API void zend_destroy_modules(void); 277 ZEND_API void zend_check_magic_method_implementation(const zend_class_entry *ce, const zend_function *fptr, int error_type TSRMLS_DC); 278 279 ZEND_API zend_class_entry *zend_register_internal_class(zend_class_entry *class_entry TSRMLS_DC); 280 ZEND_API zend_class_entry *zend_register_internal_class_ex(zend_class_entry *class_entry, zend_class_entry *parent_ce, char *parent_name TSRMLS_DC); 281 ZEND_API zend_class_entry *zend_register_internal_interface(zend_class_entry *orig_class_entry TSRMLS_DC); 282 ZEND_API void zend_class_implements(zend_class_entry *class_entry TSRMLS_DC, int num_interfaces, ...); 283 284 ZEND_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 291 ZEND_API int zend_disable_function(char *function_name, uint function_name_length TSRMLS_DC); 292 ZEND_API int zend_disable_class(char *class_name, uint class_name_length TSRMLS_DC); 293 294 ZEND_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 303 ZEND_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); 304 ZEND_API zend_bool zend_is_callable(zval *callable, uint check_flags, char **callable_name TSRMLS_DC); 305 ZEND_API zend_bool zend_make_callable(zval *callable, char **callable_name TSRMLS_DC); 306 ZEND_API const char *zend_get_module_version(const char *module_name); 307 ZEND_API int zend_get_module_started(const char *module_name); 308 ZEND_API int zend_declare_property(zend_class_entry *ce, const char *name, int name_length, zval *property, int access_type TSRMLS_DC); 309 ZEND_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); 310 ZEND_API int zend_declare_property_null(zend_class_entry *ce, const char *name, int name_length, int access_type TSRMLS_DC); 311 ZEND_API int zend_declare_property_bool(zend_class_entry *ce, const char *name, int name_length, long value, int access_type TSRMLS_DC); 312 ZEND_API int zend_declare_property_long(zend_class_entry *ce, const char *name, int name_length, long value, int access_type TSRMLS_DC); 313 ZEND_API int zend_declare_property_double(zend_class_entry *ce, const char *name, int name_length, double value, int access_type TSRMLS_DC); 314 ZEND_API int zend_declare_property_string(zend_class_entry *ce, const char *name, int name_length, const char *value, int access_type TSRMLS_DC); 315 ZEND_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 317 ZEND_API int zend_declare_class_constant(zend_class_entry *ce, const char *name, size_t name_length, zval *value TSRMLS_DC); 318 ZEND_API int zend_declare_class_constant_null(zend_class_entry *ce, const char *name, size_t name_length TSRMLS_DC); 319 ZEND_API int zend_declare_class_constant_long(zend_class_entry *ce, const char *name, size_t name_length, long value TSRMLS_DC); 320 ZEND_API int zend_declare_class_constant_bool(zend_class_entry *ce, const char *name, size_t name_length, zend_bool value TSRMLS_DC); 321 ZEND_API int zend_declare_class_constant_double(zend_class_entry *ce, const char *name, size_t name_length, double value TSRMLS_DC); 322 ZEND_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); 323 ZEND_API int zend_declare_class_constant_string(zend_class_entry *ce, const char *name, size_t name_length, const char *value TSRMLS_DC); 324 325 ZEND_API void zend_update_class_constants(zend_class_entry *class_type TSRMLS_DC); 326 ZEND_API void zend_update_property(zend_class_entry *scope, zval *object, const char *name, int name_length, zval *value TSRMLS_DC); 327 ZEND_API void zend_update_property_null(zend_class_entry *scope, zval *object, const char *name, int name_length TSRMLS_DC); 328 ZEND_API void zend_update_property_bool(zend_class_entry *scope, zval *object, const char *name, int name_length, long value TSRMLS_DC); 329 ZEND_API void zend_update_property_long(zend_class_entry *scope, zval *object, const char *name, int name_length, long value TSRMLS_DC); 330 ZEND_API void zend_update_property_double(zend_class_entry *scope, zval *object, const char *name, int name_length, double value TSRMLS_DC); 331 ZEND_API void zend_update_property_string(zend_class_entry *scope, zval *object, const char *name, int name_length, const char *value TSRMLS_DC); 332 ZEND_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 ZEND_API void zend_unset_property(zend_class_entry *scope, zval *object, const char *name, int name_length TSRMLS_DC); 334 335 ZEND_API int zend_update_static_property(zend_class_entry *scope, const char *name, int name_length, zval *value TSRMLS_DC); 336 ZEND_API int zend_update_static_property_null(zend_class_entry *scope, const char *name, int name_length TSRMLS_DC); 337 ZEND_API int zend_update_static_property_bool(zend_class_entry *scope, const char *name, int name_length, long value TSRMLS_DC); 338 ZEND_API int zend_update_static_property_long(zend_class_entry *scope, const char *name, int name_length, long value TSRMLS_DC); 339 ZEND_API int zend_update_static_property_double(zend_class_entry *scope, const char *name, int name_length, double value TSRMLS_DC); 340 ZEND_API int zend_update_static_property_string(zend_class_entry *scope, const char *name, int name_length, const char *value TSRMLS_DC); 341 ZEND_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); 342 343 ZEND_API zval *zend_read_property(zend_class_entry *scope, zval *object, const char *name, int name_length, zend_bool silent TSRMLS_DC); 344 345 ZEND_API zval *zend_read_static_property(zend_class_entry *scope, const char *name, int name_length, zend_bool silent TSRMLS_DC); 346 347 ZEND_API zend_class_entry *zend_get_class_entry(const zval *zobject TSRMLS_DC); 348 ZEND_API int zend_get_object_classname(const zval *object, const char **class_name, zend_uint *class_name_len TSRMLS_DC); 349 ZEND_API char *zend_get_type_by_const(int type); 350 351 #define getThis() (this_ptr) 352 353 #define WRONG_PARAM_COUNT ZEND_WRONG_PARAM_COUNT() 354 #define WRONG_PARAM_COUNT_WITH_RETVAL(ret) ZEND_WRONG_PARAM_COUNT_WITH_RETVAL(ret) 355 #define ARG_COUNT(dummy) (ht) 356 #define ZEND_NUM_ARGS() (ht) 357 #define ZEND_WRONG_PARAM_COUNT() { zend_wrong_param_count(TSRMLS_C); return; } 358 #define ZEND_WRONG_PARAM_COUNT_WITH_RETVAL(ret) { zend_wrong_param_count(TSRMLS_C); return ret; } 359 360 #ifndef ZEND_WIN32 361 #define DLEXPORT 362 #endif 363 364 #define array_init(arg) _array_init((arg), 0 ZEND_FILE_LINE_CC) 365 #define array_init_size(arg, size) _array_init((arg), (size) ZEND_FILE_LINE_CC) 366 #define object_init(arg) _object_init((arg) ZEND_FILE_LINE_CC TSRMLS_CC) 367 #define object_init_ex(arg, ce) _object_init_ex((arg), (ce) ZEND_FILE_LINE_CC TSRMLS_CC) 368 #define object_and_properties_init(arg, ce, properties) _object_and_properties_init((arg), (ce), (properties) ZEND_FILE_LINE_CC TSRMLS_CC) 369 ZEND_API int _array_init(zval *arg, uint size ZEND_FILE_LINE_DC); 370 ZEND_API int _object_init(zval *arg ZEND_FILE_LINE_DC TSRMLS_DC); 371 ZEND_API int _object_init_ex(zval *arg, zend_class_entry *ce ZEND_FILE_LINE_DC TSRMLS_DC); 372 ZEND_API int _object_and_properties_init(zval *arg, zend_class_entry *ce, HashTable *properties ZEND_FILE_LINE_DC TSRMLS_DC); 373 ZEND_API void object_properties_init(zend_object *object, zend_class_entry *class_type); 374 375 ZEND_API void zend_merge_properties(zval *obj, HashTable *properties, int destroy_ht TSRMLS_DC); 376 377 /* no longer supported */ 378 ZEND_API int add_assoc_function(zval *arg, const char *key, void (*function_ptr)(INTERNAL_FUNCTION_PARAMETERS)); 379 380 ZEND_API int add_assoc_long_ex(zval *arg, const char *key, uint key_len, long n); 381 ZEND_API int add_assoc_null_ex(zval *arg, const char *key, uint key_len); 382 ZEND_API int add_assoc_bool_ex(zval *arg, const char *key, uint key_len, int b); 383 ZEND_API int add_assoc_resource_ex(zval *arg, const char *key, uint key_len, int r); 384 ZEND_API int add_assoc_double_ex(zval *arg, const char *key, uint key_len, double d); 385 ZEND_API int add_assoc_string_ex(zval *arg, const char *key, uint key_len, char *str, int duplicate); 386 ZEND_API int add_assoc_stringl_ex(zval *arg, const char *key, uint key_len, char *str, uint length, int duplicate); 387 ZEND_API int add_assoc_zval_ex(zval *arg, const char *key, uint key_len, zval *value); 388 389 #define add_assoc_long(__arg, __key, __n) add_assoc_long_ex(__arg, __key, strlen(__key)+1, __n) 390 #define add_assoc_null(__arg, __key) add_assoc_null_ex(__arg, __key, strlen(__key) + 1) 391 #define add_assoc_bool(__arg, __key, __b) add_assoc_bool_ex(__arg, __key, strlen(__key)+1, __b) 392 #define add_assoc_resource(__arg, __key, __r) add_assoc_resource_ex(__arg, __key, strlen(__key)+1, __r) 393 #define add_assoc_double(__arg, __key, __d) add_assoc_double_ex(__arg, __key, strlen(__key)+1, __d) 394 #define add_assoc_string(__arg, __key, __str, __duplicate) add_assoc_string_ex(__arg, __key, strlen(__key)+1, __str, __duplicate) 395 #define add_assoc_stringl(__arg, __key, __str, __length, __duplicate) add_assoc_stringl_ex(__arg, __key, strlen(__key)+1, __str, __length, __duplicate) 396 #define add_assoc_zval(__arg, __key, __value) add_assoc_zval_ex(__arg, __key, strlen(__key)+1, __value) 397 398 /* unset() functions are only suported for legacy modules and null() functions should be used */ 399 #define add_assoc_unset(__arg, __key) add_assoc_null_ex(__arg, __key, strlen(__key) + 1) 400 #define add_index_unset(__arg, __key) add_index_null(__arg, __key) 401 #define add_next_index_unset(__arg) add_next_index_null(__arg) 402 #define add_property_unset(__arg, __key) add_property_null(__arg, __key) 403 404 ZEND_API int add_index_long(zval *arg, ulong idx, long n); 405 ZEND_API int add_index_null(zval *arg, ulong idx); 406 ZEND_API int add_index_bool(zval *arg, ulong idx, int b); 407 ZEND_API int add_index_resource(zval *arg, ulong idx, int r); 408 ZEND_API int add_index_double(zval *arg, ulong idx, double d); 409 ZEND_API int add_index_string(zval *arg, ulong idx, const char *str, int duplicate); 410 ZEND_API int add_index_stringl(zval *arg, ulong idx, const char *str, uint length, int duplicate); 411 ZEND_API int add_index_zval(zval *arg, ulong index, zval *value); 412 413 ZEND_API int add_next_index_long(zval *arg, long n); 414 ZEND_API int add_next_index_null(zval *arg); 415 ZEND_API int add_next_index_bool(zval *arg, int b); 416 ZEND_API int add_next_index_resource(zval *arg, int r); 417 ZEND_API int add_next_index_double(zval *arg, double d); 418 ZEND_API int add_next_index_string(zval *arg, const char *str, int duplicate); 419 ZEND_API int add_next_index_stringl(zval *arg, const char *str, uint length, int duplicate); 420 ZEND_API int add_next_index_zval(zval *arg, zval *value); 421 422 ZEND_API int add_get_assoc_string_ex(zval *arg, const char *key, uint key_len, const char *str, void **dest, int duplicate); 423 ZEND_API int add_get_assoc_stringl_ex(zval *arg, const char *key, uint key_len, const char *str, uint length, void **dest, int duplicate); 424 425 #define add_get_assoc_string(__arg, __key, __str, __dest, __duplicate) add_get_assoc_string_ex(__arg, __key, strlen(__key)+1, __str, __dest, __duplicate) 426 #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) 427 428 ZEND_API int add_get_index_long(zval *arg, ulong idx, long l, void **dest); 429 ZEND_API int add_get_index_double(zval *arg, ulong idx, double d, void **dest); 430 ZEND_API int add_get_index_string(zval *arg, ulong idx, const char *str, void **dest, int duplicate); 431 ZEND_API int add_get_index_stringl(zval *arg, ulong idx, const char *str, uint length, void **dest, int duplicate); 432 433 ZEND_API int array_set_zval_key(HashTable *ht, zval *key, zval *value); 434 435 ZEND_API int add_property_long_ex(zval *arg, const char *key, uint key_len, long l TSRMLS_DC); 436 ZEND_API int add_property_null_ex(zval *arg, const char *key, uint key_len TSRMLS_DC); 437 ZEND_API int add_property_bool_ex(zval *arg, const char *key, uint key_len, int b TSRMLS_DC); 438 ZEND_API int add_property_resource_ex(zval *arg, const char *key, uint key_len, long r TSRMLS_DC); 439 ZEND_API int add_property_double_ex(zval *arg, const char *key, uint key_len, double d TSRMLS_DC); 440 ZEND_API int add_property_string_ex(zval *arg, const char *key, uint key_len, const char *str, int duplicate TSRMLS_DC); 441 ZEND_API int add_property_stringl_ex(zval *arg, const char *key, uint key_len, const char *str, uint length, int duplicate TSRMLS_DC); 442 ZEND_API int add_property_zval_ex(zval *arg, const char *key, uint key_len, zval *value TSRMLS_DC); 443 444 #define add_property_long(__arg, __key, __n) add_property_long_ex(__arg, __key, strlen(__key)+1, __n TSRMLS_CC) 445 #define add_property_null(__arg, __key) add_property_null_ex(__arg, __key, strlen(__key) + 1 TSRMLS_CC) 446 #define add_property_bool(__arg, __key, __b) add_property_bool_ex(__arg, __key, strlen(__key)+1, __b TSRMLS_CC) 447 #define add_property_resource(__arg, __key, __r) add_property_resource_ex(__arg, __key, strlen(__key)+1, __r TSRMLS_CC) 448 #define add_property_double(__arg, __key, __d) add_property_double_ex(__arg, __key, strlen(__key)+1, __d TSRMLS_CC) 449 #define add_property_string(__arg, __key, __str, __duplicate) add_property_string_ex(__arg, __key, strlen(__key)+1, __str, __duplicate TSRMLS_CC) 450 #define add_property_stringl(__arg, __key, __str, __length, __duplicate) add_property_stringl_ex(__arg, __key, strlen(__key)+1, __str, __length, __duplicate TSRMLS_CC) 451 #define add_property_zval(__arg, __key, __value) add_property_zval_ex(__arg, __key, strlen(__key)+1, __value TSRMLS_CC) 452 453 454 ZEND_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); 455 ZEND_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); 456 457 ZEND_API extern const zend_fcall_info empty_fcall_info; 458 ZEND_API extern const zend_fcall_info_cache empty_fcall_info_cache; 459 460 /** Build zend_call_info/cache from a zval* 461 * 462 * Caller is responsible to provide a return value, otherwise the we will crash. 463 * fci->retval_ptr_ptr = NULL; 464 * In order to pass parameters the following members need to be set: 465 * fci->param_count = 0; 466 * fci->params = NULL; 467 * The callable_name argument may be NULL. 468 * Set check_flags to IS_CALLABLE_STRICT for every new usage! 469 */ 470 ZEND_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); 471 472 /** Clear arguments connected with zend_fcall_info *fci 473 * If free_mem is not zero then the params array gets free'd as well 474 */ 475 ZEND_API void zend_fcall_info_args_clear(zend_fcall_info *fci, int free_mem); 476 477 /** Save current arguments from zend_fcall_info *fci 478 * params array will be set to NULL 479 */ 480 ZEND_API void zend_fcall_info_args_save(zend_fcall_info *fci, int *param_count, zval ****params); 481 482 /** Free arguments connected with zend_fcall_info *fci andset back saved ones. 483 */ 484 ZEND_API void zend_fcall_info_args_restore(zend_fcall_info *fci, int param_count, zval ***params); 485 486 /** Set or clear the arguments in the zend_call_info struct taking care of 487 * refcount. If args is NULL and arguments are set then those are cleared. 488 */ 489 ZEND_API int zend_fcall_info_args(zend_fcall_info *fci, zval *args TSRMLS_DC); 490 491 /** Set arguments in the zend_fcall_info struct taking care of refcount. 492 * If argc is 0 the arguments which are set will be cleared, else pass 493 * a variable amount of zval** arguments. 494 */ 495 ZEND_API int zend_fcall_info_argp(zend_fcall_info *fci TSRMLS_DC, int argc, zval ***argv); 496 497 /** Set arguments in the zend_fcall_info struct taking care of refcount. 498 * If argc is 0 the arguments which are set will be cleared, else pass 499 * a variable amount of zval** arguments. 500 */ 501 ZEND_API int zend_fcall_info_argv(zend_fcall_info *fci TSRMLS_DC, int argc, va_list *argv); 502 503 /** Set arguments in the zend_fcall_info struct taking care of refcount. 504 * If argc is 0 the arguments which are set will be cleared, else pass 505 * a variable amount of zval** arguments. 506 */ 507 ZEND_API int zend_fcall_info_argn(zend_fcall_info *fci TSRMLS_DC, int argc, ...); 508 509 /** Call a function using information created by zend_fcall_info_init()/args(). 510 * If args is given then those replace the argument info in fci is temporarily. 511 */ 512 ZEND_API int zend_fcall_info_call(zend_fcall_info *fci, zend_fcall_info_cache *fcc, zval **retval, zval *args TSRMLS_DC); 513 514 ZEND_API int zend_call_function(zend_fcall_info *fci, zend_fcall_info_cache *fci_cache TSRMLS_DC); 515 516 ZEND_API int zend_set_hash_symbol(zval *symbol, const char *name, int name_length, zend_bool is_ref, int num_symbol_tables, ...); 517 518 ZEND_API void zend_delete_variable(zend_execute_data *ex, HashTable *ht, const char *name, int name_len, ulong hash_value TSRMLS_DC); 519 520 ZEND_API int zend_delete_global_variable(const char *name, int name_len TSRMLS_DC); 521 522 ZEND_API int zend_delete_global_variable_ex(const char *name, int name_len, ulong hash_value TSRMLS_DC); 523 524 ZEND_API void zend_reset_all_cv(HashTable *symbol_table TSRMLS_DC); 525 526 ZEND_API void zend_rebuild_symbol_table(TSRMLS_D); 527 528 ZEND_API const char* zend_find_alias_name(zend_class_entry *ce, const char *name, zend_uint len); 529 ZEND_API const char* zend_resolve_method_name(zend_class_entry *ce, zend_function *f); 530 531 #define add_method(arg, key, method) add_assoc_function((arg), (key), (method)) 532 533 ZEND_API ZEND_FUNCTION(display_disabled_function); 534 ZEND_API ZEND_FUNCTION(display_disabled_class); 535 END_EXTERN_C() 536 537 #if ZEND_DEBUG 538 #define CHECK_ZVAL_STRING(z) \ 539 if (Z_STRVAL_P(z)[ Z_STRLEN_P(z) ] != '\0') { zend_error(E_WARNING, "String is not zero-terminated (%s)", Z_STRVAL_P(z)); } 540 #define CHECK_ZVAL_STRING_REL(z) \ 541 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); } 542 #else 543 #define CHECK_ZVAL_STRING(z) 544 #define CHECK_ZVAL_STRING_REL(z) 545 #endif 546 547 #define CHECK_ZVAL_NULL_PATH(p) (Z_STRLEN_P(p) != strlen(Z_STRVAL_P(p))) 548 #define CHECK_NULL_PATH(p, l) (strlen(p) != l) 549 550 #define ZVAL_RESOURCE(z, l) do { \ 551 zval *__z = (z); \ 552 Z_LVAL_P(__z) = l; \ 553 Z_TYPE_P(__z) = IS_RESOURCE;\ 554 } while (0) 555 556 #define ZVAL_BOOL(z, b) do { \ 557 zval *__z = (z); \ 558 Z_LVAL_P(__z) = ((b) != 0); \ 559 Z_TYPE_P(__z) = IS_BOOL; \ 560 } while (0) 561 562 #define ZVAL_NULL(z) { \ 563 Z_TYPE_P(z) = IS_NULL; \ 564 } 565 566 #define ZVAL_LONG(z, l) { \ 567 zval *__z = (z); \ 568 Z_LVAL_P(__z) = l; \ 569 Z_TYPE_P(__z) = IS_LONG; \ 570 } 571 572 #define ZVAL_DOUBLE(z, d) { \ 573 zval *__z = (z); \ 574 Z_DVAL_P(__z) = d; \ 575 Z_TYPE_P(__z) = IS_DOUBLE; \ 576 } 577 578 #define ZVAL_STRING(z, s, duplicate) do { \ 579 const char *__s=(s); \ 580 zval *__z = (z); \ 581 Z_STRLEN_P(__z) = strlen(__s); \ 582 if (UNEXPECTED(Z_STRLEN_P(__z) < 0)) { \ 583 zend_error(E_ERROR, "String size overflow"); \ 584 } \ 585 Z_STRVAL_P(__z) = (duplicate?estrndup(__s, Z_STRLEN_P(__z)):(char*)__s);\ 586 Z_TYPE_P(__z) = IS_STRING; \ 587 } while (0) 588 589 #define ZVAL_STRINGL(z, s, l, duplicate) do { \ 590 const char *__s=(s); int __l=l; \ 591 zval *__z = (z); \ 592 Z_STRLEN_P(__z) = __l; \ 593 Z_STRVAL_P(__z) = (duplicate?estrndup(__s, __l):(char*)__s);\ 594 Z_TYPE_P(__z) = IS_STRING; \ 595 } while (0) 596 597 #define ZVAL_EMPTY_STRING(z) do { \ 598 zval *__z = (z); \ 599 Z_STRLEN_P(__z) = 0; \ 600 Z_STRVAL_P(__z) = STR_EMPTY_ALLOC();\ 601 Z_TYPE_P(__z) = IS_STRING; \ 602 } while (0) 603 604 #define ZVAL_ZVAL(z, zv, copy, dtor) do { \ 605 zval *__z = (z); \ 606 zval *__zv = (zv); \ 607 ZVAL_COPY_VALUE(__z, __zv); \ 608 if (copy) { \ 609 zval_copy_ctor(__z); \ 610 } \ 611 if (dtor) { \ 612 if (!copy) { \ 613 ZVAL_NULL(__zv); \ 614 } \ 615 zval_ptr_dtor(&__zv); \ 616 } \ 617 } while (0) 618 619 #define ZVAL_FALSE(z) ZVAL_BOOL(z, 0) 620 #define ZVAL_TRUE(z) ZVAL_BOOL(z, 1) 621 622 #define RETVAL_RESOURCE(l) ZVAL_RESOURCE(return_value, l) 623 #define RETVAL_BOOL(b) ZVAL_BOOL(return_value, b) 624 #define RETVAL_NULL() ZVAL_NULL(return_value) 625 #define RETVAL_LONG(l) ZVAL_LONG(return_value, l) 626 #define RETVAL_DOUBLE(d) ZVAL_DOUBLE(return_value, d) 627 #define RETVAL_STRING(s, duplicate) ZVAL_STRING(return_value, s, duplicate) 628 #define RETVAL_STRINGL(s, l, duplicate) ZVAL_STRINGL(return_value, s, l, duplicate) 629 #define RETVAL_EMPTY_STRING() ZVAL_EMPTY_STRING(return_value) 630 #define RETVAL_ZVAL(zv, copy, dtor) ZVAL_ZVAL(return_value, zv, copy, dtor) 631 #define RETVAL_FALSE ZVAL_BOOL(return_value, 0) 632 #define RETVAL_TRUE ZVAL_BOOL(return_value, 1) 633 634 #define RETURN_RESOURCE(l) { RETVAL_RESOURCE(l); return; } 635 #define RETURN_BOOL(b) { RETVAL_BOOL(b); return; } 636 #define RETURN_NULL() { RETVAL_NULL(); return;} 637 #define RETURN_LONG(l) { RETVAL_LONG(l); return; } 638 #define RETURN_DOUBLE(d) { RETVAL_DOUBLE(d); return; } 639 #define RETURN_STRING(s, duplicate) { RETVAL_STRING(s, duplicate); return; } 640 #define RETURN_STRINGL(s, l, duplicate) { RETVAL_STRINGL(s, l, duplicate); return; } 641 #define RETURN_EMPTY_STRING() { RETVAL_EMPTY_STRING(); return; } 642 #define RETURN_ZVAL(zv, copy, dtor) { RETVAL_ZVAL(zv, copy, dtor); return; } 643 #define RETURN_FALSE { RETVAL_FALSE; return; } 644 #define RETURN_TRUE { RETVAL_TRUE; return; } 645 646 #define RETVAL_ZVAL_FAST(z) do { \ 647 zval *_z = (z); \ 648 if (Z_ISREF_P(_z)) { \ 649 RETVAL_ZVAL(_z, 1, 0); \ 650 } else { \ 651 zval_ptr_dtor(&return_value); \ 652 Z_ADDREF_P(_z); \ 653 *return_value_ptr = _z; \ 654 } \ 655 } while (0) 656 #define RETURN_ZVAL_FAST(z) { RETVAL_ZVAL_FAST(z); return; } 657 658 /* Check that returned string length fits int */ 659 #define RETVAL_STRINGL_CHECK(s, len, dup) do { \ 660 size_t __len = (len); \ 661 if (UNEXPECTED(__len > INT_MAX)) { \ 662 php_error_docref(NULL TSRMLS_CC, E_WARNING, "String too long, max is %d", INT_MAX); \ 663 if(!(dup)) { \ 664 efree((s)); \ 665 } \ 666 RETURN_FALSE; \ 667 } \ 668 RETVAL_STRINGL((s), (int)__len, (dup)); \ 669 } while (0) 670 #define RETURN_STRINGL_CHECK(s, len, dup) { RETVAL_STRINGL_CHECK(s, len, dup); return; } 671 672 673 #define SET_VAR_STRING(n, v) { \ 674 { \ 675 zval *var; \ 676 ALLOC_ZVAL(var); \ 677 ZVAL_STRING(var, v, 0); \ 678 ZEND_SET_GLOBAL_VAR(n, var); \ 679 } \ 680 } 681 682 #define SET_VAR_STRINGL(n, v, l) { \ 683 { \ 684 zval *var; \ 685 ALLOC_ZVAL(var); \ 686 ZVAL_STRINGL(var, v, l, 0); \ 687 ZEND_SET_GLOBAL_VAR(n, var); \ 688 } \ 689 } 690 691 #define SET_VAR_LONG(n, v) { \ 692 { \ 693 zval *var; \ 694 ALLOC_ZVAL(var); \ 695 ZVAL_LONG(var, v); \ 696 ZEND_SET_GLOBAL_VAR(n, var); \ 697 } \ 698 } 699 700 #define SET_VAR_DOUBLE(n, v) { \ 701 { \ 702 zval *var; \ 703 ALLOC_ZVAL(var); \ 704 ZVAL_DOUBLE(var, v); \ 705 ZEND_SET_GLOBAL_VAR(n, var); \ 706 } \ 707 } 708 709 710 #define ZEND_SET_SYMBOL(symtable, name, var) \ 711 { \ 712 char *_name = (name); \ 713 \ 714 ZEND_SET_SYMBOL_WITH_LENGTH(symtable, _name, strlen(_name)+1, var, 1, 0); \ 715 } 716 717 #define ZEND_SET_SYMBOL_WITH_LENGTH(symtable, name, name_length, var, _refcount, _is_ref) \ 718 { \ 719 zval **orig_var; \ 720 \ 721 if (zend_hash_find(symtable, (name), (name_length), (void **) &orig_var)==SUCCESS \ 722 && PZVAL_IS_REF(*orig_var)) { \ 723 Z_SET_REFCOUNT_P(var, Z_REFCOUNT_PP(orig_var)); \ 724 Z_SET_ISREF_P(var); \ 725 \ 726 if (_refcount) { \ 727 Z_SET_REFCOUNT_P(var, Z_REFCOUNT_P(var) + _refcount - 1); \ 728 } \ 729 zval_dtor(*orig_var); \ 730 **orig_var = *(var); \ 731 FREE_ZVAL(var); \ 732 } else { \ 733 Z_SET_ISREF_TO_P(var, _is_ref); \ 734 if (_refcount) { \ 735 Z_SET_REFCOUNT_P(var, _refcount); \ 736 } \ 737 zend_hash_update(symtable, (name), (name_length), &(var), sizeof(zval *), NULL); \ 738 } \ 739 } 740 741 742 #define ZEND_SET_GLOBAL_VAR(name, var) \ 743 ZEND_SET_SYMBOL(&EG(symbol_table), name, var) 744 745 #define ZEND_SET_GLOBAL_VAR_WITH_LENGTH(name, name_length, var, _refcount, _is_ref) \ 746 ZEND_SET_SYMBOL_WITH_LENGTH(&EG(symbol_table), name, name_length, var, _refcount, _is_ref) 747 748 #define ZEND_DEFINE_PROPERTY(class_ptr, name, value, mask) \ 749 { \ 750 char *_name = (name); \ 751 int namelen = strlen(_name); \ 752 zend_declare_property(class_ptr, _name, namelen, value, mask TSRMLS_CC); \ 753 } 754 755 #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))) 756 #define ZVAL_IS_NULL(z) (Z_TYPE_P(z)==IS_NULL) 757 758 /* For compatibility */ 759 #define ZEND_MINIT ZEND_MODULE_STARTUP_N 760 #define ZEND_MSHUTDOWN ZEND_MODULE_SHUTDOWN_N 761 #define ZEND_RINIT ZEND_MODULE_ACTIVATE_N 762 #define ZEND_RSHUTDOWN ZEND_MODULE_DEACTIVATE_N 763 #define ZEND_MINFO ZEND_MODULE_INFO_N 764 #define ZEND_GINIT(module) ((void (*)(void* TSRMLS_DC))(ZEND_MODULE_GLOBALS_CTOR_N(module))) 765 #define ZEND_GSHUTDOWN(module) ((void (*)(void* TSRMLS_DC))(ZEND_MODULE_GLOBALS_DTOR_N(module))) 766 767 #define ZEND_MINIT_FUNCTION ZEND_MODULE_STARTUP_D 768 #define ZEND_MSHUTDOWN_FUNCTION ZEND_MODULE_SHUTDOWN_D 769 #define ZEND_RINIT_FUNCTION ZEND_MODULE_ACTIVATE_D 770 #define ZEND_RSHUTDOWN_FUNCTION ZEND_MODULE_DEACTIVATE_D 771 #define ZEND_MINFO_FUNCTION ZEND_MODULE_INFO_D 772 #define ZEND_GINIT_FUNCTION ZEND_MODULE_GLOBALS_CTOR_D 773 #define ZEND_GSHUTDOWN_FUNCTION ZEND_MODULE_GLOBALS_DTOR_D 774 775 END_EXTERN_C() 776 777 #endif /* ZEND_API_H */ 778 779 780 /* 781 * Local variables: 782 * tab-width: 4 783 * c-basic-offset: 4 784 * indent-tabs-mode: t 785 * End: 786 */ 787
