/**
 **	Eggedit.cc - Egg-editing methods.
 **
 **	Written: 6/8/01 - JSF
 **/

/*
Copyright (C) 2000-2001 The Exult Team

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 2
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, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
*/

#ifdef HAVE_CONFIG_H
#  include <config.h>
#endif

#include "studio.h"
#include "u7drag.h"
#include "servemsg.h"
#include "objserial.h"
#include "exult_constants.h"
#include "shapefile.h"
#include "shapedraw.h"

using std::cout;
using std::cerr;
using std::endl;
/*
 *	Open egg window.
 */

C_EXPORT void on_open_egg_activate
	(
	GtkMenuItem     *menuitem,
        gpointer         user_data
	)
	{
	ExultStudio *studio = ExultStudio::get_instance();
	studio->open_egg_window();
	}

/*
 *	Egg window's Apply button.
 */
C_EXPORT void on_egg_apply_btn_clicked
	(
	GtkButton *btn,
	gpointer user_data
	)
	{
	ExultStudio::get_instance()->save_egg_window();
	}

/*
 *	Egg window's Cancel button.
 */
C_EXPORT void on_egg_cancel_btn_clicked
	(
	GtkButton *btn,
	gpointer user_data
	)
	{
	ExultStudio::get_instance()->close_egg_window();
	}

/*
 *	Egg window's close button.
 */
C_EXPORT gboolean on_egg_window_delete_event
	(
	GtkWidget *widget,
	GdkEvent *event,
	gpointer user_data
	)
	{
	ExultStudio::get_instance()->close_egg_window();
	return TRUE;
	}

/*
 *	Draw shape in egg 'monster' area.
 */
C_EXPORT gboolean on_egg_monster_draw_expose_event
	(
	GtkWidget *widget,		// The view window.
	GdkEventExpose *event,
	gpointer data			// ->Shape_chooser.
	)
	{
	ExultStudio::get_instance()->show_egg_monster(
		event->area.x, event->area.y, event->area.width,
							event->area.height);
	return (TRUE);
	}

/*
 *	Monster shape # lost focus, so update shape displayed.
 */
C_EXPORT gboolean on_monst_shape_focus_out_event
	(
	GtkWidget *widget,
	GdkEventFocus *event,
	gpointer user_data
	)
	{
	ExultStudio::get_instance()->show_egg_monster();
	return FALSE;
	}
/*
 *	"Teleport coords" toggled.
 */
C_EXPORT void on_teleport_coord_toggled
	(
	GtkToggleButton *btn,
        gpointer user_data
	)
	{
	ExultStudio *studio = ExultStudio::get_instance();
	bool on = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(btn));
	studio->set_sensitive("teleport_x", on);
	studio->set_sensitive("teleport_y", on);
	studio->set_sensitive("teleport_eggnum", !on);
	}

/*
 *	Callback for when a shape is dropped on the Egg 'monster' area.
 */

static void Egg_monster_dropped
	(
	int file,			// U7_SHAPE_SHAPES.
	int shape,
	int frame,
	void *udata
	)
	{
	if (file == U7_SHAPE_SHAPES && shape >= 0 && shape < 1024)
		((ExultStudio *) udata)->set_egg_monster(shape, frame);
	}

#ifdef WIN32

static void Drop_dragged_shape(int shape, int frame, int x, int y, void *data)
{
	cout << "Dropped a shape: " << shape << "," << frame << " " << data << endl;

	Egg_monster_dropped(U7_SHAPE_SHAPES, shape, frame, data);
}

#endif

/*
 *	Open the egg-editing window.
 */

void ExultStudio::open_egg_window
	(
	unsigned char *data,		// Serialized egg, or null.
	int datalen
	)
	{
	bool first_time = false;
	if (!eggwin)			// First time?
		{
		first_time = true;
		eggwin = glade_xml_get_widget( app_xml, "egg_window" );
		if (vgafile && palbuf)
			{
			egg_monster_draw = new Shape_draw(vgafile->get_ifile(),
								 palbuf,
			    glade_xml_get_widget(app_xml, "egg_monster_draw"));
			egg_monster_draw->enable_drop(Egg_monster_dropped,
								this);
			}
		egg_ctx = gtk_statusbar_get_context_id(
			GTK_STATUSBAR(glade_xml_get_widget(
				app_xml, "egg_status")), "Egg Editor");
		}
					// Init. egg address to null.
	gtk_object_set_user_data(GTK_OBJECT(eggwin), 0);
					// Make 'apply' sensitive.
	gtk_widget_set_sensitive(glade_xml_get_widget(app_xml, 
						"egg_apply_btn"), true);
	if (data)
		{
		if (!init_egg_window(data, datalen))
			return;
		}
	else if (first_time)		// Init. empty dialog first time.
		{
		set_toggle("teleport_coord", true);
		set_sensitive("teleport_x", true);
		set_sensitive("teleport_y", true);
		set_sensitive("teleport_eggnum", false);
		}
	gtk_widget_show(eggwin);

#ifdef WIN32
	if (first_time || !eggdnd)
		Windnd::CreateStudioDropDest(eggdnd, egghwnd, Drop_dragged_shape, NULL, NULL, (void*) this);
#endif
	}

