yaffs.net Git - yaffs-website/blob - vendor/symfony/debug/Resources/ext/symfony_debug.c

   1 /*
   2  * This file is part of the Symfony package.
   3  *
   4  * (c) Fabien Potencier <fabien@symfony.com>
   5  *
   6  * For the full copyright and license information, please view the LICENSE
   7  * file that was distributed with this source code.
   8  */
   9
  10 #ifdef HAVE_CONFIG_H
  11 #include "config.h"
  12 #endif
  13
  14 #include "php.h"
  15 #ifdef ZTS
  16 #include "TSRM.h"
  17 #endif
  18 #include "php_ini.h"
  19 #include "ext/standard/info.h"
  20 #include "php_symfony_debug.h"
  21 #include "ext/standard/php_rand.h"
  22 #include "ext/standard/php_lcg.h"
  23 #include "ext/spl/php_spl.h"
  24 #include "Zend/zend_gc.h"
  25 #include "Zend/zend_builtin_functions.h"
  26 #include "Zend/zend_extensions.h" /* for ZEND_EXTENSION_API_NO */
  27 #include "ext/standard/php_array.h"
  28 #include "Zend/zend_interfaces.h"
  29 #include "SAPI.h"
  30
  31 #define IS_PHP_53 ZEND_EXTENSION_API_NO == 220090626
  32
  33 ZEND_DECLARE_MODULE_GLOBALS(symfony_debug)
  34
  35 ZEND_BEGIN_ARG_INFO_EX(symfony_zval_arginfo, 0, 0, 2)
  36         ZEND_ARG_INFO(0, key)
  37         ZEND_ARG_ARRAY_INFO(0, array, 0)
  38         ZEND_ARG_INFO(0, options)
  39 ZEND_END_ARG_INFO()
  40
  41 const zend_function_entry symfony_debug_functions[] = {
  42         PHP_FE(symfony_zval_info,       symfony_zval_arginfo)
  43         PHP_FE(symfony_debug_backtrace, NULL)
  44         PHP_FE_END
  45 };
  46
  47 PHP_FUNCTION(symfony_debug_backtrace)
  48 {
  49         if (zend_parse_parameters_none() == FAILURE) {
  50                 return;
  51         }
  52 #if IS_PHP_53
  53         zend_fetch_debug_backtrace(return_value, 1, 0 TSRMLS_CC);
  54 #else
  55         zend_fetch_debug_backtrace(return_value, 1, 0, 0 TSRMLS_CC);
  56 #endif
  57
  58         if (!SYMFONY_DEBUG_G(debug_bt)) {
  59                 return;
  60         }
  61
  62         php_array_merge(Z_ARRVAL_P(return_value), Z_ARRVAL_P(SYMFONY_DEBUG_G(debug_bt)), 0 TSRMLS_CC);
  63 }
  64
  65 PHP_FUNCTION(symfony_zval_info)
  66 {
  67         zval *key = NULL, *arg = NULL;
  68         zval **data = NULL;
  69         HashTable *array = NULL;
  70         long options = 0;
  71
  72         if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "zh|l", &key, &array, &options) == FAILURE) {
  73                 return;
  74         }
  75
  76         switch (Z_TYPE_P(key)) {
  77                 case IS_STRING:
  78                         if (zend_symtable_find(array, Z_STRVAL_P(key), Z_STRLEN_P(key) + 1, (void **)&data) == FAILURE) {
  79                                 return;
  80                         }
  81                 break;
  82                 case IS_LONG:
  83                         if (zend_hash_index_find(array, Z_LVAL_P(key), (void **)&data)) {
  84                                 return;
  85                         }
  86                 break;
  87         }
  88
  89         arg = *data;
  90
  91         array_init(return_value);
  92
  93         add_assoc_string(return_value, "type", (char *)_symfony_debug_zval_type(arg), 1);
  94         add_assoc_stringl(return_value, "zval_hash", _symfony_debug_memory_address_hash((void *)arg TSRMLS_CC), 16, 0);
  95         add_assoc_long(return_value, "zval_refcount", Z_REFCOUNT_P(arg));
  96         add_assoc_bool(return_value, "zval_isref", (zend_bool)Z_ISREF_P(arg));
  97
  98         if (Z_TYPE_P(arg) == IS_OBJECT) {
  99                 char hash[33] = {0};
 100
 101                 php_spl_object_hash(arg, (char *)hash TSRMLS_CC);
 102                 add_assoc_stringl(return_value, "object_class", (char *)Z_OBJCE_P(arg)->name, Z_OBJCE_P(arg)->name_length, 1);
 103                 add_assoc_long(return_value, "object_refcount", EG(objects_store).object_buckets[Z_OBJ_HANDLE_P(arg)].bucket.obj.refcount);
 104                 add_assoc_string(return_value, "object_hash", hash, 1);
 105                 add_assoc_long(return_value, "object_handle", Z_OBJ_HANDLE_P(arg));
 106         } else if (Z_TYPE_P(arg) == IS_ARRAY) {
 107                 add_assoc_long(return_value, "array_count", zend_hash_num_elements(Z_ARRVAL_P(arg)));
 108         } else if(Z_TYPE_P(arg) == IS_RESOURCE) {
 109                 add_assoc_long(return_value, "resource_handle", Z_LVAL_P(arg));
 110                 add_assoc_string(return_value, "resource_type", (char *)_symfony_debug_get_resource_type(Z_LVAL_P(arg) TSRMLS_CC), 1);
 111                 add_assoc_long(return_value, "resource_refcount", _symfony_debug_get_resource_refcount(Z_LVAL_P(arg) TSRMLS_CC));
 112         } else if (Z_TYPE_P(arg) == IS_STRING) {
 113                 add_assoc_long(return_value, "strlen", Z_STRLEN_P(arg));
 114         }
 115 }
 116
 117 void symfony_debug_error_cb(int type, const char *error_filename, const uint error_lineno, const char *format, va_list args)
 118 {
 119         TSRMLS_FETCH();
 120         zval *retval;
 121
 122         switch (type) {
 123                 case E_ERROR:
 124                 case E_PARSE:
 125                 case E_CORE_ERROR:
 126                 case E_CORE_WARNING:
 127                 case E_COMPILE_ERROR:
 128                 case E_COMPILE_WARNING:
 129                         ALLOC_INIT_ZVAL(retval);
 130 #if IS_PHP_53
 131                         zend_fetch_debug_backtrace(retval, 1, 0 TSRMLS_CC);
 132 #else
 133                         zend_fetch_debug_backtrace(retval, 1, 0, 0 TSRMLS_CC);
 134 #endif
 135                         SYMFONY_DEBUG_G(debug_bt) = retval;
 136         }
 137
 138         SYMFONY_DEBUG_G(old_error_cb)(type, error_filename, error_lineno, format, args);
 139 }
 140
 141 static const char* _symfony_debug_get_resource_type(long rsid TSRMLS_DC)
 142 {
 143         const char *res_type;
 144         res_type = zend_rsrc_list_get_rsrc_type(rsid TSRMLS_CC);
 145
 146         if (!res_type) {
 147                 return "Unknown";
 148         }
 149
 150         return res_type;
 151 }
 152
 153 static int _symfony_debug_get_resource_refcount(long rsid TSRMLS_DC)
 154 {
 155         zend_rsrc_list_entry *le;
 156
 157         if (zend_hash_index_find(&EG(regular_list), rsid, (void **) &le)==SUCCESS) {
 158                 return le->refcount;
 159         }
 160
 161         return 0;
 162 }
 163
 164 static char *_symfony_debug_memory_address_hash(void *address TSRMLS_DC)
 165 {
 166         char *result = NULL;
 167         intptr_t address_rand;
 168
 169         if (!SYMFONY_DEBUG_G(req_rand_init)) {
 170                 if (!BG(mt_rand_is_seeded)) {
 171                         php_mt_srand(GENERATE_SEED() TSRMLS_CC);
 172                 }
 173                 SYMFONY_DEBUG_G(req_rand_init) = (intptr_t)php_mt_rand(TSRMLS_C);
 174         }
 175
 176         address_rand = (intptr_t)address ^ SYMFONY_DEBUG_G(req_rand_init);
 177
 178         spprintf(&result, 17, "%016zx", address_rand);
 179
 180         return result;
 181 }
 182
 183 static const char *_symfony_debug_zval_type(zval *zv)
 184 {
 185         switch (Z_TYPE_P(zv)) {
 186                 case IS_NULL:
 187                         return "NULL";
 188                         break;
 189
 190                 case IS_BOOL:
 191                         return "boolean";
 192                         break;
 193
 194                 case IS_LONG:
 195                         return "integer";
 196                         break;
 197
 198                 case IS_DOUBLE:
 199                         return "double";
 200                         break;
 201
 202                 case IS_STRING:
 203                         return "string";
 204                         break;
 205
 206                 case IS_ARRAY:
 207                         return "array";
 208                         break;
 209
 210                 case IS_OBJECT:
 211                         return "object";
 212
 213                 case IS_RESOURCE:
 214                         return "resource";
 215
 216                 default:
 217                         return "unknown type";
 218         }
 219 }
 220
 221 zend_module_entry symfony_debug_module_entry = {
 222         STANDARD_MODULE_HEADER,
 223         "symfony_debug",
 224         symfony_debug_functions,
 225         PHP_MINIT(symfony_debug),
 226         PHP_MSHUTDOWN(symfony_debug),
 227         PHP_RINIT(symfony_debug),
 228         PHP_RSHUTDOWN(symfony_debug),
 229         PHP_MINFO(symfony_debug),
 230         PHP_SYMFONY_DEBUG_VERSION,
 231         PHP_MODULE_GLOBALS(symfony_debug),
 232         PHP_GINIT(symfony_debug),
 233         PHP_GSHUTDOWN(symfony_debug),
 234         NULL,
 235         STANDARD_MODULE_PROPERTIES_EX
 236 };
 237
 238 #ifdef COMPILE_DL_SYMFONY_DEBUG
 239 ZEND_GET_MODULE(symfony_debug)
 240 #endif
 241
 242 PHP_GINIT_FUNCTION(symfony_debug)
 243 {
 244         memset(symfony_debug_globals, 0 , sizeof(*symfony_debug_globals));
 245 }
 246
 247 PHP_GSHUTDOWN_FUNCTION(symfony_debug)
 248 {
 249
 250 }
 251
 252 PHP_MINIT_FUNCTION(symfony_debug)
 253 {
 254         SYMFONY_DEBUG_G(old_error_cb) = zend_error_cb;
 255         zend_error_cb                 = symfony_debug_error_cb;
 256
 257         return SUCCESS;
 258 }
 259
 260 PHP_MSHUTDOWN_FUNCTION(symfony_debug)
 261 {
 262         zend_error_cb = SYMFONY_DEBUG_G(old_error_cb);
 263
 264         return SUCCESS;
 265 }
 266
 267 PHP_RINIT_FUNCTION(symfony_debug)
 268 {
 269         return SUCCESS;
 270 }
 271
 272 PHP_RSHUTDOWN_FUNCTION(symfony_debug)
 273 {
 274         return SUCCESS;
 275 }
 276
 277 PHP_MINFO_FUNCTION(symfony_debug)
 278 {
 279         php_info_print_table_start();
 280         php_info_print_table_header(2, "Symfony Debug support", "enabled");
 281         php_info_print_table_header(2, "Symfony Debug version", PHP_SYMFONY_DEBUG_VERSION);
 282         php_info_print_table_end();
 283 }