source: trunk/synergy/birdhacks/spy1.c

Last change on this file was 2769, checked in by bird, 19 years ago

messing about.
File size: 9.2 KB
RevLine 
[2766]1/* $Id: $ */
2/** @file
3 *
4 * spy1 - the program.
5 *
6 * Copyright (c) 1997-2006 knut st. osmundsen <bird@anduin.net>
7 *
8 * GPL
9 *
10 */
11
12/*******************************************************************************
13* Header Files *
14*******************************************************************************/
15#define INCL_GPI
16#define INCL_DOS
17#define INCL_WIN
18#define INCL_ERRORS
19#include <os2.h>
20#include <string.h>
21#include <stdio.h>
22#include <stdint.h>
23#include <ctype.h>
24#include "spy1.h"
25
26
27/**
28 * Get the name of a virtual key.
29 * @returns the key name (readonly).
30 * @param ulVirtualKey The virtual key.
31 */
32const char *GetVirtualKeyName(ULONG ulVirtualKey)
33{
34 switch (ulVirtualKey) {
35#define CASE(vk) case vk: return #vk
36 CASE(VK_BUTTON1);
37 CASE(VK_BUTTON2);
38 CASE(VK_BUTTON3);
39 CASE(VK_BREAK);
40 CASE(VK_BACKSPACE);
41 CASE(VK_TAB);
42 CASE(VK_BACKTAB);
43 CASE(VK_NEWLINE);
44 CASE(VK_SHIFT);
45 CASE(VK_CTRL);
46 CASE(VK_ALT);
47 CASE(VK_ALTGRAF);
48 CASE(VK_PAUSE);
49 CASE(VK_CAPSLOCK);
50 CASE(VK_ESC);
51 CASE(VK_SPACE);
52 CASE(VK_PAGEUP);
53 CASE(VK_PAGEDOWN);
54 CASE(VK_END);
55 CASE(VK_HOME);
56 CASE(VK_LEFT);
57 CASE(VK_UP);
58 CASE(VK_RIGHT);
59 CASE(VK_DOWN);
60 CASE(VK_PRINTSCRN);
61 CASE(VK_INSERT);
62 CASE(VK_DELETE);
63 CASE(VK_SCRLLOCK);
64 CASE(VK_NUMLOCK);
65 CASE(VK_ENTER);
66 CASE(VK_SYSRQ);
67 CASE(VK_F1);
68 CASE(VK_F2);
69 CASE(VK_F3);
70 CASE(VK_F4);
71 CASE(VK_F5);
72 CASE(VK_F6);
73 CASE(VK_F7);
74 CASE(VK_F8);
75 CASE(VK_F9);
76 CASE(VK_F10);
77 CASE(VK_F11);
78 CASE(VK_F12);
79 CASE(VK_F13);
80 CASE(VK_F14);
81 CASE(VK_F15);
82 CASE(VK_F16);
83 CASE(VK_F17);
84 CASE(VK_F18);
85 CASE(VK_F19);
86 CASE(VK_F20);
87 CASE(VK_F21);
88 CASE(VK_F22);
89 CASE(VK_F23);
90 CASE(VK_F24);
91 CASE(VK_ENDDRAG);
92 CASE(VK_CLEAR);
93 CASE(VK_EREOF);
94 CASE(VK_PA1);
95 CASE(VK_ATTN);
96 CASE(VK_CRSEL);
97 CASE(VK_EXSEL);
98 CASE(VK_COPY);
99 CASE(VK_BLK1);
100 CASE(VK_BLK2);
101#undef CASE
102 default:
103 return "";
104 }
105}
106
107/**
108 * Prints the given KC flags.
109 * @param fKC The KC_* flags to print.
110 */
111void PrintKC(USHORT fKC)
112{
113#define PRINT_KC(kc) if (fKC & kc) printf(" " #kc);
114 PRINT_KC(KC_CHAR);
115 PRINT_KC(KC_VIRTUALKEY);
116 PRINT_KC(KC_SCANCODE);
117 PRINT_KC(KC_SHIFT);
118 PRINT_KC(KC_CTRL);
119 PRINT_KC(KC_ALT);
120 PRINT_KC(KC_KEYUP);
121 PRINT_KC(KC_PREVDOWN);
122 PRINT_KC(KC_LONEKEY);
123 PRINT_KC(KC_DEADKEY);
124 PRINT_KC(KC_COMPOSITE);
125 PRINT_KC(KC_INVALIDCOMP);
126 PRINT_KC(KC_TOGGLE);
127 PRINT_KC(KC_INVALIDCHAR);
128 PRINT_KC(KC_DBCSRSRVD1);
129 PRINT_KC(KC_DBCSRSRVD2);
130#undef PRINT_KC
131}
132
133
134/**
135 * Prints the given KDD flags.
136 * @param fKDD The KDD_* flags to print.
137 */
138void PrintKDD(USHORT fKDD)
139{
140 /* action */
141 switch (fKDD & KDD_ACTIONFIELD) {
142#define PRINT_KDD(kdd) case kdd: printf(" " #kdd); break
143 PRINT_KDD(KDD_PUTINKIB);
144 PRINT_KDD(KDD_ACK);
145 PRINT_KDD(KDD_PREFIXKEY);
146 PRINT_KDD(KDD_OVERRUN);
147 PRINT_KDD(KDD_RESEND);
148 PRINT_KDD(KDD_REBOOTKEY);
149 PRINT_KDD(KDD_DUMPKEY);
150 PRINT_KDD(KDD_SHIFTKEY);
151 PRINT_KDD(KDD_PAUSEKEY);
152 PRINT_KDD(KDD_PSEUDOPAUSE);
153 PRINT_KDD(KDD_WAKEUPKEY);
154 PRINT_KDD(KDD_BADACCENT);
155 PRINT_KDD(KDD_HOTKEY);
156 PRINT_KDD(KDD_ACCENTKEY);
157 PRINT_KDD(KDD_BREAKKEY);
158 PRINT_KDD(KDD_PSEUDOBREAK);
159 PRINT_KDD(KDD_PRTSCKEY);
160 PRINT_KDD(KDD_PRTECHOKEY);
161 PRINT_KDD(KDD_PSEUDOPRECH);
162 PRINT_KDD(KDD_STATUSCHG);
163 PRINT_KDD(KDD_WRITTENKEY);
164 PRINT_KDD(KDD_UNDEFINED);
165#undef PRINT_KDD
166 }
167 /* the flags */
168#define PRINT_KDD(kdd) if (fKDD & kdd) printf(" " #kdd);
169 PRINT_KDD(KDD_ACCENTED);
170 PRINT_KDD(KDD_MULTIMAKE);
171 PRINT_KDD(KDD_SECONDARY);
172 PRINT_KDD(KDD_BREAK);
173 PRINT_KDD(KDD_EXTENDEDKEY);
174 PRINT_KDD(KDD_KC_LONEKEY);
175 PRINT_KDD(KDD_KC_PREVDOWN);
176 PRINT_KDD(KDD_KC_KEYUP);
177 PRINT_KDD(KDD_KC_ALT);
178 PRINT_KDD(KDD_KC_CTRL);
179 PRINT_KDD(KDD_KC_SHIFT);
180#undef PRINT_KDD
181}
182
183/**
184 * Decods the message (if known to us).
185 *
186 * @param pQmsg The message.
187 */
188void PrintMsg(const QMSG *pQmsg)
189{
190 switch (pQmsg->msg) {
191 case WM_VIOCHAR:
[2769]192#if 1
193 if (SHORT1FROMMP(pQmsg->mp1) & KC_PREVDOWN) {
194 break;
195 }
196#endif
197 printf("%09ld: ", pQmsg->time);
[2766]198 printf("WM_VIOCHAR: fKC=%04x rep=%02x scan=%02x ",
199 SHORT1FROMMP(pQmsg->mp1), CHAR3FROMMP(pQmsg->mp1), CHAR4FROMMP(pQmsg->mp1));
[2769]200 printf("xlch=%02x(%c) xlscan=%02x fKDD=%04x",
[2766]201 CHAR1FROMMP(pQmsg->mp2), isprint(CHAR1FROMMP(pQmsg->mp2)) ? CHAR1FROMMP(pQmsg->mp2) : '.',
202 CHAR2FROMMP(pQmsg->mp2), SHORT2FROMMP(pQmsg->mp2));
203 PrintKC(SHORT1FROMMP(pQmsg->mp1));
204 PrintKDD(SHORT2FROMMP(pQmsg->mp2));
205 printf("\n");
206 break;
207
208 case WM_CHAR:
[2769]209#if 1
210 if (SHORT1FROMMP(pQmsg->mp1) & KC_PREVDOWN) {
211 break;
212 }
213#endif
214 printf("%09ld: ", pQmsg->time);
[2766]215 printf(" WM_CHAR: fKC=%04x rep=%02x scan=%02x ",
216 SHORT1FROMMP(pQmsg->mp1), CHAR3FROMMP(pQmsg->mp1), CHAR4FROMMP(pQmsg->mp1));
[2769]217 printf("ch=%04x(%c) vk=%04x",
218 SHORT1FROMMP(pQmsg->mp2), isprint(SHORT1FROMMP(pQmsg->mp2)) && (SHORT1FROMMP(pQmsg->mp1) & KC_CHAR) ? SHORT1FROMMP(pQmsg->mp2) : '.',
219 SHORT2FROMMP(pQmsg->mp2));
220 if (SHORT1FROMMP(pQmsg->mp1) & KC_VIRTUALKEY) {
221 printf("(%s)", GetVirtualKeyName(SHORT2FROMMP(pQmsg->mp2)));
222 }
[2766]223 PrintKC(SHORT1FROMMP(pQmsg->mp1));
224 printf("\n");
225 break;
226 }
227}
228
229
230/**
231 * Prints the message.
232 * @param pEvent The message to print.
233 */
234void PrintEvent(PSPY1EVENT pEvent)
235{
[2769]236#if 0
[2766]237 /* first line, raw data */
238 printf("p%04lx t%02lx", pEvent->pid, pEvent->tid);
239 switch (pEvent->ulHook) {
240 case HK_JOURNALRECORD: printf(" JR"); break;
241 case HK_INPUT: printf(" IN"); break;
242 default: printf(" %ld\n", pEvent->ulHook); break;
243 }
244 switch (pEvent->enmType) {
245 case SPY1EVENTTYPE_MSG_REMOVED: printf(" RM"); break;
246 case SPY1EVENTTYPE_MSG_PEEK: printf(" PK"); break;
247 default: printf(" invalid msg (%d)\n", pEvent->enmType); return;
248 }
[2769]249#endif
[2766]250 switch (pEvent->enmType) {
251 case SPY1EVENTTYPE_MSG_REMOVED:
[2769]252#if 0
[2766]253 case SPY1EVENTTYPE_MSG_PEEK:
254 printf(" time=%08lx hwnd=%08lx msg=%04lx mp1=%08x mp2=%08x (%ld,%ld)\n",
255 pEvent->u.Msg.time,
256 pEvent->u.Msg.hwnd,
257 pEvent->u.Msg.msg,
258 (uintptr_t)pEvent->u.Msg.mp1,
259 (uintptr_t)pEvent->u.Msg.mp2,
260 pEvent->u.Msg.ptl.x,
261 pEvent->u.Msg.ptl.y);
[2769]262#endif
[2766]263 PrintMsg(&pEvent->u.Msg);
264 break;
265 default: break; /* pedantic gcc */
266 }
267}
268
269/**
270 * Check if it's an event we'll ignore.
271 *
272 * @returns TRUE if we should ignore the event, otherwise FALSE.
273 * @param pEvent The event in question.
274 */
275BOOL IgnoreEvent(PSPY1EVENT pEvent)
276{
277 return pEvent->enmType == SPY1EVENTTYPE_MSG_REMOVED
278 && ( pEvent->u.Msg.msg == WM_TIMER
279 || pEvent->u.Msg.msg == WM_PAINT
280 || pEvent->u.Msg.msg >= WM_USER
281 || (pEvent->u.Msg.msg >= WM_SEM1 && pEvent->u.Msg.msg <= WM_SEM4)
282#if 1
283 || (pEvent->u.Msg.msg >= WM_MOUSEFIRST && pEvent->u.Msg.msg <= WM_MOUSELAST)
284 || (pEvent->u.Msg.msg >= WM_EXTMOUSEFIRST && pEvent->u.Msg.msg <= WM_MOUSETRANSLATELAST)
285#endif
286#if 1
287 || pEvent->u.Msg.msg == WM_JOURNALNOTIFY
288#endif
289 );
290}
291
292
293int main(void)
294{
295 HAB hab;
296 HMQ hmq;
297 PPIB pPib;
298 PTIB pTib;
299 int rc;
300
301 /*
302 * The PM prologue.
303 */
304 DosGetInfoBlocks(&pTib, &pPib);
305 pPib->pib_ultype = 3;
306
307 hab = WinInitialize(0);
308 hmq = WinCreateMsgQueue(hab, 0);
309
310 /*
311 * Install the hooks.
312 */
313 rc = SetHooks(hab);
314 if (rc == NO_ERROR) {
315 /*
316 * The event printing loop.
317 */
318 for (;;) {
319 SPY1EVENT Event;
320 rc = GetEvent(&Event, SEM_INDEFINITE_WAIT);
321 if (rc) {
322 printf("GetEvent failed, rc=%d\n", rc);
323 }
324 if (!IgnoreEvent(&Event)) {
325 PrintEvent(&Event);
326 }
327 }
328
329 /* cleanup */
330 ReleaseHooks(hab);
331 } else {
332 printf("InstallHooks failed with rc=%#x\n", rc);
333 }
334
335 /*
336 * The PM epilogue.
337 */
338 WinDestroyMsgQueue(hmq);
339 WinTerminate(hab);
340 return NO_ERROR;
341}
342
Note: See TracBrowser for help on using the repository browser.