/*
 * vim:ts=8:sw=3:sts=8:noexpandtab:cino=>5n-3f0^-2{2
 */
#include "e.h"

/* PROTOTYPES - same all the time */
static void *_create_data(E_Config_Dialog *cfd);
static void _free_data(E_Config_Dialog *cfd, E_Config_Dialog_Data *cfdata);
static Evas_Object *_basic_create_widgets(E_Config_Dialog *cfd, Evas *evas, E_Config_Dialog_Data *cfdata);
static void _load_available_gadgets(void *data);
static void _load_selected_gadgets(void *data);
static int _cb_mod_update(void *data, int type, void *event);
static void _e_int_gadcon_config(E_Gadcon *gc, const char *title);

/* Actual config data we will be playing with while the dialog is active */
struct _E_Config_Dialog_Data
{
   E_Gadcon *gc;
   char *name_add;
   char *id_remove;
   Evas_Hash *ids;
   Evas_Object *o_add, *o_remove, *o_instances, *o_avail;

   E_Config_Gadcon *cf_gc;
   
   Ecore_Event_Handler *hdl;
};

EAPI void
e_int_gadcon_config_shelf(E_Gadcon *gc)
{
   _e_int_gadcon_config(gc, _("Shelf Contents"));
}

EAPI void 
e_int_gadcon_config_toolbar(E_Gadcon *gc) 
{
   _e_int_gadcon_config(gc, _("Toolbar Contents"));
}

/* a nice easy setup function that does the dirty work */
static void 
_e_int_gadcon_config(E_Gadcon *gc, const char *title) 
{
   E_Config_Dialog *cfd;
   E_Config_Dialog_View *v;
   
   v = E_NEW(E_Config_Dialog_View, 1);
   if (!v) return;

   v->create_cfdata           = _create_data;
   v->free_cfdata             = _free_data;
   v->basic.create_widgets    = _basic_create_widgets;
   v->override_auto_apply = 1;

   cfd = e_config_dialog_new(e_container_current_get(e_manager_current_get()),
			     title, "E", "_gadcon_config_dialog",
			     "enlightenment/shelf", 0, v, gc);
   gc->config_dialog = cfd;
   e_dialog_resizable_set(cfd->dia, 1);
}

static void
_fill_data(E_Config_Dialog_Data *cfdata)
{
   Evas_List *l;

   cfdata->name_add = NULL;
   cfdata->id_remove = NULL;
   cfdata->cf_gc = cfdata->gc->cf;

   for (l = cfdata->cf_gc->clients; l; l = l->next)
     {
	char buf[32];

	snprintf(buf, sizeof(buf), "%p", l->data);
	cfdata->ids = evas_hash_add(cfdata->ids, buf, l->data);
     }
}

static void *
_create_data(E_Config_Dialog *cfd)
{
   E_Config_Dialog_Data *cfdata;
   
   cfdata = E_NEW(E_Config_Dialog_Data, 1);
   cfdata->gc = cfd->data;
   _fill_data(cfdata);
   return cfdata;
}

static void
_free_data(E_Config_Dialog *cfd, E_Config_Dialog_Data *cfdata)
{
   cfdata->gc->config_dialog = NULL;
   evas_hash_free(cfdata->ids);
   if (cfdata->name_add) free(cfdata->name_add);
   if (cfdata->id_remove) free(cfdata->id_remove);
   if (cfdata->hdl) ecore_event_handler_del(cfdata->hdl);
   E_FREE(cfdata);
}

static void
_cb_select_client(void *data)
{
   E_Config_Dialog_Data *cfdata;

   cfdata = data;
   e_widget_disabled_set(cfdata->o_add, 0);
}

static void
_cb_select_client_instance(void *data)
{
   E_Config_Dialog_Data *cfdata;

   cfdata = data;
   e_widget_disabled_set(cfdata->o_remove, 0);
}

static void
_cb_add_instance(void *data, void *data2)
{
   E_Config_Dialog_Data *cfdata;

   cfdata = data;
   if (!cfdata) return;
   
   if (!e_gadcon_client_config_new(cfdata->gc, cfdata->name_add)) return;
 
   e_gadcon_unpopulate(cfdata->gc);
   e_gadcon_populate(cfdata->gc);
   e_config_save_queue();
   
   _load_selected_gadgets(cfdata);
   e_widget_ilist_selected_set(cfdata->o_instances,
			       e_widget_ilist_count(cfdata->o_instances) - 1);
}

static void
_cb_remove_instance(void *data, void *data2)
{
   E_Config_Dialog_Data *cfdata;
   int i;
   
   cfdata = data;
   i = e_widget_ilist_selected_get(cfdata->o_instances);

   e_gadcon_client_config_del(cfdata->cf_gc, 
			      evas_hash_find(cfdata->ids, cfdata->id_remove));

   _load_selected_gadgets(cfdata);

   if (i >= evas_list_count(cfdata->cf_gc->clients)) 
     i = evas_list_count(cfdata->cf_gc->clients) - 1;

   if (i < 0) 
     e_widget_disabled_set(cfdata->o_remove, 1);
   else
     { 
	e_widget_ilist_selected_set(cfdata->o_instances, i); 
	e_widget_disabled_set(cfdata->o_remove, 0);
     }
   e_gadcon_unpopulate(cfdata->gc);
   e_gadcon_populate(cfdata->gc);
   e_config_save_queue();
}

