1 #include <Elementary.h>
5 * @defgroup SegmentControl SegmentControl
8 * SegmentControl object is a horizontal control made of multiple segments,
9 * each segment functioning as a discrete button. A segmented control affords a compact means to group together a number of controls.
10 * A segmented control can display a title or an image. The UISegmentedControl object automatically resizes segments to fit proportionally
11 * within their superview unless they have a specific width set. When you add and remove segments,
12 * you can request that the action be animated with sliding and fading effects.
14 typedef struct _Widget_Data Widget_Data;
24 Elm_Segment_Item *ani_it;
27 unsigned int insert_index;
28 unsigned int del_index;
29 unsigned int cur_seg_id;
31 Eina_Bool longpressed : 1;
32 Eina_Bool selected : 1;
35 struct _Elm_Segment_Item
41 Eina_Bool delete_me : 1;
43 Ecore_Timer *long_timer;
46 static void _mouse_down(void *data, Evas *evas, Evas_Object *obj, void *event_info);
47 static void _mouse_up(void *data, Evas *e, Evas_Object *obj, void *event_info);
48 static void _signal_segment_on(void *data);
49 static void _theme_hook(Evas_Object *obj);
50 static void _item_free(Evas_Object *obj, Elm_Segment_Item *it);
51 static void _del_hook(Evas_Object *obj);
52 static void _layout(Evas_Object *o, Evas_Object_Box_Data *priv, void *data);
53 static void _update_list(Evas_Object *obj);
54 static void _refresh_segment_ids(Evas_Object *obj);
55 static void _state_value_set(Evas_Object *obj);
57 static Elm_Segment_Item* _item_new(Evas_Object *obj, const char *label, Evas_Object *icon);
58 static Elm_Segment_Item *_item_find(Evas_Object *obj, unsigned int index);
60 static int * _animator_animate_add_cb(Evas_Object *obj);
61 static int * _animator_animate_del_cb(Evas_Object *obj);
64 _on_focus_hook(void *data, Evas_Object *obj)
66 Widget_Data *wd = elm_widget_data_get(obj);
71 if (elm_widget_focus_get(obj))
73 edje_object_signal_emit((Evas_Object *)wd->seg_ctrl, "elm,action,focus", "elm");
74 evas_object_focus_set((Evas_Object *)wd->seg_ctrl, 1);
78 edje_object_signal_emit((Evas_Object *)wd->seg_ctrl, "elm,action,unfocus", "elm");
79 evas_object_focus_set((Evas_Object *)wd->seg_ctrl, 0);
80 wd->selected = EINA_FALSE;
82 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
84 if (it->segment_id == wd->cur_seg_id) {
85 edje_object_signal_emit(it->base, "elm,action,unfocus", "elm");
86 edje_object_signal_emit(it->base, "elm,state,segment,off", "elm");
87 edje_object_signal_emit(it->base, "elm,state,text,visible", "elm");
96 _mouse_up(void *data, Evas *e, Evas_Object *obj, void *event_info)
98 Elm_Segment_Item *item = (Elm_Segment_Item *) data;
99 Widget_Data *wd = elm_widget_data_get(item->obj);
103 if(wd->selected == EINA_TRUE)
105 wd->selected = EINA_FALSE;
109 if(wd->longpressed == EINA_FALSE)
111 edje_object_signal_emit(item->base, "elm,action,unfocus", "elm");
112 edje_object_signal_emit(item->base, "elm,state,text,visible", "elm");
114 if (item->long_timer)
116 ecore_timer_del(item->long_timer);
117 item->long_timer = NULL;
123 _signal_segment_on(void *data)
125 Elm_Segment_Item *item = (Elm_Segment_Item *) data;
126 Widget_Data *wd = elm_widget_data_get(item->obj);
130 if (item->long_timer)
132 ecore_timer_del(item->long_timer);
133 item->long_timer = NULL;
135 wd->longpressed = EINA_TRUE;
136 edje_object_signal_emit(item->base, "elm,state,segment,on", "elm");
137 edje_object_signal_emit(item->base, "elm,state,text,change", "elm");
139 Elm_Segment_Item *it;
142 if (item->segment_id == wd->cur_seg_id)
144 wd->cur_seg_id = item->segment_id;
145 evas_object_smart_callback_call(item->obj, "changed", (void*)wd->cur_seg_id);
148 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
150 if (it->segment_id == wd->cur_seg_id)
152 edje_object_signal_emit(it->base, "elm,action,unfocus", "elm");
153 edje_object_signal_emit(it->base, "elm,state,segment,off", "elm");
154 edje_object_signal_emit(it->base, "elm,state,text,visible", "elm");
158 wd->cur_seg_id = item->segment_id;
159 evas_object_smart_callback_call(item->obj, "changed", (void*)wd->cur_seg_id);
164 _mouse_down(void *data, Evas *evas, Evas_Object *obj, void *event_info)
166 Elm_Segment_Item *item = (Elm_Segment_Item *) data;
167 Widget_Data *wd = elm_widget_data_get(item->obj);
170 wd->longpressed = EINA_FALSE;
172 if (item->segment_id == wd->cur_seg_id)
174 wd->selected = EINA_TRUE;
178 edje_object_signal_emit(item->base, "elm,action,focus", "elm");
179 edje_object_signal_emit(item->base, "elm,state,text,visible", "elm");
181 if (item->long_timer) ecore_timer_del(item->long_timer);
182 item->long_timer = ecore_timer_add(0.5, _signal_segment_on, item);
186 _theme_hook(Evas_Object *obj)
188 _elm_theme_object_set(obj, obj, "segmented-control", "base", elm_widget_style_get(obj));
194 _item_free(Evas_Object *obj, Elm_Segment_Item *it)
196 Widget_Data *wd = elm_widget_data_get(obj);
200 wd->seg_ctrl = eina_list_remove(wd->seg_ctrl, it);
202 if(it->icon) evas_object_del(it->icon);
203 if(it->base) evas_object_del(it->base);
204 if(it->label) eina_stringshare_del(it->label);
205 if (it->long_timer) ecore_timer_del(it->long_timer);
214 _del_hook(Evas_Object *obj)
216 Widget_Data *wd = elm_widget_data_get(obj);
217 Elm_Segment_Item *it;
218 Eina_List *l, *clear = NULL;
220 EINA_LIST_FOREACH(wd->seg_ctrl, l, it) clear = eina_list_append(clear, it);
221 EINA_LIST_FREE(clear, it) _item_free(obj, it);
231 _layout(Evas_Object *o, Evas_Object_Box_Data *priv, void *data)
233 Widget_Data *wd = data;
235 _els_box_layout(o, priv, 1, 0); /* making box layout non homogenous */
241 _segment_resizing(void *data)
243 Widget_Data *wd = elm_widget_data_get((Evas_Object *)data);
245 Evas_Coord w = 0, h = 0;
247 evas_object_geometry_get(wd->base, NULL, NULL, &w, &h);
248 wd->item_width = wd->width = w;
250 _state_value_set((Evas_Object *)data);
253 static void _object_resize(void *data, Evas *e, Evas_Object *obj, void *event_info)
257 wd = elm_widget_data_get((Evas_Object *)data);
260 ecore_job_add(_segment_resizing, (Evas_Object *)data);
264 * Add a new segmentcontrol to the parent
265 * @param parent The parent object
266 * @return The new object or NULL if it cannot be created
268 * @ingroup SegmentControl SegmentControl
271 elm_segment_control_add(Evas_Object *parent)
277 wd = ELM_NEW(Widget_Data);
278 e = evas_object_evas_get(parent);
279 obj = elm_widget_add(e);
280 elm_widget_type_set(obj, "segmented-control");
281 elm_widget_sub_object_add(parent, obj);
282 elm_widget_on_focus_hook_set( obj, _on_focus_hook, NULL );
283 elm_widget_data_set(obj, wd);
284 elm_widget_del_hook_set(obj, _del_hook);
285 elm_widget_theme_hook_set(obj, _theme_hook);
287 wd->base = edje_object_add(e);
288 _elm_theme_object_set(obj, wd->base, "segmented-control", "base", "default");
289 elm_widget_resize_object_set(obj, wd->base);
290 wd->box = evas_object_box_add(e);
291 evas_object_box_layout_set(wd->box, _layout, wd, NULL);
292 elm_widget_sub_object_add(obj, wd->box);
293 edje_object_part_swallow(wd->base, "elm.swallow.content", wd->box);
294 evas_object_show(wd->box);
296 evas_object_event_callback_add(obj, EVAS_CALLBACK_RESIZE, _object_resize, obj);
299 wd->insert_index = 0;
301 wd->selected = EINA_FALSE;
306 static Elm_Segment_Item*
307 _item_new(Evas_Object *obj, const char *label, Evas_Object *icon)
309 Widget_Data *wd = elm_widget_data_get(obj);
310 if (!wd) return NULL;
312 Elm_Segment_Item *it;
313 it = calloc(1, sizeof( Elm_Segment_Item));
314 if (!it) return NULL;
318 if(obj) it->obj = obj;
319 it->delete_me = EINA_FALSE;
320 it->segment_id = wd->id;
322 it->base = edje_object_add(evas_object_evas_get(obj));
323 _elm_theme_object_set(obj, it->base, "segment", "base", elm_object_style_get(it->base));
325 if (it->label) eina_stringshare_del(it->label);
328 it->label = eina_stringshare_add(label);
335 if ((it->icon != icon) && (it->icon))
336 elm_widget_sub_object_del(obj, it->icon);
340 elm_widget_sub_object_add(obj, icon);
341 Evas_Coord minw = -1, minh = -1, maxw = -1, maxh = -1;
342 elm_coords_finger_size_adjust(1, &minw, 1, &minh);
343 elm_coords_finger_size_adjust(1, &minw, 1, &minh);
345 evas_object_size_hint_weight_set(it->base, 1.0, -1.0);
346 evas_object_size_hint_align_set(it->base, 1.0, -1.0);
347 evas_object_size_hint_min_set(it->base, -1, -1);
348 evas_object_size_hint_max_set(it->base, maxw, maxh);
351 edje_object_size_min_restricted_calc(obj, &mw, &mh, 0, 0);
352 evas_object_size_hint_weight_set(obj, 1.0, 1.0);
353 evas_object_size_hint_align_set(obj, -1.0, -1.0);
359 static void _update_list(Evas_Object *obj)
361 Widget_Data *wd = elm_widget_data_get(obj);
364 Elm_Segment_Item *it;
367 wd->count = eina_list_count(wd->seg_ctrl);
371 it = _item_find(obj, 0);
372 _elm_theme_object_set(obj, it->base, "segment", "base", "single"); edje_object_signal_emit(it->base, "elm,state,segment,on", "elm");
373 edje_object_signal_emit(it->base, "elm,state,text,visible", "elm");
374 edje_object_signal_emit(it->base, "elm,state,text,change", "elm");
375 edje_object_message_signal_process(it->base);
377 edje_object_part_text_set(it->base, "elm.text", it->label);
379 edje_object_part_swallow(it->base, "elm.swallow.content", it->icon);
380 edje_object_signal_emit(it->base, "elm,state,icon,visible", "elm");
384 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
388 _elm_theme_object_set(obj, it->base, "segment", "base", "first");
390 else if(i==wd->count-1)
392 _elm_theme_object_set(obj, it->base, "segment", "base", "last");
396 _elm_theme_object_set(obj, it->base, "segment", "base", "default");
399 edje_object_signal_emit(it->base, "elm,state,text,visible", "elm");
400 edje_object_message_signal_process(it->base);
402 edje_object_part_text_set(it->base, "elm.text", it->label);
404 edje_object_part_swallow(it->base, "elm.swallow.content", it->icon);
405 edje_object_signal_emit(it->base, "elm,state,icon,visible", "elm");
412 static void _refresh_segment_ids(Evas_Object *obj)
414 Widget_Data *wd = elm_widget_data_get(obj);
416 Elm_Segment_Item *it;
418 if (wd->insert_index && wd->cur_seg_id >= wd->insert_index)
421 wd->insert_index = 0;
425 if (wd->cur_seg_id >= wd->del_index)
430 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
437 static void _state_value_set(Evas_Object *obj)
439 Widget_Data *wd = elm_widget_data_get(obj);
441 Elm_Segment_Item *it;
443 Evas_Coord mw, mh, x, y;
445 unsigned int count = eina_list_count(wd->seg_ctrl);
447 wd->item_width = wd->width/count;
450 evas_object_geometry_get(wd->ani_it->base, &x, &y, &w1, NULL);
451 if (wd->ani_it->delete_me)
453 w1-=(wd->item_width/15);
458 w1+=(wd->item_width/15);
459 if( w1 > wd->item_width )
462 w2 = (wd->width-w1)/(count -1);
469 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
471 edje_object_size_min_restricted_calc(it->base, &mw, &mh, 0, 0);
472 evas_object_size_hint_weight_set(it->base, 1.0, 1.0);
473 evas_object_size_hint_align_set(it->base, -1.0, -1.0);
475 if(wd->ani_it && it == wd->ani_it)
477 evas_object_resize(it->base, w1, wd->height);
478 evas_object_size_hint_min_set(it->base, w1, wd->height);
479 evas_object_size_hint_max_set(it->base, w1, wd->height);
483 evas_object_resize(it->base, w2, wd->height);
484 evas_object_size_hint_min_set(it->base, w2, wd->height);
485 evas_object_size_hint_max_set(it->base, w2, wd->height);
495 _animator_animate_add_cb(Evas_Object *obj)
497 Widget_Data *wd = elm_widget_data_get(obj);
501 evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
502 if( w < wd->item_width )
504 _state_value_set(obj);
505 evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
506 return ECORE_CALLBACK_RENEW;
510 ecore_animator_del(wd->ani);
513 return ECORE_CALLBACK_CANCEL;
519 _animator_animate_del_cb(Evas_Object *obj)
521 Widget_Data *wd = elm_widget_data_get(obj);
524 evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
527 _state_value_set(obj);
528 evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
529 return ECORE_CALLBACK_RENEW;
533 _item_free(obj, wd->ani_it );
534 _refresh_segment_ids(obj);
535 ecore_animator_del(wd->ani);
539 wd->id = eina_list_count(wd->seg_ctrl);
540 return ECORE_CALLBACK_CANCEL;
545 * Add a new segment to segmentcontrol
546 * @param obj The SegmentControl object
547 * @param icon The icon object for added segment
548 * @param label The label for added segment
549 * @param animate If 1 the action be animated with sliding effects default 0.
550 * @return The new segment or NULL if it cannot be created
552 * @ingroup SegmentControl SegmentControl
555 EAPI Elm_Segment_Item *
556 elm_segment_control_add_segment(Evas_Object *obj, Evas_Object *icon, const char *label, Eina_Bool animate)
558 Widget_Data *wd = elm_widget_data_get(obj);
561 Elm_Segment_Item *it;
563 it = _item_new(obj, label, icon);
566 wd->seg_ctrl = eina_list_append(wd->seg_ctrl, it);
567 wd->id = eina_list_count(wd->seg_ctrl);
569 evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_DOWN, _mouse_down, it);
570 evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_UP, _mouse_up, it);
571 wd->insert_index = 0;
573 _refresh_segment_ids(obj);
575 if(animate && it->segment_id && wd->ani_it == NULL)
577 evas_object_resize(it->base, 1, wd->height);
579 wd->ani = ecore_animator_add( _animator_animate_add_cb, obj );
582 _state_value_set(obj);
583 evas_object_show( it->base);
585 evas_object_box_append(wd->box, it->base);
586 evas_object_smart_calculate(wd->box);
592 static Elm_Segment_Item *
593 _item_find(Evas_Object *obj, unsigned int index)
595 Widget_Data *wd = elm_widget_data_get(obj);
596 if (!wd) return NULL;
598 Elm_Segment_Item *it;
601 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
612 static Elm_Segment_Item *
613 _item_search(Evas_Object *obj, Elm_Segment_Item *item)
615 Widget_Data *wd = elm_widget_data_get(obj);
619 Elm_Segment_Item *it;
621 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
631 * Insert a new segment to segmentcontrol
632 * @param obj The SegmentControl object
633 * @param icon The icon object for added segment
634 * @param label The label for added segment
635 * @param index The position at which segment to be inserted
636 * @param animate If 1 the action be animated with sliding effects default 0.
637 * @return The new segment or NULL if it cannot be created
639 * @ingroup SegmentControl SegmentControl
642 elm_segment_control_insert_segment_at(Evas_Object *obj, Evas_Object *icon, const char *label, unsigned int index, Eina_Bool animate)
644 Widget_Data *wd = elm_widget_data_get(obj);
647 Elm_Segment_Item *it, *it_rel;
649 it = _item_new(obj, label, icon);
650 it_rel = _item_find(obj, index);
653 wd->seg_ctrl = eina_list_append(wd->seg_ctrl, it);
658 wd->seg_ctrl = eina_list_prepend_relative(wd->seg_ctrl, it, it_rel);
660 evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_DOWN, _mouse_down, it);
661 evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_UP, _mouse_up, it);
662 wd->insert_index = index;
663 wd->id = eina_list_count(wd->seg_ctrl);
664 _refresh_segment_ids(obj);
667 if(animate && it->segment_id && wd->ani_it == NULL)
670 evas_object_resize(it->base, 1, wd->height);
671 wd->ani = ecore_animator_add( _animator_animate_add_cb, obj );
674 _state_value_set(obj);
676 evas_object_show( it->base);
678 if(index >= wd->id-1)
680 evas_object_box_append(wd->box, it->base);
684 evas_object_box_insert_at(wd->box, it->base, index);
687 evas_object_smart_calculate(wd->box);
692 * Delete a segment to segmentcontrol
693 * @param obj The SegmentControl object
694 * @param item The Segment to be deleted
695 * @param animate If 1 the action be animated with sliding effects default 0.
697 * @ingroup SegmentControl SegmentControl
700 elm_segment_control_delete_segment(Evas_Object *obj, Elm_Segment_Item *item, Eina_Bool animate)
702 Widget_Data *wd = elm_widget_data_get(obj);
707 Elm_Segment_Item *it;
708 it = _item_search(obj, item);
711 wd->del_index = it->segment_id;
712 if(animate && it->segment_id && wd->ani_it == NULL)
714 it->delete_me = EINA_TRUE;
716 wd->ani = ecore_animator_add( _animator_animate_del_cb, obj );
720 evas_object_box_remove(wd->box, it->base);
721 evas_object_smart_calculate(wd->box);
723 _refresh_segment_ids(obj);
724 _state_value_set(obj);
727 wd->id = eina_list_count(wd->seg_ctrl);
732 * Delete a segment to segmentcontrol
733 * @param obj The SegmentControl object
734 * @param index The position at which segment to be deleted
735 * @param animate If 1 the action be animated with sliding effects default 0.
737 * @ingroup SegmentControl SegmentControl
741 elm_segment_control_delete_segment_at(Evas_Object *obj, unsigned int index, Eina_Bool animate)
743 Widget_Data *wd = elm_widget_data_get(obj);
745 Elm_Segment_Item *it;
747 it = _item_find(obj, index);
751 wd->del_index = index;
752 if(animate && it->segment_id)
754 if(wd->ani_it == NULL)
757 it->delete_me = EINA_TRUE;
758 wd->ani = ecore_animator_add( _animator_animate_del_cb, obj );
763 evas_object_box_remove(wd->box, it->base);
764 evas_object_smart_calculate(wd->box);
766 _refresh_segment_ids(obj);
767 _state_value_set(obj);
770 wd->id = eina_list_count(wd->seg_ctrl);
775 * Get the label of a segment of segmentcontrol
776 * @param obj The SegmentControl object
777 * @param index The index of the segment
780 * @ingroup SegmentControl SegmentControl
784 elm_segment_control_get_segment_label_at(Evas_Object *obj, unsigned int index)
786 Elm_Segment_Item *it_rel;
787 Widget_Data *wd = elm_widget_data_get(obj);
790 it_rel = _item_find(obj, index);
792 if(it_rel) return it_rel->label;
798 * Get the icon of a segment of segmentcontrol
799 * @param obj The SegmentControl object
800 * @param index The index of the segment
801 * @return The icon object
803 * @ingroup SegmentControl SegmentControl
807 elm_segment_control_get_segment_icon_at(Evas_Object *obj, unsigned int index)
809 Elm_Segment_Item *seg_rel;
810 Widget_Data *wd = elm_widget_data_get(obj);
813 seg_rel = _item_find(obj, index);
815 if(seg_rel) return seg_rel->icon;
821 * Get the currently selected segment of segmentcontrol
822 * @param obj The SegmentControl object
823 * @param value The current segment id
824 * @return The selected Segment
826 * @ingroup SegmentControl SegmentControl
829 EAPI Elm_Segment_Item *
830 elm_segment_control_selected_segment_get(const Evas_Object *obj, int *value)
832 Widget_Data *wd = elm_widget_data_get(obj);
833 if(!wd || !wd->seg_ctrl) return NULL;
835 Elm_Segment_Item *it;
838 EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
840 if(it->segment_id == wd->cur_seg_id)
842 *value = wd->cur_seg_id;
850 * Get the count of segments of segmentcontrol
851 * @param obj The SegmentControl object
852 * @return The count of Segments
854 * @ingroup SegmentControl SegmentControl
858 elm_segment_control_get_segment_count(Evas_Object *obj)
860 Widget_Data *wd = elm_widget_data_get(obj);