]>
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 | if ( (cmd[0] & 0x10) == 0 ) | |
229 | snprintf(exp, size, "R-block ACK"); | |
230 | else | |
231 | snprintf(exp, size, "R-block NACK"); | |
232 | } | |
233 | // I-block | |
234 | else { | |
235 | ||
236 | int pos = (cmd[0] == 2 || cmd[0] == 3) ? 2 : 3; | |
237 | switch ( cmd[pos] ){ | |
238 | case ISO7816_READ_BINARY :snprintf(exp, size, "READ BIN");break; | |
239 | case ISO7816_WRITE_BINARY :snprintf(exp, size, "WRITE BIN");break; | |
240 | case ISO7816_UPDATE_BINARY :snprintf(exp, size, "UPDATE BIN");break; | |
241 | case ISO7816_ERASE_BINARY :snprintf(exp, size, "ERASE BIN");break; | |
242 | case ISO7816_READ_RECORDS :snprintf(exp, size, "READ RECORDS");break; | |
243 | case ISO7816_WRITE_RECORDS :snprintf(exp, size, "WRITE RECORDS");break; | |
244 | case ISO7816_APPEND_RECORD :snprintf(exp, size, "APPEND RECORD");break; | |
245 | case ISO7816_UPDATE_RECORD :snprintf(exp, size, "UPDATE RECORD");break; | |
246 | case ISO7816_GET_DATA :snprintf(exp, size, "GET DATA");break; | |
247 | case ISO7816_PUT_DATA :snprintf(exp, size, "PUT DATA");break; | |
248 | case ISO7816_SELECT_FILE :snprintf(exp, size, "SELECT FILE");break; | |
249 | case ISO7816_VERIFY :snprintf(exp, size, "VERIFY");break; | |
250 | case ISO7816_INTERNAL_AUTHENTICATION :snprintf(exp, size, "INTERNAL AUTH");break; | |
251 | case ISO7816_EXTERNAL_AUTHENTICATION :snprintf(exp, size, "EXTERNAL AUTH");break; | |
252 | case ISO7816_GET_CHALLENGE :snprintf(exp, size, "GET CHALLENGE");break; | |
253 | case ISO7816_MANAGE_CHANNEL :snprintf(exp, size, "MANAGE CHANNEL");break; | |
254 | default :snprintf(exp,size,"?"); break; | |
255 | } | |
256 | } | |
257 | } | |
258 | ||
259 | /** | |
260 | 06 00 = INITIATE | |
261 | 0E xx = SELECT ID (xx = Chip-ID) | |
262 | 0B = Get UID | |
263 | 08 yy = Read Block (yy = block number) | |
264 | 09 yy dd dd dd dd = Write Block (yy = block number; dd dd dd dd = data to be written) | |
265 | 0C = Reset to Inventory | |
266 | 0F = Completion | |
267 | 0A 11 22 33 44 55 66 = Authenticate (11 22 33 44 55 66 = data to authenticate) | |
268 | **/ | |
269 | ||
270 | void annotateIso14443b(char *exp, size_t size, uint8_t* cmd, uint8_t cmdsize) | |
271 | { | |
272 | switch(cmd[0]){ | |
273 | case ISO14443B_REQB : snprintf(exp,size,"REQB");break; | |
274 | case ISO14443B_ATTRIB : snprintf(exp,size,"ATTRIB");break; | |
275 | case ISO14443B_HALT : snprintf(exp,size,"HALT");break; | |
276 | case ISO14443B_INITIATE : snprintf(exp,size,"INITIATE");break; | |
277 | case ISO14443B_SELECT : snprintf(exp,size,"SELECT(%d)",cmd[1]);break; | |
278 | case ISO14443B_GET_UID : snprintf(exp,size,"GET UID");break; | |
279 | case ISO14443B_READ_BLK : snprintf(exp,size,"READ_BLK(%d)", cmd[1]);break; | |
280 | case ISO14443B_WRITE_BLK : snprintf(exp,size,"WRITE_BLK(%d)",cmd[1]);break; | |
281 | case ISO14443B_RESET : snprintf(exp,size,"RESET");break; | |
282 | case ISO14443B_COMPLETION : snprintf(exp,size,"COMPLETION");break; | |
283 | case ISO14443B_AUTHENTICATE : snprintf(exp,size,"AUTHENTICATE");break; | |
284 | case ISO14443B_PING : snprintf(exp,size,"PING");break; | |
285 | case ISO14443B_PONG : snprintf(exp,size,"PONG");break; | |
286 | default : snprintf(exp,size ,"?");break; | |
287 | } | |
288 | } | |
289 | ||
290 | /** | |
291 | * @brief iso14443A_CRC_check Checks CRC in command or response | |
292 | * @param isResponse | |
293 | * @param data | |
294 | * @param len | |
295 | * @return 0 : CRC-command, CRC not ok | |
296 | * 1 : CRC-command, CRC ok | |
297 | * 2 : Not crc-command | |
298 | */ | |
299 | ||
300 | uint8_t iso14443A_CRC_check(bool isResponse, uint8_t* data, uint8_t len) | |
301 | { | |
302 | uint8_t b1,b2; | |
303 | ||
304 | if(len <= 2) return 2; | |
305 | ||
306 | if(isResponse & (len < 6)) return 2; | |
307 | ||
308 | ComputeCrc14443(CRC_14443_A, data, len-2, &b1, &b2); | |
309 | if (b1 != data[len-2] || b2 != data[len-1]) { | |
310 | return 0; | |
311 | } else { | |
312 | return 1; | |
313 | } | |
314 | } | |
315 | ||
316 | ||
317 | /** | |
318 | * @brief iso14443B_CRC_check Checks CRC in command or response | |
319 | * @param isResponse | |
320 | * @param data | |
321 | * @param len | |
322 | * @return 0 : CRC-command, CRC not ok | |
323 | * 1 : CRC-command, CRC ok | |
324 | * 2 : Not crc-command | |
325 | */ | |
326 | ||
327 | uint8_t iso14443B_CRC_check(bool isResponse, uint8_t* data, uint8_t len) | |
328 | { | |
329 | uint8_t b1,b2; | |
330 | ||
331 | if(len <= 2) return 2; | |
332 | ||
333 | ComputeCrc14443(CRC_14443_B, data, len-2, &b1, &b2); | |
334 | if(b1 != data[len-2] || b2 != data[len-1]) { | |
335 | return 0; | |
336 | } | |
337 | return 1; | |
338 | } | |
339 | ||
340 | /** | |
341 | * @brief iclass_CRC_Ok Checks CRC in command or response | |
342 | * @param isResponse | |
343 | * @param data | |
344 | * @param len | |
345 | * @return 0 : CRC-command, CRC not ok | |
346 | * 1 : CRC-command, CRC ok | |
347 | * 2 : Not crc-command | |
348 | */ | |
349 | uint8_t iclass_CRC_check(bool isResponse, uint8_t* data, uint8_t len) | |
350 | { | |
351 | if(len < 4) return 2;//CRC commands (and responses) are all at least 4 bytes | |
352 | ||
353 | uint8_t b1, b2; | |
354 | ||
355 | if(!isResponse)//Commands to tag | |
356 | { | |
357 | /** | |
358 | These commands should have CRC. Total length leftmost | |
359 | 4 READ | |
360 | 4 READ4 | |
361 | 12 UPDATE - unsecured, ends with CRC16 | |
362 | 14 UPDATE - secured, ends with signature instead | |
363 | 4 PAGESEL | |
364 | **/ | |
365 | if(len == 4 || len == 12)//Covers three of them | |
366 | { | |
367 | //Don't include the command byte | |
368 | ComputeCrc14443(CRC_ICLASS, (data+1), len-3, &b1, &b2); | |
369 | return b1 == data[len -2] && b2 == data[len-1]; | |
370 | } | |
371 | return 2; | |
372 | }else{ | |
373 | /** | |
374 | These tag responses should have CRC. Total length leftmost | |
375 | ||
376 | 10 READ data[8] crc[2] | |
377 | 34 READ4 data[32]crc[2] | |
378 | 10 UPDATE data[8] crc[2] | |
379 | 10 SELECT csn[8] crc[2] | |
380 | 10 IDENTIFY asnb[8] crc[2] | |
381 | 10 PAGESEL block1[8] crc[2] | |
382 | 10 DETECT csn[8] crc[2] | |
383 | ||
384 | These should not | |
385 | ||
386 | 4 CHECK chip_response[4] | |
387 | 8 READCHECK data[8] | |
388 | 1 ACTALL sof[1] | |
389 | 1 ACT sof[1] | |
390 | ||
391 | In conclusion, without looking at the command; any response | |
392 | of length 10 or 34 should have CRC | |
393 | **/ | |
394 | if(len != 10 && len != 34) return true; | |
395 | ||
396 | ComputeCrc14443(CRC_ICLASS, data, len-2, &b1, &b2); | |
397 | return b1 == data[len -2] && b2 == data[len-1]; | |
398 | } | |
399 | } | |
400 | ||
401 | ||
402 | bool is_last_record(uint16_t tracepos, uint8_t *trace, uint16_t traceLen) | |
403 | { | |
404 | return(tracepos + sizeof(uint32_t) + sizeof(uint16_t) + sizeof(uint16_t) >= traceLen); | |
405 | } | |
406 | ||
407 | ||
408 | bool next_record_is_response(uint16_t tracepos, uint8_t *trace) | |
409 | { | |
410 | uint16_t next_records_datalen = *((uint16_t *)(trace + tracepos + sizeof(uint32_t) + sizeof(uint16_t))); | |
411 | ||
412 | return(next_records_datalen & 0x8000); | |
413 | } | |
414 | ||
415 | ||
416 | 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) | |
417 | { | |
418 | ||
419 | #define MAX_TOPAZ_READER_CMD_LEN 16 | |
420 | ||
421 | uint32_t last_timestamp = timestamp + *duration; | |
422 | ||
423 | if ((*data_len != 1) || (frame[0] == TOPAZ_WUPA) || (frame[0] == TOPAZ_REQA)) return false; | |
424 | ||
425 | memcpy(topaz_reader_command, frame, *data_len); | |
426 | ||
427 | while (!is_last_record(*tracepos, trace, traceLen) && !next_record_is_response(*tracepos, trace)) { | |
428 | uint32_t next_timestamp = *((uint32_t *)(trace + *tracepos)); | |
429 | *tracepos += sizeof(uint32_t); | |
430 | uint16_t next_duration = *((uint16_t *)(trace + *tracepos)); | |
431 | *tracepos += sizeof(uint16_t); | |
432 | uint16_t next_data_len = *((uint16_t *)(trace + *tracepos)) & 0x7FFF; | |
433 | *tracepos += sizeof(uint16_t); | |
434 | uint8_t *next_frame = (trace + *tracepos); | |
435 | *tracepos += next_data_len; | |
436 | if ((next_data_len == 1) && (*data_len + next_data_len <= MAX_TOPAZ_READER_CMD_LEN)) { | |
437 | memcpy(topaz_reader_command + *data_len, next_frame, next_data_len); | |
438 | *data_len += next_data_len; | |
439 | last_timestamp = next_timestamp + next_duration; | |
440 | } else { | |
441 | // rewind and exit | |
442 | *tracepos = *tracepos - next_data_len - sizeof(uint16_t) - sizeof(uint16_t) - sizeof(uint32_t); | |
443 | break; | |
444 | } | |
445 | uint16_t next_parity_len = (next_data_len-1)/8 + 1; | |
446 | *tracepos += next_parity_len; | |
447 | } | |
448 | ||
449 | *duration = last_timestamp - timestamp; | |
450 | ||
451 | return true; | |
452 | } | |
453 | ||
454 | ||
455 | uint16_t printTraceLine(uint16_t tracepos, uint16_t traceLen, uint8_t *trace, uint8_t protocol, bool showWaitCycles, bool markCRCBytes) | |
456 | { | |
457 | bool isResponse; | |
458 | uint16_t data_len, parity_len; | |
459 | uint32_t duration; | |
460 | uint8_t topaz_reader_command[9]; | |
461 | uint32_t timestamp, first_timestamp, EndOfTransmissionTimestamp; | |
462 | char explanation[30] = {0}; | |
463 | ||
464 | if (tracepos + sizeof(uint32_t) + sizeof(uint16_t) + sizeof(uint16_t) > traceLen) return traceLen; | |
465 | ||
466 | first_timestamp = *((uint32_t *)(trace)); | |
467 | timestamp = *((uint32_t *)(trace + tracepos)); | |
468 | ||
469 | tracepos += 4; | |
470 | duration = *((uint16_t *)(trace + tracepos)); | |
471 | tracepos += 2; | |
472 | data_len = *((uint16_t *)(trace + tracepos)); | |
473 | tracepos += 2; | |
474 | ||
475 | if (data_len & 0x8000) { | |
476 | data_len &= 0x7fff; | |
477 | isResponse = true; | |
478 | } else { | |
479 | isResponse = false; | |
480 | } | |
481 | parity_len = (data_len-1)/8 + 1; | |
482 | ||
483 | if (tracepos + data_len + parity_len > traceLen) { | |
484 | return traceLen; | |
485 | } | |
486 | uint8_t *frame = trace + tracepos; | |
487 | tracepos += data_len; | |
488 | uint8_t *parityBytes = trace + tracepos; | |
489 | tracepos += parity_len; | |
490 | ||
491 | if (protocol == TOPAZ && !isResponse) { | |
492 | // topaz reader commands come in 1 or 9 separate frames with 7 or 8 Bits each. | |
493 | // merge them: | |
494 | if (merge_topaz_reader_frames(timestamp, &duration, &tracepos, traceLen, trace, frame, topaz_reader_command, &data_len)) { | |
495 | frame = topaz_reader_command; | |
496 | } | |
497 | } | |
498 | ||
499 | //Check the CRC status | |
500 | uint8_t crcStatus = 2; | |
501 | ||
502 | if (data_len > 2) { | |
503 | switch (protocol) { | |
504 | case ICLASS: | |
505 | crcStatus = iclass_CRC_check(isResponse, frame, data_len); | |
506 | break; | |
507 | case ISO_14443B: | |
508 | case TOPAZ: | |
509 | crcStatus = iso14443B_CRC_check(isResponse, frame, data_len); | |
510 | break; | |
511 | case ISO_14443A: | |
512 | crcStatus = iso14443A_CRC_check(isResponse, frame, data_len); | |
513 | break; | |
514 | default: | |
515 | break; | |
516 | } | |
517 | } | |
518 | //0 CRC-command, CRC not ok | |
519 | //1 CRC-command, CRC ok | |
520 | //2 Not crc-command | |
521 | ||
522 | //--- Draw the data column | |
523 | char line[16][110]; | |
524 | ||
525 | for (int j = 0; j < data_len && j/16 < 16; j++) { | |
526 | ||
527 | int oddparity = 0x01; | |
528 | int k; | |
529 | ||
530 | for (k=0 ; k<8 ; k++) { | |
531 | oddparity ^= (((frame[j] & 0xFF) >> k) & 0x01); | |
532 | } | |
533 | uint8_t parityBits = parityBytes[j>>3]; | |
534 | if (protocol != ISO_14443B && (isResponse || protocol == ISO_14443A) && (oddparity != ((parityBits >> (7-(j&0x0007))) & 0x01))) { | |
535 | snprintf(line[j/16]+(( j % 16) * 4),110, "%02x! ", frame[j]); | |
536 | ||
537 | } else { | |
538 | snprintf(line[j/16]+(( j % 16) * 4),110, "%02x ", frame[j]); | |
539 | } | |
540 | ||
541 | } | |
542 | ||
543 | if (markCRCBytes) { | |
544 | //CRC-command | |
545 | if(crcStatus == 0 || crcStatus == 1) { | |
546 | char *pos1 = line[(data_len-2)/16]+(((data_len-2) % 16) * 4); | |
547 | (*pos1) = '['; | |
548 | char *pos2 = line[(data_len)/16]+(((data_len) % 16) * 4); | |
549 | sprintf(pos2, "%c", ']'); | |
550 | } | |
551 | } | |
552 | ||
553 | if(data_len == 0){ | |
554 | sprintf(line[0],"<empty trace - possible error>"); | |
555 | } | |
556 | //--- Draw the CRC column | |
557 | char *crc = (crcStatus == 0 ? "!crc" : (crcStatus == 1 ? " ok " : " ")); | |
558 | ||
559 | EndOfTransmissionTimestamp = timestamp + duration; | |
560 | ||
561 | if(!isResponse) | |
562 | { | |
563 | switch(protocol) { | |
564 | case ICLASS: annotateIclass(explanation,sizeof(explanation),frame,data_len); break; | |
565 | case ISO_14443A: annotateIso14443a(explanation,sizeof(explanation),frame,data_len); break; | |
566 | case ISO_14443B: annotateIso14443b(explanation,sizeof(explanation),frame,data_len); break; | |
567 | case TOPAZ: annotateTopaz(explanation,sizeof(explanation),frame,data_len); break; | |
568 | case ISO_7816_4: annotateIso7816(explanation,sizeof(explanation),frame,data_len); break; | |
569 | default: break; | |
570 | } | |
571 | } | |
572 | ||
573 | int num_lines = MIN((data_len - 1)/16 + 1, 16); | |
574 | for (int j = 0; j < num_lines ; j++) { | |
575 | if (j == 0) { | |
576 | PrintAndLog(" %10d | %10d | %s |%-64s | %s| %s", | |
577 | (timestamp - first_timestamp), | |
578 | (EndOfTransmissionTimestamp - first_timestamp), | |
579 | (isResponse ? "Tag" : "Rdr"), | |
580 | line[j], | |
581 | (j == num_lines-1) ? crc : " ", | |
582 | (j == num_lines-1) ? explanation : ""); | |
583 | } else { | |
584 | PrintAndLog(" | | |%-64s | %s| %s", | |
585 | line[j], | |
586 | (j == num_lines-1) ? crc : " ", | |
587 | (j == num_lines-1) ? explanation : ""); | |
588 | } | |
589 | } | |
590 | ||
591 | if (is_last_record(tracepos, trace, traceLen)) return traceLen; | |
592 | ||
593 | if (showWaitCycles && !isResponse && next_record_is_response(tracepos, trace)) { | |
594 | uint32_t next_timestamp = *((uint32_t *)(trace + tracepos)); | |
595 | PrintAndLog(" %10d | %10d | %s |fdt (Frame Delay Time): %d", | |
596 | (EndOfTransmissionTimestamp - first_timestamp), | |
597 | (next_timestamp - first_timestamp), | |
598 | " ", | |
599 | (next_timestamp - EndOfTransmissionTimestamp)); | |
600 | } | |
601 | ||
602 | return tracepos; | |
603 | } | |
604 | ||
605 | ||
606 | int CmdHFList(const char *Cmd) | |
607 | { | |
608 | bool showWaitCycles = false; | |
609 | bool markCRCBytes = false; | |
610 | char type[40] = {0}; | |
611 | int tlen = param_getstr(Cmd,0,type); | |
612 | char param1 = param_getchar(Cmd, 1); | |
613 | char param2 = param_getchar(Cmd, 2); | |
614 | bool errors = false; | |
615 | uint8_t protocol = 0; | |
616 | //Validate params | |
617 | ||
618 | if(tlen == 0) { | |
619 | errors = true; | |
620 | } | |
621 | ||
622 | if(param1 == 'h' | |
623 | || (param1 != 0 && param1 != 'f' && param1 != 'c') | |
624 | || (param2 != 0 && param2 != 'f' && param2 != 'c')) { | |
625 | errors = true; | |
626 | } | |
627 | ||
628 | if(!errors) { | |
629 | if(strcmp(type, "iclass") == 0) { | |
630 | protocol = ICLASS; | |
631 | } else if(strcmp(type, "14a") == 0) { | |
632 | protocol = ISO_14443A; | |
633 | } else if(strcmp(type, "14b") == 0) { | |
634 | protocol = ISO_14443B; | |
635 | } else if(strcmp(type,"topaz")== 0) { | |
636 | protocol = TOPAZ; | |
637 | } else if(strcmp(type,"7816")== 0) { | |
638 | protocol = ISO_7816_4; | |
639 | } else if(strcmp(type,"raw")== 0) { | |
640 | protocol = -1;//No crc, no annotations | |
641 | }else{ | |
642 | errors = true; | |
643 | } | |
644 | } | |
645 | ||
646 | if (errors) { | |
647 | PrintAndLog("List protocol data in trace buffer."); | |
648 | PrintAndLog("Usage: hf list <protocol> [f][c]"); | |
649 | PrintAndLog(" f - show frame delay times as well"); | |
650 | PrintAndLog(" c - mark CRC bytes"); | |
651 | PrintAndLog("Supported <protocol> values:"); | |
652 | PrintAndLog(" raw - just show raw data without annotations"); | |
653 | PrintAndLog(" 14a - interpret data as iso14443a communications"); | |
654 | PrintAndLog(" 14b - interpret data as iso14443b communications"); | |
655 | PrintAndLog(" iclass - interpret data as iclass communications"); | |
656 | PrintAndLog(" topaz - interpret data as topaz communications"); | |
657 | PrintAndLog(" 7816 - interpret data as iso7816-4 communications"); | |
658 | PrintAndLog(""); | |
659 | PrintAndLog("example: hf list 14a f"); | |
660 | PrintAndLog("example: hf list iclass"); | |
661 | return 0; | |
662 | } | |
663 | ||
664 | ||
665 | if (param1 == 'f' || param2 == 'f') { | |
666 | showWaitCycles = true; | |
667 | } | |
668 | ||
669 | if (param1 == 'c' || param2 == 'c') { | |
670 | markCRCBytes = true; | |
671 | } | |
672 | ||
673 | uint8_t *trace; | |
674 | uint16_t tracepos = 0; | |
675 | trace = malloc(USB_CMD_DATA_SIZE); | |
676 | ||
677 | // Query for the size of the trace | |
678 | UsbCommand response; | |
679 | GetFromBigBuf(trace, USB_CMD_DATA_SIZE, 0); | |
680 | WaitForResponse(CMD_ACK, &response); | |
681 | uint16_t traceLen = response.arg[2]; | |
682 | if (traceLen > USB_CMD_DATA_SIZE) { | |
683 | uint8_t *p = realloc(trace, traceLen); | |
684 | if (p == NULL) { | |
685 | PrintAndLog("Cannot allocate memory for trace"); | |
686 | free(trace); | |
687 | return 2; | |
688 | } | |
689 | trace = p; | |
690 | GetFromBigBuf(trace, traceLen, 0); | |
691 | WaitForResponse(CMD_ACK, NULL); | |
692 | } | |
693 | ||
694 | PrintAndLog("Recorded Activity (TraceLen = %d bytes)", traceLen); | |
695 | PrintAndLog(""); | |
696 | PrintAndLog("Start = Start of Start Bit, End = End of last modulation. Src = Source of Transfer"); | |
697 | PrintAndLog("iso14443a - All times are in carrier periods (1/13.56Mhz)"); | |
698 | PrintAndLog("iClass - Timings are not as accurate"); | |
699 | PrintAndLog(""); | |
700 | PrintAndLog(" Start | End | Src | Data (! denotes parity error) | CRC | Annotation |"); | |
701 | PrintAndLog("------------|------------|-----|-----------------------------------------------------------------|-----|--------------------|"); | |
702 | ||
703 | while(tracepos < traceLen) | |
704 | { | |
705 | tracepos = printTraceLine(tracepos, traceLen, trace, protocol, showWaitCycles, markCRCBytes); | |
706 | } | |
707 | ||
708 | free(trace); | |
709 | return 0; | |
710 | } | |
711 | ||
712 | int CmdHFSearch(const char *Cmd){ | |
713 | int ans = 0; | |
714 | PrintAndLog(""); | |
715 | ans = CmdHF14AReader("s"); | |
716 | if (ans > 0) { | |
717 | PrintAndLog("\nValid ISO14443A Tag Found - Quiting Search\n"); | |
718 | return ans; | |
719 | } | |
720 | ans = HF14BInfo(false); | |
721 | if (ans) { | |
722 | PrintAndLog("\nValid ISO14443B Tag Found - Quiting Search\n"); | |
723 | return ans; | |
724 | } | |
725 | ans = HFiClassReader("", false, false); | |
726 | if (ans) { | |
727 | PrintAndLog("\nValid iClass Tag (or PicoPass Tag) Found - Quiting Search\n"); | |
728 | return ans; | |
729 | } | |
730 | ans = HF15Reader("", false); | |
731 | if (ans) { | |
732 | PrintAndLog("\nValid ISO15693 Tag Found - Quiting Search\n"); | |
733 | return ans; | |
734 | } | |
735 | PrintAndLog("\nno known/supported 13.56 MHz tags found\n"); | |
736 | return 0; | |
737 | } | |
738 | ||
739 | static command_t CommandTable[] = | |
740 | { | |
741 | {"help", CmdHelp, 1, "This help"}, | |
742 | {"14a", CmdHF14A, 1, "{ ISO14443A RFIDs... }"}, | |
743 | {"14b", CmdHF14B, 1, "{ ISO14443B RFIDs... }"}, | |
744 | {"15", CmdHF15, 1, "{ ISO15693 RFIDs... }"}, | |
745 | {"epa", CmdHFEPA, 1, "{ German Identification Card... }"}, | |
746 | {"legic", CmdHFLegic, 0, "{ LEGIC RFIDs... }"}, | |
747 | {"iclass", CmdHFiClass, 1, "{ ICLASS RFIDs... }"}, | |
748 | {"mf", CmdHFMF, 1, "{ MIFARE RFIDs... }"}, | |
749 | {"mfu", CmdHFMFUltra, 1, "{ MIFARE Ultralight RFIDs... }"}, | |
750 | {"mfdes", CmdHFMFDes, 1, "{ MIFARE Desfire RFIDs... }"}, | |
751 | {"topaz", CmdHFTopaz, 1, "{ TOPAZ (NFC Type 1) RFIDs... }"}, | |
752 | {"tune", CmdHFTune, 0, "Continuously measure HF antenna tuning"}, | |
753 | {"list", CmdHFList, 1, "List protocol data in trace buffer"}, | |
754 | {"search", CmdHFSearch, 1, "Search for known HF tags [preliminary]"}, | |
755 | {NULL, NULL, 0, NULL} | |
756 | }; | |
757 | ||
758 | int CmdHF(const char *Cmd) | |
759 | { | |
760 | CmdsParse(CommandTable, Cmd); | |
761 | return 0; | |
762 | } | |
763 | ||
764 | int CmdHelp(const char *Cmd) | |
765 | { | |
766 | CmdsHelp(CommandTable); | |
767 | return 0; | |
768 | } |