#include "src/lib/16_pm.h"\r
#pragma hdrstop\r
\r
-#ifdef __DEBUG__\r
-boolean dbg_debugpm=0;\r
-#endif\r
-\r
// Main Mem specific variables\r
//boolean MainPresent;\r
/* memptr MainMemPages[PMMaxMainMem];\r
// XMS specific variables\r
//boolean XMSPresent;\r
//word gvar->pm.xmm.XMSAvail,gvar->pm.xmm.XMSPagesAvail,gvar->pm.xmm.XMSHandle;\r
- dword XMSDriver;\r
+ dword XMSDriver; //hard to put in gvar\r
+ word XMSVer; //hard to put in gvar\r
/* int gvar->pm.xmm.XMSProtectPage = -1;\r
\r
// File specific variables\r
PageListStruct far *gvar->pm.PMPages,\r
_seg *gvar->pm.PMSegPages;*/\r
\r
+static union REGS CPURegs;\r
+\r
+#define _AX CPURegs.x.ax\r
+#define _BX CPURegs.x.bx\r
+#define _CX CPURegs.x.cx\r
+#define _DX CPURegs.x.dx\r
+\r
+#define _SI CPURegs.x.si\r
+\r
+#define _AH CPURegs.h.ah\r
+#define _AL CPURegs.h.al\r
+#define _BH CPURegs.h.bh\r
+#define _BL CPURegs.h.bl\r
+#define _CH CPURegs.h.ch\r
+#define _CL CPURegs.h.cl\r
+#define _DH CPURegs.h.dh\r
+#define _DL CPURegs.h.dl\r
+\r
+#ifdef __WATCOMC__\r
+#define geninterrupt(n) int86(n,&CPURegs,&CPURegs);\r
+#endif\r
+\r
static char *ParmStrings[] = {"nomain","noems","noxms",nil};\r
\r
/////////////////////////////////////////////////////////////////////////////\r
byte\r
PML_MapEMS(word logical, byte physical, global_game_variables_t *gvar)\r
{\r
- byte err, str[160];\r
+ byte err=0, str[160];\r
unsigned EMShandle;\r
- int i;\r
+ //int i;\r
\r
boolean errorflag=false;\r
EMShandle=gvar->pm.emm.EMSHandle;\r
{\r
int i;\r
//long size;\r
- byte err, str[64];\r
+ byte err=0, str[64];\r
\r
boolean errorflag=false;\r
static char emmname[] = "EMMXXXX0"; //fix by andrius4669\r
unsigned int EMSVer = 0;\r
- unsigned totalEMSpages,freeEMSpages,EMSPageFrame,EMSHandle,EMSAvail;\r
+ unsigned totalEMSpages,freeEMSpages,EMSPageFrame,EMSHandle=0,EMSAvail=0;\r
totalEMSpages = freeEMSpages = EMSPageFrame = 0;\r
gvar->pm.emm.EMSPresent = false; // Assume that we'll fail\r
gvar->pm.emm.EMSAvail = 0;\r
__asm {\r
mov dx,OFFSET emmname //fix by andrius4669\r
mov ax,0x3d00\r
- int EMS_INT // try to open EMMXXXX0 device\r
+ int EMM_INT // try to open EMMXXXX0 device\r
jc error1\r
\r
mov bx,ax\r
mov ax,0x4400\r
\r
- int EMS_INT // get device info\r
+ int EMM_INT // get device info\r
jc error1\r
\r
and dx,0x80\r
\r
mov ax,0x4407\r
\r
- int EMS_INT // get status\r
+ int EMM_INT // get status\r
jc error1\r
or al,al\r
jz error1\r
\r
mov ah,0x3e\r
- int EMS_INT // close handle\r
+ int EMM_INT // close handle\r
jc error1\r
\r
mov ah,EMS_STATUS\r
PML_ShutdownEMS(global_game_variables_t *gvar)\r
{\r
word EMSHandle;\r
- byte err,str[64];\r
+ byte err=0, str[64];\r
\r
boolean errorflag=false;\r
EMSHandle=gvar->pm.emm.EMSHandle;\r
boolean\r
PML_StartupXMS(global_game_variables_t *gvar)\r
{\r
+//TODO: translate the _REG into working assembly\r
//#define STARTUPXMSASM\r
byte err;\r
-#ifndef STARTUPXMSASM\r
-#define XMSAVI gvar->pm.xmm.XMSAvail\r
-#define XMSHAN gvar->pm.xmm.XMSHandle\r
-#else\r
- #define BRACKETXMS\r
- word XMSAvail, XMSHandle;\r
-#define XMSAVI XMSAvail\r
-#define XMSHAN XMSHandle\r
-#endif\r
-//++++ word XMSVer;\r
+ word XMSAvail, XMSHandle;//, XMSVer;\r
boolean errorflag=false;\r
word e=0;\r
gvar->pm.xmm.XMSPresent = false; // Assume failure\r
- XMSAVI = gvar->mmi.XMSmem = 0;\r
+ XMSAvail = gvar->mmi.XMSmem = 0;\r
\r
__asm {\r
mov ax,0x4300\r
int XMS_INT // Get address of XMS driver\r
mov [WORD PTR XMSDriver],bx\r
mov [WORD PTR XMSDriver+2],es // function pointer to XMS driver\r
-//++++ mov ah,0\r
-//++++ call [DWORD PTR XMSDriver] //; Get XMS Version Number\r
-//++++ mov [XMSVer],ax\r
+\r
+ mov ah,XMS_VERSION\r
+ call [DWORD PTR XMSDriver] //; Get XMS Version Number\r
+ mov [XMSVer],ax\r
mov e,2\r
\r
#ifdef STARTUPXMSASM\r
mov ah,XMS_QUERYFREE // Find out how much XMS is available\r
- call [DWORD PTR XMSDriver]//DWORD PTR\r
-#ifndef BRACKETXMS\r
- mov XMSAVI,ax\r
-#else\r
- mov [XMSAVI],ax\r
-#endif\r
+ call [DWORD PTR XMSDriver]\r
+ mov XMSAvail,ax\r
or ax,ax // AJR: bugfix 10/8/92\r
jz error1\r
mov e,3\r
if(errorflag==true) goto error;\r
#ifndef STARTUPXMSASM\r
XMS_CALL(XMS_QUERYFREE); // Find out how much XMS is available\r
- XMSAVI = _AX;\r
+ XMSAvail = _AX;\r
if (!_AX) // AJR: bugfix 10/8/92\r
{\r
errorflag = true;\r
#endif\r
\r
#ifdef __DEBUG_PM__\r
-//++++ printf("XMSVer=%02X ", XMSVer);\r
- printf("XMSAvail=%u\n", XMSAVI);\r
+ printf("XMSVer=%02X ", XMSVer);\r
+ printf("XMSAvail=%u\n", XMSAvail);\r
+ getch();\r
#endif\r
- XMSAVI &= ~(PMPageSizeKB - 1); // Round off to nearest page size\r
- if (XMSAVI < (PMPageSizeKB * 2)) // Need at least 2 pages\r
+ XMSAvail &= ~(PMPageSizeKB - 1); // Round off to nearest page size\r
+ if (XMSAvail < (PMPageSizeKB * 2)) // Need at least 2 pages\r
{\r
errorflag=true;\r
goto error;\r
}\r
#ifdef STARTUPXMSASM\r
__asm {\r
-#ifndef BRACKETXMS\r
- mov dx,XMSAVI\r
-#else\r
- mov dx,[XMSAVI]\r
-#endif\r
+ mov dx,XMSAvail\r
mov ah,XMS_ALLOC // And do the allocation\r
- call [DWORD PTR XMSDriver]//DWORD PTR\r
-#ifndef BRACKETXMS\r
- mov XMSHAN,dx\r
-#else\r
- mov [XMSHAN],dx\r
-#endif\r
+ call [DWORD PTR XMSDriver]\r
+ mov XMSHandle,dx\r
or ax,ax // AJR: bugfix 10/8/92\r
jz error2\r
mov e,4\r
}\r
#endif\r
#else\r
- _DX = XMSAVI;\r
+ _DX = XMSAvail;\r
XMS_CALL(XMS_ALLOC); // And do the allocation\r
- XMSHAN = _DX;\r
+ XMSHandle = _DX;\r
if (!_AX) // AJR: bugfix 10/8/92\r
{\r
errorflag=true;\r
error:\r
if(errorflag==false)\r
{\r
- gvar->mmi.XMSmem = (dword)(XMSAVI) * 1024;\r
-#ifdef STARTUPXMSASM\r
- gvar->pm.xmm.XMSAvail = XMSAVI;\r
- gvar->pm.xmm.XMSHandle = XMSHAN;\r
-#endif\r
-//++++ gvar->pm.xmm.XMSVer = XMSVer;\r
+ gvar->mmi.XMSmem = (dword)(XMSAvail) * 1024;\r
+ gvar->pm.xmm.XMSAvail = XMSAvail;\r
+ gvar->pm.xmm.XMSHandle = XMSHandle;\r
+ //gvar->pm.xmm.XMSVer = XMSVer;\r
gvar->pm.xmm.XMSPresent = true;\r
#ifdef __DEBUG_PM__\r
- printf(" XMSmem=%lu XMSAvail=%u\n", gvar->mmi.XMSmem, XMSAVI);\r
+ printf(" XMSmem=%lu XMSAvail=%u\n", gvar->mmi.XMSmem, XMSAvail);\r
#endif\r
}\r
else\r
//printf(" 1=%u 2=%u 3=%u 4=%u\n", XMSHandle1, XMSHandle2, XMSHandle3, XMSHandle4);\r
//printf(" 2=%u ", XMSHandle);\r
//printf(" %u", gvar->pm.xmm.XMSHandle);\r
- printf("err=%02X e=%u\n", err, e);\r
+ printf(" err=%02X e=%u\n", err, e);\r
#endif\r
}\r
return(gvar->pm.xmm.XMSPresent);\r
void\r
PML_StartupMainMem(global_game_variables_t *gvar)\r
{\r
- int i,n;\r
+ int i;//,n;\r
memptr *p;\r
\r
gvar->pm.mm.MainPagesAvail = 0;\r
void\r
PM_Preload(boolean (*update)(word current,word total), global_game_variables_t *gvar)\r
{\r
- int i,j,\r
+ int i,//j,\r
page,oogypage;\r
word current,total,\r
- totalnonxms,totalxms,\r
+ //totalnonxms,totalxms,\r
mainfree,maintotal,\r
- emsfree,emstotal,\r
+ //emstotal,emsfree,\r
xmsfree,xmstotal;\r
memptr addr;\r
- PageListStruct far *p;\r
+ PageListStruct __far *p;\r
\r
mainfree = (gvar->pm.mm.MainPagesAvail - gvar->pm.MainPagesUsed) + (gvar->pm.emm.EMSPagesAvail - gvar->pm.EMSPagesUsed);\r
xmsfree = (gvar->pm.xmm.XMSPagesAvail - gvar->pm.XMSPagesUsed);\r
if (gvar->pm.PMStarted)\r
return;\r
\r
- //strcpy(&(gvar->pm.fi.PageFileName), "VSWAP.");\r
+ //0000+=+=strcpy(&(gvar->pm.fi.PageFileName), "VSWAP.");\r
\r
nomain = noems = noxms = false;\r
- for (i = 1;i <\r
-#ifdef __WATCOMC__\r
- __argc\r
-#endif\r
-#ifdef __BORLANDC__\r
- _argc\r
-#endif\r
- ;i++)\r
+ for (i = 1;i < _argc;i++)\r
{\r
- switch (US_CheckParm(\r
-#ifdef __WATCOMC__\r
- __argv[i]\r
-#endif\r
-#ifdef __BORLANDC__\r
- _argv[i]\r
-#endif\r
- ,ParmStrings))\r
+ switch (US_CheckParm(_argv[i],ParmStrings))\r
{\r
case 0:\r
nomain = true;\r
PML_StartupEMS(gvar);\r
if (!noxms && MML_CheckForXMS())\r
PML_StartupXMS(gvar);\r
+ if(!nomain)\r
+ PML_StartupMainMem(gvar);\r
\r
- if (!nomain && !gvar->pm.emm.EMSPresent)\r
+ if (!gvar->pm.mm.MainPresent && !gvar->pm.emm.EMSPresent && !gvar->pm.xmm.XMSPresent)\r
{\r
- printf("PM_Startup: No main or EMS\n");\r
- exit(-5);\r
+ Quit("PM_Startup: No main or EMS\n");\r
//return;\r
}\r
- PML_StartupMainMem(gvar);\r
\r
PM_Reset(gvar);\r
\r
if (!gvar->pm.PMStarted)\r
return;\r
\r
- PML_ClosePageFile(gvar);\r
+ //PML_ClosePageFile(gvar);\r
\r
PML_ShutdownMainMem(gvar);\r
}\r