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

/* actual module specifics */

static void _e_mod_action_conf_cb(E_Object *obj, const char *params);
static void _e_mod_conf_cb(void *data, E_Menu *m, E_Menu_Item *mi);
static void _e_mod_menu_add(void *data, E_Menu *m);

static E_Module *conf_module = NULL;
static E_Action *act = NULL;
static E_Int_Menu_Augmentation *maug = NULL;

/* gadcon requirements */
static E_Gadcon_Client *_gc_init(E_Gadcon *gc, const char *name, const char *id, const char *style);
static void _gc_shutdown(E_Gadcon_Client *gcc);
static void _gc_orient(E_Gadcon_Client *gcc, E_Gadcon_Orient orient);
static char *_gc_label(E_Gadcon_Client_Class *client_class);
static Evas_Object *_gc_icon(E_Gadcon_Client_Class *client_class, Evas *evas);
static const char *_gc_id_new(E_Gadcon_Client_Class *client_class);
static void _cb_button_click(void *data, void *data2);

static void _conf_new(void);
static void _conf_free(void); 
static int _conf_timer(void *data);

static E_Config_DD *conf_edd = NULL;
Config *conf = NULL;

/* and actually define the gadcon class that this module provides (just 1) */
static const E_Gadcon_Client_Class _gadcon_class =
{
   GADCON_CLIENT_CLASS_VERSION, "configuration",
     {
        _gc_init, _gc_shutdown, _gc_orient, _gc_label, _gc_icon, _gc_id_new, NULL, 
        e_gadcon_site_is_not_toolbar
     },
   E_GADCON_CLIENT_STYLE_PLAIN
};

static E_Gadcon_Client *
_gc_init(E_Gadcon *gc, const char *name, const char *id, const char *style)
{
   Evas_Object *o, *icon;
   E_Gadcon_Client *gcc;

   o = e_widget_button_add(gc->evas, NULL, NULL, 
                           _cb_button_click, NULL, NULL);

   icon = e_icon_add(evas_object_evas_get(o));
   e_util_icon_theme_set(icon, "preferences-system");
   e_widget_button_icon_set(o, icon);

   gcc = e_gadcon_client_new(gc, name, id, style, o);
   gcc->data = o;
   e_gadcon_client_util_menu_attach(gcc);

   return gcc;
}

static void
_gc_shutdown(E_Gadcon_Client *gcc)
{
   evas_object_del(gcc->o_base);
}

static void
_gc_orient(E_Gadcon_Client *gcc, E_Gadcon_Orient orient)
{
   Evas_Coord mw, mh;

   mw = 0, mh = 0;
   edje_object_size_min_get(gcc->o_base, &mw, &mh);
   if ((mw < 1) || (mh < 1))
     edje_object_size_min_calc(gcc->o_base, &mw, &mh);
   if (mw < 4) mw = 4;
   if (mh < 4) mh = 4;
   e_gadcon_client_aspect_set(gcc, mw, mh);
   e_gadcon_client_min_size_set(gcc, mw, mh);
}

static char *
_gc_label(E_Gadcon_Client_Class *client_class)
{
   return _("Settings");
}

static Evas_Object *
_gc_icon(E_Gadcon_Client_Class *client_class, Evas *evas)
{
   Evas_Object *o;
   char buf[PATH_MAX];

   o = edje_object_add(evas);
   snprintf(buf, sizeof(buf), "%s/e-module-conf.edj",
            e_module_dir_get(conf_module));
   edje_object_file_set(o, buf, "icon");
   return o;
}

static const char *
_gc_id_new(E_Gadcon_Client_Class *client_class)
{
   return _gadcon_class.name;
}

static void 
_cb_button_click(void *data, void *data2) 
{
   E_Action *a;

   a = e_action_find("configuration");
   if ((a) && (a->func.go)) a->func.go(NULL, NULL);
}

static void 
_e_mod_run_cb(void *data, E_Menu *m, E_Menu_Item *mi)
{
  Eina_List *l;
  char buf[1024];
  
  for (l = e_configure_registry; l; l = l->next)
    {
      Eina_List *ll;
      E_Configure_Cat *ecat;
	
      ecat = l->data;
      if ((ecat->pri >= 0) && (ecat->items))
	{
	  for (ll = ecat->items; ll; ll = ll->next)
	    {
	      E_Configure_It *eci;
	      char buf[1024];
		  
	      eci = ll->data;
	      if (eci->pri >= 0 && eci == data)
		{
		  snprintf(buf, sizeof(buf), "%s/%s", ecat->cat, eci->item);
		  e_configure_registry_call(buf, m->zone->container, NULL);
		}
	    }
	}
    }
}

static void
_config_pre_activate_cb(void *data, E_Menu *m)
{
  E_Configure_Cat *ecat = data;
  Eina_List *l;
  E_Menu_Item *mi;
  /*XXX is this the right way to not initiate the menu a second time ?*/
  if (e_menu_item_nth(m, 0)) return;
  
  for (l = ecat->items; l; l = l->next)
    {
      E_Configure_It *eci;
      char buf[1024];
		  
      eci = l->data;
      if (eci->pri >= 0)
	{
	  mi = e_menu_item_new(m);
	  e_menu_item_label_set(mi, eci->label);
	  if(eci->icon)
	  e_util_menu_item_theme_icon_set(mi, eci->icon);
	  
	  e_menu_item_callback_set(mi, _e_mod_run_cb, eci);
	}
    }
}


