[proxmark3-svn] / client / cmdlfhid.c

//-----------------------------------------------------------------------------
// Copyright (C) 2010 iZsh <izsh at fail0verflow.com>
//
// 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.
//-----------------------------------------------------------------------------
// Low frequency HID commands
//-----------------------------------------------------------------------------

#include "cmdlfhid.h"

static int CmdHelp(const char *Cmd);

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) {
	
	unsigned int 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) {
	
// }
//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){	
// }
// static void getParity37S(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;

	// // 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){
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) );
	
//   *out |= (1 << 26); // why this?
//   *out |= (1 << 37);  // bit format for hid?
}
// 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);  
// }

void calcWiegand(uint8_t fmtlen, uint16_t fc, uint64_t cardno, uint8_t *bits){

	// uint32_t hi = 0, lo = 0;
	// uint32_t cn32 = (cardno & 0xFFFFFFFF);
	// switch ( fmtlen ) {
		// case 26 : {			
			// calc26(fc, cn32, bits);
			// addHIDFormatMarker(fmtlen, bits);	
			// break;
		// }
		// case 33 : { 
 			// // calc33(fc, cn32, hi, lo);
			// // getParity33(hi, lo);	
			// break;
		// }
		// case 34 : {
 			// calc34(fc, cn32, hi, lo);
			// getParity34(hi, lo);		
			// break;
		// }
		// case 35 : {
			// calc35(fc, cn32, hi, lo);
			// getParity35(hi, lo);
			// break;
		// }
		// case 37 : {
			// calc37S(fc, cn32, hi, lo);
			// getParity37S(hi, lo);
			// break;
		// }
		// case 38 : { 
			// calc37H(cn32, 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 = 0, fc = 0;
	uint64_t cardnum = 0;
	
	uint32_t blocks[2] = {0,0};
	uint32_t wiegand[2] = {0,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 ftmlen[] = {26,33,34,35,37,38,40};
	
	PrintAndLog("HID | OEM |  FC |   CN  |  Wiegand  |  HID Formatted");
	PrintAndLog("----+-----+-----+-------+-----------+--------------------");
	for (uint8_t i = 0; i < sizeof(ftmlen); i++){
		calcWiegand( ftmlen[i], fc, cardnum, bs);
		blocks[0] = bytebits_to_byte(bs,32);
		blocks[1] = bytebits_to_byte(bs+32,32);
		PrintAndLog(" %d | %d  | %d  | %llu  | %08X%08X  |  %08X%08X ",
			ftmlen,
			oem,
			fc,
			cardnum,
			wiegand[0],
			wiegand[1],
			blocks[0],
			blocks[1]
			);
	}
	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;
		}
	}
	if ( fc == 0 ) errors = true;
	if ( errors ) return usage_lf_hid_brute();
	
	PrintAndLog("Brute-forcing HID reader");
	PrintAndLog("Press pm3-button to abort simulation or run another command");
	
	uint16_t up = cn;
	uint16_t down = cn;
	
	for (;;){
		
		if ( offline ) {
			printf("Device offline\n");
			return  2;
		}
		
		if (ukbhit()) {
			PrintAndLog("aborted via keyboard!");
			return sendPing();
		}
		
		// Do one up
		if ( up < 0xFFFF )
			if ( !sendTry(fmtlen, fc, up++, delay, bs)) return 1;
		
		// Do one down  (if cardnumber is given)
		if ( cn > 1 )
			if ( down > 1 )
				if ( !sendTry(fmtlen, fc, --down, delay, bs)) return 1;
	}
	return 0;
}

static command_t CommandTable[] = {
	{"help",    CmdHelp,        1, "This help"},
	{"fskdemod",CmdHIDDemodFSK, 0, "Realtime HID FSK demodulator"},
	{"sim",     CmdHIDSim,      0, "HID tag simulator"},
	{"clone",   CmdHIDClone,    0, "Clone HID to T55x7"},
	{"wiegand", CmdHIDWiegand,  0, "Convert facility code/card number to Wiegand code"},
	{"brute",   CmdHIDBrute,	0, "Bruteforce card number against reader"},
	{NULL, NULL, 0, NULL}
};

int CmdLFHID(const char *Cmd) {
	clearCommandBuffer();
	CmdsParse(CommandTable, Cmd);
	return 0;
}

