[proxmark3-svn] / client / cmdlffdx.c

//-----------------------------------------------------------------------------
//
// 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 Presco tag commands
//-----------------------------------------------------------------------------

#include "cmdlffdx.h"

/*
	FDX-B ISO11784/85 demod  (aka animal tag)  BIPHASE, inverted, rf/32,  with preamble of 00000000001 (128bits)
	8 databits + 1 parity (1)
	CIITT 16 checksum
	NATIONAL CODE, ICAR database
	COUNTRY CODE (ISO3166) or http://cms.abvma.ca/uploads/ManufacturersISOsandCountryCodes.pdf
	FLAG (animal/non-animal)

	38 IDbits   
	10 country code 
	1 extra app bit
	14 reserved bits
	1 animal bit
	16 ccitt CRC chksum over 64bit ID CODE.
	24 appli bits.

	sample: 985121004515220  [ 37FF65B88EF94 ]
*/

static int CmdHelp(const char *Cmd);

int usage_lf_fdx_clone(void){
	PrintAndLog("clone a FDX-B Animal tag to a T55x7 tag.");
	PrintAndLog("Usage: lf fdx clone [h] <country id> <animal id> <Q5>");
	PrintAndLog("Options:");
	PrintAndLog("      h            : This help");
	PrintAndLog("      <country id> : Country id");
	PrintAndLog("      <animal id>  : Animal id");
	// has extended data?
	//reserved/rfu
	//is animal tag
	// extended data
	PrintAndLog("      <Q5>        : specify write to Q5 (t5555 instead of t55x7)");
	PrintAndLog("");
	PrintAndLog("Sample: lf fdx clone 999 112233");
	return 0;
}

int usage_lf_fdx_sim(void) {
	PrintAndLog("Enables simulation of FDX-B Animal tag");
	PrintAndLog("Simulation runs until the button is pressed or another USB command is issued.");
	PrintAndLog("");
	PrintAndLog("Usage:  lf fdx sim [h] <country id> <animal id>");
	PrintAndLog("Options:");
	PrintAndLog("      h            : This help");
	PrintAndLog("      <country id> : Country id");
	PrintAndLog("      <animal id>  : Animal id");
	PrintAndLog("");
	PrintAndLog("Sample: lf fdx sim 999 112233");
	return 0;
}
// clearing the topbit needed for the preambl detection. 
static void verify_values(uint32_t countryid, uint64_t animalid){
	if ((animalid & 0x3FFFFFFFFF) != animalid) {
		animalid &= 0x3FFFFFFFFF;
		PrintAndLog("Animal ID Truncated to 38bits: %"PRIx64, animalid);
	}	
	if ( (countryid & 0x3ff) != countryid ) {
		countryid &= 0x3ff;
		PrintAndLog("Country ID Truncated to 10bits: %03d", countryid);
	}
}

static uint16_t getFDXchksum (uint64_t raw){
	uint8_t arr[8];
	num_to_bytes(raw, 64, arr);
	return crc16_ccitt_kermit(arr, 8);
}

