#include "entrance_client.h"

typedef struct Entrance_Int_Conf_User_
{
   Entrance_Login *orig;
   struct
     {
        const char *path;
        const char *group;
     } bg;
   struct
     {
        const char *path;
        const char *group;
     } image;
   const char *lsess;
   Eina_Bool remember_session : 1;
   Eina_Bool update : 1;
} Entrance_Int_Conf_User;


static void _entrance_conf_user_bg_sel(void *data, Evas_Object *obj, void *event_info);
static Eina_Bool _entrance_conf_user_bg_fill_cb(void *data, Elm_Object_Item *it);
static char *_entrance_conf_session_text_get(void *data, Evas_Object *obj, const char *part);
static Evas_Object *_entrance_conf_session_content_get(void *data, Evas_Object *obj, const char *part);
static Eina_Bool _entrance_conf_session_state_get(void *data, Evas_Object *obj, const char *part);
static void _entrance_conf_session_del(void *data, Evas_Object *obj);
static Evas_Object *_entrance_conf_user_build(Evas_Object *obj);
static void _entrance_conf_user_build_cb(Evas_Object *t, Entrance_Login *eu);
static Eina_Bool _entrance_conf_user_check(void);
static void _entrance_conf_user_apply(void);

static Entrance_Fill *_entrance_session_fill = NULL;
static Entrance_Int_Conf_User *_entrance_int_conf_user = NULL;

static void
_entrance_conf_user_bg_sel(void *data EINA_UNUSED, Evas_Object *obj EINA_UNUSED, void *event_info)
{
   Entrance_Conf_Background *cbg;
   cbg = elm_object_item_data_get(event_info);
   _entrance_int_conf_user->bg.path = cbg->path;
   _entrance_int_conf_user->bg.group = cbg->group;
   entrance_conf_changed();
}

static void
_entrance_conf_user_icon_sel(void *data EINA_UNUSED, Evas_Object *obj EINA_UNUSED, void *event_info)
{
   Entrance_Conf_Background *cbg;
   cbg = elm_object_item_data_get(event_info);
   _entrance_int_conf_user->image.path = cbg->path;
   _entrance_int_conf_user->image.group = cbg->group;
   entrance_conf_changed();
}

static Eina_Bool
_entrance_conf_user_bg_fill_cb(void *data, Elm_Object_Item *it)
{
   Entrance_Conf_Background *cbg;
   const char *bg_path, *bg_group;
   cbg = data;

   bg_path = _entrance_int_conf_user->bg.path;
   bg_group = _entrance_int_conf_user->bg.group;
   if (((cbg->path) && (bg_path)
         && (!strcmp(cbg->path, bg_path))) ||
       ((!cbg->path) && (!bg_path)))
     {
        if  (((cbg->group) && (bg_group)
              && (!strcmp(cbg->group, bg_group))) ||
            ((!cbg->group) && (!bg_group)))
          {
             elm_gengrid_item_selected_set(it, EINA_TRUE);
             return EINA_TRUE;
          }
     }
   return EINA_FALSE;
}

static Eina_Bool
_entrance_conf_user_icon_fill_cb(void *data, Elm_Object_Item *it)
{
   Entrance_Conf_Background *cbg;
   const char *bg_path, *bg_group;
   Eina_Bool tmp_icon;
   cbg = data;
   tmp_icon = _entrance_int_conf_user->orig->tmp_icon;
   bg_path = _entrance_int_conf_user->orig->image.path;
   bg_group = _entrance_int_conf_user->orig->image.group;
   if (((cbg->path) && (bg_path)
         && (!strcmp(cbg->path, bg_path)) && !tmp_icon)
       || ((!cbg->path) && (!bg_path))
       || ((!cbg->path) && tmp_icon))
     {
        if  (((cbg->group) && (bg_group)
              && (!strcmp(cbg->group, bg_group)) && !tmp_icon)
            ||((!cbg->group) && (!bg_group))
            ||((!cbg->group) && tmp_icon))
          {
             elm_gengrid_item_selected_set(it, EINA_TRUE);
             return EINA_TRUE;
          }
     }
   return EINA_FALSE;
}

