e11ff5ac9ad965eac5cd2dd682e9ad4e52c19684
[framework/uifw/elementary.git] / src / lib / elm_scroller.c
1 #include <Elementary.h>
2 #include "elm_priv.h"
3 #include "elm_widget_scroller.h"
4 EAPI const char ELM_SCROLLER_SMART_NAME[] = "elm_scroller";
5
6 static const char SIG_SCROLL[] = "scroll";
7 static const char SIG_SCROLL_LEFT[] = "scroll,left";
8 static const char SIG_SCROLL_RIGHT[] = "scroll,right";
9 static const char SIG_SCROLL_UP[] = "scroll,up";
10 static const char SIG_SCROLL_DOWN[] = "scroll,down";
11 static const char SIG_SCROLL_ANIM_START[] = "scroll,anim,start";
12 static const char SIG_SCROLL_ANIM_STOP[] = "scroll,anim,stop";
13 static const char SIG_SCROLL_DRAG_START[] = "scroll,drag,start";
14 static const char SIG_SCROLL_DRAG_STOP[] = "scroll,drag,stop";
15 static const char SIG_EDGE_LEFT[] = "edge,left";
16 static const char SIG_EDGE_RIGHT[] = "edge,right";
17 static const char SIG_EDGE_TOP[] = "edge,top";
18 static const char SIG_EDGE_BOTTOM[] = "edge,bottom";
19 static const char SIG_VBAR_DRAG[] = "vbar,drag";
20 static const char SIG_VBAR_PRESS[] = "vbar,press";
21 static const char SIG_VBAR_UNPRESS[] = "vbar,unpress";
22 static const char SIG_HBAR_DRAG[] = "hbar,drag";
23 static const char SIG_HBAR_PRESS[] = "hbar,press";
24 static const char SIG_HBAR_UNPRESS[] = "hbar,unpress";
25 static const Evas_Smart_Cb_Description _smart_callbacks[] =
26 {
27    {SIG_SCROLL, ""},
28    {SIG_SCROLL_LEFT, ""},
29    {SIG_SCROLL_RIGHT, ""},
30    {SIG_SCROLL_UP, ""},
31    {SIG_SCROLL_DOWN, ""},
32    {SIG_SCROLL_ANIM_START, ""},
33    {SIG_SCROLL_ANIM_STOP, ""},
34    {SIG_SCROLL_DRAG_START, ""},
35    {SIG_SCROLL_DRAG_STOP, ""},
36    {SIG_EDGE_LEFT, ""},
37    {SIG_EDGE_RIGHT, ""},
38    {SIG_EDGE_TOP, ""},
39    {SIG_EDGE_BOTTOM, ""},
40    {SIG_VBAR_DRAG, ""},
41    {SIG_VBAR_PRESS, ""},
42    {SIG_VBAR_UNPRESS, ""},
43    {SIG_HBAR_DRAG, ""},
44    {SIG_HBAR_PRESS, ""},
45    {SIG_HBAR_UNPRESS, ""},
46    {NULL, NULL}
47 };
48
49 static const Evas_Smart_Interface *_smart_interfaces[] =
50 {
51    (Evas_Smart_Interface *)&ELM_SCROLLABLE_IFACE, NULL
52 };
53
54 EVAS_SMART_SUBCLASS_IFACE_NEW
55   (ELM_SCROLLER_SMART_NAME, _elm_scroller, Elm_Scroller_Smart_Class,
56   Elm_Layout_Smart_Class, elm_layout_smart_class_get, _smart_callbacks,
57   _smart_interfaces);
58
59 static Eina_Bool
60 _elm_scroller_smart_event(Evas_Object *obj,
61                           Evas_Object *src __UNUSED__,
62                           Evas_Callback_Type type,
63                           void *event_info)
64 {
65    Evas_Coord x = 0;
66    Evas_Coord y = 0;
67    Evas_Coord c_x = 0;
68    Evas_Coord c_y = 0;
69    Evas_Coord v_w = 0;
70    Evas_Coord v_h = 0;
71    Evas_Coord max_x = 0;
72    Evas_Coord max_y = 0;
73    Evas_Coord page_x = 0;
74    Evas_Coord page_y = 0;
75    Evas_Coord step_x = 0;
76    Evas_Coord step_y = 0;
77    Evas_Event_Key_Down *ev = event_info;
78
79    ELM_SCROLLER_DATA_GET(obj, sd);
80
81    if (elm_widget_disabled_get(obj)) return EINA_FALSE;
82    if (type != EVAS_CALLBACK_KEY_DOWN) return EINA_FALSE;
83    if (ev->event_flags & EVAS_EVENT_FLAG_ON_HOLD) return EINA_FALSE;
84
85    sd->s_iface->content_pos_get(obj, &x, &y);
86    sd->s_iface->step_size_get(obj, &step_x, &step_y);
87    sd->s_iface->page_size_get(obj, &page_x, &page_y);
88    sd->s_iface->content_viewport_size_get(obj, &v_w, &v_h);
89    evas_object_geometry_get(sd->content, &c_x, &c_y, &max_x, &max_y);
90
91    if (((!strcmp(ev->keyname, "Left")) ||
92         (!strcmp(ev->keyname, "KP_Left")) ||
93         (!strcmp(ev->keyname, "Right")) ||
94         (!strcmp(ev->keyname, "KP_Right")) ||
95         (!strcmp(ev->keyname, "Up")) ||
96         (!strcmp(ev->keyname, "KP_Up")) ||
97         (!strcmp(ev->keyname, "Down")) ||
98         (!strcmp(ev->keyname, "KP_Down"))) && (!ev->string))
99      {
100         Evas_Object *current_focus = NULL;
101         Eina_List *can_focus_list = NULL;
102         Evas_Object *new_focus = NULL;
103         Evas_Coord f_x = 0;
104         Evas_Coord f_y = 0;
105         Evas_Coord f_w = 0;
106         Evas_Coord f_h = 0;
107
108         current_focus = elm_widget_focused_object_get(obj);
109         evas_object_geometry_get(current_focus, &f_x, &f_y, &f_w, &f_h);
110         can_focus_list = elm_widget_can_focus_child_list_get(obj);
111         if ((current_focus == obj) ||
112             (!ELM_RECTS_INTERSECT
113                (x, y, v_w, v_h, (f_x - c_x), (f_y - c_y), f_w, f_h)))
114           {
115              Eina_List *l;
116              Evas_Object *cur;
117              double weight = 0.0;
118
119              EINA_LIST_FOREACH(can_focus_list, l, cur)
120                {
121                   double cur_weight = 0.0;
122
123                   evas_object_geometry_get(cur, &f_x, &f_y, &f_w, &f_h);
124                   if (ELM_RECTS_INTERSECT
125                         (x, y, v_w, v_h, (f_x - c_x), (f_y - c_y), f_w, f_h))
126                     {
127                        if ((f_x - c_x) > x)
128                          cur_weight += ((f_x - c_x) - x) * ((f_x - c_x) - x);
129                        if ((f_y - c_y) > y)
130                          cur_weight += ((f_y - c_y) - y) * ((f_y - c_y) - y);
131                        if (cur_weight == 0.0)
132                          {
133                             elm_widget_focus_steal(cur);
134                             ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
135                             return EINA_TRUE;
136                          }
137                        cur_weight = 1.0 / cur_weight;
138                        if (cur_weight > weight)
139                          {
140                             new_focus = cur;
141                             weight = cur_weight;
142                          }
143                     }
144                }
145              if (new_focus)
146                {
147                   elm_widget_focus_steal(new_focus);
148                   ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
149                   return EINA_TRUE;
150                }
151           }
152         else
153           {
154              Evas_Object *tmp = NULL;
155              double degree = 0.0, weight = 0.0;
156              void *(*list_data_get)(const Eina_List *list);
157
158              list_data_get = eina_list_data_get;
159
160              if ((!strcmp(ev->keyname, "Left")) ||
161                  (!strcmp(ev->keyname, "KP_Left")))
162                degree = 270.0;
163              else if ((!strcmp(ev->keyname, "Right")) ||
164                       (!strcmp(ev->keyname, "KP_Right")))
165                degree = 90.0;
166              else if ((!strcmp(ev->keyname, "Up")) ||
167                       (!strcmp(ev->keyname, "KP_Up")))
168                degree = 0.0;
169              else if ((!strcmp(ev->keyname, "Down")) ||
170                       (!strcmp(ev->keyname, "KP_Down")))
171                degree = 180.0;
172
173              if (elm_widget_focus_list_direction_get
174                    (obj, current_focus, can_focus_list, list_data_get, degree,
175                    &tmp, &weight))
176                new_focus = tmp;
177
178              if (new_focus)
179                {
180                   Evas_Coord l_x = 0;
181                   Evas_Coord l_y = 0;
182                   Evas_Coord l_w = 0;
183                   Evas_Coord l_h = 0;
184
185                   evas_object_geometry_get(new_focus, &f_x, &f_y, &f_w, &f_h);
186                   l_x = f_x - c_x - step_x;
187                   l_y = f_y - c_y - step_y;
188                   l_w = f_w + (step_x * 2);
189                   l_h = f_h + (step_y * 2);
190
191                   if (ELM_RECTS_INTERSECT(x, y, v_w, v_h, l_x, l_y, l_w, l_h))
192                     {
193                        elm_widget_focus_steal(new_focus);
194                        ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
195                        return EINA_TRUE;
196                     }
197                }
198           }
199      }
200    if ((!strcmp(ev->keyname, "Left")) ||
201        ((!strcmp(ev->keyname, "KP_Left")) && (!ev->string)))
202      {
203         if (x <= 0) return EINA_FALSE;
204         x -= step_x;
205      }
206    else if ((!strcmp(ev->keyname, "Right")) ||
207             ((!strcmp(ev->keyname, "KP_Right")) && (!ev->string)))
208      {
209         if (x >= (max_x - v_w)) return EINA_FALSE;
210         x += step_x;
211      }
212    else if ((!strcmp(ev->keyname, "Up")) ||
213             ((!strcmp(ev->keyname, "KP_Up")) && (!ev->string)))
214      {
215         if (y == 0) return EINA_FALSE;
216         y -= step_y;
217      }
218    else if ((!strcmp(ev->keyname, "Down")) ||
219             ((!strcmp(ev->keyname, "KP_Down")) && (!ev->string)))
220      {
221         if (y >= (max_y - v_h)) return EINA_FALSE;
222         y += step_y;
223      }
224    else if ((!strcmp(ev->keyname, "Home")) ||
225             ((!strcmp(ev->keyname, "KP_Home")) && (!ev->string)))
226      {
227         y = 0;
228      }
229    else if ((!strcmp(ev->keyname, "End")) ||
230             ((!strcmp(ev->keyname, "KP_End")) && (!ev->string)))
231      {
232         y = max_y - v_h;
233      }
234    else if ((!strcmp(ev->keyname, "Prior")) ||
235             ((!strcmp(ev->keyname, "KP_Prior")) && (!ev->string)))
236      {
237         if (page_y < 0)
238           y -= -(page_y * v_h) / 100;
239         else
240           y -= page_y;
241      }
242    else if ((!strcmp(ev->keyname, "Next")) ||
243             ((!strcmp(ev->keyname, "KP_Next")) && (!ev->string)))
244      {
245         if (page_y < 0)
246           y += -(page_y * v_h) / 100;
247         else
248           y += page_y;
249      }
250    else return EINA_FALSE;
251
252    ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
253    sd->s_iface->content_pos_set(obj, x, y, EINA_TRUE);
254
255    return EINA_TRUE;
256 }
257
258 static Eina_Bool
259 _elm_scroller_smart_activate(Evas_Object *obj, Elm_Activate act)
260 {
261    Evas_Coord x = 0;
262    Evas_Coord y = 0;
263    Evas_Coord v_w = 0;
264    Evas_Coord v_h = 0;
265    Evas_Coord page_x = 0;
266    Evas_Coord page_y = 0;
267
268    ELM_SCROLLER_DATA_GET(obj, sd);
269
270    if ((elm_widget_disabled_get(obj)) ||
271        (act == ELM_ACTIVATE_DEFAULT) ||
272        (act == ELM_ACTIVATE_BACK)) return EINA_FALSE;
273
274    sd->s_iface->content_pos_get(obj, &x, &y);
275    sd->s_iface->page_size_get(obj, &page_x, &page_y);
276    sd->s_iface->content_viewport_size_get(obj, &v_w, &v_h);
277
278    if (act == ELM_ACTIVATE_UP)
279      {
280         if (page_y < 0)
281           y -= -(page_y * v_h) / 100;
282         else
283           y -= page_y;
284      }
285    else if (act == ELM_ACTIVATE_DOWN)
286      {
287         if (page_y < 0)
288           y += -(page_y * v_h) / 100;
289         else
290           y += page_y;
291      }
292    else if (act == ELM_ACTIVATE_LEFT)
293      {
294         if (page_x < 0)
295           x -= -(page_x * v_w) / 100;
296         else
297           x -= page_x;
298      }
299    else if (act == ELM_ACTIVATE_RIGHT)
300      {
301         if (page_x < 0)
302           x += -(page_x * v_w) / 100;
303         else
304           x += page_x;
305      }
306
307    sd->s_iface->content_pos_set(obj, x, y, EINA_TRUE);
308    return EINA_TRUE;
309 }
310
311 static void
312 _elm_scroller_smart_sizing_eval(Evas_Object *obj)
313 {
314    Evas_Coord vw = 0, vh = 0, minw = 0, minh = 0, maxw = 0, maxh = 0, w, h,
315               vmw, vmh;
316    double xw = 0.0, yw = 0.0;
317    int i;
318
319    ELM_SCROLLER_DATA_GET(obj, sd);
320
321    /* parent class' early call */
322    if (!sd->s_iface) return;
323
324    if (sd->content)
325      {
326         evas_object_size_hint_min_get(sd->content, &minw, &minh);
327         evas_object_size_hint_max_get(sd->content, &maxw, &maxh);
328         evas_object_size_hint_weight_get(sd->content, &xw, &yw);
329      }
330
331    sd->s_iface->content_viewport_size_get(obj, &vw, &vh);
332    if (xw > 0.0)
333      {
334         if ((minw > 0) && (vw < minw))
335           vw = minw;
336         else if ((maxw > 0) && (vw > maxw))
337           vw = maxw;
338      }
339    else if (minw > 0)
340      vw = minw;
341
342    if (yw > 0.0)
343      {
344         if ((minh > 0) && (vh < minh))
345           vh = minh;
346         else if ((maxh > 0) && (vh > maxh))
347           vh = maxh;
348      }
349    else if (minh > 0)
350      vh = minh;
351
352    if (sd->content) evas_object_resize(sd->content, vw, vh);
353    if (sd->contents) evas_object_resize(sd->contents, vw, vh);
354
355    for (i = 0 ; i < 3 ; i++)
356      if (sd->proxy_content[i])
357        evas_object_image_fill_set(sd->proxy_content[i], 0, 0, vw, vh);
358
359    w = -1;
360    h = -1;
361    edje_object_size_min_calc(ELM_WIDGET_DATA(sd)->resize_obj, &vmw, &vmh);
362
363    if (sd->min_w) w = vmw + minw;
364    if (sd->min_h) h = vmh + minh;
365
366    evas_object_size_hint_max_get(obj, &maxw, &maxh);
367    if ((maxw > 0) && (w > maxw)) w = maxw;
368    if ((maxh > 0) && (h > maxh)) h = maxh;
369
370    evas_object_size_hint_min_set(obj, w, h);
371 }
372
373 static void
374 _mirrored_set(Evas_Object *obj,
375               Eina_Bool mirrored)
376 {
377    ELM_SCROLLER_DATA_GET(obj, sd);
378
379    sd->s_iface->mirrored_set(obj, mirrored);
380 }
381
382 static Eina_Bool
383 _elm_scroller_smart_theme(Evas_Object *obj)
384 {
385    if (!ELM_WIDGET_CLASS(_elm_scroller_parent_sc)->theme(obj))
386      return EINA_FALSE;
387
388    _mirrored_set(obj, elm_widget_mirrored_get(obj));
389
390    elm_layout_sizing_eval(obj);
391
392    return EINA_TRUE;
393 }
394
395 static Eina_Bool
396 _elm_scroller_smart_focus_next(const Evas_Object *obj,
397                                Elm_Focus_Direction dir,
398                                Evas_Object **next)
399 {
400    Evas_Object *cur;
401
402    ELM_SCROLLER_DATA_GET(obj, sd);
403
404    if (!sd->content) return EINA_FALSE;
405
406    cur = sd->content;
407
408    /* access */
409    if (_elm_config->access_mode)
410      {
411         if ((elm_widget_can_focus_get(cur)) ||
412             (elm_widget_child_can_focus_get(cur)))
413           return elm_widget_focus_next_get(cur, dir, next);
414
415         return EINA_FALSE;
416      }
417
418    /* Try focus cycle in subitem */
419    if (elm_widget_focus_get(obj))
420      {
421         if ((elm_widget_can_focus_get(cur)) ||
422             (elm_widget_child_can_focus_get(cur)))
423           return elm_widget_focus_next_get(cur, dir, next);
424      }
425
426    /* Return */
427    *next = (Evas_Object *)obj;
428
429    return !elm_widget_focus_get(obj);
430 }
431
432 static void
433 _show_region_hook(void *data,
434                   Evas_Object *content_obj)
435 {
436    Evas_Coord x, y, w, h;
437
438    ELM_SCROLLER_DATA_GET(data, sd);
439
440    elm_widget_show_region_get(content_obj, &x, &y, &w, &h);
441    sd->s_iface->content_region_show(data, x, y, w, h);
442 }
443
444 static void
445 _changed_size_hints_cb(void *data,
446                        Evas *e __UNUSED__,
447                        Evas_Object *obj __UNUSED__,
448                        void *event_info __UNUSED__)
449 {
450    elm_layout_sizing_eval(data);
451 }
452
453 static Eina_Bool
454 _elm_scroller_smart_sub_object_del(Evas_Object *obj,
455                                    Evas_Object *sobj)
456 {
457    ELM_SCROLLER_DATA_GET(obj, sd);
458
459    if (!ELM_WIDGET_CLASS(_elm_scroller_parent_sc)->sub_object_del(obj, sobj))
460      return EINA_FALSE;
461
462    if (sobj == sd->content)
463      {
464         elm_widget_on_show_region_hook_set(sd->content, NULL, NULL);
465
466         sd->content = NULL;
467      }
468
469    return EINA_TRUE;
470 }
471
472 static void
473 _resize_cb(void *data,
474            Evas *e __UNUSED__,
475            Evas_Object *obj __UNUSED__,
476            void *event_info __UNUSED__)
477 {
478    elm_layout_sizing_eval(data);
479 }
480
481 static void
482 _edge_left_cb(Evas_Object *obj,
483               void *data __UNUSED__)
484 {
485    evas_object_smart_callback_call(obj, SIG_EDGE_LEFT, NULL);
486 }
487
488 static void
489 _edge_right_cb(Evas_Object *obj,
490                void *data __UNUSED__)
491 {
492    evas_object_smart_callback_call(obj, SIG_EDGE_RIGHT, NULL);
493 }
494
495 static void
496 _edge_top_cb(Evas_Object *obj,
497              void *data __UNUSED__)
498 {
499    evas_object_smart_callback_call(obj, SIG_EDGE_TOP, NULL);
500 }
501
502 static void
503 _edge_bottom_cb(Evas_Object *obj,
504                 void *data __UNUSED__)
505 {
506    evas_object_smart_callback_call(obj, SIG_EDGE_BOTTOM, NULL);
507 }
508
509 static void
510 _vbar_drag_cb(Evas_Object *obj,
511                 void *data __UNUSED__)
512 {
513    evas_object_smart_callback_call(obj, SIG_VBAR_DRAG, NULL);
514 }
515
516 static void
517 _vbar_press_cb(Evas_Object *obj,
518                 void *data __UNUSED__)
519 {
520    evas_object_smart_callback_call(obj, SIG_VBAR_PRESS, NULL);
521 }
522
523 static void
524 _vbar_unpress_cb(Evas_Object *obj,
525                 void *data __UNUSED__)
526 {
527    evas_object_smart_callback_call(obj, SIG_VBAR_UNPRESS, NULL);
528 }
529
530 static void
531 _hbar_drag_cb(Evas_Object *obj,
532                 void *data __UNUSED__)
533 {
534    evas_object_smart_callback_call(obj, SIG_HBAR_DRAG, NULL);
535 }
536
537 static void
538 _hbar_press_cb(Evas_Object *obj,
539                 void *data __UNUSED__)
540 {
541    evas_object_smart_callback_call(obj, SIG_HBAR_PRESS, NULL);
542 }
543
544 static void
545 _hbar_unpress_cb(Evas_Object *obj,
546                 void *data __UNUSED__)
547 {
548    evas_object_smart_callback_call(obj, SIG_HBAR_UNPRESS, NULL);
549 }
550
551 static void
552 _scroll_cb(Evas_Object *obj,
553            void *data __UNUSED__)
554 {
555    evas_object_smart_callback_call(obj, SIG_SCROLL, NULL);
556 }
557
558 static void
559 _scroll_left_cb(Evas_Object *obj,
560            void *data __UNUSED__)
561 {
562    evas_object_smart_callback_call(obj, SIG_SCROLL_LEFT, NULL);
563 }
564
565 static void
566 _scroll_right_cb(Evas_Object *obj,
567            void *data __UNUSED__)
568 {
569    evas_object_smart_callback_call(obj, SIG_SCROLL_RIGHT, NULL);
570 }
571
572 static void
573 _scroll_up_cb(Evas_Object *obj,
574            void *data __UNUSED__)
575 {
576    evas_object_smart_callback_call(obj, SIG_SCROLL_UP, NULL);
577 }
578
579 static void
580 _scroll_down_cb(Evas_Object *obj,
581            void *data __UNUSED__)
582 {
583    evas_object_smart_callback_call(obj, SIG_SCROLL_DOWN, NULL);
584 }
585
586 static void
587 _scroll_anim_start_cb(Evas_Object *obj,
588                       void *data __UNUSED__)
589 {
590    evas_object_smart_callback_call(obj, SIG_SCROLL_ANIM_START, NULL);
591 }
592
593 static void
594 _scroll_anim_stop_cb(Evas_Object *obj,
595                      void *data __UNUSED__)
596 {
597    evas_object_smart_callback_call(obj, SIG_SCROLL_ANIM_STOP, NULL);
598 }
599
600 static void
601 _scroll_drag_start_cb(Evas_Object *obj,
602                       void *data __UNUSED__)
603 {
604    evas_object_smart_callback_call(obj, SIG_SCROLL_DRAG_START, NULL);
605 }
606
607 static void
608 _scroll_drag_stop_cb(Evas_Object *obj,
609                      void *data __UNUSED__)
610 {
611    evas_object_smart_callback_call(obj, SIG_SCROLL_DRAG_STOP, NULL);
612 }
613
614 static void
615 _loop_content_set(Evas_Object *obj, Evas_Object *content)
616 {
617    ELM_SCROLLER_DATA_GET(obj, sd);
618
619    if (!sd->contents)
620      {
621         sd->contents = elm_layout_add(obj);
622         evas_object_smart_member_add(sd->contents, obj);
623         elm_layout_theme_set(sd->contents, "scroller", "contents", elm_widget_style_get(obj));
624         evas_object_size_hint_weight_set(sd->contents, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
625         evas_object_size_hint_align_set(sd->contents, EVAS_HINT_FILL, EVAS_HINT_FILL);
626
627         elm_widget_sub_object_add(obj, sd->contents);
628         elm_widget_on_show_region_hook_set(sd->contents, _show_region_hook, obj);
629      }
630    elm_object_part_content_set(sd->contents, "elm.swallow.content", content);
631    sd->content = content;
632
633    if (sd->loop_h)
634      {
635         if (!sd->proxy_content[0])
636           {
637              sd->proxy_content[0] = evas_object_image_add(evas_object_evas_get(sd->contents));
638              evas_object_smart_member_add(sd->proxy_content[0], obj);
639              evas_object_size_hint_weight_set(sd->proxy_content[0], EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
640              evas_object_size_hint_align_set(sd->proxy_content[0], EVAS_HINT_FILL, EVAS_HINT_FILL);
641           }
642         evas_object_image_source_set(sd->proxy_content[0], content);
643         evas_object_image_source_clip_set(sd->proxy_content[0], EINA_FALSE);
644         elm_object_part_content_set(sd->contents, "elm.swallow.content_r", sd->proxy_content[0]);
645         evas_object_show(sd->proxy_content[0]);
646      }
647
648    if (sd->loop_v)
649      {
650         if (!sd->proxy_content[1])
651           {
652              sd->proxy_content[1] = evas_object_image_add(evas_object_evas_get(sd->contents));
653              evas_object_smart_member_add(sd->proxy_content[1], obj);
654              evas_object_size_hint_weight_set(sd->proxy_content[1], EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
655              evas_object_size_hint_align_set(sd->proxy_content[1], EVAS_HINT_FILL, EVAS_HINT_FILL);
656           }
657         evas_object_image_source_set(sd->proxy_content[1], content);
658         evas_object_image_source_clip_set(sd->proxy_content[1], EINA_FALSE);
659         elm_object_part_content_set(sd->contents, "elm.swallow.content_b", sd->proxy_content[1]);
660         evas_object_show(sd->proxy_content[1]);
661      }
662
663    if (sd->loop_h && sd->loop_v)
664      {
665         if (!sd->proxy_content[2])
666           {
667              sd->proxy_content[2] = evas_object_image_add(evas_object_evas_get(sd->contents));
668              evas_object_smart_member_add(sd->proxy_content[2], obj);
669              evas_object_size_hint_weight_set(sd->proxy_content[2], EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
670              evas_object_size_hint_align_set(sd->proxy_content[2], EVAS_HINT_FILL, EVAS_HINT_FILL);
671           }
672         evas_object_image_source_set(sd->proxy_content[2], content);
673         evas_object_image_source_clip_set(sd->proxy_content[2], EINA_FALSE);
674         elm_object_part_content_set(sd->contents, "elm.swallow.content_rb", sd->proxy_content[2]);
675         evas_object_show(sd->proxy_content[2]);
676      }
677 }
678
679 static Eina_Bool
680 _elm_scroller_smart_content_set(Evas_Object *obj,
681                                 const char *part,
682                                 Evas_Object *content)
683 {
684    ELM_SCROLLER_DATA_GET(obj, sd);
685
686    if (part && strcmp(part, "default"))
687      return ELM_CONTAINER_CLASS
688               (_elm_scroller_parent_sc)->content_set(obj, part, content);
689
690    if (sd->content == content) return EINA_TRUE;
691
692    if (sd->content) evas_object_del(sd->content);
693    sd->content = content;
694
695    if (content)
696      {
697         elm_widget_on_show_region_hook_set(content, _show_region_hook, obj);
698         elm_widget_sub_object_add(obj, content);
699
700         if (sd->loop_h || sd->loop_v)
701           {
702              _loop_content_set(obj, content);
703              if(sd->contents)
704                content = sd->contents;
705           }
706         sd->s_iface->content_set(obj, content);
707
708         evas_object_event_callback_add
709            (sd->content, EVAS_CALLBACK_CHANGED_SIZE_HINTS, _changed_size_hints_cb, obj);
710      }
711
712    elm_layout_sizing_eval(obj);
713
714    return EINA_TRUE;
715 }
716
717 static Evas_Object *
718 _elm_scroller_smart_content_get(const Evas_Object *obj,
719                                 const char *part)
720 {
721    ELM_SCROLLER_DATA_GET(obj, sd);
722
723    if (part && strcmp(part, "default"))
724      return ELM_CONTAINER_CLASS
725               (_elm_scroller_parent_sc)->content_get(obj, part);
726
727    return sd->content;
728 }
729
730 static Evas_Object *
731 _elm_scroller_smart_content_unset(Evas_Object *obj,
732                                   const char *part)
733 {
734    Evas_Object *content;
735
736    ELM_SCROLLER_DATA_GET(obj, sd);
737
738    if (part && strcmp(part, "default"))
739      return ELM_CONTAINER_CLASS
740               (_elm_scroller_parent_sc)->content_unset(obj, part);
741
742    if (!sd->content) return NULL;
743
744    content = sd->content;
745    elm_widget_sub_object_del(obj, sd->content);
746    sd->s_iface->content_set(obj, NULL);
747    sd->content = NULL;
748
749    return content;
750 }
751
752 static void
753 _elm_scroller_content_min_limit_cb(Evas_Object *obj,
754                                    Eina_Bool w,
755                                    Eina_Bool h)
756 {
757    ELM_SCROLLER_DATA_GET(obj, sd);
758
759    sd->min_w = !!w;
760    sd->min_h = !!h;
761
762    elm_layout_sizing_eval(obj);
763 }
764
765 static void
766 _elm_scroller_content_viewport_resize_cb(Evas_Object *obj,
767                                          Evas_Coord w __UNUSED__,
768                                          Evas_Coord h __UNUSED__)
769 {
770    elm_layout_sizing_eval(obj);
771 }
772
773 static void
774 _elm_scroller_smart_add(Evas_Object *obj)
775 {
776    Evas_Coord minw, minh;
777
778    EVAS_SMART_DATA_ALLOC(obj, Elm_Scroller_Smart_Data);
779
780    ELM_WIDGET_CLASS(_elm_scroller_parent_sc)->base.add(obj);
781
782    elm_widget_can_focus_set(obj, EINA_TRUE);
783
784    elm_layout_theme_set(obj, "scroller", "base", elm_widget_style_get(obj));
785
786    priv->hit_rect = evas_object_rectangle_add(evas_object_evas_get(obj));
787    evas_object_smart_member_add(priv->hit_rect, obj);
788    elm_widget_sub_object_add(obj, priv->hit_rect);
789
790    evas_object_color_set(priv->hit_rect, 0, 0, 0, 0);
791    evas_object_show(priv->hit_rect);
792    evas_object_repeat_events_set(priv->hit_rect, EINA_TRUE);
793
794    priv->s_iface = evas_object_smart_interface_get
795        (obj, ELM_SCROLLABLE_IFACE_NAME);
796
797    priv->s_iface->objects_set
798      (obj, ELM_WIDGET_DATA(priv)->resize_obj, priv->hit_rect);
799
800    evas_object_event_callback_add
801      (obj, EVAS_CALLBACK_CHANGED_SIZE_HINTS, _changed_size_hints_cb, obj);
802
803    edje_object_size_min_calc(ELM_WIDGET_DATA(priv)->resize_obj, &minw, &minh);
804    evas_object_size_hint_min_set(obj, minw, minh);
805    evas_object_event_callback_add(obj, EVAS_CALLBACK_RESIZE, _resize_cb, obj);
806
807    priv->s_iface->edge_left_cb_set(obj, _edge_left_cb);
808    priv->s_iface->edge_right_cb_set(obj, _edge_right_cb);
809    priv->s_iface->edge_top_cb_set(obj, _edge_top_cb);
810    priv->s_iface->edge_bottom_cb_set(obj, _edge_bottom_cb);
811    priv->s_iface->vbar_drag_cb_set(obj, _vbar_drag_cb);
812    priv->s_iface->vbar_press_cb_set(obj, _vbar_press_cb);
813    priv->s_iface->vbar_unpress_cb_set(obj, _vbar_unpress_cb);
814    priv->s_iface->hbar_drag_cb_set(obj, _hbar_drag_cb);
815    priv->s_iface->hbar_press_cb_set(obj, _hbar_press_cb);
816    priv->s_iface->hbar_unpress_cb_set(obj, _hbar_unpress_cb);
817    priv->s_iface->scroll_cb_set(obj, _scroll_cb);
818    priv->s_iface->scroll_left_cb_set(obj, _scroll_left_cb);
819    priv->s_iface->scroll_right_cb_set(obj, _scroll_right_cb);
820    priv->s_iface->scroll_up_cb_set(obj, _scroll_up_cb);
821    priv->s_iface->scroll_down_cb_set(obj, _scroll_down_cb);
822    priv->s_iface->animate_start_cb_set(obj, _scroll_anim_start_cb);
823    priv->s_iface->animate_stop_cb_set(obj, _scroll_anim_stop_cb);
824    priv->s_iface->drag_start_cb_set(obj, _scroll_drag_start_cb);
825    priv->s_iface->drag_stop_cb_set(obj, _scroll_drag_stop_cb);
826
827    priv->s_iface->content_min_limit_cb_set
828      (obj, _elm_scroller_content_min_limit_cb);
829    priv->s_iface->content_viewport_resize_cb_set
830      (obj, _elm_scroller_content_viewport_resize_cb);
831 }
832
833 static void
834 _elm_scroller_smart_move(Evas_Object *obj,
835                          Evas_Coord x,
836                          Evas_Coord y)
837 {
838    ELM_SCROLLER_DATA_GET(obj, sd);
839
840    ELM_WIDGET_CLASS(_elm_scroller_parent_sc)->base.move(obj, x, y);
841
842    evas_object_move(sd->hit_rect, x, y);
843 }
844
845 static void
846 _elm_scroller_smart_resize(Evas_Object *obj,
847                            Evas_Coord w,
848                            Evas_Coord h)
849 {
850    ELM_SCROLLER_DATA_GET(obj, sd);
851
852    ELM_WIDGET_CLASS(_elm_scroller_parent_sc)->base.resize(obj, w, h);
853
854    evas_object_resize(sd->hit_rect, w, h);
855 }
856
857 static void
858 _elm_scroller_smart_member_add(Evas_Object *obj,
859                                Evas_Object *member)
860 {
861    ELM_SCROLLER_DATA_GET(obj, sd);
862
863    ELM_WIDGET_CLASS(_elm_scroller_parent_sc)->base.member_add(obj, member);
864
865    if (sd->hit_rect)
866      evas_object_raise(sd->hit_rect);
867 }
868
869 static void
870 _elm_scroller_smart_set_user(Elm_Scroller_Smart_Class *sc)
871 {
872    ELM_WIDGET_CLASS(sc)->base.add = _elm_scroller_smart_add;
873    ELM_WIDGET_CLASS(sc)->base.move = _elm_scroller_smart_move;
874    ELM_WIDGET_CLASS(sc)->base.resize = _elm_scroller_smart_resize;
875    ELM_WIDGET_CLASS(sc)->base.member_add = _elm_scroller_smart_member_add;
876
877    ELM_WIDGET_CLASS(sc)->sub_object_del = _elm_scroller_smart_sub_object_del;
878    ELM_WIDGET_CLASS(sc)->theme = _elm_scroller_smart_theme;
879    ELM_WIDGET_CLASS(sc)->focus_next = _elm_scroller_smart_focus_next;
880    ELM_WIDGET_CLASS(sc)->event = _elm_scroller_smart_event;
881    ELM_WIDGET_CLASS(sc)->focus_direction = NULL;
882    ELM_WIDGET_CLASS(sc)->activate = _elm_scroller_smart_activate;
883
884    ELM_CONTAINER_CLASS(sc)->content_set = _elm_scroller_smart_content_set;
885    ELM_CONTAINER_CLASS(sc)->content_get = _elm_scroller_smart_content_get;
886    ELM_CONTAINER_CLASS(sc)->content_unset = _elm_scroller_smart_content_unset;
887
888    ELM_LAYOUT_CLASS(sc)->sizing_eval = _elm_scroller_smart_sizing_eval;
889 }
890
891 EAPI const Elm_Scroller_Smart_Class *
892 elm_scroller_smart_class_get(void)
893 {
894    static Elm_Scroller_Smart_Class _sc =
895      ELM_SCROLLER_SMART_CLASS_INIT_NAME_VERSION(ELM_SCROLLER_SMART_NAME);
896    static const Elm_Scroller_Smart_Class *class = NULL;
897    Evas_Smart_Class *esc = (Evas_Smart_Class *)&_sc;
898
899    if (class)
900      return class;
901
902    _elm_scroller_smart_set(&_sc);
903    esc->callbacks = _smart_callbacks;
904    class = &_sc;
905
906    return class;
907 }
908
909 EAPI Evas_Object *
910 elm_scroller_add(Evas_Object *parent)
911 {
912    Evas *e;
913    Evas_Object *obj;
914
915    EINA_SAFETY_ON_NULL_RETURN_VAL(parent, NULL);
916
917    e = evas_object_evas_get(parent);
918    if (!e) return NULL;
919
920    obj = evas_object_smart_add(e, _elm_scroller_smart_class_new());
921
922    if (!elm_widget_sub_object_add(parent, obj))
923      ERR("could not add %p as sub object of %p", obj, parent);
924
925    return obj;
926 }
927
928 /* deprecated */
929 EAPI void
930 elm_scroller_custom_widget_base_theme_set(Evas_Object *obj,
931                                           const char *klass,
932                                           const char *group)
933 {
934    ELM_SCROLLER_CHECK(obj);
935    ELM_SCROLLER_DATA_GET(obj, sd);
936
937    EINA_SAFETY_ON_NULL_RETURN(klass);
938    EINA_SAFETY_ON_NULL_RETURN(group);
939
940    if (eina_stringshare_replace(&(ELM_LAYOUT_DATA(sd)->klass), klass) ||
941        eina_stringshare_replace(&(ELM_LAYOUT_DATA(sd)->group), group))
942      _elm_scroller_smart_theme(obj);
943 }
944
945 EAPI void
946 elm_scroller_content_min_limit(Evas_Object *obj,
947                                Eina_Bool w,
948                                Eina_Bool h)
949 {
950    ELM_SCROLLABLE_CHECK(obj);
951
952    s_iface->content_min_limit(obj, w, h);
953 }
954
955 EAPI void
956 elm_scroller_region_show(Evas_Object *obj,
957                          Evas_Coord x,
958                          Evas_Coord y,
959                          Evas_Coord w,
960                          Evas_Coord h)
961 {
962    ELM_SCROLLABLE_CHECK(obj);
963
964    s_iface->content_region_show(obj, x, y, w, h);
965 }
966
967 EAPI void
968 elm_scroller_policy_set(Evas_Object *obj,
969                         Elm_Scroller_Policy policy_h,
970                         Elm_Scroller_Policy policy_v)
971 {
972    ELM_SCROLLABLE_CHECK(obj);
973
974    if ((policy_h >= ELM_SCROLLER_POLICY_LAST) ||
975        (policy_v >= ELM_SCROLLER_POLICY_LAST))
976      return;
977
978    s_iface->policy_set(obj, policy_h, policy_v);
979 }
980
981 EAPI void
982 elm_scroller_policy_get(const Evas_Object *obj,
983                         Elm_Scroller_Policy *policy_h,
984                         Elm_Scroller_Policy *policy_v)
985 {
986    ELM_SCROLLABLE_CHECK(obj);
987
988    s_iface->policy_get(obj, policy_h, policy_v);
989 }
990
991 EAPI void
992 elm_scroller_single_direction_set(Evas_Object *obj,
993                                   Elm_Scroller_Single_Direction single_dir)
994 {
995    ELM_SCROLLABLE_CHECK(obj);
996
997    if (single_dir >= ELM_SCROLLER_SINGLE_DIRECTION_LAST)
998      return;
999
1000    s_iface->single_direction_set(obj, single_dir);
1001 }
1002
1003 EAPI Elm_Scroller_Single_Direction
1004 elm_scroller_single_direction_get(const Evas_Object *obj)
1005 {
1006    ELM_SCROLLABLE_CHECK(obj, ELM_SCROLLER_SINGLE_DIRECTION_SOFT);
1007
1008    return s_iface->single_direction_get(obj);
1009 }
1010
1011 EAPI void
1012 elm_scroller_region_get(const Evas_Object *obj,
1013                         Evas_Coord *x,
1014                         Evas_Coord *y,
1015                         Evas_Coord *w,
1016                         Evas_Coord *h)
1017 {
1018    ELM_SCROLLABLE_CHECK(obj);
1019
1020    if ((x) || (y)) s_iface->content_pos_get(obj, x, y);
1021    if ((w) || (h)) s_iface->content_viewport_size_get(obj, w, h);
1022 }
1023
1024 EAPI void
1025 elm_scroller_child_size_get(const Evas_Object *obj,
1026                             Evas_Coord *w,
1027                             Evas_Coord *h)
1028 {
1029    ELM_SCROLLABLE_CHECK(obj);
1030
1031    s_iface->content_size_get(obj, w, h);
1032 }
1033
1034 EAPI void
1035 elm_scroller_bounce_set(Evas_Object *obj,
1036                         Eina_Bool h_bounce,
1037                         Eina_Bool v_bounce)
1038 {
1039    ELM_SCROLLABLE_CHECK(obj);
1040
1041    s_iface->bounce_allow_set(obj, h_bounce, v_bounce);
1042 }
1043
1044 EAPI void
1045 elm_scroller_bounce_get(const Evas_Object *obj,
1046                         Eina_Bool *h_bounce,
1047                         Eina_Bool *v_bounce)
1048 {
1049    ELM_SCROLLABLE_CHECK(obj);
1050
1051    s_iface->bounce_allow_get(obj, h_bounce, v_bounce);
1052 }
1053
1054 EAPI void
1055 elm_scroller_page_relative_set(Evas_Object *obj,
1056                                double h_pagerel,
1057                                double v_pagerel)
1058 {
1059    Evas_Coord pagesize_h, pagesize_v;
1060
1061    ELM_SCROLLABLE_CHECK(obj);
1062
1063    s_iface->paging_get(obj, NULL, NULL, &pagesize_h, &pagesize_v);
1064
1065    s_iface->paging_set
1066      (obj, h_pagerel, v_pagerel, pagesize_h, pagesize_v);
1067 }
1068
1069 EAPI void
1070 elm_scroller_page_relative_get(const Evas_Object *obj,
1071                                double *h_pagerel,
1072                                double *v_pagerel)
1073 {
1074    ELM_SCROLLABLE_CHECK(obj);
1075
1076    s_iface->paging_get(obj, h_pagerel, v_pagerel, NULL, NULL);
1077 }
1078
1079 EAPI void
1080 elm_scroller_page_size_set(Evas_Object *obj,
1081                            Evas_Coord h_pagesize,
1082                            Evas_Coord v_pagesize)
1083 {
1084    double pagerel_h, pagerel_v;
1085
1086    ELM_SCROLLABLE_CHECK(obj);
1087
1088    s_iface->paging_get(obj, &pagerel_h, &pagerel_v, NULL, NULL);
1089
1090    s_iface->paging_set
1091      (obj, pagerel_h, pagerel_v, h_pagesize, v_pagesize);
1092 }
1093
1094 EAPI void
1095 elm_scroller_page_size_get(const Evas_Object *obj,
1096                            Evas_Coord *h_pagesize,
1097                            Evas_Coord *v_pagesize)
1098 {
1099    ELM_SCROLLABLE_CHECK(obj);
1100
1101    s_iface->paging_get(obj, NULL, NULL, h_pagesize, v_pagesize);
1102 }
1103
1104 EAPI void
1105 elm_scroller_page_scroll_limit_set(Evas_Object *obj,
1106                                    int page_limit_h,
1107                                    int page_limit_v)
1108 {
1109    ELM_SCROLLABLE_CHECK(obj);
1110
1111    if (page_limit_h < 1)
1112      page_limit_h = 9999;
1113    if (page_limit_v < 1)
1114      page_limit_v = 9999;
1115
1116    s_iface->page_scroll_limit_set(obj, page_limit_h, page_limit_v);
1117 }
1118
1119 EAPI void
1120 elm_scroller_page_scroll_limit_get(Evas_Object *obj,
1121                                    int *page_limit_h,
1122                                    int *page_limit_v)
1123 {
1124    ELM_SCROLLABLE_CHECK(obj);
1125
1126    s_iface->page_scroll_limit_get(obj, page_limit_h, page_limit_v);
1127 }
1128
1129 EAPI void
1130 elm_scroller_current_page_get(const Evas_Object *obj,
1131                               int *h_pagenumber,
1132                               int *v_pagenumber)
1133 {
1134    ELM_SCROLLABLE_CHECK(obj);
1135
1136    s_iface->current_page_get(obj, h_pagenumber, v_pagenumber);
1137 }
1138
1139 EAPI void
1140 elm_scroller_last_page_get(const Evas_Object *obj,
1141                            int *h_pagenumber,
1142                            int *v_pagenumber)
1143 {
1144    ELM_SCROLLABLE_CHECK(obj);
1145
1146    s_iface->last_page_get(obj, h_pagenumber, v_pagenumber);
1147 }
1148
1149 EAPI void
1150 elm_scroller_page_show(Evas_Object *obj,
1151                        int h_pagenumber,
1152                        int v_pagenumber)
1153 {
1154    ELM_SCROLLABLE_CHECK(obj);
1155
1156    s_iface->page_show(obj, h_pagenumber, v_pagenumber);
1157 }
1158
1159 EAPI void
1160 elm_scroller_page_bring_in(Evas_Object *obj,
1161                            int h_pagenumber,
1162                            int v_pagenumber)
1163 {
1164    ELM_SCROLLABLE_CHECK(obj);
1165
1166    s_iface->page_bring_in(obj, h_pagenumber, v_pagenumber);
1167 }
1168
1169 EAPI void
1170 elm_scroller_region_bring_in(Evas_Object *obj,
1171                              Evas_Coord x,
1172                              Evas_Coord y,
1173                              Evas_Coord w,
1174                              Evas_Coord h)
1175 {
1176    ELM_SCROLLABLE_CHECK(obj);
1177
1178    s_iface->region_bring_in(obj, x, y, w, h);
1179 }
1180
1181 EAPI void
1182 elm_scroller_gravity_set(Evas_Object *obj,
1183                          double x,
1184                          double y)
1185 {
1186    ELM_SCROLLABLE_CHECK(obj);
1187
1188    s_iface->gravity_set(obj, x, y);
1189 }
1190
1191 EAPI void
1192 elm_scroller_gravity_get(const Evas_Object *obj,
1193                          double *x,
1194                          double *y)
1195 {
1196    ELM_SCROLLABLE_CHECK(obj);
1197
1198    s_iface->gravity_get(obj, x, y);
1199 }
1200
1201 EAPI void
1202 elm_scroller_loop_set(Evas_Object *obj,
1203                       Eina_Bool loop_h,
1204                       Eina_Bool loop_v)
1205 {
1206    ELM_SCROLLABLE_CHECK(obj);
1207    ELM_SCROLLER_DATA_GET(obj, sd);
1208
1209    if (sd->loop_h == loop_h && sd->loop_v == loop_v) return;
1210
1211    sd->loop_h = loop_h;
1212    sd->loop_v = loop_v;
1213
1214    s_iface->loop_set(obj, loop_h, loop_v);
1215
1216    if (sd->content)
1217      {
1218      if (sd->loop_h || sd->loop_v)
1219        {
1220           sd->s_iface->content_set(obj, NULL);
1221           _loop_content_set(obj, sd->content);
1222
1223           if (sd->contents)
1224             {
1225                sd->s_iface->content_set(obj, sd->contents);
1226                elm_widget_sub_object_add(obj, sd->contents);
1227                elm_widget_on_show_region_hook_set(sd->contents, _show_region_hook, obj);
1228             }
1229        }
1230      else
1231        {
1232           sd->s_iface->content_set(obj, NULL);
1233           sd->s_iface->content_set(obj, sd->content);
1234        }
1235      }
1236    elm_layout_sizing_eval(obj);
1237 }
1238
1239 EAPI void
1240 elm_scroller_loop_get(const Evas_Object *obj,
1241                       Eina_Bool *loop_h,
1242                       Eina_Bool *loop_v)
1243 {
1244    ELM_SCROLLABLE_CHECK(obj);
1245
1246    s_iface->loop_get(obj, loop_h, loop_v);
1247 }
1248
1249 EAPI void
1250 elm_scroller_propagate_events_set(Evas_Object *obj,
1251                                   Eina_Bool propagation)
1252 {
1253    Elm_Widget_Smart_Data *sd;
1254
1255    ELM_SCROLLABLE_CHECK(obj);
1256
1257    sd = evas_object_smart_data_get(obj);
1258    if (!sd) return;  /* just being paranoid */
1259
1260    evas_object_propagate_events_set(sd->resize_obj, propagation);
1261 }
1262
1263 EAPI Eina_Bool
1264 elm_scroller_propagate_events_get(const Evas_Object *obj)
1265 {
1266    Elm_Widget_Smart_Data *sd;
1267
1268    ELM_SCROLLABLE_CHECK(obj, EINA_FALSE);
1269
1270    sd = evas_object_smart_data_get(obj);
1271    if (!sd) return EINA_FALSE;  /* just being paranoid */
1272
1273    return evas_object_propagate_events_get(sd->resize_obj);
1274 }