static Evas_Object *
_basic_create_widgets(E_Config_Dialog *cfd, Evas *evas, E_Config_Dialog_Data *cfdata)
{
   Evas_Object *o, *of, *ob, *oi;
   Evas_Coord wmw, wmh;

   o = e_widget_list_add(evas, 0, 1);

   of = e_widget_frametable_add(evas, _("Available Gadgets"), 0);
   oi = e_widget_ilist_add(evas, 24, 24, &(cfdata->name_add));
   cfdata->o_avail = oi;
   _load_available_gadgets(cfdata);
   e_widget_min_size_get(oi, &wmw, &wmh);
   if (wmw < 200) wmw = 200;
   e_widget_min_size_set(oi, wmw, 250);
   e_widget_frametable_object_append(of, oi, 0, 0, 1, 1, 1, 1, 1, 1);
   ob = e_widget_button_add(evas, _("Add Gadget"), NULL, _cb_add_instance, cfdata, NULL);
   e_widget_disabled_set(ob, 1);
   cfdata->o_add = ob;
   e_widget_frametable_object_append(of, ob, 0, 1, 1, 1, 1, 1, 1, 0);
   e_widget_list_object_append(o, of, 1, 1, 0.5);

   of = e_widget_frametable_add(evas, _("Selected Gadgets"), 0);
   oi = e_widget_ilist_add(evas, 24, 24, &(cfdata->id_remove));
   cfdata->o_instances = oi;
   _load_selected_gadgets(cfdata);
   e_widget_min_size_get(oi, &wmw, &wmh);
   if (wmw < 200) wmw = 200;
   e_widget_min_size_set(oi, wmw, 250);
   e_widget_frametable_object_append(of, oi, 0, 0, 1, 1, 1, 1, 1, 1);
   ob = e_widget_button_add(evas, _("Remove Gadget"), NULL, _cb_remove_instance, cfdata, NULL);
   e_widget_disabled_set(ob, 1);
   cfdata->o_remove = ob;
   e_widget_frametable_object_append(of, ob, 0, 1, 1, 1, 1, 1, 1, 0);
   e_widget_list_object_append(o, of, 1, 1, 0.5);

   if (cfdata->hdl) ecore_event_handler_del(cfdata->hdl);
   cfdata->hdl = ecore_event_handler_add(E_EVENT_MODULE_UPDATE, _cb_mod_update, cfdata);

   return o;
}

static void 
_load_available_gadgets(void *data) 
{
   E_Config_Dialog_Data *cfdata;
   Evas_Object *oi;
   Evas_List *l;
   Evas *evas;
   
   cfdata = data;
   if (!cfdata) return;
   
   oi = cfdata->o_avail;
   evas = evas_object_evas_get(oi);

   evas_event_freeze(evas);
   edje_freeze();
   e_widget_ilist_freeze(oi);
   
   e_widget_ilist_clear(oi);
   for (l = e_gadcon_provider_list(); l; l = l->next)
     {
	E_Gadcon_Client_Class *cc;
	char *label;
	Evas_Object *icon;

	cc = l->data;
	icon = NULL;
	label = NULL;
	if (cc->func.label) label = cc->func.label();
	if (!label) label = cc->name;
	if (cc->func.icon) icon = cc->func.icon(evas);
	e_widget_ilist_append(oi, icon, label, _cb_select_client, cfdata, cc->name);
     }
   e_widget_ilist_go(oi);
   e_widget_ilist_thaw(oi);
   edje_thaw();
   evas_event_thaw(evas);
}

static void 
_load_selected_gadgets(void *data) 
{
   E_Config_Dialog_Data *cfdata;
   Evas_List *l, *l2;
   Evas_Object *oi;
   Evas *evas;
   
   cfdata = data;
   if (!cfdata) return;

   oi = cfdata->o_instances;
   evas = evas_object_evas_get(oi);

   evas_event_freeze(evas);
   edje_freeze();
   e_widget_ilist_freeze(oi);
   
   e_widget_ilist_clear(oi);
   for (l = cfdata->cf_gc->clients; l; l = l->next)
     {
	E_Config_Gadcon_Client *cf_gcc;
	char *label;
	Evas_Object *icon;

	cf_gcc = l->data;
	for (l2 = e_gadcon_provider_list(); l2; l2 = l2->next)
	  {
	     E_Gadcon_Client_Class *cc;

	     cc = l2->data;
	     label = NULL;
	     icon = NULL;
	     if ((cc->name) && (cf_gcc->name) &&
		 (!strcmp(cc->name, cf_gcc->name))) 
	       {
		  char buf[32];

		  snprintf(buf, sizeof(buf), "%p", cf_gcc);
		  if (cc->func.label) label = cc->func.label();
		  if (!label) label = cc->name;
		  if (cc->func.icon) icon = cc->func.icon(evas);
		  e_widget_ilist_append(oi, icon, label, 
					_cb_select_client_instance, cfdata, buf);
	       }
	  }
     }
   e_widget_ilist_go(oi);
   e_widget_ilist_thaw(oi);
   edje_thaw();
   evas_event_thaw(evas);
}

static int 
_cb_mod_update(void *data, int type, void *event) 
{
   E_Event_Module_Update *ev;
   E_Config_Dialog_Data *cfdata;
   
   if (type != E_EVENT_MODULE_UPDATE) return 1;
   
   cfdata = data;
   ev = event;
   if (!cfdata) return 1;
   
   _load_available_gadgets(cfdata);
   _load_selected_gadgets(cfdata);
   return 1;
}