src/bin/config.c

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