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