EFL migration revision 67547
[framework/uifw/elementary.git] / src / lib / elm_slider.c
1 #include <Elementary.h>
2 #include "elm_priv.h"
3
4 typedef struct _Widget_Data Widget_Data;
5
6 struct _Widget_Data
7 {
8    Evas_Object *slider;
9    Evas_Object *icon;
10    Evas_Object *end;
11    Evas_Object *spacer;
12
13    Ecore_Timer *delay;
14
15    Eina_Hash  *labels;
16    const char *units;
17    const char *indicator;
18
19    const char *(*indicator_format_func)(double val);
20    void (*indicator_format_free)(const char *str);
21
22    const char *(*units_format_func)(double val);
23    void (*units_format_free)(const char *str);
24
25    double val, val_min, val_max;
26    Evas_Coord size;
27
28    Eina_Bool horizontal : 1;
29    Eina_Bool inverted : 1;
30    Eina_Bool indicator_show : 1;
31    Eina_Bool spacer_down : 1;
32 };
33
34 #define ELM_SLIDER_INVERTED_FACTOR (-1.0)
35
36 static const char *widtype = NULL;
37 static void _del_hook(Evas_Object *obj);
38 static void _mirrored_set(Evas_Object *obj, Eina_Bool rtl);
39 static void _theme_hook(Evas_Object *obj);
40 static void _disable_hook(Evas_Object *obj);
41 static void _sizing_eval(Evas_Object *obj);
42 static void _changed_size_hints(void *data, Evas *e, Evas_Object *obj, void *event_info);
43 static void _sub_del(void *data, Evas_Object *obj, void *event_info);
44 static void _units_set(Evas_Object *obj);
45 static void _val_set(Evas_Object *obj);
46 static void _indicator_set(Evas_Object *obj);
47 static void _on_focus_hook(void *data, Evas_Object *obj);
48 static void _drag_up(void *data, Evas_Object *obj,
49                     const char *emission, const char *source);
50 static void _drag_down(void *data, Evas_Object *obj,
51                     const char *emission, const char *source);
52 static Eina_Bool _event_hook(Evas_Object *obj, Evas_Object *src,
53                              Evas_Callback_Type type, void *event_info);
54 static void _spacer_down_cb(void *data, Evas * e, Evas_Object * obj, void *event_info);
55 static void _spacer_move_cb(void *data, Evas * e, Evas_Object * obj, void *event_info);
56 static void _spacer_up_cb(void *data, Evas * e, Evas_Object * obj, void *event_info);
57
58 static const char SIG_CHANGED[] = "changed";
59 static const char SIG_DELAY_CHANGED[] = "delay,changed";
60 static const char SIG_DRAG_START[] = "slider,drag,start";
61 static const char SIG_DRAG_STOP[] = "slider,drag,stop";
62 static const Evas_Smart_Cb_Description _signals[] = {
63   {SIG_CHANGED, ""},
64   {SIG_DELAY_CHANGED, ""},
65   {SIG_DRAG_START, ""},
66   {SIG_DRAG_STOP, ""},
67   {NULL, NULL}
68 };
69
70 static Eina_Bool
71 _event_hook(Evas_Object *obj, Evas_Object *src __UNUSED__, Evas_Callback_Type type, void *event_info)
72 {
73    Evas_Event_Mouse_Wheel *mev;
74    Evas_Event_Key_Down *ev;
75    Widget_Data *wd;
76
77    wd = elm_widget_data_get(obj);
78    if (!wd) return EINA_FALSE;
79    if (elm_widget_disabled_get(obj)) return EINA_FALSE;
80
81    if (type == EVAS_CALLBACK_KEY_DOWN) goto key_down;
82    else if (type != EVAS_CALLBACK_MOUSE_WHEEL) return EINA_FALSE;
83
84    mev = event_info;
85    if (mev->event_flags & EVAS_EVENT_FLAG_ON_HOLD) return EINA_FALSE;
86    if (elm_widget_disabled_get(obj)) return EINA_FALSE;
87
88    if (mev->z < 0) _drag_up(obj, NULL, NULL, NULL);
89    else _drag_down(obj, NULL, NULL, NULL);
90    mev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
91    return EINA_TRUE;
92
93   key_down:
94    ev = event_info;
95    if (ev->event_flags & EVAS_EVENT_FLAG_ON_HOLD) return EINA_FALSE;
96    if (elm_widget_disabled_get(obj)) return EINA_FALSE;
97    if ((!strcmp(ev->keyname, "Left"))
98        || (!strcmp(ev->keyname, "KP_Left")))
99      {
100         if (!wd->horizontal) return EINA_FALSE;
101         if (!wd->inverted) _drag_down(obj, NULL, NULL, NULL);
102         else _drag_up(obj, NULL, NULL, NULL);
103         ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
104         return EINA_TRUE;
105      }
106    else if ((!strcmp(ev->keyname, "Right"))
107             || (!strcmp(ev->keyname, "KP_Right")))
108      {
109         if (!wd->horizontal) return EINA_FALSE;
110         if (!wd->inverted) _drag_up(obj, NULL, NULL, NULL);
111         else _drag_down(obj, NULL, NULL, NULL);
112         ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
113         return EINA_TRUE;
114      }
115    else if ((!strcmp(ev->keyname, "Up")) || (!strcmp(ev->keyname, "KP_Up")))
116      {
117         if (wd->horizontal) return EINA_FALSE;
118         if (wd->inverted) _drag_up(obj, NULL, NULL, NULL);
119         else _drag_down(obj, NULL, NULL, NULL);
120         ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
121         return EINA_TRUE;
122      }
123    else if ((!strcmp(ev->keyname, "Down")) || (!strcmp(ev->keyname, "KP_Down")))
124      {
125         if (wd->horizontal) return EINA_FALSE;
126         if (wd->inverted) _drag_down(obj, NULL, NULL, NULL);
127         else _drag_up(obj, NULL, NULL, NULL);
128         ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
129         return EINA_TRUE;
130      }
131    else return EINA_FALSE;
132 }
133
134 static void
135 _del_hook(Evas_Object *obj)
136 {
137    Widget_Data *wd = elm_widget_data_get(obj);
138    if (!wd) return;
139    if (wd->labels) eina_hash_free(wd->labels);
140    if (wd->indicator) eina_stringshare_del(wd->units);
141    if (wd->delay) ecore_timer_del(wd->delay);
142    free(wd);
143 }
144
145 static void
146 _on_focus_hook(void *data __UNUSED__, Evas_Object *obj)
147 {
148    Widget_Data *wd = elm_widget_data_get(obj);
149    if (!wd) return;
150    if (elm_widget_focus_get(obj))
151      {
152         edje_object_signal_emit(wd->slider, "elm,action,focus", "elm");
153         evas_object_focus_set(wd->slider, EINA_TRUE);
154      }
155    else
156      {
157         edje_object_signal_emit(wd->slider, "elm,action,unfocus", "elm");
158         evas_object_focus_set(wd->slider, EINA_FALSE);
159      }
160 }
161
162 static void
163 _mirrored_set(Evas_Object *obj, Eina_Bool rtl)
164 {
165    Widget_Data *wd = elm_widget_data_get(obj);
166    if (!wd) return;
167    edje_object_mirrored_set(wd->slider, rtl);
168 }
169
170 static Eina_Bool
171 _labels_foreach_text_set(const Eina_Hash *hash __UNUSED__, const void *key, void *data, void *fdata)
172 {
173   Widget_Data *wd = fdata;
174
175   edje_object_part_text_set(wd->slider, key, data);
176
177   return 1;
178 }
179
180 static void
181 _theme_hook(Evas_Object *obj)
182 {
183    Widget_Data *wd = elm_widget_data_get(obj);
184    if (!wd) return;
185    _elm_widget_mirrored_reload(obj);
186    _mirrored_set(obj, elm_widget_mirrored_get(obj));
187    if (wd->horizontal)
188      _elm_theme_object_set(obj, wd->slider, "slider", "horizontal", elm_widget_style_get(obj));
189    else
190      _elm_theme_object_set(obj, wd->slider, "slider", "vertical", elm_widget_style_get(obj));
191    if (elm_widget_disabled_get(obj))
192      edje_object_signal_emit(wd->slider, "elm,state,disabled", "elm");
193    else
194      edje_object_signal_emit(wd->slider, "elm,state,enabled", "elm");
195    if (wd->icon)
196      {
197         edje_object_part_swallow(wd->slider, "elm.swallow.content", wd->icon);
198         edje_object_signal_emit(wd->slider, "elm,state,icon,visible", "elm");
199      }
200    if (wd->end)
201      edje_object_signal_emit(wd->slider, "elm,state,end,visible", "elm");
202    else
203      edje_object_signal_emit(wd->slider, "elm,state,end,hidden", "elm");
204    if (wd->labels)
205      {
206         eina_hash_foreach(wd->labels, _labels_foreach_text_set, wd);
207             edje_object_signal_emit(wd->slider, "elm,state,text,visible", "elm");
208      }
209
210    if (wd->units)
211      edje_object_signal_emit(wd->slider, "elm,state,units,visible", "elm");
212
213    if (wd->horizontal)
214      evas_object_size_hint_min_set(wd->spacer, (double)wd->size * elm_widget_scale_get(obj) * _elm_config->scale, 1);
215    else
216      evas_object_size_hint_min_set(wd->spacer, 1, (double)wd->size * elm_widget_scale_get(obj) * _elm_config->scale);
217
218    if (wd->inverted)
219      edje_object_signal_emit(wd->slider, "elm,state,inverted,on", "elm");
220
221    edje_object_part_swallow(wd->slider, "elm.swallow.bar", wd->spacer);
222    _units_set(obj);
223    _indicator_set(obj);
224    edje_object_message_signal_process(wd->slider);
225    edje_object_scale_set(wd->slider, elm_widget_scale_get(obj) * _elm_config->scale);
226    _val_set(obj);
227    _sizing_eval(obj);
228 }
229
230 static void
231 _disable_hook(Evas_Object *obj)
232 {
233    Widget_Data *wd = elm_widget_data_get(obj);
234    if (!wd) return;
235    if (elm_widget_disabled_get(obj))
236      edje_object_signal_emit(wd->slider, "elm,state,disabled", "elm");
237    else
238      edje_object_signal_emit(wd->slider, "elm,state,enabled", "elm");
239 }
240
241 static void
242 _sizing_eval(Evas_Object *obj)
243 {
244    Widget_Data *wd = elm_widget_data_get(obj);
245    Evas_Coord minw = -1, minh = -1, maxw = -1, maxh = -1;
246    if (!wd) return;
247    elm_coords_finger_size_adjust(1, &minw, 1, &minh);
248    edje_object_size_min_restricted_calc(wd->slider, &minw, &minh, minw, minh);
249    elm_coords_finger_size_adjust(1, &minw, 1, &minh);
250    evas_object_size_hint_min_set(obj, minw, minh);
251    evas_object_size_hint_max_set(obj, maxw, maxh);
252 }
253
254 static void
255 _changed_size_hints(void *data, Evas *e __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
256 {
257    Widget_Data *wd = elm_widget_data_get(data);
258    if (!wd) return;
259    if ((obj != wd->icon) && (obj != wd->end)) return;
260    _sizing_eval(data);
261 }
262
263 static void
264 _sub_del(void *data __UNUSED__, Evas_Object *obj, void *event_info)
265 {
266    Widget_Data *wd = elm_widget_data_get(obj);
267    Evas_Object *sub = event_info;
268    if (!wd) return;
269    if (sub == wd->icon)
270      {
271         edje_object_signal_emit(wd->slider, "elm,state,icon,hidden", "elm");
272         evas_object_event_callback_del_full
273            (sub, EVAS_CALLBACK_CHANGED_SIZE_HINTS, _changed_size_hints, obj);
274         wd->icon = NULL;
275         edje_object_message_signal_process(wd->slider);
276         _sizing_eval(obj);
277      }
278    if (sub == wd->end)
279      {
280         edje_object_signal_emit(wd->slider, "elm,state,end,hidden", "elm");
281         evas_object_event_callback_del_full(sub,
282                                             EVAS_CALLBACK_CHANGED_SIZE_HINTS,
283                                             _changed_size_hints, obj);
284         wd->end = NULL;
285         edje_object_message_signal_process(wd->slider);
286         _sizing_eval(obj);
287      }
288 }
289
290 static Eina_Bool
291 _delay_change(void *data)
292 {
293    Widget_Data *wd = elm_widget_data_get(data);
294    if (!wd) return ECORE_CALLBACK_CANCEL;
295    wd->delay = NULL;
296    evas_object_smart_callback_call(data, SIG_DELAY_CHANGED, NULL);
297    return ECORE_CALLBACK_CANCEL;
298 }
299
300 static void
301 _val_fetch(Evas_Object *obj)
302 {
303    Eina_Bool rtl;
304    Widget_Data *wd = elm_widget_data_get(obj);
305    double posx = 0.0, posy = 0.0, pos = 0.0, val;
306    if (!wd) return;
307    edje_object_part_drag_value_get(wd->slider, "elm.dragable.slider",
308                                    &posx, &posy);
309    if (wd->horizontal) pos = posx;
310    else pos = posy;
311
312    rtl = elm_widget_mirrored_get(obj);
313    if ((!rtl && wd->inverted) || (rtl &&
314                                   ((!wd->horizontal && wd->inverted) ||
315                                    (wd->horizontal && !wd->inverted)))) pos = 1.0 - pos;
316    val = (pos * (wd->val_max - wd->val_min)) + wd->val_min;
317    if (val != wd->val)
318      {
319         wd->val = val;
320         evas_object_smart_callback_call(obj, SIG_CHANGED, NULL);
321         if (wd->delay) ecore_timer_del(wd->delay);
322         wd->delay = ecore_timer_add(0.2, _delay_change, obj);
323      }
324 }
325
326 static void
327 _val_set(Evas_Object *obj)
328 {
329    Eina_Bool rtl;
330    Widget_Data *wd = elm_widget_data_get(obj);
331    double pos;
332    if (!wd) return;
333    if (wd->val_max > wd->val_min)
334      pos = (wd->val - wd->val_min) / (wd->val_max - wd->val_min);
335    else
336      pos = 0.0;
337    if (pos < 0.0) pos = 0.0;
338    else if (pos > 1.0) pos = 1.0;
339
340    rtl = elm_widget_mirrored_get(obj);
341    if ((!rtl && wd->inverted) || (rtl &&
342                                   ((!wd->horizontal && wd->inverted) ||
343                                    (wd->horizontal && !wd->inverted)))) pos = 1.0 - pos;
344    edje_object_part_drag_value_set(wd->slider, "elm.dragable.slider", pos, pos);
345 }
346
347 static void
348 _units_set(Evas_Object *obj)
349 {
350    Widget_Data *wd = elm_widget_data_get(obj);
351    if (!wd) return;
352    if (wd->units_format_func)
353      {
354         const char *buf;
355         buf = wd->units_format_func(wd->val);
356         edje_object_part_text_set(wd->slider, "elm.units", buf);
357         if (wd->units_format_free) wd->units_format_free(buf);
358      }
359    else if (wd->units)
360      {
361         char buf[1024];
362
363         snprintf(buf, sizeof(buf), wd->units, wd->val);
364         edje_object_part_text_set(wd->slider, "elm.units", buf);
365      }
366    else
367      edje_object_part_text_set(wd->slider, "elm.units", NULL);
368 }
369
370 static void
371 _indicator_set(Evas_Object *obj)
372 {
373    Widget_Data *wd = elm_widget_data_get(obj);
374    if (!wd) return;
375    if (wd->indicator_format_func)
376      {
377         const char *buf;
378         buf = wd->indicator_format_func(wd->val);
379         edje_object_part_text_set(wd->slider, "elm.dragable.slider:elm.indicator", buf);
380         if (wd->indicator_format_free) wd->indicator_format_free(buf);
381      }
382    else if (wd->indicator)
383      {
384         char buf[1024];
385         snprintf(buf, sizeof(buf), wd->indicator, wd->val);
386         edje_object_part_text_set(wd->slider, "elm.dragable.slider:elm.indicator", buf);
387      }
388    else
389      edje_object_part_text_set(wd->slider, "elm.dragable.slider:elm.indicator", NULL);
390 }
391
392 static void
393 _drag(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *source __UNUSED__)
394 {
395    Widget_Data *wd = elm_widget_data_get((Evas_Object*)data);
396    if (elm_widget_disabled_get(data)) return;
397    _val_fetch(data);
398    _units_set(data);
399    _indicator_set(data);
400    edje_object_signal_emit(wd->slider, "elm,state,drag", "elm");
401    edje_object_message_signal_process(wd->slider);
402 }
403
404 static void
405 _drag_start(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *source __UNUSED__)
406 {
407    Widget_Data *wd = elm_widget_data_get((Evas_Object*)data);
408    if (elm_widget_disabled_get(data)) return;
409    _val_fetch(data);
410    evas_object_smart_callback_call(data, SIG_DRAG_START, NULL);
411    _units_set(data);
412    _indicator_set(data);
413    elm_widget_scroll_freeze_push(data);
414    edje_object_signal_emit(wd->slider, "elm,state,drag", "elm");
415    edje_object_message_signal_process(wd->slider);
416 }
417
418 static void
419 _drag_stop(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *source __UNUSED__)
420 {
421    if (elm_widget_disabled_get(data)) return;
422    _val_fetch(data);
423    evas_object_smart_callback_call(data, SIG_DRAG_STOP, NULL);
424    _units_set(data);
425    _indicator_set(data);
426    elm_widget_scroll_freeze_pop(data);
427 }
428
429 static void
430 _drag_step(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *source __UNUSED__)
431 {
432    if (elm_widget_disabled_get(data)) return;
433    _val_fetch(data);
434    _units_set(data);
435    _indicator_set(data);
436 }
437
438 static void
439 _drag_up(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *source __UNUSED__)
440 {
441    double step;
442    Widget_Data *wd;
443    if (elm_widget_disabled_get(data)) return;
444
445    wd = elm_widget_data_get(data);
446    step = 0.05;
447
448    if (wd->inverted) step *= ELM_SLIDER_INVERTED_FACTOR;
449
450    edje_object_part_drag_step(wd->slider, "elm.dragable.slider", step, step);
451 }
452
453 static void
454 _drag_down(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *source __UNUSED__)
455 {
456    double step;
457    Widget_Data *wd;
458    if (elm_widget_disabled_get(data)) return;
459
460    wd = elm_widget_data_get(data);
461    step = -0.05;
462
463    if (wd->inverted) step *= ELM_SLIDER_INVERTED_FACTOR;
464
465    edje_object_part_drag_step(wd->slider, "elm.dragable.slider", step, step);
466 }
467
468 static void
469 _spacer_down_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info)
470 {
471    Widget_Data *wd = elm_widget_data_get(data);
472    Evas_Event_Mouse_Down *ev = event_info;
473    Evas_Coord x, y, w, h;
474    double button_x = 0.0, button_y = 0.0;
475    if (elm_widget_disabled_get(data)) return;
476
477    wd->spacer_down = EINA_TRUE;
478    evas_object_geometry_get(wd->spacer, &x, &y, &w, &h);
479    edje_object_part_drag_value_get(wd->slider, "elm.dragable.slider", &button_x, &button_y);
480    if (wd->horizontal)
481      {
482         button_x = ((double)ev->canvas.x - (double)x) / (double)w;
483         if (button_x > 1) button_x = 1;
484         if (button_x < 0) button_x = 0;
485      }
486    else
487      {
488         button_y = ((double)ev->canvas.y - (double)y) / (double)h;
489         if (button_y > 1) button_y = 1;
490         if (button_y < 0) button_y = 0;
491      }
492    edje_object_part_drag_value_set(wd->slider, "elm.dragable.slider", button_x, button_y);
493    _val_fetch(data);
494    evas_object_smart_callback_call(data, SIG_DRAG_START, NULL);
495    _units_set(data);
496    _indicator_set(data);
497    elm_widget_scroll_freeze_push(data);
498    edje_object_signal_emit(wd->slider, "elm,state,indicator,show", "elm");
499    edje_object_signal_emit(wd->slider, "elm,state,drag", "elm");
500    edje_object_message_signal_process(wd->slider);
501 }
502
503 static void
504 _spacer_move_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info)
505 {
506    Widget_Data *wd = elm_widget_data_get(data);
507    Evas_Event_Mouse_Move *ev = event_info;
508    Evas_Coord x, y, w, h;
509    double button_x = 0.0, button_y = 0.0;
510    if (elm_widget_disabled_get(data)) return;
511
512    if  (wd->spacer_down)
513      {
514         evas_object_geometry_get(wd->spacer, &x, &y, &w, &h);
515         if (wd->horizontal)
516           {
517              button_x = ((double)ev->cur.canvas.x - (double)x) / (double)w;
518              if (button_x > 1) button_x = 1;
519              if (button_x < 0) button_x = 0;
520           }
521         else
522           {
523              button_y = ((double)ev->cur.canvas.y - (double)y) / (double)h;
524              if (button_y > 1) button_y = 1;
525              if (button_y < 0) button_y = 0;
526           }
527         edje_object_part_drag_value_set(wd->slider, "elm.dragable.slider", button_x, button_y);
528         _val_fetch(data);
529         _units_set(data);
530         _indicator_set(data);
531         edje_object_signal_emit(wd->slider, "elm,state,drag", "elm");
532         edje_object_message_signal_process(wd->slider);
533      }
534 }
535
536 static void
537 _spacer_up_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
538 {
539    Widget_Data *wd = elm_widget_data_get(data);
540    if (elm_widget_disabled_get(data)) return;
541
542    if (wd->spacer_down) wd->spacer_down = EINA_FALSE;
543    _val_fetch(data);
544    evas_object_smart_callback_call(data, SIG_DRAG_STOP, NULL);
545    _units_set(data);
546    _indicator_set(data);
547    elm_widget_scroll_freeze_pop(data);
548    edje_object_signal_emit(wd->slider, "elm,state,indicator,hide", "elm");
549 }
550
551 static void
552 _elm_slider_label_set(Evas_Object *obj, const char *part, const char *label)
553 {
554    ELM_CHECK_WIDTYPE(obj, widtype);
555    Widget_Data *wd = elm_widget_data_get(obj);
556    const char* default_part = "elm.text";
557    const char* real_part;
558
559    if (!wd) return;
560
561    if (!part)
562      real_part = default_part;
563    else
564      real_part = part;
565
566    if (wd->labels)
567      {
568        const char* old_label;
569
570        old_label = eina_hash_find(wd->labels, real_part);
571        if (!old_label)
572            eina_hash_add(wd->labels, real_part, eina_stringshare_add(label));
573        else
574          {
575            eina_stringshare_ref(old_label);
576            eina_hash_modify(wd->labels, real_part, eina_stringshare_add(label));
577            eina_stringshare_del(old_label);
578          }
579      }
580
581    if (label)
582      {
583         edje_object_signal_emit(wd->slider, "elm,state,text,visible", "elm");
584         edje_object_message_signal_process(wd->slider);
585      }
586    else
587      {
588         edje_object_signal_emit(wd->slider, "elm,state,text,hidden", "elm");
589         edje_object_message_signal_process(wd->slider);
590      }
591
592    edje_object_part_text_set(wd->slider, real_part, label);
593    _sizing_eval(obj);
594 }
595
596 static const char *
597 _elm_slider_label_get(const Evas_Object *obj, const char *part)
598 {
599    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
600    Widget_Data *wd = elm_widget_data_get(obj);
601
602    if (!wd) return NULL;
603    if (!wd->labels) return NULL;
604
605    if (!part) 
606      return eina_hash_find(wd->labels, "elm.text");
607    return eina_hash_find(wd->labels, part);
608 }
609
610 static void
611 _icon_set(Evas_Object *obj, Evas_Object *icon)
612 {
613    Widget_Data *wd = elm_widget_data_get(obj);
614    if (!wd) return;
615    if (wd->icon == icon) return;
616    if (wd->icon) evas_object_del(wd->icon);
617    wd->icon = icon;
618    if (icon)
619      {
620         elm_widget_sub_object_add(obj, icon);
621         evas_object_event_callback_add(icon, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
622                                        _changed_size_hints, obj);
623         edje_object_part_swallow(wd->slider, "elm.swallow.icon", icon);
624         edje_object_signal_emit(wd->slider, "elm,state,icon,visible", "elm");
625         edje_object_message_signal_process(wd->slider);
626      }
627    _sizing_eval(obj);
628 }
629
630 static Evas_Object *
631 _icon_unset(Evas_Object *obj)
632 {
633    Widget_Data *wd = elm_widget_data_get(obj);
634    Evas_Object *ret = NULL;
635    if (!wd) return NULL;
636    if (wd->icon)
637      {
638         elm_widget_sub_object_del(obj, wd->icon);
639         evas_object_event_callback_del_full(wd->icon,
640                                             EVAS_CALLBACK_CHANGED_SIZE_HINTS,
641                                             _changed_size_hints, obj);
642         ret = wd->icon;
643         edje_object_part_unswallow(wd->slider, wd->icon);
644         edje_object_signal_emit(wd->slider, "elm,state,icon,hidden", "elm");
645         wd->icon = NULL;
646         _sizing_eval(obj);
647      }
648    return ret;
649 }
650
651 static void
652 _end_set(Evas_Object *obj, Evas_Object *end)
653 {
654    Widget_Data *wd = elm_widget_data_get(obj);
655    if (!wd) return;
656    if (wd->end == end) return;
657    if (wd->end) evas_object_del(wd->end);
658    wd->end = end;
659    if (end)
660      {
661         elm_widget_sub_object_add(obj, end);
662         evas_object_event_callback_add(end, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
663                                        _changed_size_hints, obj);
664         edje_object_part_swallow(wd->slider, "elm.swallow.end", end);
665         edje_object_signal_emit(wd->slider, "elm,state,end,visible", "elm");
666         edje_object_message_signal_process(wd->slider);
667      }
668    _sizing_eval(obj);
669 }
670
671 static Evas_Object *
672 _end_unset(Evas_Object *obj)
673 {
674    Widget_Data *wd = elm_widget_data_get(obj);
675    Evas_Object *ret = NULL;
676    if (!wd) return NULL;
677    if (wd->end)
678      {
679         elm_widget_sub_object_del(obj, wd->end);
680         evas_object_event_callback_del_full(wd->end,
681                                             EVAS_CALLBACK_CHANGED_SIZE_HINTS,
682                                             _changed_size_hints, obj);
683         ret = wd->end;
684         edje_object_part_unswallow(wd->slider, wd->end);
685         edje_object_signal_emit(wd->slider, "elm,state,end,hidden", "elm");
686         wd->end = NULL;
687         _sizing_eval(obj);
688      }
689    return ret;
690 }
691
692 static void
693 _content_set_hook(Evas_Object *obj, const char *part, Evas_Object *content)
694 {
695    ELM_CHECK_WIDTYPE(obj, widtype);
696    if (!part || !strcmp(part, "icon"))
697      _icon_set(obj, content);
698    else if (!strcmp(part, "end"))
699      _end_set(obj, content);
700 }
701
702 static Evas_Object *
703 _content_get_hook(const Evas_Object *obj, const char *part)
704 {
705    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
706    Widget_Data *wd;
707    wd = elm_widget_data_get(obj);
708    if (!wd) return NULL;
709    if (!part || !strcmp(part, "icon"))
710      return wd->icon;
711    else if (!strcmp(part, "end"))
712      return wd->end;
713    return NULL;
714 }
715
716 static Evas_Object *
717 _content_unset_hook(Evas_Object *obj, const char *part)
718 {
719    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
720    if (!part || !strcmp(part, "icon"))
721      return _icon_unset(obj);
722    else if (!strcmp(part, "end"))
723      return _end_unset(obj);
724    return NULL;
725 }
726
727 static void
728 _hash_labels_free_cb(void* label)
729 {
730   if (label)
731     eina_stringshare_del(label);
732 }
733
734 EAPI Evas_Object *
735 elm_slider_add(Evas_Object *parent)
736 {
737    Evas_Object *obj;
738    Evas *e;
739    Widget_Data *wd;
740
741    ELM_WIDGET_STANDARD_SETUP(wd, Widget_Data, parent, e, obj, NULL);
742
743    ELM_SET_WIDTYPE(widtype, "slider");
744    elm_widget_type_set(obj, "slider");
745    elm_widget_sub_object_add(parent, obj);
746    elm_widget_on_focus_hook_set(obj, _on_focus_hook, NULL);
747    elm_widget_data_set(obj, wd);
748    elm_widget_del_hook_set(obj, _del_hook);
749    elm_widget_theme_hook_set(obj, _theme_hook);
750    elm_widget_disable_hook_set(obj, _disable_hook);
751    elm_widget_can_focus_set(obj, EINA_TRUE);
752    elm_widget_event_hook_set(obj, _event_hook);
753    elm_widget_text_set_hook_set(obj, _elm_slider_label_set);
754    elm_widget_text_get_hook_set(obj, _elm_slider_label_get);
755    elm_widget_content_set_hook_set(obj, _content_set_hook);
756    elm_widget_content_get_hook_set(obj, _content_get_hook);
757    elm_widget_content_unset_hook_set(obj, _content_unset_hook);
758
759    wd->horizontal = EINA_TRUE;
760    wd->indicator_show = EINA_TRUE;
761    wd->val = 0.0;
762    wd->val_min = 0.0;
763    wd->val_max = 1.0;
764    wd->labels = eina_hash_string_superfast_new(_hash_labels_free_cb);
765
766    wd->slider = edje_object_add(e);
767    _elm_theme_object_set(obj, wd->slider, "slider", "horizontal", "default");
768    elm_widget_resize_object_set(obj, wd->slider);
769    edje_object_signal_callback_add(wd->slider, "drag", "*", _drag, obj);
770    edje_object_signal_callback_add(wd->slider, "drag,start", "*", _drag_start, obj);
771    edje_object_signal_callback_add(wd->slider, "drag,stop", "*", _drag_stop, obj);
772    edje_object_signal_callback_add(wd->slider, "drag,step", "*", _drag_step, obj);
773    edje_object_signal_callback_add(wd->slider, "drag,page", "*", _drag_stop, obj);
774    //   edje_object_signal_callback_add(wd->slider, "drag,set", "*", _drag_stop, obj);
775    edje_object_part_drag_value_set(wd->slider, "elm.dragable.slider", 0.0, 0.0);
776
777    wd->spacer = evas_object_rectangle_add(e);
778    evas_object_color_set(wd->spacer, 0, 0, 0, 0);
779    evas_object_pass_events_set(wd->spacer, EINA_TRUE);
780    elm_widget_sub_object_add(obj, wd->spacer);
781    edje_object_part_swallow(wd->slider, "elm.swallow.bar", wd->spacer);
782    evas_object_event_callback_add(wd->spacer, EVAS_CALLBACK_MOUSE_DOWN, _spacer_down_cb, obj);
783    evas_object_event_callback_add(wd->spacer, EVAS_CALLBACK_MOUSE_MOVE, _spacer_move_cb, obj);
784    evas_object_event_callback_add(wd->spacer, EVAS_CALLBACK_MOUSE_UP, _spacer_up_cb, obj);
785    evas_object_smart_callback_add(obj, "sub-object-del", _sub_del, obj);
786
787    _mirrored_set(obj, elm_widget_mirrored_get(obj));
788    _sizing_eval(obj);
789
790    // TODO: convert Elementary to subclassing of Evas_Smart_Class
791    // TODO: and save some bytes, making descriptions per-class and not instance!
792    evas_object_smart_callbacks_descriptions_set(obj, _signals);
793    return obj;
794 }
795
796 EAPI void
797 elm_slider_label_set(Evas_Object *obj, const char *label)
798 {
799    _elm_slider_label_set(obj, NULL, label);
800 }
801
802 EAPI const char *
803 elm_slider_label_get(const Evas_Object *obj)
804 {
805    return _elm_slider_label_get(obj, NULL);
806 }
807
808 EAPI void
809 elm_slider_icon_set(Evas_Object *obj, Evas_Object *icon)
810 {
811    _content_set_hook(obj, "icon", icon);
812 }
813
814 EAPI Evas_Object *
815 elm_slider_icon_unset(Evas_Object *obj)
816 {
817    return _content_unset_hook(obj, "icon");
818 }
819
820 EAPI Evas_Object *
821 elm_slider_icon_get(const Evas_Object *obj)
822 {
823    return _content_get_hook(obj, "icon");
824 }
825
826 EAPI void
827 elm_slider_span_size_set(Evas_Object *obj, Evas_Coord size)
828 {
829    ELM_CHECK_WIDTYPE(obj, widtype);
830    Widget_Data *wd = elm_widget_data_get(obj);
831    if (!wd) return;
832    if (wd->size == size) return;
833    wd->size = size;
834    if (wd->horizontal)
835      evas_object_size_hint_min_set(wd->spacer, (double)wd->size * elm_widget_scale_get(obj) * _elm_config->scale, 1);
836    else
837      evas_object_size_hint_min_set(wd->spacer, 1, (double)wd->size * elm_widget_scale_get(obj) * _elm_config->scale);
838    if (wd->indicator_show)
839      edje_object_signal_emit(wd->slider, "elm,state,val,show", "elm");
840    else
841      edje_object_signal_emit(wd->slider, "elm,state,val,hide", "elm");
842    edje_object_part_swallow(wd->slider, "elm.swallow.bar", wd->spacer);
843    _sizing_eval(obj);
844 }
845
846 EAPI Evas_Coord
847 elm_slider_span_size_get(const Evas_Object *obj)
848 {
849    ELM_CHECK_WIDTYPE(obj, widtype) 0;
850    Widget_Data *wd = elm_widget_data_get(obj);
851    if (!wd) return 0;
852    return wd->size;
853 }
854
855 EAPI void
856 elm_slider_unit_format_set(Evas_Object *obj, const char *units)
857 {
858    ELM_CHECK_WIDTYPE(obj, widtype);
859    Widget_Data *wd = elm_widget_data_get(obj);
860    if (!wd) return;
861    eina_stringshare_replace(&wd->units, units);
862    if (units)
863      {
864         edje_object_signal_emit(wd->slider, "elm,state,units,visible", "elm");
865         edje_object_message_signal_process(wd->slider);
866      }
867    else
868      {
869         edje_object_signal_emit(wd->slider, "elm,state,units,hidden", "elm");
870         edje_object_message_signal_process(wd->slider);
871      }
872    _units_set(obj);
873    _sizing_eval(obj);
874 }
875
876 EAPI const char *
877 elm_slider_unit_format_get(const Evas_Object *obj)
878 {
879    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
880    Widget_Data *wd = elm_widget_data_get(obj);
881    if (!wd) return NULL;
882    return wd->units;
883 }
884
885 EAPI void
886 elm_slider_indicator_format_set(Evas_Object *obj, const char *indicator)
887 {
888    ELM_CHECK_WIDTYPE(obj, widtype);
889    Widget_Data *wd = elm_widget_data_get(obj);
890    if (!wd) return;
891    eina_stringshare_replace(&wd->indicator, indicator);
892    _indicator_set(obj);
893 }
894
895 EAPI const char *
896 elm_slider_indicator_format_get(const Evas_Object *obj)
897 {
898    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
899    Widget_Data *wd = elm_widget_data_get(obj);
900    if (!wd) return NULL;
901    return wd->indicator;
902 }
903
904 EAPI void
905 elm_slider_horizontal_set(Evas_Object *obj, Eina_Bool horizontal)
906 {
907    ELM_CHECK_WIDTYPE(obj, widtype);
908    Widget_Data *wd = elm_widget_data_get(obj);
909    if (!wd) return;
910    horizontal = !!horizontal;
911    if (wd->horizontal == horizontal) return;
912    wd->horizontal = horizontal;
913    _theme_hook(obj);
914 }
915
916 EAPI Eina_Bool
917 elm_slider_horizontal_get(const Evas_Object *obj)
918 {
919    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
920    Widget_Data *wd = elm_widget_data_get(obj);
921    if (!wd) return EINA_FALSE;
922    return wd->horizontal;
923 }
924
925 EAPI void
926 elm_slider_min_max_set(Evas_Object *obj, double min, double max)
927 {
928    ELM_CHECK_WIDTYPE(obj, widtype);
929    Widget_Data *wd = elm_widget_data_get(obj);
930    if (!wd) return;
931    if ((wd->val_min == min) && (wd->val_max == max)) return;
932    wd->val_min = min;
933    wd->val_max = max;
934    if (wd->val < wd->val_min) wd->val = wd->val_min;
935    if (wd->val > wd->val_max) wd->val = wd->val_max;
936    _val_set(obj);
937    _units_set(obj);
938    _indicator_set(obj);
939 }
940
941 EAPI void
942 elm_slider_min_max_get(const Evas_Object *obj, double *min, double *max)
943 {
944    if (min) *min = 0.0;
945    if (max) *max = 0.0;
946    ELM_CHECK_WIDTYPE(obj, widtype);
947    Widget_Data *wd = elm_widget_data_get(obj);
948    if (!wd) return;
949    if (min) *min = wd->val_min;
950    if (max) *max = wd->val_max;
951 }
952
953 EAPI void
954 elm_slider_value_set(Evas_Object *obj, double val)
955 {
956    ELM_CHECK_WIDTYPE(obj, widtype);
957    Widget_Data *wd = elm_widget_data_get(obj);
958    if (!wd) return;
959    if (wd->val == val) return;
960    wd->val = val;
961    if (wd->val < wd->val_min) wd->val = wd->val_min;
962    if (wd->val > wd->val_max) wd->val = wd->val_max;
963    edje_object_signal_emit(wd->slider, "elm,state,drag", "elm");
964    _val_set(obj);
965    _units_set(obj);
966    _indicator_set(obj);
967 }
968
969 EAPI double
970 elm_slider_value_get(const Evas_Object *obj)
971 {
972    ELM_CHECK_WIDTYPE(obj, widtype) 0.0;
973    Widget_Data *wd = elm_widget_data_get(obj);
974    if (!wd) return 0.0;
975    return wd->val;
976 }
977
978 EAPI void
979 elm_slider_inverted_set(Evas_Object *obj, Eina_Bool inverted)
980 {
981    ELM_CHECK_WIDTYPE(obj, widtype);
982    Widget_Data *wd = elm_widget_data_get(obj);
983    if (!wd) return;
984    inverted = !!inverted;
985    if (wd->inverted == inverted) return;
986    wd->inverted = inverted;
987    if (wd->inverted)
988      edje_object_signal_emit(wd->slider, "elm,state,inverted,on", "elm");
989    else
990      edje_object_signal_emit(wd->slider, "elm,state,inverted,off", "elm");
991    edje_object_message_signal_process(wd->slider);
992    _val_set(obj);
993    _units_set(obj);
994    _indicator_set(obj);
995 }
996
997 EAPI Eina_Bool
998 elm_slider_inverted_get(const Evas_Object *obj)
999 {
1000    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
1001    Widget_Data *wd = elm_widget_data_get(obj);
1002    if (!wd) return EINA_FALSE;
1003    return wd->inverted;
1004 }
1005
1006 EAPI void
1007 elm_slider_indicator_format_function_set(Evas_Object *obj, const char *(*func)(double val), void (*free_func)(const char *str))
1008 {
1009    ELM_CHECK_WIDTYPE(obj, widtype);
1010    Widget_Data *wd = elm_widget_data_get(obj);
1011    if (!wd) return;
1012    wd->indicator_format_func = func;
1013    wd->indicator_format_free = free_func;
1014    _indicator_set(obj);
1015 }
1016
1017 EAPI void
1018 elm_slider_units_format_function_set(Evas_Object *obj, const char *(*func)(double val), void (*free_func)(const char *str))
1019 {
1020    ELM_CHECK_WIDTYPE(obj, widtype);
1021    Widget_Data *wd = elm_widget_data_get(obj);
1022    if (!wd) return;
1023    wd->units_format_func = func;
1024    wd->units_format_free = free_func;
1025    _indicator_set(obj);
1026 }
1027
1028 EAPI void
1029 elm_slider_end_set(Evas_Object *obj, Evas_Object *end)
1030 {
1031    _content_set_hook(obj, "end", end);
1032 }
1033
1034 EAPI Evas_Object *
1035 elm_slider_end_unset(Evas_Object *obj)
1036 {
1037    return _content_unset_hook(obj, "end");
1038 }
1039
1040 EAPI Evas_Object *
1041 elm_slider_end_get(const Evas_Object *obj)
1042 {
1043    return _content_get_hook(obj, "end");
1044 }
1045
1046 EAPI void
1047 elm_slider_indicator_show_set(Evas_Object *obj, Eina_Bool show)
1048 {
1049    ELM_CHECK_WIDTYPE(obj, widtype);
1050    Widget_Data *wd = elm_widget_data_get(obj);
1051    if (show) {
1052         wd->indicator_show = EINA_TRUE;
1053         edje_object_signal_emit(wd->slider, "elm,state,val,show", "elm");
1054    }
1055    else {
1056         wd->indicator_show = EINA_FALSE;
1057         edje_object_signal_emit(wd->slider, "elm,state,val,hide", "elm");
1058    }
1059 }
1060
1061 EAPI Eina_Bool
1062 elm_slider_indicator_show_get(const Evas_Object *obj)
1063 {
1064    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
1065    Widget_Data *wd = elm_widget_data_get(obj);
1066    if (!wd) return EINA_FALSE;
1067    return wd->indicator_show;
1068 }
1069