diff --git a/src/map.c b/src/map.c
index d09022738cc1b2dc8dfcb4e076acec08581e885e..8f1fb68328006b9178b18ca1b9efcc0b794bec6d 100644 (file)
--- a/src/map.c
+++ b/src/map.c
#include "view.h"
#include "music.h"
#include "view.h"
#include "music.h"
-#include "files.h"
#include "render.h"
#include "render.h"
-#include <stdio.h>
#include <string.h>
#include <string.h>
-#include "my.h"
+#include <assert.h>
#include "error.h"
#include "error.h"
+#include "common/streams.h"
+#include "common/files.h"
+#include "common/cp866.h"
+
enum {
MB_COMMENT = -1, MB_END = 0,
MB_WALLNAMES, MB_BACK, MB_WTYPE, MB_FRONT, MB_THING, MB_SWITCH,
enum {
MB_COMMENT = -1, MB_END = 0,
MB_WALLNAMES, MB_BACK, MB_WTYPE, MB_FRONT, MB_THING, MB_SWITCH,
static map_block_t blk;
static map_block_t blk;
-static int G_load (FILE *h) {
+static int G_load (Stream *h) {
switch (blk.t) {
case MB_MUSIC:
switch (blk.t) {
case MB_MUSIC:
- myfread(g_music, 8, 1, h);
+ stream_read(g_music, 8, 1, h);
//if (music_random) {
// F_randmus(g_music);
//}
//if (music_random) {
// F_randmus(g_music);
//}
return 0;
}
return 0;
}
-static int IT_load (FILE *h) {
+static int IT_load (Stream *h) {
int m, i, j;
old_thing_t t;
switch (blk.t) {
case MB_THING:
for (i = 0; blk.sz > 0; ++i, blk.sz -= 8) {
int m, i, j;
old_thing_t t;
switch (blk.t) {
case MB_THING:
for (i = 0; blk.sz > 0; ++i, blk.sz -= 8) {
- t.x = myfread16(h);
- t.y = myfread16(h);
- t.t = myfread16(h);
- t.f = myfread16(h);
+ t.x = stream_read16(h);
+ t.y = stream_read16(h);
+ t.t = stream_read16(h);
+ t.f = stream_read16(h);
it[i].o.x = t.x;
it[i].o.y = t.y;
it[i].t = t.t;
it[i].o.x = t.x;
it[i].o.y = t.y;
it[i].t = t.t;
}
if (!g_dm) {
if (j == -1) {
}
if (!g_dm) {
if (j == -1) {
- ERR_fatal("Предмет игрок_1 не найден");
+ logo("Player 1 point not exists on the map\n");
+ return 0; // error
}
dm_pos[0].x = it[j].o.x;
dm_pos[0].y = it[j].o.y;
}
dm_pos[0].x = it[j].o.x;
dm_pos[0].y = it[j].o.y;
}
if (!g_dm && _2pl) {
if (j == -1) {
}
if (!g_dm && _2pl) {
if (j == -1) {
- ERR_fatal("Предмет игрок_2 не найден");
+ logo("Player 2 point not exists on the map\n");
+ return 0; // error
}
dm_pos[1].x = it[j].o.x;
dm_pos[1].y = it[j].o.y;
}
dm_pos[1].x = it[j].o.x;
dm_pos[1].y = it[j].o.y;
}
}
if (g_dm && j < 2) {
}
}
if (g_dm && j < 2) {
- ERR_fatal("Меньше 2-ух точек DM");
+ logo("Required at least two DM points on the map\n");
+ return 0; // error
}
if (g_dm) {
dm_pnum = j;
}
if (g_dm) {
dm_pnum = j;
return 0;
}
return 0;
}
-static int SW_load (FILE *h) {
+static int SW_load (Stream *h) {
int i;
switch(blk.t) {
case MB_SWITCH2:
sw_secrets = 0;
for (i = 0; i < MAXSW && blk.sz > 0; ++i, blk.sz -= 9) {
int i;
switch(blk.t) {
case MB_SWITCH2:
sw_secrets = 0;
for (i = 0; i < MAXSW && blk.sz > 0; ++i, blk.sz -= 9) {
- sw[i].x = myfread8(h);
- sw[i].y = myfread8(h);
- sw[i].t = myfread8(h);
- sw[i].tm = myfread8(h); // unused
- sw[i].a = myfread8(h);
- sw[i].b = myfread8(h);
- sw[i].c = myfread8(h);
- sw[i].d = myfread8(h); // unused
- sw[i].f = myfread8(h);
+ sw[i].x = stream_read8(h);
+ sw[i].y = stream_read8(h);
+ sw[i].t = stream_read8(h);
+ sw[i].tm = stream_read8(h); // unused
+ sw[i].a = stream_read8(h);
+ sw[i].b = stream_read8(h);
+ sw[i].c = stream_read8(h);
+ sw[i].d = stream_read8(h); // unused
+ sw[i].f = stream_read8(h);
sw[i].tm = 0;
sw[i].d = 0;
sw[i].f |= 0x80;
sw[i].tm = 0;
sw[i].d = 0;
sw[i].f |= 0x80;
}
}
}
}
-static int read_array (void *p, FILE *h) {
+static int read_array (void *p, Stream *h) {
void *buf;
switch (blk.st) {
case 0:
void *buf;
switch (blk.st) {
case 0:
- myfread(p, FLDW * FLDH, 1, h);
+ stream_read(p, FLDW * FLDH, 1, h);
break;
case 1:
buf = malloc(blk.sz);
if (buf == NULL) {
break;
case 1:
buf = malloc(blk.sz);
if (buf == NULL) {
- ERR_fatal("Не хватает памяти");
+ logo("Out of memory\n");
+ return 0; // error
}
}
- myfread(buf, blk.sz, 1, h);
+ stream_read(buf, blk.sz, 1, h);
unpack(buf, blk.sz, p);
free(buf);
break;
unpack(buf, blk.sz, p);
free(buf);
break;
return 1;
}
return 1;
}
-static int W_load (FILE *h) {
+static int W_load (Stream *h) {
int i;
char s[8];
switch (blk.t) {
int i;
char s[8];
switch (blk.t) {
R_begin_load();
memset(walf, 0, sizeof(walf));
for (i = 1; i < 256 && blk.sz > 0; i++, blk.sz -= 9) {
R_begin_load();
memset(walf, 0, sizeof(walf));
for (i = 1; i < 256 && blk.sz > 0; i++, blk.sz -= 9) {
- myfread(s, 8, 1, h);
- walf[i] = myfread8(h) ? 1 : 0; // ???
+ stream_read(s, 8, 1, h);
+ walf[i] = stream_read8(h) ? 1 : 0; // ???
R_load(s);
R_load(s);
- if (strncasecmp(s, "VTRAP01", 8) == 0) {
+ if (cp866_strncasecmp(s, "VTRAP01", 8) == 0) {
walf[i] |= 2;
}
}
walf[i] |= 2;
}
}
case MB_FRONT:
return read_array(fldf, h);
case MB_SKY:
case MB_FRONT:
return read_array(fldf, h);
case MB_SKY:
- sky_type = myfread16(h);
+ sky_type = stream_read16(h);
R_loadsky(sky_type);
return 1;
}
return 0;
}
R_loadsky(sky_type);
return 1;
}
return 0;
}
-void F_loadmap (char n[8]) {
- int r, o;
- FILE *h;
+int MAP_load (Stream *r) {
+ assert(r != NULL);
+ int ok = 0;
map_header_t hdr;
map_header_t hdr;
- W_init();
- r = F_getresid(n);
- h = wadh[wad[r].f];
- fseek(h, wad[r].o, SEEK_SET);
- myfread(hdr.id, 8, 1, h);
- hdr.ver = myfread16(h);
- if (memcmp(hdr.id, "Doom2D\x1A", 8) != 0) {
- ERR_fatal("%.8s не является уровнем", n);
- }
- for (;;) {
- blk.t = myfread16(h);
- blk.st = myfread16(h);
- blk.sz = myfread32(h);
- if(blk.t == MB_END) {
- break;
- }
- if(blk.t == MB_COMMENT) {
- fseek(h, blk.sz, SEEK_CUR);
- continue;
- }
- o = ftell(h) + blk.sz;
- if(!G_load(h)) {
- if(!W_load(h)) {
- if(!IT_load(h)) {
- if(!SW_load(h)) {
- ERR_fatal("Неизвестный блок %d(%d) в уровне %.8s", blk.t, blk.st, n);
- }
- }
+ W_init(); // reset all game data
+ stream_read(hdr.id, 8, 1, r);
+ hdr.ver = stream_read16(r);
+ if (memcmp(hdr.id, "Doom2D\x1A", 8) == 0) {
+ ok = 1;
+ while (ok) {
+ blk.t = stream_read16(r);
+ blk.st = stream_read16(r);
+ blk.sz = stream_read32(r);
+ long off = stream_getpos(r) + blk.sz;
+ switch (blk.t) {
+ case MB_MUSIC:
+ ok = G_load(r);
+ break;
+ case MB_WALLNAMES:
+ case MB_BACK:
+ case MB_WTYPE:
+ case MB_FRONT:
+ case MB_SKY:
+ ok = W_load(r);
+ break;
+ case MB_THING:
+ ok = IT_load(r);
+ break;
+ case MB_SWITCH2:
+ ok = SW_load(r);
+ break;
+ case MB_COMMENT:
+ /* skip */
+ break;
+ case MB_END:
+ return ok;
+ default:
+ logo("Unknown block %d(%d)\n", blk.t, blk.st);
+ return 0; // error
}
}
+ stream_setpos(r, off);
}
}
- fseek(h, o, SEEK_SET);
+ } else {
+ logo("Invalid map header\n");
+ abort();
+ ok = 0;
}
}
+ return ok;
}
}