#include "e.h"
#include "e_mod_main.h"

/* TODO */
/* - mouse handlers
 * - keybinding configuration
 */

#define INPUTLEN 256
#define MATCH_LAG 0.15
#define INITIAL_MATCH_LAG 0.3

/* #undef DBG
 * #define DBG(...) ERR(__VA_ARGS__) */

static void _evry_matches_update(Evry_Selector *sel, int async);
static void _evry_plugin_action(Evry_Selector *sel, int finished);
static void _evry_plugin_select(Evry_State *s, Evry_Plugin *p);
static void _evry_plugin_list_insert(Evry_State *s, Evry_Plugin *p);
static int  _evry_backspace(Evry_Selector *sel);
static void _evry_update(Evry_Selector *sel, int fetch);
static void _evry_update_text_label(Evry_State *s);
static int  _evry_clear(Evry_Selector *sel);
static int  _evry_cb_update_timer(void *data);

static Evry_State *_evry_state_new(Evry_Selector *sel, Eina_List *plugins);
static void _evry_state_pop(Evry_Selector *sel);

static Evry_Selector *_evry_selector_new(Evry_Window *win, int type);
static void _evry_selector_free(Evry_Selector *sel);
static void _evry_selector_activate(Evry_Selector *sel);
static void _evry_selector_update(Evry_Selector *sel);
static int  _evry_selector_subjects_get(const char *plugin_name);
static int  _evry_selector_actions_get(Evry_Item *it);
static int  _evry_selector_objects_get(Evry_Action *act);
static void _evry_selector_update_actions(Evry_Selector *sel);
static void _evry_selector_item_update(Evry_Selector *sel);
static void _evry_selector_item_clear(Evry_Selector *sel);
static void _evry_selector_label_set(Evry_Selector *sel, const char *part, const char *label);
static void _evry_selector_signal_emit(Evry_Selector *sel, const char *msg);
static int  _evry_selectors_shift(int dir);;

static Evry_Window *_evry_window_new(E_Zone *zone);
static void _evry_window_free(Evry_Window *win);
static void _evry_list_win_show(void);
static void _evry_list_win_update(Evry_State *s);
static void _evry_list_win_clear(int hide);

static void _evry_view_clear(Evry_State *s);
static void _evry_view_update(Evry_State *s, Evry_Plugin *plugin);
static int  _evry_view_key_press(Evry_State *s, Ecore_Event_Key *ev);
static void _evry_view_show(Evry_View *v);
static void _evry_view_hide(Evry_View *v, int slide);

static void _evry_item_desel(Evry_State *s, Evry_Item *it);
static void _evry_item_sel(Evry_State *s, Evry_Item *it);

static int  _evry_cb_key_down(void *data, int type, void *event);
static int  _evry_cb_selection_notify(void *data, int type, void *event);
static int  _evry_cb_mouse(void *data, int type, void *event);

/* local subsystem globals */
static Evry_Window *win = NULL;
static Ecore_X_Window input_window = 0;

#define SUBJ_SEL win->selectors[0]
#define ACTN_SEL win->selectors[1]
#define OBJ_SEL  win->selectors[2]
#define CUR_SEL  win->selector

/* externally accessible functions */
int
evry_init(void)
{
   return 1;
}

int
evry_shutdown(void)
{
   evry_hide(0);

   return 1;
}

static int
_evry_aggregator_fetch(Evry_Selector *sel, const char *input)
{
   Evry_State *s = sel->state;

   if (!s)
     {
	sel->aggregator->finish(sel->aggregator);
	return 1;
     }

   if ((sel->aggregator->fetch(sel->aggregator, input)) &&
       (!eina_list_data_find(s->cur_plugins, sel->aggregator)))

     s->cur_plugins = eina_list_prepend(s->cur_plugins, sel->aggregator);

   sel->aggregator->state = s;

   return 1;
}

static int
_evry_cb_item_changed(void *data, int type, void *event)
{
   Evry_Event_Item_Changed *ev = event;
   Evry_Selector *sel;
   int i;

   for (i = 0; i < 3; i++)
     {
	sel = win->selectors[i];

	if (sel->state && sel->state->cur_item == ev->item)
	  {
	     _evry_selector_update(sel);
	     _evry_selector_update_actions(sel);
	     break;
	  }
     }

   return 1;
}

static int
_cb_show_timer(void *data)
{
   Evry_Window *win = data;
   Evry_Selector *sel = CUR_SEL;

   win->show_timer = NULL;

   if (evry_conf->views && sel->state)
     {
   	Evry_View *view =evry_conf->views->data;
   	Evry_State *s = sel->state;

	if (evry_conf->first_run)
	  {
	     evry_view_toggle(s, "?");
	     evry_conf->first_run = EINA_FALSE;
	  }
	else
	  {
	     s->view = view->create(view, s, win->o_main);
	     _evry_view_show(s->view);
	  }

	_evry_list_win_show();
     }

   return 0;
}

int
evry_show(E_Zone *zone, const char *params)
{
   E_OBJECT_CHECK_RETURN(zone, 0);
   E_OBJECT_TYPE_CHECK_RETURN(zone, E_ZONE_TYPE, 0);

   if (win)
     {
	Eina_List *l;
	Evry_Plugin *p;

	if (win->level > 0)
	  return 1;

	if (!(params) &&
	    (CUR_SEL == OBJ_SEL) &&
	    ((CUR_SEL)->state && (CUR_SEL)->state->cur_item))
	  {
	     _evry_selectors_shift(1);
	     return 1;
	  }

	if (!(params && eina_list_count((SUBJ_SEL)->states) == 1))
	  evry_hide(1);

	if (win && CUR_SEL && params)
	  {
	     EINA_LIST_FOREACH((SUBJ_SEL)->plugins, l, p)
	       if (!strcmp(params, p->name)) break;

	     _evry_plugin_select((CUR_SEL)->state, p);
	     _evry_selector_update(CUR_SEL);
	     _evry_view_update((CUR_SEL)->state, p);
	  }
	return 1;
     }

   input_window = ecore_x_window_input_new(zone->container->win, 0, 0, 1, 1);
   ecore_x_window_show(input_window);
   if (!e_grabinput_get(input_window, 0, input_window))
     return 0;

   ecore_x_sync();

   win = _evry_window_new(zone);
   if (!win)
     {
	ecore_x_window_free(input_window);
	input_window = 0;
	return 0;
     }

   win->visible = EINA_FALSE;

   evry_history_load();

   if (params)
     win->plugin_dedicated = EINA_TRUE;

   win->sel_list = E_NEW(Evry_Selector*, 4);
   win->sel_list[3] = NULL;
   win->selectors = win->sel_list;
   _evry_selector_new(win, EVRY_PLUGIN_SUBJECT);
   _evry_selector_new(win, EVRY_PLUGIN_ACTION);
   _evry_selector_new(win, EVRY_PLUGIN_OBJECT);

   win->handlers = eina_list_append
     (win->handlers, ecore_event_handler_add
      (ECORE_EVENT_KEY_DOWN,
       _evry_cb_key_down, NULL));

   win->handlers = eina_list_append
     (win->handlers, ecore_event_handler_add
      (ECORE_X_EVENT_SELECTION_NOTIFY,
       _evry_cb_selection_notify, win));

   win->handlers = eina_list_append
     (win->handlers, evry_event_handler_add
      (EVRY_EVENT_ITEM_CHANGED,
       _evry_cb_item_changed, NULL));

   win->handlers = eina_list_append
     (win->handlers, ecore_event_handler_add
      (ECORE_EVENT_MOUSE_BUTTON_DOWN,
       _evry_cb_mouse, win));

   win->handlers = eina_list_append
     (win->handlers, ecore_event_handler_add
      (ECORE_EVENT_MOUSE_BUTTON_UP,
       _evry_cb_mouse, win));

   win->handlers = eina_list_append
     (win->handlers, ecore_event_handler_add
      (ECORE_EVENT_MOUSE_MOVE,
       _evry_cb_mouse, win));

   win->handlers = eina_list_append
     (win->handlers, ecore_event_handler_add
      (ECORE_EVENT_MOUSE_WHEEL,
       _evry_cb_mouse, win));

   e_popup_layer_set(win->popup, 255);
   e_popup_show(win->popup);

   _evry_selector_subjects_get(params);
   _evry_selector_update(SUBJ_SEL);
   _evry_selector_activate(SUBJ_SEL);

   if (!evry_conf->hide_input)
     edje_object_signal_emit(win->o_main, "e,state,entry_show", "e");

   if (!evry_conf->hide_list)
     win->show_timer = ecore_timer_add(0.01, _cb_show_timer, win);

   return 1;
}

