Gecko [ www.foryou-vip.com ]

Name	Size	Permission	Date
.libs	[ DIR ]	drwxr-xr-x	2024-03-12 14:36
tests	[ DIR ]	drwxrwxr-x	2022-10-31 11:36
.gdbinit	250 B	-rw-rw-r--	2022-10-31 11:36
.phpdbginit	2.53 KB	-rw-rw-r--	2022-10-31 11:36
CREDITS	45 B	-rw-rw-r--	2022-10-31 11:36
Makefile.frag	1.52 KB	-rw-rw-r--	2022-10-31 11:36
README.md	2.27 KB	-rw-rw-r--	2022-10-31 11:36
config.m4	3.26 KB	-rw-rw-r--	2022-10-31 11:36
config.w32	1.32 KB	-rw-rw-r--	2022-10-31 11:36
create-test.php	4.41 KB	-rwxrwxr-x	2022-10-31 11:36
phpdbg	44.03 MB	-rwxr-xr-x	2024-03-12 14:36
phpdbg.1	2.75 KB	-rw-r--r--	2024-03-12 14:19
phpdbg.1.in	2.8 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg.c	61.2 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg.h	13.01 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg.init.d	2.78 KB	-rwxrwxr-x	2022-10-31 11:36
phpdbg.lo	321 B	-rw-r--r--	2024-03-12 14:36
phpdbg.o	334.69 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_bp.c	57.47 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_bp.h	6.12 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_bp.lo	330 B	-rw-r--r--	2024-03-12 14:36
phpdbg_bp.o	272.08 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_break.c	2.14 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_break.h	1.57 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_break.lo	339 B	-rw-r--r--	2024-03-12 14:36
phpdbg_break.o	87.73 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_btree.c	7.38 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_btree.h	2.97 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_btree.lo	339 B	-rw-r--r--	2024-03-12 14:36
phpdbg_btree.o	90.02 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_cmd.c	20.43 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_cmd.h	6.13 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_cmd.lo	333 B	-rw-r--r--	2024-03-12 14:36
phpdbg_cmd.o	152.28 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_eol.c	4.25 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_eol.h	1.55 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_eol.lo	333 B	-rw-r--r--	2024-03-12 14:36
phpdbg_eol.o	97.85 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_frame.c	10.13 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_frame.h	1.57 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_frame.lo	339 B	-rw-r--r--	2024-03-12 14:36
phpdbg_frame.o	150.81 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_help.c	39.09 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_help.h	2 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_help.lo	336 B	-rw-r--r--	2024-03-12 14:36
phpdbg_help.o	133.85 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_info.c	16.92 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_info.h	1.68 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_info.lo	336 B	-rw-r--r--	2024-03-12 14:36
phpdbg_info.o	152.36 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_io.c	7.9 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_io.h	1.92 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_io.lo	330 B	-rw-r--r--	2024-03-12 14:36
phpdbg_io.o	109.7 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_lexer.c	44.53 KB	-rw-r--r--	2022-10-31 11:36
phpdbg_lexer.h	1.71 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_lexer.l	3.81 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_lexer.lo	339 B	-rw-r--r--	2024-03-12 14:36
phpdbg_lexer.o	130.77 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_list.c	11.73 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_list.h	2.02 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_list.lo	336 B	-rw-r--r--	2024-03-12 14:36
phpdbg_list.o	124.72 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_opcode.c	6.47 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_opcode.h	1.98 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_opcode.lo	342 B	-rw-r--r--	2024-03-12 14:36
phpdbg_opcode.o	122.3 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_out.c	29.95 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_out.h	4.88 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_out.lo	333 B	-rw-r--r--	2024-03-12 14:36
phpdbg_out.o	190.24 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_parser.c	49.46 KB	-rw-r--r--	2022-10-31 11:36
phpdbg_parser.h	2.56 KB	-rw-r--r--	2022-10-31 11:36
phpdbg_parser.lo	342 B	-rw-r--r--	2024-03-12 14:36
phpdbg_parser.o	116.58 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_parser.output	14.23 KB	-rw-r--r--	2022-10-31 11:36
phpdbg_parser.y	4.35 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_print.c	14.06 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_print.h	1.69 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_print.lo	339 B	-rw-r--r--	2024-03-12 14:36
phpdbg_print.o	157.36 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_prompt.c	55.94 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_prompt.h	2.59 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_prompt.lo	342 B	-rw-r--r--	2024-03-12 14:36
phpdbg_prompt.o	299.74 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_rinit_hook.c	3.54 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_rinit_hook.h	1.82 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_set.c	9.59 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_set.h	1.71 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_set.lo	333 B	-rw-r--r--	2024-03-12 14:36
phpdbg_set.o	113.42 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_sigio_win32.c	2.9 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_sigio_win32.h	1.41 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_sigsafe.c	1.56 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_sigsafe.h	457 B	-rw-rw-r--	2022-10-31 11:36
phpdbg_sigsafe.lo	345 B	-rw-r--r--	2024-03-12 14:36
phpdbg_sigsafe.o	90.7 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_utils.c	23.21 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_utils.h	5.19 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_utils.lo	339 B	-rw-r--r--	2024-03-12 14:36
phpdbg_utils.o	173.69 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_wait.c	13.37 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_wait.h	1.3 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_wait.lo	336 B	-rw-r--r--	2024-03-12 14:36
phpdbg_wait.o	131.2 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_watch.c	54.1 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_watch.h	4.74 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_watch.lo	339 B	-rw-r--r--	2024-03-12 14:36
phpdbg_watch.o	226.91 KB	-rw-r--r--	2024-03-12 14:36
phpdbg_webdata_transfer.c	5.21 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_webdata_transfer.h	1.33 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_win.c	1.85 KB	-rw-rw-r--	2022-10-31 11:36
phpdbg_win.h	1.58 KB	-rw-rw-r--	2022-10-31 11:36
test.php	1.18 KB	-rw-rw-r--	2022-10-31 11:36
web-bootstrap.php	2.06 KB	-rw-rw-r--	2022-10-31 11:36
xml.md	20.03 KB	-rw-rw-r--	2022-10-31 11:36

