#define EFL_NOLEGACY_API_SUPPORT
#ifdef HAVE_CONFIG_H
# include "elementary_config.h"
#endif
#define EFL_LAYOUT_CALC_PROTECTED
#include <Efl_Ui.h>
#include "efl_ui_suite.h"
#include "Evas_Legacy.h"

static void
increment_int_changed(void *data EINA_UNUSED, const Efl_Event *ev EINA_UNUSED)
{
   int *value = data;
   (*value)++;
}

EFL_START_TEST(text_cnp)
{
   Eo *txt;
   Eo *win = win_add();

   int i_copy = 0, i_paste = 0, i_cut = 0;

   txt = efl_add(EFL_UI_TEXTBOX_CLASS, win,
                efl_event_callback_add(efl_added, EFL_UI_TEXTBOX_EVENT_SELECTION_COPY, increment_int_changed, &i_copy),
                efl_event_callback_add(efl_added, EFL_UI_TEXTBOX_EVENT_SELECTION_PASTE, increment_int_changed, &i_paste),
                efl_event_callback_add(efl_added, EFL_UI_TEXTBOX_EVENT_SELECTION_CUT, increment_int_changed, &i_cut)
                );

   efl_text_set(txt, "Hello");
   efl_text_interactive_all_select(txt);
   efl_ui_textbox_selection_copy(txt);
   efl_text_interactive_all_select(txt);
   efl_ui_textbox_selection_cut(txt);
   efl_ui_textbox_selection_paste(txt);
   efl_ui_textbox_selection_paste(txt);
   ecore_main_loop_iterate();
   ck_assert_int_eq(i_copy, 1);
   ck_assert_int_eq(i_cut, 1);
   ck_assert_int_eq(i_paste, 2);
   //FIXME
   //fail_if(strcmp(efl_text_get(txt),"HelloHello"));
   efl_del(txt);
}
EFL_END_TEST

static void
_stop_event_soon(void *data EINA_UNUSED, const Efl_Event *ev)
{
   efl_event_callback_stop(ev->object);
}

EFL_START_TEST(text_all_select_all_unselect)
{
   Eo *txt;
   Eo *win = win_add();

   int i_have_selection = 0, i_selection = 0;

   txt = efl_add(EFL_UI_TEXTBOX_CLASS, win,
                efl_event_callback_add(efl_added, EFL_TEXT_INTERACTIVE_EVENT_HAVE_SELECTION_CHANGED,
                            increment_int_changed, &i_have_selection),
                efl_event_callback_add(efl_added, EFL_TEXT_INTERACTIVE_EVENT_SELECTION_CHANGED,
                            increment_int_changed, &i_selection)
                );
   efl_event_callback_priority_add(txt, EFL_UI_SELECTION_EVENT_WM_SELECTION_CHANGED, EFL_CALLBACK_PRIORITY_BEFORE, _stop_event_soon, NULL);
   efl_text_set(txt, "Hello");
   efl_text_interactive_all_select(txt);
   Efl_Text_Cursor *c1=NULL, *c2 =NULL;
   efl_text_interactive_selection_cursors_get(txt, &c1, &c2);
   ck_assert_ptr_ne(c1, NULL);
   ck_assert_ptr_ne(c2, NULL);
   fail_if(!efl_text_interactive_have_selection_get(txt));
   ck_assert_int_eq(efl_text_cursor_position_get(c1), 0);
   ck_assert_int_eq(efl_text_cursor_position_get(c2), 5);
   efl_text_interactive_all_unselect(txt);
   fail_if(efl_text_interactive_have_selection_get(txt));
   ecore_main_loop_iterate();
   ck_assert_int_eq(i_have_selection, 2);
   ck_assert_int_eq(i_selection, 1);

   /*Partial select, the select all*/
   Eo *sel1, *sel2;
   i_selection = 0;
   efl_text_interactive_selection_cursors_get(txt, &sel1, &sel2);
   efl_text_cursor_position_set(sel1, 1);
   efl_text_cursor_position_set(sel2, 2);
   ck_assert_int_eq(i_selection, 2);
   efl_text_interactive_all_select(txt);
   ck_assert_int_eq(i_selection, 3);
   ck_assert_int_eq(efl_text_cursor_position_get(sel1), 0);
   ck_assert_int_eq(efl_text_cursor_position_get(sel2), 5);

   Eo *cur1 = efl_ui_textbox_cursor_create(txt);
   Eo *cur2 = efl_ui_textbox_cursor_create(txt);
   efl_text_cursor_position_set(cur1, 1);
   efl_text_cursor_position_set(cur2, 2);
   efl_text_interactive_selection_cursors_set(txt, cur1, cur2);
   ck_assert_int_eq(i_selection, 4);
   efl_text_interactive_selection_cursors_get(txt, &sel1, &sel2);
   ck_assert_int_eq(efl_text_cursor_position_get(sel1),1);
   ck_assert_int_eq(efl_text_cursor_position_get(sel2),2);


   /*Select part then select all*/
   efl_text_interactive_all_unselect(txt);
   i_have_selection = 0, i_selection = 0;
   efl_text_cursor_position_set(cur1, 1);
   efl_text_cursor_position_set(cur2, 2);
   efl_text_interactive_selection_cursors_set(txt, cur1, cur2);
   ck_assert_int_eq(i_selection, 1);
   ck_assert_int_eq(i_have_selection, 1);
   efl_text_interactive_all_select(txt);
   ck_assert_int_eq(i_selection, 2);
   ck_assert_int_eq(i_have_selection, 1);
   efl_text_interactive_all_unselect(txt);
   ck_assert_int_eq(i_have_selection, 2);


   efl_del(txt);
   efl_del(win);
}
EFL_END_TEST