void
evry_hide(int clear)
{
   Ecore_Event_Handler *ev;
   int i;

   if (!win) return;

   if ((clear && CUR_SEL) &&
       ((eina_list_count((SUBJ_SEL)->states) > 1) ||
	(((SUBJ_SEL)->state) &&
	 ((SUBJ_SEL)->state->input[0]))))
     {
	int slide = 0;
	Evry_Selector *sel;
	Evry_State *s;

	if (CUR_SEL != SUBJ_SEL)
	  {
	     if (CUR_SEL == ACTN_SEL)
	       evry_selectors_switch(-1);
	     else if (CUR_SEL == OBJ_SEL)
	       evry_selectors_switch(1);
	  }

	/* just to be sure */
	CUR_SEL = SUBJ_SEL;

	while ((CUR_SEL)->states->next)
	  {
	     slide = 1;
	     _evry_state_pop(CUR_SEL);
	  }

	sel = CUR_SEL;
	s = sel->state;

	_evry_clear(sel);
	_evry_clear(sel);

	_evry_aggregator_fetch(sel, s->input);
	_evry_selector_update(sel);
	_evry_update_text_label(s);
	_evry_view_show(s->view);
	s->view->update(s->view, slide);

	return;
     }

   if (_evry_selectors_shift(-1))
     {
	return;
     }

   if (win->show_timer)
     ecore_timer_del(win->show_timer);

   win->visible = EINA_FALSE;

   for (i = 0; win->sel_list[i]; i++)
     _evry_selector_free(win->sel_list[i]);

   E_FREE(win->sel_list);

   EINA_LIST_FREE(win->handlers, ev)
     ecore_event_handler_del(ev);

   _evry_window_free(win);
   win = NULL;

   ecore_x_window_free(input_window);
   e_grabinput_release(input_window, input_window);
   input_window = 0;

   evry_history_unload();
}

static int
_evry_selectors_shift(int dir)
{
   if ((dir > 0) && (win->level == 0))
     {
	void *new_sel;
	Evry_Selector *sel;
	Evry_State *s;
	int i;

	for (i = 1; i < 3; i++)
	  _evry_selector_item_clear(win->selectors[i]);

	if (!(new_sel = realloc(win->sel_list, sizeof(Evry_Selector*) * 6)))
	  return 0;

	win->sel_list = new_sel;

	edje_object_signal_emit(win->o_main,
				"e,state,object_selector_hide", "e");

	win->sel_list[5] = NULL;
	win->selectors = win->sel_list + 2;
	_evry_selector_new(win, EVRY_PLUGIN_ACTION);
	_evry_selector_new(win, EVRY_PLUGIN_OBJECT);

	CUR_SEL = SUBJ_SEL;
	sel = CUR_SEL;

	_evry_selector_signal_emit(sel, "e,state,selected");

	_evry_selector_item_update(SUBJ_SEL);
	_evry_selector_item_update(ACTN_SEL);
	_evry_selector_item_update(OBJ_SEL);

	/* was checked before. anyway */
	if ((s = sel->state) && (s->cur_item))
	  _evry_selector_update_actions(sel);

	win->level++;

	return 1;
     }
   else if ((dir < 0) && (win->level > 0))
     {
	_evry_selector_item_clear(SUBJ_SEL);
	_evry_selector_free(ACTN_SEL);
	_evry_selector_free(OBJ_SEL);

	win->selectors = win->sel_list;
	win->sel_list[3] = NULL;
	CUR_SEL = NULL;

	edje_object_signal_emit(win->o_main,
				"e,state,object_selector_show", "e");
	_evry_selector_item_update(SUBJ_SEL);
	_evry_selector_item_update(ACTN_SEL);
	_evry_selector_item_update(OBJ_SEL);
	_evry_selector_activate(OBJ_SEL);

	win->level = 0;

	return 1;
     }

   return 0;
}

void
evry_clear_input(Evry_Plugin *p)
{
   Evry_State *s;

   if (!(s = p->state))
     return;

   if (s->selector != CUR_SEL) return;

   if (s->inp[0] != 0)
     {
	s->inp[0] = 0;
	s->input = s->inp;
     }

   _evry_update_text_label(s);
}

//#define CHECK_REFS

#ifdef CHECK_REFS
static int item_cnt = 0;
#endif

Evry_Item *
evry_item_new(Evry_Item *base, Evry_Plugin *p, const char *label,
	      Evas_Object *(*icon_get) (Evry_Item *it, Evas *e),
	      void (*cb_free) (Evry_Item *item))
{
   Evry_Item *it;
   if (base)
     {
	it = base;
     }
   else
     {
	it = E_NEW(Evry_Item, 1);
	if (!it) return NULL;
     }

   if (p && EVRY_ITEM(p)->subtype)
     it->type = EVRY_ITEM(p)->subtype;

   it->plugin = p;

   if (label) it->label = eina_stringshare_add(label);
   it->free = cb_free;
   it->icon_get = icon_get;

   it->ref = 1;

#ifdef CHECK_REFS
   item_cnt++;
   printf("%d, %d\t new : %s\n", it->ref, item_cnt, it->label);
#endif

   return it;
}

void
evry_item_free(Evry_Item *it)
{
   if (!it) return;

   it->ref--;

#ifdef CHECK_REFS
   printf("%d, %d\t unref: %s\n", it->ref, item_cnt - 1, it->label);
#endif

   if (it->ref > 0) return;

#ifdef CHECK_REFS
   item_cnt--;
#endif

   IF_RELEASE(it->label);
   IF_RELEASE(it->id);
   IF_RELEASE(it->context);
   IF_RELEASE(it->detail);
   IF_RELEASE(it->icon);

   if (it->free)
     it->free(it);
   else
     E_FREE(it);
}

void
evry_item_ref(Evry_Item *it)
{
   it->ref++;
#ifdef CHECK_REFS
   printf("%d, %d\t ref : %s\n", it->ref, item_cnt, it->label);
#endif

}

static int
_evry_timer_cb_actions_get(void *data)
{
   Evry_Item *it = data;
   Evry_Selector *sel = ACTN_SEL;
   Evry_State *s;

   sel->update_timer = NULL;

   _evry_selector_actions_get(it);
   _evry_selector_update(sel);

   if (CUR_SEL == sel && (CUR_SEL)->state)
     {
	s = sel->state;
	if (s->view)
	  s->view->update(s->view, 0);
	else
	  _evry_view_update(s, NULL);
     }

   return 0;
}

static void
_evry_selector_update_actions(Evry_Selector *sel)
{
   Evry_Item *it = sel->state->cur_item;
   sel = ACTN_SEL;
   if (sel->update_timer)
     ecore_timer_del(sel->update_timer);

   sel->update_timer = ecore_timer_add(0.1, _evry_timer_cb_actions_get, it);
}

void
evry_item_select(const Evry_State *state, Evry_Item *it)
{
   Evry_State *s = (Evry_State *)state;
   Evry_Selector *sel;

   if (!s) return;

   sel = s->selector;
   s->plugin_auto_selected = EINA_FALSE;
   s->item_auto_selected = EINA_FALSE;

   _evry_item_sel(s, it);

   if (s == sel->state)
     {
	_evry_selector_update(sel);
	if (CUR_SEL ==  SUBJ_SEL)
	  _evry_selector_update_actions(sel);
     }
}

void
evry_item_mark(const Evry_State *state, Evry_Item *it, Eina_Bool mark)
{
   Evry_State *s = (Evry_State *)state;

   if (mark && !it->marked)
     {
	it->marked = EINA_TRUE;
	s->sel_items = eina_list_append(s->sel_items, it);
     }
   else if (it->marked)
     {
	it->marked = EINA_FALSE;
	s->sel_items = eina_list_remove(s->sel_items, it);
     }
}

int
evry_list_win_show(void)
{
   if (win->visible) return 0;

   _evry_list_win_show();
   return 1;
}

void
evry_list_win_hide(void)
{
   _evry_list_win_clear(1);
}

void
evry_plugin_update(Evry_Plugin *p, int action)
{
   Evry_State *s;
   Evry_Selector *sel;

   if (!win) return;

   if (!(s = p->state))
     return;

   if (!(sel = s->selector))
     return;

   DBG("update %d %d %s", s->request, p->request, p->name);

   if (s->request != p->request)
     return;

   if (action == EVRY_UPDATE_ADD)
     {
	if (!p->items && !s->trigger_active)
	  {
	     /* remove plugin */
	     if (!eina_list_data_find(s->cur_plugins, p)) return;

	     s->cur_plugins = eina_list_remove(s->cur_plugins, p);

	     if (s->plugin == p)
	       _evry_plugin_select(s, NULL);
	  }
	else
	  {
	     /* add plugin to current plugins*/
	     _evry_plugin_list_insert(s, p);

	     if (!s->plugin || !eina_list_data_find_list(s->cur_plugins, s->plugin))
	       _evry_plugin_select(s, NULL);
	  }

	if (s->sel_items)
	  eina_list_free(s->sel_items);
	s->sel_items = NULL;

	_evry_aggregator_fetch(sel, s->input);

	/* plugin is visible */
	if ((sel->state == s) &&
	    ((s->plugin == p) ||
	     (s->plugin == sel->aggregator)))
	  {
	     _evry_selector_update(sel);
	     _evry_view_update(s, NULL);
	  }

	/* switch back to subject selector when no current items */
	if ((sel == SUBJ_SEL) &&
	    (!(s->plugin) || !(s->plugin->items)) &&
	    (CUR_SEL == ACTN_SEL))
	  {
	     evry_selectors_switch(-1);
	     _evry_clear(SUBJ_SEL);
	  }
     }
   else if (action == EVRY_UPDATE_REFRESH)
     {
	_evry_view_clear(s);
	_evry_view_update(s, NULL);
     }
}


/* local subsystem functions */

