src/exmmtest.c

   1 /* Project 16 Source Code~
   2  * Copyright (C) 2012-2015 sparky4 & pngwen & andrius4669
   3  *
   4  * This file is part of Project 16.
   5  *
   6  * Project 16 is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * Project 16 is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>, or
  18  * write to the Free Software Foundation, Inc., 51 Franklin Street,
  19  * Fifth Floor, Boston, MA 02110-1301 USA.
  20  *
  21  */
  22 /*
  23         exmm test
  24 */
  25 #include <stdio.h>
  26 #include <bios.h>
  27
  28 #include "src/lib/16_head.h"
  29 #include "src/lib/16_ca.h"
  30 #include "src/lib/16_mm.h"
  31 //#include "src/lib/modex16.h"
  32 #pragma hdrstop\r
  33 \r
  34 #pragma warn -pro\r
  35 #pragma warn -use
  36
  37 //file load or read definition
  38 #define FILERL
  39 //#define FILEREAD
  40
  41 void
  42 main(int argc, char *argv[])
  43 {
  44         mminfo_t mm; mminfotype mmi;
  45         __segment sega;
  46         void __based(sega)* bigbuffer;
  47 #ifdef FILERL
  48         char *bakapee;
  49         word baka;
  50 #endif
  51         //static page_t screen;
  52
  53         printf("&main()=        %Fp\n", *argv[0]);
  54         printf("bigbuffer=      %Fp\n", bigbuffer);
  55         printf("&bigbuffer=     %Fp\n", &bigbuffer);
  56         printf("bigbuffer=      %04x\n", bigbuffer);
  57         printf("&bigbuffer=     %04x\n", &bigbuffer);
  58
  59 #ifdef FILERL
  60         bakapee = malloc(64);
  61 #endif
  62         mm.mmstarted=0;
  63
  64 #ifdef FILERL
  65         if(argv[1]) bakapee = argv[1];
  66         else bakapee = "data/koishi~~.pcx";
  67 #endif
  68
  69         textInit();\r
  70
  71         /* setup camera and screen~ */
  72         //bug!!!\r
  73         //screen = modexDefaultPage();\r
  74         /*screen.width += (16*2);\r
  75         screen.height += (16*2);*/
  76
  77         printf("main()=%Fp      start MM\n", *argv[0]);
  78         MM_Startup(&mm, &mmi);
  79         //PM_Startup();\r
  80         //PM_UnlockMainMem();\r
  81         CA_Startup();
  82         printf("                done!\n");
  83         /*if(FP_SEG(*argv[0])==0)
  84         {
  85                 MM_Report(&screen, &mm, &mmi);
  86                 MM_Shutdown(&mm);
  87                 printf("&main()=%Fp\n", *argv[0]);
  88                 printf("&main() == %u\n", FP_SEG(*argv[0]));
  89                 exit(-5);
  90         }*/
  91         printf("&main()=        %Fp\n", *argv[0]);
  92         printf("bigbuffer=      %Fp\n", bigbuffer);
  93         printf("&bigbuffer=     %Fp\n", &bigbuffer);
  94         printf("bigbuffer=      %04x\n", bigbuffer);
  95         printf("&bigbuffer=     %04x\n", &bigbuffer);
  96         getch();
  97 #ifdef FILERL
  98 //      bakapeehandle = open(bakapee,O_RDONLY | O_BINARY, S_IREAD);
  99 //      printf("size of big buffer~=%u\n", _bmsize(segu, bigbuffer));
 100 //      if(CA_FarRead(bakapeehandle,(void far *)&bigbuffer,sizeof(bigbuffer),&mm))
 101 #ifdef FILEREAD
 102         printf("                read\n");
 103         if(CA_ReadFile(bakapee, &bigbuffer, &mm))
 104 #else
 105         printf("                load\n");
 106         if(CA_LoadFile(bakapee, &bigbuffer, &mm, &mmi))
 107 #endif
 108                 baka=1;
 109         else
 110                 baka=0;
 111 //      close(bakapeehandle);
 112         //hmm functions in cache system use the buffered stuff
 113         printf("size of big buffer~=%u\n", _bmsize(sega, bigbuffer));
 114 #endif
 115         printf("dark purple = purgable\n");
 116         printf("medium blue = non purgable\n");
 117         printf("red = locked\n");
 118         getch();
 119         //++++modexEnter();
 120         //++++modexShowPage(&screen);
 121         MM_ShowMemory(/*&screen, */&mm);
 122         //getch();
 123         MM_DumpData(&mm);
 124         //++++modexLeave();
 125         MM_Report(&mm, &mmi);
 126         printf("                stop!\n");
 127 #ifdef FILERL
 128         MM_FreePtr(&bigbuffer, &mm);
 129 #endif
 130         //PM_Shutdown();
 131         CA_Shutdown();
 132         MM_Shutdown(&mm);
 133         printf("                done!\n");
 134 #ifdef FILERL
 135         free(bakapee);
 136         if(baka) printf("\nyay!\n");
 137         else printf("\npoo!\n");
 138 #endif
 139         printf("bigbuffer=      %Fp\n", bigbuffer);
 140         printf("&bigbuffer=     %Fp\n", &bigbuffer);
 141         printf("bigbuffer=      %04x\n", bigbuffer);
 142         printf("&bigbuffer=     %04x\n", &bigbuffer);
 143         printf("\n\n");
 144         printf("Total free:                     %lu\n", (dword)(GetFreeSize()));
 145         printf("Total near free:                %lu\n", (dword)(GetNearFreeSize()));
 146         printf("Total far free:                 %lu\n", (dword)(GetFarFreeSize()));
 147         getch();
 148         printf("\n");
 149         heapdump();
 150         printf("core left:                      %lu\n", (dword)_coreleft());
 151         printf("far core left:                  %lu\n", (dword)_farcoreleft());
 152         //printf("based core left:                      %lu\n", (dword)_basedcoreleft());
 153         //printf("huge core left:                       %lu\n", (dword)_hugecoreleft());
 154 }