XMS needs serious work!

[16.git] / src / lib / 16_mm.c

diff --git a/src/lib/16_mm.c b/src/lib/16_mm.c
index 070db38d99050be8d98f2f9892f96704dec9b582..b6af09e5bef9328c5ddd1a2e3359501f747c5bcf 100644 (file)
--- a/src/lib/16_mm.c
+++ b/src/lib/16_mm.c
@@ -143,6 +143,7 @@ unsigned MML_SetupEMS(mminfo_t *mm)
        union REGS CPURegs;
 
        unsigned int EMSVer = 0;
+       byte    EMSstatus;
        unsigned        totalEMSpages,freeEMSpages,EMSpageframe,EMSpagesmapped,EMShandle;
        totalEMSpages = freeEMSpages = EMSpageframe = EMSpagesmapped = 0;
 
@@ -151,6 +152,7 @@ unsigned MML_SetupEMS(mminfo_t *mm)
                mov     ah,EMS_STATUS
                int     EMS_INT                                         // make sure EMS hardware is present
                or      ah,ah
+               //mov   [EMSstatus],ah
                jnz     error
 
                mov     ah,EMS_VERSION
@@ -217,6 +219,7 @@ End:
        mm->EMSpagesmapped=EMSpagesmapped;
        mm->EMShandle=EMShandle;
        mm->EMSVer=EMSVer;
+       //mm->EMSstatus=EMSstatus;
        return 0;
 }
 
@@ -692,6 +695,7 @@ emsskip:
        if(MML_CheckForXMS(mm))
        {
                printf("XMS!\n");
+               //====needs work!
                //MML_SetupXMS(mm, mmi);                                        // allocate as many UMBs as possible
        }
 
@@ -725,8 +729,6 @@ void MM_Shutdown(mminfo_t *mm)
        printf("far freed\n");
        free(mm->nearheap);
        printf("near freed\n");
-       //hfree(mm->hugeheap);
-       //printf("huge freed\n");
        if(MML_CheckForEMS()){ MML_ShutdownEMS(mm); printf("EMS freed\n"); }
        if(MML_CheckForXMS(mm)){ MML_ShutdownXMS(mm); printf("XMS freed\n"); }
 }
@@ -861,7 +863,7 @@ void MM_FreePtr(memptr *baseptr, mminfo_t *mm)
 
        if(!scan)
        {
-               printf("MM_FreePtr: Block not found!");
+               printf("MM_FreePtr: Block not found!\n");
                return;
        }
 
@@ -898,7 +900,7 @@ void MM_SetPurge(memptr *baseptr, int purge, mminfo_t *mm)
                        mm->mmrover = mm->mmhead;
                else if(mm->mmrover == start)
                {
-                       printf("MM_SetPurge: Block not found!");
+                       printf("MM_SetPurge: Block not found!\n");
                        return;
                }
 
@@ -1073,10 +1075,10 @@ void MM_SortMem(mminfo_t *mm)
 void MM_ShowMemory(page_t *page, mminfo_t *mm)
 {
        mmblocktype huge *scan;
-       unsigned color,temp;
+       word color,temp;
        long    end,owner;
        word chx,chy;
-       char    scratch[160],str[16];
+       byte    scratch[160],str[16];
 
 //**** VW_SetDefaultColors();
 //**** VW_SetLineWidth(40);
@@ -1109,17 +1111,37 @@ CA_OpenDebug ();
                        return;
                }
                end = scan->start+scan->length-1;
-                               modexhlin(page, scan->start, (unsigned)end, chy, color);
+               chy = scan->start/320;
+               chx = scan->start%320;
+                               //modexhlin(page, scan->start, (unsigned)end, chy, color);
+                               //for(chx=scan->start;chx+4>=(word)end;chx+=4)
+                               //{
+                                       modexClearRegion(page, chx, chy, 4, 4, color);
+                               //}
+
 //++++         VW_Hlin(scan->start,(unsigned)end,0,color);
