1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
|
/*
* VBMouse - win16 mouse driver entry points
* Copyright (C) 2022 Javier S. Pedro
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
#include <windows.h>
#include "utils.h"
#include "int33.h"
#include "int2fwin.h"
#include "w16mouse.h"
#define TRACE_EVENTS 0
#define MOUSE_NUM_BUTTONS 2
/** The routine Windows gave us which we should use to report events. */
static LPFN_MOUSEEVENT eventproc;
/** Current status of the mouse driver. */
static bool enabled;
/** Previous deltaX, deltaY from the int33 mouse callback (for relative motion) */
static short prev_delta_x, prev_delta_y;
/* This is how events are delivered to Windows */
static void send_event(unsigned short Status, short deltaX, short deltaY, short ButtonCount, short extra1, short extra2);
#pragma aux (MOUSEEVENTPROC) send_event = \
"call dword ptr [eventproc]"
/* Our "CALLBACKS" segment which is fixed and non-relocatable. */
#pragma code_seg ( "CALLBACKS" )
#include "dlog.h"
static void FAR int33_mouse_callback(uint16_t events, uint16_t buttons, int16_t x, int16_t y, int16_t delta_x, int16_t delta_y)
#pragma aux (INT33_CB) int33_mouse_callback
{
int status = 0;
#if TRACE_EVENTS_IN
dlog_print("w16mouse: events=");
dlog_printx(events);
dlog_print(" buttons=");
dlog_printx(buttons);
dlog_print(" x=");
dlog_printd(x);
dlog_print(" y=");
dlog_printd(y);
dlog_print(" dx=");
dlog_printd(delta_x);
dlog_print(" dy=");
dlog_printd(delta_y);
dlog_endline();
#endif
if (events & INT33_EVENT_MASK_LEFT_BUTTON_PRESSED) status |= SF_B1_DOWN;
if (events & INT33_EVENT_MASK_LEFT_BUTTON_RELEASED) status |= SF_B1_UP;
if (events & INT33_EVENT_MASK_RIGHT_BUTTON_PRESSED) status |= SF_B2_DOWN;
if (events & INT33_EVENT_MASK_RIGHT_BUTTON_RELEASED) status |= SF_B2_UP;
if (events & INT33_EVENT_MASK_MOVEMENT) {
status |= SF_MOVEMENT;
}
if (events & INT33_EVENT_MASK_ABSOLUTE) {
status |= SF_ABSOLUTE;
// We set the window to be 0..0x7FFF, so just scale to 0xFFFF
x = (uint16_t)(x) * 2;
y = (uint16_t)(y) * 2;
} else {
// Use mickeys for relative motion
x = delta_x - prev_delta_x;
y = delta_y - prev_delta_y;
prev_delta_x = delta_x;
prev_delta_y = delta_y;
}
// Unused
(void) buttons;
#if TRACE_EVENTS
dlog_print("w16mouse: event status=");
dlog_printx(status);
dlog_print(" x=");
dlog_printd(x);
dlog_print(" y=");
dlog_printd(y);
dlog_endline();
#endif
send_event(status, x, (uint16_t)(y), MOUSE_NUM_BUTTONS, 0, 0);
}
#pragma code_seg ()
/* Driver exported functions. */
/** DLL entry point (or driver initialization routine).
* The initialization routine should check whether a mouse exists.
* @return nonzero value indicates a mouse exists.
*/
#pragma off (unreferenced)
BOOL FAR PASCAL LibMain(HINSTANCE hInstance, WORD wDataSegment,
WORD wHeapSize, LPSTR lpszCmdLine)
#pragma pop (unreferenced)
{
uint16_t version = int33_get_driver_version();
// For now we just check for the presence of any int33 driver version
if (version == 0) {
// No one responded to our request, we can assume no driver
// This will cause a "can't load .drv" message from Windows
return 0;
}
return 1;
}
/** Called by Windows to retrieve information about the mouse hardware. */
WORD FAR PASCAL Inquire(LPMOUSEINFO lpMouseInfo)
{
lpMouseInfo->msExist = 1;
lpMouseInfo->msRelative = 0;
lpMouseInfo->msNumButtons = MOUSE_NUM_BUTTONS;
lpMouseInfo->msRate = 80;
return sizeof(MOUSEINFO);
}
/** Called by Windows to enable the mouse driver.
* @param lpEventProc Callback function to call when a mouse event happens. */
VOID FAR PASCAL Enable(LPFN_MOUSEEVENT lpEventProc)
{
// Store the windows-given callback
_disable(); // Write to far pointer may not be atomic, and we could be interrupted mid-write
eventproc = lpEventProc;
_enable();
if (!enabled) {
int33_reset();
// Since the mouse driver will likely not know the Windows resolution,
// let's manually set up a large window of coordinates so as to have
// as much precision as possible.
// We use 0x7FFF instead of 0xFFFF because this parameter is officially a signed value.
int33_set_horizontal_window(0, 0x7FFF);
int33_set_vertical_window(0, 0x7FFF);
int33_set_event_handler(INT33_EVENT_MASK_ALL, int33_mouse_callback);
enabled = true;
}
}
/** Called by Windows to disable the mouse driver. */
VOID FAR PASCAL Disable(VOID)
{
if (enabled) {
int33_reset(); // This removes our handler and removes all other settings
enabled = false;
}
}
/** Called by Window to retrieve the interrupt vector number used by this driver, or -1. */
int FAR PASCAL MouseGetIntVect(VOID)
{
return 0x33;
}
|
