[proxmark3-svn] / client / cmdhfmfu.c

//-----------------------------------------------------------------------------
// Ultralight Code (c) 2013,2014 Midnitesnake & Andy Davies of Pentura
//
// This code is licensed to you under the terms of the GNU GPL, version 2 or,
// at your option, any later version. See the LICENSE.txt file for the text of
// the license.
//-----------------------------------------------------------------------------
// High frequency MIFARE ULTRALIGHT (C) commands
//-----------------------------------------------------------------------------
#include <openssl/des.h>
#include "cmdhfmf.h"
#include "cmdhf14a.h"

uint8_t MAX_ULTRA_BLOCKS   = 0x0f;
uint8_t MAX_ULTRAC_BLOCKS  = 0x2c;
uint8_t key1_blnk_data[16] = { 0x00 };
uint8_t key2_defa_data[16] = { 0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f };
uint8_t key3_3des_data[16] = { 0x49,0x45,0x4D,0x4B,0x41,0x45,0x52,0x42,0x21,0x4E,0x41,0x43,0x55,0x4F,0x59,0x46 };
uint8_t key4_nfc_data[16]  = { 0x42,0x52,0x45,0x41,0x4b,0x4d,0x45,0x49,0x46,0x59,0x4f,0x55,0x43,0x41,0x4e,0x21 };
uint8_t key5_ones_data[16] = { 0x01 };

static int CmdHelp(const char *Cmd);

int CmdHF14AMfUInfo(const char *Cmd){

    uint8_t datatemp[7] = {0x00};
    uint8_t isOK  = 0;
    uint8_t *data = NULL;

    UsbCommand c = {CMD_MIFAREU_READCARD, {0, 4}};
    SendCommand(&c);
    UsbCommand resp;

    if (WaitForResponseTimeout(CMD_ACK, &resp, 1500)) {
        isOK  = resp.arg[0] & 0xff;
        data  = resp.d.asBytes;

        if (!isOK) {
			PrintAndLog("Error reading from tag");
			return -1;
		}
	} else {
		PrintAndLog("Command execute timed out");
		return -1;
	}
	
	PrintAndLog("");
	PrintAndLog("-- Mifare Ultralight / Ultralight-C Tag Information ---------");
	PrintAndLog("-------------------------------------------------------------");

	// UID
	memcpy( datatemp, data, 3);
	memcpy( datatemp+3, data+4, 4);
	
	PrintAndLog("MANUFACTURER : %s", getTagInfo(datatemp[0]));
	PrintAndLog("         UID : %s ", sprint_hex(datatemp, 7));
	// BBC
	// CT (cascade tag byte) 0x88 xor SN0 xor SN1 xor SN2 
	int crc0 = 0x88 ^ data[0] ^ data[1] ^data[2];
	if ( data[3] == crc0 )
		PrintAndLog("        BCC0 : %02x - Ok", data[3]);
	else
		PrintAndLog("        BCC0 : %02x - crc should be %02x", data[3], crc0);
		
	int crc1 = data[4] ^ data[5] ^ data[6] ^data[7];
	if ( data[8] == crc1 )
		PrintAndLog("        BCC1 : %02x - Ok", data[8]);
	else
		PrintAndLog("        BCC1 : %02x - crc should be %02x", data[8], crc1 );
	
	PrintAndLog("    Internal : %s ", sprint_hex(data + 9, 1));
	
	memcpy(datatemp, data+10, 2);
	PrintAndLog("        Lock : %s - %s", sprint_hex(datatemp, 2),printBits( 2, &datatemp) );
	PrintAndLog("  OneTimePad : %s ", sprint_hex(data + 3*4, 4));
	PrintAndLog("");

	return 0;
}

//
//  Mifare Ultralight Write Single Block
//
int CmdHF14AMfUWrBl(const char *Cmd){
    uint8_t blockNo    = 0;
    bool chinese_card  = 0;
    uint8_t bldata[16] = {0x00};
    UsbCommand resp;
        
    if (strlen(Cmd)<3) {
        PrintAndLog("Usage:  hf mfu uwrbl <block number> <block data > [w]");
		PrintAndLog("       [block number] ");
		PrintAndLog("       [block data] - (8 hex symbols)");
		PrintAndLog("       [w] - Chinese magic ultralight-c tag ");
		PrintAndLog("");
        PrintAndLog("        sample: hf mfu uwrbl 0 01020304");
        return 0;
    }       
    blockNo = param_get8(Cmd, 0);
    if (blockNo>MAX_ULTRA_BLOCKS){
        PrintAndLog("Error: Maximum number of blocks is 15 for Ultralight Cards!");
        return 1;
    }
    if (param_gethex(Cmd, 1, bldata, 8)) {
        PrintAndLog("Block data must include 8 HEX symbols");
        return 1;
    }
    if (strchr(Cmd,'w') != 0) {
        chinese_card=1; 
    }
    switch(blockNo){
        case 0:
            if (!chinese_card){
                PrintAndLog("Access Denied");
            }else{
                PrintAndLog("--specialblock no:%02x", blockNo);
                PrintAndLog("--data: %s", sprint_hex(bldata, 4));
                UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
                memcpy(d.d.asBytes,bldata, 4);
                SendCommand(&d);
                if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                    uint8_t isOK  = resp.arg[0] & 0xff;
                    PrintAndLog("isOk:%02x", isOK);
                } else {
                    PrintAndLog("Command execute timeout");
                }  
            }
            break;
        case 1:
	    if (!chinese_card){
	        PrintAndLog("Access Denied");
	    }else{	
	        PrintAndLog("--specialblock no:%02x", blockNo);
                PrintAndLog("--data: %s", sprint_hex(bldata, 4));
                UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
                memcpy(d.d.asBytes,bldata, 4);
                SendCommand(&d);
                if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                    uint8_t isOK  = resp.arg[0] & 0xff;
                    PrintAndLog("isOk:%02x", isOK);
                } else {
                    PrintAndLog("Command execute timeout");
                }
	    }
	    break;
	case 2:
	    if (!chinese_card){
	        PrintAndLog("Access Denied");
	    }else{	
	        PrintAndLog("--specialblock no:%02x", blockNo);
                PrintAndLog("--data: %s", sprint_hex(bldata, 4));
                UsbCommand c = {CMD_MIFAREU_WRITEBL, {blockNo}};
                memcpy(c.d.asBytes, bldata, 4);
                SendCommand(&c);
                if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                    uint8_t isOK  = resp.arg[0] & 0xff;
                    PrintAndLog("isOk:%02x", isOK);
                } else {
                    PrintAndLog("Command execute timeout");
                }
	    }
	    break;
	case 3:
	    PrintAndLog("--specialblock no:%02x", blockNo);
            PrintAndLog("--data: %s", sprint_hex(bldata, 4));
            UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
            memcpy(d.d.asBytes,bldata, 4);
            SendCommand(&d);
            if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                uint8_t isOK  = resp.arg[0] & 0xff;
                PrintAndLog("isOk:%02x", isOK);
            } else {
                PrintAndLog("Command execute timeout");
            }
            break;
	default: 
	    PrintAndLog("--block no:%02x", blockNo);
	    PrintAndLog("--data: %s", sprint_hex(bldata, 4));        	
	    UsbCommand e = {CMD_MIFAREU_WRITEBL, {blockNo}};
            memcpy(e.d.asBytes,bldata, 4);
            SendCommand(&e);
        if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
            uint8_t isOK  = resp.arg[0] & 0xff;
            PrintAndLog("isOk:%02x", isOK);
        } else {
            PrintAndLog("Command execute timeout");
        }
        break;
    }
    return 0;
}