static void
_evry_list_win_show(void)
{
   if (win->visible) return;

   win->visible = EINA_TRUE;
   _evry_list_win_update((CUR_SEL)->state);

   edje_object_signal_emit(win->o_main, "e,state,list_show", "e");
   edje_object_signal_emit(win->o_main, "e,state,entry_show", "e");
}

static void
_evry_list_win_clear(int hide)
{
   Evry_Selector *sel = CUR_SEL;

   if (!win->visible) return;

   if (sel->state)
     _evry_view_clear(sel->state);

   if (hide)
     {
	win->visible = EINA_FALSE;
	edje_object_signal_emit(win->o_main, "e,state,list_hide", "e");

	if (evry_conf->hide_input && (!(sel->state) || (sel->state->input[0])))
	  edje_object_signal_emit(win->o_main, "e,state,entry_hide", "e");
     }
}

static Evry_Window *
_evry_window_new(E_Zone *zone)
{
   int x, y, mw, mh;
   Evry_Window *win;
   E_Popup *popup;
   Evas_Object *o;
   const char *tmp;
   int offset_s = 0;

   popup = e_popup_new(zone, 0, 0, 1, 1);
   if (!popup) return NULL;

   win = E_NEW(Evry_Window, 1);
   if (!win)
     {
	e_object_del(E_OBJECT(popup));
	return NULL;
     }

   win->popup = popup;

   o = edje_object_add(popup->evas);
   win->o_main = o;
   e_theme_edje_object_set(o, "base/theme/everything",
			   "e/modules/everything/main");

   if (e_config->use_composite)
     {
	edje_object_signal_emit(o, "e,state,composited", "e");
	edje_object_message_signal_process(o);
	edje_object_calc_force(o);

	tmp = edje_object_data_get(o, "shadow_offset");
	offset_s = tmp ? atoi(tmp) : 0;
     }

   edje_object_size_min_calc(o, &mw, &mh);

   evry_conf->min_w = mw;
   if (evry_conf->width > mw)
     mw = evry_conf->width;

   evry_conf->min_h = mh;
   if (evry_conf->height > mh)
     mh = evry_conf->height;

   mw += offset_s*2;
   mh += offset_s*2;
   x = (zone->w * evry_conf->rel_x) - (mw / 2);
   y = (zone->h * evry_conf->rel_y) - (mh / 2);

   e_popup_move_resize(popup, x, y, mw, mh);

   o = win->o_main;
   e_popup_edje_bg_object_set(win->popup, o);
   evas_object_move(o, 0, 0);
   evas_object_resize(o, mw, mh);
   evas_object_show(o);

   ecore_x_netwm_window_type_set(popup->evas_win, ECORE_X_WINDOW_TYPE_UTILITY);

   evas_event_feed_mouse_in(win->popup->evas, ecore_x_current_time_get(), NULL);
   evas_event_feed_mouse_move(win->popup->evas, -1000000, -1000000, ecore_x_current_time_get(), NULL);

   return win;
}

static void
_evry_cb_drag_finished(E_Drag *drag, int dropped)
{
   E_FREE(drag->data);
}

static int
_evry_cb_mouse(void *data, int type, void *event)
{
   Ecore_Event_Mouse_Button *ev;
   E_Popup *pop;

   ev = event;
   if (ev->window != input_window) return 1;

   pop = win->popup;

   if (type == ECORE_EVENT_MOUSE_MOVE)
     {
	Ecore_Event_Mouse_Move *ev = event;
	Evry_State *s;

	if ((win->mouse_button == 3) &&
	    (s = (CUR_SEL)->state) && (s->cur_item) &&
	    (CHECK_TYPE(s->cur_item, EVRY_TYPE_FILE)) &&
	    (!E_INSIDE(ev->x, ev->y, pop->x + pop->zone->x,
		       pop->y + pop->zone->y, pop->w, pop->h)))
	  {
	     const char *drag_types[] = { "text/uri-list" };
	     E_Drag *d;
	     Evas_Object *o;
	     const char *uri;
	     int s_len, sel_length = 0;
	     char *tmp, *sel = NULL;

	     GET_FILE(file, s->cur_item);

	     if (!(uri = evry_file_url_get(file)))
	       return 1;

	     s_len = strlen(uri);
	     if (!(tmp = realloc(sel, sel_length + s_len + 2 + 1)))
	       return 1;
	     sel = tmp;
	     memcpy(sel + sel_length, uri, s_len);
	     memcpy(sel + sel_length + s_len, "\r\n", 2);
	     sel_length += s_len + 2;

	     d = e_drag_new(e_container_current_get(e_manager_current_get()),
			    ev->x, ev->y, drag_types, 1, sel, sel_length, NULL, _evry_cb_drag_finished);
	     e_drag_resize(d, 128, 128);
	     o = evry_util_icon_get(s->cur_item, e_drag_evas_get(d));
	     e_drag_object_set(d, o);
	     e_drag_xdnd_start(d, ev->x, ev->y);

	     evry_hide(0);
	     return 1;
	  }

	evas_event_feed_mouse_move
	  (pop->evas,
	   ev->x - pop->x + pop->zone->x,
	   ev->y - pop->y + pop->zone->y,
	   ev->timestamp, NULL);
     }
   else if (type == ECORE_EVENT_MOUSE_BUTTON_DOWN)
     {
	win->mouse_out = 0;

	/* XXX shift triple click in flags when needed */
	if (!E_INSIDE(ev->x, ev->y, pop->x + pop->zone->x,
		      pop->y + pop->zone->y, pop->w, pop->h))
	  {
	     win->mouse_out = 1;
	     return 1;
	  }

	win->mouse_button = ev->buttons;

	evas_event_feed_mouse_down
	  (pop->evas,
	   ev->buttons, ev->double_click,
	   ev->timestamp, NULL);
     }
   else if (type == ECORE_EVENT_MOUSE_BUTTON_UP)
     {
	win->mouse_button = 0;

	if (win->mouse_out &&
	    !E_INSIDE(ev->x, ev->y, pop->x + pop->zone->x,
		      pop->y + pop->zone->y, pop->w, pop->h))
	  {
	     evry_hide(0);
	     return 1;
	  }

	evas_event_feed_mouse_up
	  (pop->evas,
	   ev->buttons, ev->double_click,
	   ev->timestamp, NULL);
     }
   else if (type == ECORE_EVENT_MOUSE_WHEEL)
     {
	Ecore_Event_Mouse_Wheel *ev = event;

	evas_event_feed_mouse_wheel
	  (pop->evas, 0, ev->z, ev->timestamp, NULL);
     }

   return 1;
}

static void
_evry_window_free(Evry_Window *win)
{
   e_popup_hide(win->popup);
   evas_event_freeze(win->popup->evas);
   evas_object_del(win->o_main);
   e_object_del(E_OBJECT(win->popup));
   E_FREE(win);
}

static void
_evry_selector_cb_down(void *data, Evas *e, Evas_Object *obj, void *event_info)
{
   Evas_Event_Mouse_Down *ev = event_info;
   /* Evry_Selector *sel = data; */

   if (ev->button == 1)
     {
	if (ev->flags & EVAS_BUTTON_DOUBLE_CLICK)
	  evry_plugin_action(1);
     }
}

static void
_evry_selector_cb_wheel(void *data, Evas *e, Evas_Object *obj, void *event_info)
{
   Evas_Event_Mouse_Wheel *ev = event_info;

   if (ev->z > 0)
     {
	/* FIXME dont loose selector 2 state until state 0 changed: */
	if (CUR_SEL != OBJ_SEL)
	  evry_selectors_switch(1);
     }
   else if (ev->z < 0)
     {
	evry_selectors_switch(-1);
     }
}

static void
_evry_selector_cb_up(void *data, Evas *e, Evas_Object *obj, void *event_info)
{
   Evas_Event_Mouse_Up *ev = event_info;
   Evry_Selector *sel = data;

   if (sel == CUR_SEL)
     return;

   if (ev->button == 3)
     {
	evry_plugin_action(0);
     }
   else if (ev->button == 1)
     {
	if (sel == SUBJ_SEL)
	  {
	     if (CUR_SEL == ACTN_SEL)
	       evry_selectors_switch(-1);
	     else
	       evry_selectors_switch(1);
	  }

	else if (sel == ACTN_SEL)
	  {
	     if (CUR_SEL == SUBJ_SEL)
	       evry_selectors_switch(1);
	     else
	       evry_selectors_switch(-1);
	  }
	else if (sel == OBJ_SEL)
	  {
	     if (CUR_SEL == ACTN_SEL)
	       evry_selectors_switch(1);
	  }
     }
}