int getFDXBits(uint64_t national_id, uint16_t country, uint8_t isanimal, uint8_t isextended, uint32_t extended, uint8_t *bits) {
	
	uint64_t raw = 0;
	uint8_t data[117] = {0};
	
	raw |= isanimal;
	raw |= (0x000 & 0x3ff) << 1;
	raw |= isextended << 14;
	raw |= (country & 0x3ff) << 15;
	raw |= (national_id & 0x3FFFFFFFFF) << 25;
		
	uint16_t crc = getFDXchksum(raw);

	// add raw to bitarray
	num_to_bytebits(raw, 64, data);

	// add crc to bitarray
	num_to_bytebits(crc, 16, data+64);

	// add extended data to bitarray
	num_to_bytebits(extended, 24, data+64+16);
	
	//reverse array
	printf("ICE:\n %s\n", sprint_bin(data, 104) );
	for (uint8_t i = 0; i <104/2; ++i) {
		uint8_t tmp = data[i];
		data[i] = data[104-i];
		data[104-i] = tmp;
	}
	printf("ICE:\n %s\n", sprint_bin(data, 104) );
	
	// add parity always EVEN (2), every 8bits
	// into output array
	uint8_t bitlen = addParity(data, bits+11, 104, 9, 2);
	if (bitlen != 117 ) 
		printf("ICE ERROR PARITY BITLEN 119 != %d\n", bitlen);
	
    // add preamble ten 0x00 and one 0x01
    memset(bits, 0x00, 10);
	bits[10] = 1;
	printf("%s\n", sprint_bin_break(bits, 128, 32) );
	/*
	// 128bits
    // every 9th bit is 0x01, but we can just fill the rest with 0x01 and overwrite
	memset(bits, 0x01, 128);
	
    // add preamble ten 0x00 and one 0x01
    memset(bits, 0x00, 10);

	// add reserved 
	num_to_bytebitsLSBF(0x00, 7, bits + 66);
	num_to_bytebitsLSBF(0x00 >> 7, 7, bits + 74);

	// add animal flag - OK
	bits[65] = isanimal;
	
	// add extended flag - OK
	bits[81] = isextended;
	
	// add national code 40bits - OK
	num_to_bytebitsLSBF(national_id >> 0, 8, bits+11);
	num_to_bytebitsLSBF(national_id >> 8, 8, bits+20);
	num_to_bytebitsLSBF(national_id >> 16, 8, bits+29);
	num_to_bytebitsLSBF(national_id >> 24, 8, bits+38);
	num_to_bytebitsLSBF(national_id >> 32, 6, bits+47);
	
	// add country code - OK
	num_to_bytebitsLSBF(country >> 0, 2, bits+53);
	num_to_bytebitsLSBF(country >> 2, 8, bits+56);

	// add crc-16 - OK
	uint8_t raw[8];
	for (uint8_t i=0; i<8; ++i)
		raw[i] = bytebits_to_byte(bits + 11 + i * 9, 8);
		
	uint16_t crc = crc16_ccitt_kermit(raw, 8);
	num_to_bytebitsLSBF(crc >> 0, 8, bits+83);
	num_to_bytebitsLSBF(crc >> 8, 8, bits+92);
	
	// extended data - OK
	num_to_bytebitsLSBF( extended >> 0 , 8, bits+101);
	num_to_bytebitsLSBF( extended >> 8 , 8, bits+110);
	num_to_bytebitsLSBF( extended >> 16, 8, bits+119);
	
	*/
	return 1;
}

