199 lines
5.3 KiB
C
199 lines
5.3 KiB
C
/* php7 extension wrapper
|
|
* for compatibility, these wrapper functions are designed for old php version.
|
|
*/
|
|
|
|
#ifndef _PHP7_EXT_WRAPPER_H
|
|
#define _PHP7_EXT_WRAPPER_H
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <php.h>
|
|
|
|
#ifdef ZTS
|
|
#include "TSRM.h"
|
|
#endif
|
|
|
|
#include <SAPI.h>
|
|
#include <php_ini.h>
|
|
|
|
#if PHP_MAJOR_VERSION < 7
|
|
typedef int zend_size_t;
|
|
#define ZEND_RETURN_STRING(s, dup) RETURN_STRING(s, dup)
|
|
#define ZEND_RETURN_STRINGL(s, l, dup) RETURN_STRINGL(s, l, dup)
|
|
#define ZEND_RETURN_STRINGL_CALLBACK(s, l, callback) \
|
|
do { \
|
|
RETVAL_STRINGL(s, l, 1); \
|
|
callback(s); /* generally for free the pointer */ \
|
|
return; \
|
|
} while (0)
|
|
|
|
#define ZEND_TYPE_OF(z) (z)->type
|
|
#define ZEND_IS_BOOL(z) (ZEND_TYPE_OF(z) == IS_BOOL)
|
|
#define ZEND_IS_TRUE(z) ((z)->value.lval != 0)
|
|
#define Z_CE_P(z) ((zend_class_entry *)(z))
|
|
|
|
//#define zend_get_object_wrapper(obj) zend_object_store_get_object(obj)
|
|
|
|
#define zend_hash_update_wrapper zend_hash_update
|
|
#define zend_call_user_function_wrapper call_user_function
|
|
|
|
#define zend_add_assoc_long_ex(z, key, key_len, n) \
|
|
add_assoc_long_ex(z, key, key_len, n)
|
|
|
|
#define zend_add_assoc_stringl_ex(z, key, key_len, str, length, dup) \
|
|
add_assoc_stringl_ex(z, key, key_len, str, length, dup)
|
|
|
|
#define zend_add_assoc_zval_ex(z, key, key_len, value) \
|
|
add_assoc_zval_ex(z, key, key_len, value)
|
|
|
|
#define zend_add_assoc_bool_ex(z, key, key_len, b) \
|
|
add_assoc_bool_ex(z, key, key_len, b)
|
|
|
|
#define zend_add_index_stringl(z, index, value, length, dup) \
|
|
add_index_stringl(z, index, value, length, dup)
|
|
|
|
#define zend_add_index_string(z, index, value, dup) \
|
|
add_index_string(z, index, value, dup)
|
|
|
|
#define zend_add_assoc_stringl(z, key, str, length, dup) \
|
|
add_assoc_stringl(z, key, str, length, dup)
|
|
|
|
#define zend_add_assoc_string(z, key, str, dup) \
|
|
add_assoc_string(z, key, str, dup)
|
|
|
|
#define zend_add_next_index_stringl(z, str, length, dup) \
|
|
add_next_index_stringl(z, str, length, dup)
|
|
|
|
#define zend_add_next_index_string(z, str, dup) \
|
|
add_next_index_string(z, str, dup)
|
|
|
|
static inline int zend_hash_find_wrapper(HashTable *ht, char *key, int key_len,
|
|
zval **value)
|
|
{
|
|
zval **pp;
|
|
|
|
pp = NULL;
|
|
if (zend_hash_find(ht, key, key_len, (void **)&pp) == SUCCESS)
|
|
{
|
|
*value = *pp;
|
|
return SUCCESS;
|
|
}
|
|
else
|
|
{
|
|
*value = NULL;
|
|
return FAILURE;
|
|
}
|
|
}
|
|
|
|
static inline int zend_get_configuration_directive_wrapper(char *name, int len,
|
|
zval **value)
|
|
{
|
|
return zend_get_configuration_directive(name, len, *value);
|
|
}
|
|
|
|
#else
|
|
|
|
typedef size_t zend_size_t;
|
|
#define ZEND_RETURN_STRING(s, dup) RETURN_STRING(s)
|
|
#define ZEND_RETURN_STRINGL(s, l, dup) RETURN_STRINGL(s, l)
|
|
#define ZEND_RETURN_STRINGL_CALLBACK(s, l, callback) \
|
|
do { \
|
|
RETVAL_STRINGL(s, l); \
|
|
callback(s); \
|
|
return; \
|
|
} while (0)
|
|
|
|
#define ZEND_TYPE_OF(z) Z_TYPE_P(z)
|
|
#define ZEND_IS_BOOL(z) (Z_TYPE_P(z) == IS_TRUE || Z_TYPE_P(z) == IS_FALSE)
|
|
#define ZEND_IS_TRUE(z) (Z_TYPE_P(z) == IS_TRUE)
|
|
#define Z_STRVAL_PP(s) Z_STRVAL_P(*s)
|
|
#define Z_STRLEN_PP(s) Z_STRLEN_P(*s)
|
|
//#define zend_get_object_wrapper(obj) (void *)((char *)(Z_OBJ_P(obj)) - XtOffsetOf(php_fdfs_t, zo))
|
|
|
|
#define MAKE_STD_ZVAL(p) zval _stack_zval_##p; p = &(_stack_zval_##p)
|
|
#define ALLOC_INIT_ZVAL(p) MAKE_STD_ZVAL(p)
|
|
#define INIT_ZVAL(z)
|
|
|
|
#define zend_add_assoc_long_ex(z, key, key_len, n) \
|
|
add_assoc_long_ex(z, key, key_len - 1, n)
|
|
|
|
#define zend_add_assoc_stringl_ex(z, key, key_len, str, length, dup) \
|
|
add_assoc_stringl_ex(z, key, key_len - 1, str, length)
|
|
|
|
#define zend_add_assoc_zval_ex(z, key, key_len, value) \
|
|
add_assoc_zval_ex(z, key, key_len - 1, value)
|
|
|
|
#define zend_add_assoc_bool_ex(z, key, key_len, b) \
|
|
add_assoc_bool_ex(z, key, key_len - 1, b)
|
|
|
|
#define zend_add_index_stringl(z, index, value, length, dup) \
|
|
add_index_stringl(z, index, value, length)
|
|
|
|
#define zend_add_index_string(z, index, value, dup) \
|
|
add_index_string(z, index, value)
|
|
|
|
#define zend_add_assoc_stringl(z, key, str, length, dup) \
|
|
add_assoc_stringl(z, key, str, length)
|
|
|
|
#define zend_add_assoc_string(z, key, str, dup) \
|
|
add_assoc_string(z, key, str)
|
|
|
|
#define zend_add_next_index_stringl(z, str, length, dup) \
|
|
add_next_index_stringl(z, str, length)
|
|
|
|
#define zend_add_next_index_string(z, str, dup) \
|
|
add_next_index_string(z, str)
|
|
|
|
static inline int zend_hash_find_wrapper(HashTable *ht, char *key, int key_len,
|
|
zval **value)
|
|
{
|
|
zval zkey;
|
|
ZVAL_STRINGL(&zkey, key, key_len - 1);
|
|
*value = zend_hash_find(ht, Z_STR(zkey));
|
|
return (*value != NULL ? SUCCESS : FAILURE);
|
|
}
|
|
|
|
static inline int zend_hash_update_wrapper(HashTable *ht, char *k, int len,
|
|
void *val, int size, void *ptr)
|
|
{
|
|
zval key;
|
|
ZVAL_STRINGL(&key, k, len - 1);
|
|
return zend_hash_update(ht, Z_STR(key), val) ? SUCCESS : FAILURE;
|
|
}
|
|
|
|
static inline int zend_call_user_function_wrapper(HashTable *function_table,
|
|
zval *object, zval *function_name, zval *retval_ptr,
|
|
uint32_t param_count, zval **params TSRMLS_DC)
|
|
{
|
|
int i;
|
|
zval real_params[64];
|
|
|
|
if (param_count > 64)
|
|
{
|
|
return FAILURE;
|
|
}
|
|
|
|
for(i=0; i<param_count; i++)
|
|
{
|
|
real_params[i] = *params[i];
|
|
}
|
|
return call_user_function(function_table, object, function_name, retval_ptr,
|
|
param_count, real_params);
|
|
}
|
|
|
|
static inline int zend_get_configuration_directive_wrapper(char *name, int len,
|
|
zval **value)
|
|
{
|
|
zval key;
|
|
ZVAL_STRINGL(&key, name, len - 1);
|
|
*value = zend_get_configuration_directive(Z_STR(key));
|
|
return (*value != NULL ? SUCCESS : FAILURE);
|
|
}
|
|
|
|
#endif
|
|
|
|
#endif
|
|
|