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 Theme *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_label_label_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_bounce_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_frame_label_set(fr, "Information");
 554    elm_box_pack_end(bx0, fr);
 555    evas_object_show(fr);
 556
 557    lb = elm_label_add(win);
 558    elm_label_label_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_frame_label_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    char *newth;
1067    Theme *t = tsel;
1068
1069    if (!t) return;
1070    defth = elm_theme_get(NULL);
1071    newth = malloc(strlen(defth) + 1 + strlen(t->name) + 1);
1072    if (newth)
1073      {
1074         char *rest;
1075
1076         newth[0] = 0;
1077         rest = strchr(defth, ':');
1078         if (!rest)
1079           strcpy(newth, t->name);
1080         else
1081           {
1082              strcpy(newth, t->name);
1083              strcat(newth, rest);
1084           }
1085         elm_theme_all_set(newth);
1086         free(newth);
1087      }
1088 }
1089
1090 static void
1091 _theme_sel(void            *data,
1092            Evas_Object     *obj,
1093            void *event_info __UNUSED__)
1094 {
1095    Theme *t = data;
1096    Evas_Object *win = elm_object_top_widget_get(obj);
1097    Evas_Object *sample = evas_object_data_get(win, "theme_preview");
1098    Elm_Theme *th;
1099    const char *defth;
1100    char *newth;
1101
1102    tsel = t;
1103    defth = elm_theme_get(NULL);
1104    newth = malloc(strlen(defth) + 1 + strlen(t->name) + 1);
1105    th = elm_theme_new();
1106    if (newth)
1107      {
1108         char *rest;
1109
1110         newth[0] = 0;
1111         rest = strchr(defth, ':');
1112         if (!rest)
1113           strcpy(newth, t->name);
1114         else
1115           {
1116              strcpy(newth, t->name);
1117              strcat(newth, rest);
1118           }
1119         elm_theme_set(th, newth);
1120         free(newth);
1121      }
1122    elm_object_theme_set(sample, th);
1123    elm_theme_free(th);
1124 }
1125
1126 /*static void
1127    _theme_browse(void *data, Evas_Object *obj, void *event_info)
1128    {
1129    printf("not implemented\n");
1130    }*/
1131
1132 static void
1133 _status_config_sizing(Evas_Object *win,
1134                       Evas_Object *pager)
1135 {
1136    Evas_Object *lb, *pd, *bx, *sl, *sp;
1137
1138    bx = elm_box_add(win);
1139    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
1140    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
1141
1142    LABEL_FRAME_ADD("<hilight>Scale</>");
1143
1144    sl = elm_slider_add(win);
1145    evas_object_data_set(win, "scale_slider", sl);
1146    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1147    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1148    elm_slider_span_size_set(sl, 120);
1149    elm_slider_unit_format_set(sl, "%1.2f");
1150    elm_slider_indicator_format_set(sl, "%1.2f");
1151    elm_slider_min_max_set(sl, 0.25, 5.0);
1152    elm_slider_value_set(sl, elm_scale_get());
1153    elm_box_pack_end(bx, sl);
1154    evas_object_show(sl);
1155
1156    evas_object_smart_callback_add(sl, "changed", sc_round, NULL);
1157    evas_object_smart_callback_add(sl, "delay,changed", sc_change, NULL);
1158
1159    sp = elm_separator_add(win);
1160    elm_separator_horizontal_set(sp, 1);
1161    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
1162    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1163    elm_box_pack_end(bx, sp);
1164    evas_object_show(sp);
1165
1166    LABEL_FRAME_ADD("<hilight>Finger Size</><br>");
1167
1168    sl = elm_slider_add(win);
1169    evas_object_data_set(win, "fs_slider", sl);
1170    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1171    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1172    elm_slider_span_size_set(sl, 120);
1173    elm_slider_unit_format_set(sl, "%1.0f");
1174    elm_slider_indicator_format_set(sl, "%1.0f");
1175    elm_slider_min_max_set(sl, 5, 200);
1176    elm_slider_value_set(sl, elm_finger_size_get());
1177    elm_box_pack_end(bx, sl);
1178    evas_object_show(sl);
1179
1180    evas_object_smart_callback_add(sl, "changed", fs_round, NULL);
1181    evas_object_smart_callback_add(sl, "delay,changed", fs_change, NULL);
1182
1183    evas_object_data_set(win, "sizing", bx);
1184
1185    elm_pager_content_push(pager, bx);
1186 }
1187
1188 static Evas_Object *
1189 _sample_theme_new(Evas_Object *win)
1190 {
1191    Evas_Object *base, *bg, *bt, *ck, *rd, *rdg, *sl, *fr, *li, *rc, *sp;
1192
1193    base = elm_table_add(win);
1194    evas_object_size_hint_weight_set(base, 1.0, 1.0);
1195    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1196
1197    bg = elm_bg_add(win);
1198    evas_object_size_hint_weight_set(bg, 1.0, 1.0);
1199    evas_object_size_hint_align_set(bg, EVAS_HINT_FILL, EVAS_HINT_FILL);
1200    elm_table_pack(base, bg, 0, 0, 2, 5);
1201    evas_object_show(bg);
1202
1203    bt = elm_button_add(win);
1204    elm_button_label_set(bt, "Button");
1205    elm_table_pack(base, bt, 0, 0, 1, 1);
1206    evas_object_show(bt);
1207
1208    ck = elm_check_add(win);
1209    elm_check_label_set(ck, "Check");
1210    elm_table_pack(base, ck, 0, 1, 1, 1);
1211    evas_object_show(ck);
1212
1213    rd = elm_radio_add(win);
1214    elm_radio_state_value_set(rd, 0);
1215    elm_radio_label_set(rd, "Radio 1");
1216    elm_table_pack(base, rd, 1, 0, 1, 1);
1217    evas_object_show(rd);
1218    rdg = rd;
1219
1220    rd = elm_radio_add(win);
1221    elm_radio_state_value_set(rd, 1);
1222    elm_radio_label_set(rd, "Radio 2");
1223    elm_radio_group_add(rd, rdg);
1224    elm_table_pack(base, rd, 1, 1, 1, 1);
1225    evas_object_show(rd);
1226
1227    sp = elm_separator_add(win);
1228    elm_separator_horizontal_set(sp, 1);
1229    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1230    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1231    elm_table_pack(base, sp, 0, 2, 2, 1);
1232    evas_object_show(sp);
1233
1234    sl = elm_slider_add(win);
1235    elm_slider_label_set(sl, "Slider");
1236    elm_slider_span_size_set(sl, 120);
1237    elm_slider_min_max_set(sl, 1, 10);
1238    elm_slider_value_set(sl, 4);
1239    evas_object_size_hint_weight_set(sl, 1.0, 0.0);
1240    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, EVAS_HINT_FILL);
1241    elm_table_pack(base, sl, 0, 3, 2, 1);
1242    evas_object_show(sl);
1243
1244    fr = elm_frame_add(win);
1245    elm_frame_label_set(fr, "Frame");
1246    elm_table_pack(base, fr, 0, 4, 2, 1);
1247    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1248    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1249    evas_object_show(fr);
1250
1251    li = elm_list_add(win);
1252    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1253    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1254    elm_frame_content_set(fr, li);
1255    evas_object_show(li);
1256
1257    elm_list_item_append(li, "List Item 1", NULL, NULL, NULL, NULL);
1258    elm_list_item_append(li, "Second Item", NULL, NULL, NULL, NULL);
1259    elm_list_item_append(li, "Third Item", NULL, NULL, NULL, NULL);
1260    elm_list_go(li);
1261
1262    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1263    evas_object_size_hint_min_set(rc, 160, 120);
1264    elm_table_pack(base, rc, 0, 4, 2, 1);
1265
1266    return base;
1267 }
1268
1269 static void
1270 _status_config_themes(Evas_Object *win,
1271                       Evas_Object *pager)
1272 {
1273    Evas_Object *tb, *rc, *sc, *sp, *li, *pd, *fr, *bt, *sample;
1274    Eina_List *list, *l;
1275    char *th, *s, *ext;
1276
1277    tb = elm_table_add(win);
1278    evas_object_size_hint_weight_set(tb, 1.0, 1.0);
1279    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
1280
1281    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1282    evas_object_size_hint_min_set(rc, 0, 130);
1283    elm_table_pack(tb, rc, 0, 0, 1, 1);
1284
1285    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1286    evas_object_size_hint_min_set(rc, 0, 200);
1287    elm_table_pack(tb, rc, 0, 1, 1, 1);
1288
1289    /////////////////////////////////////////////
1290
1291    pd = elm_frame_add(win);
1292    elm_object_style_set(pd, "pad_medium");
1293    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1294    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1295    elm_table_pack(tb, pd, 0, 0, 1, 1);
1296    evas_object_show(pd);
1297
1298    li = elm_list_add(win);
1299    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1300    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1301    elm_frame_content_set(pd, li);
1302    evas_object_show(li);
1303
1304    list = elm_theme_name_available_list_new();
1305    EINA_LIST_FOREACH(list, l, th)
1306      {
1307         Theme *t;
1308
1309         t = calloc(1, sizeof(Theme));
1310         t->name = eina_stringshare_add(th);
1311         s = elm_theme_list_item_path_get(th, &(t->in_search_path));
1312         if (s)
1313           {
1314              t->path = eina_stringshare_add(s);
1315              free(s);
1316           }
1317         if (t->in_search_path)
1318           {
1319              s = strdup(th);
1320              if (s)
1321                {
1322                   s[0] = toupper(s[0]);
1323                   t->label = eina_stringshare_add(s);
1324                   free(s);
1325                }
1326              else
1327                t->label = eina_stringshare_add(s);
1328           }
1329         else
1330           {
1331              s = strdup(ecore_file_file_get(th));
1332              if (s)
1333                {
1334                   s[0] = toupper(s[0]);
1335                   ext = strrchr(s, '.');
1336                   if (ext) *ext = 0;
1337                   t->label = eina_stringshare_add(s);
1338                   free(s);
1339                }
1340              else
1341                t->label = eina_stringshare_add(s);
1342           }
1343         themes = eina_list_append(themes, t);
1344         elm_list_item_append(li, t->label, NULL, NULL, _theme_sel, t);
1345      }
1346    elm_theme_name_available_list_free(list);
1347
1348    elm_list_go(li);
1349
1350    pd = elm_frame_add(win);
1351    elm_object_style_set(pd, "pad_medium");
1352    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1353    evas_object_size_hint_align_set(pd, 0.9, 0.9);
1354    elm_table_pack(tb, pd, 0, 0, 1, 1);
1355    evas_object_show(pd);
1356
1357    /* FIXME: not implemented yet
1358       bt = elm_button_add(win);
1359       evas_object_smart_callback_add(bt, "clicked", _theme_browse, win);
1360       elm_button_label_set(bt, "Browse...");
1361       evas_object_size_hint_weight_set(bt, 1.0, 1.0);
1362       evas_object_size_hint_align_set(bt, 0.9, 0.9);
1363       elm_frame_content_set(pd, bt);
1364       evas_object_show(bt);
1365     */
1366    pd = elm_frame_add(win);
1367    elm_object_style_set(pd, "pad_medium");
1368    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1369    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1370    elm_table_pack(tb, pd, 0, 1, 1, 1);
1371    evas_object_show(pd);
1372
1373    fr = elm_frame_add(win);
1374    elm_frame_label_set(fr, "Preview");
1375    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1376    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1377    elm_frame_content_set(pd, fr);
1378    evas_object_show(fr);
1379
1380    sc = elm_scroller_add(win);
1381    elm_scroller_bounce_set(sc, 0, 0);
1382    evas_object_size_hint_weight_set(sc, 1.0, 1.0);
1383    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1384    elm_frame_content_set(fr, sc);
1385    evas_object_show(sc);
1386
1387    sample = _sample_theme_new(win);
1388    elm_scroller_content_set(sc, sample);
1389    evas_object_show(sample);
1390    evas_object_data_set(win, "theme_preview", sample);
1391
1392    /////////////////////////////////////////////
1393    sp = elm_separator_add(win);
1394    elm_separator_horizontal_set(sp, 1);
1395    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1396    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1397    elm_table_pack(tb, sp, 0, 2, 1, 1);
1398    evas_object_show(sp);
1399
1400    pd = elm_frame_add(win);
1401    elm_object_style_set(pd, "pad_medium");
1402    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
1403    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1404    elm_table_pack(tb, pd, 0, 3, 1, 1);
1405    evas_object_show(pd);
1406
1407    bt = elm_button_add(win);
1408    evas_object_smart_callback_add(bt, "clicked", _theme_use, win);
1409    elm_button_label_set(bt, "Use Theme");
1410    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
1411    evas_object_size_hint_align_set(bt, 0.5, 0.5);
1412    elm_frame_content_set(pd, bt);
1413    evas_object_show(bt);
1414
1415    evas_object_data_set(win, "themes", tb);
1416    elm_pager_content_push(pager, tb);
1417 }
1418
1419 static void
1420 _font_preview_update(Evas_Object *win)
1421 {
1422    Evas_Font_Size sz;
1423    const char *name;
1424
1425    if (!fdata.cur_font)
1426      return;
1427
1428    name = elm_font_fontconfig_name_get(fdata.cur_font, fdata.cur_style);
1429    sz = fdata.cur_size;
1430
1431    if (sz < 0)
1432      sz = (-sz * 10) / 100;
1433    if (sz == 0)
1434      sz = 10;
1435
1436    edje_object_text_class_set(evas_object_data_get(win, "font_preview"),
1437                               "font_preview", name, sz);
1438
1439    elm_font_fontconfig_name_free(name);
1440 }
1441
1442 static void
1443 _font_classes_list_sel(void *data   __UNUSED__,
1444                        Evas_Object *obj,
1445                        void        *event_info)
1446 {
1447    const Eina_List *f_names_items, *l;
1448    Elm_Text_Class_Data *tc_data;
1449    Evas_Object *f_names_list;
1450    Elm_List_Item *it;
1451
1452    tc_data = elm_list_item_data_get(event_info);
1453
1454    f_names_list = evas_object_data_get(elm_object_top_widget_get(obj),
1455                                        "font_names_list");
1456    ELM_LIST_ENABLE(f_names_list);
1457
1458    f_names_items = elm_list_items_get(f_names_list);
1459
1460    EINA_LIST_FOREACH(f_names_items, l, it)
1461      {
1462         const char *l;
1463
1464         l = elm_list_item_label_get(it);
1465
1466         if (tc_data->font && !strcmp(l, tc_data->font))
1467           {
1468              elm_list_item_selected_set(it, EINA_TRUE);
1469              elm_list_item_show(it);
1470              break;
1471           }
1472      }
1473 }
1474
1475 static void
1476 _font_names_list_sel(void *data   __UNUSED__,
1477                      Evas_Object *obj,
1478                      void        *event_info)
1479 {
1480    Evas_Object *style_list, *cls_list, *sizes_list, *win;
1481    const char *style, *sel_font;
1482    Elm_Text_Class_Data *tc_data;
1483    Elm_List_Item *it, *fc_it;
1484    Elm_Font_Properties *efp;
1485    const Eina_List *l;
1486
1487    it = event_info;
1488    sel_font = elm_list_item_label_get(it);
1489
1490    win = elm_object_top_widget_get(obj);
1491    style_list = evas_object_data_get(win, "font_styles_list");
1492    cls_list = evas_object_data_get(win, "font_classes_list");
1493    sizes_list = evas_object_data_get(win, "font_sizes_list");
1494
1495    fc_it = elm_list_selected_item_get(cls_list);
1496    if (!fc_it) return;  /* should not happen, fonts list disabled in
1497                          * this case */
1498
1499    eina_stringshare_replace(&fdata.cur_font, sel_font);
1500
1501    tc_data = elm_list_item_data_get(fc_it);
1502    if (tc_data->font) eina_stringshare_del(tc_data->font);
1503    if (fdata.cur_font) tc_data->font = eina_stringshare_ref(fdata.cur_font);
1504
1505    /* load styles list */
1506    efp = eina_hash_find(fdata.font_hash, sel_font);
1507
1508    ELM_LIST_ENABLE(style_list);
1509    elm_list_clear(style_list);
1510
1511    evas_event_freeze(evas_object_evas_get(style_list));
1512    edje_freeze();
1513
1514    it = NULL;
1515
1516    EINA_LIST_FOREACH(efp->styles, l, style)
1517      {
1518         Elm_List_Item *i;
1519
1520         i = elm_list_item_append(style_list, style, NULL, NULL,
1521                                  _font_styles_list_sel, NULL);
1522
1523         if (tc_data->style && (!strcmp(style, tc_data->style)))
1524           it = i;
1525      }
1526
1527    elm_list_go(style_list);
1528
1529    edje_thaw();
1530    evas_event_thaw(evas_object_evas_get(style_list));
1531
1532    if (it)
1533      elm_list_item_selected_set(it, EINA_TRUE);
1534
1535    _font_preview_update(win);
1536 }
1537
1538 static void
1539 _font_styles_list_sel(void *data   __UNUSED__,
1540                       Evas_Object *obj,
1541                       void        *event_info)
1542 {
1543    Evas_Object *fc_list, *fs_list, *win;
1544    Elm_Text_Class_Data *tc_data;
1545    const Eina_List *l;
1546    Elm_List_Item *it;
1547
1548    win = elm_object_top_widget_get(obj);
1549    fc_list = evas_object_data_get(win, "font_classes_list");
1550    fs_list = evas_object_data_get(win, "font_sizes_list");
1551
1552    it = elm_list_selected_item_get(fc_list);
1553    if (!it) return;  /* should not happen */
1554
1555    eina_stringshare_replace(&fdata.cur_style,
1556                             elm_list_item_label_get(event_info));
1557    ELM_LIST_ENABLE(fs_list);
1558
1559    tc_data = elm_list_item_data_get(it);
1560    eina_stringshare_del(tc_data->style);
1561    tc_data->style = eina_stringshare_ref(fdata.cur_style);
1562
1563    evas_event_freeze(evas_object_evas_get(fs_list));
1564    edje_freeze();
1565
1566    EINA_LIST_FOREACH(elm_list_items_get(fs_list), l, it)
1567      {
1568         Elm_Font_Size_Data *sdata;
1569
1570         sdata = elm_list_item_data_get(it);
1571         elm_list_item_selected_set(l->data, EINA_FALSE);
1572
1573         if (tc_data->size == sdata->size)
1574           {
1575              elm_list_item_selected_set(it, EINA_TRUE);
1576              elm_list_item_show(it);
1577              break;
1578           }
1579      }
1580
1581    edje_thaw();
1582    evas_event_thaw(evas_object_evas_get(fs_list));
1583
1584    _font_preview_update(win);
1585 }
1586
1587 static void
1588 _font_sizes_list_sel(void *data       __UNUSED__,
1589                      Evas_Object *obj __UNUSED__,
1590                      void *event_info __UNUSED__)
1591 {
1592    Elm_Text_Class_Data *tc_data;
1593    Evas_Object *fc_list, *win;
1594    Elm_Font_Size_Data *sd;
1595    Elm_List_Item *it;
1596
1597    win = elm_object_top_widget_get(obj);
1598    fc_list = evas_object_data_get(win, "font_classes_list");
1599
1600    it = elm_list_selected_item_get(fc_list);
1601    if (!it) return;  /* should not happen */
1602
1603    sd = elm_list_item_data_get(event_info);
1604    fdata.cur_size = sd->size;
1605
1606    tc_data = elm_list_item_data_get(it);
1607    tc_data->size = fdata.cur_size;
1608
1609    _font_preview_update(win);
1610 }
1611
1612 static void
1613 _fstyle_list_unselect_cb(void *data       __UNUSED__,
1614                          Evas_Object     *obj,
1615                          void *event_info __UNUSED__)
1616 {
1617    Evas_Object *sizes_list, *win;
1618
1619    if (elm_list_selected_item_get(obj)) return;
1620
1621    win = elm_object_top_widget_get(obj);
1622
1623    sizes_list = evas_object_data_get(win, "font_sizes_list");
1624    ELM_LIST_DISABLE(sizes_list);
1625 }
1626
1627 static void
1628 _fc_list_unselect_cb(void *data       __UNUSED__,
1629                      Evas_Object     *obj,
1630                      void *event_info __UNUSED__)
1631 {
1632    Evas_Object *font_names_list, *styles_list, *sizes_list, *win;
1633
1634    if (elm_list_selected_item_get(obj)) return;
1635
1636    win = elm_object_top_widget_get(obj);
1637
1638    font_names_list = evas_object_data_get(win, "font_names_list");
1639    ELM_LIST_DISABLE(font_names_list);
1640
1641    styles_list = evas_object_data_get(win, "font_styles_list");
1642    ELM_LIST_DISABLE(styles_list);
1643
1644    sizes_list = evas_object_data_get(win, "font_sizes_list");
1645    ELM_LIST_DISABLE(sizes_list);
1646 }
1647
1648 static void
1649 _font_classes_list_load(Evas_Object *li)
1650 {
1651    Elm_Text_Class_Data *tc_data;
1652    Eina_List *l;
1653    Evas *evas;
1654
1655    evas = evas_object_evas_get(li);
1656    evas_event_freeze(evas);
1657    edje_freeze();
1658
1659    EINA_LIST_FOREACH(fdata.text_classes, l, tc_data)
1660      elm_list_item_append(li, tc_data->desc, NULL, NULL,
1661                           _font_classes_list_sel, tc_data);
1662
1663    evas_object_smart_callback_add(li, "unselected", _fc_list_unselect_cb,
1664                                   NULL);
1665
1666    elm_list_go(li);
1667    edje_thaw();
1668    evas_event_thaw(evas);
1669 }
1670
1671 static void
1672 _fonts_data_fill(Evas *evas)
1673 {
1674    const Eina_List *fo_list, *text_classes, *l;
1675    Elm_Text_Class_Data *tc_data;
1676    Elm_Font_Size_Data *sd;
1677    Elm_Font_Overlay *efo;
1678    Eina_List *evas_fonts;
1679    Elm_Text_Class *etc;
1680    int i;
1681
1682    evas_fonts = evas_font_available_list(evas);
1683    fdata.font_hash = elm_font_available_hash_add(evas_fonts);
1684    evas_font_available_list_free(evas, evas_fonts);
1685
1686    text_classes = elm_text_classes_list_get();
1687    fo_list = elm_font_overlay_list_get();
1688
1689    EINA_LIST_FOREACH(text_classes, l, etc)
1690      {
1691         const Eina_List *ll;
1692
1693         tc_data = calloc(1, sizeof(*tc_data));
1694         tc_data->name = eina_stringshare_add(etc->name);
1695         tc_data->desc = eina_stringshare_add(etc->desc);
1696
1697         EINA_LIST_FOREACH(fo_list, ll, efo)
1698           {
1699              if (strcmp(tc_data->name, efo->text_class))
1700                continue;
1701
1702              if (efo->font)
1703                {
1704                   Elm_Font_Properties *efp;
1705
1706                   efp = elm_font_properties_get(efo->font);
1707                   if (efp)
1708                     {
1709                        tc_data->font = eina_stringshare_add(efp->name);
1710                        /* we're sure we recorded with only 1 style selected */
1711                        tc_data->style = eina_stringshare_add(efp->styles->data);
1712                        elm_font_properties_free(efp);
1713                     }
1714                }
1715              tc_data->size = efo->size;
1716           }
1717
1718         fdata.text_classes = eina_list_append(fdata.text_classes, tc_data);
1719      }
1720
1721    elm_text_classes_list_free(text_classes);
1722
1723    /* FIXME: hinting later */
1724    /* fdata.hinting = e_config->font_hinting; */
1725
1726    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1727    sd->size_str = eina_stringshare_add("Tiny");
1728    sd->size = -50;
1729    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1730
1731    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1732    sd->size_str = eina_stringshare_add("Small");
1733    sd->size = -80;
1734    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1735
1736    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1737    sd->size_str = eina_stringshare_add("Normal");
1738    sd->size = -100;
1739    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1740
1741    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1742    sd->size_str = eina_stringshare_add("Big");
1743    sd->size = -150;
1744    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1745
1746    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1747    sd->size_str = eina_stringshare_add("Really Big");
1748    sd->size = -190;
1749    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1750
1751    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1752    sd->size_str = eina_stringshare_add("Huge");
1753    sd->size = -250;
1754    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1755
1756    for (i = 5; i < 51; i++)
1757      {
1758         char str[16];
1759
1760         str[0] = 0;
1761         snprintf(str, sizeof(str), "%d pixels", i);
1762
1763         sd = calloc(1, sizeof(Elm_Font_Size_Data));
1764         sd->size_str = eina_stringshare_add(str);
1765         sd->size = i;
1766         fdata.font_px_list = eina_list_append(fdata.font_px_list, sd);
1767      }
1768 }
1769
1770 static int
1771 _font_sort_cb(const void *data1,
1772               const void *data2)
1773 {
1774    if (!data1) return 1;
1775    if (!data2) return -1;
1776    return strcmp(data1, data2);
1777 }
1778
1779 static void
1780 _font_sizes_list_load(Evas_Object *size_list)
1781 {
1782    Elm_Font_Size_Data *size_data;
1783    Eina_List *l;
1784    Evas *evas;
1785
1786    evas = evas_object_evas_get(size_list);
1787    evas_event_freeze(evas);
1788    edje_freeze();
1789
1790    EINA_LIST_FOREACH(fdata.font_scale_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    EINA_LIST_FOREACH(fdata.font_px_list, l, size_data)
1795      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1796                           _font_sizes_list_sel, size_data);
1797
1798    elm_list_go(size_list);
1799    edje_thaw();
1800    evas_event_thaw(evas);
1801 }
1802
1803 static void
1804 _fnames_list_unselect_cb(void *data       __UNUSED__,
1805                          Evas_Object     *obj,
1806                          void *event_info __UNUSED__)
1807 {
1808    Evas_Object *styles_list, *sizes_list, *win;
1809
1810    if (elm_list_selected_item_get(obj)) return;
1811
1812    win = elm_object_top_widget_get(obj);
1813
1814    styles_list = evas_object_data_get(win, "font_styles_list");
1815    ELM_LIST_DISABLE(styles_list);
1816
1817    sizes_list = evas_object_data_get(win, "font_sizes_list");
1818    ELM_LIST_DISABLE(sizes_list);
1819 }
1820
1821 static Eina_Bool
1822 _font_list_fill(const Eina_Hash *hash __UNUSED__,
1823                 const void *key       __UNUSED__,
1824                 void                 *data,
1825                 void                 *fdata)
1826 {
1827    Elm_Font_Properties *efp;
1828    Eina_List **flist;
1829
1830    flist = fdata;
1831    efp = data;
1832
1833    *flist = eina_list_append(*flist, efp->name);
1834
1835    return EINA_TRUE;
1836 }
1837
1838 static void
1839 _font_names_list_load(Evas_Object *flist)
1840 {
1841    Eina_List *l, *names_list = NULL;
1842    const char *font;
1843    Evas *evas;
1844
1845    evas = evas_object_evas_get(flist);
1846    evas_event_freeze(evas);
1847    edje_freeze();
1848
1849    eina_hash_foreach(fdata.font_hash, _font_list_fill, &names_list);
1850    names_list = eina_list_sort(names_list, eina_list_count(names_list),
1851                                _font_sort_cb);
1852
1853    EINA_LIST_FOREACH(names_list, l, font)
1854      elm_list_item_append(flist, font, NULL, NULL, _font_names_list_sel, NULL);
1855
1856    EINA_LIST_FREE(names_list, font) ;
1857
1858    evas_object_smart_callback_add(flist, "unselected",
1859                                   _fnames_list_unselect_cb, NULL);
1860
1861    elm_list_go(flist);
1862
1863    edje_thaw();
1864    evas_event_thaw(evas);
1865 }
1866
1867 static void
1868 _status_config_fonts(Evas_Object *win,
1869                      Evas_Object *pager)
1870 {
1871    Evas_Object *base, *fr, *li, *rc, *preview, *sp, *pd, *bt, *bx;
1872    char buf[PATH_MAX];
1873
1874    _fonts_data_fill(evas_object_evas_get(win));
1875
1876    base = elm_table_add(win);
1877    evas_object_size_hint_weight_set(base, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1878    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1879
1880    /* yeah, dummy rectangles are ugly as hell, but no good way yet of
1881       fixing sizes */
1882    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1883    evas_object_size_hint_min_set(rc, 70, 170);
1884    elm_table_pack(base, rc, 1, 0, 1, 1);
1885
1886    fr = elm_frame_add(win);
1887    elm_frame_label_set(fr, "Font Class");
1888    elm_table_pack(base, fr, 0, 0, 1, 2);
1889    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1890    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1891    evas_object_show(fr);
1892
1893    /* FIXME: no multiselection for this list, for now */
1894    li = elm_list_add(win);
1895    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1896    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1897    elm_frame_content_set(fr, li);
1898    evas_object_show(li);
1899
1900    evas_object_data_set(win, "font_classes_list", li);
1901    _font_classes_list_load(li);
1902
1903    fr = elm_frame_add(win);
1904    elm_frame_label_set(fr, "Font");
1905    elm_table_pack(base, fr, 1, 0, 1, 2);
1906    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1907    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1908    evas_object_show(fr);
1909
1910    li = elm_list_add(win);
1911    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1912    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1913    elm_frame_content_set(fr, li);
1914    evas_object_show(li);
1915
1916    evas_object_data_set(win, "font_names_list", li);
1917    _font_names_list_load(li);
1918    ELM_LIST_DISABLE(li);
1919
1920    rc = evas_object_rectangle_add(evas_object_evas_get(win));
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_frame_label_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_frame_label_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_layout_text_set(preview, "elm.text", "Preview Text — 我真的会写中文");
1970    evas_object_size_hint_weight_set(preview, EVAS_HINT_EXPAND,
1971                                     EVAS_HINT_EXPAND);
1972    evas_object_size_hint_align_set(preview, EVAS_HINT_FILL, EVAS_HINT_FILL);
1973    evas_object_show(preview);
1974
1975    elm_box_pack_end(bx, preview);
1976    evas_object_data_set(win, "font_preview", elm_layout_edje_get(preview));
1977
1978    /////////////////////////////////////////////
1979    sp = elm_separator_add(win);
1980    elm_separator_horizontal_set(sp, EINA_TRUE);
1981    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
1982    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1983    elm_table_pack(base, sp, 0, 4, 2, 1);
1984    evas_object_show(sp);
1985
1986    pd = elm_frame_add(win);
1987    elm_object_style_set(pd, "pad_medium");
1988    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
1989    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1990    elm_table_pack(base, pd, 0, 5, 2, 1);
1991    evas_object_show(pd);
1992
1993    bx = elm_box_add(win);
1994    elm_box_horizontal_set(bx, EINA_TRUE);
1995    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1996    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
1997    evas_object_show(bx);
1998
1999    bt = elm_button_add(win);
2000    evas_object_smart_callback_add(bt, "clicked", _font_overlay_set_all, win);
2001    elm_button_label_set(bt, "Set to All");
2002    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2003    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2004    elm_box_pack_end(bx, bt);
2005    evas_object_show(bt);
2006
2007    bt = elm_button_add(win);
2008    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset, win);
2009    elm_button_label_set(bt, "Reset");
2010    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2011    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2012    elm_box_pack_end(bx, bt);
2013    evas_object_show(bt);
2014
2015    bt = elm_button_add(win);
2016    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset_all, win);
2017    elm_button_label_set(bt, "Reset All");
2018    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2019    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2020    elm_box_pack_end(bx, bt);
2021    evas_object_show(bt);
2022
2023    bt = elm_button_add(win);
2024    evas_object_smart_callback_add(bt, "clicked", _font_overlay_change, win);
2025    elm_button_label_set(bt, "Apply");
2026    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2027    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2028    elm_box_pack_end(bx, bt);
2029    evas_object_show(bt);
2030
2031    elm_frame_content_set(pd, bx);
2032
2033    evas_object_data_set(win, "fonts", base);
2034
2035    elm_pager_content_push(pager, base);
2036 }
2037
2038 static void
2039 _engines_list_item_del_cb(void            *data,
2040                           Evas_Object *obj __UNUSED__,
2041                           void *event_info __UNUSED__)
2042 {
2043    free(data);
2044 }
2045
2046 static void
2047 _profiles_list_item_del_cb(void            *data,
2048                            Evas_Object *obj __UNUSED__,
2049                            void *event_info __UNUSED__)
2050 {
2051    free(data);
2052 }
2053
2054 static void
2055 _profiles_list_selected_cb(void            *data,
2056                            Evas_Object     *obj,
2057                            void *event_info __UNUSED__)
2058 {
2059    const char *cur_profile = NULL;
2060    const char *sel_profile, *pdir;
2061    Eina_Bool cur_selected;
2062    const char *prof_name;
2063    char buf[PATH_MAX];
2064    Evas_Object *en;
2065 #ifdef ELM_EFREET
2066    Efreet_Desktop *desk = NULL;
2067 #endif
2068
2069    sel_profile = data;
2070    if (!sel_profile)
2071      return;
2072
2073    cur_profile = elm_profile_current_get();
2074    cur_selected = !strcmp(cur_profile, sel_profile);
2075
2076    pdir = elm_profile_dir_get(sel_profile, EINA_FALSE);
2077 #ifdef ELM_EFREET
2078    snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2079    desk = efreet_desktop_new(buf);
2080    if ((desk) && (desk->name)) prof_name = desk->name;
2081    else
2082 #endif
2083    prof_name = cur_profile;
2084
2085    if (!pdir)
2086      elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2087                              EINA_TRUE);
2088    else
2089      {
2090         elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2091                                 EINA_TRUE);
2092         elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2093                                 EINA_FALSE);
2094         elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2095                                 EINA_FALSE);
2096         elm_profile_dir_free(pdir);
2097      }
2098
2099    snprintf(buf, sizeof(buf), "<hilight>Selected profile: %s</><br>",
2100             prof_name);
2101    elm_label_label_set(evas_object_data_get(obj, "prof_name_lbl"), buf);
2102
2103    en = evas_object_data_get(obj, "prof_desc_entry");
2104 #ifdef ELM_EFREET
2105    if (desk) elm_scrolled_entry_entry_set(en, desk->comment);
2106    else
2107 #endif
2108    elm_scrolled_entry_entry_set(en, "Unknown");
2109
2110 #ifdef ELM_EFREET
2111    if (desk) efreet_desktop_free(desk);
2112 #endif
2113 }
2114
2115 static void
2116 _profiles_list_fill(Evas_Object *l_widget,
2117                     Eina_List   *p_names)
2118 {
2119    const char *cur_profile = NULL;
2120    const char *profile;
2121    void *sel_it = NULL;
2122    Eina_List *l;
2123
2124    if (!p_names)
2125      return;
2126
2127    elm_list_clear(l_widget);
2128
2129    cur_profile = elm_profile_current_get();
2130
2131    EINA_LIST_FOREACH(p_names, l, profile)
2132      {
2133 #ifdef ELM_EFREET
2134         Efreet_Desktop *desk = NULL;
2135 #endif
2136         const char *label, *ext, *pdir;
2137         char buf[PATH_MAX];
2138         Elm_List_Item *it;
2139         Evas_Object *ic;
2140
2141         pdir = elm_profile_dir_get(profile, EINA_FALSE);
2142         label = profile;
2143
2144 #ifdef ELM_EFREET
2145         snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2146         desk = efreet_desktop_new(buf);
2147         if ((desk) && (desk->name)) label = desk->name;
2148 #endif
2149
2150         buf[0] = 0;
2151         if (pdir) snprintf(buf, sizeof(buf), "%s/icon.edj", pdir);
2152 #ifdef ELM_EFREET
2153         if ((desk) && (desk->icon) && (pdir))
2154           snprintf(buf, sizeof(buf), "%s/%s", pdir, desk->icon);
2155 #endif
2156         ic = elm_icon_add(l_widget);
2157         ext = strrchr(buf, '.');
2158         if (ext)
2159           {
2160              if (!strcmp(ext, ".edj")) elm_icon_file_set(ic, buf, "icon");
2161              else elm_icon_file_set(ic, buf, NULL);
2162           }
2163
2164         evas_object_size_hint_aspect_set(ic, EVAS_ASPECT_CONTROL_VERTICAL,
2165                                          1, 1);
2166         evas_object_show(ic);
2167
2168         it = elm_list_item_append(l_widget, label, ic, NULL,
2169                                   _profiles_list_selected_cb, strdup(profile));
2170         elm_list_item_del_cb_set(it, _profiles_list_item_del_cb);
2171         if (cur_profile && !strcmp(profile, cur_profile))
2172           sel_it = it;
2173
2174         elm_profile_dir_free(pdir);
2175
2176 #ifdef ELM_EFREET
2177         if (desk) efreet_desktop_free(desk);
2178 #endif
2179      }
2180
2181    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2182    elm_list_go(l_widget);
2183 }
2184
2185 static void
2186 _profiles_list_unselect_cb(void *data       __UNUSED__,
2187                            Evas_Object     *obj,
2188                            void *event_info __UNUSED__)
2189 {
2190    if (elm_list_selected_item_get(obj)) return;
2191    elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2192                            EINA_TRUE);
2193    elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2194                            EINA_TRUE);
2195    elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2196                            EINA_TRUE);
2197 }
2198
2199 static void
2200 _status_config_profiles(Evas_Object *win,
2201                         Evas_Object *pager)
2202 {
2203    Evas_Object *li, *bx, *fr_bx1, *fr_bx2, *btn_bx, *fr, *lb, *en, *sp, *pd,
2204    *bt;
2205    Eina_List *profs;
2206    Evas *evas;
2207
2208    bx = elm_box_add(win);
2209    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2210    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2211
2212    fr_bx1 = elm_box_add(win);
2213    evas_object_size_hint_weight_set(fr_bx1, EVAS_HINT_EXPAND,
2214                                     EVAS_HINT_EXPAND);
2215    evas_object_size_hint_align_set(fr_bx1, EVAS_HINT_FILL, EVAS_HINT_FILL);
2216    elm_box_homogenous_set(fr_bx1, EINA_TRUE);
2217    evas_object_show(fr_bx1);
2218
2219    fr_bx2 = elm_box_add(win);
2220    evas_object_size_hint_weight_set(fr_bx2, EVAS_HINT_EXPAND,
2221                                     EVAS_HINT_EXPAND);
2222    evas_object_size_hint_align_set(fr_bx2, EVAS_HINT_FILL, EVAS_HINT_FILL);
2223    evas_object_show(fr_bx2);
2224
2225    fr = elm_frame_add(win);
2226    elm_frame_label_set(fr, "Available Profiles");
2227    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2228    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2229    elm_frame_content_set(fr, fr_bx1);
2230    elm_box_pack_end(bx, fr);
2231    evas_object_show(fr);
2232
2233    li = elm_list_add(win);
2234    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2235    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2236    evas_object_smart_callback_add(li, "unselected", _profiles_list_unselect_cb,
2237                                   NULL);
2238
2239    profs = elm_profile_list_get();
2240
2241    evas_object_show(li);
2242    elm_box_pack_end(fr_bx2, li);
2243
2244    lb = elm_label_add(win);
2245    evas_object_size_hint_weight_set(lb, EVAS_HINT_EXPAND, 0.0);
2246    evas_object_size_hint_align_set(lb, EVAS_HINT_FILL, 0.5);
2247
2248    evas_object_show(lb);
2249
2250    en = elm_scrolled_entry_add(win);
2251    elm_scrolled_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_button_label_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_button_label_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_button_label_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_button_label_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_check_label_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_check_label_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_frame_label_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_button_label_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_check_label_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_homogenous_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()