elementary / slider, radio, separator, photocam, photo, store, scroller, slideshow...
[framework/uifw/elementary.git] / src / lib / elm_radio.c
1 #include <Elementary.h>
2 #include "elm_priv.h"
3
4 /**
5  * @defgroup Radio Radio
6  *
7  * The radio button allows for 1 or more selectors to be created to select 1
8  * of a set of options.
9  *
10  * Signals that you can add callbacks for are:
11  *
12  * changed - This is called whenever the user changes the state of one of the
13  * radio objects within the group of radio objects that work together.
14  *
15  * A radio object contains an indicator, an optional Label and an optional
16  * icon object. They work normally in groups of 2 or more. When you create a
17  * radio (if it is not the first member of the group), simply add it to the
18  * group by adding it to any other member of the group that already exists
19  * (or the first member) with elm_radio_group_add() with the second parameter
20  * being the existing group member. The radio object(s) will select from one
21  * of a set of integer values, so any value they are configuring needs to be
22  * mapped to a set of integers. To configure what value that radio object
23  * represents, use  elm_radio_state_value_set() to set the integer it
24  * represents. To set the value the whole group is to indicate use
25  * elm_radio_value_set() on any group member, and to get the groups value use
26  * elm_radio_value_get(). For convenience the radio objects are also able to
27  * directly set an integer (int) to the value that is selected. To specify
28  * the pointer to this integer to modify, use elm_radio_value_pointer_set().
29  * The radio objects will modify this directly. That implies the pointer must
30  * point to valid memory for as long as the radio objects exist.
31  */
32
33 typedef struct _Widget_Data Widget_Data;
34 typedef struct _Group Group;
35
36 struct _Group
37 {
38    int value;
39    int *valuep;
40    Eina_List *radios;
41 };
42
43 struct _Widget_Data
44 {
45    Evas_Object *radio;
46    Evas_Object *icon;
47    int value;
48    const char *label;
49    Eina_Bool state;
50    Group *group;
51 };
52
53 static const char *widtype = NULL;
54 static void _state_set(Evas_Object *obj, Eina_Bool state);
55 static void _del_hook(Evas_Object *obj);
56 static void _mirrored_set(Evas_Object *obj, Eina_Bool rtl);
57 static void _theme_hook(Evas_Object *obj);
58 static void _disable_hook(Evas_Object *obj);
59 static void _sizing_eval(Evas_Object *obj);
60 static void _changed_size_hints(void *data, Evas *e, Evas_Object *obj, void *event_info);
61 static void _sub_del(void *data, Evas_Object *obj, void *event_info);
62 static void _signal_radio_on(void *data, Evas_Object *obj, const char *emission, const char *source);
63 static void _on_focus_hook(void *data, Evas_Object *obj);
64 static void _activate(Evas_Object *obj);
65 static void _activate_hook(Evas_Object *obj);
66 static Eina_Bool _event_hook(Evas_Object *obj, Evas_Object *src,
67                              Evas_Callback_Type type, void *event_info);
68
69 static const char SIG_CHANGED[] = "changed";
70 static const Evas_Smart_Cb_Description _signals[] = {
71   {SIG_CHANGED, ""},
72   {NULL, NULL}
73 };
74
75 static Eina_Bool
76 _event_hook(Evas_Object *obj, Evas_Object *src __UNUSED__, Evas_Callback_Type type, void *event_info)
77 {
78    if (type != EVAS_CALLBACK_KEY_DOWN) return EINA_FALSE;
79    Evas_Event_Key_Down *ev = event_info;
80    if (ev->event_flags & EVAS_EVENT_FLAG_ON_HOLD) return EINA_FALSE;
81    if (elm_widget_disabled_get(obj)) return EINA_FALSE;
82
83    if ((strcmp(ev->keyname, "Return")) &&
84        (strcmp(ev->keyname, "KP_Enter")) &&
85        (strcmp(ev->keyname, "space")))
86      return EINA_FALSE;
87    _activate(obj);
88    ev->event_flags |= EVAS_EVENT_FLAG_ON_HOLD;
89    return EINA_TRUE;
90 }
91
92 static void
93 _del_hook(Evas_Object *obj)
94 {
95    Widget_Data *wd = elm_widget_data_get(obj);
96    if (!wd) return;
97    if (wd->label) eina_stringshare_del(wd->label);
98    wd->group->radios = eina_list_remove(wd->group->radios, obj);
99    if (!wd->group->radios) free(wd->group);
100    wd->group = NULL;
101    free(wd);
102 }
103
104 static void
105 _on_focus_hook(void *data __UNUSED__, Evas_Object *obj)
106 {
107    Widget_Data *wd = elm_widget_data_get(obj);
108    if (!wd) return;
109    if (elm_widget_focus_get(obj))
110      {
111         edje_object_signal_emit(wd->radio, "elm,action,focus", "elm");
112         evas_object_focus_set(wd->radio, EINA_TRUE);
113      }
114    else
115      {
116         edje_object_signal_emit(wd->radio, "elm,action,unfocus", "elm");
117         evas_object_focus_set(wd->radio, EINA_FALSE);
118      }
119 }
120
121 static void
122 _mirrored_set(Evas_Object *obj, Eina_Bool rtl)
123 {
124    Widget_Data *wd = elm_widget_data_get(obj);
125    if (!wd) return;
126    edje_object_mirrored_set(wd->radio, rtl);
127 }
128
129 static void
130 _theme_hook(Evas_Object *obj)
131 {
132    Widget_Data *wd = elm_widget_data_get(obj);
133    if (!wd) return;
134    _elm_widget_mirrored_reload(obj);
135    _mirrored_set(obj, elm_widget_mirrored_get(obj));
136    _elm_theme_object_set(obj, wd->radio, "radio", "base", elm_widget_style_get(obj));
137    if (wd->icon)
138      edje_object_signal_emit(wd->radio, "elm,state,icon,visible", "elm");
139    else
140      edje_object_signal_emit(wd->radio, "elm,state,icon,hidden", "elm");
141    if (wd->state)
142      edje_object_signal_emit(wd->radio, "elm,state,radio,on", "elm");
143    else
144      edje_object_signal_emit(wd->radio, "elm,state,radio,off", "elm");
145    if (wd->label)
146      edje_object_signal_emit(wd->radio, "elm,state,text,visible", "elm");
147    else
148      edje_object_signal_emit(wd->radio, "elm,state,text,hidden", "elm");
149    edje_object_part_text_set(wd->radio, "elm.text", wd->label);
150    if (elm_widget_disabled_get(obj))
151      {
152         edje_object_signal_emit(wd->radio, "elm,state,disabled", "elm");
153         if (wd->state) _state_set(obj, 0);
154      }
155    edje_object_message_signal_process(wd->radio);
156    edje_object_scale_set(wd->radio, elm_widget_scale_get(obj) * _elm_config->scale);
157    _sizing_eval(obj);
158 }
159
160 static void
161 _disable_hook(Evas_Object *obj)
162 {
163    Widget_Data *wd = elm_widget_data_get(obj);
164    if (!wd) return;
165    if (elm_widget_disabled_get(obj))
166      {
167         edje_object_signal_emit(wd->radio, "elm,state,disabled", "elm");
168         if (wd->state) _state_set(obj, 0);
169      }
170    else
171      edje_object_signal_emit(wd->radio, "elm,state,enabled", "elm");
172 }
173
174 static void
175 _sizing_eval(Evas_Object *obj)
176 {
177    Widget_Data *wd = elm_widget_data_get(obj);
178    Evas_Coord minw = -1, minh = -1;
179    if (!wd) return;
180    elm_coords_finger_size_adjust(1, &minw, 1, &minh);
181    edje_object_size_min_restricted_calc(wd->radio, &minw, &minh, minw, minh);
182    elm_coords_finger_size_adjust(1, &minw, 1, &minh);
183    evas_object_size_hint_min_set(obj, minw, minh);
184    evas_object_size_hint_max_set(obj, -1, -1);
185 }
186
187 static void
188 _changed_size_hints(void *data, Evas *e __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
189 {
190    Widget_Data *wd = elm_widget_data_get(data);
191    if (!wd) return;
192    if (obj != wd->icon) return;
193    _sizing_eval(data);
194 }
195
196 static void
197 _sub_del(void *data __UNUSED__, Evas_Object *obj, void *event_info)
198 {
199    Widget_Data *wd = elm_widget_data_get(obj);
200    Evas_Object *sub = event_info;
201    if (!wd) return;
202    if (sub == wd->icon)
203      {
204         edje_object_signal_emit(wd->radio, "elm,state,icon,hidden", "elm");
205         evas_object_event_callback_del_full
206            (sub, EVAS_CALLBACK_CHANGED_SIZE_HINTS, _changed_size_hints, obj);
207         wd->icon = NULL;
208         _sizing_eval(obj);
209      }
210 }
211
212 static void
213 _state_set(Evas_Object *obj, Eina_Bool state)
214 {
215    Widget_Data *wd = elm_widget_data_get(obj);
216    if (!wd) return;
217    if ((state != wd->state) && (!elm_widget_disabled_get(obj)))
218      {
219         wd->state = state;
220         if (wd->state)
221           edje_object_signal_emit(wd->radio, "elm,state,radio,on", "elm");
222         else
223           edje_object_signal_emit(wd->radio, "elm,state,radio,off", "elm");
224      }
225 }
226
227 static void
228 _state_set_all(Widget_Data *wd)
229 {
230    const Eina_List *l;
231    Evas_Object *child, *selected = NULL;
232    Eina_Bool disabled = EINA_FALSE;
233    EINA_LIST_FOREACH(wd->group->radios, l, child)
234      {
235         Widget_Data *wd2 = elm_widget_data_get(child);
236         if (wd2->state) selected = child;
237         if (wd2->value == wd->group->value)
238           {
239              _state_set(child, 1);
240              if (!wd2->state) disabled = EINA_TRUE;
241           }
242         else _state_set(child, 0);
243      }
244    if ((disabled) && (selected)) _state_set(selected, 1);
245 }
246
247 static void
248 _activate(Evas_Object *obj)
249 {
250    Widget_Data *wd = elm_widget_data_get(obj);
251    if (!wd) return;
252    if (wd->group->value == wd->value) return;
253    wd->group->value = wd->value;
254    if (wd->group->valuep) *(wd->group->valuep) = wd->group->value;
255    _state_set_all(wd);
256    evas_object_smart_callback_call(obj, SIG_CHANGED, NULL);
257 }
258
259 static void
260 _activate_hook(Evas_Object *obj)
261 {
262    _activate(obj);
263 }
264
265 static void
266 _signal_radio_on(void *data, Evas_Object *obj __UNUSED__, const char *emission __UNUSED__, const char *source __UNUSED__)
267 {
268    _activate(data);
269 }
270
271 /**
272  * Add a new radio to the parent
273  *
274  * @param parent The parent object
275  * @return The new object or NULL if it cannot be created
276  *
277  * @ingroup Radio
278  */
279 EAPI Evas_Object *
280 elm_radio_add(Evas_Object *parent)
281 {
282    Evas_Object *obj;
283    Evas *e;
284    Widget_Data *wd;
285
286    ELM_WIDGET_STANDARD_SETUP(wd, Widget_Data, parent, e, obj, NULL);
287
288    ELM_SET_WIDTYPE(widtype, "radio");
289    elm_widget_type_set(obj, "radio");
290    elm_widget_sub_object_add(parent, obj);
291    elm_widget_on_focus_hook_set(obj, _on_focus_hook, NULL);
292    elm_widget_data_set(obj, wd);
293    elm_widget_del_hook_set(obj, _del_hook);
294    elm_widget_theme_hook_set(obj, _theme_hook);
295    elm_widget_disable_hook_set(obj, _disable_hook);
296    elm_widget_can_focus_set(obj, EINA_TRUE);
297    elm_widget_activate_hook_set(obj, _activate_hook);
298    elm_widget_event_hook_set(obj, _event_hook);
299
300    wd->radio = edje_object_add(e);
301    _elm_theme_object_set(obj, wd->radio, "radio", "base", "default");
302    edje_object_signal_callback_add(wd->radio, "elm,action,radio,on", "", _signal_radio_on, obj);
303    edje_object_signal_callback_add(wd->radio, "elm,action,radio,toggle", "", _signal_radio_on, obj);
304    elm_widget_resize_object_set(obj, wd->radio);
305
306    evas_object_smart_callback_add(obj, "sub-object-del", _sub_del, obj);
307
308    wd->group = calloc(1, sizeof(Group));
309    wd->group->radios = eina_list_append(wd->group->radios, obj);
310    wd->state = 0;
311
312    _mirrored_set(obj, elm_widget_mirrored_get(obj));
313    _sizing_eval(obj);
314
315    // TODO: convert Elementary to subclassing of Evas_Smart_Class
316    // TODO: and save some bytes, making descriptions per-class and not instance!
317    evas_object_smart_callbacks_descriptions_set(obj, _signals);
318    return obj;
319 }
320
321 /**
322  * Set the text label of the radio object
323  *
324  * @param obj The radio object
325  * @param label The text label string in UTF-8
326  *
327  * @ingroup Radio
328  */
329 EAPI void
330 elm_radio_label_set(Evas_Object *obj, const char *label)
331 {
332    ELM_CHECK_WIDTYPE(obj, widtype);
333    Widget_Data *wd = elm_widget_data_get(obj);
334    if (!wd) return;
335    eina_stringshare_replace(&wd->label, label);
336    if (label)
337      {
338         edje_object_signal_emit(wd->radio, "elm,state,text,visible", "elm");
339         edje_object_message_signal_process(wd->radio);
340      }
341    else
342      {
343         edje_object_signal_emit(wd->radio, "elm,state,text,hidden", "elm");
344         edje_object_message_signal_process(wd->radio);
345      }
346    edje_object_part_text_set(wd->radio, "elm.text", label);
347    _sizing_eval(obj);
348 }
349
350 /**
351  * Get the text label of the radio object
352  *
353  * @param obj The radio object
354  * @return The text label string in UTF-8
355  *
356  * @ingroup Radio
357  */
358 EAPI const char *
359 elm_radio_label_get(const Evas_Object *obj)
360 {
361    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
362    Widget_Data *wd = elm_widget_data_get(obj);
363    if (!wd) return NULL;
364    return wd->label;
365 }
366
367 /**
368  * Set the icon object of the radio object
369  *
370  * Once the icon object is set, a previously set one will be deleted.
371  * If you want to keep that old content object, use the
372  * elm_radio_icon_unset() function.
373  *
374  * @param obj The radio object
375  * @param icon The icon object
376  *
377  * @ingroup Radio
378  */
379 EAPI void
380 elm_radio_icon_set(Evas_Object *obj, Evas_Object *icon)
381 {
382    ELM_CHECK_WIDTYPE(obj, widtype);
383    Widget_Data *wd = elm_widget_data_get(obj);
384    if (!wd) return;
385    if (wd->icon == icon) return;
386    if (wd->icon) evas_object_del(wd->icon);
387    wd->icon = icon;
388    if (icon)
389      {
390         elm_widget_sub_object_add(obj, icon);
391         evas_object_event_callback_add(icon, EVAS_CALLBACK_CHANGED_SIZE_HINTS,
392                                        _changed_size_hints, obj);
393         edje_object_part_swallow(wd->radio, "elm.swallow.content", icon);
394         edje_object_signal_emit(wd->radio, "elm,state,icon,visible", "elm");
395         edje_object_message_signal_process(wd->radio);
396      }
397    _sizing_eval(obj);
398 }
399
400 /**
401  * Get the icon object of the radio object
402  *
403  * @param obj The radio object
404  * @return The icon object
405  *
406  * @ingroup Radio
407  */
408 EAPI Evas_Object *
409 elm_radio_icon_get(const Evas_Object *obj)
410 {
411    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
412    Widget_Data *wd = elm_widget_data_get(obj);
413    if (!wd) return NULL;
414    return wd->icon;
415 }
416
417 /**
418  * Unset the icon used for the radio object
419  *
420  * Unparent and return the icon object which was set for this widget.
421  *
422  * @param obj The radio object
423  * @return The icon object that was being used
424  *
425  * @ingroup Radio
426  */
427 EAPI Evas_Object *
428 elm_radio_icon_unset(Evas_Object *obj)
429 {
430    ELM_CHECK_WIDTYPE(obj, widtype) NULL;
431    Widget_Data *wd = elm_widget_data_get(obj);
432    if (!wd) return NULL;
433    if (!wd->icon) return NULL;
434    Evas_Object *icon = wd->icon;
435    elm_widget_sub_object_del(obj, wd->icon);
436    edje_object_part_unswallow(wd->radio, wd->icon);
437    wd->icon = NULL;
438    return icon;
439 }
440
441 /**
442  * Add this radio to a group of other radio objects
443  *
444  * Radio objects work in groups. Each member should have a different integer
445  * value assigned. In order ro have them work as a group, they need to know
446  * about eacthother. This adds the given radio object to the group of which
447  * the group object indicated is a member.
448  *
449  * @param obj The radio object
450  * @param group The object whose group the object is to join
451  *
452  * @ingroup Radio
453  */
454 EAPI void
455 elm_radio_group_add(Evas_Object *obj, Evas_Object *group)
456 {
457    ELM_CHECK_WIDTYPE(obj, widtype);
458    Widget_Data *wd = elm_widget_data_get(obj);
459    Widget_Data *wd2 = elm_widget_data_get(group);
460    if (!wd) return;
461    if (!wd2)
462      {
463         if (eina_list_count(wd->group->radios) == 1)
464           return;
465         wd->group->radios = eina_list_remove(wd->group->radios, obj);
466         wd->group = calloc(1, sizeof(Group));
467         wd->group->radios = eina_list_append(wd->group->radios, obj);
468      }
469    else if (wd->group == wd2->group) return;
470    else
471      {
472         wd->group->radios = eina_list_remove(wd->group->radios, obj);
473         if (!wd->group->radios) free(wd->group);
474         wd->group = wd2->group;
475         wd->group->radios = eina_list_append(wd->group->radios, obj);
476      }
477    if (wd->value == wd->group->value) _state_set(obj, 1);
478    else _state_set(obj, 0);
479 }
480
481 /**
482  * Set the integer value that this radio object represents
483  *
484  * This sets the value of the radio.
485  *
486  * @param obj The radio object
487  * @param value The value to use if this radio object is selected
488  *
489  * @ingroup Radio
490  */
491 EAPI void
492 elm_radio_state_value_set(Evas_Object *obj, int value)
493 {
494    ELM_CHECK_WIDTYPE(obj, widtype);
495    Widget_Data *wd = elm_widget_data_get(obj);
496    if (!wd) return;
497    wd->value = value;
498    if (wd->value == wd->group->value) _state_set(obj, 1);
499    else _state_set(obj, 0);
500 }
501
502 /**
503  * Get the integer value that this radio object represents
504  *
505  * This gets the value of the radio.
506  *
507  * @param obj The radio object
508  * @return The value used if this radio object is selected
509  *
510  * @ingroup Radio
511  */
512 EAPI int
513 elm_radio_state_value_get(const Evas_Object *obj)
514 {
515    ELM_CHECK_WIDTYPE(obj, widtype) 0;
516    Widget_Data *wd = elm_widget_data_get(obj);
517    if (!wd) return 0;
518    return wd->value;
519 }
520
521 /**
522  * Set the value of the radio.
523  *
524  * This sets the value of the radio group and will also set the value if
525  * pointed to, to the value supplied, but will not call any callbacks.
526  *
527  * @param obj The radio object
528  * @param value The value to use for the group
529  *
530  * @ingroup Radio
531  */
532 EAPI void
533 elm_radio_value_set(Evas_Object *obj, int value)
534 {
535    ELM_CHECK_WIDTYPE(obj, widtype);
536    Widget_Data *wd = elm_widget_data_get(obj);
537    if (!wd) return;
538    if (value == wd->group->value) return;
539    wd->group->value = value;
540    if (wd->group->valuep) *(wd->group->valuep) = wd->group->value;
541    _state_set_all(wd);
542 }
543
544 /**
545  * Get the state of the radio object
546  *
547  * @param obj The radio object
548  * @return The integer state
549  *
550  * @ingroup Radio
551  */
552 EAPI int
553 elm_radio_value_get(const Evas_Object *obj)
554 {
555    ELM_CHECK_WIDTYPE(obj, widtype) 0;
556    Widget_Data *wd = elm_widget_data_get(obj);
557    if (!wd) return 0;
558    return wd->group->value;
559 }
560
561 /**
562  * Set a convenience pointer to a integer to change
563  *
564  * This sets a pointer to a integer, that, in addition to the radio objects
565  * state will also be modified directly. To stop setting the object pointed
566  * to simply use NULL as the valuep parameter. If valuep is not NULL, then
567  * when this is called, the radio objects state will also be modified to
568  * reflect the value of the integer valuep points to, just like calling
569  * elm_radio_value_set().
570  *
571  * @param obj The radio object
572  * @param valuep Pointer to the integer to modify
573  *
574  * @ingroup Radio
575  */
576 EAPI void
577 elm_radio_value_pointer_set(Evas_Object *obj, int *valuep)
578 {
579    ELM_CHECK_WIDTYPE(obj, widtype);
580    Widget_Data *wd = elm_widget_data_get(obj);
581    if (!wd) return;
582    if (valuep)
583      {
584         wd->group->valuep = valuep;
585         if (*(wd->group->valuep) != wd->group->value)
586           {
587              wd->group->value = *(wd->group->valuep);
588              _state_set_all(wd);
589           }
590      }
591    else
592      {
593         wd->group->valuep = NULL;
594      }
595 }