]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/16_pm.c
ok wwwww zscroll and scroll compile disabled due to me being too tired to whack at...
[16.git] / src / lib / 16_pm.c
index 3b19c0ae4388ba89ec75dda3f0db750d5e06efe7..3a125111d1068557dd8fc20f53b5169d73cb206b 100755 (executable)
 #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
@@ -48,7 +44,8 @@ boolean dbg_debugpm=0;
 //     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
@@ -69,6 +66,28 @@ boolean dbg_debugpm=0;
        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
@@ -83,9 +102,9 @@ static       char            *ParmStrings[] = {"nomain","noems","noxms",nil};
 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
@@ -140,12 +159,12 @@ PML_StartupEMS(global_game_variables_t *gvar)
 {\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
@@ -154,13 +173,13 @@ PML_StartupEMS(global_game_variables_t *gvar)
        __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
@@ -168,13 +187,13 @@ PML_StartupEMS(global_game_variables_t *gvar)
 \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
@@ -298,7 +317,7 @@ void
 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
@@ -354,16 +373,14 @@ PML_ShutdownEMS(global_game_variables_t *gvar)
 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
-       word XMSAvail, XMSHandle;\r
-#define XMSAVI XMSAvail\r
-#define XMSHAN XMSHandle\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
@@ -376,17 +393,18 @@ PML_StartupXMS(global_game_variables_t *gvar)
                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]\r
-               mov     XMSAVI,ax\r
-               cmp     bl,0xa0                         // AJR: bugfix 10/8/92\r
-               je      error1\r
+               mov     XMSAvail,ax\r
+               or      ax,ax                           // AJR: bugfix 10/8/92\r
+               jz      error1\r
                mov     e,3\r
 #endif\r
                jmp     End1\r
@@ -410,8 +428,8 @@ End1:
        if(errorflag==true) goto error;\r
 #ifndef STARTUPXMSASM\r
        XMS_CALL(XMS_QUERYFREE);                        // Find out how much XMS is available\r
-       XMSAVI = _AX;\r
-       if (_BL)                                // AJR: bugfix 10/8/92\r
+       XMSAvail = _AX;\r
+       if (!_AX)                               // AJR: bugfix 10/8/92\r
        {\r
                errorflag = true;\r
                err = _BL;\r
@@ -421,28 +439,24 @@ End1:
 #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
-               mov     dx,XMSAVI\r
+               mov     dx,XMSAvail\r
                mov     ah,XMS_ALLOC                            // And do the allocation\r
                call    [DWORD PTR XMSDriver]\r
-#ifndef BRACKETXMS\r
-               mov     XMSHAN,dx\r
-#else\r
-               mov     [XMSHAN],dx\r
-#endif\r
-               cmp     ax,0                            // AJR: bugfix 10/8/92\r
-               je      error2\r
+               mov     XMSHandle,dx\r
+               or      ax,ax                           // AJR: bugfix 10/8/92\r
+               jz      error2\r
                mov     e,4\r
                jmp     End2\r
 #ifdef __BORLANDC__\r
@@ -463,9 +477,9 @@ End2:
        }\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
@@ -477,13 +491,13 @@ End2:
 error:\r
        if(errorflag==false)\r
        {\r
-               gvar->mmi.XMSmem = (XMSAVI) * 1024ul;\r
-               gvar->pm.xmm.XMSAvail = (word)XMSAVI;\r
-               gvar->pm.xmm.XMSHandle = XMSHAN;\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
@@ -493,10 +507,7 @@ error:
                //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("XMSerr\n");\r
-               printf("        %u,     %lu\n", (word)XMSAVI, (dword)XMSAVI);\r
                printf("        err=%02X        e=%u\n", err, e);\r
-               getch();\r
 #endif\r
        }\r
        return(gvar->pm.xmm.XMSPresent);\r
@@ -734,7 +745,7 @@ PM_CheckMainMem(global_game_variables_t *gvar)
 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
@@ -1292,15 +1303,15 @@ PM_SetPageLock(int pagenum,PMLockType lock, global_game_variables_t *gvar)
 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
@@ -1495,26 +1506,12 @@ PM_Startup(global_game_variables_t *gvar)
        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
@@ -1560,7 +1557,7 @@ PM_Shutdown(global_game_variables_t *gvar)
        if (!gvar->pm.PMStarted)\r
                return;\r
 \r
-       PML_ClosePageFile(gvar);\r
+       //PML_ClosePageFile(gvar);\r
 \r
        PML_ShutdownMainMem(gvar);\r
 }\r