+int usage_lf_hid_wiegand(void){
+ PrintAndLog("This command converts facility code/card number to Wiegand code");
+ PrintAndLog("Usage: lf hid wiegand [h] [OEM] [FC] [CN]");
+
+ PrintAndLog("Options:");
+ PrintAndLog(" h - This help");
+ PrintAndLog(" OEM - OEM number / site code");
+ PrintAndLog(" FC - facility code");
+ PrintAndLog(" CN - card number");
+ PrintAndLog("Examples:");
+ PrintAndLog(" lf hid wiegand 0 101 2001");
+ return 0;
+}
+int usage_lf_hid_sim(void){
+ PrintAndLog("HID Tag simulator");
+ PrintAndLog("");
+ PrintAndLog("Usage: lf hid sim [h] [ID]");
+ PrintAndLog("Options:");
+ PrintAndLog(" h - This help");
+ PrintAndLog(" ID - HID id");
+ PrintAndLog("Examples:");
+ PrintAndLog(" lf hid sim 224");
+ return 0;
+}
+int usage_lf_hid_clone(void){
+ PrintAndLog("Clone HID to T55x7. Tag must be on antenna. ");
+ PrintAndLog("");
+ PrintAndLog("Usage: lf hid clone [h] [ID] <L>");
+ PrintAndLog("Options:");
+ PrintAndLog(" h - This help");
+ PrintAndLog(" ID - HID id");
+ PrintAndLog(" L - 84bit ID");
+ PrintAndLog("Examples:");
+ PrintAndLog(" lf hid clone 224");
+ PrintAndLog(" lf hid clone 224 L");
+ return 0;
+}
+int usage_lf_hid_brute(void){
+ PrintAndLog("Enables bruteforce of HID readers with specified facility code.");
+ PrintAndLog("This is a attack against reader. if cardnumber is given, it starts with it and goes up / down one step");
+ PrintAndLog("if cardnumber is not given, it starts with 1 and goes up to 65535");
+ PrintAndLog("");
+ PrintAndLog("Usage: lf hid brute [h] a <format> f <facility-code> c <cardnumber> d <delay>");
+ PrintAndLog("Options :");
+ PrintAndLog(" h : This help");
+ PrintAndLog(" a <format> : 26|33|34|35|37|40|44|84");
+ PrintAndLog(" f <facility-code> : 8-bit value HID facility code");
+ PrintAndLog(" c <cardnumber> : (optional) cardnumber to start with, max 65535");
+ PrintAndLog(" d <delay> : delay betweens attempts in ms. Default 1000ms");
+ PrintAndLog("");
+ PrintAndLog("Samples:");
+ PrintAndLog(" lf hid brute a 26 f 224");
+ PrintAndLog(" lf hid brute a 26 f 21 d 2000");
+ PrintAndLog(" lf hid brute a 26 f 21 c 200 d 2000");
+ return 0;
+}
+
+static int sendPing(void){
+ UsbCommand ping = {CMD_PING, {1, 2, 3}};
+ SendCommand(&ping);
+ SendCommand(&ping);
+ SendCommand(&ping);
+ clearCommandBuffer();
+ UsbCommand resp;
+ if (WaitForResponseTimeout(CMD_ACK, &resp, 1000))
+ return 0;
+ return 1;
+}
+static bool sendTry(uint8_t fmtlen, uint32_t fc, uint32_t cn, uint32_t delay, uint8_t *bs){
+
+ PrintAndLog("Trying FC: %u; CN: %u", fc, cn);
+
+ calcWiegand( fmtlen, fc, cn, bs);
+
+ uint64_t arg1 = bytebits_to_byte(bs,32);
+ uint64_t arg2 = bytebits_to_byte(bs+32,32);
+ UsbCommand c = {CMD_HID_SIM_TAG, {arg1, arg2, 0}};
+ clearCommandBuffer();
+ SendCommand(&c);
+ msleep(delay);
+ sendPing();
+ return TRUE;
+}
+
+int CmdHIDDemodFSK(const char *Cmd) {
+ int findone = ( Cmd[0] == '1' ) ? 1 : 0;
+ UsbCommand c = {CMD_HID_DEMOD_FSK, {findone, 0 , 0}};
+ clearCommandBuffer();
+ SendCommand(&c);
+ return 0;
+}
+
+int CmdHIDSim(const char *Cmd) {
+ unsigned int hi = 0, lo = 0;
+ int n = 0, i = 0;
+
+ uint8_t ctmp = param_getchar(Cmd, 0);
+ if ( strlen(Cmd) == 0 || ctmp == 'H' || ctmp == 'h' ) return usage_lf_hid_sim();
+
+ while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
+ hi = (hi << 4) | (lo >> 28);
+ lo = (lo << 4) | (n & 0xf);
+ }
+
+ PrintAndLog("Emulating tag with ID %x%16x", hi, lo);
+ PrintAndLog("Press pm3-button to abort simulation");
+
+ UsbCommand c = {CMD_HID_SIM_TAG, {hi, lo, 0}};
+ clearCommandBuffer();
+ SendCommand(&c);
+ return 0;
+}
+
+int CmdHIDClone(const char *Cmd) {
+
+ uint32_t hi2 = 0, hi = 0, lo = 0;
+ int n = 0, i = 0;
+ UsbCommand c;
+
+ uint8_t ctmp = param_getchar(Cmd, 0);
+ if ( strlen(Cmd) == 0 || ctmp == 'H' || ctmp == 'h' ) return usage_lf_hid_clone();
+
+ if (strchr(Cmd,'l') != 0) {
+ while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
+ hi2 = (hi2 << 4) | (hi >> 28);
+ hi = (hi << 4) | (lo >> 28);
+ lo = (lo << 4) | (n & 0xf);
+ }
+
+ PrintAndLog("Cloning tag with long ID %x%08x%08x", hi2, hi, lo);
+
+ c.d.asBytes[0] = 1;
+ } else {
+ while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
+ hi = (hi << 4) | (lo >> 28);
+ lo = (lo << 4) | (n & 0xf);
+ }
+
+ PrintAndLog("Cloning tag with ID %x%08x", hi, lo);
+
+ hi2 = 0;
+ c.d.asBytes[0] = 0;
+ }
+
+ c.cmd = CMD_HID_CLONE_TAG;
+ c.arg[0] = hi2;
+ c.arg[1] = hi;
+ c.arg[2] = lo;
+
+ clearCommandBuffer();
+ SendCommand(&c);
+ return 0;
+}
+// struct to handle wiegand
+typedef struct {
+ uint8_t FormatLen;
+ uint8_t SiteCode;
+ uint8_t FacilityCode;
+ uint8_t CardNumber;
+ uint8_t* Wiegand;
+ size_t Wiegand_n;
+ } wiegand_t;
+
+static void addHIDMarker(uint8_t fmtlen, uint8_t *out) {
+ switch(fmtlen) {
+ case 26:{
+ uint8_t len = 37;
+ uint8_t tmp[len];
+ memset(tmp, 0, len);
+ uint8_t idx = 37-fmtlen;
+ memcpy(tmp+idx, out, fmtlen);
+ tmp[idx] = 1; // start sentinel?
+ tmp[0] = 1; // bit indicates that a format smaller than 37 is used
+ memcpy(out, tmp, len);
+ break;
+ }
+ case 34:
+ // set bit format for less than 37 bit format
+ // 5+32= 1
+ //*hi = (1 << 5) | (fc >> 15);
+ break;
+ default:break;
+ }
+}
+
+// static void getParity34(uint32_t *hi, uint32_t *lo){
+ // uint32_t result = 0;
+ // int i;
+
+ // // even parity
+ // for (i = 7;i >= 0;i--)
+ // result ^= (*hi >> i) & i;
+ // for (i = 31;i >= 24;i--)
+ // result ^= (*lo >> i) & 1;
+
+ // *hi |= result << 2;
+
+ // // odd parity bit
+ // result = 0;
+ // for (i = 23;i >= 1;i--)
+ // result ^= (*lo >> i) & 1;
+
+ // *lo |= !result;
+// }
+// static void getParity37H(uint32_t *hi, uint32_t *lo){
+ // uint32_t result = 0;
+ // int i;
+
+ // // even parity
+ // for (i = 4;i >= 0;i--)
+ // result ^= (*hi >> i) & 1;
+ // for (i = 31;i >= 20;i--)
+ // result ^= (*lo >> i) & 1;
+ // *hi |= result << 4;
+
+ // // odd parity
+ // result = 0;
+ // for (i = 19;i >= 1;i--)
+ // result ^= (*lo >> i) & 1;
+ // *lo |= result;
+// }
+
+//static void calc26(uint16_t fc, uint32_t cardno, uint8_t *out){
+static void calc26(uint16_t fc, uint32_t cardno, uint8_t *out){
+ uint8_t wiegand[24];
+ num_to_bytebits(fc, 8, wiegand);
+ num_to_bytebits(cardno, 16, wiegand+8);
+ wiegand_add_parity(out, wiegand, sizeof(wiegand) );
+}
+// static void calc33(uint16_t fc, uint32_t cardno, uint8_t *out){
+// }
+static void calc34(uint16_t fc, uint32_t cardno, uint8_t *out){
+ uint8_t wiegand[32];
+ num_to_bytebits(fc, 16, wiegand);
+ num_to_bytebits(cardno, 16, wiegand + 16);
+ wiegand_add_parity(out, wiegand, sizeof(wiegand) );
+}
+// static void calc35(uint16_t fc, uint32_t cardno, uint8_t *out){
+ // *lo = ((cardno & 0xFFFFF) << 1) | fc << 21;
+ // *hi = (1 << 5) | ((fc >> 11) & 1);
+// }
+static void calc37S(uint16_t fc, uint32_t cardno, uint8_t *out){
+ // FC 2 - 17 - 16 bit
+ // cardno 18 - 36 - 19 bit
+ // Even P1 1 - 19
+ // Odd P37 19 - 36
+ uint8_t wiegand[35];
+ num_to_bytebits(fc, 16, wiegand);
+ num_to_bytebits(cardno, 19, wiegand + 16);
+ wiegand_add_parity(out, wiegand, sizeof(wiegand) );
+}
+static void calc37H(uint64_t cardno, uint8_t *out){
+ // SC NONE
+ // cardno 1-35 34 bits
+ // Even Parity 0th bit 1-18
+ // Odd Parity 36th bit 19-35
+ uint8_t wiegand[37];
+ num_to_bytebits( (uint32_t)(cardno >> 32), 2, wiegand);
+ num_to_bytebits( (uint32_t)(cardno >> 0), 32, wiegand + 2);
+ wiegand_add_parity(out, wiegand, sizeof(wiegand) );
+
+ printf("%x %x\n", (uint32_t)(cardno >> 32), (uint32_t)cardno );
+}
+// static void calc40(uint64_t cardno, uint8_t *out){
+ // cardno = (cardno & 0xFFFFFFFFFF);
+ // *lo = ((cardno & 0xFFFFFFFF) << 1 );
+ // *hi = (cardno >> 31);
+// }
+
+void calcWiegand(uint8_t fmtlen, uint16_t fc, uint64_t cardno, uint8_t *bits){
+ uint32_t cn32 = (cardno & 0xFFFFFFFF);
+ switch ( fmtlen ) {
+ case 26: calc26(fc, cn32, bits); break;
+ // case 33 : calc33(fc, cn32, bits); break;
+ case 34: calc34(fc, cn32, bits); break;
+ // case 35 : calc35(fc, cn32, bits); break;
+ case 37: calc37S(fc, cn32, bits); break;
+ case 38: calc37H(cardno, bits); break;
+ // case 40 : calc40(cardno, bits); break;
+ // case 44 : { break; }
+ // case 84 : { break; }
+ default: break;
+ }
+}
+
+int CmdHIDWiegand(const char *Cmd) {
+ uint32_t oem = 0, fc = 0;
+ uint64_t cardnum = 0;
+ uint64_t blocks = 0, wiegand = 0;
+
+ uint8_t bits[96];
+ uint8_t *bs = bits;
+ memset(bs, 0, sizeof(bits));
+
+ uint8_t ctmp = param_getchar(Cmd, 0);
+ if ( strlen(Cmd) == 0 || strlen(Cmd) < 3 || ctmp == 'H' || ctmp == 'h' ) return usage_lf_hid_wiegand();
+
+ oem = param_get8(Cmd, 0);
+ fc = param_get32ex(Cmd, 1, 0, 10);
+ cardnum = param_get64ex(Cmd, 2, 0, 10);
+
+ uint8_t fmtlen[] = {26,33,34,35,37,38,40};
+
+ PrintAndLog("HID | OEM | FC | CN | Wiegand | HID Formatted");
+ PrintAndLog("----+-----+------+---------+-----------+--------------------");
+ for (uint8_t i = 0; i < sizeof(fmtlen); i++){
+ memset(bits, 0x00, sizeof(bits));
+ calcWiegand( fmtlen[i], fc, cardnum, bs);
+ printf("ice:: %s", sprint_bin(bs, fmtlen[i]));
+ wiegand = (uint64_t)bytebits_to_byte(bs, 32) << 32 | bytebits_to_byte(bs+32, 32);
+
+ addHIDMarker(fmtlen[i], bs);
+ printf("ice:: %s", sprint_bin(bs, 37));
+ blocks = (uint64_t)bytebits_to_byte(bs, 32) << 32 | bytebits_to_byte(bs+32, 32);
+ uint8_t shifts = 64-fmtlen[i];
+ wiegand >>= shifts;
+
+ PrintAndLog(" %u | %03u | %03u | %llu | %llX | %llX",
+ fmtlen[i],
+ oem,
+ fc,
+ cardnum,
+ wiegand,
+ blocks
+ );
+ }
+ PrintAndLog("----+-----+-----+-------+-----------+--------------------");
+ return 0;
+}
+
+int CmdHIDBrute(const char *Cmd){
+
+ bool errors = false;
+ uint32_t fc = 0, cn = 0, delay = 1000;
+ uint8_t fmtlen = 0;
+ uint8_t bits[96];
+ uint8_t *bs = bits;
+ memset(bs, 0, sizeof(bits));
+ uint8_t cmdp = 0;
+
+ while(param_getchar(Cmd, cmdp) != 0x00 && !errors) {
+ switch(param_getchar(Cmd, cmdp)) {
+ case 'h':
+ case 'H':
+ return usage_lf_hid_brute();
+ case 'f':
+ case 'F':
+ fc = param_get32ex(Cmd ,cmdp+1, 0, 10);
+ if ( !fc )
+ errors = true;
+ cmdp += 2;
+ break;
+ case 'd':
+ case 'D':
+ // delay between attemps, defaults to 1000ms.
+ delay = param_get32ex(Cmd, cmdp+1, 1000, 10);
+ cmdp += 2;
+ break;
+ case 'c':
+ case 'C':
+ cn = param_get32ex(Cmd, cmdp+1, 0, 10);
+ // truncate cardnumber.
+ cn &= 0xFFFF;
+ cmdp += 2;
+ break;
+ case 'a':
+ case 'A':
+ fmtlen = param_get8(Cmd, cmdp+1);
+ cmdp += 2;
+ bool is_ftm_ok = FALSE;
+ uint8_t ftms[] = {26,33,34,35,37};
+ for ( uint8_t i = 0; i < sizeof(ftms); i++){
+ if ( ftms[i] == fmtlen ) {
+ is_ftm_ok = TRUE;
+ }
+ }
+ // negated
+ errors = !is_ftm_ok;
+ break;
+ default:
+ PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
+ errors = true;
+ break;
+ }