\r
=============================================================================\r
*/\r
-
+\r
#include "src/lib/16_ca.h"\r
-//#include "ID_STRS.H"\r
+#pragma hdrstop\r
+\r
+#pragma warn -pro\r
+#pragma warn -use\r
\r
//#define THREEBYTEGRSTARTS\r
\r
void _seg *grsegs[NUMCHUNKS];\r
\r
byte far grneeded[NUMCHUNKS];\r
-byte ca_levelbit,ca_levelnum;\r
-\r
-int profilehandle,debughandle;*/\r
+byte ca_levelbit,ca_levelnum;*/\r
\r
void (*drawcachebox) (char *title, unsigned numcache);\r
void (*updatecachebox) (void);\r
=\r
============================\r
*/\r
-/*++++\r
-void CA_OpenDebug(void)\r
+void CA_OpenDebug(global_game_variables_t *gvar)\r
{\r
- unlink("DEBUG.TXT");\r
- debughandle = open("DEBUG.TXT", O_CREAT | O_WRONLY | O_TEXT);\r
+#ifdef __BORLANDC__\r
+ unlink("debug.16b");\r
+ gvar->handle.debughandle = open("debug.16b", O_CREAT | O_WRONLY | O_TEXT);\r
+#endif\r
+#ifdef __WATCOMC__\r
+ unlink("debug.16w");\r
+ gvar->handle.debughandle = open("debug.16w", O_CREAT | O_WRONLY | O_TEXT);\r
+#endif\r
}\r
\r
-void CA_CloseDebug(void)\r
+void CA_CloseDebug(global_game_variables_t *gvar)\r
{\r
- close debughandle);\r
-}*/\r
+ close(gvar->handle.debughandle);\r
+}\r
\r
\r
\r
==========================\r
*/\r
\r
-boolean CA_FarRead (int handle, byte far *dest, dword length)\r
-{
+boolean CA_FarRead(int handle, byte huge *dest, dword length, mminfo_t *mm)\r
+{\r
boolean flag;\r
- if (length>0xffffl)\r
- printf("CA_FarRead doesn't support 64K reads yet!\n");\r
-
- __asm
+ //dword fat=0;\r
+ //word segm=0;\r
+ //if(mm->EMSVer<0x40)\r
+ if(length>0xfffflu)\r
{\r
- push ds\r
- mov bx,[handle]\r
- mov cx,[WORD PTR length]\r
- mov dx,[WORD PTR dest]\r
- mov ds,[WORD PTR dest+2]\r
- mov ah,0x3f // READ w/handle\r
- int 21h\r
- pop ds\r
- jnc good
- mov errno,ax
- mov flag,0
- jmp End
-good:\r
- cmp ax,[WORD PTR length]\r
- je done\r
-// errno = EINVFMT; // user manager knows this is bad read\r
- mov flag,0
- jmp End
-done:
- mov flag,1
-End:
+ printf("File is a fat bakapee\n");\r
+ //segm=(length%0xfffflu)-1;\r
+ //fat=segm*0xfffflu;\r
+ //length-=fat;\r
+// printf("CA_FarRead doesn't support 64K reads yet!\n");\r
+ return 0;//todo: EXPAND!!!\r
}\r
+\r
+ //if(!fat&&!segm)\r
+ //{\r
+ __asm {\r
+ push ds\r
+ mov bx,[handle]\r
+ mov cx,[WORD PTR length]\r
+ mov dx,[WORD PTR dest]\r
+ mov ds,[WORD PTR dest+2]\r
+ mov ah,0x3f // READ w/handle\r
+ int 21h\r
+ pop ds\r
+ jnc good\r
+ mov errno,ax\r
+ mov flag,0\r
+ jmp End\r
+#ifdef __BORLANDC__\r
+ }\r
+#endif\r
+good:\r
+#ifdef __BORLANDC__\r
+ __asm {\r
+#endif\r
+ cmp ax,[WORD PTR length]\r
+ je done\r
+// errno = EINVFMT; // user manager knows this is bad read\r
+ mov flag,0\r
+ jmp End\r
+#ifdef __BORLANDC__\r
+ }\r
+#endif\r
+done:\r
+#ifdef __BORLANDC__\r
+ __asm {\r
+#endif\r
+ mov flag,1\r
+#ifdef __BORLANDC__\r
+ }\r
+#endif\r
+End:\r
+#ifdef __WATCOMC__\r
+ }\r
+#endif\r
return flag;\r
}\r
\r
==========================\r
*/\r
\r
-boolean CA_FarWrite (int handle, byte far *source, dword length)\r
-{
+boolean CA_FarWrite(int handle, byte huge *source, dword length, mminfo_t *mm)\r
+{\r
boolean flag;\r
- if (length>0xffffl)\r
- printf("CA_FarWrite doesn't support 64K reads yet!\n");
-\r
- __asm
+ //dword fat=0;\r
+ //word segm=0;\r
+ //if(mm->EMSVer<0x40)\r
+ if(length>0xfffflu)\r
{\r
- push ds\r
- mov bx,[handle]\r
- mov cx,[WORD PTR length]\r
- mov dx,[WORD PTR source]\r
- mov ds,[WORD PTR source+2]\r
- mov ah,0x40 // WRITE w/handle\r
- int 21h\r
- pop ds\r
- jnc good
- mov errno,ax\r
- mov flag,0
- jmp End\r
+ printf("File is a fat bakapee\n");\r
+ //segm=(length%0xfffflu)-1;\r
+ //fat=segm*0xfffflu;\r
+ //length-=fat;\r
+// printf("CA_FarRead doesn't support 64K reads yet!\n");\r
+ return 0;\r
+ }\r
+\r
+ //if(!fat&&!segm)\r
+ //{\r
+ __asm {\r
+ push ds\r
+ mov bx,[handle]\r
+ mov cx,[WORD PTR length]\r
+ mov dx,[WORD PTR source]\r
+ mov ds,[WORD PTR source+2]\r
+ mov ah,0x40 // WRITE w/handle\r
+ int 21h\r
+ pop ds\r
+ jnc good\r
+ mov errno,ax\r
+ mov flag,0\r
+ jmp End\r
+#ifdef __BORLANDC__\r
+ }\r
+#endif\r
good:\r
- cmp ax,[WORD PTR length]\r
- je done\r
- //errno = ENOMEM; // user manager knows this is bad write
- mov flag,0
- jmp End\r
-done:
- mov flag,1
+#ifdef __BORLANDC__\r
+ __asm {\r
+#endif\r
+ cmp ax,[WORD PTR length]\r
+ je done\r
+ //errno = ENOMEM; // user manager knows this is bad write\r
+ mov flag,0\r
+ jmp End\r
+#ifdef __BORLANDC__\r
+ }\r
+#endif\r
+done:\r
+#ifdef __BORLANDC__\r
+ __asm {\r
+#endif\r
+ mov flag,1\r
+#ifdef __BORLANDC__\r
+ }\r
+#endif\r
End:\r
- }
+#ifdef __WATCOMC__\r
+ }\r
+#endif\r
return flag;\r
}\r
\r
==========================\r
*/\r
\r
-boolean CA_ReadFile(char *filename, memptr *ptr)\r
+boolean CA_ReadFile(char *filename, memptr *ptr, mminfo_t *mm)\r
{\r
int handle;\r
- dword size;\r
+ sdword size;\r
+ //long size;\r
\r
if((handle = open(filename,O_RDONLY | O_BINARY, S_IREAD)) == -1)\r
return false;\r
\r
size = filelength(handle);\r
- if(!CA_FarRead(handle,*ptr,size))\r
+ if(!CA_FarRead(handle,*ptr,size, mm))\r
{\r
close(handle);\r
return false;\r
==========================\r
*/\r
\r
-boolean CA_LoadFile(char *filename, memptr *ptr)\r
+boolean CA_LoadFile(char *filename, memptr *ptr, mminfo_t *mm, mminfotype *mmi)\r
{\r
int handle;\r
- long size;\r
+ sdword size;\r
+ //long size;\r
\r
if((handle = open(filename,O_RDONLY | O_BINARY, S_IREAD)) == -1)\r
return false;\r
\r
size = filelength (handle);\r
- MM_GetPtr (ptr,size);\r
- if(!CA_FarRead (handle,*ptr,size))\r
+ MM_GetPtr(ptr,size, mm, mmi);\r
+ if(!CA_FarRead(handle,*ptr,size, mm))\r
{\r
- close (handle);\r
+ close(handle);\r
return false;\r
}\r
close(handle);\r
//--------------------------\r
// expand less than 64k of data\r
//--------------------------\r
-
- __asm
+\r
+ __asm\r
{\r
mov bx,[headptr]\r
\r
asm mov bx,[headptr] // back to the head node for next bit\r
\r
asm cmp di,ax // done?\r
-asm jne expandshort
+asm jne expandshort\r
}\r
}\r
else\r
//--------------------------\r
\r
length--;\r
-
- __asm
+\r
+ __asm\r
{\r
asm mov bx,[headptr]\r
asm mov cl,1\r
asm jns expand // when length = ffff ffff, done\r
}\r
}\r
-
- __asm
+\r
+ __asm\r
{\r
mov ax,ss\r
- mov ds,ax
+ mov ds,ax\r
}\r
\r
}*/\r
======================\r
*/\r
\r
-void CA_Startup(void)\r
+void CA_Startup(global_game_variables_t *gvar)\r
{\r
#ifdef PROFILE\r
- unlink("PROFILE.TXT");\r
- profilehandle = open("PROFILE.TXT", O_CREAT | O_WRONLY | O_TEXT);\r
+#ifdef __BORLANDC__\r
+ unlink("profile.16b");\r
+ gvar->handle.profilehandle = open("profile.16b", O_CREAT | O_WRONLY | O_TEXT);\r
+#endif\r
+#ifdef __WATCOMC__\r
+ unlink("profile.16w");\r
+ gvar->handle.profilehandle = open("profile.16w", O_CREAT | O_WRONLY | O_TEXT);\r
+#endif\r
#endif\r
+// unlink("debug0.16");\r
+// gvar->handle.showmemhandle = open("debug0.16", O_CREAT | O_WRONLY | O_TEXT);\r
/*++++\r
// MDM begin - (GAMERS EDGE)\r
//\r
======================\r
*/\r
\r
-void CA_Shutdown(void)\r
+void CA_Shutdown(global_game_variables_t *gvar)\r
{\r
#ifdef PROFILE\r
- close(profilehandle);\r
+ close(gvar->handle.profilehandle);\r
#endif\r
+// close(gvar->handle.showmemhandle);\r
/*++++\r
close(maphandle);\r
close(grhandle);\r
=\r
======================\r
*/\r
-/*++++
+/*++++\r
void CA_CacheAudioChunk (int chunk)\r
{\r
long pos,compressed;\r
=\r
======================\r
*/\r
-/*++++
+/*++++\r
void CA_LoadAllSounds (void)\r
{\r
unsigned start,i;\r