/*
 * This software is licensed under the terms of the MIT-License
 * See COPYING for further information.
 * ---
 * Copyright (c) 2011-2018, Lukas Weber <laochailan@web.de>.
 * Copyright (c) 2012-2018, Andrei Alexeyev <akari@alienslab.net>.
 */

#include "taisei.h"

#include <time.h>
#include "savereplay.h"
#include "options.h"
#include "global.h"
#include "replay.h"
#include "plrmodes.h"
#include "common.h"

static void do_save_replay(Replay *rpy) {
	char strtime[128], name[128];
	time_t rawtime;
	struct tm * timeinfo;

	// time when the game was *initiated*
	rawtime = (time_t)rpy->stages[0].seed;
	timeinfo = localtime(&rawtime);
	strftime(strtime, 128, "%Y%m%d_%H-%M-%S%z", timeinfo);

	char prepr[16], drepr[16];
	plrmode_repr(prepr, 16, plrmode_find(rpy->stages[0].plr_char, rpy->stages[0].plr_shot));
	strlcpy(drepr, difficulty_name(rpy->stages[0].diff), 16);
	drepr[0] += 'a' - 'A';

	if(rpy->numstages > 1)
		snprintf(name, 128, "taisei_%s_%s_%s", strtime, prepr, drepr);
	else
		snprintf(name, 128, "taisei_%s_stg%X_%s_%s", strtime, rpy->stages[0].stage, prepr, drepr);

	replay_save(rpy, name);
}

static void save_rpy(MenuData *menu, void *a) {
	do_save_replay(&global.replay);
}

static void draw_saverpy_menu(MenuData *m) {
	int i;

	draw_options_menu_bg(m);

	draw_menu_selector(SCREEN_W/2 + 100 * m->drawdata[0] - 50, SCREEN_H/2, 163, 81, m->frames);

	glPushMatrix();
	glColor4f(1, 1, 1, 1);
	glTranslatef(SCREEN_W/2, SCREEN_H/2 - 100, 0);
	draw_text(AL_Center, 0, 0, "Save Replay?", _fonts.mainmenu);
	glTranslatef(0, 100, 0);

	m->drawdata[0] += (m->cursor - m->drawdata[0])/10.0;

	for(i = 0; i < m->ecount; i++) {
		MenuEntry *e = &(m->entries[i]);

		e->drawdata += 0.2 * (10*(i == m->cursor) - e->drawdata);
		float a = e->drawdata * 0.1;

		if(e->action == NULL)
			glColor4f(0.5, 0.5, 0.5, 0.5);
		else {
			float ia = 1-a;
			glColor4f(0.9 + ia * 0.1, 0.6 + ia * 0.4, 0.2 + ia * 0.8, 0.7 + 0.3 * a);
		}

		if(e->name)
			draw_text(AL_Center, -50 + 100 * i, 0, e->name, _fonts.mainmenu);
	}

	glPopMatrix();
}

static bool savepry_input_handler(SDL_Event *event, void *arg) {
	if(event->type == MAKE_TAISEI_EVENT(TE_MENU_CURSOR_LEFT)) {
		event->type = MAKE_TAISEI_EVENT(TE_MENU_CURSOR_UP);
	} else if(event->type == MAKE_TAISEI_EVENT(TE_MENU_CURSOR_RIGHT)) {
		event->type = MAKE_TAISEI_EVENT(TE_MENU_CURSOR_DOWN);
	}

	return false;
}

static void saverpy_menu_input(MenuData *menu) {
	events_poll((EventHandler[]){
		{ .proc = savepry_input_handler, .arg = menu },
		{ .proc = menu_input_handler, .arg = menu },
		{NULL}
	}, EFLAG_MENU);
}

void create_saverpy_menu(MenuData *m) {
	create_menu(m);
	m->input = saverpy_menu_input;
	m->draw = draw_saverpy_menu;

	m->flags = MF_Transient;

	add_menu_entry(m, "Yes", save_rpy, NULL);
	add_menu_entry(m, "No", menu_commonaction_close, NULL);
}

void ask_save_replay(void) {
	assert(global.replay_stage != NULL);

	switch(config_get_int(CONFIG_SAVE_RPY)) {
		case 0: {
			break;
		}

		case 1: {
			do_save_replay(&global.replay);
			break;
		}

		case 2: {
			MenuData m;
			create_saverpy_menu(&m);
			menu_loop(&m);
			break;
		}
	}
}