//see ASKDemod for what args are accepted
//almost the same demod as cmddata.c/CmdFDXBdemodBI 
int CmdFdxDemod(const char *Cmd) {

	//Differential Biphase / di-phase (inverted biphase)
	//get binary from ask wave
	if (!ASKbiphaseDemod("0 32 1 0", FALSE)) {
		if (g_debugMode) PrintAndLog("DEBUG: Error - FDX-B ASKbiphaseDemod failed");
		return 0;
	}
	size_t size = DemodBufferLen;
	int ans = FDXBdemodBI(DemodBuffer, &size);
	if (ans < 0){
		if (g_debugMode){
			if (ans == -1)
				PrintAndLog("DEBUG: Error - FDX-B too few bits found");
			else if (ans == -2)
				PrintAndLog("DEBUG: Error - FDX-B preamble not found");
			else if (ans == -3)
				PrintAndLog("DEBUG: Error - FDX-B Size not correct: %d", size);
			else
				PrintAndLog("DEBUG: Error - FDX-B ans: %d", ans);
		}
		return 0;
	}

	setDemodBuf(DemodBuffer, 128, ans);
	// remove marker bits (1's every 9th digit after preamble) (pType = 2)
	size = removeParity(DemodBuffer, 11, 9, 2, 117);
	if ( size != 104 ) {
		if (g_debugMode) PrintAndLog("DEBUG: Error - FDX-B error removeParity: %d", size);
		return 0;
	}

	//got a good demod
	uint64_t NationalCode = ((uint64_t)(bytebits_to_byteLSBF(DemodBuffer+32,6)) << 32) | bytebits_to_byteLSBF(DemodBuffer,32);
	uint16_t countryCode = bytebits_to_byteLSBF(DemodBuffer+38,10);
	uint8_t dataBlockBit = DemodBuffer[48];
	uint32_t reservedCode = bytebits_to_byteLSBF(DemodBuffer+49,14);
	uint8_t animalBit = DemodBuffer[63];
	uint32_t crc16 = bytebits_to_byteLSBF(DemodBuffer+64,16);
	uint32_t extended = bytebits_to_byteLSBF(DemodBuffer+80,24);
	uint64_t rawid = ((uint64_t)
								//bytebits_to_byte(DemodBuffer, 8) << 96) | 
								//bytebits_to_byte(DemodBuffer,32) << 64) |
								bytebits_to_byte(DemodBuffer,32) << 32) |
								bytebits_to_byte(DemodBuffer+32, 32);
	uint8_t raw[8];
	num_to_bytes(rawid, 8, raw);

	uint16_t calcCrc = crc16_ccitt_kermit(raw, 8);
	
	PrintAndLog("\nFDX-B / ISO 11784/5 Animal Tag ID Found:  Raw : %s", sprint_hex(raw, 8));
	PrintAndLog("Animal ID          %04u-%012llu", countryCode, NationalCode);
	PrintAndLog("National Code      %012llu (0x%llX)", NationalCode, NationalCode);
	PrintAndLog("Country Code       %04u", countryCode);
	PrintAndLog("Reserved/RFU       %u (0x04%X)", reservedCode,  reservedCode);
	PrintAndLog("");
	PrintAndLog("Animal Tag         %s", animalBit ? "True" : "False");	
	PrintAndLog("Has extended data  %s [0x%X]", dataBlockBit ? "True" : "False", extended);	
	PrintAndLog("CRC-16             0x%04X - 0x%04X [%s]", crc16, calcCrc, (calcCrc == crc16) ? "Ok" : "Failed");

	if (g_debugMode) {
		PrintAndLog("Start marker %d;   Size %d", ans, size);	
		char *bin = sprint_bin_break(DemodBuffer, size, 16);
		PrintAndLog("DEBUG bin stream:\n%s", bin);
	}
	return 1;
}

int CmdFdxRead(const char *Cmd) {
	CmdLFRead("s");
	getSamples("12000", TRUE);
	return CmdFdxDemod(Cmd);
}

int CmdFdxClone(const char *Cmd) {

	uint32_t countryid = 0;
	uint64_t animalid = 0;
	uint32_t blocks[5] = {T55x7_MODULATION_DIPHASE | T55x7_BITRATE_RF_32 | 4<<T55x7_MAXBLOCK_SHIFT, 0, 0, 0, 0};
	uint8_t bits[128];
	uint8_t *bs = bits;
	memset(bs, 0, sizeof(bits));
	
	char cmdp = param_getchar(Cmd, 0);
	if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') return usage_lf_fdx_clone();

	countryid = param_get32ex(Cmd, 0, 0, 10);
	animalid = param_get64ex(Cmd, 1, 0, 10);
	
	//Q5
	if (param_getchar(Cmd, 1) == 'Q' || param_getchar(Cmd, 1) == 'q') {
		//t5555 (Q5) BITRATE = (RF-2)/2 (iceman)
		blocks[0] = T5555_MODULATION_BIPHASE | T5555_INVERT_OUTPUT | 32<<T5555_BITRATE_SHIFT | 4<<T5555_MAXBLOCK_SHIFT;
	}
	
	verify_values(countryid, animalid);
	
	// getFDXBits(uint64_t national_id, uint16_t country, uint8_t isanimal, uint8_t isextended, uint32_t extended, uint8_t *bits) 
	if ( !getFDXBits(animalid, countryid, 1, 0, 0, bs)) {
		PrintAndLog("Error with tag bitstream generation.");
		return 1;
	}	
	
	// convert from bit stream to block data
	blocks[1] = bytebits_to_byte(bs,32);
	blocks[2] = bytebits_to_byte(bs+32,32);
	blocks[3] = bytebits_to_byte(bs+64,32);
	blocks[4] = bytebits_to_byte(bs+96,32);

	PrintAndLog("Preparing to clone FDX-B to T55x7 with animal ID: %04u-%"PRIu64, countryid, animalid);
	PrintAndLog("Blk | Data ");
	PrintAndLog("----+------------");
	PrintAndLog(" 00 | 0x%08x", blocks[0]);
	PrintAndLog(" 01 | 0x%08x", blocks[1]);
	PrintAndLog(" 02 | 0x%08x", blocks[2]);
	PrintAndLog(" 03 | 0x%08x", blocks[3]);
	PrintAndLog(" 04 | 0x%08x", blocks[4]);
	
	UsbCommand resp;
	UsbCommand c = {CMD_T55XX_WRITE_BLOCK, {0,0,0}};

	for (int i = 4; i >= 0; --i) {
		c.arg[0] = blocks[i];
		c.arg[1] = i;
		clearCommandBuffer();
		SendCommand(&c);
		if (!WaitForResponseTimeout(CMD_ACK, &resp, 1000)){
			PrintAndLog("Error occurred, device did not respond during write operation.");
			return -1;
		}
	}
    return 0;
}

