Pileus Git - wmpus/blob - sys-win32.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <ctype.h>
   4
   5 #define WIN32_LEAN_AND_MEAN
   6 #define _WIN32_WINNT 0x0500
   7 #include <windows.h>
   8 #include <winbase.h>
   9 #include <winuser.h>
  10
  11 #include "util.h"
  12 #include "sys.h"
  13 #include "wm.h"
  14
  15 int   test;
  16 int   shellhookid;
  17 mod_t mod_state;
  18
  19 /* Internal structures */
  20 struct win_sys {
  21         HWND hwnd;
  22 };
  23
  24 typedef struct {
  25         Key_t key;
  26         int   vk;
  27 } keymap_t;
  28
  29 /* Conversion functions */
  30 keymap_t key2vk[] = {
  31         {key_mouse1  , VK_LBUTTON },
  32         {key_mouse2  , VK_MBUTTON },
  33         {key_mouse3  , VK_RBUTTON },
  34         {key_left    , VK_LEFT    },
  35         {key_right   , VK_RIGHT   },
  36         {key_up      , VK_UP      },
  37         {key_down    , VK_DOWN    },
  38         {key_home    , VK_HOME    },
  39         {key_end     , VK_END     },
  40         {key_pageup  , VK_PRIOR   },
  41         {key_pagedown, VK_NEXT    },
  42         {key_f1      , VK_F1      },
  43         {key_f2      , VK_F2      },
  44         {key_f3      , VK_F3      },
  45         {key_f4      , VK_F4      },
  46         {key_f5      , VK_F5      },
  47         {key_f6      , VK_F6      },
  48         {key_f7      , VK_F7      },
  49         {key_f8      , VK_F8      },
  50         {key_f9      , VK_F9      },
  51         {key_f10     , VK_F10     },
  52         {key_f11     , VK_F11     },
  53         {key_f12     , VK_F12     },
  54         {key_shift   , VK_SHIFT   },
  55         {key_shift   , VK_LSHIFT  },
  56         {key_shift   , VK_RSHIFT  },
  57         {key_ctrl    , VK_CONTROL },
  58         {key_ctrl    , VK_LCONTROL},
  59         {key_ctrl    , VK_RCONTROL},
  60         {key_alt     , VK_MENU    },
  61         {key_alt     , VK_LMENU   },
  62         {key_alt     , VK_RMENU   },
  63         {key_win     , VK_LWIN    },
  64         {key_win     , VK_RWIN    },
  65 };
  66
  67 /* - Keycodes */
  68 Key_t w2key(UINT vk)
  69 {
  70         keymap_t *km = map_getr(key2vk,vk);
  71         return km ? km->key : vk;
  72 }
  73
  74 UINT key2w(Key_t key)
  75 {
  76         keymap_t *km = map_get(key2vk,key);
  77         return km ? km->vk : toupper(key);
  78 }
  79
  80 /* - Pointers */
  81 ptr_t getptr(void)
  82 {
  83         POINT wptr;
  84         GetCursorPos(&wptr);
  85         return (ptr_t){-1, -1, wptr.x, wptr.y};
  86 }
  87
  88 /* Helper functions */
  89 win_t *win_new(HWND hwnd)
  90 {
  91         RECT rect = {};
  92         GetWindowRect(hwnd, &rect);
  93         win_t *win = new0(win_t);
  94         win->x         = rect.left;
  95         win->y         = rect.top;
  96         win->w         = rect.right  - rect.left;
  97         win->h         = rect.bottom - rect.top;
  98         win->sys       = new0(win_sys_t);
  99         win->sys->hwnd = hwnd;
 100         return win;
 101 }
 102
 103 /* Callbacks */
 104 LRESULT CALLBACK KbdProc(int msg, WPARAM wParam, LPARAM lParam)
 105 {
 106         KBDLLHOOKSTRUCT *st = (KBDLLHOOKSTRUCT *)lParam;
 107         Key_t key = w2key(st->vkCode);
 108         mod_state.up = !!(st->flags & 0x80);
 109         if (key == key_alt  ) mod_state.alt   = !mod_state.up;
 110         if (key == key_ctrl ) mod_state.ctrl  = !mod_state.up;
 111         if (key == key_shift) mod_state.shift = !mod_state.up;
 112         if (key == key_win  ) mod_state.win   = !mod_state.up;
 113         printf("KbdProc: %d,%x,%lx - %lx,%lx,%lx - %x,%x\n",
 114                         msg, wParam, lParam,
 115                         st->vkCode, st->scanCode, st->flags,
 116                         key, mod2int(mod_state));
 117         HWND fghwnd = GetForegroundWindow();
 118         wm_handle_key(win_new(fghwnd), key, mod_state, getptr());
 119         return CallNextHookEx(0, msg, wParam, lParam);
 120 }
 121
 122 LRESULT CALLBACK MllProc(int msg, WPARAM wParam, LPARAM lParam)
 123 {
 124         Key_t key   = key_none;
 125         HWND fghwnd = GetForegroundWindow();
 126         switch (wParam) {
 127         case WM_LBUTTONDOWN: mod_state.up = 0; key = key_mouse1; break;
 128         case WM_LBUTTONUP:   mod_state.up = 1; key = key_mouse1; break;
 129         case WM_RBUTTONDOWN: mod_state.up = 0; key = key_mouse3; break;
 130         case WM_RBUTTONUP:   mod_state.up = 1; key = key_mouse3; break;
 131         }
 132         if (wParam == WM_MOUSEMOVE)
 133                 return wm_handle_ptr(win_new(fghwnd), getptr());
 134         else if (key != key_none)
 135                 return wm_handle_key(win_new(fghwnd), key, mod_state, getptr());
 136         else
 137                 return CallNextHookEx(0, msg, wParam, lParam);
 138 }
 139
 140 LRESULT CALLBACK ShlWndProc(HWND hwnd, int msg, WPARAM wParam, LPARAM lParam)
 141 {
 142         printf("ShlWndProc: %d, %x, %lx\n", msg, wParam, lParam);
 143         switch (wParam) {
 144         case HSHELL_WINDOWCREATED:
 145                 printf("ShlProc: window created\n");
 146                 return 0;
 147         case HSHELL_WINDOWDESTROYED:
 148                 printf("ShlProc: window destroyed\n");
 149                 return 0;
 150         case HSHELL_WINDOWACTIVATED:
 151                 printf("ShlProc: window activated\n");
 152                 return 0;
 153         }
 154         return DefWindowProc(hwnd, msg, wParam, lParam);
 155 }
 156
 157 LRESULT CALLBACK WndProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
 158 {
 159         printf("WndProc: %d, %x, %lx\n", msg, wParam, lParam);
 160         switch (msg) {
 161         case WM_CREATE:
 162         case WM_CLOSE:
 163         case WM_DESTROY:
 164                 return 0;
 165         }
 166         if (msg == shellhookid) {
 167                 printf("WndProc: shellhook\n");
 168                 return ShlWndProc(hwnd, msg, wParam, lParam);
 169         }
 170         return DefWindowProc(hwnd, msg, wParam, lParam);
 171 }
 172
 173 /*****************
 174  * Sys functions *
 175  *****************/
 176 void sys_move(win_t *win, int x, int y, int w, int h)
 177 {
 178         printf("sys_move: %p - %d,%d  %dx%d\n", win, x, y, w, h);
 179         MoveWindow(win->sys->hwnd, x, y, w, h, TRUE);
 180 }
 181
 182 void sys_raise(win_t *win)
 183 {
 184         printf("sys_raise: %p\n", win);
 185 }
 186
 187 void sys_watch(win_t *win, Key_t key, mod_t mod)
 188 {
 189         printf("sys_watch: %p\n", win);
 190 }
 191
 192 win_t *sys_init(void)
 193 {
 194         HINSTANCE hInst = GetModuleHandle(NULL);
 195         test = 123;
 196
 197         /* Class */
 198         WNDCLASSEX wc    = {};
 199         wc.cbSize        = sizeof(WNDCLASSEX);
 200         wc.lpfnWndProc   = WndProc;
 201         wc.hInstance     = hInst;
 202         wc.lpszClassName = "awm_class";
 203         if (!RegisterClassEx(&wc))
 204                 printf("sys_init: Error Registering Class - %lu\n", GetLastError());
 205
 206         /* Bargh!? */
 207         HWND hwnd = CreateWindowEx(0, "awm_class", "awm", 0,
 208                         0, 0, 0, 0, HWND_MESSAGE, NULL, hInst, NULL);
 209         if (!hwnd)
 210                 printf("sys_init: Error Creating Window - %lu\n", GetLastError());
 211
 212         /* Try Shell Hook Window */
 213         HINSTANCE hInstUser32 = GetModuleHandle("USER32.DLL");
 214         BOOL (*RegisterShellHookWindow)(HWND hwnd) = (void*)GetProcAddress(hInstUser32, "RegisterShellHookWindow");
 215         if (!RegisterShellHookWindow)
 216                 printf("sys_init: Error Finding RegisterShellHookWindow - %lu\n", GetLastError());
 217         if (!RegisterShellHookWindow(hwnd))
 218                 printf("sys_init: Error Registering ShellHook Window - %lu\n", GetLastError());
 219         shellhookid = RegisterWindowMessage("SHELLHOOK");
 220
 221         /* Register other hooks for testing */
 222         SetWindowsHookEx(WH_MOUSE_LL,    MllProc, hInst, 0);
 223         SetWindowsHookEx(WH_KEYBOARD_LL, KbdProc, hInst, 0);
 224         //SetWindowsHookEx(WH_SHELL,       ShlProc, hInst, 0);
 225
 226         //if (!RegisterHotKey(hwnd, 123, MOD_CONTROL, VK_LBUTTON))
 227         //      printf("sys_init: Error Registering Hotkey - %lu\n", GetLastError());
 228         if (!RegisterHotKey(NULL, 123, MOD_CONTROL, VK_LBUTTON))
 229                 printf("sys_init: Error Registering Hotkey - %lu\n", GetLastError());
 230
 231         return win_new(hwnd);
 232
 233 }
 234
 235 void sys_run(win_t *root)
 236 {
 237         MSG msg;
 238         while (GetMessage(&msg, NULL, 0, 0) > 0) {
 239                 TranslateMessage(&msg);
 240                 DispatchMessage(&msg);
 241         }
 242 }