cvs: php4(PHP_4_3) / .gdbinit
| From: | Moriyoshi Koizumi | Date: | Sun, 06 Apr 2003 18:12:36 +0000 |
| Subject: | cvs: php4(PHP_4_3) / .gdbinit | ||
| Groups: | php.cvs | ||
| Request: | Send a blank email to php-cvs+get-20141@lists.php.net to get a copy of this message | ||
moriyoshi Sun Apr 6 14:12:36 2003 EDT
Modified files: (Branch: PHP_4_3)
/php4 .gdbinit
Log:
MFH(r-1.4): improved readability of zmemcheck output
Index: php4/.gdbinit
diff -u php4/.gdbinit:1.3.2.1 php4/.gdbinit:1.3.2.2
--- php4/.gdbinit:1.3.2.1 Sun Apr 6 13:54:31 2003
+++ php4/.gdbinit Sun Apr 6 14:12:36 2003
@@ -193,7 +193,8 @@
end
document printzn
- print type and content of znode. usage: printzn &opline->op1
+ print type and content of znode.
+ usage: printzn &opline->op1
end
define printzops
@@ -217,7 +218,7 @@
else
set $not_found = 0
end
- printf " block file:line (orig) status\n"
+ printf " block status file:line\n"
printf
"-------------------------------------------------------------------------------\n"
while $p
set $aptr = $p + sizeof(struct _zend_mem_header) + sizeof(align_test)
@@ -231,10 +232,23 @@
if $p->magic == 0xfb8277dc
set $stat = "CACHED"
end
-
- printf " 0x%08x %-52s:%5d %-06s\n", $aptr, $p->filename, $p->lineno, $stat
+ set $filename = strrchr($p->filename, '/')
+ if !$filename
+ set $filename = $p->filename
+ else
+ set $filename = $filename + 1
+ end
+ printf " 0x%08x %-06s %s:%d", $aptr, $stat, $filename, $p->lineno
if $p->orig_filename
- printf " <= %-52s:%5d\n", $p->orig_filename, $p->orig_lineno
+ set $orig_filename = strrchr($p->orig_filename, '/')
+ if !$orig_filename
+ set $orig_filename = $p->orig_filename
+ else
+ set $orig_filename = $orig_filename + 1
+ end
+ printf " <= %s:%d\n", $orig_filename, $p->orig_lineno
+ else
+ printf "\n"
end
if $arg0 != 0
set $p = 0
@@ -252,6 +266,8 @@
end
document zmemcheck
- show status of a memory block. usage: zmemcheck [ptr]. if ptr = 0 all blocks will be listed.
+ show status of a memory block.
+ usage: zmemcheck [ptr].
+ if ptr is 0, all blocks will be listed.
end