int CmdHelp(const char *Cmd) {
	CmdsHelp(CommandTable);
	return 0;
}
Commit	Line	Data
a553f267	1	//-----------------------------------------------------------------------------
	2	// Copyright (C) 2010 iZsh <izsh at fail0verflow.com>
	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	// Low frequency HID commands
	9	//-----------------------------------------------------------------------------
	10
7fe9b0b7	11	#include "cmdlfhid.h"
	12
	13	static int CmdHelp(const char *Cmd);
f4fbfb83	14
3a532acf	15	int usage_lf_hid_wiegand(void){
e13ccb6b	16	PrintAndLog("This command converts facility code/card number to Wiegand code");
758f5ee3	17	PrintAndLog("Usage: lf hid wiegand [h] [OEM] [FC] [CN]");
758f5ee3	18
f4fbfb83	19	PrintAndLog("Options:");
e13ccb6b	20	PrintAndLog(" h - This help");
758f5ee3	21	PrintAndLog(" OEM - OEM number / site code");
e13ccb6b	22	PrintAndLog(" FC - facility code");
e13ccb6b	23	PrintAndLog(" CN - card number");
f4fbfb83	24	PrintAndLog("Examples:");
3a532acf	25	PrintAndLog(" lf hid wiegand 0 101 2001");
	26	return 0;
	27	}
758f5ee3	28	int usage_lf_hid_sim(void){
	29	PrintAndLog("HID Tag simulator");
	30	PrintAndLog("");
	31	PrintAndLog("Usage: lf hid sim [h] [ID]");
	32	PrintAndLog("Options:");
	33	PrintAndLog(" h - This help");
	34	PrintAndLog(" ID - HID id");
	35	PrintAndLog("Examples:");
	36	PrintAndLog(" lf hid sim 224");
	37	return 0;
	38	}
	39	int usage_lf_hid_clone(void){
	40	PrintAndLog("Clone HID to T55x7. Tag must be on antenna. ");
	41	PrintAndLog("");
	42	PrintAndLog("Usage: lf hid clone [h] [ID] <L>");
	43	PrintAndLog("Options:");
	44	PrintAndLog(" h - This help");
	45	PrintAndLog(" ID - HID id");
	46	PrintAndLog(" L - 84bit ID");
	47	PrintAndLog("Examples:");
	48	PrintAndLog(" lf hid clone 224");
	49	PrintAndLog(" lf hid clone 224 L");
	50	return 0;
	51	}
3a532acf	52	int usage_lf_hid_brute(void){
e13ccb6b	53	PrintAndLog("Enables bruteforce of HID readers with specified facility code.");
89603cbd	54	PrintAndLog("This is a attack against reader. if cardnumber is given, it starts with it and goes up / down one step");
89603cbd	55	PrintAndLog("if cardnumber is not given, it starts with 1 and goes up to 65535");
3a532acf	56	PrintAndLog("");
89603cbd	57	PrintAndLog("Usage: lf hid brute [h] a <format> f <facility-code> c <cardnumber> d <delay>");
3a532acf	58	PrintAndLog("Options :");
89603cbd	59	PrintAndLog(" h : This help");
	60	PrintAndLog(" a <format> : 26\|33\|34\|35\|37\|40\|44\|84");
	61	PrintAndLog(" f <facility-code> : 8-bit value HID facility code");
	62	PrintAndLog(" c <cardnumber> : (optional) cardnumber to start with, max 65535");
	63	PrintAndLog(" d <delay> : delay betweens attempts in ms. Default 1000ms");
3a532acf	64	PrintAndLog("");
89603cbd	65	PrintAndLog("Samples:");
	66	PrintAndLog(" lf hid brute a 26 f 224");
	67	PrintAndLog(" lf hid brute a 26 f 21 d 2000");
	68	PrintAndLog(" lf hid brute a 26 f 21 c 200 d 2000");
f4fbfb83	69	return 0;
f4fbfb83	70	}
758f5ee3	71
89603cbd	72	static int sendPing(void){
	73	UsbCommand ping = {CMD_PING, {1, 2, 3}};
	74	SendCommand(&ping);
	75	SendCommand(&ping);
	76	SendCommand(&ping);
	77	clearCommandBuffer();
	78	UsbCommand resp;
	79	if (WaitForResponseTimeout(CMD_ACK, &resp, 1000))
	80	return 0;
	81	return 1;
	82	}
	83	static bool sendTry(uint8_t fmtlen, uint32_t fc, uint32_t cn, uint32_t delay, uint8_t *bs){
	84
	85	PrintAndLog("Trying FC: %u; CN: %u", fc, cn);
	86
	87	calcWiegand( fmtlen, fc, cn, bs);
	88
	89	uint64_t arg1 = bytebits_to_byte(bs,32);
	90	uint64_t arg2 = bytebits_to_byte(bs+32,32);
	91	UsbCommand c = {CMD_HID_SIM_TAG, {arg1, arg2, 0}};
	92	clearCommandBuffer();
	93	SendCommand(&c);
	94	msleep(delay);
	95	sendPing();
	96	return TRUE;
	97	}
	98
