[picodrive.git] / platform / win32 / GenaDrive / Main.cpp

#include "app.h"\r
#include "version.h"\r
#include <crtdbg.h>\r
#include <commdlg.h>\r
#include "../../common/readpng.h"\r
\r
char *romname=NULL;\r
HWND FrameWnd=NULL;\r
RECT FrameRectMy;\r
int lock_to_1_1 = 1;\r
static HWND PicoSwWnd=NULL, PicoPadWnd=NULL;\r
\r
int MainWidth=720,MainHeight=480;\r
\r
static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;\r
static int rom_loaded = 0;\r
static HBITMAP ppad_bmp = 0;\r
static HBITMAP ppage_bmps[6] = { 0, };\r
static char rom_name[0x20*3+1];\r
\r
static void UpdateRect()\r
{\r
  WINDOWINFO wi;\r
  memset(&wi, 0, sizeof(wi));\r
  wi.cbSize = sizeof(wi);\r
  GetWindowInfo(FrameWnd, &wi);\r
  FrameRectMy = wi.rcClient;\r
}\r
\r
static int extract_rom_name(char *dest, const unsigned char *src, int len)\r
{\r
	char *p = dest, s_old = 0;\r
	int i;\r
\r
	for (i = len - 1; i >= 0; i--)\r
	{\r
		if (src[i^1] != ' ') break;\r
	}\r
	len = i + 1;\r
\r
	for (i = 0; i < len; i++)\r
	{\r
		unsigned char s = src[i^1];\r
		if (s == 0x20 && s_old == 0x20) continue;\r
		else if (s >= 0x20 && s < 0x7f && s != '%')\r
		{\r
			*p++ = s;\r
		}\r
		else\r
		{\r
			sprintf(p, "%%%02x", s);\r
			p += 3;\r
		}\r
		s_old = s;\r
	}\r
	*p = 0;\r
\r
	return p - dest;\r
}\r
\r
\r
static HBITMAP png2hb(const char *fname, int is_480)\r
{\r
  BITMAPINFOHEADER bih;\r
  HBITMAP bmp;\r
  void *bmem;\r
  int ret;\r
\r
  bmem = calloc(1, is_480 ? 480*240*3 : 320*240*3);\r
  if (bmem == NULL) return NULL;\r
  ret = readpng(bmem, fname, is_480 ? READPNG_480_24 : READPNG_320_24);\r
  if (ret != 0) {\r
    free(bmem);\r
    return NULL;\r
  }\r
\r
  memset(&bih, 0, sizeof(bih));\r
  bih.biSize = sizeof(bih);\r
  bih.biWidth = is_480 ? 480 : 320;\r
  bih.biHeight = -240;\r
  bih.biPlanes = 1;\r
  bih.biBitCount = 24;\r
  bih.biCompression = BI_RGB;\r
  bmp = CreateDIBitmap(GetDC(FrameWnd), &bih, CBM_INIT, bmem, (BITMAPINFO *)&bih, 0);\r
  if (bmp == NULL)\r
    lprintf("CreateDIBitmap failed with %i", GetLastError());\r
\r
  free(bmem);\r
  return bmp;\r
}\r
\r
static void PrepareForROM(unsigned char *rom_data)\r
{\r
  int i, ret, show = PicoAHW & PAHW_PICO;\r
  EnableMenuItem(mmain, 2, MF_BYPOSITION|(show ? MF_ENABLED : MF_GRAYED));\r
  ShowWindow(PicoPadWnd, show ? SW_SHOWNA : SW_HIDE);\r
  ShowWindow(PicoSwWnd, show ? SW_SHOWNA : SW_HIDE);\r
  CheckMenuItem(mpicohw, 1210, show ? MF_CHECKED : MF_UNCHECKED);\r
  CheckMenuItem(mpicohw, 1211, show ? MF_CHECKED : MF_UNCHECKED);\r
  PostMessage(FrameWnd, WM_COMMAND, 1220 + PicoPicohw.page, 0);\r
  DrawMenuBar(FrameWnd);\r
  InvalidateRect(PicoSwWnd, NULL, 1);\r
\r
  PicoPicohw.pen_pos[0] =\r
  PicoPicohw.pen_pos[1] = 0x8000;\r
  picohw_pen_pressed = 0;\r
\r
  ret = extract_rom_name(rom_name, rom_data + 0x150, 0x20);\r
  if (ret == 0)\r
    extract_rom_name(rom_name, rom_data + 0x130, 0x20);\r
\r
  if (show)\r
  {\r
    char path[MAX_PATH], *p;\r
    GetModuleFileName(NULL, path, sizeof(path) - 32);\r
    p = strrchr(path, '\\');\r
    if (p == NULL) p = path;\r
    else p++;\r
    if (ppad_bmp == NULL) {\r
      strcpy(p, "pico\\pad.png");\r
      ppad_bmp = png2hb(path, 0);\r
    }\r
\r
    for (i = 0; i < 6; i++) {\r
      if (ppage_bmps[i] != NULL) DeleteObject(ppage_bmps[i]);\r
      sprintf(p, "pico\\%s_%i.png", rom_name, i);\r
      ppage_bmps[i] = png2hb(path, 1);\r
    }\r
  }\r
}\r
\r
static void LoadROM(const char *cmdpath)\r
{\r
  static char rompath[MAX_PATH] = { 0, };\r
  unsigned char *rom_data_new = NULL;\r
  unsigned int rom_size = 0;\r
  pm_file *rom = NULL;\r
  int oldwait=LoopWait;\r
  int i, ret;\r
\r
  if (cmdpath) {\r
    strcpy(rompath, cmdpath + (cmdpath[0] == '\"' ? 1 : 0));\r
    if (rompath[strlen(rompath)-1] == '\"') rompath[strlen(rompath)-1] = 0;\r
    if (strlen(rompath) > 4) rom = pm_open(rompath);\r
  }\r
\r
  if (!rom) {\r
    OPENFILENAME of; ZeroMemory(&of, sizeof(OPENFILENAME));\r
    of.lStructSize = sizeof(OPENFILENAME);\r
    of.lpstrFilter = "ROMs\0*.smd;*.bin;*.gen;*.zip\0";\r
    of.lpstrFile = rompath; rompath[0] = 0;\r
    of.nMaxFile = MAX_PATH;\r
    of.Flags = OFN_FILEMUSTEXIST|OFN_HIDEREADONLY;\r
    of.hwndOwner = FrameWnd;\r
    if (!GetOpenFileName(&of)) return;\r
    rom = pm_open(rompath);\r
    if (!rom) { error("failed to open ROM"); return; }\r
  }\r
\r
  ret=PicoCartLoad(rom, &rom_data_new, &rom_size);\r
  pm_close(rom);\r
  if (ret) {\r
    error("failed to load ROM");\r
    return;\r
  }\r
\r
  // halt the work thread..\r
  // just a hack, should've used proper sync. primitives here, but who will use this emu anyway..\r
  LoopWaiting=0;\r
  LoopWait=1;\r
  for (i = 0; LoopWaiting == 0 && i < 10; i++) Sleep(100);\r
\r
  PicoCartUnload();\r
  PicoCartInsert(rom_data_new, rom_size);\r
\r
  PrepareForROM(rom_data_new);\r
\r
  rom_loaded = 1;\r
  romname = rompath;\r
  LoopWait=0;\r
}\r
\r
static int rect_widths[4]  = { 320, 256, 640, 512 };\r
static int rect_heights[4] = { 224, 224, 448, 448 };\r
\r
// Window proc for the frame window:\r
static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
{\r
  POINT pt;\r
  RECT rc;\r
  int i;\r
  switch (msg)\r
  {\r
    case WM_CLOSE:   PostQuitMessage(0); return 0;\r
    case WM_DESTROY: FrameWnd=NULL; break; // Blank handle\r
    case WM_SIZE:\r
    case WM_MOVE:\r
    case WM_SIZING:  UpdateRect(); break;\r
    case WM_COMMAND:\r
      switch (LOWORD(wparam))\r
      {\r
        case 1000: LoadROM(NULL); break;\r
        case 1001: PicoReset(); return 0;\r
        case 1002: PostQuitMessage(0); return 0;\r
        case 1100:\r
        case 1101:\r
        case 1102:\r
        case 1103:\r
          LoopWait=1; // another sync hack\r
          for (i = 0; !LoopWaiting && i < 10; i++) Sleep(10);\r
          FrameRectMy.right  = FrameRectMy.left + rect_widths[wparam&3];\r
          FrameRectMy.bottom = FrameRectMy.top  + rect_heights[wparam&3];\r
          AdjustWindowRect(&FrameRectMy, WS_OVERLAPPEDWINDOW, 1);\r
          MoveWindow(hwnd, FrameRectMy.left, FrameRectMy.top,\r
            FrameRectMy.right-FrameRectMy.left, FrameRectMy.bottom-FrameRectMy.top, 1);\r
          UpdateRect();\r
          if (HIWORD(wparam) == 0) { // locally sent\r
            lock_to_1_1=0;\r
            CheckMenuItem(mdisplay, 1104, MF_UNCHECKED);\r
          }\r
          if (rom_loaded) LoopWait=0;\r
          return 0;\r
        case 1104:\r
          lock_to_1_1=!lock_to_1_1;\r
          CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);\r
          return 0;\r
        case 1210:\r
        case 1211:\r
          i = IsWindowVisible((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd);\r
          i = !i;\r
          ShowWindow((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd, i ? SW_SHOWNA : SW_HIDE);\r
          CheckMenuItem(mpicohw, LOWORD(wparam), i ? MF_CHECKED : MF_UNCHECKED);\r
          return 0;\r
        case 1220:\r
        case 1221:\r
        case 1222:\r
        case 1223:\r
        case 1224:\r
        case 1225:\r
        case 1226:\r
          PicoPicohw.page = LOWORD(wparam) % 10;\r
          for (i = 0; i < 7; i++)\r
            CheckMenuItem(mpicohw, 1220 + i, MF_UNCHECKED);\r
          CheckMenuItem(mpicohw, 1220 + PicoPicohw.page, MF_CHECKED);\r
          InvalidateRect(PicoSwWnd, NULL, 1);\r
          return 0;\r
        case 1300:\r
          MessageBox(FrameWnd, "PicoDrive v" VERSION " (c) notaz, 2006-2008\n"\r
              "SVP and Pico demo edition\n\n"\r
              "Credits:\n"\r
              "fDave: base code of PicoDrive, GenaDrive (the frontend)\n"\r
              "Chui: Fame/C\n"\r
              "NJ: CZ80\n"\r
              "MAME devs: YM2612 and SN76496 cores\n"\r
Commit	Line	Data
cc68a136	1	#include "app.h"\r
8831ef19	2	#include "version.h"\r
cc68a136	3	#include <crtdbg.h>\r
cc68a136	4	#include <commdlg.h>\r
8f7ed1b8	5	#include "../../common/readpng.h"\r
cc68a136	6	\r
1b0ac8ad	7	char *romname=NULL;\r
cc68a136	8	HWND FrameWnd=NULL;\r
03a265e5	9	RECT FrameRectMy;\r
1b0ac8ad	10	int lock_to_1_1 = 1;\r
67c81ee2	11	static HWND PicoSwWnd=NULL, PicoPadWnd=NULL;\r
cc68a136	12	\r
	13	int MainWidth=720,MainHeight=480;\r
	14	\r
42989e7d	15	static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;\r
eacee137	16	static int rom_loaded = 0;\r
8f7ed1b8	17	static HBITMAP ppad_bmp = 0;\r
	18	static HBITMAP ppage_bmps[6] = { 0, };\r
	19	static char rom_name[0x20*3+1];\r
1b0ac8ad	20	\r
	21	static void UpdateRect()\r
	22	{\r
	23	WINDOWINFO wi;\r
	24	memset(&wi, 0, sizeof(wi));\r
	25	wi.cbSize = sizeof(wi);\r
	26	GetWindowInfo(FrameWnd, &wi);\r
	27	FrameRectMy = wi.rcClient;\r
	28	}\r
	29	\r
8f7ed1b8	30	static int extract_rom_name(char dest, const unsigned char src, int len)\r
42989e7d	31	{\r
8f7ed1b8	32	char *p = dest, s_old = 0;\r
	33	int i;\r
	34	\r
	35	for (i = len - 1; i >= 0; i--)\r
	36	{\r
	37	if (src[i^1] != ' ') break;\r
	38	}\r
	39	len = i + 1;\r
	40	\r
	41	for (i = 0; i < len; i++)\r
	42	{\r
	43	unsigned char s = src[i^1];\r
	44	if (s == 0x20 && s_old == 0x20) continue;\r
	45	else if (s >= 0x20 && s < 0x7f && s != '%')\r
	46	{\r
	47	*p++ = s;\r
	48	}\r
	49	else\r
	50	{\r
	51	sprintf(p, "%%%02x", s);\r
	52	p += 3;\r
	53	}\r
	54	s_old = s;\r
	55	}\r
	56	*p = 0;\r
	57	\r
	58	return p - dest;\r
	59	}\r
	60	\r
	61	\r
	62	static HBITMAP png2hb(const char *fname, int is_480)\r
	63	{\r
	64	BITMAPINFOHEADER bih;\r
	65	HBITMAP bmp;\r
	66	void *bmem;\r
	67	int ret;\r
	68	\r
	69	bmem = calloc(1, is_480 ? 4802403 : 3202403);\r
	70	if (bmem == NULL) return NULL;\r
	71	ret = readpng(bmem, fname, is_480 ? READPNG_480_24 : READPNG_320_24);\r
	72	if (ret != 0) {\r
	73	free(bmem);\r
	74	return NULL;\r
	75	}\r
	76	\r
	77	memset(&bih, 0, sizeof(bih));\r
	78	bih.biSize = sizeof(bih);\r
	79	bih.biWidth = is_480 ? 480 : 320;\r
	80	bih.biHeight = -240;\r
	81	bih.biPlanes = 1;\r
	82	bih.biBitCount = 24;\r
	83	bih.biCompression = BI_RGB;\r
	84	bmp = CreateDIBitmap(GetDC(FrameWnd), &bih, CBM_INIT, bmem, (BITMAPINFO *)&bih, 0);\r
	85	if (bmp == NULL)\r
	86	lprintf("CreateDIBitmap failed with %i", GetLastError());\r
	87	\r
	88	free(bmem);\r
	89	return bmp;\r
	90	}\r
	91	\r
	92	static void PrepareForROM(unsigned char *rom_data)\r
	93	{\r
	94	int i, ret, show = PicoAHW & PAHW_PICO;\r
42989e7d	95	EnableMenuItem(mmain, 2, MF_BYPOSITION\|(show ? MF_ENABLED : MF_GRAYED));\r
	96	ShowWindow(PicoPadWnd, show ? SW_SHOWNA : SW_HIDE);\r
	97	ShowWindow(PicoSwWnd, show ? SW_SHOWNA : SW_HIDE);\r
	98	CheckMenuItem(mpicohw, 1210, show ? MF_CHECKED : MF_UNCHECKED);\r
	99	CheckMenuItem(mpicohw, 1211, show ? MF_CHECKED : MF_UNCHECKED);\r
	100	PostMessage(FrameWnd, WM_COMMAND, 1220 + PicoPicohw.page, 0);\r
	101	DrawMenuBar(FrameWnd);\r
8f7ed1b8	102	InvalidateRect(PicoSwWnd, NULL, 1);\r
42989e7d	103	\r
	104	PicoPicohw.pen_pos[0] =\r
	105	PicoPicohw.pen_pos[1] = 0x8000;\r
	106	picohw_pen_pressed = 0;\r
8f7ed1b8	107	\r
	108	ret = extract_rom_name(rom_name, rom_data + 0x150, 0x20);\r
	109	if (ret == 0)\r
	110	extract_rom_name(rom_name, rom_data + 0x130, 0x20);\r
	111	\r
	112	if (show)\r
	113	{\r
	114	char path[MAX_PATH], *p;\r
	115	GetModuleFileName(NULL, path, sizeof(path) - 32);\r
	116	p = strrchr(path, '\\');\r
	117	if (p == NULL) p = path;\r
	118	else p++;\r
	119	if (ppad_bmp == NULL) {\r
	120	strcpy(p, "pico\\pad.png");\r
	121	ppad_bmp = png2hb(path, 0);\r
	122	}\r
	123	\r
	124	for (i = 0; i < 6; i++) {\r
	125	if (ppage_bmps[i] != NULL) DeleteObject(ppage_bmps[i]);\r
	126	sprintf(p, "pico\\%s_%i.png", rom_name, i);\r
	127	ppage_bmps[i] = png2hb(path, 1);\r
	128	}\r
	129	}\r
42989e7d	130	}\r
42989e7d	131	\r
1b0ac8ad	132	static void LoadROM(const char *cmdpath)\r
	133	{\r
	134	static char rompath[MAX_PATH] = { 0, };\r
1b0ac8ad	135	unsigned char *rom_data_new = NULL;\r
	136	unsigned int rom_size = 0;\r
	137	pm_file *rom = NULL;\r
	138	int oldwait=LoopWait;\r
	139	int i, ret;\r
	140	\r
	141	if (cmdpath) {\r
	142	strcpy(rompath, cmdpath + (cmdpath[0] == '\"' ? 1 : 0));\r
	143	if (rompath[strlen(rompath)-1] == '\"') rompath[strlen(rompath)-1] = 0;\r
	144	if (strlen(rompath) > 4) rom = pm_open(rompath);\r
	145	}\r
	146	\r
	147	if (!rom) {\r
	148	OPENFILENAME of; ZeroMemory(&of, sizeof(OPENFILENAME));\r
	149	of.lStructSize = sizeof(OPENFILENAME);\r
	150	of.lpstrFilter = "ROMs\0.smd;.bin;.gen;.zip\0";\r
	151	of.lpstrFile = rompath; rompath[0] = 0;\r
	152	of.nMaxFile = MAX_PATH;\r
	153	of.Flags = OFN_FILEMUSTEXIST\|OFN_HIDEREADONLY;\r
	154	of.hwndOwner = FrameWnd;\r
	155	if (!GetOpenFileName(&of)) return;\r
	156	rom = pm_open(rompath);\r
	157	if (!rom) { error("failed to open ROM"); return; }\r
	158	}\r
	159	\r
	160	ret=PicoCartLoad(rom, &rom_data_new, &rom_size);\r
	161	pm_close(rom);\r
	162	if (ret) {\r
	163	error("failed to load ROM");\r
	164	return;\r
	165	}\r
	166	\r
	167	// halt the work thread..\r
	168	// just a hack, should've used proper sync. primitives here, but who will use this emu anyway..\r
	169	LoopWaiting=0;\r
	170	LoopWait=1;\r
	171	for (i = 0; LoopWaiting == 0 && i < 10; i++) Sleep(100);\r
	172	\r
67c81ee2	173	PicoCartUnload();\r
1b0ac8ad	174	PicoCartInsert(rom_data_new, rom_size);\r
1b0ac8ad	175	\r
8f7ed1b8	176	PrepareForROM(rom_data_new);\r
42989e7d	177	\r
eacee137	178	rom_loaded = 1;\r
1b0ac8ad	179	romname = rompath;\r
	180	LoopWait=0;\r
	181	}\r
	182	\r
	183	static int rect_widths[4] = { 320, 256, 640, 512 };\r
	184	static int rect_heights[4] = { 224, 224, 448, 448 };\r
	185	\r
cc68a136	186	// Window proc for the frame window:\r
	187	static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
	188	{\r
42989e7d	189	POINT pt;\r
42989e7d	190	RECT rc;\r
1b0ac8ad	191	int i;\r
03a265e5	192	switch (msg)\r
	193	{\r
	194	case WM_CLOSE: PostQuitMessage(0); return 0;\r
	195	case WM_DESTROY: FrameWnd=NULL; break; // Blank handle\r
	196	case WM_SIZE:\r
	197	case WM_MOVE:\r
1b0ac8ad	198	case WM_SIZING: UpdateRect(); break;\r
	199	case WM_COMMAND:\r
	200	switch (LOWORD(wparam))\r
	201	{\r
	202	case 1000: LoadROM(NULL); break;\r
67c81ee2	203	case 1001: PicoReset(); return 0;\r
67c81ee2	204	case 1002: PostQuitMessage(0); return 0;\r
1b0ac8ad	205	case 1100:\r
	206	case 1101:\r
	207	case 1102:\r
	208	case 1103:\r
	209	LoopWait=1; // another sync hack\r
	210	for (i = 0; !LoopWaiting && i < 10; i++) Sleep(10);\r
	211	FrameRectMy.right = FrameRectMy.left + rect_widths[wparam&3];\r
	212	FrameRectMy.bottom = FrameRectMy.top + rect_heights[wparam&3];\r
	213	AdjustWindowRect(&FrameRectMy, WS_OVERLAPPEDWINDOW, 1);\r
	214	MoveWindow(hwnd, FrameRectMy.left, FrameRectMy.top,\r
	215	FrameRectMy.right-FrameRectMy.left, FrameRectMy.bottom-FrameRectMy.top, 1);\r
	216	UpdateRect();\r
	217	if (HIWORD(wparam) == 0) { // locally sent\r
	218	lock_to_1_1=0;\r
	219	CheckMenuItem(mdisplay, 1104, MF_UNCHECKED);\r
	220	}\r
eacee137	221	if (rom_loaded) LoopWait=0;\r
1b0ac8ad	222	return 0;\r
	223	case 1104:\r
	224	lock_to_1_1=!lock_to_1_1;\r
	225	CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);\r
	226	return 0;\r
67c81ee2	227	case 1210:\r
	228	case 1211:\r
	229	i = IsWindowVisible((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd);\r
	230	i = !i;\r
	231	ShowWindow((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd, i ? SW_SHOWNA : SW_HIDE);\r
	232	CheckMenuItem(mpicohw, LOWORD(wparam), i ? MF_CHECKED : MF_UNCHECKED);\r
	233	return 0;\r
	234	case 1220:\r
	235	case 1221:\r
	236	case 1222:\r
	237	case 1223:\r
	238	case 1224:\r
	239	case 1225:\r
	240	case 1226:\r
	241	PicoPicohw.page = LOWORD(wparam) % 10;\r
	242	for (i = 0; i < 7; i++)\r
	243	CheckMenuItem(mpicohw, 1220 + i, MF_UNCHECKED);\r
	244	CheckMenuItem(mpicohw, 1220 + PicoPicohw.page, MF_CHECKED);\r
8f7ed1b8	245	InvalidateRect(PicoSwWnd, NULL, 1);\r
67c81ee2	246	return 0;\r
1b0ac8ad	247	case 1300:\r
1b0ac8ad	248	MessageBox(FrameWnd, "PicoDrive v" VERSION " (c) notaz, 2006-2008\n"\r
67c81ee2	249	"SVP and Pico demo edition\n\n"\r
1b0ac8ad	250	"Credits:\n"\r
	251	"fDave: base code of PicoDrive, GenaDrive (the frontend)\n"\r
	252	"Chui: Fame/C\n"\r
	253	"NJ: CZ80\n"\r
	254	"MAME devs: YM2612 and SN76496 cores\n"\r
	255