#pragma region Copyright (c) 2014-2016 OpenRCT2 Developers
/*****************************************************************************
 * OpenRCT2, an open source clone of Roller Coaster Tycoon 2.
 *
 * OpenRCT2 is the work of many authors, a full list can be found in contributors.md
 * For more information, visit https://github.com/OpenRCT2/OpenRCT2
 *
 * OpenRCT2 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.
 *
 * A full copy of the GNU General Public License can be found in licence.txt
 *****************************************************************************/
#pragma endregion

#include "../config/Config.h"
#include "../interface/themes.h"
#include "../interface/widget.h"
#include "../interface/window.h"
#include "../localisation/localisation.h"
#include "../network/network.h"
#include "../sprites.h"
#include "../title/TitleScreen.h"
#include "../util/util.h"
#include "error.h"

static char _port[7];
static char _name[65];
static char _password[33];

enum {
	WIDX_BACKGROUND,
	WIDX_TITLE,
	WIDX_CLOSE,
	WIDX_PORT_INPUT,
	WIDX_NAME_INPUT,
	WIDX_PASSWORD_INPUT,
	WIDX_MAXPLAYERS,
	WIDX_MAXPLAYERS_INCREASE,
	WIDX_MAXPLAYERS_DECREASE,
	WIDX_ADVERTISE_CHECKBOX,
	WIDX_START_SERVER,
	WIDX_LOAD_SERVER
};

#define WW 300
#define WH 120

static rct_widget window_server_start_widgets[] = {
	{ WWT_FRAME,			0,	0,		WW-1,	0,			WH-1,	0xFFFFFFFF,						STR_NONE },					// panel / background
	{ WWT_CAPTION,			0,	1,		WW-2,	1,			14,		STR_START_SERVER,				STR_WINDOW_TITLE_TIP },		// title bar
	{ WWT_CLOSEBOX,			0,	WW-13,	WW-3,	2,			13,		STR_CLOSE_X,					STR_CLOSE_WINDOW_TIP },		// close x button
	{ WWT_TEXT_BOX,			1,	120,	WW-8,	20,			32,		STR_NONE,						STR_NONE },					// port text box
	{ WWT_TEXT_BOX,			1,	120,	WW-8,	36,			48,		STR_NONE,						STR_NONE },					// name text box
	{ WWT_TEXT_BOX,			1,	120,	WW-8,	52,			64,		STR_NONE,						STR_NONE },					// password text box
	{ WWT_SPINNER,			1,	120,	WW-8,	68,			77,		STR_SERVER_MAX_PLAYERS_VALUE,	STR_NONE },					// max players
	{ WWT_DROPDOWN_BUTTON,	1,	WW-18,	WW-8,	68,			72,		STR_NUMERIC_UP,					STR_NONE },
	{ WWT_DROPDOWN_BUTTON,	1,	WW-18,	WW-8,	72,			76,		STR_NUMERIC_DOWN,				STR_NONE },
	{ WWT_CHECKBOX,			1,	6,		WW-8,	85,			91,		STR_ADVERTISE,					STR_ADVERTISE_SERVER_TIP },	// advertise checkbox
	{ WWT_DROPDOWN_BUTTON,	1,	6,		106,	WH-6-11,	WH-6,	STR_NEW_GAME,					STR_NONE },					// start server button
	{ WWT_DROPDOWN_BUTTON,	1,	112,	212,	WH-6-11,	WH-6,	STR_LOAD_GAME,					STR_NONE },
	{ WIDGETS_END },
};

static void window_server_start_close(rct_window *w);
static void window_server_start_mouseup(rct_window *w, sint32 widgetIndex);
static void window_server_start_update(rct_window *w);
static void window_server_start_textinput(rct_window *w, sint32 widgetIndex, char *text);
static void window_server_start_invalidate(rct_window *w);
static void window_server_start_paint(rct_window *w, rct_drawpixelinfo *dpi);

static rct_window_event_list window_server_start_events = {
	window_server_start_close,
	window_server_start_mouseup,
	NULL,
	NULL,
	NULL,
	NULL,
	window_server_start_update,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	window_server_start_textinput,
	NULL,
	NULL,
	NULL,
	NULL,
	NULL,
	window_server_start_invalidate,
	window_server_start_paint,
	NULL
};

void window_server_start_open()
{
	rct_window* window;

	// Check if window is already open
	window = window_bring_to_front_by_class(WC_SERVER_START);
	if (window != NULL)
		return;

	window = window_create_centred(WW, WH, &window_server_start_events, WC_SERVER_START, WF_10);

	window_server_start_widgets[WIDX_PORT_INPUT].string = _port;
	window_server_start_widgets[WIDX_NAME_INPUT].string = _name;
	window_server_start_widgets[WIDX_PASSWORD_INPUT].string = _password;
	window->widgets = window_server_start_widgets;
	window->enabled_widgets = (
		(1 << WIDX_CLOSE) |
		(1 << WIDX_PORT_INPUT) |
		(1 << WIDX_NAME_INPUT) |
		(1 << WIDX_PASSWORD_INPUT) |
		(1 << WIDX_MAXPLAYERS) |
		(1 << WIDX_MAXPLAYERS_INCREASE) |
		(1 << WIDX_MAXPLAYERS_DECREASE) |
		(1 << WIDX_ADVERTISE_CHECKBOX) |
		(1 << WIDX_START_SERVER) |
		(1 << WIDX_LOAD_SERVER)
	);
	window_init_scroll_widgets(window);
	window->no_list_items = 0;
	window->selected_list_item = -1;
	window->frame_no = 0;
	window->min_width = window->width;
	window->min_height = window->height;
	window->max_width = window->min_width;
	window->max_height = window->min_height;

	window->page = 0;
	window->list_information_type = 0;

	snprintf(_port, 7, "%u", gConfigNetwork.default_port);
	safe_strcpy(_name, gConfigNetwork.server_name, sizeof(_name));
}