//
//  Mifare Ultralight Read Single Block
//
int CmdHF14AMfURdBl(const char *Cmd){
  
    uint8_t blockNo = 0;	
        
    if (strlen(Cmd)<1) {
        PrintAndLog("Usage:  hf mfu urdbl <block number>");
        PrintAndLog("        sample: hfu mfu urdbl 0");
        return 0;
    }       
        
    blockNo = param_get8(Cmd, 0);
    // if (blockNo>MAX_ULTRA_BLOCKS){
       // PrintAndLog("Error: Maximum number of blocks is 15 for Ultralight Cards!");
       // return 1;
    // }
    PrintAndLog("--block no:%02x", (int)blockNo);
    UsbCommand c = {CMD_MIFAREU_READBL, {blockNo}};
    SendCommand(&c);

    UsbCommand resp;
    if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
        uint8_t isOK    = resp.arg[0] & 0xff;
        uint8_t * data  = resp.d.asBytes;

        if (isOK)
            PrintAndLog("isOk:%02x data:%s", isOK, sprint_hex(data, 4));
        else
			PrintAndLog("isOk:%02x", isOK);
        }
	else {
        PrintAndLog("Command execute timeout");
    }
    return 0;
}

//
//  Mifare Ultralight / Ultralight-C;  Read and Dump Card Contents
//
int CmdHF14AMfUDump(const char *Cmd){

    FILE *fout;
	char filename[FILE_PATH_SIZE] = {0x00};
	char * fnameptr = filename;
	
    uint8_t *lockbytes_t = NULL;
    uint8_t lockbytes[2] = {0x00};
	
    uint8_t *lockbytes_t2 = NULL;
    uint8_t lockbytes2[2] = {0x00};

    bool bit[16]  = {0x00};
	bool bit2[16] = {0x00};
	
    int i;
    uint8_t BlockNo      = 0;
    int Pages            = 16;

	bool tmplockbit		 = false;
    uint8_t isOK         = 0;
    uint8_t *data       = NULL;

 	char cmdp = param_getchar(Cmd, 0);
	
	if (cmdp == 'h' || cmdp == 'H') {
		PrintAndLog("Reads all pages from Mifare Ultralight or Ultralight-C tag.");
		PrintAndLog("It saves binary dump into the file `filename.bin` or `cardUID.bin`");		
		PrintAndLog("Usage:  hf mfu dump <c> <filename w/o .bin>");
		PrintAndLog("     <c>  optional cardtype c == Ultralight-C, if not defaults to Ultralight");
		PrintAndLog("     sample: hf mfu dump");
		PrintAndLog("           : hf mfu dump myfile");
		PrintAndLog("           : hf mfu dump c myfile");
		return 0;
	}

	// UL or UL-C?
	Pages = (cmdp == 'c' || cmdp == 'C') ? 44 : 16;
	
	PrintAndLog("Dumping Ultralight%s Card Data...", (Pages ==16)?"":"-C");
    	
    UsbCommand c = {CMD_MIFAREU_READCARD, {BlockNo,Pages}};
    SendCommand(&c);
    UsbCommand resp;

    if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
		isOK  = resp.arg[0] & 0xff;
        if (!isOK) {                
			PrintAndLog("Command error");
			return 0;
		}
		data  = resp.d.asBytes;
	} else {
		PrintAndLog("Command execute timeout");
		return 0;
	}
		
	// Load lock bytes.
	int j = 0;
	
	lockbytes_t = data + 8;
	lockbytes[0] = lockbytes_t[2];
	lockbytes[1] = lockbytes_t[3];
	for(j = 0; j < 16; j++){
		bit[j] = lockbytes[j/8] & ( 1 <<(7-j%8));
	}		
	
	// Load bottom lockbytes if available
	if ( Pages == 44 ) {
		
		lockbytes_t2 = data + (40*4);
		lockbytes2[0] = lockbytes_t2[2];
		lockbytes2[1] = lockbytes_t2[3];
		for (j = 0; j < 16; j++) {
			bit2[j] = lockbytes2[j/8] & ( 1 <<(7-j%8));
		}
	}

	for (i = 0; i < Pages; ++i) {
		
		if ( i < 3 ) {
			PrintAndLog("Block %02x:%s ", i,sprint_hex(data + i * 4, 4));
			continue;
		}
			
		switch(i){
			case 3: tmplockbit = bit[4]; break;
			case 4:	tmplockbit = bit[3]; break;
			case 5:	tmplockbit = bit[2]; break;
			case 6:	tmplockbit = bit[1]; break;
			case 7:	tmplockbit = bit[0]; break;
			case 8:	tmplockbit = bit[15]; break;
			case 9: tmplockbit = bit[14]; break;
			case 10: tmplockbit = bit[13]; break;
			case 11: tmplockbit = bit[12]; break;
			case 12: tmplockbit = bit[11]; break;
			case 13: tmplockbit = bit[10]; break;
			case 14: tmplockbit = bit[9]; break;
			case 15: tmplockbit = bit[8]; break;
			case 16:
			case 17:
			case 18:
			case 19: tmplockbit = bit2[6]; break;
			case 20:
			case 21:
			case 22:
			case 23: tmplockbit = bit2[5]; break; 
			case 24:
			case 25:
			case 26:
			case 27: tmplockbit = bit2[4]; break; 		    
			case 28:
			case 29:
			case 30:
			case 31: tmplockbit = bit2[2]; break;
			case 32:
			case 33:
			case 34:
			case 35: tmplockbit = bit2[1]; break; 
			case 36:
			case 37:
			case 38:
			case 39: tmplockbit = bit2[0]; break; 
			case 40: tmplockbit = bit2[12]; break;
			case 41: tmplockbit = bit2[11]; break;
			case 42: tmplockbit = bit2[10]; break; //auth0
			case 43: tmplockbit = bit2[9]; break;  //auth1
			default: break;
		}
		PrintAndLog("Block %02x:%s [%d]", i,sprint_hex(data + i * 4, 4),tmplockbit);
	}  
	
	int len = 0;
	if ( Pages == 16 )
		len = param_getstr(Cmd,0,filename);
	else
		len = param_getstr(Cmd,1,filename);

	if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;

	// user supplied filename?
	if (len < 1) {
	
		// UID = data 0-1-2 4-5-6-7  (skips a beat)
		sprintf(fnameptr, "%02X", data[0]);
		fnameptr += 2;
		sprintf(fnameptr, "%02X", data[1]);
		fnameptr += 2;
		sprintf(fnameptr, "%02X", data[2]);
		fnameptr += 2;
		sprintf(fnameptr, "%02X", data[4]);
		fnameptr += 2;
		sprintf(fnameptr, "%02X", data[5]);
		fnameptr += 2;
		sprintf(fnameptr, "%02X", data[6]);
		fnameptr += 2;
		sprintf(fnameptr, "%02X", data[7]);
		fnameptr += 2;

	} else {
		fnameptr += len;
	}

	// add file extension
	sprintf(fnameptr, ".bin"); 

	if ((fout = fopen(filename,"wb")) == NULL) { 
		PrintAndLog("Could not create file name %s", filename);
		return 1;	
	}
	fwrite( data, 1, Pages*4, fout );
	fclose(fout);
	
	PrintAndLog("Dumped %d pages, wrote %d bytes to %s", Pages, Pages*4, filename);
    return 0;
}