Rename

/*
   +----------------------------------------------------------------------+
   | PHP Version 7                                                        |
   +----------------------------------------------------------------------+
   | Copyright (c) The PHP Group                                          |
   +----------------------------------------------------------------------+
   | This source file is subject to version 3.01 of the PHP license,      |
   | that is bundled with this package in the file LICENSE, and is        |
   | available through the world-wide-web at the following url:           |
   | http://www.php.net/license/3_01.txt                                  |
   | If you did not receive a copy of the PHP license and are unable to   |
   | obtain it through the world-wide-web, please send a note to          |
   | license@php.net so we can mail you a copy immediately.               |
   +----------------------------------------------------------------------+
   | Authors: Felipe Pena <felipe@php.net>                                |
   | Authors: Joe Watkins <joe.watkins@live.co.uk>                        |
   | Authors: Bob Weinand <bwoebi@php.net>                                |
   +----------------------------------------------------------------------+
*/

#include "zend.h"
#include "phpdbg.h"
#include "phpdbg_utils.h"
#include "phpdbg_frame.h"
#include "phpdbg_list.h"
#include "zend_smart_str.h"

ZEND_EXTERN_MODULE_GLOBALS(phpdbg)

static inline void phpdbg_append_individual_arg(smart_str *s, uint32_t i, zend_function *func, zval *arg) {
	const zend_arg_info *arginfo = func->common.arg_info;
	char *arg_name = NULL;

if (i) {
		smart_str_appends(s, ", ");
	}
	if (i < func->common.num_args) {
		if (arginfo) {
			if (func->type == ZEND_INTERNAL_FUNCTION) {
				arg_name = (char *) ((zend_internal_arg_info *) &arginfo[i])->name;
			} else {
				arg_name = ZSTR_VAL(arginfo[i].name);
			}
		}
		smart_str_appends(s, arg_name ? arg_name : "?");
		smart_str_appendc(s, '=');
	}
	{
		char *arg_print = phpdbg_short_zval_print(arg, 40);
		smart_str_appends(s, arg_print);
		efree(arg_print);
	}
}

