/*
* windows.c: Windows front end for my puzzle collection.
*/
+
+#include <windows.h>
+
+#include <stdio.h>
+#include <stdarg.h>
+#include <stdlib.h>
+#include <time.h>
+
+#include "puzzles.h"
+
+struct frontend {
+ midend_data *me;
+ HWND hwnd;
+ HBITMAP bitmap, prevbm;
+ HDC hdc_bm;
+ COLORREF *colours;
+ HBRUSH *brushes;
+ HPEN *pens;
+ UINT timer;
+};
+
+void fatal(char *fmt, ...)
+{
+ char buf[2048];
+ va_list ap;
+
+ va_start(ap, fmt);
+ vsprintf(buf, fmt, ap);
+ va_end(ap);
+
+ MessageBox(NULL, buf, "Fatal error", MB_ICONEXCLAMATION | MB_OK);
+
+ exit(1);
+}
+
+void frontend_default_colour(frontend *fe, float *output)
+{
+ DWORD c = GetSysColor(COLOR_MENU); /* ick */
+
+ output[0] = (float)(GetRValue(c) / 255.0);
+ output[1] = (float)(GetGValue(c) / 255.0);
+ output[2] = (float)(GetBValue(c) / 255.0);
+}
+
+void draw_rect(frontend *fe, int x, int y, int w, int h, int colour)
+{
+ HBRUSH oldbrush = SelectObject(fe->hdc_bm, fe->brushes[colour]);
+ HPEN oldpen = SelectObject(fe->hdc_bm, fe->pens[colour]);
+ Rectangle(fe->hdc_bm, x, y, x+w, y+h);
+ SelectObject(fe->hdc_bm, oldbrush);
+ SelectObject(fe->hdc_bm, oldpen);
+}
+
+void draw_line(frontend *fe, int x1, int y1, int x2, int y2, int colour)
+{
+ HPEN oldpen = SelectObject(fe->hdc_bm, fe->pens[colour]);
+ MoveToEx(fe->hdc_bm, x1, y1, NULL);
+ LineTo(fe->hdc_bm, x2, y2);
+ SetPixel(fe->hdc_bm, x2, y2, fe->colours[colour]);
+ SelectObject(fe->hdc_bm, oldpen);
+}
+
+void draw_polygon(frontend *fe, int *coords, int npoints,
+ int fill, int colour)
+{
+ POINT *pts = snewn(npoints+1, POINT);
+ int i;
+
+ for (i = 0; i <= npoints; i++) {
+ int j = (i < npoints ? i : 0);
+ pts[i].x = coords[j*2];
+ pts[i].y = coords[j*2+1];
+ }
+
+ if (fill) {
+ HBRUSH oldbrush = SelectObject(fe->hdc_bm, fe->brushes[colour]);
+ HPEN oldpen = SelectObject(fe->hdc_bm, fe->pens[colour]);
+ Polygon(fe->hdc_bm, pts, npoints);
+ SelectObject(fe->hdc_bm, oldbrush);
+ SelectObject(fe->hdc_bm, oldpen);
+ } else {
+ HPEN oldpen = SelectObject(fe->hdc_bm, fe->pens[colour]);
+ Polyline(fe->hdc_bm, pts, npoints+1);
+ SelectObject(fe->hdc_bm, oldpen);
+ }
+
+ sfree(pts);
+}
+
+void start_draw(frontend *fe)
+{
+ HDC hdc_win;
+ hdc_win = GetDC(fe->hwnd);
+ fe->hdc_bm = CreateCompatibleDC(hdc_win);
+ fe->prevbm = SelectObject(fe->hdc_bm, fe->bitmap);
+ ReleaseDC(fe->hwnd, hdc_win);
+}
+
+void draw_update(frontend *fe, int x, int y, int w, int h)
+{
+ RECT r;
+
+ r.left = x;
+ r.top = y;
+ r.right = x + w;
+ r.bottom = y + h;
+
+ InvalidateRect(fe->hwnd, &r, FALSE);
+}
+
+void end_draw(frontend *fe)
+{
+ SelectObject(fe->hdc_bm, fe->prevbm);
+ DeleteDC(fe->hdc_bm);
+}
+
+void deactivate_timer(frontend *fe)
+{
+ KillTimer(fe->hwnd, fe->timer);
+ fe->timer = 0;
+}
+
+void activate_timer(frontend *fe)
+{
+ fe->timer = SetTimer(fe->hwnd, fe->timer, 20, NULL);
+}
+
+static frontend *new_window(HINSTANCE inst)
+{
+ frontend *fe;
+ int x, y;
+ RECT r;
+ HDC hdc;
+
+ fe = snew(frontend);
+ fe->me = midend_new(fe);
+ midend_new_game(fe->me, NULL);
+ midend_size(fe->me, &x, &y);
+
+ fe->timer = 0;
+
+ {
+ int i, ncolours;
+ float *colours;
+
+ colours = midend_colours(fe->me, &ncolours);
+
+ fe->colours = snewn(ncolours, COLORREF);
+ fe->brushes = snewn(ncolours, HBRUSH);
+ fe->pens = snewn(ncolours, HPEN);
+
+ for (i = 0; i < ncolours; i++) {
+ fe->colours[i] = RGB(255 * colours[i*3+0],
+ 255 * colours[i*3+1],
+ 255 * colours[i*3+2]);
+ fe->brushes[i] = CreateSolidBrush(fe->colours[i]);
+ if (!fe->brushes[i])
+ MessageBox(fe->hwnd, "ooh", "eck", MB_OK);
+ fe->pens[i] = CreatePen(PS_SOLID, 1, fe->colours[i]);
+ }
+ }
+
+ r.left = r.top = 0;
+ r.right = x;
+ r.bottom = y;
+ AdjustWindowRectEx(&r, WS_OVERLAPPEDWINDOW &~
+ (WS_THICKFRAME | WS_MAXIMIZEBOX | WS_OVERLAPPED),
+ FALSE, 0);
+
+ fe->hwnd = CreateWindowEx(0, "puzzle", "puzzle",
+ WS_OVERLAPPEDWINDOW &~
+ (WS_THICKFRAME | WS_MAXIMIZEBOX),
+ CW_USEDEFAULT, CW_USEDEFAULT,
+ r.right - r.left, r.bottom - r.top,
+ NULL, NULL, inst, NULL);
+
+ hdc = GetDC(fe->hwnd);
+ fe->bitmap = CreateCompatibleBitmap(hdc, x, y);
+ ReleaseDC(fe->hwnd, hdc);
+
+ SetWindowLong(fe->hwnd, GWL_USERDATA, (LONG)fe);
+
+ ShowWindow(fe->hwnd, SW_NORMAL);
+ SetForegroundWindow(fe->hwnd);
+
+ midend_redraw(fe->me);
+
+ return fe;
+}
+
+static LRESULT CALLBACK WndProc(HWND hwnd, UINT message,
+ WPARAM wParam, LPARAM lParam)
+{
+ frontend *fe = (frontend *)GetWindowLong(hwnd, GWL_USERDATA);
+
+ switch (message) {
+ case WM_CLOSE:
+ DestroyWindow(hwnd);
+ return 0;
+ case WM_DESTROY:
+ PostQuitMessage(0);
+ return 0;
+ case WM_PAINT:
+ {
+ PAINTSTRUCT p;
+ HDC hdc, hdc2;
+ HBITMAP prevbm;
+
+ hdc = BeginPaint(hwnd, &p);
+ hdc2 = CreateCompatibleDC(hdc);
+ prevbm = SelectObject(hdc2, fe->bitmap);
+ BitBlt(hdc,
+ p.rcPaint.left, p.rcPaint.top,
+ p.rcPaint.right - p.rcPaint.left,
+ p.rcPaint.bottom - p.rcPaint.top,
+ hdc2,
+ p.rcPaint.left, p.rcPaint.top,
+ SRCCOPY);
+ SelectObject(hdc2, prevbm);
+ DeleteDC(hdc2);
+ EndPaint(hwnd, &p);
+ }
+ return 0;
+ case WM_KEYDOWN:
+ {
+ int key = -1;
+
+ switch (wParam) {
+ case VK_LEFT: key = CURSOR_LEFT; break;
+ case VK_RIGHT: key = CURSOR_RIGHT; break;
+ case VK_UP: key = CURSOR_UP; break;
+ case VK_DOWN: key = CURSOR_DOWN; break;
+ }
+
+ if (key != -1) {
+ if (!midend_process_key(fe->me, -1, -1, key))
+ PostQuitMessage(0);
+ }
+ }
+ break;
+ case WM_LBUTTONDOWN:
+ case WM_RBUTTONDOWN:
+ case WM_MBUTTONDOWN:
+ if (!midend_process_key(fe->me, LOWORD(lParam), HIWORD(lParam),
+ (message == WM_LBUTTONDOWN ? LEFT_BUTTON :
+ message == WM_RBUTTONDOWN ? RIGHT_BUTTON :
+ MIDDLE_BUTTON)))
+ PostQuitMessage(0);
+
+ break;
+ case WM_CHAR:
+ if (!midend_process_key(fe->me, -1, -1, (unsigned char)wParam))
+ PostQuitMessage(0);
+ return 0;
+ case WM_TIMER:
+ if (fe->timer)
+ midend_timer(fe->me, (float)0.02);
+ return 0;
+ }
+
+ return DefWindowProc(hwnd, message, wParam, lParam);
+}
+
+int WINAPI WinMain(HINSTANCE inst, HINSTANCE prev, LPSTR cmdline, int show)
+{
+ MSG msg;
+
+ srand(time(NULL));
+
+ if (!prev) {
+ WNDCLASS wndclass;
+
+ wndclass.style = 0;
+ wndclass.lpfnWndProc = WndProc;
+ wndclass.cbClsExtra = 0;
+ wndclass.cbWndExtra = 0;
+ wndclass.hInstance = inst;
+ wndclass.hIcon = LoadIcon(inst, IDI_APPLICATION);
+ wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
+ wndclass.hbrBackground = NULL;
+ wndclass.lpszMenuName = NULL;
+ wndclass.lpszClassName = "puzzle";
+
+ RegisterClass(&wndclass);
+ }
+
+ new_window(inst);
+
+ while (GetMessage(&msg, NULL, 0, 0)) {
+ TranslateMessage(&msg);
+ DispatchMessage(&msg);
+ }
+
+ return msg.wParam;
+}
~ian / sgt-puzzles.git / commitdiff