-//void VW_Plot(unsigned x, unsigned y, unsigned color);
-//void VW_Hlin(unsigned xl, unsigned xh, unsigned y, unsigned color);
 
 //++++         VW_Plot(scan->start,0,15);
-                               //modexputPixel(page, scan->start, chy, 15);
-                               modexClearRegion(page, scan->start, chy, 4, 4, 15);
+                               modexClearRegion(page, chx, chy, 4, 4, 15);
                if(scan->next->start > end+1)
 //++++                 VW_Hlin(end+1,scan->next->start,0,0);   // black = free
-                                       modexhlin(page, end+1,scan->next->start, chy, 9);
+                       //for(chx=scan->next->start;chx+4>=(word)end+1;chx+=4)
+                       //{
+                               chx+=scan->next->start;
+                               modexClearRegion(page, chx, chy, 4, 4, 2);
+                       //}
+                                       //modexhlin(page, end+1,scan->next->start, chy, 0);
+
+/*
+               end = scan->length-1;
+               y = scan->start/320;
+               x = scan->start%320;
+               VW_Hlin(x,x+end,y,color);
+               VW_Plot(x,y,15);
+               if (scan->next && scan->next->start > end+1)
+                       VW_Hlin(x+end+1,x+(scan->next->start-scan->start),y,0); // black = free
+
+*/
 
 //****#if 0
 printf("\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0");    //bug!
@@ -1136,7 +1158,7 @@ strcat (scratch,str);
 strcat (scratch,"\n");
 write(debughandle,scratch,strlen(scratch));
 //modexprint(page, chx, chy, 1, 0, 24, &scratch);
-//chy+=4;
+chy+=4;
 //fprintf(stdout, "%s", scratch);
 //****#endif
 
@@ -1165,8 +1187,8 @@ void MM_DumpData(mminfo_t *mm)
 {\r
        mmblocktype far *scan,far *best;\r
        long    lowest,oldlowest;\r
-       unsigned        owner;\r
-       char    lock,purge;\r
+       word    owner;\r
+       byte    lock,purge;\r
        FILE    *dumpfile;\r
 \r
 \r
@@ -1186,7 +1208,7 @@ void MM_DumpData(mminfo_t *mm)
                scan = mm->mmhead;\r
                while (scan)\r
                {\r
-                       owner = (unsigned)scan->useptr;\r
+                       owner = (word)scan->useptr;\r
 \r
                        if (owner && owner<lowest && owner > oldlowest)\r
                        {\r
@@ -1208,7 +1230,7 @@ void MM_DumpData(mminfo_t *mm)
                        else\r
                                lock = '-';\r
                        fprintf (dumpfile,"0x%p (%c%c) = %u\n"\r
-                       ,(unsigned)lowest,lock,purge,best->length);\r
+                       ,(word)lowest,lock,purge,best->length);\r
                }\r
 \r
        } while (lowest != 0xffff);\r
@@ -1293,11 +1315,12 @@ dword MM_TotalFree(mminfo_t *mm)
 
 void MM_Report(page_t *page, mminfo_t *mm, mminfotype *mmi)
 {
+       printf("\n");
        if(MML_CheckForEMS())
        {
-               printf("EMM v%x.%x available\n", mm->EMSVer>>4,mm->EMSVer&0x0F);
+               printf("Expanded memory manager present. EMM v%x.%x available\n", mm->EMSVer>>4,mm->EMSVer&0x0F);
                printf("totalEMSpages=%u\n", mm->totalEMSpages);
-               printf("freeEMSpages=%u\n", mm->freeEMSpages);
+               printf("Page frame @0x%04x\n", mm->freeEMSpages);
                printf("EMSpageframe=%x\n", mm->EMSpageframe);
        }
        if(MML_CheckForXMS(mm)) printf("XMSaddr=%Fp\n", *XMSaddr);