static void
_entrance_conf_session_update(Evas_Object *session_sel)
{
   const Eina_List *sessions, *node;
   Entrance_Xsession *session;
   const char *icon = NULL;
   Evas_Object *ic;

   sessions = entrance_gui_xsessions_get();
   //search the correct struct
   if (_entrance_int_conf_user->lsess)
     elm_object_text_set(session_sel, _entrance_int_conf_user->lsess);
   else
     elm_object_text_set(session_sel, "None");

   if (_entrance_int_conf_user->lsess)
     {
        EINA_LIST_FOREACH(sessions, node, session)
         {
            if ((_entrance_int_conf_user->lsess) &&
                !strcmp(_entrance_int_conf_user->lsess,session->name))
              {
                 icon = session->icon;
              }
         }
     }
   //create the icon
   ic = elm_object_part_content_get(session_sel, "icon");
   if (icon)
     {
        if (!ic)
          ic = elm_icon_add(session_sel);
        elm_image_file_set(ic, icon, NULL);
        elm_object_part_content_set(session_sel, "icon", ic);
     }
   else
     {
        if (ic)
          evas_object_del(ic);
        elm_object_part_content_set(session_sel, "icon", NULL);
     }

}

static void
_entrance_conf_session_sel(void *data EINA_UNUSED, Evas_Object *obj, void *event_info)
{
   Entrance_Xsession *exs;
   exs = elm_object_item_data_get(event_info);
   _entrance_int_conf_user->lsess = exs->name;
   _entrance_conf_session_update(obj);
   entrance_conf_changed();
}

static char *
_entrance_conf_session_text_get(void *data EINA_UNUSED, Evas_Object *obj EINA_UNUSED, const char *part EINA_UNUSED)
{
   Entrance_Xsession *exs;
   exs = data;
   if (!part)
     return strdup(exs->name);
   else if((part) && (!strcmp(part, "icon")))
     {
        if (exs->icon)
          return strdup(exs->icon);
        else
          return NULL;
     }
   return NULL;
}

static Evas_Object *
_entrance_conf_session_content_get(void *data EINA_UNUSED, Evas_Object *obj EINA_UNUSED, const char *part EINA_UNUSED)
{
   return NULL;
}

static Eina_Bool
_entrance_conf_session_state_get(void *data EINA_UNUSED, Evas_Object *obj EINA_UNUSED, const char *part EINA_UNUSED)
{
   return EINA_FALSE;
}

static void
_entrance_conf_session_del(void *data EINA_UNUSED, Evas_Object *obj EINA_UNUSED)
{
}

static void
_entrance_conf_remembersession_update(Evas_Object *acs)
{
   Elm_Actionslider_Pos pos;
   if (_entrance_int_conf_user->remember_session)
     pos = ELM_ACTIONSLIDER_LEFT;
   else
     pos = ELM_ACTIONSLIDER_RIGHT;
   elm_actionslider_magnet_pos_set(acs,pos);
}

static void
_entrance_conf_remembersession_changed(void *data EINA_UNUSED, Evas_Object *obj, void *event_info)
{
   if ((event_info) && !strcmp(event_info, "Enabled"))
     {
        PT("Turned remember session on");
        _entrance_int_conf_user->remember_session = EINA_TRUE;
     }
   else
     {
        PT("Turned remember session off");
        _entrance_int_conf_user->remember_session = EINA_FALSE;
     }
   _entrance_conf_remembersession_update(obj);
   entrance_conf_changed();
}

static void
_entrance_conf_user_auth(void *data, const char *user, Eina_Bool granted)
{
   Evas_Object *t;
   const Eina_List *users, *l;
   Entrance_Login *eu;

   if (granted)
     {
        t = elm_object_part_content_get(data, "entrance.conf");
        users = entrance_gui_users_get();
        EINA_LIST_FOREACH(users, l, eu)
          {
             if (!strcmp(eu->login, user))
               {
                  _entrance_int_conf_user->orig = eu;
                  _entrance_int_conf_user->bg.path = eu->bg.path;
                  _entrance_int_conf_user->bg.group = eu->bg.group;
                  _entrance_int_conf_user->image.path = eu->image.path;
                  _entrance_int_conf_user->image.group = eu->image.group;
                  _entrance_int_conf_user->lsess = eu->lsess;
                  _entrance_int_conf_user->remember_session =
                     eu->remember_session;
                  /*
                  printf("init %s %s | %s %s | %s | %d",
                         _entrance_int_conf_user->bg.path,
                         _entrance_int_conf_user->bg.group,
                         _entrance_int_conf_user->image.path,
                         _entrance_int_conf_user->image.group,
                         _entrance_int_conf_user->lsess,
                         _entrance_int_conf_user->remember_session);
                         */
                  break;
               }
          }
        if (eu)
          {
             _entrance_conf_user_build_cb(t, eu);
             elm_object_signal_emit(data, "entrance,conf_user,enabled", "");
          }
     }
}


