/*]  Copyright (c) 2009-2010, Charles McGarvey  [**************************
**]  All rights reserved.
*
* vi:ts=4 sw=4 tw=75
*
* Distributable under the terms and conditions of the 2-clause BSD license;
* see the file COPYING for a complete text of the license.
*
**************************************************************************/

#include "config.h"

#include <cstdlib>		// atexit
#include <exception>
#include <functional>
#include <iostream>
#include <string>

#if !defined(__WIN32)
#include <termios.h>
#else
inline int isatty(int dummy) { return 0; }
#endif

#include <stlplus/portability/file_system.hpp>
#include <stlplus/portability/subprocesses.hpp>

#include <moof/log.hh>
#include <moof/modal_dialog.hh>
#include <moof/opengl.hh>
#include <moof/resource.hh>
#include <moof/settings.hh>
#include <moof/string.hh>
#include <moof/video.hh>

#include "GameLayer.hh"
#include "Main.hh"
#include "TitleLayer.hh"
#include "version.h"


Main::Main(moof::settings& settings, moof::video& video) :
	moof::view(settings, video)
{
	moof::dispatcher& dispatcher = moof::dispatcher::global();
	video_reloaded_ = dispatcher.add_target("video.newcontext",
											boost::bind(&Main::setup_opengl));
	setup_opengl();

#if ENABLE_HOTLOADING
	hotload_timer_.init(boost::bind(&moof::resource::reload_as_needed),
						SCALAR(0.25),
						moof::timer::repeat);
#endif
}


void Main::update(moof::scalar t, moof::scalar dt)
{
	if (children().size() == 0)
	{
		//moof::log_warning("main view has no children");
		//stop();
		//return;
		add_child(TitleLayer::alloc());
	}

	moof::view::update(t, dt);
}

void Main::draw(moof::scalar alpha) const
{
	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);

	glMatrixMode(GL_PROJECTION);
	glLoadIdentity();

	glMatrixMode(GL_MODELVIEW);
	glLoadIdentity();

	moof::view::draw(alpha);
}

bool Main::handle_event(const moof::event& event)
{
	if (moof::view::handle_event(event)) return true;

	switch (event.type)
	{
		case SDL_KEYUP:
			if (event.key.keysym.sym == SDLK_f)
			{
				video().toggle_fullscreen();
			}
			else if (event.key.keysym.sym == SDLK_l)
			{
				video().toggle_cursor_captured();
				video().toggle_cursor_visible();
			}
			break;

		case SDL_VIDEORESIZE:
			glViewport(0, 0, event.resize.w, event.resize.h);
			break;

		case SDL_QUIT:
			stop();
			return true;
	}

	return false;
}


std::string Main::search_paths()
{
	// Add search paths; they should be searched in this order:
	// 1. YOINK_DATADIR (environment)
	// 2. YOINK_DATADIR (configure)
	
	std::string path;
	std::string datadir = stlplus::env_vector()["YOINK_DATADIR"];
	if (!datadir.empty())
	{
		path += datadir;
		path += ":";
	}
	path += YOINK_DATADIR;

	return path;
}

std::string Main::config_paths()
{
	// Build the list of config files to search for, in this order:
	// 1. YOINK_DATADIR/yoinkrc
	// 2. /etc/yoinkrc (not for Windows)
	// 3. $HOME/.yoinkrc
	// 4. YOINKRC (environment)

	std::string path = moof::resource::find_file("yoinkrc");

#if !defined(_WIN32)
	path += ":/etc/yoinkrc";
#endif
	path += ":$HOME/.yoinkrc";

	std::string rc_file = stlplus::env_vector()["YOINKRC"];
	if (!rc_file.empty())
	{
		path += ":";
		path += rc_file;
	}

	return path;
}


void Main::setup_opengl()
{
	//glEnable(GL_TEXTURE_2D);
	glEnable(GL_DEPTH_TEST);
	//glEnable(GL_CULL_FACE);

	glEnable(GL_POINT_SMOOTH);
	glEnable(GL_LINE_SMOOTH);
	glEnable(GL_POLYGON_SMOOTH);
	glShadeModel(GL_SMOOTH);

	//glEnable(GL_BLEND);
	//glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
	glEnable(GL_ALPHA_TEST);
	glAlphaFunc(GL_GREATER, 0.0);

	glClearColor(0.0, 0.0, 0.0, 1.0);

	//glEnable(GL_LIGHTING);
	glEnable(GL_LIGHT0);

	glEnable(GL_COLOR_MATERIAL);
	glColorMaterial(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE);

	float amb[] = {0.1f, 0.1f, 0.1f, 1.0f};
	float dif[] = {0.6f, 0.6f, 0.6f, 1.0f};
	//glLightModelfv(GL_LIGHT_MODEL_AMBIENT, light);
	glLightfv(GL_LIGHT0, GL_AMBIENT, amb);
	glLightfv(GL_LIGHT0, GL_DIFFUSE, dif);

	float spec[] = {1.0f, 1.0f, 1.0f, 1.0f};
	glLightfv(GL_LIGHT0, GL_SPECULAR, spec);
}


