eobish

annotate src/level.c @ 4:ce0548d24918

find changesets by author, revision, files, or words in the commit message
mostly works
author John Tsiombikas <nuclear@member.fsf.org>
date Sun, 18 Jan 2015 13:30:30 +0200
parents
children 6a350c554e46
rev   line source
nuclear@4 1 #include <stdio.h>
nuclear@4 2 #include <stdlib.h>
nuclear@4 3 #include <string.h>
nuclear@4 4 #include <ctype.h>
nuclear@4 5 #include <math.h>
nuclear@4 6 #include "level.h"
nuclear@4 7
nuclear@4 8 #define C_WALL '#'
nuclear@4 9 #define C_START 's'
nuclear@4 10 #define C_GOAL 'x'
nuclear@4 11
nuclear@4 12 #define IS_SOLID(x) ((x) == C_WALL)
nuclear@4 13
nuclear@4 14 static void clean_line(char *buf);
nuclear@4 15
nuclear@4 16
nuclear@4 17 void level_init(struct level *lvl)
nuclear@4 18 {
nuclear@4 19 memset(lvl, 0, sizeof *lvl);
nuclear@4 20 }
nuclear@4 21
nuclear@4 22 void level_destroy(struct level *lvl)
nuclear@4 23 {
nuclear@4 24 if(lvl) {
nuclear@4 25 destroy_tileset(&lvl->tileset);
nuclear@4 26 }
nuclear@4 27 }
nuclear@4 28
nuclear@4 29 int level_load(struct level *lvl, const char *fname)
nuclear@4 30 {
nuclear@4 31 FILE *fp;
nuclear@4 32 char buf[256], *dir, *slash;
nuclear@4 33 int i, size[2], nlines;
nuclear@4 34
nuclear@4 35 dir = alloca(strlen(fname) + 1);
nuclear@4 36 strcpy(dir, fname);
nuclear@4 37 if((slash = strrchr(dir, '/'))) {
nuclear@4 38 slash[1] = 0;
nuclear@4 39 } else {
nuclear@4 40 *dir = 0;
nuclear@4 41 }
nuclear@4 42
nuclear@4 43 if(!(fp = fopen(fname, "r"))) {
nuclear@4 44 fprintf(stderr, "failed to open file: %s\n", fname);
nuclear@4 45 return -1;
nuclear@4 46 }
nuclear@4 47
nuclear@4 48 nlines = 0;
nuclear@4 49 while(fgets(buf, sizeof buf, fp)) {
nuclear@4 50 clean_line(buf);
nuclear@4 51
nuclear@4 52 if(memcmp(buf, "@s", 2) == 0) {
nuclear@4 53 if(sscanf(buf, "@s %dx%d", size, size + 1) != 2) {
nuclear@4 54 fprintf(stderr, "level file %s doesn't start with size definition\n", fname);
nuclear@4 55 fclose(fp);
nuclear@4 56 return -1;
nuclear@4 57 }
nuclear@4 58 if(size[0] > MAX_LEVEL_SIZE || size[1] > MAX_LEVEL_SIZE) {
nuclear@4 59 fprintf(stderr, "level size %dx%d is larger than compile-time maximum (%d)\n", size[0], size[1], MAX_LEVEL_SIZE);
nuclear@4 60 fclose(fp);
nuclear@4 61 return -1;
nuclear@4 62 }
nuclear@4 63
nuclear@4 64 lvl->num_cells[0] = size[0];
nuclear@4 65 lvl->num_cells[1] = size[1];
nuclear@4 66 continue;
nuclear@4 67
nuclear@4 68 } else if(memcmp(buf, "@t", 2) == 0) {
nuclear@4 69 char *path, *tname = buf + 3;
nuclear@4 70
nuclear@4 71 while(*tname && isspace(*tname)) ++tname;
nuclear@4 72
nuclear@4 73 path = alloca(strlen(tname) + strlen(dir) + 2);
nuclear@4 74 sprintf(path, "%s%s", dir, tname);
nuclear@4 75
nuclear@4 76 if(load_tileset(&lvl->tileset, path) == -1) {
nuclear@4 77 fprintf(stderr, "failed to load tileset for level %s\n", fname);
nuclear@4 78 fclose(fp);
nuclear@4 79 return -1;
nuclear@4 80 }
nuclear@4 81 continue;
nuclear@4 82 }
nuclear@4 83
nuclear@4 84 if(nlines >= size[0]) {
nuclear@4 85 fprintf(stderr, "warning: level contains more lines than specified, ignoring the rest\n");
nuclear@4 86 break;
nuclear@4 87 }
nuclear@4 88
nuclear@4 89 for(i=0; buf[i]; i++) {
nuclear@4 90 if(i >= size[1]) {
nuclear@4 91 fprintf(stderr, "warning: line %d is longer than the level size definition says. Skipping the rest.\n", nlines + 1);
nuclear@4 92 break;
nuclear@4 93 }
nuclear@4 94 lvl->cells[nlines][i] = buf[i];
nuclear@4 95
nuclear@4 96 if(buf[i] == C_START) {
nuclear@4 97 lvl->start_pos[0] = i;
nuclear@4 98 lvl->start_pos[1] = nlines;
nuclear@4 99 printf("start cell found (%d,%d)\n", lvl->start_pos[0], lvl->start_pos[1]);
nuclear@4 100 }
nuclear@4 101 if(buf[i] == C_GOAL) {
nuclear@4 102 lvl->goal_pos[0] = i;
nuclear@4 103 lvl->goal_pos[1] = nlines;
nuclear@4 104 printf("gold cell found (%d, %d)\n", i, nlines);
nuclear@4 105 }
nuclear@4 106 }
nuclear@4 107 nlines++;
nuclear@4 108 }
nuclear@4 109
nuclear@4 110 fclose(fp);
nuclear@4 111 return 0;
nuclear@4 112 }
nuclear@4 113
nuclear@4 114 static int clamp(int x, int low, int high)
nuclear@4 115 {
nuclear@4 116 return x < low ? low : (x > high ? high : x);
nuclear@4 117 }
nuclear@4 118
nuclear@4 119 int level_cell(struct level *lvl, int cx, int cy)
nuclear@4 120 {
nuclear@4 121 cx = clamp(cx, 0, lvl->num_cells[1] - 1);
nuclear@4 122 cy = clamp(cy, 0, lvl->num_cells[0] - 1);
nuclear@4 123
nuclear@4 124 return lvl->cells[cy][cx];
nuclear@4 125 }
nuclear@4 126
nuclear@4 127
nuclear@4 128 static void clean_line(char *buf)
nuclear@4 129 {
nuclear@4 130 char *end = buf + strlen(buf) - 1;
nuclear@4 131
nuclear@4 132 if(end <= buf) return;
nuclear@4 133
nuclear@4 134 while(end >= buf && !isprint(*end)) {
nuclear@4 135 *end-- = 0;
nuclear@4 136 }
nuclear@4 137 }
nuclear@4 138