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 fndata = {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(fndata.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(fndata.font_hash);
 122    fndata.font_hash = NULL;
 123
 124    EINA_LIST_FREE(fndata.font_px_list, sd)
 125      {
 126         eina_stringshare_del(sd->size_str);
 127         free(sd);
 128      }
 129
 130    EINA_LIST_FREE(fndata.font_scale_list, sd)
 131      {
 132         eina_stringshare_del(sd->size_str);
 133         free(sd);
 134      }
 135
 136    if (fndata.cur_font) eina_stringshare_del(fndata.cur_font);
 137    fndata.cur_font = NULL;
 138
 139    if (fndata.cur_style) eina_stringshare_del(fndata.cur_style);
 140    fndata.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_config_scroll_bounce_enabled_get();
 153
 154    if (val == sb) return;
 155    elm_config_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_config_scroll_bounce_friction_get();
 179    double val = elm_slider_value_get(obj);
 180
 181    if (bf == val) return;
 182    elm_config_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_config_scroll_page_scroll_friction_get();
 204    double val = elm_slider_value_get(obj);
 205
 206    if (ps == val) return;
 207    elm_config_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_config_scroll_bring_in_scroll_friction_get();
 229    double val = elm_slider_value_get(obj);
 230
 231    if (bis == val) return;
 232    elm_config_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_config_scroll_zoom_friction_get();
 254    double val = elm_slider_value_get(obj);
 255
 256    if (zf == val) return;
 257    elm_config_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_config_scroll_thumbscroll_enabled_get();
 268
 269    if (val == sb) return;
 270    elm_config_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_config_scroll_thumbscroll_threshold_get();
 294    double val = elm_slider_value_get(obj);
 295
 296    if (tst == val) return;
 297    elm_config_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_config_scroll_thumbscroll_momentum_threshold_get();
 319    double val = elm_slider_value_get(obj);
 320
 321    if (tsmt == val) return;
 322    elm_config_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_config_scroll_thumbscroll_friction_get();
 344    double val = elm_slider_value_get(obj);
 345
 346    if (tsf == val) return;
 347    elm_config_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_config_scroll_thumbscroll_border_friction_get();
 369    double val = elm_slider_value_get(obj);
 370
 371    if (tsbf == val) return;
 372    elm_config_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_config_scroll_thumbscroll_sensitivity_friction_get();
 394    double val = elm_slider_value_get(obj);
 395
 396    if (tssf == val) return;
 397    elm_config_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_config_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_config_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_config_cache_flush_interval_get();
 433    double val = elm_slider_value_get(obj);
 434
 435    if (cf == val) return;
 436    elm_config_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_config_cache_font_cache_size_get();
 458    double val = elm_slider_value_get(obj);
 459
 460    if (font_cache == val) return;
 461    elm_config_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_config_cache_image_cache_size_get();
 483    double val = elm_slider_value_get(obj);
 484
 485    if (image_cache == val) return;
 486    elm_config_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_config_scale_get();
 508    double val = elm_slider_value_get(obj);
 509
 510    if (scale == val) return;
 511    elm_config_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_config_finger_size_get();
 533    double val = elm_slider_value_get(obj);
 534
 535    if (fs == val) return;
 536    elm_config_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_config_cache_edje_file_cache_size_get();
 558    double val = elm_slider_value_get(obj);
 559
 560    if (efc == val) return;
 561    elm_config_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_config_cache_edje_collection_cache_size_get();
 583    double val = elm_slider_value_get(obj);
 584
 585    if (ecc == val) return;
 586    elm_config_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_config_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_config_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(fndata.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_all_flush();
 795    elm_config_save();
 796 }
 797
 798 static void
 799 _font_overlay_reset(void            *data,
 800                     Evas_Object *obj __UNUSED__,
 801                     void *event_info __UNUSED__)
 802 {
 803    Evas_Object *win, *fclasses, *fnames, *fstyles, *fsizes;
 804    Elm_Text_Class_Data *tc_data;
 805    Elm_Object_Item *list_it;
 806
 807    win = data;
 808
 809    fclasses = evas_object_data_get(win, "font_classes_list");
 810    list_it = elm_list_selected_item_get(fclasses);
 811    if (!list_it) return;
 812    tc_data = elm_object_item_data_get(list_it);
 813
 814    fnames = evas_object_data_get(win, "font_names_list");
 815    fstyles = evas_object_data_get(win, "font_styles_list");
 816    fsizes = evas_object_data_get(win, "font_sizes_list");
 817
 818    elm_config_font_overlay_unset(tc_data->name);
 819
 820    eina_stringshare_replace(&fndata.cur_font, NULL);
 821    eina_stringshare_replace(&tc_data->font, NULL);
 822    eina_stringshare_replace(&fndata.cur_style, NULL);
 823    eina_stringshare_replace(&tc_data->style, NULL);
 824    fndata.cur_size = 0.0;
 825    tc_data->size = 0.0;
 826
 827    ELM_LIST_DISABLE(fnames);
 828    ELM_LIST_DISABLE(fstyles);
 829    ELM_LIST_DISABLE(fsizes);
 830
 831    elm_config_all_flush();
 832    elm_config_save();
 833 }
 834
 835 static void
 836 _font_overlay_reset_all(void            *data,
 837                         Evas_Object *obj __UNUSED__,
 838                         void *event_info __UNUSED__)
 839 {
 840    Evas_Object *win, *fclasses, *fnames, *fstyles, *fsizes;
 841    Elm_Text_Class_Data *tc_data;
 842    Elm_Object_Item *list_it;
 843    Eina_List *l;
 844
 845    win = data;
 846    eina_stringshare_replace(&fndata.cur_font, NULL);
 847    eina_stringshare_replace(&fndata.cur_style, NULL);
 848    fndata.cur_size = 0.0;
 849
 850    EINA_LIST_FOREACH(fndata.text_classes, l, tc_data)
 851      {
 852         elm_config_font_overlay_unset(tc_data->name);
 853
 854         eina_stringshare_replace(&tc_data->font, NULL);
 855         eina_stringshare_replace(&tc_data->style, NULL);
 856         tc_data->size = 0.0;
 857      }
 858
 859    fclasses = evas_object_data_get(win, "font_classes_list");
 860    fnames = evas_object_data_get(win, "font_names_list");
 861    fstyles = evas_object_data_get(win, "font_styles_list");
 862    fsizes = evas_object_data_get(win, "font_sizes_list");
 863
 864    list_it = elm_list_selected_item_get(fclasses);
 865    if (list_it) elm_list_item_selected_set(list_it, EINA_FALSE);
 866
 867    ELM_LIST_DISABLE(fnames);
 868    ELM_LIST_DISABLE(fstyles);
 869    ELM_LIST_DISABLE(fsizes);
 870
 871    elm_config_all_flush();
 872    elm_config_save();
 873 }
 874
 875 static void
 876 _font_overlay_change(void *data       __UNUSED__,
 877                      Evas_Object *obj __UNUSED__,
 878                      void *event_info __UNUSED__)
 879 {
 880    Elm_Text_Class_Data *tc_data;
 881    Eina_List *l;
 882
 883    EINA_LIST_FOREACH(fndata.text_classes, l, tc_data)
 884      {
 885         if (tc_data->font)
 886           {
 887              char *name;
 888
 889              name = elm_font_fontconfig_name_get(tc_data->font,
 890                                                  tc_data->style);
 891              elm_config_font_overlay_set(tc_data->name, name,
 892                                          tc_data->size ? tc_data->size : -100);
 893              elm_font_fontconfig_name_free(name);
 894           }
 895         else
 896           elm_config_font_overlay_unset(tc_data->name);
 897      }
 898
 899    elm_config_font_overlay_apply();
 900    elm_config_all_flush();
 901    elm_config_save();
 902
 903    /* TODO: apply hinting */
 904 }
 905
 906 static void
 907 _config_display_update(Evas_Object *win)
 908 {
 909    int flush_interval, font_c, image_c, edje_file_c, edje_col_c, ts_threshould;
 910    double scale, s_bounce_friction, ts_momentum_threshold, ts_friction,
 911           ts_border_friction, ts_sensitivity_friction, page_friction, bring_in_friction, zoom_friction;
 912    const char *curr_theme, *curr_engine;
 913    const Eina_List *l_items, *l;
 914    Eina_Bool s_bounce, ts;
 915    Elm_Object_Item *list_it;
 916    Elm_Theme *th;
 917    int fs;
 918
 919    scale = elm_config_scale_get();
 920    fs = elm_config_finger_size_get();
 921    flush_interval = elm_config_cache_flush_interval_get();
 922    font_c = elm_config_cache_font_cache_size_get();
 923    image_c = elm_config_cache_image_cache_size_get();
 924    edje_file_c = elm_config_cache_edje_file_cache_size_get();
 925    edje_col_c = elm_config_cache_edje_collection_cache_size_get();
 926
 927    s_bounce = elm_config_scroll_bounce_enabled_get();
 928    s_bounce_friction = elm_config_scroll_bounce_friction_get();
 929    ts = elm_config_scroll_thumbscroll_enabled_get();
 930    ts_threshould = elm_config_scroll_thumbscroll_threshold_get();
 931    ts_momentum_threshold = elm_config_scroll_thumbscroll_momentum_threshold_get();
 932    ts_friction = elm_config_scroll_thumbscroll_friction_get();
 933    ts_border_friction = elm_config_scroll_thumbscroll_border_friction_get();
 934    ts_sensitivity_friction = elm_config_scroll_thumbscroll_sensitivity_friction_get();
 935    page_friction = elm_config_scroll_page_scroll_friction_get();
 936    bring_in_friction = elm_config_scroll_bring_in_scroll_friction_get();
 937    zoom_friction = elm_config_scroll_zoom_friction_get();
 938
 939    /* gotta update root windows' atoms */
 940    elm_slider_value_set(evas_object_data_get(win, "scale_slider"), scale);
 941    elm_slider_value_set(evas_object_data_get(win, "fs_slider"), fs);
 942
 943    elm_slider_value_set(evas_object_data_get(win,
 944                                              "cache_flush_interval_slider"),
 945                         flush_interval);
 946    elm_slider_value_set(evas_object_data_get(win, "font_cache_slider"),
 947                         font_c / 1024.0);
 948    elm_slider_value_set(evas_object_data_get(win, "image_cache_slider"),
 949                         image_c / 1024.0);
 950    elm_slider_value_set(evas_object_data_get(win, "edje_file_cache_slider"),
 951                         edje_file_c);
 952    elm_slider_value_set(evas_object_data_get(win,
 953                                              "edje_collection_cache_slider"),
 954                         edje_col_c);
 955
 956    elm_check_state_set(evas_object_data_get(win, "scroll_bounce_check"),
 957                        s_bounce);
 958    elm_slider_value_set(evas_object_data_get(win, "bounce_friction_slider"),
 959                         s_bounce_friction);
 960    elm_check_state_set(evas_object_data_get(win, "thumbscroll_check"), ts);
 961    elm_slider_value_set(evas_object_data_get(win,
 962                                              "thumbscroll_threshold_slider"),
 963                         ts_threshould);
 964    elm_slider_value_set(evas_object_data_get(win,
 965                                              "ts_momentum_threshold_slider"),
 966                         ts_momentum_threshold);
 967    elm_slider_value_set(evas_object_data_get(win,
 968                                              "thumbscroll_friction_slider"),
 969                         ts_friction);
 970    elm_slider_value_set(evas_object_data_get(win, "ts_border_friction_slider"),
 971                         ts_border_friction);
 972    elm_slider_value_set(evas_object_data_get(win, "ts_sensitivity_friction_slider"),
 973                         ts_sensitivity_friction);
 974    elm_slider_value_set(evas_object_data_get(win,
 975                                              "page_scroll_friction_slider"),
 976                         page_friction);
 977    elm_slider_value_set(evas_object_data_get(win,
 978                                              "bring_in_scroll_friction_slider"),
 979                         bring_in_friction);
 980    elm_slider_value_set(evas_object_data_get(win,
 981                                              "zoom_scroll_friction_slider"),
 982                         zoom_friction);
 983
 984    curr_theme = _elm_theme_current_get(elm_theme_get(NULL));
 985
 986    th = elm_theme_new();
 987    elm_theme_set(th, curr_theme);
 988    elm_object_theme_set(evas_object_data_get(win, "theme_preview"), th);
 989    elm_theme_free(th);
 990    eina_stringshare_del(curr_theme);
 991
 992    curr_engine = elm_config_engine_get();
 993    l_items = elm_list_items_get(evas_object_data_get(win, "engines_list"));
 994    EINA_LIST_FOREACH(l_items, l, list_it)
 995      {
 996         if (!strcmp(elm_object_item_data_get(list_it), curr_engine))
 997           {
 998              elm_list_item_selected_set(list_it, EINA_TRUE);
 999              break;
1000           }
1001      }
1002 }
1003
1004 static void
1005 _profile_change_do(Evas_Object *win,
1006                    const char  *profile)
1007 {
1008    elm_config_profile_set(profile);
1009    elm_config_all_flush();
1010    _config_display_update(win);
1011 }
1012
1013 static Eina_Bool
1014 _config_all_changed(void *data,
1015                     int ev_type __UNUSED__,
1016                     void *ev __UNUSED__)
1017 {
1018    Evas_Object *win = data;
1019    _config_display_update(win);
1020    return ECORE_CALLBACK_PASS_ON;
1021 }
1022
1023 static void
1024 _engine_use(void            *data,
1025             Evas_Object *obj __UNUSED__,
1026             void *event_info __UNUSED__)
1027 {
1028    Evas_Object *li;
1029    const char *selection;
1030
1031    li = data;
1032    selection = elm_object_item_data_get(elm_list_selected_item_get(li));
1033
1034    if (!strcmp(elm_config_engine_get(), selection))
1035      return;
1036
1037    elm_config_engine_set(selection);
1038    elm_config_all_flush();
1039    elm_config_save(); /* make sure new engine has its data dir */
1040 }
1041
1042 static void
1043 _profile_use(void            *data,
1044              Evas_Object *obj __UNUSED__,
1045              void *event_info __UNUSED__)
1046 {
1047    Evas_Object *li;
1048    const char *selection;
1049    const char *profile;
1050
1051    li = data;
1052    selection = elm_object_item_data_get(elm_list_selected_item_get(li));
1053    profile = elm_config_profile_get();
1054
1055    if (!profile)
1056      {
1057         fprintf(stderr, "No profile currently set!\n"); /* FIXME: log domain */
1058         return;
1059      }
1060
1061    if (!strcmp(profile, selection))
1062      return;
1063
1064    elm_config_profile_set(selection); /* just here to update info for getters below */
1065
1066    _profile_change_do(elm_object_top_widget_get(li), selection);
1067    elm_config_all_flush();
1068    elm_config_save(); /* make sure new profile has its data dir */
1069 }
1070
1071 static void
1072 _btn_todo(void *data       __UNUSED__,
1073           Evas_Object *obj __UNUSED__,
1074           void *event_info __UNUSED__)
1075 {
1076    printf("To be done!\n");
1077 }
1078
1079 static void
1080 _profile_reset(void            *data,
1081                Evas_Object *obj __UNUSED__,
1082                void *event_info __UNUSED__)
1083 {
1084    const char *selection, *curr;
1085    const char *pdir;
1086    Evas_Object *li;
1087
1088    li = data;
1089    selection = elm_object_item_data_get(elm_list_selected_item_get(li));
1090    curr = elm_config_profile_get();
1091
1092    elm_config_all_flush();
1093    elm_config_save(); /* dump config into old profile's data dir */
1094
1095    pdir = elm_config_profile_dir_get(selection, EINA_TRUE);
1096    if (!pdir)
1097      return;
1098
1099    ecore_file_recursive_rm(pdir);
1100    elm_config_profile_dir_free(pdir);
1101
1102    elm_config_reload();
1103
1104    _profile_change_do(elm_object_top_widget_get(li), curr);
1105    elm_config_all_flush();
1106    elm_config_save(); /* make sure new profile has its data dir */
1107 }
1108
1109 static void
1110 _theme_use(void *data       __UNUSED__,
1111            Evas_Object *obj __UNUSED__,
1112            void *event_info __UNUSED__)
1113 {
1114    const char *defth;
1115    Elm_Theme *th;
1116    Evas_Object *win = elm_object_top_widget_get(obj);
1117    Evas_Object *sample = evas_object_data_get(win, "theme_preview");
1118
1119    th = elm_object_theme_get(sample);
1120    defth = elm_theme_get(th);
1121    elm_theme_set(NULL, defth);
1122    elm_config_all_flush();
1123    elm_config_save();
1124 }
1125
1126 static void
1127 _theme_sel(void            *data __UNUSED__,
1128            Evas_Object     *obj,
1129            void *event_info __UNUSED__)
1130 {
1131    Evas_Object *win = elm_object_top_widget_get(obj);
1132    Evas_Object *sample = evas_object_data_get(win, "theme_preview");
1133    Elm_Theme *th;
1134    Elm_Object_Item *list_it;
1135    Eina_Strbuf *newth;
1136    Eina_List *l;
1137
1138    if (!sample) return;
1139    tsel = elm_list_selected_items_get(obj);
1140    newth = eina_strbuf_new();
1141    EINA_SAFETY_ON_NULL_RETURN(newth);
1142    th = elm_theme_new();
1143    if (!th)
1144      {
1145         eina_strbuf_free(newth);
1146         return;
1147      }
1148    EINA_LIST_REVERSE_FOREACH((Eina_List*)tsel, l, list_it)
1149      {
1150         Theme *t = elm_object_item_data_get(list_it);
1151         eina_strbuf_append_printf(newth, "%s:", t->name);
1152         if ((!l->prev) && strcmp(t->name, "default"))
1153           /* ensure default theme is always there for fallback */
1154           eina_strbuf_append(newth, "default");
1155      }
1156    elm_theme_set(th, eina_strbuf_string_get(newth));
1157    eina_strbuf_free(newth);
1158    elm_object_theme_set(sample, th);
1159    elm_theme_free(th);
1160 }
1161
1162 /*static void
1163    _theme_browse(void *data, Evas_Object *obj, void *event_info)
1164    {
1165    printf("not implemented\n");
1166    }*/
1167
1168 static void
1169 _status_config_sizing(Evas_Object *win,
1170                       Evas_Object *naviframe)
1171 {
1172    Evas_Object *lb, *pd, *bx, *sl, *sp;
1173
1174    bx = elm_box_add(win);
1175    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
1176    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
1177
1178    LABEL_FRAME_ADD("<hilight>Scale</>");
1179
1180    sl = elm_slider_add(win);
1181    evas_object_data_set(win, "scale_slider", sl);
1182    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1183    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1184    elm_slider_span_size_set(sl, 120);
1185    elm_slider_unit_format_set(sl, "%1.2f");
1186    elm_slider_indicator_format_set(sl, "%1.2f");
1187    elm_slider_min_max_set(sl, 0.25, 5.0);
1188    elm_slider_value_set(sl, elm_config_scale_get());
1189    elm_box_pack_end(bx, sl);
1190    evas_object_show(sl);
1191
1192    evas_object_smart_callback_add(sl, "changed", sc_round, NULL);
1193    evas_object_smart_callback_add(sl, "delay,changed", sc_change, NULL);
1194
1195    sp = elm_separator_add(win);
1196    elm_separator_horizontal_set(sp, EINA_TRUE);
1197    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
1198    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1199    elm_box_pack_end(bx, sp);
1200    evas_object_show(sp);
1201
1202    LABEL_FRAME_ADD("<hilight>Finger Size</><br/>");
1203
1204    sl = elm_slider_add(win);
1205    evas_object_data_set(win, "fs_slider", sl);
1206    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1207    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1208    elm_slider_span_size_set(sl, 120);
1209    elm_slider_unit_format_set(sl, "%1.0f");
1210    elm_slider_indicator_format_set(sl, "%1.0f");
1211    elm_slider_min_max_set(sl, 5, 200);
1212    elm_slider_value_set(sl, elm_config_finger_size_get());
1213    elm_box_pack_end(bx, sl);
1214    evas_object_show(sl);
1215
1216    evas_object_smart_callback_add(sl, "changed", fs_round, NULL);
1217    evas_object_smart_callback_add(sl, "delay,changed", fs_change, NULL);
1218
1219    evas_object_data_set(win, "sizing", bx);
1220
1221    elm_naviframe_item_simple_push(naviframe, bx);
1222 }
1223
1224 static Evas_Object *
1225 _sample_theme_new(Evas_Object *win)
1226 {
1227    Evas_Object *base, *bg, *bt, *ck, *rd, *rdg, *sl, *fr, *li, *rc, *sp;
1228
1229    base = elm_table_add(win);
1230    evas_object_size_hint_weight_set(base, 1.0, 1.0);
1231    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1232
1233    bg = elm_bg_add(win);
1234    evas_object_size_hint_weight_set(bg, 1.0, 1.0);
1235    evas_object_size_hint_align_set(bg, EVAS_HINT_FILL, EVAS_HINT_FILL);
1236    elm_table_pack(base, bg, 0, 0, 2, 5);
1237    evas_object_show(bg);
1238
1239    bt = elm_button_add(win);
1240    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1241    elm_object_text_set(bt, "Button");
1242    elm_table_pack(base, bt, 0, 0, 1, 1);
1243    evas_object_show(bt);
1244
1245    ck = elm_check_add(win);
1246    evas_object_size_hint_weight_set(ck, 1.0, 0.0);
1247    elm_object_text_set(ck, "Check");
1248    elm_table_pack(base, ck, 0, 1, 1, 1);
1249    evas_object_show(ck);
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, 0);
1254    elm_object_text_set(rd, "Radio 1");
1255    elm_table_pack(base, rd, 1, 0, 1, 1);
1256    evas_object_show(rd);
1257    rdg = rd;
1258
1259    rd = elm_radio_add(win);
1260    evas_object_size_hint_weight_set(rd, 1.0, 0.0);
1261    elm_radio_state_value_set(rd, 1);
1262    elm_object_text_set(rd, "Radio 2");
1263    elm_radio_group_add(rd, rdg);
1264    elm_table_pack(base, rd, 1, 1, 1, 1);
1265    evas_object_show(rd);
1266
1267    sp = elm_separator_add(win);
1268    elm_separator_horizontal_set(sp, EINA_TRUE);
1269    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1270    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1271    elm_table_pack(base, sp, 0, 2, 2, 1);
1272    evas_object_show(sp);
1273
1274    sl = elm_slider_add(win);
1275    elm_object_text_set(sl, "Slider");
1276    elm_slider_span_size_set(sl, 120);
1277    elm_slider_min_max_set(sl, 1, 10);
1278    elm_slider_value_set(sl, 4);
1279    evas_object_size_hint_weight_set(sl, 1.0, 0.0);
1280    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, EVAS_HINT_FILL);
1281    elm_table_pack(base, sl, 0, 3, 2, 1);
1282    evas_object_show(sl);
1283
1284    fr = elm_frame_add(win);
1285    elm_object_text_set(fr, "Frame");
1286    elm_table_pack(base, fr, 0, 4, 2, 1);
1287    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1288    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1289    evas_object_show(fr);
1290
1291    li = elm_list_add(win);
1292    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1293    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1294    elm_object_content_set(fr, li);
1295    evas_object_show(li);
1296
1297    elm_list_item_append(li, "List Item 1", NULL, NULL, NULL, NULL);
1298    elm_list_item_append(li, "Second Item", NULL, NULL, NULL, NULL);
1299    elm_list_item_append(li, "Third Item", NULL, NULL, NULL, NULL);
1300    elm_list_go(li);
1301
1302    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1303    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1304    evas_object_size_hint_min_set(rc, 160, 120);
1305    elm_table_pack(base, rc, 0, 4, 2, 1);
1306
1307    return base;
1308 }
1309
1310 static void
1311 _status_config_themes(Evas_Object *win,
1312                       Evas_Object *naviframe)
1313 {
1314    Evas_Object *tb, *rc, *sc, *sp, *li, *pd, *fr, *bt, *sample;
1315    Eina_List *list, *l;
1316    char *th, *s, *ext;
1317    Elm_Theme *d;
1318    Elm_Object_Item *list_it, *def_it = NULL;
1319    const char *theme_name, *sep[20];
1320    unsigned int x;
1321
1322    tb = elm_table_add(win);
1323    evas_object_size_hint_weight_set(tb, 1.0, 1.0);
1324    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
1325
1326    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1327    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1328    evas_object_size_hint_min_set(rc, 0, 130);
1329    elm_table_pack(tb, rc, 0, 0, 1, 1);
1330
1331    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1332    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1333    evas_object_size_hint_min_set(rc, 0, 200);
1334    elm_table_pack(tb, rc, 0, 1, 1, 1);
1335
1336    /////////////////////////////////////////////
1337
1338    pd = elm_frame_add(win);
1339    elm_object_style_set(pd, "pad_medium");
1340    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1341    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1342    elm_table_pack(tb, pd, 0, 0, 1, 1);
1343    evas_object_show(pd);
1344
1345    li = elm_list_add(win);
1346    elm_list_multi_select_set(li, EINA_TRUE);
1347    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1348    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1349    elm_object_content_set(pd, li);
1350    evas_object_show(li);
1351
1352    list = elm_theme_name_available_list_new();
1353    d = elm_theme_default_get();
1354    theme_name = elm_theme_get(d);
1355    for (x = 1, sep[0] = theme_name; x < sizeof(sep) / sizeof(sep[0]); x++)
1356      {
1357         sep[x] = strchr(sep[x - 1] + 1, ':');
1358         if (!sep[x]) break;
1359      }
1360    EINA_LIST_FOREACH(list, l, th)
1361      {
1362         Theme *t;
1363         int y;
1364
1365         t = calloc(1, sizeof(Theme));
1366         t->name = eina_stringshare_add(th);
1367         s = elm_theme_list_item_path_get(th, &(t->in_search_path));
1368         if (s)
1369           {
1370              t->path = eina_stringshare_add(s);
1371              free(s);
1372           }
1373         if (t->in_search_path)
1374           {
1375              s = strdup(th);
1376              if (s)
1377                {
1378                   s[0] = toupper(s[0]);
1379                   t->label = eina_stringshare_add(s);
1380                   free(s);
1381                }
1382              else
1383                t->label = eina_stringshare_add(s);
1384           }
1385         else
1386           {
1387              s = strdup(ecore_file_file_get(th));
1388              if (s)
1389                {
1390                   s[0] = toupper(s[0]);
1391                   ext = strrchr(s, '.');
1392                   if (ext) *ext = 0;
1393                   t->label = eina_stringshare_add(s);
1394                   free(s);
1395                }
1396              else
1397                t->label = eina_stringshare_add(s);
1398           }
1399         themes = eina_list_append(themes, t);
1400         list_it = elm_list_item_append(li, t->label, NULL, NULL, NULL, t);
1401         if (!strcmp(t->name, "default")) def_it = list_it;
1402         for (y = x - 1 /* ignore default e theme */; y > 0; y--)
1403           {
1404              const char *start = (sep[y - 1][0] == ':') ? sep[y - 1] + 1 : sep[y - 1];
1405              unsigned int len = (unsigned int)(sep[y] - start);
1406              if (strncmp(start , t->name, len) || (strlen(t->name) != len)) continue;
1407
1408              if (!elm_list_item_selected_get(list_it))
1409                elm_list_item_selected_set(list_it, EINA_TRUE);
1410              break;
1411           }
1412      }
1413    if (!elm_list_selected_items_get(li))
1414      elm_list_item_selected_set(def_it, EINA_TRUE);
1415    evas_object_smart_callback_add(li, "selected", _theme_sel, NULL);
1416    evas_object_smart_callback_add(li, "unselected", _theme_sel, NULL);
1417    elm_theme_name_available_list_free(list);
1418
1419    elm_list_go(li);
1420
1421    pd = elm_frame_add(win);
1422    elm_object_style_set(pd, "pad_medium");
1423    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1424    evas_object_size_hint_align_set(pd, 0.9, 0.9);
1425    elm_table_pack(tb, pd, 0, 0, 1, 1);
1426    evas_object_show(pd);
1427
1428    /* FIXME: not implemented yet
1429       bt = elm_button_add(win);
1430       evas_object_smart_callback_add(bt, "clicked", _theme_browse, win);
1431       elm_object_text_set(bt, "Browse...");
1432       evas_object_size_hint_weight_set(bt, 1.0, 1.0);
1433       evas_object_size_hint_align_set(bt, 0.9, 0.9);
1434       elm_object_content_set(pd, bt);
1435       evas_object_show(bt);
1436     */
1437    pd = elm_frame_add(win);
1438    elm_object_style_set(pd, "pad_medium");
1439    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1440    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1441    elm_table_pack(tb, pd, 0, 1, 1, 1);
1442    evas_object_show(pd);
1443
1444    fr = elm_frame_add(win);
1445    elm_object_text_set(fr, "Preview");
1446    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1447    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1448    elm_object_content_set(pd, fr);
1449    evas_object_show(fr);
1450
1451    sc = elm_scroller_add(win);
1452    elm_scroller_bounce_set(sc, EINA_FALSE, EINA_FALSE);
1453    evas_object_size_hint_weight_set(sc, 1.0, 1.0);
1454    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1455    elm_object_content_set(fr, sc);
1456    evas_object_show(sc);
1457
1458    sample = _sample_theme_new(win);
1459    elm_object_content_set(sc, sample);
1460    evas_object_show(sample);
1461    evas_object_data_set(win, "theme_preview", sample);
1462
1463    /////////////////////////////////////////////
1464    sp = elm_separator_add(win);
1465    elm_separator_horizontal_set(sp, EINA_TRUE);
1466    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1467    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1468    elm_table_pack(tb, sp, 0, 2, 1, 1);
1469    evas_object_show(sp);
1470
1471    pd = elm_frame_add(win);
1472    elm_object_style_set(pd, "pad_medium");
1473    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1474    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1475    elm_table_pack(tb, pd, 0, 3, 1, 1);
1476    evas_object_show(pd);
1477
1478    bt = elm_button_add(win);
1479    evas_object_smart_callback_add(bt, "clicked", _theme_use, win);
1480    elm_object_text_set(bt, "Use Theme");
1481    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1482    evas_object_size_hint_align_set(bt, 0.5, 0.5);
1483    elm_object_content_set(pd, bt);
1484    evas_object_show(bt);
1485
1486    evas_object_data_set(win, "themes", tb);
1487    elm_naviframe_item_simple_push(naviframe, tb);
1488 }
1489
1490 static void
1491 _font_preview_update(Evas_Object *win)
1492 {
1493    Evas_Font_Size sz;
1494    char *name;
1495
1496    if (!fndata.cur_font)
1497      return;
1498
1499    name = elm_font_fontconfig_name_get(fndata.cur_font, fndata.cur_style);
1500    sz = fndata.cur_size;
1501
1502    if (sz < 0)
1503      sz = (-sz * 10) / 100;
1504    if (sz == 0)
1505      sz = 10;
1506
1507    edje_object_text_class_set(evas_object_data_get(win, "font_preview"),
1508                               "font_preview", name, sz);
1509
1510    elm_font_fontconfig_name_free(name);
1511 }
1512
1513 static void
1514 _font_classes_list_sel(void *data   __UNUSED__,
1515                        Evas_Object *obj,
1516                        void        *event_info)
1517 {
1518    const Eina_List *f_names_items, *l;
1519    Elm_Text_Class_Data *tc_data;
1520    Evas_Object *f_names_list;
1521    Elm_Object_Item *list_it;
1522
1523    tc_data = elm_object_item_data_get(event_info);
1524
1525    f_names_list = evas_object_data_get(elm_object_top_widget_get(obj),
1526                                        "font_names_list");
1527    ELM_LIST_ENABLE(f_names_list);
1528
1529    f_names_items = elm_list_items_get(f_names_list);
1530
1531    EINA_LIST_FOREACH(f_names_items, l, list_it)
1532      {
1533         const char *s;
1534
1535         s = elm_object_item_text_get(list_it);
1536
1537         if (tc_data->font && !strcmp(s, tc_data->font))
1538           {
1539              elm_list_item_selected_set(list_it, EINA_TRUE);
1540              elm_list_item_show(list_it);
1541              break;
1542           }
1543      }
1544 }
1545
1546 static void
1547 _font_names_list_sel(void *data   __UNUSED__,
1548                      Evas_Object *obj,
1549                      void        *event_info)
1550 {
1551    Evas_Object *style_list, *cls_list, *win;
1552    const char *style, *sel_font;
1553    Elm_Text_Class_Data *tc_data;
1554    Elm_Object_Item *list_it, *fc_list_it;
1555    Elm_Font_Properties *efp;
1556    const Eina_List *l;
1557
1558    list_it = event_info;
1559    sel_font = elm_object_item_text_get(list_it);
1560
1561    win = elm_object_top_widget_get(obj);
1562    style_list = evas_object_data_get(win, "font_styles_list");
1563    cls_list = evas_object_data_get(win, "font_classes_list");
1564
1565    fc_list_it = elm_list_selected_item_get(cls_list);
1566    if (!fc_list_it) return;  /* should not happen, fonts list disabled in
1567                          * this case */
1568
1569    eina_stringshare_replace(&fndata.cur_font, sel_font);
1570
1571    tc_data = elm_object_item_data_get(fc_list_it);
1572    if (tc_data->font) eina_stringshare_del(tc_data->font);
1573    if (fndata.cur_font) tc_data->font = eina_stringshare_ref(fndata.cur_font);
1574
1575    /* load styles list */
1576    efp = eina_hash_find(fndata.font_hash, sel_font);
1577
1578    ELM_LIST_ENABLE(style_list);
1579    elm_list_clear(style_list);
1580
1581    evas_event_freeze(evas_object_evas_get(style_list));
1582    edje_freeze();
1583
1584    list_it = NULL;
1585
1586    EINA_LIST_FOREACH(efp->styles, l, style)
1587      {
1588         Elm_Object_Item *i;
1589
1590         i = elm_list_item_append(style_list, style, NULL, NULL,
1591                                  _font_styles_list_sel, NULL);
1592
1593         if (tc_data->style && (!strcmp(style, tc_data->style)))
1594           list_it = i;
1595      }
1596
1597    elm_list_go(style_list);
1598
1599    edje_thaw();
1600    evas_event_thaw(evas_object_evas_get(style_list));
1601
1602    if (list_it)
1603      elm_list_item_selected_set(list_it, EINA_TRUE);
1604
1605    _font_preview_update(win);
1606 }
1607
1608 static void
1609 _font_styles_list_sel(void *data   __UNUSED__,
1610                       Evas_Object *obj,
1611                       void        *event_info)
1612 {
1613    Evas_Object *fc_list, *fs_list, *win;
1614    Elm_Text_Class_Data *tc_data;
1615    const Eina_List *l;
1616    Elm_Object_Item *list_it;
1617
1618    win = elm_object_top_widget_get(obj);
1619    fc_list = evas_object_data_get(win, "font_classes_list");
1620    fs_list = evas_object_data_get(win, "font_sizes_list");
1621
1622    list_it = elm_list_selected_item_get(fc_list);
1623    if (!list_it) return;  /* should not happen */
1624
1625    eina_stringshare_replace(&fndata.cur_style,
1626                             elm_object_item_text_get(event_info));
1627    ELM_LIST_ENABLE(fs_list);
1628
1629    tc_data = elm_object_item_data_get(list_it);
1630    eina_stringshare_del(tc_data->style);
1631    tc_data->style = eina_stringshare_ref(fndata.cur_style);
1632
1633    evas_event_freeze(evas_object_evas_get(fs_list));
1634    edje_freeze();
1635
1636    EINA_LIST_FOREACH(elm_list_items_get(fs_list), l, list_it)
1637      {
1638         Elm_Font_Size_Data *sdata;
1639
1640         sdata = elm_object_item_data_get(list_it);
1641         elm_list_item_selected_set(l->data, EINA_FALSE);
1642
1643         if (tc_data->size == sdata->size)
1644           {
1645              elm_list_item_selected_set(list_it, EINA_TRUE);
1646              elm_list_item_show(list_it);
1647              break;
1648           }
1649      }
1650
1651    edje_thaw();
1652    evas_event_thaw(evas_object_evas_get(fs_list));
1653
1654    _font_preview_update(win);
1655 }
1656
1657 static void
1658 _font_sizes_list_sel(void *data       __UNUSED__,
1659                      Evas_Object *obj __UNUSED__,
1660                      void *event_info __UNUSED__)
1661 {
1662    Elm_Text_Class_Data *tc_data;
1663    Evas_Object *fc_list, *win;
1664    Elm_Font_Size_Data *sd;
1665    Elm_Object_Item *list_it;
1666
1667    win = elm_object_top_widget_get(obj);
1668    fc_list = evas_object_data_get(win, "font_classes_list");
1669
1670    list_it = elm_list_selected_item_get(fc_list);
1671    if (!list_it) return;  /* should not happen */
1672
1673    sd = elm_object_item_data_get(event_info);
1674    fndata.cur_size = sd->size;
1675
1676    tc_data = elm_object_item_data_get(list_it);
1677    tc_data->size = fndata.cur_size;
1678
1679    _font_preview_update(win);
1680 }
1681
1682 static void
1683 _fstyle_list_unselect_cb(void *data       __UNUSED__,
1684                          Evas_Object     *obj,
1685                          void *event_info __UNUSED__)
1686 {
1687    Evas_Object *sizes_list, *win;
1688
1689    if (elm_list_selected_item_get(obj)) return;
1690
1691    win = elm_object_top_widget_get(obj);
1692
1693    sizes_list = evas_object_data_get(win, "font_sizes_list");
1694    ELM_LIST_DISABLE(sizes_list);
1695 }
1696
1697 static void
1698 _fc_list_unselect_cb(void *data       __UNUSED__,
1699                      Evas_Object     *obj,
1700                      void *event_info __UNUSED__)
1701 {
1702    Evas_Object *font_names_list, *styles_list, *sizes_list, *win;
1703
1704    if (elm_list_selected_item_get(obj)) return;
1705
1706    win = elm_object_top_widget_get(obj);
1707
1708    font_names_list = evas_object_data_get(win, "font_names_list");
1709    ELM_LIST_DISABLE(font_names_list);
1710
1711    styles_list = evas_object_data_get(win, "font_styles_list");
1712    ELM_LIST_DISABLE(styles_list);
1713
1714    sizes_list = evas_object_data_get(win, "font_sizes_list");
1715    ELM_LIST_DISABLE(sizes_list);
1716 }
1717
1718 static void
1719 _font_classes_list_load(Evas_Object *li)
1720 {
1721    Elm_Text_Class_Data *tc_data;
1722    Eina_List *l;
1723    Evas *evas;
1724
1725    evas = evas_object_evas_get(li);
1726    evas_event_freeze(evas);
1727    edje_freeze();
1728
1729    EINA_LIST_FOREACH(fndata.text_classes, l, tc_data)
1730      elm_list_item_append(li, tc_data->desc, NULL, NULL,
1731                           _font_classes_list_sel, tc_data);
1732
1733    evas_object_smart_callback_add(li, "unselected", _fc_list_unselect_cb,
1734                                   NULL);
1735
1736    elm_list_go(li);
1737    edje_thaw();
1738    evas_event_thaw(evas);
1739 }
1740
1741 static void
1742 _fonts_data_fill(Evas *evas)
1743 {
1744    const Eina_List *fo_list, *l;
1745    Eina_List *text_classes;
1746    Elm_Text_Class_Data *tc_data;
1747    Elm_Font_Size_Data *sd;
1748    Elm_Font_Overlay *efo;
1749    Eina_List *evas_fonts;
1750    Elm_Text_Class *etc;
1751    int i;
1752
1753    evas_fonts = evas_font_available_list(evas);
1754    fndata.font_hash = elm_font_available_hash_add(evas_fonts);
1755    evas_font_available_list_free(evas, evas_fonts);
1756
1757    text_classes = elm_config_text_classes_list_get();
1758    fo_list = elm_config_font_overlay_list_get();
1759
1760    EINA_LIST_FOREACH(text_classes, l, etc)
1761      {
1762         const Eina_List *ll;
1763
1764         tc_data = calloc(1, sizeof(*tc_data));
1765         tc_data->name = eina_stringshare_add(etc->name);
1766         tc_data->desc = eina_stringshare_add(etc->desc);
1767
1768         EINA_LIST_FOREACH(fo_list, ll, efo)
1769           {
1770              if (strcmp(tc_data->name, efo->text_class))
1771                continue;
1772
1773              if (efo->font)
1774                {
1775                   Elm_Font_Properties *efp;
1776
1777                   efp = elm_font_properties_get(efo->font);
1778                   if (efp)
1779                     {
1780                        tc_data->font = eina_stringshare_add(efp->name);
1781                        /* we're sure we recorded with only 1 style selected */
1782                        tc_data->style = eina_stringshare_add(efp->styles->data);
1783                        elm_font_properties_free(efp);
1784                     }
1785                }
1786              tc_data->size = efo->size;
1787           }
1788
1789         fndata.text_classes = eina_list_append(fndata.text_classes, tc_data);
1790      }
1791
1792    elm_config_text_classes_list_free(text_classes);
1793
1794    /* FIXME: hinting later */
1795    /* fndata.hinting = e_config->font_hinting; */
1796
1797    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1798    sd->size_str = eina_stringshare_add("Tiny");
1799    sd->size = -50;
1800    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1801
1802    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1803    sd->size_str = eina_stringshare_add("Small");
1804    sd->size = -80;
1805    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1806
1807    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1808    sd->size_str = eina_stringshare_add("Normal");
1809    sd->size = -100;
1810    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1811
1812    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1813    sd->size_str = eina_stringshare_add("Big");
1814    sd->size = -150;
1815    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1816
1817    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1818    sd->size_str = eina_stringshare_add("Really Big");
1819    sd->size = -190;
1820    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1821
1822    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1823    sd->size_str = eina_stringshare_add("Huge");
1824    sd->size = -250;
1825    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1826
1827    for (i = 5; i < 51; i++)
1828      {
1829         char str[16];
1830
1831         str[0] = 0;
1832         snprintf(str, sizeof(str), "%d pixels", i);
1833
1834         sd = calloc(1, sizeof(Elm_Font_Size_Data));
1835         sd->size_str = eina_stringshare_add(str);
1836         sd->size = i;
1837         fndata.font_px_list = eina_list_append(fndata.font_px_list, sd);
1838      }
1839 }
1840
1841 static int
1842 _font_sort_cb(const void *data1,
1843               const void *data2)
1844 {
1845    if (!data1) return 1;
1846    if (!data2) return -1;
1847    return strcmp(data1, data2);
1848 }
1849
1850 static void
1851 _font_sizes_list_load(Evas_Object *size_list)
1852 {
1853    Elm_Font_Size_Data *size_data;
1854    Eina_List *l;
1855    Evas *evas;
1856
1857    evas = evas_object_evas_get(size_list);
1858    evas_event_freeze(evas);
1859    edje_freeze();
1860
1861    EINA_LIST_FOREACH(fndata.font_scale_list, l, size_data)
1862      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1863                           _font_sizes_list_sel, size_data);
1864
1865    EINA_LIST_FOREACH(fndata.font_px_list, l, size_data)
1866      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1867                           _font_sizes_list_sel, size_data);
1868
1869    elm_list_go(size_list);
1870    edje_thaw();
1871    evas_event_thaw(evas);
1872 }
1873
1874 static void
1875 _fnames_list_unselect_cb(void *data       __UNUSED__,
1876                          Evas_Object     *obj,
1877                          void *event_info __UNUSED__)
1878 {
1879    Evas_Object *styles_list, *sizes_list, *win;
1880
1881    if (elm_list_selected_item_get(obj)) return;
1882
1883    win = elm_object_top_widget_get(obj);
1884
1885    styles_list = evas_object_data_get(win, "font_styles_list");
1886    ELM_LIST_DISABLE(styles_list);
1887
1888    sizes_list = evas_object_data_get(win, "font_sizes_list");
1889    ELM_LIST_DISABLE(sizes_list);
1890 }
1891
1892 static Eina_Bool
1893 _font_list_fill(const Eina_Hash *hash __UNUSED__,
1894                 const void *key       __UNUSED__,
1895                 void                 *data,
1896                 void                 *fdata)
1897 {
1898    Elm_Font_Properties *efp;
1899    Eina_List **flist;
1900
1901    flist = fdata;
1902    efp = data;
1903
1904    *flist = eina_list_append(*flist, efp->name);
1905
1906    return EINA_TRUE;
1907 }
1908
1909 static void
1910 _font_names_list_load(Evas_Object *flist)
1911 {
1912    Eina_List *l, *names_list = NULL;
1913    const char *font;
1914    Evas *evas;
1915
1916    evas = evas_object_evas_get(flist);
1917    evas_event_freeze(evas);
1918    edje_freeze();
1919
1920    eina_hash_foreach(fndata.font_hash, _font_list_fill, &names_list);
1921    names_list = eina_list_sort(names_list, eina_list_count(names_list),
1922                                _font_sort_cb);
1923
1924    EINA_LIST_FOREACH(names_list, l, font)
1925      elm_list_item_append(flist, font, NULL, NULL, _font_names_list_sel, NULL);
1926
1927    EINA_LIST_FREE(names_list, font) ;
1928
1929    evas_object_smart_callback_add(flist, "unselected",
1930                                   _fnames_list_unselect_cb, NULL);
1931
1932    elm_list_go(flist);
1933
1934    edje_thaw();
1935    evas_event_thaw(evas);
1936 }
1937
1938 static void
1939 _status_config_fonts(Evas_Object *win,
1940                      Evas_Object *naviframe)
1941 {
1942    Evas_Object *base, *fr, *li, *rc, *preview, *sp, *pd, *bt, *bx;
1943    char buf[PATH_MAX];
1944
1945    _fonts_data_fill(evas_object_evas_get(win));
1946
1947    base = elm_table_add(win);
1948    evas_object_size_hint_weight_set(base, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1949    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1950
1951    /* yeah, dummy rectangles are ugly as hell, but no good way yet of
1952       fixing sizes */
1953    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1954    evas_object_size_hint_weight_set(rc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1955    evas_object_size_hint_align_set(rc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1956    evas_object_size_hint_min_set(rc, 70, 170);
1957    elm_table_pack(base, rc, 1, 0, 1, 1);
1958
1959    fr = elm_frame_add(win);
1960    elm_object_text_set(fr, "Font Class");
1961    elm_table_pack(base, fr, 0, 0, 1, 2);
1962    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1963    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1964    evas_object_show(fr);
1965
1966    /* FIXME: no multiselection for this list, for now */
1967    li = elm_list_add(win);
1968    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1969    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1970    elm_object_content_set(fr, li);
1971    evas_object_show(li);
1972
1973    evas_object_data_set(win, "font_classes_list", li);
1974    _font_classes_list_load(li);
1975
1976    fr = elm_frame_add(win);
1977    elm_object_text_set(fr, "Font");
1978    elm_table_pack(base, fr, 1, 0, 1, 2);
1979    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1980    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1981    evas_object_show(fr);
1982
1983    li = elm_list_add(win);
1984    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1985    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1986    elm_object_content_set(fr, li);
1987    evas_object_show(li);
1988
1989    evas_object_data_set(win, "font_names_list", li);
1990    _font_names_list_load(li);
1991    ELM_LIST_DISABLE(li);
1992
1993    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1994    evas_object_size_hint_weight_set(rc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1995    evas_object_size_hint_align_set(rc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1996    evas_object_size_hint_min_set(rc, 70, 130);
1997    elm_table_pack(base, rc, 1, 2, 1, 1);
1998
1999    fr = elm_frame_add(win);
2000    elm_object_text_set(fr, "Style");
2001    elm_table_pack(base, fr, 0, 2, 1, 1);
2002    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2003    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2004    evas_object_show(fr);
2005    ELM_LIST_DISABLE(li);
2006
2007    li = elm_list_add(win);
2008    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2009    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2010    elm_object_content_set(fr, li);
2011    evas_object_show(li);
2012
2013    evas_object_data_set(win, "font_styles_list", li);
2014    evas_object_smart_callback_add(li, "unselected", _fstyle_list_unselect_cb,
2015                                   NULL);
2016
2017    fr = elm_frame_add(win);
2018    elm_object_text_set(fr, "Size");
2019    elm_table_pack(base, fr, 1, 2, 1, 1);
2020    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2021    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2022    evas_object_show(fr);
2023
2024    li = elm_list_add(win);
2025    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2026    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2027    elm_object_content_set(fr, li);
2028    evas_object_show(li);
2029
2030    evas_object_data_set(win, "font_sizes_list", li);
2031    _font_sizes_list_load(li);
2032    ELM_LIST_DISABLE(li);
2033
2034    bx = elm_box_add(win);
2035    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2036    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2037    elm_table_pack(base, bx, 0, 3, 2, 1);
2038    evas_object_show(bx);
2039
2040    /* FIXME: what to do here? dedicated widget? some new entry API set? */
2041    snprintf(buf, sizeof(buf), "%s/objects/font_preview.edj", elm_app_data_dir_get());
2042    preview = elm_layout_add(win);
2043    elm_layout_file_set(preview, buf, "font_preview");
2044    elm_object_part_text_set(preview, "elm.text", "Preview Text — 我真的会写中文");
2045    evas_object_size_hint_weight_set(preview, EVAS_HINT_EXPAND, 0.0);
2046    evas_object_size_hint_align_set(preview, EVAS_HINT_FILL, EVAS_HINT_FILL);
2047    evas_object_show(preview);
2048
2049    elm_box_pack_end(bx, preview);
2050    evas_object_data_set(win, "font_preview", elm_layout_edje_get(preview));
2051
2052    /////////////////////////////////////////////
2053    sp = elm_separator_add(win);
2054    elm_separator_horizontal_set(sp, EINA_TRUE);
2055    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2056    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2057    elm_table_pack(base, sp, 0, 4, 2, 1);
2058    evas_object_show(sp);
2059
2060    pd = elm_frame_add(win);
2061    elm_object_style_set(pd, "pad_medium");
2062    evas_object_size_hint_weight_set(pd, EVAS_HINT_EXPAND, 0.0);
2063    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2064    elm_table_pack(base, pd, 0, 5, 2, 1);
2065    evas_object_show(pd);
2066
2067    bx = elm_box_add(win);
2068    elm_box_horizontal_set(bx, EINA_TRUE);
2069    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2070    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2071    evas_object_show(bx);
2072
2073    bt = elm_button_add(win);
2074    evas_object_smart_callback_add(bt, "clicked", _font_overlay_set_all, win);
2075    elm_object_text_set(bt, "Set to All");
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, win);
2083    elm_object_text_set(bt, "Reset");
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_reset_all, win);
2091    elm_object_text_set(bt, "Reset All");
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    bt = elm_button_add(win);
2098    evas_object_smart_callback_add(bt, "clicked", _font_overlay_change, win);
2099    elm_object_text_set(bt, "Apply");
2100    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2101    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2102    elm_box_pack_end(bx, bt);
2103    evas_object_show(bt);
2104
2105    elm_object_content_set(pd, bx);
2106
2107    evas_object_data_set(win, "fonts", base);
2108
2109    elm_naviframe_item_simple_push(naviframe, base);
2110 }
2111
2112 static void
2113 _engines_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_item_del_cb(void            *data,
2122                            Evas_Object *obj __UNUSED__,
2123                            void *event_info __UNUSED__)
2124 {
2125    free(data);
2126 }
2127
2128 static void
2129 _profiles_list_selected_cb(void            *data,
2130                            Evas_Object     *obj,
2131                            void *event_info __UNUSED__)
2132 {
2133    const char *cur_profile = NULL;
2134    const char *sel_profile, *pdir;
2135    const char *prof_name;
2136    char buf[PATH_MAX];
2137    Evas_Object *en;
2138 #ifdef ELM_EFREET
2139    Efreet_Desktop *desk = NULL;
2140 #endif
2141
2142    sel_profile = data;
2143    if (!sel_profile)
2144      return;
2145
2146    cur_profile = elm_config_profile_get();
2147
2148    pdir = elm_config_profile_dir_get(sel_profile, EINA_TRUE);
2149    if (!pdir) pdir = elm_config_profile_dir_get(sel_profile, EINA_FALSE);
2150 #ifdef ELM_EFREET
2151    snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2152    desk = efreet_desktop_new(buf);
2153    if ((desk) && (desk->name)) prof_name = desk->name;
2154    else
2155      {
2156         if (desk) efreet_desktop_free(desk);
2157         pdir = elm_config_profile_dir_get(sel_profile, EINA_FALSE);
2158         snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2159         desk = efreet_desktop_new(buf);
2160         if ((desk) && (desk->name)) prof_name = desk->name;
2161         else prof_name = cur_profile;
2162      }
2163 #endif
2164    prof_name = cur_profile;
2165
2166    if (!pdir)
2167      elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2168                              EINA_TRUE);
2169    else
2170      {
2171         elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2172                                 EINA_TRUE);
2173         elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2174                                 EINA_FALSE);
2175         elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2176                                 EINA_FALSE);
2177         elm_config_profile_dir_free(pdir);
2178      }
2179
2180    snprintf(buf, sizeof(buf), "<hilight>Selected profile: %s</><br/>",
2181             prof_name);
2182    elm_object_text_set(evas_object_data_get(obj, "prof_name_lbl"), buf);
2183
2184    en = evas_object_data_get(obj, "prof_desc_entry");
2185 #ifdef ELM_EFREET
2186    if (desk) elm_object_text_set(en, desk->comment);
2187    else
2188 #endif
2189    elm_object_text_set(en, "Unknown");
2190
2191 #ifdef ELM_EFREET
2192    if (desk) efreet_desktop_free(desk);
2193 #endif
2194 }
2195
2196 static void
2197 _profiles_list_fill(Evas_Object *l_widget,
2198                     Eina_List   *p_names)
2199 {
2200    const char *cur_profile = NULL;
2201    const char *profile;
2202    void *sel_it = NULL;
2203    Eina_List *l;
2204
2205    if (!p_names)
2206      return;
2207
2208    elm_list_clear(l_widget);
2209
2210    cur_profile = elm_config_profile_get();
2211
2212    EINA_LIST_FOREACH(p_names, l, profile)
2213      {
2214 #ifdef ELM_EFREET
2215         Efreet_Desktop *desk = NULL;
2216 #endif
2217         const char *label, *ext, *pdir;
2218         char buf[PATH_MAX];
2219         Elm_Object_Item *list_it;
2220         Evas_Object *ic;
2221
2222         pdir = elm_config_profile_dir_get(profile, EINA_TRUE);
2223         if (!pdir) pdir = elm_config_profile_dir_get(profile, EINA_FALSE);
2224         label = profile;
2225
2226 #ifdef ELM_EFREET
2227         snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2228         desk = efreet_desktop_new(buf);
2229         if ((desk) && (desk->name)) label = desk->name;
2230         else
2231           {
2232              if (desk) efreet_desktop_free(desk);
2233              pdir = elm_config_profile_dir_get(profile, EINA_FALSE);
2234              snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2235              desk = efreet_desktop_new(buf);
2236              if ((desk) && (desk->name)) label = desk->name;
2237              else label = profile;
2238           }
2239 #endif
2240
2241         buf[0] = 0;
2242         if (pdir) snprintf(buf, sizeof(buf), "%s/icon.edj", pdir);
2243 #ifdef ELM_EFREET
2244         if ((desk) && (desk->icon) && (pdir))
2245           snprintf(buf, sizeof(buf), "%s/%s", pdir, desk->icon);
2246 #endif
2247         ic = elm_icon_add(l_widget);
2248         ext = strrchr(buf, '.');
2249         if (ext)
2250           {
2251              if (!strcmp(ext, ".edj")) elm_icon_file_set(ic, buf, "icon");
2252              else elm_icon_file_set(ic, buf, NULL);
2253           }
2254
2255         evas_object_size_hint_aspect_set(ic, EVAS_ASPECT_CONTROL_VERTICAL,
2256                                          1, 1);
2257         evas_object_show(ic);
2258
2259         list_it = elm_list_item_append(l_widget, label, ic, NULL,
2260                                        _profiles_list_selected_cb,
2261                                        strdup(profile));
2262         elm_object_item_del_cb_set(list_it, _profiles_list_item_del_cb);
2263         if (cur_profile && !strcmp(profile, cur_profile))
2264           sel_it = list_it;
2265
2266         elm_config_profile_dir_free(pdir);
2267
2268 #ifdef ELM_EFREET
2269         if (desk) efreet_desktop_free(desk);
2270 #endif
2271      }
2272
2273    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2274    elm_list_go(l_widget);
2275 }
2276
2277 static void
2278 _profiles_list_unselect_cb(void *data       __UNUSED__,
2279                            Evas_Object     *obj,
2280                            void *event_info __UNUSED__)
2281 {
2282    if (elm_list_selected_item_get(obj)) return;
2283    elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2284                            EINA_TRUE);
2285    elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2286                            EINA_TRUE);
2287    elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2288                            EINA_TRUE);
2289 }
2290
2291 static void
2292 _status_config_profiles(Evas_Object *win,
2293                         Evas_Object *naviframe)
2294 {
2295    Evas_Object *li, *bx, *fr_bx1, *fr_bx2, *btn_bx, *fr, *lb, *en, *sp, *pd,
2296    *bt;
2297    Eina_List *profs;
2298    Evas *evas;
2299
2300    bx = elm_box_add(win);
2301    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2302    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2303
2304    fr_bx1 = elm_box_add(win);
2305    evas_object_size_hint_weight_set(fr_bx1, EVAS_HINT_EXPAND,
2306                                     EVAS_HINT_EXPAND);
2307    evas_object_size_hint_align_set(fr_bx1, EVAS_HINT_FILL, EVAS_HINT_FILL);
2308    elm_box_homogeneous_set(fr_bx1, EINA_TRUE);
2309    evas_object_show(fr_bx1);
2310
2311    fr_bx2 = elm_box_add(win);
2312    evas_object_size_hint_weight_set(fr_bx2, EVAS_HINT_EXPAND,
2313                                     EVAS_HINT_EXPAND);
2314    evas_object_size_hint_align_set(fr_bx2, EVAS_HINT_FILL, EVAS_HINT_FILL);
2315    evas_object_show(fr_bx2);
2316
2317    fr = elm_frame_add(win);
2318    elm_object_text_set(fr, "Available Profiles");
2319    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2320    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2321    elm_object_content_set(fr, fr_bx1);
2322    elm_box_pack_end(bx, fr);
2323    evas_object_show(fr);
2324
2325    li = elm_list_add(win);
2326    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2327    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2328    evas_object_smart_callback_add(li, "unselected", _profiles_list_unselect_cb,
2329                                   NULL);
2330
2331    profs = elm_config_profile_list_get();
2332
2333    evas_object_show(li);
2334    elm_box_pack_end(fr_bx2, li);
2335
2336    lb = elm_label_add(win);
2337    evas_object_size_hint_weight_set(lb, EVAS_HINT_EXPAND, 0.0);
2338    evas_object_size_hint_align_set(lb, EVAS_HINT_FILL, 0.5);
2339
2340    evas_object_show(lb);
2341
2342    en = elm_entry_add(win);
2343    elm_entry_scrollable_set(en, EINA_TRUE);
2344    elm_entry_editable_set(en, EINA_FALSE);
2345    evas_object_size_hint_weight_set(en, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2346    evas_object_size_hint_align_set(en, EVAS_HINT_FILL, EVAS_HINT_FILL);
2347    evas_object_show(en);
2348
2349    evas_object_data_set(li, "prof_name_lbl", lb);
2350    evas_object_data_set(li, "prof_desc_entry", en);
2351
2352    elm_box_pack_end(fr_bx2, lb);
2353    elm_box_pack_end(fr_bx1, fr_bx2);
2354    elm_box_pack_end(fr_bx1, en);
2355
2356    /////////////////////////////////////////////
2357    sp = elm_separator_add(win);
2358    elm_separator_horizontal_set(sp, EINA_TRUE);
2359    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2360    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2361    elm_box_pack_end(bx, sp);
2362    evas_object_show(sp);
2363
2364    pd = elm_frame_add(win);
2365    elm_object_style_set(pd, "pad_medium");
2366    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
2367    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2368    elm_box_pack_end(bx, pd);
2369    evas_object_show(pd);
2370
2371    btn_bx = elm_box_add(win);
2372    elm_box_horizontal_set(btn_bx, EINA_TRUE);
2373    evas_object_size_hint_weight_set(btn_bx, EVAS_HINT_EXPAND,
2374                                     EVAS_HINT_EXPAND);
2375    evas_object_size_hint_align_set(btn_bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2376    evas_object_show(btn_bx);
2377
2378    bt = elm_button_add(win);
2379    evas_object_smart_callback_add(bt, "clicked", _profile_use, li);
2380    elm_object_text_set(bt, "Use");
2381    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2382    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2383    elm_box_pack_end(btn_bx, bt);
2384    evas_object_show(bt);
2385
2386    evas_object_data_set(li, "prof_use_btn", bt);
2387
2388    bt = elm_button_add(win);
2389    evas_object_smart_callback_add(bt, "clicked", _btn_todo, NULL); /* TODO */
2390    elm_object_text_set(bt, "Delete");
2391    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2392    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2393    elm_box_pack_end(btn_bx, bt);
2394    evas_object_show(bt);
2395
2396    evas_object_data_set(li, "prof_del_btn", bt);
2397
2398    bt = elm_button_add(win);
2399    evas_object_smart_callback_add(bt, "clicked", _profile_reset, li);
2400    elm_object_text_set(bt, "Reset");
2401    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2402    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2403    elm_box_pack_end(btn_bx, bt);
2404    evas_object_show(bt);
2405
2406    evas_object_data_set(li, "prof_reset_btn", bt);
2407
2408    bt = elm_button_add(win);
2409    evas_object_smart_callback_add(bt, "clicked", _btn_todo, NULL); /* TODO */
2410    elm_object_text_set(bt, "Add new");
2411    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2412    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2413    elm_box_pack_end(btn_bx, bt);
2414    evas_object_show(bt);
2415
2416    elm_object_content_set(pd, btn_bx);
2417
2418    evas = evas_object_evas_get(li);
2419    evas_event_freeze(evas);
2420    edje_freeze();
2421
2422    _profiles_list_fill(li, profs);
2423
2424    elm_config_profile_list_free(profs);
2425
2426    edje_thaw();
2427    evas_event_thaw(evas);
2428
2429    evas_object_data_set(win, "profiles", bx);
2430    elm_naviframe_item_simple_push(naviframe, bx);
2431 }
2432
2433 static void
2434 _status_config_scrolling(Evas_Object *win,
2435                          Evas_Object *naviframe)
2436 {
2437    Evas_Object *lb, *pd, *bx, *sl, *sp, *ck, *sc;
2438
2439    bx = elm_box_add(win);
2440    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
2441    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
2442
2443    sc = elm_scroller_add(win);
2444    evas_object_size_hint_weight_set(sc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2445    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
2446    elm_scroller_bounce_set(sc, EINA_FALSE, EINA_TRUE);
2447    evas_object_show(sc);
2448    elm_object_content_set(sc, bx);
2449
2450    ck = elm_check_add(win);
2451    elm_object_tooltip_text_set(ck, "Set whether scrollers should bounce<br/>"
2452                                    "when they reach their viewport's edge<br/>"
2453                                    "during a scroll");
2454    elm_object_text_set(ck, "Enable scroll bounce");
2455    evas_object_data_set(win, "scroll_bounce_check", ck);
2456    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2457    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2458    elm_check_state_set(ck, elm_config_scroll_bounce_enabled_get());
2459    elm_box_pack_end(bx, ck);
2460    evas_object_show(ck);
2461
2462    evas_object_smart_callback_add(ck, "changed", sb_change, NULL);
2463
2464    LABEL_FRAME_ADD("<hilight>Scroll bounce friction</>");
2465
2466    sl = elm_slider_add(win);
2467    elm_object_tooltip_text_set(sl, "This is the amount of inertia a <br/>"
2468                                    "scroller will impose at bounce animations");
2469    evas_object_data_set(win, "bounce_friction_slider", sl);
2470    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2471    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2472    elm_slider_span_size_set(sl, 120);
2473    elm_slider_unit_format_set(sl, "%1.2f");
2474    elm_slider_indicator_format_set(sl, "%1.2f");
2475    elm_slider_min_max_set(sl, 0.0, 4.0);
2476    elm_slider_value_set(sl, elm_config_scroll_bounce_friction_get());
2477    elm_box_pack_end(bx, sl);
2478    evas_object_show(sl);
2479
2480    evas_object_smart_callback_add(sl, "changed", bf_round, NULL);
2481    evas_object_smart_callback_add(sl, "delay,changed", bf_change, NULL);
2482
2483    sp = elm_separator_add(win);
2484    elm_separator_horizontal_set(sp, EINA_TRUE);
2485    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2486    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2487    elm_box_pack_end(bx, sp);
2488    evas_object_show(sp);
2489
2490    ck = elm_check_add(win);
2491    elm_object_tooltip_text_set(ck, "Set whether scrollers should be<br/>"
2492                                    "draggable from any point in their views");
2493    elm_object_text_set(ck, "Enable thumb scroll");
2494    evas_object_data_set(win, "thumbscroll_check", ck);
2495    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2496    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2497    elm_check_state_set(ck, elm_config_scroll_thumbscroll_enabled_get());
2498    elm_box_pack_end(bx, ck);
2499    evas_object_show(ck);
2500
2501    evas_object_smart_callback_add(ck, "changed", ts_change, NULL);
2502
2503    LABEL_FRAME_ADD("<hilight>Thumb scroll threshold</>");
2504
2505    sl = elm_slider_add(win);
2506    elm_object_tooltip_text_set(sl, "This is the number of pixels one should<br/>"
2507                                    "travel while dragging a scroller's view<br/>"
2508                                    "to actually trigger scrolling");
2509    evas_object_data_set(win, "thumbscroll_threshold_slider", sl);
2510    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2511    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2512    elm_slider_span_size_set(sl, 120);
2513    elm_slider_unit_format_set(sl, "%1.0f pixels");
2514    elm_slider_indicator_format_set(sl, "%1.0f");
2515    elm_slider_min_max_set(sl, 8.0, 50.0);
2516    elm_slider_value_set(sl, elm_config_scroll_thumbscroll_threshold_get());
2517    elm_box_pack_end(bx, sl);
2518    evas_object_show(sl);
2519
2520    evas_object_smart_callback_add(sl, "changed", tst_round, NULL);
2521    evas_object_smart_callback_add(sl, "delay,changed", tst_change, NULL);
2522
2523    LABEL_FRAME_ADD("<hilight>Thumb scroll momentum threshold</>");
2524
2525    sl = elm_slider_add(win);
2526    elm_object_tooltip_text_set(sl, "This is the minimum speed of mouse <br/>"
2527                                    "cursor movement which will trigger<br/>"
2528                                    "list self scrolling animation after a<br/>"
2529                                    "mouse up event (pixels/second)");
2530    evas_object_data_set(win, "ts_momentum_threshold_slider", sl);
2531    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2532    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2533    elm_slider_span_size_set(sl, 120);
2534    elm_slider_unit_format_set(sl, "%1.0f pixels/s");
2535    elm_slider_indicator_format_set(sl, "%1.0f");
2536    elm_slider_min_max_set(sl, 10.0, 200.0);
2537    elm_slider_value_set(sl, elm_config_scroll_thumbscroll_momentum_threshold_get());
2538    elm_box_pack_end(bx, sl);
2539    evas_object_show(sl);
2540
2541    evas_object_smart_callback_add(sl, "changed", tsmt_round, NULL);
2542    evas_object_smart_callback_add(sl, "delay,changed", tsmt_change,
2543                                   NULL);
2544
2545    LABEL_FRAME_ADD("<hilight>Thumb scroll friction</>");
2546
2547    sl = elm_slider_add(win);
2548    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br/>"
2549                                    "scroller will impose at self scrolling<br/>"
2550                                    "animations");
2551    evas_object_data_set(win, "thumbscroll_friction_slider", sl);
2552    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2553    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2554    elm_slider_span_size_set(sl, 120);
2555    elm_slider_unit_format_set(sl, "%1.1f");
2556    elm_slider_indicator_format_set(sl, "%1.1f");
2557    elm_slider_min_max_set(sl, 0.0, 15.0);
2558    elm_slider_value_set(sl, elm_config_scroll_thumbscroll_friction_get());
2559    elm_box_pack_end(bx, sl);
2560    evas_object_show(sl);
2561
2562    evas_object_smart_callback_add(sl, "changed", tsf_round, NULL);
2563    evas_object_smart_callback_add(sl, "delay,changed", tsf_change, NULL);
2564
2565    LABEL_FRAME_ADD("<hilight>Thumb scroll border friction</>");
2566
2567    sl = elm_slider_add(win);
2568    elm_object_tooltip_text_set(sl, "This is the amount of lag between your<br/>"
2569                                    "actual mouse cursor dragging movement<br/>"
2570                                    "and a scroller's view movement itself,<br/>"
2571                                    "while pushing it into bounce state<br/>"
2572                                    "manually");
2573    evas_object_data_set(win, "ts_border_friction_slider", sl);
2574    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2575    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2576    elm_slider_span_size_set(sl, 120);
2577    elm_slider_unit_format_set(sl, "%1.2f");
2578    elm_slider_indicator_format_set(sl, "%1.2f");
2579    elm_slider_min_max_set(sl, 0.0, 1.0);
2580    elm_slider_value_set(sl, elm_config_scroll_thumbscroll_border_friction_get());
2581    elm_box_pack_end(bx, sl);
2582    evas_object_show(sl);
2583
2584    evas_object_smart_callback_add(sl, "changed", tsbf_round, NULL);
2585    evas_object_smart_callback_add(sl, "delay,changed", tsbf_change, NULL);
2586
2587    LABEL_FRAME_ADD("<hilight>Thumb scroll sensitivity friction</>");
2588
2589    sl = elm_slider_add(win);
2590    elm_object_tooltip_text_set(sl, "This is the sensitivity amount which<br/>"
2591                                    "is be multiplied by the length of mouse<br/>"
2592                                    "dragging.");
2593    evas_object_data_set(win, "ts_sensitivity_friction_slider", sl);
2594    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2595    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2596    elm_slider_span_size_set(sl, 120);
2597    elm_slider_unit_format_set(sl, "%1.2f");
2598    elm_slider_indicator_format_set(sl, "%1.2f");
2599    elm_slider_min_max_set(sl, 0.1, 1.0);
2600    elm_slider_value_set(sl, elm_config_scroll_thumbscroll_sensitivity_friction_get());
2601    elm_box_pack_end(bx, sl);
2602    evas_object_show(sl);
2603
2604    evas_object_smart_callback_add(sl, "changed", tssf_round, NULL);
2605    evas_object_smart_callback_add(sl, "delay,changed", tssf_change, NULL);
2606
2607    sp = elm_separator_add(win);
2608    elm_separator_horizontal_set(sp, EINA_TRUE);
2609    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2610    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2611    elm_box_pack_end(bx, sp);
2612    evas_object_show(sp);
2613
2614    LABEL_FRAME_ADD("<hilight>Page scroll friction</>");
2615
2616    sl = elm_slider_add(win);
2617    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br/>"
2618                                    "paged scroller will impose at<br/>"
2619                                    "page fitting animations");
2620    evas_object_data_set(win, "page_scroll_friction_slider", sl);
2621    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2622    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2623    elm_slider_span_size_set(sl, 120);
2624    elm_slider_unit_format_set(sl, "%1.1f");
2625    elm_slider_indicator_format_set(sl, "%1.1f");
2626    elm_slider_min_max_set(sl, 0.0, 5.0);
2627    elm_slider_value_set(sl, elm_config_scroll_page_scroll_friction_get());
2628    elm_box_pack_end(bx, sl);
2629    evas_object_show(sl);
2630
2631    evas_object_smart_callback_add(sl, "changed", ps_round, NULL);
2632    evas_object_smart_callback_add(sl, "delay,changed", ps_change, NULL);
2633
2634    LABEL_FRAME_ADD("<hilight>Bring in scroll friction</>");
2635
2636    sl = elm_slider_add(win);
2637    elm_object_tooltip_text_set(sl, "This is the amount of inertia a<br/>"
2638                                    "scroller will impose at region bring<br/>"
2639                                    "animations");
2640    evas_object_data_set(win, "bring_in_scroll_friction_slider", sl);
2641    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2642    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2643    elm_slider_span_size_set(sl, 120);
2644    elm_slider_unit_format_set(sl, "%1.1f");
2645    elm_slider_indicator_format_set(sl, "%1.1f");
2646    elm_slider_min_max_set(sl, 0.0, 5.0);
2647    elm_slider_value_set(sl, elm_config_scroll_bring_in_scroll_friction_get());
2648    elm_box_pack_end(bx, sl);
2649    evas_object_show(sl);
2650
2651    evas_object_smart_callback_add(sl, "changed", bis_round, NULL);
2652    evas_object_smart_callback_add(sl, "delay,changed", bis_change, NULL);
2653
2654    LABEL_FRAME_ADD("<hilight>Zoom scroll friction</>");
2655
2656    sl = elm_slider_add(win);
2657    elm_object_tooltip_text_set(sl, "This is the amount of inertia<br/>"
2658                                    "scrollers will impose at animations<br/>"
2659                                    "triggered by Elementary widgets'<br/>"
2660                                    "zooming API");
2661    evas_object_data_set(win, "zoom_scroll_friction_slider", sl);
2662    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2663    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2664    elm_slider_span_size_set(sl, 120);
2665    elm_slider_unit_format_set(sl, "%1.1f");
2666    elm_slider_indicator_format_set(sl, "%1.1f");
2667    elm_slider_min_max_set(sl, 0.0, 5.0);
2668    elm_slider_value_set(sl, elm_config_scroll_zoom_friction_get());
2669    elm_box_pack_end(bx, sl);
2670    evas_object_show(sl);
2671
2672    evas_object_smart_callback_add(sl, "changed", zf_round, NULL);
2673    evas_object_smart_callback_add(sl, "delay,changed", zf_change, NULL);
2674
2675    evas_object_data_set(win, "scrolling", sc);
2676
2677    elm_naviframe_item_simple_push(naviframe, sc);
2678 }
2679
2680 static char *
2681 _engine_name_prettify(const char *engine)
2682 {
2683    char *ret, *ptr;
2684
2685    ret = strdup(engine);
2686    ret[0] -= 0x20;
2687
2688    while ((ptr = strpbrk(ret, "_")))
2689      {
2690         *ptr = ' ';
2691      }
2692
2693    return ret;
2694 }
2695
2696 /* FIXME! ideally, we would trim elm_config.c's _elm_engines list at
2697    build time, making a getter for is as in ecore-evas. */
2698 static Eina_Bool
2699 _elm_engine_supported(const char *engine)
2700 {
2701    const char *engines[] = {
2702       "software_x11",
2703       "fb",
2704       "directfb",
2705       "software_16_x11",
2706       "software_8_x11",
2707       "xrender_x11",
2708       "opengl_x11",
2709       "software_gdi",
2710       "software_16_wince_gdi",
2711       "sdl",
2712       "software_16_sdl",
2713       "opengl_sdl",
2714       "ews",
2715       "opengl_cocoa",
2716       "psl1ght",
2717       "wayland_shm",
2718       "wayland_egl",
2719       NULL
2720    };
2721
2722    unsigned int i;
2723
2724    for (i = 0; engines[i]; i++)
2725      {
2726 #define ENGINE_COMPARE(name) (!strcmp(engines[i], name))
2727         if (ENGINE_COMPARE(engine))
2728           return EINA_TRUE;
2729 #undef ENGINE_COMPARE
2730      }
2731
2732    return EINA_FALSE;
2733 }
2734
2735 static void
2736 _engines_list_fill(Evas_Object *l_widget,
2737                    Eina_List   *e_names)
2738 {
2739    const char *engine, *cur_engine;
2740    void *sel_it = NULL;
2741    Eina_List *l;
2742
2743    if (!e_names)
2744      return;
2745
2746    cur_engine = elm_config_engine_get();
2747
2748    EINA_LIST_FOREACH(e_names, l, engine)
2749      {
2750         const char *label;
2751         Elm_Object_Item *list_it;
2752
2753         if (!_elm_engine_supported(engine))
2754           continue;
2755
2756         label = _engine_name_prettify(engine);
2757
2758         list_it = elm_list_item_append(l_widget, label, NULL, NULL, NULL,
2759                                   strdup(engine));
2760         elm_object_item_del_cb_set(list_it, _engines_list_item_del_cb);
2761         free((void *)label);
2762
2763         if (!strcmp(cur_engine, engine))
2764           sel_it = list_it;
2765      }
2766
2767    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2768    elm_list_go(l_widget);
2769 }
2770
2771 static void
2772 _status_config_rendering(Evas_Object *win,
2773                          Evas_Object *naviframe)
2774 {
2775    Evas_Object *li, *bx, *fr, *sp, *pd, *bt;
2776    Eina_List *engines;
2777
2778    bx = elm_box_add(win);
2779    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2780    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2781
2782    fr = elm_frame_add(win);
2783    elm_object_text_set(fr, "Available Engines");
2784    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2785    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2786    elm_box_pack_end(bx, fr);
2787    evas_object_show(fr);
2788
2789    li = elm_list_add(win);
2790    elm_object_content_set(fr, li);
2791    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2792    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2793
2794    engines = ecore_evas_engines_get();
2795    _engines_list_fill(li, engines);
2796    ecore_evas_engines_free(engines);
2797
2798    evas_object_show(li);
2799    evas_object_data_set(win, "engines_list", li);
2800
2801    /////////////////////////////////////////////
2802    sp = elm_separator_add(win);
2803    elm_separator_horizontal_set(sp, EINA_TRUE);
2804    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2805    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2806    elm_box_pack_end(bx, sp);
2807    evas_object_show(sp);
2808
2809    pd = elm_frame_add(win);
2810    elm_object_style_set(pd, "pad_medium");
2811    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
2812    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2813    elm_box_pack_end(bx, pd);
2814    evas_object_show(pd);
2815
2816    bt = elm_button_add(win);
2817    evas_object_smart_callback_add(bt, "clicked", _engine_use, li);
2818    elm_object_text_set(bt, "Use Engine");
2819    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2820    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2821    elm_object_content_set(pd, bt);
2822    evas_object_show(bt);
2823
2824    evas_object_data_set(win, "rendering", bx);
2825    elm_naviframe_item_simple_push(naviframe, bx);
2826 }
2827
2828 static void
2829 _status_config_caches(Evas_Object *win,
2830                       Evas_Object *naviframe)
2831 {
2832    Evas_Object *lb, *pd, *bx, *sl, *sp, *ck;
2833
2834    bx = elm_box_add(win);
2835    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
2836    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
2837
2838    LABEL_FRAME_ADD("<hilight>Cache Flush Interval (8 ticks pre second)</>");
2839
2840    sl = elm_slider_add(win);
2841    evas_object_data_set(win, "cache_flush_interval_slider", sl);
2842    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2843    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2844    elm_slider_span_size_set(sl, 120);
2845    elm_slider_unit_format_set(sl, "%1.0f ticks");
2846    elm_slider_indicator_format_set(sl, "%1.0f");
2847    elm_slider_min_max_set(sl, 8.0, 4096.0);
2848    elm_slider_value_set(sl, elm_config_cache_flush_interval_get());
2849    elm_object_disabled_set(sl, !elm_config_cache_flush_enabled_get());
2850
2851    ck = elm_check_add(win);
2852    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2853    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2854    elm_object_text_set(ck, "Enable Flushing");
2855    elm_check_state_set(ck, elm_config_cache_flush_enabled_get());
2856    evas_object_smart_callback_add(ck, "changed", cf_enable, sl);
2857    elm_box_pack_end(bx, ck);
2858    evas_object_show(ck);
2859
2860    elm_box_pack_end(bx, sl);
2861    evas_object_show(sl);
2862
2863    evas_object_smart_callback_add(sl, "changed", cf_round, NULL);
2864    evas_object_smart_callback_add(sl, "delay,changed", cf_change, NULL);
2865
2866    sp = elm_separator_add(win);
2867    elm_separator_horizontal_set(sp, EINA_TRUE);
2868    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2869    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2870    elm_box_pack_end(bx, sp);
2871    evas_object_show(sp);
2872
2873    LABEL_FRAME_ADD("<hilight>Font Cache Size</>");
2874
2875    sl = elm_slider_add(win);
2876    evas_object_data_set(win, "font_cache_slider", sl);
2877    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2878    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2879    elm_slider_span_size_set(sl, 120);
2880    elm_slider_unit_format_set(sl, "%1.1f MB");
2881    elm_slider_indicator_format_set(sl, "%1.1f");
2882    elm_slider_min_max_set(sl, 0.0, 4.0);
2883    elm_slider_value_set(sl, (double)elm_config_cache_font_cache_size_get() / 1024.0);
2884    elm_box_pack_end(bx, sl);
2885    evas_object_show(sl);
2886
2887    evas_object_smart_callback_add(sl, "changed", fc_round, NULL);
2888    evas_object_smart_callback_add(sl, "delay,changed", fc_change, NULL);
2889
2890    sp = elm_separator_add(win);
2891    elm_separator_horizontal_set(sp, EINA_TRUE);
2892    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2893    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2894    elm_box_pack_end(bx, sp);
2895    evas_object_show(sp);
2896
2897    LABEL_FRAME_ADD("<hilight>Image Cache Size</>");
2898
2899    sl = elm_slider_add(win);
2900    evas_object_data_set(win, "image_cache_slider", sl);
2901    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2902    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2903    elm_slider_span_size_set(sl, 120);
2904    elm_slider_unit_format_set(sl, "%1.0f MB");
2905    elm_slider_indicator_format_set(sl, "%1.0f");
2906    elm_slider_min_max_set(sl, 0, 32);
2907    elm_slider_value_set(sl, (double)elm_config_cache_image_cache_size_get() / 1024.0);
2908    elm_box_pack_end(bx, sl);
2909    evas_object_show(sl);
2910
2911    evas_object_smart_callback_add(sl, "changed", ic_round, NULL);
2912    evas_object_smart_callback_add(sl, "delay,changed", ic_change, NULL);
2913
2914    sp = elm_separator_add(win);
2915    elm_separator_horizontal_set(sp, EINA_TRUE);
2916    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2917    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2918    elm_box_pack_end(bx, sp);
2919    evas_object_show(sp);
2920
2921    LABEL_FRAME_ADD("<hilight>Number of Edje Files to Cache</>");
2922
2923    sl = elm_slider_add(win);
2924    evas_object_data_set(win, "edje_file_cache_slider", sl);
2925    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2926    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2927    elm_slider_span_size_set(sl, 120);
2928    elm_slider_unit_format_set(sl, "%1.0f files");
2929    elm_slider_indicator_format_set(sl, "%1.0f");
2930    elm_slider_min_max_set(sl, 0, 32);
2931    elm_slider_value_set(sl, elm_config_cache_edje_file_cache_size_get());
2932    elm_box_pack_end(bx, sl);
2933    evas_object_show(sl);
2934
2935    evas_object_smart_callback_add(sl, "changed", efc_round, NULL);
2936    evas_object_smart_callback_add(sl, "delay,changed", efc_change, NULL);
2937
2938    sp = elm_separator_add(win);
2939    elm_separator_horizontal_set(sp, EINA_TRUE);
2940    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2941    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2942    elm_box_pack_end(bx, sp);
2943    evas_object_show(sp);
2944
2945    LABEL_FRAME_ADD("<hilight>Number of Edje Collections to Cache</>");
2946
2947    sl = elm_slider_add(win);
2948    evas_object_data_set(win, "edje_collection_cache_slider", sl);
2949    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2950    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2951    elm_slider_span_size_set(sl, 120);
2952    elm_slider_unit_format_set(sl, "%1.0f collections");
2953    elm_slider_indicator_format_set(sl, "%1.0f");
2954    elm_slider_min_max_set(sl, 0, 128);
2955    elm_slider_value_set(sl, elm_config_cache_edje_collection_cache_size_get());
2956    elm_box_pack_end(bx, sl);
2957    evas_object_show(sl);
2958
2959    evas_object_smart_callback_add(sl, "changed", ecc_round, NULL);
2960    evas_object_smart_callback_add(sl, "delay,changed", ecc_change, NULL);
2961
2962    evas_object_data_set(win, "caches", bx);
2963
2964    elm_naviframe_item_simple_push(naviframe, bx);
2965 }
2966
2967 static void
2968 _status_config_full(Evas_Object *win,
2969                     Evas_Object *bx0)
2970 {
2971    Evas_Object *tb, *naviframe;
2972    Elm_Object_Item *tb_sizing, *tb_it;
2973
2974    tb = elm_toolbar_add(win);
2975    elm_toolbar_select_mode_set(tb, ELM_OBJECT_SELECT_MODE_ALWAYS);
2976    elm_toolbar_menu_parent_set(tb, win);
2977    elm_toolbar_homogeneous_set(tb, EINA_FALSE);
2978    evas_object_size_hint_weight_set(tb, 1.0, 0.0);
2979    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
2980
2981    tb_sizing = elm_toolbar_item_append(tb, "zoom-fit-best", "Sizing",
2982                                     _cf_sizing, win);
2983    elm_toolbar_item_priority_set(tb_sizing, 100);
2984
2985    tb_it = elm_toolbar_item_append(tb, "preferences-desktop-theme", "Theme",
2986                                 _cf_themes, win);
2987    elm_toolbar_item_priority_set(tb_it, 90);
2988
2989    elm_toolbar_item_append(tb, "preferences-desktop-font", "Fonts",
2990                            _cf_fonts, win);
2991
2992    tb_it = elm_toolbar_item_append(tb, "system-users", "Profiles",
2993                                 _cf_profiles, win);
2994    elm_toolbar_item_priority_set(tb_it, 90);
2995
2996    elm_toolbar_item_append(tb, "system-run", "Scrolling", _cf_scrolling, win);
2997    elm_toolbar_item_append(tb, "video-display", "Rendering",
2998                            _cf_rendering, win);
2999    elm_toolbar_item_append(tb, "appointment-new", "Caches", _cf_caches, win);
3000
3001    elm_box_pack_end(bx0, tb);
3002    evas_object_show(tb);
3003
3004    naviframe = elm_naviframe_add(win);
3005    evas_object_size_hint_align_set(naviframe, EVAS_HINT_FILL, EVAS_HINT_FILL);
3006    evas_object_size_hint_weight_set(naviframe, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
3007    evas_object_data_set(win, "naviframe", naviframe);
3008
3009    _status_config_themes(win, naviframe);
3010    _status_config_fonts(win, naviframe);
3011    _status_config_profiles(win, naviframe);
3012    _status_config_rendering(win, naviframe);
3013    _status_config_scrolling(win, naviframe);
3014    _status_config_caches(win, naviframe);
3015    _status_config_sizing(win, naviframe);
3016
3017    // FIXME uncomment after flip style fix, please
3018    //elm_object_style_set(naviframe, "flip");
3019    elm_toolbar_item_selected_set(tb_sizing, EINA_TRUE);
3020    elm_box_pack_end(bx0, naviframe);
3021    evas_object_show(naviframe);
3022 }
3023
3024 static void
3025 status_win(void)
3026 {
3027    Evas_Object *win, *bg, *bx0;
3028
3029    win = elm_win_add(NULL, "main", ELM_WIN_BASIC);
3030    main_win = win;
3031    elm_win_title_set(win, "Elementary Config");
3032
3033    ecore_event_handler_add(ELM_EVENT_CONFIG_ALL_CHANGED, _config_all_changed,
3034                            win);
3035
3036    evas_object_smart_callback_add(win, "delete,request", config_exit, NULL);
3037    bg = elm_bg_add(win);
3038    evas_object_size_hint_weight_set(bg, 1.0, 1.0);
3039    elm_win_resize_object_add(win, bg);
3040    evas_object_show(bg);
3041
3042    bx0 = elm_box_add(win);
3043    evas_object_size_hint_weight_set(bx0, 1.0, 1.0);
3044    elm_win_resize_object_add(win, bx0);
3045    evas_object_show(bx0);
3046
3047    if (!interactive) _status_basic(win, bx0);
3048    else if (0)
3049      _status_config(win, bx0);
3050    else _status_config_full(win, bx0);
3051
3052    evas_object_resize(win, 320, 480);
3053    evas_object_show(win);
3054 }
3055
3056 static Eina_Bool
3057 _exit_timer(void *data __UNUSED__)
3058 {
3059    elm_exit();
3060    return ECORE_CALLBACK_CANCEL;
3061 }
3062
3063 /* this is your elementary main function - it MUST be called IMMEDIATELY
3064  * after elm_init() and MUST be passed argc and argv, and MUST be called
3065  * elm_main and not be static - must be a visible symbol with EAPI infront */
3066 EAPI_MAIN int
3067 elm_main(int    argc,
3068          char **argv)
3069 {
3070    int i;
3071
3072    elm_app_info_set(elm_main, "elementary", "images/logo.png");
3073    elm_app_compile_bin_dir_set(PACKAGE_BIN_DIR);
3074    elm_app_compile_data_dir_set(PACKAGE_DATA_DIR);
3075
3076    for (i = 1; i < argc; i++)
3077      {
3078         if (!strcmp(argv[i], "-h"))
3079           {
3080              printf("Usage:\n"
3081                     "  -h                This help\n"
3082                     "  -q                Quiet mode (dont show window)\n"
3083                     "  -t THEME          Set theme to THEME (ELM_THEME spec)\n"
3084                     "  -f SIZE           Set finger size to SIZE pixels\n"
3085                     "  -s SCALE          Set scale factor to SCALE\n"
3086                     );
3087           }
3088         else if (!strcmp(argv[i], "-q"))
3089           {
3090              quiet = 1;
3091              interactive = 0;
3092           }
3093         else if ((!strcmp(argv[i], "-t")) && (i < argc - 1))
3094           {
3095              i++;
3096              theme_set = argv[i];
3097              interactive = 0;
3098           }
3099         else if ((!strcmp(argv[i], "-f")) && (i < argc - 1))
3100           {
3101              i++;
3102              finger_size_set = argv[i];
3103              interactive = 0;
3104           }
3105         else if ((!strcmp(argv[i], "-s")) && (i < argc - 1))
3106           {
3107              i++;
3108              scale_set = argv[i];
3109              interactive = 0;
3110           }
3111      }
3112    /* put here any init code specific to this app like parsing args, etc. */
3113    if (!quiet)
3114      {
3115 #ifdef ELM_EFREET
3116         elm_need_efreet();
3117 #endif
3118         status_win(); /* create main window */
3119         if (!interactive)
3120           ecore_timer_add(2.0, _exit_timer, NULL);
3121      }
3122    if (!interactive)
3123      {
3124         if (theme_set) elm_theme_set(NULL, theme_set);
3125         if (finger_size_set) elm_config_finger_size_set(atoi(finger_size_set));
3126         if (scale_set)  elm_config_scale_set(atof(scale_set));
3127
3128         elm_config_all_flush();
3129
3130         if (quiet) elm_exit();
3131      }
3132    elm_run(); /* and run the program now and handle all events, etc. */
3133    /* if the mainloop that elm_run() runs exists, we exit the app */
3134    elm_shutdown(); /* clean up and shut down */
3135    /* exit code */
3136    return 0;
3137 }
3138
3139 #endif
3140 /* All emelentary apps should use this. Put it right after elm_main() */
3141 ELM_MAIN()