]> git.zerfleddert.de Git - proxmark3-svn/blame - client/scripts/dumptoemul.lua
FIX: had to make it clientside only
[proxmark3-svn] / client / scripts / dumptoemul.lua
CommitLineData
c9e2f780 1-- The getopt-functionality is loaded from pm3/getopt.lua
2-- Have a look there for further details
3getopt = require('getopt')
4bin = require('bin')
5
2fca3ad9 6example = "script run dumptoemul -i dumpdata-foobar.bin"
c9e2f780 7author = "Martin Holst Swende"
2fca3ad9 8usage = "script run dumptoemul [-i <file>] [-o <file>]"
c9e2f780 9desc =[[
10This script takes a dumpfile from 'hf mf dump' and converts it to a format that can be used
11by the emulator
12
13Arguments:
14 -h This help
15 -i <file> Specifies the dump-file (input). If omitted, 'dumpdata.bin' is used
fdefed66 16 -o <filename> Specifies the output file. If omitted, <uid>.eml is used.
c9e2f780 17
18]]
19
20-------------------------------
21-- Some utilities
22-------------------------------
23
24---
25-- A debug printout-function
26function dbg(args)
27 if DEBUG then
28 print("###", args)
29 end
30end
31---
32-- This is only meant to be used when errors occur
33function oops(err)
34 print("ERROR: ",err)
35end
c9e2f780 36---
37-- Usage help
38function help()
39 print(desc)
3c61ee43 40 print(author)
c9e2f780 41 print("Example usage")
42 print(example)
43end
44
45local function convert_to_ascii(hexdata)
46 if string.len(hexdata) % 32 ~= 0 then
47 return oops(("Bad data, length should be a multiple of 32 (was %d)"):format(string.len(hexdata)))
48 end
49
50 local js,i = "[";
51 for i = 1, string.len(hexdata),32 do
52 js = js .."'" ..string.sub(hexdata,i,i+31).."',\n"
53 end
54 js = js .. "]"
55 return js
56end
57
58local function readdump(infile)
59 t = infile:read("*all")
c9e2f780 60 len = string.len(t)
61 local len,hex = bin.unpack(("H%d"):format(len),t)
c9e2f780 62 return hex
63end
64
65local function convert_to_emulform(hexdata)
66 if string.len(hexdata) % 32 ~= 0 then
67 return oops(("Bad data, length should be a multiple of 32 (was %d)"):format(string.len(hexdata)))
68 end
69 local ascii,i = "";
70 for i = 1, string.len(hexdata),32 do
71 ascii = ascii ..string.sub(hexdata,i,i+31).."\n"
72 end
46cd801c 73
74 return string.sub(ascii,1,-1)
c9e2f780 75end
76
77local function main(args)
78
79 local input = "dumpdata.bin"
80 local output
81
82 for o, a in getopt.getopt(args, 'i:o:h') do
83 if o == "h" then return help() end
84 if o == "i" then input = a end
85 if o == "o" then output = a end
86 end
87 -- Validate the parameters
88
6cacefa4 89 local infile = io.open(input, "rb")
c9e2f780 90 if infile == nil then
91 return oops("Could not read file ", input)
92 end
93 local dumpdata = readdump(infile)
94 -- The hex-data is now in ascii-format,
95
96 -- But first, check the uid
97 local uid = string.sub(dumpdata,1,8)
98 output = output or (uid .. ".eml")
99
100 -- Format some linebreaks
101 dumpdata = convert_to_emulform(dumpdata)
102
103 local outfile = io.open(output, "w")
104 if outfile == nil then
105 return oops("Could not write to file ", output)
106 end
107
108 outfile:write(dumpdata:lower())
109 io.close(outfile)
110 print(("Wrote an emulator-dump to the file %s"):format(output))
111end
112
113
114--[[
115In the future, we may implement so that scripts are invoked directly
116into a 'main' function, instead of being executed blindly. For future
117compatibility, I have done so, but I invoke my main from here.
118--]]
6cacefa4 119main(args)
Impressum, Datenschutz