3a532acf	99	int CmdHIDDemodFSK(const char *Cmd) {
f4fbfb83	100	int findone = ( Cmd[0] == '1' ) ? 1 : 0;
	101	UsbCommand c = {CMD_HID_DEMOD_FSK, {findone, 0 , 0}};
	102	clearCommandBuffer();
	103	SendCommand(&c);
	104	return 0;
7fe9b0b7	105	}
7fe9b0b7	106
3a532acf	107	int CmdHIDSim(const char *Cmd) {
f4fbfb83	108	unsigned int hi = 0, lo = 0;
f4fbfb83	109	int n = 0, i = 0;
38b20f75	110
758f5ee3	111	uint8_t ctmp = param_getchar(Cmd, 0);
	112	if ( strlen(Cmd) == 0 \|\| ctmp == 'H' \|\| ctmp == 'h' ) return usage_lf_hid_sim();
	113
f4fbfb83	114	while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
	115	hi = (hi << 4) \| (lo >> 28);
	116	lo = (lo << 4) \| (n & 0xf);
	117	}
38b20f75	118
f4fbfb83	119	PrintAndLog("Emulating tag with ID %x%16x", hi, lo);
f4fbfb83	120	PrintAndLog("Press pm3-button to abort simulation");
38b20f75	121
f4fbfb83	122	UsbCommand c = {CMD_HID_SIM_TAG, {hi, lo, 0}};
	123	clearCommandBuffer();
	124	SendCommand(&c);
	125	return 0;
38b20f75	126	}
38b20f75	127
3a532acf	128	int CmdHIDClone(const char *Cmd) {
758f5ee3	129
f4fbfb83	130	unsigned int hi2 = 0, hi = 0, lo = 0;
	131	int n = 0, i = 0;
	132	UsbCommand c;
38b20f75	133
758f5ee3	134	uint8_t ctmp = param_getchar(Cmd, 0);
	135	if ( strlen(Cmd) == 0 \|\| ctmp == 'H' \|\| ctmp == 'h' ) return usage_lf_hid_clone();
	136
f4fbfb83	137	if (strchr(Cmd,'l') != 0) {
	138	while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
	139	hi2 = (hi2 << 4) \| (hi >> 28);
	140	hi = (hi << 4) \| (lo >> 28);
	141	lo = (lo << 4) \| (n & 0xf);
	142	}
38b20f75	143
f4fbfb83	144	PrintAndLog("Cloning tag with long ID %x%08x%08x", hi2, hi, lo);
38b20f75	145
f4fbfb83	146	c.d.asBytes[0] = 1;
	147	} else {
	148	while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
	149	hi = (hi << 4) \| (lo >> 28);
	150	lo = (lo << 4) \| (n & 0xf);
	151	}
38b20f75	152
f4fbfb83	153	PrintAndLog("Cloning tag with ID %x%08x", hi, lo);
38b20f75	154
f4fbfb83	155	hi2 = 0;
	156	c.d.asBytes[0] = 0;
	157	}
ec09b62d	158
f4fbfb83	159	c.cmd = CMD_HID_CLONE_TAG;
	160	c.arg[0] = hi2;
	161	c.arg[1] = hi;
	162	c.arg[2] = lo;
	163
	164	clearCommandBuffer();
	165	SendCommand(&c);
	166	return 0;
ec09b62d	167	}
758f5ee3	168	// struct to handle wiegand
	169	typedef struct {
	170	uint8_t FormatLen;
	171	uint8_t SiteCode;
	172	uint8_t FacilityCode;
	173	uint8_t CardNumber;
	174	uint8_t* Wiegand;
	175	size_t Wiegand_n;
	176	} wiegand_t;
	177
	178	// static void addHIDMarker(uint8_t fmtlen, uint8_t *out) {
