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