+static void getParity26(uint32_t *hi, uint32_t *lo){
+ uint32_t result = 0;
+ int i;
+ // even parity
+ for (i = 24;i >= 13;i--)
+ result ^= (*lo >> i) & 1;
+ // even parity 26th bit
+ *lo |= result << 25;
+
+ // odd parity
+ result = 0;
+ for (i = 12;i >= 1;i--)
+ result ^= (*lo >> i) & 1;
+ *lo |= !result;
+}
+static void getParity33(uint32_t *hi, uint32_t *lo){
+
+}
+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 getParity35(uint32_t *hi, uint32_t *lo){
+ *hi = *hi;
+}
+static void getParity37S(uint32_t *hi,uint32_t *lo){
+ uint32_t result = 0;
+ uint8_t 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;
+
+ // odd parity
+ result = 0;
+ for (i = 19; 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, uint32_t *hi, uint32_t *lo){
+ *lo = ((cardno & 0xFFFF) << 1) | ((fc & 0xFF) << 17) | (1 << 26);
+ *hi = (1 << 5);
+}
+static void calc33(uint16_t fc, uint32_t cardno, uint32_t *hi, uint32_t *lo){
+
+}
+static void calc34(uint16_t fc, uint32_t cardno, uint32_t *hi, uint32_t *lo){
+ // put card number first bit 1 .. 20 //
+ *lo = ((cardno & 0X000F7FFF) << 1) | ((fc & 0XFFFF) << 17);
+ // set bit format for less than 37 bit format
+ *hi = (1 << 5) | (fc >> 15);
+}
+static void calc35(uint16_t fc, uint32_t cardno, uint32_t *hi, uint32_t *lo){
+ *lo = ((cardno & 0xFFFFF) << 1) | fc << 21;
+ *hi = (1 << 5) | ((fc >> 11) & 1);
+}
+static void calc37S(uint16_t fc, uint32_t cardno, uint32_t *hi, uint32_t *lo){
+ // FC 2 - 17 - 16 bit
+ // cardno 18 - 36 - 19 bit
+ // Even P1 1 - 19
+ // Odd P37 19 - 36
+
+ fc = fc & 0xFFFF;
+ *lo = ((fc << 20) | (cardno & 0x7FFFF) << 1);
+ *hi = (fc >> 12);
+}
+static void calc37H(uint64_t cardno, uint32_t *hi, uint32_t *lo){
+ // SC NONE
+ // cardno 1-35 34 bits
+ // Even Parity 0th bit 1-18
+ // Odd Parity 36th bit 19-35
+ cardno = (cardno & 0x00000003FFFFFFFF);
+ *lo = (cardno << 1);
+ *hi = (cardno >> 31);
+}
+static void calc40(uint64_t cardno, uint32_t *hi, uint32_t *lo){
+ cardno = (cardno & 0xFFFFFFFFFF);
+ *lo = ((cardno & 0xFFFFFFFF) << 1 );
+ *hi = (cardno >> 31);
+}
+
+static void calcWiegand(uint8_t fmtlen, uint16_t fc, uint64_t cardno, uint32_t *hi, uint32_t *lo){
+
+ uint32_t cn = (cardno & 0xFFFFFFFF);
+ switch ( fmtlen ) {
+ case 26 : {
+ calc26(fc, cn, hi, lo);
+ getParity26(hi, lo);
+ break;
+ }
+ case 33 : {
+ calc33(fc, cn, hi, lo);
+ getParity33(hi, lo);
+ break;
+ }
+ case 34 : {
+ calc34(fc, cn, hi, lo);
+ getParity34(hi, lo);
+ break;
+ }
+ case 35 : {
+ calc35(fc, cn, hi, lo);
+ getParity35(hi, lo);
+ break;
+ }
+ case 37 : {
+ calc37S(fc, cn, hi, lo);
+ getParity37S(hi, lo);
+ break;
+ }
+ case 38 : {
+ calc37H(cn, hi, lo);
+ getParity37H(hi, lo);
+ break;
+ }
+ case 40 : calc40(cardno, hi, lo); break;
+ case 44 : { break; }
+ case 84 : { break; }
+ }
+}
+
+int CmdHIDWiegand(const char *Cmd) {
+ uint32_t oem;
+ uint32_t fc, lo = 0, hi = 0;
+ uint64_t cardnum = 0;
+
+ 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 ftmlen[] = {26,33,34,35,37,38,40};
+ for (uint8_t i = 0; i < sizeof(ftmlen); i++){
+ calcWiegand( ftmlen[i], fc, cardnum, &hi, &lo);
+ PrintAndLog("HID %d bit | FC: %d CN: %llu | Wiegand Code: %08X%08X", ftmlen[i], fc, cardnum, hi, lo);
+ }
+ return 0;
+}
+
+int CmdHIDBrute(const char *Cmd){
+
+ bool error = FALSE;
+ uint8_t fc = 0, fmtlen = 0;
+ uint32_t hi = 0, lo = 0;
+
+ UsbCommand c = {CMD_HID_SIM_TAG, {0, 0, 0}};
+
+ char cmdp = param_getchar(Cmd, 0);
+ if (strlen(Cmd) > 2 || strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') return usage_lf_hid_brute();
+
+ fmtlen = param_get8(Cmd, 0);
+ switch(fmtlen){
+ case 26:
+ case 33:
+ case 34:
+ case 35:
+ case 37: {
+ error = FALSE;
+ break;
+ }
+ default: {
+ error = TRUE;
+ break;
+ }
+ }
+ if ( error ) return usage_lf_hid_brute();
+
+ fc = param_get8(Cmd, 1);
+ if ( fc == 0) return usage_lf_hid_brute();
+
+ PrintAndLog("Bruteforceing HID Reader");
+ PrintAndLog("Press pm3-button to abort simulation or run another command");
+
+ for ( uint16_t cn = 1; cn < 0xFFFF; ++cn){
+ if (ukbhit()) {
+ PrintAndLog("aborted via keyboard!");
+ c.cmd = CMD_PING;
+ c.arg[0] = 0x00;
+ c.arg[1] = 0x00;
+ c.arg[2] = 0x00;
+ clearCommandBuffer();
+ SendCommand(&c);
+ return 1;
+ }
+
+ calcWiegand( fmtlen, fc, cn, &hi, &lo);
+
+ c.arg[0] = hi;
+ c.arg[1] = lo;
+ clearCommandBuffer();
+ SendCommand(&c);
+
+ PrintAndLog("Trying FC: %u; CN: %u", fc, cn);
+ // pause
+ sleep(1);
+ }
+ return 0;
+}
+
+static command_t CommandTable[] = {
+ {"help", CmdHelp, 1, "This help"},
+ //{"demod", CmdHIDDemod, 1, "Demodulate HID Prox Card II (not optimal)"},
+ {"fskdemod", CmdHIDDemodFSK, 0, "['1'] Realtime HID FSK demodulator (option '1' for one tag only)"},
+ {"sim", CmdHIDSim, 0, "<ID> -- HID tag simulator"},
+ {"clone", CmdHIDClone, 0, "<ID> ['l'] -- Clone HID to T55x7 (tag must be in antenna)(option 'l' for 84bit ID)"},
+ {"wiegand", CmdHIDWiegand, 1, "<oem> <fmtlen> <fc> <cardnum> -- convert facilitycode, cardnumber to Wiegand code"},
+ {NULL, NULL, 0, NULL}
projects / proxmark3-svn / blobdiff