| 1 | #include "app.h"\r |
| 2 | #include "version.h"\r |
| 3 | #include <crtdbg.h>\r |
| 4 | #include <commdlg.h>\r |
| 5 | #include "../../common/readpng.h"\r |
| 6 | \r |
| 7 | char *romname=NULL;\r |
| 8 | HWND FrameWnd=NULL;\r |
| 9 | RECT FrameRectMy;\r |
| 10 | int lock_to_1_1 = 1;\r |
| 11 | static HWND PicoSwWnd=NULL, PicoPadWnd=NULL;\r |
| 12 | \r |
| 13 | int MainWidth=720,MainHeight=480;\r |
| 14 | \r |
| 15 | static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;\r |
| 16 | static int rom_loaded = 0;\r |
| 17 | static HBITMAP ppad_bmp = 0;\r |
| 18 | static HBITMAP ppage_bmps[6] = { 0, };\r |
| 19 | static char rom_name[0x20*3+1];\r |
| 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 |
| 30 | static int extract_rom_name(char *dest, const unsigned char *src, int len)\r |
| 31 | {\r |
| 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 ? 480*240*3 : 320*240*3);\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 |
| 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 |
| 102 | InvalidateRect(PicoSwWnd, NULL, 1);\r |
| 103 | \r |
| 104 | PicoPicohw.pen_pos[0] =\r |
| 105 | PicoPicohw.pen_pos[1] = 0x8000;\r |
| 106 | picohw_pen_pressed = 0;\r |
| 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 |
| 130 | }\r |
| 131 | \r |
| 132 | static void LoadROM(const char *cmdpath)\r |
| 133 | {\r |
| 134 | static char rompath[MAX_PATH] = { 0, };\r |
| 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 |
| 173 | PicoCartUnload();\r |
| 174 | PicoCartInsert(rom_data_new, rom_size);\r |
| 175 | \r |
| 176 | PrepareForROM(rom_data_new);\r |
| 177 | \r |
| 178 | rom_loaded = 1;\r |
| 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 |
| 186 | // Window proc for the frame window:\r |
| 187 | static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r |
| 188 | {\r |
| 189 | POINT pt;\r |
| 190 | RECT rc;\r |
| 191 | int i;\r |
| 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 |
| 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 |
| 203 | case 1001: PicoReset(); return 0;\r |
| 204 | case 1002: PostQuitMessage(0); return 0;\r |
| 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 |
| 221 | if (rom_loaded) LoopWait=0;\r |
| 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 |
| 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 |
| 245 | InvalidateRect(PicoSwWnd, NULL, 1);\r |
| 246 | return 0;\r |
| 247 | case 1300:\r |
| 248 | MessageBox(FrameWnd, "PicoDrive v" VERSION " (c) notaz, 2006-2008\n"\r |
| 249 | "SVP and Pico demo edition\n\n"\r |
| 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 |