zend_string *phpdbg_compile_stackframe(zend_execute_data *ex) {
	smart_str s = {0};
	zend_op_array *op_array = &ex->func->op_array;
	uint32_t i = 0, first_extra_arg = op_array->num_args, num_args = ZEND_CALL_NUM_ARGS(ex);
	zval *p = ZEND_CALL_ARG(ex, 1);

if (op_array->scope) {
		smart_str_append(&s, op_array->scope->name);
		smart_str_appends(&s, "::");
	}
	smart_str_append(&s, op_array->function_name);
	smart_str_appendc(&s, '(');
	if (ZEND_CALL_NUM_ARGS(ex) > first_extra_arg) {
		while (i < first_extra_arg) {
			phpdbg_append_individual_arg(&s, i, ex->func, p);
			p++;
			i++;
		}
		p = ZEND_CALL_VAR_NUM(ex, op_array->last_var + op_array->T);
	}
	while (i < num_args) {
		phpdbg_append_individual_arg(&s, i, ex->func, p);
		p++;
		i++;
	}
	smart_str_appendc(&s, ')');

if (ex->func->type == ZEND_USER_FUNCTION) {
		smart_str_appends(&s, " at ");
		smart_str_append(&s, op_array->filename);
		smart_str_appendc(&s, ':');
		smart_str_append_unsigned(&s, ex->opline->lineno);
	} else {
		smart_str_appends(&s, " [internal function]");
	}

return s.s;
}

void phpdbg_print_cur_frame_info() {
	const char *file_chr = zend_get_executed_filename();
	zend_string *file = zend_string_init(file_chr, strlen(file_chr), 0);

phpdbg_list_file(file, 3, zend_get_executed_lineno() - 1, zend_get_executed_lineno());
	efree(file);
}

void phpdbg_restore_frame(void) /* {{{ */
{
	if (PHPDBG_FRAME(num) == 0) {
		return;
	}

if (PHPDBG_FRAME(generator)) {
		if (PHPDBG_FRAME(generator)->execute_data->call) {
			PHPDBG_FRAME(generator)->frozen_call_stack = zend_generator_freeze_call_stack(PHPDBG_FRAME(generator)->execute_data);
		}
		PHPDBG_FRAME(generator) = NULL;
	}

PHPDBG_FRAME(num) = 0;

/* move things back */
	EG(current_execute_data) = PHPDBG_FRAME(execute_data);
} /* }}} */

void phpdbg_switch_frame(int frame) /* {{{ */
{
	zend_execute_data *execute_data = PHPDBG_FRAME(num) ? PHPDBG_FRAME(execute_data) : EG(current_execute_data);
	int i = 0;

if (PHPDBG_FRAME(num) == frame) {
		phpdbg_notice("frame", "id=\"%d\"", "Already in frame #%d", frame);
		return;
	}

phpdbg_try_access {
		while (execute_data) {
			if (i++ == frame) {
				break;
			}

do {
				execute_data = execute_data->prev_execute_data;
			} while (execute_data && execute_data->opline == NULL);
		}
	} phpdbg_catch_access {
		phpdbg_error("signalsegv", "", "Couldn't switch frames, invalid data source");
		return;
	} phpdbg_end_try_access();

if (execute_data == NULL) {
		phpdbg_error("frame", "type=\"maxnum\" id=\"%d\"", "No frame #%d", frame);
		return;
	}

phpdbg_restore_frame();

if (frame > 0) {
		PHPDBG_FRAME(num) = frame;

/* backup things and jump back */
		PHPDBG_FRAME(execute_data) = EG(current_execute_data);
		EG(current_execute_data) = execute_data;
	}

phpdbg_try_access {
		zend_string *s = phpdbg_compile_stackframe(EG(current_execute_data));
		phpdbg_notice("frame", "id=\"%d\" frameinfo=\"%.*s\"", "Switched to frame #%d: %.*s", frame, (int) ZSTR_LEN(s), ZSTR_VAL(s));
		zend_string_release(s);
	} phpdbg_catch_access {
		phpdbg_notice("frame", "id=\"%d\"", "Switched to frame #%d", frame);
	} phpdbg_end_try_access();

phpdbg_print_cur_frame_info();
} /* }}} */

