X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=platform%2Fwin32%2FGenaDrive%2FMain.cpp;h=b54c8e4f1115b563ab9bb4a26296fb4b76aa5b40;hb=582890c000105f81c34c88d18924f7a3dc3b66b2;hp=f5f41cc3c66c7750a04459050148f1a7122ddab1;hpb=03a265e5ebabff7adbb4f97387f81e9b0428dbee;p=picodrive.git

diff --git a/platform/win32/GenaDrive/Main.cpp b/platform/win32/GenaDrive/Main.cpp
index f5f41cc..b54c8e4 100644
--- a/platform/win32/GenaDrive/Main.cpp
+++ b/platform/win32/GenaDrive/Main.cpp
@@ -2,32 +2,379 @@
 #include "version.h"
 #include <crtdbg.h>
 #include <commdlg.h>
+#include "../../common/readpng.h"
 
-char *romname;
+char *romname=NULL;
 HWND FrameWnd=NULL;
 RECT FrameRectMy;
+int lock_to_1_1 = 1;
+static HWND PicoSwWnd=NULL, PicoPadWnd=NULL;
 
 int MainWidth=720,MainHeight=480;
 
+static HMENU mmain = 0, mdisplay = 0, mpicohw = 0;
+static int rom_loaded = 0;
+static HBITMAP ppad_bmp = 0;
+static HBITMAP ppage_bmps[7] = { 0, };
+static char rom_name[0x20*3+1];
+
+static void UpdateRect()
+{
+  WINDOWINFO wi;
+  memset(&wi, 0, sizeof(wi));
+  wi.cbSize = sizeof(wi);
+  GetWindowInfo(FrameWnd, &wi);
+  FrameRectMy = wi.rcClient;
+}
+
+static int extract_rom_name(char *dest, const unsigned char *src, int len)
+{
+	char *p = dest, s_old = 0;
+	int i;
+
+	for (i = len - 1; i >= 0; i--)
+	{
+		if (src[i^1] != ' ') break;
+	}
+	len = i + 1;
+
+	for (i = 0; i < len; i++)
+	{
+		unsigned char s = src[i^1];
+		if (s == 0x20 && s_old == 0x20) continue;
+		else if (s >= 0x20 && s < 0x7f && s != '%')
+		{
+			*p++ = s;
+		}
+		else
+		{
+			sprintf(p, "%%%02x", s);
+			p += 3;
+		}
+		s_old = s;
+	}
+	*p = 0;
+
+	return p - dest;
+}
+
+
+static HBITMAP png2hb(const char *fname, int is_480)
+{
+  BITMAPINFOHEADER bih;
+  HBITMAP bmp;
+  void *bmem;
+  int ret;
+
+  bmem = calloc(1, is_480 ? 480*240*3 : 320*240*3);
+  if (bmem == NULL) return NULL;
+  ret = readpng(bmem, fname, is_480 ? READPNG_480_24 : READPNG_320_24);
+  if (ret != 0) {
+    free(bmem);
+    return NULL;
+  }
+
+  memset(&bih, 0, sizeof(bih));
+  bih.biSize = sizeof(bih);
+  bih.biWidth = is_480 ? 480 : 320;
+  bih.biHeight = -240;
+  bih.biPlanes = 1;
+  bih.biBitCount = 24;
+  bih.biCompression = BI_RGB;
+  bmp = CreateDIBitmap(GetDC(FrameWnd), &bih, CBM_INIT, bmem, (BITMAPINFO *)&bih, 0);
+  if (bmp == NULL)
+    lprintf("CreateDIBitmap failed with %i", GetLastError());
+
+  free(bmem);
+  return bmp;
+}
+
+static void PrepareForROM(unsigned char *rom_data)
+{
+  int i, ret, show = PicoAHW & PAHW_PICO;
+  EnableMenuItem(mmain, 2, MF_BYPOSITION|(show ? MF_ENABLED : MF_GRAYED));
+  ShowWindow(PicoPadWnd, show ? SW_SHOWNA : SW_HIDE);
+  ShowWindow(PicoSwWnd, show ? SW_SHOWNA : SW_HIDE);
+  CheckMenuItem(mpicohw, 1210, show ? MF_CHECKED : MF_UNCHECKED);
+  CheckMenuItem(mpicohw, 1211, show ? MF_CHECKED : MF_UNCHECKED);
+  PostMessage(FrameWnd, WM_COMMAND, 1220 + PicoPicohw.page, 0);
+  DrawMenuBar(FrameWnd);
+  InvalidateRect(PicoSwWnd, NULL, 1);
+
+  PicoPicohw.pen_pos[0] =
+  PicoPicohw.pen_pos[1] = 0x8000;
+  PicoPadAdd = 0;
+
+  ret = extract_rom_name(rom_name, rom_data + 0x150, 0x20);
+  if (ret == 0)
+    extract_rom_name(rom_name, rom_data + 0x130, 0x20);
+
+  if (show)
+  {
+    char path[MAX_PATH], *p;
+    GetModuleFileName(NULL, path, sizeof(path) - 32);
+    p = strrchr(path, '\\');
+    if (p == NULL) p = path;
+    else p++;
+    if (ppad_bmp == NULL) {
+      strcpy(p, "pico\\pad.png");
+      ppad_bmp = png2hb(path, 0);
+    }
+
+    for (i = 0; i < 7; i++) {
+      if (ppage_bmps[i] != NULL) DeleteObject(ppage_bmps[i]);
+      sprintf(p, "pico\\%s_%i.png", rom_name, i);
+      ppage_bmps[i] = png2hb(path, 1);
+    }
+  }
+}
+
+static void LoadROM(const char *cmdpath)
+{
+  static char rompath[MAX_PATH] = { 0, };
+  unsigned char *rom_data_new = NULL;
+  unsigned int rom_size = 0;
+  pm_file *rom = NULL;
+  int oldwait=LoopWait;
+  int i, ret;
+
+  if (cmdpath) {
+    strcpy(rompath, cmdpath + (cmdpath[0] == '\"' ? 1 : 0));
+    if (rompath[strlen(rompath)-1] == '\"') rompath[strlen(rompath)-1] = 0;
+    if (strlen(rompath) > 4) rom = pm_open(rompath);
+  }
+
+  if (!rom) {
+    OPENFILENAME of; ZeroMemory(&of, sizeof(OPENFILENAME));
+    of.lStructSize = sizeof(OPENFILENAME);
+    of.lpstrFilter = "ROMs\0*.smd;*.bin;*.gen;*.zip\0";
+    of.lpstrFile = rompath; rompath[0] = 0;
+    of.nMaxFile = MAX_PATH;
+    of.Flags = OFN_FILEMUSTEXIST|OFN_HIDEREADONLY;
+    of.hwndOwner = FrameWnd;
+    if (!GetOpenFileName(&of)) return;
+    rom = pm_open(rompath);
+    if (!rom) { error("failed to open ROM"); return; }
+  }
+
+  ret=PicoCartLoad(rom, &rom_data_new, &rom_size);
+  pm_close(rom);
+  if (ret) {
+    error("failed to load ROM");
+    return;
+  }
+
+  // halt the work thread..
+  // just a hack, should've used proper sync. primitives here, but who will use this emu anyway..
+  LoopWaiting=0;
+  LoopWait=1;
+  for (i = 0; LoopWaiting == 0 && i < 10; i++) Sleep(100);
+
+  PicoCartUnload();
+  PicoCartInsert(rom_data_new, rom_size);
+
+  PrepareForROM(rom_data_new);
+
+  rom_loaded = 1;
+  romname = rompath;
+  LoopWait=0;
+}
+
+static int rect_widths[4]  = { 320, 256, 640, 512 };
+static int rect_heights[4] = { 224, 224, 448, 448 };
+
 // Window proc for the frame window:
 static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
 {
+  POINT pt;
+  RECT rc;
+  int i;
   switch (msg)
   {
     case WM_CLOSE:   PostQuitMessage(0); return 0;
     case WM_DESTROY: FrameWnd=NULL; break; // Blank handle
     case WM_SIZE:
     case WM_MOVE:
-    case WM_SIZING:  GetWindowRect(hwnd, &FrameRectMy); break;
+    case WM_SIZING:  UpdateRect(); break;
+    case WM_COMMAND:
+      switch (LOWORD(wparam))
+      {
+        case 1000: LoadROM(NULL); break;
+        case 1001: PicoReset(); return 0;
+        case 1002: PostQuitMessage(0); return 0;
+        case 1100:
+        case 1101:
+        case 1102:
+        case 1103:
+          LoopWait=1; // another sync hack
+          for (i = 0; !LoopWaiting && i < 10; i++) Sleep(10);
+          FrameRectMy.right  = FrameRectMy.left + rect_widths[wparam&3];
+          FrameRectMy.bottom = FrameRectMy.top  + rect_heights[wparam&3];
+          AdjustWindowRect(&FrameRectMy, WS_OVERLAPPEDWINDOW, 1);
+          MoveWindow(hwnd, FrameRectMy.left, FrameRectMy.top,
+            FrameRectMy.right-FrameRectMy.left, FrameRectMy.bottom-FrameRectMy.top, 1);
+          UpdateRect();
+          if (HIWORD(wparam) == 0) { // locally sent
+            lock_to_1_1=0;
+            CheckMenuItem(mdisplay, 1104, MF_UNCHECKED);
+          }
+          if (rom_loaded) LoopWait=0;
+          return 0;
+        case 1104:
+          lock_to_1_1=!lock_to_1_1;
+          CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);
+          return 0;
+        case 1210:
+        case 1211:
+          i = IsWindowVisible((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd);
+          i = !i;
+          ShowWindow((LOWORD(wparam)&1) ? PicoPadWnd : PicoSwWnd, i ? SW_SHOWNA : SW_HIDE);
+          CheckMenuItem(mpicohw, LOWORD(wparam), i ? MF_CHECKED : MF_UNCHECKED);
+          return 0;
+        case 1220:
+        case 1221:
+        case 1222:
+        case 1223:
+        case 1224:
+        case 1225:
+        case 1226:
+          PicoPicohw.page = LOWORD(wparam) % 10;
+          for (i = 0; i < 7; i++)
+            CheckMenuItem(mpicohw, 1220 + i, MF_UNCHECKED);
+          CheckMenuItem(mpicohw, 1220 + PicoPicohw.page, MF_CHECKED);
+          InvalidateRect(PicoSwWnd, NULL, 1);
+          return 0;
+        case 1300:
+          MessageBox(FrameWnd, "PicoDrive v" VERSION " (c) notaz, 2006-2008\n"
+              "SVP and Pico demo edition\n\n"
+              "Credits:\n"
+              "fDave: base code of PicoDrive, GenaDrive (the frontend)\n"
+              "Chui: Fame/C\n"
+              "NJ: CZ80\n"
+              "MAME devs: YM2612 and SN76496 cores\n"
+              "Stéphane Dallongeville: Gens code, base of Fame/C (C68K), CZ80\n"
+              "Tasco Deluxe: SVP RE work\n"
+              "Pierpaolo Prazzoli: info about SSP16 chips\n",
+              "About", 0);
+          return 0;
+      }
+      break;
+    case WM_TIMER:
+      GetCursorPos(&pt);
+      GetWindowRect(PicoSwWnd, &rc);
+      if (PtInRect(&rc, pt)) break;
+      GetWindowRect(PicoPadWnd, &rc);
+      if (PtInRect(&rc, pt)) break;
+      PicoPicohw.pen_pos[0] |= 0x8000;
+      PicoPicohw.pen_pos[1] |= 0x8000;
+      PicoPadAdd = 0;
+      break;
+  }
+
+  return DefWindowProc(hwnd,msg,wparam,lparam);
+}
+
+static void key_down(WPARAM key)
+{
+  switch (key) {
+    case VK_LEFT:  PicoPadAdd |=    4; break;
+    case VK_RIGHT: PicoPadAdd |=    8; break;
+    case VK_UP:    PicoPadAdd |=    1; break;
+    case VK_DOWN:  PicoPadAdd |=    2; break;
+    case 'X':      PicoPadAdd |= 0x10; break;
+  }
+}
+
+static void key_up(WPARAM key)
+{
+  switch (key) {
+    case VK_LEFT:  PicoPadAdd &= ~0x04; break;
+    case VK_RIGHT: PicoPadAdd &= ~0x08; break;
+    case VK_UP:    PicoPadAdd &= ~0x01; break;
+    case VK_DOWN:  PicoPadAdd &= ~0x02; break;
+    case 'X':      PicoPadAdd &= ~0x10; break;
+  }
+}
+
+static LRESULT CALLBACK PicoSwWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
+{
+  PAINTSTRUCT ps;
+  HDC hdc, hdc2;
+
+  switch (msg)
+  {
+    case WM_DESTROY: PicoSwWnd=NULL; break;
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;
+    case WM_MOUSEMOVE:
+      if (HIWORD(lparam) < 0x20) break;
+      PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam) * 2/3;
+      PicoPicohw.pen_pos[1] = 0x2f8 + HIWORD(lparam) - 0x20;
+      SetTimer(FrameWnd, 100, 1000, NULL);
+      break;
+    case WM_KEYDOWN: key_down(wparam); break;
+    case WM_KEYUP:   key_up(wparam);   break;
+    case WM_PAINT:
+      hdc = BeginPaint(hwnd, &ps);
+      if (ppage_bmps[PicoPicohw.page] == NULL)
+      {
+        SelectObject(hdc, GetStockObject(DEFAULT_GUI_FONT));
+	SetTextColor(hdc, RGB(255, 255, 255));
+	SetBkColor(hdc, RGB(0, 0, 0));
+        TextOut(hdc, 2,  2, "missing PNGs for", 16);
+        TextOut(hdc, 2, 18, rom_name, strlen(rom_name));
+      }
+      else
+      {
+        hdc2 = CreateCompatibleDC(GetDC(FrameWnd));
+        SelectObject(hdc2, ppage_bmps[PicoPicohw.page]);
+        BitBlt(hdc, 0, 0, 480, 240, hdc2, 0, 0, SRCCOPY);
+        DeleteDC(hdc2);
+      }
+      EndPaint(hwnd, &ps);
+      return 0;
   }
 
   return DefWindowProc(hwnd,msg,wparam,lparam);
 }
 
