Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Index: .gdbinit
- ===================================================================
- --- .gdbinit (revision 320474)
- +++ .gdbinit (working copy)
- @@ -39,7 +39,62 @@
- while $t
- printf "[0x%08x] ", $t
- if $t->function_state.function->common.function_name
- - printf "%s() ", $t->function_state.function->common.function_name
- + if $t->function_state.arguments
- + set $count = (int)*($t->function_state.arguments)
- + if $count > 0
- + printf "%s(", $t->function_state.function->common.function_name
- + while $count > 0
- + set $zvalue = *(zval **)($t->function_state.arguments - $count)
- + set $type = $zvalue->type
- + if $type == 0
- + printf "NULL"
- + end
- + if $type == 1
- + printf "%ld", $zvalue->value.lval
- + end
- + if $type == 2
- + printf "%lf", $zvalue->value.dval
- + end
- + if $type == 3
- + if $zvalue->value.lval
- + printf "true"
- + else
- + printf "false"
- + end
- + end
- + if $type == 4
- + printf "array(%d)[0x%08x]", $zvalue->value.ht->nNumOfElements, $zvalue
- + end
- + if $type == 5
- + printf "object[0x%08x]", $zvalue
- + end
- + if $type == 6
- + ____print_str $zvalue->value.str.val $zvalue->value.str.len
- + end
- + if $type == 7
- + printf "resource(#%d)", $zvalue->value.lval
- + end
- + if $type == 8
- + printf "constant"
- + end
- + if $type == 9
- + printf "const_array"
- + end
- + if $type > 9
- + printf "unknown type %d", $type
- + end
- + set $count = $count -1
- + if $count > 0
- + printf ", "
- + end
- + end
- + printf ") "
- + else
- + printf "%s(void) ", $t->function_state.function->common.function_name
- + end
- + else
- + printf "%s(void) ", $t->function_state.function->common.function_name
- + end
- else
- printf "??? "
- end
Advertisement
Add Comment
Please, Sign In to add comment