static void phpdbg_dump_prototype(zval *tmp) /* {{{ */
{
	zval *funcname, *class, class_zv, *args, *argstmp;

funcname = zend_hash_str_find(Z_ARRVAL_P(tmp), ZEND_STRL("function"));

if ((class = zend_hash_str_find(Z_ARRVAL_P(tmp), ZEND_STRL("object")))) {
		ZVAL_NEW_STR(&class_zv, Z_OBJCE_P(class)->name);
		class = &class_zv;
	} else {
		class = zend_hash_str_find(Z_ARRVAL_P(tmp), ZEND_STRL("class"));
	}

if (class) {
		zval *type = zend_hash_str_find(Z_ARRVAL_P(tmp), ZEND_STRL("type"));

phpdbg_xml(" symbol=\"%s%s%s\"", Z_STRVAL_P(class), Z_STRVAL_P(type), Z_STRVAL_P(funcname));
		phpdbg_out("%s%s%s(", Z_STRVAL_P(class), Z_STRVAL_P(type), Z_STRVAL_P(funcname));
	} else {
		phpdbg_xml(" symbol=\"%s\"", Z_STRVAL_P(funcname));
		phpdbg_out("%s(", Z_STRVAL_P(funcname));
	}

args = zend_hash_str_find(Z_ARRVAL_P(tmp), ZEND_STRL("args"));
	if (args) {
		phpdbg_xml(">");
	} else {
		phpdbg_xml(" />");
	}

if (args) {
		const zend_function *func = NULL;
		const zend_arg_info *arginfo = NULL;
		zend_bool is_variadic = 0;
		int j = 0, m;

phpdbg_try_access {
			/* assuming no autoloader call is necessary, class should have been loaded if it's in backtrace ... */
			if ((func = phpdbg_get_function(Z_STRVAL_P(funcname), class ? Z_STRVAL_P(class) : NULL))) {
				arginfo = func->common.arg_info;
			}
		} phpdbg_end_try_access();

m = func ? func->common.num_args : 0;

ZEND_HASH_FOREACH_VAL(Z_ARRVAL_P(args), argstmp) {
			if (j) {
				phpdbg_out(", ");
			}
			phpdbg_xml("<arg %r");
			if (m && j < m) {
				char *arg_name = NULL;

if (arginfo) {
					if (func->type == ZEND_INTERNAL_FUNCTION) {
						arg_name = (char *)((zend_internal_arg_info *)&arginfo[j])->name;
					} else {
						arg_name = ZSTR_VAL(arginfo[j].name);
					}
				}

if (!is_variadic) {
					is_variadic = arginfo ? arginfo[j].is_variadic : 0;
				}

phpdbg_xml(" variadic=\"%s\" name=\"%s\">", is_variadic ? "variadic" : "", arg_name ? arg_name : "");
				phpdbg_out("%s=%s", arg_name ? arg_name : "?", is_variadic ? "[": "");

} else {
				phpdbg_xml(">");
			}
			++j;

{
				char *arg_print = phpdbg_short_zval_print(argstmp, 40);
				php_printf("%s", arg_print);
				efree(arg_print);
			}

phpdbg_xml("</arg>");
		} ZEND_HASH_FOREACH_END();

if (is_variadic) {
			phpdbg_out("]");
		}
		phpdbg_xml("</frame>");
	}
	phpdbg_out(")");
}