int CmdFdxSim(const char *Cmd) {
	uint32_t countryid = 0;
	uint64_t animalid = 0;

	char cmdp = param_getchar(Cmd, 0);
	if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') return usage_lf_fdx_sim();

	countryid = param_get32ex(Cmd, 0, 0, 10);
	animalid = param_get64ex(Cmd, 1, 0, 10);
	
	verify_values(countryid, animalid);
	
	uint8_t clk = 32, encoding = 2, separator = 0, invert = 1;
	uint16_t arg1, arg2;
	size_t size = 128;
	arg1 = clk << 8 | encoding;
	arg2 = invert << 8 | separator;

	PrintAndLog("Simulating FDX-B animal ID: %04u-%"PRIu64, countryid, animalid);

	UsbCommand c = {CMD_ASK_SIM_TAG, {arg1, arg2, size}};

	 //getFDXBits(uint64_t national_id, uint16_t country, uint8_t isanimal, uint8_t isextended, uint32_t extended, uint8_t *bits) 
	getFDXBits(animalid, countryid, 1, 0, 0, c.d.asBytes);
	clearCommandBuffer();
	SendCommand(&c);
	return 0;
}

static command_t CommandTable[] = {
    {"help",	CmdHelp,	1, "This help"},
	{"demod",	CmdFdxDemod,1, "Attempt extract tag data from graphbuf"},
	{"read",	CmdFdxRead,	0, "Attempt to read and extract tag data"},
	{"clone",	CmdFdxClone,0, "Clone animal ID tag to T55x7"},
	{"sim",		CmdFdxSim,	0, "Animal ID tag simulator"},
    {NULL, NULL, 0, NULL}
};

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