static Evry_Selector *
_evry_selector_new(Evry_Window *win, int type)
{
   Plugin_Config *pc;
   Eina_List *l, *pcs;
   Evry_Selector *sel = E_NEW(Evry_Selector, 1);
   Evas_Object *o = NULL;

   sel->aggregator = evry_aggregator_new(win, type);

   if (type == EVRY_PLUGIN_SUBJECT)
     {
	sel->actions = evry_plug_actions_new(sel, type);
	pcs = evry_conf->conf_subjects;
	o = edje_object_part_swallow_get(win->o_main, "subject_selector");
     }
   else if (type == EVRY_PLUGIN_ACTION)
     {
	sel->actions = evry_plug_actions_new(sel, type);
	pcs = evry_conf->conf_actions;
	o = edje_object_part_swallow_get(win->o_main, "action_selector");
     }
   else if (type == EVRY_PLUGIN_OBJECT)
     {
	pcs = evry_conf->conf_objects;
	o = edje_object_part_swallow_get(win->o_main, "object_selector");
     }

   if (o)
     {
	evas_object_event_callback_add(o, EVAS_CALLBACK_MOUSE_DOWN,
				       _evry_selector_cb_down, sel);
	evas_object_event_callback_add(o, EVAS_CALLBACK_MOUSE_UP,
				       _evry_selector_cb_up, sel);
	evas_object_event_callback_add(o, EVAS_CALLBACK_MOUSE_WHEEL,
				       _evry_selector_cb_wheel, sel);
     }

   EINA_LIST_FOREACH(pcs, l, pc)
     {
	if (!pc->enabled && !win->plugin_dedicated) continue;
	if (!pc->plugin) continue;
	if (pc->plugin == sel->aggregator) continue;
	sel->plugins = eina_list_append(sel->plugins, pc->plugin);
     }

   win->selectors[type] = sel;

   return sel;
}

static void
_evry_selector_free(Evry_Selector *sel)
{
   _evry_selector_item_clear(sel);

   if (win->visible && (sel == CUR_SEL))
     _evry_view_clear(sel->state);

   while (sel->states)
     _evry_state_pop(sel);

   EVRY_PLUGIN_FREE(sel->aggregator);
   EVRY_PLUGIN_FREE(sel->actions);

   if (sel->plugins) eina_list_free(sel->plugins);

   if (sel->update_timer)
     ecore_timer_del(sel->update_timer);

   E_FREE(sel);
}

static void
_evry_selector_signal_emit(Evry_Selector *sel, const char *msg)
{
   char buf[1024];
   if (sel == SUBJ_SEL)
     snprintf(buf, sizeof(buf), "subject_selector:%s", msg);
   else if (sel == ACTN_SEL)
     snprintf(buf, sizeof(buf), "action_selector:%s", msg);
   else if (sel == OBJ_SEL)
     snprintf(buf, sizeof(buf), "object_selector:%s", msg);

   edje_object_signal_emit(win->o_main, buf, "e");
}

static void
_evry_selector_label_set(Evry_Selector *sel, const char *part, const char *label)
{
   char buf[1024];
   if (sel == SUBJ_SEL)
     snprintf(buf, sizeof(buf), "subject_selector:%s", part);
   else if (sel == ACTN_SEL)
     snprintf(buf, sizeof(buf), "action_selector:%s", part);
   else if (sel == OBJ_SEL)
     snprintf(buf, sizeof(buf), "object_selector:%s", part);

   edje_object_part_text_set(win->o_main, buf, label);
}

static void
_evry_selector_activate(Evry_Selector *sel)
{
   Evry_State *s;

   if (CUR_SEL)
     {
	Evry_Selector *cur = CUR_SEL;
	_evry_selector_signal_emit(cur, "e,state,unselected");

	if (cur->state && cur->state->view)
	  _evry_view_hide(cur->state->view, 0);

	_evry_list_win_clear(evry_conf->hide_list);
     }

   if (!sel)
     {
	ERR("selector == NULL");
	return;
     }

   CUR_SEL = sel;

   _evry_selector_signal_emit(sel, "e,state,selected");

   if ((s = sel->state))
     {
	_evry_update_text_label(s);

	if (s->cur_item)
	  _evry_selector_label_set(sel, "e.text.plugin",
				   EVRY_ITEM(s->cur_item->plugin)->label);
	_evry_view_show(s->view);
	_evry_list_win_update(s);
     }
}

static void
_evry_selector_thumb_gen(void *data, Evas_Object *obj, void *event_info)
{
   Evas_Coord w, h;
   Evry_Selector *sel = data;

   if (sel->o_icon)
     {
       evas_object_del(sel->o_icon);
       sel->o_icon = NULL;
     }

   e_icon_size_get(sel->o_thumb, &w, &h);
   edje_extern_object_aspect_set(sel->o_thumb, EDJE_ASPECT_CONTROL_BOTH, w, h);

   if (sel == SUBJ_SEL)
     edje_object_part_swallow(win->o_main, "subject_selector:e.swallow.thumb", sel->o_thumb);
   else if (sel == ACTN_SEL)
     edje_object_part_swallow(win->o_main, "action_selector:e.swallow.thumb", sel->o_thumb);
   else if (sel == OBJ_SEL)
     edje_object_part_swallow(win->o_main, "object_selector:e.swallow.thumb", sel->o_thumb);

   evas_object_show(sel->o_thumb);
   _evry_selector_signal_emit(sel, "e,action,thumb,show");
   /* edje_object_signal_emit(sel->o_main, "e,action,thumb,show", "e"); */
   sel->do_thumb = EINA_FALSE;
}

static int
_evry_selector_thumb(Evry_Selector *sel, const Evry_Item *it)
{
   /* Evas_Coord w, h; */
   char *suffix = NULL;

   if (sel->do_thumb)
     e_thumb_icon_end(sel->o_thumb);

   if (sel->o_thumb)
     evas_object_del(sel->o_thumb);
   sel->o_thumb = NULL;

   if (it->type != EVRY_TYPE_FILE) return 0;

   GET_FILE(file, it);

   if (!file->mime)
     return 0;

   if (!(evry_file_path_get(file)))
     return 0;

   if ((!strncmp(file->mime, "image/", 6)) ||
       ((suffix = strrchr(file->path, '.')) && (!strncmp(suffix, ".edj", 4))))
     {
   	sel->o_thumb = e_thumb_icon_add(win->popup->evas);
   	evas_object_smart_callback_add(sel->o_thumb, "e_thumb_gen",
				       _evry_selector_thumb_gen, sel);
   	/* edje_object_part_geometry_get(sel->o_main, "e.swallow.thumb",
	 * 			      NULL, NULL, &w, &h); */
	if (suffix)
	  e_thumb_icon_file_set(sel->o_thumb, file->path, "e/desktop/background");
	else
	  e_thumb_icon_file_set(sel->o_thumb, file->path, NULL);
   	e_thumb_icon_size_set(sel->o_thumb, 128, 128);
   	e_thumb_icon_begin(sel->o_thumb);
   	sel->do_thumb = EINA_TRUE;
   	return 1;
     }

   return 0;
}

static void
_evry_selector_item_clear(Evry_Selector *sel)
{
   if (sel->o_icon)
     {
	evas_object_del(sel->o_icon);
	sel->o_icon = NULL;
     }

   if (sel->o_thumb)
     {
	if (sel->do_thumb)
	  e_thumb_icon_end(sel->o_thumb);

	evas_object_del(sel->o_thumb);
	sel->o_thumb = NULL;
     }
}

static void
_evry_selector_item_update(Evry_Selector *sel)
{
   Evry_State *s = sel->state;
   Evry_Item *it = NULL;
   Evas_Object *o = NULL;

   _evry_selector_item_clear(sel);

   if (!(s) || !(s->cur_item))
     {
	/* no items for this state - clear selector */
	_evry_selector_label_set(sel, "e.text.label","");

	if (sel == CUR_SEL && s && s->plugin)
	  _evry_selector_label_set(sel, "e.text.plugin",
				   EVRY_ITEM(s->plugin)->label);
	else
	  _evry_selector_label_set(sel, "e.text.plugin", "");

	if (!s) return;
     }

   if ((it = s->cur_item))
     {
	_evry_selector_label_set(sel, "e.text.label", it->label);

	_evry_selector_label_set(sel, "e.text.plugin",
				 EVRY_ITEM(it->plugin)->label);

	if (!_evry_selector_thumb(sel, it))
	  {
	     o = evry_util_icon_get(it, win->popup->evas);

	     if (!o && it->plugin)
	       o = evry_util_icon_get(EVRY_ITEM(it->plugin), win->popup->evas);
	  }
     }

   if (!(o) && (s->plugin && (EVRY_ITEM(s->plugin)->icon)))
     {
	o = evry_icon_theme_get(EVRY_ITEM(s->plugin)->icon, win->popup->evas);
     }

   if (o)
     {
	if (sel == SUBJ_SEL)
	  edje_object_part_swallow(win->o_main, "subject_selector:e.swallow.icons", o);
	else if (sel == ACTN_SEL)
	  edje_object_part_swallow(win->o_main, "action_selector:e.swallow.icons", o);
	else if (sel == OBJ_SEL)
	  edje_object_part_swallow(win->o_main, "object_selector:e.swallow.icons", o);

	evas_object_show(o);
	sel->o_icon = o;
     }
}

