]> git.zerfleddert.de Git - proxmark3-svn/blobdiff - client/cmdsmartcard.c
restore #755 reverted after #757 (#761)
[proxmark3-svn] / client / cmdsmartcard.c
index 4258989ccc4170d433b2bad176d6a2f06be745cb..edd51b7237cea5dfedb75f427e1da767b2b7e770 100644 (file)
 
 #include "ui.h"
 #include "cmdparser.h"
 
 #include "ui.h"
 #include "cmdparser.h"
+#include "proxmark3.h"
 #include "util.h"
 #include "smartcard.h"
 #include "comms.h"
 #include "protocols.h"
 #include "util.h"
 #include "smartcard.h"
 #include "comms.h"
 #include "protocols.h"
-#include "cmdhf.h"              // CmdHFlist
+#include "cmdhflist.h"
 #include "emv/apduinfo.h"       // APDUcode description
 #include "emv/emvcore.h"        // decodeTVL
 #include "emv/apduinfo.h"       // APDUcode description
 #include "emv/emvcore.h"        // decodeTVL
+#include "crypto/libpcrypto.h" // sha512hash
+#include "emv/dump.h"                  // dump_buffer
 
 
+#define SC_UPGRADE_FILES_DIRECTORY          "sc_upgrade_firmware/"
 
 static int CmdHelp(const char *Cmd);
 
 
 static int CmdHelp(const char *Cmd);
 
@@ -28,14 +32,15 @@ static int usage_sm_raw(void) {
        PrintAndLogEx(NORMAL, "Usage: sc raw [h|r|c] d <0A 0B 0C ... hex>");
        PrintAndLogEx(NORMAL, "       h          :  this help");
        PrintAndLogEx(NORMAL, "       r          :  do not read response");
        PrintAndLogEx(NORMAL, "Usage: sc raw [h|r|c] d <0A 0B 0C ... hex>");
        PrintAndLogEx(NORMAL, "       h          :  this help");
        PrintAndLogEx(NORMAL, "       r          :  do not read response");
-       PrintAndLogEx(NORMAL, "       a          :  active smartcard without select");
-       PrintAndLogEx(NORMAL, "       s          :  active smartcard with select");
+       PrintAndLogEx(NORMAL, "       a          :  active smartcard without select (reset sc module)");
+       PrintAndLogEx(NORMAL, "       s          :  active smartcard with select (get ATR)");
        PrintAndLogEx(NORMAL, "       t          :  executes TLV decoder if it possible");
        PrintAndLogEx(NORMAL, "       t          :  executes TLV decoder if it possible");
+       PrintAndLogEx(NORMAL, "       0          :  use protocol T=0");
        PrintAndLogEx(NORMAL, "       d <bytes>  :  bytes to send");
        PrintAndLogEx(NORMAL, "");
        PrintAndLogEx(NORMAL, "Examples:");
        PrintAndLogEx(NORMAL, "       d <bytes>  :  bytes to send");
        PrintAndLogEx(NORMAL, "");
        PrintAndLogEx(NORMAL, "Examples:");
-       PrintAndLogEx(NORMAL, "        sc raw d 00a404000e315041592e5359532e444446303100    - `1PAY.SYS.DDF01` PPSE directory");
-       PrintAndLogEx(NORMAL, "        sc raw d 00a404000e325041592e5359532e444446303100    - `2PAY.SYS.DDF01` PPSE directory");
+       PrintAndLogEx(NORMAL, "        sc raw s 0 d 00a404000e315041592e5359532e4444463031  - `1PAY.SYS.DDF01` PPSE directory with get ATR");
+       PrintAndLogEx(NORMAL, "        sc raw 0 d 00a404000e325041592e5359532e4444463031    - `2PAY.SYS.DDF01` PPSE directory");
        return 0;
 }
 
        return 0;
 }
 
@@ -60,13 +65,13 @@ static int usage_sm_info(void) {
 }
 
 static int usage_sm_upgrade(void) {
 }
 
 static int usage_sm_upgrade(void) {
-       PrintAndLogEx(NORMAL, "Upgrade firmware");
+       PrintAndLogEx(NORMAL, "Upgrade RDV4.0 Smartcard Socket Firmware");
        PrintAndLogEx(NORMAL, "Usage:  sc upgrade f <file name>");
        PrintAndLogEx(NORMAL, "       h               :  this help");
        PrintAndLogEx(NORMAL, "       f <filename>    :  firmware file name");
        PrintAndLogEx(NORMAL, "");
        PrintAndLogEx(NORMAL, "Examples:");
        PrintAndLogEx(NORMAL, "Usage:  sc upgrade f <file name>");
        PrintAndLogEx(NORMAL, "       h               :  this help");
        PrintAndLogEx(NORMAL, "       f <filename>    :  firmware file name");
        PrintAndLogEx(NORMAL, "");
        PrintAndLogEx(NORMAL, "Examples:");
-       PrintAndLogEx(NORMAL, "        sc upgrade f myfile");
+       PrintAndLogEx(NORMAL, "        sc upgrade f SIM010.BIN");
        return 0;
 }
 
        return 0;
 }
 
