/*
 * Copyright (C) 2012 - Juan Ferrer Toribio
 *
 * 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 "sql-join.h"

/**
 * SECTION: sql-join
 * @Short_description: the equivalent of the SQL JOIN.
 * @Title: SqlJoin
 * 
 * The #SqlJoin represents a joins between any targets.
 **/
G_DEFINE_TYPE (SqlJoin, sql_join, SQL_TYPE_TARGET);

SqlTarget * sql_join_new (SqlTarget * left, SqlTarget * right, SqlJoinType type)
{
	return g_object_new (SQL_TYPE_JOIN
		,"target-left"	,left
	    ,"target-right"	,right
	    ,"join-type"	,type
		,NULL
	);
}

//+++++++++++++++++++++++++++++++++++++++++++++++++++ Private

static const gchar * SQL_JOIN_TYPE[] =
{
	 "INNER"
	,"LEFT"
	,"RIGHT"
};

static void sql_join_render (SqlJoin * obj, SqlRender * render)
{
	sql_render_add_item (render, T, NULL, obj->target_left);
	sql_render_add_token (render, SQL_JOIN_TYPE[obj->type]);
	sql_render_add_token (render, "JOIN");
	sql_render_add_item (render, T, NULL, obj->target_right);
	sql_render_add_item (render, F, "ON", obj->condition);
}

//+++++++++++++++++++++++++++++++++++++++++++++++++++ Public

void sql_join_set_target_left (SqlJoin * obj, SqlTarget * target)
{
	g_return_if_fail (SQL_IS_JOIN (obj));
	g_return_if_fail (SQL_IS_TARGET (target));

	g_clear_object (&obj->target_left);
	obj->target_left = g_object_ref_sink (target);
}

void sql_join_set_target_right (SqlJoin * obj, SqlTarget * target)
{
	g_return_if_fail (SQL_IS_JOIN (obj));
	g_return_if_fail (SQL_IS_TARGET (target));

	g_clear_object (&obj->target_right);
	obj->target_right = g_object_ref_sink (target);
}

void sql_join_set_condition (SqlJoin * obj, SqlExpr * condition)
{
	g_return_if_fail (SQL_IS_JOIN (obj));
	g_return_if_fail (SQL_IS_EXPR (condition));

	g_clear_object (&obj->condition);
	obj->condition = g_object_ref_sink (condition);
}

//+++++++++++++++++++++++++++++++++++++++++++++++++++ Properties

enum
{
	 PROP_TARGET_LEFT = 1
	,PROP_TARGET_RIGHT
	,PROP_TYPE
	,PROP_CONDITION
};

static void sql_join_set_property (SqlJoin * obj, guint id,
	const GValue * value, GParamSpec * pspec)
{
	switch (id)
	{
		case PROP_TARGET_LEFT:
			sql_join_set_target_left (obj, g_value_get_object (value));
			break;
		case PROP_TARGET_RIGHT:
			sql_join_set_target_right (obj, g_value_get_object (value));
			break;
		case PROP_TYPE:
			obj->type = g_value_get_int (value);
			break;
		case PROP_CONDITION:
			sql_join_set_condition (obj, g_value_get_object (value));
			break;
		default:		
			G_OBJECT_WARN_INVALID_PROPERTY_ID (obj, id, pspec);
	}
}

static void sql_join_get_property (SqlJoin * obj, guint id,
	GValue * value, GParamSpec * pspec)
{	
	switch (id)
	{
		case PROP_TARGET_LEFT:
			g_value_set_object (value, obj->target_left);
			break;
		case PROP_TARGET_RIGHT:
			g_value_set_object (value, obj->target_right);
			break;
		case PROP_TYPE:
			g_value_set_int (value, obj->type);
			break;
		case PROP_CONDITION:
			g_value_set_object (value, obj->condition);
			break;
		default:		
			G_OBJECT_WARN_INVALID_PROPERTY_ID (obj, id, pspec);
	}
}

//+++++++++++++++++++++++++++++++++++++++++++++++++++ Class

static void sql_join_init (SqlJoin * obj)
{	
	obj->target_left = NULL;
	obj->target_right = NULL;
	obj->condition = NULL;
}

static void sql_join_finalize (SqlJoin * obj)
{
	g_clear_object (&obj->target_left);
	g_clear_object (&obj->target_right);
	g_clear_object (&obj->condition);
	G_OBJECT_CLASS (sql_join_parent_class)->finalize (G_OBJECT (obj));
}

static void sql_join_class_init (SqlJoinClass * klass)
{
	GObjectClass * k = G_OBJECT_CLASS (klass);
	k->finalize = (GObjectFinalizeFunc) sql_join_finalize;
	k->set_property = (GObjectSetPropertyFunc) sql_join_set_property;
	k->get_property = (GObjectGetPropertyFunc) sql_join_get_property;
	SQL_OBJECT_CLASS (klass)->render = (SqlRenderFunc) sql_join_render;

	g_object_class_install_property (k, PROP_TARGET_LEFT,
		g_param_spec_object ("target-left"
			,"Left target"
			,"The left target in the join"
			,SQL_TYPE_TARGET
			,G_PARAM_READWRITE
	));
	g_object_class_install_property (k, PROP_TARGET_RIGHT,
		g_param_spec_object ("target-right"
			,"Right target"
			,"The right target in the join"
			,SQL_TYPE_TARGET
			,G_PARAM_READWRITE
	));
	g_object_class_install_property (k, PROP_TYPE,
		g_param_spec_int ("join-type"
			,"Type"
			,"The type of join"
			,0, SQL_JOIN_TYPE_COUNT - 1, SQL_JOIN_TYPE_INNER
			,G_PARAM_READWRITE
	));
	g_object_class_install_property (k, PROP_CONDITION,
		g_param_spec_object ("condition"
			,"Condition"
			,"The condition used for the join"
			,SQL_TYPE_EXPR
			,G_PARAM_READWRITE
	));
}