static void
_evry_selector_update(Evry_Selector *sel)
{
   Evry_State *s = sel->state;
   Evry_Item *it = NULL;
   Eina_Bool item_changed = EINA_FALSE;

   DBG("%p", sel);

   if (s)
     {
	it = s->cur_item;

	if (!s->plugin && it)
	  _evry_item_desel(s, NULL);
	else if (it && !eina_list_data_find_list(s->plugin->items, it))
	  _evry_item_desel(s, NULL);

	it = s->cur_item;

	if (s->plugin && (!it || s->item_auto_selected))
	  {
	     it = NULL;

	     /* get first item */
	     if (!it && s->plugin->items)
	       {
		  it = s->plugin->items->data;
	       }

	     if (it)
	       {
		  s->item_auto_selected = EINA_TRUE;
		  _evry_item_sel(s, it);
	       }
	     item_changed = EINA_TRUE;
	  }
     }

   _evry_selector_item_update(sel);

   if (sel == SUBJ_SEL)
     {
	if (item_changed)
	  {
	     _evry_selector_update_actions(sel);
	  }
	else
	  {
	     sel = ACTN_SEL;
	     if (sel->update_timer)
	       ecore_timer_del(sel->update_timer);
	     sel->update_timer = NULL;
	  }
     }
}

static void
_evry_list_win_update(Evry_State *s)
{
   if (s != (CUR_SEL)->state) return;
   if (!win->visible) return;

   /* if (s->changed) */
   _evry_view_update(s, s->plugin);
}

static int
_evry_selector_subjects_get(const char *plugin_name)
{
   Eina_List *l, *plugins = NULL;
   Evry_Plugin *p, *pp;
   Evry_Selector *sel = SUBJ_SEL;

   EINA_LIST_FOREACH(sel->plugins, l, p)
     {
	if (plugin_name && strcmp(plugin_name, p->name))
	  continue;

	/* if (!p->config->top_level)
	 *   continue; */

	if (p->begin && (pp = p->begin(p, NULL)))
	  plugins = eina_list_append(plugins, pp);

	if (!p->begin)
	  plugins = eina_list_append(plugins, p);
     }

   if (!plugins) return 0;

   _evry_state_new(sel, plugins);

   EINA_LIST_FOREACH(plugins, l, p)
     p->state = sel->state;

   _evry_matches_update(sel, 1);

   return 1;
}

static int
_evry_selector_actions_get(Evry_Item *it)
{
   Eina_List *l, *plugins = NULL;
   Evry_Plugin *p, *pp;
   Evry_Selector *sel = ACTN_SEL;

   while (sel->state)
     _evry_state_pop(sel);

   if (!it) return 0;

   EINA_LIST_FOREACH(sel->plugins, l, p)
     {
	/* if (!p->config->top_level)
	 *   continue; */

	if (p->begin && (pp = p->begin(p, it)))
	  plugins = eina_list_append(plugins, pp);
     }

   if (!plugins) return 0;

   _evry_state_new(sel, plugins);

   EINA_LIST_FOREACH(plugins, l, p)
     p->state = sel->state;

   _evry_matches_update(sel, 1);

   return 1;
}

/* find plugins that provide the second item required for an action */
static int
_evry_selector_objects_get(Evry_Action *act)
{
   Eina_List *l, *plugins = NULL;
   Evry_Plugin *p, *pp;
   Evry_Selector *sel = OBJ_SEL;
   Evry_Item *it;

   while (sel->state)
     _evry_state_pop(sel);

   it = (ACTN_SEL)->state->cur_item;

   EINA_LIST_FOREACH(sel->plugins, l, p)
     {
	DBG("p %s %d %d\n", p->name, EVRY_ITEM(p)->subtype, act->it2.type);

	/* if (!p->config->top_level)
	 *   continue; */

	if (!CHECK_SUBTYPE(p, act->it2.type))
	  continue;

	if (p->begin && (pp = p->begin(p, it)))
	  plugins = eina_list_append(plugins, pp);

	if (!p->begin)
	  plugins = eina_list_append(plugins, p);
     }

   if (!plugins) return 0;

   _evry_state_new(sel, plugins);
   EINA_LIST_FOREACH(plugins, l, p)
     p->state = sel->state;

   _evry_matches_update(sel, 1);

   return 1;
}

static Evry_State *
_evry_state_new(Evry_Selector *sel, Eina_List *plugins)
{
   Evry_State *s = E_NEW(Evry_State, 1);
   s->inp = malloc(INPUTLEN);
   s->inp[0] = 0;
   s->input = s->inp;
   s->plugins = plugins;
   s->selector = sel;

   sel->states = eina_list_prepend(sel->states, s);
   sel->state = s;

   return s;
}

static void
_evry_state_pop(Evry_Selector *sel)
{
   Evry_Plugin *p;
   Evry_State *s;
   Evry_State *prev = NULL;

   s = sel->state;

   _evry_item_desel(s, NULL);

   free(s->inp);

   if (s->view)
     s->view->destroy(s->view);

   if (s->sel_items)
     eina_list_free(s->sel_items);

   sel->states = eina_list_remove_list(sel->states, sel->states);

   if (sel->states)
     prev = sel->states->data;

   EINA_LIST_FREE(s->plugins, p)
     {
	/* skip non top-level plugins */
	if (prev && eina_list_data_find(prev->plugins, p))
	  {
	     p->state = prev;
	     continue;
	  }

       p->finish(p);
     }


   E_FREE(s);

   sel->state = prev;
}

int
evry_state_push(Evry_Selector *sel, Eina_List *plugins)
{
   Evry_State *s, *new_state;
   Eina_List *l;
   Evry_Plugin *p, *pp;
   Evry_View *view = NULL;
   int browse_aggregator = 0;

   s = sel->state;

   if (!(new_state = _evry_state_new(sel, plugins)))
     {
	DBG("no new state");
	return 0;
     }

   EINA_LIST_FOREACH(plugins, l, p)
     p->state = new_state;

   if (s && s->view)
     {
	_evry_view_hide(s->view, 1);
	view = s->view;
     }

   _evry_matches_update(sel, 1);
   s = new_state;

   _evry_selector_update(sel);

   if (view && win->visible)
     {
	s->view = view->create(view, s, win->o_main);
	if (s->view)
	  {
	     _evry_view_show(s->view);
	     s->view->update(s->view, -1);
	  }
     }

   _evry_update_text_label(sel->state);

   return 1;
}

int
evry_browse_item(Evry_Item *it)
{
   Evry_State *s, *new_state;
   Evry_Selector *sel;
   Eina_List *l, *plugins = NULL;
   Evry_Plugin *p, *pp;
   Evry_View *view = NULL;
   int browse_aggregator = 0;

   if (!(it) || !(it->plugin) || !(it->browseable))
     {
	DBG("no item");
	return 0;
     }

   if (!(s = it->plugin->state))
     {
	DBG("no state");
	return 0;
     }

   sel = s->selector;

   EINA_LIST_FOREACH(sel->plugins, l, p)
     {
	if ((p->browse) && (pp = p->browse(p, it)))
	  {
	     plugins = eina_list_append(plugins, pp);
	  }
     }

   /* actions */
   if ((!(plugins) && (it->plugin->browse)) &&
       (pp = it->plugin->browse(it->plugin, it)))
     {
	plugins = eina_list_append(plugins, pp);
     }

   /* aggregator */
   if (!(plugins) && CHECK_TYPE(it, EVRY_TYPE_PLUGIN))
     {
	browse_aggregator = 1;
	plugins = eina_list_append(plugins, it);
     }

   if (!(plugins))
     {
	DBG("no plugins");
	return 0;
     }

   if (!(new_state = _evry_state_new(sel, plugins)))
     {
	DBG("no new state");
	return 0;
     }

   EINA_LIST_FOREACH(plugins, l, p)
     p->state = new_state;

   if (s->view)
     {
	_evry_view_hide(s->view, 1);
	view = s->view;
     }

   if (browse_aggregator)
     {
	strncpy(new_state->input, s->input, INPUTLEN);

	evry_history_item_add(it, NULL, NULL);

	s = new_state;
	EVRY_PLUGIN(it)->state = s;
	s->cur_plugins = eina_list_append(s->cur_plugins, it);
	_evry_plugin_select(s, EVRY_PLUGIN(it));
     }
   else
     {
	if (it->plugin->history)
	  evry_history_item_add(it, NULL, s->input);

	_evry_matches_update(sel, 1);
	s = new_state;
     }

   _evry_selector_update(sel);

   if (view && win->visible)
     {
	s->view = view->create(view, s, win->o_main);
	if (s->view)
	  {
	     _evry_view_show(s->view);
	     s->view->update(s->view, -1);
	  }
     }

   _evry_update_text_label(sel->state);

   return 1;
}

int
evry_browse_back(Evry_Selector *sel)
{
   if (!sel) sel = CUR_SEL;
   Evry_State *s = sel->state;

   DBG("%p", sel);

   if (!s || !sel->states->next)
     return 0;

   _evry_state_pop(sel);

   s = sel->state;
   _evry_aggregator_fetch(sel, s->input);
   _evry_selector_update(sel);
   if (sel == SUBJ_SEL)
     _evry_selector_update_actions(sel);
   _evry_update_text_label(s);
   _evry_view_show(s->view);
   s->view->update(s->view, 1);

   return 1;
}

