src/lib/16_mm.h

   1 /* Catacomb Apocalypse Source Code
   2  * Copyright (C) 1993-2014 Flat Rock Software
   3  *
   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.
   8  *
   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.
  13  *
  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.
  17  */
  18
  19 // ID_MM.H
  20
  21 #ifndef __16_EXMM__
  22 #define __16_EXMM__
  23
  24 #include <string.h>
  25 #include <malloc.h>
  26 #include "src/lib/16_head.h"
  27 #include "src/lib/16_hc.h"
  28 //#include "src/lib/modex16.h"
  29 //++++mh        #include "src/lib/16_in.h"
  30
  31 #ifdef __DEBUG__                // 1 == Debug/Dev  ;  0 == Production/final
  32 #define OUT_OF_MEM_MSG  "MM_GetPtr: Out of memory!\nYou were short :%lu bytes\n"
  33 #else
  34 #define OUT_OF_MEM_MSG  "\npee\n"
  35 #endif
  36
  37 //#define GETNEWBLOCK {if(!(mmnew=mmfree))Quit("MM_GETNEWBLOCK: No free blocks!") ;mmfree=mmfree->next;}
  38 #define GETNEWBLOCK {if(!mm->mmfree)MML_ClearBlock(mm);mm->mmnew=mm->mmfree;mm->mmfree=mm->mmfree->next;}
  39
  40 #define FREEBLOCK(x) {*x->useptr=NULL;x->next=mm->mmfree;mm->mmfree=x;}
  41
  42 #define AARED           "\x1b[41;31m"
  43 #define AABLUE          "\x1b[44;34m"
  44 #define AAGREEN "\x1b[42;32m"
  45 #define AAYELLOW        "\x1b[43;33m"
  46 #define AAGREY          "\x1b[47;37m"
  47 #define AABLACK "\x1b[40;30m"
  48 #define AAWHITE         "\x1b[47;37m"
  49 #define AAMAGENTA       "\x1b[45;35m"
  50 #define AARESET "\x1b[0m"
  51
  52 #define SAVENEARHEAP    0x200           // space to leave in data segment
  53 #define SAVEFARHEAP     0//x400                 // space to leave in far heap
  54
  55 #define BUFFERSIZE              0x1000          // miscelanious, allways available buffer
  56
  57 #define MAXBLOCKS               1024
  58
  59
  60
  61 //--------
  62
  63 #define EMS_INT                 0x67
  64
  65 #define EMS_STATUS              0x40
  66 #define EMS_GETFRAME    0x41
  67 #define EMS_GETPAGES    0x42
  68 #define EMS_ALLOCPAGES  0x43
  69 #define EMS_MAPPAGE             0x44
  70 #define EMS_MAPXPAGE            0x50
  71 #define EMS_FREEPAGES   0x45
  72 #define EMS_VERSION             0x46
  73
  74 //--------
  75
  76 #define XMS_VERSION             0x00
  77
  78 #define XMS_ALLOCHMA    0x01
  79 #define XMS_FREEHMA             0x02
  80
  81 #define XMS_GENABLEA20  0x03
  82 #define XMS_GDISABLEA20 0x04
  83 #define XMS_LENABLEA20  0x05
  84 #define XMS_LDISABLEA20 0x06
  85 #define XMS_QUERYA20    0x07
  86
  87 #define XMS_QUERYREE    0x08
  88 #define XMS_ALLOC               0x09
  89 #define XMS_FREE                0x0A
  90 #define XMS_MOVE                0x0B
  91 #define XMS_LOCK                0x0C
  92 #define XMS_UNLOCK              0x0D
  93 #define XMS_GETINFO             0x0E
  94 #define XMS_RESIZE              0x0F
  95
  96 #define XMS_ALLOCUMB    0x10
  97 #define XMS_FREEUMB             0x11
  98
  99 //==========================================================================
 100
 101 typedef struct
 102 {
 103         dword   nearheap,farheap,EMSmem,XMSmem,mainmem;
 104 } mminfotype;
 105
 106 //==========================================================================
 107
 108 extern  void            (* beforesort) (void);
 109 extern  void            (* aftersort) (void);
 110 extern void             (* XMSaddr) (void);             // far pointer to XMS driver
 111
 112 //==========================================================================
 113
 114 /*
 115 =============================================================================
 116
 117                                                         LOCAL INFO
 118
 119 =============================================================================
 120 */
 121
 122 #define LOCKBIT         0x80    // if set in attributes, block cannot be moved
 123 #define PURGEBITS       3               // 0-3 level, 0= unpurgable, 3= purge first
 124 #define PURGEMASK       0xfffc
 125 #define BASEATTRIBUTES  0       // unlocked, non purgable
 126
 127 #define MAXUMBS         12
 128 #define MAPPAGES                4//mm->EMSpagesmapped
 129
 130 typedef struct mmblockstruct
 131 {
 132         //word  start,length;
 133         word    start;  dword length;
 134         word    blob;   //for data larger than 64k
 135         unsigned        attributes;
 136         memptr          *useptr;        // pointer to the segment start
 137         struct mmblockstruct huge *next;
 138 } mmblocktype;
 139
 140
 141 typedef struct
 142 {
 143         memptr bufferseg;
 144         boolean         mmstarted, bombonerror, mmerror;
 145         void huge       *farheap;
 146 #ifdef __BORLANDC__
 147         void    *nearheap;
 148 #endif
 149 #ifdef __WATCOMC__
 150         void __near     *nearheap;
 151 #endif
 152         //byte          EMS_status;
 153         unsigned        totalEMSpages,freeEMSpages,EMSpageframe,EMSpagesmapped,EMShandle;
 154         unsigned int EMSVer;
 155         word numUMBs,UMBbase[MAXUMBS];
 156         //dword numUMBs,UMBbase[MAXUMBS];
 157         mmblocktype     huge mmblocks[MAXBLOCKS],huge *mmhead,huge *mmfree,huge *mmrover,huge *mmnew;
 158 } mminfo_t;
 159
 160 /*
 161 =============================================================================
 162
 163                                                  GLOBAL VARIABLES
 164
 165 =============================================================================
 166 */
 167
 168
 169 /*
 170 =============================================================================
 171
 172                                                  LOCAL VARIABLES
 173
 174 =============================================================================
 175 */
 176
 177 //==========================================================================
 178
 179 boolean MML_CheckForEMS(void);
 180 byte MML_SetupEMS(mminfo_t *mm);
 181 void MML_ShutdownEMS(mminfo_t *mm);
 182 byte MM_MapEMS(mminfo_t *mm, mminfotype *mmi);
 183 byte MM_MapXEMS(mminfo_t *mm, mminfotype *mmi);
 184 boolean MML_CheckForXMS(mminfo_t *mm);
 185 void MML_SetupXMS(mminfo_t *mm, mminfotype *mmi);
 186 void MML_ShutdownXMS(mminfo_t *mm);
 187 void MML_UseSpace(word segstart, dword seglength, mminfo_t *mm);
 188 void MML_ClearBlock(mminfo_t *mm);
 189
 190 void MM_Startup(mminfo_t *mm, mminfotype *mmi);
 191 void MM_Shutdown(mminfo_t *mm);
 192
 193 void MM_GetPtr(memptr *baseptr,dword size, mminfo_t *mm, mminfotype *mmi);
 194 void MM_FreePtr(memptr *baseptr, mminfo_t *mm);
 195 void MM_SetPurge(memptr *baseptr, int purge, mminfo_t *mm);
 196 void MM_SetLock(memptr *baseptr, boolean locked, mminfo_t *mm);
 197 void MM_SortMem(mminfo_t *mm);
 198 void MM_ShowMemory(global_game_variables_t *gvar,/*page_t *page, */mminfo_t *mm);
 199 void MM_DumpData(mminfo_t *mm);
 200 dword MM_UnusedMemory(mminfo_t *mm);
 201 dword MM_TotalFree(mminfo_t *mm);
 202 void MM_Report(/*page_t *page, */mminfo_t *mm, mminfotype *mmi);
 203 static void MM_EMSerr(byte *stri, byte err);
 204 void MM_BombOnError(boolean bomb, mminfo_t *mm);
 205 //void MM_GetNewBlock(mminfo_t *mm);
 206 //void MM_FreeBlock(mmblocktype *x, mminfo_t *mm);
 207
 208 //==========================================================================
 209
 210 #endif