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 |
8 | char *romname=NULL;\r |
cc68a136 |
9 | HWND FrameWnd=NULL;\r |
03a265e5 |
10 | RECT FrameRectMy;\r |
1b0ac8ad |
11 | int lock_to_1_1 = 1;\r |
67c81ee2 |
12 | static HWND PicoSwWnd=NULL, PicoPadWnd=NULL;\r |
cc68a136 |
13 | \r |
14 | int MainWidth=720,MainHeight=480;\r |
15 | \r |
42989e7d |
16 | static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;\r |
eacee137 |
17 | static int rom_loaded = 0;\r |
8f7ed1b8 |
18 | static HBITMAP ppad_bmp = 0;\r |
2cb51c3c |
19 | static HBITMAP ppage_bmps[7] = { 0, };\r |
8f7ed1b8 |
20 | static char rom_name[0x20*3+1];\r |
4609d0cd |
21 | static int main_wnd_as_pad = 0;\r |
1b0ac8ad |
22 | \r |
23 | static 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 |
32 | static 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 |
63 | static 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 |
87 | static 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 |
117 | static 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 |
168 | static 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 |
219 | static int rect_widths[4] = { 320, 256, 640, 512 };\r |
220 | static int rect_heights[4] = { 224, 224, 448, 448 };\r |
221 | \r |
cc68a136 |
222 | // Window proc for the frame window:\r |
223 | static 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 |