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