/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * This program 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.
 *
 * This program 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/>.
 *
 */

#include "ultima/shared/std/string.h"
#include "ultima/nuvie/core/nuvie_defs.h"
#include "ultima/nuvie/files/nuvie_io_file.h"
#include "ultima/nuvie/conf/configuration.h"
#include "ultima/nuvie/screen/screen.h"
#include "ultima/nuvie/fonts/bmp_font.h"

namespace Ultima {
namespace Nuvie {

BMPFont::BMPFont() : char_w(0), char_h(0), font_width_data(nullptr),
		font_surface(nullptr), rune_mode(false), dual_font_mode(false) {
}

BMPFont::~BMPFont() {
	if (font_surface)
		delete font_surface;

	if (font_width_data)
		free(font_width_data);
}

bool BMPFont::init(const Common::Path &bmp_filename, bool dual_fontmap) {
	dual_font_mode = dual_fontmap;
	num_chars = 256;

	Common::Path full_filename = bmp_filename;

	full_filename.appendInPlace(".bmp");

	font_surface = SDL_LoadBMP(full_filename);

	font_surface->setTransparentColor(font_surface->format.RGBToColor(0, 0x70, 0xfc));

	char_w = font_surface->w / 16;
	char_h = font_surface->h / 16;

	//read font width data. For variable width fonts.
	full_filename = bmp_filename;
	full_filename.appendInPlace(".dat");

	NuvieIOFileRead font_width_data_file;
	if (font_width_data_file.open(full_filename)) {
		font_width_data = font_width_data_file.readAll();
		font_width_data_file.close();
	}

	return true;
}

uint16 BMPFont::getStringWidth(const char *str, uint16 string_len) {
	uint16 i;
	uint16 w = 0;

	for (i = 0; i < string_len; i++) {
		if (dual_font_mode && str[i] == '<') {
			offset = 128;
		} else if (dual_font_mode && str[i] == '>') {
			offset = 0;
		} else {
			w += getCharWidth(str[i] + offset);
		}
	}

	return w;


}
uint16 BMPFont::getCharWidth(uint8 c) {
	if (font_width_data) {
		return font_width_data[c];
	}

	return char_w;
}

uint16 BMPFont::drawChar(Screen *screen, uint8 char_num, uint16 x, uint16 y,
						 uint8 color) {
	Common::Rect src;
	Common::Rect dst;

	if (dual_font_mode) {
		if (char_num == '<') {
			rune_mode = true;
			return 0;
		} else if (char_num == '>') {
			rune_mode = false;
			return 0;
		}
	}

	if (rune_mode) {
		char_num += 128;
	}

	src.left = (char_num % 16) * char_w;
	src.top = (char_num / 16) * char_h;
	src.setWidth(char_w);
	src.setHeight(char_h);

	dst.left = x;
	dst.top = y;
	dst.setWidth(char_w);
	dst.setHeight(char_h);

	SDL_BlitSurface(font_surface, &src, screen->get_sdl_surface(), &dst);

	return getCharWidth(char_num);
}

} // End of namespace Nuvie
} // End of namespace Ultima