void phpdbg_dump_backtrace(size_t num) /* {{{ */
{
	HashPosition position;
	zval zbacktrace;
	zval *tmp;
	zval startline, startfile;
	const char *startfilename;
	zval *file = &startfile, *line = &startline;
	int i = 0, limit = num;

PHPDBG_OUTPUT_BACKUP();

if (limit < 0) {
		phpdbg_error("backtrace", "type=\"minnum\"", "Invalid backtrace size %d", limit);

PHPDBG_OUTPUT_BACKUP_RESTORE();
		return;
	}

phpdbg_try_access {
		zend_fetch_debug_backtrace(&zbacktrace, 0, 0, limit);
	} phpdbg_catch_access {
		phpdbg_error("signalsegv", "", "Couldn't fetch backtrace, invalid data source");
		return;
	} phpdbg_end_try_access();

phpdbg_xml("<backtrace %r>");

Z_LVAL(startline) = zend_get_executed_lineno();
	startfilename = zend_get_executed_filename();
	Z_STR(startfile) = zend_string_init(startfilename, strlen(startfilename), 0);

zend_hash_internal_pointer_reset_ex(Z_ARRVAL(zbacktrace), &position);
	tmp = zend_hash_get_current_data_ex(Z_ARRVAL(zbacktrace), &position);
	while ((tmp = zend_hash_get_current_data_ex(Z_ARRVAL(zbacktrace), &position))) {
		if (file) { /* userland */
			phpdbg_out("frame #%d: ", i);
			phpdbg_xml("<frame %r id=\"%d\" file=\"%s\" line=\"" ZEND_LONG_FMT "\"", i, Z_STRVAL_P(file), Z_LVAL_P(line));
			phpdbg_dump_prototype(tmp);
			phpdbg_out(" at %s:%ld\n", Z_STRVAL_P(file), Z_LVAL_P(line));
			i++;
		} else {
			phpdbg_out(" => ");
			phpdbg_xml("<frame %r id=\"%d\" internal=\"internal\"", i);
			phpdbg_dump_prototype(tmp);
			phpdbg_out(" (internal function)\n");
		}

file = zend_hash_str_find(Z_ARRVAL_P(tmp), ZEND_STRL("file"));
		line = zend_hash_str_find(Z_ARRVAL_P(tmp), ZEND_STRL("line"));
		zend_hash_move_forward_ex(Z_ARRVAL(zbacktrace), &position);
	}

phpdbg_writeln("frame", "id=\"%d\" symbol=\"{main}\" file=\"%s\" line=\"%d\"", "frame #%d: {main} at %s:%ld", i, Z_STRVAL_P(file), Z_LVAL_P(line));
	phpdbg_xml("</backtrace>");

zval_ptr_dtor_nogc(&zbacktrace);
	zend_string_release(Z_STR(startfile));

PHPDBG_OUTPUT_BACKUP_RESTORE();
} /* }}} */

void phpdbg_open_generator_frame(zend_generator *gen) {
	zend_string *s;

if (EG(current_execute_data) == gen->execute_data) {
		return;
	}

phpdbg_restore_frame();

PHPDBG_FRAME(num) = -1;
	PHPDBG_FRAME(generator) = gen;

EG(current_execute_data) = gen->execute_data;
	if (gen->frozen_call_stack) {
		zend_generator_restore_call_stack(gen);
	}
	gen->execute_data->prev_execute_data = NULL;

s = phpdbg_compile_stackframe(EG(current_execute_data));
	phpdbg_notice("frame", "handle=\"%d\" frameinfo=\"%.*s\"", "Switched to generator with handle #%d: %.*s", gen->std.handle, (int) ZSTR_LEN(s), ZSTR_VAL(s));
	zend_string_release(s);
	phpdbg_print_cur_frame_info();
}