| 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 |
|
|---|