+static LRESULT CALLBACK PicoPadWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)
+{
+  PAINTSTRUCT ps;
+  HDC hdc, hdc2;
+
+  switch (msg)
+  {
+    case WM_DESTROY: PicoPadWnd=NULL; break;
+    case WM_LBUTTONDOWN: PicoPadAdd |=  0x20; return 0;
+    case WM_LBUTTONUP:   PicoPadAdd &= ~0x20; return 0;
+    case WM_MOUSEMOVE:
+      PicoPicohw.pen_pos[0] = 0x03c + LOWORD(lparam);
+      PicoPicohw.pen_pos[1] = 0x1fc + HIWORD(lparam);
+      SetTimer(FrameWnd, 100, 1000, NULL);
+      break;
+    case WM_KEYDOWN: key_down(wparam); break;
+    case WM_KEYUP:   key_up(wparam);   break;
+    case WM_PAINT:
+      if (ppad_bmp == NULL) break;
+      hdc = BeginPaint(hwnd, &ps);
+      hdc2 = CreateCompatibleDC(GetDC(FrameWnd));
+      SelectObject(hdc2, ppad_bmp);
+      BitBlt(hdc, 0, 0, 320, 240, hdc2, 0, 0, SRCCOPY);
+      EndPaint(hwnd, &ps);
+      DeleteDC(hdc2);
+      return 0;
+  }
+
+  return DefWindowProc(hwnd,msg,wparam,lparam);
+}
+
+
 static int FrameInit()
 {
   WNDCLASS wc;
   RECT rect={0,0,0,0};
+  HMENU mfile;
   int style=0;
   int left=0,top=0,width=0,height=0;
 
@@ -38,7 +385,15 @@ static int FrameInit()
   wc.hInstance=GetModuleHandle(NULL);
   wc.hCursor=LoadCursor(NULL,IDC_ARROW);
   wc.hbrBackground=CreateSolidBrush(0);
-  wc.lpszClassName="MainFrame";
+  wc.lpszClassName="PicoMainFrame";
+  RegisterClass(&wc);
+
+  wc.lpszClassName="PicoSwWnd";
+  wc.lpfnWndProc=PicoSwWndProc;
+  RegisterClass(&wc);
+
+  wc.lpszClassName="PicoPadWnd";
+  wc.lpfnWndProc=PicoPadWndProc;
   RegisterClass(&wc);
 
   rect.right =320;//MainWidth;
@@ -46,7 +401,7 @@ static int FrameInit()
 
   // Adjust size of windows based on borders:
   style=WS_OVERLAPPEDWINDOW;
-  AdjustWindowRect(&rect,style,0);
+  AdjustWindowRect(&rect,style,1);
   width =rect.right-rect.left;
   height=rect.bottom-rect.top;
 
@@ -58,13 +413,62 @@ static int FrameInit()
   left-=width; left>>=1;
   top-=height; top>>=1;
 
+  // Create menu:
+  mfile = CreateMenu();
+  InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1000, "&Load ROM");
+  InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1001, "&Reset");
+  InsertMenu(mfile, -1, MF_BYPOSITION|MF_STRING, 1002, "E&xit");
+  mdisplay = CreateMenu();
+  InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1100, "320x224");
+  InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1101, "256x224");
+  InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1102, "640x448");
+  InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1103, "512x448");
+  InsertMenu(mdisplay, -1, MF_BYPOSITION|MF_STRING, 1104, "Lock to 1:1");
+  mpicohw = CreateMenu();
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1210, "Show &Storyware");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1211, "Show &Drawing pad");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_SEPARATOR, 0, NULL);
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1220, "Title page (&0)");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1221, "Page &1");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1222, "Page &2");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1223, "Page &3");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1224, "Page &4");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1225, "Page &5");
+  InsertMenu(mpicohw, -1, MF_BYPOSITION|MF_STRING, 1226, "Page &6");
+  mmain = CreateMenu();
+  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mfile,    "&File");
+  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mdisplay, "&Display");
+  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, (UINT_PTR) mpicohw,  "&Pico");
+  EnableMenuItem(mmain, 2, MF_BYPOSITION|MF_GRAYED);
+//  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING|MF_POPUP, 1200, "&Config");
+  InsertMenu(mmain, -1, MF_BYPOSITION|MF_STRING, 1300, "&About");
+
   // Create the window:
