projects
/
perl-Mifare-MAD.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
2f234af
)
really read data from file for write
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Sun, 6 Feb 2011 16:41:07 +0000
(17:41 +0100)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Sun, 6 Feb 2011 16:41:07 +0000
(17:41 +0100)
nfc-card-dumper.pl
patch
|
blob
|
history
diff --git
a/nfc-card-dumper.pl
b/nfc-card-dumper.pl
index
afc3140
..
37bee84
100755
(executable)
--- a/
nfc-card-dumper.pl
+++ b/
nfc-card-dumper.pl
@@
-84,7
+84,7
@@
if ($r->init()) {
my $out_file = write_card_dump $tag => $card;
if ( $opt->write ) {
- read_file $opt->write;
+
$card =
read_file $opt->write;
foreach my $block ( 0 .. $tag->blocks ) {
my $offset = 0x10 * $block;
my $data = substr($card,$offset,0x10);