| 1 | /* $Id: hmdevio.cpp,v 1.7 2000-10-05 13:48:09 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 | #define DBG_LOCALLOG    DBG_hmdevio | 
|---|
| 31 | #include "dbglocal.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 | void RegisterDevices() | 
|---|
| 53 | { | 
|---|
| 54 | HMDeviceDriver *driver; | 
|---|
| 55 | DWORD rc; | 
|---|
| 56 |  | 
|---|
| 57 | for(int i=0;i<nrKnownDrivers;i++) | 
|---|
| 58 | { | 
|---|
| 59 | driver = new HMDeviceDriver(knownDriver[i].szWin32Name, | 
|---|
| 60 | knownDriver[i].szOS2Name, | 
|---|
| 61 | knownDriver[i].fCreateFile, | 
|---|
| 62 | knownDriver[i].devIOCtl); | 
|---|
| 63 |  | 
|---|
| 64 | rc = HMDeviceRegister(knownDriver[i].szWin32Name, driver); | 
|---|
| 65 | if (rc != NO_ERROR)                                  /* check for errors */ | 
|---|
| 66 | dprintf(("KERNEL32:RegisterDevices: registering %s failed with %u.\n", | 
|---|
| 67 | knownDriver[i].szWin32Name, rc)); | 
|---|
| 68 | } | 
|---|
| 69 | return; | 
|---|
| 70 | } | 
|---|
| 71 | //****************************************************************************** | 
|---|
| 72 | //****************************************************************************** | 
|---|
| 73 | HMDeviceDriver::HMDeviceDriver(LPCSTR lpDeviceName, LPSTR lpOS2DevName, BOOL fCreate, | 
|---|
| 74 | WINIOCTL pDevIOCtl) | 
|---|
| 75 | : HMDeviceKernelObjectClass(lpDeviceName) | 
|---|
| 76 | { | 
|---|
| 77 | this->fCreateFile = fCreateFile; | 
|---|
| 78 | this->szOS2Name   = lpOS2DevName; | 
|---|
| 79 | this->devIOCtl    = pDevIOCtl; | 
|---|
| 80 | } | 
|---|
| 81 | //****************************************************************************** | 
|---|
| 82 | //****************************************************************************** | 
|---|
| 83 | DWORD HMDeviceDriver::CreateFile (LPCSTR lpFileName, | 
|---|
| 84 | PHMHANDLEDATA pHMHandleData, | 
|---|
| 85 | PVOID         lpSecurityAttributes, | 
|---|
| 86 | PHMHANDLEDATA pHMHandleDataTemplate) | 
|---|
| 87 | { | 
|---|
| 88 | APIRET rc; | 
|---|
| 89 | HFILE  hfFileHandle   = 0L;     /* Handle for file being manipulated */ | 
|---|
| 90 | ULONG  ulAction       = 0;      /* Action taken by DosOpen */ | 
|---|
| 91 | ULONG  sharetype = 0; | 
|---|
| 92 |  | 
|---|
| 93 | if(pHMHandleData->dwAccess & (GENERIC_READ | GENERIC_WRITE)) | 
|---|
| 94 | sharetype |= OPEN_ACCESS_READWRITE; | 
|---|
| 95 | else | 
|---|
| 96 | if(pHMHandleData->dwAccess & GENERIC_WRITE) | 
|---|
| 97 | sharetype |= OPEN_ACCESS_WRITEONLY; | 
|---|
| 98 |  | 
|---|
| 99 | if(pHMHandleData->dwShare == 0) | 
|---|
| 100 | sharetype |= OPEN_SHARE_DENYREADWRITE; | 
|---|
| 101 | else | 
|---|
| 102 | if(pHMHandleData->dwShare & (FILE_SHARE_READ | FILE_SHARE_WRITE)) | 
|---|
| 103 | sharetype |= OPEN_SHARE_DENYNONE; | 
|---|
| 104 | else | 
|---|
| 105 | if(pHMHandleData->dwShare & FILE_SHARE_WRITE) | 
|---|
| 106 | sharetype |= OPEN_SHARE_DENYREAD; | 
|---|
| 107 | else | 
|---|
| 108 | if(pHMHandleData->dwShare & FILE_SHARE_READ) | 
|---|
| 109 | sharetype |= OPEN_SHARE_DENYWRITE; | 
|---|
| 110 |  | 
|---|
| 111 | if(szOS2Name[0] == 0) { | 
|---|
| 112 | pHMHandleData->hHMHandle = 0; | 
|---|
| 113 | return (NO_ERROR); | 
|---|
| 114 | } | 
|---|
| 115 |  | 
|---|
| 116 | tryopen: | 
|---|
| 117 | rc = DosOpen( szOS2Name,                        /* File path name */ | 
|---|
| 118 | &hfFileHandle,                  /* File handle */ | 
|---|
| 119 | &ulAction,                      /* Action taken */ | 
|---|
| 120 | 0, | 
|---|
| 121 | FILE_NORMAL, | 
|---|
| 122 | FILE_OPEN, | 
|---|
| 123 | sharetype, | 
|---|
| 124 | 0L);                            /* No extended attribute */ | 
|---|
| 125 |  | 
|---|
| 126 | if(rc == ERROR_TOO_MANY_OPEN_FILES) { | 
|---|
| 127 | ULONG CurMaxFH; | 
|---|
| 128 | LONG  ReqCount = 32; | 
|---|
| 129 |  | 
|---|
| 130 | rc = DosSetRelMaxFH(&ReqCount, &CurMaxFH); | 
|---|
| 131 | if(rc) { | 
|---|
| 132 | dprintf(("DosSetRelMaxFH returned %d", rc)); | 
|---|
| 133 | return rc; | 
|---|
| 134 | } | 
|---|
| 135 | dprintf(("DosOpen failed -> increased nr open files to %d", CurMaxFH)); | 
|---|
| 136 | goto tryopen; | 
|---|
| 137 | } | 
|---|
| 138 |  | 
|---|
| 139 | dprintf(("DosOpen %s returned %d\n", szOS2Name, rc)); | 
|---|
| 140 |  | 
|---|
| 141 | if(rc == NO_ERROR) { | 
|---|
| 142 | pHMHandleData->hHMHandle = hfFileHandle; | 
|---|
| 143 | return (NO_ERROR); | 
|---|
| 144 | } | 
|---|
| 145 | else  return(rc); | 
|---|
| 146 | } | 
|---|
| 147 | //****************************************************************************** | 
|---|
| 148 | //****************************************************************************** | 
|---|
| 149 | DWORD HMDeviceDriver::CloseHandle(PHMHANDLEDATA pHMHandleData) | 
|---|
| 150 | { | 
|---|
| 151 | DWORD rc = 0; | 
|---|
| 152 |  | 
|---|
| 153 | if(pHMHandleData->hHMHandle) { | 
|---|
| 154 | rc = DosClose(pHMHandleData->hHMHandle); | 
|---|
| 155 | } | 
|---|
| 156 | pHMHandleData->hHMHandle = 0; | 
|---|
| 157 | return rc; | 
|---|
| 158 | } | 
|---|
| 159 | //****************************************************************************** | 
|---|
| 160 | //****************************************************************************** | 
|---|
| 161 | BOOL HMDeviceDriver::DeviceIoControl(PHMHANDLEDATA pHMHandleData, DWORD dwIoControlCode, | 
|---|
| 162 | LPVOID lpInBuffer, DWORD nInBufferSize, | 
|---|
| 163 | LPVOID lpOutBuffer, DWORD nOutBufferSize, | 
|---|
| 164 | LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped) | 
|---|
| 165 | { | 
|---|
| 166 | return devIOCtl(pHMHandleData->hHMHandle, dwIoControlCode, lpInBuffer, nInBufferSize, | 
|---|
| 167 | lpOutBuffer, nOutBufferSize, lpBytesReturned, lpOverlapped); | 
|---|
| 168 | } | 
|---|
| 169 | //****************************************************************************** | 
|---|
| 170 | //****************************************************************************** | 
|---|
| 171 | static BOOL GpdDevIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped) | 
|---|
| 172 | { | 
|---|
| 173 | ULONG port, val = 0; | 
|---|
| 174 |  | 
|---|
| 175 | if(fX86Init == FALSE) { | 
|---|
| 176 | if(io_init() == 0) | 
|---|
| 177 | fX86Init = TRUE; | 
|---|
| 178 | else    return(FALSE); | 
|---|
| 179 | } | 
|---|
| 180 |  | 
|---|
| 181 | *lpBytesReturned = 0; | 
|---|
| 182 |  | 
|---|
| 183 | port = ((GENPORT_WRITE_INPUT *)lpInBuffer)->PortNumber; | 
|---|
| 184 |  | 
|---|
| 185 | switch((dwIoControlCode >> 2) & 0xFFF) { | 
|---|
| 186 | case IOCTL_GPD_READ_PORT_UCHAR: | 
|---|
| 187 | if(nOutBufferSize < sizeof(char)) | 
|---|
| 188 | return(FALSE); | 
|---|
| 189 |  | 
|---|
| 190 | val = c_inb(port); | 
|---|
| 191 | *(char *)lpOutBuffer = val; | 
|---|
| 192 | *lpBytesReturned = sizeof(char); | 
|---|
| 193 | break; | 
|---|
| 194 | case IOCTL_GPD_READ_PORT_USHORT: | 
|---|
| 195 | if(nOutBufferSize < sizeof(USHORT)) | 
|---|
| 196 | return(FALSE); | 
|---|
| 197 |  | 
|---|
| 198 | val = c_inw(port); | 
|---|
| 199 | *(USHORT *)lpOutBuffer = val; | 
|---|
| 200 | *lpBytesReturned = sizeof(USHORT); | 
|---|
| 201 | break; | 
|---|
| 202 | case IOCTL_GPD_READ_PORT_ULONG: | 
|---|
| 203 | if(nOutBufferSize < sizeof(ULONG)) | 
|---|
| 204 | return(FALSE); | 
|---|
| 205 |  | 
|---|
| 206 | val = c_inl(port); | 
|---|
| 207 | *(ULONG *)lpOutBuffer = val; | 
|---|
| 208 | *lpBytesReturned = sizeof(ULONG); | 
|---|
| 209 | break; | 
|---|
| 210 | case IOCTL_GPD_WRITE_PORT_UCHAR: | 
|---|
| 211 | val   = ((GENPORT_WRITE_INPUT *)lpInBuffer)->CharData; | 
|---|
| 212 | c_outb(port, val); | 
|---|
| 213 | break; | 
|---|
| 214 | case IOCTL_GPD_WRITE_PORT_USHORT: | 
|---|
| 215 | val   = ((GENPORT_WRITE_INPUT *)lpInBuffer)->ShortData; | 
|---|
| 216 | c_outw(port, val); | 
|---|
| 217 | break; | 
|---|
| 218 | case IOCTL_GPD_WRITE_PORT_ULONG: | 
|---|
| 219 | val   = ((GENPORT_WRITE_INPUT *)lpInBuffer)->LongData; | 
|---|
| 220 | c_outl(port, val); | 
|---|
| 221 | break; | 
|---|
| 222 | default: | 
|---|
| 223 | dprintf(("GpdDevIOCtl unknown func %X\n", (dwIoControlCode >> 2) & 0xFFF)); | 
|---|
| 224 | return(FALSE); | 
|---|
| 225 | } | 
|---|
| 226 |  | 
|---|
| 227 | return(TRUE); | 
|---|
| 228 | } | 
|---|
| 229 | //****************************************************************************** | 
|---|
| 230 | //****************************************************************************** | 
|---|
| 231 | static BOOL MAPMEMIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped) | 
|---|
| 232 | { | 
|---|
| 233 | PHYSICAL_MEMORY_INFO *meminfo = (PHYSICAL_MEMORY_INFO *)lpInBuffer; | 
|---|
| 234 | struct map_ioctl memmap; | 
|---|
| 235 |  | 
|---|
| 236 | *lpBytesReturned = 0; | 
|---|
| 237 |  | 
|---|
| 238 | switch((dwIoControlCode >> 2) & 0xFFF) { | 
|---|
| 239 | case IOCTL_MAPMEM_MAP_USER_PHYSICAL_MEMORY: | 
|---|
| 240 | if(nInBufferSize != sizeof(PHYSICAL_MEMORY_INFO)) | 
|---|
| 241 | return(FALSE); | 
|---|
| 242 |  | 
|---|
| 243 | memmap.a.phys = meminfo->BusAddress.u.LowPart; | 
|---|
| 244 | memmap.size = meminfo->Length; | 
|---|
| 245 | dprintf(("DeviceIoControl map phys address %X length %X\n", memmap.a.phys, memmap.size)); | 
|---|
| 246 | if(mpioctl((HFILE)hDevice, IOCTL_MAP, &memmap) == -1) { | 
|---|
| 247 | dprintf(("mpioctl failed!\n")); | 
|---|
| 248 | return(FALSE); | 
|---|
| 249 | } | 
|---|
| 250 |  | 
|---|
| 251 | dprintf(("DeviceIoControl map virt address = %X\n", memmap.a.user)); | 
|---|
| 252 | *(ULONG *)lpOutBuffer = (ULONG)memmap.a.user; | 
|---|
| 253 | break; | 
|---|
| 254 | case IOCTL_MAPMEM_UNMAP_USER_PHYSICAL_MEMORY: | 
|---|
| 255 | dprintf(("Unmap mapping %X\n", *(ULONG *)lpInBuffer)); | 
|---|
| 256 | memmap.a.phys = *(ULONG *)lpInBuffer; | 
|---|
| 257 | memmap.size = 0; | 
|---|
| 258 | if(mpioctl((HFILE)hDevice, IOCTL_MAP, &memmap) == -1) | 
|---|
| 259 | return(FALSE); | 
|---|
| 260 | break; | 
|---|
| 261 | default: | 
|---|
| 262 | dprintf(("MAPMEMIOCtl unknown func %X\n", (dwIoControlCode >> 2) & 0xFFF)); | 
|---|
| 263 | return(FALSE); | 
|---|
| 264 | } | 
|---|
| 265 |  | 
|---|
| 266 | return(TRUE); | 
|---|
| 267 | } | 
|---|
| 268 | //****************************************************************************** | 
|---|
| 269 | //****************************************************************************** | 
|---|
| 270 | static BOOL FXMEMMAPIOCtl(HANDLE hDevice, DWORD dwIoControlCode, LPVOID lpInBuffer, DWORD nInBufferSize, LPVOID lpOutBuffer, DWORD nOutBufferSize, LPDWORD lpBytesReturned, LPOVERLAPPED lpOverlapped) | 
|---|
| 271 | { | 
|---|
| 272 | struct map_ioctl memmap; | 
|---|
| 273 | MAPDEVREQUEST *vxdmem = (MAPDEVREQUEST *)lpInBuffer; | 
|---|
| 274 |  | 
|---|
| 275 | switch(dwIoControlCode) { | 
|---|
| 276 | case 1: | 
|---|
| 277 | break; | 
|---|
| 278 | case 2: | 
|---|
| 279 | memmap.a.phys = (DWORD)vxdmem->mdr_PhysicalAddress; | 
|---|
| 280 | memmap.size = vxdmem->mdr_SizeInBytes; | 
|---|
| 281 | dprintf(("DeviceIoControl map phys address %X length %X\n", memmap.a.phys, memmap.size)); | 
|---|
| 282 | if(mpioctl((HFILE)hDevice, IOCTL_MAP, &memmap) == -1) { | 
|---|
| 283 | dprintf(("mpioctl failed!\n")); | 
|---|
| 284 | return(FALSE); | 
|---|
| 285 | } | 
|---|
| 286 |  | 
|---|
| 287 | dprintf(("DeviceIoControl map virt address = %X\n", memmap.a.user)); | 
|---|
| 288 | vxdmem->mdr_LinearAddress = (PVOID)memmap.a.user; | 
|---|
| 289 | break; | 
|---|
| 290 | default: | 
|---|
| 291 | dprintf(("FXMEMMAPIOCtl unknown func %X\n", (dwIoControlCode >> 2) & 0xFFF)); | 
|---|
| 292 | return(FALSE); | 
|---|
| 293 | } | 
|---|
| 294 |  | 
|---|
| 295 | return(TRUE); | 
|---|
| 296 | } | 
|---|
| 297 | //****************************************************************************** | 
|---|
| 298 | //****************************************************************************** | 
|---|
| 299 | BOOL WIN32API QueryPerformanceCounter(LARGE_INTEGER *lpPerformanceCount) | 
|---|
| 300 | { | 
|---|
| 301 | QWORD  time; | 
|---|
| 302 | APIRET rc; | 
|---|
| 303 |  | 
|---|
| 304 | rc = DosTmrQueryTime(&time); | 
|---|
| 305 | if(rc) { | 
|---|
| 306 | dprintf(("DosTmrQueryTime returned %d\n", rc)); | 
|---|
| 307 | return(FALSE); | 
|---|
| 308 | } | 
|---|
| 309 | lpPerformanceCount->u.LowPart  = time.ulLo; | 
|---|
| 310 | lpPerformanceCount->u.HighPart = time.ulHi; | 
|---|
| 311 | return(TRUE); | 
|---|
| 312 | } | 
|---|
| 313 | //****************************************************************************** | 
|---|
| 314 | //****************************************************************************** | 
|---|
| 315 | BOOL WIN32API QueryPerformanceFrequency(LARGE_INTEGER *lpFrequency) | 
|---|
| 316 | { | 
|---|
| 317 | APIRET  rc; | 
|---|
| 318 | ULONG   freq; | 
|---|
| 319 |  | 
|---|
| 320 | rc = DosTmrQueryFreq(&freq); | 
|---|
| 321 | if(rc) { | 
|---|
| 322 | dprintf(("DosTmrQueryFreq returned %d\n", rc)); | 
|---|
| 323 | return(FALSE); | 
|---|
| 324 | } | 
|---|
| 325 | lpFrequency->u.LowPart  = freq; | 
|---|
| 326 | lpFrequency->u.HighPart = 0; | 
|---|
| 327 | dprintf2(("QueryPerformanceFrequency returned 0x%X%X\n", lpFrequency->u.HighPart, lpFrequency->u.LowPart)); | 
|---|
| 328 | return(TRUE); | 
|---|
| 329 | } | 
|---|
| 330 | //****************************************************************************** | 
|---|
| 331 | //****************************************************************************** | 
|---|