// Needed to Authenticate to Ultralight C tags
void rol (uint8_t *data, const size_t len){
    uint8_t first = data[0];
    for (size_t i = 0; i < len-1; i++) {
        data[i] = data[i+1];
    }
    data[len-1] = first;
}

//-------------------------------------------------------------------------------
// Ultralight C Methods
//-------------------------------------------------------------------------------

//
// Ultralight C Authentication Demo {currently uses hard-coded key}
//
int CmdHF14AMfucAuth(const char *Cmd){
        
    uint8_t blockNo = 0, keyNo = 0;
    uint8_t e_RndB[8] = {0x00};
    uint32_t cuid = 0;
    unsigned char RndARndB[16] = {0x00};
    uint8_t key[16] = {0x00};
    DES_cblock RndA, RndB;
    DES_cblock iv;
    DES_key_schedule ks1,ks2;
    DES_cblock key1,key2;

	// 
	memset(iv, 0, 8);
	
    if (strlen(Cmd)<1) {
        PrintAndLog("Usage:  hf mfu auth k <key number>");
        PrintAndLog("        sample: hf mfu auth k 0");
        return 0;
    } 
    
    //Change key to user defined one
    if (strchr(Cmd,'k') != 0){
        //choose a key
        keyNo = param_get8(Cmd, 1);
        switch(keyNo){
            case 0:
                memcpy(key,key1_blnk_data,16);
                break;
            case 1:
                memcpy(key,key2_defa_data,16);
                break;
	    case 2:
                memcpy(key,key4_nfc_data,16);
                break;
		case 3: 
				memcpy(key,key5_ones_data,16);
                break;
            default:
                memcpy(key,key3_3des_data,16);
                break;
        }
    }else{
        memcpy(key,key3_3des_data,16);  
    }
    memcpy(key1,key,8);
    memcpy(key2,key+8,8);
    DES_set_key((DES_cblock *)key1,&ks1);
    DES_set_key((DES_cblock *)key2,&ks2);
        
    //Auth1
    UsbCommand c = {CMD_MIFAREUC_AUTH1, {blockNo}};
    SendCommand(&c);
    UsbCommand resp;
    if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
        uint8_t isOK  = resp.arg[0] & 0xff;
	        cuid  = resp.arg[1];
        uint8_t * data= resp.d.asBytes;

         if (isOK){
             PrintAndLog("enc(RndB):%s", sprint_hex(data+1, 8));
             memcpy(e_RndB,data+1,8);
	}
    } else {
        PrintAndLog("Command execute timeout");
    }
       
    //Do crypto magic
    DES_random_key(&RndA);
    DES_ede2_cbc_encrypt(e_RndB,RndB,sizeof(e_RndB),&ks1,&ks2,&iv,0);
    PrintAndLog("     RndB:%s",sprint_hex(RndB, 8));
    PrintAndLog("     RndA:%s",sprint_hex(RndA, 8));
    rol(RndB,8);
    memcpy(RndARndB,RndA,8);
    memcpy(RndARndB+8,RndB,8);
    PrintAndLog("     RA+B:%s",sprint_hex(RndARndB, 16));
    DES_ede2_cbc_encrypt(RndARndB,RndARndB,sizeof(RndARndB),&ks1,&ks2,&e_RndB,1);
    PrintAndLog("enc(RA+B):%s",sprint_hex(RndARndB, 16));

    //Auth2
    UsbCommand d = {CMD_MIFAREUC_AUTH2, {cuid}};
    memcpy(d.d.asBytes,RndARndB, 16);
    SendCommand(&d);

    UsbCommand respb;
    if (WaitForResponseTimeout(CMD_ACK,&respb,1500)) {
        uint8_t  isOK  = respb.arg[0] & 0xff;
        uint8_t * data2= respb.d.asBytes;

        if (isOK){
            PrintAndLog("enc(RndA'):%s", sprint_hex(data2+1, 8));
	}
                 
    } else {
        PrintAndLog("Command execute timeout");
    } 
    return 1;
}

//
// Ultralight C Read Single Block
//
int CmdHF14AMfUCRdBl(const char *Cmd)
{
    uint8_t blockNo = 0;
        
    if (strlen(Cmd)<1) {
        PrintAndLog("Usage:  hf mfu ucrdbl  <block number>");
        PrintAndLog("        sample: hf mfu ucrdbl 0");
        return 0;
    }       
        
    blockNo = param_get8(Cmd, 0);
    if (blockNo>MAX_ULTRAC_BLOCKS){
        PrintAndLog("Error: Maximum number of readable blocks is 44 for Ultralight Cards!");
        return 1;
    }
    PrintAndLog("--block no:%02x", (int)blockNo);

    //Read Block
    UsbCommand e = {CMD_MIFAREU_READBL, {blockNo}};
    SendCommand(&e);
    UsbCommand resp_c;
    if (WaitForResponseTimeout(CMD_ACK,&resp_c,1500)) {
        uint8_t                isOK  = resp_c.arg[0] & 0xff;
        uint8_t              * data  = resp_c.d.asBytes;
        if (isOK)
            PrintAndLog("isOk:%02x data:%s", isOK, sprint_hex(data, 4));
        else
            PrintAndLog("isOk:%02x", isOK);
        } else {
            PrintAndLog("Command execute timeout");
        }
    return 0;
}