f4fbfb83	179
758f5ee3	180	// }
	181	//static void getParity26(uint32_t hi, uint32_t lo){
	182	// uint32_t result = 0;
	183	// int i;
	184	// // even parity
	185	// for (i = 24;i >= 13;i--)
	186	// result ^= (*lo >> i) & 1;
	187	// // even parity 26th bit
	188	// *lo \|= result << 25;
	189
	190	// // odd parity
	191	// result = 0;
	192	// for (i = 12;i >= 1;i--)
	193	// result ^= (*lo >> i) & 1;
	194	// *lo \|= !result;
	195	//}
	196
	197	// static void getParity33(uint32_t hi, uint32_t lo){
	198
	199	// }
	200	// static void getParity34(uint32_t hi, uint32_t lo){
	201	// uint32_t result = 0;
	202	// int i;
	203
	204	// // even parity
	205	// for (i = 7;i >= 0;i--)
	206	// result ^= (*hi >> i) & i;
	207	// for (i = 31;i >= 24;i--)
	208	// result ^= (*lo >> i) & 1;
	209
	210	// *hi \|= result << 2;
	211
	212	// // odd parity bit
	213	// result = 0;
	214	// for (i = 23;i >= 1;i--)
	215	// result ^= (*lo >> i) & 1;
	216
	217	// *lo \|= !result;
	218	// }
	219	// static void getParity35(uint32_t hi, uint32_t lo){
	220	// }
	221	// static void getParity37S(uint32_t hi,uint32_t lo){
	222	// uint32_t result = 0;
	223	// int i;
	224
	225	// // even parity
	226	// for (i = 4; i >= 0; i--)
	227	// result ^= (*hi >> i) & 1;
	228
	229	// for (i = 31; i >= 20; i--)
	230	// result ^= (*lo >> i) & 1;
	231
	232	// *hi \|= result;
	233
	234	// // odd parity
	235	// result = 0;
	236	// for (i = 19; i >= 1; i--)
	237	// result ^= (*lo >> i) & 1;
	238
	239	// *lo \|= result;
	240	// }
	241	// static void getParity37H(uint32_t hi, uint32_t lo){
	242	// uint32_t result = 0;
	243	// int i;
244
245	// // even parity
246	// for (i = 4;i >= 0;i--)
247	// result ^= (*hi >> i) & 1;
248	// for (i = 31;i >= 20;i--)
249	// result ^= (*lo >> i) & 1;
250	// *hi \|= result << 4;
251
252	// // odd parity
253	// result = 0;
254	// for (i = 19;i >= 1;i--)
255	// result ^= (*lo >> i) & 1;
256	// *lo \|= result;
257	// }
258
259	//static void calc26(uint16_t fc, uint32_t cardno, uint32_t hi, uint32_t lo){
260	void calc26(uint16_t fc, uint32_t cardno, uint8_t *out){
261
262	uint8_t wiegand[24];
263	num_to_bytebits(fc, 8, wiegand);
264	num_to_bytebits(cardno, 16, wiegand+8);
265	wiegand_add_parity(out, wiegand, sizeof(wiegand) );
266
267	// *out \|= (1 << 26); // why this?
268	// *out \|= (1 << 37); // bit format for hid?
f4fbfb83	269	}
758f5ee3	270	// static void calc33(uint16_t fc, uint32_t cardno, uint32_t hi, uint32_t lo){
	271
	272	// }
	273	// static void calc34(uint16_t fc, uint32_t cardno, uint32_t hi, uint32_t lo){
	274	// // put card number first bit 1 .. 20 //
	275	// *lo = ((cardno & 0X000F7FFF) << 1) \| ((fc & 0XFFFF) << 17);
	276	// // set bit format for less than 37 bit format
	277	// *hi = (1 << 5) \| (fc >> 15);
	278	// }
	279	// static void calc35(uint16_t fc, uint32_t cardno, uint32_t hi, uint32_t lo){
	280	// *lo = ((cardno & 0xFFFFF) << 1) \| fc << 21;
	281	// *hi = (1 << 5) \| ((fc >> 11) & 1);
	282	// }
	283	// static void calc37S(uint16_t fc, uint32_t cardno, uint32_t hi, uint32_t lo){
	284	// // FC 2 - 17 - 16 bit
	285	// // cardno 18 - 36 - 19 bit
	286	// // Even P1 1 - 19
	287	// // Odd P37 19 - 36
	288
	289	// fc = fc & 0xFFFF;
	290	// *lo = ((fc << 20) \| (cardno & 0x7FFFF) << 1);
	291	// *hi = (fc >> 12);
	292	// }
	293	// static void calc37H(uint64_t cardno, uint32_t hi, uint32_t lo){
	294	// // SC NONE
	295	// // cardno 1-35 34 bits
	296	// // Even Parity 0th bit 1-18
	297	// // Odd Parity 36th bit 19-35
	298	// cardno = (cardno & 0x00000003FFFFFFFF);
	299	// *lo = (cardno << 1);
	300	// *hi = (cardno >> 31);
	301	// }
	302	// static void calc40(uint64_t cardno, uint32_t hi, uint32_t lo){
	303	// cardno = (cardno & 0xFFFFFFFFFF);
	304	// *lo = ((cardno & 0xFFFFFFFF) << 1 );
	305	// *hi = (cardno >> 31);
	306	// }
	307
