bugfix for SIMPLE_WRITE_SOUND

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

#include "app.h"\r
#include "version.h"\r
#include <crtdbg.h>\r
#include <commdlg.h>\r
\r
char *romname;\r
HWND FrameWnd=NULL;\r
RECT FrameRectMy;\r
\r
int MainWidth=720,MainHeight=480;\r
\r
// Window proc for the frame window:\r
static LRESULT CALLBACK WndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam)\r
{\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:  GetWindowRect(hwnd, &FrameRectMy); break;\r
  }\r
\r
  return DefWindowProc(hwnd,msg,wparam,lparam);\r
}\r
\r
static int FrameInit()\r
{\r
  WNDCLASS wc;\r
  RECT rect={0,0,0,0};\r
  int style=0;\r
  int left=0,top=0,width=0,height=0;\r
\r
  memset(&wc,0,sizeof(wc));\r
\r
  // Register the window class:\r
  wc.lpfnWndProc=WndProc;\r
  wc.hInstance=GetModuleHandle(NULL);\r
  wc.hCursor=LoadCursor(NULL,IDC_ARROW);\r
  wc.hbrBackground=CreateSolidBrush(0);\r
  wc.lpszClassName="MainFrame";\r
  RegisterClass(&wc);\r
\r
  rect.right =320;//MainWidth;\r
  rect.bottom=224;//MainHeight;\r
\r
  // Adjust size of windows based on borders:\r
  style=WS_OVERLAPPEDWINDOW;\r
  AdjustWindowRect(&rect,style,0);\r
  width =rect.right-rect.left;\r
  height=rect.bottom-rect.top;\r
\r
  // Place window in the centre of the screen:\r
  SystemParametersInfo(SPI_GETWORKAREA,0,&rect,0);\r
  left=rect.left+rect.right;\r
  top=rect.top+rect.bottom;\r
\r
  left-=width; left>>=1;\r
  top-=height; top>>=1;\r
\r
  // Create the window:\r
  FrameWnd=CreateWindow(wc.lpszClassName,"PicoDrive " VERSION,style|WS_VISIBLE,\r
    left,top,width,height,NULL,NULL,NULL,NULL);\r
\r
  ShowWindow(FrameWnd, SW_NORMAL);\r
  UpdateWindow(FrameWnd);\r
  GetWindowRect(FrameWnd, &FrameRectMy);\r
\r
  return 0;\r
}\r
\r
// --------------------\r
\r
static DWORD WINAPI ThreadCode(void *)\r
{\r
  LoopCode();\r
  return 0;\r
}\r
\r
int WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR cmdline,int)\r
{\r
  MSG msg;\r
  int ret=0;\r
  DWORD tid=0;\r
  HANDLE thread=NULL;\r
  unsigned char *rom_data = 0;\r
  unsigned int rom_size = 0;\r
\r
  static char rompath[MAX_PATH] = { 0, };\r
  pm_file *rom = NULL;\r
\r
  FrameInit();\r
  ret=LoopInit(); if (ret) goto end0;\r
\r
  // notaz: load rom\r
  strcpy(rompath, cmdline + (cmdline[0] == '\"' ? 1 : 0));\r
  if(rompath[strlen(rompath)-1] == '\"') rompath[strlen(rompath)-1] = 0;\r
\r
  if(strlen(rompath) > 4) rom = pm_open(rompath);\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
    if(!GetOpenFileName(&of)) goto end0;\r
    rom = pm_open(rompath);\r
    if(!rom) goto end0;\r
  }\r
  romname = rompath;\r
\r
  ret=PicoCartLoad(rom, &rom_data, &rom_size);\r
  pm_close(rom);\r
  if (ret) {\r
    error("failed to load ROM");\r
    goto end0;\r
  }\r
\r
  PicoCartInsert(rom_data, rom_size);\r
\r
  // only now we got the mode (pal/ntsc), so init sound now\r
  ret=DSoundInit();\r
  if (ret) error("Failed to init DirectSound"); // warning\r
\r
  // Make another thread to run LoopCode():\r
  LoopQuit=0;\r
  thread=CreateThread(NULL,0,ThreadCode,NULL,0,&tid);\r
\r
  // Main window loop:\r
  for (;;)\r
  {\r
    GetMessage(&msg,NULL,0,0);\r
    if (msg.message==WM_QUIT) break;\r
\r
    TranslateMessage(&msg);\r
    DispatchMessage(&msg);\r
  }\r
\r
  // Signal thread to quit and wait for it to exit:\r
  LoopQuit=1; WaitForSingleObject(thread,5000);\r
  CloseHandle(thread); thread=NULL;\r
\r
end0:\r
  LoopExit();\r
  DestroyWindow(FrameWnd);\r
\r
  free(rom_data);\r
\r
  _CrtDumpMemoryLeaks();\r
  return 0;\r
}\r
\r
extern void error(char *text)\r
{\r
  MessageBox(FrameWnd, text, "Error", 0);\r
}\r
\r