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