int CmdHelp(const char *Cmd) {
    CmdsHelp(CommandTable);
    return 0;
}
Commit	Line	Data
c48211f7	1	//-----------------------------------------------------------------------------
	2	//
	3	// This code is licensed to you under the terms of the GNU GPL, version 2 or,
	4	// at your option, any later version. See the LICENSE.txt file for the text of
	5	// the license.
	6	//-----------------------------------------------------------------------------
	7	// Low frequency Presco tag commands
	8	//-----------------------------------------------------------------------------
	9
	10	#include "cmdlffdx.h"
	11
	12	/*
	13	FDX-B ISO11784/85 demod (aka animal tag) BIPHASE, inverted, rf/32, with preamble of 00000000001 (128bits)
	14	8 databits + 1 parity (1)
	15	CIITT 16 checksum
	16	NATIONAL CODE, ICAR database
	17	COUNTRY CODE (ISO3166) or http://cms.abvma.ca/uploads/ManufacturersISOsandCountryCodes.pdf
	18	FLAG (animal/non-animal)
	19
	20	38 IDbits
	21	10 country code
	22	1 extra app bit
	23	14 reserved bits
	24	1 animal bit
	25	16 ccitt CRC chksum over 64bit ID CODE.
	26	24 appli bits.
	27
	28	sample: 985121004515220 [ 37FF65B88EF94 ]
	29	*/
	30
	31	static int CmdHelp(const char *Cmd);
	32
	33	int usage_lf_fdx_clone(void){
	34	PrintAndLog("clone a FDX-B Animal tag to a T55x7 tag.");
	35	PrintAndLog("Usage: lf fdx clone [h] <country id> <animal id> <Q5>");
	36	PrintAndLog("Options:");
	37	PrintAndLog(" h : This help");
	38	PrintAndLog(" <country id> : Country id");
	39	PrintAndLog(" <animal id> : Animal id");
	40	// has extended data?
	41	//reserved/rfu
	42	//is animal tag
	43	// extended data
	44	PrintAndLog(" <Q5> : specify write to Q5 (t5555 instead of t55x7)");
	45	PrintAndLog("");
	46	PrintAndLog("Sample: lf fdx clone 999 112233");
	47	return 0;
	48	}
	49
	50	int usage_lf_fdx_sim(void) {
	51	PrintAndLog("Enables simulation of FDX-B Animal tag");
	52	PrintAndLog("Simulation runs until the button is pressed or another USB command is issued.");
	53	PrintAndLog("");
	54	PrintAndLog("Usage: lf fdx sim [h] <country id> <animal id>");
	55	PrintAndLog("Options:");
	56	PrintAndLog(" h : This help");
	57	PrintAndLog(" <country id> : Country id");
	58	PrintAndLog(" <animal id> : Animal id");
	59	PrintAndLog("");
	60	PrintAndLog("Sample: lf fdx sim 999 112233");
	61	return 0;
	62	}
	63	// clearing the topbit needed for the preambl detection.
	64	static void verify_values(uint32_t countryid, uint64_t animalid){
65	if ((animalid & 0x3FFFFFFFFF) != animalid) {
66	animalid &= 0x3FFFFFFFFF;
67	PrintAndLog("Animal ID Truncated to 38bits: %"PRIx64, animalid);
68	}
69	if ( (countryid & 0x3ff) != countryid ) {
70	countryid &= 0x3ff;
71	PrintAndLog("Country ID Truncated to 10bits: %03d", countryid);
72	}
73	}
74
75	static uint16_t getFDXchksum (uint64_t raw){
76	uint8_t arr[8];
77	num_to_bytes(raw, 64, arr);
78	return crc16_ccitt_kermit(arr, 8);
79	}
80
81	int getFDXBits(uint64_t national_id, uint16_t country, uint8_t isanimal, uint8_t isextended, uint32_t extended, uint8_t *bits) {
82
83	uint64_t raw = 0;
84	uint8_t data[117] = {0};
85
86	raw \|= isanimal;
87	raw \|= (0x000 & 0x3ff) << 1;
88	raw \|= isextended << 14;
89	raw \|= (country & 0x3ff) << 15;
90	raw \|= (national_id & 0x3FFFFFFFFF) << 25;
91
92	uint16_t crc = getFDXchksum(raw);
93
94	// add raw to bitarray
95	num_to_bytebits(raw, 64, data);
96
97	// add crc to bitarray
98	num_to_bytebits(crc, 16, data+64);
99
100	// add extended data to bitarray
101	num_to_bytebits(extended, 24, data+64+16);
102
103	//reverse array
104	printf("ICE:\n %s\n", sprint_bin(data, 104) );
105	for (uint8_t i = 0; i <104/2; ++i) {
106	uint8_t tmp = data[i];
107	data[i] = data[104-i];
108	data[104-i] = tmp;
109	}
110	printf("ICE:\n %s\n", sprint_bin(data, 104) );
111
112	// add parity always EVEN (2), every 8bits
113	// into output array
114	uint8_t bitlen = addParity(data, bits+11, 104, 9, 2);
115	if (bitlen != 117 )
116	printf("ICE ERROR PARITY BITLEN 119 != %d\n", bitlen);
117
118	// add preamble ten 0x00 and one 0x01
119	memset(bits, 0x00, 10);
120	bits[10] = 1;
121	printf("%s\n", sprint_bin_break(bits, 128, 32) );
122	/*
123	// 128bits
124	// every 9th bit is 0x01, but we can just fill the rest with 0x01 and overwrite
125	memset(bits, 0x01, 128);
126
127	// add preamble ten 0x00 and one 0x01
128	memset(bits, 0x00, 10);
129
130	// add reserved
131	num_to_bytebitsLSBF(0x00, 7, bits + 66);
132	num_to_bytebitsLSBF(0x00 >> 7, 7, bits + 74);
133
134	// add animal flag - OK
135	bits[65] = isanimal;
136
137	// add extended flag - OK
138	bits[81] = isextended;
139
140	// add national code 40bits - OK
141	num_to_bytebitsLSBF(national_id >> 0, 8, bits+11);
142	num_to_bytebitsLSBF(national_id >> 8, 8, bits+20);
143	num_to_bytebitsLSBF(national_id >> 16, 8, bits+29);
144	num_to_bytebitsLSBF(national_id >> 24, 8, bits+38);
145	num_to_bytebitsLSBF(national_id >> 32, 6, bits+47);
146
147	// add country code - OK
148	num_to_bytebitsLSBF(country >> 0, 2, bits+53);
149	num_to_bytebitsLSBF(country >> 2, 8, bits+56);
150
151	// add crc-16 - OK
152	uint8_t raw[8];
153	for (uint8_t i=0; i<8; ++i)
154	raw[i] = bytebits_to_byte(bits + 11 + i * 9, 8);
155
156	uint16_t crc = crc16_ccitt_kermit(raw, 8);
157	num_to_bytebitsLSBF(crc >> 0, 8, bits+83);
158	num_to_bytebitsLSBF(crc >> 8, 8, bits+92);
159
160	// extended data - OK
161	num_to_bytebitsLSBF( extended >> 0 , 8, bits+101);
162	num_to_bytebitsLSBF( extended >> 8 , 8, bits+110);
163	num_to_bytebitsLSBF( extended >> 16, 8, bits+119);
164
165	*/
166	return 1;
167	}
168
169	//see ASKDemod for what args are accepted
170	//almost the same demod as cmddata.c/CmdFDXBdemodBI
171	int CmdFdxDemod(const char *Cmd) {
172
173	//Differential Biphase / di-phase (inverted biphase)
174	//get binary from ask wave
175	if (!ASKbiphaseDemod("0 32 1 0", FALSE)) {
176	if (g_debugMode) PrintAndLog("DEBUG: Error - FDX-B ASKbiphaseDemod failed");
177	return 0;
178	}
179	size_t size = DemodBufferLen;
180	int ans = FDXBdemodBI(DemodBuffer, &size);
181	if (ans < 0){
182	if (g_debugMode){
183	if (ans == -1)
184	PrintAndLog("DEBUG: Error - FDX-B too few bits found");
185	else if (ans == -2)
186	PrintAndLog("DEBUG: Error - FDX-B preamble not found");
187	else if (ans == -3)
188	PrintAndLog("DEBUG: Error - FDX-B Size not correct: %d", size);
189	else
190	PrintAndLog("DEBUG: Error - FDX-B ans: %d", ans);
191	}
192	return 0;
193	}
194
195	setDemodBuf(DemodBuffer, 128, ans);
196	// remove marker bits (1's every 9th digit after preamble) (pType = 2)
197	size = removeParity(DemodBuffer, 11, 9, 2, 117);
198	if ( size != 104 ) {
199	if (g_debugMode) PrintAndLog("DEBUG: Error - FDX-B error removeParity: %d", size);
200	return 0;
201	}
202
203	//got a good demod
204	uint64_t NationalCode = ((uint64_t)(bytebits_to_byteLSBF(DemodBuffer+32,6)) << 32) \| bytebits_to_byteLSBF(DemodBuffer,32);
205	uint16_t countryCode = bytebits_to_byteLSBF(DemodBuffer+38,10);
206	uint8_t dataBlockBit = DemodBuffer[48];
207	uint32_t reservedCode = bytebits_to_byteLSBF(DemodBuffer+49,14);
208	uint8_t animalBit = DemodBuffer[63];
209	uint32_t crc16 = bytebits_to_byteLSBF(DemodBuffer+64,16);
210	uint32_t extended = bytebits_to_byteLSBF(DemodBuffer+80,24);
211	uint64_t rawid = ((uint64_t)
212	//bytebits_to_byte(DemodBuffer, 8) << 96) \|
213	//bytebits_to_byte(DemodBuffer,32) << 64) \|
214	bytebits_to_byte(DemodBuffer,32) << 32) \|
215	bytebits_to_byte(DemodBuffer+32, 32);
216	uint8_t raw[8];
217	num_to_bytes(rawid, 8, raw);
218
219	uint16_t calcCrc = crc16_ccitt_kermit(raw, 8);
220
221	PrintAndLog("\nFDX-B / ISO 11784/5 Animal Tag ID Found: Raw : %s", sprint_hex(raw, 8));
222	PrintAndLog("Animal ID %04u-%012llu", countryCode, NationalCode);
223	PrintAndLog("National Code %012llu (0x%llX)", NationalCode, NationalCode);
224	PrintAndLog("Country Code %04u", countryCode);
225	PrintAndLog("Reserved/RFU %u (0x04%X)", reservedCode, reservedCode);
226	PrintAndLog("");
227	PrintAndLog("Animal Tag %s", animalBit ? "True" : "False");
228	PrintAndLog("Has extended data %s [0x%X]", dataBlockBit ? "True" : "False", extended);
229	PrintAndLog("CRC-16 0x%04X - 0x%04X [%s]", crc16, calcCrc, (calcCrc == crc16) ? "Ok" : "Failed");
230
231	if (g_debugMode) {
232	PrintAndLog("Start marker %d; Size %d", ans, size);
233	char *bin = sprint_bin_break(DemodBuffer, size, 16);
234	PrintAndLog("DEBUG bin stream:\n%s", bin);
235	}
236	return 1;
237	}
238
239	int CmdFdxRead(const char *Cmd) {
240	CmdLFRead("s");
241	getSamples("12000", TRUE);
242	return CmdFdxDemod(Cmd);
243	}
244
245	int CmdFdxClone(const char *Cmd) {
246
247	uint32_t countryid = 0;
248	uint64_t animalid = 0;
249	uint32_t blocks[5] = {T55x7_MODULATION_DIPHASE \| T55x7_BITRATE_RF_32 \| 4<<T55x7_MAXBLOCK_SHIFT, 0, 0, 0, 0};
250	uint8_t bits[128];
251	uint8_t *bs = bits;
252	memset(bs, 0, sizeof(bits));
253
254	char cmdp = param_getchar(Cmd, 0);
255	if (strlen(Cmd) == 0 \|\| cmdp == 'h' \|\| cmdp == 'H') return usage_lf_fdx_clone();
256
257	countryid = param_get32ex(Cmd, 0, 0, 10);
258	animalid = param_get64ex(Cmd, 1, 0, 10);
259
260	//Q5
261	if (param_getchar(Cmd, 1) == 'Q' \|\| param_getchar(Cmd, 1) == 'q') {
262	//t5555 (Q5) BITRATE = (RF-2)/2 (iceman)
263	blocks[0] = T5555_MODULATION_BIPHASE \| T5555_INVERT_OUTPUT \| 32<<T5555_BITRATE_SHIFT \| 4<<T5555_MAXBLOCK_SHIFT;
264	}
265
266	verify_values(countryid, animalid);
267
268	// getFDXBits(uint64_t national_id, uint16_t country, uint8_t isanimal, uint8_t isextended, uint32_t extended, uint8_t *bits)
269	if ( !getFDXBits(animalid, countryid, 1, 0, 0, bs)) {
270	PrintAndLog("Error with tag bitstream generation.");
271	return 1;
272	}
273
274	// convert from bit stream to block data
275	blocks[1] = bytebits_to_byte(bs,32);
276	blocks[2] = bytebits_to_byte(bs+32,32);
277	blocks[3] = bytebits_to_byte(bs+64,32);
278	blocks[4] = bytebits_to_byte(bs+96,32);
279
280	PrintAndLog("Preparing to clone FDX-B to T55x7 with animal ID: %04u-%"PRIu64, countryid, animalid);
281	PrintAndLog("Blk \| Data ");
282	PrintAndLog("----+------------");
283	PrintAndLog(" 00 \| 0x%08x", blocks[0]);
284	PrintAndLog(" 01 \| 0x%08x", blocks[1]);
285	PrintAndLog(" 02 \| 0x%08x", blocks[2]);
286	PrintAndLog(" 03 \| 0x%08x", blocks[3]);
287	PrintAndLog(" 04 \| 0x%08x", blocks[4]);
288
289	UsbCommand resp;
290	UsbCommand c = {CMD_T55XX_WRITE_BLOCK, {0,0,0}};
291
292	for (int i = 4; i >= 0; --i) {
293	c.arg[0] = blocks[i];
294	c.arg[1] = i;
295	clearCommandBuffer();
296	SendCommand(&c);
297	if (!WaitForResponseTimeout(CMD_ACK, &resp, 1000)){
298	PrintAndLog("Error occurred, device did not respond during write operation.");
299	return -1;
300	}
301	}
302	return 0;
303	}
304
305	int CmdFdxSim(const char *Cmd) {
306	uint32_t countryid = 0;
307	uint64_t animalid = 0;
308
309	char cmdp = param_getchar(Cmd, 0);
310	if (strlen(Cmd) == 0 \|\| cmdp == 'h' \|\| cmdp == 'H') return usage_lf_fdx_sim();
311
312	countryid = param_get32ex(Cmd, 0, 0, 10);
313	animalid = param_get64ex(Cmd, 1, 0, 10);
314
315	verify_values(countryid, animalid);
316
317	uint8_t clk = 32, encoding = 2, separator = 0, invert = 1;
318	uint16_t arg1, arg2;
319	size_t size = 128;
320	arg1 = clk << 8 \| encoding;
321	arg2 = invert << 8 \| separator;
322
323	PrintAndLog("Simulating FDX-B animal ID: %04u-%"PRIu64, countryid, animalid);
324
325	UsbCommand c = {CMD_ASK_SIM_TAG, {arg1, arg2, size}};
326
327	//getFDXBits(uint64_t national_id, uint16_t country, uint8_t isanimal, uint8_t isextended, uint32_t extended, uint8_t *bits)
328	getFDXBits(animalid, countryid, 1, 0, 0, c.d.asBytes);
329	clearCommandBuffer();
330	SendCommand(&c);
331	return 0;
332	}
333
334	static command_t CommandTable[] = {
335	{"help", CmdHelp, 1, "This help"},
336	{"demod", CmdFdxDemod,1, "Attempt extract tag data from graphbuf"},
337	{"read", CmdFdxRead, 0, "Attempt to read and extract tag data"},
08439eea	338	{"clone", CmdFdxClone,0, "Clone animal ID tag to T55x7"},
08439eea	339	{"sim", CmdFdxSim, 0, "Animal ID tag simulator"},
c48211f7	340	{NULL, NULL, 0, NULL}
	341	};
	342
	343	int CmdLFFdx(const char *Cmd) {
	344	clearCommandBuffer();
	345	CmdsParse(CommandTable, Cmd);
	346	return 0;
	347	}
	348
	349	int CmdHelp(const char *Cmd) {
	350	CmdsHelp(CommandTable);
	351	return 0;
	352	}