]> cvs.zerfleddert.de Git - proxmark3-svn/blob - client/scripting.c
edaa926c73a0a5d4b7077143af0b0e42773a1b09
[proxmark3-svn] / client / scripting.c
1 //-----------------------------------------------------------------------------
2 // Copyright (C) 2013 m h swende <martin at swende.se>
3 //
4 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
5 // at your option, any later version. See the LICENSE.txt file for the text of
6 // the license.
7 //-----------------------------------------------------------------------------
8 // Some lua scripting glue to proxmark core.
9 //-----------------------------------------------------------------------------
10
11 #include <lua.h>
12 #include <lualib.h>
13 #include <lauxlib.h>
14 #include "proxmark3.h"
15 #include "usb_cmd.h"
16 #include "cmdmain.h"
17 #include "scripting.h"
18 #include "util.h"
19 /**
20 * The following params expected:
21 * UsbCommand c
22 *@brief l_SendCommand
23 * @param L
24 * @return
25 */
26 static int l_SendCommand(lua_State *L){
27
28 /*
29 *
30 The SendCommand (native) expects the following structure:
31
32 typedef struct {
33 uint64_t cmd; //8 bytes
34 uint64_t arg[3]; // 8*3 bytes = 24 bytes
35 union {
36 uint8_t asBytes[USB_CMD_DATA_SIZE]; // 1 byte * 512 = 512 bytes (OR)
37 uint32_t asDwords[USB_CMD_DATA_SIZE/4]; // 4 byte * 128 = 512 bytes
38 } d;
39 } PACKED UsbCommand;
40
41 ==> A 544 byte buffer will do.
42 **/
43 //Pop cmd
44 size_t size;
45 const char *data = luaL_checklstring(L, 1, &size);
46 if(size != sizeof(UsbCommand))
47 {
48 printf("Got data size %d, expected %d" , (int) size,(int) sizeof(UsbCommand));
49 lua_pushstring(L,"Wrong data size");
50 return 1;
51 }
52
53 // UsbCommand c = (*data);
54 SendCommand(data);
55 return 0; // no return values
56 }
57 /**
58 * @brief The following params expected:
59 * uint32_t cmd
60 * size_t ms_timeout
61 * @param L
62 * @return
63 */
64 static int l_WaitForResponseTimeout(lua_State *L){
65
66 uint32_t cmd = 0;
67 size_t ms_timeout = -1;
68
69 //Check number of arguments
70 int n = lua_gettop(L);
71 if(n == 0)
72 {
73 //signal error by returning Nil, errorstring
74 lua_pushnil(L);
75 lua_pushstring(L,"You need to supply at least command to wait for");
76 return 2; // two return values
77 }
78 if(n >= 1)
79 {
80 //pop cmd
81 cmd = luaL_checkunsigned(L,1);
82 }
83 if(n >= 2)
84 {
85 //Did the user send a timeout ?
86 //Check if the current top of stack is an integer
87 ms_timeout = luaL_checkunsigned(L,2);
88 //printf("Timeout set to %dms\n" , (int) ms_timeout);
89 }
90
91 UsbCommand response;
92
93 if(WaitForResponseTimeout(cmd, &response, ms_timeout))
94 {
95 //Push it as a string
96 lua_pushlstring(L,&response,sizeof(UsbCommand));
97
98 return 1;// return 1 to signal one return value
99 }else{
100 //Push a Nil instead
101 lua_pushnil(L);
102 return 1;// one return value
103 }
104 }
105 static int l_nonce2key(lua_State *L){ return CmdHF14AMfRdSc(luaL_checkstring(L, 1));}
106 static int l_PrintAndLog(lua_State *L){ return CmdHF14AMfDump(luaL_checkstring(L, 1));}
107 static int l_clearCommandBuffer(lua_State *L){
108 clearCommandBuffer();
109 }
110 /**
111 * @brief l_foobar is a dummy function to test lua-integration with
112 * @param L
113 * @return
114 */
115 static int l_foobar(lua_State *L)
116 {
117 //Check number of arguments
118 int n = lua_gettop(L);
119 printf("foobar called with %d arguments" , n);
120 lua_settop(L, 0);
121 printf("Arguments discarded, stack now contains %d elements", lua_gettop(L));
122 UsbCommand response = {CMD_MIFARE_READBL, {1337, 1338, 1339}};
123 printf("Now returning a UsbCommand as a string");
124 lua_pushlstring(L,&response,sizeof(UsbCommand));
125 return 1;
126 }
127
128 /**
129 * @brief Utility to check if a key has been pressed by the user. This method does not block.
130 * @param L
131 * @return boolean, true if kbhit, false otherwise.
132 */
133 static int l_ukbhit(lua_State *L)
134 {
135 lua_pushboolean(L,ukbhit() ? true : false);
136 return 1;
137 }
138
139 int set_pm3_libraries(lua_State *L)
140 {
141 static const luaL_Reg libs[] = {
142 {"SendCommand", l_SendCommand},
143 {"WaitForResponseTimeout", l_WaitForResponseTimeout},
144 {"nonce2key", l_nonce2key},
145 {"PrintAndLog", l_PrintAndLog},
146 {"foobar", l_foobar},
147 {"ukbhit", l_ukbhit},
148 {"clearCommandBuffer", l_clearCommandBuffer},
149 {NULL, NULL}
150 };
151
152 lua_pushglobaltable(L);
153 // Core library is in this table. Contains '
154 //this is 'pm3' table
155 lua_newtable(L);
156
157 //Put the function into the hash table.
158 for (int i = 0; libs[i].name; i++) {
159 lua_pushcfunction(L, libs[i].func);
160 lua_setfield(L, -2, libs[i].name);//set the name, pop stack
161 }
162 //Name of 'core'
163 lua_setfield(L, -2, "core");
164
165 //-- remove the global environment table from the stack
166 lua_pop(L, 1);
167 return 1;
168 }
Impressum, Datenschutz