void
evry_selectors_switch(int dir)
{
   Evry_State *s = (CUR_SEL)->state;

   if (win->show_timer)
     _cb_show_timer(NULL);

   if ((CUR_SEL)->update_timer)
     {
	if ((CUR_SEL == SUBJ_SEL) || (CUR_SEL == ACTN_SEL))
	  {
	     _evry_matches_update(CUR_SEL, 0);
	     _evry_selector_update(CUR_SEL);
	  }
     }

   if (CUR_SEL == SUBJ_SEL && dir > 0)
     {
	if (s->cur_item)
	  _evry_selector_activate(ACTN_SEL);
     }
   else if (CUR_SEL == ACTN_SEL && dir > 0)
     {
	int next_selector = 0;
	Evry_Item *it;

	if (s && (it = s->cur_item) &&
	    (it->plugin == (CUR_SEL)->actions))
	  {
	     GET_ACTION(act,it);
	     if (act->it2.type)
	       {
		  _evry_selector_objects_get(act);
		  _evry_selector_update(OBJ_SEL);
		  edje_object_signal_emit
		    (win->o_main, "e,state,object_selector_show", "e");
		  next_selector = 2;
	       }
	  }
	_evry_selector_activate(win->selectors[next_selector]);
     }
   else if (CUR_SEL == ACTN_SEL && dir < 0)
     {
	_evry_selector_activate(SUBJ_SEL);
	edje_object_signal_emit(win->o_main, "e,state,object_selector_hide", "e");
     }
   else if (CUR_SEL == OBJ_SEL && dir > 0)
     {
	while ((CUR_SEL)->states)
	  _evry_state_pop(CUR_SEL);

	edje_object_signal_emit(win->o_main, "e,state,object_selector_hide", "e");
	_evry_selector_activate(SUBJ_SEL);
     }
   else if (CUR_SEL == OBJ_SEL && dir < 0)
     {
	_evry_selector_activate(ACTN_SEL);
     }
}
static int
_evry_input_complete(Evry_State *s)
{
   int action = 0;
   char *input = NULL;
   Evry_Item *it = s->cur_item;

   if (!it) return 0;

   evry_item_ref(it);

   s->item_auto_selected = EINA_FALSE;

   if (it->plugin->complete)
     action = it->plugin->complete(it->plugin, it, &input);
   else
     evry_browse_item(it);

   if (input && action == EVRY_COMPLETE_INPUT)
     {
	strncpy(s->input, input, INPUTLEN - 1);
	_evry_update_text_label(s);
	_evry_cb_update_timer(CUR_SEL);
	evry_item_select(s, it);
     }

   evry_item_free(it);
   E_FREE(input);

   return 1;
}

static int
_evry_cheat_history(Evry_State *s, int promote, int delete)
{

   History_Entry *he;
   History_Item *hi;
   History_Types *ht;
   Eina_List *l, *ll;
   Evry_Item *it = s->cur_item;

   if (!it) return 0;

   if (!(ht = evry_history_types_get(it->type)))
     return 1;

   if (!(he = eina_hash_find(ht->types, (it->id ? it->id : it->label))))
     return 1;

   EINA_LIST_FOREACH_SAFE(he->items, l, ll, hi)
     {
	if (hi->plugin != it->plugin->name)
	  continue;

	if (delete)
	  {
	     if (hi->input)
	       eina_stringshare_del(hi->input);
	     if (hi->plugin)
	       eina_stringshare_del(hi->plugin);
	     if (hi->context)
	       eina_stringshare_del(hi->context);
	     E_FREE(hi);

	     he->items = eina_list_remove_list(he->items, l);
	  }
	else if (promote)
	  {
	     hi->count += 5;
	     hi->last_used = ecore_time_get();
	  }
	else /* demote */
	  {
	     hi->count -= 5;
	     if (hi->count < 0) hi->count = 1;
	  }
     }
   if (s->plugin == s->selector->aggregator)
     _evry_aggregator_fetch(s->selector, s->input);
   if (s->view)
     s->view->update(s->view, 0);

   return 1;
}

static int
_evry_cb_key_down(void *data __UNUSED__, int type __UNUSED__, void *event)
{
   Ecore_Event_Key *ev = event;
   Evry_State *s;
   Evry_Selector *sel;
   const char *old;

   if (ev->event_window != input_window)
     return 1;

   if (!strcmp(ev->key, "Escape"))
     {
	evry_hide(0);
	return 1;
     }
   else if (ev->modifiers)
     {
	E_Action *act;
	Eina_List *l;
	E_Config_Binding_Key *bind;
	E_Binding_Modifier mod;

	for (l = e_config->key_bindings; l; l = l->next)
	  {
	     bind = l->data;

	     if (bind->action && strcmp(bind->action, "everything")) continue;

	     mod = 0;

	     if (ev->modifiers & ECORE_EVENT_MODIFIER_SHIFT)
	       mod |= E_BINDING_MODIFIER_SHIFT;
	     if (ev->modifiers & ECORE_EVENT_MODIFIER_CTRL)
	       mod |= E_BINDING_MODIFIER_CTRL;
	     if (ev->modifiers & ECORE_EVENT_MODIFIER_ALT)
	       mod |= E_BINDING_MODIFIER_ALT;
	     if (ev->modifiers & ECORE_EVENT_MODIFIER_WIN)
	       mod |= E_BINDING_MODIFIER_WIN;

	     if (bind->key && (!strcmp(bind->key, ev->keyname)) &&
		 ((bind->modifiers == mod) || (bind->any_mod)))
	       {
		  if (!(act = e_action_find(bind->action))) continue;

		  if (!act->func.go) continue;

		  act->func.go(E_OBJECT(win->popup->zone), bind->params);
		  return 1;
	       }
	  }
     }

   old = ev->key;
   win->request_selection = EINA_FALSE;

   if (!strcmp(ev->key, "KP_Enter"))
     {
	ev->key = "Return";
     }
   else if (ev->modifiers & ECORE_EVENT_MODIFIER_ALT)
     {
	if (!strcmp(ev->key, "Tab"))
	  {
	     ev->key = "Down";
	  }
	else if (!strcmp(ev->key, "ISO_Left_Tab") || (!strcmp(ev->key, "Tab") &&
		  (ev->modifiers & ECORE_EVENT_MODIFIER_SHIFT)))
	  {
	     ev->key = "Up";
	     ev->modifiers = 0;
	  }
	else if (!strcmp(ev->key, "q"))
	  {
	     evry_hide(0);
	     return 1;
	  }
	else if (!strcmp(ev->key, "w"))
	  {
	     ev->key = "Return";
	     ev->modifiers = 0;
	  }
	else if (evry_conf->quick_nav == 1)
	  {
	     if (!strcmp(ev->key, "k") || (!strcmp(ev->key, "K")))
	       ev->key = "Up";
	     else if (!strcmp(ev->key, "j") || (!strcmp(ev->key, "J")))
	       ev->key = "Down";
	     else if (!strcmp(ev->key, "n") || (!strcmp(ev->key, "N")))
	       ev->key = "Next";
	     else if (!strcmp(ev->key, "p") || (!strcmp(ev->key, "P")))
	       ev->key = "Prior";
	     else if (!strcmp(ev->key, "l") || (!strcmp(ev->key, "L")))
	       ev->key = "Right";
	     else if (!strcmp(ev->key, "h") || (!strcmp(ev->key, "H")))
	       ev->key = "Left";
	     else if (!strcmp(ev->key, "i") || (!strcmp(ev->key, "I")))
	       ev->key = "Tab";
	     else if (!strcmp(ev->key, "m") || (!strcmp(ev->key, "M")))
	       ev->key = "Return";
	  }
	else if (evry_conf->quick_nav == 3)
	  {
	     if (!strcmp(ev->key, "p") || (!strcmp(ev->key, "P")))
	       ev->key = "Up";
	     else if (!strcmp(ev->key, "n") || (!strcmp(ev->key, "N")))
	       ev->key = "Down";
	     else if (!strcmp(ev->key, "f") || (!strcmp(ev->key, "F")))
	       ev->key = "Right";
	     else if (!strcmp(ev->key, "b") || (!strcmp(ev->key, "B")))
	       ev->key = "Left";
	     else if (!strcmp(ev->key, "i") || (!strcmp(ev->key, "I")))
	       ev->key = "Tab";
	     else if (!strcmp(ev->key, "m") || (!strcmp(ev->key, "M")))
	       ev->key = "Return";
	  }
     }

   if (!win || !(sel = CUR_SEL))
     goto end;

   if (!strcmp(ev->key, "Tab") &&
       !((ev->modifiers & ECORE_EVENT_MODIFIER_CTRL) ||
	 (ev->modifiers & ECORE_EVENT_MODIFIER_SHIFT)))
     {
	evry_selectors_switch(1);
	goto end;
     }

   if (!(s = sel->state))
     goto end;

   if (!win->visible && (!strcmp(ev->key, "Down")))
     {
	_evry_list_win_show();
	goto end;
     }
   else if ((!strcmp(ev->key, "ISO_Left_Tab") ||
	     (((ev->modifiers & ECORE_EVENT_MODIFIER_CTRL) ||
	       (ev->modifiers & ECORE_EVENT_MODIFIER_SHIFT)) &&
	      (!strcmp(ev->key, "Tab")))))
     {
	_evry_input_complete(s);
	goto end;
     }
   else if ((ev->modifiers & ECORE_EVENT_MODIFIER_CTRL) &&
   	    (!strcmp(ev->key, "Delete") || !strcmp(ev->key, "Insert")))
     {
	int delete = (!strcmp(ev->key, "Delete") &&
		      (ev->modifiers & ECORE_EVENT_MODIFIER_SHIFT));
   	int promote = (!strcmp(ev->key, "Insert"));

	_evry_cheat_history(s, promote, delete);
	goto end;
     }
   else if (ev->modifiers & ECORE_EVENT_MODIFIER_CTRL)
     {
	if (!strcmp(ev->key, "u"))
	  {
	     if (!_evry_clear(sel))
	       evry_browse_back(sel);
	     goto end;
	  }
	else if (!strcmp(ev->key, "1"))
	  evry_view_toggle(s, NULL);
	else if (!strcmp(ev->key, "Return"))
	  _evry_plugin_action(sel, 0);
	else if (!strcmp(ev->key, "v"))
	  {
	     win->request_selection = EINA_TRUE;
	     ecore_x_selection_primary_request
	       (win->popup->evas_win, ECORE_X_SELECTION_TARGET_UTF8_STRING);
	  }
	else
	  {
	     _evry_view_key_press(s, ev);
	  }
	goto end;
     }
   /* let plugin intercept keypress */
   if (s->plugin && s->plugin->cb_key_down &&
       s->plugin->cb_key_down(s->plugin, ev))
     goto end;
   /* let view intercept keypress */
   else if (_evry_view_key_press(s, ev))
     goto end;
   else if (!strcmp(ev->key, "Right"))
     {
	if (!evry_browse_item(sel->state->cur_item) &&
	    (sel != OBJ_SEL))
	  evry_selectors_switch(1);
     }
   else if (!strcmp(ev->key, "Left"))
     {
	if (!evry_browse_back(sel))
	  evry_selectors_switch(-1);
     }
   else if (!strcmp(ev->key, "Return"))
     {
	if (ev->modifiers & ECORE_EVENT_MODIFIER_SHIFT)
	  _evry_plugin_action(sel, 0);
	else
	  _evry_plugin_action(sel, 1);
     }
   else if (!strcmp(ev->key, "BackSpace"))
     {
	if (!_evry_backspace(sel))
	  evry_browse_back(sel);
     }
   else if (_evry_view_key_press(s, ev))
     goto end;
   else if ((ev->compose && !(ev->modifiers & ECORE_EVENT_MODIFIER_ALT)))
     {
	int len = strlen(s->inp);

	if (len == 0 && (evry_view_toggle(s, ev->compose)))
	  goto end;

	if (len < (INPUTLEN - strlen(ev->compose)))
	  {
	     strcat(s->inp, ev->compose);

	     _evry_update(sel, 1);
	  }
     }

 end:
   ev->key = old;
   return 1;
}

