source: Daodan/src/Patches/Win32.c@ 1045

Last change on this file since 1045 was 1000, checked in by alloc, 11 years ago

Daodan 3.7
File size: 4.6 KB
Line 
1#include <windows.h>
2
3#include "../Daodan.h"
4#include "../Daodan_Config.h"
5#include "Win32.h"
6
7#include "../Oni/Oni.h"
8
9
10// LIrPlatform_Terminate wrapper. Removes any cursor clipping we've done. Doing
11// this is required for Windows 98 :-D
12void ONICALL DD_LIrPlatform_Terminate(void)
13{
14 ClipCursor(NULL);
15 LIrPlatform_Terminate();
16}
17
18// LIrPlatform_Mode_Set wrapper. Clips cursor to window bounds to
19// prevent loosing focus (mostly on Linux).
20void ONICALL DD_LIrPlatform_Mode_Set(unsigned int active_mode)
21{
22 DDmAssert(ONgPlatformData.Window);
23
24 if (active_mode)
25 {
26 RECT rc;
27 POINT pt;
28
29 pt.x = 0;
30 pt.y = 0;
31
32 if (GetClientRect(ONgPlatformData.Window, &rc) &&
33 ClientToScreen(ONgPlatformData.Window, &pt))
34 {
35 rc.left += pt.x;
36 rc.top += pt.y;
37 rc.right += pt.x;
38 rc.bottom += pt.y;
39
40 ClipCursor(&rc);
41 }
42 }
43 else
44 {
45 ClipCursor(NULL);
46 }
47
48 LIrPlatform_Mode_Set(active_mode);
49}
50
51BOOL WINAPI DD_GetCursorPos(LPPOINT lpPoint)
52{
53 DDmAssert(ONgPlatformData.Window);
54
55 return GetCursorPos(lpPoint) && ScreenToClient(ONgPlatformData.Window, lpPoint);
56}
57
58BOOL WINAPI DD_SetCursorPos(int X, int Y)
59{
60 POINT pt;
61 pt.x = X;
62 pt.y = Y;
63
64 DDmAssert(ONgPlatformData.Window);
65
66 return ClientToScreen(ONgPlatformData.Window, &pt) && SetCursorPos(pt.x, pt.y);
67}
68
69static LRESULT CALLBACK DD_ONrPlatform_WindowProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
70{
71 switch (uMsg)
72 {
73 case WM_SYSCOMMAND:
74 if (wParam == SC_SCREENSAVE)
75 {
76 // Prevent screen saver from starting when Oni has focus.
77 return 0;
78 }
79 break;
80
81 case WM_PAINT:
82 {
83 PAINTSTRUCT ps;
84 BeginPaint(hWnd, &ps);
85 // Oni does a useless PatBlt here.
86 EndPaint(hWnd, &ps);
87 return 0;
88 }
89
90 case WM_CLOSE:
91 // There's no way to reliably terminate a modal dialog.
92 // The following condition is (almost) always true.
93 if (WMgActive)
94 exit(0);
95
96 ONgTerminateGame = UUcTrue;
97 return 0;
98
99 case WM_SETCURSOR:
100 // If a mouse is inside our client area, we hide cursor (always),
101 // otherwise we ask DefWindowProc to set an appropriate arrow for us.
102 if (LOWORD(lParam) == HTCLIENT)
103 {
104 SetCursor(NULL);
105 return TRUE;
106 }
107
108 break;
109 }
110
111 return ONrPlatform_WindowProc(hWnd, uMsg, wParam, lParam);
112}
113
114
115UUtError ONICALL DD_ONrPlatform_Initialize(ONtPlatformData *PlatformData)
116{
117 WNDCLASSEX WndClass;
118 RECT Rect;
119 const int Width = 640, Height = 480;
120 DWORD window_style, window_style_ex;
121
122 PlatformData->Instance = ONgInstance;
123 PlatformData->Window = NULL;
124
125 if (FindWindow("ONI ", "ONI "))
126 {
127 AUrMessageBox(1, "Daodan: There is already an instance of the game running.");
128 exit(0);
129 }
130
131 WndClass.cbSize = sizeof(WndClass);
132 WndClass.style = CS_VREDRAW | CS_HREDRAW | CS_OWNDC;
133 WndClass.cbClsExtra = 0;
134 WndClass.cbWndExtra = 0;
135 WndClass.hInstance = PlatformData->Instance;
136 WndClass.hCursor = NULL; // To debug: LoadCursor(NULL, IDC_ARROW);
137 WndClass.hIcon = LoadIcon(ONgInstance, MAKEINTRESOURCE(103));
138 WndClass.hIconSm = LoadIcon(ONgInstance, MAKEINTRESOURCE(103));
139 WndClass.hbrBackground = GetStockObject(BLACK_BRUSH);
140 WndClass.lpszMenuName = NULL;
141 WndClass.lpszMenuName = NULL;
142 WndClass.lpszClassName = "ONI ";
143 WndClass.lpfnWndProc = DD_ONrPlatform_WindowProc;
144
145 RegisterClassEx(&WndClass);
146
147 if (M3gResolutionSwitch)
148 {
149 // Do not allow border and topmost flag for a fullscreen window.
150 window_style = WS_POPUP;
151 window_style_ex = 0;
152 }
153 else
154 {
155 ConfigOption_t* co = DDrConfig_GetOptOfType("windows.border", C_BOOL);
156 int opt_border = 0;
157 if (co && co->value.intBoolVal)
158 opt_border = 1;
159 co = DDrConfig_GetOptOfType("windows.topmost", C_BOOL);
160 int opt_topmost = 0;
161 if (co && co->value.intBoolVal)
162 opt_topmost = 1;
163
164 window_style = (opt_border) ? WS_OVERLAPPED | WS_CAPTION | WS_SYSMENU | WS_DLGFRAME | WS_MINIMIZEBOX : WS_POPUP;
165 window_style_ex = (opt_topmost) ? WS_EX_TOPMOST : 0;
166 }
167
168 Rect.left = (GetSystemMetrics(SM_CXSCREEN) / 2) - (Width / 2);
169 Rect.top = (GetSystemMetrics(SM_CYSCREEN) / 2) - (Height / 2);
170 Rect.right = Rect.left + Width;
171 Rect.bottom = Rect.top + Height;
172 AdjustWindowRectEx(&Rect, window_style, FALSE, window_style_ex);
173
174 PlatformData->Window = CreateWindowEx(window_style_ex, WndClass.lpszClassName, "ONI ", window_style,
175 Rect.left, Rect.top, Rect.right - Rect.left, Rect.bottom - Rect.top,
176 NULL, NULL, PlatformData->Instance, NULL);
177
178 ShowWindow(PlatformData->Window, SW_SHOWNORMAL);
179 UpdateWindow(PlatformData->Window);
180
181 return UUcError_None;
182 }
183
Note: See TracBrowser for help on using the repository browser.