-/* Catacomb Apocalypse Source Code\r
- * Copyright (C) 1993-2014 Flat Rock Software\r
- *\r
- * This program is free software; you can redistribute it and/or modify\r
- * it under the terms of the GNU General Public License as published by\r
- * the Free Software Foundation; either version 2 of the License, or\r
- * (at your option) any later version.\r
- *\r
- * This program is distributed in the hope that it will be useful,\r
- * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
- * GNU General Public License for more details.\r
- *\r
- * You should have received a copy of the GNU General Public License along\r
- * with this program; if not, write to the Free Software Foundation, Inc.,\r
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.\r
+/* Catacomb Apocalypse Source Code
+ * Copyright (C) 1993-2014 Flat Rock Software
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*/
// ID_MM.H
#include <string.h>
#include <malloc.h>
#include "src/lib/16_head.h"
+#include "src/lib/16_hc.h"
+//#include "src/lib/modex16.h"
//++++mh #include "src/lib/16_in.h"
#ifdef __DEBUG__ // 1 == Debug/Dev ; 0 == Production/final
-#define OUT_OF_MEM_MSG "MM_GetPtr: Out of memory!\nYou were short :%ld bytes"
+#define OUT_OF_MEM_MSG "MM_GetPtr: Out of memory!\nYou were short :%lu bytes\n"
#else
#define OUT_OF_MEM_MSG "\npee\n"
#endif
+//#define GETNEWBLOCK {if(!(mmnew=mmfree))Quit("MM_GETNEWBLOCK: No free blocks!") ;mmfree=mmfree->next;}
+#define GETNEWBLOCK {if(!mm->mmfree)MML_ClearBlock(mm);mm->mmnew=mm->mmfree;mm->mmfree=mm->mmfree->next;}
-#define SAVENEARHEAP 0x400 // space to leave in data segment
-#define SAVEFARHEAP 0 // space to leave in far heap
+#define FREEBLOCK(x) {*x->useptr=NULL;x->next=mm->mmfree;mm->mmfree=x;}
+
+#define AARED "\x1b[41;31m"
+#define AABLUE "\x1b[44;34m"
+#define AAGREEN "\x1b[42;32m"
+#define AAYELLOW "\x1b[43;33m"
+#define AAGREY "\x1b[47;37m"
+#define AABLACK "\x1b[40;30m"
+#define AAWHITE "\x1b[47;37m"
+#define AAMAGENTA "\x1b[45;35m"
+#define AARESET "\x1b[0m"
+
+#define SAVENEARHEAP 0x200 // space to leave in data segment
+#define SAVEFARHEAP 0//x400 // space to leave in far heap
#define BUFFERSIZE 0x1000 // miscelanious, allways available buffer
-#define MAXBLOCKS 600
+#define MAXBLOCKS 1024
+
//--------
#define EMS_GETPAGES 0x42
#define EMS_ALLOCPAGES 0x43
#define EMS_MAPPAGE 0x44
+#define EMS_MAPXPAGE 0x50
#define EMS_FREEPAGES 0x45
#define EMS_VERSION 0x46
#define XMS_FREEUMB 0x11
//==========================================================================
-//I hope this is correct!
-//__segment seg;
-typedef void __based(__self) * memptr; //__based(seg) * memptr;
typedef struct
{
- dword nearheap,farheap/*,hugeheap*/,EMSmem,XMSmem,mainmem;
+ dword nearheap,farheap,EMSmem,XMSmem,mainmem;
} mminfotype;
//==========================================================================
-/*extern mminfotype mminfo;
-extern memptr bufferseg;
-extern boolean mmerror;*/
-
extern void (* beforesort) (void);
extern void (* aftersort) (void);
extern void (* XMSaddr) (void); // far pointer to XMS driver
#define PURGEMASK 0xfffc
#define BASEATTRIBUTES 0 // unlocked, non purgable
-#define MAXUMBS 10
+#define MAXUMBS 12
+#define MAPPAGES 4//mm->EMSpagesmapped
typedef struct mmblockstruct
{
- unsigned start,length;
+ word start,length;
+ //word start; dword length;
+ word blob; //for data larger than 64k
unsigned attributes;
memptr *useptr; // pointer to the segment start
+ //huge struct mmblockstruct huge *next;
struct mmblockstruct far *next;
} mmblocktype;
{
memptr bufferseg;
boolean mmstarted, bombonerror, mmerror;
- //void huge *hugeheap;
- void huge/*far*/ *farheap;\r
- void *nearheap;
+ //huge void huge *farheap;
+ void far *farheap;
+#ifdef __BORLANDC__
+ void *nearheap;
+#endif
+#ifdef __WATCOMC__
+ void __near *nearheap;
+#endif
+ //byte EMS_status;
unsigned totalEMSpages,freeEMSpages,EMSpageframe,EMSpagesmapped,EMShandle;
unsigned int EMSVer;
- unsigned numUMBs,UMBbase[MAXUMBS];
- mmblocktype huge mmblocks[MAXBLOCKS],huge *mmhead,huge *mmfree,huge *mmrover,huge *mmnew;
+ word numUMBs,UMBbase[MAXUMBS];
+ //dword numUMBs,UMBbase[MAXUMBS];
+ //huge mmblocktype huge mmblocks[MAXBLOCKS],huge *mmhead,huge *mmfree,huge *mmrover,huge *mmnew;
+ mmblocktype far mmblocks[MAXBLOCKS],far *mmhead,far *mmfree,far *mmrover,far *mmnew;
} mminfo_t;
-
-//#define GETNEWBLOCK {if(!(mmnew=mmfree))Quit("MM_GETNEWBLOCK: No free blocks!");mmfree=mmfree->next;}
-//#define GETNEWBLOCK {if(!mmfree)MML_ClearBlock();mmnew=mmfree;mmfree=mmfree->next;}
-//#define FREEBLOCK(x) {*x->useptr=NULL;x->next=mmfree;mmfree=x;}
-
/*
=============================================================================
=============================================================================
*/
-/*static mminfotype mminfo;
-static memptr bufferseg;
-
-static void (* beforesort) (void);
-static void (* aftersort) (void);*/
/*
=============================================================================
=============================================================================
*/
-/*static void huge *hugeheap;
-static void far *farheap;
-static void *nearheap;
-
-static mmblocktype far mmblocks[MAXBLOCKS]
- ,far *mmhead,far *mmfree,far *mmrover,far *mmnew;
-
-
-static unsigned totalEMSpages,freeEMSpages,EMSpageframe,EMSpagesmapped,EMShandle;
-static unsigned int EMSVer;
-
-static void (* XMSaddr) (void); // far pointer to XMS driver
-
-static unsigned numUMBs,UMBbase[MAXUMBS];*/
-
//==========================================================================
-boolean MML_CheckForEMS(void);\r
-unsigned MML_SetupEMS(mminfo_t *mm);\r
-void MML_ShutdownEMS(mminfo_t *mm);\r
-unsigned MM_MapEMS(mminfo_t *mm);\r
-boolean MML_CheckForXMS(mminfo_t *mm);\r
+boolean MML_CheckForEMS(void);
+byte MML_SetupEMS(mminfo_t *mm);
+void MML_ShutdownEMS(mminfo_t *mm);
+byte MM_MapEMS(mminfo_t *mm, mminfotype *mmi);
+byte MM_MapXEMS(mminfo_t *mm, mminfotype *mmi);
+boolean MML_CheckForXMS(mminfo_t *mm);
void MML_SetupXMS(mminfo_t *mm, mminfotype *mmi);
-void MML_ShutdownXMS(mminfo_t *mm);\r
-void MML_UseSpace(unsigned segstart, unsigned seglength, mminfo_t *mm);\r
+void MML_ShutdownXMS(mminfo_t *mm);
+void MML_UseSpace(word segstart, dword seglength, mminfo_t *mm);
void MML_ClearBlock(mminfo_t *mm);
-\r
-void MM_Startup(mminfo_t *mm, mminfotype *mmi);\r
+
+void MM_Startup(mminfo_t *mm, mminfotype *mmi);
void MM_Shutdown(mminfo_t *mm);
-\r
-void MM_GetPtr(memptr *baseptr,dword size, mminfo_t *mm, mminfotype *mmi);\r
-void MM_FreePtr(memptr *baseptr, mminfo_t *mm);\r
-void MM_SetPurge(memptr *baseptr, int purge, mminfo_t *mm);\r
-void MM_SetLock(memptr *baseptr, boolean locked, mminfo_t *mm);\r
-void MM_SortMem(mminfo_t *mm);\r
-void MM_ShowMemory(mminfo_t *mm);\r
-dword MM_UnusedMemory(mminfo_t *mm);\r
-dword MM_TotalFree(mminfo_t *mm);\r
-void MM_Report(mminfo_t *mm, mminfotype *mmi);\r
-int MM_EMSVer(void);\r
+
+void MM_GetPtr(memptr *baseptr,dword size, mminfo_t *mm, mminfotype *mmi);
+void MM_FreePtr(memptr *baseptr, mminfo_t *mm);
+void MM_SetPurge(memptr *baseptr, int purge, mminfo_t *mm);
+void MM_SetLock(memptr *baseptr, boolean locked, mminfo_t *mm);
+void MM_SortMem(mminfo_t *mm);
+void MM_ShowMemory(global_game_variables_t *gvar,/*page_t *page, */mminfo_t *mm);
+void MM_DumpData(mminfo_t *mm);
+dword MM_UnusedMemory(mminfo_t *mm);
+dword MM_TotalFree(mminfo_t *mm);
+void MM_Report(/*page_t *page, */mminfo_t *mm, mminfotype *mmi);
+static void MM_EMSerr(byte *stri, byte err);
void MM_BombOnError(boolean bomb, mminfo_t *mm);
-void MM_GetNewBlock(mminfo_t *mm);
-void MM_FreeBlock(mmblocktype *x, mminfo_t *mm);
+//void MM_GetNewBlock(mminfo_t *mm);
+//void MM_FreeBlock(mmblocktype *x, mminfo_t *mm);
//==========================================================================