static int
_evry_backspace(Evry_Selector *sel)
{
   Evry_State *s = sel->state;
   int len, val, pos;

   len = strlen(s->inp);
   if (len == 0)
     return 0;

   pos = evas_string_char_prev_get(s->inp, len, &val);
   if ((pos < len) && (pos >= 0))
     {
	val = *(s->inp + pos);

	s->inp[pos] = 0;

	if (s->trigger_active && s->inp[0] != 0)
	  s->input = s->inp + 1;
	else
	  s->input = s->inp;

	if ((pos == 0) || !isspace(val))
	  _evry_update(sel, 1);

	return 1;
     }

   return 0;
}

static void
_evry_update_text_label(Evry_State *s)
{
   if (!win->visible && evry_conf->hide_input)
     {
	if (strlen(s->inp) > 0)
	  edje_object_signal_emit(win->o_main, "e,state,entry_show", "e");
	else
	  edje_object_signal_emit(win->o_main, "e,state,entry_hide", "e");
     }

   edje_object_part_text_set(win->o_main, "e.text.label", s->inp);
}

static void
_evry_update(Evry_Selector *sel, int fetch)
{
   Evry_State *s = sel->state;

   _evry_update_text_label(s);

   if (fetch)
     {
	if (sel->update_timer)
	  ecore_timer_del(sel->update_timer);

	sel->update_timer =
	  ecore_timer_add(MATCH_LAG, _evry_cb_update_timer, sel);

	edje_object_signal_emit(win->o_main, "e,signal,update", "e");
     }
}

static int
_evry_cb_update_timer(void *data)
{
   Evry_Selector *sel = data;

   _evry_matches_update(sel, 1);
   _evry_selector_update(sel);
   _evry_list_win_update(sel->state);
   sel->update_timer = NULL;

   return 0;
}

static int
_evry_clear(Evry_Selector *sel)
{
   Evry_State *s = sel->state;

   if (!(s->inp) || (s->inp[0] == 0))
     return 0;

   if (s->trigger_active && s->inp[1] != 0)
     {
	s->inp[1] = 0;
	s->input = s->inp + 1;
     }
   else
     {
	s->inp[0] = 0;
	s->input = s->inp;
     }

   _evry_update(sel, 1);

   if (!win->visible && evry_conf->hide_input)
     edje_object_signal_emit(win->o_main, "e,state,entry_hide", "e");

   return 1;
}

static void
_evry_cb_free_action_performed(void *data, void *event)
{
   Evry_Event_Action_Performed *ev = event;

   if (ev->it1)
     EVRY_ITEM_FREE(ev->it1);
   if (ev->it2)
     EVRY_ITEM_FREE(ev->it2);

   IF_RELEASE(ev->action);

   E_FREE(ev);
}

static int
_evry_action_do(Evry_Action *act)
{
   Evry_Event_Action_Performed *ev;

   if (act->action(act))
     {
	ev = E_NEW(Evry_Event_Action_Performed, 1);
	ev->action = eina_stringshare_ref(act->name);
	ev->it1 = act->it1.item;
	ev->it2 = act->it2.item;

	if (ev->it1)
	  EVRY_ITEM_REF(ev->it1);
	if (ev->it2)
	  EVRY_ITEM_REF(ev->it2);

	ecore_event_add(_evry_events[EVRY_EVENT_ACTION_PERFORMED], ev,
			_evry_cb_free_action_performed, NULL);
	return 1;
     }
   return 0;
}

void
evry_plugin_action(int finished)
{
   _evry_plugin_action(CUR_SEL, finished);
}

static void
_evry_plugin_action(Evry_Selector *sel, int finished)
{
   Evry_State *s_subj, *s_act, *s_obj = NULL;
   Evry_Item *it, *it_subj, *it_act, *it_obj = NULL;
   Eina_List *l;

   if ((SUBJ_SEL)->update_timer)
     {
	_evry_matches_update(SUBJ_SEL, 0);
	_evry_selector_update(SUBJ_SEL);
     }

   if (!(s_subj = (SUBJ_SEL)->state))
     return;

   if (!(it_subj = s_subj->cur_item))
     return;

   if (CUR_SEL == SUBJ_SEL &&
       (ACTN_SEL)->update_timer)
     {
	_evry_selector_actions_get(it_subj);

	if (!(ACTN_SEL)->state)
	  return;

	_evry_selector_update(ACTN_SEL);
     }

   if (!(s_act = (ACTN_SEL)->state))
     return;

   if (!(it_act = s_act->cur_item))
     return;

   if (CHECK_TYPE(it_act, EVRY_TYPE_ACTION) ||
       CHECK_SUBTYPE(it_act, EVRY_TYPE_ACTION))
     {
	GET_ACTION(act, it_act);

	if (!act->action)
	  return;

	/* get object item for action, when required */
	if (act->it2.type)
	  {
	     /* check if object is provided */
	     if ((s_obj = (OBJ_SEL)->state))
	       {
		  it_obj = s_obj->cur_item;
	       }

	     if (!it_obj)
	       {
		  if (ACTN_SEL == CUR_SEL)
		    evry_selectors_switch(1);
		  return;
	       }

	     act->it2.item = it_obj;
	  }

	if (s_obj && s_obj->sel_items  && !(act->it2.accept_list))
	  {
	     if (!(act->it1.item && CHECK_TYPE(act->it1.item, EVRY_TYPE_PLUGIN)))
	       act->it1.item = it_subj;

	     EINA_LIST_FOREACH(s_obj->sel_items, l, it)
	       {
		  if (it->type != act->it2.type)
		    continue;
		  act->it2.item = it;

		  _evry_action_do(act);
	       }
	  }
	else if (s_subj->sel_items && !(act->it1.accept_list))
	  {
	     EINA_LIST_FOREACH(s_subj->sel_items, l, it)
	       {
		  if (it->type != act->it1.type)
		    continue;
		  act->it1.item = it;

		  _evry_action_do(act);
	       }
	  }
	else
	  {
	     if (!(act->it1.item && CHECK_TYPE(act->it1.item, EVRY_TYPE_PLUGIN)))
	       {
		  act->it1.item = it_subj;
		  act->it1.items = s_subj->sel_items;
	       }

	     if (s_obj)
	       act->it2.items = s_obj->sel_items;

	     if (!_evry_action_do(act))
	       return;
	  }
     }
   else return;

   if (s_subj && it_subj && it_subj->plugin->history)
     evry_history_item_add(it_subj, NULL, s_subj->input);

   if (s_act && it_act && it_act->plugin->history)
     evry_history_item_add(it_act, it_subj->context, s_act->input);

   if (s_obj && it_obj && it_obj->plugin->history)
     evry_history_item_add(it_obj, it_act->context, s_obj->input);

   if (finished)
     evry_hide(0);
}

