-/* 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 "16_map.h"
-
-// Ideally, preprocess json during compilation and read serialized data
-
-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;
-}
-
-void extract_map(const char *js, jsmntok_t *t, size_t count, map_t *map) {
- int i, j, k, indent, inner_end;
- bitmap_t bp;
- char *s;
- i = 0;
- while(i<count) {
- if(jsoneq(js, &(t[i]), "layers") == 0) {
- i++;
- map->data = malloc(sizeof(byte*) * t[i].size);
- inner_end = t[i].end;
- k = 0;
- while(t[i].start < inner_end) {
- printf("%d, %d\n", t[i].start, inner_end);
- if(jsoneq(js, &(t[i]), "data") == 0) {
- #ifdef DEBUG_MAPVAR
- printf("Layer %d data: [", k);
- #endif
- map->data[k] = malloc(sizeof(byte) * t[i+1].size);
- for(j = 0; j < t[i+1].size; j++) {
- map->data[k][j] = (byte)atoi(js + t[i+2+j].start);
- #ifdef DEBUG_MAPVAR
- printf("%d, ", map->data[k][j]);
- #endif
- }
- i += j + 2;
- k++;
- #ifdef DEBUG_MAPVAR
- puts("]");
- #endif
- }
- else{
- i++;
- }
- }
- }
- if(jsoneq(js, &(t[i]), "tilesets") == 0) {
- i++;
- map->tiles = malloc(sizeof(tiles_t*) * t[i].size);
- inner_end = t[i].end;
- k = 0;
- while(t[i].start < inner_end) {
- if(jsoneq(js, &(t[i]), "image") == 0) {
- //fix this to be far~
- map->tiles[k] = malloc(sizeof(tiles_t));
- map->tiles[k]->btdata = malloc(sizeof(bitmap_t));
- map->tiles[k]->tileHeight = 16;
- map->tiles[k]->tileWidth = 16;
- map->tiles[k]->rows = 1;
- map->tiles[k]->cols = 1;
- map->tiles[k]->debug_text=false;
- //Fix to load tileset specified.
- //And move to vrs, probably
- bp = bitmapLoadPcx("data/ed.pcx");
- map->tiles[k]->btdata = &bp;
- k++;
- }
- i++;
- }
- }
-
- if (jsoneq(js, &(t[i]), "height") == 0 && indent<=1) {
- map->height = atoi(js + t[i+1].start);
- #ifdef DEBUG_MAPVAR
- printf("Height: %d\n", map->height);
- #endif
- i++;
- }
- else if(jsoneq(js, &(t[i]), "width") == 0 && indent<=1) {
- map->width = atoi(js + t[i+1].start);
- #ifdef DEBUG_MAPVAR
- printf("Width: %d\n", map->width);
- #endif
- i++;
- }
- i++;
- }
-}
-
-int loadmap(char *mn, map_t *map) {
- char *js;
-
- jsmn_parser p;
- jsmntok_t *tok = NULL;
- size_t tokcount, file_s;
-
- FILE *fh = fopen(mn, "r");
- int status;
-
- /* Prepare parser */
- jsmn_init(&p);
-
- file_s = filesize(fh);
- js = malloc(file_s);
- if(js == NULL) {
- fprintf(stderr, "malloc(): errno = %d", 2);
- fclose(fh);
- return 3;
- }
- if(fread(js, 1, file_s, fh) != file_s) {
- fprintf(stderr, "Map read error");
- free(js);
- fclose(fh);
- return 1;
- }
- tokcount = jsmn_parse(&p, js, file_s, NULL, 0);
- tok = malloc(tokcount*sizeof(jsmntok_t));
- printf("Allocated %d tokens", tokcount);
- jsmn_init(&p);
- if((status = jsmn_parse(&p, js, file_s, tok, tokcount)) < 0)
- {
- printf("Error: %d\n", status);
- return status;
- }
- else if(status != tokcount) { printf("Warning: used %d tok\n", status);}
- extract_map(js, tok, tokcount, map);
-
- free(js);
- free(tok);
- fclose(fh);
-
- return 0;
-}
+/* 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
+\r
+#include "src/lib/16_map.h"\r
+\r
+// Ideally, preprocess json during compilation and read serialized data\r
+\r
+int jsoneq(const char *json, jsmntok_t *tok, const char *s) {\r
+ if (tok->type == JSMN_STRING && (int) strlen(s) == tok->end - tok->start &&\r
+ strncmp(json + tok->start, s, tok->end - tok->start) == 0) {\r
+ return 0;\r
+ }\r
+ return -1;\r
+}\r
+\r
+//this function is quite messy ^^; sorry! it is a quick and dirty fix~\r
+word dump(const char *js, jsmntok_t *t, size_t count, word indent, char *js_sv, map_t *map, dword q) {\r
+ dword i;\r
+ word j;//, k;\r
+ bitmap_t bp;\r
+ #ifdef DEBUG_JS\r
+ if(indent==0)\r
+ {\r
+ fprintf(stdout, "%s\n", js);\r
+ fprintf(stdout, "\n");\r
+ }\r
+ #endif\r
+ #ifdef DEBUG_DUMPVARS\r
+ fprintf(stdout, "t->size=[%d] ", t->size);\r
+ fprintf(stdout, "q=[%d] ", q);\r
+ fprintf(stdout, "indent= [%d] ", indent);\r
+ fprintf(stdout, "js_sv= [%s]\n", js_sv);\r
+ #endif\r
+ if (count == 0) {\r
+ return 0;\r
+ }\r
+ /* We may want to do strtol() here to get numeric value */\r
+//0000fprintf(stderr, "t->type=%d\n", t->type);\r
+ if (t->type == JSMN_PRIMITIVE) {\r
+ if(strstr(js_sv, "data"))\r
+ {\r
+ /*\r
+ here we should recursivly call dump again here to skip over the array until we get the facking width of the map.\r
+ so we can initiate the map which allocates the facking map->tiles->data->data properly and THEN we can return\r
+ here to read the data.... That is my design for this... wwww\r
+\r
+ FUCK well i am stuck.... wwww\r
+ */\r
+ map->data[q] = (byte)atoi(js+t->start);\r
+ #ifdef DEBUG_MAPDATA\r
+ fprintf(stdout, "%d[%d]", q, map->data[q]);\r
+ #endif\r
+ }\r
+ else\r
+ if(strstr(js_sv, "height"))\r
+ {\r
+ map->height = atoi(js+t->start);\r
+ #ifdef DEBUG_MAPVAR\r
+ fprintf(stdout, "indent= [%d] ", indent);\r
+ fprintf(stdout, "h:[%d]\n", map->height);\r
+ #endif\r
+ }else if(strstr(js_sv, "width"))\r
+ {\r
+ map->width = atoi(js+t->start);\r
+ #ifdef DEBUG_MAPVAR\r
+ fprintf(stdout, "indent= [%d] ", indent);\r
+ fprintf(stdout, "w:[%d]\n", map->width);\r
+ #endif\r
+ }\r
+ return 1;\r
+ /* We may use strndup() to fetch string value */\r
+ } else if (t->type == JSMN_STRING) {\r
+ if(jsoneq(js, t, "data") == 0)\r
+ {\r
+// fprintf(stdout, "[[[[%d|%d]]]]\n", &(t+1)->size, (t+1)->size);\r
+// 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);\r
+ map->data = malloc(sizeof(byte) * (t+1)->size);\r
+ map->tiles = malloc(sizeof(tiles_t));\r
+ map->tiles->btdata = malloc(sizeof(bitmap_t));\r
+ //fix this to be far~\r
+//0000 bp = bitmapLoadPcx("data/ed.pcx");\r
+// bp = bitmapLoadPcx("data/koishi^^.pcx");\r
+ map->tiles->btdata = &bp;\r
+//---- map->tiles->data = planar_buf_from_bitmap(&bp);\r
+ //map->tiles->data->data = malloc((16/**2*/)*16);\r
+ //map->tiles->data->width = (16/**2*/);\r
+ //map->tiles->data->height= 16;\r
+ map->tiles->tileHeight = 16;\r
+ map->tiles->tileWidth = 16;\r
+ map->tiles->rows = 1;\r
+ map->tiles->cols = 1;\r
+#ifdef __DEBUG_MAP__\r
+ dbg_maptext=false;\r
+#endif\r
+ strcpy(js_sv, "data");//strdup(js+t->start);//, t->end - t->start);\r
+ }\r
+ else\r
+ if (jsoneq(js, t, "height") == 0 && indent<=1)\r
+ {\r
+ strcpy(js_sv, "height");//strdup(js+t->start);//, t->end - t->start);\r
+ }else\r
+ if(jsoneq(js, t, "width") == 0 && indent<=1)\r
+ {\r
+ strcpy(js_sv, "width");//strdup(js+t->start);//, t->end - t->start);\r
+ }else strcpy(js_sv, "\0");\r
+ return 1;\r
+ } else if (t->type == JSMN_OBJECT) {\r
+ //fprintf(stdout, "\n");\r
+ j = 0;\r
+ for (i = 0; i < t->size; i++) {\r
+ //for (k = 0; k < indent; k++) fprintf(stdout, "\t");\r
+ j += dump(js, t+1+j, count-j, indent+1, js_sv, map, i);\r
+ //fprintf(stdout, ": ");\r
+ j += dump(js, t+1+j, count-j, indent+1, js_sv, map, i);\r
+ //fprintf(stdout, "\n");\r
+ }\r
+ return j+1;\r
+ } else if (t->type == JSMN_ARRAY) {\r
+ j = 0;\r
+ //fprintf(stdout, "==\n");\r
+ for (i = 0; i < t->size; i++) {\r
+ //for (k = 0; k < indent-1; k++) fprintf(stdout, "\t");\r
+ //fprintf(stdout, "\t-");\r
+ j += dump(js, t+1+j, count-j, indent+1, js_sv, map, i);\r
+ //fprintf(stdout, "==\n");\r
+ }\r
+ return j+1;\r
+ }\r
+ return 0;\r
+}\r
+\r
+int loadmap(char *mn, map_t *map)\r
+{\r
+ int r;\r
+ static word incr=0;\r
+ int eof_expected = 0;\r
+ char *js = NULL;\r
+ size_t jslen = 0;\r
+ char buf[BUFSIZ];\r
+ static char js_ss[16];\r
+\r
+ jsmn_parser p;\r
+ jsmntok_t *tok;\r
+ size_t tokcount = 2;\r
+\r
+ FILE *fh = fopen(mn, "r");\r
+\r
+ /* Prepare parser */\r
+ jsmn_init(&p);\r
+\r
+ /* Allocate some tokens as a start */\r
+//0000fprintf(stderr, "tok malloc\n");\r
+ tok = malloc(sizeof(*tok) * tokcount);\r
+ if (tok == NULL) {\r
+ fprintf(stderr, "malloc(): errno=%d\n", errno);\r
+ return 3;\r
+ }\r
+\r
+ for (;;) {\r
+ /* Read another chunk */\r
+//0000fprintf(stderr, "read\n");\r
+ r = fread(buf, 1, sizeof(buf), fh);\r
+ if (r < 0) {\r
+ fprintf(stderr, "fread(): %d, errno=%d\n", r, errno);\r
+ return 1;\r
+ }\r
+ if (r == 0) {\r
+ if (eof_expected != 0) {\r
+ return 0;\r
+ } else {\r
+ fprintf(stderr, "fread(): unexpected EOF\n");\r
+ return 2;\r
+ }\r
+ }\r
+//0000fprintf(stdout, "r= [%d] BUFSIZ=%d\n", r, BUFSIZ);\r
+//0000fprintf(stderr, "js alloc~\n");\r
+ js = realloc(js, jslen + r + 1);\r
+ if (js == NULL) {\r
+ fprintf(stderr, "*js=%Fp\n", *js);\r
+ fprintf(stderr, "realloc(): errno = %d\n", errno);\r
+ return 3;\r
+ }\r
+ strncpy(js + jslen, buf, r);\r
+ jslen = jslen + r;\r
+\r
+again:\r
+//0000fprintf(stdout, " parse~ tok=%zu jslen=%zu r=%d _memavl()=%u BUFSIZ=%d~\n", tokcount, jslen, r, _memavl(), BUFSIZ);\r
+//0000fprintf(stdout, "p=[%u] [%u] [%d]\n", p.pos, p.toknext, p.toksuper);\r
+/*\r
+ 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
+*/\r
+ r = jsmn_parse(&p, js, jslen, tok, tokcount);\r
+//0000fprintf(stdout, "r= [%d]\n", r);\r
+ if (r < 0) {\r
+ if (r == JSMN_ERROR_NOMEM) {\r
+ tokcount = tokcount * 2;\r
+//0000fprintf(stderr, "tok realloc~ %zu\n", tokcount);\r
+ tok = realloc(tok, sizeof(*tok) * tokcount);\r
+ if (tok == NULL) {\r
+ fprintf(stderr, "realloc(): errno=%d\n", errno);\r
+ return 3;\r
+ }\r
+ goto again;\r
+ }\r
+ } else {\r
+ //printf("js=%Fp\n", (js));\r
+ //printf("*js=%Fp\n", (*(js)));\r
+ //printf("&*js=%s\n", &(*(js)));\r
+ //printf("&buf=[%Fp]\n", &buf);\r
+ //printf("&buf_seg=[%x]\n", FP_SEG(&buf));\r
+ //printf("&buf_off=[%x]\n", FP_OFF(&buf));\r
+ //printf("&buf_fp=[%Fp]\n", MK_FP(FP_SEG(&buf), FP_OFF(&buf)));\r
+ //printf("buf=[\n%s\n]\n", buf);\r
+ //printf("buff=[%Fp]\n", buff);\r
+ //printf("(*buff)=[%Fp]\n", (*buff));\r
+ //printf("&(*buff)=[\n%s\n]\n", &(*buff));\r
+ #ifdef DEBUG_DUMPVARS\r
+ fprintf(stdout, "running dump~\n");\r
+ #endif\r
+ dump(js, tok, p.toknext, incr, &js_ss, map, 0);\r
+ eof_expected = 1;\r
+ }\r
+ }\r
+\r
+ //free(js);\r
+ //free(tok);\r
+ //fclose(fh);\r
+\r
+ return 0;\r
+}\r
+\r
+void extract_map(const char *js, jsmntok_t *t, size_t count, map_t *map) {\r
+ int i, j, k, indent=0, inner_end;\r
+ bitmap_t bp;\r
+ //char *s;\r
+ i = 0;\r
+ while(i<count) {\r
+ if(jsoneq(js, &(t[i]), "layers") == 0) {\r
+ i++;\r
+ map->layerdata = malloc(sizeof(byte*) * t[i].size);\r
+ inner_end = t[i].end;\r
+ k = 0;\r
+ while(t[i].start < inner_end) {\r
+ printf("%d, %d\n", t[i].start, inner_end);\r
+ if(jsoneq(js, &(t[i]), "data") == 0) {\r
+ #ifdef DEBUG_MAPVAR\r
+ printf("Layer %d data: [", k);\r
+ #endif\r
+ map->layerdata[k] = malloc(sizeof(byte) * t[i+1].size);\r
+ for(j = 0; j < t[i+1].size; j++) {\r
+ map->layerdata[k][j] = (byte)atoi(js + t[i+2+j].start);\r
+ #ifdef DEBUG_MAPVAR\r
+ printf("%d, ", map->layerdata[k][j]);\r
+ #endif\r
+ }\r
+ i += j + 2;\r
+ k++;\r
+ #ifdef DEBUG_MAPVAR\r
+ puts("]");\r
+ #endif\r
+ }\r
+ else{\r
+ i++;\r
+ }\r
+ }\r
+ }\r
+ if(jsoneq(js, &(t[i]), "tilesets") == 0) {\r
+ i++;\r
+ map->tiles = malloc(sizeof(tiles_t*) * t[i].size);\r
+ inner_end = t[i].end;\r
+ k = 0;\r
+ while(t[i].start < inner_end) {\r
+ if(jsoneq(js, &(t[i]), "image") == 0) {\r
+ //fix this to be far~\r
+ map->layertile[k] = malloc(sizeof(tiles_t));\r
+ map->layertile[k]->btdata = malloc(sizeof(bitmap_t));\r
+ map->layertile[k]->tileHeight = 16;\r
+ map->layertile[k]->tileWidth = 16;\r
+ map->layertile[k]->rows = 1;\r
+ map->layertile[k]->cols = 1;\r
+#ifdef __DEBUG_MAP__\r
+ dbg_maptext=false;\r
+#endif\r
+ //Fix to load tileset specified.\r
+ //And move to vrs, probably\r
+ //bp = bitmapLoadPcx("data/ed.pcx");\r
+ map->layertile[k]->btdata = &bp;\r
+ k++;\r
+ }\r
+ i++;\r
+ }\r
+ }\r
+\r
+ if (jsoneq(js, &(t[i]), "height") == 0 && indent<=1) {\r
+ map->height = atoi(js + t[i+1].start);\r
+ #ifdef DEBUG_MAPVAR\r
+ printf("Height: %d\n", map->height);\r
+ #endif\r
+ i++;\r
+ }\r
+ else if(jsoneq(js, &(t[i]), "width") == 0 && indent<=1) {\r
+ map->width = atoi(js + t[i+1].start);\r
+ #ifdef DEBUG_MAPVAR\r
+ printf("Width: %d\n", map->width);\r
+ #endif\r
+ i++;\r
+ }\r
+ i++;\r
+ }\r
+}\r
+\r
+int newloadmap(char *mn, map_t *map) {\r
+ char *js;\r
+\r
+ jsmn_parser p;\r
+ jsmntok_t *tok = NULL;\r
+ size_t tokcount, file_s;\r
+\r
+ FILE *fh = fopen(mn, "r");\r
+ int status;\r
+\r
+ /* Prepare parser */\r
+ jsmn_init(&p);\r
+\r
+ file_s = filesize(fh);\r
+ js = malloc(file_s);\r
+ if(js == NULL) {\r
+ fprintf(stderr, "malloc(): errno = %d", 2);\r
+ fclose(fh);\r
+ return 3;\r
+ }\r
+ if(fread(js, 1, file_s, fh) != file_s) {\r
+ fprintf(stderr, "Map read error");\r
+ free(js);\r
+ fclose(fh);\r
+ return 1;\r
+ }\r
+ tokcount = jsmn_parse(&p, js, file_s, NULL, 0);\r
+ tok = malloc(tokcount*sizeof(jsmntok_t));\r
+ printf("Allocated %d tokens", tokcount);\r
+ jsmn_init(&p);\r
+ if((status = jsmn_parse(&p, js, file_s, tok, tokcount)) < 0)\r
+ {\r
+ printf("Error: %d\n", status);\r
+ return status;\r
+ }\r
+ else if(status != tokcount) { printf("Warning: used %d tok\n", status);}\r
+ extract_map(js, tok, tokcount, map);\r
+\r
+ free(js);\r
+ free(tok);\r
+ fclose(fh);\r
+\r
+ return 0;\r
+}\r
OSDN Git Service
