Overview
| SHA1 Hash: | e2df5469fe8948f149c8bf312efd76a3ad4aa892 |
|---|---|
| Date: | 2011-11-26 15:34:07 |
| User: | crc |
| Comment: | autopsy: now with vi style key bindings |
| Timelines: | family | ancestors | descendants | both | trunk |
| Other Links: | files | manifest |
Tags And Properties
- branch=trunk inherited from [dc67bca1f3]
- sym-trunk inherited from [dc67bca1f3]
Changes
[hide diffs]
[patch]Modified autopsy.rx from [36f0643ab5237c2f] to [cc25f0ad7c9b2592].
@@ -84,19 +84,19 @@
{{
: help ( - )
clear
"Autposy is a tool for exploring images interactively.\n\n" puts
"+---+----------------------------------+\n" puts
- "| i | Backtrack display by one address |\n" puts
+ "| k | Backtrack display by one address |\n" puts
"+---+----------------------------------+\n" puts
- "| j | Backtrack display by one screen |\n" puts
+ "| h | Backtrack display by one screen |\n" puts
"+---+----------------------------------+\n" puts
- "| k | Advance display by one address |\n" puts
+ "| j | Advance display by one address |\n" puts
"+---+----------------------------------+\n" puts
"| l | Advance display by one screen |\n" puts
"+---+----------------------------------+\n" puts
- "| z | Quit Autospy |\n" puts
+ "| q | Quit Autospy |\n" puts
"+---+----------------------------------+\n" puts
"| ? | Display this help screen |\n" puts
"+---+----------------------------------+\n" puts
"| 1 | Jump to address |\n" puts
"+---+----------------------------------+\n" puts
@@ -110,17 +110,17 @@
: rows @ch 2 - ;
: cols @cw 1 - ;
: handle
cols [ '- putc ] times cr
getc
- [ 'i = ] [ x -- ] whend
- [ 'k = ] [ x ++ ] whend
- [ 'j = ] [ rows -x ] whend
+ [ 'k = ] [ x -- ] whend
+ [ 'j = ] [ x ++ ] whend
+ [ 'h = ] [ rows -x ] whend
[ 'l = ] [ rows +x ] whend
[ '? = ] [ help ] whend
[ '1 = ] [ goToAddress ] whend
- [ 'z = ] [ more? off ] whend
+ [ 'q = ] [ more? off ] whend
drop ;
: browse ( - )
[ clear @x rows &decompile times drop handle @more? ] while ;
: getAddress ( "- )
getToken dup find [ nip @d->xt ] [ drop toNumber ] if ;