]>
Commit | Line | Data |
---|---|---|
1 | //----------------------------------------------------------------------------- | |
2 | // Copyright (C) 2010 iZsh <izsh at fail0verflow.com> | |
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 | // High frequency commands | |
9 | //----------------------------------------------------------------------------- | |
10 | ||
11 | #include <stdio.h> | |
12 | #include <string.h> | |
13 | #include "proxmark3.h" | |
14 | #include "graph.h" | |
15 | #include "ui.h" | |
16 | #include "cmdparser.h" | |
17 | #include "cmdhf.h" | |
18 | #include "cmdhf14a.h" | |
19 | #include "cmdhf14b.h" | |
20 | #include "cmdhf15.h" | |
21 | #include "cmdhfepa.h" | |
22 | #include "cmdhflegic.h" | |
23 | #include "cmdhficlass.h" | |
24 | #include "cmdhfmf.h" | |
25 | #include "cmdhfmfu.h" | |
26 | #include "cmdhfmfdes.h" | |
27 | #include "cmdhftopaz.h" | |
28 | #include "protocols.h" | |
29 | ||
30 | static int CmdHelp(const char *Cmd); | |
31 | ||
32 | int CmdHFTune(const char *Cmd) { | |
33 | PrintAndLog("Measuring HF antenna, press button to exit"); | |
34 | UsbCommand c = {CMD_MEASURE_ANTENNA_TUNING_HF}; | |
35 | clearCommandBuffer(); | |
36 | SendCommand(&c); | |
37 | return 0; | |
38 | } | |
39 | ||
40 | ||
41 | void annotateIso14443a(char *exp, size_t size, uint8_t* cmd, uint8_t cmdsize) | |
42 | { | |
43 | switch(cmd[0]) | |
44 | { | |
45 | case ISO14443A_CMD_WUPA: snprintf(exp,size,"WUPA"); break; | |
46 | case ISO14443A_CMD_ANTICOLL_OR_SELECT:{ | |
47 | // 93 20 = Anticollision (usage: 9320 - answer: 4bytes UID+1byte UID-bytes-xor) | |
48 | // 93 70 = Select (usage: 9370+5bytes 9320 answer - answer: 1byte SAK) | |
49 | if(cmd[1] == 0x70) | |
50 | snprintf(exp,size,"SELECT_UID"); | |
51 | else | |
52 | snprintf(exp,size,"ANTICOLL"); | |
53 | break; | |
54 | } | |
55 | case ISO14443A_CMD_ANTICOLL_OR_SELECT_2:{ | |
56 | //95 20 = Anticollision of cascade level2 | |
57 | //95 70 = Select of cascade level2 | |
58 | if(cmd[2] == 0x70) | |
59 | snprintf(exp,size,"SELECT_UID-2"); | |
60 | else | |
61 | snprintf(exp,size,"ANTICOLL-2"); | |
62 | break; | |
63 | } | |
64 | case ISO14443A_CMD_REQA: snprintf(exp,size,"REQA"); break; | |
65 | case ISO14443A_CMD_READBLOCK: snprintf(exp,size,"READBLOCK(%d)",cmd[1]); break; | |
66 | case ISO14443A_CMD_WRITEBLOCK: snprintf(exp,size,"WRITEBLOCK(%d)",cmd[1]); break; | |
67 | case ISO14443A_CMD_HALT: snprintf(exp,size,"HALT"); break; | |
68 | case ISO14443A_CMD_RATS: snprintf(exp,size,"RATS"); break; | |
69 | case MIFARE_CMD_INC: snprintf(exp,size,"INC(%d)",cmd[1]); break; | |
70 | case MIFARE_CMD_DEC: snprintf(exp,size,"DEC(%d)",cmd[1]); break; | |
71 | case MIFARE_CMD_RESTORE: snprintf(exp,size,"RESTORE(%d)",cmd[1]); break; | |
72 | case MIFARE_CMD_TRANSFER: snprintf(exp,size,"TRANSFER(%d)",cmd[1]); break; | |
73 | case MIFARE_AUTH_KEYA:{ | |
74 | if ( cmdsize > 3) | |
75 | snprintf(exp,size,"AUTH-A(%d)",cmd[1]); | |
76 | else | |
77 | // case MIFARE_ULEV1_VERSION : both 0x60. | |
78 | snprintf(exp,size,"EV1 VERSION"); | |
79 | break; | |
80 | } | |
81 | case MIFARE_AUTH_KEYB: snprintf(exp,size,"AUTH-B(%d)",cmd[1]); break; | |
82 | case MIFARE_MAGICWUPC1: snprintf(exp,size,"MAGIC WUPC1"); break; | |
83 | case MIFARE_MAGICWUPC2: snprintf(exp,size,"MAGIC WUPC2"); break; | |
84 | case MIFARE_MAGICWIPEC: snprintf(exp,size,"MAGIC WIPEC"); break; | |
85 | case MIFARE_ULC_AUTH_1 : snprintf(exp,size,"AUTH "); break; | |
86 | case MIFARE_ULC_AUTH_2 : snprintf(exp,size,"AUTH_ANSW"); break; | |
87 | case MIFARE_ULEV1_AUTH : | |
88 | if ( cmdsize == 7 ) | |
89 | snprintf(exp,size,"PWD-AUTH KEY: 0x%02x%02x%02x%02x", cmd[1], cmd[2], cmd[3], cmd[4] ); | |
90 | else | |
91 | snprintf(exp,size,"PWD-AUTH"); | |
92 | break; | |
93 | case MIFARE_ULEV1_FASTREAD : { | |
94 | if ( cmdsize >=3 && cmd[2] <= 0xE6) | |
95 | snprintf(exp,size,"READ RANGE (%d-%d)",cmd[1],cmd[2]); | |
96 | else | |
97 | snprintf(exp,size,"?"); | |
98 | break; | |
99 | } | |
100 | case MIFARE_ULC_WRITE : { | |
101 | if ( cmd[1] < 0x21 ) | |
102 | snprintf(exp,size,"WRITEBLOCK(%d)",cmd[1]); | |
103 | else | |
104 | snprintf(exp,size,"?"); | |
105 | break; | |
106 | } | |
107 | case MIFARE_ULEV1_READ_CNT :{ | |
108 | if ( cmd[1] < 5 ) | |
109 | snprintf(exp,size,"READ CNT(%d)",cmd[1]); | |
110 | else | |
111 | snprintf(exp,size,"?"); | |
112 | break; | |
113 | } | |
114 | case MIFARE_ULEV1_INCR_CNT : { | |
115 | if ( cmd[1] < 5 ) | |
116 | snprintf(exp,size,"INCR(%d)",cmd[1]); | |
117 | else | |
118 | snprintf(exp,size,"?"); | |
119 | break; | |
120 | } | |
121 | case MIFARE_ULEV1_READSIG : snprintf(exp,size,"READ_SIG"); break; | |
122 | case MIFARE_ULEV1_CHECKTEAR : snprintf(exp,size,"CHK_TEARING(%d)",cmd[1]); break; | |
123 | case MIFARE_ULEV1_VCSL : snprintf(exp,size,"VCSL"); break; | |
124 | default: snprintf(exp,size,"?"); break; | |
125 | } | |
126 | return; | |
127 | } | |
128 | ||
129 | void annotateIclass(char *exp, size_t size, uint8_t* cmd, uint8_t cmdsize) | |
130 | { | |
131 | switch(cmd[0]) | |
132 | { | |
133 | case ICLASS_CMD_ACTALL: snprintf(exp,size,"ACTALL"); break; | |
134 | case ICLASS_CMD_READ_OR_IDENTIFY:{ | |
135 | if(cmdsize > 1){ | |
136 | snprintf(exp,size,"READ(%d)",cmd[1]); | |
137 | }else{ | |
138 | snprintf(exp,size,"IDENTIFY"); | |
139 | } | |
140 | break; | |
141 | } | |
142 | case ICLASS_CMD_SELECT: snprintf(exp,size,"SELECT"); break; | |
143 | case ICLASS_CMD_PAGESEL: snprintf(exp,size,"PAGESEL(%d)", cmd[1]); break; | |
144 | case ICLASS_CMD_READCHECK_KC:snprintf(exp,size,"READCHECK[Kc](%d)", cmd[1]); break; | |
145 | case ICLASS_CMD_READCHECK_KD:snprintf(exp,size,"READCHECK[Kd](%d)", cmd[1]); break; | |
146 | case ICLASS_CMD_CHECK: snprintf(exp,size,"CHECK"); break; | |
147 | case ICLASS_CMD_DETECT: snprintf(exp,size,"DETECT"); break; | |
148 | case ICLASS_CMD_HALT: snprintf(exp,size,"HALT"); break; | |
149 | case ICLASS_CMD_UPDATE: snprintf(exp,size,"UPDATE(%d)",cmd[1]); break; | |
150 | case ICLASS_CMD_ACT: snprintf(exp,size,"ACT"); break; | |
151 | case ICLASS_CMD_READ4: snprintf(exp,size,"READ4(%d)",cmd[1]); break; | |
152 | default: snprintf(exp,size,"?"); break; | |
153 | } | |
154 | return; | |
155 | } | |
156 | ||
157 | void annotateIso15693(char *exp, size_t size, uint8_t* cmd, uint8_t cmdsize) | |
158 | { | |
159 | ||
160 | if(cmd[0] == 0x26) | |
161 | { | |
162 | switch(cmd[1]){ | |
163 | case ISO15693_INVENTORY :snprintf(exp, size, "INVENTORY");break; | |
164 | case ISO15693_STAYQUIET :snprintf(exp, size, "STAY_QUIET");break; | |
165 | default: snprintf(exp,size,"?"); break; | |
166 | ||
167 | } | |
168 | }else if(cmd[0] == 0x02) | |
169 | { | |
170 | switch(cmd[1]) | |
171 | { | |
172 | case ISO15693_READBLOCK :snprintf(exp, size, "READBLOCK");break; | |
173 | case ISO15693_WRITEBLOCK :snprintf(exp, size, "WRITEBLOCK");break; | |
174 | case ISO15693_LOCKBLOCK :snprintf(exp, size, "LOCKBLOCK");break; | |
175 | case ISO15693_READ_MULTI_BLOCK :snprintf(exp, size, "READ_MULTI_BLOCK");break; | |
176 | case ISO15693_SELECT :snprintf(exp, size, "SELECT");break; | |
177 | case ISO15693_RESET_TO_READY :snprintf(exp, size, "RESET_TO_READY");break; | |
178 | case ISO15693_WRITE_AFI :snprintf(exp, size, "WRITE_AFI");break; | |
179 | case ISO15693_LOCK_AFI :snprintf(exp, size, "LOCK_AFI");break; | |
180 | case ISO15693_WRITE_DSFID :snprintf(exp, size, "WRITE_DSFID");break; | |
181 | case ISO15693_LOCK_DSFID :snprintf(exp, size, "LOCK_DSFID");break; | |
182 | case ISO15693_GET_SYSTEM_INFO :snprintf(exp, size, "GET_SYSTEM_INFO");break; | |
183 | case ISO15693_READ_MULTI_SECSTATUS :snprintf(exp, size, "READ_MULTI_SECSTATUS");break; | |
184 | default: snprintf(exp,size,"?"); break; | |
185 | } | |
186 | } | |
187 | } | |
188 | ||
189 | void annotateTopaz(char *exp, size_t size, uint8_t* cmd, uint8_t cmdsize) | |
190 | { | |
191 | switch(cmd[0]) { | |
192 | case TOPAZ_REQA :snprintf(exp, size, "REQA");break; | |
193 | case TOPAZ_WUPA :snprintf(exp, size, "WUPA");break; | |
194 | case TOPAZ_RID :snprintf(exp, size, "RID");break; | |
195 | case TOPAZ_RALL :snprintf(exp, size, "RALL");break; | |
196 | case TOPAZ_READ :snprintf(exp, size, "READ");break; | |
197 | case TOPAZ_WRITE_E :snprintf(exp, size, "WRITE-E");break; | |
198 | case TOPAZ_WRITE_NE :snprintf(exp, size, "WRITE-NE");break; | |
199 | case TOPAZ_RSEG :snprintf(exp, size, "RSEG");break; | |
200 | case TOPAZ_READ8 :snprintf(exp, size, "READ8");break; | |
201 | case TOPAZ_WRITE_E8 :snprintf(exp, size, "WRITE-E8");break; | |
202 | case TOPAZ_WRITE_NE8 :snprintf(exp, size, "WRITE-NE8");break; | |
203 | default :snprintf(exp,size,"?"); break; | |
204 | } | |
205 | } | |
206 | ||
207 | // iso 7816-3 | |
208 | void annotateIso7816(char *exp, size_t size, uint8_t* cmd, uint8_t cmdsize){ | |
209 | // S-block | |
210 | if ( (cmd[0] & 0xC0) && (cmdsize == 3) ) { | |
211 | switch ( (cmd[0] & 0x3f) ) { | |
212 | case 0x00 : snprintf(exp, size, "S-block RESYNCH req"); break; | |
213 | case 0x20 : snprintf(exp, size, "S-block RESYNCH resp"); break; | |
214 | case 0x01 : snprintf(exp, size, "S-block IFS req"); break; | |
215 | case 0x21 : snprintf(exp, size, "S-block IFS resp"); break; | |
216 | case 0x02 : snprintf(exp, size, "S-block ABORT req"); break; | |
217 | case 0x22 : snprintf(exp, size, "S-block ABORT resp"); break; | |
218 | case 0x03 : snprintf(exp, size, "S-block WTX reqt"); break; | |
219 | case 0x23 : snprintf(exp, size, "S-block WTX resp"); break; | |
220 | default : snprintf(exp, size, "S-block"); break; | |
221 | } | |
222 | } | |
223 | // R-block (ack) | |
224 | else if ( ((cmd[0] & 0xD0) == 0x80) && ( cmdsize > 2) ) { | |
225 | if ( (cmd[0] & 0x10) == 0 ) | |
226 | snprintf(exp, size, "R-block ACK"); | |
227 | else | |
228 | snprintf(exp, size, "R-block NACK"); | |
229 | } | |
230 | // I-block | |
231 | else { | |
232 | ||
233 | int pos = (cmd[0] == 2 || cmd[0] == 3) ? 2 : 3; | |
234 | switch ( cmd[pos] ){ | |
235 | case ISO7816_READ_BINARY :snprintf(exp, size, "READ BIN");break; | |
236 | case ISO7816_WRITE_BINARY :snprintf(exp, size, "WRITE BIN");break; | |
237 | case ISO7816_UPDATE_BINARY :snprintf(exp, size, "UPDATE BIN");break; | |
238 | case ISO7816_ERASE_BINARY :snprintf(exp, size, "ERASE BIN");break; | |
239 | case ISO7816_READ_RECORDS :snprintf(exp, size, "READ RECORDS");break; | |
240 | case ISO7816_WRITE_RECORDS :snprintf(exp, size, "WRITE RECORDS");break; | |
241 | case ISO7816_APPEND_RECORD :snprintf(exp, size, "APPEND RECORD");break; | |
242 | case ISO7816_UPDATE_RECORD :snprintf(exp, size, "UPDATE RECORD");break; | |
243 | case ISO7816_GET_DATA :snprintf(exp, size, "GET DATA");break; | |
244 | case ISO7816_PUT_DATA :snprintf(exp, size, "PUT DATA");break; | |
245 | case ISO7816_SELECT_FILE :snprintf(exp, size, "SELECT FILE");break; | |
246 | case ISO7816_VERIFY :snprintf(exp, size, "VERIFY");break; | |
247 | case ISO7816_INTERNAL_AUTHENTICATION :snprintf(exp, size, "INTERNAL AUTH");break; | |
248 | case ISO7816_EXTERNAL_AUTHENTICATION :snprintf(exp, size, "EXTERNAL AUTH");break; | |
249 | case ISO7816_GET_CHALLENGE :snprintf(exp, size, "GET CHALLENGE");break; | |
250 | case ISO7816_MANAGE_CHANNEL :snprintf(exp, size, "MANAGE CHANNEL");break; | |
251 | default :snprintf(exp,size,"?"); break; | |
252 | } | |
253 | } | |
254 | } | |
255 | ||
256 | /** | |
257 | 06 00 = INITIATE | |
258 | 0E xx = SELECT ID (xx = Chip-ID) | |
259 | 0B = Get UID | |
260 | 08 yy = Read Block (yy = block number) | |
261 | 09 yy dd dd dd dd = Write Block (yy = block number; dd dd dd dd = data to be written) | |
262 | 0C = Reset to Inventory | |
263 | 0F = Completion | |
264 | 0A 11 22 33 44 55 66 = Authenticate (11 22 33 44 55 66 = data to authenticate) | |
265 | **/ | |
266 | ||
267 | void annotateIso14443b(char *exp, size_t size, uint8_t* cmd, uint8_t cmdsize) | |
268 | { | |
269 | switch(cmd[0]){ | |
270 | case ISO14443B_REQB : { | |
271 | ||
272 | switch ( cmd[2] & 0x07 ) { | |
273 | case 0: snprintf(exp, size,"1 slot ");break; | |
274 | case 1: snprintf(exp, size,"2 slots ");break; | |
275 | case 2: snprintf(exp, size,"4 slots ");break; | |
276 | case 3: snprintf(exp, size,"8 slots ");break; | |
277 | default: snprintf(exp, size,"16 slots ");break; | |
278 | } | |
279 | if ( (cmd[2] & 0x8) ) | |
280 | snprintf(exp, size,"WUPB"); | |
281 | else | |
282 | snprintf(exp, size,"REQB"); | |
283 | break; | |
284 | } | |
285 | case ISO14443B_ATTRIB : snprintf(exp,size,"ATTRIB");break; | |
286 | case ISO14443B_HALT : snprintf(exp,size,"HALT");break; | |
287 | case ISO14443B_INITIATE : snprintf(exp,size,"INITIATE");break; | |
288 | case ISO14443B_SELECT : snprintf(exp,size,"SELECT(%d)",cmd[1]);break; | |
289 | case ISO14443B_GET_UID : snprintf(exp,size,"GET UID");break; | |
290 | case ISO14443B_READ_BLK : snprintf(exp,size,"READ_BLK(%d)", cmd[1]);break; | |
291 | case ISO14443B_WRITE_BLK : snprintf(exp,size,"WRITE_BLK(%d)",cmd[1]);break; | |
292 | case ISO14443B_RESET : snprintf(exp,size,"RESET");break; | |
293 | case ISO14443B_COMPLETION : snprintf(exp,size,"COMPLETION");break; | |
294 | case ISO14443B_AUTHENTICATE : snprintf(exp,size,"AUTHENTICATE");break; | |
295 | case ISO14443B_PING : snprintf(exp,size,"PING");break; | |
296 | case ISO14443B_PONG : snprintf(exp,size,"PONG");break; | |
297 | default : snprintf(exp,size ,"?");break; | |
298 | } | |
299 | } | |
300 | ||
301 | /** | |
302 | * @brief iso14443A_CRC_check Checks CRC in command or response | |
303 | * @param isResponse | |
304 | * @param data | |
305 | * @param len | |
306 | * @return 0 : CRC-command, CRC not ok | |
307 | * 1 : CRC-command, CRC ok | |
308 | * 2 : Not crc-command | |
309 | */ | |
310 | ||
311 | uint8_t iso14443A_CRC_check(bool isResponse, uint8_t* data, uint8_t len) | |
312 | { | |
313 | uint8_t b1,b2; | |
314 | ||
315 | if(len <= 2) return 2; | |
316 | ||
317 | if(isResponse & (len < 6)) return 2; | |
318 | ||
319 | ComputeCrc14443(CRC_14443_A, data, len-2, &b1, &b2); | |
320 | if (b1 != data[len-2] || b2 != data[len-1]) { | |
321 | return 0; | |
322 | } else { | |
323 | return 1; | |
324 | } | |
325 | } | |
326 | ||
327 | ||
328 | /** | |
329 | * @brief iso14443B_CRC_check Checks CRC in command or response | |
330 | * @param isResponse | |
331 | * @param data | |
332 | * @param len | |
333 | * @return 0 : CRC-command, CRC not ok | |
334 | * 1 : CRC-command, CRC ok | |
335 | * 2 : Not crc-command | |
336 | */ | |
337 | ||
338 | uint8_t iso14443B_CRC_check(bool isResponse, uint8_t* data, uint8_t len) | |
339 | { | |
340 | uint8_t b1,b2; | |
341 | ||
342 | if(len <= 2) return 2; | |
343 | ||
344 | ComputeCrc14443(CRC_14443_B, data, len-2, &b1, &b2); | |
345 | if(b1 != data[len-2] || b2 != data[len-1]) { | |
346 | return 0; | |
347 | } | |
348 | return 1; | |
349 | } | |
350 | ||
351 | /** | |
352 | * @brief iclass_CRC_Ok Checks CRC in command or response | |
353 | * @param isResponse | |
354 | * @param data | |
355 | * @param len | |
356 | * @return 0 : CRC-command, CRC not ok | |
357 | * 1 : CRC-command, CRC ok | |
358 | * 2 : Not crc-command | |
359 | */ | |
360 | uint8_t iclass_CRC_check(bool isResponse, uint8_t* data, uint8_t len) | |
361 | { | |
362 | if(len < 4) return 2;//CRC commands (and responses) are all at least 4 bytes | |
363 | ||
364 | uint8_t b1, b2; | |
365 | ||
366 | if(!isResponse)//Commands to tag | |
367 | { | |
368 | /** | |
369 | These commands should have CRC. Total length leftmost | |
370 | 4 READ | |
371 | 4 READ4 | |
372 | 12 UPDATE - unsecured, ends with CRC16 | |
373 | 14 UPDATE - secured, ends with signature instead | |
374 | 4 PAGESEL | |
375 | **/ | |
376 | if(len == 4 || len == 12)//Covers three of them | |
377 | { | |
378 | //Don't include the command byte | |
379 | ComputeCrc14443(CRC_ICLASS, (data+1), len-3, &b1, &b2); | |
380 | return b1 == data[len -2] && b2 == data[len-1]; | |
381 | } | |
382 | return 2; | |
383 | }else{ | |
384 | /** | |
385 | These tag responses should have CRC. Total length leftmost | |
386 | ||
387 | 10 READ data[8] crc[2] | |
388 | 34 READ4 data[32]crc[2] | |
389 | 10 UPDATE data[8] crc[2] | |
390 | 10 SELECT csn[8] crc[2] | |
391 | 10 IDENTIFY asnb[8] crc[2] | |
392 | 10 PAGESEL block1[8] crc[2] | |
393 | 10 DETECT csn[8] crc[2] | |
394 | ||
395 | These should not | |
396 | ||
397 | 4 CHECK chip_response[4] | |
398 | 8 READCHECK data[8] | |
399 | 1 ACTALL sof[1] | |
400 | 1 ACT sof[1] | |
401 | ||
402 | In conclusion, without looking at the command; any response | |
403 | of length 10 or 34 should have CRC | |
404 | **/ | |
405 | if(len != 10 && len != 34) return true; | |
406 | ||
407 | ComputeCrc14443(CRC_ICLASS, data, len-2, &b1, &b2); | |
408 | return b1 == data[len -2] && b2 == data[len-1]; | |
409 | } | |
410 | } | |
411 | ||
412 | ||
413 | bool is_last_record(uint16_t tracepos, uint8_t *trace, uint16_t traceLen) | |
414 | { | |
415 | return(tracepos + sizeof(uint32_t) + sizeof(uint16_t) + sizeof(uint16_t) >= traceLen); | |
416 | } | |
417 | ||
418 | ||
419 | bool next_record_is_response(uint16_t tracepos, uint8_t *trace) | |
420 | { | |
421 | uint16_t next_records_datalen = *((uint16_t *)(trace + tracepos + sizeof(uint32_t) + sizeof(uint16_t))); | |
422 | ||
423 | return(next_records_datalen & 0x8000); | |
424 | } | |
425 | ||
426 | ||
427 | bool merge_topaz_reader_frames(uint32_t timestamp, uint32_t *duration, uint16_t *tracepos, uint16_t traceLen, uint8_t *trace, uint8_t *frame, uint8_t *topaz_reader_command, uint16_t *data_len) | |
428 | { | |
429 | ||
430 | #define MAX_TOPAZ_READER_CMD_LEN 16 | |
431 | ||
432 | uint32_t last_timestamp = timestamp + *duration; | |
433 | ||
434 | if ((*data_len != 1) || (frame[0] == TOPAZ_WUPA) || (frame[0] == TOPAZ_REQA)) return false; | |
435 | ||
436 | memcpy(topaz_reader_command, frame, *data_len); | |
437 | ||
438 | while (!is_last_record(*tracepos, trace, traceLen) && !next_record_is_response(*tracepos, trace)) { | |
439 | uint32_t next_timestamp = *((uint32_t *)(trace + *tracepos)); | |
440 | *tracepos += sizeof(uint32_t); | |
441 | uint16_t next_duration = *((uint16_t *)(trace + *tracepos)); | |
442 | *tracepos += sizeof(uint16_t); | |
443 | uint16_t next_data_len = *((uint16_t *)(trace + *tracepos)) & 0x7FFF; | |
444 | *tracepos += sizeof(uint16_t); | |
445 | uint8_t *next_frame = (trace + *tracepos); | |
446 | *tracepos += next_data_len; | |
447 | if ((next_data_len == 1) && (*data_len + next_data_len <= MAX_TOPAZ_READER_CMD_LEN)) { | |
448 | memcpy(topaz_reader_command + *data_len, next_frame, next_data_len); | |
449 | *data_len += next_data_len; | |
450 | last_timestamp = next_timestamp + next_duration; | |
451 | } else { | |
452 | // rewind and exit | |
453 | *tracepos = *tracepos - next_data_len - sizeof(uint16_t) - sizeof(uint16_t) - sizeof(uint32_t); | |
454 | break; | |
455 | } | |
456 | uint16_t next_parity_len = (next_data_len-1)/8 + 1; | |
457 | *tracepos += next_parity_len; | |
458 | } | |
459 | ||
460 | *duration = last_timestamp - timestamp; | |
461 | ||
462 | return true; | |
463 | } | |
464 | ||
465 | ||
466 | uint16_t printTraceLine(uint16_t tracepos, uint16_t traceLen, uint8_t *trace, uint8_t protocol, bool showWaitCycles, bool markCRCBytes) | |
467 | { | |
468 | bool isResponse; | |
469 | uint16_t data_len, parity_len; | |
470 | uint32_t duration; | |
471 | uint8_t topaz_reader_command[9]; | |
472 | uint32_t timestamp, first_timestamp, EndOfTransmissionTimestamp; | |
473 | char explanation[30] = {0}; | |
474 | ||
475 | if (tracepos + sizeof(uint32_t) + sizeof(uint16_t) + sizeof(uint16_t) > traceLen) return traceLen; | |
476 | ||
477 | first_timestamp = *((uint32_t *)(trace)); | |
478 | timestamp = *((uint32_t *)(trace + tracepos)); | |
479 | ||
480 | tracepos += 4; | |
481 | duration = *((uint16_t *)(trace + tracepos)); | |
482 | tracepos += 2; | |
483 | data_len = *((uint16_t *)(trace + tracepos)); | |
484 | tracepos += 2; | |
485 | ||
486 | if (data_len & 0x8000) { | |
487 | data_len &= 0x7fff; | |
488 | isResponse = true; | |
489 | } else { | |
490 | isResponse = false; | |
491 | } | |
492 | parity_len = (data_len-1)/8 + 1; | |
493 | ||
494 | if (tracepos + data_len + parity_len > traceLen) { | |
495 | return traceLen; | |
496 | } | |
497 | uint8_t *frame = trace + tracepos; | |
498 | tracepos += data_len; | |
499 | uint8_t *parityBytes = trace + tracepos; | |
500 | tracepos += parity_len; | |
501 | ||
502 | if (protocol == TOPAZ && !isResponse) { | |
503 | // topaz reader commands come in 1 or 9 separate frames with 7 or 8 Bits each. | |
504 | // merge them: | |
505 | if (merge_topaz_reader_frames(timestamp, &duration, &tracepos, traceLen, trace, frame, topaz_reader_command, &data_len)) { | |
506 | frame = topaz_reader_command; | |
507 | } | |
508 | } | |
509 | ||
510 | //Check the CRC status | |
511 | uint8_t crcStatus = 2; | |
512 | ||
513 | if (data_len > 2) { | |
514 | switch (protocol) { | |
515 | case ICLASS: | |
516 | crcStatus = iclass_CRC_check(isResponse, frame, data_len); | |
517 | break; | |
518 | case ISO_14443B: | |
519 | case TOPAZ: | |
520 | crcStatus = iso14443B_CRC_check(isResponse, frame, data_len); | |
521 | break; | |
522 | case ISO_14443A: | |
523 | crcStatus = iso14443A_CRC_check(isResponse, frame, data_len); | |
524 | break; | |
525 | default: | |
526 | break; | |
527 | } | |
528 | } | |
529 | //0 CRC-command, CRC not ok | |
530 | //1 CRC-command, CRC ok | |
531 | //2 Not crc-command | |
532 | ||
533 | //--- Draw the data column | |
534 | char line[16][110]; | |
535 | ||
536 | for (int j = 0; j < data_len && j/16 < 16; j++) { | |
537 | ||
538 | int oddparity = 0x01; | |
539 | int k; | |
540 | ||
541 | for (k=0 ; k<8 ; k++) { | |
542 | oddparity ^= (((frame[j] & 0xFF) >> k) & 0x01); | |
543 | } | |
544 | uint8_t parityBits = parityBytes[j>>3]; | |
545 | if (protocol != ISO_14443B && protocol != ISO_7816_4 && (isResponse || protocol == ISO_14443A) && (oddparity != ((parityBits >> (7-(j&0x0007))) & 0x01))) { | |
546 | snprintf(line[j/16]+(( j % 16) * 4),110, "%02x! ", frame[j]); | |
547 | ||
548 | } else { | |
549 | snprintf(line[j/16]+(( j % 16) * 4),110, "%02x ", frame[j]); | |
550 | } | |
551 | ||
552 | } | |
553 | ||
554 | if (markCRCBytes) { | |
555 | //CRC-command | |
556 | if(crcStatus == 0 || crcStatus == 1) { | |
557 | char *pos1 = line[(data_len-2)/16]+(((data_len-2) % 16) * 4); | |
558 | (*pos1) = '['; | |
559 | char *pos2 = line[(data_len)/16]+(((data_len) % 16) * 4); | |
560 | sprintf(pos2, "%c", ']'); | |
561 | } | |
562 | } | |
563 | ||
564 | if(data_len == 0 ) | |
565 | sprintf(line[0],"<empty trace - possible error>"); | |
566 | ||
567 | ||
568 | //--- Draw the CRC column | |
569 | char *crc = (crcStatus == 0 ? "!crc" : (crcStatus == 1 ? " ok " : " ")); | |
570 | ||
571 | EndOfTransmissionTimestamp = timestamp + duration; | |
572 | ||
573 | if(!isResponse) | |
574 | { | |
575 | switch(protocol) { | |
576 | case ICLASS: annotateIclass(explanation,sizeof(explanation),frame,data_len); break; | |
577 | case ISO_14443A: annotateIso14443a(explanation,sizeof(explanation),frame,data_len); break; | |
578 | case ISO_14443B: annotateIso14443b(explanation,sizeof(explanation),frame,data_len); break; | |
579 | case TOPAZ: annotateTopaz(explanation,sizeof(explanation),frame,data_len); break; | |
580 | case ISO_7816_4: annotateIso7816(explanation,sizeof(explanation),frame,data_len); break; | |
581 | default: break; | |
582 | } | |
583 | } | |
584 | ||
585 | int num_lines = MIN((data_len - 1)/16 + 1, 16); | |
586 | for (int j = 0; j < num_lines ; j++) { | |
587 | if (j == 0) { | |
588 | PrintAndLog(" %10d | %10d | %s |%-64s | %s| %s", | |
589 | (timestamp - first_timestamp), | |
590 | (EndOfTransmissionTimestamp - first_timestamp), | |
591 | (isResponse ? "Tag" : "Rdr"), | |
592 | line[j], | |
593 | (j == num_lines-1) ? crc : " ", | |
594 | (j == num_lines-1) ? explanation : ""); | |
595 | } else { | |
596 | PrintAndLog(" | | |%-64s | %s| %s", | |
597 | line[j], | |
598 | (j == num_lines-1) ? crc : " ", | |
599 | (j == num_lines-1) ? explanation : ""); | |
600 | } | |
601 | } | |
602 | ||
603 | if (is_last_record(tracepos, trace, traceLen)) return traceLen; | |
604 | ||
605 | if (showWaitCycles && !isResponse && next_record_is_response(tracepos, trace)) { | |
606 | uint32_t next_timestamp = *((uint32_t *)(trace + tracepos)); | |
607 | PrintAndLog(" %10d | %10d | %s |fdt (Frame Delay Time): %d", | |
608 | (EndOfTransmissionTimestamp - first_timestamp), | |
609 | (next_timestamp - first_timestamp), | |
610 | " ", | |
611 | (next_timestamp - EndOfTransmissionTimestamp)); | |
612 | } | |
613 | ||
614 | return tracepos; | |
615 | } | |
616 | ||
617 | int usage_hf_list(){ | |
618 | PrintAndLog("List protocol data in trace buffer."); | |
619 | PrintAndLog("Usage: hf list <protocol> [f][c]"); | |
620 | PrintAndLog(" f - show frame delay times as well"); | |
621 | PrintAndLog(" c - mark CRC bytes"); | |
622 | PrintAndLog("Supported <protocol> values:"); | |
623 | PrintAndLog(" raw - just show raw data without annotations"); | |
624 | PrintAndLog(" 14a - interpret data as iso14443a communications"); | |
625 | PrintAndLog(" 14b - interpret data as iso14443b communications"); | |
626 | PrintAndLog(" iclass - interpret data as iclass communications"); | |
627 | PrintAndLog(" topaz - interpret data as topaz communications"); | |
628 | PrintAndLog(" 7816 - interpret data as iso7816-4 communications"); | |
629 | PrintAndLog(""); | |
630 | PrintAndLog("example: hf list 14a f"); | |
631 | PrintAndLog(" hf list iclass"); | |
632 | return 0; | |
633 | } | |
634 | int usage_hf_search(){ | |
635 | PrintAndLog("Usage: hf search"); | |
636 | PrintAndLog("Will try to find a HF read out of the unknown tag. Stops when found."); | |
637 | PrintAndLog("Options:"); | |
638 | PrintAndLog(" h - This help"); | |
639 | PrintAndLog(""); | |
640 | return 0; | |
641 | } | |
642 | int usage_hf_snoop(){ | |
643 | PrintAndLog("Usage: hf snoop <skip pairs> <skip triggers>"); | |
644 | PrintAndLog("The high frequence snoop will assign all available memory on device for snooped data"); | |
645 | PrintAndLog("User the 'data samples' command to download from device, and 'data plot' to look at it"); | |
646 | PrintAndLog("Press button to quit the snooping."); | |
647 | PrintAndLog("Options:"); | |
648 | PrintAndLog(" h - This help"); | |
649 | PrintAndLog(" <skip pairs> - skip sample pairs"); | |
650 | PrintAndLog(" <skip triggers> - skip number of triggers"); | |
651 | PrintAndLog(""); | |
652 | PrintAndLog("example: hf snoop"); | |
653 | PrintAndLog(" hf snoop 1000 0"); | |
654 | return 0; | |
655 | } | |
656 | ||
657 | int CmdHFList(const char *Cmd) | |
658 | { | |
659 | clearCommandBuffer(); | |
660 | ||
661 | bool showWaitCycles = false; | |
662 | bool markCRCBytes = false; | |
663 | char type[10] = {0}; | |
664 | //int tlen = param_getstr(Cmd,0,type); | |
665 | char param1 = param_getchar(Cmd, 1); | |
666 | char param2 = param_getchar(Cmd, 2); | |
667 | bool errors = false; | |
668 | uint8_t protocol = 0; | |
669 | ||
670 | //Validate params H or empty | |
671 | if (strlen(Cmd) < 1 || param1 == 'h' || param1 == 'H') return usage_hf_list(); | |
672 | ||
673 | //Validate params F,C | |
674 | if( | |
675 | (param1 != 0 && param1 != 'f' && param1 != 'c') || | |
676 | (param2 != 0 && param2 != 'f' && param2 != 'c') | |
677 | ) { | |
678 | return usage_hf_list(); | |
679 | } | |
680 | ||
681 | param_getstr(Cmd,0,type); | |
682 | ||
683 | // validate type of output | |
684 | if(strcmp(type, "iclass") == 0) protocol = ICLASS; | |
685 | else if(strcmp(type, "14a") == 0) protocol = ISO_14443A; | |
686 | else if(strcmp(type, "14b") == 0) protocol = ISO_14443B; | |
687 | else if(strcmp(type, "topaz")== 0) protocol = TOPAZ; | |
688 | else if(strcmp(type, "7816")== 0) protocol = ISO_7816_4; | |
689 | else if(strcmp(type, "raw")== 0) protocol = -1;//No crc, no annotations | |
690 | else errors = true; | |
691 | ||
692 | if (errors) return usage_hf_list(); | |
693 | ||
694 | if (param1 == 'f' || param2 == 'f') showWaitCycles = true; | |
695 | if (param1 == 'c' || param2 == 'c') markCRCBytes = true; | |
696 | ||
697 | uint8_t *trace; | |
698 | uint16_t tracepos = 0; | |
699 | trace = malloc(USB_CMD_DATA_SIZE); | |
700 | ||
701 | // Query for the size of the trace | |
702 | UsbCommand response; | |
703 | GetFromBigBuf(trace, USB_CMD_DATA_SIZE, 0); | |
704 | WaitForResponse(CMD_ACK, &response); | |
705 | uint16_t traceLen = response.arg[2]; | |
706 | if (traceLen > USB_CMD_DATA_SIZE) { | |
707 | uint8_t *p = realloc(trace, traceLen); | |
708 | if (p == NULL) { | |
709 | PrintAndLog("Cannot allocate memory for trace"); | |
710 | free(trace); | |
711 | return 2; | |
712 | } | |
713 | trace = p; | |
714 | GetFromBigBuf(trace, traceLen, 0); | |
715 | WaitForResponse(CMD_ACK, NULL); | |
716 | } | |
717 | ||
718 | PrintAndLog("Recorded Activity (TraceLen = %d bytes)", traceLen); | |
719 | PrintAndLog(""); | |
720 | PrintAndLog("Start = Start of Start Bit, End = End of last modulation. Src = Source of Transfer"); | |
721 | PrintAndLog("iso14443a - All times are in carrier periods (1/13.56Mhz)"); | |
722 | PrintAndLog("iClass - Timings are not as accurate"); | |
723 | PrintAndLog(""); | |
724 | PrintAndLog(" Start | End | Src | Data (! denotes parity error) | CRC | Annotation |"); | |
725 | PrintAndLog("------------|------------|-----|-----------------------------------------------------------------|-----|--------------------|"); | |
726 | ||
727 | while(tracepos < traceLen) | |
728 | { | |
729 | tracepos = printTraceLine(tracepos, traceLen, trace, protocol, showWaitCycles, markCRCBytes); | |
730 | } | |
731 | ||
732 | free(trace); | |
733 | return 0; | |
734 | } | |
735 | ||
736 | int CmdHFSearch(const char *Cmd){ | |
737 | ||
738 | char cmdp = param_getchar(Cmd, 0); | |
739 | if (cmdp == 'h' || cmdp == 'H') return usage_hf_search(); | |
740 | ||
741 | PrintAndLog(""); | |
742 | int ans = CmdHF14AReader("s"); | |
743 | ||
744 | if (ans > 0) { | |
745 | PrintAndLog("\nValid ISO14443-A Tag Found - Quiting Search\n"); | |
746 | return ans; | |
747 | } | |
748 | ans = CmdHF14BReader("s"); | |
749 | if (ans) { | |
750 | PrintAndLog("\nValid ISO14443-B Tag Found - Quiting Search\n"); | |
751 | return ans; | |
752 | } | |
753 | ans = HFiClassReader("", false, false); | |
754 | if (ans) { | |
755 | PrintAndLog("\nValid iClass Tag (or PicoPass Tag) Found - Quiting Search\n"); | |
756 | return ans; | |
757 | } | |
758 | ans = HF15Reader("", false); | |
759 | if (ans) { | |
760 | PrintAndLog("\nValid ISO15693 Tag Found - Quiting Search\n"); | |
761 | return ans; | |
762 | } | |
763 | ans = CmdHFTopazReader("s"); | |
764 | if (ans == 0) { | |
765 | PrintAndLog("\nValid Topaz Tag Found - Quiting Search\n"); | |
766 | return 1; | |
767 | } | |
768 | PrintAndLog("\nno known/supported 13.56 MHz tags found\n"); | |
769 | return 0; | |
770 | } | |
771 | ||
772 | int CmdHFSnoop(const char *Cmd) | |
773 | { | |
774 | char cmdp = param_getchar(Cmd, 0); | |
775 | if (cmdp == 'h' || cmdp == 'H') return usage_hf_snoop(); | |
776 | ||
777 | int skippairs = param_get32ex(Cmd, 0, 0, 10); | |
778 | int skiptriggers = param_get32ex(Cmd, 1, 0, 10); | |
779 | ||
780 | UsbCommand c = {CMD_HF_SNIFFER, {skippairs, skiptriggers, 0}}; | |
781 | clearCommandBuffer(); | |
782 | SendCommand(&c); | |
783 | return 0; | |
784 | } | |
785 | ||
786 | static command_t CommandTable[] = { | |
787 | {"help", CmdHelp, 1, "This help"}, | |
788 | {"14a", CmdHF14A, 1, "{ ISO14443A RFIDs... }"}, | |
789 | {"14b", CmdHF14B, 1, "{ ISO14443B RFIDs... }"}, | |
790 | {"15", CmdHF15, 1, "{ ISO15693 RFIDs... }"}, | |
791 | {"epa", CmdHFEPA, 1, "{ German Identification Card... }"}, | |
792 | {"legic", CmdHFLegic, 0, "{ LEGIC RFIDs... }"}, | |
793 | {"iclass", CmdHFiClass, 1, "{ ICLASS RFIDs... }"}, | |
794 | {"mf", CmdHFMF, 1, "{ MIFARE RFIDs... }"}, | |
795 | {"mfu", CmdHFMFUltra, 1, "{ MIFARE Ultralight RFIDs... }"}, | |
796 | {"mfdes", CmdHFMFDes, 1, "{ MIFARE Desfire RFIDs... }"}, | |
797 | {"topaz", CmdHFTopaz, 1, "{ TOPAZ (NFC Type 1) RFIDs... }"}, | |
798 | {"tune", CmdHFTune, 0, "Continuously measure HF antenna tuning"}, | |
799 | {"list", CmdHFList, 1, "List protocol data in trace buffer"}, | |
800 | {"search", CmdHFSearch, 1, "Search for known HF tags [preliminary]"}, | |
801 | {"snoop", CmdHFSnoop, 0, "<samples to skip (10000)> <triggers to skip (1)> Generic LF/HF Snoop in Testing stage"}, | |
802 | {NULL, NULL, 0, NULL} | |
803 | }; | |
804 | ||
805 | int CmdHF(const char *Cmd) { | |
806 | clearCommandBuffer(); | |
807 | CmdsParse(CommandTable, Cmd); | |
808 | return 0; | |
809 | } | |
810 | ||
811 | int CmdHelp(const char *Cmd) { | |
812 | CmdsHelp(CommandTable); | |
813 | return 0; | |
814 | } |