[SegmentControl] Refactoring done.
[framework/uifw/elementary.git] / src / lib / elm_segment_control.c
1 #include <Elementary.h>
2 #include "elm_priv.h"
3
4 /**
5  * @defgroup SegmentControl SegmentControl
6  * @ingroup Elementary
7  *
8  * SegmentControl object is a horizontal control made of multiple segments,
9  * each segment item 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 segment items 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.
13  */
14 typedef struct _Widget_Data Widget_Data;
15 struct _Widget_Data
16 {
17    Evas_Object *box;
18    Evas_Object *base;
19    Eina_List *seg_ctrl;
20    Elm_Segment_Item *ani_it;
21    Ecore_Animator *ani;
22    int width, height;
23    int id;
24    int item_width;
25    int cur_fontsize;
26    int max_height, w_pad, h_pad;
27    unsigned int count;
28    int insert_index;
29    int del_index;
30    int cur_seg_id;
31    double scale_factor;
32    unsigned int def_color[4];
33    unsigned int press_color[4];
34    unsigned int sel_color[4];
35 };
36
37 struct _Elm_Segment_Item
38 {
39    Evas_Object *obj;
40    Evas_Object *base;
41    Evas_Object *icon;
42    Evas_Object *label_wd;
43    const char *label;
44    int segment_id;
45    Eina_Bool delete_me : 1;
46    Eina_Bool sel : 1;
47 };
48
49 #define MAXTOKENS 5
50
51 char **_split(const char *string, char *delim);
52 static void _mouse_down(void *data, Evas *evas, Evas_Object *obj, void *event_info);
53 static void _mouse_up(void *data, Evas *e, Evas_Object *obj, void *event_info);
54 static void _signal_segment_selected(void *data);
55 static void _signal_segment_on(void *data);
56 static void _signal_segment_off(void *data);
57 static void _theme_hook(Evas_Object *obj);
58 static void _item_free(Evas_Object *obj, Elm_Segment_Item *it);
59 static void _del_hook(Evas_Object *obj);
60 static void _layout(Evas_Object *o, Evas_Object_Box_Data *priv, void *data);
61 static void _segment_resizing(void *data, Evas *e, Evas_Object *obj, void *event_info);
62 static void _segment_item_resizing(void *data, Evas *e, Evas_Object *obj, void *event_info);
63 #if 0
64 static void _object_resize(void *data, Evas *e, Evas_Object *obj, void *event_info);
65 #endif
66 static void _update_list(Evas_Object *obj);
67 static void _refresh_segment_ids(Evas_Object *obj);
68 static void _state_value_set(Evas_Object *obj);
69 static void _color_value_get(Evas_Object *obj);
70
71 static Elm_Segment_Item* _item_new(Evas_Object *obj, const char *label, Evas_Object *icon);
72 static Elm_Segment_Item *_item_find(Evas_Object *obj, unsigned int index);
73
74 static Eina_Bool _animator_animate_add_cb(void *data);
75 static Eina_Bool _animator_animate_del_cb(void *data);
76
77 static void
78 _signal_segment_off(void *data)
79 {
80     Elm_Segment_Item *item = (Elm_Segment_Item *) data;
81     Widget_Data *wd = elm_widget_data_get(item->obj);
82     if (!wd) return;
83     
84 //    item->sel = EINA_FALSE;
85     edje_object_signal_emit(item->base, "elm,action,unfocus", "elm");
86     edje_object_signal_emit(item->base, "elm,state,segment,release", "elm");
87     if(!item->label_wd && item->label)
88       edje_object_signal_emit(item->base, "elm,state,text,visible", "elm");
89     if(item->label_wd)
90       elm_label_text_color_set(item->label_wd, wd->def_color[0], wd->def_color[1], wd->def_color[2], wd->def_color[3]);
91
92     return;
93 }
94
95
96 static void
97 _signal_segment_on(void *data)
98 {
99    Elm_Segment_Item *item = (Elm_Segment_Item *) data;
100    Elm_Segment_Item *it;
101    Eina_List *l;
102
103    Widget_Data *wd = elm_widget_data_get(item->obj);
104    if (!wd) return;
105
106 //   item->sel = EINA_TRUE;
107    if (item->segment_id == wd->cur_seg_id) return;
108
109    EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
110      {
111         if (it->segment_id == wd->cur_seg_id)
112           {
113              _signal_segment_off (it);
114           }
115      }
116    edje_object_signal_emit(item->base, "elm,action,focus", "elm");
117    if(!item->label_wd)
118      edje_object_signal_emit(item->base, "elm,state,text,change", "elm");
119    if(item->label_wd)
120      elm_label_text_color_set(item->label_wd, wd->sel_color[0],wd->sel_color[1], wd->sel_color[1], wd->sel_color[3]);
121
122    wd->cur_seg_id = item->segment_id;
123    evas_object_smart_callback_call(item->obj, "changed", (void*)wd->cur_seg_id);
124
125    return;
126 }
127
128 static void
129 _mouse_up(void *data, Evas *e, Evas_Object *obj, void *event_info)
130 {
131    Elm_Segment_Item *item = (Elm_Segment_Item *) data;
132    Widget_Data *wd = elm_widget_data_get(item->obj);
133    if (!wd) return;
134    if (item->segment_id == wd->cur_seg_id)
135      {
136         if(!item->label_wd)
137           edje_object_signal_emit(item->base, "elm,state,text,change", "elm");
138 //        item->sel = EINA_TRUE;
139         return;
140      }
141     _signal_segment_on((void*)item);
142
143     return;
144 }
145
146 static void
147 _mouse_down(void *data, Evas *evas, Evas_Object *obj, void *event_info)
148 {
149    Elm_Segment_Item *item = (Elm_Segment_Item *) data;
150    Widget_Data *wd = elm_widget_data_get(item->obj);
151
152    if (!wd) return;
153    
154    if(!item->label_wd && wd->cur_seg_id != item->segment_id)
155      {
156         edje_object_signal_emit(item->base, "elm,state,text,pressed", "elm");
157      }
158    if(item->label_wd && wd->cur_seg_id != item->segment_id)
159      elm_label_text_color_set(item->label_wd, wd->press_color[0], wd->press_color[1], wd->press_color[2], wd->press_color[3]);
160
161    edje_object_signal_emit(item->base, "elm,state,segment,press", "elm");
162    return;
163 }
164
165 static void
166 _theme_hook(Evas_Object *obj)
167 {
168    _elm_theme_object_set(obj, obj, "segmented-control", "base", elm_widget_style_get(obj));
169
170    return;
171 }
172
173 static void
174 _item_free(Evas_Object *obj, Elm_Segment_Item *it)
175 {
176    Widget_Data *wd = elm_widget_data_get(obj);
177    if (!wd) return;
178
179    if(wd->seg_ctrl)
180      wd->seg_ctrl = eina_list_remove(wd->seg_ctrl, it);
181
182    if(it->icon) evas_object_del(it->icon);
183    if(it->label_wd) 
184      {
185         evas_object_del(it->label_wd);
186         it->label_wd = NULL;
187         if (edje_object_part_swallow_get(it->base, "elm.swallow.label.content") == NULL) 
188           {
189              edje_object_part_unswallow(it->base, it->label_wd);
190           }
191      }
192    if(it->base) evas_object_del(it->base);
193    if(it->label) eina_stringshare_del(it->label);
194
195    if(it)
196      free(it);
197    it = NULL;
198    
199    return;
200 }
201
202 static void
203 _del_hook(Evas_Object *obj)
204 {
205    Widget_Data *wd = elm_widget_data_get(obj);
206    Elm_Segment_Item *it;
207    Eina_List *l, *clear = NULL;
208
209    EINA_LIST_FOREACH(wd->seg_ctrl, l, it) clear = eina_list_append(clear, it);
210    EINA_LIST_FREE(clear, it) _item_free(obj, it);
211
212    if(wd) free(wd);
213    wd = NULL;
214
215    return;
216 }
217
218
219 static void
220 _layout(Evas_Object *o, Evas_Object_Box_Data *priv, void *data)
221 {
222    Widget_Data *wd = data;
223    if (!wd) return;
224    _els_box_layout(o, priv, 1, 0); /* making box layout non homogenous */
225
226    return;
227 }
228
229 static void
230 _segment_resizing(void *data, Evas *e, Evas_Object *obj, void *event_info)
231 {
232    Widget_Data *wd = elm_widget_data_get((Evas_Object *)data);
233    if (!wd) return;
234    Evas_Coord w = 0, h = 0;
235
236    evas_object_geometry_get(wd->base, NULL, NULL, &w, &h);
237    wd->item_width = wd->width = w;
238    wd->height = h;
239
240    _state_value_set((Evas_Object *)data);
241 }
242 #if 0
243 static void 
244 _object_resize(void *data, Evas *e, Evas_Object *obj, void *event_info)
245 {
246    Widget_Data *wd;
247    if(!data) return;
248    wd = elm_widget_data_get((Evas_Object *)data);
249    if(!wd) return;
250
251    ecore_job_add(_segment_resizing, (Evas_Object *)data);
252 }
253 #endif
254
255 static void
256 _segment_item_resizing(void *data, Evas *e, Evas_Object *obj, void *event_info)
257 {
258    Widget_Data *wd;
259    Elm_Segment_Item *it = (Elm_Segment_Item *)data; 
260    wd = elm_widget_data_get(it->obj);
261
262    if(!wd) return;
263    Evas_Coord w = 0, h = 0;
264    _update_list(it->obj);
265
266    evas_object_geometry_get(it->base, NULL, NULL, &w, &h);
267
268    if(wd->max_height == 1) wd->max_height = h;
269
270    if(it->label_wd) 
271      {
272         elm_label_wrap_width_set(it->label_wd, w-wd->w_pad);
273         elm_label_wrap_height_set(it->label_wd, wd->max_height-wd->h_pad);
274
275         if (edje_object_part_swallow_get(it->base, "elm.swallow.label.content") == NULL)
276           {
277              edje_object_part_unswallow(it->base, it->label_wd);
278           }
279         edje_object_part_swallow(it->base, "elm.swallow.label.content", it->label_wd);
280         edje_object_signal_emit(it->base, "elm,state,label,visible", "elm");
281         if (it->segment_id == wd->cur_seg_id)
282           {
283             elm_label_text_color_set(it->label_wd, wd->sel_color[0], wd->sel_color[1], wd->sel_color[2], wd->sel_color[3]);
284           }
285         else
286           elm_label_text_color_set(it->label_wd, wd->def_color[0], wd->def_color[1], wd->def_color[2], wd->def_color[3]);
287      }
288 }
289 #if 0
290 static void 
291 _object_item_resize(void *data, Evas *e, Evas_Object *obj, void *event_info)
292 {
293    ecore_job_add(_segment_item_resizing, (Evas_Object *)data);
294 }
295 #endif
296
297 static Elm_Segment_Item*
298 _item_new(Evas_Object *obj, const char *label, Evas_Object *icon)
299 {
300    Elm_Segment_Item *it; 
301    Evas_Coord mw, mh; 
302    Widget_Data *wd = elm_widget_data_get(obj);
303    if (!wd) return NULL;
304
305    it = calloc(1, sizeof(   Elm_Segment_Item));
306    if (!it) return NULL;
307
308    if(obj) it->obj = obj;
309    it->delete_me = EINA_FALSE;
310    it->segment_id = wd->id;
311    it->label_wd = NULL;
312 //   it->sel = EINA_FALSE;
313
314    it->base = edje_object_add(evas_object_evas_get(obj));
315    _elm_theme_object_set(obj, it->obj, "segment", "base/default", elm_object_style_get(it->obj));
316
317    if (it->label) eina_stringshare_del(it->label);
318    if (label)
319      {
320         it->label = eina_stringshare_add(label);
321      }
322
323    if ((it->icon != icon) && (it->icon))
324      elm_widget_sub_object_del(obj, it->icon);
325    it->icon = icon;
326    if (it->icon)
327      {
328         elm_widget_sub_object_add(obj, icon);
329         Evas_Coord minw = -1, minh = -1, maxw = -1, maxh = -1;
330         elm_coords_finger_size_adjust(1, &minw, 1, &minh);
331         elm_coords_finger_size_adjust(1, &minw, 1, &minh);
332
333         evas_object_size_hint_weight_set(it->base, 1.0, -1.0);
334         evas_object_size_hint_align_set(it->base, 1.0, -1.0);
335         evas_object_size_hint_min_set(it->base, -1, -1);
336         evas_object_size_hint_max_set(it->base, maxw, maxh);
337      }
338
339    edje_object_size_min_restricted_calc(obj, &mw, &mh, 0, 0);
340    evas_object_size_hint_weight_set(obj, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
341    evas_object_size_hint_align_set(obj, EVAS_HINT_FILL, EVAS_HINT_FILL);
342
343    return it;
344 }
345
346
347 static void 
348 _update_list(Evas_Object *obj)
349 {
350    Elm_Segment_Item *it = NULL;
351    Elm_Segment_Item *del_it = NULL;
352    Elm_Segment_Item *next_sel_it = NULL;
353    Elm_Segment_Item *seg_it;
354    Eina_List *l;
355    int i = 0;
356  
357    Widget_Data *wd = elm_widget_data_get(obj);
358    if (!wd) return;
359
360    wd->count = eina_list_count(wd->seg_ctrl);
361    if(wd->count == 1)
362      {
363         it = _item_find(obj, 0);
364         _elm_theme_object_set(obj, it->base, "segment", "base/single", elm_object_style_get(it->obj));\r
365         edje_object_signal_emit(it->base, "elm,state,segment,on", "elm");
366         if(it->label && !it->label_wd)
367           {
368              edje_object_signal_emit(it->base, "elm,state,text,change", "elm");
369              edje_object_part_text_set(it->base, "elm.text", it->label);
370           }
371         else
372        edje_object_signal_emit(it->base, "elm,state,text,hidden", "elm");
373
374         if (it->icon && edje_object_part_swallow_get(it->base, "elm.swallow.content") == NULL)
375           {
376              if(it->icon)
377                {
378                   edje_object_part_swallow(it->base, "elm.swallow.content", it->icon);
379                   edje_object_signal_emit(it->base, "elm,state,icon,visible", "elm");
380                }
381              else
382                edje_object_signal_emit(it->base, "elm,state,icon,hidden", "elm");
383           }
384         if(it->label_wd)
385           {
386              edje_object_signal_emit(it->base, "elm,state,label,visible", "elm");
387              elm_label_text_color_set(it->label_wd, wd->sel_color[0], wd->sel_color[1], wd->sel_color[2], wd->sel_color[3]);
388           }
389
390         return;
391      }
392
393    EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
394      {
395         if(i==0)
396           {
397              _elm_theme_object_set(obj, it->base, "segment", "base/first", elm_object_style_get(it->obj));
398           }
399         else if(i==wd->count-1)
400           {
401              _elm_theme_object_set(obj, it->base, "segment", "base/last", elm_object_style_get(it->obj));
402           }
403         else
404           {
405              _elm_theme_object_set(obj, it->base, "segment", "base/default", elm_object_style_get(it->obj));
406
407           }
408           
409         if(it->label && !it->label_wd)
410           {
411              edje_object_signal_emit(it->base, "elm,state,text,visible", "elm");
412              edje_object_part_text_set(it->base, "elm.text", it->label);
413           }
414         else
415           edje_object_signal_emit(it->base, "elm,state,text,hidden", "elm");
416
417         if (it->icon && edje_object_part_swallow_get(it->base, "elm.swallow.content") == NULL)
418           {
419              if(it->icon)
420                {
421                   edje_object_part_swallow(it->base, "elm.swallow.content", it->icon);
422                   edje_object_signal_emit(it->base, "elm,state,icon,visible", "elm");
423                }
424              else
425                edje_object_signal_emit(it->base, "elm,state,icon,hidden", "elm");
426           }
427         if(it->label_wd)
428           {
429              edje_object_signal_emit(it->base, "elm,state,label,visible", "elm");
430           }
431
432         i++;
433      }
434
435      i = 0;
436      EINA_LIST_FOREACH(wd->seg_ctrl, l, seg_it)
437        {
438           if(wd->del_index == 0)
439             {
440               if (i == 0)
441                 {
442                    next_sel_it = seg_it;
443                    _signal_segment_on((void*)next_sel_it);
444                    break;
445                 }
446             }
447           else
448             {
449                if (i == wd->del_index-1)
450                  next_sel_it = seg_it;
451                if (i == wd->del_index)
452                  {
453                     del_it = seg_it;
454                     break;
455                  }
456              }
457           i++;
458        }
459      if(next_sel_it && del_it && del_it->sel)
460        _signal_segment_on((void*)next_sel_it);
461 }
462
463
464 static void 
465 _refresh_segment_ids(Evas_Object *obj)
466 {
467    Elm_Segment_Item *it;
468    Eina_List *l;
469    int i = 0;
470    Widget_Data *wd = elm_widget_data_get(obj);
471    if (!wd) return;
472
473    if ((wd->insert_index > 0) && wd->cur_seg_id >= wd->insert_index)
474      {
475         ++wd->cur_seg_id;
476         wd->insert_index = 0;
477      }
478    if (wd->del_index > 0)
479      {
480         if (wd->cur_seg_id >= wd->del_index)
481           --wd->cur_seg_id;
482         wd->del_index = -1;
483      }
484
485    EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
486      {
487         it->segment_id = i;
488         i++;
489      }
490 }
491
492 static void 
493 _state_value_set(Evas_Object *obj)
494 {
495    Elm_Segment_Item *it;
496    Eina_List *l;
497    Evas_Coord mw, mh, x, y;
498
499    int w1=0, w2, i=0;
500    unsigned int count ;
501    Widget_Data *wd = elm_widget_data_get(obj);
502    if (!wd) return;
503    
504    count = eina_list_count(wd->seg_ctrl);
505    if (count > 0)
506      wd->item_width = wd->width/count;
507    if (wd->ani_it)
508      {
509         evas_object_geometry_get(wd->ani_it->base, &x, &y, &w1, NULL);
510         if (wd->ani_it->delete_me)
511           {
512              w1-=(wd->item_width/5);
513              if( w1< 0) w1 = 0;
514           }
515         else
516         {
517            w1+=(wd->item_width/5);
518            if( w1 > wd->item_width )
519              w1 = wd->item_width;
520         }
521         w2 = (wd->width-w1)/(count -1);
522      }
523    else
524       w2 = wd->item_width;
525           
526    EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
527     {
528        edje_object_size_min_restricted_calc(it->base, &mw, &mh, 0, 0);
529        evas_object_size_hint_weight_set(it->base, 1.0, 1.0);
530        evas_object_size_hint_align_set(it->base, -1.0, -1.0);
531         
532                 
533        if(wd->ani_it  && it == wd->ani_it)
534          {
535             evas_object_resize(it->base, w1, wd->height);
536             evas_object_size_hint_min_set(it->base, w1, wd->height);
537             evas_object_size_hint_max_set(it->base, w1, wd->height);
538          }
539        else
540          {
541             evas_object_resize(it->base, w2, wd->height);
542             evas_object_size_hint_min_set(it->base, w2, wd->height);
543             evas_object_size_hint_max_set(it->base, w2, wd->height);
544         }
545        ++i;
546     }
547
548     return;
549 }
550
551 /* split string into tokens, return token array */
552 char **
553 _split(const char *string, char *delim)
554 {
555    char **tokens = NULL;
556    char *working = NULL;
557    char *token = NULL;
558    int idx = 0;
559
560    tokens  = malloc(sizeof(char *) * MAXTOKENS);
561    if(tokens == NULL)
562      return NULL;
563    working = malloc(sizeof(char) * strlen(string) + 1);
564    if(working == NULL)
565      return NULL;
566
567 /* to make sure, copy string to a safe place */
568    strcpy(working, string);
569    for(idx = 0; idx < MAXTOKENS; idx++)
570      tokens[idx] = NULL;
571
572    token = strtok(working, delim);
573    idx = 0;
574
575 /* always keep the last entry NULL terminated */
576    while((idx < (MAXTOKENS - 1)) && (token != NULL)) {
577      tokens[idx] = malloc(sizeof(char) * strlen(token) + 1);
578      if(tokens[idx] != NULL) {
579        strcpy(tokens[idx], token);
580        idx++;
581        token = strtok(NULL, delim);
582      }
583    }
584
585  free(working);
586  return tokens;
587 }
588
589 static void _color_value_get(Evas_Object *obj)
590 {
591    Widget_Data *wd = (Widget_Data *)obj;
592    if (!wd) return;
593
594    const char *def_color;
595    const char *press_color;
596    const char *sel_color;
597
598    char *delim = " ";
599    char **tokens = NULL;
600    int i = 0;
601
602    def_color = edje_object_data_get(wd->base, "def_rgb");
603    if(def_color)
604      {
605         tokens = _split(def_color, delim);
606         for(i = 0; tokens[i] != NULL; i++)
607           {
608              if (tokens[i]) wd->def_color[i] = atoi(tokens[i]);
609              else wd->def_color[i] = 0xFF;
610           }
611         for(i = 0; tokens[i] != NULL; i++)
612           free(tokens[i]);
613         free(tokens);
614         tokens = NULL;
615      }
616    else
617      {
618         for(i = 0; i<(MAXTOKENS - 1); i++)
619           wd->def_color[i] = 0xFF;
620      }
621    press_color = edje_object_data_get(wd->base, "press_rgb");
622    if(press_color)
623      {
624         tokens = _split(press_color, delim);
625         for(i = 0; tokens[i] != NULL; i++)
626           {
627              if (tokens[i]) wd->press_color[i] = atoi(tokens[i]);
628              else wd->press_color[i] = 0xFF;
629           }
630         for(i = 0; tokens[i] != NULL; i++)
631           free(tokens[i]);
632         free(tokens);
633         tokens = NULL;
634      }
635    else
636      {
637         for(i = 0; i<(MAXTOKENS - 1); i++)
638           wd->press_color[i] = 0xFF;
639      }
640
641    sel_color = edje_object_data_get(wd->base, "sel_rgb");
642    if(sel_color)
643      {
644        tokens = _split(sel_color, delim);
645        for(i = 0; tokens[i] != NULL; i++)
646          {
647             if (tokens[i]) wd->sel_color[i] = atoi(tokens[i]);
648             else wd->sel_color[i] = 0xFF;
649          }
650        for(i = 0; tokens[i] != NULL; i++)
651          free(tokens[i]);
652        
653        free(tokens);
654        tokens = NULL;
655      }
656    else
657      {
658         for(i = 0; i<(MAXTOKENS - 1); i++)
659           wd->sel_color[i] = 0xFF;
660      }
661 }
662
663 static Eina_Bool
664 _animator_animate_add_cb(void *data)
665 {
666    int w;
667    Evas_Object *obj = (Evas_Object *)data;
668    Widget_Data *wd = elm_widget_data_get(obj);
669    if (!wd) return 0;
670
671    evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
672    if( w <  wd->item_width )
673      {
674          _state_value_set(obj);
675          evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
676          return ECORE_CALLBACK_RENEW;
677      }
678    else
679      {
680         ecore_animator_del(wd->ani);
681         wd->ani = NULL;
682         wd->ani_it = NULL;
683         return ECORE_CALLBACK_CANCEL;
684      }
685 }
686
687
688 static Eina_Bool
689 _animator_animate_del_cb(void *data)
690 {
691    int w;
692    Evas_Object *obj = (Evas_Object *)data;
693    Widget_Data *wd = elm_widget_data_get(obj);
694    if (!wd) return 0;\r
695
696    evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
697    if( w >  0 )
698      {
699         _state_value_set(obj);
700         evas_object_geometry_get(wd->ani_it->base, NULL, NULL, &w, NULL);
701         return ECORE_CALLBACK_RENEW;
702      }
703    else
704      {
705         _item_free(obj, wd->ani_it );
706         _refresh_segment_ids(obj);
707         ecore_animator_del(wd->ani);
708         wd->ani = NULL;
709         wd->ani_it = NULL;
710         _update_list(obj);
711         wd->id = eina_list_count(wd->seg_ctrl);
712         return ECORE_CALLBACK_CANCEL;
713      }
714 }
715
716 static Elm_Segment_Item *
717 _item_find(Evas_Object *obj, unsigned int index)
718 {
719    Elm_Segment_Item *it;
720    Eina_List *l;
721    int i = 0;
722    Widget_Data *wd = elm_widget_data_get(obj);
723    if (!wd) return NULL;
724
725    EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
726      {
727         if (i == index) return it;
728         i++;
729      }
730      return NULL;
731 }
732
733 /**
734  * Add a new segmentcontrol to the parent
735  * @param parent The parent object
736  * @return The new object or NULL if it cannot be created
737  *
738  * @ingroup SegmentControl SegmentControl
739  */
740 EAPI Evas_Object *
741 elm_segment_control_add(Evas_Object *parent)
742 {
743    Evas_Object *obj;
744    Evas *e;
745    Widget_Data *wd;
746
747    const char *deffont, *maxheight, *wpad, *hpad;
748
749    wd = ELM_NEW(Widget_Data);
750    e = evas_object_evas_get(parent);
751    if(!e) return NULL;
752    obj = elm_widget_add(e);
753    elm_widget_type_set(obj, "segmented-control");
754    elm_widget_sub_object_add(parent, obj);
755    elm_widget_data_set(obj, wd);
756    elm_widget_del_hook_set(obj, _del_hook);
757    elm_widget_theme_hook_set(obj, _theme_hook);
758
759    wd->base = edje_object_add(e);
760    _elm_theme_object_set(obj, wd->base, "segmented-control", "base", "default");
761    elm_widget_resize_object_set(obj, wd->base);
762    wd->box = evas_object_box_add(e);
763    evas_object_box_layout_set(wd->box, _layout, wd, NULL);
764    elm_widget_sub_object_add(obj, wd->box);
765    edje_object_part_swallow(wd->base, "elm.swallow.content", wd->box);
766    evas_object_show(wd->box);
767
768    evas_object_event_callback_add(obj, EVAS_CALLBACK_RESIZE, _segment_resizing, obj);
769    wd->id = 0;
770    wd->del_index = -1;
771    wd->insert_index = -1;
772    wd->cur_seg_id = -1;
773
774    deffont = edje_object_data_get(wd->base, "default_font_size");
775    if (deffont) wd->cur_fontsize = atoi(deffont);
776    else wd->cur_fontsize = 1;
777
778    maxheight = edje_object_data_get(wd->base, "max_height");
779    if (maxheight) wd->max_height = atoi(maxheight);
780    else wd->max_height = 1;
781
782    wpad = edje_object_data_get(wd->base, "w_pad");
783    if (wpad) wd->w_pad = atoi(wpad);
784    else wd->w_pad = 1;
785
786    hpad = edje_object_data_get(wd->base, "h_pad");
787    if (hpad) wd->h_pad = atoi(hpad);
788    else wd->h_pad = 1;
789
790    _color_value_get((Evas_Object *)wd);
791
792    return obj;
793 }
794
795 EAPI Elm_Segment_Item *
796 elm_segment_control_item_add(Evas_Object *obj, Evas_Object *icon, const char *label, Eina_Bool animate)
797 {
798    Elm_Segment_Item *it;
799    Widget_Data *wd = elm_widget_data_get(obj);
800    if(!wd) return NULL;
801
802    it = _item_new(obj, label, icon);
803    if(!it) return NULL;
804
805    wd->seg_ctrl = eina_list_append(wd->seg_ctrl, it);
806    wd->id = eina_list_count(wd->seg_ctrl);
807    
808    evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_DOWN, _mouse_down, it);
809    evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_UP, _mouse_up, it);
810    evas_object_event_callback_add(it->base, EVAS_CALLBACK_RESIZE, _segment_item_resizing, it);
811    wd->insert_index = -1;
812    wd->del_index = -1;
813    _refresh_segment_ids(obj);
814
815    if(animate && it->segment_id && wd->ani_it == NULL)
816      {
817         evas_object_resize(it->base, 1, wd->height);
818         wd->ani_it = it;
819         wd->ani = ecore_animator_add( _animator_animate_add_cb, obj );
820      }
821    else
822    {
823      _state_value_set(obj);
824      _update_list(obj);
825    }
826    evas_object_show( it->base);
827
828    evas_object_box_append(wd->box, it->base);
829    evas_object_smart_calculate(wd->box);
830
831    return it;
832 }
833
834 /**
835  * Add a new segment item to segmentcontrol
836  * @param obj The SegmentControl object
837  * @param icon The icon object for added segment item
838  * @param label The label for added segment item
839  * @param animate If EINA_TRUE the action be animated with sliding effects default EINA_FALSE.
840  * @return The new segment item or NULL if it cannot be created
841  *
842  * @ingroup SegmentControl SegmentControl
843  */
844 EAPI Elm_Segment_Item *
845 elm_segment_control_add_segment(Evas_Object *obj, Evas_Object *icon, const char *label, Eina_Bool animate)
846 {
847    Elm_Segment_Item * it;
848    it = elm_segment_control_item_add(obj, icon, label, animate);
849 \r
850     return it;\r
851 }
852
853 EAPI Elm_Segment_Item *
854 elm_segment_control_item_insert_at(Evas_Object *obj, Evas_Object *icon, const char *label, unsigned int index, Eina_Bool animate)
855 {
856    Elm_Segment_Item *it, *it_rel;
857    Widget_Data *wd = elm_widget_data_get(obj);
858    if(!wd) return NULL;
859
860    it = _item_new(obj, label, icon);
861    it_rel = _item_find(obj, index);
862    if (!it_rel)
863      {
864         wd->seg_ctrl = eina_list_append(wd->seg_ctrl, it);
865      }
866    else
867      {
868         if (!it) return NULL;
869         wd->seg_ctrl = eina_list_prepend_relative(wd->seg_ctrl, it, it_rel);
870      }
871    evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_DOWN, _mouse_down, it);
872    evas_object_event_callback_add(it->base, EVAS_CALLBACK_MOUSE_UP, _mouse_up, it);
873    evas_object_event_callback_add(it->base, EVAS_CALLBACK_RESIZE, _segment_item_resizing, it);
874    wd->insert_index = index;
875    wd->id = eina_list_count(wd->seg_ctrl);
876    _refresh_segment_ids(obj);
877
878    if(animate && it->segment_id && wd->ani_it == NULL)
879      {
880         wd->ani_it = it;
881         evas_object_resize(it->base, 1, wd->height);
882         wd->ani = ecore_animator_add( _animator_animate_add_cb, obj );
883      }
884    else
885    {
886      _state_value_set(obj);
887      _update_list(obj);
888    }
889
890    evas_object_show( it->base);
891
892    if(index >= wd->id-1)
893      {
894         evas_object_box_append(wd->box,  it->base);
895      }
896    else
897      {
898         evas_object_box_insert_at(wd->box,  it->base, index);
899      }
900
901    evas_object_smart_calculate(wd->box);
902
903    return it ;
904 }
905 /**
906  * Insert a new segment item to segmentcontrol
907  * @param obj The SegmentControl object
908  * @param icon The icon object for added segment item
909  * @param label The label for added segment item
910  * @param index The position at which segment item to be inserted
911  * @param animate If 1EINA_TRUE the action be animated with sliding effects default EINA_FALSE.
912  * @return The new segment item or NULL if it cannot be created
913  *
914  * @ingroup SegmentControl SegmentControl
915  */
916 EAPI void
917 elm_segment_control_insert_segment_at(Evas_Object *obj, Evas_Object *icon, const char *label, unsigned int index, Eina_Bool animate)
918 {
919    Elm_Segment_Item *it;
920    it = elm_segment_control_item_insert_at(obj, icon, label, index, animate);
921
922    return;
923 }
924
925 EAPI void
926 elm_segment_control_item_del(Evas_Object *obj, Elm_Segment_Item *item, Eina_Bool animate)
927 {
928    Elm_Segment_Item *it;
929    Widget_Data *wd = elm_widget_data_get(obj);
930    if(!wd) return;
931
932
933    it = item;
934    if(!it) return;
935
936    wd->del_index = it->segment_id;
937    if(animate && it->segment_id && wd->ani_it == NULL)
938      {
939         it->delete_me = EINA_TRUE;
940         wd->ani_it = it;
941         wd->ani = ecore_animator_add( _animator_animate_del_cb, obj );
942      }
943    else
944      {
945         evas_object_box_remove(wd->box, it->base);
946         evas_object_smart_calculate(wd->box);
947
948         _item_free(obj, it);
949         _refresh_segment_ids(obj);
950         _state_value_set(obj);
951      }
952    wd->id = eina_list_count(wd->seg_ctrl);
953    return;
954 }
955
956 /**
957  * Delete a segment item to segmentcontrol
958  * @param obj The SegmentControl object
959  * @param item The  segment item to be deleted
960  * @param animate If EINA_TRUE the action be animated with sliding effects default EINA_FALSE.
961  *
962  * @ingroup SegmentControl SegmentControl
963  */
964 EAPI void
965 elm_segment_control_delete_segment(Evas_Object *obj, Elm_Segment_Item *item, Eina_Bool animate)
966 {
967    elm_segment_control_item_del(obj, item, animate);
968
969    return;
970 }
971
972 EAPI void
973 elm_segment_control_item_del_at(Evas_Object *obj,  unsigned int index, Eina_Bool animate)
974 {
975    Elm_Segment_Item *it;
976    Widget_Data *wd = elm_widget_data_get(obj);
977    if(!wd) return;
978
979    it = _item_find(obj, index);
980
981    if(!it) return;
982
983    wd->del_index = index;
984    if(animate && it->segment_id)
985      {
986         if(wd->ani_it == NULL)
987         {
988            wd->ani_it = it;
989            it->delete_me = EINA_TRUE;
990            wd->ani = ecore_animator_add( _animator_animate_del_cb, obj );
991         }
992      }
993    else
994      {
995         evas_object_box_remove(wd->box, it->base);
996         evas_object_smart_calculate(wd->box);
997         _item_free(obj, it);
998         _refresh_segment_ids(obj);
999         _state_value_set(obj);
1000      }
1001    wd->id = eina_list_count(wd->seg_ctrl);
1002    return;
1003 }
1004
1005 /**
1006  * Delete a segment item of given index to segmentcontrol
1007  * @param obj The SegmentControl object
1008  * @param index The position at which segment item to be deleted
1009  * @param animate If EINA_TRUE the action be animated with sliding effects default EINA_FALSE.
1010  *
1011  * @ingroup SegmentControl SegmentControl
1012  */
1013 EAPI void
1014 elm_segment_control_delete_segment_at(Evas_Object *obj,  unsigned int index, Eina_Bool animate)
1015 {
1016    elm_segment_control_item_del_at( obj, index, animate);
1017
1018    return;
1019 }
1020
1021
1022 EAPI const char *
1023 elm_segment_control_item_label_get(Evas_Object *obj, unsigned int index)
1024 {
1025    Elm_Segment_Item *it_rel;
1026    Widget_Data *wd = elm_widget_data_get(obj);
1027    if(!wd) return NULL;
1028
1029    it_rel = _item_find(obj, index);
1030
1031    if(it_rel) return it_rel->label;
1032
1033    return NULL;
1034 }
1035
1036 /**
1037  * Get the label of a segment item of segmentcontrol
1038  * @param obj The SegmentControl object
1039  * @param index The index of the segment item
1040  * @return The label of the segment item
1041  *
1042  * @ingroup SegmentControl SegmentControl
1043  */
1044 EAPI const char *
1045 elm_segment_control_get_segment_label_at(Evas_Object *obj, unsigned int index)
1046 {
1047    const char *label;
1048    label = elm_segment_control_item_label_get( obj, index);
1049   
1050    return label;
1051 }
1052
1053 EAPI Evas_Object *
1054 elm_segment_control_item_icon_get(Evas_Object *obj, unsigned int index)
1055 {
1056    Elm_Segment_Item *seg_rel;
1057    Widget_Data *wd = elm_widget_data_get(obj);
1058    if(!wd) return NULL;
1059
1060    seg_rel = _item_find(obj, index);
1061
1062    if(seg_rel) return seg_rel->icon;
1063
1064    return NULL;
1065 }
1066
1067 /**
1068  * Get the icon of a segment item of segmentcontrol
1069  * @param obj The SegmentControl object
1070  * @param index The index of the segment item
1071  * @return The icon object or NULL if it is not found.
1072  *
1073  * @ingroup SegmentControl SegmentControl
1074  */
1075 EAPI Evas_Object *
1076 elm_segment_control_get_segment_icon_at(Evas_Object *obj, unsigned int index)
1077 {
1078    Evas_Object *icon;
1079    icon = elm_segment_control_item_icon_get( obj, index);
1080
1081    return icon;
1082 }
1083
1084 EAPI Elm_Segment_Item *
1085 elm_segment_control_item_selected_get(const Evas_Object *obj)
1086 {
1087    Elm_Segment_Item *it;
1088    Eina_List *l;
1089    Widget_Data *wd = elm_widget_data_get(obj);
1090    if(!wd || !wd->seg_ctrl) return NULL;
1091
1092    EINA_LIST_FOREACH(wd->seg_ctrl, l, it)
1093      {
1094         if(it->segment_id == wd->cur_seg_id)
1095           return it;
1096      }
1097     return NULL;
1098  }
1099
1100 /**
1101  * Get the currently selected segment item of segmentcontrol
1102  * @param obj The SegmentControl object
1103  * @param value The Selected Segment id.
1104  * @return The selected Segment item
1105  *
1106  * @ingroup SegmentControl SegmentControl
1107  */
1108 EAPI Elm_Segment_Item *
1109 elm_segment_control_selected_segment_get(const Evas_Object *obj, int *value)
1110 {
1111    Elm_Segment_Item *it;
1112    it = elm_segment_control_item_selected_get(obj);
1113    if(!it) return NULL;
1114       *value = it->segment_id;
1115    return it;
1116  }
1117
1118
1119 EAPI int
1120 elm_segment_control_item_count_get(Evas_Object *obj)
1121 {
1122    Widget_Data *wd = elm_widget_data_get(obj);
1123    if(!wd) return 0;
1124
1125    return wd->id;
1126 }
1127
1128 /**
1129  * Get the count of segments of segmentcontrol
1130  * @param obj The SegmentControl object
1131  * @return The count of Segment items
1132  *
1133  * @ingroup SegmentControl SegmentControl
1134  */
1135 EAPI int
1136 elm_segment_control_get_segment_count(Evas_Object *obj)
1137 {
1138    int id;
1139    id = elm_segment_control_item_count_get( obj);
1140
1141    return id;
1142 }
1143
1144 /**
1145  * Get the base object of segment item in segmentcontrol
1146  * @param it The Segment item
1147  * @return obj The base object of the segment item.
1148  *
1149  * @ingroup SegmentControl SegmentControl
1150  */
1151 EAPI Evas_Object *
1152 elm_segment_control_item_object_get(Elm_Segment_Item *it)
1153 {
1154    if (!it) return NULL;
1155    
1156    return it->base;
1157 }
1158
1159 /**
1160  * Select/unselect a particular segment item of segmentcontrol
1161  * @param item The Segment item that is to be selected or unselected.
1162  * @param select If 1 the segment item is selected and if 0 it will be unselected.
1163  *
1164  * @ingroup SegmentControl SegmentControl
1165  */
1166 EAPI void
1167 elm_segment_control_item_selected_set( Elm_Segment_Item *item, Eina_Bool select)
1168 {
1169    if(!item) return;
1170    Widget_Data *wd = elm_widget_data_get(item->obj);
1171    if(!wd) return;
1172
1173    if(select)
1174      {
1175         if(item->segment_id == wd->cur_seg_id && wd->cur_seg_id) return;
1176 //        item->sel = EINA_TRUE;
1177         _signal_segment_on(item);
1178      }
1179    else if(item->segment_id == wd->cur_seg_id)
1180      {
1181 //        item->sel = EINA_FALSE;
1182         wd->cur_seg_id = -1;
1183         _signal_segment_off(item);
1184      } 
1185
1186    return;
1187 }
1188
1189 /**
1190  * Get a particular indexed segment item of segmentcontrol
1191  * @param obj The Segment control object.
1192  * @param index The index of the segment item.
1193  * @return The corresponding Segment item.
1194  *
1195  * @ingroup SegmentControl SegmentControl
1196  */
1197 EAPI Elm_Segment_Item *
1198 elm_segment_control_item_get_at(Evas_Object *obj, unsigned int index)
1199 {
1200    Elm_Segment_Item *it;
1201    it = _item_find(obj, index);
1202
1203    return it;
1204 }
1205 \r
1206 /**
1207  * Get the index of a Segment item of Segmentcontrol
1208  * @param item The Segment item.
1209  * @return The corresponding index of the Segment item.
1210  *
1211  * @ingroup SegmentControl SegmentControl
1212  */
1213 EAPI int
1214 elm_segment_control_item_index_get(Elm_Segment_Item *item)
1215 {
1216    if(!item) return -1;
1217    Widget_Data *wd = elm_widget_data_get(item->obj);
1218    if(!wd) return -1;
1219
1220    return item->segment_id;
1221 }
1222
1223 /**
1224  * Set The Label widget to a Segment item of Segmentcontrol
1225  * @param item The Segment item.
1226  * @param label The Label.
1227  * @return Evas_Object The Label widget.
1228  *
1229  * @ingroup SegmentControl SegmentControl
1230  */
1231 EAPI Evas_Object *
1232 elm_segment_control_item_label_object_set(Elm_Segment_Item *item, char *label)
1233 {
1234    if(!item) return NULL;
1235    Widget_Data *wd = elm_widget_data_get(item->obj);
1236    if(!wd) return NULL;
1237    if(!label) return NULL;
1238
1239    item->label_wd = elm_label_add(item->obj);
1240    elm_object_style_set(item->label_wd, "segment");
1241    elm_label_label_set(item->label_wd, label);
1242    elm_label_text_align_set(item->label_wd, "middle");
1243    elm_label_ellipsis_set(item->label_wd, 1);
1244    eina_stringshare_replace(&item->label, label);
1245
1246    return item->label_wd;
1247 }
1248