mpv/libdha/sysdep/libdha_os2.c

162 lines
5.0 KiB
C
Raw Normal View History

/* $XFree86: xc/programs/Xserver/hw/xfree86/os-support/os2/os2_video.c,v 3.14 2000/10/28 01:42:28 mvojkovi Exp $ */
/* Modified for libdha by Nick Kurshev. */
/*
* (c) Copyright 1994,1999 by Holger Veit
* <Holger.Veit@gmd.de>
* Modified 1996 by Sebastien Marineau <marineau@genie.uottawa.ca>
*
* Permission is hereby granted, free of charge, to any person obtaining a
* copy of this software and associated documentation files (the "Software"),
* to deal in the Software without restriction, including without limitation
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
* and/or sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* HOLGER VEIT BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
* WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF
* OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
* SOFTWARE.
*
* Except as contained in this notice, the name of Holger Veit shall not be
* used in advertising or otherwise to promote the sale, use or other dealings
* in this Software without prior written authorization from Holger Veit.
*
*/
/* $XConsortium: os2_video.c /main/8 1996/10/27 11:49:02 kaleb $ */
#define INCL_DOSFILEMGR
#include "os2.h"
/***************************************************************************/
/* Video Memory Mapping helper functions */
/***************************************************************************/
/* This section uses the xf86sup.sys driver developed for xfree86.
* The driver allows mapping of physical memory
* You must install it with a line DEVICE=path\xf86sup.sys in config.sys.
*/
static HFILE mapdev = -1;
static ULONG stored_virt_addr;
static char* mappath = "\\DEV\\PMAP$";
static HFILE open_mmap()
{
APIRET rc;
ULONG action;
if (mapdev != -1)
return mapdev;
rc = DosOpen((PSZ)mappath, (PHFILE)&mapdev, (PULONG)&action,
(ULONG)0, FILE_SYSTEM, FILE_OPEN,
OPEN_SHARE_DENYNONE|OPEN_FLAGS_NOINHERIT|OPEN_ACCESS_READONLY,
(ULONG)0);
if (rc!=0)
mapdev = -1;
return mapdev;
}
static void close_mmap()
{
if (mapdev != -1)
DosClose(mapdev);
mapdev = -1;
}
/* this structure is used as a parameter packet for the direct access
* ioctl of pmap$
*/
/* Changed here for structure of driver PMAP$ */
typedef struct{
ULONG addr;
ULONG size;
} DIOParPkt;
/* This is the data packet for the mapping function */
typedef struct {
ULONG addr;
USHORT sel;
} DIODtaPkt;
/***************************************************************************/
/* Video Memory Mapping section */
/***************************************************************************/
static long callcount = 0L;
/* ARGSUSED */
void * map_phys_mem(unsigned long base, unsigned long size)
{
DIOParPkt par;
ULONG plen;
DIODtaPkt dta;
ULONG dlen;
static BOOL ErrRedir = FALSE;
APIRET rc;
par.addr = (ULONG)base;
par.size = (ULONG)size;
plen = sizeof(par);
dlen = sizeof(dta);
open_mmap();
if (mapdev == -1)
{
perror("libdha: device xf86sup.sys is not installed");
exit(1);
}
if ((rc=DosDevIOCtl(mapdev, (ULONG)0x76, (ULONG)0x44,
(PVOID)&par, (ULONG)plen, (PULONG)&plen,
(PVOID)&dta, (ULONG)dlen, (PULONG)&dlen)) == 0) {
if (dlen==sizeof(dta)) {
callcount++;
return (void *)dta.addr;
}
/*else fail*/
}
return (void *)-1;
}
/* ARGSUSED */
void unmap_phys_mem(void * base, unsigned long size)
{
DIOParPkt par;
ULONG plen,vmaddr;
/* We need here the VIRTADDR for unmapping, not the physical address */
/* This should be taken care of either here by keeping track of allocated */
/* pointers, but this is also already done in the driver... Thus it would */
/* be a waste to do this tracking twice. Can this be changed when the fn. */
/* is called? This would require tracking this function in all servers, */
/* and changing it appropriately to call this with the virtual adress */
/* If the above mapping function is only called once, then we can store */
/* the virtual adress and use it here.... */
par.addr = (ULONG)base;
par.size = 0xffffffff; /* This is the virtual address parameter. Set this to ignore */
plen = sizeof(par);
if (mapdev != -1)
{
DosDevIOCtl(mapdev, (ULONG)0x76, (ULONG)0x46,
(PVOID)&par, (ULONG)plen, (PULONG)&plen,
&vmaddr, sizeof(ULONG), &plen);
callcount--;
}
/* Now if more than one region has been allocated and we close the driver,
* the other pointers will immediately become invalid. We avoid closing
* driver for now, but this should be fixed for server exit
*/
if(!callcount) close_mmap();
}