@@ -90,6 +95,191 @@ static int usage_sm_brute(void) {
        return 0;
 }
 
        return 0;
 }
 
+uint8_t GetATRTA1(uint8_t *atr, size_t atrlen) {
+       if (atrlen > 2) {
+               uint8_t T0 = atr[1];
+               if (T0 & 0x10)
+                       return atr[2];
+       }
+
+       return 0x11; // default value is 0x11, corresponding to fmax=5 MHz, Fi=372, Di=1.
+}
+
+int DiArray[] = {
+       0,  // b0000 RFU
+       1,  // b0001
+       2,
+       4,
+       8,
+       16,
+       32,  // b0110
+       64,  // b0111. This was RFU in ISO/IEC 7816-3:1997 and former. Some card readers or drivers may erroneously reject cards using this value
+       12,
+       20,
+       0,   // b1010 RFU
+       0,
+       0,   // ...
+       0,
+       0,
+       0    // b1111 RFU
+};
+
+int FiArray[] = {
+       372,    // b0000 Historical note: in ISO/IEC 7816-3:1989, this was assigned to cards with internal clock
+       372,    // b0001
+       558,    // b0010
+       744,    // b0011
+       1116,   // b0100
+       1488,   // b0101
+       1860,   // b0110
+       0,      // b0111 RFU
+       0,      // b1000 RFU
+       512,    // b1001
+       768,    // b1010
+       1024,   // b1011
+       1536,   // b1100
+       2048,   // b1101
+       0,      // b1110 RFU
+       0       // b1111 RFU
+};
+
+float FArray[] = {
+       4,    // b0000 Historical note: in ISO/IEC 7816-3:1989, this was assigned to cards with internal clock
+       5,    // b0001
+       6,    // b0010
+       8,    // b0011
+       12,   // b0100
+       16,   // b0101
+       20,   // b0110
+       0,    // b0111 RFU
+       0,    // b1000 RFU
+       5,    // b1001
+       7.5,  // b1010
+       10,   // b1011
+       15,   // b1100
+       20,   // b1101
+       0,    // b1110 RFU
+       0     // b1111 RFU
+};
+
+int GetATRDi(uint8_t *atr, size_t atrlen) {
+       uint8_t TA1 = GetATRTA1(atr, atrlen);
+
+       return DiArray[TA1 & 0x0f];  // The 4 low-order bits of TA1 (4th MSbit to 1st LSbit) encode Di
+}
+
+int GetATRFi(uint8_t *atr, size_t atrlen) {
+       uint8_t TA1 = GetATRTA1(atr, atrlen);
+
+       return FiArray[TA1 >> 4];  // The 4 high-order bits of TA1 (8th MSbit to 5th LSbit) encode fmax and Fi
+}
+
+float GetATRF(uint8_t *atr, size_t atrlen) {
+       uint8_t TA1 = GetATRTA1(atr, atrlen);
+
+       return FArray[TA1 >> 4];  // The 4 high-order bits of TA1 (8th MSbit to 5th LSbit) encode fmax and Fi
+}
+
+static int PrintATR(uint8_t *atr, size_t atrlen) {
+
+       uint8_t T0 = atr[1];
+       uint8_t K = T0 & 0x0F;
+       uint8_t TD1 = 0, T1len = 0, TD1len = 0, TDilen = 0;
+
+       if (T0 & 0x10) {
+               PrintAndLog("\t- TA1 (Maximum clock frequency, proposed bit duration) [ 0x%02x ]", atr[2 + T1len]);
+               T1len++;
+       }
+       
+       if (T0 & 0x20) {
+               PrintAndLog("\t- TB1 (Deprecated: VPP requirements) [ 0x%02x ]", atr[2 + T1len]);
+               T1len++;
+       }
+       
+       if (T0 & 0x40) {
+               PrintAndLog("\t- TC1 (Extra delay between bytes required by card) [ 0x%02x ]", atr[2 + T1len]);
+               T1len++;
+       }
+       
+       if (T0 & 0x80) {
+               TD1 = atr[2 + T1len];
+               PrintAndLog("\t- TD1 (First offered transmission protocol, presence of TA2..TD2) [ 0x%02x ] Protocol T%d", TD1, TD1 & 0x0f);
+               T1len++;
+
+               if (TD1 & 0x10) {
+                       PrintAndLog("\t- TA2 (Specific protocol and parameters to be used after the ATR) [ 0x%02x ]", atr[2 + T1len + TD1len]);
+                       TD1len++;
+               }
+               if (TD1 & 0x20) {
+                       PrintAndLog("\t- TB2 (Deprecated: VPP precise voltage requirement) [ 0x%02x ]", atr[2 + T1len + TD1len]);
+                       TD1len++;
+               }
+               if (TD1 & 0x40) {
+                       PrintAndLog("\t- TC2 (Maximum waiting time for protocol T=0) [ 0x%02x ]", atr[2 + T1len + TD1len]);
+                       TD1len++;
+               }
+               if (TD1 & 0x80) {
+                       uint8_t TDi = atr[2 + T1len + TD1len];
+                       PrintAndLog("\t- TD2 (A supported protocol or more global parameters, presence of TA3..TD3) [ 0x%02x ] Protocol T%d", TDi, TDi & 0x0f);
+                       TD1len++;
+
+                       bool nextCycle = true;
+                       uint8_t vi = 3;
+                       while (nextCycle) {
+                               nextCycle = false;
+                               if (TDi & 0x10) {
+                                       PrintAndLog("\t- TA%d: 0x%02x", vi, atr[2 + T1len + TD1len + TDilen]);
+                                       TDilen++;
+                               }
+                               if (TDi & 0x20) {
+                                       PrintAndLog("\t- TB%d: 0x%02x", vi, atr[2 + T1len + TD1len + TDilen]);
+                                       TDilen++;
+                               }
+                               if (TDi & 0x40) {
+                                       PrintAndLog("\t- TC%d: 0x%02x", vi, atr[2 + T1len + TD1len + TDilen]);
+                                       TDilen++;
+                               }
+                               if (TDi & 0x80) {
+                                       TDi = atr[2 + T1len + TD1len + TDilen];
+                                       PrintAndLog("\t- TD%d [ 0x%02x ] Protocol T%d", vi, TDi, TDi & 0x0f);
+                                       TDilen++;
+
+                                       nextCycle = true;
+                                       vi++;
+                               }
+                       }
+               }
+       }
+
+       uint8_t vxor = 0;
+       for (int i = 1; i < atrlen; i++)
+               vxor ^= atr[i];
+       
+       if (vxor)
+               PrintAndLogEx(WARNING, "Check summ error. Must be 0 got 0x%02X", vxor);
+       else
+               PrintAndLogEx(INFO, "Check summ OK.");
+
+       if (atr[0] != 0x3b)
+               PrintAndLogEx(WARNING, "Not a direct convention [ 0x%02x ]", atr[0]);
+
+       
+       uint8_t calen = 2 + T1len + TD1len + TDilen + K;
+
+       if (atrlen != calen && atrlen != calen + 1)  // may be CRC
+               PrintAndLogEx(ERR, "ATR length error. len: %d, T1len: %d, TD1len: %d, TDilen: %d, K: %d", atrlen, T1len, TD1len, TDilen, K);
+
+       if (K > 0)
+               PrintAndLogEx(INFO, "\nHistorical bytes | len 0x%02d | format %02x", K, atr[2 + T1len + TD1len + TDilen]);
+       
+       if (K > 1) {
+               PrintAndLogEx(INFO, "\tHistorical bytes");
+               dump_buffer(&atr[2 + T1len + TD1len + TDilen], K, NULL, 1);
+       }
+
+       return 0;
+}
+
 static bool smart_select(bool silent) {
        UsbCommand c = {CMD_SMART_ATR, {0, 0, 0}};
        clearCommandBuffer();
 static bool smart_select(bool silent) {
        UsbCommand c = {CMD_SMART_ATR, {0, 0, 0}};
        clearCommandBuffer();
@@ -119,7 +309,7 @@ static bool smart_select(bool silent) {
 static int smart_wait(uint8_t *data) {
        UsbCommand resp;
        if (!WaitForResponseTimeout(CMD_ACK, &resp, 2500)) {
 static int smart_wait(uint8_t *data) {
        UsbCommand resp;
        if (!WaitForResponseTimeout(CMD_ACK, &resp, 2500)) {
-               PrintAndLogEx(WARNING, "smart card response failed");
+               PrintAndLogEx(WARNING, "smart card response timeout");
                return -1;
        }
 
                return -1;
        }
 
@@ -129,37 +319,63 @@ static int smart_wait(uint8_t *data) {
                return -2;
        }
        memcpy(data, resp.d.asBytes, len);
                return -2;
        }
        memcpy(data, resp.d.asBytes, len);
-       PrintAndLogEx(SUCCESS, " %d | %s", len, sprint_hex_inrow_ex(data,  len, 32));
-
        if (len >= 2) {
                PrintAndLogEx(SUCCESS, "%02X%02X | %s", data[len - 2], data[len - 1], GetAPDUCodeDescription(data[len - 2], data[len - 1]));
        if (len >= 2) {
                PrintAndLogEx(SUCCESS, "%02X%02X | %s", data[len - 2], data[len - 1], GetAPDUCodeDescription(data[len - 2], data[len - 1]));
+       } else {
+               PrintAndLogEx(SUCCESS, " %d | %s", len, sprint_hex_inrow_ex(data,  len, 8));
        }
        }
+       
        return len;
 }
 
 static int smart_response(uint8_t *data) {
        return len;
 }
 
 static int smart_response(uint8_t *data) {
-
-       int len = -1;
        int datalen = smart_wait(data);
        int datalen = smart_wait(data);
+       bool needGetData = false;
 
 
-       if ( data[datalen - 2] == 0x61 || data[datalen - 2] == 0x9F ) {
-               len = data[datalen - 1];
+       if (datalen < 2 ) {
+               goto out;
        }
 
        }
 
-       if (len == -1 ) {
-               goto out;
+       if ( data[datalen - 2] == 0x61 || data[datalen - 2] == 0x9F ) {
+               needGetData = true;
        }
 
        }
 
-       PrintAndLogEx(INFO, "Requesting response. len=0x%x", len);
-       uint8_t getstatus[] = {ISO7816_GETSTATUS, 0x00, 0x00, len};
-       UsbCommand cStatus = {CMD_SMART_RAW, {SC_RAW, sizeof(getstatus), 0}};
-       memcpy(cStatus.d.asBytes, getstatus, sizeof(getstatus) );
-       clearCommandBuffer();
-       SendCommand(&cStatus);
+       if (needGetData) {
+               int len = data[datalen - 1];
+               PrintAndLogEx(INFO, "Requesting 0x%02X bytes response", len);   
+               uint8_t getstatus[] = {0x00, ISO7816_GETSTATUS, 0x00, 0x00, len};
+               UsbCommand cStatus = {CMD_SMART_RAW, {SC_RAW, sizeof(getstatus), 0}};
+               memcpy(cStatus.d.asBytes, getstatus, sizeof(getstatus) );
+               clearCommandBuffer();
+               SendCommand(&cStatus);
+
+               datalen = smart_wait(data);
 
 
-       datalen = smart_wait(data);
-out:
+               if (datalen < 2 ) {
+                       goto out;
+               }
+
+               // data wo ACK
+               if (datalen != len + 2) { 
+                       // data with ACK
+                       if (datalen == len + 2 + 1) { // 2 - response, 1 - ACK
+                               if (data[0] != ISO7816_GETSTATUS) {
+                                       PrintAndLogEx(ERR, "GetResponse ACK error. len 0x%x | data[0] %02X", len, data[0]);     
+                                       datalen = 0;
+                                       goto out;
+                               }
+
+                               datalen--;
+                               memmove(data, &data[1], datalen);
+                       } else {
+                               // wrong length
+                               PrintAndLogEx(WARNING, "GetResponse wrong length. Must be 0x%02X got 0x%02X", len, datalen - 3);        
+                       }
+               }
+       }
 
 
+       out:
        return datalen;
 }
 
        return datalen;
 }
 
@@ -168,6 +384,7 @@ int CmdSmartRaw(const char *Cmd) {
        int hexlen = 0;
        bool active = false;
        bool active_select = false;
        int hexlen = 0;
        bool active = false;
        bool active_select = false;
+    bool useT0 = false;        
        uint8_t cmdp = 0;
        bool errors = false, reply = true, decodeTLV = false, breakloop = false;
        uint8_t data[USB_CMD_DATA_SIZE] = {0x00};
        uint8_t cmdp = 0;
        bool errors = false, reply = true, decodeTLV = false, breakloop = false;
        uint8_t data[USB_CMD_DATA_SIZE] = {0x00};
@@ -191,6 +408,10 @@ int CmdSmartRaw(const char *Cmd) {
                        decodeTLV = true;
                        cmdp++;
                        break;
                        decodeTLV = true;
                        cmdp++;
                        break;
+               case '0':
+                       useT0 = true;
+                       cmdp++;
+                       break;                  
                case 'd': {
                        switch (param_gethex_to_eol(Cmd, cmdp+1, data, sizeof(data), &hexlen)) {
                        case 1:
                case 'd': {
                        switch (param_gethex_to_eol(Cmd, cmdp+1, data, sizeof(data), &hexlen)) {
                        case 1:
@@ -225,13 +446,16 @@ int CmdSmartRaw(const char *Cmd) {
        UsbCommand c = {CMD_SMART_RAW, {0, hexlen, 0}};
 
        if (active || active_select) {
        UsbCommand c = {CMD_SMART_RAW, {0, hexlen, 0}};
 
        if (active || active_select) {
-        c.arg[0] |= SC_CONNECT;
-        if (active_select)
-            c.arg[0] |= SC_SELECT;
-    }
+               c.arg[0] |= SC_CONNECT;
+               if (active_select)
+                       c.arg[0] |= SC_SELECT;
+       }
 
        if (hexlen > 0) {
 
        if (hexlen > 0) {
-        c.arg[0] |= SC_RAW;
+               if (useT0)
+                       c.arg[0] |= SC_RAW_T0;
+               else
+                       c.arg[0] |= SC_RAW;
        }
 
        memcpy(c.d.asBytes, data, hexlen );
        }
 
        memcpy(c.d.asBytes, data, hexlen );
@@ -252,7 +476,7 @@ int CmdSmartRaw(const char *Cmd) {
                }
 
                if ( buf[0] == 0x6C ) {
                }
 
                if ( buf[0] == 0x6C ) {
-                       data[4] = buf[1];
+                       data[4] = buf[1];
 
                        memcpy(c.d.asBytes, data, sizeof(data) );
                        clearCommandBuffer();
 
                        memcpy(c.d.asBytes, data, sizeof(data) );
                        clearCommandBuffer();
@@ -263,7 +487,7 @@ int CmdSmartRaw(const char *Cmd) {
                }
 
                if (decodeTLV && len > 4)
                }
 
                if (decodeTLV && len > 4)
-                       TLVPrintFromBuffer(buf+1, len-3);
+                       TLVPrintFromBuffer(buf, len-2);
 
                free(buf);
        }
 
                free(buf);
        }
@@ -275,11 +499,12 @@ int ExchangeAPDUSC(uint8_t *datain, int datainlen, bool activateCard, bool leave
 
        if (activateCard)
                smart_select(false);
 
        if (activateCard)
                smart_select(false);
-       printf("* APDU SC\n");
 
 
-       UsbCommand c = {CMD_SMART_RAW, {SC_RAW | SC_CONNECT, datainlen, 0}};
+       PrintAndLogEx(DEBUG, "APDU SC");
+
+       UsbCommand c = {CMD_SMART_RAW, {SC_RAW_T0, datainlen, 0}};      
        if (activateCard) {
        if (activateCard) {
-               c.arg[0] |= SC_SELECT;
+               c.arg[0] |= SC_SELECT | SC_CONNECT;
        }
        memcpy(c.d.asBytes, datain, datainlen);
        clearCommandBuffer();
        }
        memcpy(c.d.asBytes, datain, datainlen);
        clearCommandBuffer();
@@ -291,6 +516,19 @@ int ExchangeAPDUSC(uint8_t *datain, int datainlen, bool activateCard, bool leave
                return 2;
        }
 
                return 2;
        }
 
+       // retry
+       if (len > 1 && dataout[len - 2] == 0x6c && datainlen > 4) {
+               UsbCommand c2 = {CMD_SMART_RAW, {SC_RAW_T0, datainlen, 0}};     
+               memcpy(c2.d.asBytes, datain, 5);
+
+               // transfer length via T=0
+               c2.d.asBytes[4] = dataout[len - 1];
+
+               clearCommandBuffer();
+               SendCommand(&c2);
+
+               len = smart_response(dataout);
+       }
        *dataoutlen = len;
 
        return 0;
        *dataoutlen = len;
 
        return 0;
@@ -299,8 +537,10 @@ int ExchangeAPDUSC(uint8_t *datain, int datainlen, bool activateCard, bool leave
 
 int CmdSmartUpgrade(const char *Cmd) {
 
 
 int CmdSmartUpgrade(const char *Cmd) {
 
-       PrintAndLogEx(WARNING, "WARNING - Smartcard socket firmware upgrade.");
+       PrintAndLogEx(NORMAL, "");
+       PrintAndLogEx(WARNING, "WARNING - RDV4.0 Smartcard Socket Firmware upgrade.");
        PrintAndLogEx(WARNING, "A dangerous command, do wrong and you will brick the smart card socket");
        PrintAndLogEx(WARNING, "A dangerous command, do wrong and you will brick the smart card socket");
+       PrintAndLogEx(NORMAL, "");
 
        FILE *f;
        char filename[FILE_PATH_SIZE] = {0};
 
        FILE *f;
        char filename[FILE_PATH_SIZE] = {0};
@@ -330,40 +570,131 @@ int CmdSmartUpgrade(const char *Cmd) {
        //Validations
        if (errors || cmdp == 0 ) return usage_sm_upgrade();
 
        //Validations
        if (errors || cmdp == 0 ) return usage_sm_upgrade();
 
-       // load file
-       f = fopen(filename, "rb");
+       if (strchr(filename, '\\') || strchr(filename, '/')) {
+               PrintAndLogEx(FAILED, "Filename must not contain \\ or /. Firmware file will be found in client/sc_upgrade_firmware directory.");
+               return 1;
+       }
+       
+       char sc_upgrade_file_path[strlen(get_my_executable_directory()) + strlen(SC_UPGRADE_FILES_DIRECTORY) + strlen(filename) + 1];
+       strcpy(sc_upgrade_file_path, get_my_executable_directory());
+       strcat(sc_upgrade_file_path, SC_UPGRADE_FILES_DIRECTORY);
+       strcat(sc_upgrade_file_path, filename);
+       if (strlen(sc_upgrade_file_path) >= FILE_PATH_SIZE ) {
+               PrintAndLogEx(FAILED, "Filename too long");
+               return 1;
+       }
+
+       char sha512filename[FILE_PATH_SIZE] = {'\0'};
+       char *bin_extension = filename;
+       char *dot_position = NULL;
+       while ((dot_position = strchr(bin_extension, '.')) != NULL) {
+               bin_extension = dot_position + 1;
+       }
+       if (!strcmp(bin_extension, "BIN") 
+#ifdef _WIN32
+           || !strcmp(bin_extension, "bin")
+#endif
+           ) {
+               memcpy(sha512filename, filename, strlen(filename) - strlen("bin"));
+               strcat(sha512filename, "sha512.txt");
+       } else {
+               PrintAndLogEx(FAILED, "Filename extension of Firmware Upgrade File must be .BIN");
+               return 1;
+       }
+       
+       PrintAndLogEx(INFO, "Checking integrity using SHA512 File %s ...", sha512filename);
+       char sc_upgrade_sha512file_path[strlen(get_my_executable_directory()) + strlen(SC_UPGRADE_FILES_DIRECTORY) + strlen(sha512filename) + 1];
+       strcpy(sc_upgrade_sha512file_path, get_my_executable_directory());
+       strcat(sc_upgrade_sha512file_path, SC_UPGRADE_FILES_DIRECTORY);
+       strcat(sc_upgrade_sha512file_path, sha512filename);
+       if (strlen(sc_upgrade_sha512file_path) >= FILE_PATH_SIZE ) {
+               PrintAndLogEx(FAILED, "Filename too long");
+               return 1;
+       }
+               
+       // load firmware file
+       f = fopen(sc_upgrade_file_path, "rb");
        if ( !f ){
        if ( !f ){
-               PrintAndLogEx(FAILED, "File: %s: not found or locked.", filename);
+               PrintAndLogEx(FAILED, "Firmware file not found or locked.");
                return 1;
        }
 
        // get filesize in order to malloc memory
        fseek(f, 0, SEEK_END);
                return 1;
        }
 
        // get filesize in order to malloc memory
        fseek(f, 0, SEEK_END);
-       long fsize = ftell(f);
+       size_t fsize = ftell(f);
        fseek(f, 0, SEEK_SET);
 
        fseek(f, 0, SEEK_SET);
 
-       if (fsize < 0)  {
-               PrintAndLogEx(WARNING, "error, when getting filesize");
+       if (fsize < 0)  {
+               PrintAndLogEx(FAILED, "Could not determine size of firmware file");
                fclose(f);
                return 1;
        }
 
        uint8_t *dump = calloc(fsize, sizeof(uint8_t));
        if (!dump) {
                fclose(f);
                return 1;
        }
 
        uint8_t *dump = calloc(fsize, sizeof(uint8_t));
        if (!dump) {
-               PrintAndLogEx(WARNING, "error, cannot allocate memory ");
+               PrintAndLogEx(FAILED, "Could not allocate memory for firmware");
+               fclose(f);
+               return 1;
+       }
+
+       size_t firmware_size = fread(dump, 1, fsize, f);
+       if (f)
+               fclose(f);
+
+       // load sha512 file
+       f = fopen(sc_upgrade_sha512file_path, "rb");
+       if ( !f ){
+               PrintAndLogEx(FAILED, "SHA-512 file not found or locked.");
+               return 1;
+       }
+
+       // get filesize in order to malloc memory
+       fseek(f, 0, SEEK_END);
+       fsize = ftell(f);
+       fseek(f, 0, SEEK_SET);
+
+       if (fsize < 0)  {
+               PrintAndLogEx(FAILED, "Could not determine size of SHA-512 file");
                fclose(f);
                return 1;
        }
                fclose(f);
                return 1;
        }
+       
+       if (fsize < 128) {
+               PrintAndLogEx(FAILED, "SHA-512 file too short");
+               fclose(f);
+               return 1;
+       }
+
+       char hashstring[129];
+       size_t bytes_read = fread(hashstring, 1, 128, f);
+       hashstring[128] = '\0';
 
 
-       size_t bytes_read = fread(dump, 1, fsize, f);
        if (f)
                fclose(f);
 
        if (f)
                fclose(f);
 
-       PrintAndLogEx(SUCCESS, "Smartcard socket firmware uploading to PM3");
+       uint8_t hash1[64];
+       if (bytes_read != 128 || param_gethex(hashstring, 0, hash1, 128)) {
+               PrintAndLogEx(FAILED, "Couldn't read SHA-512 file");
+               return 1;
+       }
+       
+       uint8_t hash2[64];
+       if (sha512hash(dump, firmware_size, hash2)) {
+               PrintAndLogEx(FAILED, "Couldn't calculate SHA-512 of Firmware");
+               return 1;
+       }
+
+       if (memcmp(hash1, hash2, 64)) {
+               PrintAndLogEx(FAILED, "Couldn't verify integrity of Firmware file (wrong SHA-512)");
+               return 1;
+       }
+               
+       PrintAndLogEx(SUCCESS, "RDV4.0 Smartcard Socket Firmware uploading to PM3");
+
        //Send to device
        uint32_t index = 0;
        uint32_t bytes_sent = 0;
        //Send to device
        uint32_t index = 0;
        uint32_t bytes_sent = 0;
-       uint32_t bytes_remaining = bytes_read;
+       uint32_t bytes_remaining = firmware_size;
 
        while (bytes_remaining > 0){
                uint32_t bytes_in_packet = MIN(USB_CMD_DATA_SIZE, bytes_remaining);
 
        while (bytes_remaining > 0){
                uint32_t bytes_in_packet = MIN(USB_CMD_DATA_SIZE, bytes_remaining);
@@ -386,10 +717,10 @@ int CmdSmartUpgrade(const char *Cmd) {
        }
        free(dump);
        printf("\n");
        }
        free(dump);
        printf("\n");
-       PrintAndLogEx(SUCCESS, "Smartcard socket firmware updating,  don\'t turn off your PM3!");
+       PrintAndLogEx(SUCCESS, "RDV4.0 Smartcard Socket Firmware updating,  don\'t turn off your PM3!");
 
        // trigger the firmware upgrade
 
        // trigger the firmware upgrade
-       UsbCommand c = {CMD_SMART_UPGRADE, {bytes_read, 0, 0}};
+       UsbCommand c = {CMD_SMART_UPGRADE, {firmware_size, 0, 0}};
        clearCommandBuffer();
        SendCommand(&c);
        UsbCommand resp;
        clearCommandBuffer();
        SendCommand(&c);
        UsbCommand resp;
@@ -398,9 +729,9 @@ int CmdSmartUpgrade(const char *Cmd) {
                return 1;
        }
        if ( (resp.arg[0] & 0xFF ) )
                return 1;
        }
        if ( (resp.arg[0] & 0xFF ) )
-               PrintAndLogEx(SUCCESS, "Smartcard socket firmware upgraded successful");
+               PrintAndLogEx(SUCCESS, "RDV4.0 Smartcard Socket Firmware upgraded successful");
        else
        else
-               PrintAndLogEx(FAILED, "Smartcard socket firmware updating failed");
+               PrintAndLogEx(FAILED, "RDV4.0 Smartcard Socket Firmware Upgrade failed");
        return 0;
 }
 
        return 0;
 }
 
@@ -444,11 +775,37 @@ int CmdSmartInfo(const char *Cmd){
        memcpy(&card, (smart_card_atr_t *)resp.d.asBytes, sizeof(smart_card_atr_t));
 
        // print header
        memcpy(&card, (smart_card_atr_t *)resp.d.asBytes, sizeof(smart_card_atr_t));
 
        // print header
-       PrintAndLogEx(INFO, "\n--- Smartcard Information ---------");
+       PrintAndLogEx(INFO, "--- Smartcard Information ---------");
        PrintAndLogEx(INFO, "-------------------------------------------------------------");
        PrintAndLogEx(INFO, "-------------------------------------------------------------");
-       PrintAndLogEx(INFO, "ISO76183 ATR : %s", sprint_hex(card.atr, card.atr_len));
-       PrintAndLogEx(INFO, "look up ATR");
-       PrintAndLogEx(INFO, "http://smartcard-atr.appspot.com/parse?ATR=%s", sprint_hex_inrow(card.atr, card.atr_len) );
+       PrintAndLogEx(INFO, "ISO7618-3 ATR : %s", sprint_hex(card.atr, card.atr_len));
+       PrintAndLogEx(INFO, "\nhttp://smartcard-atr.appspot.com/parse?ATR=%s", sprint_hex_inrow(card.atr, card.atr_len) );
+
+       // print ATR
+       PrintAndLogEx(NORMAL, "");
+       PrintAndLogEx(INFO, "ATR");
+       PrintATR(card.atr, card.atr_len);
+
+       // print D/F (brom byte TA1 or defaults)
+       PrintAndLogEx(NORMAL, "");
+       PrintAndLogEx(INFO, "D/F (TA1)");
+       int Di = GetATRDi(card.atr, card.atr_len);
+       int Fi = GetATRFi(card.atr, card.atr_len);
+       float F = GetATRF(card.atr, card.atr_len);
+       if (GetATRTA1(card.atr, card.atr_len) == 0x11)
+               PrintAndLogEx(INFO, "Using default values...");
+
+       PrintAndLogEx(NORMAL, "\t- Di=%d", Di);
+       PrintAndLogEx(NORMAL, "\t- Fi=%d", Fi);
+       PrintAndLogEx(NORMAL, "\t- F=%.1f MHz", F);
+  
+       if (Di && Fi) {
+               PrintAndLogEx(NORMAL, "\t- Cycles/ETU=%d", Fi/Di);
+               PrintAndLogEx(NORMAL, "\t- %.1f bits/sec at 4MHz", (float)4000000 / (Fi/Di));
+               PrintAndLogEx(NORMAL, "\t- %.1f bits/sec at Fmax=%.1fMHz", (F * 1000000) / (Fi/Di), F);
+       } else {
+               PrintAndLogEx(WARNING, "\t- Di or Fi is RFU.");
+       };
+
        return 0;
 }
 
        return 0;
 }
 
@@ -567,8 +924,9 @@ int CmdSmartBruteforceSFI(const char *Cmd) {
        }
 
        PrintAndLogEx(INFO, "Selecting PPSE aid");
        }
 
        PrintAndLogEx(INFO, "Selecting PPSE aid");
-       CmdSmartRaw("d 00a404000e325041592e5359532e444446303100");
-       CmdSmartRaw("d 00a4040007a000000004101000");
+       CmdSmartRaw("s 0 t d 00a404000e325041592e5359532e4444463031");
+       CmdSmartRaw("0 t d 00a4040007a000000004101000");  // mastercard
+//     CmdSmartRaw("0 t d 00a4040007a0000000031010"); // visa
 
        PrintAndLogEx(INFO, "starting");
 
 
        PrintAndLogEx(INFO, "starting");
 
@@ -589,9 +947,8 @@ int CmdSmartBruteforceSFI(const char *Cmd) {
 
                        smart_response(buf);
 
 
                        smart_response(buf);
 
-                       // if 0x6C
                        if ( buf[0] == 0x6C ) {
                        if ( buf[0] == 0x6C ) {
-                               data[4] = buf[1];
+                               data[4] = buf[1];
 
                                memcpy(c.d.asBytes, data, sizeof(data) );
                                clearCommandBuffer();
 
                                memcpy(c.d.asBytes, data, sizeof(data) );
                                clearCommandBuffer();
@@ -612,15 +969,15 @@ int CmdSmartBruteforceSFI(const char *Cmd) {
 }
 
 static command_t CommandTable[] = {
 }
 
 static command_t CommandTable[] = {
-       {"help",        CmdHelp,            1, "This help"},
-       {"list",        CmdSmartList,       0, "List ISO 7816 history"},
-       {"info",        CmdSmartInfo,           1, "Tag information"},
-       {"reader",      CmdSmartReader,         1, "Act like an IS07816 reader"},
-       {"raw",         CmdSmartRaw,            1, "Send raw hex data to tag"},
-       {"upgrade",     CmdSmartUpgrade,        1, "Upgrade firmware"},
-       {"setclock", CmdSmartSetClock,  1, "Set clock speed"},
-       {"brute",       CmdSmartBruteforceSFI, 1, "Bruteforce SFI"},
-       {NULL, NULL, 0, NULL}
+       {"help",     CmdHelp,               1, "This help"},
+       {"list",     CmdSmartList,          0, "List ISO 7816 history"},
+       {"info",     CmdSmartInfo,          0, "Tag information"},
+       {"reader",   CmdSmartReader,        0, "Act like an IS07816 reader"},
+       {"raw",      CmdSmartRaw,           0, "Send raw hex data to tag"},
+       {"upgrade",  CmdSmartUpgrade,       0, "Upgrade firmware"},
+       {"setclock", CmdSmartSetClock,      0, "Set clock speed"},
+       {"brute",    CmdSmartBruteforceSFI, 0, "Bruteforce SFI"},
+       {NULL,       NULL,                  0, NULL}
 };
 
 int CmdSmartcard(const char *Cmd) {
 };
 
 int CmdSmartcard(const char *Cmd) {
Impressum, Datenschutz