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