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

static Evas_List *event_handlers = NULL;
static Evas_List *drop_handlers = NULL;

static Ecore_X_Window drag_win;
static Ecore_Evas  *drag_ee = NULL;
static Evas_Object *drag_obj;

static int visible = 0;

static char *drag_type;
static void *drag_data;

#if 0
static int  drag;
static void (*drag_cb)(void *data, void *event);
static void *drag_cb_data;
#endif

static int  _e_dnd_cb_mouse_up(void *data, int type, void *event);
static int  _e_dnd_cb_mouse_move(void *data, int type, void *event);

int
e_dnd_init(void)
{
   Evas_List *l, *l2;
   E_Manager *man;
   E_Container *con;

   event_handlers = evas_list_append(event_handlers, ecore_event_handler_add(ECORE_X_EVENT_MOUSE_BUTTON_UP, _e_dnd_cb_mouse_up, NULL));
   event_handlers = evas_list_append(event_handlers, ecore_event_handler_add(ECORE_X_EVENT_MOUSE_MOVE, _e_dnd_cb_mouse_move, NULL));

   for (l = e_manager_list(); l; l = l->next)
     {
	man = l->data;

	for (l2 = man->containers; l2; l2 = l2->next)
	  {
	     con = l2->data;

#if 0
	     e_hints_window_visible_set(con->bg_win);
	     ecore_x_dnd_aware_set(con->bg_win, 1);
	     ecore_event_handler_add(ECORE_X_EVENT_XDND_DROP, _e_dnd_cb_event_dnd_drop , eb);
	     ecore_event_handler_add(ECORE_X_EVENT_XDND_POSITION, _e_dnd_cb_event_dnd_position, eb);
	     ecore_event_handler_add(ECORE_X_EVENT_SELECTION_NOTIFY, _e_dnd_cb_event_dnd_selection, eb);
#endif
	  }
     }
   return 1;
}

int
e_dnd_shutdown(void)
{
   Evas_List *l;
   
   for (l = event_handlers; l; l = l->next)
     {
	Ecore_Event_Handler *h;

	h = l->data;
	ecore_event_handler_del(h);
     }
   evas_list_free(event_handlers);
   event_handlers = NULL;

   for (l = drop_handlers; l; l = l->next)
     {
	E_Drop_Handler *h;

	h = l->data;
	e_drop_handler_del(h);
     }
   evas_list_free(drop_handlers);
   drop_handlers = NULL;

   return 1;
}

int
e_dnd_active(void)
{
   return (drag_win != 0);
}

void
e_drag_start(E_Zone *zone, const char *type, void *data,
	     const char *icon_path, const char *icon)
{
   int w, h;

   drag_win = ecore_x_window_input_new(zone->container->win, 
				       zone->x, zone->y,
				       zone->w, zone->h);
   ecore_x_window_show(drag_win);
   ecore_x_pointer_confine_grab(drag_win);
   ecore_x_keyboard_grab(drag_win);

   if (drag_ee)
     {
	e_canvas_del(drag_ee);
	ecore_evas_free(drag_ee);
     }

   drag_ee = ecore_evas_software_x11_new(NULL, zone->container->win,
					 0, 0, 10, 10);
   ecore_evas_override_set(drag_ee, 1);
   ecore_evas_software_x11_direct_resize_set(drag_ee, 1);
   ecore_evas_shaped_set(drag_ee, 1);
   e_canvas_add(drag_ee);
   ecore_evas_borderless_set(drag_ee, 1);

   drag_obj = edje_object_add(ecore_evas_get(drag_ee));
   edje_object_file_set(drag_obj, icon_path, icon);

   w = h = 24;
   evas_object_move(drag_obj, 0, 0);
   evas_object_resize(drag_obj, w, h);
   
   ecore_evas_resize(drag_ee, w, h);

   drag_type = strdup(type);
   drag_data = data;
}

void
e_drag_update(int x, int y)
{
   int w, h;

   if (!drag_ee) return;

   if (!visible)
     {
	evas_object_show(drag_obj);
	ecore_evas_show(drag_ee);
	ecore_evas_raise(drag_ee);
	visible = 1;
     }

   evas_object_geometry_get(drag_obj, NULL, NULL, &w, &h);
   ecore_evas_move(drag_ee, x - (w / 2), y - (h / 2));
}

void
e_drag_end(int x, int y)
{
   Evas_List *l;
   E_Drop_Event *ev;

   if (drag_obj)
     {
	evas_object_del(drag_obj);
	drag_obj = NULL;
     }
   if (drag_ee)
     {
	e_canvas_del(drag_ee);
	ecore_evas_free(drag_ee);
	drag_ee = NULL;
     }
   visible = 0;

   ecore_x_pointer_ungrab();
   ecore_x_keyboard_ungrab();
   ecore_x_window_del(drag_win);
   drag_win = 0;

   ev = E_NEW(E_Drop_Event, 1);
   if (!ev) goto end;
   ev->data = drag_data;
   ev->x = x;
   ev->y = y;

   for (l = drop_handlers; l; l = l->next)
     {
	E_Drop_Handler *h;

	h = l->data;
	
	if ((x >= h->x) && (x < h->x + h->w) && (y >= h->y) && (y < h->y + h->h)
	    && (!strcmp(h->type, drag_type)))
	  {
	     h->func(h->data, drag_type, ev);
	  }
     }

   free(ev);
end:
   free(drag_type);
   drag_type = NULL;
   drag_data = NULL;
}

#if 0
void
e_drag_callback_set(void *data, void (*func)(void *data, void *event))
{
   drag_cb = func;
   drag_cb_data = data;
} 
#endif

E_Drop_Handler *
e_drop_handler_add(void *data, void (*func)(void *data, const char *type, void *drop), const char *type, int x, int y, int w, int h)
{
   E_Drop_Handler *handler;

   handler = E_NEW(E_Drop_Handler, 1);
   if (!handler) return NULL;

   handler->data = data;
   handler->func = func;
   handler->type = strdup(type);
   handler->x = x;
   handler->y = y;
   handler->w = w;
   handler->h = h;

   drop_handlers = evas_list_append(drop_handlers, handler);

   return handler;
}

void
e_drop_handler_del(E_Drop_Handler *handler)
{
   free(handler->type);
   free(handler);
}

static int
_e_dnd_cb_mouse_up(void *data, int type, void *event)
{
   Ecore_X_Event_Mouse_Button_Up *ev;

   ev = event;
   if (ev->win != drag_win) return 1;

   e_drag_end(ev->x, ev->y);

#if 0
   if (drag_cb)
     {
	E_Drag_Event *e;
	
	e = E_NEW(E_Drag_Event, 1);
	if (e)
	  {
	     e->drag = drag;
	     e->x = ev->x;
	     e->y = ev->y;
	     (*drag_cb)(drag_cb_data, e);
	     drag_cb = NULL;
	     free(e);
	  }
     }
#endif

   return 1;
}

static int
_e_dnd_cb_mouse_move(void *data, int type, void *event)
{
   Ecore_X_Event_Mouse_Move *ev;

   ev = event;
   if (ev->win != drag_win) return 1;

   e_drag_update(ev->x, ev->y);
   return 1;
}