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 bigbuffer;
  46 #ifdef FILERL
  47         char *bakapee;
  48         word baka;
  49 #endif
  50         //static page_t screen;
  51
  52         printf("&main()=        %Fp\n", *argv[0]);
  53         printf("bigbuffer=      %Fp\n", bigbuffer);
  54         printf("&bigbuffer=     %Fp\n", &bigbuffer);
  55         printf("bigbuffer=      %04x\n", bigbuffer);
  56         printf("&bigbuffer=     %04x\n", &bigbuffer);
  57
  58 #ifdef FILERL
  59         bakapee = malloc(64);
  60 #endif
  61         mm.mmstarted=0;
  62
  63 #ifdef FILERL
  64         if(argv[1]) bakapee = argv[1];
  65         else bakapee = "data/koishi~~.pcx";
  66 #endif
  67
  68         textInit();\r
  69
  70         /* setup camera and screen~ */
  71         //bug!!!\r
  72         //screen = modexDefaultPage();\r
  73         /*screen.width += (16*2);\r
  74         screen.height += (16*2);*/
  75
  76         printf("main()=%Fp      start MM\n", *argv[0]);
  77         MM_Startup(&mm, &mmi);
  78         //PM_Startup();\r
  79         //PM_UnlockMainMem();\r
  80         CA_Startup();
  81         printf("                done!\n");
  82         /*if(FP_SEG(*argv[0])==0)
  83         {
  84                 MM_Report(&screen, &mm, &mmi);
  85                 MM_Shutdown(&mm);
  86                 printf("&main()=%Fp\n", *argv[0]);
  87                 printf("&main() == %u\n", FP_SEG(*argv[0]));
  88                 exit(-5);
  89         }*/
  90         printf("&main()=        %Fp\n", *argv[0]);
  91         printf("bigbuffer=      %Fp\n", bigbuffer);
  92         printf("&bigbuffer=     %Fp\n", &bigbuffer);
  93         printf("bigbuffer=      %04x\n", bigbuffer);
  94         printf("&bigbuffer=     %04x\n", &bigbuffer);
  95 #ifdef FILERL
  96 //      bakapeehandle = open(bakapee,O_RDONLY | O_BINARY, S_IREAD);
  97 //      printf("size of big buffer~=%u\n", _bmsize(segu, bigbuffer));
  98 //      if(CA_FarRead(bakapeehandle,(void far *)&bigbuffer,sizeof(bigbuffer),&mm))
  99 #ifdef FILEREAD
 100         printf("                read\n");
 101         if(CA_ReadFile(bakapee, &bigbuffer, &mm))
 102 #else
 103         printf("                load\n");
 104         if(CA_LoadFile(bakapee, &bigbuffer, &mm, &mmi))
 105 #endif
 106                 baka=1;
 107         else
 108                 baka=0;
 109 //      close(bakapeehandle);
 110         //hmm functions in cache system use the buffered stuff
 111 //      printf("size of big buffer~=%u\n", _bmsize(segu, bigbuffer));
 112 #endif
 113         printf("dark purple = purgable\n");
 114         printf("medium blue = non purgable\n");
 115         printf("red = locked\n");
 116 //      getch();
 117         //++++modexEnter();
 118         //++++modexShowPage(&screen);
 119         MM_ShowMemory(/*&screen, */&mm);
 120         //getch();
 121         MM_DumpData(&mm);
 122         //++++modexLeave();
 123         MM_Report(&mm, &mmi);
 124         printf("                stop!\n");
 125 #ifdef FILERL
 126         MM_FreePtr(&bigbuffer, &mm);
 127 #endif
 128         //PM_Shutdown();
 129         CA_Shutdown();
 130         MM_Shutdown(&mm);
 131         printf("                done!\n");
 132 #ifdef FILERL
 133         free(bakapee);
 134         if(baka) printf("\nyay!\n");
 135         else printf("\npoo!\n");
 136 #endif
 137         //printf("_bios_memsize=%u\n", _bios_memsize());
 138         printf("bigbuffer=      %Fp\n", bigbuffer);
 139         printf("&bigbuffer=     %Fp\n", &bigbuffer);
 140         printf("bigbuffer=      %04x\n", bigbuffer);
 141         printf("&bigbuffer=     %04x\n", &bigbuffer);
 142         printf("\n\n");
 143         printf("Total free:                     %lu\n", (dword)(GetFreeSize()));
 144         printf("Total near free:                %lu\n", (dword)(GetNearFreeSize()));
 145         printf("Total far free:                 %lu\n", (dword)(GetFarFreeSize()));
 146         getch();
 147         printf("\n");
 148         heapdump();
 149         printf("core left:                      %lu\n", (dword)_coreleft());
 150         printf("far core left:                  %lu\n", (dword)_farcoreleft());
 151         //printf("based core left:                      %lu\n", (dword)_basedcoreleft());
 152         //printf("huge core left:                       %lu\n", (dword)_hugecoreleft());
 153 }