1 #include <Elementary.h>
5 * @defgroup Index Index
7 * An index object is a type of list that categorizes items in it
11 typedef struct _Widget_Data Widget_Data;
16 Evas_Object *event[2];
17 Evas_Object *bx[2]; // 2 - for now all that's supported
18 Eina_List *items; // 1 list. yes N levels, but only 2 for now and # of items will be small
22 Eina_Bool level_active[2];
23 Eina_Bool horizontal : 1;
28 struct _Elm_Index_Item
35 Eina_Bool selected : 1;
38 static const char *widtype = NULL;
39 static void _del_hook(Evas_Object *obj);
40 static void _theme_hook(Evas_Object *obj);
41 static void _sizing_eval(Evas_Object *obj);
42 static void _index_box_auto_fill(Evas_Object *obj, Evas_Object *box, int level);
43 static void _index_box_clear(Evas_Object *obj, Evas_Object *box, int level);
44 static void _item_free(Elm_Index_Item *it);
47 _del_hook(Evas_Object *obj)
49 Widget_Data *wd = elm_widget_data_get(obj);
51 Eina_List *l, *clear = NULL;
53 _index_box_clear(obj, wd->bx[wd->level], wd->level);
54 _index_box_clear(obj, wd->bx[0], 0);
55 EINA_LIST_FOREACH(wd->items, l, it) clear = eina_list_append(clear, it);
56 EINA_LIST_FREE(clear, it) _item_free(it);
57 if (wd->delay) ecore_timer_del(wd->delay);
62 _layout(Evas_Object *o, Evas_Object_Box_Data *priv, void *data)
64 Widget_Data *wd = data;
66 _els_box_layout(o, priv, wd->horizontal, 1);
70 _theme_hook(Evas_Object *obj)
72 Widget_Data *wd = elm_widget_data_get(obj);
74 _index_box_clear(obj, wd->bx[0], 0);
75 _index_box_clear(obj, wd->bx[1], 1);
77 _elm_theme_object_set(obj, wd->base, "index", "base/horizontal", elm_widget_style_get(obj));
79 _elm_theme_object_set(obj, wd->base, "index", "base/vertical", elm_widget_style_get(obj));
80 edje_object_part_swallow(wd->base, "elm.swallow.event.0", wd->event[0]);
81 edje_object_part_swallow(wd->base, "elm.swallow.index.0", wd->bx[0]);
82 if (edje_object_part_exists(wd->base, "elm.swallow.index.1"))
86 wd->bx[1] = evas_object_box_add(evas_object_evas_get(wd->base));
87 evas_object_box_layout_set(wd->bx[1], _layout, wd, NULL);
88 elm_widget_sub_object_add(obj, wd->bx[1]);
90 edje_object_part_swallow(wd->base, "elm.swallow.index.1", wd->bx[1]);
91 evas_object_show(wd->bx[1]);
95 evas_object_del(wd->bx[1]);
98 if (edje_object_part_exists(wd->base, "elm.swallow.event.1"))
102 Evas_Coord minw = 0, minh = 0;
104 wd->event[1] = evas_object_rectangle_add(evas_object_evas_get(wd->base));
105 evas_object_color_set(wd->event[1], 0, 0, 0, 0);
106 evas_object_size_hint_min_set(wd->event[1], minw, minh);
108 elm_coords_finger_size_adjust(1, &minw, 1, &minh);
109 elm_widget_sub_object_add(obj, wd->event[1]);
111 edje_object_part_swallow(wd->base, "elm.swallow.event.1", wd->event[1]);
113 else if (wd->event[1])
115 evas_object_del(wd->event[1]);
118 edje_object_message_signal_process(wd->base);
119 edje_object_scale_set(wd->base, elm_widget_scale_get(obj) * _elm_config->scale);
121 _index_box_auto_fill(obj, wd->bx[0], 0);
124 _index_box_auto_fill(obj, wd->bx[1], 1);
128 _sizing_eval(Evas_Object *obj)
130 Widget_Data *wd = elm_widget_data_get(obj);
131 Evas_Coord minw = -1, minh = -1, maxw = -1, maxh = -1;
133 elm_coords_finger_size_adjust(1, &minw, 1, &minh);
134 edje_object_size_min_restricted_calc(wd->base, &minw, &minh, minw, minh);
135 elm_coords_finger_size_adjust(1, &minw, 1, &minh);
136 evas_object_size_hint_min_set(obj, minw, minh);
137 evas_object_size_hint_max_set(obj, maxw, maxh);
140 static Elm_Index_Item *
141 _item_new(Evas_Object *obj, const char *letter, const void *item)
143 Widget_Data *wd = elm_widget_data_get(obj);
145 if (!wd) return NULL;
146 it = calloc(1, sizeof(Elm_Index_Item));
147 if (!it) return NULL;
149 it->letter = eina_stringshare_add(letter);
151 it->level = wd->level;
155 static Elm_Index_Item *
156 _item_find(Evas_Object *obj, const void *item)
158 Widget_Data *wd = elm_widget_data_get(obj);
161 if (!wd) return NULL;
162 EINA_LIST_FOREACH(wd->items, l, it)
163 if (it->data == item) return it;
168 _item_free(Elm_Index_Item *it)
170 Widget_Data *wd = elm_widget_data_get(it->obj);
172 wd->items = eina_list_remove(wd->items, it);
173 if (it->base) evas_object_del(it->base);
174 eina_stringshare_del(it->letter);
178 // FIXME: always have index filled
180 _index_box_auto_fill(Evas_Object *obj, Evas_Object *box, int level)
182 Widget_Data *wd = elm_widget_data_get(obj);
185 Evas_Coord mw, mh, w, h;
188 if (wd->level_active[level]) return;
189 evas_object_geometry_get(box, NULL, NULL, &w, &h);
190 EINA_LIST_FOREACH(wd->items, l, it)
193 const char *stacking;
195 if (it->level != level) continue;
196 o = edje_object_add(evas_object_evas_get(obj));
199 _elm_theme_object_set(obj, o, "index", "item_odd/vertical", elm_widget_style_get(obj));
201 _elm_theme_object_set(obj, o, "index", "item/vertical", elm_widget_style_get(obj));
202 edje_object_part_text_set(o, "elm.text", it->letter);
203 edje_object_size_min_restricted_calc(o, &mw, &mh, 0, 0);
204 evas_object_size_hint_min_set(o, mw, mh);
205 evas_object_size_hint_weight_set(o, 1.0, 1.0);
206 evas_object_size_hint_align_set(o, -1.0, -1.0);
207 elm_widget_sub_object_add(obj, o);
208 evas_object_box_append(box, o);
209 stacking = edje_object_data_get(o, "stacking");
212 if (!strcmp(stacking, "below")) evas_object_lower(o);
213 else if (!strcmp(stacking, "above")) evas_object_raise(o);
217 evas_object_smart_calculate(box); // force a calc so we know the size
218 evas_object_size_hint_min_get(box, &mw, &mh);
221 _index_box_clear(obj, box, level);
224 // FIXME: only i objects fit! try again. overflows right now
228 evas_object_smart_calculate(box);
229 wd->level_active[level] = 1;
233 _index_box_clear(Evas_Object *obj, Evas_Object *box __UNUSED__, int level)
235 Widget_Data *wd = elm_widget_data_get(obj);
239 if (!wd->level_active[level]) return;
240 EINA_LIST_FOREACH(wd->items, l, it)
242 if (!it->base) continue;
243 if (it->level != level) continue;
244 evas_object_del(it->base);
247 wd->level_active[level] = 0;
251 _delay_change(void *data)
253 Widget_Data *wd = elm_widget_data_get(data);
255 if (!wd) return ECORE_CALLBACK_CANCEL;
257 d = (void *)elm_index_item_selected_get(data, wd->level);
258 if (d) evas_object_smart_callback_call(data, "delay,changed", d);
259 return ECORE_CALLBACK_CANCEL;
263 _sel_eval(Evas_Object *obj, Evas_Coord evx, Evas_Coord evy)
265 Widget_Data *wd = elm_widget_data_get(obj);
266 Elm_Index_Item *it, *it_closest, *it_last;
268 Evas_Coord x, y, w, h, bx, by, bw, bh, xx, yy;
271 Eina_Bool change = EINA_FALSE;
272 char *label = NULL, *last = NULL;
275 for (i = 0; i <= wd->level; i++)
280 evas_object_geometry_get(wd->bx[i], &bx, &by, &bw, &bh);
281 EINA_LIST_FOREACH(wd->items, l, it)
283 if (!((it->level == i) && (it->base))) continue;
284 if ((it->base) && (it->level != wd->level))
298 evas_object_geometry_get(it->base, &x, &y, &w, &h);
303 x = (x * x) + (y * y);
304 if ((x < dist) || (!it_closest))
307 cdv = (double)(xx - bx) / (double)bw;
309 cdv = (double)(yy - by) / (double)bh;
314 if ((i == 0) && (wd->level == 0))
315 edje_object_part_drag_value_set(wd->base, "elm.dragable.index.1",
317 if (it_closest) it_closest->selected = 1;
318 if (it_closest != it_last)
323 const char *stacking, *selectraise;
326 edje_object_signal_emit(it->base, "elm,state,inactive", "elm");
327 stacking = edje_object_data_get(it->base, "stacking");
328 selectraise = edje_object_data_get(it->base, "selectraise");
329 if ((selectraise) && (!strcmp(selectraise, "on")))
331 if ((stacking) && (!strcmp(stacking, "below")))
332 evas_object_lower(it->base);
337 const char *selectraise;
340 edje_object_signal_emit(it->base, "elm,state,active", "elm");
341 selectraise = edje_object_data_get(it->base, "selectraise");
342 if ((selectraise) && (!strcmp(selectraise, "on")))
343 evas_object_raise(it->base);
344 evas_object_smart_callback_call((void *)obj, "changed", (void *)it->data);
345 if (wd->delay) ecore_timer_del(wd->delay);
346 wd->delay = ecore_timer_add(0.2, _delay_change, obj);
353 last = strdup(it->letter);
356 if (!label) label = strdup(last);
359 label = realloc(label, strlen(label) + strlen(last) + 1);
363 last = strdup(it->letter);
367 if (!label) label = strdup("");
368 if (!last) last = strdup("");
369 edje_object_part_text_set(wd->base, "elm.text.body", label);
370 edje_object_part_text_set(wd->base, "elm.text", last);
376 _wheel(void *data, Evas *e __UNUSED__, Evas_Object *o __UNUSED__, void *event_info __UNUSED__)
378 Widget_Data *wd = elm_widget_data_get(data);
379 // Evas_Event_Mouse_Wheel *ev = event_info;
380 // Evas_Object *obj = o;
385 _mouse_down(void *data, Evas *e __UNUSED__, Evas_Object *o __UNUSED__, void *event_info)
387 Widget_Data *wd = elm_widget_data_get(data);
388 Evas_Event_Mouse_Down *ev = event_info;
391 if (ev->button != 1) return;
393 evas_object_geometry_get(wd->base, &x, &y, NULL, NULL);
394 wd->dx = ev->canvas.x - x;
395 wd->dy = ev->canvas.y - y;
396 elm_index_active_set(data, 1);
397 _sel_eval(data, ev->canvas.x, ev->canvas.y);
398 edje_object_part_drag_value_set(wd->base, "elm.dragable.pointer",
403 _mouse_up(void *data, Evas *e __UNUSED__, Evas_Object *o __UNUSED__, void *event_info)
405 Widget_Data *wd = elm_widget_data_get(data);
406 Evas_Event_Mouse_Up *ev = event_info;
409 if (ev->button != 1) return;
411 d = (void *)elm_index_item_selected_get(data, wd->level);
412 if (d) evas_object_smart_callback_call(data, "selected", d);
413 elm_index_active_set(data, 0);
414 edje_object_signal_emit(wd->base, "elm,state,level,0", "elm");
418 _mouse_move(void *data, Evas *e __UNUSED__, Evas_Object *o __UNUSED__, void *event_info)
420 Widget_Data *wd = elm_widget_data_get(data);
421 Evas_Event_Mouse_Move *ev = event_info;
422 Evas_Coord minw = 0, minh = 0, x, y, dx, dy, adx, ady;
425 if (!wd->down) return;
426 elm_coords_finger_size_adjust(1, &minw, 1, &minh);
427 evas_object_geometry_get(wd->base, &x, &y, NULL, NULL);
428 x = ev->cur.canvas.x - x;
429 y = ev->cur.canvas.y - y;
432 if (adx < 0) adx = -dx;
435 if (ady < 0) ady = -dy;
436 edje_object_part_drag_value_set(wd->base, "elm.dragable.pointer", x, y);
447 snprintf(buf, sizeof(buf), "elm,state,level,%i", wd->level);
448 edje_object_signal_emit(wd->base, buf, "elm");
449 evas_object_smart_callback_call(data, "level,up", NULL);
457 snprintf(buf, sizeof(buf), "elm,state,level,%i", wd->level);
458 edje_object_signal_emit(wd->base, buf, "elm");
459 evas_object_smart_callback_call(data, "level,down", NULL);
463 _sel_eval(data, ev->cur.canvas.x, ev->cur.canvas.y);
467 * Add a new index to the parent
469 * @param parent The parent object
470 * @return The new object or NULL if it cannot be created
475 elm_index_add(Evas_Object *parent)
481 Evas_Coord minw, minh;
483 wd = ELM_NEW(Widget_Data);
484 e = evas_object_evas_get(parent);
485 obj = elm_widget_add(e);
486 ELM_SET_WIDTYPE(widtype, "index");
487 elm_widget_type_set(obj, "index");
488 elm_widget_sub_object_add(parent, obj);
489 elm_widget_data_set(obj, wd);
490 elm_widget_del_hook_set(obj, _del_hook);
491 elm_widget_theme_hook_set(obj, _theme_hook);
493 wd->horizontal = EINA_FALSE;
495 wd->base = edje_object_add(e);
496 _elm_theme_object_set(obj, wd->base, "index", "base/vertical", "default");
497 elm_widget_resize_object_set(obj, wd->base);
499 o = evas_object_rectangle_add(e);
501 evas_object_color_set(o, 0, 0, 0, 0);
503 elm_coords_finger_size_adjust(1, &minw, 1, &minh);
504 evas_object_size_hint_min_set(o, minw, minh);
505 edje_object_part_swallow(wd->base, "elm.swallow.event.0", o);
506 elm_widget_sub_object_add(obj, o);
507 evas_object_event_callback_add(o, EVAS_CALLBACK_MOUSE_WHEEL, _wheel, obj);
508 evas_object_event_callback_add(o, EVAS_CALLBACK_MOUSE_DOWN, _mouse_down, obj);
509 evas_object_event_callback_add(o, EVAS_CALLBACK_MOUSE_UP, _mouse_up, obj);
510 evas_object_event_callback_add(o, EVAS_CALLBACK_MOUSE_MOVE, _mouse_move, obj);
512 if (edje_object_part_exists(wd->base, "elm.swallow.event.1"))
514 o = evas_object_rectangle_add(e);
516 evas_object_color_set(o, 0, 0, 0, 0);
517 evas_object_size_hint_min_set(o, minw, minh);
518 edje_object_part_swallow(wd->base, "elm.swallow.event.1", o);
519 elm_widget_sub_object_add(obj, o);
522 wd->bx[0] = evas_object_box_add(e);
523 evas_object_box_layout_set(wd->bx[0], _layout, wd, NULL);
524 elm_widget_sub_object_add(obj, wd->bx[0]);
525 edje_object_part_swallow(wd->base, "elm.swallow.index.0", wd->bx[0]);
526 evas_object_show(wd->bx[0]);
528 if (edje_object_part_exists(wd->base, "elm.swallow.index.1"))
530 wd->bx[1] = evas_object_box_add(e);
531 evas_object_box_layout_set(wd->bx[1], _layout, wd, NULL);
532 elm_widget_sub_object_add(obj, wd->bx[1]);
533 edje_object_part_swallow(wd->base, "elm.swallow.index.1", wd->bx[1]);
534 evas_object_show(wd->bx[1]);
542 * Set the active state of the index programatically
544 * @param obj The index object
545 * @param active The active starte
550 elm_index_active_set(Evas_Object *obj, Eina_Bool active)
552 ELM_CHECK_WIDTYPE(obj, widtype);
553 Widget_Data *wd = elm_widget_data_get(obj);
555 if (wd->active == active) return;
560 _index_box_clear(obj, wd->bx[1], 1);
561 _index_box_auto_fill(obj, wd->bx[0], 0);
562 edje_object_signal_emit(wd->base, "elm,state,active", "elm");
565 edje_object_signal_emit(wd->base, "elm,state,inactive", "elm");
569 * Sets the level of the item.
571 * @param obj The index object.
572 * @param level To be documented.
577 elm_index_item_level_set(Evas_Object *obj, int level)
579 ELM_CHECK_WIDTYPE(obj, widtype);
580 Widget_Data *wd = elm_widget_data_get(obj);
582 if (wd->level == level) return;
587 * Gets the level of the item.
589 * @param obj The index object
594 elm_index_item_level_get(const Evas_Object *obj)
596 ELM_CHECK_WIDTYPE(obj, widtype) 0;
597 Widget_Data *wd = elm_widget_data_get(obj);
603 * Returns the selected item.
605 * @param obj The index object.
606 * @param level to be documented.
611 elm_index_item_selected_get(const Evas_Object *obj, int level)
613 ELM_CHECK_WIDTYPE(obj, widtype) NULL;
614 Widget_Data *wd = elm_widget_data_get(obj);
617 if (!wd) return NULL;
618 EINA_LIST_FOREACH(wd->items, l, it)
619 if ((it->selected) && (it->level == level)) return it->data;
624 * Appends a new item.
626 * @param obj The index object.
627 * @param letter Letter under which the item should be indexed
628 * @param item The item to put in the index
633 elm_index_item_append(Evas_Object *obj, const char *letter, const void *item)
635 ELM_CHECK_WIDTYPE(obj, widtype);
636 Widget_Data *wd = elm_widget_data_get(obj);
639 it = _item_new(obj, letter, item);
641 wd->items = eina_list_append(wd->items, it);
642 _index_box_clear(obj, wd->bx[wd->level], wd->level);
646 * Prepends a new item.
648 * @param obj The index object.
649 * @param letter Letter under which the item should be indexed
650 * @param item The item to put in the index
655 elm_index_item_prepend(Evas_Object *obj, const char *letter, const void *item)
657 ELM_CHECK_WIDTYPE(obj, widtype);
658 Widget_Data *wd = elm_widget_data_get(obj);
662 it = _item_new(obj, letter, item);
664 wd->items = eina_list_prepend(wd->items, it);
665 _index_box_clear(obj, wd->bx[wd->level], wd->level);
669 * Append an item after @p relative in letter @p letter.
671 * @param obj The index object
672 * @param letter Letter under which the item should be indexed
673 * @param item The item to put in the index
674 * @param relative The item to put @p item after
679 elm_index_item_append_relative(Evas_Object *obj, const char *letter, const void *item, const void *relative)
681 ELM_CHECK_WIDTYPE(obj, widtype);
682 Widget_Data *wd = elm_widget_data_get(obj);
683 Elm_Index_Item *it, *it_rel;
687 elm_index_item_append(obj, letter, item);
690 it = _item_new(obj, letter, item);
691 it_rel = _item_find(obj, relative);
694 elm_index_item_append(obj, letter, item);
698 wd->items = eina_list_append_relative(wd->items, it, it_rel);
699 _index_box_clear(obj, wd->bx[wd->level], wd->level);
703 * Prepend an item before @p relative in letter @p letter.
705 * @param obj The index object
706 * @param letter Letter under which the item should be indexed
707 * @param item The item to put in the index
708 * @param relative The item to put @p item before
713 elm_index_item_prepend_relative(Evas_Object *obj, const char *letter, const void *item, const void *relative)
715 ELM_CHECK_WIDTYPE(obj, widtype);
716 Widget_Data *wd = elm_widget_data_get(obj);
717 Elm_Index_Item *it, *it_rel;
721 elm_index_item_prepend(obj, letter, item);
724 it = _item_new(obj, letter, item);
725 it_rel = _item_find(obj, relative);
728 elm_index_item_append(obj, letter, item);
732 wd->items = eina_list_prepend_relative(wd->items, it, it_rel);
733 _index_box_clear(obj, wd->bx[wd->level], wd->level);
737 * Insert a new @p item into the sorted index @p obj in @p letter.
739 * @param obj The index object
740 * @param letter Letter under which the item should be indexed
741 * @param item The item to put in the index
742 * @param cmp_func The function called for the sort of index items.
743 * @param cmp_data_func The function called for the sort of the data. It will
744 * be used when cmp_func return 0. It means the index item already exists.
745 * So, to decide which data item should be pointed by the index item, a function
746 * to compare them is needed. If this function is not provided, index items
747 * will be duplicated. If cmp_data_func returns a non-negative value, the
748 * previous index item data will be replaced by the inserted @p item. So
749 * if the previous data need to be free, it should be done in this function,
750 * because the reference will be lost.
755 elm_index_item_sorted_insert(Evas_Object *obj, const char *letter, const void *item, Eina_Compare_Cb cmp_func, Eina_Compare_Cb cmp_data_func)
757 ELM_CHECK_WIDTYPE(obj, widtype);
758 Widget_Data *wd = elm_widget_data_get(obj);
766 elm_index_item_append(obj, letter, item);
770 it = _item_new(obj, letter, item);
773 lnear = eina_list_search_sorted_near_list(wd->items, cmp_func, it, &cmp);
775 wd->items = eina_list_append_relative_list(wd->items, it, lnear);
777 wd->items = eina_list_prepend_relative_list(wd->items, it, lnear);
780 /* If cmp_data_func is not provided, append a duplicated item */
782 wd->items = eina_list_append_relative_list(wd->items, it, lnear);
785 Elm_Index_Item *p_it = eina_list_data_get(lnear);
786 if (cmp_data_func(p_it->data, it->data) >= 0)
787 p_it->data = it->data;
792 _index_box_clear(obj, wd->bx[wd->level], wd->level);
796 * Remove an item from the index.
798 * @param obj The index object
799 * @param item The item to remove from the index
804 elm_index_item_del(Evas_Object *obj, const void *item)
806 ELM_CHECK_WIDTYPE(obj, widtype);
807 Widget_Data *wd = elm_widget_data_get(obj);
810 it = _item_find(obj, item);
813 _index_box_clear(obj, wd->bx[wd->level], wd->level);
817 * Find an index item using item data.
819 * @param obj The index object
820 * @param item The item pointed by index item
821 * @return The index item pointing to @p item
825 EAPI Elm_Index_Item *
826 elm_index_item_find(Evas_Object *obj, const void *item)
828 ELM_CHECK_WIDTYPE(obj, widtype) NULL;
829 Widget_Data *wd = elm_widget_data_get(obj);
830 if (!wd) return NULL;
831 return _item_find(obj, item);
835 * Clears an index of its items.
837 * @param obj The index object.
842 elm_index_item_clear(Evas_Object *obj)
844 ELM_CHECK_WIDTYPE(obj, widtype);
845 Widget_Data *wd = elm_widget_data_get(obj);
847 Eina_List *l, *clear = NULL;
849 _index_box_clear(obj, wd->bx[wd->level], wd->level);
850 EINA_LIST_FOREACH(wd->items, l, it)
852 if (it->level != wd->level) continue;
853 clear = eina_list_append(clear, it);
855 EINA_LIST_FREE(clear, it) _item_free(it);
859 * Go to item at @p level
861 * @param obj The index object
862 * @param level The index level
867 elm_index_item_go(Evas_Object *obj, int level __UNUSED__)
869 ELM_CHECK_WIDTYPE(obj, widtype);
870 Widget_Data *wd = elm_widget_data_get(obj);
872 _index_box_auto_fill(obj, wd->bx[0], 0);
873 if (wd->level == 1) _index_box_auto_fill(obj, wd->bx[1], 1);
877 * Returns the data associated with the item.
879 * @param it The list item
880 * @return The data associated with @p it
885 elm_index_item_data_get(const Elm_Index_Item *it)
887 if (!it) return NULL;
888 return (void *)it->data;
892 * Set the data item from the index item
894 * This set a new data value.
897 * @param data The new data pointer to set
902 elm_index_item_data_set(Elm_Index_Item *it, const void *data)
909 * Gets the letter of the item.
911 * @param it The list item
912 * @return The letter of @p it
917 elm_index_item_letter_get(const Elm_Index_Item *it)
919 if (!it) return NULL;