// Copyright (C) 2012 Valeriano Alfonso Rodriguez (Kableado)

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>

#include "GameLib.h"

#include "GameEnts.h"
#include "GameMap.h"

int ReadLine(FILE *f, char *line, int max) {
	int c;
	int i = 0;
	while (i < (max - 1)) {
		c = fgetc(f);
		if (c == EOF) {
			line[i] = 0;
			return (-1);
		}
		if (c == '\r') {
			continue;
		}
		if (c == '\n') {
			line[i] = 0;
			return (i);
		}
		line[i] = c;
		i++;
	}
	line[i] = 0;
	return (i);
}

Entity GameMapAux_CreateEnt(Entity ent, int i, int j, int res) {
	Entity e;
	vec2 pos;
	e = Entity_Copy(ent);
	vec2_set(pos, (res / 2) + i * res, (res / 2) + j * res);
	vec2_plus(e->pos, e->pos, pos);
	Entity_CalcBBox(e);
	GameLib_AddEntity(e);
	return (e);
}

#define MaxLineLen 1024

int GameMap_LoadLevel(char *filename, int res) {
	FILE *file;
	char line[MaxLineLen];
	int len, i, j;
	int width, height;
	char *map;

	// Open the file
	file = fopen(filename, "rb");
	if (!file) {
		return (0);
	}

	// Read the file to determine sizes
	width = 0;
	height = 0;
	do {
		len = ReadLine(file, line, MaxLineLen);
		if (len > -1) {
			if (len > height) {
				height = len;
			}
			width++;
		}
	} while (len > -1);
	fseek(file, 0, SEEK_SET);

	// Build the map
	map = malloc(sizeof(char) * width * height);
	memset(map, 0, width * height);
#define MAP(x, y) map[(x) + ((y)*width)]
	j = 0;
	do {
		len = ReadLine(file, line, MaxLineLen);
		for (i = 0; i < len; i++) {
			MAP(j, (height - 1) - i) = line[i];
		}
		j++;
	} while (len > -1);

	// Close the file
	fclose(file);

	// Parse the map
	for (j = 0; j < height; j++) {
		for (i = 0; i < width; i++) {
			if (MAP(i, j) == 'P') {
				// Player
				GameMapAux_CreateEnt(ent_Player, i, j, res);
			}
			if (MAP(i, j) == '#') {
				// Block
				GameMapAux_CreateEnt(ent_Block, i, j, res);
			}
			if (MAP(i, j) == '|') {
				// Platform
				GameMapAux_CreateEnt(ent_Platform, i, j, res);
			}
		}
	}

	// Cleanup
	free(map);
#undef MAP

	return (1);
}