//
//  Mifare Ultralight C Write Single Block
//
int CmdHF14AMfUCWrBl(const char *Cmd){
    
    uint8_t blockNo = 0;
    bool chinese_card = 0;
    uint8_t bldata[16] = {0x00};
    UsbCommand resp;
        
    if (strlen(Cmd)<3) {
        PrintAndLog("Usage:  hf mfu ucwrbl <block number> <block data (8 hex symbols)> [w]");
        PrintAndLog("        sample: hf mfu uwrbl 0 01020304");
        return 0;
    }       
    blockNo = param_get8(Cmd, 0);
    if (blockNo>(MAX_ULTRAC_BLOCKS+4)){
        PrintAndLog("Error: Maximum number of blocks is 47 for Ultralight Cards!");
        return 1;
    }
    if (param_gethex(Cmd, 1, bldata, 8)) {
        PrintAndLog("Block data must include 8 HEX symbols");
        return 1;
    }
    if (strchr(Cmd,'w') != 0) {
        chinese_card=1; 
    }
    switch(blockNo){
        case 0:
            if (!chinese_card){
                 PrintAndLog("Access Denied");  
            }else{
                PrintAndLog("--specialblock no:%02x", blockNo);
                PrintAndLog("--data: %s", sprint_hex(bldata, 4));
                UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
                memcpy(d.d.asBytes,bldata, 4);
                SendCommand(&d);
                if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                    uint8_t isOK  = resp.arg[0] & 0xff;
                    PrintAndLog("isOk:%02x", isOK);
                } else {
                    PrintAndLog("Command execute timeout");
                }  
            }
            break;
        case 1:
            if (!chinese_card){
                PrintAndLog("Access Denied");
            }else{	
                PrintAndLog("--specialblock no:%02x", blockNo);
                PrintAndLog("--data: %s", sprint_hex(bldata, 4));
                UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
                memcpy(d.d.asBytes,bldata, 4);
                SendCommand(&d);
                if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                    uint8_t isOK  = resp.arg[0] & 0xff;
                    PrintAndLog("isOk:%02x", isOK);
                } else {
                    PrintAndLog("Command execute timeout");
                }
           }
           break;
        case 2:
            if (!chinese_card){
                PrintAndLog("Access Denied");
            }else{	
                PrintAndLog("--specialblock no:%02x", blockNo);
                PrintAndLog("--data: %s", sprint_hex(bldata, 4));
                UsbCommand c = {CMD_MIFAREU_WRITEBL, {blockNo}};
                memcpy(c.d.asBytes, bldata, 4);
                SendCommand(&c);
                if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                    uint8_t isOK  = resp.arg[0] & 0xff;
                    PrintAndLog("isOk:%02x", isOK);
                } else {
                    PrintAndLog("Command execute timeout");
                }
            }
            break;
        case 3:
            PrintAndLog("--specialblock no:%02x", blockNo);
            PrintAndLog("--data: %s", sprint_hex(bldata, 4));
            UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
            memcpy(d.d.asBytes,bldata, 4);
            SendCommand(&d);
            if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                uint8_t isOK  = resp.arg[0] & 0xff;
                PrintAndLog("isOk:%02x", isOK);
            } else {
                PrintAndLog("Command execute timeout");
            }
            break;
        default: 
            PrintAndLog("--block no:%02x", blockNo);
            PrintAndLog("--data: %s", sprint_hex(bldata, 4));        	
            UsbCommand e = {CMD_MIFAREU_WRITEBL, {blockNo}};
            memcpy(e.d.asBytes,bldata, 4);
            SendCommand(&e);
            if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
                uint8_t isOK  = resp.arg[0] & 0xff;
                PrintAndLog("isOk:%02x", isOK);
            } else {
                PrintAndLog("Command execute timeout");
            }
            break;
        }
        return 0;
}

//------------------------------------
// Menu Stuff
//------------------------------------
static command_t CommandTable[] =
{
    {"help",	CmdHelp,			1,"This help"},
    {"dbg",		CmdHF14AMfDbg,		0,"Set default debug mode"},
	{"info",	CmdHF14AMfUInfo,	0,"Taginfo"},
    {"rdbl",	CmdHF14AMfURdBl,	0,"Read block - MIFARE Ultralight"},
    {"dump",	CmdHF14AMfUDump,	0,"Dump MIFARE Ultralight / Ultralight-C tag to binary file"},
    {"wrbl",	CmdHF14AMfUWrBl,	0,"Write block - MIFARE Ultralight"},
    {"crdbl",	CmdHF14AMfUCRdBl,	0,"Read block - MIFARE Ultralight C"},
    {"cwrbl",	CmdHF14AMfUCWrBl,	0,"Write MIFARE Ultralight C block"},
    {"cauth",	CmdHF14AMfucAuth,	0,"try a Ultralight C Authentication"},
    {NULL, NULL, 0, NULL}
};

int CmdHFMFUltra(const char *Cmd){
    WaitForResponseTimeout(CMD_ACK,NULL,100);
    CmdsParse(CommandTable, Cmd);
    return 0;
}

int CmdHelp(const char *Cmd){
    CmdsHelp(CommandTable);
    return 0;
}
Commit	Line	Data
f38a1528	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 <openssl/des.h>
	11	#include "cmdhfmf.h"
99a71418	12	#include "cmdhf14a.h"
f38a1528	13
99a71418	14	uint8_t MAX_ULTRA_BLOCKS = 0x0f;
	15	uint8_t MAX_ULTRAC_BLOCKS = 0x2c;
	16	uint8_t key1_blnk_data[16] = { 0x00 };
f38a1528	17	uint8_t key2_defa_data[16] = { 0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f };
	18	uint8_t key3_3des_data[16] = { 0x49,0x45,0x4D,0x4B,0x41,0x45,0x52,0x42,0x21,0x4E,0x41,0x43,0x55,0x4F,0x59,0x46 };
	19	uint8_t key4_nfc_data[16] = { 0x42,0x52,0x45,0x41,0x4b,0x4d,0x45,0x49,0x46,0x59,0x4f,0x55,0x43,0x41,0x4e,0x21 };
99a71418	20	uint8_t key5_ones_data[16] = { 0x01 };
f38a1528	21
	22	static int CmdHelp(const char *Cmd);
	23