EFL_START_TEST(text_selection)
{
   Eo *txt;
   Eo *win = win_add();

   txt = efl_add(EFL_UI_TEXTBOX_CLASS, win);
   efl_event_callback_priority_add(txt, EFL_UI_SELECTION_EVENT_WM_SELECTION_CHANGED, EFL_CALLBACK_PRIORITY_BEFORE, _stop_event_soon, NULL);
   efl_gfx_entity_size_set(txt, EINA_SIZE2D(300, 300));
   efl_text_set(txt, "Hello");
   get_me_to_those_events(txt);
   drag_object(txt, 2, 2, 295, 295, EINA_TRUE);
   ecore_main_loop_iterate();
   Efl_Text_Cursor *c1=NULL, *c2 =NULL;
   efl_text_interactive_selection_cursors_get(txt, &c1, &c2);
   ck_assert_ptr_ne(c1, NULL);
   ck_assert_ptr_ne(c2, NULL);
   fail_if(!efl_text_interactive_have_selection_get(txt));
   ck_assert_int_eq(efl_text_cursor_position_get(c1), 0);
   ck_assert_int_eq(efl_text_cursor_position_get(c2), 5);
   efl_text_interactive_all_unselect(txt);
   fail_if(efl_text_interactive_have_selection_get(txt));
   efl_text_interactive_selection_allowed_set(txt, EINA_FALSE);
   drag_object(txt, 2, 2, 295, 295, EINA_TRUE);
   ecore_main_loop_iterate();
   fail_if(efl_text_interactive_have_selection_get(txt));
   efl_del(txt);
}
EFL_END_TEST

static void
user_changed(void *data, const Efl_Event *ev)
{
   Efl_Text_Change_Info *info = (Efl_Text_Change_Info *)ev->info;
   Efl_Text_Change_Info *stored = (Efl_Text_Change_Info *)data;
   *stored = *info;
}

EFL_START_TEST(text_user_change)
{
   Eo *txt;
   Eo *win = win_add();
   Efl_Text_Change_Info info = {0};
   txt = efl_add(EFL_UI_TEXTBOX_CLASS, win,
                efl_event_callback_add(efl_added, EFL_TEXT_INTERACTIVE_EVENT_CHANGED_USER, user_changed, &info)
                );
   efl_event_callback_priority_add(txt, EFL_UI_SELECTION_EVENT_WM_SELECTION_CHANGED, EFL_CALLBACK_PRIORITY_BEFORE, _stop_event_soon, NULL);
   efl_text_set(txt, "Hello");
   efl_gfx_entity_size_set(txt, EINA_SIZE2D(300, 300));
   efl_text_interactive_all_select(txt);
   efl_ui_textbox_selection_cut(txt);
   ck_assert_int_eq(info.position, 0);
   ck_assert_int_eq(info.length, 5);
   efl_del(txt);
   efl_del(win);
}
EFL_END_TEST

