maintain alphabetic order!

[proxmark3-svn] / winsrc / prox.cpp

#include <windows.h>\r
#include <setupapi.h>\r
#include <stdio.h>\r
#include <ctype.h>\r
#include <stdlib.h>\r
extern "C" {\r
#include "include/hidsdi.h"\r
#include "include/hidpi.h"\r
}\r
\r
#include "prox.h"\r
\r
#define OUR_VID 0x9ac4\r
#define OUR_PID 0x4b8f\r
\r
int offline = 0;\r
HANDLE UsbHandle;\r
\r
static void ShowError(void)\r
{\r
	char buf[1024];\r
	FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, NULL, GetLastError(), 0,\r
		buf, sizeof(buf), NULL);\r
	printf("ERROR: %s", buf);\r
}\r
\r
static BOOL UsbConnect(void)\r
{\r
	typedef void (__stdcall *GetGuidProc)(GUID *);\r
	typedef BOOLEAN (__stdcall *GetAttrProc)(HANDLE, HIDD_ATTRIBUTES *);\r
	typedef BOOLEAN (__stdcall *GetPreparsedProc)(HANDLE,\r
										PHIDP_PREPARSED_DATA *);\r
	typedef NTSTATUS (__stdcall *GetCapsProc)(PHIDP_PREPARSED_DATA, PHIDP_CAPS);\r
	GetGuidProc			getGuid;\r
	GetAttrProc			getAttr;\r
	GetPreparsedProc	getPreparsed;\r
	GetCapsProc			getCaps;\r
\r
	HMODULE h		= LoadLibrary("hid.dll");\r
	getGuid			= (GetGuidProc)GetProcAddress(h, "HidD_GetHidGuid");\r
	getAttr			= (GetAttrProc)GetProcAddress(h, "HidD_GetAttributes");\r
	getPreparsed	= (GetPreparsedProc)GetProcAddress(h, "HidD_GetPreparsedData");\r
	getCaps			= (GetCapsProc)GetProcAddress(h, "HidP_GetCaps");\r
\r
	GUID hidGuid;\r
	getGuid(&hidGuid);\r
\r
	HDEVINFO devInfo;\r
	devInfo = SetupDiGetClassDevs(&hidGuid, NULL, NULL,\r
		DIGCF_PRESENT | DIGCF_INTERFACEDEVICE);\r
\r
	SP_DEVICE_INTERFACE_DATA devInfoData;\r
	devInfoData.cbSize = sizeof(devInfoData);\r
\r
	int i;\r
	for(i = 0;; i++) {\r
		if(!SetupDiEnumDeviceInterfaces(devInfo, 0, &hidGuid, i, &devInfoData))\r
		{\r
			if(GetLastError() != ERROR_NO_MORE_ITEMS) {\r
//				printf("SetupDiEnumDeviceInterfaces failed\n");\r
			}\r
//			printf("done list\n");\r
			SetupDiDestroyDeviceInfoList(devInfo);\r
			return FALSE;\r
		}\r
\r
//		printf("item %d:\n", i);\r
\r
		DWORD sizeReqd = 0;\r
		if(!SetupDiGetDeviceInterfaceDetail(devInfo, &devInfoData,\r
			NULL, 0, &sizeReqd, NULL))\r
		{\r
			if(GetLastError() != ERROR_INSUFFICIENT_BUFFER) {\r
//				printf("SetupDiGetDeviceInterfaceDetail (0) failed\n");\r
				continue;\r
			}\r
		}\r
\r
		SP_DEVICE_INTERFACE_DETAIL_DATA *devInfoDetailData =\r
			(SP_DEVICE_INTERFACE_DETAIL_DATA *)malloc(sizeReqd);\r
		devInfoDetailData->cbSize = sizeof(*devInfoDetailData);\r
\r
		if(!SetupDiGetDeviceInterfaceDetail(devInfo, &devInfoData,\r
			devInfoDetailData, 87, NULL, NULL))\r
		{\r
//			printf("SetupDiGetDeviceInterfaceDetail (1) failed\n");\r
			continue;\r
		}\r
\r
		char *path = devInfoDetailData->DevicePath;\r
\r
		UsbHandle = CreateFile(path, /*GENERIC_READ |*/ GENERIC_WRITE,\r
			FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,\r
			FILE_FLAG_OVERLAPPED, NULL);\r
\r
		if(UsbHandle == INVALID_HANDLE_VALUE) {\r
			ShowError();\r
//			printf("CreateFile failed: for '%s'\n", path);\r
			continue;\r
		}\r
\r
		HIDD_ATTRIBUTES attr;\r
		attr.Size = sizeof(attr);\r
		if(!getAttr(UsbHandle, &attr)) {\r
			ShowError();\r
//			printf("HidD_GetAttributes failed\n");\r
			continue;\r
		}\r
\r
//		printf("VID: %04x PID %04x\n", attr.VendorID, attr.ProductID);\r
\r
		if(attr.VendorID != OUR_VID || attr.ProductID != OUR_PID) {\r
			CloseHandle(UsbHandle);\r
//			printf("	nope, not us\n");\r
			continue;\r
		}\r
\r
//		printf ("got it!\n");\r
		CloseHandle(UsbHandle);\r
\r
		UsbHandle = CreateFile(path, GENERIC_READ | GENERIC_WRITE,\r
			FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,\r
			FILE_FLAG_OVERLAPPED, NULL);\r
\r
		if(UsbHandle == INVALID_HANDLE_VALUE) {\r
			ShowError();\r
//			printf("Error, couldn't open our own handle as desired.\n");\r
			return FALSE;\r
		}\r
\r
		PHIDP_PREPARSED_DATA pp;\r
		getPreparsed(UsbHandle, &pp);\r
		HIDP_CAPS caps;\r
\r
		if(getCaps(pp, &caps) != HIDP_STATUS_SUCCESS) {\r
//			printf("getcaps failed\n");\r
			return FALSE;\r
		}\r
\r
//		printf("input/out report %d/%d\n", caps.InputReportByteLength,\r
//			caps.OutputReportByteLength);\r
\r
\r
		return TRUE;\r
	}\r
	return FALSE;\r
}\r
\r
BOOL ReceiveCommandPoll(UsbCommand *c)\r
{\r
	static BOOL ReadInProgress = FALSE;\r
	static OVERLAPPED Ov;\r
	static BYTE Buf[65];\r
	static DWORD HaveRead;\r
\r
	if(!ReadInProgress) {\r
		memset(&Ov, 0, sizeof(Ov));\r
		ReadFile(UsbHandle, Buf, 65, &HaveRead, &Ov);\r
		if(GetLastError() != ERROR_IO_PENDING) {\r
			ShowError();\r
			exit(-1);\r
		}\r
		ReadInProgress = TRUE;\r
	}\r
\r
	if(HasOverlappedIoCompleted(&Ov)) {\r
		ReadInProgress = FALSE;\r
\r
		if(!GetOverlappedResult(UsbHandle, &Ov, &HaveRead, FALSE)) {\r
			ShowError();\r
			exit(-1);\r
		}\r
\r
		memcpy(c, Buf+1, 64);\r
\r
		return TRUE;\r
	} else {\r
		return FALSE;\r
	}\r
}\r
\r
void ReceiveCommand(UsbCommand *c)\r
{\r
	while(!ReceiveCommandPoll(c)) {\r
		Sleep(0);\r
	}\r
}\r
\r
void SendCommand(UsbCommand *c, BOOL wantAck)\r
{\r
	BYTE buf[65];\r
	buf[0] = 0;\r
	memcpy(buf+1, c, 64);\r
\r
	DWORD written;\r
	OVERLAPPED ov;\r
\r
	memset(&ov, 0, sizeof(ov));\r
	WriteFile(UsbHandle, buf, 65, &written, &ov);\r
	if(GetLastError() != ERROR_IO_PENDING) {\r
		ShowError();\r
		exit(-1);\r
	}\r
\r
	while(!HasOverlappedIoCompleted(&ov)) {\r
		Sleep(0);\r
	}\r
\r
	if(!GetOverlappedResult(UsbHandle, &ov, &written, FALSE)) {\r
		ShowError();\r
		exit(-1);\r
	}\r
\r
	if(wantAck) {\r
		UsbCommand ack;\r
		ReceiveCommand(&ack);\r
		if(ack.cmd != CMD_ACK) {\r
			printf("bad ACK\n");\r
			exit(-1);\r
		}\r
	}\r
}\r
\r
static DWORD ExpectedAddr;\r
static BYTE QueuedToSend[256];\r
static BOOL AllWritten;\r
\r
static void FlushPrevious(void)\r
{\r
	UsbCommand c;\r
	memset(&c, 0, sizeof(c));\r
\r
	int i;\r
	for(i = 0; i < 240; i += 48) {\r
		c.cmd = CMD_SETUP_WRITE;\r
		memcpy(c.d.asBytes, QueuedToSend+i, 48);\r
		c.ext1 = (i/4);\r
		SendCommand(&c, TRUE);\r
	}\r
\r
	c.cmd = CMD_FINISH_WRITE;\r
	c.ext1 = (ExpectedAddr-1) & (~255);\r
	printf("Flashing address: %08x\r", c.ext1);\r
	memcpy(c.d.asBytes, QueuedToSend+240, 16);\r
	SendCommand(&c, TRUE);\r
\r
	AllWritten = TRUE;\r
}\r
\r
static void GotByte(DWORD where, BYTE which)\r
{\r
	AllWritten = FALSE;\r
\r
	if(where != ExpectedAddr) {\r
		printf("bad: got at %08x, expected at %08x\n", where, ExpectedAddr);\r
		exit(-1);\r
	}\r
	QueuedToSend[where & 255] = which;\r
	ExpectedAddr++;\r
\r
	if((where & 255) == 255) {\r
		// we have completed a full page\r
		FlushPrevious();\r
	}\r
}\r
\r
static int HexVal(int c)\r
{\r
	c = tolower(c);\r
	if(c >= '0' && c <= '9') {\r
		return c - '0';\r
	} else if(c >= 'a' && c <= 'f') {\r
		return (c - 'a') + 10;\r
	} else {\r
		printf("bad hex digit '%c'\n", c);\r
		exit(-1);\r
	}\r
}\r
\r
static BYTE HexByte(char *s)\r
{\r
	return (HexVal(s[0]) << 4) | HexVal(s[1]);\r
}\r
\r
static void LoadFlashFromSRecords(char *file, int addr)\r
{\r
	ExpectedAddr = addr;\r
\r
	FILE *f = fopen(file, "r");\r
	if(!f) {\r
		printf("couldn't open file\n");\r
		exit(-1);\r
	}\r
\r
	char line[512];\r
	while(fgets(line, sizeof(line), f)) {\r
		if(memcmp(line, "S3", 2)==0) {\r
			char *s = line + 2;\r
			int len = HexByte(s) - 5;\r
			s += 2;\r
\r
			char addrStr[9];\r
			memcpy(addrStr, s, 8);\r
			addrStr[8] = '\0';\r
			DWORD addr;\r
			sscanf(addrStr, "%x", &addr);\r
			s += 8;\r
\r
			int i;\r
			for(i = 0; i < len; i++) {\r
				while((addr+i) > ExpectedAddr) {\r
					GotByte(ExpectedAddr, 0xff);\r
				}\r
				GotByte(addr+i, HexByte(s));\r
				s += 2;\r
			}\r
		}\r
	}\r
\r
	if(!AllWritten) FlushPrevious();\r
\r
	fclose(f);\r
	printf("\ndone.\n");\r
}\r
\r
int main(int argc, char **argv)\r
{\r
	int i = 0;\r
	\r
	if(argc < 2) {\r
		printf("Usage: %s bootrom file.s19\n", argv[0]);\r
		printf("       %s load osimage.s19\n", argv[0]);\r
		printf("       %s fpga fpgaimg.s19\n", argv[0]);\r
		printf("       %s gui\n", argv[0]);\r
		printf("       %s offline\n", argv[0]);\r
		return -1;\r
	}\r
	\r
	// Only do this if NOT in offline mode\r
	if (strcmp(argv[1], "offline"))\r
	{\r
		for(;;) {\r
			if(UsbConnect()) {\r
				break;\r
			}\r
			if(i == 0) {\r
				printf("...no device connected, polling for it now\n");\r
			}\r
			if(i > 50000) {\r
				printf("Could not connect to USB device; exiting.\n");\r
				return -1;\r
			}\r
			i++;\r
			Sleep(5);\r
		}\r
	}\r
	\r
	if(strcmp(argv[1], "bootrom")==0 || strcmp(argv[1], "load")==0 || strcmp(argv[1], "fpga")==0) {\r
		if(argc != 3) {\r
			printf("Need filename.\n");\r
			return -1;\r
		}\r
		if(strcmp(argv[1], "bootrom")==0) {\r
			LoadFlashFromSRecords(argv[2], 0);\r
		} else if(strcmp(argv[1], "fpga")==0) {\r
			LoadFlashFromSRecords(argv[2], 0x2000);\r
		} else {\r
			LoadFlashFromSRecords(argv[2], 0x10000);\r
		}\r
	} else if(strcmp(argv[1], "gui")==0) {\r
		ShowGui();\r
	} else if(strcmp(argv[1], "offline")==0) {\r
		offline = 1;\r
		ShowGui();\r
	} else if(strcmp(argv[1], "cmd")==0) {\r
		if(argc != 3) {\r
			printf("Need command.\n");\r
			return -1;\r
		}\r
		ExecCmd(argv[2]);\r
	} else {\r
		printf("Command '%s' not recognized.\n", argv[1]);\r
		return -1;\r
	}\r
\r
	return 0;\r
}\r