static Evas_Object *
_entrance_conf_user_build(Evas_Object *obj)
{
   Evas_Object *t, *o, *ly;

   ly = entrance_gui_theme_get(obj, "entrance/conf/login");
   evas_object_size_hint_align_set(ly, EVAS_HINT_FILL, EVAS_HINT_FILL);
   evas_object_show(ly);

   o = entrance_login_add(ly, _entrance_conf_user_auth, ly);
   entrance_login_open_session_set(o, EINA_FALSE);
   elm_object_part_content_set(ly, "entrance.login", o);
   evas_object_show(o);
   t = elm_table_add(obj);
   elm_object_part_content_set(ly, "entrance.conf", t);
   evas_object_size_hint_weight_set(t, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
   elm_table_padding_set(t, 5 , 5);

   return ly;
}


static void
_entrance_conf_user_begin(void)
{
   _entrance_int_conf_user = calloc(1, sizeof(Entrance_Int_Conf_User));

}

static void
_entrance_conf_user_end(void)
{
   free(_entrance_int_conf_user);

}

static void
_entrance_conf_user_build_cb(Evas_Object *t, Entrance_Login *eu)
{
   Evas_Object *o, *gl, *bx, *hbx;
   Eina_List *l = NULL;
   Entrance_Conf_Background *img;
   int j = 0;

   hbx = elm_box_add(t);
   evas_object_size_hint_weight_set(hbx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
   evas_object_size_hint_align_set(hbx, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_box_horizontal_set(hbx, EINA_TRUE);
   elm_table_pack(t, hbx, 0, j, 2, 1);
   evas_object_show(hbx);
   ++j;

   /* Background */
   bx = elm_box_add(t);
   evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
   evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_box_pack_end(hbx, bx);
   evas_object_show(bx);

   o = elm_label_add(t);
   elm_object_text_set(o, "Background");
   evas_object_size_hint_weight_set(o, EVAS_HINT_EXPAND, 0);
   evas_object_size_hint_align_set(o, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_box_pack_end(bx, o);
   evas_object_show(o);

   gl = elm_gengrid_add(t);
   elm_scroller_bounce_set(gl, EINA_FALSE, EINA_TRUE);
   evas_object_size_hint_weight_set(gl, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
   evas_object_size_hint_align_set(gl, EVAS_HINT_FILL, EVAS_HINT_FILL);
   evas_object_show(gl);
   elm_box_pack_end(bx, gl);
   elm_gengrid_item_size_set(gl,
                          elm_config_scale_get() * 150,
                          elm_config_scale_get() * 150);
   elm_gengrid_group_item_size_set(gl,
                          elm_config_scale_get() * 31,
                          elm_config_scale_get() * 31);

   img = calloc(1, sizeof(Entrance_Conf_Background));
   img->name = eina_stringshare_add("None");
   l = eina_list_append(l, img);
   IMG_LIST_FORK(entrance_gui_background_pool_get(), l);
   IMG_LIST_FORK(entrance_gui_theme_backgrounds(), l);
   IMG_LIST_FORK(eu->background_pool, l);
   entrance_fill(gl, entrance_conf_background_fill_get(),
                 l, _entrance_conf_user_bg_fill_cb,
                 _entrance_conf_user_bg_sel, o);
   eina_list_free(l);

   /* Icon */
   bx = elm_box_add(t);
   evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
   evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_box_pack_end(hbx, bx);
   evas_object_show(bx);

   o = elm_label_add(t);
   elm_object_text_set(o, "Icon");
   evas_object_size_hint_weight_set(o, EVAS_HINT_EXPAND, 0);
   evas_object_size_hint_align_set(o, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_box_pack_end(bx, o);
   evas_object_show(o);

   gl = elm_gengrid_add(t);
   elm_scroller_bounce_set(gl, EINA_FALSE, EINA_TRUE);
   evas_object_size_hint_weight_set(gl, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
   evas_object_size_hint_align_set(gl, EVAS_HINT_FILL, EVAS_HINT_FILL);
   evas_object_show(gl);
   elm_box_pack_end(bx, gl);
   elm_gengrid_item_size_set(gl,
                          elm_config_scale_get() * 150,
                          elm_config_scale_get() * 150);
   elm_gengrid_group_item_size_set(gl,
                          elm_config_scale_get() * 31,
                          elm_config_scale_get() * 31);

   img = calloc(1, sizeof(Entrance_Conf_Background));
   img->name = eina_stringshare_add("Random");
   l = eina_list_append(NULL, img);
   IMG_LIST_FORK(entrance_gui_icon_pool_get(), l);
   IMG_LIST_FORK(entrance_gui_theme_icons(), l);
   IMG_LIST_FORK(eu->icon_pool, l);
   entrance_fill(gl, entrance_conf_background_fill_get(),
                 l, _entrance_conf_user_icon_fill_cb,
                 _entrance_conf_user_icon_sel, o);
   eina_list_free(l);

   /* Session to autoselect */
   o = elm_label_add(t);
   elm_object_text_set(o, "Session to use");
   evas_object_size_hint_weight_set(o, EVAS_HINT_EXPAND, 0);
   evas_object_size_hint_align_set(o, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_table_pack(t, o, 0, j, 1, 1);
   evas_object_show(o);
   o = elm_hoversel_add(t);
   evas_object_size_hint_weight_set(o, EVAS_HINT_EXPAND, 0);
   evas_object_size_hint_align_set(o, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_object_text_set(o, "Session");
   elm_table_pack(t, o, 1, j, 1, 1);
   evas_object_show(o);
   ++j;
   entrance_fill(o, _entrance_session_fill, entrance_gui_xsessions_get(), NULL, _entrance_conf_session_sel, NULL);
   _entrance_conf_session_update(o);

   /* Remember last session */
   o = elm_label_add(t);
   elm_object_text_set(o, "Remember last session");
   evas_object_size_hint_weight_set(o, EVAS_HINT_EXPAND, 0);
   evas_object_size_hint_align_set(o, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_table_pack(t, o, 0, j, 1, 1);
   evas_object_show(o);
   o = elm_actionslider_add(t);
   evas_object_size_hint_weight_set(o, EVAS_HINT_EXPAND, 0);
   evas_object_size_hint_align_set(o, EVAS_HINT_FILL, EVAS_HINT_FILL);
   elm_object_part_text_set(o, "left", "Enabled");
   elm_object_part_text_set(o, "right", "Disabled");
   elm_actionslider_enabled_pos_set(o, ELM_ACTIONSLIDER_LEFT |
                                         ELM_ACTIONSLIDER_RIGHT);
   evas_object_smart_callback_add(o, "selected",
       _entrance_conf_remembersession_changed, NULL);
   elm_table_pack(t, o, 1, j, 1, 1);
   evas_object_show(o);
   ++j;
   _entrance_conf_remembersession_update(o);

   evas_object_show(t);
}


static Eina_Bool
_entrance_conf_user_check(void)
{
   Entrance_Login *eu = _entrance_int_conf_user->orig;
   return !!((eu->bg.path != _entrance_int_conf_user->bg.path)
             || (eu->bg.group != _entrance_int_conf_user->bg.group)
             || (eu->image.path != _entrance_int_conf_user->image.path)
             || (eu->image.group != _entrance_int_conf_user->image.group)
             || (eu->remember_session != _entrance_int_conf_user->remember_session)
             || (eu->lsess != _entrance_int_conf_user->lsess));
}

static void
_entrance_conf_user_apply(void)
{
   Entrance_Login *eu;
   eu = _entrance_int_conf_user->orig;
   if (eu->bg.path != _entrance_int_conf_user->bg.path)
     eina_stringshare_replace(&eu->bg.path,
                              _entrance_int_conf_user->bg.path);
   if (eu->bg.group != _entrance_int_conf_user->bg.group)
     eina_stringshare_replace(&eu->bg.group,
                              _entrance_int_conf_user->bg.group);
   if (eu->image.path != _entrance_int_conf_user->image.path)
     eina_stringshare_replace(&eu->image.path,
                              _entrance_int_conf_user->image.path);
   if (eu->image.group != _entrance_int_conf_user->image.group)
     eina_stringshare_replace(&eu->image.group,
                              _entrance_int_conf_user->image.group);
   if (eu->remember_session != _entrance_int_conf_user->remember_session)
     eu->remember_session = _entrance_int_conf_user->remember_session;
   if (eu->lsess != _entrance_int_conf_user->lsess)
     eina_stringshare_replace(&eu->lsess, _entrance_int_conf_user->lsess);
   entrance_connect_conf_user_send(eu);
   /*
      printf("%s | %s%s | %s%s | %s%s | %s%d | %d%s | %s",
      eu->bg.path, _entrance_int_conf->bg.path,
      eu->bg.group, _entrance_int_conf->bg.group,
      eu->image.path, _entrance_int_conf->image.path,
      eu->image.group, _entrance_int_conf->image.group,
      eu->remember_session, _entrance_int_conf->remember_session,
      eu->lsess, _entrance_int_conf->lsess);
    */
}

void
entrance_conf_user_init(void)
{
   PT("conf user init");
   _entrance_session_fill =
      entrance_fill_new("default",
                        _entrance_conf_session_text_get,
                        _entrance_conf_session_content_get,
                        _entrance_conf_session_state_get,
                        _entrance_conf_session_del);
   entrance_conf_module_register("User",
                                 _entrance_conf_user_begin,
                                 _entrance_conf_user_end,
                                 _entrance_conf_user_build,
                                 _entrance_conf_user_check,
                                 _entrance_conf_user_apply);

}

void
entrance_conf_user_shutdown(void)
{
   PT("conf user shutdown");
   entrance_fill_del(_entrance_session_fill);
}