1 /*******************************************************************************
2 Copyright (c) 2016, Michael Wallner <mike@php.net>.
5 Redistribution and use in source and binary forms, with or without
6 modification, are permitted provided that the following conditions are met:
8 * Redistributions of source code must retain the above copyright notice,
9 this list of conditions and the following disclaimer.
10 * Redistributions in binary form must reproduce the above copyright
11 notice, this list of conditions and the following disclaimer in the
12 documentation and/or other materials provided with the distribution.
14 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
15 AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
17 DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
18 FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
20 SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
21 CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
22 OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
23 OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24 *******************************************************************************/
26 #include "php_psi_stdinc.h"
30 #include "ext/standard/info.h"
31 #include "zend_constants.h"
32 #include "zend_operators.h"
42 # define PSI_ENGINE "jit"
47 # define PSI_ENGINE "ffi"
50 ZEND_DECLARE_MODULE_GLOBALS(psi
);
52 //#define ZEND_INI_MH(name) int name(zend_ini_entry *entry, zend_string *new_value, void *mh_arg1, void *mh_arg2, void *mh_arg3, int stage)
54 static void OnUpdateBlacklist(const char *str
, void (*cb
)(const char*, size_t))
61 end
= strchr(str
, ',');
75 static void psi_blacklist_add_decl(const char *pattern
, size_t len
);
76 static ZEND_INI_MH(OnUpdateBlacklistedDecls
)
78 OnUpdateBlacklist(new_value
->val
, psi_blacklist_add_decl
);
82 static void psi_blacklist_add_var(const char *pattern
, size_t len
);
83 static ZEND_INI_MH(OnUpdateBlacklistedVars
)
85 OnUpdateBlacklist(new_value
->val
, psi_blacklist_add_var
);
89 static void OnDisplayBlacklist(struct psi_plist
*bl
)
94 while (psi_plist_get(bl
, i
++, &item
)) {
101 static ZEND_INI_DISP(OnDisplayBlacklistedDecls
)
103 OnDisplayBlacklist(PSI_G(blacklist
).decls
);
105 static ZEND_INI_DISP(OnDisplayBlacklistedVars
)
107 OnDisplayBlacklist(PSI_G(blacklist
).vars
);
111 STD_PHP_INI_ENTRY("psi.engine", PSI_ENGINE
, PHP_INI_SYSTEM
, OnUpdateString
, engine
, zend_psi_globals
, psi_globals
)
112 STD_PHP_INI_ENTRY("psi.directory", "psi.d", PHP_INI_SYSTEM
, OnUpdateString
, directory
, zend_psi_globals
, psi_globals
)
113 PHP_INI_ENTRY_EX("psi.blacklist.decls", "", PHP_INI_SYSTEM
, OnUpdateBlacklistedDecls
, OnDisplayBlacklistedDecls
)
114 PHP_INI_ENTRY_EX("psi.blacklist.vars", "", PHP_INI_SYSTEM
, OnUpdateBlacklistedVars
, OnDisplayBlacklistedVars
)
117 static zend_object_handlers psi_object_handlers
;
118 static zend_class_entry
*psi_class_entry
;
120 zend_class_entry
*psi_object_get_class_entry()
122 return psi_class_entry
;
125 static void psi_object_free(zend_object
*o
)
127 psi_object
*obj
= PSI_OBJ(NULL
, o
);
131 obj
->dtor(obj
->data
);
135 zend_object_std_dtor(o
);
138 zend_object
*psi_object_init_ex(zend_class_entry
*ce
, void *data
, void (*dtor
)(void *))
143 ce
= psi_class_entry
;
146 o
= ecalloc(1, sizeof(*o
) + zend_object_properties_size(ce
));
151 zend_object_std_init(&o
->std
, ce
);
152 object_properties_init(&o
->std
, ce
);
153 o
->std
.handlers
= &psi_object_handlers
;
157 zend_object
*psi_object_init(zend_class_entry
*ce
)
159 return psi_object_init_ex(ce
, NULL
, NULL
);
162 ZEND_BEGIN_ARG_INFO_EX(ai_psi_dump
, 0, 0, 0)
163 ZEND_ARG_INFO(0, stream
)
165 static PHP_FUNCTION(psi_dump
)
169 struct psi_dump dump
= {.fun
= (psi_dump_cb
) php_stream_printf
};
171 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS(), "|r!", &r
)) {
175 php_stream_from_zval(s
, r
);
178 dump
.ctx
.hn
= php_stream_open_wrapper("php://output", "w", REPORT_ERRORS
, NULL
);
180 psi_context_dump(&dump
, PSI_G(context
));
183 ZEND_BEGIN_ARG_INFO_EX(ai_psi_validate
, 0, 0, 1)
184 ZEND_ARG_INFO(0, file
)
185 ZEND_ARG_INFO(0, flags
)
186 ZEND_ARG_INFO(1, errcnt
)
188 static PHP_FUNCTION(psi_validate
)
191 struct psi_parser_input
*I
;
193 struct psi_data D
= {0};
194 struct psi_validate_scope S
= {0};
199 if (psi_check_env("PSI_DEBUG")) {
204 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS(), "P|lz", &file
, &flags
, &errcnt
)) {
208 if (!psi_parser_init(&P
, psi_error_wrapper
, flags
)) {
211 if (!(I
= psi_parser_open_file(&P
, file
->val
, true))) {
216 psi_parser_parse(&P
, I
);
217 psi_data_ctor(&D
, P
.error
, P
.flags
);
218 psi_validate_scope_ctor(&S
);
221 RETVAL_BOOL(psi_validate(&S
, &D
, PSI_DATA(&P
)));
225 convert_to_long(errcnt
);
226 ZVAL_LONG(errcnt
, P
.errors
);
229 psi_validate_scope_dtor(&S
);
232 psi_parser_input_free(&I
);
235 ZEND_BEGIN_ARG_INFO_EX(ai_psi_validate_string
, 0, 0, 1)
236 ZEND_ARG_INFO(0, string
)
237 ZEND_ARG_INFO(0, flags
)
238 ZEND_ARG_INFO(1, errcnt
)
240 static PHP_FUNCTION(psi_validate_string
)
243 struct psi_parser_input
*I
;
245 struct psi_data D
= {0};
246 struct psi_validate_scope S
= {0};
251 if (psi_check_env("PSI_DEBUG")) {
256 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS(), "S|lz", &string
, &flags
, &errcnt
)) {
260 if (!psi_parser_init(&P
, psi_error_wrapper
, flags
)) {
263 if (!(I
= psi_parser_open_string(&P
, string
->val
, string
->len
))) {
268 psi_parser_parse(&P
, I
);
269 psi_data_ctor(&D
, P
.error
, P
.flags
);
270 psi_validate_scope_ctor(&S
);
273 RETVAL_BOOL(psi_validate(&S
, &D
, PSI_DATA(&P
)));
277 convert_to_long(errcnt
);
278 ZVAL_LONG(errcnt
, P
.errors
);
281 psi_validate_scope_dtor(&S
);
284 psi_parser_input_free(&I
);
287 PHP_MINIT_FUNCTION(psi_cpp
);
288 PHP_MINIT_FUNCTION(psi_builtin
);
289 PHP_MINIT_FUNCTION(psi_context
);
290 static PHP_MINIT_FUNCTION(psi
)
292 zend_class_entry ce
= {0};
294 REGISTER_INI_ENTRIES();
296 zend_register_long_constant(ZEND_STRL("PSI_DEBUG"), PSI_DEBUG
, CONST_CS
|CONST_PERSISTENT
, module_number
);
297 zend_register_long_constant(ZEND_STRL("PSI_SILENT"), PSI_SILENT
, CONST_CS
|CONST_PERSISTENT
, module_number
);
299 INIT_NS_CLASS_ENTRY(ce
, "psi", "object", NULL
);
300 psi_class_entry
= zend_register_internal_class_ex(&ce
, NULL
);
301 psi_class_entry
->create_object
= psi_object_init
;
303 memcpy(&psi_object_handlers
, zend_get_std_object_handlers(), sizeof(zend_object_handlers
));
304 psi_object_handlers
.offset
= XtOffsetOf(psi_object
, std
);
305 psi_object_handlers
.free_obj
= psi_object_free
;
306 psi_object_handlers
.clone_obj
= NULL
;
308 if (SUCCESS
!= PHP_MINIT(psi_builtin
)(type
, module_number
)) {
311 if (SUCCESS
!= PHP_MINIT(psi_cpp
)(type
, module_number
)) {
314 if (SUCCESS
!= PHP_MINIT(psi_context
)(type
, module_number
)) {
321 PHP_MSHUTDOWN_FUNCTION(psi_cpp
);
322 PHP_MSHUTDOWN_FUNCTION(psi_builtin
);
323 PHP_MSHUTDOWN_FUNCTION(psi_context
);
324 static PHP_MSHUTDOWN_FUNCTION(psi
)
326 PHP_MSHUTDOWN(psi_context
)(type
, module_number
);
327 PHP_MSHUTDOWN(psi_cpp
)(type
, module_number
);
328 PHP_MSHUTDOWN(psi_builtin
)(type
, module_number
);
330 UNREGISTER_INI_ENTRIES();
335 #if defined(COMPILE_DL_PSI) && defined(ZTS)
336 static PHP_RINIT_FUNCTION(psi
)
338 ZEND_TSRMLS_CACHE_UPDATE();
343 static PHP_MINFO_FUNCTION(psi
)
345 php_info_print_table_start();
346 php_info_print_table_header(2, "PSI Support", "enabled");
347 php_info_print_table_row(2, "Extension Version", PHP_PSI_VERSION
);
348 php_info_print_table_row(2, "Search Path", PSI_G(search_path
));
349 php_info_print_table_end();
351 php_info_print_table_start();
352 php_info_print_table_header(3, "Used Library", "Compiled", "Linked");
353 php_info_print_table_row(3, "libffi",
354 #ifndef PHP_PSI_LIBFFI_VERSION
355 # define PHP_PSI_LIBFFI_VERSION "unknown"
358 PHP_PSI_LIBFFI_VERSION
, "unknown"
360 "disabled", "disabled"
363 php_info_print_table_row(3, "libjit",
367 "disabled", "disabled"
371 DISPLAY_INI_ENTRIES();
374 static void ptr_free(void *ptr
)
376 free(*(void **) ptr
);
379 static void psi_blacklist_add_decl(const char *pattern
, size_t len
)
381 char *tmp
= strndup(pattern
, len
);
382 struct psi_plist
**decls
= &PSI_G(blacklist
).decls
;
384 *decls
= psi_plist_add(*decls
, &tmp
);
387 static void psi_blacklist_add_var(const char *pattern
, size_t len
)
389 char *tmp
= strndup(pattern
, len
);
390 struct psi_plist
**vars
= &PSI_G(blacklist
).vars
;
392 *vars
= psi_plist_add(*vars
, &tmp
);
395 static PHP_GINIT_FUNCTION(psi
)
398 struct psi_plist
**bl_decls
= &psi_globals
->blacklist
.decls
;
399 struct psi_plist
**bl_vars
= &psi_globals
->blacklist
.vars
;
401 *bl_decls
= psi_plist_init(ptr_free
);
402 *bl_vars
= psi_plist_init(ptr_free
);
404 #define BL_ADD(D, d) \
406 *D = psi_plist_add(*D, &tmp)
407 #define BL_DECL_ADD(d) BL_ADD(bl_decls, d)
408 #define BL_VAR_ADD(d) BL_ADD(bl_vars, d)
410 BL_DECL_ADD("dlsym");
411 BL_DECL_ADD("alloca");
412 BL_DECL_ADD("atexit");
413 BL_DECL_ADD("at_quick_exit");
416 BL_DECL_ADD("_IO_cookie_init");
417 BL_DECL_ADD("bindresvport6");
420 BL_DECL_ADD("*v*printf");
421 BL_DECL_ADD("*v*scanf");
422 BL_DECL_ADD("vsyslog");
424 /* LFS/LFO for 32bit */
425 BL_DECL_ADD("*stat*64");
426 BL_DECL_ADD("*glob*64");
428 BL_DECL_ADD("getumask");
430 /* using hidden structs */
431 BL_VAR_ADD("_IO_2_*");
434 static PHP_GSHUTDOWN_FUNCTION(psi
)
436 psi_plist_free(psi_globals
->blacklist
.decls
);
439 static const zend_function_entry psi_functions
[] = {
440 PHP_FE(psi_dump
, ai_psi_dump
)
441 PHP_FE(psi_validate
, ai_psi_validate
)
442 PHP_FE(psi_validate_string
, ai_psi_validate_string
)
446 static const zend_module_dep psi_deps
[] = {
447 ZEND_MOD_REQUIRED("standard")
451 zend_module_entry psi_module_entry
= {
452 STANDARD_MODULE_HEADER_EX
,
459 #if defined(COMPILE_DL_PSI) && defined(ZTS)
460 PHP_RINIT(psi
), /* Replace with NULL if there's nothing to do at request start */
467 ZEND_MODULE_GLOBALS(psi
),
470 NULL
, /* post-deactivate */
471 STANDARD_MODULE_PROPERTIES_EX
474 #ifdef COMPILE_DL_PSI
476 ZEND_TSRMLS_CACHE_DEFINE();
486 * vim600: noet sw=4 ts=4 fdm=marker
487 * vim<600: noet sw=4 ts=4