1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
|
/*
* Copyright 2015-2017 MongoDB, Inc.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#ifndef PHONGO_COMPAT_H
#define PHONGO_COMPAT_H
#include <php.h>
#include <Zend/zend_string.h>
#if PHP_VERSION_ID >= 70000
#include <Zend/zend_portability.h>
#endif
#ifdef PHP_WIN32
#include "config.w32.h"
#else
#include <php_config.h>
#endif
#ifndef PHP_FE_END
#define PHP_FE_END \
{ \
NULL, NULL, NULL \
}
#endif
#ifndef HASH_KEY_NON_EXISTENT
#define HASH_KEY_NON_EXISTENT HASH_KEY_NON_EXISTANT
#endif
#if PHP_VERSION_ID >= 70000
#define str_efree(s) efree((char*) s)
#else
#include <Zend/zend_string.h>
#endif
#if defined(__GNUC__)
#define ARG_UNUSED __attribute__((unused))
#else
#define ARG_UNUSED
#endif
#if defined(__GNUC__)
#define PHONGO_GNUC_CHECK_VERSION(major, minor) \
((__GNUC__ > (major)) || \
((__GNUC__ == (major)) && (__GNUC_MINOR__ >= (minor))))
#else
#define PHONGO_GNUC_CHECK_VERSION(major, minor) 0
#endif
#if PHONGO_GNUC_CHECK_VERSION(7, 0)
#define PHONGO_BREAK_INTENTIONALLY_MISSING __attribute__((fallthrough));
#else
#define PHONGO_BREAK_INTENTIONALLY_MISSING
#endif
#if PHP_VERSION_ID >= 70000
#define phongo_char zend_string
#define phongo_long zend_long
#if SIZEOF_ZEND_LONG == 8
#define PHONGO_LONG_FORMAT PRId64
#elif SIZEOF_ZEND_LONG == 4
#define PHONGO_LONG_FORMAT PRId32
#else
#error Unsupported architecture (integers are neither 32-bit nor 64-bit)
#endif
#define SIZEOF_PHONGO_LONG SIZEOF_ZEND_LONG
#define phongo_create_object_retval zend_object*
#define phongo_get_gc_table zval**
#define PHONGO_ALLOC_OBJECT_T(_obj_t, _class_type) (_obj_t*) ecalloc(1, sizeof(_obj_t) + zend_object_properties_size(_class_type))
#define PHONGO_TSRMLS_FETCH_FROM_CTX(user_data)
#define DECLARE_RETURN_VALUE_USED int return_value_used = 1;
#define EXCEPTION_P(_ex, _zp) ZVAL_OBJ(&_zp, _ex)
#define ADD_ASSOC_STRING(_zv, _key, _value) add_assoc_string_ex(_zv, ZEND_STRL(_key), (char*) (_value));
#define ADD_ASSOC_STRINGL(_zv, _key, _value, _len) add_assoc_stringl_ex(_zv, ZEND_STRL(_key), (char*) (_value), _len);
#define ADD_ASSOC_STRING_EX(_zv, _key, _key_len, _value, _value_len) add_assoc_stringl_ex(_zv, _key, _key_len, (char*) (_value), _value_len);
#define ADD_ASSOC_LONG_EX(_zv, _key, _value) add_assoc_long_ex(_zv, ZEND_STRL(_key), _value);
#define ADD_ASSOC_ZVAL_EX(_zv, _key, _value) add_assoc_zval_ex(_zv, ZEND_STRL(_key), _value);
#define ADD_ASSOC_ZVAL(_zv, _key, _value) add_assoc_zval(_zv, _key, _value);
#define ADD_ASSOC_NULL_EX(_zv, _key) add_assoc_null_ex(_zv, ZEND_STRL(_key));
#define ADD_ASSOC_BOOL_EX(_zv, _key, _value) add_assoc_bool_ex(_zv, ZEND_STRL(_key), _value);
#define ZVAL_INT64_STRING(_zv, _value) \
do { \
char tmp[24]; \
int tmp_len; \
tmp_len = snprintf(tmp, sizeof(tmp), "%" PRId64, (_value)); \
ZVAL_STRINGL((_zv), tmp, tmp_len); \
} while (0)
#define ADD_ASSOC_INT64_AS_STRING(_zv, _key, _value) \
do { \
zval z_int; \
ZVAL_INT64_STRING(&z_int, (_value)); \
ADD_ASSOC_ZVAL_EX((_zv), (_key), &z_int); \
} while (0)
#define ADD_NEXT_INDEX_STRINGL(_zv, _value, _len) add_next_index_stringl(_zv, _value, _len);
#define phongo_free_object_arg zend_object
#define phongo_zpp_char_len size_t
#define ZEND_HASH_APPLY_COUNT(ht) (ht)->u.v.nApplyCount
#define PHONGO_RETVAL_STRINGL(s, slen) RETVAL_STRINGL(s, slen)
#define PHONGO_RETURN_STRINGL(s, slen) RETURN_STRINGL(s, slen)
#define PHONGO_RETVAL_STRING(s) RETVAL_STRING(s)
#define PHONGO_RETURN_STRING(s) RETURN_STRING(s)
#define PHONGO_RETVAL_SMART_STR(val) PHONGO_RETVAL_STRINGL(ZSTR_VAL((val).s), ZSTR_LEN((val).s));
#define ZVAL_RETVAL_TYPE zval
#define ZVAL_STATIC_INIT \
{ \
{ \
0 \
} \
}
#else /* PHP_VERSION_ID < 70000 */
#define phongo_char char
#define phongo_long long
#define PHONGO_LONG_FORMAT "ld"
#define SIZEOF_PHONGO_LONG SIZEOF_LONG
#define ZSTR_VAL(str) str
#define phongo_create_object_retval zend_object_value
#define phongo_get_gc_table zval***
#define PHONGO_ALLOC_OBJECT_T(_obj_t, _class_type) (_obj_t*) ecalloc(1, sizeof(_obj_t))
#define PHONGO_TSRMLS_FETCH_FROM_CTX(user_data) TSRMLS_FETCH_FROM_CTX(user_data)
#define DECLARE_RETURN_VALUE_USED
#define EXCEPTION_P(_ex, _zp) _zp = _ex
#define ADD_ASSOC_STRING(_zv, _key, _value) add_assoc_string_ex(_zv, ZEND_STRS(_key), (char*) (_value), 1);
#define ADD_ASSOC_STRINGL(_zv, _key, _value, _len) add_assoc_stringl_ex(_zv, ZEND_STRS(_key), (char*) (_value), _len, 1);
#define ADD_ASSOC_STRING_EX(_zv, _key, _key_len, _value, _value_len) add_assoc_stringl_ex(_zv, _key, _key_len + 1, (char*) (_value), _value_len, 1);
#define ADD_ASSOC_LONG_EX(_zv, _key, _value) add_assoc_long_ex(_zv, ZEND_STRS(_key), _value);
#define ADD_ASSOC_ZVAL_EX(_zv, _key, _value) add_assoc_zval_ex(_zv, ZEND_STRS(_key), _value);
#define ADD_ASSOC_ZVAL(_zv, _key, _value) add_assoc_zval(_zv, _key, _value);
#define ADD_ASSOC_NULL_EX(_zv, _key) add_assoc_null_ex(_zv, ZEND_STRS(_key));
#define ADD_ASSOC_BOOL_EX(_zv, _key, _value) add_assoc_bool_ex(_zv, ZEND_STRS(_key), _value);
#define ZVAL_INT64_STRING(_zv, _value) \
do { \
char tmp[24]; \
int tmp_len; \
tmp_len = snprintf(tmp, sizeof(tmp), "%" PRId64, (_value)); \
ZVAL_STRINGL((_zv), tmp, tmp_len, 1); \
} while (0)
#define ADD_ASSOC_INT64_AS_STRING(_zv, _key, _value) \
do { \
zval* z_int; \
MAKE_STD_ZVAL(z_int); \
ZVAL_INT64_STRING(z_int, (_value)); \
ADD_ASSOC_ZVAL_EX((_zv), (_key), z_int); \
} while (0)
#define ADD_NEXT_INDEX_STRINGL(_zv, _value, _len) add_next_index_stringl(_zv, _value, _len, 1);
#define Z_PHPDATE_P(object) ((php_date_obj*) zend_object_store_get_object(object TSRMLS_CC))
#define Z_ISUNDEF(x) !x
#define ZVAL_UNDEF(x) \
do { \
(*x) = NULL; \
} while (0)
#define ZVAL_ARR(z, a) \
do { \
HashTable* __arr = (a); \
zval* __z = (z); \
Z_ARRVAL_P(__z) = __arr; \
Z_TYPE_P(__z) = IS_ARRAY; \
} while (0);
#define ZVAL_DUP(z, v) \
do { \
zval* _z = (z); \
const zval* _v = (v); \
*_z = *_v; \
INIT_PZVAL(_z); \
zval_copy_ctor(_z); \
} while (0);
#define phongo_free_object_arg void
#define phongo_zpp_char_len int
#define ZEND_HASH_APPLY_PROTECTION(ht) 1
#define ZEND_HASH_GET_APPLY_COUNT(ht) ((ht)->nApplyCount)
#define ZEND_HASH_DEC_APPLY_COUNT(ht) ((ht)->nApplyCount -= 1)
#define ZEND_HASH_INC_APPLY_COUNT(ht) ((ht)->nApplyCount += 1)
#define PHONGO_RETVAL_STRINGL(s, slen) RETVAL_STRINGL(s, slen, 1)
#define PHONGO_RETURN_STRINGL(s, slen) RETURN_STRINGL(s, slen, 1)
#define PHONGO_RETVAL_STRING(s) RETVAL_STRING(s, 1)
#define PHONGO_RETURN_STRING(s) RETURN_STRING(s, 1)
#define PHONGO_RETVAL_SMART_STR(val) PHONGO_RETVAL_STRINGL((val).c, (val).len);
#define ZVAL_RETVAL_TYPE zval*
#define ZVAL_STATIC_INIT zval_used_for_init
#endif
#if SIZEOF_PHONGO_LONG == 8
#define ADD_INDEX_INT64(_zv, _index, _value) add_index_long((_zv), (_index), (_value))
#define ADD_NEXT_INDEX_INT64(_zv, _value) add_next_index_long((_zv), (_value))
#define ADD_ASSOC_INT64(_zv, _key, _value) add_assoc_long((_zv), (_key), (_value))
#define ZVAL_INT64(_zv, _value) ZVAL_LONG((_zv), (_value))
#elif SIZEOF_PHONGO_LONG == 4
#if PHP_VERSION_ID >= 70000
#define ADD_INDEX_INT64(_zv, _index, _value) \
if ((_value) > INT32_MAX || (_value) < INT32_MIN) { \
zval zchild; \
php_phongo_bson_new_int64(&zchild, (_value) TSRMLS_CC); \
add_index_zval((_zv), (_index), &zchild); \
} else { \
add_index_long((_zv), (_index), (_value)); \
}
#define ADD_NEXT_INDEX_INT64(_zv, _value) \
if ((_value) > INT32_MAX || (_value) < INT32_MIN) { \
zval zchild; \
php_phongo_bson_new_int64(&zchild, (_value) TSRMLS_CC); \
add_next_index_zval((_zv), &zchild); \
} else { \
add_next_index_long((_zv), (_value)); \
}
#define ADD_ASSOC_INT64(_zv, _key, _value) \
if ((_value) > INT32_MAX || (_value) < INT32_MIN) { \
zval zchild; \
php_phongo_bson_new_int64(&zchild, (_value) TSRMLS_CC); \
add_assoc_zval((_zv), (_key), &zchild); \
} else { \
add_assoc_long((_zv), (_key), (_value)); \
}
#else /* PHP_VERSION_ID < 70000 */
#define ADD_INDEX_INT64(_zv, _index, _value) \
if ((_value) > INT32_MAX || (_value) < INT32_MIN) { \
zval* zchild = NULL; \
TSRMLS_FETCH(); \
MAKE_STD_ZVAL(zchild); \
php_phongo_bson_new_int64(zchild, (_value) TSRMLS_CC); \
add_index_zval((_zv), (_index), zchild); \
} else { \
add_index_long((_zv), (_index), (_value)); \
}
#define ADD_NEXT_INDEX_INT64(_zv, _value) \
if ((_value) > INT32_MAX || (_value) < INT32_MIN) { \
zval* zchild = NULL; \
TSRMLS_FETCH(); \
MAKE_STD_ZVAL(zchild); \
php_phongo_bson_new_int64(zchild, (_value) TSRMLS_CC); \
add_next_index_zval((_zv), zchild); \
} else { \
add_next_index_long((_zv), (_value)); \
}
#define ADD_ASSOC_INT64(_zv, _key, _value) \
if ((_value) > INT32_MAX || (_value) < INT32_MIN) { \
zval* zchild = NULL; \
TSRMLS_FETCH(); \
MAKE_STD_ZVAL(zchild); \
php_phongo_bson_new_int64(zchild, (_value) TSRMLS_CC); \
add_assoc_zval((_zv), (_key), zchild); \
} else { \
add_assoc_long((_zv), (_key), (_value)); \
}
#endif /* PHP_VERSION_ID */
#define ZVAL_INT64(_zv, _value) \
if ((_value) > INT32_MAX || (_value) < INT32_MIN) { \
php_phongo_bson_new_int64((_zv), (_value) TSRMLS_CC); \
} else { \
ZVAL_LONG((_zv), (_value)); \
}
#else /* SIZEOF_PHONGO_LONG != 8 && SIZEOF_PHONGO_LONG != 4 */
#error Unsupported architecture (integers are neither 32-bit nor 64-bit)
#endif /* SIZEOF_PHONGO_LONG */
void phongo_add_exception_prop(const char* prop, int prop_len, zval* value TSRMLS_DC);
zend_bool php_phongo_zend_hash_apply_protection_begin(HashTable* ht);
zend_bool php_phongo_zend_hash_apply_protection_end(HashTable* ht);
#endif /* PHONGO_COMPAT_H */
/*
* Local variables:
* tab-width: 4
* c-basic-offset: 4
* End:
* vim600: noet sw=4 ts=4 fdm=marker
* vim<600: noet sw=4 ts=4
*/
|
