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    char *(*indicator_format_func)(double val);
  20    void (*indicator_format_free)(char *str);
  21
  22    char *(*units_format_func)(double val);
  23    void (*units_format_free)(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         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         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;
 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_Coord d = 0;
 518
 519         evas_object_geometry_get(wd->spacer, &x, &y, &w, &h);
 520         if (wd->horizontal) d = abs(ev->cur.canvas.x - x - wd->downx);
 521         else d = abs(ev->cur.canvas.y - y - wd->downy);
 522         if (d > (_elm_config->thumbscroll_threshold - 1))
 523           {
 524              if (!wd->frozen)
 525                {
 526                   elm_widget_scroll_freeze_push(data);
 527                   wd->frozen = EINA_TRUE;
 528                }
 529              ev->event_flags &= ~EVAS_EVENT_FLAG_ON_HOLD;
 530           }
 531
 532         if (ev->event_flags & EVAS_EVENT_FLAG_ON_HOLD)
 533           {
 534              if (wd->spacer_down) wd->spacer_down = EINA_FALSE;
 535              _val_fetch(data);
 536              evas_object_smart_callback_call(data, SIG_DRAG_STOP, NULL);
 537              _units_set(data);
 538              _indicator_set(data);
 539              if (wd->frozen)
 540                {
 541                   elm_widget_scroll_freeze_pop(data);
 542                   wd->frozen = EINA_FALSE;
 543                }
 544              edje_object_signal_emit(wd->slider, "elm,state,indicator,hide", "elm");
 545              elm_slider_value_set(data, wd->val2);
 546              return;
 547           }
 548         if (wd->horizontal)
 549           {
 550              button_x = ((double)ev->cur.canvas.x - (double)x) / (double)w;
 551              if (button_x > 1) button_x = 1;
 552              if (button_x < 0) button_x = 0;
 553           }
 554         else
 555           {
 556              button_y = ((double)ev->cur.canvas.y - (double)y) / (double)h;
 557              if (button_y > 1) button_y = 1;
 558              if (button_y < 0) button_y = 0;
 559           }
 560         edje_object_part_drag_value_set(wd->slider, "elm.dragable.slider", button_x, button_y);
 561         _val_fetch(data);
 562         _units_set(data);
 563         _indicator_set(data);
 564         edje_object_signal_emit(wd->slider, "elm,state,drag", "elm");
 565         edje_object_message_signal_process(wd->slider);
 566      }
 567 }
 568
 569 static void
 570 _spacer_up_cb(void *data, Evas *e __UNUSED__, Evas_Object *obj __UNUSED__, void *event_info __UNUSED__)
 571 {
 572    Widget_Data *wd = elm_widget_data_get(data);
 573    if (elm_widget_disabled_get(data)) return;
 574    if (!wd->spacer_down) return;
 575
 576    wd->spacer_down = EINA_FALSE;
 577    _val_fetch(data);
 578    evas_object_smart_callback_call(data, SIG_DRAG_STOP, NULL);
 579    _units_set(data);
 580    _indicator_set(data);
 581    if (wd->frozen)
 582      {
 583         elm_widget_scroll_freeze_pop(data);
 584         wd->frozen = EINA_FALSE;
 585      }
 586    edje_object_signal_emit(wd->slider, "elm,state,indicator,hide", "elm");
 587 }
 588
 589 static void
 590 _elm_slider_label_set(Evas_Object *obj, const char *part, const char *label)
 591 {
 592    ELM_CHECK_WIDTYPE(obj, widtype);
 593    Widget_Data *wd = elm_widget_data_get(obj);
 594    const char* default_part = "elm.text";
 595    const char* real_part;
 596
 597    if (!wd) return;
 598
 599    if (!part)
 600      real_part = default_part;
 601    else
 602      real_part = part;
 603
 604    if (wd->labels)
 605      {
 606        const char* old_label;
 607
 608        old_label = eina_hash_find(wd->labels, real_part);
 609        if (!old_label)
 610            eina_hash_add(wd->labels, real_part, eina_stringshare_add(label));
 611        else
 612          {
 613            eina_stringshare_ref(old_label);
 614            eina_hash_modify(wd->labels, real_part, eina_stringshare_add(label));
 615            eina_stringshare_del(old_label);
 616          }
 617      }
 618
 619    if (label)
 620      {
 621         edje_object_signal_emit(wd->slider, "elm,state,text,visible", "elm");
 622         edje_object_message_signal_process(wd->slider);
 623      }
 624    else
 625      {
 626         edje_object_signal_emit(wd->slider, "elm,state,text,hidden", "elm");
 627         edje_object_message_signal_process(wd->slider);
 628      }
 629
 630    edje_object_part_text_set(wd->slider, real_part, label);
 631    _sizing_eval(obj);
 632 }
 633
 634 static const char *
 635 _elm_slider_label_get(const Evas_Object *obj, const char *part)
 636 {
 637    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
 638    Widget_Data *wd = elm_widget_data_get(obj);
 639    if (!wd) return NULL;
 640    if (!wd->labels) return NULL;
 641
 642    if (!part)
 643      return eina_hash_find(wd->labels, "elm.text");
 644    return eina_hash_find(wd->labels, part);
 645 }
 646
 647 static void
 648 _icon_set(Evas_Object *obj, Evas_Object *icon)
 649 {
 650    Widget_Data *wd = elm_widget_data_get(obj);
 651    if (!wd) return;
 652    if (wd->icon == icon) return;
 653    if (wd->icon) evas_object_del(wd->icon);
 654    wd->icon = icon;
 655    if (icon)
 656      {
 657         elm_widget_sub_object_add(obj, icon);
 658         evas_object_event_callback_add(icon, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
 659                                        _changed_size_hints, obj);
 660         edje_object_part_swallow(wd->slider, "elm.swallow.icon", icon);
 661         edje_object_signal_emit(wd->slider, "elm,state,icon,visible", "elm");
 662         edje_object_message_signal_process(wd->slider);
 663      }
 664    _sizing_eval(obj);
 665 }
 666
 667 static Evas_Object *
 668 _icon_unset(Evas_Object *obj)
 669 {
 670    Widget_Data *wd = elm_widget_data_get(obj);
 671    Evas_Object *ret = NULL;
 672    if (!wd) return NULL;
 673    if (wd->icon)
 674      {
 675         elm_widget_sub_object_del(obj, wd->icon);
 676         evas_object_event_callback_del_full(wd->icon,
 677                                             EVAS_CALLBACK_CHANGED_SIZE_HINTS,
 678                                             _changed_size_hints, obj);
 679         ret = wd->icon;
 680         edje_object_part_unswallow(wd->slider, wd->icon);
 681         edje_object_signal_emit(wd->slider, "elm,state,icon,hidden", "elm");
 682         wd->icon = NULL;
 683         _sizing_eval(obj);
 684      }
 685    return ret;
 686 }
 687
 688 static void
 689 _end_set(Evas_Object *obj, Evas_Object *end)
 690 {
 691    Widget_Data *wd = elm_widget_data_get(obj);
 692    if (!wd) return;
 693    if (wd->end == end) return;
 694    if (wd->end) evas_object_del(wd->end);
 695    wd->end = end;
 696    if (end)
 697      {
 698         elm_widget_sub_object_add(obj, end);
 699         evas_object_event_callback_add(end, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
 700                                        _changed_size_hints, obj);
 701         edje_object_part_swallow(wd->slider, "elm.swallow.end", end);
 702         edje_object_signal_emit(wd->slider, "elm,state,end,visible", "elm");
 703         edje_object_message_signal_process(wd->slider);
 704      }
 705    _sizing_eval(obj);
 706 }
 707
 708 static Evas_Object *
 709 _end_unset(Evas_Object *obj)
 710 {
 711    Widget_Data *wd = elm_widget_data_get(obj);
 712    Evas_Object *ret = NULL;
 713    if (!wd) return NULL;
 714    if (wd->end)
 715      {
 716         elm_widget_sub_object_del(obj, wd->end);
 717         evas_object_event_callback_del_full(wd->end,
 718                                             EVAS_CALLBACK_CHANGED_SIZE_HINTS,
 719                                             _changed_size_hints, obj);
 720         ret = wd->end;
 721         edje_object_part_unswallow(wd->slider, wd->end);
 722         edje_object_signal_emit(wd->slider, "elm,state,end,hidden", "elm");
 723         wd->end = NULL;
 724         _sizing_eval(obj);
 725      }
 726    return ret;
 727 }
 728
 729 static void
 730 _content_set_hook(Evas_Object *obj, const char *part, Evas_Object *content)
 731 {
 732    ELM_CHECK_WIDTYPE(obj, widtype);
 733    if (!part || !strcmp(part, "icon"))
 734      _icon_set(obj, content);
 735    else if (!strcmp(part, "end"))
 736      _end_set(obj, content);
 737 }
 738
 739 static Evas_Object *
 740 _content_get_hook(const Evas_Object *obj, const char *part)
 741 {
 742    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
 743    Widget_Data *wd;
 744    wd = elm_widget_data_get(obj);
 745    if (!wd) return NULL;
 746    if (!part || !strcmp(part, "icon"))
 747      return wd->icon;
 748    else if (!strcmp(part, "end"))
 749      return wd->end;
 750    return NULL;
 751 }
 752
 753 static Evas_Object *
 754 _content_unset_hook(Evas_Object *obj, const char *part)
 755 {
 756    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
 757    if (!part || !strcmp(part, "icon"))
 758      return _icon_unset(obj);
 759    else if (!strcmp(part, "end"))
 760      return _end_unset(obj);
 761    return NULL;
 762 }
 763
 764 static void
 765 _hash_labels_free_cb(void* label)
 766 {
 767   if (label)
 768     eina_stringshare_del(label);
 769 }
 770
 771 static void
 772 _min_max_set(Evas_Object *obj)
 773 {
 774    char *buf_min = NULL;
 775    char *buf_max = NULL;
 776
 777    Widget_Data *wd = elm_widget_data_get(obj);
 778    if (!wd) return;
 779    if (wd->units_format_func)
 780      {
 781         buf_min = wd->units_format_func(wd->val_min);
 782         buf_max = wd->units_format_func(wd->val_max);
 783      }
 784    else if (wd->units)
 785      {
 786         int length = strlen(wd->units);
 787
 788         buf_min = alloca(length + 128);
 789         buf_max = alloca(length + 128);
 790
 791         snprintf((char*) buf_min, length + 128, wd->units, wd->val_min);
 792         snprintf((char*) buf_max, length + 128, wd->units, wd->val_max);
 793      }
 794
 795    edje_object_part_text_set(wd->slider, "elm.units.min", buf_min);
 796    edje_object_part_text_set(wd->slider, "elm.units.max", buf_max);
 797
 798    if (wd->units_format_func && wd->units_format_free)
 799      {
 800         wd->units_format_free(buf_min);
 801         wd->units_format_free(buf_max);
 802      }
 803 }
 804
 805
 806 EAPI Evas_Object *
 807 elm_slider_add(Evas_Object *parent)
 808 {
 809    Evas_Object *obj;
 810    Evas *e;
 811    Widget_Data *wd;
 812
 813    ELM_WIDGET_STANDARD_SETUP(wd, Widget_Data, parent, e, obj, NULL);
 814
 815    ELM_SET_WIDTYPE(widtype, "slider");
 816    elm_widget_type_set(obj, "slider");
 817    elm_widget_sub_object_add(parent, obj);
 818    elm_widget_on_focus_hook_set(obj, _on_focus_hook, NULL);
 819    elm_widget_data_set(obj, wd);
 820    elm_widget_del_hook_set(obj, _del_hook);
 821    elm_widget_theme_hook_set(obj, _theme_hook);
 822    elm_widget_disable_hook_set(obj, _disable_hook);
 823    elm_widget_can_focus_set(obj, EINA_TRUE);
 824    elm_widget_event_hook_set(obj, _event_hook);
 825    elm_widget_text_set_hook_set(obj, _elm_slider_label_set);
 826    elm_widget_text_get_hook_set(obj, _elm_slider_label_get);
 827    elm_widget_content_set_hook_set(obj, _content_set_hook);
 828    elm_widget_content_get_hook_set(obj, _content_get_hook);
 829    elm_widget_content_unset_hook_set(obj, _content_unset_hook);
 830
 831    wd->horizontal = EINA_TRUE;
 832    wd->indicator_show = EINA_TRUE;
 833    wd->val = 0.0;
 834    wd->val_min = 0.0;
 835    wd->val_max = 1.0;
 836    wd->labels = eina_hash_string_superfast_new(_hash_labels_free_cb);
 837
 838    wd->slider = edje_object_add(e);
 839    _elm_theme_object_set(obj, wd->slider, "slider", "horizontal", "default");
 840    elm_widget_resize_object_set(obj, wd->slider);
 841    edje_object_signal_callback_add(wd->slider, "drag", "*", _drag, obj);
 842    edje_object_signal_callback_add(wd->slider, "drag,start", "*", _drag_start, obj);
 843    edje_object_signal_callback_add(wd->slider, "drag,stop", "*", _drag_stop, obj);
 844    edje_object_signal_callback_add(wd->slider, "drag,step", "*", _drag_step, obj);
 845    edje_object_signal_callback_add(wd->slider, "drag,page", "*", _drag_stop, obj);
 846    //   edje_object_signal_callback_add(wd->slider, "drag,set", "*", _drag_stop, obj);
 847    edje_object_part_drag_value_set(wd->slider, "elm.dragable.slider", 0.0, 0.0);
 848
 849    wd->spacer = evas_object_rectangle_add(e);
 850    evas_object_color_set(wd->spacer, 0, 0, 0, 0);
 851    evas_object_pass_events_set(wd->spacer, EINA_TRUE);
 852    elm_widget_sub_object_add(obj, wd->spacer);
 853    edje_object_part_swallow(wd->slider, "elm.swallow.bar", wd->spacer);
 854    evas_object_event_callback_add(wd->spacer, EVAS_CALLBACK_MOUSE_DOWN, _spacer_down_cb, obj);
 855    evas_object_event_callback_add(wd->spacer, EVAS_CALLBACK_MOUSE_MOVE, _spacer_move_cb, obj);
 856    evas_object_event_callback_add(wd->spacer, EVAS_CALLBACK_MOUSE_UP, _spacer_up_cb, obj);
 857    evas_object_smart_callback_add(obj, "sub-object-del", _sub_del, obj);
 858
 859    _mirrored_set(obj, elm_widget_mirrored_get(obj));
 860    _sizing_eval(obj);
 861
 862    // TODO: convert Elementary to subclassing of Evas_Smart_Class
 863    // TODO: and save some bytes, making descriptions per-class and not instance!
 864    evas_object_smart_callbacks_descriptions_set(obj, _signals);
 865    return obj;
 866 }
 867
 868 EAPI void
 869 elm_slider_span_size_set(Evas_Object *obj, Evas_Coord size)
 870 {
 871    ELM_CHECK_WIDTYPE(obj, widtype);
 872    Widget_Data *wd = elm_widget_data_get(obj);
 873    if (!wd) return;
 874    if (wd->size == size) return;
 875    wd->size = size;
 876    if (wd->horizontal)
 877      evas_object_size_hint_min_set(wd->spacer, (double)wd->size * elm_widget_scale_get(obj) * _elm_config->scale, 1);
 878    else
 879      evas_object_size_hint_min_set(wd->spacer, 1, (double)wd->size * elm_widget_scale_get(obj) * _elm_config->scale);
 880    if (wd->indicator_show)
 881      edje_object_signal_emit(wd->slider, "elm,state,val,show", "elm");
 882    else
 883      edje_object_signal_emit(wd->slider, "elm,state,val,hide", "elm");
 884    edje_object_part_swallow(wd->slider, "elm.swallow.bar", wd->spacer);
 885    _sizing_eval(obj);
 886 }
 887
 888 EAPI Evas_Coord
 889 elm_slider_span_size_get(const Evas_Object *obj)
 890 {
 891    ELM_CHECK_WIDTYPE(obj, widtype) 0;
 892    Widget_Data *wd = elm_widget_data_get(obj);
 893    if (!wd) return 0;
 894    return wd->size;
 895 }
 896
 897 EAPI void
 898 elm_slider_unit_format_set(Evas_Object *obj, const char *units)
 899 {
 900    ELM_CHECK_WIDTYPE(obj, widtype);
 901    Widget_Data *wd = elm_widget_data_get(obj);
 902    if (!wd) return;
 903    eina_stringshare_replace(&wd->units, units);
 904    if (units)
 905      {
 906         edje_object_signal_emit(wd->slider, "elm,state,units,visible", "elm");
 907         edje_object_message_signal_process(wd->slider);
 908      }
 909    else
 910      {
 911         edje_object_signal_emit(wd->slider, "elm,state,units,hidden", "elm");
 912         edje_object_message_signal_process(wd->slider);
 913      }
 914    _min_max_set(obj);
 915    _units_set(obj);
 916    _sizing_eval(obj);
 917 }
 918
 919 EAPI const char *
 920 elm_slider_unit_format_get(const Evas_Object *obj)
 921 {
 922    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
 923    Widget_Data *wd = elm_widget_data_get(obj);
 924    if (!wd) return NULL;
 925    return wd->units;
 926 }
 927
 928 EAPI void
 929 elm_slider_indicator_format_set(Evas_Object *obj, const char *indicator)
 930 {
 931    ELM_CHECK_WIDTYPE(obj, widtype);
 932    Widget_Data *wd = elm_widget_data_get(obj);
 933    if (!wd) return;
 934    eina_stringshare_replace(&wd->indicator, indicator);
 935    _indicator_set(obj);
 936 }
 937
 938 EAPI const char *
 939 elm_slider_indicator_format_get(const Evas_Object *obj)
 940 {
 941    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
 942    Widget_Data *wd = elm_widget_data_get(obj);
 943    if (!wd) return NULL;
 944    return wd->indicator;
 945 }
 946
 947 EAPI void
 948 elm_slider_horizontal_set(Evas_Object *obj, Eina_Bool horizontal)
 949 {
 950    ELM_CHECK_WIDTYPE(obj, widtype);
 951    Widget_Data *wd = elm_widget_data_get(obj);
 952    if (!wd) return;
 953    horizontal = !!horizontal;
 954    if (wd->horizontal == horizontal) return;
 955    wd->horizontal = horizontal;
 956    _theme_hook(obj);
 957 }
 958
 959 EAPI Eina_Bool
 960 elm_slider_horizontal_get(const Evas_Object *obj)
 961 {
 962    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
 963    Widget_Data *wd = elm_widget_data_get(obj);
 964    if (!wd) return EINA_FALSE;
 965    return wd->horizontal;
 966 }
 967
 968 EAPI void
 969 elm_slider_min_max_set(Evas_Object *obj, double min, double max)
 970 {
 971    ELM_CHECK_WIDTYPE(obj, widtype);
 972    Widget_Data *wd = elm_widget_data_get(obj);
 973    if (!wd) return;
 974    if ((wd->val_min == min) && (wd->val_max == max)) return;
 975    wd->val_min = min;
 976    wd->val_max = max;
 977    if (wd->val < wd->val_min) wd->val = wd->val_min;
 978    if (wd->val > wd->val_max) wd->val = wd->val_max;
 979    _min_max_set(obj);
 980    _val_set(obj);
 981    _units_set(obj);
 982    _indicator_set(obj);
 983 }
 984
 985 EAPI void
 986 elm_slider_min_max_get(const Evas_Object *obj, double *min, double *max)
 987 {
 988    if (min) *min = 0.0;
 989    if (max) *max = 0.0;
 990    ELM_CHECK_WIDTYPE(obj, widtype);
 991    Widget_Data *wd = elm_widget_data_get(obj);
 992    if (!wd) return;
 993    if (min) *min = wd->val_min;
 994    if (max) *max = wd->val_max;
 995 }
 996
 997 EAPI void
 998 elm_slider_value_set(Evas_Object *obj, double val)
 999 {
1000    ELM_CHECK_WIDTYPE(obj, widtype);
1001    Widget_Data *wd = elm_widget_data_get(obj);
1002    if (!wd) return;
1003    if (wd->val == val) return;
1004    wd->val = val;
1005    if (wd->val < wd->val_min) wd->val = wd->val_min;
1006    if (wd->val > wd->val_max) wd->val = wd->val_max;
1007    edje_object_signal_emit(wd->slider, "elm,state,drag", "elm");
1008    _val_set(obj);
1009    _units_set(obj);
1010    _indicator_set(obj);
1011 }
1012
1013 EAPI double
1014 elm_slider_value_get(const Evas_Object *obj)
1015 {
1016    ELM_CHECK_WIDTYPE(obj, widtype) 0.0;
1017    Widget_Data *wd = elm_widget_data_get(obj);
1018    if (!wd) return 0.0;
1019    return wd->val;
1020 }
1021
1022 EAPI void
1023 elm_slider_inverted_set(Evas_Object *obj, Eina_Bool inverted)
1024 {
1025    ELM_CHECK_WIDTYPE(obj, widtype);
1026    Widget_Data *wd = elm_widget_data_get(obj);
1027    if (!wd) return;
1028    inverted = !!inverted;
1029    if (wd->inverted == inverted) return;
1030    wd->inverted = inverted;
1031    if (wd->inverted)
1032      edje_object_signal_emit(wd->slider, "elm,state,inverted,on", "elm");
1033    else
1034      edje_object_signal_emit(wd->slider, "elm,state,inverted,off", "elm");
1035    edje_object_message_signal_process(wd->slider);
1036    _val_set(obj);
1037    _units_set(obj);
1038    _indicator_set(obj);
1039 }
1040
1041 EAPI Eina_Bool
1042 elm_slider_inverted_get(const Evas_Object *obj)
1043 {
1044    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
1045    Widget_Data *wd = elm_widget_data_get(obj);
1046    if (!wd) return EINA_FALSE;
1047    return wd->inverted;
1048 }
1049
1050 EAPI void
1051 elm_slider_indicator_format_function_set(Evas_Object *obj, char *(*func)(double val), void (*free_func)(char *str))
1052 {
1053    ELM_CHECK_WIDTYPE(obj, widtype);
1054    Widget_Data *wd = elm_widget_data_get(obj);
1055    if (!wd) return;
1056    wd->indicator_format_func = func;
1057    wd->indicator_format_free = free_func;
1058    _indicator_set(obj);
1059 }
1060
1061 EAPI void
1062 elm_slider_units_format_function_set(Evas_Object *obj, char *(*func)(double val), void (*free_func)(char *str))
1063 {
1064    ELM_CHECK_WIDTYPE(obj, widtype);
1065    Widget_Data *wd = elm_widget_data_get(obj);
1066    if (!wd) return;
1067    wd->units_format_func = func;
1068    wd->units_format_free = free_func;
1069    _min_max_set(obj);
1070    _units_set(obj);
1071 }
1072
1073 EAPI void
1074 elm_slider_indicator_show_set(Evas_Object *obj, Eina_Bool show)
1075 {
1076    ELM_CHECK_WIDTYPE(obj, widtype);
1077    Widget_Data *wd = elm_widget_data_get(obj);
1078    if (show) {
1079         wd->indicator_show = EINA_TRUE;
1080         edje_object_signal_emit(wd->slider, "elm,state,val,show", "elm");
1081    }
1082    else {
1083         wd->indicator_show = EINA_FALSE;
1084         edje_object_signal_emit(wd->slider, "elm,state,val,hide", "elm");
1085    }
1086 }
1087
1088 EAPI Eina_Bool
1089 elm_slider_indicator_show_get(const Evas_Object *obj)
1090 {
1091    ELM_CHECK_WIDTYPE(obj, widtype) EINA_FALSE;
1092    Widget_Data *wd = elm_widget_data_get(obj);
1093    if (!wd) return EINA_FALSE;
1094    return wd->indicator_show;
1095 }
1096