1 | /* $Id: devio.c,v 1.1 1999-05-24 20:19:46 ktk Exp $ */
|
---|
2 |
|
---|
3 | /*
|
---|
4 | *
|
---|
5 | * Project Odin Software License can be found in LICENSE.TXT
|
---|
6 | *
|
---|
7 | */
|
---|
8 | /*
|
---|
9 | * Win32 Device IOCTL API functions for OS/2
|
---|
10 | *
|
---|
11 | * Copyright 1998 Sander van Leeuwen
|
---|
12 | *
|
---|
13 | */
|
---|
14 | #define INCL_DOSPROFILE
|
---|
15 | #define INCL_DOSDEVICES
|
---|
16 | #define INCL_DOSDEVIOCTL
|
---|
17 | #define INCL_GPI
|
---|
18 | #define INCL_DOSFILEMGR /* File Manager values */
|
---|
19 | #define INCL_DOSERRORS /* DOS Error values */
|
---|
20 | #define INCL_DOSPROCESS /* DOS Process values */
|
---|
21 | #define INCL_DOSMISC /* DOS Miscellanous values */
|
---|
22 | #include <os2.h>
|
---|
23 | #include <string.h>
|
---|
24 |
|
---|
25 | #include <win32type.h>
|
---|
26 | #include "misc.h"
|
---|
27 | #include "devio.h"
|
---|
28 | #include "cio.h"
|
---|
29 | #include "map.h"
|
---|
30 | #include "except.h"
|
---|
31 | #include <builtin.h>
|
---|
32 |
|
---|
33 | static fX86Init = FALSE;
|
---|
34 | //SvL: Used in iccio.asm (how can you put these in the .asm data segment without messing things up?)
|
---|
35 | ULONG ioentry = 0;
|
---|
36 | USHORT gdt = 0;
|
---|
37 | char devname[] = "/dev/fastio$";
|
---|
38 |
|
---|
39 | static BOOL GpdDevIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped);
|
---|
40 | static BOOL MAPMEMIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped);
|
---|
41 | static BOOL FXMEMMAPIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped);
|
---|
42 |
|
---|
43 | static WIN32DRV knownDriver[] =
|
---|
44 | {{"GpdDev", "", TRUE, 666, GpdDevIOCtl},
|
---|
45 | {"MAPMEM", "PMAP$", FALSE, 0, MAPMEMIOCtl},
|
---|
46 | {"FXMEMMAP.VXD", "PMAP$", FALSE, 0, FXMEMMAPIOCtl}};
|
---|
47 |
|
---|
48 | static int nrKnownDrivers = sizeof(knownDriver)/sizeof(WIN32DRV);
|
---|
49 |
|
---|
50 | //******************************************************************************
|
---|
51 | //******************************************************************************
|
---|
52 | BOOL WIN32API DeviceIoControl(HANDLE hDevice, DWORD dwIoControlCode,
|
---|
53 | LPVOID lpInBuffer, DWORD nInBufferSize,
|
---|
54 | LPVOID lpOutBuffer, DWORD nOutBufferSize,
|
---|
55 | LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped)
|
---|
56 | {
|
---|
57 | int i;
|
---|
58 |
|
---|
59 | for(i=0;i<nrKnownDrivers;i++) {
|
---|
60 | if(hDevice == knownDriver[i].hDevice) {
|
---|
61 | return knownDriver[i].devIOCtl(hDevice, dwIoControlCode,
|
---|
62 | lpInBuffer, nInBufferSize,
|
---|
63 | lpOutBuffer, nOutBufferSize,
|
---|
64 | lpBytesReturned, lpOverlapped);
|
---|
65 | }
|
---|
66 | }
|
---|
67 | dprintf(("DeviceIoControl: Device not found!\n"));
|
---|
68 | return(FALSE);
|
---|
69 | }
|
---|
70 | //******************************************************************************
|
---|
71 | //******************************************************************************
|
---|
72 | static BOOL GpdDevIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped)
|
---|
73 | {
|
---|
74 | ULONG port, val = 0;
|
---|
75 |
|
---|
76 | if(fX86Init == FALSE) {
|
---|
77 | if(io_init() == 0)
|
---|
78 | fX86Init = TRUE;
|
---|
79 | else return(FALSE);
|
---|
80 | }
|
---|
81 |
|
---|
82 | *lpBytesReturned = 0;
|
---|
83 |
|
---|
84 | port = ((GENPORT_WRITE_INPUT *)lpInBuffer)->PortNumber;
|
---|
85 |
|
---|
86 | switch((dwIoControlCode >> 2) & 0xFFF) {
|
---|
87 | case IOCTL_GPD_READ_PORT_UCHAR:
|
---|
88 | if(nOutBufferSize < sizeof(char))
|
---|
89 | return(FALSE);
|
---|
90 |
|
---|
91 | val = c_inb(port);
|
---|
92 | *(char *)lpOutBuffer = val;
|
---|
93 | *lpBytesReturned = sizeof(char);
|
---|
94 | break;
|
---|
95 | case IOCTL_GPD_READ_PORT_USHORT:
|
---|
96 | if(nOutBufferSize < sizeof(USHORT))
|
---|
97 | return(FALSE);
|
---|
98 |
|
---|
99 | val = c_inw(port);
|
---|
100 | *(USHORT *)lpOutBuffer = val;
|
---|
101 | *lpBytesReturned = sizeof(USHORT);
|
---|
102 | break;
|
---|
103 | case IOCTL_GPD_READ_PORT_ULONG:
|
---|
104 | if(nOutBufferSize < sizeof(ULONG))
|
---|
105 | return(FALSE);
|
---|
106 |
|
---|
107 | val = c_inl(port);
|
---|
108 | *(ULONG *)lpOutBuffer = val;
|
---|
109 | *lpBytesReturned = sizeof(ULONG);
|
---|
110 | break;
|
---|
111 | case IOCTL_GPD_WRITE_PORT_UCHAR:
|
---|
112 | val = ((GENPORT_WRITE_INPUT *)lpInBuffer)->CharData;
|
---|
113 | c_outb(port, val);
|
---|
114 | break;
|
---|
115 | case IOCTL_GPD_WRITE_PORT_USHORT:
|
---|
116 | val = ((GENPORT_WRITE_INPUT *)lpInBuffer)->ShortData;
|
---|
117 | c_outw(port, val);
|
---|
118 | break;
|
---|
119 | case IOCTL_GPD_WRITE_PORT_ULONG:
|
---|
120 | val = ((GENPORT_WRITE_INPUT *)lpInBuffer)->LongData;
|
---|
121 | c_outl(port, val);
|
---|
122 | break;
|
---|
123 | default:
|
---|
124 | dprintf(("GpdDevIOCtl unknown func %X\n", (dwIoControlCode >> 2) & 0xFFF));
|
---|
125 | return(FALSE);
|
---|
126 | }
|
---|
127 |
|
---|
128 | return(TRUE);
|
---|
129 | }
|
---|
130 | //******************************************************************************
|
---|
131 | //******************************************************************************
|
---|
132 | static BOOL MAPMEMIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped)
|
---|
133 | {
|
---|
134 | PHYSICAL_MEMORY_INFO *meminfo = (PHYSICAL_MEMORY_INFO *)lpInBuffer;
|
---|
135 | struct map_ioctl memmap;
|
---|
136 |
|
---|
137 | *lpBytesReturned = 0;
|
---|
138 |
|
---|
139 | switch((dwIoControlCode >> 2) & 0xFFF) {
|
---|
140 | case IOCTL_MAPMEM_MAP_USER_PHYSICAL_MEMORY:
|
---|
141 | if(nInBufferSize != sizeof(PHYSICAL_MEMORY_INFO))
|
---|
142 | return(FALSE);
|
---|
143 |
|
---|
144 | memmap.a.phys = meminfo->BusAddress.u.LowPart;
|
---|
145 | memmap.size = meminfo->Length;
|
---|
146 | dprintf(("DeviceIoControl map phys address %X length %X\n", memmap.a.phys, memmap.size));
|
---|
147 | if(mpioctl((HFILE)hDevice, IOCTL_MAP, &memmap) == -1) {
|
---|
148 | dprintf(("mpioctl failed!\n"));
|
---|
149 | return(FALSE);
|
---|
150 | }
|
---|
151 |
|
---|
152 | dprintf(("DeviceIoControl map virt address = %X\n", memmap.a.user));
|
---|
153 | *(ULONG *)lpOutBuffer = (ULONG)memmap.a.user;
|
---|
154 | break;
|
---|
155 | case IOCTL_MAPMEM_UNMAP_USER_PHYSICAL_MEMORY:
|
---|
156 | dprintf(("Unmap mapping %X\n", *(ULONG *)lpInBuffer));
|
---|
157 | memmap.a.phys = *(ULONG *)lpInBuffer;
|
---|
158 | memmap.size = 0;
|
---|
159 | if(mpioctl((HFILE)hDevice, IOCTL_MAP, &memmap) == -1)
|
---|
160 | return(FALSE);
|
---|
161 | break;
|
---|
162 | default:
|
---|
163 | dprintf(("MAPMEMIOCtl unknown func %X\n", (dwIoControlCode >> 2) & 0xFFF));
|
---|
164 | return(FALSE);
|
---|
165 | }
|
---|
166 |
|
---|
167 | return(TRUE);
|
---|
168 | }
|
---|
169 | //******************************************************************************
|
---|
170 | //******************************************************************************
|
---|
171 | static BOOL FXMEMMAPIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped)
|
---|
172 | {
|
---|
173 | struct map_ioctl memmap;
|
---|
174 | MAPDEVREQUEST *vxdmem = (MAPDEVREQUEST *)lpInBuffer;
|
---|
175 |
|
---|
176 | switch(dwIoControlCode) {
|
---|
177 | case 1:
|
---|
178 | break;
|
---|
179 | case 2:
|
---|
180 | // _interrupt(3);
|
---|
181 | memmap.a.phys = (DWORD)vxdmem->mdr_PhysicalAddress;
|
---|
182 | memmap.size = vxdmem->mdr_SizeInBytes;
|
---|
183 | dprintf(("DeviceIoControl map phys address %X length %X\n", memmap.a.phys, memmap.size));
|
---|
184 | if(mpioctl((HFILE)hDevice, IOCTL_MAP, &memmap) == -1) {
|
---|
185 | dprintf(("mpioctl failed!\n"));
|
---|
186 | return(FALSE);
|
---|
187 | }
|
---|
188 |
|
---|
189 | dprintf(("DeviceIoControl map virt address = %X\n", memmap.a.user));
|
---|
190 | vxdmem->mdr_LinearAddress = (PVOID)memmap.a.user;
|
---|
191 | break;
|
---|
192 | default:
|
---|
193 | dprintf(("FXMEMMAPIOCtl unknown func %X\n", (dwIoControlCode >> 2) & 0xFFF));
|
---|
194 | return(FALSE);
|
---|
195 | }
|
---|
196 |
|
---|
197 | return(TRUE);
|
---|
198 | }
|
---|
199 | //******************************************************************************
|
---|
200 | //******************************************************************************
|
---|
201 | void OS2CloseFile(HANDLE hDevice)
|
---|
202 | {
|
---|
203 | DosClose((HFILE)hDevice);
|
---|
204 | }
|
---|
205 | //******************************************************************************
|
---|
206 | //******************************************************************************
|
---|
207 | HANDLE OS2CreateFile(char *szName, DWORD fdwAccess, DWORD fdwShareMode)
|
---|
208 | {
|
---|
209 | APIRET rc;
|
---|
210 | int i;
|
---|
211 | char *drvname = NULL;
|
---|
212 | HFILE hfFileHandle = 0L; /* Handle for file being manipulated */
|
---|
213 | ULONG ulAction = 0; /* Action taken by DosOpen */
|
---|
214 | ULONG sharetype = 0;
|
---|
215 |
|
---|
216 | for(i=0;i<nrKnownDrivers;i++) {
|
---|
217 | if(strcmp(szName, knownDriver[i].szWin32Name) == 0) {
|
---|
218 | drvname = knownDriver[i].szOS2Name;
|
---|
219 | break;
|
---|
220 | }
|
---|
221 | }
|
---|
222 | if(drvname == 0) {
|
---|
223 | return(0);
|
---|
224 | }
|
---|
225 |
|
---|
226 | //TODO
|
---|
227 | if(knownDriver[i].fCreateFile == TRUE)
|
---|
228 | return(knownDriver[i].hDevice);
|
---|
229 |
|
---|
230 | if(fdwAccess & (GENERIC_READ | GENERIC_WRITE))
|
---|
231 | sharetype |= OPEN_ACCESS_READWRITE;
|
---|
232 | else
|
---|
233 | if(fdwAccess & GENERIC_WRITE)
|
---|
234 | sharetype |= OPEN_ACCESS_WRITEONLY;
|
---|
235 |
|
---|
236 | if(fdwShareMode == 0)
|
---|
237 | sharetype |= OPEN_SHARE_DENYREADWRITE;
|
---|
238 | else
|
---|
239 | if(fdwShareMode & (FILE_SHARE_READ | FILE_SHARE_WRITE))
|
---|
240 | sharetype |= OPEN_SHARE_DENYNONE;
|
---|
241 | else
|
---|
242 | if(fdwShareMode & FILE_SHARE_WRITE)
|
---|
243 | sharetype |= OPEN_SHARE_DENYREAD;
|
---|
244 | else
|
---|
245 | if(fdwShareMode & FILE_SHARE_READ)
|
---|
246 | sharetype |= OPEN_SHARE_DENYWRITE;
|
---|
247 |
|
---|
248 | rc = DosOpen( drvname, /* File path name */
|
---|
249 | &hfFileHandle, /* File handle */
|
---|
250 | &ulAction, /* Action taken */
|
---|
251 | 0,
|
---|
252 | FILE_NORMAL,
|
---|
253 | FILE_OPEN,
|
---|
254 | sharetype,
|
---|
255 | 0L); /* No extended attribute */
|
---|
256 |
|
---|
257 | dprintf(("DosOpen %s returned %d\n", drvname, rc));
|
---|
258 |
|
---|
259 | if(rc == NO_ERROR) {
|
---|
260 | knownDriver[i].hDevice = (DWORD)hfFileHandle;
|
---|
261 | return((HANDLE)hfFileHandle);
|
---|
262 | }
|
---|
263 | else return(0);
|
---|
264 | }
|
---|
265 | //******************************************************************************
|
---|
266 | //******************************************************************************
|
---|
267 | BOOL WIN32API QueryPerformanceCounter(LARGE_INTEGER *lpPerformanceCount)
|
---|
268 | {
|
---|
269 | QWORD time;
|
---|
270 | APIRET rc;
|
---|
271 |
|
---|
272 | rc = DosTmrQueryTime(&time);
|
---|
273 | if(rc) {
|
---|
274 | dprintf(("DosTmrQueryTime returned %d\n", rc));
|
---|
275 | return(FALSE);
|
---|
276 | }
|
---|
277 | lpPerformanceCount->u.LowPart = time.ulLo;
|
---|
278 | lpPerformanceCount->u.HighPart = time.ulHi;
|
---|
279 | return(TRUE);
|
---|
280 | }
|
---|
281 | //******************************************************************************
|
---|
282 | //******************************************************************************
|
---|
283 | BOOL WIN32API QueryPerformanceFrequency(LARGE_INTEGER *lpFrequency)
|
---|
284 | {
|
---|
285 | APIRET rc;
|
---|
286 | ULONG freq;
|
---|
287 |
|
---|
288 | rc = DosTmrQueryFreq(&freq);
|
---|
289 | if(rc) {
|
---|
290 | dprintf(("DosTmrQueryFreq returned %d\n", rc));
|
---|
291 | return(FALSE);
|
---|
292 | }
|
---|
293 | lpFrequency->u.LowPart = freq;
|
---|
294 | lpFrequency->u.HighPart = 0;
|
---|
295 | dprintf(("OS2QueryPerformanceFrequency returned 0x%X%X\n", lpFrequency->u.HighPart, lpFrequency->u.LowPart));
|
---|
296 | return(TRUE);
|
---|
297 | }
|
---|
298 | //******************************************************************************
|
---|
299 | //******************************************************************************
|
---|
300 |
|
---|