3 This file is part of libmspgbase
4 Copyright © 2007-2008 Mikko Rasa, Mikkosoft Productions
5 Distributed under the LGPL
10 #include <X11/Xatom.h>
11 #include <X11/Xutil.h>
15 #include <msp/core/application.h>
16 #include <msp/core/except.h>
19 #include "display_priv.h"
26 LRESULT CALLBACK wndproc_(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam)
30 CREATESTRUCT *cs=reinterpret_cast<CREATESTRUCT *>(lparam);
31 SetWindowLong(hwnd, 0, reinterpret_cast<LONG>(cs->lpCreateParams));
35 Msp::Graphics::Window *wnd=reinterpret_cast<Msp::Graphics::Window *>(GetWindowLong(hwnd, 0));
36 Msp::Graphics::Window::Event ev;
40 if(wnd && wnd->event(ev))
44 return DefWindowProc(hwnd, msg, wparam, lparam);
47 Bool match_event_type(Display *, XEvent *event, XPointer arg)
49 return event->type==reinterpret_cast<int>(arg);
58 WindowOptions::WindowOptions():
66 Window::Window(Display &dpy, unsigned w, unsigned h, bool fs):
71 options.fullscreen=fs;
76 Window::Window(Display &dpy, const WindowOptions &opts):
90 static bool wndclass_created=false;
96 wndcl.cbSize=sizeof(WNDCLASSEX);
98 wndcl.lpfnWndProc=&wndproc_;
100 wndcl.cbWndExtra=sizeof(Window *);
101 wndcl.hInstance=reinterpret_cast<HINSTANCE>(Application::get_data());
103 wndcl.hCursor=LoadCursor(0, IDC_ARROW);
104 wndcl.hbrBackground=0;
105 wndcl.lpszMenuName=0;
106 wndcl.lpszClassName="mspgbase";
109 if(!RegisterClassEx(&wndcl))
110 throw Exception("Couldn't register window class");
112 wndclass_created=true;
116 SetRect(&rect, 0, 0, options.width, options.height);
118 int style=(options.fullscreen ? WS_POPUP : WS_OVERLAPPEDWINDOW);
119 if(!options.resizable)
120 style&=~WS_THICKFRAME;
121 int exstyle=(options.fullscreen ? WS_EX_APPWINDOW : WS_EX_OVERLAPPEDWINDOW);
122 AdjustWindowRectEx(&rect, style, false, exstyle);
124 priv->window=CreateWindowEx(exstyle,
128 CW_USEDEFAULT, CW_USEDEFAULT,
129 rect.right-rect.left, rect.bottom-rect.top,
132 reinterpret_cast<HINSTANCE>(Application::get_data()),
135 throw Exception("CreateWindowEx failed");
138 ::Display *dpy=display.get_private().display;
140 priv->wm_delete_window=XInternAtom(dpy, "WM_DELETE_WINDOW", true);
141 priv->invisible_cursor=0;
143 XSetWindowAttributes attr;
144 attr.override_redirect=options.fullscreen;
145 attr.event_mask=ButtonPressMask|ButtonReleaseMask|PointerMotionMask|KeyPressMask|KeyReleaseMask|StructureNotifyMask|EnterWindowMask;
147 priv->window=XCreateWindow(dpy,
148 DefaultRootWindow(dpy),
150 options.width, options.height,
155 CWOverrideRedirect|CWEventMask, &attr);
157 XSetWMProtocols(dpy, priv->window, &priv->wm_delete_window, 1);
159 if(!options.resizable)
162 hints.flags=PMinSize|PMaxSize;
163 hints.min_width=hints.max_width=options.width;
164 hints.min_height=hints.max_height=options.height;
165 XSetWMNormalHints(dpy, priv->window, &hints);
170 display.add_window(*this);
171 display.check_error();
178 CloseWindow(priv->window);
180 XDestroyWindow(display.get_private().display, priv->window);
182 if(priv->invisible_cursor)
183 XFreeCursor(display.get_private().display, priv->invisible_cursor);
186 display.remove_window(*this);
188 if(options.fullscreen)
189 display.restore_mode();
194 void Window::set_title(const string &title)
197 SetWindowText(priv->window, title.c_str());
199 vector<unsigned char> buf(title.begin(), title.end());
202 prop.encoding=XA_STRING;
204 prop.nitems=title.size();
205 XSetWMName(display.get_private().display, priv->window, &prop);
206 display.check_error();
210 void Window::reconfigure(const WindowOptions &opts)
212 bool fullscreen_changed=(opts.fullscreen!=options.fullscreen);
218 SetRect(&rect, 0, 0, options.width, options.height);
220 int style=(options.fullscreen ? WS_POPUP : WS_OVERLAPPEDWINDOW);
221 if(!options.resizable)
222 style&=~WS_THICKFRAME;
223 int exstyle=(options.fullscreen ? WS_EX_APPWINDOW : WS_EX_OVERLAPPEDWINDOW);
224 AdjustWindowRectEx(&rect, style, false, exstyle);
226 if(fullscreen_changed)
229 SetWindowLong(priv->window, GWL_EXSTYLE, exstyle);
230 SetWindowLong(priv->window, GWL_STYLE, style);
234 if(options.fullscreen)
235 SetWindowPos(priv->window, 0, 0, 0, rect.right-rect.left, rect.bottom-rect.top, SWP_NOZORDER);
237 SetWindowPos(priv->window, 0, 0, 0, rect.right-rect.left, rect.bottom-rect.top, SWP_NOMOVE|SWP_NOZORDER);
239 ::Display *dpy=display.get_private().display;
241 if(fullscreen_changed)
243 bool was_visible=visible;
249 // Wait for the window to be unmapped. This makes window managers happy.
251 XPeekIfEvent(dpy, &ev, match_event_type, reinterpret_cast<XPointer>(UnmapNotify));
254 XSetWindowAttributes attr;
255 attr.override_redirect=options.fullscreen;
256 XChangeWindowAttributes(dpy, priv->window, CWOverrideRedirect, &attr);
263 if(options.resizable)
267 hints.flags=PMinSize|PMaxSize;
268 hints.min_width=hints.max_width=options.width;
269 hints.min_height=hints.max_height=options.height;
271 XSetWMNormalHints(dpy, priv->window, &hints);
273 if(options.fullscreen)
274 XMoveResizeWindow(dpy, priv->window, 0, 0, options.width, options.height);
276 XResizeWindow(dpy, priv->window, options.width, options.height);
281 if(options.fullscreen)
282 display.set_mode(VideoMode(options.width, options.height));
283 else if(fullscreen_changed)
284 display.restore_mode();
288 void Window::set_keyboard_autorepeat(bool r)
293 void Window::show_cursor(bool s)
298 ::Display *dpy=display.get_private().display;
301 XUndefineCursor(dpy, priv->window);
304 if(!priv->invisible_cursor)
306 int screen=DefaultScreen(dpy);
308 Pixmap pm=XCreatePixmap(dpy, priv->window, 1, 1, 1);
309 GC gc=XCreateGC(dpy, pm, 0, 0);
310 XSetFunction(dpy, gc, GXclear);
311 XDrawPoint(dpy, pm, gc, 0, 0);
315 black.pixel=BlackPixel(dpy, screen);
316 XQueryColor(dpy, DefaultColormap(dpy, screen), &black);
318 priv->invisible_cursor=XCreatePixmapCursor(dpy, pm, pm, &black, &black, 0, 0);
320 XFreePixmap(dpy, pm);
322 XDefineCursor(dpy, priv->window, priv->invisible_cursor);
327 void Window::warp_pointer(int x, int y)
330 XWarpPointer(display.get_private().display, None, priv->window, 0, 0, 0, 0, x, y);
340 ShowWindow(priv->window, SW_SHOWNORMAL);
342 XMapRaised(display.get_private().display, priv->window);
346 if(options.fullscreen)
348 display.set_mode(VideoMode(options.width, options.height));
350 XWarpPointer(display.get_private().display, None, priv->window, 0, 0, 0, 0, options.width/2, options.height/2);
358 ShowWindow(priv->window, SW_HIDE);
360 XUnmapWindow(display.get_private().display, priv->window);
364 if(options.fullscreen)
365 display.restore_mode();
368 bool Window::event(const Event &evnt)
371 WPARAM wp=evnt.wparam;
372 LPARAM lp=evnt.lparam;
376 signal_key_press.emit(wp, 0, wp);
379 signal_key_release.emit(wp, 0);
382 signal_button_press.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), 1, 0);
385 signal_button_release.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), 1, 0);
388 signal_button_press.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), 2, 0);
391 signal_button_release.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), 2, 0);
394 signal_button_press.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), 3, 0);
397 signal_button_release.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), 3, 0);
401 unsigned btn = (HIWORD(wp)&0x8000) ? 5 : 4;
402 signal_button_press.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), btn, 0);
403 signal_button_release.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp), btn, 0);
407 signal_pointer_motion.emit(GET_X_LPARAM(lp), GET_Y_LPARAM(lp));
410 options.width=LOWORD(lp);
411 options.height=HIWORD(lp);
412 signal_resize.emit(options.width, options.height);
421 const XEvent &ev=evnt.xevent;
425 signal_button_press.emit(ev.xbutton.x, ev.xbutton.y, ev.xbutton.button, ev.xbutton.state);
428 signal_button_release.emit(ev.xbutton.x, ev.xbutton.y, ev.xbutton.button, ev.xbutton.state);
431 signal_pointer_motion.emit(ev.xmotion.x, ev.xmotion.y);
436 XLookupString(const_cast<XKeyEvent *>(&ev.xkey), buf, sizeof(buf), 0, 0);
437 // XXX Handle the result according to locale
438 signal_key_press.emit(XKeycodeToKeysym(display.get_private().display, ev.xkey.keycode, 0), ev.xkey.state, buf[0]);
442 signal_key_release.emit(XKeycodeToKeysym(display.get_private().display, ev.xkey.keycode, 0), ev.xkey.state);
444 case ConfigureNotify:
445 options.width=ev.xconfigure.width;
446 options.height=ev.xconfigure.height;
447 signal_resize.emit(options.width, options.height);
450 if(ev.xclient.data.l[0]==static_cast<long>(priv->wm_delete_window))
454 if(options.fullscreen)
455 XSetInputFocus(display.get_private().display, priv->window, RevertToParent, CurrentTime);
458 if(options.fullscreen)
459 XGrabPointer(display.get_private().display, priv->window, true, None, GrabModeAsync, GrabModeAsync, priv->window, None, CurrentTime);
468 } // namespace Graphics