e3ab50ca	24	int CmdHF14AMfUInfo(const char *Cmd){
	25
	26	uint8_t datatemp[7] = {0x00};
	27	uint8_t isOK = 0;
	28	uint8_t *data = NULL;
	29
	30	UsbCommand c = {CMD_MIFAREU_READCARD, {0, 4}};
	31	SendCommand(&c);
	32	UsbCommand resp;
	33
	34	if (WaitForResponseTimeout(CMD_ACK, &resp, 1500)) {
	35	isOK = resp.arg[0] & 0xff;
	36	data = resp.d.asBytes;
	37
	38	if (!isOK) {
	39	PrintAndLog("Error reading from tag");
	40	return -1;
	41	}
	42	} else {
	43	PrintAndLog("Command execute timed out");
	44	return -1;
	45	}
	46
99a71418	47	PrintAndLog("");
	48	PrintAndLog("-- Mifare Ultralight / Ultralight-C Tag Information ---------");
	49	PrintAndLog("-------------------------------------------------------------");
	50
e3ab50ca	51	// UID
99a71418	52	memcpy( datatemp, data, 3);
e3ab50ca	53	memcpy( datatemp+3, data+4, 4);
99a71418	54
	55	PrintAndLog("MANUFACTURER : %s", getTagInfo(datatemp[0]));
	56	PrintAndLog(" UID : %s ", sprint_hex(datatemp, 7));
e3ab50ca	57	// BBC
	58	// CT (cascade tag byte) 0x88 xor SN0 xor SN1 xor SN2
	59	int crc0 = 0x88 ^ data[0] ^ data[1] ^data[2];
	60	if ( data[3] == crc0 )
99a71418	61	PrintAndLog(" BCC0 : %02x - Ok", data[3]);
e3ab50ca	62	else
99a71418	63	PrintAndLog(" BCC0 : %02x - crc should be %02x", data[3], crc0);
e3ab50ca	64
	65	int crc1 = data[4] ^ data[5] ^ data[6] ^data[7];
	66	if ( data[8] == crc1 )
99a71418	67	PrintAndLog(" BCC1 : %02x - Ok", data[8]);
e3ab50ca	68	else
99a71418	69	PrintAndLog(" BCC1 : %02x - crc should be %02x", data[8], crc1 );
e3ab50ca	70
99a71418	71	PrintAndLog(" Internal : %s ", sprint_hex(data + 9, 1));
e3ab50ca	72
e3ab50ca	73	memcpy(datatemp, data+10, 2);
99a71418	74	PrintAndLog(" Lock : %s - %s", sprint_hex(datatemp, 2),printBits( 2, &datatemp) );
99a71418	75	PrintAndLog(" OneTimePad : %s ", sprint_hex(data + 3*4, 4));
e3ab50ca	76	PrintAndLog("");
	77
	78	return 0;
	79	}
	80
f38a1528	81	//
	82	// Mifare Ultralight Write Single Block
	83	//
	84	int CmdHF14AMfUWrBl(const char *Cmd){
149aeada	85	uint8_t blockNo = 0;
	86	bool chinese_card = 0;
	87	uint8_t bldata[16] = {0x00};
f38a1528	88	UsbCommand resp;
	89
	90	if (strlen(Cmd)<3) {
99a71418	91	PrintAndLog("Usage: hf mfu uwrbl <block number> <block data > [w]");
	92	PrintAndLog(" [block number] ");
	93	PrintAndLog(" [block data] - (8 hex symbols)");
	94	PrintAndLog(" [w] - Chinese magic ultralight-c tag ");
	95	PrintAndLog("");
f38a1528	96	PrintAndLog(" sample: hf mfu uwrbl 0 01020304");
	97	return 0;
	98	}
	99	blockNo = param_get8(Cmd, 0);
	100	if (blockNo>MAX_ULTRA_BLOCKS){
	101	PrintAndLog("Error: Maximum number of blocks is 15 for Ultralight Cards!");
	102	return 1;
	103	}
	104	if (param_gethex(Cmd, 1, bldata, 8)) {
	105	PrintAndLog("Block data must include 8 HEX symbols");
	106	return 1;
	107	}
	108	if (strchr(Cmd,'w') != 0) {
	109	chinese_card=1;
	110	}
	111	switch(blockNo){
	112	case 0:
	113	if (!chinese_card){
	114	PrintAndLog("Access Denied");
	115	}else{
	116	PrintAndLog("--specialblock no:%02x", blockNo);
	117	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
	118	UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
	119	memcpy(d.d.asBytes,bldata, 4);
	120	SendCommand(&d);
	121	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
	122	uint8_t isOK = resp.arg[0] & 0xff;
	123	PrintAndLog("isOk:%02x", isOK);
	124	} else {
	125	PrintAndLog("Command execute timeout");
	126	}
	127	}
	128	break;
	129	case 1:
	130	if (!chinese_card){
	131	PrintAndLog("Access Denied");
	132	}else{
	133	PrintAndLog("--specialblock no:%02x", blockNo);
	134	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
	135	UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
	136	memcpy(d.d.asBytes,bldata, 4);
	137	SendCommand(&d);
	138	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
	139	uint8_t isOK = resp.arg[0] & 0xff;
	140	PrintAndLog("isOk:%02x", isOK);
	141	} else {
	142	PrintAndLog("Command execute timeout");
	143	}
	144	}
	145	break;
	146	case 2:
	147	if (!chinese_card){
	148	PrintAndLog("Access Denied");
	149	}else{
	150	PrintAndLog("--specialblock no:%02x", blockNo);
	151	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
	152	UsbCommand c = {CMD_MIFAREU_WRITEBL, {blockNo}};
	153	memcpy(c.d.asBytes, bldata, 4);
	154	SendCommand(&c);
	155	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
	156	uint8_t isOK = resp.arg[0] & 0xff;
	157	PrintAndLog("isOk:%02x", isOK);
	158	} else {
	159	PrintAndLog("Command execute timeout");
160	}
161	}
162	break;
163	case 3:
164	PrintAndLog("--specialblock no:%02x", blockNo);
165	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
166	UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
167	memcpy(d.d.asBytes,bldata, 4);
168	SendCommand(&d);
169	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
170	uint8_t isOK = resp.arg[0] & 0xff;
171	PrintAndLog("isOk:%02x", isOK);
172	} else {
173	PrintAndLog("Command execute timeout");
174	}
175	break;
176	default:
177	PrintAndLog("--block no:%02x", blockNo);
178	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
179	UsbCommand e = {CMD_MIFAREU_WRITEBL, {blockNo}};
180	memcpy(e.d.asBytes,bldata, 4);
181	SendCommand(&e);
182	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
183	uint8_t isOK = resp.arg[0] & 0xff;
184	PrintAndLog("isOk:%02x", isOK);
185	} else {
186	PrintAndLog("Command execute timeout");
187	}
188	break;
189	}
190	return 0;
191	}
192
193	//
194	// Mifare Ultralight Read Single Block
195	//
196	int CmdHF14AMfURdBl(const char *Cmd){
197
198	uint8_t blockNo = 0;
199
200	if (strlen(Cmd)<1) {
99a71418	201	PrintAndLog("Usage: hf mfu urdbl <block number>");
f38a1528	202	PrintAndLog(" sample: hfu mfu urdbl 0");
	203	return 0;
	204	}
	205
	206	blockNo = param_get8(Cmd, 0);
	207	// if (blockNo>MAX_ULTRA_BLOCKS){
	208	// PrintAndLog("Error: Maximum number of blocks is 15 for Ultralight Cards!");
	209	// return 1;
	210	// }
	211	PrintAndLog("--block no:%02x", (int)blockNo);
	212	UsbCommand c = {CMD_MIFAREU_READBL, {blockNo}};
	213	SendCommand(&c);
	214
	215	UsbCommand resp;
	216	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
	217	uint8_t isOK = resp.arg[0] & 0xff;
	218	uint8_t * data = resp.d.asBytes;
	219
	220	if (isOK)
	221	PrintAndLog("isOk:%02x data:%s", isOK, sprint_hex(data, 4));
	222	else
d3499d36	223	PrintAndLog("isOk:%02x", isOK);
f38a1528	224	}
d3499d36	225	else {
	226	PrintAndLog("Command execute timeout");
	227	}
