X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Flib%2Fmapread.c;h=a13a370d8d365bd19a15f2fa5e879f9aec8ec185;hb=330b72f5c3a57ed0a17636059df12e0195a5c3cd;hp=54a33e52212b4aefd604cd3395b38fdb58f650fb;hpb=105c6eafc6100077fabc6cec72d124a615ae2f18;p=16.git
diff --git a/src/lib/mapread.c b/src/lib/mapread.c
old mode 100644
new mode 100755
index 54a33e52..a13a370d
--- a/src/lib/mapread.c
+++ b/src/lib/mapread.c
@@ -1,226 +1,245 @@
-#include "src/lib/mapread.h"
-
-/*static void
-initMap(map_t *map, int maps) {
- // just a place holder to fill out an alternating pattern
- int x, y;
- int i;
- int tile = 1;
- //if(!isEMS() || !checkEMS())
- map->tiles = malloc(sizeof(tiles_t));
- //else
- // map->tiles = (tiles_t *)alloc_emem(sizeof(tiles_t));
+/* 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 , or
+ * write to the Free Software Foundation, Inc., 51 Franklin Street,
+ * Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ */
- // create the tile set
- //if(!isEMS() || !checkEMS())
- map->tiles->data = malloc(sizeof(bitmap_t));
- //else
- // map->tiles->data = (bitmap_t *)alloc_emem(sizeof(bitmap_t));
- map->tiles->data->width = (16*2);
- map->tiles->data->height= 16;
- //if(!isEMS() || !checkEMS())
- map->tiles->data->data = malloc((16*2)*16);
- //else
- // map->tiles->data->data = (byte *)alloc_emem((TILEWH*2)*TILEWH);
- map->tiles->tileHeight = 16;
- map->tiles->tileWidth =16;
- map->tiles->rows = 1;
- map->tiles->cols = 2;
+#include "src/lib/mapread.h"
- //i=0;
- //for(y=0; ytiles->data->data[i] = 28;//0x24;
- // else
- // map->tiles->data->data[i] = 0;//0x34;
- // i++;
- //}
- //}
+int jsoneq(const char *json, jsmntok_t *tok, const char *s) {
+ if (tok->type == JSMN_STRING && (int) strlen(s) == tok->end - tok->start &&
+ strncmp(json + tok->start, s, tok->end - tok->start) == 0) {
+ return 0;
+ }
+ return -1;
+}
+
+//this function is quite messy ^^; sorry! it is a quick and dirty fix~
+word dump(const char *js, jsmntok_t *t, size_t count, word indent, char *js_sv, map_t *map, dword q) {
+ dword i;
+ word j;//, k;
+ bitmap_t bp;
+ #ifdef DEBUG_JS
+ if(indent==0)
+ {
+ fprintf(stdout, "%s\n", js);
+ fprintf(stdout, "\n");
+ }
+ #endif
+ #ifdef DEBUG_DUMPVARS
+ fprintf(stdout, "t->size=[%d] ", t->size);
+ fprintf(stdout, "q=[%d] ", q);
+ fprintf(stdout, "indent= [%d] ", indent);
+ fprintf(stdout, "js_sv= [%s]\n", js_sv);
+ #endif
+ if (count == 0) {
+ return 0;
+ }
+ /* We may want to do strtol() here to get numeric value */
+//0000fprintf(stderr, "t->type=%d\n", t->type);
+ if (t->type == JSMN_PRIMITIVE) {
+ if(strstr(js_sv, "data"))
+ {
+ /*
+ here we should recursivly call dump again here to skip over the array until we get the facking width of the map.
+ so we can initiate the map which allocates the facking map->tiles->data->data properly and THEN we can return
+ here to read the data.... That is my design for this... wwww
- i=0;
- for(y=0; yheight; y++) {
- for(x=0; xwidth; x++) {
- map->data[i] = tile;
- tile = tile ? 0 : 1;
- i++;
+ FUCK well i am stuck.... wwww
+ */
+ map->data[q] = (byte)atoi(js+t->start);
+ #ifdef DEBUG_MAPDATA
+ fprintf(stdout, "%d[%d]", q, map->data[q]);
+ #endif
+ }
+ else
+ if(strstr(js_sv, "height"))
+ {
+ map->height = atoi(js+t->start);
+ #ifdef DEBUG_MAPVAR
+ fprintf(stdout, "indent= [%d] ", indent);
+ fprintf(stdout, "h:[%d]\n", map->height);
+ #endif
+ }else if(strstr(js_sv, "width"))
+ {
+ map->width = atoi(js+t->start);
+ #ifdef DEBUG_MAPVAR
+ fprintf(stdout, "indent= [%d] ", indent);
+ fprintf(stdout, "w:[%d]\n", map->width);
+ #endif
+ }
+ return 1;
+ /* We may use strndup() to fetch string value */
+ } else if (t->type == JSMN_STRING) {
+ if(jsoneq(js, t, "data") == 0)
+ {
+// fprintf(stdout, "[[[[%d|%d]]]]\n", &(t+1)->size, (t+1)->size);
+// fprintf(stdout, "\n%.*s[xx[%d|%d]xx]\n", (t+1)->end - (t+1)->start, js+(t+1)->start, &(t+1)->size, (t+1)->size);
+ map->data = malloc(sizeof(byte) * (t+1)->size);
+ map->tiles = malloc(sizeof(tiles_t));
+ map->tiles->btdata = malloc(sizeof(bitmap_t));
+ //fix this to be far~
+//0000 bp = bitmapLoadPcx("data/ed.pcx");
+// bp = bitmapLoadPcx("data/koishi^^.pcx");
+ map->tiles->btdata = &bp;
+//---- map->tiles->data = planar_buf_from_bitmap(&bp);
+ //map->tiles->data->data = malloc((16/**2*/)*16);
+ //map->tiles->data->width = (16/**2*/);
+ //map->tiles->data->height= 16;
+ map->tiles->tileHeight = 16;
+ map->tiles->tileWidth = 16;
+ map->tiles->rows = 1;
+ map->tiles->cols = 1;
+ map->tiles->debug_text=false;
+ strcpy(js_sv, "data");//strdup(js+t->start);//, t->end - t->start);
}
- tile = tile ? 0 : 1;
+ else
+ if (jsoneq(js, t, "height") == 0 && indent<=1)
+ {
+ strcpy(js_sv, "height");//strdup(js+t->start);//, t->end - t->start);
+ }else
+ if(jsoneq(js, t, "width") == 0 && indent<=1)
+ {
+ strcpy(js_sv, "width");//strdup(js+t->start);//, t->end - t->start);
+ }else strcpy(js_sv, "\0");
+ return 1;
+ } else if (t->type == JSMN_OBJECT) {
+ //fprintf(stdout, "\n");
+ j = 0;
+ for (i = 0; i < t->size; i++) {
+ //for (k = 0; k < indent; k++) fprintf(stdout, "\t");
+ j += dump(js, t+1+j, count-j, indent+1, js_sv, map, i);
+ //fprintf(stdout, ": ");
+ j += dump(js, t+1+j, count-j, indent+1, js_sv, map, i);
+ //fprintf(stdout, "\n");
+ }
+ return j+1;
+ } else if (t->type == JSMN_ARRAY) {
+ j = 0;
+ //fprintf(stdout, "==\n");
+ for (i = 0; i < t->size; i++) {
+ //for (k = 0; k < indent-1; k++) fprintf(stdout, "\t");
+ //fprintf(stdout, "\t-");
+ j += dump(js, t+1+j, count-j, indent+1, js_sv, map, i);
+ //fprintf(stdout, "==\n");
+ }
+ return j+1;
}
-}*/
-
-static int jsoneq(const char *json, jsmntok_t *tok, const char *s) {
- if (tok->type == JSMN_STRING && (int) strlen(s) == tok->end - tok->start &&
- strncmp(json + tok->start, s, tok->end - tok->start) == 0) {
- return 0;
- }
- return -1;
-}
-
-//this function is quite messy ^^; sorry! it is a quick and dirty fix~
-static int dump(const char *js, jsmntok_t *t, size_t count, int indent, /*char *js_sv,*/ map_t *map, int q/*, int w*/) {
- int i, j, k;
- if (count == 0) {
- return 0;
- }
- /* We may want to do strtol() here to get numeric value */
- if (t->type == JSMN_PRIMITIVE) {
- //if(w)
- if(js_sv == "data")
- {
- /*
- here we should recursivly call dump again here to skip over the array until we get the facking width of the map.
- so we can initiate the map which allocates the facking map->tiles->data->data properly and THEN we can return
- here to read the data.... That is my design for this... wwww
-
- FUCK well i am stuck.... wwww
- */
- //dump(js, t+1, count, indent, map, i);
-
- //bgdata[q] = strtol(js+t->start, (char **)js+t->end, 10);
- if(strtol(js+t->start, (char **)js+t->end, 10)==0){ /*printf("%d\n", sizeof(map->tiles->data->data));*/ /*fprintf(stderr, "\nFACK! %d\n", errno);*/ return 1; /*exit(-1); */}
- map->tiles->data->data[q] = (byte)strtol(js+t->start, (char **)js+t->end, 10);
- printf("%d[%d]", q, map->tiles->data->data[q]);
- //printf("%d[%d]", q, bgdata[q]);
- }
- else
- if(js_sv == "height")
- {
- map->height = (int)strtol(js+t->start, (char **)js+t->end, 10);
- printf("h:[%d]\n", map->height);
- }else if(js_sv == "width")
- {
- map->width = (int)strtol(js+t->start, (char **)js+t->end, 10);
- printf("w:[%d]\n", map->width);
- }
- return 1;
- /* We may use strndup() to fetch string value */
- } else if (t->type == JSMN_STRING) {
- //printf("'%.*s'", t->end - t->start, js+t->start);
- //if(w)
- if(jsoneq(js, t, "data") == 0 )
- {
- //initMap(&map);
- //map->tiles->data->data = malloc((16*2)*16);
- js_sv="data";//strdup(js+t->start);//, t->end - t->start);
- //printf("%s\n", js_sv);
- }
- else
- if (jsoneq(js, t, "height") == 0 && indent==1)
- {
- js_sv="height";//strdup(js+t->start);//, t->end - t->start);
- //printf("%s\n", js_sv);
- }else if (jsoneq(js, t, "width") == 0 && indent==1)
- {
- js_sv="width";//strdup(js+t->start);//, t->end - t->start);
- //printf("%s\n", js_sv);
- }else js_sv=NULL;
- return 1;
- } else if (t->type == JSMN_OBJECT) {
- //printf("\n");
- j = 0;
- for (i = 0; i < t->size; i++) {
- //for (k = 0; k < indent; k++) printf("\t");
- j += dump(js, t+1+j, count-j, indent+1, map, i/*, w*/);
- //printf(": ");
- j += dump(js, t+1+j, count-j, indent+1, map, i/*, w*/);
- //printf("\n");
- }
- return j+1;
- } else if (t->type == JSMN_ARRAY) {
- j = 0;
- //printf("==\n");
- for (i = 0; i < t->size; i++) {
- //printf("[[[[%d]]]]\n", t->size);
- //if(bgdata==NULL) bgdata=malloc(sizeof(char)*t->size);
- //for (k = 0; k < indent-1; k++) printf("\t");
- //printf("\t-");
- j += dump(js, t+1+j, count-j, indent+1, map, i/*, t->size*/);
- //printf("==\n");
- }
- return j+1;
- }
- return 0;
-}
-
-static int loadmap(char *mn, map_t *map/*, word w*/)
-{
- int r;
- int eof_expected = 0;
- char *js = NULL;
- size_t jslen = 0;
- char buf[BUFSIZ];
-
- jsmn_parser p;
- jsmntok_t *tok;
- size_t tokcount = 2;
-
- FILE *fh = fopen(mn, "r");
-
- /* Prepare parser */
- jsmn_init(&p);
-
- /* Allocate some tokens as a start */
- tok = malloc(sizeof(*tok) * tokcount);
- if (tok == NULL) {
- fprintf(stderr, "malloc(): errno=%d\n", errno);
- return 3;
- }
-
- for (;;) {
- /* Read another chunk */
- r = fread(buf, 1, sizeof(buf), fh);
- if (r < 0) {
- fprintf(stderr, "fread(): %d, errno=%d\n", r, errno);
- return 1;
- }
- if (r == 0) {
- if (eof_expected != 0) {
- return 0;
- } else {
- fprintf(stderr, "fread(): unexpected EOF\n");
- return 2;
- }
- }
-
- js = realloc(js, jslen + r + 1);
- if (js == NULL) {
- fprintf(stderr, "realloc(): errno = %d\n", errno);
- return 3;
- }
- strncpy(js + jslen, buf, r);
- jslen = jslen + r;
-
-again:
- r = jsmn_parse(&p, js, jslen, tok, tokcount);
- if (r < 0) {
- if (r == JSMN_ERROR_NOMEM) {
- tokcount = tokcount * 2;
- tok = realloc(tok, sizeof(*tok) * tokcount);
- if (tok == NULL) {
- fprintf(stderr, "realloc(): errno=%d\n", errno);
- return 3;
- }
- goto again;
- }
- } else {
- dump(js, tok, p.toknext, 0, map, 0/*, w*/);
- //fprintf(stdout, "[[[[%d]]]]\n", sizeof(tok));
- //printf("[\n%d\n]", jslen);
- eof_expected = 1;
- }
- }
-
- free(js);
- free(tok);
- fclose(fh);
-
- return 0;
-}
-
-/*int main()
-{
- map_t map;
- loadmap("../../../../data/test.map", &map);
- return 0;
-}*/
+ return 0;
+}
+
+int loadmap(char *mn, map_t *map)
+{
+ int r;
+ static word incr=0;
+ int eof_expected = 0;
+ char *js = NULL;
+ size_t jslen = 0;
+ char buf[BUFSIZ];
+ static char js_ss[16];
+
+ jsmn_parser p;
+ jsmntok_t *tok;
+ size_t tokcount = 2;
+
+ FILE *fh = fopen(mn, "r");
+
+ /* Prepare parser */
+ jsmn_init(&p);
+
+ /* Allocate some tokens as a start */
+//0000fprintf(stderr, "tok malloc\n");
+ tok = malloc(sizeof(*tok) * tokcount);
+ if (tok == NULL) {
+ fprintf(stderr, "malloc(): errno=%d\n", errno);
+ return 3;
+ }
+
+ for (;;) {
+ /* Read another chunk */
+//0000fprintf(stderr, "read\n");
+ r = fread(buf, 1, sizeof(buf), fh);
+ if (r < 0) {
+ fprintf(stderr, "fread(): %d, errno=%d\n", r, errno);
+ return 1;
+ }
+ if (r == 0) {
+ if (eof_expected != 0) {
+ return 0;
+ } else {
+ fprintf(stderr, "fread(): unexpected EOF\n");
+ return 2;
+ }
+ }
+//0000fprintf(stdout, "r= [%d] BUFSIZ=%d\n", r, BUFSIZ);
+//0000fprintf(stderr, "js alloc~\n");
+ js = realloc(js, jslen + r + 1);
+ if (js == NULL) {
+ fprintf(stderr, "*js=%Fp\n", *js);
+ fprintf(stderr, "realloc(): errno = %d\n", errno);
+ return 3;
+ }
+ strncpy(js + jslen, buf, r);
+ jslen = jslen + r;
+
+again:
+//0000fprintf(stdout, " parse~ tok=%zu jslen=%zu r=%d _memavl()=%u BUFSIZ=%d~\n", tokcount, jslen, r, _memavl(), BUFSIZ);
+//0000fprintf(stdout, "p=[%u] [%u] [%d]\n", p.pos, p.toknext, p.toksuper);
+/*
+ I think it crashes on the line below when it tries to parse the data of huge maps... wwww this is a jsmn problem wwww
+*/
+ r = jsmn_parse(&p, js, jslen, tok, tokcount);
+//0000fprintf(stdout, "r= [%d]\n", r);
+ if (r < 0) {
+ if (r == JSMN_ERROR_NOMEM) {
+ tokcount = tokcount * 2;
+//0000fprintf(stderr, "tok realloc~ %zu\n", tokcount);
+ tok = realloc(tok, sizeof(*tok) * tokcount);
+ if (tok == NULL) {
+ fprintf(stderr, "realloc(): errno=%d\n", errno);
+ return 3;
+ }
+ goto again;
+ }
+ } else {
+ //printf("js=%Fp\n", (js));
+ //printf("*js=%Fp\n", (*(js)));
+ //printf("&*js=%s\n", &(*(js)));
+ //printf("&buf=[%Fp]\n", &buf);
+ //printf("&buf_seg=[%x]\n", FP_SEG(&buf));
+ //printf("&buf_off=[%x]\n", FP_OFF(&buf));
+ //printf("&buf_fp=[%Fp]\n", MK_FP(FP_SEG(&buf), FP_OFF(&buf)));
+ //printf("buf=[\n%s\n]\n", buf);
+ //printf("buff=[%Fp]\n", buff);
+ //printf("(*buff)=[%Fp]\n", (*buff));
+ //printf("&(*buff)=[\n%s\n]\n", &(*buff));
+ #ifdef DEBUG_DUMPVARS
+ fprintf(stdout, "running dump~\n");
+ #endif
+ dump(js, tok, p.toknext, incr, &js_ss, map, 0);
+ eof_expected = 1;
+ }
+ }
+
+ //free(js);
+ //free(tok);
+ //fclose(fh);
+
+ return 0;
+}