]> cvs.zerfleddert.de Git - proxmark3-svn/blob - client/cmdhfmfu.c
Merge pull request #358 from Fl0-0/Fix_missing_reference_PAC_Stanley
[proxmark3-svn] / client / cmdhfmfu.c
1 //-----------------------------------------------------------------------------
2 // Ultralight Code (c) 2013,2014 Midnitesnake & Andy Davies of Pentura
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 MIFARE ULTRALIGHT (C) commands
9 //-----------------------------------------------------------------------------
10
11 #include "cmdhfmfu.h"
12
13 #include <stdint.h>
14 #include <stdio.h>
15 #include "proxmark3.h"
16 #include "usb_cmd.h"
17 #include "cmdmain.h"
18 #include "ui.h"
19 #include "loclass/des.h"
20 #include "cmdhfmf.h"
21 #include "cmdhf14a.h"
22 #include "mifare.h"
23 #include "util.h"
24 #include "protocols.h"
25 #include "data.h"
26
27 #define MAX_UL_BLOCKS 0x0f
28 #define MAX_ULC_BLOCKS 0x2b
29 #define MAX_ULEV1a_BLOCKS 0x13
30 #define MAX_ULEV1b_BLOCKS 0x28
31 #define MAX_NTAG_203 0x29
32 #define MAX_NTAG_210 0x13
33 #define MAX_NTAG_212 0x28
34 #define MAX_NTAG_213 0x2c
35 #define MAX_NTAG_215 0x86
36 #define MAX_NTAG_216 0xe6
37 #define MAX_MY_D_NFC 0xff
38 #define MAX_MY_D_MOVE 0x25
39 #define MAX_MY_D_MOVE_LEAN 0x0f
40
41 #define KEYS_3DES_COUNT 7
42 uint8_t default_3des_keys[KEYS_3DES_COUNT][16] = {
43 { 0x42,0x52,0x45,0x41,0x4b,0x4d,0x45,0x49,0x46,0x59,0x4f,0x55,0x43,0x41,0x4e,0x21 },// 3des std key
44 { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 },// all zeroes
45 { 0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f },// 0x00-0x0F
46 { 0x49,0x45,0x4D,0x4B,0x41,0x45,0x52,0x42,0x21,0x4E,0x41,0x43,0x55,0x4F,0x59,0x46 },// NFC-key
47 { 0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01 },// all ones
48 { 0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF },// all FF
49 { 0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77,0x88,0x99,0xAA,0xBB,0xCC,0xDD,0xEE,0xFF } // 11 22 33
50 };
51
52 #define KEYS_PWD_COUNT 6
53 uint8_t default_pwd_pack[KEYS_PWD_COUNT][4] = {
54 {0xFF,0xFF,0xFF,0xFF}, // PACK 0x00,0x00 -- factory default
55
56 {0x4A,0xF8,0x4B,0x19}, // PACK 0xE5,0xBE -- italian bus (sniffed)
57 {0x33,0x6B,0xA1,0x19}, // PACK 0x9c,0x2d -- italian bus (sniffed)
58 {0xFF,0x90,0x6C,0xB2}, // PACK 0x12,0x9e -- italian bus (sniffed)
59 {0x46,0x1c,0xA3,0x19}, // PACK 0xE9,0x5A -- italian bus (sniffed)
60 {0x35,0x1C,0xD0,0x19}, // PACK 0x9A,0x5a -- italian bus (sniffed)
61 };
62
63 #define MAX_UL_TYPES 18
64 uint32_t UL_TYPES_ARRAY[MAX_UL_TYPES] = {UNKNOWN, UL, UL_C, UL_EV1_48, UL_EV1_128, NTAG, NTAG_203,
65 NTAG_210, NTAG_212, NTAG_213, NTAG_215, NTAG_216, MY_D, MY_D_NFC, MY_D_MOVE, MY_D_MOVE_NFC, MY_D_MOVE_LEAN, FUDAN_UL};
66
67 uint8_t UL_MEMORY_ARRAY[MAX_UL_TYPES] = {MAX_UL_BLOCKS, MAX_UL_BLOCKS, MAX_ULC_BLOCKS, MAX_ULEV1a_BLOCKS,
68 MAX_ULEV1b_BLOCKS, MAX_NTAG_203, MAX_NTAG_203, MAX_NTAG_210, MAX_NTAG_212, MAX_NTAG_213,
69 MAX_NTAG_215, MAX_NTAG_216, MAX_UL_BLOCKS, MAX_MY_D_NFC, MAX_MY_D_MOVE, MAX_MY_D_MOVE, MAX_MY_D_MOVE_LEAN, MAX_UL_BLOCKS};
70
71
72 static int CmdHelp(const char *Cmd);
73
74 // get version nxp product type
75 char *getProductTypeStr( uint8_t id){
76
77 static char buf[20];
78 char *retStr = buf;
79
80 switch(id) {
81 case 3: sprintf(retStr, "%02X, Ultralight", id); break;
82 case 4: sprintf(retStr, "%02X, NTAG", id); break;
83 default: sprintf(retStr, "%02X, unknown", id); break;
84 }
85 return buf;
86 }
87
88 /*
89 The 7 MSBits (=n) code the storage size itself based on 2^n,
90 the LSBit is set to '0' if the size is exactly 2^n
91 and set to '1' if the storage size is between 2^n and 2^(n+1).
92 */
93 char *getUlev1CardSizeStr( uint8_t fsize ){
94
95 static char buf[40];
96 char *retStr = buf;
97 memset(buf, 0, sizeof(buf));
98
99 uint16_t usize = 1 << ((fsize >>1) + 1);
100 uint16_t lsize = 1 << (fsize >>1);
101
102 // is LSB set?
103 if ( fsize & 1 )
104 sprintf(retStr, "%02X, (%u <-> %u bytes)",fsize, usize, lsize);
105 else
106 sprintf(retStr, "%02X, (%u bytes)", fsize, lsize);
107 return buf;
108 }
109
110 static void ul_switch_on_field(void) {
111 UsbCommand c = {CMD_READER_ISO_14443a, {ISO14A_CONNECT | ISO14A_NO_DISCONNECT, 0, 0}};
112 clearCommandBuffer();
113 SendCommand(&c);
114 }
115
116 void ul_switch_off_field(void) {
117 UsbCommand c = {CMD_READER_ISO_14443a, {0, 0, 0}};
118 clearCommandBuffer();
119 SendCommand(&c);
120 }
121
122 static int ul_send_cmd_raw( uint8_t *cmd, uint8_t cmdlen, uint8_t *response, uint16_t responseLength ) {
123 UsbCommand c = {CMD_READER_ISO_14443a, {ISO14A_RAW | ISO14A_NO_DISCONNECT | ISO14A_APPEND_CRC, cmdlen, 0}};
124 memcpy(c.d.asBytes, cmd, cmdlen);
125 clearCommandBuffer();
126 SendCommand(&c);
127 UsbCommand resp;
128 if (!WaitForResponseTimeout(CMD_ACK, &resp, 1500)) return -1;
129 if (!resp.arg[0] && responseLength) return -1;
130
131 uint16_t resplen = (resp.arg[0] < responseLength) ? resp.arg[0] : responseLength;
132 memcpy(response, resp.d.asBytes, resplen);
133 return resplen;
134 }
135 /*
136 static int ul_send_cmd_raw_crc( uint8_t *cmd, uint8_t cmdlen, uint8_t *response, uint16_t responseLength, bool append_crc ) {
137 UsbCommand c = {CMD_READER_ISO_14443a, {ISO14A_RAW | ISO14A_NO_DISCONNECT , cmdlen, 0}};
138 if (append_crc)
139 c.arg[0] |= ISO14A_APPEND_CRC;
140
141 memcpy(c.d.asBytes, cmd, cmdlen);
142 clearCommandBuffer();
143 SendCommand(&c);
144 UsbCommand resp;
145 if (!WaitForResponseTimeout(CMD_ACK, &resp, 1500)) return -1;
146 if (!resp.arg[0] && responseLength) return -1;
147
148 uint16_t resplen = (resp.arg[0] < responseLength) ? resp.arg[0] : responseLength;
149 memcpy(response, resp.d.asBytes, resplen);
150 return resplen;
151 }
152 */
153 static int ul_select( iso14a_card_select_t *card ){
154
155 ul_switch_on_field();
156
157 UsbCommand resp;
158 bool ans = false;
159 ans = WaitForResponseTimeout(CMD_ACK, &resp, 1500);
160 if (!ans || resp.arg[0] < 1) {
161 PrintAndLog("iso14443a card select failed");
162 ul_switch_off_field();
163 return 0;
164 }
165
166 memcpy(card, resp.d.asBytes, sizeof(iso14a_card_select_t));
167 return 1;
168 }
169
170 // This read command will at least return 16bytes.
171 static int ul_read( uint8_t page, uint8_t *response, uint16_t responseLength ){
172
173 uint8_t cmd[] = {ISO14443A_CMD_READBLOCK, page};
174 int len = ul_send_cmd_raw(cmd, sizeof(cmd), response, responseLength);
175 return len;
176 }
177
178 static int ul_comp_write( uint8_t page, uint8_t *data, uint8_t datalen ){
179
180 uint8_t cmd[18];
181 memset(cmd, 0x00, sizeof(cmd));
182 datalen = ( datalen > 16) ? 16 : datalen;
183
184 cmd[0] = ISO14443A_CMD_WRITEBLOCK;
185 cmd[1] = page;
186 memcpy(cmd+2, data, datalen);
187
188 uint8_t response[1] = {0xff};
189 ul_send_cmd_raw(cmd, 2+datalen, response, sizeof(response));
190 // ACK
191 if ( response[0] == 0x0a ) return 0;
192 // NACK
193 return -1;
194 }
195
196 static int ulc_requestAuthentication( uint8_t *nonce, uint16_t nonceLength ){
197
198 uint8_t cmd[] = {MIFARE_ULC_AUTH_1, 0x00};
199 int len = ul_send_cmd_raw(cmd, sizeof(cmd), nonce, nonceLength);
200 return len;
201 }
202
203 static int ulc_authentication( uint8_t *key, bool switch_off_field ){
204
205 UsbCommand c = {CMD_MIFAREUC_AUTH, {switch_off_field}};
206 memcpy(c.d.asBytes, key, 16);
207 clearCommandBuffer();
208 SendCommand(&c);
209 UsbCommand resp;
210 if ( !WaitForResponseTimeout(CMD_ACK, &resp, 1500) ) return 0;
211 if ( resp.arg[0] == 1 ) return 1;
212
213 return 0;
214 }
215
216 static int ulev1_requestAuthentication( uint8_t *pwd, uint8_t *pack, uint16_t packLength ){
217
218 uint8_t cmd[] = {MIFARE_ULEV1_AUTH, pwd[0], pwd[1], pwd[2], pwd[3]};
219 int len = ul_send_cmd_raw(cmd, sizeof(cmd), pack, packLength);
220 return len;
221 }
222
223 static int ul_auth_select( iso14a_card_select_t *card, TagTypeUL_t tagtype, bool hasAuthKey, uint8_t *authenticationkey, uint8_t *pack, uint8_t packSize){
224 if ( hasAuthKey && (tagtype & UL_C)) {
225 //will select card automatically and close connection on error
226 if (!ulc_authentication(authenticationkey, false)) {
227 PrintAndLog("Error: Authentication Failed UL-C");
228 return 0;
229 }
230 } else {
231 if ( !ul_select(card) ) return 0;
232
233 if (hasAuthKey) {
234 if (ulev1_requestAuthentication(authenticationkey, pack, packSize) < 1) {
235 ul_switch_off_field();
236 PrintAndLog("Error: Authentication Failed UL-EV1/NTAG");
237 return 0;
238 }
239 }
240 }
241 return 1;
242 }
243
244 static int ulev1_getVersion( uint8_t *response, uint16_t responseLength ){
245
246 uint8_t cmd[] = {MIFARE_ULEV1_VERSION};
247 int len = ul_send_cmd_raw(cmd, sizeof(cmd), response, responseLength);
248 return len;
249 }
250
251 // static int ulev1_fastRead( uint8_t startblock, uint8_t endblock, uint8_t *response ){
252
253 // uint8_t cmd[] = {MIFARE_ULEV1_FASTREAD, startblock, endblock};
254
255 // if ( !ul_send_cmd_raw(cmd, sizeof(cmd), response)){
256 // return -1;
257 // }
258 // return 0;
259 // }
260
261 static int ulev1_readCounter( uint8_t counter, uint8_t *response, uint16_t responseLength ){
262
263 uint8_t cmd[] = {MIFARE_ULEV1_READ_CNT, counter};
264 int len = ul_send_cmd_raw(cmd, sizeof(cmd), response, responseLength);
265 return len;
266 }
267
268 static int ulev1_readTearing( uint8_t counter, uint8_t *response, uint16_t responseLength ){
269
270 uint8_t cmd[] = {MIFARE_ULEV1_CHECKTEAR, counter};
271 int len = ul_send_cmd_raw(cmd, sizeof(cmd), response, responseLength);
272 return len;
273 }
274
275 static int ulev1_readSignature( uint8_t *response, uint16_t responseLength ){
276
277 uint8_t cmd[] = {MIFARE_ULEV1_READSIG, 0x00};
278 int len = ul_send_cmd_raw(cmd, sizeof(cmd), response, responseLength);
279 return len;
280 }
281
282
283 // Fudan check checks for which error is given for a command with incorrect crc
284 // NXP UL chip responds with 01, fudan 00.
285 // other possible checks:
286 // send a0 + crc
287 // UL responds with 00, fudan doesn't respond
288 // or
289 // send a200 + crc
290 // UL doesn't respond, fudan responds with 00
291 // or
292 // send 300000 + crc (read with extra byte(s))
293 // UL responds with read of page 0, fudan doesn't respond.
294 //
295 // make sure field is off before calling this function
296 static int ul_fudan_check( void ){
297 iso14a_card_select_t card;
298 if ( !ul_select(&card) )
299 return UL_ERROR;
300
301 UsbCommand c = {CMD_READER_ISO_14443a, {ISO14A_RAW | ISO14A_NO_DISCONNECT, 4, 0}};
302
303 uint8_t cmd[4] = {0x30,0x00,0x02,0xa7}; //wrong crc on purpose should be 0xa8
304 memcpy(c.d.asBytes, cmd, 4);
305 clearCommandBuffer();
306 SendCommand(&c);
307 UsbCommand resp;
308 if (!WaitForResponseTimeout(CMD_ACK, &resp, 1500)) return UL_ERROR;
309 if (resp.arg[0] != 1) return UL_ERROR;
310
311 return (!resp.d.asBytes[0]) ? FUDAN_UL : UL; //if response == 0x00 then Fudan, else Genuine NXP
312 }
313
314 static int ul_print_default( uint8_t *data){
315
316 uint8_t uid[7];
317 uid[0] = data[0];
318 uid[1] = data[1];
319 uid[2] = data[2];
320 uid[3] = data[4];
321 uid[4] = data[5];
322 uid[5] = data[6];
323 uid[6] = data[7];
324
325 PrintAndLog(" UID : %s ", sprint_hex(uid, 7));
326 PrintAndLog(" UID[0] : %02X, %s", uid[0], getTagInfo(uid[0]) );
327 if ( uid[0] == 0x05 && ((uid[1] & 0xf0) >> 4) == 2 ) { // is infineon and 66RxxP
328 uint8_t chip = (data[8] & 0xC7); // 11000111 mask, bit 3,4,5 RFU
329 switch (chip){
330 case 0xc2: PrintAndLog(" IC type : SLE 66R04P 770 Bytes"); break; //77 pages
331 case 0xc4: PrintAndLog(" IC type : SLE 66R16P 2560 Bytes"); break; //256 pages
332 case 0xc6: PrintAndLog(" IC type : SLE 66R32P 5120 Bytes"); break; //512 pages /2 sectors
333 }
334 }
335 // CT (cascade tag byte) 0x88 xor SN0 xor SN1 xor SN2
336 int crc0 = 0x88 ^ data[0] ^ data[1] ^data[2];
337 if ( data[3] == crc0 )
338 PrintAndLog(" BCC0 : %02X, Ok", data[3]);
339 else
340 PrintAndLog(" BCC0 : %02X, crc should be %02X", data[3], crc0);
341
342 int crc1 = data[4] ^ data[5] ^ data[6] ^data[7];
343 if ( data[8] == crc1 )
344 PrintAndLog(" BCC1 : %02X, Ok", data[8]);
345 else
346 PrintAndLog(" BCC1 : %02X, crc should be %02X", data[8], crc1 );
347
348 PrintAndLog(" Internal : %02X, %sdefault", data[9], (data[9]==0x48)?"":"not " );
349
350 PrintAndLog(" Lock : %s - %s",
351 sprint_hex(data+10, 2),
352 printBits(2, data+10)
353 );
354
355 PrintAndLog("OneTimePad : %s - %s\n",
356 sprint_hex(data + 12, 4),
357 printBits(4, data+12)
358 );
359
360 return 0;
361 }
362
363 static int ndef_print_CC(uint8_t *data) {
364 // no NDEF message
365 if(data[0] != 0xe1)
366 return -1;
367
368 PrintAndLog("--- NDEF Message");
369 PrintAndLog("Capability Container: %s", sprint_hex(data,4) );
370 PrintAndLog(" %02X : NDEF Magic Number", data[0]);
371 PrintAndLog(" %02X : version %d.%d supported by tag", data[1], (data[1] & 0xF0) >> 4, data[1] & 0x0f);
372 PrintAndLog(" %02X : Physical Memory Size: %d bytes", data[2], (data[2] + 1) * 8);
373 if ( data[2] == 0x12 )
374 PrintAndLog(" %02X : NDEF Memory Size: %d bytes", data[2], 144);
375 else if ( data[2] == 0x3e )
376 PrintAndLog(" %02X : NDEF Memory Size: %d bytes", data[2], 496);
377 else if ( data[2] == 0x6d )
378 PrintAndLog(" %02X : NDEF Memory Size: %d bytes", data[2], 872);
379
380 PrintAndLog(" %02X : %s / %s", data[3],
381 (data[3] & 0xF0) ? "(RFU)" : "Read access granted without any security",
382 (data[3] & 0x0F)==0 ? "Write access granted without any security" : (data[3] & 0x0F)==0x0F ? "No write access granted at all" : "(RFU)");
383 return 0;
384 }
385
386 int ul_print_type(uint32_t tagtype, uint8_t spaces){
387 char spc[11] = " ";
388 spc[10]=0x00;
389 char *spacer = spc + (10-spaces);
390
391 if ( tagtype & UL )
392 PrintAndLog("%sTYPE : MIFARE Ultralight (MF0ICU1) %s", spacer, (tagtype & MAGIC) ? "<magic>" : "" );
393 else if ( tagtype & UL_C)
394 PrintAndLog("%sTYPE : MIFARE Ultralight C (MF0ULC) %s", spacer, (tagtype & MAGIC) ? "<magic>" : "" );
395 else if ( tagtype & UL_EV1_48)
396 PrintAndLog("%sTYPE : MIFARE Ultralight EV1 48bytes (MF0UL1101)", spacer);
397 else if ( tagtype & UL_EV1_128)
398 PrintAndLog("%sTYPE : MIFARE Ultralight EV1 128bytes (MF0UL2101)", spacer);
399 else if ( tagtype & NTAG )
400 PrintAndLog("%sTYPE : NTAG UNKNOWN", spacer);
401 else if ( tagtype & NTAG_203 )
402 PrintAndLog("%sTYPE : NTAG 203 144bytes (NT2H0301F0DT)", spacer);
403 else if ( tagtype & NTAG_210 )
404 PrintAndLog("%sTYPE : NTAG 210 48bytes (NT2L1011G0DU)", spacer);
405 else if ( tagtype & NTAG_212 )
406 PrintAndLog("%sTYPE : NTAG 212 128bytes (NT2L1211G0DU)", spacer);
407 else if ( tagtype & NTAG_213 )
408 PrintAndLog("%sTYPE : NTAG 213 144bytes (NT2H1311G0DU)", spacer);
409 else if ( tagtype & NTAG_215 )
410 PrintAndLog("%sTYPE : NTAG 215 504bytes (NT2H1511G0DU)", spacer);
411 else if ( tagtype & NTAG_216 )
412 PrintAndLog("%sTYPE : NTAG 216 888bytes (NT2H1611G0DU)", spacer);
413 else if ( tagtype & NTAG_I2C_1K )
414 PrintAndLog("%sTYPE : NTAG I%sC 888bytes (NT3H1101FHK)", spacer, "\xFD");
415 else if ( tagtype & NTAG_I2C_2K )
416 PrintAndLog("%sTYPE : NTAG I%sC 1904bytes (NT3H1201FHK)", spacer, "\xFD");
417 else if ( tagtype & MY_D )
418 PrintAndLog("%sTYPE : INFINEON my-d\x99 (SLE 66RxxS)", spacer);
419 else if ( tagtype & MY_D_NFC )
420 PrintAndLog("%sTYPE : INFINEON my-d\x99 NFC (SLE 66RxxP)", spacer);
421 else if ( tagtype & MY_D_MOVE )
422 PrintAndLog("%sTYPE : INFINEON my-d\x99 move (SLE 66R01P)", spacer);
423 else if ( tagtype & MY_D_MOVE_NFC )
424 PrintAndLog("%sTYPE : INFINEON my-d\x99 move NFC (SLE 66R01P)", spacer);
425 else if ( tagtype & MY_D_MOVE_LEAN )
426 PrintAndLog("%sTYPE : INFINEON my-d\x99 move lean (SLE 66R01L)", spacer);
427 else if ( tagtype & FUDAN_UL )
428 PrintAndLog("%sTYPE : FUDAN Ultralight Compatible (or other compatible) %s", spacer, (tagtype & MAGIC) ? "<magic>" : "" );
429 else
430 PrintAndLog("%sTYPE : Unknown %06x", spacer, tagtype);
431 return 0;
432 }
433
434 static int ulc_print_3deskey( uint8_t *data){
435 PrintAndLog(" deskey1 [44/0x2C] : %s [%.4s]", sprint_hex(data ,4),data);
436 PrintAndLog(" deskey1 [45/0x2D] : %s [%.4s]", sprint_hex(data+4 ,4),data+4);
437 PrintAndLog(" deskey2 [46/0x2E] : %s [%.4s]", sprint_hex(data+8 ,4),data+8);
438 PrintAndLog(" deskey2 [47/0x2F] : %s [%.4s]", sprint_hex(data+12,4),data+12);
439 PrintAndLog("\n 3des key : %s", sprint_hex(SwapEndian64(data, 16, 8), 16));
440 return 0;
441 }
442
443 static int ulc_print_configuration( uint8_t *data){
444
445 PrintAndLog("--- UL-C Configuration");
446 PrintAndLog(" Higher Lockbits [40/0x28] : %s - %s", sprint_hex(data, 4), printBits(2, data));
447 PrintAndLog(" Counter [41/0x29] : %s - %s", sprint_hex(data+4, 4), printBits(2, data+4));
448
449 bool validAuth = (data[8] >= 0x03 && data[8] <= 0x30);
450 if ( validAuth )
451 PrintAndLog(" Auth0 [42/0x2A] : %s page %d/0x%02X and above need authentication", sprint_hex(data+8, 4), data[8],data[8] );
452 else{
453 if ( data[8] == 0){
454 PrintAndLog(" Auth0 [42/0x2A] : %s default", sprint_hex(data+8, 4) );
455 } else {
456 PrintAndLog(" Auth0 [42/0x2A] : %s auth byte is out-of-range", sprint_hex(data+8, 4) );
457 }
458 }
459 PrintAndLog(" Auth1 [43/0x2B] : %s %s",
460 sprint_hex(data+12, 4),
461 (data[12] & 1) ? "write access restricted": "read and write access restricted"
462 );
463 return 0;
464 }
465
466 static int ulev1_print_configuration( uint8_t *data, uint8_t startPage){
467
468 PrintAndLog("\n--- Tag Configuration");
469
470 bool strg_mod_en = (data[0] & 2);
471 uint8_t authlim = (data[4] & 0x07);
472 bool cfglck = (data[4] & 0x40);
473 bool prot = (data[4] & 0x80);
474 uint8_t vctid = data[5];
475
476 PrintAndLog(" cfg0 [%u/0x%02X] : %s", startPage, startPage, sprint_hex(data, 4));
477 if ( data[3] < 0xff )
478 PrintAndLog(" - page %d and above need authentication",data[3]);
479 else
480 PrintAndLog(" - pages don't need authentication");
481 PrintAndLog(" - strong modulation mode %s", (strg_mod_en) ? "enabled":"disabled");
482 PrintAndLog(" cfg1 [%u/0x%02X] : %s", startPage + 1, startPage + 1, sprint_hex(data+4, 4) );
483 if ( authlim == 0)
484 PrintAndLog(" - Unlimited password attempts");
485 else
486 PrintAndLog(" - Max number of password attempts is %d", authlim);
487 PrintAndLog(" - user configuration %s", cfglck ? "permanently locked":"writeable");
488 PrintAndLog(" - %s access is protected with password", prot ? "read and write":"write");
489 PrintAndLog(" - %02X, Virtual Card Type Identifier is %s default", vctid, (vctid==0x05)? "":"not");
490 PrintAndLog(" PWD [%u/0x%02X] : %s- (cannot be read)", startPage + 2, startPage + 2, sprint_hex(data+8, 4));
491 PrintAndLog(" PACK [%u/0x%02X] : %s - (cannot be read)", startPage + 3, startPage + 3, sprint_hex(data+12, 2));
492 PrintAndLog(" RFU [%u/0x%02X] : %s- (cannot be read)", startPage + 3, startPage + 3, sprint_hex(data+12, 2));
493 return 0;
494 }
495
496 static int ulev1_print_counters(){
497 PrintAndLog("--- Tag Counters");
498 uint8_t tear[1] = {0};
499 uint8_t counter[3] = {0,0,0};
500 uint16_t len = 0;
501 for ( uint8_t i = 0; i<3; ++i) {
502 ulev1_readTearing(i,tear,sizeof(tear));
503 len = ulev1_readCounter(i,counter, sizeof(counter) );
504 if (len == 3) {
505 PrintAndLog(" [%0d] : %s", i, sprint_hex(counter,3));
506 PrintAndLog(" - %02X tearing %s", tear[0], ( tear[0]==0xBD)?"Ok":"failure");
507 }
508 }
509 return len;
510 }
511
512 static int ulev1_print_signature( uint8_t *data, uint8_t len){
513 PrintAndLog("\n--- Tag Signature");
514 //PrintAndLog("IC signature public key name : NXP NTAG21x 2013"); // don't know if there is other NXP public keys.. :(
515 PrintAndLog("IC signature public key value : 04494e1a386d3d3cfe3dc10e5de68a499b1c202db5b132393e89ed19fe5be8bc61");
516 PrintAndLog(" Elliptic curve parameters : secp128r1");
517 PrintAndLog(" Tag ECC Signature : %s", sprint_hex(data, len));
518 //to do: verify if signature is valid
519 //PrintAndLog("IC signature status: %s valid", (iseccvalid() )?"":"not");
520 return 0;
521 }
522
523 static int ulev1_print_version(uint8_t *data){
524 PrintAndLog("\n--- Tag Version");
525 PrintAndLog(" Raw bytes : %s",sprint_hex(data, 8) );
526 PrintAndLog(" Vendor ID : %02X, %s", data[1], getTagInfo(data[1]));
527 PrintAndLog(" Product type : %s", getProductTypeStr(data[2]));
528 PrintAndLog(" Product subtype : %02X, %s", data[3], (data[3]==1) ?"17 pF":"50pF");
529 PrintAndLog(" Major version : %02X", data[4]);
530 PrintAndLog(" Minor version : %02X", data[5]);
531 PrintAndLog(" Size : %s", getUlev1CardSizeStr(data[6]));
532 PrintAndLog(" Protocol type : %02X", data[7]);
533 return 0;
534 }
535
536 /*
537 static int ulc_magic_test(){
538 // Magic Ultralight test
539 // Magic UL-C, by observation,
540 // 1) it seems to have a static nonce response to 0x1A command.
541 // 2) the deskey bytes is not-zero:d out on as datasheet states.
542 // 3) UID - changeable, not only, but pages 0-1-2-3.
543 // 4) use the ul_magic_test ! magic tags answers specially!
544 int returnValue = UL_ERROR;
545 iso14a_card_select_t card;
546 uint8_t nonce1[11] = {0x00};
547 uint8_t nonce2[11] = {0x00};
548 int status = ul_select(&card);
549 if ( !status ){
550 return UL_ERROR;
551 }
552 status = ulc_requestAuthentication(nonce1, sizeof(nonce1));
553 if ( status > 0 ) {
554 status = ulc_requestAuthentication(nonce2, sizeof(nonce2));
555 returnValue = ( !memcmp(nonce1, nonce2, 11) ) ? UL_C_MAGIC : UL_C;
556 } else {
557 returnValue = UL;
558 }
559 ul_switch_off_field();
560 return returnValue;
561 }
562 */
563 static int ul_magic_test(){
564
565 // Magic Ultralight tests
566 // 1) take present UID, and try to write it back. OBSOLETE
567 // 2) make a wrong length write to page0, and see if tag answers with ACK/NACK:
568 iso14a_card_select_t card;
569 if ( !ul_select(&card) )
570 return UL_ERROR;
571 int status = ul_comp_write(0, NULL, 0);
572 ul_switch_off_field();
573 if ( status == 0 )
574 return MAGIC;
575 return 0;
576 }
577
578 uint32_t GetHF14AMfU_Type(void){
579
580 TagTypeUL_t tagtype = UNKNOWN;
581 iso14a_card_select_t card;
582 uint8_t version[10] = {0x00};
583 int status = 0;
584 int len;
585
586 if (!ul_select(&card)) return UL_ERROR;
587
588 // Ultralight - ATQA / SAK
589 if ( card.atqa[1] != 0x00 || card.atqa[0] != 0x44 || card.sak != 0x00 ) {
590 PrintAndLog("Tag is not Ultralight | NTAG | MY-D [ATQA: %02X %02X SAK: %02X]\n", card.atqa[1], card.atqa[0], card.sak);
591 ul_switch_off_field();
592 return UL_ERROR;
593 }
594
595 if ( card.uid[0] != 0x05) {
596
597 len = ulev1_getVersion(version, sizeof(version));
598 ul_switch_off_field();
599
600 switch (len) {
601 case 0x0A: {
602
603 if ( version[2] == 0x03 && version[6] == 0x0B )
604 tagtype = UL_EV1_48;
605 else if ( version[2] == 0x03 && version[6] != 0x0B )
606 tagtype = UL_EV1_128;
607 else if ( version[2] == 0x04 && version[3] == 0x01 && version[6] == 0x0B )
608 tagtype = NTAG_210;
609 else if ( version[2] == 0x04 && version[3] == 0x01 && version[6] == 0x0E )
610 tagtype = NTAG_212;
611 else if ( version[2] == 0x04 && version[3] == 0x02 && version[6] == 0x0F )
612 tagtype = NTAG_213;
613 else if ( version[2] == 0x04 && version[3] == 0x02 && version[6] == 0x11 )
614 tagtype = NTAG_215;
615 else if ( version[2] == 0x04 && version[3] == 0x02 && version[6] == 0x13 )
616 tagtype = NTAG_216;
617 else if ( version[2] == 0x04 && version[3] == 0x05 && version[6] == 0x13 )
618 tagtype = NTAG_I2C_1K;
619 else if ( version[2] == 0x04 && version[3] == 0x05 && version[6] == 0x15 )
620 tagtype = NTAG_I2C_2K;
621 else if ( version[2] == 0x04 )
622 tagtype = NTAG;
623
624 break;
625 }
626 case 0x01: tagtype = UL_C; break;
627 case 0x00: tagtype = UL; break;
628 case -1 : tagtype = (UL | UL_C | NTAG_203); break; // could be UL | UL_C magic tags
629 default : tagtype = UNKNOWN; break;
630 }
631 // UL vs UL-C vs ntag203 test
632 if (tagtype & (UL | UL_C | NTAG_203)) {
633 if ( !ul_select(&card) ) return UL_ERROR;
634
635 // do UL_C check first...
636 uint8_t nonce[11] = {0x00};
637 status = ulc_requestAuthentication(nonce, sizeof(nonce));
638 ul_switch_off_field();
639 if (status > 1) {
640 tagtype = UL_C;
641 } else {
642 // need to re-select after authentication error
643 if ( !ul_select(&card) ) return UL_ERROR;
644
645 uint8_t data[16] = {0x00};
646 // read page 0x26-0x29 (last valid ntag203 page)
647 status = ul_read(0x26, data, sizeof(data));
648 if ( status <= 1 ) {
649 tagtype = UL;
650 } else {
651 // read page 0x30 (should error if it is a ntag203)
652 status = ul_read(0x30, data, sizeof(data));
653 if ( status <= 1 ){
654 tagtype = NTAG_203;
655 } else {
656 tagtype = UNKNOWN;
657 }
658 }
659 ul_switch_off_field();
660 }
661 }
662 if (tagtype & UL) {
663 tagtype = ul_fudan_check();
664 ul_switch_off_field();
665 }
666 } else {
667 ul_switch_off_field();
668 // Infinition MY-D tests Exam high nibble
669 uint8_t nib = (card.uid[1] & 0xf0) >> 4;
670 switch ( nib ){
671 // case 0: tagtype = SLE66R35E7; break; //or SLE 66R35E7 - mifare compat... should have different sak/atqa for mf 1k
672 case 1: tagtype = MY_D; break; //or SLE 66RxxS ... up to 512 pages of 8 user bytes...
673 case 2: tagtype = (MY_D_NFC); break; //or SLE 66RxxP ... up to 512 pages of 8 user bytes... (or in nfc mode FF pages of 4 bytes)
674 case 3: tagtype = (MY_D_MOVE | MY_D_MOVE_NFC); break; //or SLE 66R01P // 38 pages of 4 bytes //notice: we can not currently distinguish between these two
675 case 7: tagtype = MY_D_MOVE_LEAN; break; //or SLE 66R01L // 16 pages of 4 bytes
676 }
677 }
678
679 tagtype |= ul_magic_test();
680 if (tagtype == (UNKNOWN | MAGIC)) tagtype = (UL_MAGIC);
681 return tagtype;
682 }
683
684 int CmdHF14AMfUInfo(const char *Cmd){
685
686 uint8_t authlim = 0xff;
687 uint8_t data[16] = {0x00};
688 iso14a_card_select_t card;
689 int status;
690 bool errors = false;
691 bool hasAuthKey = false;
692 bool locked = false;
693 bool swapEndian = false;
694 uint8_t cmdp = 0;
695 uint8_t dataLen = 0;
696 uint8_t authenticationkey[16] = {0x00};
697 uint8_t *authkeyptr = authenticationkey;
698 uint8_t *key;
699 uint8_t pack[4] = {0,0,0,0};
700 int len = 0;
701 char tempStr[50];
702
703 while(param_getchar(Cmd, cmdp) != 0x00)
704 {
705 switch(param_getchar(Cmd, cmdp))
706 {
707 case 'h':
708 case 'H':
709 return usage_hf_mfu_info();
710 case 'k':
711 case 'K':
712 dataLen = param_getstr(Cmd, cmdp+1, tempStr);
713 if (dataLen == 32 || dataLen == 8) { //ul-c or ev1/ntag key length
714 errors = param_gethex(tempStr, 0, authenticationkey, dataLen);
715 dataLen /= 2; // handled as bytes from now on
716 } else {
717 PrintAndLog("\nERROR: Key is incorrect length\n");
718 errors = true;
719 }
720 cmdp += 2;
721 hasAuthKey = true;
722 break;
723 case 'l':
724 case 'L':
725 swapEndian = true;
726 cmdp++;
727 break;
728 default:
729 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
730 errors = true;
731 break;
732 }
733 if(errors) break;
734 }
735
736 //Validations
737 if(errors) return usage_hf_mfu_info();
738
739 TagTypeUL_t tagtype = GetHF14AMfU_Type();
740 if (tagtype == UL_ERROR) return -1;
741
742 PrintAndLog("\n--- Tag Information ---------");
743 PrintAndLog("-------------------------------------------------------------");
744 ul_print_type(tagtype, 6);
745
746 // Swap endianness
747 if (swapEndian && hasAuthKey) authkeyptr = SwapEndian64(authenticationkey, dataLen, (dataLen == 16) ? 8 : 4 );
748
749 if (!ul_auth_select( &card, tagtype, hasAuthKey, authkeyptr, pack, sizeof(pack))) return -1;
750
751 // read pages 0,1,2,3 (should read 4pages)
752 status = ul_read(0, data, sizeof(data));
753 if ( status == -1 ) {
754 ul_switch_off_field();
755 PrintAndLog("Error: tag didn't answer to READ");
756 return status;
757 } else if (status == 16) {
758 ul_print_default(data);
759 ndef_print_CC(data+12);
760 } else {
761 locked = true;
762 }
763
764 // UL_C Specific
765 if ((tagtype & UL_C)) {
766
767 // read pages 0x28, 0x29, 0x2A, 0x2B
768 uint8_t ulc_conf[16] = {0x00};
769 status = ul_read(0x28, ulc_conf, sizeof(ulc_conf));
770 if ( status == -1 ){
771 PrintAndLog("Error: tag didn't answer to READ UL-C");
772 ul_switch_off_field();
773 return status;
774 }
775 if (status == 16) ulc_print_configuration(ulc_conf);
776 else locked = true;
777
778 if ((tagtype & MAGIC)) {
779 //just read key
780 uint8_t ulc_deskey[16] = {0x00};
781 status = ul_read(0x2C, ulc_deskey, sizeof(ulc_deskey));
782 if ( status == -1 ) {
783 ul_switch_off_field();
784 PrintAndLog("Error: tag didn't answer to READ magic");
785 return status;
786 }
787 if (status == 16) ulc_print_3deskey(ulc_deskey);
788
789 } else {
790 ul_switch_off_field();
791 // if we called info with key, just return
792 if ( hasAuthKey ) return 1;
793
794 // also try to diversify default keys.. look into CmdHF14AMfuGenDiverseKeys
795 PrintAndLog("Trying some default 3des keys");
796 for (uint8_t i = 0; i < KEYS_3DES_COUNT; ++i ) {
797 key = default_3des_keys[i];
798 if (ulc_authentication(key, true)) {
799 PrintAndLog("Found default 3des key: ");
800 uint8_t keySwap[16];
801 memcpy(keySwap, SwapEndian64(key,16,8), 16);
802 ulc_print_3deskey(keySwap);
803 return 1;
804 }
805 }
806 return 1;
807 }
808 }
809
810 // do counters and signature first (don't neet auth)
811
812 // ul counters are different than ntag counters
813 if ((tagtype & (UL_EV1_48 | UL_EV1_128))) {
814 if (ulev1_print_counters() != 3) {
815 // failed - re-select
816 if (!ul_auth_select( &card, tagtype, hasAuthKey, authkeyptr, pack, sizeof(pack))) return -1;
817 }
818 }
819
820 if ((tagtype & (UL_EV1_48 | UL_EV1_128 | NTAG_213 | NTAG_215 | NTAG_216 | NTAG_I2C_1K | NTAG_I2C_2K ))) {
821 uint8_t ulev1_signature[32] = {0x00};
822 status = ulev1_readSignature( ulev1_signature, sizeof(ulev1_signature));
823 if ( status == -1 ) {
824 PrintAndLog("Error: tag didn't answer to READ SIGNATURE");
825 ul_switch_off_field();
826 return status;
827 }
828 if (status == 32) ulev1_print_signature( ulev1_signature, sizeof(ulev1_signature));
829 else {
830 // re-select
831 if (!ul_auth_select( &card, tagtype, hasAuthKey, authkeyptr, pack, sizeof(pack))) return -1;
832 }
833 }
834
835 if ((tagtype & (UL_EV1_48 | UL_EV1_128 | NTAG_210 | NTAG_212 | NTAG_213 | NTAG_215 | NTAG_216 | NTAG_I2C_1K | NTAG_I2C_2K))) {
836 uint8_t version[10] = {0x00};
837 status = ulev1_getVersion(version, sizeof(version));
838 if ( status == -1 ) {
839 PrintAndLog("Error: tag didn't answer to GETVERSION");
840 ul_switch_off_field();
841 return status;
842 } else if (status == 10) {
843 ulev1_print_version(version);
844 } else {
845 locked = true;
846 if (!ul_auth_select( &card, tagtype, hasAuthKey, authkeyptr, pack, sizeof(pack))) return -1;
847 }
848
849 uint8_t startconfigblock = 0;
850 uint8_t ulev1_conf[16] = {0x00};
851 // config blocks always are last 4 pages
852 for (uint8_t idx = 0; idx < MAX_UL_TYPES; idx++)
853 if (tagtype & UL_TYPES_ARRAY[idx])
854 startconfigblock = UL_MEMORY_ARRAY[idx]-3;
855
856 if (startconfigblock){ // if we know where the config block is...
857 status = ul_read(startconfigblock, ulev1_conf, sizeof(ulev1_conf));
858 if ( status == -1 ) {
859 PrintAndLog("Error: tag didn't answer to READ EV1");
860 ul_switch_off_field();
861 return status;
862 } else if (status == 16) {
863 // save AUTHENTICATION LIMITS for later:
864 authlim = (ulev1_conf[4] & 0x07);
865 ulev1_print_configuration(ulev1_conf, startconfigblock);
866 }
867 }
868
869 // AUTHLIMIT, (number of failed authentications)
870 // 0 = limitless.
871 // 1-7 = limit. No automatic tries then.
872 // hasAuthKey, if we was called with key, skip test.
873 if ( !authlim && !hasAuthKey ) {
874 PrintAndLog("\n--- Known EV1/NTAG passwords.");
875 len = 0;
876 for (uint8_t i = 0; i < KEYS_PWD_COUNT; ++i ) {
877 key = default_pwd_pack[i];
878 len = ulev1_requestAuthentication(key, pack, sizeof(pack));
879 if (len >= 1) {
880 PrintAndLog("Found a default password: %s || Pack: %02X %02X",sprint_hex(key, 4), pack[0], pack[1]);
881 break;
882 } else {
883 if (!ul_auth_select( &card, tagtype, hasAuthKey, authkeyptr, pack, sizeof(pack))) return -1;
884 }
885 }
886 if (len < 1) PrintAndLog("password not known");
887 }
888 }
889
890 ul_switch_off_field();
891 if (locked) PrintAndLog("\nTag appears to be locked, try using the key to get more info");
892 PrintAndLog("");
893 return 1;
894 }
895
896 //
897 // Write Single Block
898 //
899 int CmdHF14AMfUWrBl(const char *Cmd){
900
901 int blockNo = -1;
902 bool errors = false;
903 bool hasAuthKey = false;
904 bool hasPwdKey = false;
905 bool swapEndian = false;
906
907 uint8_t cmdp = 0;
908 uint8_t keylen = 0;
909 uint8_t blockdata[20] = {0x00};
910 uint8_t data[16] = {0x00};
911 uint8_t authenticationkey[16] = {0x00};
912 uint8_t *authKeyPtr = authenticationkey;
913
914 while(param_getchar(Cmd, cmdp) != 0x00)
915 {
916 switch(param_getchar(Cmd, cmdp))
917 {
918 case 'h':
919 case 'H':
920 return usage_hf_mfu_wrbl();
921 case 'k':
922 case 'K':
923 // EV1/NTAG size key
924 keylen = param_gethex(Cmd, cmdp+1, data, 8);
925 if ( !keylen ) {
926 memcpy(authenticationkey, data, 4);
927 cmdp += 2;
928 hasPwdKey = true;
929 break;
930 }
931 // UL-C size key
932 keylen = param_gethex(Cmd, cmdp+1, data, 32);
933 if (!keylen){
934 memcpy(authenticationkey, data, 16);
935 cmdp += 2;
936 hasAuthKey = true;
937 break;
938 }
939 PrintAndLog("\nERROR: Key is incorrect length\n");
940 errors = true;
941 break;
942 case 'b':
943 case 'B':
944 blockNo = param_get8(Cmd, cmdp+1);
945 if (blockNo < 0) {
946 PrintAndLog("Wrong block number");
947 errors = true;
948 }
949 cmdp += 2;
950 break;
951 case 'l':
952 case 'L':
953 swapEndian = true;
954 cmdp++;
955 break;
956 case 'd':
957 case 'D':
958 if ( param_gethex(Cmd, cmdp+1, blockdata, 8) ) {
959 PrintAndLog("Block data must include 8 HEX symbols");
960 errors = true;
961 break;
962 }
963 cmdp += 2;
964 break;
965 default:
966 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
967 errors = true;
968 break;
969 }
970 //Validations
971 if(errors) return usage_hf_mfu_wrbl();
972 }
973
974 if ( blockNo == -1 ) return usage_hf_mfu_wrbl();
975 // starting with getting tagtype
976 TagTypeUL_t tagtype = GetHF14AMfU_Type();
977 if (tagtype == UL_ERROR) return -1;
978
979 uint8_t maxblockno = 0;
980 for (uint8_t idx = 0; idx < MAX_UL_TYPES; idx++){
981 if (tagtype & UL_TYPES_ARRAY[idx])
982 maxblockno = UL_MEMORY_ARRAY[idx];
983 }
984 if (blockNo > maxblockno){
985 PrintAndLog("block number too large. Max block is %u/0x%02X \n", maxblockno,maxblockno);
986 return usage_hf_mfu_wrbl();
987 }
988
989 // Swap endianness
990 if (swapEndian && hasAuthKey) authKeyPtr = SwapEndian64(authenticationkey, 16, 8);
991 if (swapEndian && hasPwdKey) authKeyPtr = SwapEndian64(authenticationkey, 4, 4);
992
993 if ( blockNo <= 3)
994 PrintAndLog("Special Block: %0d (0x%02X) [ %s]", blockNo, blockNo, sprint_hex(blockdata, 4));
995 else
996 PrintAndLog("Block: %0d (0x%02X) [ %s]", blockNo, blockNo, sprint_hex(blockdata, 4));
997
998 //Send write Block
999 UsbCommand c = {CMD_MIFAREU_WRITEBL, {blockNo}};
1000 memcpy(c.d.asBytes,blockdata,4);
1001
1002 if ( hasAuthKey ) {
1003 c.arg[1] = 1;
1004 memcpy(c.d.asBytes+4,authKeyPtr,16);
1005 }
1006 else if ( hasPwdKey ) {
1007 c.arg[1] = 2;
1008 memcpy(c.d.asBytes+4,authKeyPtr,4);
1009 }
1010
1011 clearCommandBuffer();
1012 SendCommand(&c);
1013 UsbCommand resp;
1014 if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
1015 uint8_t isOK = resp.arg[0] & 0xff;
1016 PrintAndLog("isOk:%02x", isOK);
1017 } else {
1018 PrintAndLog("Command execute timeout");
1019 }
1020
1021 return 0;
1022 }
1023 //
1024 // Read Single Block
1025 //
1026 int CmdHF14AMfURdBl(const char *Cmd){
1027
1028 int blockNo = -1;
1029 bool errors = false;
1030 bool hasAuthKey = false;
1031 bool hasPwdKey = false;
1032 bool swapEndian = false;
1033 uint8_t cmdp = 0;
1034 uint8_t keylen = 0;
1035 uint8_t data[16] = {0x00};
1036 uint8_t authenticationkey[16] = {0x00};
1037 uint8_t *authKeyPtr = authenticationkey;
1038
1039 while(param_getchar(Cmd, cmdp) != 0x00)
1040 {
1041 switch(param_getchar(Cmd, cmdp))
1042 {
1043 case 'h':
1044 case 'H':
1045 return usage_hf_mfu_rdbl();
1046 case 'k':
1047 case 'K':
1048 // EV1/NTAG size key
1049 keylen = param_gethex(Cmd, cmdp+1, data, 8);
1050 if ( !keylen ) {
1051 memcpy(authenticationkey, data, 4);
1052 cmdp += 2;
1053 hasPwdKey = true;
1054 break;
1055 }
1056 // UL-C size key
1057 keylen = param_gethex(Cmd, cmdp+1, data, 32);
1058 if (!keylen){
1059 memcpy(authenticationkey, data, 16);
1060 cmdp += 2;
1061 hasAuthKey = true;
1062 break;
1063 }
1064 PrintAndLog("\nERROR: Key is incorrect length\n");
1065 errors = true;
1066 break;
1067 case 'b':
1068 case 'B':
1069 blockNo = param_get8(Cmd, cmdp+1);
1070 if (blockNo < 0) {
1071 PrintAndLog("Wrong block number");
1072 errors = true;
1073 }
1074 cmdp += 2;
1075 break;
1076 case 'l':
1077 case 'L':
1078 swapEndian = true;
1079 cmdp++;
1080 break;
1081 default:
1082 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
1083 errors = true;
1084 break;
1085 }
1086 //Validations
1087 if(errors) return usage_hf_mfu_rdbl();
1088 }
1089
1090 if ( blockNo == -1 ) return usage_hf_mfu_rdbl();
1091 // start with getting tagtype
1092 TagTypeUL_t tagtype = GetHF14AMfU_Type();
1093 if (tagtype == UL_ERROR) return -1;
1094
1095 uint8_t maxblockno = 0;
1096 for (uint8_t idx = 0; idx < MAX_UL_TYPES; idx++){
1097 if (tagtype & UL_TYPES_ARRAY[idx])
1098 maxblockno = UL_MEMORY_ARRAY[idx];
1099 }
1100 if (blockNo > maxblockno){
1101 PrintAndLog("block number to large. Max block is %u/0x%02X \n", maxblockno,maxblockno);
1102 return usage_hf_mfu_rdbl();
1103 }
1104
1105 // Swap endianness
1106 if (swapEndian && hasAuthKey) authKeyPtr = SwapEndian64(authenticationkey, 16, 8);
1107 if (swapEndian && hasPwdKey) authKeyPtr = SwapEndian64(authenticationkey, 4, 4);
1108
1109 //Read Block
1110 UsbCommand c = {CMD_MIFAREU_READBL, {blockNo}};
1111 if ( hasAuthKey ){
1112 c.arg[1] = 1;
1113 memcpy(c.d.asBytes,authKeyPtr,16);
1114 }
1115 else if ( hasPwdKey ) {
1116 c.arg[1] = 2;
1117 memcpy(c.d.asBytes,authKeyPtr,4);
1118 }
1119
1120 clearCommandBuffer();
1121 SendCommand(&c);
1122 UsbCommand resp;
1123 if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
1124 uint8_t isOK = resp.arg[0] & 0xff;
1125 if (isOK) {
1126 uint8_t *data = resp.d.asBytes;
1127 PrintAndLog("\n Block# | Data | Ascii");
1128 PrintAndLog("---------+-------------+------");
1129 PrintAndLog(" %02d/0x%02X | %s| %.4s\n", blockNo, blockNo, sprint_hex(data, 4), data);
1130 }
1131 else {
1132 PrintAndLog("Failed reading block: (%02x)", isOK);
1133 }
1134 } else {
1135 PrintAndLog("Command execute time-out");
1136 }
1137 return 0;
1138 }
1139
1140 int usage_hf_mfu_info(void) {
1141 PrintAndLog("It gathers information about the tag and tries to detect what kind it is.");
1142 PrintAndLog("Sometimes the tags are locked down, and you may need a key to be able to read the information");
1143 PrintAndLog("The following tags can be identified:\n");
1144 PrintAndLog("Ultralight, Ultralight-C, Ultralight EV1, NTAG 203, NTAG 210,");
1145 PrintAndLog("NTAG 212, NTAG 213, NTAG 215, NTAG 216, NTAG I2C 1K & 2K");
1146 PrintAndLog("my-d, my-d NFC, my-d move, my-d move NFC\n");
1147 PrintAndLog("Usage: hf mfu info k <key> l");
1148 PrintAndLog(" Options : ");
1149 PrintAndLog(" k <key> : (optional) key for authentication [UL-C 16bytes, EV1/NTAG 4bytes]");
1150 PrintAndLog(" l : (optional) swap entered key's endianness");
1151 PrintAndLog("");
1152 PrintAndLog(" sample : hf mfu info");
1153 PrintAndLog(" : hf mfu info k 00112233445566778899AABBCCDDEEFF");
1154 PrintAndLog(" : hf mfu info k AABBCCDDD");
1155 return 0;
1156 }
1157
1158 int usage_hf_mfu_dump(void) {
1159 PrintAndLog("Reads all pages from Ultralight, Ultralight-C, Ultralight EV1");
1160 PrintAndLog("NTAG 203, NTAG 210, NTAG 212, NTAG 213, NTAG 215, NTAG 216");
1161 PrintAndLog("and saves binary dump into the file `filename.bin` or `cardUID.bin`");
1162 PrintAndLog("It autodetects card type.\n");
1163 PrintAndLog("Usage: hf mfu dump k <key> l n <filename w/o .bin>");
1164 PrintAndLog(" Options : ");
1165 PrintAndLog(" k <key> : (optional) key for authentication [UL-C 16bytes, EV1/NTAG 4bytes]");
1166 PrintAndLog(" l : (optional) swap entered key's endianness");
1167 PrintAndLog(" n <FN > : filename w/o .bin to save the dump as");
1168 PrintAndLog(" p <Pg > : starting Page number to manually set a page to start the dump at");
1169 PrintAndLog(" q <qty> : number of Pages to manually set how many pages to dump");
1170
1171 PrintAndLog("");
1172 PrintAndLog(" sample : hf mfu dump");
1173 PrintAndLog(" : hf mfu dump n myfile");
1174 PrintAndLog(" : hf mfu dump k 00112233445566778899AABBCCDDEEFF");
1175 PrintAndLog(" : hf mfu dump k AABBCCDDD\n");
1176 return 0;
1177 }
1178
1179 int usage_hf_mfu_rdbl(void) {
1180 PrintAndLog("Read a block and print. It autodetects card type.\n");
1181 PrintAndLog("Usage: hf mfu rdbl b <block number> k <key> l\n");
1182 PrintAndLog(" Options:");
1183 PrintAndLog(" b <no> : block to read");
1184 PrintAndLog(" k <key> : (optional) key for authentication [UL-C 16bytes, EV1/NTAG 4bytes]");
1185 PrintAndLog(" l : (optional) swap entered key's endianness");
1186 PrintAndLog("");
1187 PrintAndLog(" sample : hf mfu rdbl b 0");
1188 PrintAndLog(" : hf mfu rdbl b 0 k 00112233445566778899AABBCCDDEEFF");
1189 PrintAndLog(" : hf mfu rdbl b 0 k AABBCCDDD\n");
1190 return 0;
1191 }
1192
1193 int usage_hf_mfu_wrbl(void) {
1194 PrintAndLog("Write a block. It autodetects card type.\n");
1195 PrintAndLog("Usage: hf mfu wrbl b <block number> d <data> k <key> l\n");
1196 PrintAndLog(" Options:");
1197 PrintAndLog(" b <no> : block to write");
1198 PrintAndLog(" d <data> : block data - (8 hex symbols)");
1199 PrintAndLog(" k <key> : (optional) key for authentication [UL-C 16bytes, EV1/NTAG 4bytes]");
1200 PrintAndLog(" l : (optional) swap entered key's endianness");
1201 PrintAndLog("");
1202 PrintAndLog(" sample : hf mfu wrbl b 0 d 01234567");
1203 PrintAndLog(" : hf mfu wrbl b 0 d 01234567 k AABBCCDDD\n");
1204 return 0;
1205 }
1206
1207 //
1208 // Mifare Ultralight / Ultralight-C / Ultralight-EV1
1209 // Read and Dump Card Contents, using auto detection of tag size.
1210 int CmdHF14AMfUDump(const char *Cmd){
1211
1212 FILE *fout;
1213 char filename[FILE_PATH_SIZE] = {0x00};
1214 char *fnameptr = filename;
1215 uint8_t *lockbytes_t = NULL;
1216 uint8_t lockbytes[2] = {0x00};
1217 uint8_t *lockbytes_t2 = NULL;
1218 uint8_t lockbytes2[2] = {0x00};
1219 bool bit[16] = {0x00};
1220 bool bit2[16] = {0x00};
1221 uint8_t data[1024] = {0x00};
1222 bool hasAuthKey = false;
1223 int i = 0;
1224 int Pages = 16;
1225 bool tmplockbit = false;
1226 uint8_t dataLen = 0;
1227 uint8_t cmdp = 0;
1228 uint8_t authenticationkey[16] = {0x00};
1229 uint8_t *authKeyPtr = authenticationkey;
1230 size_t fileNlen = 0;
1231 bool errors = false;
1232 bool swapEndian = false;
1233 bool manualPages = false;
1234 uint8_t startPage = 0;
1235 char tempStr[50];
1236 unsigned char cleanASCII[4];
1237
1238 while(param_getchar(Cmd, cmdp) != 0x00)
1239 {
1240 switch(param_getchar(Cmd, cmdp))
1241 {
1242 case 'h':
1243 case 'H':
1244 return usage_hf_mfu_dump();
1245 case 'k':
1246 case 'K':
1247 dataLen = param_getstr(Cmd, cmdp+1, tempStr);
1248 if (dataLen == 32 || dataLen == 8) { //ul-c or ev1/ntag key length
1249 errors = param_gethex(tempStr, 0, authenticationkey, dataLen);
1250 dataLen /= 2;
1251 } else {
1252 PrintAndLog("\nERROR: Key is incorrect length\n");
1253 errors = true;
1254 }
1255 cmdp += 2;
1256 hasAuthKey = true;
1257 break;
1258 case 'l':
1259 case 'L':
1260 swapEndian = true;
1261 cmdp++;
1262 break;
1263 case 'n':
1264 case 'N':
1265 fileNlen = param_getstr(Cmd, cmdp+1, filename);
1266 if (!fileNlen) errors = true;
1267 if (fileNlen > FILE_PATH_SIZE-5) fileNlen = FILE_PATH_SIZE-5;
1268 cmdp += 2;
1269 break;
1270 case 'p':
1271 case 'P':
1272 startPage = param_get8(Cmd, cmdp+1);
1273 manualPages = true;
1274 cmdp += 2;
1275 break;
1276 case 'q':
1277 case 'Q':
1278 Pages = param_get8(Cmd, cmdp+1);
1279 cmdp += 2;
1280 manualPages = true;
1281 break;
1282 default:
1283 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
1284 errors = true;
1285 break;
1286 }
1287 if(errors) break;
1288 }
1289
1290 //Validations
1291 if(errors) return usage_hf_mfu_dump();
1292
1293 if (swapEndian && hasAuthKey)
1294 authKeyPtr = SwapEndian64(authenticationkey, dataLen, (dataLen == 16) ? 8 : 4);
1295
1296 TagTypeUL_t tagtype = GetHF14AMfU_Type();
1297 if (tagtype == UL_ERROR) return -1;
1298
1299 if (!manualPages) //get number of pages to read
1300 for (uint8_t idx = 0; idx < MAX_UL_TYPES; idx++)
1301 if (tagtype & UL_TYPES_ARRAY[idx])
1302 Pages = UL_MEMORY_ARRAY[idx]+1; //add one as maxblks starts at 0
1303
1304 ul_print_type(tagtype, 0);
1305 PrintAndLog("Reading tag memory...");
1306 UsbCommand c = {CMD_MIFAREU_READCARD, {startPage,Pages}};
1307 if ( hasAuthKey ) {
1308 if (tagtype & UL_C)
1309 c.arg[2] = 1; //UL_C auth
1310 else
1311 c.arg[2] = 2; //UL_EV1/NTAG auth
1312
1313 memcpy(c.d.asBytes, authKeyPtr, dataLen);
1314 }
1315
1316 clearCommandBuffer();
1317 SendCommand(&c);
1318 UsbCommand resp;
1319 if (!WaitForResponseTimeout(CMD_ACK, &resp,1500)) {
1320 PrintAndLog("Command execute time-out");
1321 return 1;
1322 }
1323 if (resp.arg[0] != 1) {
1324 PrintAndLog("Failed reading block: (%02x)", i);
1325 return 1;
1326 }
1327
1328 uint32_t startindex = resp.arg[2];
1329 uint32_t bufferSize = resp.arg[1];
1330 if (bufferSize > sizeof(data)) {
1331 PrintAndLog("Data exceeded Buffer size!");
1332 bufferSize = sizeof(data);
1333 }
1334 GetFromBigBuf(data, bufferSize, startindex);
1335 WaitForResponse(CMD_ACK,NULL);
1336
1337 Pages = bufferSize/4;
1338 // Load lock bytes.
1339 int j = 0;
1340
1341 lockbytes_t = data + 8;
1342 lockbytes[0] = lockbytes_t[2];
1343 lockbytes[1] = lockbytes_t[3];
1344 for(j = 0; j < 16; j++){
1345 bit[j] = lockbytes[j/8] & ( 1 <<(7-j%8));
1346 }
1347
1348 // Load bottom lockbytes if available
1349 // TODO -- FIGURE OUT LOCK BYTES FOR TO EV1 and/or NTAG
1350 if ( Pages == 44 ) {
1351 lockbytes_t2 = data + (40*4);
1352 lockbytes2[0] = lockbytes_t2[2];
1353 lockbytes2[1] = lockbytes_t2[3];
1354 for (j = 0; j < 16; j++) {
1355 bit2[j] = lockbytes2[j/8] & ( 1 <<(7-j%8));
1356 }
1357 }
1358
1359 // add keys to block dump
1360 if (hasAuthKey) {
1361 if (!swapEndian){
1362 authKeyPtr = SwapEndian64(authenticationkey, dataLen, (dataLen == 16) ? 8 : 4);
1363 } else {
1364 authKeyPtr = authenticationkey;
1365 }
1366
1367 if (tagtype & UL_C){ //add 4 pages
1368 memcpy(data + Pages*4, authKeyPtr, dataLen);
1369 Pages += dataLen/4;
1370 } else { // 2nd page from end
1371 memcpy(data + (Pages*4) - 8, authenticationkey, dataLen);
1372 }
1373 }
1374
1375 PrintAndLog("\n Block# | Data |lck| Ascii");
1376 PrintAndLog("---------+-------------+---+------");
1377 for (i = 0; i < Pages; ++i) {
1378 if ( i < 3 ) {
1379 PrintAndLog("%3d/0x%02X | %s| | ", i+startPage, i+startPage, sprint_hex(data + i * 4, 4));
1380 continue;
1381 }
1382 switch(i){
1383 case 3: tmplockbit = bit[4]; break;
1384 case 4: tmplockbit = bit[3]; break;
1385 case 5: tmplockbit = bit[2]; break;
1386 case 6: tmplockbit = bit[1]; break;
1387 case 7: tmplockbit = bit[0]; break;
1388 case 8: tmplockbit = bit[15]; break;
1389 case 9: tmplockbit = bit[14]; break;
1390 case 10: tmplockbit = bit[13]; break;
1391 case 11: tmplockbit = bit[12]; break;
1392 case 12: tmplockbit = bit[11]; break;
1393 case 13: tmplockbit = bit[10]; break;
1394 case 14: tmplockbit = bit[9]; break;
1395 case 15: tmplockbit = bit[8]; break;
1396 case 16:
1397 case 17:
1398 case 18:
1399 case 19: tmplockbit = bit2[6]; break;
1400 case 20:
1401 case 21:
1402 case 22:
1403 case 23: tmplockbit = bit2[5]; break;
1404 case 24:
1405 case 25:
1406 case 26:
1407 case 27: tmplockbit = bit2[4]; break;
1408 case 28:
1409 case 29:
1410 case 30:
1411 case 31: tmplockbit = bit2[2]; break;
1412 case 32:
1413 case 33:
1414 case 34:
1415 case 35: tmplockbit = bit2[1]; break;
1416 case 36:
1417 case 37:
1418 case 38:
1419 case 39: tmplockbit = bit2[0]; break;
1420 case 40: tmplockbit = bit2[12]; break;
1421 case 41: tmplockbit = bit2[11]; break;
1422 case 42: tmplockbit = bit2[10]; break; //auth0
1423 case 43: tmplockbit = bit2[9]; break; //auth1
1424 default: break;
1425 }
1426
1427 // convert unprintable characters and line breaks to dots
1428 memcpy(cleanASCII, data+i*4, 4);
1429 clean_ascii(cleanASCII, 4);
1430
1431 PrintAndLog("%3d/0x%02X | %s| %d | %.4s", i+startPage, i+startPage, sprint_hex(data + i * 4, 4), tmplockbit, cleanASCII);
1432 }
1433 PrintAndLog("---------------------------------");
1434
1435 // user supplied filename?
1436 if (fileNlen < 1) {
1437 // UID = data 0-1-2 4-5-6-7 (skips a beat)
1438 sprintf(fnameptr,"%02X%02X%02X%02X%02X%02X%02X.bin",
1439 data[0],data[1], data[2], data[4],data[5],data[6], data[7]);
1440 } else {
1441 sprintf(fnameptr + fileNlen,".bin");
1442 }
1443
1444 if ((fout = fopen(filename,"wb")) == NULL) {
1445 PrintAndLog("Could not create file name %s", filename);
1446 return 1;
1447 }
1448 fwrite( data, 1, Pages*4, fout );
1449 fclose(fout);
1450
1451 PrintAndLog("Dumped %d pages, wrote %d bytes to %s", Pages, Pages*4, filename);
1452 return 0;
1453 }
1454
1455 //-------------------------------------------------------------------------------
1456 // Ultralight C Methods
1457 //-------------------------------------------------------------------------------
1458
1459 //
1460 // Ultralight C Authentication Demo {currently uses hard-coded key}
1461 //
1462 int CmdHF14AMfucAuth(const char *Cmd){
1463
1464 uint8_t keyNo = 3;
1465 bool errors = false;
1466
1467 char cmdp = param_getchar(Cmd, 0);
1468
1469 //Change key to user defined one
1470 if (cmdp == 'k' || cmdp == 'K'){
1471 keyNo = param_get8(Cmd, 1);
1472 if(keyNo > KEYS_3DES_COUNT-1)
1473 errors = true;
1474 }
1475
1476 if (cmdp == 'h' || cmdp == 'H')
1477 errors = true;
1478
1479 if (errors) {
1480 PrintAndLog("Usage: hf mfu cauth k <key number>");
1481 PrintAndLog(" 0 (default): 3DES standard key");
1482 PrintAndLog(" 1 : all 0x00 key");
1483 PrintAndLog(" 2 : 0x00-0x0F key");
1484 PrintAndLog(" 3 : nfc key");
1485 PrintAndLog(" 4 : all 0x01 key");
1486 PrintAndLog(" 5 : all 0xff key");
1487 PrintAndLog(" 6 : 0x00-0xFF key");
1488 PrintAndLog("\n sample : hf mfu cauth k");
1489 PrintAndLog(" : hf mfu cauth k 3");
1490 return 0;
1491 }
1492
1493 uint8_t *key = default_3des_keys[keyNo];
1494 if (ulc_authentication(key, true))
1495 PrintAndLog("Authentication successful. 3des key: %s",sprint_hex(key, 16));
1496 else
1497 PrintAndLog("Authentication failed");
1498
1499 return 0;
1500 }
1501
1502 /**
1503 A test function to validate that the polarssl-function works the same
1504 was as the openssl-implementation.
1505 Commented out, since it requires openssl
1506
1507 int CmdTestDES(const char * cmd)
1508 {
1509 uint8_t key[16] = {0x00};
1510
1511 memcpy(key,key3_3des_data,16);
1512 DES_cblock RndA, RndB;
1513
1514 PrintAndLog("----------OpenSSL DES implementation----------");
1515 {
1516 uint8_t e_RndB[8] = {0x00};
1517 unsigned char RndARndB[16] = {0x00};
1518
1519 DES_cblock iv = { 0 };
1520 DES_key_schedule ks1,ks2;
1521 DES_cblock key1,key2;
1522
1523 memcpy(key,key3_3des_data,16);
1524 memcpy(key1,key,8);
1525 memcpy(key2,key+8,8);
1526
1527
1528 DES_set_key((DES_cblock *)key1,&ks1);
1529 DES_set_key((DES_cblock *)key2,&ks2);
1530
1531 DES_random_key(&RndA);
1532 PrintAndLog(" RndA:%s",sprint_hex(RndA, 8));
1533 PrintAndLog(" e_RndB:%s",sprint_hex(e_RndB, 8));
1534 //void DES_ede2_cbc_encrypt(const unsigned char *input,
1535 // unsigned char *output, long length, DES_key_schedule *ks1,
1536 // DES_key_schedule *ks2, DES_cblock *ivec, int enc);
1537 DES_ede2_cbc_encrypt(e_RndB,RndB,sizeof(e_RndB),&ks1,&ks2,&iv,0);
1538
1539 PrintAndLog(" RndB:%s",sprint_hex(RndB, 8));
1540 rol(RndB,8);
1541 memcpy(RndARndB,RndA,8);
1542 memcpy(RndARndB+8,RndB,8);
1543 PrintAndLog(" RA+B:%s",sprint_hex(RndARndB, 16));
1544 DES_ede2_cbc_encrypt(RndARndB,RndARndB,sizeof(RndARndB),&ks1,&ks2,&e_RndB,1);
1545 PrintAndLog("enc(RA+B):%s",sprint_hex(RndARndB, 16));
1546
1547 }
1548 PrintAndLog("----------PolarSSL implementation----------");
1549 {
1550 uint8_t random_a[8] = { 0 };
1551 uint8_t enc_random_a[8] = { 0 };
1552 uint8_t random_b[8] = { 0 };
1553 uint8_t enc_random_b[8] = { 0 };
1554 uint8_t random_a_and_b[16] = { 0 };
1555 des3_context ctx = { 0 };
1556
1557 memcpy(random_a, RndA,8);
1558
1559 uint8_t output[8] = { 0 };
1560 uint8_t iv[8] = { 0 };
1561
1562 PrintAndLog(" RndA :%s",sprint_hex(random_a, 8));
1563 PrintAndLog(" e_RndB:%s",sprint_hex(enc_random_b, 8));
1564
1565 des3_set2key_dec(&ctx, key);
1566
1567 des3_crypt_cbc(&ctx // des3_context *ctx
1568 , DES_DECRYPT // int mode
1569 , sizeof(random_b) // size_t length
1570 , iv // unsigned char iv[8]
1571 , enc_random_b // const unsigned char *input
1572 , random_b // unsigned char *output
1573 );
1574
1575 PrintAndLog(" RndB:%s",sprint_hex(random_b, 8));
1576
1577 rol(random_b,8);
1578 memcpy(random_a_and_b ,random_a,8);
1579 memcpy(random_a_and_b+8,random_b,8);
1580
1581 PrintAndLog(" RA+B:%s",sprint_hex(random_a_and_b, 16));
1582
1583 des3_set2key_enc(&ctx, key);
1584
1585 des3_crypt_cbc(&ctx // des3_context *ctx
1586 , DES_ENCRYPT // int mode
1587 , sizeof(random_a_and_b) // size_t length
1588 , enc_random_b // unsigned char iv[8]
1589 , random_a_and_b // const unsigned char *input
1590 , random_a_and_b // unsigned char *output
1591 );
1592
1593 PrintAndLog("enc(RA+B):%s",sprint_hex(random_a_and_b, 16));
1594 }
1595 return 0;
1596 }
1597 **/
1598
1599 //
1600 // Mifare Ultralight C - Set password
1601 //
1602 int CmdHF14AMfucSetPwd(const char *Cmd){
1603
1604 uint8_t pwd[16] = {0x00};
1605
1606 char cmdp = param_getchar(Cmd, 0);
1607
1608 if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') {
1609 PrintAndLog("Usage: hf mfu setpwd <password (32 hex symbols)>");
1610 PrintAndLog(" [password] - (32 hex symbols)");
1611 PrintAndLog("");
1612 PrintAndLog("sample: hf mfu setpwd 000102030405060708090a0b0c0d0e0f");
1613 PrintAndLog("");
1614 return 0;
1615 }
1616
1617 if (param_gethex(Cmd, 0, pwd, 32)) {
1618 PrintAndLog("Password must include 32 HEX symbols");
1619 return 1;
1620 }
1621
1622 UsbCommand c = {CMD_MIFAREUC_SETPWD};
1623 memcpy( c.d.asBytes, pwd, 16);
1624 clearCommandBuffer();
1625 SendCommand(&c);
1626
1627 UsbCommand resp;
1628
1629 if (WaitForResponseTimeout(CMD_ACK,&resp,1500) ) {
1630 if ( (resp.arg[0] & 0xff) == 1)
1631 PrintAndLog("Ultralight-C new password: %s", sprint_hex(pwd,16));
1632 else{
1633 PrintAndLog("Failed writing at block %d", resp.arg[1] & 0xff);
1634 return 1;
1635 }
1636 }
1637 else {
1638 PrintAndLog("command execution time out");
1639 return 1;
1640 }
1641
1642 return 0;
1643 }
1644
1645 //
1646 // Magic UL / UL-C tags - Set UID
1647 //
1648 int CmdHF14AMfucSetUid(const char *Cmd){
1649
1650 UsbCommand c;
1651 UsbCommand resp;
1652 uint8_t uid[7] = {0x00};
1653 char cmdp = param_getchar(Cmd, 0);
1654
1655 if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') {
1656 PrintAndLog("Usage: hf mfu setuid <uid (14 hex symbols)>");
1657 PrintAndLog(" [uid] - (14 hex symbols)");
1658 PrintAndLog("\nThis only works for Magic Ultralight tags.");
1659 PrintAndLog("");
1660 PrintAndLog("sample: hf mfu setuid 11223344556677");
1661 PrintAndLog("");
1662 return 0;
1663 }
1664
1665 if (param_gethex(Cmd, 0, uid, 14)) {
1666 PrintAndLog("UID must include 14 HEX symbols");
1667 return 1;
1668 }
1669
1670 // read block2.
1671 c.cmd = CMD_MIFAREU_READBL;
1672 c.arg[0] = 2;
1673 clearCommandBuffer();
1674 SendCommand(&c);
1675 if (!WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
1676 PrintAndLog("Command execute timeout");
1677 return 2;
1678 }
1679
1680 // save old block2.
1681 uint8_t oldblock2[4] = {0x00};
1682 memcpy(resp.d.asBytes, oldblock2, 4);
1683
1684 // block 0.
1685 c.cmd = CMD_MIFAREU_WRITEBL;
1686 c.arg[0] = 0;
1687 c.d.asBytes[0] = uid[0];
1688 c.d.asBytes[1] = uid[1];
1689 c.d.asBytes[2] = uid[2];
1690 c.d.asBytes[3] = 0x88 ^ uid[0] ^ uid[1] ^ uid[2];
1691 clearCommandBuffer();
1692 SendCommand(&c);
1693 if (!WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
1694 PrintAndLog("Command execute timeout");
1695 return 3;
1696 }
1697
1698 // block 1.
1699 c.arg[0] = 1;
1700 c.d.asBytes[0] = uid[3];
1701 c.d.asBytes[1] = uid[4];
1702 c.d.asBytes[2] = uid[5];
1703 c.d.asBytes[3] = uid[6];
1704 clearCommandBuffer();
1705 SendCommand(&c);
1706 if (!WaitForResponseTimeout(CMD_ACK,&resp,1500) ) {
1707 PrintAndLog("Command execute timeout");
1708 return 4;
1709 }
1710
1711 // block 2.
1712 c.arg[0] = 2;
1713 c.d.asBytes[0] = uid[3] ^ uid[4] ^ uid[5] ^ uid[6];
1714 c.d.asBytes[1] = oldblock2[1];
1715 c.d.asBytes[2] = oldblock2[2];
1716 c.d.asBytes[3] = oldblock2[3];
1717 clearCommandBuffer();
1718 SendCommand(&c);
1719 if (!WaitForResponseTimeout(CMD_ACK,&resp,1500) ) {
1720 PrintAndLog("Command execute timeout");
1721 return 5;
1722 }
1723
1724 return 0;
1725 }
1726
1727 int CmdHF14AMfuGenDiverseKeys(const char *Cmd){
1728
1729 uint8_t iv[8] = { 0x00 };
1730 uint8_t block = 0x07;
1731
1732 // UL-EV1
1733 //04 57 b6 e2 05 3f 80 UID
1734 //4a f8 4b 19 PWD
1735 uint8_t uid[] = { 0xF4,0xEA, 0x54, 0x8E };
1736 uint8_t mifarekeyA[] = { 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5 };
1737 uint8_t mifarekeyB[] = { 0xB0,0xB1,0xB2,0xB3,0xB4,0xB5 };
1738 uint8_t dkeyA[8] = { 0x00 };
1739 uint8_t dkeyB[8] = { 0x00 };
1740
1741 uint8_t masterkey[] = { 0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77,0x88,0x99,0xaa,0xbb,0xcc,0xdd,0xee,0xff };
1742
1743 uint8_t mix[8] = { 0x00 };
1744 uint8_t divkey[8] = { 0x00 };
1745
1746 memcpy(mix, mifarekeyA, 4);
1747
1748 mix[4] = mifarekeyA[4] ^ uid[0];
1749 mix[5] = mifarekeyA[5] ^ uid[1];
1750 mix[6] = block ^ uid[2];
1751 mix[7] = uid[3];
1752
1753 des3_context ctx = { 0x00 };
1754 des3_set2key_enc(&ctx, masterkey);
1755
1756 des3_crypt_cbc(&ctx // des3_context
1757 , DES_ENCRYPT // int mode
1758 , sizeof(mix) // length
1759 , iv // iv[8]
1760 , mix // input
1761 , divkey // output
1762 );
1763
1764 PrintAndLog("3DES version");
1765 PrintAndLog("Masterkey :\t %s", sprint_hex(masterkey,sizeof(masterkey)));
1766 PrintAndLog("UID :\t %s", sprint_hex(uid, sizeof(uid)));
1767 PrintAndLog("Sector :\t %0d", block);
1768 PrintAndLog("Mifare key :\t %s", sprint_hex(mifarekeyA, sizeof(mifarekeyA)));
1769 PrintAndLog("Message :\t %s", sprint_hex(mix, sizeof(mix)));
1770 PrintAndLog("Diversified key: %s", sprint_hex(divkey+1, 6));
1771
1772 PrintAndLog("\n DES version");
1773
1774 for (int i=0; i < sizeof(mifarekeyA); ++i){
1775 dkeyA[i] = (mifarekeyA[i] << 1) & 0xff;
1776 dkeyA[6] |= ((mifarekeyA[i] >> 7) & 1) << (i+1);
1777 }
1778
1779 for (int i=0; i < sizeof(mifarekeyB); ++i){
1780 dkeyB[1] |= ((mifarekeyB[i] >> 7) & 1) << (i+1);
1781 dkeyB[2+i] = (mifarekeyB[i] << 1) & 0xff;
1782 }
1783
1784 uint8_t zeros[8] = {0x00};
1785 uint8_t newpwd[8] = {0x00};
1786 uint8_t dmkey[24] = {0x00};
1787 memcpy(dmkey, dkeyA, 8);
1788 memcpy(dmkey+8, dkeyB, 8);
1789 memcpy(dmkey+16, dkeyA, 8);
1790 memset(iv, 0x00, 8);
1791
1792 des3_set3key_enc(&ctx, dmkey);
1793
1794 des3_crypt_cbc(&ctx // des3_context
1795 , DES_ENCRYPT // int mode
1796 , sizeof(newpwd) // length
1797 , iv // iv[8]
1798 , zeros // input
1799 , newpwd // output
1800 );
1801
1802 PrintAndLog("Mifare dkeyA :\t %s", sprint_hex(dkeyA, sizeof(dkeyA)));
1803 PrintAndLog("Mifare dkeyB :\t %s", sprint_hex(dkeyB, sizeof(dkeyB)));
1804 PrintAndLog("Mifare ABA :\t %s", sprint_hex(dmkey, sizeof(dmkey)));
1805 PrintAndLog("Mifare Pwd :\t %s", sprint_hex(newpwd, sizeof(newpwd)));
1806
1807 return 0;
1808 }
1809
1810 // static uint8_t * diversify_key(uint8_t * key){
1811
1812 // for(int i=0; i<16; i++){
1813 // if(i<=6) key[i]^=cuid[i];
1814 // if(i>6) key[i]^=cuid[i%7];
1815 // }
1816 // return key;
1817 // }
1818
1819 // static void GenerateUIDe( uint8_t *uid, uint8_t len){
1820 // for (int i=0; i<len; ++i){
1821
1822 // }
1823 // return;
1824 // }
1825
1826 //------------------------------------
1827 // Menu Stuff
1828 //------------------------------------
1829 static command_t CommandTable[] =
1830 {
1831 {"help", CmdHelp, 1, "This help"},
1832 {"dbg", CmdHF14AMfDbg, 0, "Set default debug mode"},
1833 {"info", CmdHF14AMfUInfo, 0, "Tag information"},
1834 {"dump", CmdHF14AMfUDump, 0, "Dump Ultralight / Ultralight-C / NTAG tag to binary file"},
1835 {"rdbl", CmdHF14AMfURdBl, 0, "Read block"},
1836 {"wrbl", CmdHF14AMfUWrBl, 0, "Write block"},
1837 {"cauth", CmdHF14AMfucAuth, 0, "Authentication - Ultralight C"},
1838 {"setpwd", CmdHF14AMfucSetPwd, 1, "Set 3des password - Ultralight-C"},
1839 {"setuid", CmdHF14AMfucSetUid, 1, "Set UID - MAGIC tags only"},
1840 {"gen", CmdHF14AMfuGenDiverseKeys , 1, "Generate 3des mifare diversified keys"},
1841 {NULL, NULL, 0, NULL}
1842 };
1843
1844 int CmdHFMFUltra(const char *Cmd){
1845 WaitForResponseTimeout(CMD_ACK,NULL,100);
1846 CmdsParse(CommandTable, Cmd);
1847 return 0;
1848 }
1849
1850 int CmdHelp(const char *Cmd){
1851 CmdsHelp(CommandTable);
1852 return 0;
1853 }
Impressum, Datenschutz