-/* Catacomb Armageddon Source Code
+/* Catacomb Apocalypse Source Code
* Copyright (C) 1993-2014 Flat Rock Software
*
* This program is free software; you can redistribute it and/or modify
#include <string.h>
#include <malloc.h>
-#include "src/lib/lib_head.h"
-#include "src/lib/16_in.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"
-#if 1 // 1 == Debug/Dev ; 0 == Production/final
-#define OUT_OF_MEM_MSG "MM_GetPtr: Out of memory!\nYou were short :%ld bytes"
+#ifdef __DEBUG__ // 1 == Debug/Dev ; 0 == Production/final
+#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 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
//==========================================================================
-typedef void /*_seg*/ * memptr;
-
typedef struct
{
- long nearheap,farheap,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
//==========================================================================
-void MM_Startup (void);
-void MM_Shutdown (void);
-void MM_MapEMS (void);
+/*
+=============================================================================
+
+ LOCAL INFO
+
+=============================================================================
+*/
+
+#define LOCKBIT 0x80 // if set in attributes, block cannot be moved
+#define PURGEBITS 3 // 0-3 level, 0= unpurgable, 3= purge first
+#define PURGEMASK 0xfffc
+#define BASEATTRIBUTES 0 // unlocked, non purgable
+
+#define MAXUMBS 12
+#define MAPPAGES 4//mm->EMSpagesmapped
+
+typedef struct mmblockstruct
+{
+ 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;
+
+
+typedef struct
+{
+ memptr bufferseg;
+ boolean mmstarted, bombonerror, mmerror;
+ //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;
+ 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;
+
+/*
+=============================================================================
+
+ GLOBAL VARIABLES
-void MM_GetPtr (memptr *baseptr,dword size);
-void MM_FreePtr (memptr *baseptr);
+=============================================================================
+*/
-void MM_SetPurge (memptr *baseptr, int purge);
-void MM_SetLock (memptr *baseptr, boolean locked);
-void MM_SortMem (void);
-void MM_ShowMemory (void);
+/*
+=============================================================================
-long MM_UnusedMemory (void);
-long MM_TotalFree (void);
+ LOCAL VARIABLES
-void MM_BombOnError (boolean bomb);
+=============================================================================
+*/
//==========================================================================
-//
-// local prototypes
-//
-
-boolean MML_CheckForEMS (void);
-void MML_ShutdownEMS (void);
-void MM_MapEMS (void);
-boolean MML_CheckForXMS (void);
-void MML_ShutdownXMS (void);
-void MML_UseSpace (unsigned segstart, unsigned seglength);
-void MML_ClearBlock (void);
+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);
+void MML_UseSpace(word segstart, dword seglength, mminfo_t *mm);
+void MML_ClearBlock(mminfo_t *mm);
+
+void MM_Startup(mminfo_t *mm, mminfotype *mmi);
+void MM_Shutdown(mminfo_t *mm);
+
+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);
//==========================================================================
projects / 16.git / blobdiff