void Main::print_usage()
{
	std::cout << "Usage: "
			  << PACKAGE" [-h|--help] [-i|--info] [OPTION=VALUE]..."
			  << std::endl
			  << "The alien-smashing action game." << std::endl
			  << std::endl
			  << "Options:" << std::endl
			  << "  -h, --help" << std::endl
			  << "      show this help and exit" << std::endl
			  << "  -i, --info" << std::endl
			  << "      show version and build information" << std::endl
			  << "  detail=1|2|3" << std::endl
			  << "      the level of detail of game scenes" << std::endl
			  << "  fullscreen=true|false" << std::endl
			  << "      if true, uses the entire display" << std::endl
			  << "  framerate=num" << std::endl
			  << "      number of frames to draw per second" << std::endl
			  << std::endl
			  << "See documentation for more options." << std::endl;
}


void Main::print_info(int argc, char* argv[])
{
	bool color = (isatty(1) == 1);

	stlplus::env_vector environment;

	std::string assets;
	assets.assign(YOINK_DATADIR);
	if (!stlplus::file_readable(assets))
	{
		assets += " ";
		if (color) assets += "\033[1;91m";
		assets += "(no access)";
		if (color) assets += "\033[0m";
	}

	std::string datadir = environment["YOINK_DATADIR"];
	if (!datadir.empty())
	{
		if (!stlplus::folder_readable(datadir))
		{
			datadir += " ";
			if (color) datadir += "\033[1;91m";
			datadir += "(no access)";
			if (color) datadir += "\033[0m";
		}
	}

	std::string rc_file = environment["YOINKRC"];
	if (!rc_file.empty())
	{
		if (!stlplus::file_readable(rc_file)) rc_file += " (no access)";
	}

	std::cout << "   Executable: " << argv[0] << std::endl
#ifdef YOINK_GITHEAD
			  << "       Commit: "YOINK_GITHEAD << std::endl
#endif
			  << "      Version: " << PACKAGE_VERSION << std::endl
			  << "        Built: " << COMPILE_TIME << std::endl
			  << "     Compiler: " << COMPILER_STRING << std::endl
			  << "       Assets: " << assets << std::endl
			  << "Build options: ";

#if ENABLE_CLOCK_GETTIME
	print_option("clock_gettime", true);
#else
	print_option("clock_gettime", false);
#endif
#if DEBUG
	print_option("debug", true);
#else
	print_option("debug", false);
#endif
#if WITH_GTK
	print_option("gtk", true);
#else
	print_option("gtk", false);
#endif
#if ENABLE_HOTLOADING
	print_option("hotload", true);
#else
	print_option("hotload", false);
#endif
#if PROFILING_ENABLED
	print_option("profile", true);
#else
	print_option("profile", false);
#endif
#if WITH_QT4
	print_option("qt4", true);
#else
	print_option("qt4", false);
#endif
#if ENABLE_THREADS
	print_option("threads", true);
#else
	print_option("threads", false);
#endif
	std::cout << std::endl;
	std::cout << "      YOINKRC: " << rc_file << std::endl
			  << "YOINK_DATADIR: " << datadir << std::endl;
}

void Main::print_option(const std::string& option, bool enabled)
{
	if (isatty(1) == 1)
	{
		if (enabled) std::cout << "\033[1;94m";
		else std::cout << "\033[1m";
	}
	if (!enabled) std::cout << "-";
	std::cout << option;
	if (isatty(1) == 1) std::cout << "\033[0m";
	std::cout << " ";
}


void hello()
{
	if (isatty(1) == 1) std::cout << "\033[94m";
	std::cout << std::endl << PACKAGE_STRING << std::endl
			  << "Compiled " << __TIME__ " " __DATE__ << std::endl
			  << "Send patches and bug reports to <"
			  PACKAGE_BUGREPORT << ">." << std::endl << moof::log::endl;
}

void goodbye()
{
	if (isatty(1) == 1) std::cout << "\033[94m";
	std::cout << std::endl << "Goodbye." << std::endl << moof::log::endl;
}


int main(int argc, char* argv[])
{
	//moof::backend backend;

	if (argc > 1)
	{
		std::string arg(argv[1]);
		if (arg == "-h" || arg == "--help")
		{
			Main::print_usage();
			return 0;
		}
		else if (arg == "-i" || arg == "--info")
		{
			Main::print_info(argc, argv);
			return 0;
		}
	}

	hello();
	atexit(goodbye);

	moof::resource::set_search_paths(Main::search_paths());

	moof::settings settings(argc, argv, Main::config_paths());

	enum moof::log::level logLevel = moof::log::info;
	settings.get("loglevel", logLevel);
	moof::log::level(logLevel);

	try
	{
		//std::string iconPath(PACKAGE".png");
		//iconPath = moof::resource::find_file(iconPath);
		//moof::image icon(iconPath);
		//icon.set_as_icon();
		moof::image_handle icon(PACKAGE, "png");
		if (icon) icon->set_as_icon();
		else moof::log_error("no icon loaded");
		icon.unload();

		class moof::video::attributes attributes(settings);
		moof::video video(PACKAGE_STRING, attributes);
		Main		mainView(settings, video);

		mainView.run();
		return 0;
	}
	catch (const std::exception& e)
	{
		moof::modal_dialog dialog(moof::modal_dialog::error,
								  PACKAGE_STRING, "unhandled exception",
								  e.what());
		dialog.run();
	}
	catch (const char* e)
	{
		moof::modal_dialog dialog(moof::modal_dialog::error,
								  PACKAGE_STRING, "unhandled exception",
								  e);
		dialog.run();
	}

	return 1;
}