f38a1528	228	return 0;
	229	}
	230
	231	//
99a71418	232	// Mifare Ultralight / Ultralight-C; Read and Dump Card Contents
f38a1528	233	//
99a71418	234	int CmdHF14AMfUDump(const char *Cmd){
	235
	236	FILE *fout;
	237	char filename[FILE_PATH_SIZE] = {0x00};
	238	char * fnameptr = filename;
	239
e3ab50ca	240	uint8_t *lockbytes_t = NULL;
e3ab50ca	241	uint8_t lockbytes[2] = {0x00};
99a71418	242
	243	uint8_t *lockbytes_t2 = NULL;
	244	uint8_t lockbytes2[2] = {0x00};
f38a1528	245
99a71418	246	bool bit[16] = {0x00};
	247	bool bit2[16] = {0x00};
	248
f38a1528	249	int i;
149aeada	250	uint8_t BlockNo = 0;
149aeada	251	int Pages = 16;
99a71418	252
99a71418	253	bool tmplockbit = false;
149aeada	254	uint8_t isOK = 0;
99a71418	255	uint8_t *data = NULL;
f38a1528	256
99a71418	257	char cmdp = param_getchar(Cmd, 0);
	258
	259	if (cmdp == 'h' \|\| cmdp == 'H') {
	260	PrintAndLog("Reads all pages from Mifare Ultralight or Ultralight-C tag.");
	261	PrintAndLog("It saves binary dump into the file `filename.bin` or `cardUID.bin`");
	262	PrintAndLog("Usage: hf mfu dump <c> <filename w/o .bin>");
	263	PrintAndLog(" <c> optional cardtype c == Ultralight-C, if not defaults to Ultralight");
	264	PrintAndLog(" sample: hf mfu dump");
	265	PrintAndLog(" : hf mfu dump myfile");
	266	PrintAndLog(" : hf mfu dump c myfile");
	267	return 0;
	268	}
	269
	270	// UL or UL-C?
	271	Pages = (cmdp == 'c' \|\| cmdp == 'C') ? 44 : 16;
	272
	273	PrintAndLog("Dumping Ultralight%s Card Data...", (Pages ==16)?"":"-C");
f38a1528	274
f38a1528	275	UsbCommand c = {CMD_MIFAREU_READCARD, {BlockNo,Pages}};
	276	SendCommand(&c);
	277	UsbCommand resp;
	278
	279	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
99a71418	280	isOK = resp.arg[0] & 0xff;
	281	if (!isOK) {
	282	PrintAndLog("Command error");
	283	return 0;
	284	}
	285	data = resp.d.asBytes;
	286	} else {
	287	PrintAndLog("Command execute timeout");
	288	return 0;
	289	}
	290
	291	// Load lock bytes.
	292	int j = 0;
	293
	294	lockbytes_t = data + 8;
	295	lockbytes[0] = lockbytes_t[2];
	296	lockbytes[1] = lockbytes_t[3];
	297	for(j = 0; j < 16; j++){
	298	bit[j] = lockbytes[j/8] & ( 1 <<(7-j%8));
	299	}
	300
	301	// Load bottom lockbytes if available
	302	if ( Pages == 44 ) {
	303
	304	lockbytes_t2 = data + (40*4);
	305	lockbytes2[0] = lockbytes_t2[2];
	306	lockbytes2[1] = lockbytes_t2[3];
	307	for (j = 0; j < 16; j++) {
	308	bit2[j] = lockbytes2[j/8] & ( 1 <<(7-j%8));
	309	}
f38a1528	310	}
99a71418	311
	312	for (i = 0; i < Pages; ++i) {
	313
	314	if ( i < 3 ) {
	315	PrintAndLog("Block %02x:%s ", i,sprint_hex(data + i * 4, 4));
	316	continue;
	317	}
	318
	319	switch(i){
	320	case 3: tmplockbit = bit[4]; break;
	321	case 4: tmplockbit = bit[3]; break;
	322	case 5: tmplockbit = bit[2]; break;
	323	case 6: tmplockbit = bit[1]; break;
	324	case 7: tmplockbit = bit[0]; break;
	325	case 8: tmplockbit = bit[15]; break;
	326	case 9: tmplockbit = bit[14]; break;
	327	case 10: tmplockbit = bit[13]; break;
	328	case 11: tmplockbit = bit[12]; break;
	329	case 12: tmplockbit = bit[11]; break;
	330	case 13: tmplockbit = bit[10]; break;
	331	case 14: tmplockbit = bit[9]; break;
	332	case 15: tmplockbit = bit[8]; break;
	333	case 16:
	334	case 17:
	335	case 18:
	336	case 19: tmplockbit = bit2[6]; break;
	337	case 20:
	338	case 21:
	339	case 22:
	340	case 23: tmplockbit = bit2[5]; break;
	341	case 24:
	342	case 25:
	343	case 26:
	344	case 27: tmplockbit = bit2[4]; break;
	345	case 28:
	346	case 29:
	347	case 30:
	348	case 31: tmplockbit = bit2[2]; break;
	349	case 32:
	350	case 33:
	351	case 34:
	352	case 35: tmplockbit = bit2[1]; break;
	353	case 36:
	354	case 37:
	355	case 38:
	356	case 39: tmplockbit = bit2[0]; break;
	357	case 40: tmplockbit = bit2[12]; break;
	358	case 41: tmplockbit = bit2[11]; break;
	359	case 42: tmplockbit = bit2[10]; break; //auth0
	360	case 43: tmplockbit = bit2[9]; break; //auth1
	361	default: break;
	362	}
	363	PrintAndLog("Block %02x:%s [%d]", i,sprint_hex(data + i * 4, 4),tmplockbit);
	364	}
	365
	366	int len = 0;
	367	if ( Pages == 16 )
	368	len = param_getstr(Cmd,0,filename);
	369	else
	370	len = param_getstr(Cmd,1,filename);
	371
	372	if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
	373
	374	// user supplied filename?