89603cbd	308	void calcWiegand(uint8_t fmtlen, uint16_t fc, uint64_t cardno, uint8_t *bits){
758f5ee3	309
	310	// uint32_t hi = 0, lo = 0;
	311	// uint32_t cn32 = (cardno & 0xFFFFFFFF);
	312	// switch ( fmtlen ) {
	313	// case 26 : {
	314	// calc26(fc, cn32, bits);
	315	// addHIDFormatMarker(fmtlen, bits);
	316	// break;
	317	// }
	318	// case 33 : {
	319	// // calc33(fc, cn32, hi, lo);
	320	// // getParity33(hi, lo);
	321	// break;
	322	// }
	323	// case 34 : {
	324	// calc34(fc, cn32, hi, lo);
	325	// getParity34(hi, lo);
	326	// break;
	327	// }
	328	// case 35 : {
	329	// calc35(fc, cn32, hi, lo);
	330	// getParity35(hi, lo);
	331	// break;
	332	// }
	333	// case 37 : {
	334	// calc37S(fc, cn32, hi, lo);
	335	// getParity37S(hi, lo);
	336	// break;
	337	// }
	338	// case 38 : {
	339	// calc37H(cn32, hi, lo);
	340	// getParity37H(hi, lo);
	341	// break;
	342	// }
	343	// case 40 : calc40(cardno, hi, lo); break;
	344	// case 44 : { break; }
	345	// case 84 : { break; }
	346	// }
f4fbfb83	347
3a532acf	348	}
	349
	350	int CmdHIDWiegand(const char *Cmd) {
758f5ee3	351	uint32_t oem = 0, fc = 0;
3a532acf	352	uint64_t cardnum = 0;
3a532acf	353
80920fac	354	uint32_t blocks[2] = {0,0};
34c81fe0	355	uint32_t wiegand[2] = {0,0};
758f5ee3	356
	357	uint8_t bits[96];
	358	uint8_t *bs = bits;
	359	memset(bs, 0, sizeof(bits));
	360
3a532acf	361	uint8_t ctmp = param_getchar(Cmd, 0);
e1ad67ea	362	if ( strlen(Cmd) == 0 \|\| strlen(Cmd) < 3 \|\| ctmp == 'H' \|\| ctmp == 'h' ) return usage_lf_hid_wiegand();
3a532acf	363
	364	oem = param_get8(Cmd, 0);
	365	fc = param_get32ex(Cmd, 1, 0, 10);
	366	cardnum = param_get64ex(Cmd, 2, 0, 10);
	367
758f5ee3	368	//
3a532acf	369	uint8_t ftmlen[] = {26,33,34,35,37,38,40};
758f5ee3	370
e92948c6	371	PrintAndLog("HID \| OEM \| FC \| CN \| Wiegand \| HID Formatted");
e92948c6	372	PrintAndLog("----+-----+-----+-------+-----------+--------------------");
3a532acf	373	for (uint8_t i = 0; i < sizeof(ftmlen); i++){
758f5ee3	374	calcWiegand( ftmlen[i], fc, cardnum, bs);
	375	blocks[0] = bytebits_to_byte(bs,32);
	376	blocks[1] = bytebits_to_byte(bs+32,32);
e92948c6	377	PrintAndLog(" %d \| %d \| %d \| %llu \| %08X%08X \| %08X%08X ",
758f5ee3	378	ftmlen,
e92948c6	379	oem,
758f5ee3	380	fc,
	381	cardnum,
	382	wiegand[0],
	383	wiegand[1],
	384	blocks[0],
	385	blocks[1]
	386	);
3a532acf	387	}
e92948c6	388	PrintAndLog("----+-----+-----+-------+-----------+--------------------");
3a532acf	389	return 0;
	390	}
	391
	392	int CmdHIDBrute(const char *Cmd){
	393
89603cbd	394	bool errors = false;
	395	uint32_t fc = 0, cn = 0, delay = 1000;
	396	uint8_t fmtlen = 0;
758f5ee3	397	uint8_t bits[96];
	398	uint8_t *bs = bits;
	399	memset(bs, 0, sizeof(bits));
89603cbd	400	uint8_t cmdp = 0;
	401
	402	while(param_getchar(Cmd, cmdp) != 0x00 && !errors) {
	403	switch(param_getchar(Cmd, cmdp)) {
	404	case 'h':
	405	case 'H':
	406	return usage_lf_hid_brute();
	407	case 'f':
	408	case 'F':
	409	fc = param_get32ex(Cmd ,cmdp+1, 0, 10);
	410	if ( !fc )
	411	errors = true;
	412	cmdp += 2;
	413	break;
	414	case 'd':
	415	case 'D':
	416	// delay between attemps, defaults to 1000ms.
	417	delay = param_get32ex(Cmd, cmdp+1, 1000, 10);
	418	cmdp += 2;
	419	break;
	420	case 'c':
	421	case 'C':
	422	cn = param_get32ex(Cmd, cmdp+1, 0, 10);
	423	// truncate cardnumber.
	424	cn &= 0xFFFF;
	425	cmdp += 2;
	426	break;
	427	case 'a':
	428	case 'A':
	429	fmtlen = param_get8(Cmd, cmdp+1);
	430	cmdp += 2;
7aa24806	431	bool is_ftm_ok = FALSE;
89603cbd	432	uint8_t ftms[] = {26,33,34,35,37};
	433	for ( uint8_t i = 0; i < sizeof(ftms); i++){
	434	if ( ftms[i] == fmtlen ) {
7aa24806	435	is_ftm_ok = TRUE;
89603cbd	436	}
89603cbd	437	}
7aa24806	438	// negated
7aa24806	439	errors = !is_ftm_ok;
89603cbd	440	break;
	441	default:
	442	PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
	443	errors = true;
	444	break;
3a532acf	445	}
3a532acf	446	}
89603cbd	447	if ( fc == 0 ) errors = true;
89603cbd	448	if ( errors ) return usage_lf_hid_brute();
3a532acf	449
e13ccb6b	450	PrintAndLog("Brute-forcing HID reader");
3a532acf	451	PrintAndLog("Press pm3-button to abort simulation or run another command");
89603cbd	452
	453	uint16_t up = cn;
	454	uint16_t down = cn;
	455
	456	for (;;){
	457
	458	if ( offline ) {
	459	printf("Device offline\n");
	460	return 2;
	461	}
	462
3a532acf	463	if (ukbhit()) {
3a532acf	464	PrintAndLog("aborted via keyboard!");
89603cbd	465	return sendPing();
3a532acf	466	}
3a532acf	467
89603cbd	468	// Do one up
	469	if ( up < 0xFFFF )
	470	if ( !sendTry(fmtlen, fc, up++, delay, bs)) return 1;
	471
	472	// Do one down (if cardnumber is given)
	473	if ( cn > 1 )
	474	if ( down > 1 )
	475	if ( !sendTry(fmtlen, fc, --down, delay, bs)) return 1;
3a532acf	476	}
f4fbfb83	477	return 0;
	478	}
	479
	480	static command_t CommandTable[] = {
e13ccb6b	481	{"help", CmdHelp, 1, "This help"},
89603cbd	482	{"fskdemod",CmdHIDDemodFSK, 0, "Realtime HID FSK demodulator"},
	483	{"sim", CmdHIDSim, 0, "HID tag simulator"},
	484	{"clone", CmdHIDClone, 0, "Clone HID to T55x7"},
	485	{"wiegand", CmdHIDWiegand, 0, "Convert facility code/card number to Wiegand code"},
	486	{"brute", CmdHIDBrute, 0, "Bruteforce card number against reader"},
f4fbfb83	487	{NULL, NULL, 0, NULL}
7fe9b0b7	488	};
7fe9b0b7	489
f4fbfb83	490	int CmdLFHID(const char *Cmd) {
4c36581b	491	clearCommandBuffer();
f4fbfb83	492	CmdsParse(CommandTable, Cmd);
f4fbfb83	493	return 0;
7fe9b0b7	494	}
7fe9b0b7	495
f4fbfb83	496	int CmdHelp(const char *Cmd) {
	497	CmdsHelp(CommandTable);
	498	return 0;
7fe9b0b7	499	}