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