]> git.zerfleddert.de Git - proxmark3-svn/blob - client/cmdhf14a.c
CHG: Tested to unfold some loops inside the crypto1 implementation to see if it gener...
[proxmark3-svn] / client / cmdhf14a.c
1 //-----------------------------------------------------------------------------
2 // 2011, Merlok
3 // Copyright (C) 2010 iZsh <izsh at fail0verflow.com>, Hagen Fritsch
4 //
5 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
6 // at your option, any later version. See the LICENSE.txt file for the text of
7 // the license.
8 //-----------------------------------------------------------------------------
9 // High frequency ISO14443A commands
10 //-----------------------------------------------------------------------------
11
12 #include <stdio.h>
13 #include <stdlib.h>
14 #include <string.h>
15 #include <unistd.h>
16 #include "util.h"
17 #include "iso14443crc.h"
18 #include "data.h"
19 #include "proxmark3.h"
20 #include "ui.h"
21 #include "cmdparser.h"
22 #include "cmdhf14a.h"
23 #include "common.h"
24 #include "cmdmain.h"
25 #include "mifare.h"
26 #include "cmdhfmfu.h"
27 #include "nonce2key/nonce2key.h"
28 #include "cmdhf.h"
29
30 #define llx PRIx64
31
32 static int CmdHelp(const char *Cmd);
33 static void waitCmd(uint8_t iLen);
34
35 // structure and database for uid -> tagtype lookups
36 typedef struct {
37 uint8_t uid;
38 char* desc;
39 } manufactureName;
40
41 const manufactureName manufactureMapping[] = {
42 // ID, "Vendor Country"
43 { 0x01, "Motorola UK" },
44 { 0x02, "ST Microelectronics SA France" },
45 { 0x03, "Hitachi, Ltd Japan" },
46 { 0x04, "NXP Semiconductors Germany" },
47 { 0x05, "Infineon Technologies AG Germany" },
48 { 0x06, "Cylink USA" },
49 { 0x07, "Texas Instrument France" },
50 { 0x08, "Fujitsu Limited Japan" },
51 { 0x09, "Matsushita Electronics Corporation, Semiconductor Company Japan" },
52 { 0x0A, "NEC Japan" },
53 { 0x0B, "Oki Electric Industry Co. Ltd Japan" },
54 { 0x0C, "Toshiba Corp. Japan" },
55 { 0x0D, "Mitsubishi Electric Corp. Japan" },
56 { 0x0E, "Samsung Electronics Co. Ltd Korea" },
57 { 0x0F, "Hynix / Hyundai, Korea" },
58 { 0x10, "LG-Semiconductors Co. Ltd Korea" },
59 { 0x11, "Emosyn-EM Microelectronics USA" },
60 { 0x12, "INSIDE Technology France" },
61 { 0x13, "ORGA Kartensysteme GmbH Germany" },
62 { 0x14, "SHARP Corporation Japan" },
63 { 0x15, "ATMEL France" },
64 { 0x16, "EM Microelectronic-Marin SA Switzerland" },
65 { 0x17, "KSW Microtec GmbH Germany" },
66 { 0x18, "ZMD AG Germany" },
67 { 0x19, "XICOR, Inc. USA" },
68 { 0x1A, "Sony Corporation Japan Identifier Company Country" },
69 { 0x1B, "Malaysia Microelectronic Solutions Sdn. Bhd Malaysia" },
70 { 0x1C, "Emosyn USA" },
71 { 0x1D, "Shanghai Fudan Microelectronics Co. Ltd. P.R. China" },
72 { 0x1E, "Magellan Technology Pty Limited Australia" },
73 { 0x1F, "Melexis NV BO Switzerland" },
74 { 0x20, "Renesas Technology Corp. Japan" },
75 { 0x21, "TAGSYS France" },
76 { 0x22, "Transcore USA" },
77 { 0x23, "Shanghai belling corp., ltd. China" },
78 { 0x24, "Masktech Germany Gmbh Germany" },
79 { 0x25, "Innovision Research and Technology Plc UK" },
80 { 0x26, "Hitachi ULSI Systems Co., Ltd. Japan" },
81 { 0x27, "Cypak AB Sweden" },
82 { 0x28, "Ricoh Japan" },
83 { 0x29, "ASK France" },
84 { 0x2A, "Unicore Microsystems, LLC Russian Federation" },
85 { 0x2B, "Dallas Semiconductor/Maxim USA" },
86 { 0x2C, "Impinj, Inc. USA" },
87 { 0x2D, "RightPlug Alliance USA" },
88 { 0x2E, "Broadcom Corporation USA" },
89 { 0x2F, "MStar Semiconductor, Inc Taiwan, ROC" },
90 { 0x30, "BeeDar Technology Inc. USA" },
91 { 0x31, "RFIDsec Denmark" },
92 { 0x32, "Schweizer Electronic AG Germany" },
93 { 0x33, "AMIC Technology Corp Taiwan" },
94 { 0x34, "Mikron JSC Russia" },
95 { 0x35, "Fraunhofer Institute for Photonic Microsystems Germany" },
96 { 0x36, "IDS Microchip AG Switzerland" },
97 { 0x37, "Kovio USA" },
98 { 0x38, "HMT Microelectronic Ltd Switzerland Identifier Company Country" },
99 { 0x39, "Silicon Craft Technology Thailand" },
100 { 0x3A, "Advanced Film Device Inc. Japan" },
101 { 0x3B, "Nitecrest Ltd UK" },
102 { 0x3C, "Verayo Inc. USA" },
103 { 0x3D, "HID Global USA" },
104 { 0x3E, "Productivity Engineering Gmbh Germany" },
105 { 0x3F, "Austriamicrosystems AG (reserved) Austria" },
106 { 0x40, "Gemalto SA France" },
107 { 0x41, "Renesas Electronics Corporation Japan" },
108 { 0x42, "3Alogics Inc Korea" },
109 { 0x43, "Top TroniQ Asia Limited Hong Kong" },
110 { 0x44, "Gentag Inc (USA) USA" },
111 { 0x00, "no tag-info available" } // must be the last entry
112 };
113
114
115 // get a product description based on the UID
116 // uid[8] tag uid
117 // returns description of the best match
118 char* getTagInfo(uint8_t uid) {
119
120 int i;
121 int len = sizeof(manufactureMapping) / sizeof(manufactureName);
122
123 for ( i = 0; i < len; ++i )
124 if ( uid == manufactureMapping[i].uid)
125 return manufactureMapping[i].desc;
126
127 //No match, return default
128 return manufactureMapping[len-1].desc;
129 }
130
131
132 int usage_hf_14a_sim(void) {
133 PrintAndLog("\n Emulating ISO/IEC 14443 type A tag with 4 or 7 byte UID\n");
134 PrintAndLog("Usage: hf 14a sim t <type> u <uid> x");
135 PrintAndLog(" Options : ");
136 PrintAndLog(" h : this help");
137 PrintAndLog(" t : 1 = MIFARE Classic");
138 PrintAndLog(" 2 = MIFARE Ultralight");
139 PrintAndLog(" 3 = MIFARE Desfire");
140 PrintAndLog(" 4 = ISO/IEC 14443-4");
141 PrintAndLog(" 5 = MIFARE Tnp3xxx");
142 PrintAndLog(" 6 = MIFARE Mini");
143 PrintAndLog(" 7 = AMIIBO (NTAG 215), pack 0x8080");
144 PrintAndLog(" u : 4 or 7 byte UID");
145 PrintAndLog(" x : (Optional) performs the 'reader attack', nr/ar attack against a legitimate reader");
146 PrintAndLog("\n sample : hf 14a sim t 1 u 1122344");
147 PrintAndLog(" : hf 14a sim t 1 u 1122344 x\n");
148 return 0;
149 }
150 int usage_hf_14a_sniff(void){
151 PrintAndLog("It get data from the field and saves it into command buffer.");
152 PrintAndLog("Buffer accessible from command 'hf list 14a'");
153 PrintAndLog("Usage: hf 14a sniff [c][r]");
154 PrintAndLog("c - triggered by first data from card");
155 PrintAndLog("r - triggered by first 7-bit request from reader (REQ,WUP,...)");
156 PrintAndLog("sample: hf 14a sniff c r");
157 return 0;
158 }
159 int usage_hf_14a_raw(void){
160 PrintAndLog("Usage: hf 14a raw [-h] [-r] [-c] [-p] [-a] [-T] [-t] <milliseconds> [-b] <number of bits> <0A 0B 0C ... hex>");
161 PrintAndLog(" -h this help");
162 PrintAndLog(" -r do not read response");
163 PrintAndLog(" -c calculate and append CRC");
164 PrintAndLog(" -p leave the signal field ON after receive");
165 PrintAndLog(" -a active signal field ON without select");
166 PrintAndLog(" -s active signal field ON with select");
167 PrintAndLog(" -b number of bits to send. Useful for send partial byte");
168 PrintAndLog(" -t timeout in ms");
169 PrintAndLog(" -T use Topaz protocol to send command");
170 return 0;
171 }
172
173 int CmdHF14AList(const char *Cmd)
174 {
175 //PrintAndLog("Deprecated command, use 'hf list 14a' instead");
176 CmdHFList("14a");
177 return 0;
178 }
179
180 int CmdHF14AReader(const char *Cmd)
181 {
182 UsbCommand c = {CMD_READER_ISO_14443a, {ISO14A_CONNECT | ISO14A_NO_DISCONNECT, 0, 0}};
183 clearCommandBuffer();
184 SendCommand(&c);
185 UsbCommand resp;
186 WaitForResponse(CMD_ACK,&resp);
187
188 iso14a_card_select_t card;
189 memcpy(&card, (iso14a_card_select_t *)resp.d.asBytes, sizeof(iso14a_card_select_t));
190
191 uint64_t select_status = resp.arg[0]; // 0: couldn't read, 1: OK, with ATS, 2: OK, no ATS, 3: proprietary Anticollision
192
193 if(select_status == 0) {
194 if (Cmd[0] != 's') PrintAndLog("iso14443a card select failed");
195 // disconnect
196 c.arg[0] = 0;
197 c.arg[1] = 0;
198 c.arg[2] = 0;
199 SendCommand(&c);
200 return 0;
201 }
202
203 if(select_status == 3) {
204 PrintAndLog("Card doesn't support standard iso14443-3 anticollision");
205 PrintAndLog("ATQA : %02x %02x", card.atqa[1], card.atqa[0]);
206 // disconnect
207 c.arg[0] = 0;
208 c.arg[1] = 0;
209 c.arg[2] = 0;
210 SendCommand(&c);
211 return 0;
212 }
213
214 PrintAndLog(" UID : %s", sprint_hex(card.uid, card.uidlen));
215 PrintAndLog("ATQA : %02x %02x", card.atqa[1], card.atqa[0]);
216 PrintAndLog(" SAK : %02x [%d]", card.sak, resp.arg[0]);
217
218 switch (card.sak) {
219 case 0x00:
220
221 //***************************************test****************
222 ul_switch_off_field();
223
224 uint32_t tagT = GetHF14AMfU_Type();
225 ul_print_type(tagT, 0);
226
227 //reconnect for further tests
228 c.arg[0] = ISO14A_CONNECT | ISO14A_NO_DISCONNECT;
229 c.arg[1] = 0;
230 c.arg[2] = 0;
231
232 clearCommandBuffer();
233 SendCommand(&c);
234
235 UsbCommand resp;
236 WaitForResponse(CMD_ACK,&resp);
237
238 memcpy(&card, (iso14a_card_select_t *)resp.d.asBytes, sizeof(iso14a_card_select_t));
239
240 select_status = resp.arg[0]; // 0: couldn't read, 1: OK, with ATS, 2: OK, no ATS
241
242 if(select_status == 0) {
243 ul_switch_off_field();
244 return 0;
245 }
246
247 /* orig
248 // check if the tag answers to GETVERSION (0x60)
249 c.arg[0] = ISO14A_RAW | ISO14A_APPEND_CRC | ISO14A_NO_DISCONNECT;
250 c.arg[1] = 1;
251 c.arg[2] = 0;
252 c.d.asBytes[0] = 0x60;
253 SendCommand(&c);
254 WaitForResponse(CMD_ACK,&resp);
255
256 uint8_t version[10] = {0};
257 memcpy(version, resp.d.asBytes, resp.arg[0] < sizeof(version) ? resp.arg[0] : sizeof(version));
258 uint8_t len = resp.arg[0] & 0xff;
259 switch ( len){
260 // todo, identify "Magic UL-C tags". // they usually have a static nonce response to 0x1A command.
261 // UL-EV1, size, check version[6] == 0x0b (smaller) 0x0b * 4 == 48
262 case 0x0A:PrintAndLog("TYPE : NXP MIFARE Ultralight EV1 %d bytes", (version[6] == 0xB) ? 48 : 128); break;
263 case 0x01:PrintAndLog("TYPE : NXP MIFARE Ultralight C");break;
264 case 0x00:PrintAndLog("TYPE : NXP MIFARE Ultralight");break;
265 }
266 */
267 break;
268 case 0x01: PrintAndLog("TYPE : NXP TNP3xxx Activision Game Appliance"); break;
269 case 0x04: PrintAndLog("TYPE : NXP MIFARE (various !DESFire !DESFire EV1)"); break;
270 case 0x08: PrintAndLog("TYPE : NXP MIFARE CLASSIC 1k | Plus 2k SL1"); break;
271 case 0x09: PrintAndLog("TYPE : NXP MIFARE Mini 0.3k"); break;
272 case 0x10: PrintAndLog("TYPE : NXP MIFARE Plus 2k SL2"); break;
273 case 0x11: PrintAndLog("TYPE : NXP MIFARE Plus 4k SL2"); break;
274 case 0x18: PrintAndLog("TYPE : NXP MIFARE Classic 4k | Plus 4k SL1"); break;
275 case 0x20: PrintAndLog("TYPE : NXP MIFARE DESFire 4k | DESFire EV1 2k/4k/8k | Plus 2k/4k SL3 | JCOP 31/41"); break;
276 case 0x24: PrintAndLog("TYPE : NXP MIFARE DESFire | DESFire EV1"); break;
277 case 0x28: PrintAndLog("TYPE : JCOP31 or JCOP41 v2.3.1"); break;
278 case 0x38: PrintAndLog("TYPE : Nokia 6212 or 6131 MIFARE CLASSIC 4K"); break;
279 case 0x88: PrintAndLog("TYPE : Infineon MIFARE CLASSIC 1K"); break;
280 case 0x98: PrintAndLog("TYPE : Gemplus MPCOS"); break;
281 default: ;
282 }
283
284 // Double & triple sized UID, can be mapped to a manufacturer.
285 if ( card.uidlen > 4 ) {
286 PrintAndLog("MANUFACTURER : %s", getTagInfo(card.uid[0]));
287 }
288
289 // try to request ATS even if tag claims not to support it
290 if (select_status == 2) {
291 uint8_t rats[] = { 0xE0, 0x80 }; // FSDI=8 (FSD=256), CID=0
292 c.arg[0] = ISO14A_RAW | ISO14A_APPEND_CRC | ISO14A_NO_DISCONNECT;
293 c.arg[1] = 2;
294 c.arg[2] = 0;
295 memcpy(c.d.asBytes, rats, 2);
296 clearCommandBuffer();
297 SendCommand(&c);
298 WaitForResponse(CMD_ACK,&resp);
299
300 memcpy(card.ats, resp.d.asBytes, resp.arg[0]);
301 card.ats_len = resp.arg[0]; // note: ats_len includes CRC Bytes
302 }
303
304 if(card.ats_len >= 3) { // a valid ATS consists of at least the length byte (TL) and 2 CRC bytes
305 bool ta1 = 0, tb1 = 0, tc1 = 0;
306 int pos;
307
308 if (select_status == 2) {
309 PrintAndLog("SAK incorrectly claims that card doesn't support RATS");
310 }
311 PrintAndLog(" ATS : %s", sprint_hex(card.ats, card.ats_len));
312 PrintAndLog(" - TL : length is %d bytes", card.ats[0]);
313 if (card.ats[0] != card.ats_len - 2) {
314 PrintAndLog("ATS may be corrupted. Length of ATS (%d bytes incl. 2 Bytes CRC) doesn't match TL", card.ats_len);
315 }
316
317 if (card.ats[0] > 1) { // there is a format byte (T0)
318 ta1 = (card.ats[1] & 0x10) == 0x10;
319 tb1 = (card.ats[1] & 0x20) == 0x20;
320 tc1 = (card.ats[1] & 0x40) == 0x40;
321 int16_t fsci = card.ats[1] & 0x0f;
322 PrintAndLog(" - T0 : TA1 is%s present, TB1 is%s present, "
323 "TC1 is%s present, FSCI is %d (FSC = %ld)",
324 (ta1 ? "" : " NOT"), (tb1 ? "" : " NOT"), (tc1 ? "" : " NOT"),
325 fsci,
326 fsci < 5 ? (fsci - 2) * 8 :
327 fsci < 8 ? (fsci - 3) * 32 :
328 fsci == 8 ? 256 :
329 -1
330 );
331 }
332 pos = 2;
333 if (ta1) {
334 char dr[16], ds[16];
335 dr[0] = ds[0] = '\0';
336 if (card.ats[pos] & 0x10) strcat(ds, "2, ");
337 if (card.ats[pos] & 0x20) strcat(ds, "4, ");
338 if (card.ats[pos] & 0x40) strcat(ds, "8, ");
339 if (card.ats[pos] & 0x01) strcat(dr, "2, ");
340 if (card.ats[pos] & 0x02) strcat(dr, "4, ");
341 if (card.ats[pos] & 0x04) strcat(dr, "8, ");
342 if (strlen(ds) != 0) ds[strlen(ds) - 2] = '\0';
343 if (strlen(dr) != 0) dr[strlen(dr) - 2] = '\0';
344 PrintAndLog(" - TA1 : different divisors are%s supported, "
345 "DR: [%s], DS: [%s]",
346 (card.ats[pos] & 0x80 ? " NOT" : ""), dr, ds);
347 pos++;
348 }
349 if (tb1) {
350 uint32_t sfgi = card.ats[pos] & 0x0F;
351 uint32_t fwi = card.ats[pos] >> 4;
352 PrintAndLog(" - TB1 : SFGI = %d (SFGT = %s%ld/fc), FWI = %d (FWT = %ld/fc)",
353 (sfgi),
354 sfgi ? "" : "(not needed) ",
355 sfgi ? (1 << 12) << sfgi : 0,
356 fwi,
357 (1 << 12) << fwi
358 );
359 pos++;
360 }
361 if (tc1) {
362 PrintAndLog(" - TC1 : NAD is%s supported, CID is%s supported",
363 (card.ats[pos] & 0x01) ? "" : " NOT",
364 (card.ats[pos] & 0x02) ? "" : " NOT");
365 pos++;
366 }
367 if (card.ats[0] > pos) {
368 char *tip = "";
369 if (card.ats[0] - pos >= 7) {
370 if (memcmp(card.ats + pos, "\xC1\x05\x2F\x2F\x01\xBC\xD6", 7) == 0) {
371 tip = "-> MIFARE Plus X 2K or 4K";
372 } else if (memcmp(card.ats + pos, "\xC1\x05\x2F\x2F\x00\x35\xC7", 7) == 0) {
373 tip = "-> MIFARE Plus S 2K or 4K";
374 }
375 }
376 PrintAndLog(" - HB : %s%s", sprint_hex(card.ats + pos, card.ats[0] - pos), tip);
377 if (card.ats[pos] == 0xC1) {
378 PrintAndLog(" c1 -> Mifare or (multiple) virtual cards of various type");
379 PrintAndLog(" %02x -> Length is %d bytes",
380 card.ats[pos + 1], card.ats[pos + 1]);
381 switch (card.ats[pos + 2] & 0xf0) {
382 case 0x10:
383 PrintAndLog(" 1x -> MIFARE DESFire");
384 break;
385 case 0x20:
386 PrintAndLog(" 2x -> MIFARE Plus");
387 break;
388 }
389 switch (card.ats[pos + 2] & 0x0f) {
390 case 0x00:
391 PrintAndLog(" x0 -> <1 kByte");
392 break;
393 case 0x01:
394 PrintAndLog(" x1 -> 1 kByte");
395 break;
396 case 0x02:
397 PrintAndLog(" x2 -> 2 kByte");
398 break;
399 case 0x03:
400 PrintAndLog(" x3 -> 4 kByte");
401 break;
402 case 0x04:
403 PrintAndLog(" x4 -> 8 kByte");
404 break;
405 }
406 switch (card.ats[pos + 3] & 0xf0) {
407 case 0x00:
408 PrintAndLog(" 0x -> Engineering sample");
409 break;
410 case 0x20:
411 PrintAndLog(" 2x -> Released");
412 break;
413 }
414 switch (card.ats[pos + 3] & 0x0f) {
415 case 0x00:
416 PrintAndLog(" x0 -> Generation 1");
417 break;
418 case 0x01:
419 PrintAndLog(" x1 -> Generation 2");
420 break;
421 case 0x02:
422 PrintAndLog(" x2 -> Generation 3");
423 break;
424 }
425 switch (card.ats[pos + 4] & 0x0f) {
426 case 0x00:
427 PrintAndLog(" x0 -> Only VCSL supported");
428 break;
429 case 0x01:
430 PrintAndLog(" x1 -> VCS, VCSL, and SVC supported");
431 break;
432 case 0x0E:
433 PrintAndLog(" xE -> no VCS command supported");
434 break;
435 }
436 }
437 }
438 } else {
439 PrintAndLog("proprietary non iso14443-4 card found, RATS not supported");
440 }
441
442
443 // try to see if card responses to "chinese magic backdoor" commands.
444 uint8_t isOK = 0;
445 clearCommandBuffer();
446 c.cmd = CMD_MIFARE_CIDENT;
447 c.arg[0] = 0;
448 c.arg[1] = 0;
449 c.arg[2] = 0;
450 SendCommand(&c);
451 if (WaitForResponseTimeout(CMD_ACK, &resp, 1500))
452 isOK = resp.arg[0] & 0xff;
453
454 PrintAndLog("Answers to magic commands (GEN1): %s", (isOK ? "YES" : "NO") );
455
456 // disconnect
457 c.cmd = CMD_READER_ISO_14443a;
458 c.arg[0] = 0;
459 c.arg[1] = 0;
460 c.arg[2] = 0;
461 SendCommand(&c);
462
463 return select_status;
464 }
465
466 // Collect ISO14443 Type A UIDs
467 int CmdHF14ACUIDs(const char *Cmd)
468 {
469 // requested number of UIDs
470 int n = atoi(Cmd);
471 // collect at least 1 (e.g. if no parameter was given)
472 n = n > 0 ? n : 1;
473
474 PrintAndLog("Collecting %d UIDs", n);
475 PrintAndLog("Start: %u", time(NULL));
476 // repeat n times
477 for (int i = 0; i < n; i++) {
478 // execute anticollision procedure
479 UsbCommand c = {CMD_READER_ISO_14443a, {ISO14A_CONNECT, 0, 0}};
480 SendCommand(&c);
481
482 UsbCommand resp;
483 WaitForResponse(CMD_ACK,&resp);
484
485 iso14a_card_select_t *card = (iso14a_card_select_t *) resp.d.asBytes;
486
487 // check if command failed
488 if (resp.arg[0] == 0) {
489 PrintAndLog("Card select failed.");
490 } else {
491 char uid_string[20];
492 for (uint16_t i = 0; i < card->uidlen; i++) {
493 sprintf(&uid_string[2*i], "%02X", card->uid[i]);
494 }
495 PrintAndLog("%s", uid_string);
496 }
497 }
498 PrintAndLog("End: %u", time(NULL));
499
500 return 1;
501 }
502
503 // ## simulate iso14443a tag
504 // ## greg - added ability to specify tag UID
505 int CmdHF14ASim(const char *Cmd)
506 {
507 bool errors = FALSE;
508 uint8_t flags = 0;
509 uint8_t tagtype = 1;
510 uint64_t uid = 0;
511 uint8_t cmdp = 0;
512
513 while(param_getchar(Cmd, cmdp) != 0x00)
514 {
515 switch(param_getchar(Cmd, cmdp))
516 {
517 case 'h':
518 case 'H':
519 return usage_hf_14a_sim();
520 case 't':
521 case 'T':
522 // Retrieve the tag type
523 tagtype = param_get8ex(Cmd, cmdp+1, 0, 10);
524 if (tagtype == 0)
525 errors = true;
526 cmdp += 2;
527 break;
528 case 'u':
529 case 'U':
530 // Retrieve the full 4 or 7 byte long uid
531 uid = param_get64ex(Cmd, cmdp+1, 0, 16);
532 if (uid == 0 )
533 errors = TRUE;
534
535 if (uid > 0xffffffff) {
536 PrintAndLog("Emulating ISO/IEC 14443 type A tag with 7 byte UID (%014"llx")",uid);
537 flags |= FLAG_7B_UID_IN_DATA;
538 } else {
539 PrintAndLog("Emulating ISO/IEC 14443 type A tag with 4 byte UID (%08x)",uid);
540 flags |= FLAG_4B_UID_IN_DATA;
541 }
542 cmdp += 2;
543 break;
544 case 'x':
545 case 'X':
546 flags |= FLAG_NR_AR_ATTACK;
547 cmdp++;
548 break;
549 default:
550 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
551 errors = true;
552 break;
553 }
554 if(errors) break;
555 }
556
557 //Validations
558 if (errors) return usage_hf_14a_sim();
559
560 PrintAndLog("Press pm3-button to abort simulation");
561
562 UsbCommand c = {CMD_SIMULATE_TAG_ISO_14443a,{ tagtype, flags, 0 }};
563
564 num_to_bytes(uid, 7, c.d.asBytes);
565 clearCommandBuffer();
566 SendCommand(&c);
567
568 uint8_t data[40];
569 uint8_t key[6];
570 UsbCommand resp;
571 while(!ukbhit()){
572 if ( WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
573 if ( (resp.arg[0] & 0xffff) == CMD_SIMULATE_MIFARE_CARD ){
574 memset(data, 0x00, sizeof(data));
575 memset(key, 0x00, sizeof(key));
576 int len = (resp.arg[1] > sizeof(data)) ? sizeof(data) : resp.arg[1];
577 memcpy(data, resp.d.asBytes, len);
578 tryMfk32(uid, data, key);
579 tryMfk32_moebius(uid, data, key);
580 //tryMfk64(uid, data, key);
581 PrintAndLog("--");
582 }
583 }
584 }
585 return 0;
586 }
587
588 int CmdHF14ASniff(const char *Cmd) {
589 int param = 0;
590
591 uint8_t ctmp = param_getchar(Cmd, 0) ;
592 if (ctmp == 'h' || ctmp == 'H') return usage_hf_14a_sniff();
593
594 for (int i = 0; i < 2; i++) {
595 ctmp = param_getchar(Cmd, i);
596 if (ctmp == 'c' || ctmp == 'C') param |= 0x01;
597 if (ctmp == 'r' || ctmp == 'R') param |= 0x02;
598 }
599
600 UsbCommand c = {CMD_SNOOP_ISO_14443a, {param, 0, 0}};
601 clearCommandBuffer();
602 SendCommand(&c);
603 return 0;
604 }
605
606 int CmdHF14ACmdRaw(const char *cmd) {
607 UsbCommand c = {CMD_READER_ISO_14443a, {0, 0, 0}};
608 bool reply=1;
609 bool crc = FALSE;
610 bool power = FALSE;
611 bool active = FALSE;
612 bool active_select = FALSE;
613 uint16_t numbits=0;
614 bool bTimeout = FALSE;
615 uint32_t timeout=0;
616 bool topazmode = FALSE;
617 char buf[5]="";
618 int i=0;
619 uint8_t data[USB_CMD_DATA_SIZE];
620 uint16_t datalen=0;
621 uint32_t temp;
622
623 if (strlen(cmd)<2) return usage_hf_14a_raw();
624
625 // strip
626 while (*cmd==' ' || *cmd=='\t') cmd++;
627
628 while (cmd[i]!='\0') {
629 if (cmd[i]==' ' || cmd[i]=='\t') { i++; continue; }
630 if (cmd[i]=='-') {
631 switch (cmd[i+1]) {
632 case 'H':
633 case 'h':
634 return usage_hf_14a_raw();
635 case 'r':
636 reply = FALSE;
637 break;
638 case 'c':
639 crc = TRUE;
640 break;
641 case 'p':
642 power = TRUE;
643 break;
644 case 'a':
645 active = TRUE;
646 break;
647 case 's':
648 active_select = TRUE;
649 break;
650 case 'b':
651 sscanf(cmd+i+2,"%d",&temp);
652 numbits = temp & 0xFFFF;
653 i+=3;
654 while(cmd[i]!=' ' && cmd[i]!='\0') { i++; }
655 i-=2;
656 break;
657 case 't':
658 bTimeout = TRUE;
659 sscanf(cmd+i+2,"%d",&temp);
660 timeout = temp;
661 i+=3;
662 while(cmd[i]!=' ' && cmd[i]!='\0') { i++; }
663 i-=2;
664 break;
665 case 'T':
666 topazmode = TRUE;
667 break;
668 default:
669 return usage_hf_14a_raw();
670 }
671 i+=2;
672 continue;
673 }
674 if ((cmd[i]>='0' && cmd[i]<='9') ||
675 (cmd[i]>='a' && cmd[i]<='f') ||
676 (cmd[i]>='A' && cmd[i]<='F') ) {
677 buf[strlen(buf)+1]=0;
678 buf[strlen(buf)]=cmd[i];
679 i++;
680
681 if (strlen(buf)>=2) {
682 sscanf(buf,"%x",&temp);
683 data[datalen]=(uint8_t)(temp & 0xff);
684 *buf=0;
685 if (++datalen >= sizeof(data)){
686 if (crc)
687 PrintAndLog("Buffer is full, we can't add CRC to your data");
688 break;
689 }
690 }
691 continue;
692 }
693 PrintAndLog("Invalid char on input");
694 return 0;
695 }
696
697 if(crc && datalen>0 && datalen<sizeof(data)-2)
698 {
699 uint8_t first, second;
700 if (topazmode) {
701 ComputeCrc14443(CRC_14443_B, data, datalen, &first, &second);
702 } else {
703 ComputeCrc14443(CRC_14443_A, data, datalen, &first, &second);
704 }
705 data[datalen++] = first;
706 data[datalen++] = second;
707 }
708
709 if(active || active_select)
710 {
711 c.arg[0] |= ISO14A_CONNECT;
712 if(active)
713 c.arg[0] |= ISO14A_NO_SELECT;
714 }
715
716 if(bTimeout){
717 #define MAX_TIMEOUT 40542464 // = (2^32-1) * (8*16) / 13560000Hz * 1000ms/s
718 c.arg[0] |= ISO14A_SET_TIMEOUT;
719 if(timeout > MAX_TIMEOUT) {
720 timeout = MAX_TIMEOUT;
721 PrintAndLog("Set timeout to 40542 seconds (11.26 hours). The max we can wait for response");
722 }
723 c.arg[2] = 13560000 / 1000 / (8*16) * timeout; // timeout in ETUs (time to transfer 1 bit, approx. 9.4 us)
724 }
725
726 if(power)
727 c.arg[0] |= ISO14A_NO_DISCONNECT;
728
729 if(datalen>0)
730 c.arg[0] |= ISO14A_RAW;
731
732 if(topazmode)
733 c.arg[0] |= ISO14A_TOPAZMODE;
734
735 // Max buffer is USB_CMD_DATA_SIZE
736 datalen = (datalen > USB_CMD_DATA_SIZE) ? USB_CMD_DATA_SIZE : datalen;
737
738 c.arg[1] = (datalen & 0xFFFF) | (uint32_t)(numbits << 16);
739 memcpy(c.d.asBytes,data,datalen);
740
741 clearCommandBuffer();
742 SendCommand(&c);
743
744 if (reply) {
745 if(active_select)
746 waitCmd(1);
747 if(datalen>0)
748 waitCmd(0);
749 } // if reply
750 return 0;
751 }
752
753 static void waitCmd(uint8_t iSelect) {
754 uint8_t *recv;
755 UsbCommand resp;
756 char *hexout;
757
758 if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
759 recv = resp.d.asBytes;
760 uint8_t iLen = iSelect ? resp.arg[1] : resp.arg[0];
761 PrintAndLog("received %i octets",iLen);
762 if(!iLen)
763 return;
764 hexout = (char *)malloc(iLen * 3 + 1);
765 if (hexout != NULL) {
766 for (int i = 0; i < iLen; i++) { // data in hex
767 sprintf(&hexout[i * 3], "%02X ", recv[i]);
768 }
769 PrintAndLog("%s", hexout);
770 free(hexout);
771 } else {
772 PrintAndLog("malloc failed your client has low memory?");
773 }
774 } else {
775 PrintAndLog("timeout while waiting for reply.");
776 }
777 }
778
779 static command_t CommandTable[] =
780 {
781 {"help", CmdHelp, 1, "This help"},
782 {"list", CmdHF14AList, 0, "[Deprecated] List ISO 14443a history"},
783 {"reader", CmdHF14AReader, 0, "Act like an ISO14443 Type A reader"},
784 {"cuids", CmdHF14ACUIDs, 0, "<n> Collect n>0 ISO14443 Type A UIDs in one go"},
785 {"sim", CmdHF14ASim, 0, "<UID> -- Simulate ISO 14443a tag"},
786 {"sniff", CmdHF14ASniff, 0, "sniff ISO 14443 Type A traffic"},
787 {"raw", CmdHF14ACmdRaw, 0, "Send raw hex data to tag"},
788 {NULL, NULL, 0, NULL}
789 };
790
791 int CmdHF14A(const char *Cmd) {
792 // flush
793 clearCommandBuffer();
794 //WaitForResponseTimeout(CMD_ACK,NULL,100);
795
796 // parse
797 CmdsParse(CommandTable, Cmd);
798 return 0;
799 }
800
801 int CmdHelp(const char *Cmd)
802 {
803 CmdsHelp(CommandTable);
804 return 0;
805 }
Impressum, Datenschutz