diff options
author | Kyle McMartin <kyle@shortfin.cabal.ca> | 2007-10-20 16:18:56 -0400 |
---|---|---|
committer | Kyle McMartin <kyle@shortfin.cabal.ca> | 2007-10-20 16:18:56 -0400 |
commit | 562d139cc587fc7f7fb8e07aad13cdd2a412c9a7 (patch) | |
tree | cef4b30885483dbd2bc52a868115313c1527a096 /scripts | |
parent | f67d4033c143d74fff3a9aff03772d912b1ec317 (diff) |
[PARISC] Port checkstack.pl to parisc
Signed-off-by: Kyle McMartin <kyle@mcmartin.ca>
Diffstat (limited to 'scripts')
-rwxr-xr-x | scripts/checkstack.pl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/scripts/checkstack.pl b/scripts/checkstack.pl index b458e2acb4ac..c3b42f99df3b 100755 --- a/scripts/checkstack.pl +++ b/scripts/checkstack.pl | |||
@@ -13,6 +13,7 @@ | |||
13 | # Random bits by Matt Mackall <mpm@selenic.com> | 13 | # Random bits by Matt Mackall <mpm@selenic.com> |
14 | # M68k port by Geert Uytterhoeven and Andreas Schwab | 14 | # M68k port by Geert Uytterhoeven and Andreas Schwab |
15 | # AVR32 port by Haavard Skinnemoen <hskinnemoen@atmel.com> | 15 | # AVR32 port by Haavard Skinnemoen <hskinnemoen@atmel.com> |
16 | # PARISC port by Kyle McMartin <kyle@parisc-linux.org> | ||
16 | # | 17 | # |
17 | # Usage: | 18 | # Usage: |
18 | # objdump -d vmlinux | stackcheck.pl [arch] | 19 | # objdump -d vmlinux | stackcheck.pl [arch] |
@@ -61,6 +62,8 @@ my (@stack, $re, $x, $xs); | |||
61 | } elsif ($arch eq 'mips') { | 62 | } elsif ($arch eq 'mips') { |
62 | #88003254: 27bdffe0 addiu sp,sp,-32 | 63 | #88003254: 27bdffe0 addiu sp,sp,-32 |
63 | $re = qr/.*addiu.*sp,sp,-(([0-9]{2}|[3-9])[0-9]{2})/o; | 64 | $re = qr/.*addiu.*sp,sp,-(([0-9]{2}|[3-9])[0-9]{2})/o; |
65 | } elsif ($arch eq 'parisc' || $arch eq 'parisc64') { | ||
66 | $re = qr/.*ldo ($x{1,8})\(sp\),sp/o; | ||
64 | } elsif ($arch eq 'ppc') { | 67 | } elsif ($arch eq 'ppc') { |
65 | #c00029f4: 94 21 ff 30 stwu r1,-208(r1) | 68 | #c00029f4: 94 21 ff 30 stwu r1,-208(r1) |
66 | $re = qr/.*stwu.*r1,-($x{1,8})\(r1\)/o; | 69 | $re = qr/.*stwu.*r1,-($x{1,8})\(r1\)/o; |