embedaddon/php/.gdbinit - diff

Return to .gdbinit CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php

Diff for /embedaddon/php/.gdbinit between versions 1.1.1.2 and 1.1.1.3

version 1.1.1.2, 2012/05/29 12:34:34	version 1.1.1.3, 2013/07/22 01:31:35
Line 1	Line 1
	define set_ts
	set $tsrm_ls = $arg0
	end

	document set_ts
	set the ts resource, it is impossible for gdb to
	call ts_resource_ex while no process is running,
	but we could get the resource from the argument
	of frame info.
	end

define ____executor_globals	define ____executor_globals
if basic_functions_module.zts	if basic_functions_module.zts
set $tsrm_ls = ts_resource_ex(0, 0)	if !$tsrm_ls
	set $tsrm_ls = ts_resource_ex(0, 0)
	end
set $eg = ((zend_executor_globals) (((void ***) $tsrm_ls))[executor_globals_id-1])	set $eg = ((zend_executor_globals) (((void ***) $tsrm_ls))[executor_globals_id-1])
set $cg = ((zend_compiler_globals) (((void ***) $tsrm_ls))[compiler_globals_id-1])	set $cg = ((zend_compiler_globals) (((void ***) $tsrm_ls))[compiler_globals_id-1])
else	else
Line 38 define dump_bt	Line 51 define dump_bt
set $t = $arg0	set $t = $arg0
while $t	while $t
printf "[%p] ", $t	printf "[%p] ", $t
if $t->function_state.function->common.function_name	set $fst = $t->function_state
if $t->function_state.arguments	if $fst.function->common.function_name
set $count = (int)*($t->function_state.arguments)	if $fst.arguments
printf "%s(", $t->function_state.function->common.function_name	set $count = (int)*($fst.arguments)

	if $t->object
	if $fst.function.common.scope
	printf "%s->", $fst.function.common.scope->name
	else
	if !$eg
	____executor_globals
	end

	set $known_class = 0
	if $eg
	set $handle = $t->object.value.obj.handle
	set $handlers = $t->object.value.obj.handlers
	set $zobj = (zend_object *)$eg.objects_store.object_buckets[$handle].bucket.obj.object

	if $handlers->get_class_entry == &zend_std_object_get_class
	set $known_class = 1

	if $handlers.get_class_name
	if $handlers.get_class_name != &zend_std_object_get_class_name
	set $known_class = 0
	end
	end

	if $known_class
	printf "%s->", $zobj->ce.name
	end
	end
	end

	if !$known_class
	printf "(Unknown)->"
	end
	end
	else
	if $fst.function.common.scope
	printf "%s::", $fst.function.common.scope->name
	end
	end

	printf "%s(", $fst.function->common.function_name
while $count > 0	while $count > 0
set $zvalue = (zval *)($t->function_state.arguments - $count)	set $zvalue = (zval *)($fst.arguments - $count)
set $type = $zvalue->type	set $type = $zvalue->type
if $type == 0	if $type == 0
printf "NULL"	printf "NULL"
Line 73 define dump_bt	Line 127 define dump_bt
if $type == 7	if $type == 7
printf "resource(#%d)", $zvalue->value.lval	printf "resource(#%d)", $zvalue->value.lval
end	end
if $type == 8	if $type == 8
printf "constant"	printf "constant"
end	end
if $type == 9	if $type == 9
Line 89 define dump_bt	Line 143 define dump_bt
end	end
printf ") "	printf ") "
else	else
printf "%s() ", $t->function_state.function->common.function_name	printf "%s() ", $fst.function->common.function_name
end	end
else	else
printf "??? "	printf "??? "
Line 600 define zmemcheck	Line 654 define zmemcheck
end	end
end	end
if $not_found	if $not_found
printf "no such block that begins at %p.\n", $aptr	printf "no such block that begins at %p.\n", $aptr
end	end
if $arg0 == 0	if $arg0 == 0
printf "-------------------------------------------------------------------------------\n"	printf "-------------------------------------------------------------------------------\n"

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.1.1.2
changed lines
	Added in v.1.1.1.3