]> 4ch.mooo.com Git - 16.git/blobdiff - src/exmmtest.c
[16_ca needs huge amounts of work and I should remember what needs to be done soon...
[16.git] / src / exmmtest.c
index a1e0391f0848bd6ba8f485bdda9504f021d903c9..11cdf7cfe77fb17f4422ddf193c3bf7acc9a26ff 100755 (executable)
@@ -1,5 +1,5 @@
 /* Project 16 Source Code~\r
- * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
+ * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
  *\r
  * This file is part of Project 16.\r
  *\r
 /*\r
        exmm test\r
 */\r
+#include <malloc.h>            // for _memavl()\r
 #include "src/lib/16_head.h"\r
+#include "src/lib/16_tail.h"\r
 #include "src/lib/16_pm.h"\r
 #include "src/lib/16_ca.h"\r
 #include "src/lib/16_mm.h"\r
 #include "src/lib/16_hc.h"\r
-#include "src/lib/16_lib.h"\r
-//#include "src/lib/modex16.h"\r
+//#include "src/lib/16_vl.h"\r
+#include "src/lib/16_dbg.h"\r
+\r
 #pragma hdrstop\r
 \r
 #pragma warn -pro\r
 #pragma warn -use\r
 \r
 //file load or read definition\r
+#define FILEREADLOAD\r
 #define FILEREAD\r
 //#define EXMMVERBOSE\r
+//#define BUFFDUMPPAUSE\r
+//#define EXMMVERBOSE__\r
+//     #define PRINTBBDUMP\r
+#define BUFFDUMP\r
 \r
-#define PRINTBB { printf("&main()=     %Fp\n", argv[0]);printf("bigbuffer=     %Fp\n", bigbuffer);printf("&bigbuffer=  %Fp\n", &bigbuffer);printf("bigbuffer=  %04x\n", bigbuffer);printf("&bigbuffer= %04x\n", &bigbuffer); }\r
+#define BBUFNAME gvar.ca.tinf[0]//bigbuffer\r
+//#define INITBBUF static memptr BBUFNAME;\r
+#define BBUFPTR        (memptr *)&BBUFNAME\r
 \r
+#ifdef __BORLANDC__\r
+#define BBUF           (memptr *)BBUFPTR//\r
+#define BBUFSTRING     (memptr *)BBUFNAME\r
+#endif\r
+#ifdef __WATCOMC__\r
+#define BBUF           BBUFNAME\r
+#define BBUFSTRING     BBUF\r
+#endif\r
+\r
+////////////////////////////////////////////////////////////////////////////\r
+\r
+void VGAmodeX(sword vq, boolean cmem, global_game_variables_t *gv)\r
+{\r
+       printf("VGAmodeX dummy:\n       %Fp     %Fp     %Fp\n", &vq, &cmem, gv);\r
+}\r
+\r
+//printf("*    %Fp\t", *BBUF);\r
+//printf("*         %04x\t", *BBUF);\r
+#define PRINTBB {\\r
+       printf("-------------------------------------------------------------------------------\n");\\r
+       printf("&main()=        %Fp\n", argv[0]);\\r
+       printf("buffer:\n");\\r
+       printf("        %Fp\t", BBUF);\\r
+       printf("&%Fp\n", BBUFPTR);\\r
+       printf("             %04x\t", BBUF);\\r
+       printf("&     %04x\n", BBUFPTR);\\r
+       printf("-------------------------------------------------------------------------------\n");\\r
+}\r
+       //printf("&main()=      %Fp\n", *argv[0]);\r
+       //printf("bigbuffer=    %Fp\n", bigbuffer);\r
+       //printf("&bigbuffer=   %Fp\n", &bigbuffer);\r
+       //printf("bigbuffer=    %04x\n", bigbuffer);\r
+       //printf("&bigbuffer=   %04x\n", &bigbuffer);\r
 #ifdef __WATCOMC__\r
 void segatesuto()\r
 {\r
@@ -66,13 +109,14 @@ void segatesuto()
 void\r
 main(int argc, char *argv[])\r
 {\r
-       byte w=1;\r
-       global_game_variables_t gvar;\r
-#ifdef __WATCOMC__\r
-       __segment sega;\r
+       byte w;\r
+       static global_game_variables_t gvar;\r
+#ifdef INITBBUF\r
+       INITBBUF\r
 #endif\r
-       memptr bigbuffer;\r
-\r
+//#ifdef __WATCOMC__\r
+//     __segment sega;\r
+//#endif\r
        //static byte bakapee[64];\r
        char *bakapee1, *bakapee2;\r
        word baka;\r
@@ -81,13 +125,22 @@ main(int argc, char *argv[])
        argc=argc;\r
 #endif\r
        //file name //\r
-       bakapee1 = malloc(64);\r
-       bakapee2 = malloc(64);\r
+       bakapee1 = malloc(24);\r
+       bakapee2 = malloc(24);\r
        //file name //\r
 \r
-       gvar.mm.mmstarted=0;\r
+#ifdef __16_PM__\r
+#ifdef __DEBUG_PM__\r
+       dbg_debugpm=1;  //debug pm\r
+#endif\r
+#endif\r
 \r
-       //PRINTBB\r
+#ifdef __DEBUG_CA__\r
+       dbg_debugca=1;\r
+#endif\r
+#ifdef PRINTBBDUMP\r
+//0000PRINTBB; printf("press any key to continue!\n"); getch();\r
+#endif\r
        if(argv[1]){ bakapee1 = argv[1];\r
        if(argv[2]) bakapee2 = argv[2]; }\r
        else{\r
@@ -96,61 +149,99 @@ main(int argc, char *argv[])
                bakapee2 = "data/test.map";\r
        }\r
        //printf("main()=%Fp    start MM\n", *argv[0]);\r
-       MM_Startup(&gvar);\r
+       MM_Startup(&gvar); //printf("ok\n");\r
+#ifdef __16_PM__\r
 #ifdef __DEBUG_PM__\r
-       PM_Startup(&gvar);\r
-       //PM_CheckMainMem(&gvar);\r
-       PM_UnlockMainMem(&gvar);\r
+       if(dbg_debugpm>0)\r
+       {\r
+#endif\r
+               PM_Startup(&gvar); PM_CheckMainMem(&gvar); PM_UnlockMainMem(&gvar);\r
+//0000         printf("PM Started\n"); printf("press any key to continue!\n"); getch();\r
+#ifdef __DEBUG_PM__\r
+       }\r
+#endif\r
+#endif\r
+\r
+#ifdef __DEBUG_MM__\r
+       dbg_debugmm=0;\r
 #endif\r
        CA_Startup(&gvar);\r
 //     printf("                done!\n");\r
-       PRINTBB;\r
-//     printf("press any key to continue!\n");\r
-//     getch();\r
+#ifdef PRINTBBDUMP\r
+//0000\r
+PRINTBB; printf("\n\npress any key to continue!\n"); getch();\r
+#endif\r
+#ifdef __DEBUG_MM__\r
+       dbg_debugmm=1;\r
+#endif\r
+\r
+       w=0;\r
+#ifdef FILEREADLOAD\r
 #ifdef FILEREAD\r
-for(w=0;w<2;w++)\r
-{\r
-//     bakapeehandle = open(bakapee,O_RDONLY | O_BINARY, S_IREAD);\r
-//     printf("size of big buffer~=%u\n", _bmsize(segu, bigbuffer));\r
-//     if(CA_FarRead(bakapeehandle,(void far *)&bigbuffer,sizeof(bigbuffer),&gvar.mm))\r
-       if(w>0)\r
+       for(;w<2;w++)\r
        {\r
-               printf("                read\n");\r
-               if(CA_ReadFile(bakapee2, &bigbuffer, &gvar)) baka=1; else baka=0;\r
-       }\r
+       //      printf("size of big buffer~=%u\n", _bmsize(segu, BBUF));\r
+               if(w>0)\r
+               {\r
+                       printf("======================================read=====================================\n");\r
+                       if(CA_ReadFile(bakapee2, BBUFPTR, &gvar)) baka=1; else baka=0;\r
+                       printf("====================================read end===================================\n");\r
+               }\r
 #endif\r
-       if(w==0)\r
-       {\r
-       printf("                load\n");\r
-       if(CA_LoadFile(bakapee1, &bigbuffer, &gvar)) baka=1; else baka=0;\r
+               if(w==0)\r
+               {\r
+                       printf("======================================load=====================================\n");\r
+                       if(CA_LoadFile(bakapee1, BBUFPTR, &gvar)) baka=1; else baka=0;\r
+                       printf("====================================load end===================================\n");\r
+               }\r
+//#ifdef __WATCOMC__\r
+//     printf("\nsize of big buffer~=%u\n", _bmsize(sega, BBUF));\r
+//#endif\r
+#ifdef BUFFDUMP\r
+               printf("contents of the buffer\n[\n%s\n]\n", BBUFSTRING);\r
+#endif// #else\r
+#ifdef PRINTBBDUMP\r
+               PRINTBB;\r
+#endif\r
+//endif // BUFFDUMP\r
+\r
+               //printf("dark purple = purgable\n");\r
+               //printf("medium blue = non purgable\n");\r
+               //printf("red = locked\n");\r
+       //      printf("press any key to continue!\n");\r
+       //      DebugMemory_(&gvar, 1);\r
+               if(baka) printf("\nyay!\n");\r
+               else printf("\npoo!\n");\r
+#ifdef BUFFDUMPPAUSE\r
+               printf("press any key to continue!\n"); getch();\r
+#endif\r
+#ifdef FILEREAD\r
        }\r
-//     close(bakapeehandle);\r
-       //hmm functions in cache system use the buffered stuff\r
+#endif\r
+#ifndef BUFFDUMPPAUSE\r
+       printf("press any key to continue!\n"); getch();\r
+#endif\r
+#endif //filereadload\r
+\r
+\r
 #ifdef __WATCOMC__\r
-       printf("\nsize of big buffer~=%u\n", _bmsize(sega, bigbuffer));\r
+       IN_Startup(&gvar);\r
+       ShapeTest (&gvar);\r
+       IN_Shutdown(&gvar);\r
 #endif\r
 \r
-       printf("contents of the buffer\n[\n%s\n]\n", bigbuffer);\r
-       //printf("dark purple = purgable\n");\r
-       //printf("medium blue = non purgable\n");\r
-       //printf("red = locked\n");\r
-       printf("press any key to continue!\n");\r
-       getch();\r
-       MM_ShowMemory(&gvar);\r
+\r
+       DebugMemory_(&gvar, 1);\r
        MM_DumpData(&gvar);\r
        MM_Report_(&gvar);\r
-       if(baka) printf("\nyay!\n");\r
-       else printf("\npoo!\n");\r
-       printf("press any key to continue!\n");\r
-       getch();\r
-#ifdef FILEREAD\r
-}\r
-#endif\r
-       printf("bakapee1=%s\n", bakapee1);\r
-       printf("bakapee2=%s\n", bakapee2);\r
-       MM_FreePtr(&bigbuffer, &gvar);\r
+       //printf("bakapee1=%s\n", bakapee1);\r
+       //printf("bakapee2=%s\n", bakapee2);\r
+       MM_FreePtr(BBUFPTR, &gvar);\r
+#ifdef __16_PM__\r
 #ifdef __DEBUG_PM__\r
-       PM_Shutdown(&gvar);\r
+       if(dbg_debugpm>0)\r
+#endif\r
+               PM_Shutdown(&gvar);\r
 #endif\r
        CA_Shutdown(&gvar);\r
        MM_Shutdown(&gvar);\r
@@ -163,25 +254,51 @@ for(w=0;w<2;w++)
        printf("&far=   %Fp", &(gvar.mm.farheap));\r
        printf("\n");\r
 #ifdef EXMMVERBOSE\r
-       printf("bigb=   %Fp ", bigbuffer);\r
-       //printf("bigbr=        %04x", bigbuffer);\r
+       printf("bigb=   %Fp ", BBUF);\r
+       //printf("bigbr=        %04x", BBUF);\r
        //printf("\n");\r
-       printf("&bigb=%Fp ", &bigbuffer);\r
-       //printf("&bigb=%04x", &bigbuffer);\r
+       printf("&bigb=%Fp ", BBUFPTR);\r
+       //printf("&bigb=%04x", BBUFPTR);\r
        printf("\n");\r
 #endif\r
        printf("========================================\n");\r
+\r
+#ifdef EXMMVERBOSE__\r
+       printf("coreleft():                     %u\n", _memavl());\r
+       printf("farcoreleft():                  %lu\n", (dword)HC_farcoreleft());\r
+#endif\r
+#ifdef __WATCOMC__\r
+//this is far  printf("Total free:                     %lu\n", (dword)(HC_GetFreeSize()));\r
+//super buggy  printf("HC_coreleft():                  %u\n", HC_coreleft());\r
+//     printf("HC_farcoreleft():                       %lu\n", (dword)HC_farcoreleft());\r
+       //printf("HC_GetNearFreeSize():         %u\n", HC_GetNearFreeSize());\r
+       //printf("HC_GetFarFreeSize():                  %lu\n", (dword)HC_GetFarFreeSize());\r
+       HC_heapdump(&gvar);\r
+//     segatesuto();\r
+#endif\r
+/*#ifdef __BORLANDC__\r
+       //printf("core left:                    %lu\n", (dword)HC_coreleft());\r
+       //printf("far core left:                        %lu\n", (dword)HC_farcoreleft());\r
+//     printf("\nfarcoreleft():                        %lu\n", farcoreleft());\r
+#endif*/\r
+       printf("Project 16 ");\r
 #ifdef __WATCOMC__\r
-//this is far  printf("Total free:                     %lu\n", (dword)(GetFreeSize()));\r
-       printf("Total near free:                %lu\n", (dword)(GetNearFreeSize()));\r
-       printf("Total far free:                 %lu\n", (dword)(GetFarFreeSize()));\r
-       heapdump(&gvar);\r
-       segatesuto();\r
+       printf("exmmtest");\r
 #endif\r
-       printf("Project 16 emmtest.exe. This is just a test file!\n");\r
+#ifdef __BORLANDC__\r
+       printf("bcexmm");\r
+#endif\r
+       printf(".exe. This is just a test file!\n");\r
        printf("version %s\n", VERSION);\r
-       //printf("core left:                    %lu\n", (dword)_coreleft());\r
-       //printf("far core left:                        %lu\n", (dword)_farcoreleft());\r
+#if defined(__DEBUG__) && ( defined(__DEBUG_PM__) || defined(__DEBUG_MM__) )\r
+#ifdef __DEBUG_MM__\r
+       printf("debugmm: %u\t", dbg_debugmm);\r
+#endif\r
+#ifdef __DEBUG_PM__\r
+       printf("debugpm: %u", dbg_debugpm);\r
+#endif\r
+       printf("\n");\r
+#endif\r
        //printf("based core left:                      %lu\n", (dword)_basedcoreleft());\r
        //printf("huge core left:                       %lu\n", (dword)_hugecoreleft());\r
 }\r