/*
** graphics-binding.cpp
**
** This file is part of mkxp.
**
** Copyright (C) 2013 Jonas Kulla <Nyocurio@gmail.com>
**
** mkxp 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 2 of the License, or
** (at your option) any later version.
**
** mkxp 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 mkxp.  If not, see <http://www.gnu.org/licenses/>.
*/

#include "graphics.h"
#include "sharedstate.h"
#include "eventthread.h"
#include "binding-util.h"
#include "binding-types.h"
#include "exception.h"
#include "config.h"
#include "debugwriter.h"
#include "signals/rubydispatcher.h"

#include "signalconnection-binding.h"

#include <vector>

RB_METHOD(graphicsUpdate){
	RB_UNUSED_PARAM;

	shState->graphics().update();

	return Qnil;
}

RB_METHOD(graphicsFreeze){
	RB_UNUSED_PARAM;

	shState->graphics().freeze();

	return Qnil;
}

RB_METHOD(graphicsTransition){
	RB_UNUSED_PARAM;

	int duration = 8;
	const char *filename = "";
	int vague = 40;

	rb_get_args(argc, argv, "|izi", &duration, &filename, &vague RB_ARG_END);

	GUARD_EXC( shState->graphics().transition(duration, filename, vague); )

	return Qnil;
}

RB_METHOD(graphicsFrameReset){
	RB_UNUSED_PARAM;

	shState->graphics().frameReset();

	return Qnil;
}