static void
_evry_view_show(Evry_View *v)
{
   if (!v) return;

   if (v->o_list)
     {
	edje_object_part_swallow(win->o_main, "e.swallow.list", v->o_list);
	evas_object_show(v->o_list);
     }

   if (v->o_bar)
     {
	edje_object_part_swallow(win->o_main, "e.swallow.bar", v->o_bar);
	evas_object_show(v->o_bar);
     }
}

static void
_evry_view_hide(Evry_View *v, int slide)
{
   if (!v) return;

   v->clear(v, slide);

   if (v->o_list)
     {
	edje_object_part_unswallow(win->o_main, v->o_list);
	evas_object_hide(v->o_list);
     }

   if (v->o_bar)
     {
	edje_object_part_unswallow(win->o_main, v->o_bar);
	evas_object_hide(v->o_bar);
     }
}

static void
_evry_view_update(Evry_State *s, Evry_Plugin *p)
{
   if (!win->visible) return;

   if (!s->view)
     {
	Evry_View *view = evry_conf->views->data;
	s->view = view->create(view, s, win->o_main);
	_evry_view_show(s->view);
     }

   if (s->view)
     s->view->update(s->view, 0);
}

static void
_evry_view_clear(Evry_State *s)
{
   if (!s || !s->view) return;

   s->view->clear(s->view, 0);
}

static int
_evry_view_key_press(Evry_State *s, Ecore_Event_Key *ev)
{
   if (!s || !s->view || !s->view->cb_key_down) return 0;

   return s->view->cb_key_down(s->view, ev);
}

int
evry_view_toggle(Evry_State *s, const char *trigger)
{
   Evry_View *view, *v = NULL;
   Eina_List *l, *ll;
   Eina_Bool triggered = FALSE;

   if (trigger)
     {
	EINA_LIST_FOREACH(evry_conf->views, ll, view)
	  {
	     if (view->trigger && !strncmp(trigger, view->trigger, 1) &&
		 (!s->view || (view->id != s->view->id)) &&
		 (v = view->create(view, s, win->o_main)))
	       {
		  triggered = EINA_TRUE;
		  goto found;
	       }
	  }
     }
   else
     {
	if (s->view)
	  l = eina_list_data_find_list(evry_conf->views, s->view->id);
	else
	  {
	     view = evry_conf->views->data;
	     v = view->create(view, s, win->o_main);
	     goto found;
	  }

	if (l && l->next)
	  l = l->next;
	else
	  l = evry_conf->views;

	EINA_LIST_FOREACH(l, ll, view)
	  {
	     if ((!view->trigger) &&
		 ((!s->view || (view->id != s->view->id)) &&
		  (v = view->create(view, s, win->o_main))))
	       goto found;
	  }
     }

 found:
   if (!v) return 0;

   _evry_list_win_show();

   if (s->view)
     {
	_evry_view_hide(s->view, 0);
	s->view->destroy(s->view);
     }

   s->view = v;
   _evry_view_show(s->view);
   view->update(s->view, 0);

   return triggered;
}

static void
_evry_matches_update(Evry_Selector *sel, int async)
{
   Evry_State *s = sel->state;
   Evry_Plugin *p;
   Eina_List *l;
   Evry_Item *it;
   const char *input = NULL;
   int len_inp = 0;

   s->changed = 1;
   s->request++;

   if (s->inp[0])
     {
	len_inp = strlen(s->inp);
	input = s->inp;
     }

   if (s->sel_items)
     eina_list_free(s->sel_items);
   s->sel_items = NULL;

   if ((!input || !s->trigger_active) &&
       (!win->plugin_dedicated))
     {
   	EINA_LIST_FREE(s->cur_plugins, p);
   	s->trigger_active = EINA_FALSE;
     }

   if (s->trigger_active)
     {
	EINA_LIST_FOREACH(s->cur_plugins, l, p)
	  {
	     p->request = s->request;
	     p->fetch(p, s->input);
	  }
     }

   /* check if input matches plugin trigger */
   if (!s->cur_plugins && input)
     {
	int len_trigger = 0;

	EINA_LIST_FOREACH(s->plugins, l, p)
	  {
	     if (!p->config->trigger) continue;
	     int len = strlen(p->config->trigger);

	     if (len_trigger && len != len_trigger)
	       continue;

	     if ((len_inp >= len) &&
		 (!strncmp(s->inp, p->config->trigger, len)))
	       {
		  len_trigger = len;
		  s->cur_plugins = eina_list_append(s->cur_plugins, p);
		  p->request = s->request;
		  if(len_inp == len)
		    p->fetch(p, NULL);
		  else
		    p->fetch(p, s->input + len);
	       }
	  }
	if (s->cur_plugins)
	  {
	     s->trigger_active = EINA_TRUE;
	     /* replace trigger with indicator */
	     if (len_trigger > 1)
	       {
		  s->inp[0] = '>';

		  if (s->inp + len_trigger)
		    strcpy(s->inp + 1, s->inp + len_trigger);
		  else
		    s->inp[1] = 0;
	       }
	     s->input = s->inp + 1;
	     _evry_update_text_label(s);
	  }
     }

   if (!s->cur_plugins)
     {
	EINA_LIST_FOREACH(s->plugins, l, p)
	  {
	    if (!sel->states->next)
	      {
		 /* skip plugins in toplevel which trigger-only */
		 if ((sel == SUBJ_SEL) &&
		     (p->config->top_level) &&
		     (p->config->trigger) &&
		     (p->config->trigger_only))
		   continue;

		 /* skip non-toplevel plugins when input < min_query */
		 if ((!p->config->top_level) &&
		     (p->config->min_query > len_inp))
		   continue;
	      }

	     /* dont wait for async plugin. use their current items */
	     if (!async && p->async_fetch && p->items)
	       {
		  s->cur_plugins = eina_list_append(s->cur_plugins, p);
		  continue;
	       }

	     p->request = s->request;

	     if ((p->fetch(p, input)) || (sel->states->next))
	       {
		  s->cur_plugins = eina_list_append(s->cur_plugins, p);
	       }
	  }
     }

   _evry_aggregator_fetch(sel, input);

   if (s->plugin_auto_selected ||
       (s->plugin && (!eina_list_data_find(s->cur_plugins, s->plugin))))
     _evry_plugin_select(s, NULL);
   else
     _evry_plugin_select(s, s->plugin);

   if (sel->update_timer)
     ecore_timer_del(sel->update_timer);
   sel->update_timer = NULL;

   if (s->plugin)
     {
	EINA_LIST_FOREACH(s->plugin->items, l, it)
	  if (it->marked)
	    s->sel_items = eina_list_append(s->sel_items, it);
     }
}

static void
_evry_item_desel(Evry_State *s, Evry_Item *it)
{
   if (!it)
     it = s->cur_item;

   if (s->cur_item)
     {
	it->selected = EINA_FALSE;
	evry_item_free(it);
     }

   s->cur_item = NULL;
}

static void
_evry_item_sel(Evry_State *s, Evry_Item *it)
{
   if (s->cur_item == it) return;

   _evry_item_desel(s, NULL);

   evry_item_ref(it);
   it->selected = EINA_TRUE;

   s->cur_item = it;
}

static void
_evry_plugin_select(Evry_State *s, Evry_Plugin *p)
{
   if (!s || !s->cur_plugins) return;

   if (p) s->plugin_auto_selected = EINA_FALSE;

   if (!p && s->cur_plugins)
     {
	p = s->cur_plugins->data;
	s->plugin_auto_selected = EINA_TRUE;
     }

   if (s->plugin != p)
     _evry_item_desel(s, NULL);

   s->plugin = p;
}

void
evry_plugin_select(Evry_Plugin *p)
{
   if (!p) return;

   _evry_plugin_select(p->state, p);

   _evry_selector_update(p->state->selector);
}

static void
_evry_plugin_list_insert(Evry_State *s, Evry_Plugin *p)
{
   Eina_List *l;
   Evry_Plugin *plugin;

   EINA_LIST_FOREACH(s->cur_plugins, l, plugin)
     if (p == plugin)
       return;
     else
       if (p->config->priority < plugin->config->priority)
       break;

   if (l)
     s->cur_plugins = eina_list_prepend_relative_list(s->cur_plugins, p, l);
   else
     s->cur_plugins = eina_list_append(s->cur_plugins, p);
}

static int
_evry_cb_selection_notify(void *data, int type, void *event)
{
   Ecore_X_Event_Selection_Notify *ev;
   /* FIXME Evry_Selector *sel = data; */
   Evry_State *s = (CUR_SEL)->state;

   if (!s || (data != win)) return 1;
   if (!win->request_selection) return 1;

   win->request_selection = EINA_FALSE;

   ev = event;
   if ((ev->selection == ECORE_X_SELECTION_CLIPBOARD) ||
       (ev->selection == ECORE_X_SELECTION_PRIMARY))
     {
	if (strcmp(ev->target, ECORE_X_SELECTION_TARGET_UTF8_STRING) == 0)
	  {
	     Ecore_X_Selection_Data_Text *text_data;

	     text_data = ev->data;

	     strncat(s->input, text_data->text, (INPUTLEN - strlen(s->input)) - 1);
	     _evry_update(CUR_SEL, 1);
	  }
     }

   return 1;
}