-  FrameWnd=CreateWindow(wc.lpszClassName,"PicoDrive " VERSION,style|WS_VISIBLE,
-    left,top,width,height,NULL,NULL,NULL,NULL);
+  FrameWnd=CreateWindow("PicoMainFrame","PicoDrive " VERSION,style|WS_VISIBLE,
+    left,top,width,height,NULL,mmain,NULL,NULL);
 
+  CheckMenuItem(mdisplay, 1104, lock_to_1_1 ? MF_CHECKED : MF_UNCHECKED);
   ShowWindow(FrameWnd, SW_NORMAL);
   UpdateWindow(FrameWnd);
-  GetWindowRect(FrameWnd, &FrameRectMy);
+  UpdateRect();
+
+  // create Pico windows
+  style = WS_OVERLAPPED|WS_CAPTION|WS_BORDER;
+  rect.left=rect.top=0;
+  rect.right =320;
+  rect.bottom=224;
+
+  AdjustWindowRect(&rect,style,1);
+  width =rect.right-rect.left;
+  height=rect.bottom-rect.top;
+
+  left += 326;
+  PicoSwWnd=CreateWindow("PicoSwWnd","Storyware",style,
+    left,top,width+160,height,FrameWnd,NULL,NULL,NULL);
+
+  top += 266;
+  PicoPadWnd=CreateWindow("PicoPadWnd","Drawing Pad",style,
+    left,top,width,height,FrameWnd,NULL,NULL,NULL);
 
   return 0;
 }
