#include "ephoto.h"

/*Ephoto Main Global*/
Ephoto *em;

static Eina_List *_thumbs = NULL;
static Ecore_Timer *_thumb_gen_size_changed_timer = NULL;

/*Inline Callbacks*/
static void _ephoto_delete_main_window(void *data, Evas_Object *obj, void *event_info);
static void _ephoto_flow_browser_delete_cb(void *data, Evas_Object *obj, void *event_info);
static void _ephoto_thumb_browser_selected_cb(void *data, Evas_Object *obj, void *event_info);

/* Objects Callbacks */
static void 
_ephoto_flow_browser_delete_cb(void *data, Evas_Object *obj, void *event_info)
{
        em->thumb_browser = ephoto_thumb_browser_add(em->layout);
	elm_layout_content_set(em->layout, "ephoto.content.swallow", em->thumb_browser);
	evas_object_smart_callback_add(em->thumb_browser, 
				       "selected",
				       _ephoto_thumb_browser_selected_cb,
				       NULL);
	em->state = EPHOTO_STATE_THUMB;
	em->flow_browser = NULL;
}

static void 
_ephoto_thumb_browser_selected_cb(void *data, Evas_Object *obj, void *event_info)
{
        const char *file = event_info;

	em->flow_browser = ephoto_create_flow_browser(em->layout);
	ephoto_flow_browser_image_set(em->flow_browser, file);
	elm_layout_content_set(em->layout, "ephoto.content.swallow", em->flow_browser);
	evas_object_smart_callback_add(em->flow_browser, 
				       "delete,request",
				       _ephoto_flow_browser_delete_cb,
				       NULL);
	em->state = EPHOTO_STATE_FLOW;
}