375	if (len < 1) {
376
377	// UID = data 0-1-2 4-5-6-7 (skips a beat)
378	sprintf(fnameptr, "%02X", data[0]);
379	fnameptr += 2;
380	sprintf(fnameptr, "%02X", data[1]);
381	fnameptr += 2;
382	sprintf(fnameptr, "%02X", data[2]);
383	fnameptr += 2;
384	sprintf(fnameptr, "%02X", data[4]);
385	fnameptr += 2;
386	sprintf(fnameptr, "%02X", data[5]);
387	fnameptr += 2;
388	sprintf(fnameptr, "%02X", data[6]);
389	fnameptr += 2;
390	sprintf(fnameptr, "%02X", data[7]);
391	fnameptr += 2;
392
393	} else {
394	fnameptr += len;
395	}
396
397	// add file extension
398	sprintf(fnameptr, ".bin");
399
400	if ((fout = fopen(filename,"wb")) == NULL) {
401	PrintAndLog("Could not create file name %s", filename);
402	return 1;
403	}
404	fwrite( data, 1, Pages*4, fout );
405	fclose(fout);
406
407	PrintAndLog("Dumped %d pages, wrote %d bytes to %s", Pages, Pages*4, filename);
f38a1528	408	return 0;
	409	}
	410
	411	// Needed to Authenticate to Ultralight C tags
	412	void rol (uint8_t *data, const size_t len){
	413	uint8_t first = data[0];
	414	for (size_t i = 0; i < len-1; i++) {
	415	data[i] = data[i+1];
	416	}
	417	data[len-1] = first;
	418	}
	419
	420	//-------------------------------------------------------------------------------
	421	// Ultralight C Methods
	422	//-------------------------------------------------------------------------------
	423
	424	//
	425	// Ultralight C Authentication Demo {currently uses hard-coded key}
	426	//
	427	int CmdHF14AMfucAuth(const char *Cmd){
	428
99a71418	429	uint8_t blockNo = 0, keyNo = 0;
149aeada	430	uint8_t e_RndB[8] = {0x00};
99a71418	431	uint32_t cuid = 0;
149aeada	432	unsigned char RndARndB[16] = {0x00};
149aeada	433	uint8_t key[16] = {0x00};
f38a1528	434	DES_cblock RndA, RndB;
db297e69	435	DES_cblock iv;
f38a1528	436	DES_key_schedule ks1,ks2;
	437	DES_cblock key1,key2;
	438
db297e69	439	//
	440	memset(iv, 0, 8);
	441
f38a1528	442	if (strlen(Cmd)<1) {
	443	PrintAndLog("Usage: hf mfu auth k <key number>");
	444	PrintAndLog(" sample: hf mfu auth k 0");
	445	return 0;
	446	}
	447
	448	//Change key to user defined one
	449	if (strchr(Cmd,'k') != 0){
	450	//choose a key
	451	keyNo = param_get8(Cmd, 1);
	452	switch(keyNo){
	453	case 0:
	454	memcpy(key,key1_blnk_data,16);
	455	break;
	456	case 1:
	457	memcpy(key,key2_defa_data,16);
	458	break;
	459	case 2:
	460	memcpy(key,key4_nfc_data,16);
	461	break;
	462	case 3:
	463	memcpy(key,key5_ones_data,16);
	464	break;
	465	default:
	466	memcpy(key,key3_3des_data,16);
	467	break;
	468	}
	469	}else{
	470	memcpy(key,key3_3des_data,16);
	471	}
	472	memcpy(key1,key,8);
	473	memcpy(key2,key+8,8);
	474	DES_set_key((DES_cblock *)key1,&ks1);
	475	DES_set_key((DES_cblock *)key2,&ks2);
	476
	477	//Auth1
	478	UsbCommand c = {CMD_MIFAREUC_AUTH1, {blockNo}};
	479	SendCommand(&c);
	480	UsbCommand resp;
	481	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
	482	uint8_t isOK = resp.arg[0] & 0xff;
	483	cuid = resp.arg[1];
	484	uint8_t * data= resp.d.asBytes;
	485
	486	if (isOK){
	487	PrintAndLog("enc(RndB):%s", sprint_hex(data+1, 8));
	488	memcpy(e_RndB,data+1,8);
	489	}
	490	} else {
	491	PrintAndLog("Command execute timeout");
	492	}
	493
	494	//Do crypto magic
	495	DES_random_key(&RndA);
	496	DES_ede2_cbc_encrypt(e_RndB,RndB,sizeof(e_RndB),&ks1,&ks2,&iv,0);
	497	PrintAndLog(" RndB:%s",sprint_hex(RndB, 8));
	498	PrintAndLog(" RndA:%s",sprint_hex(RndA, 8));
	499	rol(RndB,8);
	500	memcpy(RndARndB,RndA,8);
	501	memcpy(RndARndB+8,RndB,8);
	502	PrintAndLog(" RA+B:%s",sprint_hex(RndARndB, 16));
	503	DES_ede2_cbc_encrypt(RndARndB,RndARndB,sizeof(RndARndB),&ks1,&ks2,&e_RndB,1);
	504	PrintAndLog("enc(RA+B):%s",sprint_hex(RndARndB, 16));
	505
506	//Auth2
507	UsbCommand d = {CMD_MIFAREUC_AUTH2, {cuid}};
508	memcpy(d.d.asBytes,RndARndB, 16);
509	SendCommand(&d);
510
511	UsbCommand respb;
512	if (WaitForResponseTimeout(CMD_ACK,&respb,1500)) {
513	uint8_t isOK = respb.arg[0] & 0xff;
514	uint8_t * data2= respb.d.asBytes;
515
516	if (isOK){
517	PrintAndLog("enc(RndA'):%s", sprint_hex(data2+1, 8));
518	}
519
520	} else {
521	PrintAndLog("Command execute timeout");
522	}
523	return 1;
524	}
525
526	//
527	// Ultralight C Read Single Block
528	//
529	int CmdHF14AMfUCRdBl(const char *Cmd)
530	{
f38a1528	531	uint8_t blockNo = 0;
	532
	533	if (strlen(Cmd)<1) {
99a71418	534	PrintAndLog("Usage: hf mfu ucrdbl <block number>");
f38a1528	535	PrintAndLog(" sample: hf mfu ucrdbl 0");
	536	return 0;
	537	}
	538
	539	blockNo = param_get8(Cmd, 0);
	540	if (blockNo>MAX_ULTRAC_BLOCKS){
	541	PrintAndLog("Error: Maximum number of readable blocks is 44 for Ultralight Cards!");
	542	return 1;
	543	}
	544	PrintAndLog("--block no:%02x", (int)blockNo);
	545
	546	//Read Block
	547	UsbCommand e = {CMD_MIFAREU_READBL, {blockNo}};
	548	SendCommand(&e);
	549	UsbCommand resp_c;
	550	if (WaitForResponseTimeout(CMD_ACK,&resp_c,1500)) {
	551	uint8_t isOK = resp_c.arg[0] & 0xff;
	552	uint8_t * data = resp_c.d.asBytes;
	553	if (isOK)
	554	PrintAndLog("isOk:%02x data:%s", isOK, sprint_hex(data, 4));
	555	else
	556	PrintAndLog("isOk:%02x", isOK);
	557	} else {
	558	PrintAndLog("Command execute timeout");
	559	}
	560	return 0;
	561	}
	562