@@ -83,50 +487,17 @@ int WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR cmdline,int)
   int ret=0;
   DWORD tid=0;
   HANDLE thread=NULL;
-  unsigned char *rom_data = 0;
-  unsigned int rom_size = 0;
-
-  static char rompath[MAX_PATH] = { 0, };
-  pm_file *rom = NULL;
 
   FrameInit();
   ret=LoopInit(); if (ret) goto end0;
 
-  // notaz: load rom
-  strcpy(rompath, cmdline + (cmdline[0] == '\"' ? 1 : 0));
-  if(rompath[strlen(rompath)-1] == '\"') rompath[strlen(rompath)-1] = 0;
-
-  if(strlen(rompath) > 4) rom = pm_open(rompath);
-  if(!rom) {
-    OPENFILENAME of; ZeroMemory(&of, sizeof(OPENFILENAME));
-    of.lStructSize = sizeof(OPENFILENAME);
-    of.lpstrFilter = "ROMs\0*.smd;*.bin;*.gen;*.zip\0";
-    of.lpstrFile = rompath; rompath[0] = 0;
-    of.nMaxFile = MAX_PATH;
-    of.Flags = OFN_FILEMUSTEXIST|OFN_HIDEREADONLY;
-    if(!GetOpenFileName(&of)) goto end0;
-    rom = pm_open(rompath);
-    if(!rom) goto end0;
-  }
-  romname = rompath;
-
-  ret=PicoCartLoad(rom, &rom_data, &rom_size);
-  pm_close(rom);
-  if (ret) {
-    error("failed to load ROM");
-    goto end0;
-  }
-
-  PicoCartInsert(rom_data, rom_size);
-
-  // only now we got the mode (pal/ntsc), so init sound now
-  ret=DSoundInit();
-  if (ret) error("Failed to init DirectSound"); // warning
-
   // Make another thread to run LoopCode():
   LoopQuit=0;
+  LoopWait=1; // wait for ROM to be loaded
   thread=CreateThread(NULL,0,ThreadCode,NULL,0,&tid);
 
+  LoadROM(cmdline);
+
   // Main window loop:
   for (;;)
   {
@@ -145,8 +516,6 @@ end0:
   LoopExit();
   DestroyWindow(FrameWnd);
 
-  free(rom_data);
-
   _CrtDumpMemoryLeaks();
   return 0;
 }