]> 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 6c39e179bd7ba2eebb03fa9480f1a0c9f2e966e1..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/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 FILERL\r
-//#define FILEREAD\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
@@ -47,105 +92,160 @@ void segatesuto()
        screen = 0xB800;\r
        scrptr = 0;\r
        printf( "Top left character is '%c'.\n", *(screen:>scrptr) );\r
-       printf("Next string is: [");\r
-       while(*scrptr<16)\r
-       {\r
-               printf("%c", *(screen:>scrptr));\r
-               //printf("\b");\r
-               scrptr++;\r
-\r
-       }\r
-       printf("]\n");\r
-       getch();\r
-       printf("press a key.\n");\r
+//     printf("Next string is: [");\r
+//     while(*scrptr<16)\r
+//     {\r
+//             printf("%c", *(screen:>scrptr));\r
+//             //printf("\b");\r
+//             scrptr++;\r
+//\r
+//     }\r
+//     printf("]\n");\r
+//     printf("press any key to continue!\n");\r
+//     getch();\r
 }\r
 #endif\r
 \r
 void\r
 main(int argc, char *argv[])\r
 {\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 FILERL\r
+//#ifdef __WATCOMC__\r
+//     __segment sega;\r
+//#endif\r
        //static byte bakapee[64];\r
-       char *bakapee;\r
+       char *bakapee1, *bakapee2;\r
        word baka;\r
-#endif\r
 \r
 #ifdef __BORLANDC__\r
        argc=argc;\r
 #endif\r
-#ifdef FILERL\r
-       bakapee = malloc(64);\r
+       //file name //\r
+       bakapee1 = malloc(24);\r
+       bakapee2 = malloc(24);\r
+       //file name //\r
+\r
+#ifdef __16_PM__\r
+#ifdef __DEBUG_PM__\r
+       dbg_debugpm=1;  //debug pm\r
+#endif\r
 #endif\r
-       gvar.mm.mmstarted=0;\r
 \r
-       //PRINTBB\r
-#ifdef FILERL\r
-       if(argv[1]) bakapee = argv[1];\r
-       else\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
        //{ printf("filename!: "); scanf("%[^\n]", &bakapee); }\r
-       bakapee = "data/koishi~.pcx";\r
+               bakapee1 = "data/koishi~.pcx";\r
+               bakapee2 = "data/test.map";\r
+       }\r
+       //printf("main()=%Fp    start MM\n", *argv[0]);\r
+       MM_Startup(&gvar); //printf("ok\n");\r
+#ifdef __16_PM__\r
+#ifdef __DEBUG_PM__\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
-//     printf("main()=%Fp      start MM\n", *argv[0]);\r
-       MM_Startup(&gvar.mm, &gvar.mmi);\r
-       //PM_Startup();\r
-       //PM_UnlockMainMem();\r
+#ifdef __DEBUG_MM__\r
+       dbg_debugmm=0;\r
+#endif\r
        CA_Startup(&gvar);\r
 //     printf("                done!\n");\r
-       //PRINTBB\r
-//     getch();\r
-#ifdef FILERL\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
+#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<2;w++)\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, 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
-       printf("                read\n");\r
-       if(CA_ReadFile(bakapee, &bigbuffer, &gvar.mm))\r
-#else\r
-       printf("                load\n");\r
-       if(CA_LoadFile(bakapee, &bigbuffer, &gvar.mm, &gvar.mmi))\r
-#endif\r
-               baka=1;\r
-       else\r
-               baka=0;\r
-//     close(bakapeehandle);\r
-       //hmm functions in cache system use the buffered stuff\r
+       }\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
-#endif\r
-#endif\r
-       printf("press any key to continue!\n");\r
-       getch();\r
-       printf("\n\ncontents 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, &gvar.mm);\r
-       //getch();\r
-       MM_DumpData(&gvar.mm);\r
-       MM_Report(&gvar);\r
-//     printf("                stop!\n");\r
-       getch();\r
-#ifdef FILERL\r
-       MM_FreePtr(&bigbuffer, &gvar.mm);\r
-#endif\r
-       //PM_Shutdown();\r
-       CA_Shutdown(&gvar);\r
-       MM_Shutdown(&gvar.mm);\r
-//     printf("                done!\n");\r
-#ifdef FILERL\r
-       free(bakapee);\r
-       if(baka) printf("\nyay!\n");\r
-       else printf("\npoo!\n");\r
+       IN_Startup(&gvar);\r
+       ShapeTest (&gvar);\r
+       IN_Shutdown(&gvar);\r
 #endif\r
+\r
+\r
+       DebugMemory_(&gvar, 1);\r
+       MM_DumpData(&gvar);\r
+       MM_Report_(&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
+       if(dbg_debugpm>0)\r
+#endif\r
+               PM_Shutdown(&gvar);\r
+#endif\r
+       CA_Shutdown(&gvar);\r
+       MM_Shutdown(&gvar);\r
+       free(bakapee1); free(bakapee2);\r
        printf("========================================\n");\r
        printf("near=   %Fp ", gvar.mm.nearheap);\r
        printf("far=    %Fp", gvar.mm.farheap);\r
@@ -154,25 +254,51 @@ main(int argc, char *argv[])
        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)(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
+//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
-       printf("Project 16 emmtest.exe. This is just a test file!\n");\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
+       printf("exmmtest");\r
+#endif\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