/*
 *	Close the egg-editing window.
 */

void ExultStudio::close_egg_window
	(
	)
	{
	if (eggwin) {
		gtk_widget_hide(eggwin);
#ifdef WIN32
		Windnd::DestroyStudioDropDest(eggdnd, egghwnd);
#endif
	}
	}

/*
 *	Init. the egg editor with data from Exult.
 *
 *	Output:	0 if error (reported).
 */

int ExultStudio::init_egg_window
	(
	unsigned char *data,
	int datalen
	)
	{
	unsigned long addr;
	int tx, ty, tz;
	int shape, frame;
	int type;
	int criteria;
	int probability;
	int distance;
	bool nocturnal, once, hatched, auto_reset;
	int data1, data2;
	if (!Egg_object_in(data, datalen, addr, tx, ty, tz, shape, frame,
		type, criteria, probability, distance, 
		nocturnal, once, hatched, auto_reset,
		data1, data2))
		{
		cout << "Error decoding egg" << endl;
		return 0;
		}
					// Store address with window.
	gtk_object_set_user_data(GTK_OBJECT(eggwin), (gpointer) addr);
	GtkWidget *notebook = glade_xml_get_widget(app_xml, "notebook1");
	if (notebook)			// 1st is monster (1).
		gtk_notebook_set_page(GTK_NOTEBOOK(notebook), type - 1);
	set_spin("probability", probability);
	set_spin("distance", distance);
	set_optmenu("criteria", criteria);
	set_toggle("nocturnal", nocturnal);
	set_toggle("once", once);
	set_toggle("hatched", hatched);
	set_toggle("autoreset", auto_reset);
	switch (type)			// Set notebook page.
		{
	case 1:				// Monster:
		{
		int shnum = data2&1023, frnum = data2>>10;
		set_entry("monst_shape", shnum);
		set_entry("monst_frame", frnum);
		set_optmenu("monst_schedule", data1>>8);
		set_optmenu("monst_align", data1&3);
		set_spin("monst_count", (data1&0xff)>>2);
		break;
		}
	case 2:				// Jukebox:
		set_spin("juke_song", data1&0xff);
		set_toggle("juke_cont", (data1>>8)&0x01);
		break;
	case 3:				// Sound effect:
		set_spin("sfx_number", data1&0xff);
		set_toggle("sfx_cont", (data1>>8)&0x01);
		break;
	case 4:				// Voice:
		set_spin("speech_number", data1&0xff);
		break;
	case 5:				// Usecode:
		set_entry("usecode_number", data2, true);
		set_spin("usecode_quality", data1&0xff);
		break;
	case 6:				// Missile:
		set_entry("missile_shape", data1); 
		set_optmenu("missile_dir", data2&0xff);
		set_spin("missile_delay", data2>>8);
		break;
	case 7:				// Teleport:
		{
		int qual = data1&0xff;
		if (qual == 255)
			{
			set_toggle("teleport_coord", true);
			int schunk = data1 >> 8;
			set_entry("teleport_x",
				(schunk%12)*c_tiles_per_schunk +(data2&0xff),
								true);
			set_entry("teleport_y",
				(schunk/12)*c_tiles_per_schunk +(data2>>8),
								true);
			set_spin("teleport_eggnum", 0, false);
			}
		else			// Egg #.
			{
			set_toggle("teleport_coord", false);
			set_entry("teleport_x", 0, false, false);
			set_entry("teleport_y", 0, false, false);
			set_spin("teleport_eggnum", qual);
			}
		break;
		}
	case 8:				// Weather:
		set_optmenu("weather_type", data1&0xff); 
		set_spin("weather_length", data1>>8);
		break;
	case 9:				// Path:
		set_spin("pathegg_num", data1&0xff);
		break;
	case 10:			// Button:
		set_spin("btnegg_distance", data1&0xff);
		break;
	default:
		break;
		}
	return 1;
	}

/*
 *	Callback for when user clicked where egg should be inserted.
 */

static void Egg_response
	(
	Exult_server::Msg_type id,
	unsigned char *data,
	int datalen,
	void * /* client */
	)
	{
	if (id == Exult_server::user_responded)
		ExultStudio::get_instance()->close_egg_window();
	//+++++cancel??
	}

/*
 *	Send updated egg info. back to Exult.
 *
 *	Output:	0 if error (reported).
 */

