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