EFL_START_TEST(text_scroll_mode)
{
   Eo *txt, *win, *cur;
   win = win_add();
   txt = efl_add(EFL_UI_TEXTBOX_CLASS, win);
   efl_event_callback_priority_add(txt, EFL_UI_SELECTION_EVENT_WM_SELECTION_CHANGED, EFL_CALLBACK_PRIORITY_BEFORE, _stop_event_soon, NULL);
   cur = efl_text_interactive_main_cursor_get(txt);
   efl_text_set(txt, "Hello");
   /*scroll mode is false by default*/
   fail_if(efl_ui_textbox_scrollable_get(txt));
   efl_ui_textbox_scrollable_set(txt, !efl_ui_textbox_scrollable_get(txt));
   efl_text_cursor_text_insert(cur, "World");
   fail_if(!efl_ui_textbox_scrollable_get(txt));
   efl_ui_textbox_scrollable_set(txt, !efl_ui_textbox_scrollable_get(txt));
   efl_text_cursor_text_insert(cur, "!!!");

   ck_assert_str_eq(efl_text_get(txt),"HelloWorld!!!");
   efl_del(txt);
   efl_del(win);
}
EFL_END_TEST

EFL_START_TEST(text_change_event)
{
   Eo *txt;
   Eo *win = win_add();

   txt = efl_add(EFL_UI_TEXTBOX_CLASS, win);
   efl_event_callback_priority_add(txt, EFL_UI_SELECTION_EVENT_WM_SELECTION_CHANGED, EFL_CALLBACK_PRIORITY_BEFORE, _stop_event_soon, NULL);
   efl_gfx_entity_size_set(txt, EINA_SIZE2D(300, 300));
   efl_text_set(txt, "Hello");
   int i_changed = 0;
   efl_event_callback_add(txt, EFL_UI_TEXTBOX_EVENT_CHANGED, increment_int_changed, &i_changed);
   efl_gfx_entity_visible_set(txt, EINA_TRUE);
   Evas *e = evas_object_evas_get(txt);
   efl_ui_focus_util_focus(txt);
   evas_event_feed_key_down(e, "s", "s", "s", "s", time(NULL), NULL);
   ecore_main_loop_iterate();
   ck_assert_str_eq(efl_text_get(txt),"Hellos");
   ck_assert_int_eq(i_changed,1);
   ecore_main_loop_iterate();

   efl_del(txt);
   efl_del(win);
}
EFL_END_TEST

EFL_START_TEST(text_keys_handler)
{
   Eo *txt;
   Eo *win = win_add();

   txt = efl_add(EFL_UI_TEXTBOX_CLASS, win);
   efl_event_callback_priority_add(txt, EFL_UI_SELECTION_EVENT_WM_SELECTION_CHANGED, EFL_CALLBACK_PRIORITY_BEFORE, _stop_event_soon, NULL);
   efl_gfx_entity_size_set(txt, EINA_SIZE2D(300, 300));
   efl_text_set(txt, "Hello");

   efl_gfx_entity_visible_set(txt, EINA_TRUE);
   Evas *e = evas_object_evas_get(txt);
   efl_ui_focus_util_focus(txt);

   efl_text_cursor_move(efl_text_interactive_main_cursor_get(txt), EFL_TEXT_CURSOR_MOVE_TYPE_LAST);
   evas_key_modifier_on(e, "Control");
   evas_event_feed_key_down(e, "BackSpace", "BackSpace", "\b", "\b", time(NULL), NULL);
   ecore_main_loop_iterate();
   ck_assert_str_eq(efl_text_get(txt),"");
   ck_assert_int_eq(efl_text_cursor_position_get(efl_text_interactive_main_cursor_get(txt)), 0);
   evas_event_feed_key_up(e, "BackSpace", "BackSpace", "\b", "\b", time(NULL), NULL);
   ecore_main_loop_iterate();

   efl_text_set(txt, "Hello");
   efl_text_cursor_position_set(efl_text_interactive_main_cursor_get(txt), 0);
   evas_key_modifier_on(e, "Control");
   evas_event_feed_key_down(e, "Delete", "Delete", "\177", "\177", time(NULL), NULL);
   ecore_main_loop_iterate();
   ck_assert_str_eq(efl_text_get(txt),"");
   ck_assert_int_eq(efl_text_cursor_position_get(efl_text_interactive_main_cursor_get(txt)), 0);
   evas_event_feed_key_up(e, "Delete", "Delete", "\177", "\177", time(NULL), NULL);
   ecore_main_loop_iterate();

   efl_del(txt);
   efl_del(win);
}
EFL_END_TEST

void efl_ui_test_text(TCase *tc)
{
   tcase_add_test(tc, text_cnp);
   tcase_add_test(tc, text_all_select_all_unselect);
   tcase_add_test(tc, text_selection);
   tcase_add_test(tc, text_user_change);
   tcase_add_test(tc, text_scroll_mode);
   tcase_add_test(tc, text_change_event);
   tcase_add_test(tc, text_keys_handler);
}