#define DEF_GRA_PROP_I(PropName) \
	RB_METHOD(graphics##Get##PropName) \
	{ \
		RB_UNUSED_PARAM; \
		return rb_fix_new(shState->graphics().get##PropName()); \
	} \
	RB_METHOD(graphics##Set##PropName) \
	{ \
		RB_UNUSED_PARAM; \
		int value; \
		rb_get_args(argc, argv, "i", &value RB_ARG_END); \
		shState->graphics().set##PropName(value); \
		return INT2FIX(value); \
	}

#define DEF_GRA_PROP_B(PropName) \
	RB_METHOD(graphics##Get##PropName) \
	{ \
		RB_UNUSED_PARAM; \
		return rb_bool_new(shState->graphics().get##PropName()); \
	} \
	RB_METHOD(graphics##Set##PropName) \
	{ \
		RB_UNUSED_PARAM; \
		bool value; \
		rb_get_args(argc, argv, "b", &value RB_ARG_END); \
		shState->graphics().set##PropName(value); \
		return rb_bool_new(value); \
	}
	

RB_METHOD(graphicsPosX){
	RB_UNUSED_PARAM;
	return INT2FIX(shState->graphics().x());
}

RB_METHOD(graphicsPosY){
	RB_UNUSED_PARAM;
	return INT2FIX(shState->graphics().y());
}

RB_METHOD(graphicsWidth){
	RB_UNUSED_PARAM;
	return INT2FIX(shState->graphics().width());
}

RB_METHOD(graphicsHeight){
	RB_UNUSED_PARAM;
	return INT2FIX(shState->graphics().height());
}

RB_METHOD(graphicsWait){
	RB_UNUSED_PARAM;

	int duration;
	rb_get_args(argc, argv, "i", &duration RB_ARG_END);

	shState->graphics().wait(duration);

	return Qnil;
}

RB_METHOD(graphicsSetVsync){
	RB_UNUSED_PARAM;
	int xuinia_ebania;
	rb_get_args(argc, argv, "i", &xuinia_ebania RB_ARG_END);
	shState->graphics().setVsync(xuinia_ebania);

	return Qnil;
}

RB_METHOD(graphicsFadeout){
	RB_UNUSED_PARAM;

	int duration;
	rb_get_args(argc, argv, "i", &duration RB_ARG_END);

	shState->graphics().fadeout(duration);

	return Qnil;
}

RB_METHOD(graphicsFadein){
	RB_UNUSED_PARAM;

	int duration;
	rb_get_args(argc, argv, "i", &duration RB_ARG_END);

	shState->graphics().fadein(duration);

	return Qnil;
}

void bitmapInitProps(Bitmap *b, VALUE self);

RB_METHOD(graphicsSnapToBitmap){
	RB_UNUSED_PARAM;

	Bitmap *result = 0;
	GUARD_EXC( result = shState->graphics().snapToBitmap(); );

	VALUE obj = wrapObject(result, BitmapType);
	bitmapInitProps(result, obj);

	return obj;
}

RB_METHOD(graphicsResizeScreen){
	RB_UNUSED_PARAM;

	int width, height;
	bool emitSignal = true;
	rb_get_args(argc, argv, "ii|b", &width, &height, &emitSignal RB_ARG_END);

	shState->graphics().resizeScreen(width, height, emitSignal);

	return Qnil;
}

RB_METHOD(graphicsMoveScreen){
	RB_UNUSED_PARAM;

	int x, y;
	rb_get_args(argc, argv, "ii", &x, &y RB_ARG_END);

	shState->graphics().moveScreen(x, y);

	return Qnil;
}

RB_METHOD(graphicsReset){
	RB_UNUSED_PARAM;

	shState->graphics().reset();

	return Qnil;
}

DEF_GRA_PROP_I(FrameRate)
DEF_GRA_PROP_I(FrameCount)
DEF_GRA_PROP_I(Brightness)

DEF_GRA_PROP_B(Fullscreen)
DEF_GRA_PROP_B(ShowCursor)
DEF_GRA_PROP_B(Smooth)
DEF_GRA_PROP_B(Frameskip)

#define INIT_GRA_PROP_BIND(PropName, prop_name_s) \
{ \
	_rb_define_module_function(module, prop_name_s, graphics##Get##PropName); \
	_rb_define_module_function(module, prop_name_s "=", graphics##Set##PropName); \
}

static VALUE graphicsWindowMoved(VALUE self){
	RUBY_CONNECTION
	conn->connection = shState->windowSignals.moved.Connect([conn](int x, int y){
		shState->rubyDispatcher().invoke([conn, x, y]{
			if (NIL_P(conn->proc)){
				Debug() << "Unable to call non-existent proc! (Graphics.window_moved connection, disconnecting)";
				conn->connection.Disconnect();
				return;
			}
			rb_funcall(conn->proc, rb_intern("call"), 2, INT2NUM(x), INT2NUM(y));
		});
	});
	return TypedData_Wrap_Struct(rb_cRubyConnection, &rubyConnection_type, conn);
}

static VALUE graphicsWindowResized(VALUE self){
	RUBY_CONNECTION
	conn->connection = shState->windowSignals.resized.Connect([conn](int w, int h){
		shState->rubyDispatcher().invoke([conn, w, h]{
			if (NIL_P(conn->proc)){
				Debug() << "Unable to call non-existent proc! (Graphics.window_resized connection, disconnecting)";
				conn->connection.Disconnect();
				return;
			}
			rb_funcall(conn->proc, rb_intern("call"), 2, INT2NUM(w), INT2NUM(h));
		});
	});
	return TypedData_Wrap_Struct(rb_cRubyConnection, &rubyConnection_type, conn);
}

static VALUE graphicsViewportResized(VALUE self){
	RUBY_CONNECTION
	conn->connection = shState->graphicsSignals.resized.Connect([conn](int w, int h){
		//shState->rubyDispatcher().invoke([conn, w, h]{
			if (NIL_P(conn->proc)){
				Debug() << "Unable to call non-existent proc! (Graphics.viewport_resized connection, disconnecting)";
				conn->connection.Disconnect();
				return;
			}
			rb_funcall(conn->proc, rb_intern("call"), 2, INT2NUM(w), INT2NUM(h));
		//});
	});
	return TypedData_Wrap_Struct(rb_cRubyConnection, &rubyConnection_type, conn);
}

void graphicsBindingInit(){
	VALUE module = rb_define_module("Graphics");

	// Signals

	rb_define_module_function(module, "window_moved", RUBY_METHOD_FUNC(graphicsWindowMoved), 0);
	rb_define_module_function(module, "window_resized", RUBY_METHOD_FUNC(graphicsWindowResized), 0);
	rb_define_module_function(module, "viewport_resized", RUBY_METHOD_FUNC(graphicsViewportResized), 0);

	// Functions
	_rb_define_module_function(module, "x", graphicsPosX);
	_rb_define_module_function(module, "y", graphicsPosY);
	_rb_define_module_function(module, "width", graphicsWidth);
	_rb_define_module_function(module, "height", graphicsHeight);
	_rb_define_module_function(module, "wait", graphicsWait);
	_rb_define_module_function(module, "fadeout", graphicsFadeout);
	_rb_define_module_function(module, "fadein", graphicsFadein);
	_rb_define_module_function(module, "snap_to_bitmap", graphicsSnapToBitmap);
	_rb_define_module_function(module, "resize_screen", graphicsResizeScreen);
	_rb_define_module_function(module, "move_screen", graphicsMoveScreen);
	_rb_define_module_function(module, "update", graphicsUpdate);
	_rb_define_module_function(module, "freeze", graphicsFreeze);
	_rb_define_module_function(module, "transition", graphicsTransition);
	_rb_define_module_function(module, "frame_reset", graphicsFrameReset);
	_rb_define_module_function(module, "setVsync", graphicsSetVsync);
	_rb_define_module_function(module, "__reset__", graphicsReset);

	// Variables
	INIT_GRA_PROP_BIND( FrameRate,  "frame_rate"  );
	INIT_GRA_PROP_BIND( FrameCount, "frame_count" );
	INIT_GRA_PROP_BIND( Brightness, "brightness" );
	INIT_GRA_PROP_BIND( Fullscreen, "fullscreen"  );
	INIT_GRA_PROP_BIND( ShowCursor, "show_cursor" );
	INIT_GRA_PROP_BIND( Smooth,     "smooth"      );
	INIT_GRA_PROP_BIND( Frameskip,  "frameskip"   );
	
	const Config &conf = shState->rtData().config;
	rb_define_const(module, "RESOLUTION_OVERRIDDEN", rb_bool_new(conf.resolutionOverridden));
}