0d3209c520eaeb2da60a1b40ad7cd6031ec12bb2
[framework/uifw/elementary.git] / src / bin / config.c
1 #include <Elementary.h>
2 #ifdef HAVE_CONFIG_H
3 # include "elementary_config.h"
4 #endif
5 #ifndef ELM_LIB_QUICKLAUNCH
6
7 typedef struct _Theme               Theme;
8 typedef struct _Fonts_Data          Fonts_Data;
9 typedef struct _Elm_Text_Class_Data Elm_Text_Class_Data;
10 typedef struct _Elm_Font_Size_Data  Elm_Font_Size_Data;
11
12 struct _Theme
13 {
14    const char *label;
15    const char *name;
16    const char *path;
17    Eina_Bool   in_search_path;
18 };
19
20 static const Eina_List *tsel = NULL;
21 static Eina_List *themes = NULL;
22
23 struct _Elm_Text_Class_Data
24 {
25    const char    *name;
26    const char    *desc;
27    const char    *font;
28    const char    *style;
29    Evas_Font_Size size;
30 };
31
32 struct _Elm_Font_Size_Data
33 {
34    const char    *size_str;
35    Evas_Font_Size size;
36 };
37
38 struct _Fonts_Data
39 {
40    Eina_List  *text_classes;
41
42    Eina_Hash  *font_hash;
43    Eina_List  *font_px_list;
44    Eina_List  *font_scale_list;
45
46    const char *cur_font;
47    const char *cur_style;
48    double      cur_size;
49 };
50
51 #define ELM_LIST_DISABLE(list)                         \
52   do                                                   \
53     {                                                  \
54        const Eina_List *l = elm_list_items_get(list);  \
55        if (l)                                          \
56          {                                             \
57             elm_list_item_show(eina_list_data_get(l)); \
58             elm_object_disabled_set(list, EINA_TRUE);  \
59          }                                             \
60     }                                                  \
61   while (0)
62
63 #define ELM_LIST_ENABLE(list)                     \
64   do                                              \
65     {                                             \
66        elm_object_disabled_set(list, EINA_FALSE); \
67     }                                             \
68   while (0)
69
70 #define LABEL_FRAME_ADD(label)                                      \
71   do                                                                \
72     {                                                               \
73        pd = elm_frame_add(win);                                     \
74        evas_object_size_hint_weight_set(pd, EVAS_HINT_EXPAND, 0.0); \
75        evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, 0.5);    \
76        elm_object_style_set(pd, "pad_medium");                      \
77        elm_box_pack_end(bx, pd);                                    \
78        evas_object_show(pd);                                        \
79                                                                     \
80        lb = elm_label_add(win);                                     \
81        evas_object_size_hint_weight_set(lb, EVAS_HINT_EXPAND, 0.0); \
82        evas_object_size_hint_align_set(lb, EVAS_HINT_FILL, 0.5);    \
83        elm_object_text_set(lb, label);                              \
84        elm_frame_content_set(pd, lb);                               \
85        evas_object_show(lb);                                        \
86     }                                                               \
87   while (0)
88
89 static int quiet = 0;
90 static int interactive = 1;
91
92 static const char *theme_set = NULL;
93 static const char *finger_size_set = NULL;
94 static const char *scale_set = NULL;
95 static Fonts_Data fdata = {NULL, NULL, NULL, NULL, NULL, NULL, 0.0};
96
97 static void
98 _font_styles_list_sel(void *data   __UNUSED__,
99                       Evas_Object *obj,
100                       void        *event_info);
101
102 static void
103 config_exit(void *data       __UNUSED__,
104             Evas_Object *obj __UNUSED__,
105             void *event_info __UNUSED__)
106 {
107    Elm_Text_Class_Data *tc_data;
108    Elm_Font_Size_Data *sd;
109
110    EINA_LIST_FREE(fdata.text_classes, tc_data)
111      {
112         eina_stringshare_del(tc_data->name);
113         eina_stringshare_del(tc_data->desc);
114         eina_stringshare_del(tc_data->font);
115         eina_stringshare_del(tc_data->style);
116         free(tc_data);
117      }
118
119    elm_font_available_hash_del(fdata.font_hash);
120    fdata.font_hash = NULL;
121
122    EINA_LIST_FREE(fdata.font_px_list, sd)
123      {
124         eina_stringshare_del(sd->size_str);
125         free(sd);
126      }
127
128    EINA_LIST_FREE(fdata.font_scale_list, sd)
129      {
130         eina_stringshare_del(sd->size_str);
131         free(sd);
132      }
133
134    if (fdata.cur_font) eina_stringshare_del(fdata.cur_font);
135    fdata.cur_font = NULL;
136
137    if (fdata.cur_style) eina_stringshare_del(fdata.cur_style);
138    fdata.cur_style = NULL;
139
140    elm_config_save();
141    elm_exit(); /* exit the program's main loop that runs in elm_run() */
142 }
143
144 static void
145 sb_change(void *data       __UNUSED__,
146           Evas_Object     *obj,
147           void *event_info __UNUSED__)
148 {
149    Eina_Bool val = elm_check_state_get(obj);
150    Eina_Bool sb = elm_scroll_bounce_enabled_get();
151
152    if (val == sb) return;
153    elm_scroll_bounce_enabled_all_set(val);
154
155    /*TODO: enable/disable subordinate sliders (make 'em support it 1st)*/
156 }
157
158 static void
159 bf_round(void *data       __UNUSED__,
160          Evas_Object     *obj,
161          void *event_info __UNUSED__)
162 {
163    double val = elm_slider_value_get(obj);
164    double v;
165
166    v = ((double)((int)(val * 10.0))) / 10.0;
167    if (v != val) elm_slider_value_set(obj, v);
168 }
169
170 static void
171 bf_change(void *data       __UNUSED__,
172           Evas_Object     *obj,
173           void *event_info __UNUSED__)
174 {
175    double bf = elm_scroll_bounce_friction_get();
176    double val = elm_slider_value_get(obj);
177
178    if (bf == val) return;
179    elm_scroll_bounce_friction_all_set(val);
180 }
181
182 static void
183 ps_round(void *data       __UNUSED__,
184          Evas_Object     *obj,
185          void *event_info __UNUSED__)
186 {
187    double val = elm_slider_value_get(obj);
188    double v;
189
190    v = ((double)((int)(val * 10.0))) / 10.0;
191    if (v != val) elm_slider_value_set(obj, v);
192 }
193
194 static void
195 ps_change(void *data       __UNUSED__,
196           Evas_Object     *obj,
197           void *event_info __UNUSED__)
198 {
199    double ps = elm_scroll_page_scroll_friction_get();
200    double val = elm_slider_value_get(obj);
201
202    if (ps == val) return;
203    elm_scroll_page_scroll_friction_all_set(val);
204 }
205
206 static void
207 bis_round(void *data       __UNUSED__,
208           Evas_Object     *obj,
209           void *event_info __UNUSED__)
210 {
211    double val = elm_slider_value_get(obj);
212    double v;
213
214    v = ((double)((int)(val * 10.0))) / 10.0;
215    if (v != val) elm_slider_value_set(obj, v);
216 }
217
218 static void
219 bis_change(void *data       __UNUSED__,
220            Evas_Object     *obj,
221            void *event_info __UNUSED__)
222 {
223    double bis = elm_scroll_bring_in_scroll_friction_get();
224    double val = elm_slider_value_get(obj);
225
226    if (bis == val) return;
227    elm_scroll_bring_in_scroll_friction_all_set(val);
228 }
229
230 static void
231 zf_round(void *data       __UNUSED__,
232          Evas_Object     *obj,
233          void *event_info __UNUSED__)
234 {
235    double val = elm_slider_value_get(obj);
236    double v;
237
238    v = ((double)((int)(val * 10.0))) / 10.0;
239    if (v != val) elm_slider_value_set(obj, v);
240 }
241
242 static void
243 zf_change(void *data       __UNUSED__,
244           Evas_Object     *obj,
245           void *event_info __UNUSED__)
246 {
247    double zf = elm_scroll_zoom_friction_get();
248    double val = elm_slider_value_get(obj);
249
250    if (zf == val) return;
251    elm_scroll_zoom_friction_all_set(val);
252 }
253
254 static void
255 ts_change(void *data       __UNUSED__,
256           Evas_Object     *obj,
257           void *event_info __UNUSED__)
258 {
259    Eina_Bool val = elm_check_state_get(obj);
260    Eina_Bool sb = elm_scroll_thumbscroll_enabled_get();
261
262    if (val == sb) return;
263    elm_scroll_thumbscroll_enabled_all_set(val);
264
265    /*TODO: enable/disable subordinate sliders (make 'em support it 1st)*/
266 }
267
268 static void
269 tst_round(void *data       __UNUSED__,
270           Evas_Object     *obj,
271           void *event_info __UNUSED__)
272 {
273    double val = elm_slider_value_get(obj);
274    double v;
275
276    v = ((double)((int)(val * 10.0))) / 10.0;
277    if (v != val) elm_slider_value_set(obj, v);
278 }
279
280 static void
281 tst_change(void *data       __UNUSED__,
282            Evas_Object     *obj,
283            void *event_info __UNUSED__)
284 {
285    double tst = elm_scroll_thumbscroll_threshold_get();
286    double val = elm_slider_value_get(obj);
287
288    if (tst == val) return;
289    elm_scroll_thumbscroll_threshold_all_set(val);
290 }
291
292 static void
293 tsmt_round(void *data       __UNUSED__,
294            Evas_Object     *obj,
295            void *event_info __UNUSED__)
296 {
297    double val = elm_slider_value_get(obj);
298    double v;
299
300    v = ((double)((int)(val * 10.0))) / 10.0;
301    if (v != val) elm_slider_value_set(obj, v);
302 }
303
304 static void
305 tsmt_change(void *data       __UNUSED__,
306             Evas_Object     *obj,
307             void *event_info __UNUSED__)
308 {
309    double tsmt = elm_scroll_thumbscroll_momentum_threshold_get();
310    double val = elm_slider_value_get(obj);
311
312    if (tsmt == val) return;
313    elm_scroll_thumbscroll_momentum_threshold_all_set(val);
314 }
315
316 static void
317 tsf_round(void *data       __UNUSED__,
318           Evas_Object     *obj,
319           void *event_info __UNUSED__)
320 {
321    double val = elm_slider_value_get(obj);
322    double v;
323
324    v = ((double)((int)(val * 10.0))) / 10.0;
325    if (v != val) elm_slider_value_set(obj, v);
326 }
327
328 static void
329 tsf_change(void *data       __UNUSED__,
330            Evas_Object     *obj,
331            void *event_info __UNUSED__)
332 {
333    double tsf = elm_scroll_thumbscroll_friction_get();
334    double val = elm_slider_value_get(obj);
335
336    if (tsf == val) return;
337    elm_scroll_thumbscroll_friction_all_set(val);
338 }
339
340 static void
341 tsbf_round(void *data       __UNUSED__,
342            Evas_Object     *obj,
343            void *event_info __UNUSED__)
344 {
345    double val = elm_slider_value_get(obj);
346    double v;
347
348    v = ((double)((int)(val * 10.0))) / 10.0;
349    if (v != val) elm_slider_value_set(obj, v);
350 }
351
352 static void
353 tsbf_change(void *data       __UNUSED__,
354             Evas_Object     *obj,
355             void *event_info __UNUSED__)
356 {
357    double tsbf = elm_scroll_thumbscroll_border_friction_get();
358    double val = elm_slider_value_get(obj);
359
360    if (tsbf == val) return;
361    elm_scroll_thumbscroll_border_friction_all_set(val);
362 }
363
364 static void
365 cf_enable(void *data,
366           Evas_Object     *obj,
367           void *event_info __UNUSED__)
368 {
369    Eina_Bool cf = elm_cache_flush_enabled_get();
370    Eina_Bool val = elm_check_state_get(obj);
371
372    if (cf == val) return;
373    elm_object_disabled_set((Evas_Object *)data, !val);
374    elm_cache_flush_enabled_all_set(val);
375 }
376
377 static void
378 cf_round(void *data       __UNUSED__,
379          Evas_Object     *obj,
380          void *event_info __UNUSED__)
381 {
382    double val = elm_slider_value_get(obj);
383    double v;
384
385    v = ((double)((int)(val * 5.0))) / 5.0;
386    if (v != val) elm_slider_value_set(obj, v);
387 }
388
389 static void
390 cf_change(void *data       __UNUSED__,
391           Evas_Object     *obj,
392           void *event_info __UNUSED__)
393 {
394    double cf = elm_cache_flush_interval_get();
395    double val = elm_slider_value_get(obj);
396
397    if (cf == val) return;
398    elm_cache_flush_interval_all_set(val);
399 }
400
401 static void
402 fc_round(void *data       __UNUSED__,
403          Evas_Object     *obj,
404          void *event_info __UNUSED__)
405 {
406    double val = elm_slider_value_get(obj);
407    double v;
408
409    v = ((double)((int)(val * 10.0))) / 10.0;
410    if (v != val) elm_slider_value_set(obj, v);
411 }
412
413 static void
414 fc_change(void *data       __UNUSED__,
415           Evas_Object     *obj,
416           void *event_info __UNUSED__)
417 {
418    double font_cache = elm_font_cache_get();
419    double val = elm_slider_value_get(obj);
420
421    if (font_cache == val) return;
422    elm_font_cache_all_set(val * 1024);
423 }
424
425 static void
426 ic_round(void *data       __UNUSED__,
427          Evas_Object     *obj,
428          void *event_info __UNUSED__)
429 {
430    double val = elm_slider_value_get(obj);
431    double v;
432
433    v = ((double)((int)(val * 10.0))) / 10.0;
434    if (v != val) elm_slider_value_set(obj, v);
435 }
436
437 static void
438 ic_change(void *data       __UNUSED__,
439           Evas_Object     *obj,
440           void *event_info __UNUSED__)
441 {
442    double image_cache = elm_image_cache_get();
443    double val = elm_slider_value_get(obj);
444
445    if (image_cache == val) return;
446    elm_image_cache_all_set(val * 1024);
447 }
448
449 static void
450 sc_round(void *data       __UNUSED__,
451          Evas_Object     *obj,
452          void *event_info __UNUSED__)
453 {
454    double val = elm_slider_value_get(obj);
455    double v;
456
457    v = ((double)((int)(val * 10.0))) / 10.0;
458    if (v != val) elm_slider_value_set(obj, v);
459 }
460
461 static void
462 sc_change(void *data       __UNUSED__,
463           Evas_Object     *obj,
464           void *event_info __UNUSED__)
465 {
466    double scale = elm_scale_get();
467    double val = elm_slider_value_get(obj);
468
469    if (scale == val) return;
470    elm_scale_all_set(val);
471 }
472
473 static void
474 fs_round(void *data       __UNUSED__,
475          Evas_Object     *obj,
476          void *event_info __UNUSED__)
477 {
478    double val = elm_slider_value_get(obj);
479    double v;
480
481    v = ((double)((int)(val * 5.0))) / 5.0;
482    if (v != val) elm_slider_value_set(obj, v);
483 }
484
485 static void
486 fs_change(void *data       __UNUSED__,
487           Evas_Object     *obj,
488           void *event_info __UNUSED__)
489 {
490    double fs = elm_finger_size_get();
491    double val = elm_slider_value_get(obj);
492
493    if (fs == val) return;
494    elm_finger_size_all_set(val);
495 }
496
497 static void
498 efc_round(void *data       __UNUSED__,
499           Evas_Object     *obj,
500           void *event_info __UNUSED__)
501 {
502    double val = elm_slider_value_get(obj);
503    double v;
504
505    v = ((double)((int)(val * 5.0))) / 5.0;
506    if (v != val) elm_slider_value_set(obj, v);
507 }
508
509 static void
510 efc_change(void *data       __UNUSED__,
511            Evas_Object     *obj,
512            void *event_info __UNUSED__)
513 {
514    double efc = elm_edje_file_cache_get();
515    double val = elm_slider_value_get(obj);
516
517    if (efc == val) return;
518    elm_edje_file_cache_all_set(val);
519 }
520
521 static void
522 ecc_round(void *data       __UNUSED__,
523           Evas_Object     *obj,
524           void *event_info __UNUSED__)
525 {
526    double val = elm_slider_value_get(obj);
527    double v;
528
529    v = ((double)((int)(val * 5.0))) / 5.0;
530    if (v != val) elm_slider_value_set(obj, v);
531 }
532
533 static void
534 ecc_change(void *data       __UNUSED__,
535            Evas_Object     *obj,
536            void *event_info __UNUSED__)
537 {
538    double ecc = elm_edje_collection_cache_get();
539    double val = elm_slider_value_get(obj);
540
541    if (ecc == val) return;
542    elm_edje_collection_cache_all_set(val);
543 }
544
545 static void
546 _status_basic(Evas_Object *win,
547               Evas_Object *bx0)
548 {
549    Evas_Object *lb, *fr;
550
551    fr = elm_frame_add(win);
552    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
553    elm_object_text_set(fr, "Information");
554    elm_box_pack_end(bx0, fr);
555    evas_object_show(fr);
556
557    lb = elm_label_add(win);
558    elm_object_text_set(lb,
559                        "Applying configuration change"
560                        );
561    elm_frame_content_set(fr, lb);
562    evas_object_show(lb);
563 }
564
565 static void
566 _status_config(Evas_Object *win,
567                Evas_Object *bx0)
568 {
569    Evas_Object *lb, *pd, *bx, *fr, *sl, *sp;
570
571    fr = elm_frame_add(win);
572    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
573    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
574    elm_object_text_set(fr, "Sizing");
575    elm_box_pack_end(bx0, fr);
576    evas_object_show(fr);
577
578    bx = elm_box_add(win);
579    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
580    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
581
582    LABEL_FRAME_ADD("<hilight>Scale</>");
583
584    sl = elm_slider_add(win);
585    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
586    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
587    elm_slider_span_size_set(sl, 120);
588    elm_slider_unit_format_set(sl, "%1.2f");
589    elm_slider_indicator_format_set(sl, "%1.2f");
590    elm_slider_min_max_set(sl, 0.25, 5.0);
591    elm_slider_value_set(sl, elm_scale_get());
592    elm_box_pack_end(bx, sl);
593    evas_object_show(sl);
594
595    evas_object_smart_callback_add(sl, "changed", sc_round, NULL);
596    evas_object_smart_callback_add(sl, "delay,changed", sc_change, NULL);
597
598    sp = elm_separator_add(win);
599    elm_separator_horizontal_set(sp, 1);
600    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
601    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
602    elm_box_pack_end(bx, sp);
603    evas_object_show(sp);
604
605    LABEL_FRAME_ADD("<hilight>Finger Size</><br>");
606
607    sl = elm_slider_add(win);
608    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
609    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
610    elm_slider_span_size_set(sl, 120);
611    elm_slider_unit_format_set(sl, "%1.0f");
612    elm_slider_indicator_format_set(sl, "%1.0f");
613    elm_slider_min_max_set(sl, 5, 200);
614    elm_slider_value_set(sl, elm_finger_size_get());
615    elm_box_pack_end(bx, sl);
616    evas_object_show(sl);
617
618    evas_object_smart_callback_add(sl, "changed", fs_round, NULL);
619    evas_object_smart_callback_add(sl, "delay,changed", fs_change, NULL);
620
621    // FIXME: add theme selector (basic mode and advanced for fallbacks)
622    // FIXME: save config
623    // FIXME: profile selector / creator etc.
624    elm_frame_content_set(fr, bx);
625    evas_object_show(bx);
626 }
627
628 static void
629 _flip_to(Evas_Object *win,
630          const char  *name)
631 {
632    Evas_Object *wid, *pager;
633    wid = evas_object_data_get(win, name);
634    pager = evas_object_data_get(win, "pager");
635    elm_pager_content_promote(pager, wid);
636 }
637
638 static void
639 _cf_sizing(void            *data,
640            Evas_Object *obj __UNUSED__,
641            void *event_info __UNUSED__)
642 {
643    _flip_to(data, "sizing");
644 }
645
646 static void
647 _cf_themes(void            *data,
648            Evas_Object *obj __UNUSED__,
649            void *event_info __UNUSED__)
650 {
651    _flip_to(data, "themes");
652 }
653
654 static void
655 _cf_fonts(void            *data,
656           Evas_Object *obj __UNUSED__,
657           void *event_info __UNUSED__)
658 {
659    _flip_to(data, "fonts");
660 }
661
662 static void
663 _cf_profiles(void            *data,
664              Evas_Object *obj __UNUSED__,
665              void *event_info __UNUSED__)
666 {
667    _flip_to(data, "profiles");
668 }
669
670 static void
671 _cf_scrolling(void            *data,
672               Evas_Object *obj __UNUSED__,
673               void *event_info __UNUSED__)
674 {
675    _flip_to(data, "scrolling");
676 }
677
678 static void
679 _cf_rendering(void            *data,
680               Evas_Object *obj __UNUSED__,
681               void *event_info __UNUSED__)
682 {
683    _flip_to(data, "rendering");
684 }
685
686 static void
687 _cf_caches(void            *data,
688            Evas_Object *obj __UNUSED__,
689            void *event_info __UNUSED__)
690 {
691    _flip_to(data, "caches");
692 }
693
694 const char *
695 _elm_theme_current_get(const char *theme_search_order)
696 {
697    const char *ret;
698    const char *p;
699
700    if (!theme_search_order)
701      return NULL;
702
703    for (p = theme_search_order;; p++)
704      {
705         if ((*p == ':') || (!*p))
706           {
707              if (p > theme_search_order)
708                {
709                   char *n = malloc(p - theme_search_order + 1);
710                   if (!n)
711                     return NULL;
712
713                   strncpy(n, theme_search_order, p - theme_search_order);
714                   n[p - theme_search_order] = 0;
715                   ret = eina_stringshare_add(n);
716                   free(n);
717                   break;
718                }
719           }
720      }
721
722    return ret;
723 }
724
725 static void
726 _font_overlay_set_all(void            *data,
727                       Evas_Object *obj __UNUSED__,
728                       void *event_info __UNUSED__)
729 {
730    Evas_Object *win, *fclasses, *fnames, *fstyles, *fsizes;
731    Elm_Text_Class_Data *tc_data, *tc;
732    Elm_List_Item *it;
733    Eina_List *l;
734
735    win = data;
736
737    fclasses = evas_object_data_get(win, "font_classes_list");
738    it = elm_list_selected_item_get(fclasses);
739    if (!it) return;
740    tc_data = elm_list_item_data_get(it);
741
742    fnames = evas_object_data_get(win, "font_names_list");
743    fstyles = evas_object_data_get(win, "font_styles_list");
744    fsizes = evas_object_data_get(win, "font_sizes_list");
745
746    EINA_LIST_FOREACH(fdata.text_classes, l, tc)
747      {
748         eina_stringshare_replace(&tc->font, tc_data->font);
749         eina_stringshare_replace(&tc->style, tc_data->style);
750         tc->size = tc_data->size;
751      }
752
753    elm_config_save();
754 }
755
756 static void
757 _font_overlay_reset(void            *data,
758                     Evas_Object *obj __UNUSED__,
759                     void *event_info __UNUSED__)
760 {
761    Evas_Object *win, *fclasses, *fnames, *fstyles, *fsizes;
762    Elm_Text_Class_Data *tc_data;
763    Elm_List_Item *it;
764
765    win = data;
766
767    fclasses = evas_object_data_get(win, "font_classes_list");
768    it = elm_list_selected_item_get(fclasses);
769    if (!it) return;
770    tc_data = elm_list_item_data_get(it);
771
772    fnames = evas_object_data_get(win, "font_names_list");
773    fstyles = evas_object_data_get(win, "font_styles_list");
774    fsizes = evas_object_data_get(win, "font_sizes_list");
775
776    elm_font_overlay_unset(tc_data->name);
777
778    eina_stringshare_replace(&fdata.cur_font, NULL);
779    eina_stringshare_replace(&tc_data->font, NULL);
780    eina_stringshare_replace(&fdata.cur_style, NULL);
781    eina_stringshare_replace(&tc_data->style, NULL);
782    fdata.cur_size = 0.0;
783    tc_data->size = 0.0;
784
785    ELM_LIST_DISABLE(fnames);
786    ELM_LIST_DISABLE(fstyles);
787    ELM_LIST_DISABLE(fsizes);
788
789    elm_config_save();
790 }
791
792 static void
793 _font_overlay_reset_all(void            *data,
794                         Evas_Object *obj __UNUSED__,
795                         void *event_info __UNUSED__)
796 {
797    Evas_Object *win, *fclasses, *fnames, *fstyles, *fsizes;
798    Elm_Text_Class_Data *tc_data;
799    Elm_List_Item *it;
800    Eina_List *l;
801
802    win = data;
803    eina_stringshare_replace(&fdata.cur_font, NULL);
804    eina_stringshare_replace(&fdata.cur_style, NULL);
805    fdata.cur_size = 0.0;
806
807    EINA_LIST_FOREACH(fdata.text_classes, l, tc_data)
808      {
809         elm_font_overlay_unset(tc_data->name);
810
811         eina_stringshare_replace(&tc_data->font, NULL);
812         eina_stringshare_replace(&tc_data->style, NULL);
813         tc_data->size = 0.0;
814      }
815
816    fclasses = evas_object_data_get(win, "font_classes_list");
817    fnames = evas_object_data_get(win, "font_names_list");
818    fstyles = evas_object_data_get(win, "font_styles_list");
819    fsizes = evas_object_data_get(win, "font_sizes_list");
820
821    it = elm_list_selected_item_get(fclasses);
822    if (it) elm_list_item_selected_set(it, EINA_FALSE);
823
824    ELM_LIST_DISABLE(fnames);
825    ELM_LIST_DISABLE(fstyles);
826    ELM_LIST_DISABLE(fsizes);
827
828    elm_config_save();
829 }
830
831 static void
832 _font_overlay_change(void *data       __UNUSED__,
833                      Evas_Object *obj __UNUSED__,
834                      void *event_info __UNUSED__)
835 {
836    Elm_Text_Class_Data *tc_data;
837    Eina_List *l;
838
839    EINA_LIST_FOREACH(fdata.text_classes, l, tc_data)
840      {
841         if (tc_data->font)
842           {
843              const char *name;
844
845              name = elm_font_fontconfig_name_get(tc_data->font,
846                                                  tc_data->style);
847              elm_font_overlay_set(tc_data->name, name,
848                                   tc_data->size ? tc_data->size : -100);
849              elm_font_fontconfig_name_free(name);
850           }
851         else
852           elm_font_overlay_unset(tc_data->name);
853      }
854
855    elm_config_save();
856    elm_font_overlay_all_apply();
857
858    /* TODO: apply hinting */
859 }
860
861 static void
862 _profile_change_do(Evas_Object *win,
863                    const char  *profile)
864 {
865    int flush_interval, font_c, image_c, edje_file_c, edje_col_c, ts_threshould;
866    double scale, s_bounce_friction, ts_momentum_threshold, ts_friction,
867           ts_border_friction, page_friction, bring_in_friction, zoom_friction;
868    const char *curr_theme, *curr_engine;
869    const Eina_List *l_items, *l;
870    Eina_Bool s_bounce, ts;
871    Elm_List_Item *it;
872    Elm_Theme *th;
873    int fs;
874
875    elm_profile_all_set(profile);
876
877    scale = elm_scale_get();
878    fs = elm_finger_size_get();
879    flush_interval = elm_cache_flush_interval_get();
880    font_c = elm_font_cache_get();
881    image_c = elm_image_cache_get();
882    edje_file_c = elm_edje_file_cache_get();
883    edje_col_c = elm_edje_collection_cache_get();
884
885    s_bounce = elm_scroll_bounce_enabled_get();
886    s_bounce_friction = elm_scroll_bounce_friction_get();
887    ts = elm_scroll_thumbscroll_enabled_get();
888    ts_threshould = elm_scroll_thumbscroll_threshold_get();
889    ts_momentum_threshold = elm_scroll_thumbscroll_momentum_threshold_get();
890    ts_friction = elm_scroll_thumbscroll_friction_get();
891    ts_border_friction = elm_scroll_thumbscroll_border_friction_get();
892    page_friction = elm_scroll_page_scroll_friction_get();
893    bring_in_friction = elm_scroll_bring_in_scroll_friction_get();
894    zoom_friction = elm_scroll_zoom_friction_get();
895
896    /* gotta update root windows' atoms */
897    elm_scale_all_set(scale);
898    elm_slider_value_set(evas_object_data_get(win, "scale_slider"), scale);
899    elm_finger_size_all_set(fs);
900    elm_slider_value_set(evas_object_data_get(win, "fs_slider"), fs);
901
902    elm_cache_flush_interval_all_set(flush_interval);
903    elm_slider_value_set(evas_object_data_get(win,
904                                              "cache_flush_interval_slider"),
905                         flush_interval);
906    elm_font_cache_all_set(font_c);
907    elm_slider_value_set(evas_object_data_get(win, "font_cache_slider"),
908                         font_c / 1024.0);
909    elm_image_cache_all_set(image_c);
910    elm_slider_value_set(evas_object_data_get(win, "image_cache_slider"),
911                         image_c / 1024.0);
912    elm_edje_file_cache_all_set(edje_file_c);
913    elm_slider_value_set(evas_object_data_get(win, "edje_file_cache_slider"),
914                         edje_file_c);
915    elm_edje_collection_cache_all_set(edje_col_c);
916    elm_slider_value_set(evas_object_data_get(win,
917                                              "edje_collection_cache_slider"),
918                         edje_col_c);
919
920    elm_scroll_bounce_enabled_all_set(s_bounce);
921    elm_check_state_set(evas_object_data_get(win, "scroll_bounce_check"),
922                        s_bounce);
923    elm_scroll_bounce_friction_all_set(s_bounce_friction);
924    elm_slider_value_set(evas_object_data_get(win, "bounce_friction_slider"),
925                         s_bounce_friction);
926    elm_scroll_thumbscroll_enabled_all_set(ts);
927    elm_check_state_set(evas_object_data_get(win, "thumbscroll_check"), ts);
928    elm_scroll_thumbscroll_threshold_all_set(ts_threshould);
929    elm_slider_value_set(evas_object_data_get(win,
930                                              "thumbscroll_threshold_slider"),
931                         ts_threshould);
932    elm_scroll_thumbscroll_momentum_threshold_all_set(ts_momentum_threshold);
933    elm_slider_value_set(evas_object_data_get(win,
934                                              "ts_momentum_threshold_slider"),
935                         ts_momentum_threshold);
936    elm_scroll_thumbscroll_friction_all_set(ts_friction);
937    elm_slider_value_set(evas_object_data_get(win,
938                                              "thumbscroll_friction_slider"),
939                         ts_friction);
940    elm_scroll_thumbscroll_border_friction_all_set(ts_border_friction);
941    elm_slider_value_set(evas_object_data_get(win, "ts_border_friction_slider"),
942                         ts_border_friction);
943    elm_scroll_page_scroll_friction_all_set(page_friction);
944    elm_slider_value_set(evas_object_data_get(win,
945                                              "page_scroll_friction_slider"),
946                         page_friction);
947    elm_scroll_bring_in_scroll_friction_all_set(bring_in_friction);
948    elm_slider_value_set(evas_object_data_get(win,
949                                              "bring_in_scroll_friction_slider"),
950                         bring_in_friction);
951    elm_scroll_zoom_friction_all_set(zoom_friction);
952    elm_slider_value_set(evas_object_data_get(win,
953                                              "zoom_scroll_friction_slider"),
954                         zoom_friction);
955
956    curr_theme = _elm_theme_current_get(elm_theme_get(NULL));
957    elm_theme_all_set(curr_theme);
958
959    th = elm_theme_new();
960    elm_theme_set(th, curr_theme);
961    elm_object_theme_set(evas_object_data_get(win, "theme_preview"), th);
962    elm_theme_free(th);
963    eina_stringshare_del(curr_theme);
964
965    curr_engine = elm_engine_current_get();
966    l_items = elm_list_items_get(evas_object_data_get(win, "engines_list"));
967    EINA_LIST_FOREACH(l_items, l, it)
968      {
969         if (!strcmp(elm_list_item_data_get(it), curr_engine))
970           {
971              elm_list_item_selected_set(it, EINA_TRUE);
972              break;
973           }
974      }
975 }
976
977 static void
978 _engine_use(void            *data,
979             Evas_Object *obj __UNUSED__,
980             void *event_info __UNUSED__)
981 {
982    Evas_Object *li;
983    const char *selection;
984
985    li = data;
986    selection = elm_list_item_data_get(elm_list_selected_item_get(li));
987
988    if (!strcmp(elm_engine_current_get(), selection))
989      return;
990
991    elm_engine_set(selection);
992    elm_config_save(); /* make sure new engine has its data dir */
993 }
994
995 static void
996 _profile_use(void            *data,
997              Evas_Object *obj __UNUSED__,
998              void *event_info __UNUSED__)
999 {
1000    Evas_Object *li;
1001    const char *selection;
1002    const char *profile;
1003
1004    li = data;
1005    selection = elm_list_item_data_get(elm_list_selected_item_get(li));
1006    profile = elm_profile_current_get();
1007
1008    if (!profile)
1009      {
1010         fprintf(stderr, "No profile currently set!\n"); /* FIXME: log domain */
1011         return;
1012      }
1013
1014    if (!strcmp(profile, selection))
1015      return;
1016
1017    elm_config_save(); /* dump config into old profile's data dir */
1018    elm_profile_set(selection); /* just here to update info for getters below */
1019
1020    _profile_change_do(elm_object_top_widget_get(li), selection);
1021    elm_config_save(); /* make sure new profile has its data dir */
1022 }
1023
1024 static void
1025 _btn_todo(void *data       __UNUSED__,
1026           Evas_Object *obj __UNUSED__,
1027           void *event_info __UNUSED__)
1028 {
1029    printf("To be done!\n");
1030 }
1031
1032 static void
1033 _profile_reset(void            *data,
1034                Evas_Object *obj __UNUSED__,
1035                void *event_info __UNUSED__)
1036 {
1037    const char *selection, *curr;
1038    const char *pdir;
1039    Evas_Object *li;
1040
1041    li = data;
1042    selection = elm_list_item_data_get(elm_list_selected_item_get(li));
1043    curr = elm_profile_current_get();
1044
1045    elm_config_save(); /* dump config into old profile's data dir */
1046
1047    pdir = elm_profile_dir_get(selection, EINA_TRUE);
1048    if (!pdir)
1049      return;
1050
1051    ecore_file_recursive_rm(pdir);
1052    elm_profile_dir_free(pdir);
1053
1054    elm_config_reload();
1055
1056    _profile_change_do(elm_object_top_widget_get(li), curr);
1057    elm_config_save(); /* make sure new profile has its data dir */
1058 }
1059
1060 static void
1061 _theme_use(void *data       __UNUSED__,
1062            Evas_Object *obj __UNUSED__,
1063            void *event_info __UNUSED__)
1064 {
1065    const char *defth;
1066    Elm_Theme *th;
1067    Evas_Object *win = elm_object_top_widget_get(obj);
1068    Evas_Object *sample = evas_object_data_get(win, "theme_preview");
1069
1070    th = elm_object_theme_get(sample);
1071    defth = elm_theme_get(th);
1072    elm_theme_all_set(defth);
1073 }
1074
1075 static void
1076 _theme_sel(void            *data,
1077            Evas_Object     *obj,
1078            void *event_info __UNUSED__)
1079 {
1080    Theme *t = data;
1081    Evas_Object *win = elm_object_top_widget_get(obj);
1082    Evas_Object *sample = evas_object_data_get(win, "theme_preview");
1083    Elm_Theme *th, *sth;
1084    const char *defth, *rest;
1085    Eina_Strbuf *newth;
1086
1087    tsel = elm_list_selected_items_get(obj);
1088    sth = elm_object_theme_get(sample);
1089    defth = elm_theme_get(sth);
1090    newth = eina_strbuf_new();
1091    EINA_SAFETY_ON_NULL_RETURN(newth);
1092    th = elm_theme_new();
1093    if (!th)
1094      {
1095         eina_strbuf_free(newth);
1096         return;
1097      }
1098    if (eina_list_count(tsel) > 1)
1099      eina_strbuf_append_printf(newth, "%s:%s", t->name, defth);
1100    else
1101      {
1102         rest = strchr(defth, ':');
1103         if (!rest)
1104           eina_strbuf_append(newth, t->name);
1105         else
1106           eina_strbuf_append_printf(newth, "%s%s", t->name, rest);
1107      }
1108    elm_theme_set(th, eina_strbuf_string_get(newth));
1109    eina_strbuf_free(newth);
1110    elm_object_theme_set(sample, th);
1111    elm_theme_free(th);
1112 }
1113
1114 /*static void
1115    _theme_browse(void *data, Evas_Object *obj, void *event_info)
1116    {
1117    printf("not implemented\n");
1118    }*/
1119
1120 static void
1121 _status_config_sizing(Evas_Object *win,
1122                       Evas_Object *pager)
1123 {
1124    Evas_Object *lb, *pd, *bx, *sl, *sp;
1125
1126    bx = elm_box_add(win);
1127    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
1128    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
1129
1130    LABEL_FRAME_ADD("<hilight>Scale</>");
1131
1132    sl = elm_slider_add(win);
1133    evas_object_data_set(win, "scale_slider", sl);
1134    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1135    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1136    elm_slider_span_size_set(sl, 120);
1137    elm_slider_unit_format_set(sl, "%1.2f");
1138    elm_slider_indicator_format_set(sl, "%1.2f");
1139    elm_slider_min_max_set(sl, 0.25, 5.0);
1140    elm_slider_value_set(sl, elm_scale_get());
1141    elm_box_pack_end(bx, sl);
1142    evas_object_show(sl);
1143
1144    evas_object_smart_callback_add(sl, "changed", sc_round, NULL);
1145    evas_object_smart_callback_add(sl, "delay,changed", sc_change, NULL);
1146
1147    sp = elm_separator_add(win);
1148    elm_separator_horizontal_set(sp, 1);
1149    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
1150    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1151    elm_box_pack_end(bx, sp);
1152    evas_object_show(sp);
1153
1154    LABEL_FRAME_ADD("<hilight>Finger Size</><br>");
1155
1156    sl = elm_slider_add(win);
1157    evas_object_data_set(win, "fs_slider", sl);
1158    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1159    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1160    elm_slider_span_size_set(sl, 120);
1161    elm_slider_unit_format_set(sl, "%1.0f");
1162    elm_slider_indicator_format_set(sl, "%1.0f");
1163    elm_slider_min_max_set(sl, 5, 200);
1164    elm_slider_value_set(sl, elm_finger_size_get());
1165    elm_box_pack_end(bx, sl);
1166    evas_object_show(sl);
1167
1168    evas_object_smart_callback_add(sl, "changed", fs_round, NULL);
1169    evas_object_smart_callback_add(sl, "delay,changed", fs_change, NULL);
1170
1171    evas_object_data_set(win, "sizing", bx);
1172
1173    elm_pager_content_push(pager, bx);
1174 }
1175
1176 static Evas_Object *
1177 _sample_theme_new(Evas_Object *win)
1178 {
1179    Evas_Object *base, *bg, *bt, *ck, *rd, *rdg, *sl, *fr, *li, *rc, *sp;
1180
1181    base = elm_table_add(win);
1182    evas_object_size_hint_weight_set(base, 1.0, 1.0);
1183    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1184
1185    bg = elm_bg_add(win);
1186    evas_object_size_hint_weight_set(bg, 1.0, 1.0);
1187    evas_object_size_hint_align_set(bg, EVAS_HINT_FILL, EVAS_HINT_FILL);
1188    elm_table_pack(base, bg, 0, 0, 2, 5);
1189    evas_object_show(bg);
1190
1191    bt = elm_button_add(win);
1192    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1193    elm_object_text_set(bt, "Button");
1194    elm_table_pack(base, bt, 0, 0, 1, 1);
1195    evas_object_show(bt);
1196
1197    ck = elm_check_add(win);
1198    evas_object_size_hint_weight_set(ck, 1.0, 0.0);
1199    elm_object_text_set(ck, "Check");
1200    elm_table_pack(base, ck, 0, 1, 1, 1);
1201    evas_object_show(ck);
1202
1203    rd = elm_radio_add(win);
1204    evas_object_size_hint_weight_set(rd, 1.0, 0.0);
1205    elm_radio_state_value_set(rd, 0);
1206    elm_object_text_set(rd, "Radio 1");
1207    elm_table_pack(base, rd, 1, 0, 1, 1);
1208    evas_object_show(rd);
1209    rdg = rd;
1210
1211    rd = elm_radio_add(win);
1212    evas_object_size_hint_weight_set(rd, 1.0, 0.0);
1213    elm_radio_state_value_set(rd, 1);
1214    elm_object_text_set(rd, "Radio 2");
1215    elm_radio_group_add(rd, rdg);
1216    elm_table_pack(base, rd, 1, 1, 1, 1);
1217    evas_object_show(rd);
1218
1219    sp = elm_separator_add(win);
1220    elm_separator_horizontal_set(sp, 1);
1221    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1222    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1223    elm_table_pack(base, sp, 0, 2, 2, 1);
1224    evas_object_show(sp);
1225
1226    sl = elm_slider_add(win);
1227    elm_object_text_set(sl, "Slider");
1228    elm_slider_span_size_set(sl, 120);
1229    elm_slider_min_max_set(sl, 1, 10);
1230    elm_slider_value_set(sl, 4);
1231    evas_object_size_hint_weight_set(sl, 1.0, 0.0);
1232    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, EVAS_HINT_FILL);
1233    elm_table_pack(base, sl, 0, 3, 2, 1);
1234    evas_object_show(sl);
1235
1236    fr = elm_frame_add(win);
1237    elm_object_text_set(fr, "Frame");
1238    elm_table_pack(base, fr, 0, 4, 2, 1);
1239    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1240    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1241    evas_object_show(fr);
1242
1243    li = elm_list_add(win);
1244    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1245    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1246    elm_frame_content_set(fr, li);
1247    evas_object_show(li);
1248
1249    elm_list_item_append(li, "List Item 1", NULL, NULL, NULL, NULL);
1250    elm_list_item_append(li, "Second Item", NULL, NULL, NULL, NULL);
1251    elm_list_item_append(li, "Third Item", NULL, NULL, NULL, NULL);
1252    elm_list_go(li);
1253
1254    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1255    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1256    evas_object_size_hint_min_set(rc, 160, 120);
1257    elm_table_pack(base, rc, 0, 4, 2, 1);
1258
1259    return base;
1260 }
1261
1262 static void
1263 _status_config_themes(Evas_Object *win,
1264                       Evas_Object *pager)
1265 {
1266    Evas_Object *tb, *rc, *sc, *sp, *li, *pd, *fr, *bt, *sample;
1267    Eina_List *list, *l;
1268    char *th, *s, *ext;
1269
1270    tb = elm_table_add(win);
1271    evas_object_size_hint_weight_set(tb, 1.0, 1.0);
1272    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
1273
1274    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1275    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1276    evas_object_size_hint_min_set(rc, 0, 130);
1277    elm_table_pack(tb, rc, 0, 0, 1, 1);
1278
1279    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1280    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1281    evas_object_size_hint_min_set(rc, 0, 200);
1282    elm_table_pack(tb, rc, 0, 1, 1, 1);
1283
1284    /////////////////////////////////////////////
1285
1286    pd = elm_frame_add(win);
1287    elm_object_style_set(pd, "pad_medium");
1288    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1289    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1290    elm_table_pack(tb, pd, 0, 0, 1, 1);
1291    evas_object_show(pd);
1292
1293    li = elm_list_add(win);
1294    elm_list_multi_select_set(li, EINA_TRUE);
1295    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1296    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1297    elm_frame_content_set(pd, li);
1298    evas_object_show(li);
1299
1300    list = elm_theme_name_available_list_new();
1301    EINA_LIST_FOREACH(list, l, th)
1302      {
1303         Theme *t;
1304
1305         t = calloc(1, sizeof(Theme));
1306         t->name = eina_stringshare_add(th);
1307         s = elm_theme_list_item_path_get(th, &(t->in_search_path));
1308         if (s)
1309           {
1310              t->path = eina_stringshare_add(s);
1311              free(s);
1312           }
1313         if (t->in_search_path)
1314           {
1315              s = strdup(th);
1316              if (s)
1317                {
1318                   s[0] = toupper(s[0]);
1319                   t->label = eina_stringshare_add(s);
1320                   free(s);
1321                }
1322              else
1323                t->label = eina_stringshare_add(s);
1324           }
1325         else
1326           {
1327              s = strdup(ecore_file_file_get(th));
1328              if (s)
1329                {
1330                   s[0] = toupper(s[0]);
1331                   ext = strrchr(s, '.');
1332                   if (ext) *ext = 0;
1333                   t->label = eina_stringshare_add(s);
1334                   free(s);
1335                }
1336              else
1337                t->label = eina_stringshare_add(s);
1338           }
1339         themes = eina_list_append(themes, t);
1340         elm_list_item_append(li, t->label, NULL, NULL, _theme_sel, t);
1341      }
1342    elm_theme_name_available_list_free(list);
1343
1344    elm_list_go(li);
1345
1346    pd = elm_frame_add(win);
1347    elm_object_style_set(pd, "pad_medium");
1348    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1349    evas_object_size_hint_align_set(pd, 0.9, 0.9);
1350    elm_table_pack(tb, pd, 0, 0, 1, 1);
1351    evas_object_show(pd);
1352
1353    /* FIXME: not implemented yet
1354       bt = elm_button_add(win);
1355       evas_object_smart_callback_add(bt, "clicked", _theme_browse, win);
1356       elm_object_text_set(bt, "Browse...");
1357       evas_object_size_hint_weight_set(bt, 1.0, 1.0);
1358       evas_object_size_hint_align_set(bt, 0.9, 0.9);
1359       elm_frame_content_set(pd, bt);
1360       evas_object_show(bt);
1361     */
1362    pd = elm_frame_add(win);
1363    elm_object_style_set(pd, "pad_medium");
1364    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1365    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1366    elm_table_pack(tb, pd, 0, 1, 1, 1);
1367    evas_object_show(pd);
1368
1369    fr = elm_frame_add(win);
1370    elm_object_text_set(fr, "Preview");
1371    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1372    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1373    elm_frame_content_set(pd, fr);
1374    evas_object_show(fr);
1375
1376    sc = elm_scroller_add(win);
1377    elm_scroller_bounce_set(sc, 0, 0);
1378    evas_object_size_hint_weight_set(sc, 1.0, 1.0);
1379    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1380    elm_frame_content_set(fr, sc);
1381    evas_object_show(sc);
1382
1383    sample = _sample_theme_new(win);
1384    elm_scroller_content_set(sc, sample);
1385    evas_object_show(sample);
1386    evas_object_data_set(win, "theme_preview", sample);
1387
1388    /////////////////////////////////////////////
1389    sp = elm_separator_add(win);
1390    elm_separator_horizontal_set(sp, 1);
1391    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1392    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1393    elm_table_pack(tb, sp, 0, 2, 1, 1);
1394    evas_object_show(sp);
1395
1396    pd = elm_frame_add(win);
1397    elm_object_style_set(pd, "pad_medium");
1398    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1399    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1400    elm_table_pack(tb, pd, 0, 3, 1, 1);
1401    evas_object_show(pd);
1402
1403    bt = elm_button_add(win);
1404    evas_object_smart_callback_add(bt, "clicked", _theme_use, win);
1405    elm_object_text_set(bt, "Use Theme");
1406    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1407    evas_object_size_hint_align_set(bt, 0.5, 0.5);
1408    elm_frame_content_set(pd, bt);
1409    evas_object_show(bt);
1410
1411    evas_object_data_set(win, "themes", tb);
1412    elm_pager_content_push(pager, tb);
1413 }
1414
1415 static void
1416 _font_preview_update(Evas_Object *win)
1417 {
1418    Evas_Font_Size sz;
1419    const char *name;
1420
1421    if (!fdata.cur_font)
1422      return;
1423
1424    name = elm_font_fontconfig_name_get(fdata.cur_font, fdata.cur_style);
1425    sz = fdata.cur_size;
1426
1427    if (sz < 0)
1428      sz = (-sz * 10) / 100;
1429    if (sz == 0)
1430      sz = 10;
1431
1432    edje_object_text_class_set(evas_object_data_get(win, "font_preview"),
1433                               "font_preview", name, sz);
1434
1435    elm_font_fontconfig_name_free(name);
1436 }
1437
1438 static void
1439 _font_classes_list_sel(void *data   __UNUSED__,
1440                        Evas_Object *obj,
1441                        void        *event_info)
1442 {
1443    const Eina_List *f_names_items, *l;
1444    Elm_Text_Class_Data *tc_data;
1445    Evas_Object *f_names_list;
1446    Elm_List_Item *it;
1447
1448    tc_data = elm_list_item_data_get(event_info);
1449
1450    f_names_list = evas_object_data_get(elm_object_top_widget_get(obj),
1451                                        "font_names_list");
1452    ELM_LIST_ENABLE(f_names_list);
1453
1454    f_names_items = elm_list_items_get(f_names_list);
1455
1456    EINA_LIST_FOREACH(f_names_items, l, it)
1457      {
1458         const char *l;
1459
1460         l = elm_list_item_label_get(it);
1461
1462         if (tc_data->font && !strcmp(l, tc_data->font))
1463           {
1464              elm_list_item_selected_set(it, EINA_TRUE);
1465              elm_list_item_show(it);
1466              break;
1467           }
1468      }
1469 }
1470
1471 static void
1472 _font_names_list_sel(void *data   __UNUSED__,
1473                      Evas_Object *obj,
1474                      void        *event_info)
1475 {
1476    Evas_Object *style_list, *cls_list, *sizes_list, *win;
1477    const char *style, *sel_font;
1478    Elm_Text_Class_Data *tc_data;
1479    Elm_List_Item *it, *fc_it;
1480    Elm_Font_Properties *efp;
1481    const Eina_List *l;
1482
1483    it = event_info;
1484    sel_font = elm_list_item_label_get(it);
1485
1486    win = elm_object_top_widget_get(obj);
1487    style_list = evas_object_data_get(win, "font_styles_list");
1488    cls_list = evas_object_data_get(win, "font_classes_list");
1489    sizes_list = evas_object_data_get(win, "font_sizes_list");
1490
1491    fc_it = elm_list_selected_item_get(cls_list);
1492    if (!fc_it) return;  /* should not happen, fonts list disabled in
1493                          * this case */
1494
1495    eina_stringshare_replace(&fdata.cur_font, sel_font);
1496
1497    tc_data = elm_list_item_data_get(fc_it);
1498    if (tc_data->font) eina_stringshare_del(tc_data->font);
1499    if (fdata.cur_font) tc_data->font = eina_stringshare_ref(fdata.cur_font);
1500
1501    /* load styles list */
1502    efp = eina_hash_find(fdata.font_hash, sel_font);
1503
1504    ELM_LIST_ENABLE(style_list);
1505    elm_list_clear(style_list);
1506
1507    evas_event_freeze(evas_object_evas_get(style_list));
1508    edje_freeze();
1509
1510    it = NULL;
1511
1512    EINA_LIST_FOREACH(efp->styles, l, style)
1513      {
1514         Elm_List_Item *i;
1515
1516         i = elm_list_item_append(style_list, style, NULL, NULL,
1517                                  _font_styles_list_sel, NULL);
1518
1519         if (tc_data->style && (!strcmp(style, tc_data->style)))
1520           it = i;
1521      }
1522
1523    elm_list_go(style_list);
1524
1525    edje_thaw();
1526    evas_event_thaw(evas_object_evas_get(style_list));
1527
1528    if (it)
1529      elm_list_item_selected_set(it, EINA_TRUE);
1530
1531    _font_preview_update(win);
1532 }
1533
1534 static void
1535 _font_styles_list_sel(void *data   __UNUSED__,
1536                       Evas_Object *obj,
1537                       void        *event_info)
1538 {
1539    Evas_Object *fc_list, *fs_list, *win;
1540    Elm_Text_Class_Data *tc_data;
1541    const Eina_List *l;
1542    Elm_List_Item *it;
1543
1544    win = elm_object_top_widget_get(obj);
1545    fc_list = evas_object_data_get(win, "font_classes_list");
1546    fs_list = evas_object_data_get(win, "font_sizes_list");
1547
1548    it = elm_list_selected_item_get(fc_list);
1549    if (!it) return;  /* should not happen */
1550
1551    eina_stringshare_replace(&fdata.cur_style,
1552                             elm_list_item_label_get(event_info));
1553    ELM_LIST_ENABLE(fs_list);
1554
1555    tc_data = elm_list_item_data_get(it);
1556    eina_stringshare_del(tc_data->style);
1557    tc_data->style = eina_stringshare_ref(fdata.cur_style);
1558
1559    evas_event_freeze(evas_object_evas_get(fs_list));
1560    edje_freeze();
1561
1562    EINA_LIST_FOREACH(elm_list_items_get(fs_list), l, it)
1563      {
1564         Elm_Font_Size_Data *sdata;
1565
1566         sdata = elm_list_item_data_get(it);
1567         elm_list_item_selected_set(l->data, EINA_FALSE);
1568
1569         if (tc_data->size == sdata->size)
1570           {
1571              elm_list_item_selected_set(it, EINA_TRUE);
1572              elm_list_item_show(it);
1573              break;
1574           }
1575      }
1576
1577    edje_thaw();
1578    evas_event_thaw(evas_object_evas_get(fs_list));
1579
1580    _font_preview_update(win);
1581 }
1582
1583 static void
1584 _font_sizes_list_sel(void *data       __UNUSED__,
1585                      Evas_Object *obj __UNUSED__,
1586                      void *event_info __UNUSED__)
1587 {
1588    Elm_Text_Class_Data *tc_data;
1589    Evas_Object *fc_list, *win;
1590    Elm_Font_Size_Data *sd;
1591    Elm_List_Item *it;
1592
1593    win = elm_object_top_widget_get(obj);
1594    fc_list = evas_object_data_get(win, "font_classes_list");
1595
1596    it = elm_list_selected_item_get(fc_list);
1597    if (!it) return;  /* should not happen */
1598
1599    sd = elm_list_item_data_get(event_info);
1600    fdata.cur_size = sd->size;
1601
1602    tc_data = elm_list_item_data_get(it);
1603    tc_data->size = fdata.cur_size;
1604
1605    _font_preview_update(win);
1606 }
1607
1608 static void
1609 _fstyle_list_unselect_cb(void *data       __UNUSED__,
1610                          Evas_Object     *obj,
1611                          void *event_info __UNUSED__)
1612 {
1613    Evas_Object *sizes_list, *win;
1614
1615    if (elm_list_selected_item_get(obj)) return;
1616
1617    win = elm_object_top_widget_get(obj);
1618
1619    sizes_list = evas_object_data_get(win, "font_sizes_list");
1620    ELM_LIST_DISABLE(sizes_list);
1621 }
1622
1623 static void
1624 _fc_list_unselect_cb(void *data       __UNUSED__,
1625                      Evas_Object     *obj,
1626                      void *event_info __UNUSED__)
1627 {
1628    Evas_Object *font_names_list, *styles_list, *sizes_list, *win;
1629
1630    if (elm_list_selected_item_get(obj)) return;
1631
1632    win = elm_object_top_widget_get(obj);
1633
1634    font_names_list = evas_object_data_get(win, "font_names_list");
1635    ELM_LIST_DISABLE(font_names_list);
1636
1637    styles_list = evas_object_data_get(win, "font_styles_list");
1638    ELM_LIST_DISABLE(styles_list);
1639
1640    sizes_list = evas_object_data_get(win, "font_sizes_list");
1641    ELM_LIST_DISABLE(sizes_list);
1642 }
1643
1644 static void
1645 _font_classes_list_load(Evas_Object *li)
1646 {
1647    Elm_Text_Class_Data *tc_data;
1648    Eina_List *l;
1649    Evas *evas;
1650
1651    evas = evas_object_evas_get(li);
1652    evas_event_freeze(evas);
1653    edje_freeze();
1654
1655    EINA_LIST_FOREACH(fdata.text_classes, l, tc_data)
1656      elm_list_item_append(li, tc_data->desc, NULL, NULL,
1657                           _font_classes_list_sel, tc_data);
1658
1659    evas_object_smart_callback_add(li, "unselected", _fc_list_unselect_cb,
1660                                   NULL);
1661
1662    elm_list_go(li);
1663    edje_thaw();
1664    evas_event_thaw(evas);
1665 }
1666
1667 static void
1668 _fonts_data_fill(Evas *evas)
1669 {
1670    const Eina_List *fo_list, *text_classes, *l;
1671    Elm_Text_Class_Data *tc_data;
1672    Elm_Font_Size_Data *sd;
1673    Elm_Font_Overlay *efo;
1674    Eina_List *evas_fonts;
1675    Elm_Text_Class *etc;
1676    int i;
1677
1678    evas_fonts = evas_font_available_list(evas);
1679    fdata.font_hash = elm_font_available_hash_add(evas_fonts);
1680    evas_font_available_list_free(evas, evas_fonts);
1681
1682    text_classes = elm_text_classes_list_get();
1683    fo_list = elm_font_overlay_list_get();
1684
1685    EINA_LIST_FOREACH(text_classes, l, etc)
1686      {
1687         const Eina_List *ll;
1688
1689         tc_data = calloc(1, sizeof(*tc_data));
1690         tc_data->name = eina_stringshare_add(etc->name);
1691         tc_data->desc = eina_stringshare_add(etc->desc);
1692
1693         EINA_LIST_FOREACH(fo_list, ll, efo)
1694           {
1695              if (strcmp(tc_data->name, efo->text_class))
1696                continue;
1697
1698              if (efo->font)
1699                {
1700                   Elm_Font_Properties *efp;
1701
1702                   efp = elm_font_properties_get(efo->font);
1703                   if (efp)
1704                     {
1705                        tc_data->font = eina_stringshare_add(efp->name);
1706                        /* we're sure we recorded with only 1 style selected */
1707                        tc_data->style = eina_stringshare_add(efp->styles->data);
1708                        elm_font_properties_free(efp);
1709                     }
1710                }
1711              tc_data->size = efo->size;
1712           }
1713
1714         fdata.text_classes = eina_list_append(fdata.text_classes, tc_data);
1715      }
1716
1717    elm_text_classes_list_free(text_classes);
1718
1719    /* FIXME: hinting later */
1720    /* fdata.hinting = e_config->font_hinting; */
1721
1722    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1723    sd->size_str = eina_stringshare_add("Tiny");
1724    sd->size = -50;
1725    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1726
1727    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1728    sd->size_str = eina_stringshare_add("Small");
1729    sd->size = -80;
1730    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1731
1732    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1733    sd->size_str = eina_stringshare_add("Normal");
1734    sd->size = -100;
1735    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1736
1737    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1738    sd->size_str = eina_stringshare_add("Big");
1739    sd->size = -150;
1740    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1741
1742    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1743    sd->size_str = eina_stringshare_add("Really Big");
1744    sd->size = -190;
1745    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1746
1747    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1748    sd->size_str = eina_stringshare_add("Huge");
1749    sd->size = -250;
1750    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1751
1752    for (i = 5; i < 51; i++)
1753      {
1754         char str[16];
1755
1756         str[0] = 0;
1757         snprintf(str, sizeof(str), "%d pixels", i);
1758
1759         sd = calloc(1, sizeof(Elm_Font_Size_Data));
1760         sd->size_str = eina_stringshare_add(str);
1761         sd->size = i;
1762         fdata.font_px_list = eina_list_append(fdata.font_px_list, sd);
1763      }
1764 }
1765
1766 static int
1767 _font_sort_cb(const void *data1,
1768               const void *data2)
1769 {
1770    if (!data1) return 1;
1771    if (!data2) return -1;
1772    return strcmp(data1, data2);
1773 }
1774
1775 static void
1776 _font_sizes_list_load(Evas_Object *size_list)
1777 {
1778    Elm_Font_Size_Data *size_data;
1779    Eina_List *l;
1780    Evas *evas;
1781
1782    evas = evas_object_evas_get(size_list);
1783    evas_event_freeze(evas);
1784    edje_freeze();
1785
1786    EINA_LIST_FOREACH(fdata.font_scale_list, l, size_data)
1787      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1788                           _font_sizes_list_sel, size_data);
1789
1790    EINA_LIST_FOREACH(fdata.font_px_list, l, size_data)
1791      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1792                           _font_sizes_list_sel, size_data);
1793
1794    elm_list_go(size_list);
1795    edje_thaw();
1796    evas_event_thaw(evas);
1797 }
1798
1799 static void
1800 _fnames_list_unselect_cb(void *data       __UNUSED__,
1801                          Evas_Object     *obj,
1802                          void *event_info __UNUSED__)
1803 {
1804    Evas_Object *styles_list, *sizes_list, *win;
1805
1806    if (elm_list_selected_item_get(obj)) return;
1807
1808    win = elm_object_top_widget_get(obj);
1809
1810    styles_list = evas_object_data_get(win, "font_styles_list");
1811    ELM_LIST_DISABLE(styles_list);
1812
1813    sizes_list = evas_object_data_get(win, "font_sizes_list");
1814    ELM_LIST_DISABLE(sizes_list);
1815 }
1816
1817 static Eina_Bool
1818 _font_list_fill(const Eina_Hash *hash __UNUSED__,
1819                 const void *key       __UNUSED__,
1820                 void                 *data,
1821                 void                 *fdata)
1822 {
1823    Elm_Font_Properties *efp;
1824    Eina_List **flist;
1825
1826    flist = fdata;
1827    efp = data;
1828
1829    *flist = eina_list_append(*flist, efp->name);
1830
1831    return EINA_TRUE;
1832 }
1833
1834 static void
1835 _font_names_list_load(Evas_Object *flist)
1836 {
1837    Eina_List *l, *names_list = NULL;
1838    const char *font;
1839    Evas *evas;
1840
1841    evas = evas_object_evas_get(flist);
1842    evas_event_freeze(evas);
1843    edje_freeze();
1844
1845    eina_hash_foreach(fdata.font_hash, _font_list_fill, &names_list);
1846    names_list = eina_list_sort(names_list, eina_list_count(names_list),
1847                                _font_sort_cb);
1848
1849    EINA_LIST_FOREACH(names_list, l, font)
1850      elm_list_item_append(flist, font, NULL, NULL, _font_names_list_sel, NULL);
1851
1852    EINA_LIST_FREE(names_list, font) ;
1853
1854    evas_object_smart_callback_add(flist, "unselected",
1855                                   _fnames_list_unselect_cb, NULL);
1856
1857    elm_list_go(flist);
1858
1859    edje_thaw();
1860    evas_event_thaw(evas);
1861 }
1862
1863 static void
1864 _status_config_fonts(Evas_Object *win,
1865                      Evas_Object *pager)
1866 {
1867    Evas_Object *base, *fr, *li, *rc, *preview, *sp, *pd, *bt, *bx;
1868    char buf[PATH_MAX];
1869
1870    _fonts_data_fill(evas_object_evas_get(win));
1871
1872    base = elm_table_add(win);
1873    evas_object_size_hint_weight_set(base, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1874    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1875
1876    /* yeah, dummy rectangles are ugly as hell, but no good way yet of
1877       fixing sizes */
1878    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1879    evas_object_size_hint_weight_set(rc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1880    evas_object_size_hint_align_set(rc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1881    evas_object_size_hint_min_set(rc, 70, 170);
1882    elm_table_pack(base, rc, 1, 0, 1, 1);
1883
1884    fr = elm_frame_add(win);
1885    elm_object_text_set(fr, "Font Class");
1886    elm_table_pack(base, fr, 0, 0, 1, 2);
1887    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1888    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1889    evas_object_show(fr);
1890
1891    /* FIXME: no multiselection for this list, for now */
1892    li = elm_list_add(win);
1893    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1894    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1895    elm_frame_content_set(fr, li);
1896    evas_object_show(li);
1897
1898    evas_object_data_set(win, "font_classes_list", li);
1899    _font_classes_list_load(li);
1900
1901    fr = elm_frame_add(win);
1902    elm_object_text_set(fr, "Font");
1903    elm_table_pack(base, fr, 1, 0, 1, 2);
1904    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1905    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1906    evas_object_show(fr);
1907
1908    li = elm_list_add(win);
1909    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1910    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1911    elm_frame_content_set(fr, li);
1912    evas_object_show(li);
1913
1914    evas_object_data_set(win, "font_names_list", li);
1915    _font_names_list_load(li);
1916    ELM_LIST_DISABLE(li);
1917
1918    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1919    evas_object_size_hint_weight_set(rc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1920    evas_object_size_hint_align_set(rc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1921    evas_object_size_hint_min_set(rc, 70, 130);
1922    elm_table_pack(base, rc, 1, 2, 1, 1);
1923
1924    fr = elm_frame_add(win);
1925    elm_object_text_set(fr, "Style");
1926    elm_table_pack(base, fr, 0, 2, 1, 1);
1927    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1928    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1929    evas_object_show(fr);
1930    ELM_LIST_DISABLE(li);
1931
1932    li = elm_list_add(win);
1933    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1934    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1935    elm_frame_content_set(fr, li);
1936    evas_object_show(li);
1937
1938    evas_object_data_set(win, "font_styles_list", li);
1939    evas_object_smart_callback_add(li, "unselected", _fstyle_list_unselect_cb,
1940                                   NULL);
1941
1942    fr = elm_frame_add(win);
1943    elm_object_text_set(fr, "Size");
1944    elm_table_pack(base, fr, 1, 2, 1, 1);
1945    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1946    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1947    evas_object_show(fr);
1948
1949    li = elm_list_add(win);
1950    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1951    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1952    elm_frame_content_set(fr, li);
1953    evas_object_show(li);
1954
1955    evas_object_data_set(win, "font_sizes_list", li);
1956    _font_sizes_list_load(li);
1957    ELM_LIST_DISABLE(li);
1958
1959    bx = elm_box_add(win);
1960    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1961    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
1962    elm_table_pack(base, bx, 0, 3, 2, 1);
1963    evas_object_show(bx);
1964
1965    /* FIXME: what to do here? dedicated widget? some new entry API set? */
1966    snprintf(buf, sizeof(buf), "%s/objects/font_preview.edj", PACKAGE_DATA_DIR);
1967    preview = elm_layout_add(win);
1968    elm_layout_file_set(preview, buf, "font_preview");
1969    elm_object_text_part_set(preview, "elm.text", "Preview Text â€” æˆ‘真的会写中文");
1970    evas_object_size_hint_weight_set(preview, EVAS_HINT_EXPAND, 0.0);
1971    evas_object_size_hint_align_set(preview, EVAS_HINT_FILL, EVAS_HINT_FILL);
1972    evas_object_show(preview);
1973
1974    elm_box_pack_end(bx, preview);
1975    evas_object_data_set(win, "font_preview", elm_layout_edje_get(preview));
1976
1977    /////////////////////////////////////////////
1978    sp = elm_separator_add(win);
1979    elm_separator_horizontal_set(sp, EINA_TRUE);
1980    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
1981    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1982    elm_table_pack(base, sp, 0, 4, 2, 1);
1983    evas_object_show(sp);
1984
1985    pd = elm_frame_add(win);
1986    elm_object_style_set(pd, "pad_medium");
1987    evas_object_size_hint_weight_set(pd, EVAS_HINT_EXPAND, 0.0);
1988    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1989    elm_table_pack(base, pd, 0, 5, 2, 1);
1990    evas_object_show(pd);
1991
1992    bx = elm_box_add(win);
1993    elm_box_horizontal_set(bx, EINA_TRUE);
1994    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1995    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
1996    evas_object_show(bx);
1997
1998    bt = elm_button_add(win);
1999    evas_object_smart_callback_add(bt, "clicked", _font_overlay_set_all, win);
2000    elm_object_text_set(bt, "Set to All");
2001    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2002    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2003    elm_box_pack_end(bx, bt);
2004    evas_object_show(bt);
2005
2006    bt = elm_button_add(win);
2007    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset, win);
2008    elm_object_text_set(bt, "Reset");
2009    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2010    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2011    elm_box_pack_end(bx, bt);
2012    evas_object_show(bt);
2013
2014    bt = elm_button_add(win);
2015    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset_all, win);
2016    elm_object_text_set(bt, "Reset All");
2017    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2018    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2019    elm_box_pack_end(bx, bt);
2020    evas_object_show(bt);
2021
2022    bt = elm_button_add(win);
2023    evas_object_smart_callback_add(bt, "clicked", _font_overlay_change, win);
2024    elm_object_text_set(bt, "Apply");
2025    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2026    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2027    elm_box_pack_end(bx, bt);
2028    evas_object_show(bt);
2029
2030    elm_frame_content_set(pd, bx);
2031
2032    evas_object_data_set(win, "fonts", base);
2033
2034    elm_pager_content_push(pager, base);
2035 }
2036
2037 static void
2038 _engines_list_item_del_cb(void            *data,
2039                           Evas_Object *obj __UNUSED__,
2040                           void *event_info __UNUSED__)
2041 {
2042    free(data);
2043 }
2044
2045 static void
2046 _profiles_list_item_del_cb(void            *data,
2047                            Evas_Object *obj __UNUSED__,
2048                            void *event_info __UNUSED__)
2049 {
2050    free(data);
2051 }
2052
2053 static void
2054 _profiles_list_selected_cb(void            *data,
2055                            Evas_Object     *obj,
2056                            void *event_info __UNUSED__)
2057 {
2058    const char *cur_profile = NULL;
2059    const char *sel_profile, *pdir;
2060    Eina_Bool cur_selected;
2061    const char *prof_name;
2062    char buf[PATH_MAX];
2063    Evas_Object *en;
2064 #ifdef ELM_EFREET
2065    Efreet_Desktop *desk = NULL;
2066 #endif
2067
2068    sel_profile = data;
2069    if (!sel_profile)
2070      return;
2071
2072    cur_profile = elm_profile_current_get();
2073    cur_selected = !strcmp(cur_profile, sel_profile);
2074
2075    pdir = elm_profile_dir_get(sel_profile, EINA_FALSE);
2076 #ifdef ELM_EFREET
2077    snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2078    desk = efreet_desktop_new(buf);
2079    if ((desk) && (desk->name)) prof_name = desk->name;
2080    else
2081 #endif
2082    prof_name = cur_profile;
2083
2084    if (!pdir)
2085      elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2086                              EINA_TRUE);
2087    else
2088      {
2089         elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2090                                 EINA_TRUE);
2091         elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2092                                 EINA_FALSE);
2093         elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2094                                 EINA_FALSE);
2095         elm_profile_dir_free(pdir);
2096      }
2097
2098    snprintf(buf, sizeof(buf), "<hilight>Selected profile: %s</><br>",
2099             prof_name);
2100    elm_object_text_set(evas_object_data_get(obj, "prof_name_lbl"), buf);
2101
2102    en = evas_object_data_get(obj, "prof_desc_entry");
2103 #ifdef ELM_EFREET
2104    if (desk) elm_entry_entry_set(en, desk->comment);
2105    else
2106 #endif
2107    elm_entry_entry_set(en, "Unknown");
2108
2109 #ifdef ELM_EFREET
2110    if (desk) efreet_desktop_free(desk);
2111 #endif
2112 }
2113
2114 static void
2115 _profiles_list_fill(Evas_Object *l_widget,
2116                     Eina_List   *p_names)
2117 {
2118    const char *cur_profile = NULL;
2119    const char *profile;
2120    void *sel_it = NULL;
2121    Eina_List *l;
2122
2123    if (!p_names)
2124      return;
2125
2126    elm_list_clear(l_widget);
2127
2128    cur_profile = elm_profile_current_get();
2129
2130    EINA_LIST_FOREACH(p_names, l, profile)
2131      {
2132 #ifdef ELM_EFREET
2133         Efreet_Desktop *desk = NULL;
2134 #endif
2135         const char *label, *ext, *pdir;
2136         char buf[PATH_MAX];
2137         Elm_List_Item *it;
2138         Evas_Object *ic;
2139
2140         pdir = elm_profile_dir_get(profile, EINA_FALSE);
2141         label = profile;
2142
2143 #ifdef ELM_EFREET
2144         snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2145         desk = efreet_desktop_new(buf);
2146         if ((desk) && (desk->name)) label = desk->name;
2147 #endif
2148
2149         buf[0] = 0;
2150         if (pdir) snprintf(buf, sizeof(buf), "%s/icon.edj", pdir);
2151 #ifdef ELM_EFREET
2152         if ((desk) && (desk->icon) && (pdir))
2153           snprintf(buf, sizeof(buf), "%s/%s", pdir, desk->icon);
2154 #endif
2155         ic = elm_icon_add(l_widget);
2156         ext = strrchr(buf, '.');
2157         if (ext)
2158           {
2159              if (!strcmp(ext, ".edj")) elm_icon_file_set(ic, buf, "icon");
2160              else elm_icon_file_set(ic, buf, NULL);
2161           }
2162
2163         evas_object_size_hint_aspect_set(ic, EVAS_ASPECT_CONTROL_VERTICAL,
2164                                          1, 1);
2165         evas_object_show(ic);
2166
2167         it = elm_list_item_append(l_widget, label, ic, NULL,
2168                                   _profiles_list_selected_cb, strdup(profile));
2169         elm_list_item_del_cb_set(it, _profiles_list_item_del_cb);
2170         if (cur_profile && !strcmp(profile, cur_profile))
2171           sel_it = it;
2172
2173         elm_profile_dir_free(pdir);
2174
2175 #ifdef ELM_EFREET
2176         if (desk) efreet_desktop_free(desk);
2177 #endif
2178      }
2179
2180    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2181    elm_list_go(l_widget);
2182 }
2183
2184 static void
2185 _profiles_list_unselect_cb(void *data       __UNUSED__,
2186                            Evas_Object     *obj,
2187                            void *event_info __UNUSED__)
2188 {
2189    if (elm_list_selected_item_get(obj)) return;
2190    elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2191                            EINA_TRUE);
2192    elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2193                            EINA_TRUE);
2194    elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2195                            EINA_TRUE);
2196 }
2197
2198 static void
2199 _status_config_profiles(Evas_Object *win,
2200                         Evas_Object *pager)
2201 {
2202    Evas_Object *li, *bx, *fr_bx1, *fr_bx2, *btn_bx, *fr, *lb, *en, *sp, *pd,
2203    *bt;
2204    Eina_List *profs;
2205    Evas *evas;
2206
2207    bx = elm_box_add(win);
2208    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2209    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2210
2211    fr_bx1 = elm_box_add(win);
2212    evas_object_size_hint_weight_set(fr_bx1, EVAS_HINT_EXPAND,
2213                                     EVAS_HINT_EXPAND);
2214    evas_object_size_hint_align_set(fr_bx1, EVAS_HINT_FILL, EVAS_HINT_FILL);
2215    elm_box_homogeneous_set(fr_bx1, EINA_TRUE);
2216    evas_object_show(fr_bx1);
2217
2218    fr_bx2 = elm_box_add(win);
2219    evas_object_size_hint_weight_set(fr_bx2, EVAS_HINT_EXPAND,
2220                                     EVAS_HINT_EXPAND);
2221    evas_object_size_hint_align_set(fr_bx2, EVAS_HINT_FILL, EVAS_HINT_FILL);
2222    evas_object_show(fr_bx2);
2223
2224    fr = elm_frame_add(win);
2225    elm_object_text_set(fr, "Available Profiles");
2226    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2227    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2228    elm_frame_content_set(fr, fr_bx1);
2229    elm_box_pack_end(bx, fr);
2230    evas_object_show(fr);
2231
2232    li = elm_list_add(win);
2233    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2234    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2235    evas_object_smart_callback_add(li, "unselected", _profiles_list_unselect_cb,
2236                                   NULL);
2237
2238    profs = elm_profile_list_get();
2239
2240    evas_object_show(li);
2241    elm_box_pack_end(fr_bx2, li);
2242
2243    lb = elm_label_add(win);
2244    evas_object_size_hint_weight_set(lb, EVAS_HINT_EXPAND, 0.0);
2245    evas_object_size_hint_align_set(lb, EVAS_HINT_FILL, 0.5);
2246
2247    evas_object_show(lb);
2248
2249    en = elm_entry_add(win);
2250    elm_entry_scrollable_set(en, EINA_TRUE);
2251    elm_entry_editable_set(en, EINA_FALSE);
2252    evas_object_size_hint_weight_set(en, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2253    evas_object_size_hint_align_set(en, EVAS_HINT_FILL, EVAS_HINT_FILL);
2254    evas_object_show(en);
2255
2256    evas_object_data_set(li, "prof_name_lbl", lb);
2257    evas_object_data_set(li, "prof_desc_entry", en);
2258
2259    elm_box_pack_end(fr_bx2, lb);
2260    elm_box_pack_end(fr_bx1, fr_bx2);
2261    elm_box_pack_end(fr_bx1, en);
2262
2263    /////////////////////////////////////////////
2264    sp = elm_separator_add(win);
2265    elm_separator_horizontal_set(sp, EINA_TRUE);
2266    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2267    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2268    elm_box_pack_end(bx, sp);
2269    evas_object_show(sp);
2270
2271    pd = elm_frame_add(win);
2272    elm_object_style_set(pd, "pad_medium");
2273    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
2274    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2275    elm_box_pack_end(bx, pd);
2276    evas_object_show(pd);
2277
2278    btn_bx = elm_box_add(win);
2279    elm_box_horizontal_set(btn_bx, EINA_TRUE);
2280    evas_object_size_hint_weight_set(btn_bx, EVAS_HINT_EXPAND,
2281                                     EVAS_HINT_EXPAND);
2282    evas_object_size_hint_align_set(btn_bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2283    evas_object_show(btn_bx);
2284
2285    bt = elm_button_add(win);
2286    evas_object_smart_callback_add(bt, "clicked", _profile_use, li);
2287    elm_object_text_set(bt, "Use");
2288    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2289    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2290    elm_box_pack_end(btn_bx, bt);
2291    evas_object_show(bt);
2292
2293    evas_object_data_set(li, "prof_use_btn", bt);
2294
2295    bt = elm_button_add(win);
2296    evas_object_smart_callback_add(bt, "clicked", _btn_todo, NULL); /* TODO */
2297    elm_object_text_set(bt, "Delete");
2298    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2299    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2300    elm_box_pack_end(btn_bx, bt);
2301    evas_object_show(bt);
2302
2303    evas_object_data_set(li, "prof_del_btn", bt);
2304
2305    bt = elm_button_add(win);
2306    evas_object_smart_callback_add(bt, "clicked", _profile_reset, li);
2307    elm_object_text_set(bt, "Reset");
2308    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2309    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2310    elm_box_pack_end(btn_bx, bt);
2311    evas_object_show(bt);
2312
2313    evas_object_data_set(li, "prof_reset_btn", bt);
2314
2315    bt = elm_button_add(win);
2316    evas_object_smart_callback_add(bt, "clicked", _btn_todo, NULL); /* TODO */
2317    elm_object_text_set(bt, "Add new");
2318    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2319    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2320    elm_box_pack_end(btn_bx, bt);
2321    evas_object_show(bt);
2322
2323    elm_frame_content_set(pd, btn_bx);
2324
2325    evas = evas_object_evas_get(li);
2326    evas_event_freeze(evas);
2327    edje_freeze();
2328
2329    _profiles_list_fill(li, profs);
2330
2331    elm_profile_list_free(profs);
2332
2333    edje_thaw();
2334    evas_event_thaw(evas);
2335
2336    evas_object_data_set(win, "profiles", bx);
2337    elm_pager_content_push(pager, bx);
2338 }
2339
2340 static void
2341 _status_config_scrolling(Evas_Object *win,
2342                          Evas_Object *pager)
2343 {
2344    Evas_Object *lb, *pd, *bx, *sl, *sp, *ck, *sc;
2345
2346    bx = elm_box_add(win);
2347    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
2348    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
2349
2350    sc = elm_scroller_add(win);
2351    evas_object_size_hint_weight_set(sc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2352    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
2353    elm_scroller_bounce_set(sc, EINA_FALSE, EINA_TRUE);
2354    evas_object_show(sc);
2355    elm_scroller_content_set(sc, bx);
2356
2357    ck = elm_check_add(win);
2358    elm_object_tooltip_text_set(ck, "Set whether scrollers should bounce<br>"
2359                                    "when they reach their viewport's edge<br>"
2360                                    "during a scroll");
2361    elm_object_text_set(ck, "Enable scroll bounce");
2362    evas_object_data_set(win, "scroll_bounce_check", ck);
2363    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2364    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2365    elm_check_state_set(ck, elm_scroll_bounce_enabled_get());
2366    elm_box_pack_end(bx, ck);
2367    evas_object_show(ck);
2368
2369    evas_object_smart_callback_add(ck, "changed", sb_change, NULL);
2370
2371    LABEL_FRAME_ADD("<hilight>Scroll bounce friction</>");
2372
2373    sl = elm_slider_add(win);
2374    elm_object_tooltip_text_set(sl, "This is the amount of inertia a <br>"
2375                                    "scroller will impose at bounce animations");
2376    evas_object_data_set(win, "bounce_friction_slider", sl);
2377    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2378    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2379    elm_slider_span_size_set(sl, 120);
2380    elm_slider_unit_format_set(sl, "%1.2f");
2381    elm_slider_indicator_format_set(sl, "%1.2f");
2382    elm_slider_min_max_set(sl, 0.0, 4.0);
2383    elm_slider_value_set(sl, elm_scroll_bounce_friction_get());
2384    elm_box_pack_end(bx, sl);
2385    evas_object_show(sl);
2386
2387    evas_object_smart_callback_add(sl, "changed", bf_round, NULL);
2388    evas_object_smart_callback_add(sl, "delay,changed", bf_change, NULL);
2389
2390    sp = elm_separator_add(win);
2391    elm_separator_horizontal_set(sp, EINA_TRUE);
2392    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2393    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2394    elm_box_pack_end(bx, sp);
2395    evas_object_show(sp);
2396
2397    ck = elm_check_add(win);
2398    elm_object_tooltip_text_set(ck, "Set whether scrollers should be<br>"
2399                                    "draggable from any point in their views");
2400    elm_object_text_set(ck, "Enable thumb scroll");
2401    evas_object_data_set(win, "thumbscroll_check", ck);
2402    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2403    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2404    elm_check_state_set(ck, elm_scroll_thumbscroll_enabled_get());
2405    elm_box_pack_end(bx, ck);
2406    evas_object_show(ck);
2407
2408    evas_object_smart_callback_add(ck, "changed", ts_change, NULL);
2409
2410    LABEL_FRAME_ADD("<hilight>Thumb scroll threshold</>");
2411
2412    sl = elm_slider_add(win);
2413    elm_object_tooltip_text_set(sl, "This is the number of pixels one should<br>"
2414                                    "travel while dragging a scroller's view<br>"
2415                                    "to actually trigger scrolling");
2416    evas_object_data_set(win, "thumbscroll_threshold_slider", sl);
2417    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2418    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2419    elm_slider_span_size_set(sl, 120);
2420    elm_slider_unit_format_set(sl, "%1.0f pixels");
2421    elm_slider_indicator_format_set(sl, "%1.0f");
2422    elm_slider_min_max_set(sl, 8.0, 50.0);
2423    elm_slider_value_set(sl, elm_scroll_thumbscroll_threshold_get());
2424    elm_box_pack_end(bx, sl);
2425    evas_object_show(sl);
2426
2427    evas_object_smart_callback_add(sl, "changed", tst_round, NULL);
2428    evas_object_smart_callback_add(sl, "delay,changed", tst_change, NULL);
2429
2430    LABEL_FRAME_ADD("<hilight>Thumb scroll momentum threshold</>");
2431
2432    sl = elm_slider_add(win);
2433    elm_object_tooltip_text_set(sl, "This is the minimum speed of mouse <br>"
2434                                    "cursor movement which will trigger<br>"
2435                                    "list self scrolling animation after a<br>"
2436                                    "mouse up event (pixels/second)");
2437    evas_object_data_set(win, "ts_momentum_threshold_slider", sl);
2438    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2439    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2440    elm_slider_span_size_set(sl, 120);
2441    elm_slider_unit_format_set(sl, "%1.0f pixels/s");
2442    elm_slider_indicator_format_set(sl, "%1.0f");
2443    elm_slider_min_max_set(sl, 10.0, 200.0);
2444    elm_slider_value_set(sl, elm_scroll_thumbscroll_momentum_threshold_get());
2445    elm_box_pack_end(bx, sl);
2446    evas_object_show(sl);
2447
2448    evas_object_smart_callback_add(sl, "changed", tsmt_round, NULL);
2449    evas_object_smart_callback_add(sl, "delay,changed", tsmt_change,
2450                                   NULL);
2451
2452    LABEL_FRAME_ADD("<hilight>Thumb scroll friction</>");
2453
2454    sl = elm_slider_add(win);
2455    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br>"
2456                                    "scroller will impose at self scrolling<br>"
2457                                    "animations");
2458    evas_object_data_set(win, "thumbscroll_friction_slider", sl);
2459    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2460    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2461    elm_slider_span_size_set(sl, 120);
2462    elm_slider_unit_format_set(sl, "%1.1f");
2463    elm_slider_indicator_format_set(sl, "%1.1f");
2464    elm_slider_min_max_set(sl, 0.0, 15.0);
2465    elm_slider_value_set(sl, elm_scroll_thumbscroll_friction_get());
2466    elm_box_pack_end(bx, sl);
2467    evas_object_show(sl);
2468
2469    evas_object_smart_callback_add(sl, "changed", tsf_round, NULL);
2470    evas_object_smart_callback_add(sl, "delay,changed", tsf_change, NULL);
2471
2472    LABEL_FRAME_ADD("<hilight>Thumb scroll border friction</>");
2473
2474    sl = elm_slider_add(win);
2475    elm_object_tooltip_text_set(sl, "This is the amount of lag between your<br>"
2476                                    "actual mouse cursor dragging movement<br>"
2477                                    "and a scroller's view movement itself,<br>"
2478                                    "while pushing it into bounce state<br>"
2479                                    "manually");
2480    evas_object_data_set(win, "ts_border_friction_slider", sl);
2481    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2482    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2483    elm_slider_span_size_set(sl, 120);
2484    elm_slider_unit_format_set(sl, "%1.2f");
2485    elm_slider_indicator_format_set(sl, "%1.2f");
2486    elm_slider_min_max_set(sl, 0.0, 1.0);
2487    elm_slider_value_set(sl, elm_scroll_thumbscroll_border_friction_get());
2488    elm_box_pack_end(bx, sl);
2489    evas_object_show(sl);
2490
2491    evas_object_smart_callback_add(sl, "changed", tsbf_round, NULL);
2492    evas_object_smart_callback_add(sl, "delay,changed", tsbf_change, NULL);
2493
2494    sp = elm_separator_add(win);
2495    elm_separator_horizontal_set(sp, EINA_TRUE);
2496    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2497    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2498    elm_box_pack_end(bx, sp);
2499    evas_object_show(sp);
2500
2501    LABEL_FRAME_ADD("<hilight>Page scroll friction</>");
2502
2503    sl = elm_slider_add(win);
2504    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br>"
2505                                    "paged scroller will impose at<br>"
2506                                    "page fitting animations");
2507    evas_object_data_set(win, "page_scroll_friction_slider", sl);
2508    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2509    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2510    elm_slider_span_size_set(sl, 120);
2511    elm_slider_unit_format_set(sl, "%1.1f");
2512    elm_slider_indicator_format_set(sl, "%1.1f");
2513    elm_slider_min_max_set(sl, 0.0, 5.0);
2514    elm_slider_value_set(sl, elm_scroll_page_scroll_friction_get());
2515    elm_box_pack_end(bx, sl);
2516    evas_object_show(sl);
2517
2518    evas_object_smart_callback_add(sl, "changed", ps_round, NULL);
2519    evas_object_smart_callback_add(sl, "delay,changed", ps_change, NULL);
2520
2521    LABEL_FRAME_ADD("<hilight>Bring in scroll friction</>");
2522
2523    sl = elm_slider_add(win);
2524    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br>"
2525                                    "scroller will impose at region bring<br>"
2526                                    "animations");
2527    evas_object_data_set(win, "bring_in_scroll_friction_slider", sl);
2528    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2529    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2530    elm_slider_span_size_set(sl, 120);
2531    elm_slider_unit_format_set(sl, "%1.1f");
2532    elm_slider_indicator_format_set(sl, "%1.1f");
2533    elm_slider_min_max_set(sl, 0.0, 5.0);
2534    elm_slider_value_set(sl, elm_scroll_bring_in_scroll_friction_get());
2535    elm_box_pack_end(bx, sl);
2536    evas_object_show(sl);
2537
2538    evas_object_smart_callback_add(sl, "changed", bis_round, NULL);
2539    evas_object_smart_callback_add(sl, "delay,changed", bis_change, NULL);
2540
2541    LABEL_FRAME_ADD("<hilight>Zoom scroll friction</>");
2542
2543    sl = elm_slider_add(win);
2544    elm_object_tooltip_text_set(sl, "This is the amount of inertia<br>"
2545                                    "scrollers will impose at animations<br>"
2546                                    "triggered by Elementary widgets'<br>"
2547                                    "zooming API");
2548    evas_object_data_set(win, "zoom_scroll_friction_slider", sl);
2549    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2550    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2551    elm_slider_span_size_set(sl, 120);
2552    elm_slider_unit_format_set(sl, "%1.1f");
2553    elm_slider_indicator_format_set(sl, "%1.1f");
2554    elm_slider_min_max_set(sl, 0.0, 5.0);
2555    elm_slider_value_set(sl, elm_scroll_zoom_friction_get());
2556    elm_box_pack_end(bx, sl);
2557    evas_object_show(sl);
2558
2559    evas_object_smart_callback_add(sl, "changed", zf_round, NULL);
2560    evas_object_smart_callback_add(sl, "delay,changed", zf_change, NULL);
2561
2562    evas_object_data_set(win, "scrolling", sc);
2563
2564    elm_pager_content_push(pager, sc);
2565 }
2566
2567 static char *
2568 _engine_name_prettify(const char *engine)
2569 {
2570    char *ret, *ptr;
2571
2572    ret = strdup(engine);
2573    ret[0] -= 0x20;
2574
2575    while ((ptr = strpbrk(ret, "_")))
2576      {
2577         *ptr = ' ';
2578      }
2579
2580    return ret;
2581 }
2582
2583 /* FIXME! ideally, we would trim elm_config.c's _elm_engines list at
2584    build time, making a getter for is as in ecore-evas. */
2585 static Eina_Bool
2586 _elm_engine_supported(const char *engine)
2587 {
2588    const char *engines[] = {
2589       "software_x11",
2590       "fb",
2591       "directfb",
2592       "software_16_x11",
2593       "software_8_x11",
2594       "xrender_x11",
2595       "opengl_x11",
2596       "software_gdi",
2597       "software_16_wince_gdi",
2598       "sdl",
2599       "software_16_sdl",
2600       "opengl_sdl",
2601       NULL
2602    };
2603
2604    unsigned int i;
2605
2606    for (i = 0; engines[i]; i++)
2607      {
2608 #define ENGINE_COMPARE(name) (!strcmp(engines[i], name))
2609         if (ENGINE_COMPARE(engine))
2610           return EINA_TRUE;
2611 #undef ENGINE_COMPARE
2612      }
2613
2614    return EINA_FALSE;
2615 }
2616
2617 static void
2618 _engines_list_fill(Evas_Object *l_widget,
2619                    Eina_List   *e_names)
2620 {
2621    const char *engine, *cur_engine;
2622    void *sel_it = NULL;
2623    Eina_List *l;
2624
2625    if (!e_names)
2626      return;
2627
2628    cur_engine = elm_engine_current_get();
2629
2630    EINA_LIST_FOREACH(e_names, l, engine)
2631      {
2632         const char *label;
2633         Elm_List_Item *it;
2634
2635         if (!_elm_engine_supported(engine))
2636           continue;
2637
2638         label = _engine_name_prettify(engine);
2639
2640         it = elm_list_item_append(l_widget, label, NULL, NULL, NULL,
2641                                   strdup(engine));
2642         elm_list_item_del_cb_set(it, _engines_list_item_del_cb);
2643         free((void *)label);
2644
2645         if (!strcmp(cur_engine, engine))
2646           sel_it = it;
2647      }
2648
2649    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2650    elm_list_go(l_widget);
2651 }
2652
2653 static void
2654 _status_config_rendering(Evas_Object *win,
2655                          Evas_Object *pager)
2656 {
2657    Evas_Object *li, *bx, *fr, *sp, *pd, *bt;
2658    Eina_List *engines;
2659
2660    bx = elm_box_add(win);
2661    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2662    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2663
2664    fr = elm_frame_add(win);
2665    elm_object_text_set(fr, "Available Engines");
2666    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2667    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2668    elm_box_pack_end(bx, fr);
2669    evas_object_show(fr);
2670
2671    li = elm_list_add(win);
2672    elm_frame_content_set(fr, li);
2673    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2674    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2675
2676    engines = ecore_evas_engines_get();
2677    _engines_list_fill(li, engines);
2678    ecore_evas_engines_free(engines);
2679
2680    evas_object_show(li);
2681    evas_object_data_set(win, "engines_list", li);
2682
2683    /////////////////////////////////////////////
2684    sp = elm_separator_add(win);
2685    elm_separator_horizontal_set(sp, EINA_TRUE);
2686    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2687    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2688    elm_box_pack_end(bx, sp);
2689    evas_object_show(sp);
2690
2691    pd = elm_frame_add(win);
2692    elm_object_style_set(pd, "pad_medium");
2693    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
2694    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2695    elm_box_pack_end(bx, pd);
2696    evas_object_show(pd);
2697
2698    bt = elm_button_add(win);
2699    evas_object_smart_callback_add(bt, "clicked", _engine_use, li);
2700    elm_object_text_set(bt, "Use Engine");
2701    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2702    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2703    elm_frame_content_set(pd, bt);
2704    evas_object_show(bt);
2705
2706    evas_object_data_set(win, "rendering", bx);
2707    elm_pager_content_push(pager, bx);
2708 }
2709
2710 static void
2711 _status_config_caches(Evas_Object *win,
2712                       Evas_Object *pager)
2713 {
2714    Evas_Object *lb, *pd, *bx, *sl, *sp, *ck;
2715
2716    bx = elm_box_add(win);
2717    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
2718    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
2719
2720    LABEL_FRAME_ADD("<hilight>Cache Flush Interval (8 ticks pre second)</>");
2721
2722    sl = elm_slider_add(win);
2723    evas_object_data_set(win, "cache_flush_interval_slider", sl);
2724    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2725    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2726    elm_slider_span_size_set(sl, 120);
2727    elm_slider_unit_format_set(sl, "%1.0f ticks");
2728    elm_slider_indicator_format_set(sl, "%1.0f");
2729    elm_slider_min_max_set(sl, 8.0, 4096.0);
2730    elm_slider_value_set(sl, elm_cache_flush_interval_get());
2731    elm_object_disabled_set(sl, !elm_cache_flush_enabled_get());
2732
2733    ck = elm_check_add(win);
2734    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2735    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2736    elm_object_text_set(ck, "Enable Flushing");
2737    elm_check_state_set(ck, elm_cache_flush_enabled_get());
2738    evas_object_smart_callback_add(ck, "changed", cf_enable, sl);
2739    elm_box_pack_end(bx, ck);
2740    evas_object_show(ck);
2741
2742    elm_box_pack_end(bx, sl);
2743    evas_object_show(sl);
2744
2745    evas_object_smart_callback_add(sl, "changed", cf_round, NULL);
2746    evas_object_smart_callback_add(sl, "delay,changed", cf_change, NULL);
2747
2748    sp = elm_separator_add(win);
2749    elm_separator_horizontal_set(sp, 1);
2750    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2751    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2752    elm_box_pack_end(bx, sp);
2753    evas_object_show(sp);
2754
2755    LABEL_FRAME_ADD("<hilight>Font Cache Size</>");
2756
2757    sl = elm_slider_add(win);
2758    evas_object_data_set(win, "font_cache_slider", sl);
2759    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2760    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2761    elm_slider_span_size_set(sl, 120);
2762    elm_slider_unit_format_set(sl, "%1.1f MB");
2763    elm_slider_indicator_format_set(sl, "%1.1f");
2764    elm_slider_min_max_set(sl, 0.0, 4.0);
2765    elm_slider_value_set(sl, (double)elm_font_cache_get() / 1024.0);
2766    elm_box_pack_end(bx, sl);
2767    evas_object_show(sl);
2768
2769    evas_object_smart_callback_add(sl, "changed", fc_round, NULL);
2770    evas_object_smart_callback_add(sl, "delay,changed", fc_change, NULL);
2771
2772    sp = elm_separator_add(win);
2773    elm_separator_horizontal_set(sp, 1);
2774    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2775    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2776    elm_box_pack_end(bx, sp);
2777    evas_object_show(sp);
2778
2779    LABEL_FRAME_ADD("<hilight>Image Cache Size</>");
2780
2781    sl = elm_slider_add(win);
2782    evas_object_data_set(win, "image_cache_slider", sl);
2783    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2784    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2785    elm_slider_span_size_set(sl, 120);
2786    elm_slider_unit_format_set(sl, "%1.0f MB");
2787    elm_slider_indicator_format_set(sl, "%1.0f");
2788    elm_slider_min_max_set(sl, 0, 32);
2789    elm_slider_value_set(sl, (double)elm_image_cache_get() / 1024.0);
2790    elm_box_pack_end(bx, sl);
2791    evas_object_show(sl);
2792
2793    evas_object_smart_callback_add(sl, "changed", ic_round, NULL);
2794    evas_object_smart_callback_add(sl, "delay,changed", ic_change, NULL);
2795
2796    sp = elm_separator_add(win);
2797    elm_separator_horizontal_set(sp, 1);
2798    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2799    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2800    elm_box_pack_end(bx, sp);
2801    evas_object_show(sp);
2802
2803    LABEL_FRAME_ADD("<hilight>Number of Edje Files to Cache</>");
2804
2805    sl = elm_slider_add(win);
2806    evas_object_data_set(win, "edje_file_cache_slider", sl);
2807    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2808    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2809    elm_slider_span_size_set(sl, 120);
2810    elm_slider_unit_format_set(sl, "%1.0f files");
2811    elm_slider_indicator_format_set(sl, "%1.0f");
2812    elm_slider_min_max_set(sl, 0, 32);
2813    elm_slider_value_set(sl, elm_edje_file_cache_get());
2814    elm_box_pack_end(bx, sl);
2815    evas_object_show(sl);
2816
2817    evas_object_smart_callback_add(sl, "changed", efc_round, NULL);
2818    evas_object_smart_callback_add(sl, "delay,changed", efc_change, NULL);
2819
2820    sp = elm_separator_add(win);
2821    elm_separator_horizontal_set(sp, 1);
2822    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2823    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2824    elm_box_pack_end(bx, sp);
2825    evas_object_show(sp);
2826
2827    LABEL_FRAME_ADD("<hilight>Number of Edje Collections to Cache</>");
2828
2829    sl = elm_slider_add(win);
2830    evas_object_data_set(win, "edje_collection_cache_slider", sl);
2831    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2832    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2833    elm_slider_span_size_set(sl, 120);
2834    elm_slider_unit_format_set(sl, "%1.0f collections");
2835    elm_slider_indicator_format_set(sl, "%1.0f");
2836    elm_slider_min_max_set(sl, 0, 128);
2837    elm_slider_value_set(sl, elm_edje_collection_cache_get());
2838    elm_box_pack_end(bx, sl);
2839    evas_object_show(sl);
2840
2841    evas_object_smart_callback_add(sl, "changed", ecc_round, NULL);
2842    evas_object_smart_callback_add(sl, "delay,changed", ecc_change, NULL);
2843
2844    evas_object_data_set(win, "caches", bx);
2845
2846    elm_pager_content_push(pager, bx);
2847 }
2848
2849 static void
2850 _status_config_full(Evas_Object *win,
2851                     Evas_Object *bx0)
2852 {
2853    Evas_Object *tb, *pager;
2854    Elm_Toolbar_Item *sizing, *it;
2855
2856    tb = elm_toolbar_add(win);
2857    elm_toolbar_menu_parent_set(tb, win);
2858    elm_toolbar_homogeneous_set(tb, 0);
2859    evas_object_size_hint_weight_set(tb, 1.0, 0.0);
2860    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
2861
2862    sizing = elm_toolbar_item_append(tb, "zoom-fit-best", "Sizing",
2863                                     _cf_sizing, win);
2864    elm_toolbar_item_priority_set(sizing, 100);
2865
2866    it = elm_toolbar_item_append(tb, "preferences-desktop-theme", "Theme",
2867                                 _cf_themes, win);
2868    elm_toolbar_item_priority_set(it, 90);
2869
2870    elm_toolbar_item_append(tb, "preferences-desktop-font", "Fonts",
2871                            _cf_fonts, win);
2872
2873    it = elm_toolbar_item_append(tb, "system-users", "Profiles",
2874                                 _cf_profiles, win);
2875    elm_toolbar_item_priority_set(it, 90);
2876
2877    elm_toolbar_item_append(tb, "system-run", "Scrolling", _cf_scrolling, win);
2878    elm_toolbar_item_append(tb, "video-display", "Rendering",
2879                            _cf_rendering, win);
2880    elm_toolbar_item_append(tb, "appointment-new", "Caches", _cf_caches, win);
2881
2882    elm_box_pack_end(bx0, tb);
2883    evas_object_show(tb);
2884
2885    pager = elm_pager_add(win);
2886    evas_object_size_hint_align_set(pager, EVAS_HINT_FILL, EVAS_HINT_FILL);
2887    evas_object_size_hint_weight_set(pager, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2888    evas_object_data_set(win, "pager", pager);
2889
2890    _status_config_themes(win, pager);
2891    _status_config_fonts(win, pager);
2892    _status_config_profiles(win, pager);
2893    _status_config_rendering(win, pager);
2894    _status_config_scrolling(win, pager);
2895    _status_config_caches(win, pager);
2896    _status_config_sizing(win, pager);
2897
2898    // FIXME uncomment after flip style fix, please
2899    //elm_object_style_set(pager, "flip");
2900    elm_toolbar_item_selected_set(sizing, EINA_TRUE);
2901    elm_box_pack_end(bx0, pager);
2902    evas_object_show(pager);
2903 }
2904
2905 static void
2906 status_win(void)
2907 {
2908    Evas_Object *win, *bg, *bx0;
2909
2910    win = elm_win_add(NULL, "main", ELM_WIN_BASIC);
2911    elm_win_title_set(win, "Elementary Config");
2912
2913    evas_object_smart_callback_add(win, "delete,request", config_exit, NULL);
2914    bg = elm_bg_add(win);
2915    evas_object_size_hint_weight_set(bg, 1.0, 1.0);
2916    elm_win_resize_object_add(win, bg);
2917    evas_object_show(bg);
2918
2919    bx0 = elm_box_add(win);
2920    evas_object_size_hint_weight_set(bx0, 1.0, 1.0);
2921    elm_win_resize_object_add(win, bx0);
2922    evas_object_show(bx0);
2923
2924    if (!interactive) _status_basic(win, bx0);
2925    else if (0)
2926      _status_config(win, bx0);
2927    else _status_config_full(win, bx0);
2928
2929    evas_object_resize(win, 320, 480);
2930    evas_object_show(win);
2931 }
2932
2933 static Eina_Bool
2934 _exit_timer(void *data __UNUSED__)
2935 {
2936    elm_exit();
2937    return ECORE_CALLBACK_CANCEL;
2938 }
2939
2940 /* this is your elementary main function - it MUST be called IMMEDIATELY
2941  * after elm_init() and MUST be passed argc and argv, and MUST be called
2942  * elm_main and not be static - must be a visible symbol with EAPI infront */
2943 EAPI int
2944 elm_main(int    argc,
2945          char **argv)
2946 {
2947    int i;
2948
2949    elm_app_info_set(elm_main, "elementary", "images/logo.png");
2950    elm_app_compile_bin_dir_set(PACKAGE_BIN_DIR);
2951    elm_app_compile_data_dir_set(PACKAGE_DATA_DIR);
2952
2953    for (i = 1; i < argc; i++)
2954      {
2955         if (!strcmp(argv[i], "-h"))
2956           {
2957              printf("Usage:\n"
2958                     "  -h                This help\n"
2959                     "  -q                Quiet mode (dont show window)\n"
2960                     "  -t THEME          Set theme to THEME (ELM_THEME spec)\n"
2961                     "  -f SIZE           Set finger size to SIZE pixels\n"
2962                     "  -s SCALE          Set scale factor to SCALE\n"
2963                     );
2964           }
2965         else if (!strcmp(argv[i], "-q"))
2966           {
2967              quiet = 1;
2968              interactive = 0;
2969           }
2970         else if ((!strcmp(argv[i], "-t")) && (i < argc - 1))
2971           {
2972              i++;
2973              theme_set = argv[i];
2974              interactive = 0;
2975           }
2976         else if ((!strcmp(argv[i], "-f")) && (i < argc - 1))
2977           {
2978              i++;
2979              finger_size_set = argv[i];
2980              interactive = 0;
2981           }
2982         else if ((!strcmp(argv[i], "-s")) && (i < argc - 1))
2983           {
2984              i++;
2985              scale_set = argv[i];
2986              interactive = 0;
2987           }
2988      }
2989    /* put here any init code specific to this app like parsing args, etc. */
2990    if (!quiet)
2991      {
2992 #ifdef ELM_EFREET
2993         elm_need_efreet();
2994 #endif
2995         status_win(); /* create main window */
2996         if (!interactive)
2997           ecore_timer_add(2.0, _exit_timer, NULL);
2998      }
2999    if (!interactive)
3000      {
3001         if (theme_set)
3002           {
3003              elm_theme_all_set(theme_set);
3004           }
3005         if (finger_size_set)
3006           {
3007              elm_finger_size_all_set(atoi(finger_size_set));
3008           }
3009         if (scale_set)
3010           {
3011              elm_scale_all_set(atof(scale_set));
3012           }
3013         if (quiet)
3014           {
3015              elm_exit();
3016           }
3017      }
3018    elm_run(); /* and run the program now and handle all events, etc. */
3019    /* if the mainloop that elm_run() runs exists, we exit the app */
3020    elm_shutdown(); /* clean up and shut down */
3021    /* exit code */
3022    return 0;
3023 }
3024
3025 #endif
3026 /* All emelentary apps should use this. Put it right after elm_main() */
3027 ELM_MAIN()