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    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1205    elm_button_label_set(bt, "Button");
1206    elm_table_pack(base, bt, 0, 0, 1, 1);
1207    evas_object_show(bt);
1208
1209    ck = elm_check_add(win);
1210    evas_object_size_hint_weight_set(ck, 1.0, 0.0);
1211    elm_check_label_set(ck, "Check");
1212    elm_table_pack(base, ck, 0, 1, 1, 1);
1213    evas_object_show(ck);
1214
1215    rd = elm_radio_add(win);
1216    evas_object_size_hint_weight_set(rd, 1.0, 0.0);
1217    elm_radio_state_value_set(rd, 0);
1218    elm_radio_label_set(rd, "Radio 1");
1219    elm_table_pack(base, rd, 1, 0, 1, 1);
1220    evas_object_show(rd);
1221    rdg = rd;
1222
1223    rd = elm_radio_add(win);
1224    evas_object_size_hint_weight_set(rd, 1.0, 0.0);
1225    elm_radio_state_value_set(rd, 1);
1226    elm_radio_label_set(rd, "Radio 2");
1227    elm_radio_group_add(rd, rdg);
1228    elm_table_pack(base, rd, 1, 1, 1, 1);
1229    evas_object_show(rd);
1230
1231    sp = elm_separator_add(win);
1232    elm_separator_horizontal_set(sp, 1);
1233    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1234    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1235    elm_table_pack(base, sp, 0, 2, 2, 1);
1236    evas_object_show(sp);
1237
1238    sl = elm_slider_add(win);
1239    elm_slider_label_set(sl, "Slider");
1240    elm_slider_span_size_set(sl, 120);
1241    elm_slider_min_max_set(sl, 1, 10);
1242    elm_slider_value_set(sl, 4);
1243    evas_object_size_hint_weight_set(sl, 1.0, 0.0);
1244    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, EVAS_HINT_FILL);
1245    elm_table_pack(base, sl, 0, 3, 2, 1);
1246    evas_object_show(sl);
1247
1248    fr = elm_frame_add(win);
1249    elm_frame_label_set(fr, "Frame");
1250    elm_table_pack(base, fr, 0, 4, 2, 1);
1251    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1252    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1253    evas_object_show(fr);
1254
1255    li = elm_list_add(win);
1256    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1257    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1258    elm_frame_content_set(fr, li);
1259    evas_object_show(li);
1260
1261    elm_list_item_append(li, "List Item 1", NULL, NULL, NULL, NULL);
1262    elm_list_item_append(li, "Second Item", NULL, NULL, NULL, NULL);
1263    elm_list_item_append(li, "Third Item", NULL, NULL, NULL, NULL);
1264    elm_list_go(li);
1265
1266    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1267    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1268    evas_object_size_hint_min_set(rc, 160, 120);
1269    elm_table_pack(base, rc, 0, 4, 2, 1);
1270
1271    return base;
1272 }
1273
1274 static void
1275 _status_config_themes(Evas_Object *win,
1276                       Evas_Object *pager)
1277 {
1278    Evas_Object *tb, *rc, *sc, *sp, *li, *pd, *fr, *bt, *sample;
1279    Eina_List *list, *l;
1280    char *th, *s, *ext;
1281
1282    tb = elm_table_add(win);
1283    evas_object_size_hint_weight_set(tb, 1.0, 1.0);
1284    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
1285
1286    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1287    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1288    evas_object_size_hint_min_set(rc, 0, 130);
1289    elm_table_pack(tb, rc, 0, 0, 1, 1);
1290
1291    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1292    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1293    evas_object_size_hint_min_set(rc, 0, 200);
1294    elm_table_pack(tb, rc, 0, 1, 1, 1);
1295
1296    /////////////////////////////////////////////
1297
1298    pd = elm_frame_add(win);
1299    elm_object_style_set(pd, "pad_medium");
1300    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1301    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1302    elm_table_pack(tb, pd, 0, 0, 1, 1);
1303    evas_object_show(pd);
1304
1305    li = elm_list_add(win);
1306    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1307    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1308    elm_frame_content_set(pd, li);
1309    evas_object_show(li);
1310
1311    list = elm_theme_name_available_list_new();
1312    EINA_LIST_FOREACH(list, l, th)
1313      {
1314         Theme *t;
1315
1316         t = calloc(1, sizeof(Theme));
1317         t->name = eina_stringshare_add(th);
1318         s = elm_theme_list_item_path_get(th, &(t->in_search_path));
1319         if (s)
1320           {
1321              t->path = eina_stringshare_add(s);
1322              free(s);
1323           }
1324         if (t->in_search_path)
1325           {
1326              s = strdup(th);
1327              if (s)
1328                {
1329                   s[0] = toupper(s[0]);
1330                   t->label = eina_stringshare_add(s);
1331                   free(s);
1332                }
1333              else
1334                t->label = eina_stringshare_add(s);
1335           }
1336         else
1337           {
1338              s = strdup(ecore_file_file_get(th));
1339              if (s)
1340                {
1341                   s[0] = toupper(s[0]);
1342                   ext = strrchr(s, '.');
1343                   if (ext) *ext = 0;
1344                   t->label = eina_stringshare_add(s);
1345                   free(s);
1346                }
1347              else
1348                t->label = eina_stringshare_add(s);
1349           }
1350         themes = eina_list_append(themes, t);
1351         elm_list_item_append(li, t->label, NULL, NULL, _theme_sel, t);
1352      }
1353    elm_theme_name_available_list_free(list);
1354
1355    elm_list_go(li);
1356
1357    pd = elm_frame_add(win);
1358    elm_object_style_set(pd, "pad_medium");
1359    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1360    evas_object_size_hint_align_set(pd, 0.9, 0.9);
1361    elm_table_pack(tb, pd, 0, 0, 1, 1);
1362    evas_object_show(pd);
1363
1364    /* FIXME: not implemented yet
1365       bt = elm_button_add(win);
1366       evas_object_smart_callback_add(bt, "clicked", _theme_browse, win);
1367       elm_button_label_set(bt, "Browse...");
1368       evas_object_size_hint_weight_set(bt, 1.0, 1.0);
1369       evas_object_size_hint_align_set(bt, 0.9, 0.9);
1370       elm_frame_content_set(pd, bt);
1371       evas_object_show(bt);
1372     */
1373    pd = elm_frame_add(win);
1374    elm_object_style_set(pd, "pad_medium");
1375    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1376    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1377    elm_table_pack(tb, pd, 0, 1, 1, 1);
1378    evas_object_show(pd);
1379
1380    fr = elm_frame_add(win);
1381    elm_frame_label_set(fr, "Preview");
1382    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1383    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1384    elm_frame_content_set(pd, fr);
1385    evas_object_show(fr);
1386
1387    sc = elm_scroller_add(win);
1388    elm_scroller_bounce_set(sc, 0, 0);
1389    evas_object_size_hint_weight_set(sc, 1.0, 1.0);
1390    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1391    elm_frame_content_set(fr, sc);
1392    evas_object_show(sc);
1393
1394    sample = _sample_theme_new(win);
1395    elm_scroller_content_set(sc, sample);
1396    evas_object_show(sample);
1397    evas_object_data_set(win, "theme_preview", sample);
1398
1399    /////////////////////////////////////////////
1400    sp = elm_separator_add(win);
1401    elm_separator_horizontal_set(sp, 1);
1402    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1403    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1404    elm_table_pack(tb, sp, 0, 2, 1, 1);
1405    evas_object_show(sp);
1406
1407    pd = elm_frame_add(win);
1408    elm_object_style_set(pd, "pad_medium");
1409    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1410    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1411    elm_table_pack(tb, pd, 0, 3, 1, 1);
1412    evas_object_show(pd);
1413
1414    bt = elm_button_add(win);
1415    evas_object_smart_callback_add(bt, "clicked", _theme_use, win);
1416    elm_button_label_set(bt, "Use Theme");
1417    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1418    evas_object_size_hint_align_set(bt, 0.5, 0.5);
1419    elm_frame_content_set(pd, bt);
1420    evas_object_show(bt);
1421
1422    evas_object_data_set(win, "themes", tb);
1423    elm_pager_content_push(pager, tb);
1424 }
1425
1426 static void
1427 _font_preview_update(Evas_Object *win)
1428 {
1429    Evas_Font_Size sz;
1430    const char *name;
1431
1432    if (!fdata.cur_font)
1433      return;
1434
1435    name = elm_font_fontconfig_name_get(fdata.cur_font, fdata.cur_style);
1436    sz = fdata.cur_size;
1437
1438    if (sz < 0)
1439      sz = (-sz * 10) / 100;
1440    if (sz == 0)
1441      sz = 10;
1442
1443    edje_object_text_class_set(evas_object_data_get(win, "font_preview"),
1444                               "font_preview", name, sz);
1445
1446    elm_font_fontconfig_name_free(name);
1447 }
1448
1449 static void
1450 _font_classes_list_sel(void *data   __UNUSED__,
1451                        Evas_Object *obj,
1452                        void        *event_info)
1453 {
1454    const Eina_List *f_names_items, *l;
1455    Elm_Text_Class_Data *tc_data;
1456    Evas_Object *f_names_list;
1457    Elm_List_Item *it;
1458
1459    tc_data = elm_list_item_data_get(event_info);
1460
1461    f_names_list = evas_object_data_get(elm_object_top_widget_get(obj),
1462                                        "font_names_list");
1463    ELM_LIST_ENABLE(f_names_list);
1464
1465    f_names_items = elm_list_items_get(f_names_list);
1466
1467    EINA_LIST_FOREACH(f_names_items, l, it)
1468      {
1469         const char *l;
1470
1471         l = elm_list_item_label_get(it);
1472
1473         if (tc_data->font && !strcmp(l, tc_data->font))
1474           {
1475              elm_list_item_selected_set(it, EINA_TRUE);
1476              elm_list_item_show(it);
1477              break;
1478           }
1479      }
1480 }
1481
1482 static void
1483 _font_names_list_sel(void *data   __UNUSED__,
1484                      Evas_Object *obj,
1485                      void        *event_info)
1486 {
1487    Evas_Object *style_list, *cls_list, *sizes_list, *win;
1488    const char *style, *sel_font;
1489    Elm_Text_Class_Data *tc_data;
1490    Elm_List_Item *it, *fc_it;
1491    Elm_Font_Properties *efp;
1492    const Eina_List *l;
1493
1494    it = event_info;
1495    sel_font = elm_list_item_label_get(it);
1496
1497    win = elm_object_top_widget_get(obj);
1498    style_list = evas_object_data_get(win, "font_styles_list");
1499    cls_list = evas_object_data_get(win, "font_classes_list");
1500    sizes_list = evas_object_data_get(win, "font_sizes_list");
1501
1502    fc_it = elm_list_selected_item_get(cls_list);
1503    if (!fc_it) return;  /* should not happen, fonts list disabled in
1504                          * this case */
1505
1506    eina_stringshare_replace(&fdata.cur_font, sel_font);
1507
1508    tc_data = elm_list_item_data_get(fc_it);
1509    if (tc_data->font) eina_stringshare_del(tc_data->font);
1510    if (fdata.cur_font) tc_data->font = eina_stringshare_ref(fdata.cur_font);
1511
1512    /* load styles list */
1513    efp = eina_hash_find(fdata.font_hash, sel_font);
1514
1515    ELM_LIST_ENABLE(style_list);
1516    elm_list_clear(style_list);
1517
1518    evas_event_freeze(evas_object_evas_get(style_list));
1519    edje_freeze();
1520
1521    it = NULL;
1522
1523    EINA_LIST_FOREACH(efp->styles, l, style)
1524      {
1525         Elm_List_Item *i;
1526
1527         i = elm_list_item_append(style_list, style, NULL, NULL,
1528                                  _font_styles_list_sel, NULL);
1529
1530         if (tc_data->style && (!strcmp(style, tc_data->style)))
1531           it = i;
1532      }
1533
1534    elm_list_go(style_list);
1535
1536    edje_thaw();
1537    evas_event_thaw(evas_object_evas_get(style_list));
1538
1539    if (it)
1540      elm_list_item_selected_set(it, EINA_TRUE);
1541
1542    _font_preview_update(win);
1543 }
1544
1545 static void
1546 _font_styles_list_sel(void *data   __UNUSED__,
1547                       Evas_Object *obj,
1548                       void        *event_info)
1549 {
1550    Evas_Object *fc_list, *fs_list, *win;
1551    Elm_Text_Class_Data *tc_data;
1552    const Eina_List *l;
1553    Elm_List_Item *it;
1554
1555    win = elm_object_top_widget_get(obj);
1556    fc_list = evas_object_data_get(win, "font_classes_list");
1557    fs_list = evas_object_data_get(win, "font_sizes_list");
1558
1559    it = elm_list_selected_item_get(fc_list);
1560    if (!it) return;  /* should not happen */
1561
1562    eina_stringshare_replace(&fdata.cur_style,
1563                             elm_list_item_label_get(event_info));
1564    ELM_LIST_ENABLE(fs_list);
1565
1566    tc_data = elm_list_item_data_get(it);
1567    eina_stringshare_del(tc_data->style);
1568    tc_data->style = eina_stringshare_ref(fdata.cur_style);
1569
1570    evas_event_freeze(evas_object_evas_get(fs_list));
1571    edje_freeze();
1572
1573    EINA_LIST_FOREACH(elm_list_items_get(fs_list), l, it)
1574      {
1575         Elm_Font_Size_Data *sdata;
1576
1577         sdata = elm_list_item_data_get(it);
1578         elm_list_item_selected_set(l->data, EINA_FALSE);
1579
1580         if (tc_data->size == sdata->size)
1581           {
1582              elm_list_item_selected_set(it, EINA_TRUE);
1583              elm_list_item_show(it);
1584              break;
1585           }
1586      }
1587
1588    edje_thaw();
1589    evas_event_thaw(evas_object_evas_get(fs_list));
1590
1591    _font_preview_update(win);
1592 }
1593
1594 static void
1595 _font_sizes_list_sel(void *data       __UNUSED__,
1596                      Evas_Object *obj __UNUSED__,
1597                      void *event_info __UNUSED__)
1598 {
1599    Elm_Text_Class_Data *tc_data;
1600    Evas_Object *fc_list, *win;
1601    Elm_Font_Size_Data *sd;
1602    Elm_List_Item *it;
1603
1604    win = elm_object_top_widget_get(obj);
1605    fc_list = evas_object_data_get(win, "font_classes_list");
1606
1607    it = elm_list_selected_item_get(fc_list);
1608    if (!it) return;  /* should not happen */
1609
1610    sd = elm_list_item_data_get(event_info);
1611    fdata.cur_size = sd->size;
1612
1613    tc_data = elm_list_item_data_get(it);
1614    tc_data->size = fdata.cur_size;
1615
1616    _font_preview_update(win);
1617 }
1618
1619 static void
1620 _fstyle_list_unselect_cb(void *data       __UNUSED__,
1621                          Evas_Object     *obj,
1622                          void *event_info __UNUSED__)
1623 {
1624    Evas_Object *sizes_list, *win;
1625
1626    if (elm_list_selected_item_get(obj)) return;
1627
1628    win = elm_object_top_widget_get(obj);
1629
1630    sizes_list = evas_object_data_get(win, "font_sizes_list");
1631    ELM_LIST_DISABLE(sizes_list);
1632 }
1633
1634 static void
1635 _fc_list_unselect_cb(void *data       __UNUSED__,
1636                      Evas_Object     *obj,
1637                      void *event_info __UNUSED__)
1638 {
1639    Evas_Object *font_names_list, *styles_list, *sizes_list, *win;
1640
1641    if (elm_list_selected_item_get(obj)) return;
1642
1643    win = elm_object_top_widget_get(obj);
1644
1645    font_names_list = evas_object_data_get(win, "font_names_list");
1646    ELM_LIST_DISABLE(font_names_list);
1647
1648    styles_list = evas_object_data_get(win, "font_styles_list");
1649    ELM_LIST_DISABLE(styles_list);
1650
1651    sizes_list = evas_object_data_get(win, "font_sizes_list");
1652    ELM_LIST_DISABLE(sizes_list);
1653 }
1654
1655 static void
1656 _font_classes_list_load(Evas_Object *li)
1657 {
1658    Elm_Text_Class_Data *tc_data;
1659    Eina_List *l;
1660    Evas *evas;
1661
1662    evas = evas_object_evas_get(li);
1663    evas_event_freeze(evas);
1664    edje_freeze();
1665
1666    EINA_LIST_FOREACH(fdata.text_classes, l, tc_data)
1667      elm_list_item_append(li, tc_data->desc, NULL, NULL,
1668                           _font_classes_list_sel, tc_data);
1669
1670    evas_object_smart_callback_add(li, "unselected", _fc_list_unselect_cb,
1671                                   NULL);
1672
1673    elm_list_go(li);
1674    edje_thaw();
1675    evas_event_thaw(evas);
1676 }
1677
1678 static void
1679 _fonts_data_fill(Evas *evas)
1680 {
1681    const Eina_List *fo_list, *text_classes, *l;
1682    Elm_Text_Class_Data *tc_data;
1683    Elm_Font_Size_Data *sd;
1684    Elm_Font_Overlay *efo;
1685    Eina_List *evas_fonts;
1686    Elm_Text_Class *etc;
1687    int i;
1688
1689    evas_fonts = evas_font_available_list(evas);
1690    fdata.font_hash = elm_font_available_hash_add(evas_fonts);
1691    evas_font_available_list_free(evas, evas_fonts);
1692
1693    text_classes = elm_text_classes_list_get();
1694    fo_list = elm_font_overlay_list_get();
1695
1696    EINA_LIST_FOREACH(text_classes, l, etc)
1697      {
1698         const Eina_List *ll;
1699
1700         tc_data = calloc(1, sizeof(*tc_data));
1701         tc_data->name = eina_stringshare_add(etc->name);
1702         tc_data->desc = eina_stringshare_add(etc->desc);
1703
1704         EINA_LIST_FOREACH(fo_list, ll, efo)
1705           {
1706              if (strcmp(tc_data->name, efo->text_class))
1707                continue;
1708
1709              if (efo->font)
1710                {
1711                   Elm_Font_Properties *efp;
1712
1713                   efp = elm_font_properties_get(efo->font);
1714                   if (efp)
1715                     {
1716                        tc_data->font = eina_stringshare_add(efp->name);
1717                        /* we're sure we recorded with only 1 style selected */
1718                        tc_data->style = eina_stringshare_add(efp->styles->data);
1719                        elm_font_properties_free(efp);
1720                     }
1721                }
1722              tc_data->size = efo->size;
1723           }
1724
1725         fdata.text_classes = eina_list_append(fdata.text_classes, tc_data);
1726      }
1727
1728    elm_text_classes_list_free(text_classes);
1729
1730    /* FIXME: hinting later */
1731    /* fdata.hinting = e_config->font_hinting; */
1732
1733    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1734    sd->size_str = eina_stringshare_add("Tiny");
1735    sd->size = -50;
1736    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1737
1738    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1739    sd->size_str = eina_stringshare_add("Small");
1740    sd->size = -80;
1741    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1742
1743    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1744    sd->size_str = eina_stringshare_add("Normal");
1745    sd->size = -100;
1746    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1747
1748    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1749    sd->size_str = eina_stringshare_add("Big");
1750    sd->size = -150;
1751    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1752
1753    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1754    sd->size_str = eina_stringshare_add("Really Big");
1755    sd->size = -190;
1756    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1757
1758    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1759    sd->size_str = eina_stringshare_add("Huge");
1760    sd->size = -250;
1761    fdata.font_scale_list = eina_list_append(fdata.font_scale_list, sd);
1762
1763    for (i = 5; i < 51; i++)
1764      {
1765         char str[16];
1766
1767         str[0] = 0;
1768         snprintf(str, sizeof(str), "%d pixels", i);
1769
1770         sd = calloc(1, sizeof(Elm_Font_Size_Data));
1771         sd->size_str = eina_stringshare_add(str);
1772         sd->size = i;
1773         fdata.font_px_list = eina_list_append(fdata.font_px_list, sd);
1774      }
1775 }
1776
1777 static int
1778 _font_sort_cb(const void *data1,
1779               const void *data2)
1780 {
1781    if (!data1) return 1;
1782    if (!data2) return -1;
1783    return strcmp(data1, data2);
1784 }
1785
1786 static void
1787 _font_sizes_list_load(Evas_Object *size_list)
1788 {
1789    Elm_Font_Size_Data *size_data;
1790    Eina_List *l;
1791    Evas *evas;
1792
1793    evas = evas_object_evas_get(size_list);
1794    evas_event_freeze(evas);
1795    edje_freeze();
1796
1797    EINA_LIST_FOREACH(fdata.font_scale_list, l, size_data)
1798      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1799                           _font_sizes_list_sel, size_data);
1800
1801    EINA_LIST_FOREACH(fdata.font_px_list, l, size_data)
1802      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1803                           _font_sizes_list_sel, size_data);
1804
1805    elm_list_go(size_list);
1806    edje_thaw();
1807    evas_event_thaw(evas);
1808 }
1809
1810 static void
1811 _fnames_list_unselect_cb(void *data       __UNUSED__,
1812                          Evas_Object     *obj,
1813                          void *event_info __UNUSED__)
1814 {
1815    Evas_Object *styles_list, *sizes_list, *win;
1816
1817    if (elm_list_selected_item_get(obj)) return;
1818
1819    win = elm_object_top_widget_get(obj);
1820
1821    styles_list = evas_object_data_get(win, "font_styles_list");
1822    ELM_LIST_DISABLE(styles_list);
1823
1824    sizes_list = evas_object_data_get(win, "font_sizes_list");
1825    ELM_LIST_DISABLE(sizes_list);
1826 }
1827
1828 static Eina_Bool
1829 _font_list_fill(const Eina_Hash *hash __UNUSED__,
1830                 const void *key       __UNUSED__,
1831                 void                 *data,
1832                 void                 *fdata)
1833 {
1834    Elm_Font_Properties *efp;
1835    Eina_List **flist;
1836
1837    flist = fdata;
1838    efp = data;
1839
1840    *flist = eina_list_append(*flist, efp->name);
1841
1842    return EINA_TRUE;
1843 }
1844
1845 static void
1846 _font_names_list_load(Evas_Object *flist)
1847 {
1848    Eina_List *l, *names_list = NULL;
1849    const char *font;
1850    Evas *evas;
1851
1852    evas = evas_object_evas_get(flist);
1853    evas_event_freeze(evas);
1854    edje_freeze();
1855
1856    eina_hash_foreach(fdata.font_hash, _font_list_fill, &names_list);
1857    names_list = eina_list_sort(names_list, eina_list_count(names_list),
1858                                _font_sort_cb);
1859
1860    EINA_LIST_FOREACH(names_list, l, font)
1861      elm_list_item_append(flist, font, NULL, NULL, _font_names_list_sel, NULL);
1862
1863    EINA_LIST_FREE(names_list, font) ;
1864
1865    evas_object_smart_callback_add(flist, "unselected",
1866                                   _fnames_list_unselect_cb, NULL);
1867
1868    elm_list_go(flist);
1869
1870    edje_thaw();
1871    evas_event_thaw(evas);
1872 }
1873
1874 static void
1875 _status_config_fonts(Evas_Object *win,
1876                      Evas_Object *pager)
1877 {
1878    Evas_Object *base, *fr, *li, *rc, *preview, *sp, *pd, *bt, *bx;
1879    char buf[PATH_MAX];
1880
1881    _fonts_data_fill(evas_object_evas_get(win));
1882
1883    base = elm_table_add(win);
1884    evas_object_size_hint_weight_set(base, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1885    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1886
1887    /* yeah, dummy rectangles are ugly as hell, but no good way yet of
1888       fixing sizes */
1889    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1890    evas_object_size_hint_min_set(rc, 70, 170);
1891    elm_table_pack(base, rc, 1, 0, 1, 1);
1892
1893    fr = elm_frame_add(win);
1894    elm_frame_label_set(fr, "Font Class");
1895    elm_table_pack(base, fr, 0, 0, 1, 2);
1896    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1897    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1898    evas_object_show(fr);
1899
1900    /* FIXME: no multiselection for this list, for now */
1901    li = elm_list_add(win);
1902    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1903    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1904    elm_frame_content_set(fr, li);
1905    evas_object_show(li);
1906
1907    evas_object_data_set(win, "font_classes_list", li);
1908    _font_classes_list_load(li);
1909
1910    fr = elm_frame_add(win);
1911    elm_frame_label_set(fr, "Font");
1912    elm_table_pack(base, fr, 1, 0, 1, 2);
1913    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1914    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1915    evas_object_show(fr);
1916
1917    li = elm_list_add(win);
1918    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1919    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1920    elm_frame_content_set(fr, li);
1921    evas_object_show(li);
1922
1923    evas_object_data_set(win, "font_names_list", li);
1924    _font_names_list_load(li);
1925    ELM_LIST_DISABLE(li);
1926
1927    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1928    evas_object_size_hint_min_set(rc, 70, 130);
1929    elm_table_pack(base, rc, 1, 2, 1, 1);
1930
1931    fr = elm_frame_add(win);
1932    elm_frame_label_set(fr, "Style");
1933    elm_table_pack(base, fr, 0, 2, 1, 1);
1934    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1935    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1936    evas_object_show(fr);
1937    ELM_LIST_DISABLE(li);
1938
1939    li = elm_list_add(win);
1940    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1941    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1942    elm_frame_content_set(fr, li);
1943    evas_object_show(li);
1944
1945    evas_object_data_set(win, "font_styles_list", li);
1946    evas_object_smart_callback_add(li, "unselected", _fstyle_list_unselect_cb,
1947                                   NULL);
1948
1949    fr = elm_frame_add(win);
1950    elm_frame_label_set(fr, "Size");
1951    elm_table_pack(base, fr, 1, 2, 1, 1);
1952    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1953    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1954    evas_object_show(fr);
1955
1956    li = elm_list_add(win);
1957    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1958    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1959    elm_frame_content_set(fr, li);
1960    evas_object_show(li);
1961
1962    evas_object_data_set(win, "font_sizes_list", li);
1963    _font_sizes_list_load(li);
1964    ELM_LIST_DISABLE(li);
1965
1966    bx = elm_box_add(win);
1967    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1968    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
1969    elm_table_pack(base, bx, 0, 3, 2, 1);
1970    evas_object_show(bx);
1971
1972    /* FIXME: what to do here? dedicated widget? some new entry API set? */
1973    snprintf(buf, sizeof(buf), "%s/objects/font_preview.edj", PACKAGE_DATA_DIR);
1974    preview = elm_layout_add(win);
1975    elm_layout_file_set(preview, buf, "font_preview");
1976    elm_layout_text_set(preview, "elm.text", "Preview Text — 我真的会写中文");
1977    evas_object_size_hint_weight_set(preview, EVAS_HINT_EXPAND,
1978                                     EVAS_HINT_EXPAND);
1979    evas_object_size_hint_align_set(preview, EVAS_HINT_FILL, EVAS_HINT_FILL);
1980    evas_object_show(preview);
1981
1982    elm_box_pack_end(bx, preview);
1983    evas_object_data_set(win, "font_preview", elm_layout_edje_get(preview));
1984
1985    /////////////////////////////////////////////
1986    sp = elm_separator_add(win);
1987    elm_separator_horizontal_set(sp, EINA_TRUE);
1988    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
1989    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1990    elm_table_pack(base, sp, 0, 4, 2, 1);
1991    evas_object_show(sp);
1992
1993    pd = elm_frame_add(win);
1994    elm_object_style_set(pd, "pad_medium");
1995    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
1996    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1997    elm_table_pack(base, pd, 0, 5, 2, 1);
1998    evas_object_show(pd);
1999
2000    bx = elm_box_add(win);
2001    elm_box_horizontal_set(bx, EINA_TRUE);
2002    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2003    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2004    evas_object_show(bx);
2005
2006    bt = elm_button_add(win);
2007    evas_object_smart_callback_add(bt, "clicked", _font_overlay_set_all, win);
2008    elm_button_label_set(bt, "Set to All");
2009    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2010    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2011    elm_box_pack_end(bx, bt);
2012    evas_object_show(bt);
2013
2014    bt = elm_button_add(win);
2015    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset, win);
2016    elm_button_label_set(bt, "Reset");
2017    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2018    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2019    elm_box_pack_end(bx, bt);
2020    evas_object_show(bt);
2021
2022    bt = elm_button_add(win);
2023    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset_all, win);
2024    elm_button_label_set(bt, "Reset All");
2025    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2026    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2027    elm_box_pack_end(bx, bt);
2028    evas_object_show(bt);
2029
2030    bt = elm_button_add(win);
2031    evas_object_smart_callback_add(bt, "clicked", _font_overlay_change, win);
2032    elm_button_label_set(bt, "Apply");
2033    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2034    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2035    elm_box_pack_end(bx, bt);
2036    evas_object_show(bt);
2037
2038    elm_frame_content_set(pd, bx);
2039
2040    evas_object_data_set(win, "fonts", base);
2041
2042    elm_pager_content_push(pager, base);
2043 }
2044
2045 static void
2046 _engines_list_item_del_cb(void            *data,
2047                           Evas_Object *obj __UNUSED__,
2048                           void *event_info __UNUSED__)
2049 {
2050    free(data);
2051 }
2052
2053 static void
2054 _profiles_list_item_del_cb(void            *data,
2055                            Evas_Object *obj __UNUSED__,
2056                            void *event_info __UNUSED__)
2057 {
2058    free(data);
2059 }
2060
2061 static void
2062 _profiles_list_selected_cb(void            *data,
2063                            Evas_Object     *obj,
2064                            void *event_info __UNUSED__)
2065 {
2066    const char *cur_profile = NULL;
2067    const char *sel_profile, *pdir;
2068    Eina_Bool cur_selected;
2069    const char *prof_name;
2070    char buf[PATH_MAX];
2071    Evas_Object *en;
2072 #ifdef ELM_EFREET
2073    Efreet_Desktop *desk = NULL;
2074 #endif
2075
2076    sel_profile = data;
2077    if (!sel_profile)
2078      return;
2079
2080    cur_profile = elm_profile_current_get();
2081    cur_selected = !strcmp(cur_profile, sel_profile);
2082
2083    pdir = elm_profile_dir_get(sel_profile, EINA_FALSE);
2084 #ifdef ELM_EFREET
2085    snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2086    desk = efreet_desktop_new(buf);
2087    if ((desk) && (desk->name)) prof_name = desk->name;
2088    else
2089 #endif
2090    prof_name = cur_profile;
2091
2092    if (!pdir)
2093      elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2094                              EINA_TRUE);
2095    else
2096      {
2097         elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2098                                 EINA_TRUE);
2099         elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2100                                 EINA_FALSE);
2101         elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2102                                 EINA_FALSE);
2103         elm_profile_dir_free(pdir);
2104      }
2105
2106    snprintf(buf, sizeof(buf), "<hilight>Selected profile: %s</><br>",
2107             prof_name);
2108    elm_label_label_set(evas_object_data_get(obj, "prof_name_lbl"), buf);
2109
2110    en = evas_object_data_get(obj, "prof_desc_entry");
2111 #ifdef ELM_EFREET
2112    if (desk) elm_scrolled_entry_entry_set(en, desk->comment);
2113    else
2114 #endif
2115    elm_scrolled_entry_entry_set(en, "Unknown");
2116
2117 #ifdef ELM_EFREET
2118    if (desk) efreet_desktop_free(desk);
2119 #endif
2120 }
2121
2122 static void
2123 _profiles_list_fill(Evas_Object *l_widget,
2124                     Eina_List   *p_names)
2125 {
2126    const char *cur_profile = NULL;
2127    const char *profile;
2128    void *sel_it = NULL;
2129    Eina_List *l;
2130
2131    if (!p_names)
2132      return;
2133
2134    elm_list_clear(l_widget);
2135
2136    cur_profile = elm_profile_current_get();
2137
2138    EINA_LIST_FOREACH(p_names, l, profile)
2139      {
2140 #ifdef ELM_EFREET
2141         Efreet_Desktop *desk = NULL;
2142 #endif
2143         const char *label, *ext, *pdir;
2144         char buf[PATH_MAX];
2145         Elm_List_Item *it;
2146         Evas_Object *ic;
2147
2148         pdir = elm_profile_dir_get(profile, EINA_FALSE);
2149         label = profile;
2150
2151 #ifdef ELM_EFREET
2152         snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2153         desk = efreet_desktop_new(buf);
2154         if ((desk) && (desk->name)) label = desk->name;
2155 #endif
2156
2157         buf[0] = 0;
2158         if (pdir) snprintf(buf, sizeof(buf), "%s/icon.edj", pdir);
2159 #ifdef ELM_EFREET
2160         if ((desk) && (desk->icon) && (pdir))
2161           snprintf(buf, sizeof(buf), "%s/%s", pdir, desk->icon);
2162 #endif
2163         ic = elm_icon_add(l_widget);
2164         ext = strrchr(buf, '.');
2165         if (ext)
2166           {
2167              if (!strcmp(ext, ".edj")) elm_icon_file_set(ic, buf, "icon");
2168              else elm_icon_file_set(ic, buf, NULL);
2169           }
2170
2171         evas_object_size_hint_aspect_set(ic, EVAS_ASPECT_CONTROL_VERTICAL,
2172                                          1, 1);
2173         evas_object_show(ic);
2174
2175         it = elm_list_item_append(l_widget, label, ic, NULL,
2176                                   _profiles_list_selected_cb, strdup(profile));
2177         elm_list_item_del_cb_set(it, _profiles_list_item_del_cb);
2178         if (cur_profile && !strcmp(profile, cur_profile))
2179           sel_it = it;
2180
2181         elm_profile_dir_free(pdir);
2182
2183 #ifdef ELM_EFREET
2184         if (desk) efreet_desktop_free(desk);
2185 #endif
2186      }
2187
2188    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2189    elm_list_go(l_widget);
2190 }
2191
2192 static void
2193 _profiles_list_unselect_cb(void *data       __UNUSED__,
2194                            Evas_Object     *obj,
2195                            void *event_info __UNUSED__)
2196 {
2197    if (elm_list_selected_item_get(obj)) return;
2198    elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2199                            EINA_TRUE);
2200    elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2201                            EINA_TRUE);
2202    elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2203                            EINA_TRUE);
2204 }
2205
2206 static void
2207 _status_config_profiles(Evas_Object *win,
2208                         Evas_Object *pager)
2209 {
2210    Evas_Object *li, *bx, *fr_bx1, *fr_bx2, *btn_bx, *fr, *lb, *en, *sp, *pd,
2211    *bt;
2212    Eina_List *profs;
2213    Evas *evas;
2214
2215    bx = elm_box_add(win);
2216    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2217    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2218
2219    fr_bx1 = elm_box_add(win);
2220    evas_object_size_hint_weight_set(fr_bx1, EVAS_HINT_EXPAND,
2221                                     EVAS_HINT_EXPAND);
2222    evas_object_size_hint_align_set(fr_bx1, EVAS_HINT_FILL, EVAS_HINT_FILL);
2223    elm_box_homogeneous_set(fr_bx1, EINA_TRUE);
2224    evas_object_show(fr_bx1);
2225
2226    fr_bx2 = elm_box_add(win);
2227    evas_object_size_hint_weight_set(fr_bx2, EVAS_HINT_EXPAND,
2228                                     EVAS_HINT_EXPAND);
2229    evas_object_size_hint_align_set(fr_bx2, EVAS_HINT_FILL, EVAS_HINT_FILL);
2230    evas_object_show(fr_bx2);
2231
2232    fr = elm_frame_add(win);
2233    elm_frame_label_set(fr, "Available Profiles");
2234    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2235    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2236    elm_frame_content_set(fr, fr_bx1);
2237    elm_box_pack_end(bx, fr);
2238    evas_object_show(fr);
2239
2240    li = elm_list_add(win);
2241    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2242    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2243    evas_object_smart_callback_add(li, "unselected", _profiles_list_unselect_cb,
2244                                   NULL);
2245
2246    profs = elm_profile_list_get();
2247
2248    evas_object_show(li);
2249    elm_box_pack_end(fr_bx2, li);
2250
2251    lb = elm_label_add(win);
2252    evas_object_size_hint_weight_set(lb, EVAS_HINT_EXPAND, 0.0);
2253    evas_object_size_hint_align_set(lb, EVAS_HINT_FILL, 0.5);
2254
2255    evas_object_show(lb);
2256
2257    en = elm_scrolled_entry_add(win);
2258    elm_scrolled_entry_editable_set(en, EINA_FALSE);
2259    evas_object_size_hint_weight_set(en, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2260    evas_object_size_hint_align_set(en, EVAS_HINT_FILL, EVAS_HINT_FILL);
2261    evas_object_show(en);
2262
2263    evas_object_data_set(li, "prof_name_lbl", lb);
2264    evas_object_data_set(li, "prof_desc_entry", en);
2265
2266    elm_box_pack_end(fr_bx2, lb);
2267    elm_box_pack_end(fr_bx1, fr_bx2);
2268    elm_box_pack_end(fr_bx1, en);
2269
2270    /////////////////////////////////////////////
2271    sp = elm_separator_add(win);
2272    elm_separator_horizontal_set(sp, EINA_TRUE);
2273    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2274    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2275    elm_box_pack_end(bx, sp);
2276    evas_object_show(sp);
2277
2278    pd = elm_frame_add(win);
2279    elm_object_style_set(pd, "pad_medium");
2280    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
2281    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2282    elm_box_pack_end(bx, pd);
2283    evas_object_show(pd);
2284
2285    btn_bx = elm_box_add(win);
2286    elm_box_horizontal_set(btn_bx, EINA_TRUE);
2287    evas_object_size_hint_weight_set(btn_bx, EVAS_HINT_EXPAND,
2288                                     EVAS_HINT_EXPAND);
2289    evas_object_size_hint_align_set(btn_bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2290    evas_object_show(btn_bx);
2291
2292    bt = elm_button_add(win);
2293    evas_object_smart_callback_add(bt, "clicked", _profile_use, li);
2294    elm_button_label_set(bt, "Use");
2295    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2296    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2297    elm_box_pack_end(btn_bx, bt);
2298    evas_object_show(bt);
2299
2300    evas_object_data_set(li, "prof_use_btn", bt);
2301
2302    bt = elm_button_add(win);
2303    evas_object_smart_callback_add(bt, "clicked", _btn_todo, NULL); /* TODO */
2304    elm_button_label_set(bt, "Delete");
2305    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2306    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2307    elm_box_pack_end(btn_bx, bt);
2308    evas_object_show(bt);
2309
2310    evas_object_data_set(li, "prof_del_btn", bt);
2311
2312    bt = elm_button_add(win);
2313    evas_object_smart_callback_add(bt, "clicked", _profile_reset, li);
2314    elm_button_label_set(bt, "Reset");
2315    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2316    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2317    elm_box_pack_end(btn_bx, bt);
2318    evas_object_show(bt);
2319
2320    evas_object_data_set(li, "prof_reset_btn", bt);
2321
2322    bt = elm_button_add(win);
2323    evas_object_smart_callback_add(bt, "clicked", _btn_todo, NULL); /* TODO */
2324    elm_button_label_set(bt, "Add new");
2325    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2326    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2327    elm_box_pack_end(btn_bx, bt);
2328    evas_object_show(bt);
2329
2330    elm_frame_content_set(pd, btn_bx);
2331
2332    evas = evas_object_evas_get(li);
2333    evas_event_freeze(evas);
2334    edje_freeze();
2335
2336    _profiles_list_fill(li, profs);
2337
2338    elm_profile_list_free(profs);
2339
2340    edje_thaw();
2341    evas_event_thaw(evas);
2342
2343    evas_object_data_set(win, "profiles", bx);
2344    elm_pager_content_push(pager, bx);
2345 }
2346
2347 static void
2348 _status_config_scrolling(Evas_Object *win,
2349                          Evas_Object *pager)
2350 {
2351    Evas_Object *lb, *pd, *bx, *sl, *sp, *ck, *sc;
2352
2353    bx = elm_box_add(win);
2354    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
2355    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
2356
2357    sc = elm_scroller_add(win);
2358    evas_object_size_hint_weight_set(sc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2359    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
2360    elm_scroller_bounce_set(sc, EINA_FALSE, EINA_TRUE);
2361    evas_object_show(sc);
2362    elm_scroller_content_set(sc, bx);
2363
2364    ck = elm_check_add(win);
2365    elm_object_tooltip_text_set(ck, "Set whether scrollers should bounce<br>"
2366                                    "when they reach their viewport's edge<br>"
2367                                    "during a scroll");
2368    elm_check_label_set(ck, "Enable scroll bounce");
2369    evas_object_data_set(win, "scroll_bounce_check", ck);
2370    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2371    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2372    elm_check_state_set(ck, elm_scroll_bounce_enabled_get());
2373    elm_box_pack_end(bx, ck);
2374    evas_object_show(ck);
2375
2376    evas_object_smart_callback_add(ck, "changed", sb_change, NULL);
2377
2378    LABEL_FRAME_ADD("<hilight>Scroll bounce friction</>");
2379
2380    sl = elm_slider_add(win);
2381    elm_object_tooltip_text_set(sl, "This is the amount of inertia a <br>"
2382                                    "scroller will impose at bounce animations");
2383    evas_object_data_set(win, "bounce_friction_slider", sl);
2384    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2385    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2386    elm_slider_span_size_set(sl, 120);
2387    elm_slider_unit_format_set(sl, "%1.2f");
2388    elm_slider_indicator_format_set(sl, "%1.2f");
2389    elm_slider_min_max_set(sl, 0.0, 4.0);
2390    elm_slider_value_set(sl, elm_scroll_bounce_friction_get());
2391    elm_box_pack_end(bx, sl);
2392    evas_object_show(sl);
2393
2394    evas_object_smart_callback_add(sl, "changed", bf_round, NULL);
2395    evas_object_smart_callback_add(sl, "delay,changed", bf_change, NULL);
2396
2397    sp = elm_separator_add(win);
2398    elm_separator_horizontal_set(sp, EINA_TRUE);
2399    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2400    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2401    elm_box_pack_end(bx, sp);
2402    evas_object_show(sp);
2403
2404    ck = elm_check_add(win);
2405    elm_object_tooltip_text_set(ck, "Set whether scrollers should be<br>"
2406                                    "draggable from any point in their views");
2407    elm_check_label_set(ck, "Enable thumb scroll");
2408    evas_object_data_set(win, "thumbscroll_check", ck);
2409    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2410    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2411    elm_check_state_set(ck, elm_scroll_thumbscroll_enabled_get());
2412    elm_box_pack_end(bx, ck);
2413    evas_object_show(ck);
2414
2415    evas_object_smart_callback_add(ck, "changed", ts_change, NULL);
2416
2417    LABEL_FRAME_ADD("<hilight>Thumb scroll threshold</>");
2418
2419    sl = elm_slider_add(win);
2420    elm_object_tooltip_text_set(sl, "This is the number of pixels one should<br>"
2421                                    "travel while dragging a scroller's view<br>"
2422                                    "to actually trigger scrolling");
2423    evas_object_data_set(win, "thumbscroll_threshold_slider", sl);
2424    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2425    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2426    elm_slider_span_size_set(sl, 120);
2427    elm_slider_unit_format_set(sl, "%1.0f pixels");
2428    elm_slider_indicator_format_set(sl, "%1.0f");
2429    elm_slider_min_max_set(sl, 8.0, 50.0);
2430    elm_slider_value_set(sl, elm_scroll_thumbscroll_threshold_get());
2431    elm_box_pack_end(bx, sl);
2432    evas_object_show(sl);
2433
2434    evas_object_smart_callback_add(sl, "changed", tst_round, NULL);
2435    evas_object_smart_callback_add(sl, "delay,changed", tst_change, NULL);
2436
2437    LABEL_FRAME_ADD("<hilight>Thumb scroll momentum threshold</>");
2438
2439    sl = elm_slider_add(win);
2440    elm_object_tooltip_text_set(sl, "This is the minimum speed of mouse <br>"
2441                                    "cursor movement which will trigger<br>"
2442                                    "list self scrolling animation after a<br>"
2443                                    "mouse up event (pixels/second)");
2444    evas_object_data_set(win, "ts_momentum_threshold_slider", sl);
2445    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2446    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2447    elm_slider_span_size_set(sl, 120);
2448    elm_slider_unit_format_set(sl, "%1.0f pixels/s");
2449    elm_slider_indicator_format_set(sl, "%1.0f");
2450    elm_slider_min_max_set(sl, 10.0, 200.0);
2451    elm_slider_value_set(sl, elm_scroll_thumbscroll_momentum_threshold_get());
2452    elm_box_pack_end(bx, sl);
2453    evas_object_show(sl);
2454
2455    evas_object_smart_callback_add(sl, "changed", tsmt_round, NULL);
2456    evas_object_smart_callback_add(sl, "delay,changed", tsmt_change,
2457                                   NULL);
2458
2459    LABEL_FRAME_ADD("<hilight>Thumb scroll friction</>");
2460
2461    sl = elm_slider_add(win);
2462    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br>"
2463                                    "scroller will impose at self scrolling<br>"
2464                                    "animations");
2465    evas_object_data_set(win, "thumbscroll_friction_slider", sl);
2466    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2467    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2468    elm_slider_span_size_set(sl, 120);
2469    elm_slider_unit_format_set(sl, "%1.1f");
2470    elm_slider_indicator_format_set(sl, "%1.1f");
2471    elm_slider_min_max_set(sl, 0.0, 15.0);
2472    elm_slider_value_set(sl, elm_scroll_thumbscroll_friction_get());
2473    elm_box_pack_end(bx, sl);
2474    evas_object_show(sl);
2475
2476    evas_object_smart_callback_add(sl, "changed", tsf_round, NULL);
2477    evas_object_smart_callback_add(sl, "delay,changed", tsf_change, NULL);
2478
2479    LABEL_FRAME_ADD("<hilight>Thumb scroll border friction</>");
2480
2481    sl = elm_slider_add(win);
2482    elm_object_tooltip_text_set(sl, "This is the amount of lag between your<br>"
2483                                    "actual mouse cursor dragging movement<br>"
2484                                    "and a scroller's view movement itself,<br>"
2485                                    "while pushing it into bounce state<br>"
2486                                    "manually");
2487    evas_object_data_set(win, "ts_border_friction_slider", sl);
2488    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2489    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2490    elm_slider_span_size_set(sl, 120);
2491    elm_slider_unit_format_set(sl, "%1.2f");
2492    elm_slider_indicator_format_set(sl, "%1.2f");
2493    elm_slider_min_max_set(sl, 0.0, 1.0);
2494    elm_slider_value_set(sl, elm_scroll_thumbscroll_border_friction_get());
2495    elm_box_pack_end(bx, sl);
2496    evas_object_show(sl);
2497
2498    evas_object_smart_callback_add(sl, "changed", tsbf_round, NULL);
2499    evas_object_smart_callback_add(sl, "delay,changed", tsbf_change, NULL);
2500
2501    sp = elm_separator_add(win);
2502    elm_separator_horizontal_set(sp, EINA_TRUE);
2503    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2504    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2505    elm_box_pack_end(bx, sp);
2506    evas_object_show(sp);
2507
2508    LABEL_FRAME_ADD("<hilight>Page scroll friction</>");
2509
2510    sl = elm_slider_add(win);
2511    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br>"
2512                                    "paged scroller will impose at<br>"
2513                                    "page fitting animations");
2514    evas_object_data_set(win, "page_scroll_friction_slider", sl);
2515    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2516    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2517    elm_slider_span_size_set(sl, 120);
2518    elm_slider_unit_format_set(sl, "%1.1f");
2519    elm_slider_indicator_format_set(sl, "%1.1f");
2520    elm_slider_min_max_set(sl, 0.0, 5.0);
2521    elm_slider_value_set(sl, elm_scroll_page_scroll_friction_get());
2522    elm_box_pack_end(bx, sl);
2523    evas_object_show(sl);
2524
2525    evas_object_smart_callback_add(sl, "changed", ps_round, NULL);
2526    evas_object_smart_callback_add(sl, "delay,changed", ps_change, NULL);
2527
2528    LABEL_FRAME_ADD("<hilight>Bring in scroll friction</>");
2529
2530    sl = elm_slider_add(win);
2531    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br>"
2532                                    "scroller will impose at region bring<br>"
2533                                    "animations");
2534    evas_object_data_set(win, "bring_in_scroll_friction_slider", sl);
2535    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2536    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2537    elm_slider_span_size_set(sl, 120);
2538    elm_slider_unit_format_set(sl, "%1.1f");
2539    elm_slider_indicator_format_set(sl, "%1.1f");
2540    elm_slider_min_max_set(sl, 0.0, 5.0);
2541    elm_slider_value_set(sl, elm_scroll_bring_in_scroll_friction_get());
2542    elm_box_pack_end(bx, sl);
2543    evas_object_show(sl);
2544
2545    evas_object_smart_callback_add(sl, "changed", bis_round, NULL);
2546    evas_object_smart_callback_add(sl, "delay,changed", bis_change, NULL);
2547
2548    LABEL_FRAME_ADD("<hilight>Zoom scroll friction</>");
2549
2550    sl = elm_slider_add(win);
2551    elm_object_tooltip_text_set(sl, "This is the amount of inertia<br>"
2552                                    "scrollers will impose at animations<br>"
2553                                    "triggered by Elementary widgets'<br>"
2554                                    "zooming API");
2555    evas_object_data_set(win, "zoom_scroll_friction_slider", sl);
2556    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2557    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2558    elm_slider_span_size_set(sl, 120);
2559    elm_slider_unit_format_set(sl, "%1.1f");
2560    elm_slider_indicator_format_set(sl, "%1.1f");
2561    elm_slider_min_max_set(sl, 0.0, 5.0);
2562    elm_slider_value_set(sl, elm_scroll_zoom_friction_get());
2563    elm_box_pack_end(bx, sl);
2564    evas_object_show(sl);
2565
2566    evas_object_smart_callback_add(sl, "changed", zf_round, NULL);
2567    evas_object_smart_callback_add(sl, "delay,changed", zf_change, NULL);
2568
2569    evas_object_data_set(win, "scrolling", sc);
2570
2571    elm_pager_content_push(pager, sc);
2572 }
2573
2574 static char *
2575 _engine_name_prettify(const char *engine)
2576 {
2577    char *ret, *ptr;
2578
2579    ret = strdup(engine);
2580    ret[0] -= 0x20;
2581
2582    while ((ptr = strpbrk(ret, "_")))
2583      {
2584         *ptr = ' ';
2585      }
2586
2587    return ret;
2588 }
2589
2590 /* FIXME! ideally, we would trim elm_config.c's _elm_engines list at
2591    build time, making a getter for is as in ecore-evas. */
2592 static Eina_Bool
2593 _elm_engine_supported(const char *engine)
2594 {
2595    const char *engines[] = {
2596       "software_x11",
2597       "fb",
2598       "directfb",
2599       "software_16_x11",
2600       "software_8_x11",
2601       "xrender_x11",
2602       "opengl_x11",
2603       "software_gdi",
2604       "software_16_wince_gdi",
2605       "sdl",
2606       "software_16_sdl",
2607       "opengl_sdl",
2608       NULL
2609    };
2610
2611    unsigned int i;
2612
2613    for (i = 0; engines[i]; i++)
2614      {
2615 #define ENGINE_COMPARE(name) (!strcmp(engines[i], name))
2616         if (ENGINE_COMPARE(engine))
2617           return EINA_TRUE;
2618 #undef ENGINE_COMPARE
2619      }
2620
2621    return EINA_FALSE;
2622 }
2623
2624 static void
2625 _engines_list_fill(Evas_Object *l_widget,
2626                    Eina_List   *e_names)
2627 {
2628    const char *engine, *cur_engine;
2629    void *sel_it = NULL;
2630    Eina_List *l;
2631
2632    if (!e_names)
2633      return;
2634
2635    cur_engine = elm_engine_current_get();
2636
2637    EINA_LIST_FOREACH(e_names, l, engine)
2638      {
2639         const char *label;
2640         Elm_List_Item *it;
2641
2642         if (!_elm_engine_supported(engine))
2643           continue;
2644
2645         label = _engine_name_prettify(engine);
2646
2647         it = elm_list_item_append(l_widget, label, NULL, NULL, NULL,
2648                                   strdup(engine));
2649         elm_list_item_del_cb_set(it, _engines_list_item_del_cb);
2650         free((void *)label);
2651
2652         if (!strcmp(cur_engine, engine))
2653           sel_it = it;
2654      }
2655
2656    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2657    elm_list_go(l_widget);
2658 }
2659
2660 static void
2661 _status_config_rendering(Evas_Object *win,
2662                          Evas_Object *pager)
2663 {
2664    Evas_Object *li, *bx, *fr, *sp, *pd, *bt;
2665    Eina_List *engines;
2666
2667    bx = elm_box_add(win);
2668    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2669    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2670
2671    fr = elm_frame_add(win);
2672    elm_frame_label_set(fr, "Available Engines");
2673    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2674    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2675    elm_box_pack_end(bx, fr);
2676    evas_object_show(fr);
2677
2678    li = elm_list_add(win);
2679    elm_frame_content_set(fr, li);
2680    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2681    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2682
2683    engines = ecore_evas_engines_get();
2684    _engines_list_fill(li, engines);
2685    ecore_evas_engines_free(engines);
2686
2687    evas_object_show(li);
2688    evas_object_data_set(win, "engines_list", li);
2689
2690    /////////////////////////////////////////////
2691    sp = elm_separator_add(win);
2692    elm_separator_horizontal_set(sp, EINA_TRUE);
2693    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2694    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2695    elm_box_pack_end(bx, sp);
2696    evas_object_show(sp);
2697
2698    pd = elm_frame_add(win);
2699    elm_object_style_set(pd, "pad_medium");
2700    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
2701    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2702    elm_box_pack_end(bx, pd);
2703    evas_object_show(pd);
2704
2705    bt = elm_button_add(win);
2706    evas_object_smart_callback_add(bt, "clicked", _engine_use, li);
2707    elm_button_label_set(bt, "Use Engine");
2708    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2709    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2710    elm_frame_content_set(pd, bt);
2711    evas_object_show(bt);
2712
2713    evas_object_data_set(win, "rendering", bx);
2714    elm_pager_content_push(pager, bx);
2715 }
2716
2717 static void
2718 _status_config_caches(Evas_Object *win,
2719                       Evas_Object *pager)
2720 {
2721    Evas_Object *lb, *pd, *bx, *sl, *sp, *ck;
2722
2723    bx = elm_box_add(win);
2724    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
2725    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
2726
2727    LABEL_FRAME_ADD("<hilight>Cache Flush Interval (8 ticks pre second)</>");
2728
2729    sl = elm_slider_add(win);
2730    evas_object_data_set(win, "cache_flush_interval_slider", sl);
2731    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2732    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2733    elm_slider_span_size_set(sl, 120);
2734    elm_slider_unit_format_set(sl, "%1.0f ticks");
2735    elm_slider_indicator_format_set(sl, "%1.0f");
2736    elm_slider_min_max_set(sl, 8.0, 4096.0);
2737    elm_slider_value_set(sl, elm_cache_flush_interval_get());
2738    elm_object_disabled_set(sl, !elm_cache_flush_enabled_get());
2739
2740    ck = elm_check_add(win);
2741    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2742    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2743    elm_check_label_set(ck, "Enable Flushing");
2744    elm_check_state_set(ck, elm_cache_flush_enabled_get());
2745    evas_object_smart_callback_add(ck, "changed", cf_enable, sl);
2746    elm_box_pack_end(bx, ck);
2747    evas_object_show(ck);
2748
2749    elm_box_pack_end(bx, sl);
2750    evas_object_show(sl);
2751
2752    evas_object_smart_callback_add(sl, "changed", cf_round, NULL);
2753    evas_object_smart_callback_add(sl, "delay,changed", cf_change, NULL);
2754
2755    sp = elm_separator_add(win);
2756    elm_separator_horizontal_set(sp, 1);
2757    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2758    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2759    elm_box_pack_end(bx, sp);
2760    evas_object_show(sp);
2761
2762    LABEL_FRAME_ADD("<hilight>Font Cache Size</>");
2763
2764    sl = elm_slider_add(win);
2765    evas_object_data_set(win, "font_cache_slider", sl);
2766    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2767    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2768    elm_slider_span_size_set(sl, 120);
2769    elm_slider_unit_format_set(sl, "%1.1f MB");
2770    elm_slider_indicator_format_set(sl, "%1.1f");
2771    elm_slider_min_max_set(sl, 0.0, 4.0);
2772    elm_slider_value_set(sl, (double)elm_font_cache_get() / 1024.0);
2773    elm_box_pack_end(bx, sl);
2774    evas_object_show(sl);
2775
2776    evas_object_smart_callback_add(sl, "changed", fc_round, NULL);
2777    evas_object_smart_callback_add(sl, "delay,changed", fc_change, NULL);
2778
2779    sp = elm_separator_add(win);
2780    elm_separator_horizontal_set(sp, 1);
2781    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2782    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2783    elm_box_pack_end(bx, sp);
2784    evas_object_show(sp);
2785
2786    LABEL_FRAME_ADD("<hilight>Image Cache Size</>");
2787
2788    sl = elm_slider_add(win);
2789    evas_object_data_set(win, "image_cache_slider", sl);
2790    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2791    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2792    elm_slider_span_size_set(sl, 120);
2793    elm_slider_unit_format_set(sl, "%1.0f MB");
2794    elm_slider_indicator_format_set(sl, "%1.0f");
2795    elm_slider_min_max_set(sl, 0, 32);
2796    elm_slider_value_set(sl, (double)elm_image_cache_get() / 1024.0);
2797    elm_box_pack_end(bx, sl);
2798    evas_object_show(sl);
2799
2800    evas_object_smart_callback_add(sl, "changed", ic_round, NULL);
2801    evas_object_smart_callback_add(sl, "delay,changed", ic_change, NULL);
2802
2803    sp = elm_separator_add(win);
2804    elm_separator_horizontal_set(sp, 1);
2805    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2806    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2807    elm_box_pack_end(bx, sp);
2808    evas_object_show(sp);
2809
2810    LABEL_FRAME_ADD("<hilight>Number of Edje Files to Cache</>");
2811
2812    sl = elm_slider_add(win);
2813    evas_object_data_set(win, "edje_file_cache_slider", sl);
2814    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2815    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2816    elm_slider_span_size_set(sl, 120);
2817    elm_slider_unit_format_set(sl, "%1.0f files");
2818    elm_slider_indicator_format_set(sl, "%1.0f");
2819    elm_slider_min_max_set(sl, 0, 32);
2820    elm_slider_value_set(sl, elm_edje_file_cache_get());
2821    elm_box_pack_end(bx, sl);
2822    evas_object_show(sl);
2823
2824    evas_object_smart_callback_add(sl, "changed", efc_round, NULL);
2825    evas_object_smart_callback_add(sl, "delay,changed", efc_change, NULL);
2826
2827    sp = elm_separator_add(win);
2828    elm_separator_horizontal_set(sp, 1);
2829    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2830    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2831    elm_box_pack_end(bx, sp);
2832    evas_object_show(sp);
2833
2834    LABEL_FRAME_ADD("<hilight>Number of Edje Collections to Cache</>");
2835
2836    sl = elm_slider_add(win);
2837    evas_object_data_set(win, "edje_collection_cache_slider", sl);
2838    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2839    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2840    elm_slider_span_size_set(sl, 120);
2841    elm_slider_unit_format_set(sl, "%1.0f collections");
2842    elm_slider_indicator_format_set(sl, "%1.0f");
2843    elm_slider_min_max_set(sl, 0, 128);
2844    elm_slider_value_set(sl, elm_edje_collection_cache_get());
2845    elm_box_pack_end(bx, sl);
2846    evas_object_show(sl);
2847
2848    evas_object_smart_callback_add(sl, "changed", ecc_round, NULL);
2849    evas_object_smart_callback_add(sl, "delay,changed", ecc_change, NULL);
2850
2851    evas_object_data_set(win, "caches", bx);
2852
2853    elm_pager_content_push(pager, bx);
2854 }
2855
2856 static void
2857 _status_config_full(Evas_Object *win,
2858                     Evas_Object *bx0)
2859 {
2860    Evas_Object *tb, *pager;
2861    Elm_Toolbar_Item *sizing, *it;
2862
2863    tb = elm_toolbar_add(win);
2864    elm_toolbar_menu_parent_set(tb, win);
2865    elm_toolbar_homogeneous_set(tb, 0);
2866    evas_object_size_hint_weight_set(tb, 1.0, 0.0);
2867    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
2868
2869    sizing = elm_toolbar_item_append(tb, "zoom-fit-best", "Sizing",
2870                                     _cf_sizing, win);
2871    elm_toolbar_item_priority_set(sizing, 100);
2872
2873    it = elm_toolbar_item_append(tb, "preferences-desktop-theme", "Theme",
2874                                 _cf_themes, win);
2875    elm_toolbar_item_priority_set(it, 90);
2876
2877    elm_toolbar_item_append(tb, "preferences-desktop-font", "Fonts",
2878                            _cf_fonts, win);
2879
2880    it = elm_toolbar_item_append(tb, "system-users", "Profiles",
2881                                 _cf_profiles, win);
2882    elm_toolbar_item_priority_set(it, 90);
2883
2884    elm_toolbar_item_append(tb, "system-run", "Scrolling", _cf_scrolling, win);
2885    elm_toolbar_item_append(tb, "video-display", "Rendering",
2886                            _cf_rendering, win);
2887    elm_toolbar_item_append(tb, "appointment-new", "Caches", _cf_caches, win);
2888
2889    elm_box_pack_end(bx0, tb);
2890    evas_object_show(tb);
2891
2892    pager = elm_pager_add(win);
2893    evas_object_size_hint_align_set(pager, EVAS_HINT_FILL, EVAS_HINT_FILL);
2894    evas_object_size_hint_weight_set(pager, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2895    evas_object_data_set(win, "pager", pager);
2896
2897    _status_config_themes(win, pager);
2898    _status_config_fonts(win, pager);
2899    _status_config_profiles(win, pager);
2900    _status_config_rendering(win, pager);
2901    _status_config_scrolling(win, pager);
2902    _status_config_caches(win, pager);
2903    _status_config_sizing(win, pager);
2904
2905    // FIXME uncomment after flip style fix, please
2906    //elm_object_style_set(pager, "flip");
2907    elm_toolbar_item_selected_set(sizing, EINA_TRUE);
2908    elm_box_pack_end(bx0, pager);
2909    evas_object_show(pager);
2910 }
2911
2912 static void
2913 status_win(void)
2914 {
2915    Evas_Object *win, *bg, *bx0;
2916
2917    win = elm_win_add(NULL, "main", ELM_WIN_BASIC);
2918    elm_win_title_set(win, "Elementary Config");
2919
2920    evas_object_smart_callback_add(win, "delete,request", config_exit, NULL);
2921    bg = elm_bg_add(win);
2922    evas_object_size_hint_weight_set(bg, 1.0, 1.0);
2923    elm_win_resize_object_add(win, bg);
2924    evas_object_show(bg);
2925
2926    bx0 = elm_box_add(win);
2927    evas_object_size_hint_weight_set(bx0, 1.0, 1.0);
2928    elm_win_resize_object_add(win, bx0);
2929    evas_object_show(bx0);
2930
2931    if (!interactive) _status_basic(win, bx0);
2932    else if (0)
2933      _status_config(win, bx0);
2934    else _status_config_full(win, bx0);
2935
2936    evas_object_resize(win, 320, 480);
2937    evas_object_show(win);
2938 }
2939
2940 static Eina_Bool
2941 _exit_timer(void *data __UNUSED__)
2942 {
2943    elm_exit();
2944    return ECORE_CALLBACK_CANCEL;
2945 }
2946
2947 /* this is your elementary main function - it MUST be called IMMEDIATELY
2948  * after elm_init() and MUST be passed argc and argv, and MUST be called
2949  * elm_main and not be static - must be a visible symbol with EAPI infront */
2950 EAPI int
2951 elm_main(int    argc,
2952          char **argv)
2953 {
2954    int i;
2955
2956    elm_app_info_set(elm_main, "elementary", "images/logo.png");
2957    elm_app_compile_bin_dir_set(PACKAGE_BIN_DIR);
2958    elm_app_compile_data_dir_set(PACKAGE_DATA_DIR);
2959
2960    for (i = 1; i < argc; i++)
2961      {
2962         if (!strcmp(argv[i], "-h"))
2963           {
2964              printf("Usage:\n"
2965                     "  -h                This help\n"
2966                     "  -q                Quiet mode (dont show window)\n"
2967                     "  -t THEME          Set theme to THEME (ELM_THEME spec)\n"
2968                     "  -f SIZE           Set finger size to SIZE pixels\n"
2969                     "  -s SCALE          Set scale factor to SCALE\n"
2970                     );
2971           }
2972         else if (!strcmp(argv[i], "-q"))
2973           {
2974              quiet = 1;
2975              interactive = 0;
2976           }
2977         else if ((!strcmp(argv[i], "-t")) && (i < argc - 1))
2978           {
2979              i++;
2980              theme_set = argv[i];
2981              interactive = 0;
2982           }
2983         else if ((!strcmp(argv[i], "-f")) && (i < argc - 1))
2984           {
2985              i++;
2986              finger_size_set = argv[i];
2987              interactive = 0;
2988           }
2989         else if ((!strcmp(argv[i], "-s")) && (i < argc - 1))
2990           {
2991              i++;
2992              scale_set = argv[i];
2993              interactive = 0;
2994           }
2995      }
2996    /* put here any init code specific to this app like parsing args, etc. */
2997    if (!quiet)
2998      {
2999 #ifdef ELM_EFREET
3000         elm_need_efreet();
3001 #endif
3002         status_win(); /* create main window */
3003         if (!interactive)
3004           ecore_timer_add(2.0, _exit_timer, NULL);
3005      }
3006    if (!interactive)
3007      {
3008         if (theme_set)
3009           {
3010              elm_theme_all_set(theme_set);
3011           }
3012         if (finger_size_set)
3013           {
3014              elm_finger_size_all_set(atoi(finger_size_set));
3015           }
3016         if (scale_set)
3017           {
3018              elm_scale_all_set(atof(scale_set));
3019           }
3020         if (quiet)
3021           {
3022              elm_exit();
3023           }
3024      }
3025    elm_run(); /* and run the program now and handle all events, etc. */
3026    /* if the mainloop that elm_run() runs exists, we exit the app */
3027    elm_shutdown(); /* clean up and shut down */
3028    /* exit code */
3029    return 0;
3030 }
3031
3032 #endif
3033 /* All emelentary apps should use this. Put it right after elm_main() */
3034 ELM_MAIN()