/* menu item add hook */
void
e_mod_config_menu_add(void *data, E_Menu *m)
{
  E_Menu_Item *mi;
  E_Menu *sub;
  
  Eina_List *l;

  mi = e_menu_item_new(m);
  e_menu_item_separator_set(mi, 1);
  
  for (l = e_configure_registry; l; l = l->next)
    {
      Eina_List *ll;
      E_Configure_Cat *ecat;
	
      ecat = l->data;
      if ((ecat->pri >= 0) && (ecat->items))
	{
	  mi = e_menu_item_new(m);
	  e_menu_item_label_set(mi, ecat->label);
	  if(ecat->icon)
	    e_util_menu_item_theme_icon_set(mi, ecat->icon);

	  sub = e_menu_new();
	  e_menu_item_submenu_set(mi, sub);
	  e_menu_pre_activate_callback_set(sub, _config_pre_activate_cb, ecat);
	}
    }
}

/* module setup */
EAPI E_Module_Api e_modapi = { E_MODULE_API_VERSION, "Conf" };

EAPI void *
e_modapi_init(E_Module *m)
{
   char buf[PATH_MAX];
   conf_module = m;
   /* add module supplied action */
   act = e_action_add("configuration");
   if (act)
     {
	act->func.go = _e_mod_action_conf_cb;
	e_action_predef_name_set(_("Launch"), _("Settings Panel"), 
                                 "configuration", NULL, NULL, 0);
     }
   maug = 
     e_int_menus_menu_augmentation_add_sorted("config/0", _("Settings Panel"), 
                                              _e_mod_menu_add, NULL, NULL, NULL);
   e_module_delayed_set(m, 1);
   
   snprintf(buf, sizeof(buf), "%s/e-module-conf.edj",
            e_module_dir_get(conf_module));
   
   e_configure_registry_category_add("advanced", 80, "Advanced", 
                                     NULL, "preferences-advanced");
   e_configure_registry_item_add("advanced/conf", 110, _("Configuration Panel"), 
                                 NULL, buf, e_int_config_conf_module);

   conf_edd = E_CONFIG_DD_NEW("Config", Config);
   #undef T
   #undef D
   #define T Config
   #define D conf_edd
   E_CONFIG_VAL(D, T, version, INT);
   E_CONFIG_VAL(D, T, menu_augmentation, INT);

   conf = e_config_domain_load("module.conf", conf_edd);
   if (conf) 
     {
        if ((conf->version >> 16) < MOD_CONFIG_FILE_EPOCH) 
          {
             _conf_free();
             ecore_timer_add(1.0, _conf_timer,
			     _("Configuration Panel Module Configuration data needed "
			     "upgrading. Your old configuration<br> has been"
			     " wiped and a new set of defaults initialized. "
			     "This<br>will happen regularly during "
			     "development, so don't report a<br>bug. "
			     "This simply means the module needs "
			     "new configuration<br>data by default for "
			     "usable functionality that your old<br>"
			     "configuration simply lacks. This new set of "
			     "defaults will fix<br>that by adding it in. "
			     "You can re-configure things now to your<br>"
			     "liking. Sorry for the inconvenience.<br>"));
          }
        else if (conf->version > MOD_CONFIG_FILE_VERSION) 
          {
             _conf_free();
             ecore_timer_add(1.0, _conf_timer, 
			     _("Your Configuration Panel Module configuration is NEWER "
			     "than the module version. This is "
			     "very<br>strange. This should not happen unless"
			     " you downgraded<br>the module or "
			     "copied the configuration from a place where"
			     "<br>a newer version of the module "
			     "was running. This is bad and<br>as a "
			     "precaution your configuration has been now "
			     "restored to<br>defaults. Sorry for the "
			     "inconvenience.<br>"));
          }
     }

   if (!conf) _conf_new();
   conf->module = m;
   
   if (conf->menu_augmentation)
     {
       conf->aug = e_int_menus_menu_augmentation_add("config/0", e_mod_config_menu_add, NULL, NULL, NULL);
       e_int_menus_menu_augmentation_point_disabled_set("config/1", 1);
     }
   else
     e_int_menus_menu_augmentation_point_disabled_set("config/1", 0);

   e_gadcon_provider_register(&_gadcon_class);
   return m;
}

