]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/16_vrs.c
16_ca needs huge amounts of work and I should remember what needs to be done soon...
[16.git] / src / lib / 16_vrs.c
index 8cb41fa48cbf0a68b1d1771984a740a7b14f7147..de17fa971e8ea19a5a3248bccbe948e8883f357b 100755 (executable)
-/* Project 16 Source Code~
- * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
- *
- * This file is part of Project 16.
- *
- * Project 16 is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
- *
- * Project 16 is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program.  If not, see <http://www.gnu.org/licenses/>, or
- * write to the Free Software Foundation, Inc., 51 Franklin Street,
- * Fifth Floor, Boston, MA 02110-1301 USA.
- *
- */
-#include "src/lib/16_vrs.h"
-
-// Read .vrs file into far memory
-int read_vrs(global_game_variables_t *gvar, char *filename, struct vrs_container *vrs_cont){
-       int fd;
-       dword size;
-       byte huge *buffer;
-       // Open filename, get size of file,
-       // populate the vrs_container if all tests pass
-       fd = open((filename), O_RDONLY|O_BINARY);
-       size = filelength(fd);
-       close(fd);
-       // Insert sanity cheks later
-       CA_LoadFile(filename, buffer, &gvar->mm, &gvar->mmi);
-       vrs_cont->size = size;
-       vrs_cont->buffer = buffer;
-       return 0;
-}
-
-// Seek and return a specified .vrl blob from .vrs blob in far memory
-struct vrl_container get_vrl_by_id(struct vrs_container /*huge*/ *vrs_cont, uint16_t id){
-       uint16_t huge *ids;
-       uint32_t huge *vrl_list;
-       struct vrl_container huge *vrl_cont;
-       int counter = 0;
-       // If id is invalid, return null
-       if(id == 0){
-               // Probably add an error message?
-               return 0;
-       }
-       // Get id list from .vrs blob (base + offset)
-       ids = (uint16_t huge*)vrs_cont->buffer +
-               (dword)vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST];
-       // Loop through the id list until we found the right one or hit the end of the list
-       // Counter is keeping track of the offset(in ids/vrl blobs)
-       while(ids[counter] != id && ids[counter]){
-               counter++;
-       }
-       // Return null if we couldn't find the requested id
-       if(!ids[counter]){
-               // Error message?
-               return 0;
-       }
-       // Get vrl list from .vrs blob (base + offset)
-       vrl_list = (uint32_t huge *)(vrs_cont->buffer +
-                                       vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_VRS_LIST]);
-       // Allocate memory for vrl_cont
-       vrl_cont = (struct vrl_container)malloc(sizeof(struct vrl_container));
-       // Get vrl_header from .vrs (base + offset from vrl_list)
-       // Counter is number of vrls to skip (ids and vrls are aligned according to the .vrs specification)
-       vrl_cont->vrl_header = (struct vrl1_vgax_header huge *)(vrs_cont->buffer + vrl_list[counter]);
-       // Get .vrl size by integer arithmetics (next vrl - current vrl)
-       // Untested. May be an incorrect way to do so
-       vrl_cont->size = vrl_list[counter+1] - vrl_list[counter];
-       return vrl_cont;
-}
+/* Project 16 Source Code~\r
+ * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
+ *\r
+ * This file is part of Project 16.\r
+ *\r
+ * Project 16 is free software; you can redistribute it and/or modify\r
+ * it under the terms of the GNU General Public License as published by\r
+ * the Free Software Foundation; either version 3 of the License, or\r
+ * (at your option) any later version.\r
+ *\r
+ * Project 16 is distributed in the hope that it will be useful,\r
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
+ * GNU General Public License for more details.\r
+ *\r
+ * You should have received a copy of the GNU General Public License\r
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>, or\r
+ * write to the Free Software Foundation, Inc., 51 Franklin Street,\r
+ * Fifth Floor, Boston, MA 02110-1301 USA.\r
+ *\r
+ */\r
+#include "src/lib/16_vrs.h"\r
+\r
+#define VRS_USECAMMPM\r
+\r
+void VRS_ReadVRS(char *filename, entity_t *enti, global_game_variables_t *gvar){       VRS_OpenVRS(filename, enti, 1, gvar);   }\r
+void VRS_LoadVRS(char *filename, entity_t *enti, global_game_variables_t *gvar){       VRS_OpenVRS(filename, enti, 0, gvar);   }\r
+void VRS_OpenVRS(char *filename, entity_t *enti, boolean rlsw, global_game_variables_t *gvar)\r
+{\r
+#ifndef VRS_USECAMMPM\r
+       vrl1_vgax_offset_t **vrl_line_offsets;\r
+#endif\r
+       uint16_t far *vrl_id_iter;\r
+       uint32_t far *vrl_headers_offsets;\r
+       struct vrl1_vgax_header far *curr_vrl;\r
+       uint16_t vrl_size;\r
+       int num_of_vrl,i;\r
+\r
+       switch(rlsw)\r
+       {\r
+               case 1:\r
+//TODO ++++                    CA_ReadFile(filename, &gvar->ca.spribuff, gvar);\r
+                       CA_ReadFile(filename, MEMPTRCONV enti->spri.spritesheet.spribuff, gvar);\r
+               break;\r
+               case 0:\r
+//TODO ++++                    CA_LoadFile(filename, &gvar->ca.spribuff, gvar);\r
+                       CA_LoadFile(filename, MEMPTRCONV enti->spri.spritesheet.spribuff, gvar);\r
+               break;\r
+       }\r
+\r
+       // Insert sanity cheks later\r
+//TODO ++++    enti->spri.spritesheet.buffer = gvar->ca.spribuff;\r
+       enti->spri.spritesheet.buffer = enti->spri.spritesheet.spribuff;        //TODO: merge these 2 vars into 1\r
+       enti->spri.spritesheet.data_size = sizeof(enti->spri.spritesheet.buffer) - sizeof(struct vrl1_vgax_header);\r
+       num_of_vrl = 0;\r
+       vrl_id_iter = (uint16_t far *)(enti->spri.spritesheet.buffer + enti->spri.spritesheet.vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST]);\r
+       while(vrl_id_iter[num_of_vrl]){\r
+               num_of_vrl++;\r
+       }\r
+\r
+       // Allocate memory for vrl line offsets table\r
+#ifndef VRS_USECAMMPM\r
+       vrl_line_offsets = malloc(sizeof(vrl1_vgax_offset_t *)*num_of_vrl);//TODO: USE MM_ CA_ AND PM_\r
+#else\r
+       switch(rlsw)\r
+       {\r
+               case 0:\r
+#ifdef __DEBUG_MM__\r
+                       dbg_debugmm=0;\r
+#endif\r
+//                     MM_GetPtr(MEMPTRCONV gvar->ca.grsegs, sizeof(vrl1_vgax_offset_t *)*num_of_vrl, gvar);\r
+//                     enti->spri.spritesheet.vrl_line_offsets = (vrl1_vgax_offset_t **)gvar->ca.grsegs;\r
+                       MM_GetPtr(gvar->ca.spribuff, sizeof(vrl1_vgax_offset_t *)*num_of_vrl, gvar);\r
+                       enti->spri.spritesheet.vrl_line_offsets = (vrl1_vgax_offset_t **)(gvar->ca.spribuff);\r
+//                     MM_GetPtr(spribuff, sizeof(vrl1_vgax_offset_t *)*num_of_vrl, gvar);\r
+//                     enti->spri.spritesheet.vrl_line_offsets = (vrl1_vgax_offset_t **)spribuff;\r
+               break;\r
+       }\r
+#endif\r
+\r
+       vrl_headers_offsets = (uint32_t far *)(enti->spri.spritesheet.buffer + enti->spri.spritesheet.vrs_hdr->offset_table[VRS_HEADER_OFFSET_VRS_LIST]);\r
+       // Calculate line offsets for each vrl\r
+       for(i = 0; i < num_of_vrl; i++){\r
+               curr_vrl = (struct vrl1_vgax_header far *)(enti->spri.spritesheet.buffer + vrl_headers_offsets[i]);\r
+\r
+               // Calc. vrl size as (next_offset - curr_offset)\r
+               if (i != num_of_vrl - 1){\r
+                       vrl_size = vrl_headers_offsets[i+1] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);\r
+               }\r
+               // If it's the last vrl, size is (next_vrs_struct_offset - curr_offset)\r
+               else{\r
+                       vrl_size = enti->spri.spritesheet.vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);\r
+               }\r
+#ifndef VRS_USECAMMPM\r
+               vrl_line_offsets[i] = vrl1_vgax_genlineoffsets(curr_vrl, (byte *)curr_vrl + sizeof(struct vrl1_vgax_header), vrl_size);\r
+#else\r
+               enti->spri.spritesheet.vrl_line_offsets[i] = vrl1_vgax_genlineoffsets(curr_vrl, (byte *)curr_vrl + sizeof(struct vrl1_vgax_header), vrl_size);\r
+#endif\r
+       }\r
+#ifndef VRS_USECAMMPM\r
+       enti->spri.spritesheet.vrl_line_offsets = vrl_line_offsets;\r
+#endif\r
+//     printf("VRS_OpenVRS\n");\r
+//     printf("        vrl_size=%lu\n\n",vrl_size);\r
+}\r
+\r
+#if 0\r
+//\r
+void VRS_ReadVRL(char *filename, entity_t *enti, global_game_variables_t *gvar){       VRS_OpenVRL(filename, enti, 1, gvar);   }\r
+void VRS_LoadVRL(char *filename, entity_t *enti, global_game_variables_t *gvar){       VRS_OpenVRL(filename, enti, 0, gvar);   }\r
+void VRS_OpenVRL(char *filename, entity_t *enti, boolean rlsw, global_game_variables_t *gvar)\r
+{\r
+#ifndef VRL_USECAMMPM\r
+       vrl1_vgax_offset_t *line_offsets;\r
+#endif\r
+//     uint32_t far *vrl_headers_offsets;\r
+       struct vrl1_vgax_header far *curr_vrl;\r
+\r
+       switch(rlsw)\r
+       {\r
+               case 1:\r
+                       CA_ReadFile(filename, &enti->spri.spritesheet.spribuff, gvar);\r
+               break;\r
+               case 0:\r
+                       CA_LoadFile(filename, &enti->spri.spritesheet.spribuff, gvar);\r
+               break;\r
+       }\r
+\r
+       // Insert sanity cheks later\r
+       enti->spri.sprite_vrl_cont.buffer = enti->spri.spritesheet.spribuff;\r
+       enti->spri.sprite_vrl_cont.data_size = sizeof(enti->spri.spritesheet.buffer) - sizeof(struct vrl1_vgax_header);\r
+\r
+       // Allocate memory for vrl line offsets table\r
+#ifndef VRL_USECAMMPM\r
+       line_offsets = malloc(sizeof(vrl1_vgax_offset_t *));//TODO: USE MM_ CA_ AND PM_\r
+#else\r
+       MM_GetPtr(MEMPTRCONV gvar->ca.grsegs[0], sizeof(vrl1_vgax_offset_t *), gvar);\r
+       enti->spri.sprite_vrl_cont.line_offsets = (vrl1_vgax_offset_t *)gvar->ca.grsegs[0];\r
+#endif\r
+\r
+       //vrl_headers_offsets = (uint32_t far *)(enti->spri.sprite_vrl_cont.buffer + enti->spri.sprite_vrl_cont.vrs_hdr->offset_table[VRL_HEADER_OFFSET_VRL_LIST]);\r
+       // Calculate line offsets for each vrl\r
+               curr_vrl = (struct vrl1_vgax_header far *)(enti->spri.sprite_vrl_cont.buffer);// + vrl_headers_offsets);\r
+\r
+#ifndef VRL_USECAMMPM\r
+               line_offsets = vrl1_vgax_genlineoffsets(curr_vrl, (byte *)curr_vrl + sizeof(struct vrl1_vgax_header), sizeof(enti->spri.spritesheet.buffer));\r
+#else\r
+               enti->spri.sprite_vrl_cont.line_offsets = vrl1_vgax_genlineoffsets(curr_vrl, (byte *)curr_vrl + sizeof(struct vrl1_vgax_header), sizeof(enti->spri.spritesheet.buffer));\r
+#endif\r
+\r
+#ifndef VRL_USECAMMPM\r
+       enti->spri.sprite_vrl_cont.line_offsets = line_offsets;\r
+#endif\r
+       printf("VRS_OpenVRL\n");\r
+       printf("        vrl_size=%lu\n\n",sizeof(enti->spri.spritesheet.buffer));\r
+}\r
+//\r
+#endif\r
+\r
+// Seek and return a specified .vrl blob from .vrs blob in far memory\r
+int get_vrl_by_id(struct vrs_container far *vrs_cont, uint16_t id, struct vrl_container *vrl_cont){\r
+       uint16_t far *ids;\r
+       uint32_t far *vrl_offs_list;\r
+       int counter = 0;\r
+\r
+       // If id is invalid, return -1\r
+       if(id == 0){\r
+               // Probably add an error message?\r
+               return -1;\r
+       }\r
+\r
+       // Get id list from .vrs blob (base + offset)\r
+       ids = (uint16_t far*)(vrs_cont->buffer +\r
+               vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST]);\r
+\r
+       // Loop through the id list until we found the right one or hit the end of the list\r
+       // Counter is keeping track of the offset(in ids/vrl blobs)\r
+       while(ids[counter] != id && ids[counter]){\r
+               counter++;\r
+       }\r
+       // Return -2 if we couldn't find the requested id\r
+       if(!ids[counter]){\r
+               // Error message?\r
+               return -2;\r
+       }\r
+\r
+       // Get vrl offsets list from .vrs blob (base + offset)\r
+       vrl_offs_list = (uint32_t far *)(vrs_cont->buffer +\r
+                                       vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_VRS_LIST]);\r
+\r
+       // Get vrl_header from .vrs (base + offset from vrl_list)\r
+       // Counter is number of vrls to skip (ids and vrls are aligned according to the .vrs specification)\r
+       vrl_cont->vrl_header = (struct vrl1_vgax_header far *)(vrs_cont->buffer + vrl_offs_list[counter]);\r
+\r
+       // Get .vrl size by integer arithmetics (next vrl offset - current vrl offset)\r
+       if(ids[counter+1]){\r
+               vrl_cont->data_size = vrl_offs_list[counter+1] - vrl_offs_list[counter] - sizeof(struct vrl1_vgax_header);\r
+       }\r
+       // If we are retriving the last vrl, size is ids_list offset - current vrl offset, as next vrl offs is 0\r
+       else{\r
+               vrl_cont->data_size = vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST] - vrl_offs_list[counter] - sizeof(struct vrl1_vgax_header);\r
+       }\r
+\r
+       // Retrive line offsets form .vrs\r
+       vrl_cont->line_offsets = vrs_cont->vrl_line_offsets[counter];\r
+\r
+       return 0;\r
+}\r