static void window_server_start_close(rct_window *w)
{

}

static void window_server_start_scenarioselect_callback(const utf8 *path)
{
	network_set_password(_password);
	if (scenario_load_and_play_from_path(path)) {
		network_begin_server(gConfigNetwork.default_port);
	} else {
		title_load();
	}
}

static void window_server_start_loadsave_callback(sint32 result, const utf8 * path)
{
	if (result == MODAL_RESULT_OK && game_load_save_or_scenario(path)) {
		network_begin_server(gConfigNetwork.default_port);
	}
}

static void window_server_start_mouseup(rct_window *w, sint32 widgetIndex)
{
	switch (widgetIndex) {
	case WIDX_CLOSE:
		window_close(w);
		break;
	case WIDX_PORT_INPUT:
		window_start_textbox(w, widgetIndex, STR_STRING, _port, 6);
		break;
	case WIDX_NAME_INPUT:
		window_start_textbox(w, widgetIndex, STR_STRING, _name, 64);
		break;
	case WIDX_PASSWORD_INPUT:
		window_start_textbox(w, widgetIndex, STR_STRING, _password, 32);
		break;
	case WIDX_MAXPLAYERS_INCREASE:
		if (gConfigNetwork.maxplayers < 255) {
			gConfigNetwork.maxplayers++;
		}
		config_save_default();
		window_invalidate(w);
		break;
	case WIDX_MAXPLAYERS_DECREASE:
		if (gConfigNetwork.maxplayers > 1) {
			gConfigNetwork.maxplayers--;
		}
		config_save_default();
		window_invalidate(w);
		break;
	case WIDX_ADVERTISE_CHECKBOX:
		gConfigNetwork.advertise = !gConfigNetwork.advertise;
		config_save_default();
		window_invalidate(w);
		break;
	case WIDX_START_SERVER:
		window_scenarioselect_open(window_server_start_scenarioselect_callback);
		break;
	case WIDX_LOAD_SERVER:
		network_set_password(_password);
		window_loadsave_open(LOADSAVETYPE_LOAD | LOADSAVETYPE_GAME, NULL);
		window_loadsave_set_loadsave_callback(window_server_start_loadsave_callback);
		break;
	}
}

static void window_server_start_update(rct_window *w)
{
	if (gCurrentTextBox.window.classification == w->classification && gCurrentTextBox.window.number == w->number) {
		window_update_textbox_caret();
		widget_invalidate(w, WIDX_NAME_INPUT);
		widget_invalidate(w, WIDX_PASSWORD_INPUT);
	}
}

static void window_server_start_textinput(rct_window *w, sint32 widgetIndex, char *text)
{
	if (text == NULL) return;

	switch (widgetIndex) {
	case WIDX_PORT_INPUT:
		if (strcmp(_port, text) == 0)
			return;

		memset(_port, 0, sizeof(_port));
		if (strlen(text) > 0) {
			safe_strcpy(_port, text, sizeof(_port));
		}

		gConfigNetwork.default_port = atoi(_port);
		config_save_default();

		widget_invalidate(w, WIDX_NAME_INPUT);
		break;
	case WIDX_NAME_INPUT:
		if (strcmp(_name, text) == 0)
			return;

		memset(_name, 0, sizeof(_name));
		if (strlen(text) > 0) {
			safe_strcpy(_name, text, sizeof(_name));
		}

		if (strlen(_name) > 0) {
			SafeFree(gConfigNetwork.server_name);
			gConfigNetwork.server_name = _strdup(_name);
			config_save_default();
		}

		widget_invalidate(w, WIDX_NAME_INPUT);
		break;
	case WIDX_PASSWORD_INPUT:
		if (strcmp(_password, text) == 0)
			return;

		memset(_password, 0, sizeof(_password));
		if (strlen(text) > 0) {
			safe_strcpy(_password, text, sizeof(_password));
		}

		widget_invalidate(w, WIDX_PASSWORD_INPUT);
		break;
	}
}

static void window_server_start_invalidate(rct_window *w)
{
	colour_scheme_update_by_class(w, WC_SERVER_LIST);

	widget_set_checkbox_value(w, WIDX_ADVERTISE_CHECKBOX, gConfigNetwork.advertise);
	set_format_arg(18, uint16, gConfigNetwork.maxplayers);
}

static void window_server_start_paint(rct_window *w, rct_drawpixelinfo *dpi)
{
	window_draw_widgets(w, dpi);

	gfx_draw_string_left(dpi, STR_PORT, NULL, w->colours[1], w->x + 6, w->y + w->widgets[WIDX_PORT_INPUT].top);
	gfx_draw_string_left(dpi, STR_SERVER_NAME, NULL, w->colours[1], w->x + 6, w->y + w->widgets[WIDX_NAME_INPUT].top);
	gfx_draw_string_left(dpi, STR_PASSWORD, NULL, w->colours[1], w->x + 6, w->y + w->widgets[WIDX_PASSWORD_INPUT].top);
	gfx_draw_string_left(dpi, STR_MAX_PLAYERS, NULL, w->colours[1], w->x + 6, w->y + w->widgets[WIDX_MAXPLAYERS].top);
}