f38a1528	563	//
	564	// Mifare Ultralight C Write Single Block
	565	//
	566	int CmdHF14AMfUCWrBl(const char *Cmd){
	567
	568	uint8_t blockNo = 0;
149aeada	569	bool chinese_card = 0;
149aeada	570	uint8_t bldata[16] = {0x00};
f38a1528	571	UsbCommand resp;
	572
	573	if (strlen(Cmd)<3) {
	574	PrintAndLog("Usage: hf mfu ucwrbl <block number> <block data (8 hex symbols)> [w]");
	575	PrintAndLog(" sample: hf mfu uwrbl 0 01020304");
	576	return 0;
	577	}
	578	blockNo = param_get8(Cmd, 0);
	579	if (blockNo>(MAX_ULTRAC_BLOCKS+4)){
	580	PrintAndLog("Error: Maximum number of blocks is 47 for Ultralight Cards!");
	581	return 1;
	582	}
	583	if (param_gethex(Cmd, 1, bldata, 8)) {
	584	PrintAndLog("Block data must include 8 HEX symbols");
	585	return 1;
	586	}
	587	if (strchr(Cmd,'w') != 0) {
	588	chinese_card=1;
	589	}
	590	switch(blockNo){
	591	case 0:
	592	if (!chinese_card){
	593	PrintAndLog("Access Denied");
	594	}else{
	595	PrintAndLog("--specialblock no:%02x", blockNo);
	596	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
	597	UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
	598	memcpy(d.d.asBytes,bldata, 4);
	599	SendCommand(&d);
	600	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
	601	uint8_t isOK = resp.arg[0] & 0xff;
	602	PrintAndLog("isOk:%02x", isOK);
	603	} else {
	604	PrintAndLog("Command execute timeout");
	605	}
	606	}
	607	break;
	608	case 1:
	609	if (!chinese_card){
	610	PrintAndLog("Access Denied");
	611	}else{
	612	PrintAndLog("--specialblock no:%02x", blockNo);
	613	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
	614	UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
	615	memcpy(d.d.asBytes,bldata, 4);
	616	SendCommand(&d);
	617	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
	618	uint8_t isOK = resp.arg[0] & 0xff;
	619	PrintAndLog("isOk:%02x", isOK);
	620	} else {
	621	PrintAndLog("Command execute timeout");
	622	}
	623	}
	624	break;
	625	case 2:
	626	if (!chinese_card){
	627	PrintAndLog("Access Denied");
	628	}else{
	629	PrintAndLog("--specialblock no:%02x", blockNo);
	630	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
	631	UsbCommand c = {CMD_MIFAREU_WRITEBL, {blockNo}};
	632	memcpy(c.d.asBytes, bldata, 4);
	633	SendCommand(&c);
	634	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
635	uint8_t isOK = resp.arg[0] & 0xff;
636	PrintAndLog("isOk:%02x", isOK);
637	} else {
638	PrintAndLog("Command execute timeout");
639	}
640	}
641	break;
642	case 3:
643	PrintAndLog("--specialblock no:%02x", blockNo);
644	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
645	UsbCommand d = {CMD_MIFAREU_WRITEBL, {blockNo}};
646	memcpy(d.d.asBytes,bldata, 4);
647	SendCommand(&d);
648	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
649	uint8_t isOK = resp.arg[0] & 0xff;
650	PrintAndLog("isOk:%02x", isOK);
651	} else {
652	PrintAndLog("Command execute timeout");
653	}
654	break;
655	default:
656	PrintAndLog("--block no:%02x", blockNo);
657	PrintAndLog("--data: %s", sprint_hex(bldata, 4));
658	UsbCommand e = {CMD_MIFAREU_WRITEBL, {blockNo}};
659	memcpy(e.d.asBytes,bldata, 4);
660	SendCommand(&e);
661	if (WaitForResponseTimeout(CMD_ACK,&resp,1500)) {
662	uint8_t isOK = resp.arg[0] & 0xff;
663	PrintAndLog("isOk:%02x", isOK);
664	} else {
665	PrintAndLog("Command execute timeout");
666	}
667	break;
668	}
669	return 0;
670	}
671
672	//------------------------------------
673	// Menu Stuff
674	//------------------------------------
675	static command_t CommandTable[] =
676	{
e3ab50ca	677	{"help", CmdHelp, 1,"This help"},
	678	{"dbg", CmdHF14AMfDbg, 0,"Set default debug mode"},
	679	{"info", CmdHF14AMfUInfo, 0,"Taginfo"},
	680	{"rdbl", CmdHF14AMfURdBl, 0,"Read block - MIFARE Ultralight"},
99a71418	681	{"dump", CmdHF14AMfUDump, 0,"Dump MIFARE Ultralight / Ultralight-C tag to binary file"},
e3ab50ca	682	{"wrbl", CmdHF14AMfUWrBl, 0,"Write block - MIFARE Ultralight"},
e3ab50ca	683	{"crdbl", CmdHF14AMfUCRdBl, 0,"Read block - MIFARE Ultralight C"},
e3ab50ca	684	{"cwrbl", CmdHF14AMfUCWrBl, 0,"Write MIFARE Ultralight C block"},
e3ab50ca	685	{"cauth", CmdHF14AMfucAuth, 0,"try a Ultralight C Authentication"},
f38a1528	686	{NULL, NULL, 0, NULL}
	687	};
	688
	689	int CmdHFMFUltra(const char *Cmd){
f38a1528	690	WaitForResponseTimeout(CMD_ACK,NULL,100);
	691	CmdsParse(CommandTable, Cmd);
	692	return 0;
	693	}
	694
	695	int CmdHelp(const char *Cmd){
	696	CmdsHelp(CommandTable);
	697	return 0;
	698	}