/*Create the main ephoto window*/
void 
ephoto_create_main_window(const char *directory, const char *image)
{
        char current_directory[PATH_MAX];
        Ethumb_Client *client = elm_thumb_ethumb_client_get();

	em = calloc(1, sizeof(Ephoto));
        if (!ephoto_config_init(em))
          {
             _ephoto_delete_main_window(NULL, NULL, NULL);
             return;
          }

        if ((em->config->thumb_gen_size != 128) &&
            (em->config->thumb_gen_size != 256) &&
            (em->config->thumb_gen_size != 512))
          ephoto_thumb_size_set(em->config->thumb_size);
        else
          ethumb_client_size_set
            (client, em->config->thumb_gen_size, em->config->thumb_gen_size);

	/*Setup the main window*/
	em->win = elm_win_add(NULL, "ephoto", ELM_WIN_BASIC);
	elm_win_title_set(em->win, "Ephoto");

	evas_object_show(em->win);

	/*Callback to close the main window*/
	evas_object_smart_callback_add(em->win, "delete,request", 
					_ephoto_delete_main_window, NULL);

	/*Grab the main evas canvas we are working with*/
	em->e = evas_object_evas_get(em->win);

	/*Set a custom background for the window*/
	em->bg = elm_bg_add(em->win);
	elm_win_resize_object_add(em->win, em->bg);
	evas_object_size_hint_weight_set(em->bg, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
	evas_object_show(em->bg);

	/* Add the main layout to the window */
	em->layout = elm_layout_add(em->win);
	elm_layout_file_set(em->layout,
			    PACKAGE_DATA_DIR "/themes/default/ephoto.edj",
			    "ephoto/main/layout");
	elm_win_resize_object_add(em->win, em->layout);
	evas_object_size_hint_weight_set(em->layout, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
	evas_object_size_hint_fill_set(em->layout, EVAS_HINT_FILL, EVAS_HINT_FILL);
	evas_object_show(em->layout);


        /* Prepare the slideshow beforehand, in order
         * to obtain the list of transitions */
	ephoto_create_slideshow();

        if (!directory)
        {
                getcwd(current_directory, PATH_MAX);
        }

        if (!em->config->directory)
        {
                if (directory)
                        em->config->directory = eina_stringshare_add(directory);
                else
                        em->config->directory = eina_stringshare_add(current_directory);
        }
        else if (directory || !em->config->remember_directory)
        {
                if (directory)
                        eina_stringshare_replace(&em->config->directory,
                                                 directory);
                else
                        eina_stringshare_replace(&em->config->directory,
                                                 current_directory);
        }

	if (image)
	{
                em->flow_browser = ephoto_create_flow_browser(em->layout);
		ephoto_flow_browser_image_set(em->flow_browser, image);
		eina_stringshare_del(image);	
		elm_layout_content_set(em->layout, "ephoto.content.swallow", em->flow_browser);
		evas_object_smart_callback_add(em->flow_browser, 
					       "delete,request",
					       _ephoto_flow_browser_delete_cb,
					       NULL);
		em->state = EPHOTO_STATE_FLOW;
	}
	else
        {
                em->thumb_browser =  ephoto_thumb_browser_add(em->layout);
		elm_layout_content_set(em->layout, "ephoto.content.swallow", em->thumb_browser);
		evas_object_smart_callback_add(em->thumb_browser, 
					       "selected",
					       _ephoto_thumb_browser_selected_cb,
					       NULL);
		em->state = EPHOTO_STATE_THUMB;
	}

	evas_object_resize(em->win, 1024, 534);
}

/*Delete the main ephoto window*/
static void
_ephoto_delete_main_window(void *data, Evas_Object *obj, void *event_info)
{
        ephoto_config_save(em, EINA_TRUE);

        if (em->thumb_browser)
                evas_object_del(em->thumb_browser);
        if (em->flow_browser)
	        evas_object_del(em->flow_browser);

	evas_object_del(em->layout);
	evas_object_del(em->bg);
        ephoto_entries_free(em);
        ephoto_config_free(em);
	free(em);
	elm_exit();
}

static Eina_Bool
_thumb_gen_size_changed_timer_cb(void *data)
{
   const int gen_size = (long)data;
   Ethumb_Client *client;
   const Eina_List *l;
   Evas_Object *o;

   if (em->config->thumb_gen_size == gen_size) goto end;

   INF("thumbnail generation size changed from %d to %d",
       em->config->thumb_gen_size, gen_size);

   client = elm_thumb_ethumb_client_get();
   em->config->thumb_gen_size = gen_size;
   ethumb_client_size_set(client, gen_size, gen_size);

   EINA_LIST_FOREACH(_thumbs, l, o)
     {
        Ethumb_Thumb_Format format;
        format = (long)evas_object_data_get(o, "ephoto_format");
        ethumb_client_format_set(client, format);
        elm_thumb_reload(o);
     }

 end:
   _thumb_gen_size_changed_timer = NULL;
   return EINA_FALSE;
}

void
ephoto_thumb_size_set(int size)
{
   int gen_size;

   if (em->config->thumb_size != size)
     {
        INF("thumbnail display size changed from %d to %d",
            em->config->thumb_size, size);
        em->config->thumb_size = size;
        ephoto_config_save(em, EINA_FALSE);
     }

   if (size <= 128)      gen_size = 128;
   else if (size <= 256) gen_size = 256;
   else                  gen_size = 512;

   if (_thumb_gen_size_changed_timer)
     {
        ecore_timer_del(_thumb_gen_size_changed_timer);
        _thumb_gen_size_changed_timer = NULL;
     }

   _thumb_gen_size_changed_timer = ecore_timer_add
     (0.1, _thumb_gen_size_changed_timer_cb, (void*)(long)gen_size);
}

static void
_thumb_del(void *data, Evas *e, Evas_Object *o, void *event_info)
{
   _thumbs = eina_list_remove(_thumbs, o);
}

Evas_Object *
ephoto_thumb_add(Evas_Object *parent, const char *path)
{
   Evas_Object *o;

   EINA_SAFETY_ON_NULL_RETURN_VAL(parent, NULL);

   o = elm_thumb_add(parent);
   if (!o) return NULL;

   if (path) ephoto_thumb_path_set(o, path);
   elm_object_style_set(o, "noframe");
   _thumbs = eina_list_append(_thumbs, o);
   evas_object_event_callback_add(o, EVAS_CALLBACK_DEL, _thumb_del, NULL);
   return o;
}

void
ephoto_thumb_path_set(Evas_Object *o, const char *path)
{
   Ethumb_Thumb_Format format = ETHUMB_THUMB_FDO;
   const char *ext = strrchr(path, '.');
   if (ext)
     {
        ext++;
        if ((strcasecmp(ext, "jpg") == 0) ||
            (strcasecmp(ext, "jpeg") == 0))
          format = ETHUMB_THUMB_JPEG; /* faster! */
     }

   ethumb_client_format_set(elm_thumb_ethumb_client_get(), format);
   evas_object_data_set(o, "ephoto_format", (void*)(long)format);
   elm_thumb_file_set(o, path, NULL);
}

Ephoto_Entry *
ephoto_entry_new(const char *path, const char *label)
{
   Ephoto_Entry *entry;
   EINA_SAFETY_ON_NULL_RETURN_VAL(path, NULL);
   entry = calloc(1, sizeof(Ephoto_Entry));
   EINA_SAFETY_ON_NULL_RETURN_VAL(entry, NULL);
   entry->path = eina_stringshare_add(path);
   entry->basename = ecore_file_file_get(entry->path);
   entry->label = eina_stringshare_add(label);
   return entry;
}

void
ephoto_entry_free(Ephoto_Entry *entry)
{
   const char *s;
   EINA_SAFETY_ON_NULL_RETURN(entry);
   eina_stringshare_del(entry->path);
   eina_stringshare_del(entry->label);
   EINA_LIST_FREE(entry->dir_files, s) eina_stringshare_del(s);
   free(entry);
}

void
ephoto_entries_free(Ephoto *em)
{
   Ephoto_Entry *e;
   EINA_LIST_FREE(em->entries, e) ephoto_entry_free(e);
}