int ExultStudio::save_egg_window
	(
	)
	{
	cout << "In save_egg_window()" << endl;
	unsigned char data[Exult_server::maxlength];
					// Get egg (null if creating new).
	unsigned long addr = (unsigned long) gtk_object_get_user_data(
							GTK_OBJECT(eggwin));
	int tx = -1, ty = -1, tz = -1;	// +++++For now.
	int shape = -1, frame = -1;	// For now.
	int type = -1;
	GtkWidget *notebook = glade_xml_get_widget(app_xml, "notebook1");
	if (notebook)			// 1st is monster (1).
		type = 1 + gtk_notebook_get_current_page(
						GTK_NOTEBOOK(notebook));
	else
		{
		cout << "Can't find notebook widget" << endl;
		return 0;
		}
	int criteria = get_optmenu("criteria");
	int probability = get_spin("probability");
	int distance = get_spin("distance");
	bool nocturnal = get_toggle("nocturnal"),
		once = get_toggle("once"),
		hatched = get_toggle("hatched"), 
		auto_reset = get_toggle("autoreset");
	int data1 = -1, data2 = -1;
	switch (type)			// Set notebook page.
		{
	case 1:				// Monster:
		data2 = (get_num_entry("monst_shape")&1023) +
			(get_num_entry("monst_frame")<<10);
		data1 = (get_optmenu("monst_schedule")<<8) +
			(get_optmenu("monst_align")&3) +
			(get_spin("monst_count")<<2);
		break;
	case 2:				// Jukebox:
		data1 = (get_spin("juke_song")&0xff) +
			(get_toggle("juke_cont")<<8);
		break;
	case 3:				// Sound effect:
		data1 = (get_spin("sfx_number")&0xff) +
			(get_toggle("sfx_cont")<<8);
		break;
	case 4:				// Voice:
		data1 = get_spin("speech_number")&0xff;
		break;
	case 5:				// Usecode:
		data2 = get_num_entry("usecode_number");
		data1 = get_spin("usecode_quality")&0xff;
		break;
	case 6:				// Missile:
		data1 = get_num_entry("missile_shape");
		data2 = (get_optmenu("missile_dir")&0xff) +
			(get_spin("missile_delay")<<8);
		break;
	case 7:				// Teleport:
		if (get_toggle("teleport_coord"))
			{		// Abs. coords.
			int tx = get_num_entry("teleport_x"),
			    ty = get_num_entry("teleport_y");
			data2 = (tx&0xff) + ((ty&0xff)<<8);
			int sx = tx/c_tiles_per_schunk,
			    sy = ty/c_tiles_per_schunk;
			data1 = 255 + ((sy*12 + sx)<<8);
			}
		else			// Egg #.
			data1 = get_spin("teleport_eggnum")&0xff;
		break;
	case 8:				// Weather:
		data1 = (get_optmenu("weather_type")&0xff) +
			(get_spin("weather_length")<<8);
		break;
	case 9:				// Path:
		data1 = get_spin("pathegg_num")&0xff;
		break;
	case 10:			// Button:
		data1 = get_spin("btnegg_distance")&0xff;
		break;
	default:
		cout << "Unknown egg type" << endl;
		return 0;
		}
	if (Egg_object_out(server_socket, addr, tx, ty, tz,
		shape, frame, type, criteria, probability, distance,
		nocturnal, once, hatched, auto_reset, data1, data2) == -1)
		{
		cout << "Error sending egg data to server" <<endl;
		return 0;
		}
	cout << "Sent egg data to server" << endl;
	if (!addr)
		{
		set_statusbar("egg_status", egg_ctx,
					"Click on map at place to insert egg");
					// Make 'apply' insensitive.
		gtk_widget_set_sensitive(glade_xml_get_widget(app_xml, 
						"egg_apply_btn"), false);
		waiting_for_server = Egg_response;
		return 1;		// Leave window open.
		}
	close_egg_window();
	return 1;
	}

/*
 *	Paint the shape in the egg 'monster' notebook page.
 */

void ExultStudio::show_egg_monster
	(
	int x, int y, int w, int h	// Rectangle. w=-1 to show all.
	)
	{
	if (!egg_monster_draw)
		return;
	egg_monster_draw->configure();
					// Yes, this is kind of redundant...
	int shnum = get_num_entry("monst_shape");
	int frnum = get_num_entry("monst_frame");
	egg_monster_draw->draw_shape_centered(shnum, frnum);
	if (w != -1)
		egg_monster_draw->show(x, y, w, h);
	else
		egg_monster_draw->show();
	}

/*
 *	Set egg monster shape.
 */

void ExultStudio::set_egg_monster
	(
	int shape,
	int frame
	)
	{
	set_entry("monst_shape", shape);
	set_entry("monst_frame", frame);
	show_egg_monster();
	}