2101 lines
60 KiB
C
2101 lines
60 KiB
C
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#define ENVENTOR_BETA_API_SUPPORT 1
|
|
|
|
#include <Enventor.h>
|
|
#include <Eio.h>
|
|
#include "enventor_private.h"
|
|
|
|
//FIXME: Make flexible
|
|
const int MAX_LINE_DIGIT_CNT = 10;
|
|
const int SYNTAX_COLOR_SPARE_LINES = 42;
|
|
const double SYNTAX_COLOR_DEFAULT_TIME = 0.25;
|
|
const double SYNTAX_COLOR_SHORT_TIME = 0.025;
|
|
|
|
typedef struct syntax_color_thread_data_s
|
|
{
|
|
Ecore_Thread *thread;
|
|
edit_data *ed;
|
|
char *text;
|
|
const char *translated;
|
|
} syntax_color_td;
|
|
|
|
struct editor_s
|
|
{
|
|
Evas_Object *en_edit;
|
|
Evas_Object *en_line;
|
|
Evas_Object *scroller;
|
|
Evas_Object *layout;
|
|
Evas_Object *ctxpopup;
|
|
Enventor_Object *enventor;
|
|
Enventor_Item *it;
|
|
Eina_Stringshare *filepath;
|
|
|
|
syntax_helper *sh;
|
|
parser_data *pd;
|
|
redoundo_data *rd;
|
|
|
|
int cur_line;
|
|
int line_max;
|
|
int error_line;
|
|
int syntax_color_lock;
|
|
int cursor_pos;
|
|
Evas_Coord scroller_h;
|
|
|
|
struct {
|
|
int prev_left;
|
|
int prev_right;
|
|
int left;
|
|
int right;
|
|
} bracket;
|
|
|
|
Ecore_Timer *syntax_color_timer;
|
|
syntax_color_td *sctd;
|
|
|
|
void (*view_sync_cb)(void *data, Eina_Stringshare *state_name, double state_value,
|
|
Eina_Stringshare *part_name, Eina_Stringshare *group_name);
|
|
void *view_sync_cb_data;
|
|
int select_pos;
|
|
const char *error_target;
|
|
|
|
Eina_Bool edit_changed : 1;
|
|
Eina_Bool ctrl_pressed : 1;
|
|
Eina_Bool on_select_recover : 1;
|
|
Eina_Bool on_save : 1;
|
|
Eina_Bool main : 1;
|
|
Eina_Bool disabled : 1;
|
|
};
|
|
|
|
/*****************************************************************************/
|
|
/* Internal method implementation */
|
|
/*****************************************************************************/
|
|
|
|
static Eina_Bool
|
|
image_preview_show(edit_data *ed, char *cur, Evas_Coord x, Evas_Coord y);
|
|
static void
|
|
error_line_num_highlight(edit_data *ed);
|
|
|
|
static void
|
|
line_init(edit_data *ed)
|
|
{
|
|
char buf[MAX_LINE_DIGIT_CNT];
|
|
|
|
ed->line_max = 1;
|
|
snprintf(buf, sizeof(buf), "%d", ed->line_max);
|
|
elm_entry_entry_set(ed->en_line, buf);
|
|
}
|
|
|
|
static void
|
|
visible_text_region_get(edit_data *ed, int *from_line, int *to_line)
|
|
{
|
|
Evas_Coord region_y, region_h;
|
|
Evas_Coord cursor_h;
|
|
|
|
elm_scroller_region_get(ed->scroller, NULL, ®ion_y, NULL, ®ion_h);
|
|
elm_entry_cursor_geometry_get(ed->en_edit, NULL, NULL, NULL, &cursor_h);
|
|
|
|
int from = (region_y / cursor_h);
|
|
int to = from + (region_h / cursor_h);
|
|
from -= SYNTAX_COLOR_SPARE_LINES;
|
|
to += SYNTAX_COLOR_SPARE_LINES;
|
|
|
|
if (from < 1) from = 1;
|
|
if (to > ed->line_max) to = ed->line_max;
|
|
|
|
*from_line = from;
|
|
*to_line = to;
|
|
}
|
|
|
|
static void
|
|
entry_recover_param_get(edit_data *ed,
|
|
int *cursor_pos,
|
|
int *sel_cur_begin,
|
|
int *sel_cur_end)
|
|
{
|
|
if (cursor_pos)
|
|
*cursor_pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
|
|
Edje_Object *en_edje;
|
|
if (sel_cur_begin || sel_cur_end)
|
|
{
|
|
en_edje = elm_layout_edje_get(ed->en_edit);
|
|
if (elm_entry_scrollable_get(ed->en_edit))
|
|
en_edje = edje_object_part_swallow_get(en_edje, "elm.swallow.content");
|
|
}
|
|
|
|
if (sel_cur_begin)
|
|
*sel_cur_begin = edje_object_part_text_cursor_pos_get
|
|
(en_edje, "elm.text", EDJE_CURSOR_SELECTION_BEGIN);
|
|
if (sel_cur_end)
|
|
*sel_cur_end = edje_object_part_text_cursor_pos_get
|
|
(en_edje, "elm.text", EDJE_CURSOR_SELECTION_END);
|
|
}
|
|
|
|
static void
|
|
entry_recover(edit_data *ed, int cursor_pos, int sel_cur_begin, int sel_cur_end)
|
|
{
|
|
elm_entry_calc_force(ed->en_edit);
|
|
//recover cursor position??
|
|
elm_entry_cursor_pos_set(ed->en_edit, 0);
|
|
elm_entry_cursor_pos_set(ed->en_edit, cursor_pos);
|
|
|
|
Edje_Object *en_edje = elm_layout_edje_get(ed->en_edit);
|
|
if (elm_entry_scrollable_get(ed->en_edit))
|
|
en_edje = edje_object_part_swallow_get(en_edje, "elm.swallow.content");
|
|
|
|
//recover selection cursor
|
|
edje_object_part_text_cursor_pos_set(en_edje, "elm.text",
|
|
EDJE_CURSOR_SELECTION_BEGIN, sel_cur_begin);
|
|
edje_object_part_text_cursor_pos_set(en_edje, "elm.text",
|
|
EDJE_CURSOR_SELECTION_END, sel_cur_end);
|
|
|
|
ed->on_select_recover = EINA_FALSE;
|
|
}
|
|
|
|
void
|
|
edit_font_update(edit_data *ed)
|
|
{
|
|
if (!ed) return;
|
|
|
|
elm_entry_calc_force(ed->en_line);
|
|
elm_entry_calc_force(ed->en_edit);
|
|
}
|
|
|
|
static void
|
|
error_highlight(edit_data *ed, Evas_Object *tb)
|
|
{
|
|
Evas_Textblock_Cursor *cur1 = evas_object_textblock_cursor_new(tb);
|
|
error_line_num_highlight(ed);
|
|
char *p;
|
|
if (ed->error_line != -1)
|
|
{
|
|
evas_textblock_cursor_line_set(cur1, ed->error_line);
|
|
evas_textblock_cursor_line_char_first(cur1);
|
|
while((p = evas_textblock_cursor_content_get(cur1)) && (*p == ' '))
|
|
{
|
|
evas_textblock_cursor_char_next(cur1);
|
|
free(p);
|
|
}
|
|
free(p);
|
|
evas_object_textblock_text_markup_prepend(cur1, "<error>");
|
|
evas_textblock_cursor_line_char_last(cur1);
|
|
evas_object_textblock_text_markup_prepend(cur1, "</error>");
|
|
}
|
|
else if (ed->error_target)
|
|
{
|
|
const char *ptr = NULL;
|
|
const char *par = NULL;
|
|
while (evas_textblock_cursor_paragraph_next(cur1))
|
|
{
|
|
par = evas_textblock_cursor_paragraph_text_get(cur1);
|
|
if (par && (ptr = strstr(par, ed->error_target)))
|
|
break;
|
|
}
|
|
evas_textblock_cursor_paragraph_char_first(cur1);
|
|
while((p = evas_textblock_cursor_content_get(cur1)) && (*p == ' '))
|
|
{
|
|
evas_textblock_cursor_char_next(cur1);
|
|
free(p);
|
|
}
|
|
free(p);
|
|
evas_object_textblock_text_markup_prepend(cur1, "<error>");
|
|
evas_textblock_cursor_paragraph_char_last(cur1);
|
|
evas_object_textblock_text_markup_prepend(cur1, "</error>");
|
|
}
|
|
evas_textblock_cursor_free(cur1);
|
|
}
|
|
|
|
static void
|
|
bracket_highlight(edit_data *ed, Evas_Object *tb)
|
|
{
|
|
Evas_Textblock_Cursor *cur1 = evas_object_textblock_cursor_new(tb);
|
|
|
|
evas_textblock_cursor_pos_set(cur1, ed->bracket.left);
|
|
evas_object_textblock_text_markup_prepend(cur1, "<hilight>");
|
|
evas_textblock_cursor_pos_set(cur1, ed->bracket.left + 1);
|
|
evas_object_textblock_text_markup_prepend(cur1, "</hilight>");
|
|
|
|
evas_textblock_cursor_pos_set(cur1, ed->bracket.right);
|
|
evas_object_textblock_text_markup_prepend(cur1, "<hilight>");
|
|
evas_textblock_cursor_pos_set(cur1, ed->bracket.right + 1);
|
|
evas_object_textblock_text_markup_prepend(cur1, "</hilight>");
|
|
|
|
evas_textblock_cursor_free(cur1);
|
|
}
|
|
|
|
static Eina_Bool
|
|
syntax_color_apply(edit_data *ed, Eina_Bool partial)
|
|
{
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_edit);
|
|
char *text = (char *) evas_object_textblock_text_markup_get(tb);
|
|
|
|
int from_line = 1;
|
|
int to_line = -1;
|
|
if (partial) visible_text_region_get(ed, &from_line, &to_line);
|
|
|
|
char *from = NULL;
|
|
char *to = NULL;
|
|
char *utf8 = (char *) color_cancel(NULL, syntax_color_data_get(ed->sh), text,
|
|
strlen(text), from_line, to_line, &from,
|
|
&to);
|
|
if (!utf8) return EINA_FALSE;
|
|
|
|
const char *translated = color_apply(NULL, syntax_color_data_get(ed->sh),
|
|
utf8, strlen(utf8), from, to);
|
|
if (!translated) return EINA_FALSE;
|
|
|
|
/* I'm not sure this will be problem.
|
|
But it can avoid entry_object_text_escaped_set() in Edje.
|
|
Logically that's unnecessary in this case. */
|
|
int cursor_pos, sel_cur_begin, sel_cur_end;
|
|
entry_recover_param_get(ed, &cursor_pos, &sel_cur_begin, &sel_cur_end);
|
|
evas_object_textblock_text_markup_set(tb, translated);
|
|
error_highlight(ed, tb);
|
|
bracket_highlight(ed, tb);
|
|
entry_recover(ed, cursor_pos, sel_cur_begin, sel_cur_end);
|
|
|
|
return EINA_TRUE;
|
|
}
|
|
|
|
static Eina_Bool
|
|
syntax_color_timer_cb(void *data)
|
|
{
|
|
edit_data *ed = data;
|
|
if (!syntax_color_apply(ed, EINA_TRUE))
|
|
{
|
|
return ECORE_CALLBACK_RENEW;
|
|
}
|
|
ed->syntax_color_timer = NULL;
|
|
return ECORE_CALLBACK_CANCEL;
|
|
}
|
|
|
|
static void
|
|
syntax_color_partial_update(edit_data *ed, double interval)
|
|
{
|
|
/* If the syntax_color_full_update is requested forcely, lock would be -1
|
|
in this case, it should avoid partial updation by entry changed. */
|
|
if (ed->syntax_color_lock != 0) return;
|
|
if (ed->sctd)
|
|
{
|
|
ecore_thread_cancel(ed->sctd->thread);
|
|
ed->sctd->ed = NULL;
|
|
ed->sctd = NULL;
|
|
}
|
|
ecore_timer_del(ed->syntax_color_timer);
|
|
ed->syntax_color_timer = ecore_timer_add(interval, syntax_color_timer_cb,
|
|
ed);
|
|
}
|
|
|
|
static void
|
|
syntax_color_thread_cb(void *data, Ecore_Thread *thread)
|
|
{
|
|
syntax_color_td *td = data;
|
|
char *utf8 = (char *) color_cancel(thread, syntax_color_data_get(td->ed->sh),
|
|
td->text, strlen(td->text), -1, -1, NULL,
|
|
NULL);
|
|
if (!utf8) return;
|
|
td->translated = color_apply(thread, syntax_color_data_get(td->ed->sh), utf8,
|
|
strlen(utf8), NULL, NULL);
|
|
}
|
|
|
|
static void
|
|
syntax_color_thread_cancel_cb(void *data, Ecore_Thread *thread EINA_UNUSED)
|
|
{
|
|
syntax_color_td *td = data;
|
|
if (td->ed && td->ed->sctd == td) td->ed->sctd = NULL;
|
|
free(td);
|
|
}
|
|
|
|
static void
|
|
syntax_color_thread_end_cb(void *data, Ecore_Thread *thread)
|
|
{
|
|
syntax_color_td *td = data;
|
|
if (!td->translated) goto end;
|
|
|
|
Evas_Object *tb = elm_entry_textblock_get(td->ed->en_edit);
|
|
|
|
/* I'm not sure this will be problem.
|
|
But it can avoid entry_object_text_escaped_set() in Edje.
|
|
Logically that's unnecessary in this case. */
|
|
int cursor_pos, sel_cur_begin, sel_cur_end;
|
|
entry_recover_param_get(td->ed, &cursor_pos, &sel_cur_begin, &sel_cur_end);
|
|
evas_object_textblock_text_markup_set(tb, td->translated);
|
|
error_highlight(td->ed, tb);
|
|
bracket_highlight(td->ed, tb);
|
|
entry_recover(td->ed, cursor_pos, sel_cur_begin, sel_cur_end);
|
|
|
|
end:
|
|
syntax_color_thread_cancel_cb(data, thread);
|
|
}
|
|
|
|
static void
|
|
bracket_changed_cb(void *data, int left, int right)
|
|
{
|
|
edit_data *ed = data;
|
|
|
|
ed->bracket.left = left;
|
|
ed->bracket.right = right;
|
|
|
|
if ((left != -1) && (right != -1))
|
|
{
|
|
if ((ed->bracket.prev_left != left) &&
|
|
(ed->bracket.prev_right != right))
|
|
{
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_SHORT_TIME);
|
|
|
|
ed->bracket.prev_left = left;
|
|
ed->bracket.prev_right = right;
|
|
}
|
|
}
|
|
else if((ed->bracket.prev_left != -1) && (ed->bracket.prev_right != -1))
|
|
{
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_SHORT_TIME);
|
|
|
|
ed->bracket.prev_left = -1;
|
|
ed->bracket.prev_right = -1;
|
|
}
|
|
}
|
|
|
|
static void
|
|
bracket_update(edit_data *ed)
|
|
{
|
|
int pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
if (pos == 0)
|
|
{
|
|
ed->cursor_pos = 0;
|
|
return;
|
|
}
|
|
if (pos == ed->cursor_pos) return;
|
|
|
|
ed->cursor_pos = pos;
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_edit);
|
|
Evas_Textblock_Cursor *cur1 = evas_object_textblock_cursor_get(tb);
|
|
|
|
char *ch1 = NULL;
|
|
char *ch2 = NULL;
|
|
|
|
ch1 = evas_textblock_cursor_content_get(cur1);
|
|
Eina_Bool is_exist = evas_textblock_cursor_char_prev(cur1);
|
|
if (is_exist)
|
|
ch2 = evas_textblock_cursor_content_get(cur1);
|
|
evas_textblock_cursor_char_next(cur1);
|
|
|
|
if (is_exist && (*ch1 != '{') && (*ch1 != '}') && (*ch2 != '{')
|
|
&& (*ch2 != '}'))
|
|
{
|
|
if (ed->bracket.prev_left != -1 && ed->bracket.prev_right != -1)
|
|
{
|
|
//initialize bracket
|
|
ed->bracket.left = -1;
|
|
ed->bracket.right = -1;
|
|
ed->bracket.prev_left = -1;
|
|
ed->bracket.prev_right = -1;
|
|
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_SHORT_TIME);
|
|
}
|
|
free(ch1);
|
|
free(ch2);
|
|
return;
|
|
}
|
|
parser_bracket_find(ed->pd, ed->en_edit, bracket_changed_cb, ed);
|
|
free(ch1);
|
|
free(ch2);
|
|
}
|
|
|
|
static void
|
|
edit_changed_cb(void *data, Evas_Object *obj EINA_UNUSED, void *event_info)
|
|
{
|
|
Elm_Entry_Change_Info *info = event_info;
|
|
edit_data *ed = data;
|
|
edit_changed_set(ed, EINA_TRUE);
|
|
|
|
Eina_Bool syntax_color = EINA_TRUE;
|
|
ed->error_line = -1;
|
|
eina_stringshare_del(ed->error_target);
|
|
ed->error_target = NULL;
|
|
|
|
if (info->insert)
|
|
{
|
|
int increase = 0;
|
|
if ((info->change.insert.plain_length == 1)&&
|
|
(info->change.insert.content[0] == ' ')) return;
|
|
|
|
if (!strcmp(info->change.insert.content, EOL))
|
|
{
|
|
increase++;
|
|
syntax_color = EINA_FALSE;
|
|
}
|
|
else
|
|
{
|
|
increase =
|
|
parser_line_cnt_get(ed->pd, info->change.insert.content);
|
|
}
|
|
|
|
if (enventor_obj_auto_indent_get(ed->enventor))
|
|
{
|
|
increase =
|
|
indent_insert_apply(syntax_indent_data_get(ed->sh),
|
|
info->change.insert.content, ed->cur_line);
|
|
}
|
|
edit_line_increase(ed, increase);
|
|
|
|
}
|
|
else
|
|
{
|
|
if (enventor_obj_auto_indent_get(ed->enventor))
|
|
{
|
|
indent_delete_apply(syntax_indent_data_get(ed->sh),
|
|
info->change.del.content, ed->cur_line);
|
|
}
|
|
|
|
int decrease = parser_line_cnt_get(ed->pd, info->change.del.content);
|
|
edit_line_decrease(ed, decrease);
|
|
if (info->change.del.content[0] == ' ') return;
|
|
}
|
|
|
|
|
|
if (!syntax_color) return;
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_DEFAULT_TIME);
|
|
|
|
parser_bracket_cancel(ed->pd);
|
|
}
|
|
|
|
static void
|
|
ctxpopup_candidate_dismiss_cb(void *data, Evas_Object *obj,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
|
|
int cur_pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
elm_entry_cursor_line_end_set(ed->en_edit);
|
|
int end_pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
int i = 0;
|
|
char *ch = NULL;
|
|
|
|
for (i = cur_pos; i <= end_pos; i++)
|
|
{
|
|
elm_entry_cursor_pos_set(ed->en_edit, i);
|
|
ch = elm_entry_cursor_content_get(ed->en_edit);
|
|
if (*ch == ';')
|
|
{
|
|
elm_entry_cursor_pos_set(ed->en_edit, i + 1);
|
|
free(ch);
|
|
break;
|
|
}
|
|
free(ch);
|
|
}
|
|
|
|
evas_object_del(obj);
|
|
elm_object_tree_focus_allow_set(ed->layout, EINA_TRUE);
|
|
elm_object_focus_set(ed->en_edit, EINA_TRUE);
|
|
evas_object_smart_callback_call(ed->enventor, SIG_CTXPOPUP_DISMISSED, NULL);
|
|
}
|
|
|
|
static void
|
|
ctxpopup_candidate_changed_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info)
|
|
{
|
|
edit_data *ed = data;
|
|
const char *text = event_info;
|
|
char *ch = NULL;
|
|
int cur_pos, end_pos;
|
|
int i;
|
|
cur_pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
elm_entry_cursor_line_end_set(ed->en_edit);
|
|
end_pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
|
|
for (i = cur_pos; i <= end_pos; i++)
|
|
{
|
|
elm_entry_cursor_pos_set(ed->en_edit, i);
|
|
ch = elm_entry_cursor_content_get(ed->en_edit);
|
|
if (!strcmp(ch, ";"))
|
|
{
|
|
//1 more space for end_pos to replace until ';'.
|
|
end_pos = elm_entry_cursor_pos_get(ed->en_edit) + 1;
|
|
free(ch);
|
|
break;
|
|
}
|
|
free(ch);
|
|
}
|
|
|
|
elm_entry_select_region_set(ed->en_edit, cur_pos, end_pos);
|
|
|
|
if (!ed->ctxpopup) return;
|
|
|
|
redoundo_text_relative_push(ed->rd, text);
|
|
elm_entry_entry_insert(ed->en_edit, text);
|
|
elm_entry_calc_force(ed->en_edit);
|
|
|
|
elm_entry_cursor_pos_set(ed->en_edit, cur_pos);
|
|
|
|
edit_changed_set(ed, EINA_TRUE);
|
|
evas_object_smart_callback_call(ed->enventor, SIG_CTXPOPUP_CHANGED,
|
|
ed->it);
|
|
}
|
|
|
|
static void
|
|
ctxpopup_preview_dismiss_cb(void *data, Evas_Object *obj,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
|
|
//Since the ctxpopup will be shown again, Don't revert the focus.
|
|
elm_object_tree_focus_allow_set(ed->layout, EINA_TRUE);
|
|
elm_object_focus_set(ed->en_edit, EINA_TRUE);
|
|
evas_object_smart_callback_call(ed->enventor, SIG_CTXPOPUP_DISMISSED,
|
|
ed->it);
|
|
evas_object_del(obj);
|
|
}
|
|
|
|
static void
|
|
ctxpopup_del_cb(void *data, Evas *e EINA_UNUSED, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
ed->ctxpopup = NULL;
|
|
}
|
|
|
|
//This function is called when user press up/down key or mouse wheel up/down
|
|
static void
|
|
preview_img_relay_show(edit_data *ed, Evas_Object *ctxpopup, Eina_Bool next)
|
|
{
|
|
if (next) elm_entry_cursor_down(ed->en_edit);
|
|
else elm_entry_cursor_up(ed->en_edit);
|
|
|
|
Evas_Object *textblock = elm_entry_textblock_get(ed->en_edit);
|
|
Evas_Textblock_Cursor *cursor = evas_object_textblock_cursor_get(textblock);
|
|
const char *str = evas_textblock_cursor_paragraph_text_get(cursor);
|
|
char *text = elm_entry_markup_to_utf8(str);
|
|
|
|
//Compute current ctxpopup position.
|
|
Evas_Coord x, y, h;
|
|
evas_object_geometry_get(ctxpopup, &x, &y, NULL, NULL);
|
|
elm_entry_cursor_geometry_get(ed->en_edit, NULL, NULL, NULL, &h);
|
|
|
|
if (next) y += h;
|
|
else y -= h;
|
|
|
|
//Limit the ctxpopup position in the scroller vertical zone.
|
|
Evas_Coord scrl_y, scrl_h;
|
|
evas_object_geometry_get(ed->scroller, NULL, &scrl_y, NULL, &scrl_h);
|
|
|
|
if (y > (scrl_y + scrl_h)) y = (scrl_y + scrl_h);
|
|
else if (y < scrl_y) y = scrl_y;
|
|
|
|
if (image_preview_show(ed, text, x, y))
|
|
{
|
|
//Set the entry selection region to next image.
|
|
const char *colon = strstr(text, ":");
|
|
if (!colon) goto end;
|
|
|
|
const char *image = strstr(text, "image");
|
|
if (!image) goto end;
|
|
|
|
//Check validation
|
|
if (0 >= (colon - image)) goto end;
|
|
|
|
//Compute new selection region.
|
|
elm_entry_cursor_line_begin_set(ed->en_edit);
|
|
int cur_pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
int begin = cur_pos + (image - text);
|
|
elm_entry_select_region_set(ed->en_edit, begin,
|
|
(begin + (int) (colon - image)));
|
|
free(text);
|
|
return;
|
|
}
|
|
end:
|
|
elm_ctxpopup_dismiss(ctxpopup);
|
|
free(text);
|
|
}
|
|
|
|
static void
|
|
ctxpopup_preview_relay_cb(void *data, Evas_Object *obj, void *event_info)
|
|
{
|
|
edit_data *ed = data;
|
|
int next = (int)(uintptr_t) event_info;
|
|
preview_img_relay_show(ed, obj, (Eina_Bool) next);
|
|
}
|
|
|
|
static Eina_Bool
|
|
image_preview_show(edit_data *ed, char *cur, Evas_Coord x, Evas_Coord y)
|
|
{
|
|
char *filename = parser_name_get(ed->pd, cur);
|
|
if (!filename) return EINA_FALSE;
|
|
|
|
char fullpath[PATH_MAX];
|
|
|
|
//1.Find the image path.
|
|
Eina_List *list = build_path_get(ENVENTOR_PATH_TYPE_IMAGE);
|
|
Eina_List *l;
|
|
char *path;
|
|
Eina_Bool found = EINA_FALSE;
|
|
|
|
EINA_LIST_FOREACH(list, l, path)
|
|
{
|
|
snprintf(fullpath, sizeof(fullpath), "%s/%s", path, filename);
|
|
if (!ecore_file_exists(fullpath)) continue;
|
|
found = EINA_TRUE;
|
|
break;
|
|
}
|
|
|
|
//2. Find in the default fault.
|
|
if (!found)
|
|
{
|
|
snprintf(fullpath, sizeof(fullpath), "%s/images/%s",
|
|
elm_app_data_dir_get(), filename);
|
|
if (ecore_file_exists(fullpath)) found = EINA_TRUE;
|
|
}
|
|
|
|
Eina_Bool succeed;
|
|
|
|
//Create Ctxpopup with the image pathes.
|
|
if (found)
|
|
{
|
|
/*In case if ctxpopup already created, then just reload image. */
|
|
if (ed->ctxpopup)
|
|
ctxpopup_img_preview_reload(ed->ctxpopup, fullpath);
|
|
else
|
|
{
|
|
ed->ctxpopup =
|
|
ctxpopup_img_preview_create(ed, fullpath,
|
|
ctxpopup_preview_dismiss_cb,
|
|
ctxpopup_preview_relay_cb);
|
|
evas_object_event_callback_add(ed->ctxpopup, EVAS_CALLBACK_DEL,
|
|
ctxpopup_del_cb, ed);
|
|
}
|
|
|
|
if (!ed->ctxpopup)
|
|
{
|
|
free(filename);
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
evas_object_move(ed->ctxpopup, x, y);
|
|
evas_object_show(ed->ctxpopup);
|
|
Enventor_Ctxpopup_Type type = ENVENTOR_CTXPOPUP_TYPE_IMAGE;
|
|
evas_object_smart_callback_call(ed->enventor, SIG_CTXPOPUP_ACTIVATED,
|
|
(void *) type);
|
|
elm_object_tree_focus_allow_set(ed->layout, EINA_FALSE);
|
|
succeed = EINA_TRUE;
|
|
}
|
|
else
|
|
{
|
|
succeed = EINA_FALSE;
|
|
}
|
|
|
|
free(filename);
|
|
|
|
return succeed;
|
|
}
|
|
|
|
static void
|
|
candidate_list_show(edit_data *ed, char *text, char *cur, char *selected)
|
|
{
|
|
attr_value * attr = parser_attribute_get(ed->pd, text, cur, selected);
|
|
if (!attr) return;
|
|
|
|
parser_attribute_value_set(attr, cur);
|
|
|
|
//Show up the list of the types
|
|
Enventor_Ctxpopup_Type type;
|
|
Evas_Object *ctxpopup =
|
|
ctxpopup_candidate_list_create(ed, attr,
|
|
ctxpopup_candidate_dismiss_cb,
|
|
ctxpopup_candidate_changed_cb,
|
|
&type);
|
|
if (!ctxpopup) return;
|
|
|
|
int x, y;
|
|
evas_pointer_output_xy_get(evas_object_evas_get(ed->en_edit), &x, &y);
|
|
evas_object_move(ctxpopup, x, y);
|
|
evas_object_show(ctxpopup);
|
|
evas_object_smart_callback_call(ed->enventor, SIG_CTXPOPUP_ACTIVATED,
|
|
(void *) type);
|
|
|
|
evas_object_event_callback_add(ctxpopup, EVAS_CALLBACK_DEL, ctxpopup_del_cb, ed);
|
|
ed->ctxpopup = ctxpopup;
|
|
elm_object_tree_focus_allow_set(ed->layout, EINA_FALSE);
|
|
}
|
|
|
|
static void
|
|
edit_cursor_double_clicked_cb(void *data, Evas_Object *obj,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
|
|
if (ed->ctrl_pressed) return;
|
|
if (!enventor_obj_ctxpopup_get(ed->enventor)) return;
|
|
|
|
char *selected = (char *) elm_entry_selection_get(obj);
|
|
if (!selected) return;
|
|
|
|
selected = elm_entry_markup_to_utf8(selected);
|
|
if (!selected) return;
|
|
|
|
if (selected[0] == '\"')
|
|
{
|
|
free(selected);
|
|
return;
|
|
}
|
|
|
|
const char *str = elm_entry_entry_get(obj);
|
|
char *text = elm_entry_markup_to_utf8(str);
|
|
int cur_pos = elm_entry_cursor_pos_get(obj);
|
|
char *cur = text + (cur_pos - strlen(selected));
|
|
|
|
/* TODO: improve parser_name_get, for recognize cases when name is absent.
|
|
* Because right now any text inside quotes that placed after selection is
|
|
* recognized as name.
|
|
*/
|
|
if ((!strcmp(selected, "image") && (strlen(selected) == 5)) ||
|
|
(!strcmp(selected, "normal") && (strlen(selected) == 6)) ||
|
|
(!strcmp(selected, "tween") && (strlen(selected) == 5)) ||
|
|
(!strcmp(selected, "image.normal") && (strlen(selected) == 12)) ||
|
|
(!strcmp(selected, "image.tween") && (strlen(selected) == 11)) ||
|
|
(!strcmp(selected, "images.image") && (strlen(selected) == 12)))
|
|
{
|
|
int x, y;
|
|
evas_pointer_output_xy_get(evas_object_evas_get(ed->en_edit), &x, &y);
|
|
image_preview_show(ed, cur, x, y);
|
|
}
|
|
else
|
|
candidate_list_show(ed, text, cur, selected);
|
|
|
|
free(selected);
|
|
free(text);
|
|
}
|
|
|
|
static void
|
|
cur_context_name_get_cb(void *data, Eina_Stringshare *state_name,
|
|
double state_value, Eina_Stringshare *part_name,
|
|
Eina_Stringshare *group_name)
|
|
{
|
|
edit_data *ed = data;
|
|
|
|
if (ed->view_sync_cb)
|
|
ed->view_sync_cb(ed->view_sync_cb_data, state_name, state_value,
|
|
part_name, group_name);
|
|
}
|
|
|
|
static void
|
|
cur_line_pos_set(edit_data *ed, Eina_Bool force)
|
|
{
|
|
Evas_Coord y, h;
|
|
elm_entry_cursor_geometry_get(ed->en_edit, NULL, &y, NULL, &h);
|
|
int line = (y / h) + 1;
|
|
|
|
if (line < 0) line = 1;
|
|
if (!force && (ed->cur_line == line)) return;
|
|
ed->cur_line = line;
|
|
|
|
Enventor_Cursor_Line cur_line;
|
|
cur_line.cur_line = line;
|
|
cur_line.max_line = ed->line_max;
|
|
evas_object_smart_callback_call(ed->enventor, SIG_CURSOR_LINE_CHANGED,
|
|
&cur_line);
|
|
}
|
|
|
|
void
|
|
edit_selection_clear(edit_data *ed)
|
|
{
|
|
if (ed->on_select_recover) return;
|
|
cur_line_pos_set(ed, EINA_TRUE);
|
|
ed->select_pos = -1;
|
|
}
|
|
|
|
static void
|
|
edit_selection_cleared_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
edit_selection_clear(ed);
|
|
}
|
|
|
|
static void
|
|
edit_selection_start_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
if (ed->select_pos != -1) return;
|
|
ed->select_pos = elm_entry_cursor_pos_get(ed->en_edit);
|
|
}
|
|
|
|
void
|
|
edit_text_insert(edit_data *ed, const char *text)
|
|
{
|
|
const char *selection = elm_entry_selection_get(ed->en_edit);
|
|
char *selection_utf8 = elm_entry_markup_to_utf8(selection);
|
|
if (!selection_utf8)
|
|
{
|
|
elm_entry_entry_set(ed->en_edit, text);
|
|
return;
|
|
}
|
|
int lenght = strlen(selection_utf8);
|
|
int pos_from = elm_entry_cursor_pos_get(ed->en_edit) - lenght;
|
|
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_edit);
|
|
Evas_Textblock_Cursor *cur = evas_object_textblock_cursor_get(tb);
|
|
int old_pos = evas_textblock_cursor_pos_get(cur);
|
|
evas_textblock_cursor_pos_set(cur, pos_from + lenght);
|
|
|
|
/* append replacement text, and add relative diff into redoundo module */
|
|
evas_textblock_cursor_pos_set(cur, pos_from + lenght);
|
|
evas_textblock_cursor_text_append(cur, text);
|
|
redoundo_text_relative_push(ed->rd, text);
|
|
|
|
Evas_Textblock_Cursor *c_1 = evas_object_textblock_cursor_new(tb);
|
|
evas_textblock_cursor_pos_set(c_1, pos_from);
|
|
|
|
Evas_Textblock_Cursor *c_2 = evas_object_textblock_cursor_new(tb);
|
|
evas_textblock_cursor_pos_set(c_2, pos_from + lenght);
|
|
/* delete replaced text, and make diff into redoundo module */
|
|
redoundo_text_push(ed->rd, selection_utf8, pos_from, lenght, EINA_FALSE);
|
|
evas_textblock_cursor_range_delete(c_1, c_2);
|
|
|
|
evas_textblock_cursor_free(c_1);
|
|
evas_textblock_cursor_free(c_2);
|
|
evas_textblock_cursor_pos_set(cur, old_pos);
|
|
|
|
elm_entry_calc_force(ed->en_edit);
|
|
|
|
edit_changed_set(ed, EINA_TRUE);
|
|
free(selection_utf8);
|
|
}
|
|
|
|
static void
|
|
edit_cursor_changed_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
cur_line_pos_set(ed, EINA_FALSE);
|
|
edit_view_sync(ed);
|
|
bracket_update(ed);
|
|
}
|
|
|
|
static void
|
|
syntax_color_full_update(edit_data *ed, Eina_Bool thread)
|
|
{
|
|
if (ed->syntax_color_lock > 0) return;
|
|
|
|
ecore_timer_del(ed->syntax_color_timer);
|
|
ed->syntax_color_timer = NULL;
|
|
|
|
if (thread)
|
|
{
|
|
if (ed->sctd) ecore_thread_cancel(ed->sctd->thread);
|
|
|
|
ed->sctd = calloc(1, sizeof(syntax_color_td));
|
|
if (!ed->sctd)
|
|
{
|
|
EINA_LOG_ERR("Failed to allocate Memory!");
|
|
return;
|
|
}
|
|
ed->sctd->ed = ed;
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_edit);
|
|
ed->sctd->text = (char *) evas_object_textblock_text_markup_get(tb);
|
|
ed->sctd->thread =
|
|
ecore_thread_run(syntax_color_thread_cb,
|
|
syntax_color_thread_end_cb,
|
|
syntax_color_thread_cancel_cb,
|
|
ed->sctd);
|
|
}
|
|
else
|
|
{
|
|
syntax_color_apply(ed, EINA_FALSE);
|
|
}
|
|
}
|
|
|
|
static void
|
|
scroller_scroll_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_SHORT_TIME);
|
|
}
|
|
|
|
static void
|
|
scroller_resize_cb(void *data, Evas *e EINA_UNUSED, Evas_Object *obj,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
Evas_Coord h;
|
|
evas_object_geometry_get(obj, NULL, NULL, NULL, &h);
|
|
|
|
if (h == ed->scroller_h) return;
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_DEFAULT_TIME);
|
|
ed->scroller_h = h;
|
|
}
|
|
|
|
static void
|
|
scroller_vbar_press_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
syntax_color_full_update(ed, EINA_TRUE);
|
|
ed->syntax_color_lock++;
|
|
}
|
|
|
|
static void
|
|
scroller_vbar_unpress_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
ed->syntax_color_lock--;
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_SHORT_TIME);
|
|
}
|
|
|
|
static void
|
|
edit_quick_jump(edit_data *ed)
|
|
{
|
|
Evas_Object *textblock = elm_entry_textblock_get(ed->en_edit);
|
|
|
|
int line1 = ed->cur_line - 1;
|
|
int line2 = ed->cur_line;
|
|
|
|
//min position case
|
|
if (line1 < 0)
|
|
{
|
|
line1 = 0;
|
|
line2 = 1;
|
|
}
|
|
|
|
//Max position case
|
|
Eina_Bool max = EINA_FALSE;
|
|
if (line2 >= ed->line_max)
|
|
{
|
|
line1 = (ed->line_max - 2);
|
|
line2 = (ed->line_max - 1);
|
|
max = EINA_TRUE;
|
|
}
|
|
|
|
Evas_Textblock_Cursor *cur1 = evas_object_textblock_cursor_new(textblock);
|
|
evas_textblock_cursor_line_set(cur1, line1);
|
|
if (max) evas_textblock_cursor_line_char_last(cur1);
|
|
|
|
Evas_Textblock_Cursor *cur2 = evas_object_textblock_cursor_new(textblock);
|
|
evas_textblock_cursor_line_set(cur2, line2);
|
|
if (max) evas_textblock_cursor_line_char_last(cur2);
|
|
char *content = evas_textblock_cursor_range_text_get(cur1, cur2,
|
|
EVAS_TEXTBLOCK_TEXT_MARKUP);
|
|
char *utf8 = elm_entry_markup_to_utf8(content);
|
|
free(content);
|
|
|
|
//Case 1. File Link?
|
|
char *file_link = utf8;
|
|
if ((file_link = strstr(utf8, "#include ")) != NULL)
|
|
{
|
|
file_link += 9; //strlen("#include "))
|
|
char *name_begin = strstr(utf8, "\"");
|
|
if (!name_begin) goto end;
|
|
name_begin++;
|
|
char *name_end = strstr(name_begin, "\"");
|
|
if (!name_end) goto end;
|
|
file_link = strndup(name_begin, name_end - name_begin);
|
|
if (file_link)
|
|
{
|
|
//Compose the absolute file path.
|
|
const char *file_name = ecore_file_file_get(ed->filepath);
|
|
if (!file_name) goto end;
|
|
|
|
char *file_path =
|
|
strndup(ed->filepath, (file_name - ed->filepath));
|
|
if (!file_path) goto end;
|
|
|
|
char buf[PATH_MAX];
|
|
snprintf(buf, sizeof(buf), "%s%s", file_path, file_link);
|
|
evas_object_smart_callback_call(ed->enventor,
|
|
SIG_FILE_OPEN_REQUESTED,
|
|
(void*)buf);
|
|
free(file_path);
|
|
free(file_link);
|
|
}
|
|
}
|
|
|
|
//TODO: Case 2. Part Link?
|
|
|
|
end:
|
|
free(utf8);
|
|
}
|
|
|
|
static Eina_Bool
|
|
edit_edc_load(edit_data *ed, const char *file_path)
|
|
{
|
|
char buf[MAX_LINE_DIGIT_CNT];
|
|
Eina_File *file = NULL;
|
|
Eina_Strbuf *strbuf_line = NULL;
|
|
char *utf8_edit = NULL;
|
|
char *markup_edit = NULL;
|
|
char *markup_line = NULL;
|
|
int line_num = 1;
|
|
Eina_Bool ret = EINA_FALSE;
|
|
|
|
ed->line_max = 0;
|
|
|
|
file = eina_file_open(file_path, EINA_FALSE);
|
|
if (!file) goto err;
|
|
|
|
strbuf_line = eina_strbuf_new();
|
|
if (!strbuf_line) goto err;
|
|
|
|
eina_stringshare_del(ed->filepath);
|
|
ed->filepath = eina_stringshare_add(file_path);
|
|
|
|
utf8_edit = eina_file_map_all(file, EINA_FILE_POPULATE);
|
|
if (!utf8_edit)
|
|
{
|
|
ed->line_max = 0;
|
|
ret = EINA_TRUE;
|
|
goto err;
|
|
}
|
|
|
|
//Check indentation.
|
|
indent_data *id = syntax_indent_data_get(ed->sh);
|
|
Eina_Bool indent_correct
|
|
= indent_text_check(id, (const char *)utf8_edit);
|
|
|
|
//Set edc text to entry.
|
|
if (enventor_obj_auto_indent_get(ed->enventor) && !indent_correct)
|
|
//Create indented markup text from utf8 text of EDC file.
|
|
markup_edit = indent_text_create(id, (const char *)utf8_edit,
|
|
&line_num);
|
|
else
|
|
markup_edit = elm_entry_utf8_to_markup(utf8_edit);
|
|
if (!markup_edit) goto err;
|
|
elm_entry_entry_set(ed->en_edit, markup_edit);
|
|
if (enventor_obj_auto_indent_get(ed->enventor) && !indent_correct)
|
|
edit_changed_set(ed, EINA_TRUE);
|
|
free(markup_edit);
|
|
|
|
//Append line numbers.
|
|
if (!eina_strbuf_append_char(strbuf_line, '1')) goto err;
|
|
if (enventor_obj_auto_indent_get(ed->enventor) && !indent_correct)
|
|
{
|
|
int num = 2;
|
|
//Use line_num given by indent_text_create().
|
|
while (num <= line_num)
|
|
{
|
|
snprintf(buf, sizeof(buf), "\n%d", num);
|
|
if (!eina_strbuf_append(strbuf_line, buf)) goto err;
|
|
num++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
char *p = utf8_edit;
|
|
int len = strlen(p);
|
|
while ((p = strchr(p, '\n')) && p < (utf8_edit + len))
|
|
{
|
|
line_num++;
|
|
++p;
|
|
snprintf(buf, sizeof(buf), "\n%d", line_num);
|
|
if (!eina_strbuf_append(strbuf_line, buf)) goto err;
|
|
}
|
|
}
|
|
|
|
markup_line = elm_entry_utf8_to_markup(eina_strbuf_string_get(strbuf_line));
|
|
if (!markup_line) goto err;
|
|
elm_entry_entry_append(ed->en_line, markup_line);
|
|
free(markup_line);
|
|
|
|
ed->cur_line = 1;
|
|
ed->line_max = line_num;
|
|
|
|
syntax_color_timer_cb(ed);
|
|
|
|
ret = EINA_TRUE;
|
|
|
|
err:
|
|
//Even any text is not inserted, line number should start with 1
|
|
if (ed->line_max == 0) line_init(ed);
|
|
if (strbuf_line) eina_strbuf_free(strbuf_line);
|
|
if (utf8_edit) eina_file_map_free(file, utf8_edit);
|
|
if (file) eina_file_close(file);
|
|
|
|
Enventor_Cursor_Line cursor_line;
|
|
cursor_line.cur_line = ed->cur_line;
|
|
cursor_line.max_line = ed->line_max;
|
|
evas_object_smart_callback_call(ed->enventor, SIG_MAX_LINE_CHANGED,
|
|
&cursor_line);
|
|
|
|
elm_entry_cursor_pos_set(ed->en_edit, 0);
|
|
|
|
return ret;
|
|
}
|
|
|
|
static void
|
|
edit_focused_cb(void *data, Evas_Object *obj EINA_UNUSED,
|
|
void *event_info EINA_UNUSED)
|
|
{
|
|
edit_data *ed = data;
|
|
evas_object_smart_callback_call(ed->enventor, SIG_FOCUSED, NULL);
|
|
}
|
|
|
|
/*****************************************************************************/
|
|
/* Externally accessible calls */
|
|
/*****************************************************************************/
|
|
|
|
void
|
|
edit_part_cursor_set(edit_data *ed,
|
|
const char *group_name,
|
|
const char *part_name)
|
|
{
|
|
#define PART_SYNTAX_CNT 13
|
|
if (!group_name || !part_name) return;
|
|
const char *text = elm_entry_entry_get(ed->en_edit);
|
|
char *utf8 = elm_entry_markup_to_utf8(text);
|
|
|
|
int part_name_size = strlen(part_name) + 3; // 2 - is quotes.
|
|
char *part_name_search = alloca(part_name_size);
|
|
snprintf(part_name_search, part_name_size, "\"%s\"", part_name);
|
|
|
|
int group_name_size = strlen(group_name) + 3; // 2 - is quotes.
|
|
char *group_name_search = alloca(group_name_size);
|
|
snprintf(group_name_search, group_name_size, "\"%s\"", group_name);
|
|
const char *group_pos = strstr(utf8, group_name_search);
|
|
if (!group_pos) return;
|
|
char *itr = strstr(group_pos, part_name_search);
|
|
const char *part_pos = itr;
|
|
|
|
/* Possible keywords for a parts*/
|
|
const char *PART[PART_SYNTAX_CNT] = { "part", "image", "textblock",
|
|
"swallow", "rect", "group", "spacer", "proxy", "text", "gradient",
|
|
"box", "table", "external" };
|
|
|
|
Eina_Bool word_present = EINA_FALSE; /* Indicate is present any word between part name and open brace '{' */
|
|
Eina_Bool found_part = EINA_FALSE;
|
|
Eina_Bool found_brace = EINA_FALSE;
|
|
|
|
/* TODO: limit the region of search by 'group { }' block. It is necessary for avoiding situations when part can be
|
|
* find inside another group. */
|
|
|
|
/* Search patterns: 'PART { "part_name" ' or 'PART { name: "part_name"'*/
|
|
for (; (itr != NULL) && (itr > group_pos) && (part_pos != NULL); itr--)
|
|
{
|
|
if ((!found_brace) && (*itr == '{'))
|
|
{
|
|
found_brace = EINA_TRUE;
|
|
if (word_present)
|
|
{
|
|
/* Check word between the part name and brace.
|
|
* This word should be a "name". In case if found
|
|
* other keyword, the search process should be
|
|
* restarted from another position. */
|
|
char *name_keyword = strstr(itr, "name");
|
|
if (!name_keyword || name_keyword > part_pos)
|
|
{
|
|
itr = strstr(part_pos + 1, part_name_search);
|
|
part_pos = itr;
|
|
found_brace = EINA_FALSE;
|
|
word_present = EINA_FALSE;
|
|
}
|
|
}
|
|
}
|
|
else if (isalpha(*itr))
|
|
{
|
|
word_present = EINA_TRUE;
|
|
}
|
|
|
|
|
|
/* If found the opening brace '{', need to parse
|
|
* the keyword, that describe this block.
|
|
* And compare this keyword with possible part keywords. */
|
|
if (found_brace)
|
|
{
|
|
char *keyword_end = NULL;
|
|
|
|
for (; (itr != NULL) && (itr > group_pos); itr--)
|
|
{
|
|
if (!keyword_end && isalpha(*itr))
|
|
{
|
|
keyword_end = itr;
|
|
}
|
|
else if (keyword_end && !isalpha(*itr))
|
|
{
|
|
/* Compare parsed keyword with possible part names. */
|
|
int i;
|
|
for ( i = 0; i < PART_SYNTAX_CNT; i++)
|
|
{
|
|
if (!strncmp(itr + 1, PART[i], strlen(PART[i])))
|
|
{
|
|
found_part = EINA_TRUE;
|
|
}
|
|
}
|
|
if (found_part)
|
|
goto finish;
|
|
else
|
|
{
|
|
itr = strstr(part_pos + 1, part_name_search);
|
|
part_pos = itr;
|
|
found_brace = EINA_FALSE;
|
|
word_present = EINA_FALSE;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
finish:
|
|
|
|
if (found_part)
|
|
{
|
|
int cur_pos = part_pos - utf8 + 1;
|
|
elm_entry_select_none(ed->en_edit);
|
|
edit_selection_region_center_set(ed, cur_pos, cur_pos + strlen(part_name));
|
|
}
|
|
|
|
free(utf8);
|
|
}
|
|
|
|
void
|
|
edit_view_sync_cb_set(edit_data *ed,
|
|
void (*cb)(void *data, Eina_Stringshare *state_name,
|
|
double state_value,
|
|
Eina_Stringshare *part_name,
|
|
Eina_Stringshare *group_name), void *data)
|
|
{
|
|
ed->view_sync_cb = cb;
|
|
ed->view_sync_cb_data = data;
|
|
|
|
if (!cb) return;
|
|
|
|
Eina_Stringshare *group_name =
|
|
parser_first_group_name_get(ed->pd, ed->en_edit);
|
|
|
|
cb(data, NULL, 0.0, NULL, group_name);
|
|
|
|
eina_stringshare_del(group_name);
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_saved_get(edit_data *ed)
|
|
{
|
|
return ed->on_save;
|
|
}
|
|
|
|
void
|
|
edit_saved_set(edit_data *ed, Eina_Bool saved)
|
|
{
|
|
ed->on_save = saved;
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_save(edit_data *ed, const char *file)
|
|
{
|
|
if (!ed->edit_changed) return EINA_FALSE;
|
|
|
|
const char *text = elm_entry_entry_get(ed->en_edit);
|
|
char *utf8 = elm_entry_markup_to_utf8(text);
|
|
FILE *fp = fopen(file, "w");
|
|
if (!fp)
|
|
{
|
|
EINA_LOG_ERR("Failed to open file \"%s\"", file);
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
fputs(utf8, fp);
|
|
fclose(fp);
|
|
free(utf8);
|
|
|
|
edit_view_sync(ed);
|
|
|
|
edit_changed_set(ed, EINA_FALSE);
|
|
edit_saved_set(ed, EINA_TRUE);
|
|
|
|
Enventor_EDC_Modified modified;
|
|
modified.self_changed = EINA_TRUE;
|
|
evas_object_smart_callback_call(ed->enventor, SIG_EDC_MODIFIED, &modified);
|
|
|
|
return EINA_TRUE;
|
|
}
|
|
|
|
void
|
|
edit_syntax_color_set(edit_data *ed, Enventor_Syntax_Color_Type color_type,
|
|
const char *val)
|
|
{
|
|
if (!ed) return;
|
|
color_set(syntax_color_data_get(ed->sh), color_type, val);
|
|
}
|
|
|
|
void
|
|
edit_syntax_color_full_apply(edit_data *ed, Eina_Bool force)
|
|
{
|
|
int lock;
|
|
|
|
if (force)
|
|
{
|
|
lock = ed->syntax_color_lock;
|
|
ed->syntax_color_lock = -1;
|
|
}
|
|
syntax_color_full_update(ed, EINA_FALSE);
|
|
|
|
if (force) ed->syntax_color_lock = lock;
|
|
else ed->syntax_color_lock++;
|
|
}
|
|
|
|
void
|
|
edit_syntax_color_partial_apply(edit_data *ed, double interval)
|
|
{
|
|
if (ed->syntax_color_lock > 0) ed->syntax_color_lock = 0;
|
|
if (interval < 0) syntax_color_partial_update(ed, SYNTAX_COLOR_DEFAULT_TIME);
|
|
else syntax_color_partial_update(ed, interval);
|
|
}
|
|
|
|
void
|
|
edit_view_sync(edit_data *ed)
|
|
{
|
|
parser_cur_context_get(ed->pd, ed->en_edit, cur_context_name_get_cb, ed,
|
|
ed->main);
|
|
}
|
|
|
|
void
|
|
edit_line_delete(edit_data *ed)
|
|
{
|
|
if (!elm_object_focus_get(ed->en_edit)) return;
|
|
|
|
Evas_Object *textblock = elm_entry_textblock_get(ed->en_edit);
|
|
|
|
int line1 = ed->cur_line - 1;
|
|
int line2 = ed->cur_line;
|
|
|
|
//min position case
|
|
if (line1 < 0)
|
|
{
|
|
line1 = 0;
|
|
line2 = 1;
|
|
}
|
|
|
|
//Max position case
|
|
Eina_Bool max = EINA_FALSE;
|
|
if (line2 >= ed->line_max)
|
|
{
|
|
line1 = (ed->line_max - 2);
|
|
line2 = (ed->line_max - 1);
|
|
max = EINA_TRUE;
|
|
}
|
|
|
|
//only one line remain. clear it.
|
|
if (ed->line_max == 1)
|
|
{
|
|
redoundo_text_push(ed->rd, elm_entry_entry_get(ed->en_edit), 0, 0,
|
|
EINA_FALSE);
|
|
elm_entry_entry_set(ed->en_edit, "");
|
|
line_init(ed);
|
|
return;
|
|
}
|
|
|
|
Evas_Textblock_Cursor *cur1 = evas_object_textblock_cursor_new(textblock);
|
|
evas_textblock_cursor_line_set(cur1, line1);
|
|
if (max) evas_textblock_cursor_line_char_last(cur1);
|
|
|
|
Evas_Textblock_Cursor *cur2 = evas_object_textblock_cursor_new(textblock);
|
|
evas_textblock_cursor_line_set(cur2, line2);
|
|
if (max) evas_textblock_cursor_line_char_last(cur2);
|
|
int cur1_pos, cur2_pos;
|
|
|
|
cur1_pos = evas_textblock_cursor_pos_get(cur1);
|
|
cur2_pos = evas_textblock_cursor_pos_get(cur2);
|
|
char *content = evas_textblock_cursor_range_text_get(cur1, cur2,
|
|
EVAS_TEXTBLOCK_TEXT_MARKUP);
|
|
|
|
evas_textblock_cursor_range_delete(cur1, cur2);
|
|
evas_textblock_cursor_free(cur1);
|
|
evas_textblock_cursor_free(cur2);
|
|
redoundo_text_push(ed->rd, content, cur1_pos, abs(cur2_pos - cur1_pos),
|
|
EINA_FALSE);
|
|
elm_entry_calc_force(ed->en_edit);
|
|
free(content);
|
|
|
|
edit_line_decrease(ed, 1);
|
|
|
|
cur_line_pos_set(ed, EINA_TRUE);
|
|
edit_changed_set(ed, EINA_TRUE);
|
|
|
|
syntax_color_partial_update(ed, SYNTAX_COLOR_DEFAULT_TIME);
|
|
}
|
|
|
|
int
|
|
edit_cur_indent_depth_get(edit_data *ed)
|
|
{
|
|
return indent_space_get(syntax_indent_data_get(ed->sh));
|
|
}
|
|
|
|
edit_data *
|
|
edit_init(Enventor_Object *enventor, Enventor_Item *it)
|
|
{
|
|
edit_data *ed = calloc(1, sizeof(edit_data));
|
|
if (!ed)
|
|
{
|
|
EINA_LOG_ERR("Failed to allocate Memory!");
|
|
return NULL;
|
|
}
|
|
ed->error_line = -1;
|
|
ed->bracket.prev_left = -1;
|
|
ed->bracket.prev_right = -1;
|
|
ed->bracket.left = -1;
|
|
ed->bracket.right = -1;
|
|
|
|
//Scroller
|
|
Evas_Object *scroller = elm_scroller_add(enventor);
|
|
evas_object_smart_member_add(scroller, enventor);
|
|
elm_scroller_policy_set(scroller, ELM_SCROLLER_POLICY_AUTO,
|
|
ELM_SCROLLER_POLICY_AUTO);
|
|
elm_object_focus_allow_set(scroller, EINA_FALSE);
|
|
evas_object_smart_callback_add(scroller, "scroll,up", scroller_scroll_cb,
|
|
ed);
|
|
evas_object_smart_callback_add(scroller, "scroll,down", scroller_scroll_cb,
|
|
ed);
|
|
evas_object_smart_callback_add(scroller, "vbar,press",
|
|
scroller_vbar_press_cb, ed);
|
|
evas_object_smart_callback_add(scroller, "vbar,unpress",
|
|
scroller_vbar_unpress_cb, ed);
|
|
evas_object_event_callback_add(scroller, EVAS_CALLBACK_RESIZE,
|
|
scroller_resize_cb, ed);
|
|
evas_object_size_hint_weight_set(scroller, EVAS_HINT_EXPAND,
|
|
EVAS_HINT_EXPAND);
|
|
evas_object_size_hint_align_set(scroller, EVAS_HINT_FILL, EVAS_HINT_FILL);
|
|
|
|
//This is hackish call to not change scroller color by widget.
|
|
evas_object_data_set(scroller, "_elm_leaveme", (void *)1);
|
|
|
|
//Layout
|
|
Evas_Object *layout = elm_layout_add(scroller);
|
|
elm_layout_file_set(layout, EDJE_PATH, "edit_layout");
|
|
evas_object_size_hint_weight_set(layout, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
|
|
evas_object_size_hint_align_set(layout, EVAS_HINT_FILL, EVAS_HINT_FILL);
|
|
elm_object_content_set(scroller, layout);
|
|
|
|
//Line Number Entry
|
|
Evas_Object *en_line = elm_entry_add(layout);
|
|
elm_object_style_set(en_line, "enventor");
|
|
evas_object_color_set(en_line, 101, 101, 101, 255);
|
|
elm_entry_editable_set(en_line, EINA_FALSE);
|
|
elm_entry_line_wrap_set(en_line, ELM_WRAP_NONE);
|
|
elm_object_focus_allow_set(en_line, EINA_FALSE);
|
|
evas_object_size_hint_weight_set(en_line, 0, EVAS_HINT_EXPAND);
|
|
evas_object_size_hint_align_set(en_line, 0, EVAS_HINT_FILL);
|
|
elm_object_part_content_set(layout, "elm.swallow.linenumber", en_line);
|
|
|
|
//EDC Editor Entry
|
|
Evas_Object *en_edit = elm_entry_add(layout);
|
|
elm_object_style_set(en_edit, "enventor");
|
|
elm_object_focus_highlight_style_set(en_edit, "blank");
|
|
elm_entry_cnp_mode_set(en_edit, ELM_CNP_MODE_PLAINTEXT);
|
|
elm_entry_context_menu_disabled_set(en_edit, EINA_TRUE);
|
|
elm_entry_line_wrap_set(en_edit, ELM_WRAP_NONE);
|
|
evas_object_smart_callback_add(en_edit, "focused", edit_focused_cb, ed);
|
|
evas_object_smart_callback_add(en_edit, "changed,user", edit_changed_cb, ed);
|
|
evas_object_smart_callback_add(en_edit, "cursor,changed",
|
|
edit_cursor_changed_cb, ed);
|
|
evas_object_smart_callback_add(en_edit, "clicked,double",
|
|
edit_cursor_double_clicked_cb, ed);
|
|
evas_object_smart_callback_add(en_edit, "selection,cleared",
|
|
edit_selection_cleared_cb, ed);
|
|
evas_object_smart_callback_add(en_edit, "selection,start",
|
|
edit_selection_start_cb, ed);
|
|
evas_object_size_hint_weight_set(en_edit, EVAS_HINT_EXPAND,
|
|
EVAS_HINT_EXPAND);
|
|
evas_object_size_hint_align_set(en_edit, EVAS_HINT_FILL, EVAS_HINT_FILL);
|
|
elm_object_focus_set(en_edit, EINA_TRUE);
|
|
elm_object_part_content_set(layout, "elm.swallow.edit", en_edit);
|
|
|
|
/* FIXME: This is a temporary patch to remove focus highlight on template
|
|
selection button of new file open. (enventor -t)
|
|
Without calling evas_object_show() here, en_edit cannot get focus because
|
|
its visibility is set with false. */
|
|
evas_object_show(en_edit);
|
|
|
|
ed->scroller = scroller;
|
|
ed->en_line = en_line;
|
|
ed->en_edit = en_edit;
|
|
ed->layout = layout;
|
|
ed->enventor = enventor;
|
|
ed->it = it;
|
|
ed->cur_line = -1;
|
|
ed->select_pos = -1;
|
|
ed->pd = parser_init();
|
|
ed->rd = redoundo_init(ed, enventor);
|
|
ed->sh = syntax_init(ed);
|
|
ed->main = (enventor_object_main_item_get(ed->enventor) == ed->it);
|
|
|
|
return ed;
|
|
}
|
|
|
|
redoundo_data *
|
|
edit_redoundo_get(edit_data *ed)
|
|
{
|
|
return ed->rd;
|
|
}
|
|
|
|
Evas_Object *
|
|
edit_obj_get(edit_data *ed)
|
|
{
|
|
if (!ed) return NULL;
|
|
return ed->scroller;
|
|
}
|
|
|
|
void
|
|
edit_term(edit_data *ed)
|
|
{
|
|
if (!ed) return;
|
|
|
|
syntax_helper *sh = ed->sh;
|
|
parser_data *pd = ed->pd;
|
|
redoundo_data *rd = ed->rd;
|
|
|
|
if (ed->sctd)
|
|
{
|
|
ecore_thread_cancel(ed->sctd->thread);
|
|
ed->sctd->ed = NULL;
|
|
}
|
|
ecore_timer_del(ed->syntax_color_timer);
|
|
evas_object_del(ed->scroller);
|
|
eina_stringshare_del(ed->filepath);
|
|
|
|
free(ed);
|
|
|
|
redoundo_term(rd);
|
|
syntax_term(sh);
|
|
parser_term(pd);
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_changed_get(edit_data *ed)
|
|
{
|
|
return ed->edit_changed;
|
|
}
|
|
|
|
void
|
|
edit_changed_set(edit_data *ed, Eina_Bool changed)
|
|
{
|
|
ed->edit_changed = changed;
|
|
}
|
|
|
|
void
|
|
edit_linenumber_set(edit_data *ed, Eina_Bool linenumber)
|
|
{
|
|
if (linenumber)
|
|
elm_object_signal_emit(ed->layout, "elm,state,linenumber,show", "");
|
|
else
|
|
elm_object_signal_emit(ed->layout, "elm,state,linenumber,hide", "");
|
|
}
|
|
|
|
void
|
|
edit_font_scale_set(edit_data *ed, double font_scale)
|
|
{
|
|
if (!ed) return;
|
|
|
|
elm_object_scale_set(ed->layout, font_scale);
|
|
syntax_color_partial_update(ed, 0);
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_load(edit_data *ed, const char *edc_path)
|
|
{
|
|
parser_cancel(ed->pd);
|
|
elm_entry_entry_set(ed->en_edit, "");
|
|
elm_entry_entry_set(ed->en_line, "");
|
|
Eina_Bool ret = edit_edc_load(ed, edc_path);
|
|
if (ret) edit_changed_set(ed, EINA_TRUE);
|
|
edj_mgr_reload_need_set(EINA_TRUE);
|
|
redoundo_clear(ed->rd);
|
|
|
|
return ret;
|
|
}
|
|
|
|
Eina_Stringshare *
|
|
edit_cur_paragh_get(edit_data *ed)
|
|
{
|
|
return parser_paragh_name_get(ed->pd, ed->en_edit);
|
|
}
|
|
|
|
Eina_Stringshare *
|
|
edit_cur_prog_name_get(edit_data *ed)
|
|
{
|
|
return parser_cur_context_fast_get(ed->en_edit, "program");
|
|
}
|
|
|
|
Eina_Stringshare *
|
|
edit_cur_part_name_get(edit_data *ed)
|
|
{
|
|
return parser_cur_context_fast_get(ed->en_edit, "part");
|
|
}
|
|
|
|
int
|
|
edit_max_line_get(edit_data *ed)
|
|
{
|
|
return ed->line_max;
|
|
}
|
|
|
|
void
|
|
edit_goto(edit_data *ed, int line)
|
|
{
|
|
elm_entry_select_none(ed->en_edit);
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_edit);
|
|
Evas_Textblock_Cursor *cur = evas_object_textblock_cursor_get(tb);
|
|
evas_textblock_cursor_line_set(cur, (line - 1));
|
|
elm_entry_calc_force(ed->en_edit);
|
|
elm_object_focus_set(ed->en_edit, EINA_TRUE);
|
|
}
|
|
|
|
Evas_Object *
|
|
edit_entry_get(edit_data *ed)
|
|
{
|
|
return ed->en_edit;
|
|
}
|
|
|
|
/*TODO: this function should be more flexible.
|
|
* Will be better to change prototype like:
|
|
* line_num_highlight(edit_data *, int line_num, char *color);
|
|
* And make this function public.
|
|
*/
|
|
static void
|
|
error_line_num_highlight(edit_data *ed)
|
|
{
|
|
#define LINE_NUM_SIZE 5
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_line);
|
|
char *text = (char *) evas_object_textblock_text_markup_get(tb);
|
|
|
|
int from_line = 1;
|
|
int to_line = -1;
|
|
|
|
char *from EINA_UNUSED = NULL;
|
|
char *to EINA_UNUSED = NULL;
|
|
|
|
char *utf8 = (char *)color_cancel(NULL, syntax_color_data_get(ed->sh), text,
|
|
strlen(text), from_line, to_line, &from,
|
|
&to);
|
|
|
|
if (!utf8) return;
|
|
|
|
if (ed->error_line == -1)
|
|
{
|
|
evas_object_textblock_text_markup_set(tb, utf8);
|
|
return;
|
|
}
|
|
|
|
char line_str[LINE_NUM_SIZE];
|
|
snprintf(line_str, LINE_NUM_SIZE, "%d", ed->error_line + 1);
|
|
char *ptr = strstr(utf8, line_str);
|
|
if (!ptr) return;
|
|
|
|
Eina_Strbuf *strbuf = eina_strbuf_new();
|
|
eina_strbuf_append_length(strbuf, utf8, ptr - utf8);
|
|
eina_strbuf_append(strbuf, "<backing=on><backing_color=#ff0000>");
|
|
eina_strbuf_append_length(strbuf, utf8 + (ptr - utf8), strlen(line_str));
|
|
eina_strbuf_append(strbuf, "</backing_color><backing=off>");
|
|
eina_strbuf_append(strbuf, utf8 +((ptr - utf8) + strlen(line_str)));
|
|
evas_object_textblock_text_markup_set(tb, eina_strbuf_string_get(strbuf));
|
|
|
|
eina_strbuf_free(strbuf);
|
|
elm_entry_calc_force(ed->en_line);
|
|
#undef LINE_NUM_SIZE
|
|
}
|
|
|
|
void
|
|
edit_line_increase(edit_data *ed, int cnt)
|
|
{
|
|
char buf[MAX_LINE_DIGIT_CNT];
|
|
int i;
|
|
|
|
for (i = 0; i < cnt; i++)
|
|
{
|
|
ed->line_max++;
|
|
snprintf(buf, sizeof(buf), "<br/>%d", ed->line_max);
|
|
elm_entry_entry_append(ed->en_line, buf);
|
|
}
|
|
elm_entry_calc_force(ed->en_line);
|
|
|
|
Enventor_Cursor_Line cur_line;
|
|
cur_line.cur_line = ed->cur_line;
|
|
cur_line.max_line = ed->line_max;
|
|
evas_object_smart_callback_call(ed->enventor, SIG_MAX_LINE_CHANGED,
|
|
&cur_line);
|
|
}
|
|
|
|
void
|
|
edit_line_decrease(edit_data *ed, int cnt)
|
|
{
|
|
if (cnt < 1) return;
|
|
|
|
Evas_Object *textblock = elm_entry_textblock_get(ed->en_line);
|
|
Evas_Textblock_Cursor *cur1 = evas_object_textblock_cursor_new(textblock);
|
|
Evas_Textblock_Cursor *cur2 = evas_object_textblock_cursor_new(textblock);
|
|
|
|
int i = cnt;
|
|
while (i)
|
|
{
|
|
evas_textblock_cursor_paragraph_last(cur1);
|
|
evas_textblock_cursor_paragraph_prev(cur1);
|
|
evas_textblock_cursor_paragraph_last(cur2);
|
|
evas_textblock_cursor_range_delete(cur1, cur2);
|
|
i--;
|
|
}
|
|
|
|
evas_textblock_cursor_free(cur1);
|
|
evas_textblock_cursor_free(cur2);
|
|
|
|
elm_entry_calc_force(ed->en_line);
|
|
|
|
ed->line_max -= cnt;
|
|
|
|
if (ed->line_max < 1) line_init(ed);
|
|
|
|
Enventor_Cursor_Line cur_line;
|
|
cur_line.cur_line = ed->cur_line;
|
|
cur_line.max_line = ed->line_max;
|
|
evas_object_smart_callback_call(ed->enventor, SIG_MAX_LINE_CHANGED,
|
|
&cur_line);
|
|
}
|
|
|
|
void
|
|
edit_redoundo_region_push(edit_data *ed, int cursor_pos1, int cursor_pos2)
|
|
{
|
|
redoundo_entry_region_push(ed->rd, cursor_pos1, cursor_pos2);
|
|
}
|
|
|
|
void
|
|
edit_disabled_set(edit_data *ed, Eina_Bool disabled)
|
|
{
|
|
elm_object_tree_focus_allow_set(ed->layout, !disabled);
|
|
|
|
if (disabled)
|
|
{
|
|
elm_object_signal_emit(ed->layout, "elm,state,disabled", "");
|
|
elm_entry_select_none(ed->en_edit);
|
|
}
|
|
else
|
|
{
|
|
elm_object_signal_emit(ed->layout, "elm,state,enabled", "");
|
|
elm_object_focus_set(ed->en_edit, EINA_TRUE);
|
|
}
|
|
|
|
//Turn off the part highlight in case of disable.
|
|
if (disabled) view_part_highlight_set(VIEW_DATA, NULL);
|
|
|
|
//Reset whatever ctrl pressed is on.
|
|
ed->ctrl_pressed = EINA_FALSE;
|
|
ed->disabled = disabled;
|
|
}
|
|
|
|
void
|
|
edit_error_set(edit_data *ed, int line, const char *target)
|
|
{
|
|
ed->error_line = line;
|
|
ed->error_target = target;
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_ctxpopup_visible_get(edit_data *ed)
|
|
{
|
|
if (!ed) return EINA_FALSE;
|
|
return (ed->ctxpopup ? EINA_TRUE : EINA_FALSE);
|
|
}
|
|
|
|
void
|
|
edit_ctxpopup_dismiss(edit_data *ed)
|
|
{
|
|
if (ed && ed->ctxpopup) elm_ctxpopup_dismiss(ed->ctxpopup);
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_redoundo(edit_data *ed, Eina_Bool undo)
|
|
{
|
|
int lines;
|
|
Eina_Bool changed;
|
|
|
|
if (undo) lines = redoundo_undo(ed->rd, &changed);
|
|
else lines = redoundo_redo(ed->rd, &changed);
|
|
if (!changed) return EINA_FALSE;
|
|
|
|
if (lines > 0) edit_line_increase(ed, lines);
|
|
else edit_line_decrease(ed, abs(lines));
|
|
|
|
edit_changed_set(ed, EINA_TRUE);
|
|
syntax_color_full_update(ed, EINA_TRUE);
|
|
|
|
return EINA_TRUE;
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_key_down_event_dispatch(edit_data *ed, const char *key)
|
|
{
|
|
if (ed->disabled) return EINA_FALSE;
|
|
//Control Key
|
|
if (!strcmp("Control_L", key))
|
|
{
|
|
ed->ctrl_pressed = EINA_TRUE;
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
if (ed->ctrl_pressed)
|
|
{
|
|
//Undo
|
|
if (!strcmp(key, "z") || !strcmp(key, "Z"))
|
|
{
|
|
edit_redoundo(ed, EINA_TRUE);
|
|
return EINA_TRUE;
|
|
}
|
|
//Redo
|
|
if (!strcmp(key, "r") || !strcmp(key, "R"))
|
|
{
|
|
edit_redoundo(ed, EINA_FALSE);
|
|
return EINA_TRUE;
|
|
}
|
|
}
|
|
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
static char*
|
|
cursor_part_name_get(edit_data *ed)
|
|
{
|
|
int part_begin, part_end;
|
|
part_begin = part_end = -1;
|
|
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_edit);
|
|
Evas_Textblock_Cursor *cur = evas_object_textblock_cursor_get(tb);
|
|
Evas_Textblock_Cursor *cur_l = evas_object_textblock_cursor_new(tb);
|
|
Evas_Textblock_Cursor *cur_r = evas_object_textblock_cursor_new(tb);
|
|
|
|
int cur_pos = evas_textblock_cursor_pos_get(cur);
|
|
evas_textblock_cursor_pos_set(cur_l, cur_pos);
|
|
evas_textblock_cursor_pos_set(cur_r, cur_pos);
|
|
|
|
//Search the end character to the left
|
|
Eina_Bool is_prev = EINA_TRUE;
|
|
char *ch_l = NULL;
|
|
ch_l = evas_textblock_cursor_content_get(cur_l);
|
|
if (!ch_l) goto end;
|
|
/* If current character is ", move cursor to the previous character
|
|
to find part name correctly */
|
|
if (*ch_l == '\"')
|
|
is_prev = evas_textblock_cursor_char_prev(cur_l);
|
|
|
|
while (is_prev)
|
|
{
|
|
ch_l = evas_textblock_cursor_content_get(cur_l);
|
|
if (!ch_l || (*ch_l == '\n') || (*ch_l == ';') || (*ch_l == '\0'))
|
|
break;
|
|
if (*ch_l == '\"')
|
|
{
|
|
evas_textblock_cursor_char_next(cur_l);
|
|
part_begin = evas_textblock_cursor_pos_get(cur_l);
|
|
break;
|
|
}
|
|
is_prev = evas_textblock_cursor_char_prev(cur_l);
|
|
}
|
|
if (part_begin == -1) goto end;
|
|
|
|
//Search the end character to the right
|
|
Eina_Bool is_next = EINA_TRUE;
|
|
char *ch_r = NULL;
|
|
while (is_next)
|
|
{
|
|
ch_r = evas_textblock_cursor_content_get(cur_r);
|
|
if (!ch_r || (*ch_r == '\n') || (*ch_r == ';') || (*ch_r == '\0'))
|
|
break;
|
|
if (*ch_r == '\"')
|
|
{
|
|
part_end = evas_textblock_cursor_pos_get(cur_r);
|
|
break;
|
|
}
|
|
is_next = evas_textblock_cursor_char_next(cur_r);
|
|
}
|
|
if (part_end == -1) goto end;
|
|
|
|
//Verify the part name
|
|
if (part_begin != part_end)
|
|
{
|
|
char *cur_part_name =
|
|
evas_textblock_cursor_range_text_get(cur_l, cur_r,
|
|
EVAS_TEXTBLOCK_TEXT_PLAIN);
|
|
if (!cur_part_name) goto end;
|
|
|
|
Eina_List *l;
|
|
char *part_name;
|
|
Eina_List *parts = view_parts_list_get(edj_mgr_view_get(NULL));
|
|
EINA_LIST_FOREACH(parts, l, part_name)
|
|
{
|
|
//If part is detected
|
|
if (!strcmp(part_name, cur_part_name))
|
|
return cur_part_name;
|
|
}
|
|
free(cur_part_name);
|
|
}
|
|
|
|
end:
|
|
evas_textblock_cursor_free(cur_l);
|
|
evas_textblock_cursor_free(cur_r);
|
|
return NULL;
|
|
}
|
|
|
|
static void
|
|
goto_part_name(edit_data *ed, const char *part_name)
|
|
{
|
|
//Find current group name for searching part
|
|
Eina_Stringshare *group_name =
|
|
parser_cur_context_group_name_get(ed->pd, ed->en_edit, ed->main);
|
|
if (!group_name) return;
|
|
|
|
const char *text = elm_entry_entry_get(ed->en_edit);
|
|
char *utf8 = elm_entry_markup_to_utf8(text);
|
|
|
|
//Find part name in current group
|
|
const char *part_type =
|
|
part_type_str_convert(view_part_type_get(edj_mgr_view_get(NULL),
|
|
part_name));
|
|
if (!part_type) goto end;
|
|
|
|
const char *start_pos =
|
|
parser_part_pos_get(utf8,
|
|
(utf8 + strlen(utf8)),
|
|
group_name,
|
|
part_name,
|
|
part_type);
|
|
if (!start_pos) goto end;
|
|
|
|
//Select part name
|
|
edit_selection_region_center_set(ed,
|
|
(start_pos - utf8),
|
|
(start_pos - utf8 + strlen(part_name)));
|
|
|
|
end:
|
|
eina_stringshare_del(group_name);
|
|
free(utf8);
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_key_up_event_dispatch(edit_data *ed, const char *key)
|
|
{
|
|
if (ed->disabled) return EINA_FALSE;
|
|
|
|
//Control Key
|
|
if (!strcmp("Control_L", key))
|
|
ed->ctrl_pressed = EINA_FALSE;
|
|
|
|
//Quick Jump
|
|
if (!strcmp("F3", key))
|
|
{
|
|
char *part_name = cursor_part_name_get(ed);
|
|
//Case 1: cursor on part name
|
|
if (part_name)
|
|
{
|
|
goto_part_name(ed, part_name);
|
|
free(part_name);
|
|
}
|
|
//Case 2: cursor on filepath
|
|
else
|
|
edit_quick_jump(ed);
|
|
}
|
|
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
|
|
const char *
|
|
edit_file_get(edit_data *ed)
|
|
{
|
|
return ed->filepath;
|
|
}
|
|
|
|
void
|
|
edit_selection_region_center_set(edit_data *ed, int start, int end)
|
|
{
|
|
Evas_Coord region_y, region_h;
|
|
Evas_Coord cursor_y, cursor_h;
|
|
|
|
//Calculate line of selection region
|
|
elm_entry_cursor_pos_set(ed->en_edit, start);
|
|
elm_entry_cursor_geometry_get(ed->en_edit, NULL, &cursor_y, NULL, &cursor_h);
|
|
int cur_line = (cursor_y / cursor_h) + 1;
|
|
|
|
//Calculate current region of scroller
|
|
elm_scroller_region_get(ed->scroller, NULL, ®ion_y, NULL, ®ion_h);
|
|
|
|
|
|
int line;
|
|
//Case 1: selection region is above the centor of scroller region
|
|
if (((region_y + (region_h / 2))) > cursor_y)
|
|
{
|
|
line = cur_line - (int)((region_h / cursor_h) / 2);
|
|
if (line < 1) line = 1;
|
|
}
|
|
//Case 2: selection region is below the center of scroller region
|
|
else
|
|
{
|
|
line = cur_line + 2 + (int)((region_h / cursor_h) / 2);
|
|
if (line > ed->line_max) line = ed->line_max;
|
|
}
|
|
|
|
//Move the scroller for selection align
|
|
Evas_Object *tb = elm_entry_textblock_get(ed->en_edit);
|
|
Evas_Textblock_Cursor *cur = evas_object_textblock_cursor_get(tb);
|
|
evas_textblock_cursor_line_set(cur, (line - 1));
|
|
elm_entry_cursor_geometry_get(ed->en_edit, NULL, ®ion_y, NULL, NULL);
|
|
elm_scroller_region_show(ed->scroller, 0, region_y, 0, 0);
|
|
|
|
//Select region
|
|
elm_entry_select_region_set(ed->en_edit, start, end);
|
|
}
|
|
|
|
void
|
|
edit_select_none(edit_data *ed)
|
|
{
|
|
elm_entry_select_none(ed->en_edit);
|
|
}
|
|
|
|
void
|
|
edit_cursor_pos_set(edit_data *ed, int position)
|
|
{
|
|
elm_entry_cursor_pos_set(ed->en_edit, position);
|
|
}
|
|
|
|
int
|
|
edit_cursor_pos_get(edit_data *ed)
|
|
{
|
|
return elm_entry_cursor_pos_get(ed->en_edit);
|
|
}
|
|
|
|
const char *
|
|
edit_selection_get(edit_data *ed)
|
|
{
|
|
return elm_entry_selection_get(ed->en_edit);
|
|
}
|
|
|
|
const char *
|
|
edit_text_get(edit_data *ed)
|
|
{
|
|
return elm_entry_entry_get(ed->en_edit);
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_is_main_file(edit_data *ed)
|
|
{
|
|
return ed->main;
|
|
}
|
|
|
|
void
|
|
edit_focus_set(edit_data *ed, Eina_Bool focus)
|
|
{
|
|
elm_object_focus_set(ed->en_edit, focus);
|
|
}
|
|
|
|
Eina_Bool
|
|
edit_focus_get(edit_data *ed)
|
|
{
|
|
return elm_object_focus_get(ed->en_edit);
|
|
}
|
|
|
|
Eina_List *
|
|
edit_group_list_get(edit_data *ed)
|
|
{
|
|
if (!ed) return NULL;
|
|
|
|
return parser_group_list_get(ed->pd, ed->en_edit);
|
|
}
|
|
|
|
|