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