summaryrefslogtreecommitdiffstats
path: root/reverse_engineering/bits.pl
diff options
context:
space:
mode:
Diffstat (limited to 'reverse_engineering/bits.pl')
-rwxr-xr-xreverse_engineering/bits.pl10
1 files changed, 7 insertions, 3 deletions
diff --git a/reverse_engineering/bits.pl b/reverse_engineering/bits.pl
index c6b3c7f..a5fda4f 100755
--- a/reverse_engineering/bits.pl
+++ b/reverse_engineering/bits.pl
@@ -126,15 +126,19 @@ my $ocd=open_ocd('127.0.0.1:4444' );
my $ov=-1;
while (1) {
-my $v=dir_get($ocd);
+my $v=io_get($ocd);
next if $v == $ov;
$ov=$v;
-printf "%04b %04b %04b %04b %04b %04b %04b %04b\n",
- ($v >>28) &0xf,
+printf "%b %b %b %b %04b %04b %04b %04b %04b %04b %04b %04b\n",
+ ($v >>20) &0x1,
+ ($v >>19) &0x1,
+ ($v >>18) &0x1,
+ ($v >>17) &0x1,
+
($v >>24) &0xf,
($v >>20) &0xf,