1 /* Catacomb Armageddon Source Code
2 * Copyright (C) 1993-2014 Flat Rock Software
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License along
15 * with this program; if not, write to the Free Software Foundation, Inc.,
16 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
26 #include "src/lib/lib_head.h"
27 //++++mh #include "src/lib/16_in.h"
29 #ifdef __DEBUG__ // 1 == Debug/Dev ; 0 == Production/final
30 #define OUT_OF_MEM_MSG "MM_GetPtr: Out of memory!\nYou were short :%ld bytes"
32 #define OUT_OF_MEM_MSG "\npee\n"
36 #define SAVENEARHEAP 0x400 // space to leave in data segment
37 #define SAVEFARHEAP 0 // space to leave in far heap
39 #define BUFFERSIZE 0x1000 // miscelanious, allways available buffer
48 #define EMS_STATUS 0x40
49 #define EMS_GETFRAME 0x41
50 #define EMS_GETPAGES 0x42
51 #define EMS_ALLOCPAGES 0x43
52 #define EMS_MAPPAGE 0x44
53 #define EMS_FREEPAGES 0x45
54 #define EMS_VERSION 0x46
58 #define XMS_VERSION 0x00
60 #define XMS_ALLOCHMA 0x01
61 #define XMS_FREEHMA 0x02
63 #define XMS_GENABLEA20 0x03
64 #define XMS_GDISABLEA20 0x04
65 #define XMS_LENABLEA20 0x05
66 #define XMS_LDISABLEA20 0x06
67 #define XMS_QUERYA20 0x07
69 #define XMS_QUERYREE 0x08
70 #define XMS_ALLOC 0x09
74 #define XMS_UNLOCK 0x0D
75 #define XMS_GETINFO 0x0E
76 #define XMS_RESIZE 0x0F
78 #define XMS_ALLOCUMB 0x10
79 #define XMS_FREEUMB 0x11
81 //==========================================================================
82 //I hope this is correct!
84 typedef void __based(__self) * memptr; //__based(seg) * memptr;
88 dword nearheap,farheap,EMSmem,XMSmem,mainmem;
89 boolean mmstarted, bombonerror, mmerror;
92 //==========================================================================
94 /*extern mminfotype mminfo;
95 extern memptr bufferseg;
96 extern boolean mmerror;
98 extern void (* beforesort) (void);
99 extern void (* aftersort) (void);*/
101 //==========================================================================
104 =============================================================================
108 =============================================================================
111 #define LOCKBIT 0x80 // if set in attributes, block cannot be moved
112 #define PURGEBITS 3 // 0-3 level, 0= unpurgable, 3= purge first
113 #define PURGEMASK 0xfffc
114 #define BASEATTRIBUTES 0 // unlocked, non purgable
118 typedef struct mmblockstruct
120 unsigned start,length;
122 memptr *useptr; // pointer to the segment start
123 struct mmblockstruct far *next;
127 //#define GETNEWBLOCK {if(!(mmnew=mmfree))Quit("MM_GETNEWBLOCK: No free blocks!");mmfree=mmfree->next;}
128 #define GETNEWBLOCK {if(!mmfree)MML_ClearBlock();mmnew=mmfree;mmfree=mmfree->next;}
129 #define FREEBLOCK(x) {*x->useptr=NULL;x->next=mmfree;mmfree=x;}
132 =============================================================================
136 =============================================================================
139 /*static mminfotype mminfo;
140 static memptr bufferseg;
142 static void (* beforesort) (void);
143 static void (* aftersort) (void);*/
146 =============================================================================
150 =============================================================================
153 /*static void huge *hugeheap;
154 static void far *farheap;
155 static void *nearheap;
157 static mmblocktype far mmblocks[MAXBLOCKS]
158 ,far *mmhead,far *mmfree,far *mmrover,far *mmnew;
161 static unsigned totalEMSpages,freeEMSpages,EMSpageframe,EMSpagesmapped,EMShandle;
162 static unsigned int EMSVer;
164 static void (* XMSaddr) (void); // far pointer to XMS driver
166 static unsigned numUMBs,UMBbase[MAXUMBS];*/
168 //==========================================================================
170 void MM_Startup (void);
171 void MM_Shutdown (void);
173 void MM_GetPtr (memptr *baseptr,dword size);
174 void MM_FreePtr (memptr *baseptr);
176 void MM_SetPurge (memptr *baseptr, int purge);
177 void MM_SetLock (memptr *baseptr, boolean locked);
178 void MM_SortMem (void);
180 void MM_ShowMemory (void);
182 dword MM_UnusedMemory (void);
183 dword MM_TotalFree (void);
184 void MM_Report(void);
185 //int MM_EMSVer(void);
187 void MM_BombOnError (boolean bomb);
189 //==========================================================================
195 boolean MML_CheckForEMS (void);
196 unsigned MML_SetupEMS (void);
197 void MML_ShutdownEMS (void);
198 unsigned MM_MapEMS (void);
199 boolean MML_CheckForXMS (void);
200 void MML_ShutdownXMS (void);
201 void MML_UseSpace (unsigned segstart, unsigned seglength);
202 void MML_ClearBlock (void);
204 //==========================================================================