Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

214 lines (177 sloc) 6.314 kb
/*
+----------------------------------------------------------------------+
| Xdebug |
+----------------------------------------------------------------------+
| Copyright (c) 2002, 2003, 2004, 2005, 2006, 2007 Derick Rethans |
+----------------------------------------------------------------------+
| This source file is subject to version 1.0 of the Xdebug license, |
| that is bundled with this package in the file LICENSE, and is |
| available at through the world-wide-web at |
| http://xdebug.derickrethans.nl/license.php |
| If you did not receive a copy of the Xdebug license and are unable |
| to obtain it through the world-wide-web, please send a note to |
| xdebug@derickrethans.nl so we can mail you a copy immediately. |
+----------------------------------------------------------------------+
| Authors: Harald Radi <harald.radi@nme.at> |
+----------------------------------------------------------------------+
*/
#include "php_xdebug.h"
#include "xdebug_private.h"
#include "xdebug_var.h"
#include "xdebug_superglobals.h"
#include "SAPI.h"
extern ZEND_DECLARE_MODULE_GLOBALS(xdebug);
void xdebug_superglobals_dump_dtor(void *user, void *ptr)
{
free(ptr);
}
static void dump_hash_elem(zval *z, char *name, long index, char *elem, int html, xdebug_str *str TSRMLS_DC)
{
int len;
if (html) {
if (elem) {
xdebug_str_add(str, xdebug_sprintf("<tr><td colspan='2' align='right' bgcolor='#eeeeec' valign='top'><pre>$%s['%s']&nbsp;=</pre></td>", name, elem), 1);
} else {
xdebug_str_add(str, xdebug_sprintf("<tr><td colspan='2' align='right' bgcolor='#eeeeec' valign='top'><pre>$%s[%ld]&nbsp;=</pre></td>", name, index), 1);
}
}
if (z != NULL) {
char *val;
if (html) {
val = xdebug_get_zval_value_fancy(NULL, z, &len, 0, NULL TSRMLS_CC);
#if HAVE_PHP_MEMORY_USAGE
xdebug_str_add(str, xdebug_sprintf("<td colspan='3' bgcolor='#eeeeec'>"), 1);
#else
xdebug_str_add(str, xdebug_sprintf("<td colspan='2' bgcolor='#eeeeec'>"), 1);
#endif
xdebug_str_addl(str, val, len, 0);
xdebug_str_add(str, "</td>", 0);
} else {
val = xdebug_get_zval_value(z, 0, NULL);
xdebug_str_add(str, xdebug_sprintf("\n $%s['%s'] = %s", name, elem, val), 1);
}
xdfree(val);
} else {
/* not found */
if (html) {
#if HAVE_PHP_MEMORY_USAGE
xdebug_str_add(str, "<td colspan='3' bgcolor='#eeeeec'><i>undefined</i></td>", 0);
#else
xdebug_str_add(str, "<td colspan='2' bgcolor='#eeeeec'><i>undefined</i></td>", 0);
#endif
} else {
xdebug_str_add(str, xdebug_sprintf("\n $%s['%s'] is undefined", name, elem), 1);
}
}
if (html) {
xdebug_str_add(str, "</tr>\n", 0);
}
}
static int dump_hash_elem_va(void *pDest, int num_args, va_list args, zend_hash_key *hash_key)
{
int html;
char *name;
xdebug_str *str;
#ifdef ZTS
void ***tsrm_ls;
#endif
name = va_arg(args, char *);
html = va_arg(args, int);
str = va_arg(args, xdebug_str *);
#ifdef ZTS
tsrm_ls = va_arg(args, void ***);
#endif
if (hash_key->nKeyLength == 0) {
dump_hash_elem(*((zval **) pDest), name, hash_key->h, NULL, html, str TSRMLS_CC);
} else {
dump_hash_elem(*((zval **) pDest), name, 0, hash_key->arKey, html, str TSRMLS_CC);
}
return SUCCESS;
}
static void dump_hash(xdebug_llist *l, char *name, int name_len, int html, xdebug_str *str TSRMLS_DC)
{
zval **z;
HashTable *ht;
xdebug_llist_element *elem;
if (!XDEBUG_LLIST_COUNT(l)) {
return;
}
if (zend_hash_find(&EG(symbol_table), name, name_len, (void **) &z) != SUCCESS) {
ht = NULL;
} else {
ht = Z_ARRVAL_PP(z);
}
if (html) {
#if HAVE_PHP_MEMORY_USAGE
xdebug_str_add(str, xdebug_sprintf("<tr><th colspan='5' align='left' bgcolor='#e9b96e'>Dump <i>$%s</i></th></tr>\n", name), 1);
#else
xdebug_str_add(str, xdebug_sprintf("<tr><th colspan='4' align='left' bgcolor='#e9b96e'>Dump <i>$%s</i></th></tr>\n", name), 1);
#endif
} else {
xdebug_str_add(str, xdebug_sprintf("\nDump $%s", name), 1);
}
elem = XDEBUG_LLIST_HEAD(l);
while (elem != NULL) {
if (ht && (*((char *) (elem->ptr)) == '*')) {
#ifdef ZTS
#define X_DUMP_ARGS 4
#else
#define X_DUMP_ARGS 3
#endif
zend_hash_apply_with_arguments(ht, dump_hash_elem_va, X_DUMP_ARGS, name, html, str TSRMLS_CC);
} else if (ht && zend_hash_find(ht, elem->ptr, strlen(elem->ptr) + 1, (void **) &z) == SUCCESS) {
dump_hash_elem(*z, name, 0, elem->ptr, html, str TSRMLS_CC);
} else if(XG(dump_undefined)) {
dump_hash_elem(NULL, name, 0, elem->ptr, html, str TSRMLS_CC);
}
elem = XDEBUG_LLIST_NEXT(elem);
}
}
char* xdebug_get_printable_superglobals(int html TSRMLS_DC)
{
xdebug_str str = {0, 0, NULL};
dump_hash(&XG(server), "_SERVER", 8, html, &str TSRMLS_CC);
dump_hash(&XG(get), "_GET", 5, html, &str TSRMLS_CC);
dump_hash(&XG(post), "_POST", 6, html, &str TSRMLS_CC);
dump_hash(&XG(cookie), "_COOKIE", 8, html, &str TSRMLS_CC);
dump_hash(&XG(files), "_FILES", 7, html, &str TSRMLS_CC);
dump_hash(&XG(env), "_ENV", 5, html, &str TSRMLS_CC);
dump_hash(&XG(session), "_SESSION", 9, html, &str TSRMLS_CC);
dump_hash(&XG(request), "_REQUEST", 9, html, &str TSRMLS_CC);
return str.d;
}
void xdebug_superglobals_dump_tok(xdebug_llist *l, char *str)
{
char *tok, *sep = ",";
tok = strtok(str, sep);
while (tok != NULL) {
char *p = tok + strlen(tok) - 1;
while ((*tok == ' ') || (*tok == '\t')) {
tok++;
}
while ((p > tok) && ((*p == ' ') || (*p == '\t'))) {
p--;
}
*(p+1) = 0;
/* we need to strdup each element so that we can safely free it */
xdebug_llist_insert_next(l, NULL, strdup(tok));
tok = strtok(NULL, sep);
}
}
PHP_FUNCTION(xdebug_dump_superglobals)
{
int html = PG(html_errors);
char *superglobal_info = NULL;
if (html) {
php_printf("<table dir='ltr' border='1' cellspacing='0'>\n");
}
superglobal_info = xdebug_get_printable_superglobals(html TSRMLS_CC);
if (superglobal_info) {
php_printf("%s", xdebug_get_printable_superglobals(html TSRMLS_CC));
} else {
php_printf("<tr><td><i>No information about superglobals is available or configured.</i></td></tr>\n");
}
if (html) {
php_printf("</table>\n");
}
}
Jump to Line
Something went wrong with that request. Please try again.