ui/win32/window.c

Tue, 06 May 2025 15:24:39 +0200

author
Olaf Wintermann <olaf.wintermann@gmail.com>
date
Tue, 06 May 2025 15:24:39 +0200
changeset 589
4d86050ad6ff
child 627
3f0c9fe60c68
permissions
-rw-r--r--

add incomplete ui_window implementation (WIN32)

589
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
1 /*
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
3 *
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
4 * Copyright 2024 Olaf Wintermann. All rights reserved.
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
5 *
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
6 * Redistribution and use in source and binary forms, with or without
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
7 * modification, are permitted provided that the following conditions are met:
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
8 *
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
9 * 1. Redistributions of source code must retain the above copyright
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
10 * notice, this list of conditions and the following disclaimer.
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
11 *
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
12 * 2. Redistributions in binary form must reproduce the above copyright
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
13 * notice, this list of conditions and the following disclaimer in the
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
14 * documentation and/or other materials provided with the distribution.
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
15 *
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
26 * POSSIBILITY OF SUCH DAMAGE.
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
27 */
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
28
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
29 #include "window.h"
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
30 #include "Windows.h"
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
31
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
32
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
33 #include <stdbool.h>
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
34 #include <stdio.h>
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
35 #include <stdlib.h>
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
36
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
37
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
38 static HINSTANCE hInstance;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
39
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
40 static const wchar_t *mainWindowClass = L"UiMainWindow";
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
41
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
42 LRESULT CALLBACK WindowProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam) {
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
43 switch(uMsg) {
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
44 case WM_DESTROY:
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
45 PostQuitMessage(0);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
46 break;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
47 default:
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
48 return DefWindowProc(hwnd, uMsg, wParam, lParam);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
49 }
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
50 return 0;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
51 }
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
52
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
53 void ui_window_init(void) {
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
54 hInstance = GetModuleHandle(NULL);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
55
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
56 WNDCLASSEX wc = { sizeof(WNDCLASSEX) };
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
57 wc.lpfnWndProc = WindowProc;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
58 wc.hInstance = hInstance;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
59 wc.lpszClassName = mainWindowClass;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
60 wc.hCursor = LoadCursor(NULL, IDC_ARROW);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
61 wc.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
62
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
63 if(!RegisterClassEx(&wc)) {
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
64 MessageBox(NULL, "RegisterClassEx failed", "Error", MB_ICONERROR);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
65 exit(-1);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
66 }
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
67 }
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
68
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
69 static UiObject* create_window(const char *title, void *window_data, bool simple) {
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
70 CxMempool *mp = cxMempoolCreateSimple(256);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
71 const CxAllocator *a = mp->allocator;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
72 UiObject *obj = cxCalloc(a, 1, sizeof(UiObject));
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
73 obj->ctx = uic_context(obj, mp);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
74 obj->window = window_data;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
75
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
76 HWND hwnd = CreateWindowEx(
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
77 0,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
78 L"UiMainWindow",
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
79 "Test",
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
80 WS_OVERLAPPEDWINDOW | WS_VISIBLE,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
81 CW_USEDEFAULT,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
82 CW_USEDEFAULT,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
83 800,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
84 600,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
85 NULL,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
86 NULL,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
87 hInstance,
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
88 NULL);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
89
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
90 ShowWindow(hwnd, SW_SHOWNORMAL);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
91 UpdateWindow(hwnd);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
92
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
93 return obj;
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
94 }
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
95
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
96 UiObject *ui_window(const char *title, void *window_data) {
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
97 return create_window(title, window_data, FALSE);
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
98 }
4d86050ad6ff add incomplete ui_window implementation (WIN32)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff changeset
99

mercurial