]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/16_vrs.c
wwwwwwwwwwwwwwwwwwwwwwwwwwww vrstest.c works wwwwww yakui-lover wwwww look! wwww
[16.git] / src / lib / 16_vrs.c
index abd43c43cfaf231fd4e223b8456761c2bd303e64..5dc525e15d39c237e6783525de42f6538eed733b 100755 (executable)
@@ -1,19 +1,47 @@
-#include <stdio.h>
-#include <fcntl.h>
-#include <ctype.h>
-#include <stdint.h>
-#include <stdlib.h>
-#include <unistd.h>
+/* 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"
+#include "src/lib/typdefst.h"
 
-#include "16_vrs.h"
-
-// Read .vrs file into memory 
-int read_vrs(char *filename, struct vrs_container *vrs_cont){
-       // Initialise a local copy of becessary variables
-       // so vrs_cont won't be dirty on error
+// Read .vrs file into far memory
+int read_vrs(global_game_variables_t *gvar, char *filename, struct vrs_container *vrs_cont){
        int fd;
-       unsigned long size;
-       unsigned char *buffer;
+       dword size;
+#ifdef __WATCOMC__
+       __segment seg;
+       void __based(seg)* bigbuffer;
+#endif
+#ifdef __BORLANDC__
+       memptr bigbuffer;
+#endif
+       byte huge *buffer;
+       vrl1_vgax_offset_t **vrl_line_offsets;
+       uint32_t huge *vrl_headers_offsets;
+       uint16_t huge *vrl_id_iter;
+       uint32_t vrl_size;
+       int num_of_vrl, i;
+       struct vrl1_vgax_header huge *curr_vrl;
+       int success;
+
        // Open filename, get size of file,
        // populate the vrs_container if all tests pass
        fd = open(filename, O_RDONLY|O_BINARY);
@@ -22,47 +50,90 @@ int read_vrs(char *filename, struct vrs_container *vrs_cont){
        buffer = malloc(size);
        lseek(fd, 0, SEEK_SET);
        read(fd, buffer, size);
-       vrs_cont->size = size;
+       close(fd);
+       if(!success)
+       {
+               fprintf(stderr, "Unablee to load file");
+               exit(3);
+       }
+       vrs_cont->data_size = size - sizeof(struct vrs_header);
        vrs_cont->buffer = buffer;
-       // 0 is an invalid value for ids under vrs specifications,
-       // so it is safe to flush ids to this value
-       vrs_cont->anchor_sprite_id = 0;
-       vrs_cont->current_sprite_id = 0;
+
+       // Calculate vrl offsets
+       
+       // Count sprites
+       vrl_id_iter = (uint16_t huge *)(buffer + vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST]);
+       while(vrl_id_iter[num_of_vrl]){
+               num_of_vrl++;
+       }
+       // Allocate memory for vrl line offsets table
+       vrl_line_offsets = malloc(sizeof(vrl1_vgax_offset_t *)*num_of_vrl);
+
+       vrl_headers_offsets = (uint32_t huge *)(buffer + vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_VRS_LIST]);
+       // Calculate line offsets for each vrl
+       for(i = 0; i < num_of_vrl; i++){
+               curr_vrl = (struct vrl1_vgax_header huge *)(buffer + vrl_headers_offsets[i]);
+
+               // Calc. vrl size as (next_offset - curr_offset)
+               if (i != num_of_vrl - 1){
+                       vrl_size = vrl_headers_offsets[i+1] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);
+               }
+               // If it's the last vrl, size is (next_vrs_struct_offset - curr_offset)
+               else{
+                       vrl_size = vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);
+               }
+               vrl_line_offsets[i] = vrl1_vgax_genlineoffsets(curr_vrl, (byte *)curr_vrl + sizeof(struct vrl1_vgax_header), vrl_size);
+       }
+       vrs_cont->vrl_line_offsets = vrl_line_offsets;
        return 0;
 }
 
-// Seek and return a specified .vrl blob from .vrs blob in memory 
-struct vrl_container* get_vrl_by_id(struct vrs_container *vrs_cont, uint16_t id){
-       uint16_t *ids; 
-       uint32_t *vrl_list;
-       struct vrl_container *vrl_cont;
+// Seek and return a specified .vrl blob from .vrs blob in far memory
+int get_vrl_by_id(struct vrs_container /*huge*/ *vrs_cont, uint16_t id, struct vrl_container *vrl_cont){
+       uint16_t huge *ids;
+       uint32_t huge *vrl_offs_list;
        int counter = 0;
-       // If id is invalid, return null
+
+       // If id is invalid, return -1
        if(id == 0){
                // Probably add an error message?
-               return 0;
+               return -1;
        }
+
        // Get id list from .vrs blob (base + offset)
-       ids = (uint16_t*)vrs_cont->buffer + (unsigned long)vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST];
+       ids = (uint16_t huge*)(vrs_cont->buffer + 
+               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
+       // Return -2 if we couldn't find the requested id
        if(!ids[counter]){
                // Error message?
-               return 0;
+               return -2;
        }
-       // Get vrl list from .vrs blob (base + offset)
-       vrl_list = (uint32_t *)(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 offsets list from .vrs blob (base + offset)
+       vrl_offs_list = (uint32_t huge *)(vrs_cont->buffer +
+                                       vrs_cont->vrs_hdr->offset_table[VRS_HEADER_OFFSET_VRS_LIST]);
+
        // 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*)(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;
+       vrl_cont->vrl_header = (struct vrl1_vgax_header huge *)(vrs_cont->buffer + vrl_offs_list[counter]);
+
+       // Get .vrl size by integer arithmetics (next vrl offset - current vrl offset)
+       if(ids[counter+1]){
+               vrl_cont->data_size = vrl_offs_list[counter+1] - vrl_offs_list[counter] - sizeof(struct vrl1_vgax_header);
+       }
+       // If we are retriving the last vrl, size is ids_list offset - current vrl offset, as next vrl offs is 0
+       else{
+               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);
+       }
+
+       // Retrive line offsets form .vrs
+       vrl_cont->line_offsets = vrs_cont->vrl_line_offsets[counter];
+
+       return 0;
 }