src/bin/config.c

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