EAPI int
e_modapi_shutdown(E_Module *m)
{
   e_configure_del();

   e_configure_registry_item_del("advanced/conf");
   e_configure_registry_category_del("advanced");
   
   if (conf->cfd) e_object_del(E_OBJECT(conf->cfd));
   conf->cfd = NULL;
   
   e_gadcon_provider_unregister(&_gadcon_class);
   /* remove module-supplied menu additions */
   if (maug)
     {
	e_int_menus_menu_augmentation_del("config/0", maug);
	maug = NULL;
     }
   if (conf->aug)
     {
    e_int_menus_menu_augmentation_del("config/0", conf->aug);
    conf->aug = NULL;
    e_int_menus_menu_augmentation_point_disabled_set("config/1", 0);
     }
   /* remove module-supplied action */
   if (act)
     {
	e_action_predef_name_del(_("Launch"), _("Settings Panel"));
	e_action_del("configuration");
	act = NULL;
     }
   conf_module = NULL;
   
   E_FREE(conf);
   E_CONFIG_DD_FREE(conf_edd);
   
   return 1;
}

EAPI int
e_modapi_save(E_Module *m)
{
   e_config_domain_save("module.conf", conf_edd, conf);
   return 1;
}

/* action callback */
static void
_e_mod_action_conf_cb(E_Object *obj, const char *params)
{
   E_Zone *zone = NULL;

   if (obj)
     {
	if (obj->type == E_MANAGER_TYPE)
	  zone = e_util_zone_current_get((E_Manager *)obj);
	else if (obj->type == E_CONTAINER_TYPE)
	  zone = e_util_zone_current_get(((E_Container *)obj)->manager);
	else if (obj->type == E_ZONE_TYPE)
          zone = ((E_Zone *)obj);
	else
	  zone = e_util_zone_current_get(e_manager_current_get());
     }
   if (!zone) zone = e_util_zone_current_get(e_manager_current_get());
   if ((zone) && (params))
     e_configure_registry_call(params, zone->container, params);
   else if (zone)
     e_configure_show(zone->container);
}

/* menu item callback(s) */
static void 
_e_mod_conf_cb(void *data, E_Menu *m, E_Menu_Item *mi)
{
   e_configure_show(m->zone->container);
}

static void
_e_mod_mode_presentation_toggle(void *data __UNUSED__, E_Menu *m __UNUSED__, E_Menu_Item *mi)
{
   e_config->mode.presentation = !e_config->mode.presentation;
   e_menu_item_toggle_set(mi, e_config->mode.presentation);
   e_config_mode_changed();
   e_config_save_queue();
}

static void
_e_mod_mode_offline_toggle(void *data __UNUSED__, E_Menu *m __UNUSED__, E_Menu_Item *mi)
{
   e_config->mode.offline = !e_config->mode.offline;
   e_menu_item_toggle_set(mi, e_config->mode.offline);
   e_config_mode_changed();
   e_config_save_queue();
}

static void
_e_mod_submenu_modes_fill(void *data __UNUSED__, E_Menu *m)
{
   E_Menu_Item *mi;

   mi = e_menu_item_new(m);
   e_menu_item_check_set(mi, 1);
   e_menu_item_toggle_set(mi, e_config->mode.presentation);
   e_menu_item_label_set(mi, _("Presentation"));
   e_util_menu_item_theme_icon_set(mi, "preferences-modes-presentation");
   e_menu_item_callback_set(mi, _e_mod_mode_presentation_toggle, NULL);

   mi = e_menu_item_new(m);
   e_menu_item_check_set(mi, 1);
   e_menu_item_toggle_set(mi, e_config->mode.offline);
   e_menu_item_label_set(mi, _("Offline"));
   e_util_menu_item_theme_icon_set(mi, "preferences-modes-offline");
   e_menu_item_callback_set(mi, _e_mod_mode_offline_toggle, NULL);

   e_menu_pre_activate_callback_set(m, NULL, NULL);
}

static E_Menu *
_e_mod_submenu_modes_get(void)
{
   E_Menu *m = e_menu_new();

   if (!m) return NULL;
   e_menu_pre_activate_callback_set(m, _e_mod_submenu_modes_fill, NULL);
   return m;
}

/* menu item add hook */
static void
_e_mod_menu_add(void *data, E_Menu *m)
{
   E_Menu_Item *mi;

   mi = e_menu_item_new(m);
   e_menu_item_label_set(mi, _("Settings Panel"));
   e_util_menu_item_theme_icon_set(mi, "preferences-system");
   e_menu_item_callback_set(mi, _e_mod_conf_cb, NULL);

   mi = e_menu_item_new(m);
   e_menu_item_label_set(mi, _("Modes"));
   e_util_menu_item_theme_icon_set(mi, "preferences-modes");
   e_menu_item_submenu_set(mi, _e_mod_submenu_modes_get());
}

static void 
_conf_new(void) 
{
   char buf[128];

   conf = E_NEW(Config, 1);
   conf->version = (MOD_CONFIG_FILE_EPOCH << 16);

#define IFMODCFG(v) if ((conf->version & 0xffff) < v) {
#define IFMODCFGEND }

   IFMODCFG(0x008d);
   conf->menu_augmentation = 1;
   IFMODCFGEND;

   conf->version = MOD_CONFIG_FILE_VERSION;
   e_config_save_queue();
}

static void 
_conf_free(void) 
{
   E_FREE(conf);
}

static int 
_conf_timer(void *data) 
{
   e_util_dialog_show(_("Configuration Panel Configuration Updated"), data);
   return 0;
}