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 int quiet = 0;
  90 static int interactive = 1;
  91
  92 static const char *theme_set = NULL;
  93 static const char *finger_size_set = NULL;
  94 static const char *scale_set = NULL;
  95 static Fonts_Data fndata = {NULL, NULL, NULL, NULL, NULL, NULL, 0.0};
  96
  97 static void
  98 _font_styles_list_sel(void *data   __UNUSED__,
  99                       Evas_Object *obj,
 100                       void        *event_info);
 101
 102 static void
 103 config_exit(void *data       __UNUSED__,
 104             Evas_Object *obj __UNUSED__,
 105             void *event_info __UNUSED__)
 106 {
 107    Elm_Text_Class_Data *tc_data;
 108    Elm_Font_Size_Data *sd;
 109
 110    EINA_LIST_FREE(fndata.text_classes, tc_data)
 111      {
 112         eina_stringshare_del(tc_data->name);
 113         eina_stringshare_del(tc_data->desc);
 114         eina_stringshare_del(tc_data->font);
 115         eina_stringshare_del(tc_data->style);
 116         free(tc_data);
 117      }
 118
 119    elm_font_available_hash_del(fndata.font_hash);
 120    fndata.font_hash = NULL;
 121
 122    EINA_LIST_FREE(fndata.font_px_list, sd)
 123      {
 124         eina_stringshare_del(sd->size_str);
 125         free(sd);
 126      }
 127
 128    EINA_LIST_FREE(fndata.font_scale_list, sd)
 129      {
 130         eina_stringshare_del(sd->size_str);
 131         free(sd);
 132      }
 133
 134    if (fndata.cur_font) eina_stringshare_del(fndata.cur_font);
 135    fndata.cur_font = NULL;
 136
 137    if (fndata.cur_style) eina_stringshare_del(fndata.cur_style);
 138    fndata.cur_style = NULL;
 139
 140    elm_config_save();
 141    elm_exit(); /* exit the program's main loop that runs in elm_run() */
 142 }
 143
 144 static void
 145 sb_change(void *data       __UNUSED__,
 146           Evas_Object     *obj,
 147           void *event_info __UNUSED__)
 148 {
 149    Eina_Bool val = elm_check_state_get(obj);
 150    Eina_Bool sb = elm_config_scroll_bounce_enabled_get();
 151
 152    if (val == sb) return;
 153    elm_config_scroll_bounce_enabled_set(val);
 154    elm_config_all_flush();
 155
 156    /*TODO: enable/disable subordinate sliders (make 'em support it 1st)*/
 157 }
 158
 159 static void
 160 bf_round(void *data       __UNUSED__,
 161          Evas_Object     *obj,
 162          void *event_info __UNUSED__)
 163 {
 164    double val = elm_slider_value_get(obj);
 165    double v;
 166
 167    v = ((double)((int)(val * 10.0))) / 10.0;
 168    if (v != val) elm_slider_value_set(obj, v);
 169 }
 170
 171 static void
 172 bf_change(void *data       __UNUSED__,
 173           Evas_Object     *obj,
 174           void *event_info __UNUSED__)
 175 {
 176    double bf = elm_config_scroll_bounce_friction_get();
 177    double val = elm_slider_value_get(obj);
 178
 179    if (bf == val) return;
 180    elm_config_scroll_bounce_friction_set(val);
 181    elm_config_all_flush();
 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_config_scroll_page_scroll_friction_get();
 202    double val = elm_slider_value_get(obj);
 203
 204    if (ps == val) return;
 205    elm_config_scroll_page_scroll_friction_set(val);
 206    elm_config_all_flush();
 207 }
 208
 209 static void
 210 bis_round(void *data       __UNUSED__,
 211           Evas_Object     *obj,
 212           void *event_info __UNUSED__)
 213 {
 214    double val = elm_slider_value_get(obj);
 215    double v;
 216
 217    v = ((double)((int)(val * 10.0))) / 10.0;
 218    if (v != val) elm_slider_value_set(obj, v);
 219 }
 220
 221 static void
 222 bis_change(void *data       __UNUSED__,
 223            Evas_Object     *obj,
 224            void *event_info __UNUSED__)
 225 {
 226    double bis = elm_config_scroll_bring_in_scroll_friction_get();
 227    double val = elm_slider_value_get(obj);
 228
 229    if (bis == val) return;
 230    elm_config_scroll_bring_in_scroll_friction_set(val);
 231    elm_config_all_flush();
 232 }
 233
 234 static void
 235 zf_round(void *data       __UNUSED__,
 236          Evas_Object     *obj,
 237          void *event_info __UNUSED__)
 238 {
 239    double val = elm_slider_value_get(obj);
 240    double v;
 241
 242    v = ((double)((int)(val * 10.0))) / 10.0;
 243    if (v != val) elm_slider_value_set(obj, v);
 244 }
 245
 246 static void
 247 zf_change(void *data       __UNUSED__,
 248           Evas_Object     *obj,
 249           void *event_info __UNUSED__)
 250 {
 251    double zf = elm_config_scroll_zoom_friction_get();
 252    double val = elm_slider_value_get(obj);
 253
 254    if (zf == val) return;
 255    elm_config_scroll_zoom_friction_set(val);
 256    elm_config_all_flush();
 257 }
 258
 259 static void
 260 ts_change(void *data       __UNUSED__,
 261           Evas_Object     *obj,
 262           void *event_info __UNUSED__)
 263 {
 264    Eina_Bool val = elm_check_state_get(obj);
 265    Eina_Bool sb = elm_config_scroll_thumbscroll_enabled_get();
 266
 267    if (val == sb) return;
 268    elm_config_scroll_thumbscroll_enabled_set(val);
 269    elm_config_all_flush();
 270
 271    /*TODO: enable/disable subordinate sliders (make 'em support it 1st)*/
 272 }
 273
 274 static void
 275 tst_round(void *data       __UNUSED__,
 276           Evas_Object     *obj,
 277           void *event_info __UNUSED__)
 278 {
 279    double val = elm_slider_value_get(obj);
 280    double v;
 281
 282    v = ((double)((int)(val * 10.0))) / 10.0;
 283    if (v != val) elm_slider_value_set(obj, v);
 284 }
 285
 286 static void
 287 tst_change(void *data       __UNUSED__,
 288            Evas_Object     *obj,
 289            void *event_info __UNUSED__)
 290 {
 291    double tst = elm_config_scroll_thumbscroll_threshold_get();
 292    double val = elm_slider_value_get(obj);
 293
 294    if (tst == val) return;
 295    elm_config_scroll_thumbscroll_threshold_set(val);
 296    elm_config_all_flush();
 297 }
 298
 299 static void
 300 tsmt_round(void *data       __UNUSED__,
 301            Evas_Object     *obj,
 302            void *event_info __UNUSED__)
 303 {
 304    double val = elm_slider_value_get(obj);
 305    double v;
 306
 307    v = ((double)((int)(val * 10.0))) / 10.0;
 308    if (v != val) elm_slider_value_set(obj, v);
 309 }
 310
 311 static void
 312 tsmt_change(void *data       __UNUSED__,
 313             Evas_Object     *obj,
 314             void *event_info __UNUSED__)
 315 {
 316    double tsmt = elm_config_scroll_thumbscroll_momentum_threshold_get();
 317    double val = elm_slider_value_get(obj);
 318
 319    if (tsmt == val) return;
 320    elm_config_scroll_thumbscroll_momentum_threshold_set(val);
 321    elm_config_all_flush();
 322 }
 323
 324 static void
 325 tsf_round(void *data       __UNUSED__,
 326           Evas_Object     *obj,
 327           void *event_info __UNUSED__)
 328 {
 329    double val = elm_slider_value_get(obj);
 330    double v;
 331
 332    v = ((double)((int)(val * 10.0))) / 10.0;
 333    if (v != val) elm_slider_value_set(obj, v);
 334 }
 335
 336 static void
 337 tsf_change(void *data       __UNUSED__,
 338            Evas_Object     *obj,
 339            void *event_info __UNUSED__)
 340 {
 341    double tsf = elm_config_scroll_thumbscroll_friction_get();
 342    double val = elm_slider_value_get(obj);
 343
 344    if (tsf == val) return;
 345    elm_config_scroll_thumbscroll_friction_set(val);
 346    elm_config_all_flush();
 347 }
 348
 349 static void
 350 tsbf_round(void *data       __UNUSED__,
 351            Evas_Object     *obj,
 352            void *event_info __UNUSED__)
 353 {
 354    double val = elm_slider_value_get(obj);
 355    double v;
 356
 357    v = ((double)((int)(val * 10.0))) / 10.0;
 358    if (v != val) elm_slider_value_set(obj, v);
 359 }
 360
 361 static void
 362 tsbf_change(void *data       __UNUSED__,
 363             Evas_Object     *obj,
 364             void *event_info __UNUSED__)
 365 {
 366    double tsbf = elm_config_scroll_thumbscroll_border_friction_get();
 367    double val = elm_slider_value_get(obj);
 368
 369    if (tsbf == val) return;
 370    elm_config_scroll_thumbscroll_border_friction_set(val);
 371    elm_config_all_flush();
 372 }
 373
 374 static void
 375 tssf_round(void *data       __UNUSED__,
 376            Evas_Object     *obj,
 377            void *event_info __UNUSED__)
 378 {
 379    double val = elm_slider_value_get(obj);
 380    double v;
 381
 382    v = ((double)((int)(val * 20.0))) / 20.0;
 383    if (v != val) elm_slider_value_set(obj, v);
 384 }
 385
 386 static void
 387 tssf_change(void *data       __UNUSED__,
 388             Evas_Object     *obj,
 389             void *event_info __UNUSED__)
 390 {
 391    double tssf = elm_config_scroll_thumbscroll_sensitivity_friction_get();
 392    double val = elm_slider_value_get(obj);
 393
 394    if (tssf == val) return;
 395    elm_config_scroll_thumbscroll_sensitivity_friction_set(val);
 396    elm_config_all_flush();
 397 }
 398
 399 static void
 400 cf_enable(void *data,
 401           Evas_Object     *obj,
 402           void *event_info __UNUSED__)
 403 {
 404    Eina_Bool cf = elm_config_cache_flush_enabled_get();
 405    Eina_Bool val = elm_check_state_get(obj);
 406
 407    if (cf == val) return;
 408    elm_object_disabled_set((Evas_Object *)data, !val);
 409    elm_config_cache_flush_enabled_set(val);
 410    elm_config_all_flush();
 411 }
 412
 413 static void
 414 cf_round(void *data       __UNUSED__,
 415          Evas_Object     *obj,
 416          void *event_info __UNUSED__)
 417 {
 418    double val = elm_slider_value_get(obj);
 419    double v;
 420
 421    v = ((double)((int)(val * 5.0))) / 5.0;
 422    if (v != val) elm_slider_value_set(obj, v);
 423 }
 424
 425 static void
 426 cf_change(void *data       __UNUSED__,
 427           Evas_Object     *obj,
 428           void *event_info __UNUSED__)
 429 {
 430    double cf = elm_config_cache_flush_interval_get();
 431    double val = elm_slider_value_get(obj);
 432
 433    if (cf == val) return;
 434    elm_config_cache_flush_interval_set(val);
 435    elm_config_all_flush();
 436 }
 437
 438 static void
 439 fc_round(void *data       __UNUSED__,
 440          Evas_Object     *obj,
 441          void *event_info __UNUSED__)
 442 {
 443    double val = elm_slider_value_get(obj);
 444    double v;
 445
 446    v = ((double)((int)(val * 10.0))) / 10.0;
 447    if (v != val) elm_slider_value_set(obj, v);
 448 }
 449
 450 static void
 451 fc_change(void *data       __UNUSED__,
 452           Evas_Object     *obj,
 453           void *event_info __UNUSED__)
 454 {
 455    double font_cache = elm_config_cache_font_cache_size_get();
 456    double val = elm_slider_value_get(obj);
 457
 458    if (font_cache == val) return;
 459    elm_config_cache_font_cache_size_set(val * 1024);
 460    elm_config_all_flush();
 461 }
 462
 463 static void
 464 ic_round(void *data       __UNUSED__,
 465          Evas_Object     *obj,
 466          void *event_info __UNUSED__)
 467 {
 468    double val = elm_slider_value_get(obj);
 469    double v;
 470
 471    v = ((double)((int)(val * 10.0))) / 10.0;
 472    if (v != val) elm_slider_value_set(obj, v);
 473 }
 474
 475 static void
 476 ic_change(void *data       __UNUSED__,
 477           Evas_Object     *obj,
 478           void *event_info __UNUSED__)
 479 {
 480    double image_cache = elm_config_cache_image_cache_size_get();
 481    double val = elm_slider_value_get(obj);
 482
 483    if (image_cache == val) return;
 484    elm_config_cache_image_cache_size_set(val * 1024);
 485    elm_config_all_flush();
 486 }
 487
 488 static void
 489 sc_round(void *data       __UNUSED__,
 490          Evas_Object     *obj,
 491          void *event_info __UNUSED__)
 492 {
 493    double val = elm_slider_value_get(obj);
 494    double v;
 495
 496    v = ((double)((int)(val * 10.0))) / 10.0;
 497    if (v != val) elm_slider_value_set(obj, v);
 498 }
 499
 500 static void
 501 sc_change(void *data       __UNUSED__,
 502           Evas_Object     *obj,
 503           void *event_info __UNUSED__)
 504 {
 505    double scale = elm_config_scale_get();
 506    double val = elm_slider_value_get(obj);
 507
 508    if (scale == val) return;
 509    elm_config_scale_set(val);
 510    elm_config_all_flush();
 511 }
 512
 513 static void
 514 fs_round(void *data       __UNUSED__,
 515          Evas_Object     *obj,
 516          void *event_info __UNUSED__)
 517 {
 518    double val = elm_slider_value_get(obj);
 519    double v;
 520
 521    v = ((double)((int)(val * 5.0))) / 5.0;
 522    if (v != val) elm_slider_value_set(obj, v);
 523 }
 524
 525 static void
 526 fs_change(void *data       __UNUSED__,
 527           Evas_Object     *obj,
 528           void *event_info __UNUSED__)
 529 {
 530    double fs = elm_config_finger_size_get();
 531    double val = elm_slider_value_get(obj);
 532
 533    if (fs == val) return;
 534    elm_config_finger_size_set(val);
 535    elm_config_all_flush();
 536 }
 537
 538 static void
 539 efc_round(void *data       __UNUSED__,
 540           Evas_Object     *obj,
 541           void *event_info __UNUSED__)
 542 {
 543    double val = elm_slider_value_get(obj);
 544    double v;
 545
 546    v = ((double)((int)(val * 5.0))) / 5.0;
 547    if (v != val) elm_slider_value_set(obj, v);
 548 }
 549
 550 static void
 551 efc_change(void *data       __UNUSED__,
 552            Evas_Object     *obj,
 553            void *event_info __UNUSED__)
 554 {
 555    double efc = elm_config_cache_edje_file_cache_size_get();
 556    double val = elm_slider_value_get(obj);
 557
 558    if (efc == val) return;
 559    elm_config_cache_edje_file_cache_size_set(val);
 560    elm_config_all_flush();
 561 }
 562
 563 static void
 564 ecc_round(void *data       __UNUSED__,
 565           Evas_Object     *obj,
 566           void *event_info __UNUSED__)
 567 {
 568    double val = elm_slider_value_get(obj);
 569    double v;
 570
 571    v = ((double)((int)(val * 5.0))) / 5.0;
 572    if (v != val) elm_slider_value_set(obj, v);
 573 }
 574
 575 static void
 576 ecc_change(void *data       __UNUSED__,
 577            Evas_Object     *obj,
 578            void *event_info __UNUSED__)
 579 {
 580    double ecc = elm_config_cache_edje_collection_cache_size_get();
 581    double val = elm_slider_value_get(obj);
 582
 583    if (ecc == val) return;
 584    elm_config_cache_edje_collection_cache_size_set(val);
 585    elm_config_all_flush();
 586 }
 587
 588 static void
 589 _status_basic(Evas_Object *win,
 590               Evas_Object *bx0)
 591 {
 592    Evas_Object *lb, *fr;
 593
 594    fr = elm_frame_add(win);
 595    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
 596    elm_object_text_set(fr, "Information");
 597    elm_box_pack_end(bx0, fr);
 598    evas_object_show(fr);
 599
 600    lb = elm_label_add(win);
 601    elm_object_text_set(lb,
 602                        "Applying configuration change"
 603                        );
 604    elm_object_content_set(fr, lb);
 605    evas_object_show(lb);
 606 }
 607
 608 static void
 609 _status_config(Evas_Object *win,
 610                Evas_Object *bx0)
 611 {
 612    Evas_Object *lb, *pd, *bx, *fr, *sl, *sp;
 613
 614    fr = elm_frame_add(win);
 615    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
 616    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
 617    elm_object_text_set(fr, "Sizing");
 618    elm_box_pack_end(bx0, fr);
 619    evas_object_show(fr);
 620
 621    bx = elm_box_add(win);
 622    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
 623    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
 624
 625    LABEL_FRAME_ADD("<hilight>Scale</>");
 626
 627    sl = elm_slider_add(win);
 628    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
 629    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
 630    elm_slider_span_size_set(sl, 120);
 631    elm_slider_unit_format_set(sl, "%1.2f");
 632    elm_slider_indicator_format_set(sl, "%1.2f");
 633    elm_slider_min_max_set(sl, 0.25, 5.0);
 634    elm_slider_value_set(sl, elm_config_scale_get());
 635    elm_box_pack_end(bx, sl);
 636    evas_object_show(sl);
 637
 638    evas_object_smart_callback_add(sl, "changed", sc_round, NULL);
 639    evas_object_smart_callback_add(sl, "delay,changed", sc_change, NULL);
 640
 641    sp = elm_separator_add(win);
 642    elm_separator_horizontal_set(sp, EINA_TRUE);
 643    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
 644    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
 645    elm_box_pack_end(bx, sp);
 646    evas_object_show(sp);
 647
 648    LABEL_FRAME_ADD("<hilight>Finger Size</><br/>");
 649
 650    sl = elm_slider_add(win);
 651    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
 652    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
 653    elm_slider_span_size_set(sl, 120);
 654    elm_slider_unit_format_set(sl, "%1.0f");
 655    elm_slider_indicator_format_set(sl, "%1.0f");
 656    elm_slider_min_max_set(sl, 5, 200);
 657    elm_slider_value_set(sl, elm_config_finger_size_get());
 658    elm_box_pack_end(bx, sl);
 659    evas_object_show(sl);
 660
 661    evas_object_smart_callback_add(sl, "changed", fs_round, NULL);
 662    evas_object_smart_callback_add(sl, "delay,changed", fs_change, NULL);
 663
 664    // FIXME: add theme selector (basic mode and advanced for fallbacks)
 665    // FIXME: save config
 666    // FIXME: profile selector / creator etc.
 667    elm_object_content_set(fr, bx);
 668    evas_object_show(bx);
 669 }
 670
 671 static void
 672 _flip_to(Evas_Object *win,
 673          const char  *name)
 674 {
 675    Evas_Object *wid, *naviframe;
 676    wid = evas_object_data_get(win, name);
 677    naviframe = evas_object_data_get(win, "naviframe");
 678    elm_naviframe_item_simple_promote(naviframe, wid);
 679 }
 680
 681 static void
 682 _cf_sizing(void            *data,
 683            Evas_Object *obj __UNUSED__,
 684            void *event_info __UNUSED__)
 685 {
 686    _flip_to(data, "sizing");
 687 }
 688
 689 static void
 690 _cf_themes(void            *data,
 691            Evas_Object *obj __UNUSED__,
 692            void *event_info __UNUSED__)
 693 {
 694    _flip_to(data, "themes");
 695 }
 696
 697 static void
 698 _cf_fonts(void            *data,
 699           Evas_Object *obj __UNUSED__,
 700           void *event_info __UNUSED__)
 701 {
 702    _flip_to(data, "fonts");
 703 }
 704
 705 static void
 706 _cf_profiles(void            *data,
 707              Evas_Object *obj __UNUSED__,
 708              void *event_info __UNUSED__)
 709 {
 710    _flip_to(data, "profiles");
 711 }
 712
 713 static void
 714 _cf_scrolling(void            *data,
 715               Evas_Object *obj __UNUSED__,
 716               void *event_info __UNUSED__)
 717 {
 718    _flip_to(data, "scrolling");
 719 }
 720
 721 static void
 722 _cf_rendering(void            *data,
 723               Evas_Object *obj __UNUSED__,
 724               void *event_info __UNUSED__)
 725 {
 726    _flip_to(data, "rendering");
 727 }
 728
 729 static void
 730 _cf_caches(void            *data,
 731            Evas_Object *obj __UNUSED__,
 732            void *event_info __UNUSED__)
 733 {
 734    _flip_to(data, "caches");
 735 }
 736
 737 const char *
 738 _elm_theme_current_get(const char *theme_search_order)
 739 {
 740    const char *ret;
 741    const char *p;
 742
 743    if (!theme_search_order)
 744      return NULL;
 745
 746    for (p = theme_search_order;; p++)
 747      {
 748         if ((*p == ':') || (!*p))
 749           {
 750              if (p > theme_search_order)
 751                {
 752                   char *n = malloc(p - theme_search_order + 1);
 753                   if (!n)
 754                     return NULL;
 755
 756                   strncpy(n, theme_search_order, p - theme_search_order);
 757                   n[p - theme_search_order] = 0;
 758                   ret = eina_stringshare_add(n);
 759                   free(n);
 760                   break;
 761                }
 762           }
 763      }
 764
 765    return ret;
 766 }
 767
 768 static void
 769 _font_overlay_set_all(void            *data,
 770                       Evas_Object *obj __UNUSED__,
 771                       void *event_info __UNUSED__)
 772 {
 773    Evas_Object *win, *fclasses;
 774    Elm_Text_Class_Data *tc_data, *tc;
 775    Elm_Object_Item *list_it;
 776    Eina_List *l;
 777
 778    win = data;
 779
 780    fclasses = evas_object_data_get(win, "font_classes_list");
 781    list_it = elm_list_selected_item_get(fclasses);
 782    if (!list_it) return;
 783    tc_data = elm_object_item_data_get(list_it);
 784
 785    EINA_LIST_FOREACH(fndata.text_classes, l, tc)
 786      {
 787         eina_stringshare_replace(&tc->font, tc_data->font);
 788         eina_stringshare_replace(&tc->style, tc_data->style);
 789         tc->size = tc_data->size;
 790      }
 791
 792    elm_config_all_flush();
 793    elm_config_save();
 794 }
 795
 796 static void
 797 _font_overlay_reset(void            *data,
 798                     Evas_Object *obj __UNUSED__,
 799                     void *event_info __UNUSED__)
 800 {
 801    Evas_Object *win, *fclasses, *fnames, *fstyles, *fsizes;
 802    Elm_Text_Class_Data *tc_data;
 803    Elm_Object_Item *list_it;
 804
 805    win = data;
 806
 807    fclasses = evas_object_data_get(win, "font_classes_list");
 808    list_it = elm_list_selected_item_get(fclasses);
 809    if (!list_it) return;
 810    tc_data = elm_object_item_data_get(list_it);
 811
 812    fnames = evas_object_data_get(win, "font_names_list");
 813    fstyles = evas_object_data_get(win, "font_styles_list");
 814    fsizes = evas_object_data_get(win, "font_sizes_list");
 815
 816    elm_config_font_overlay_unset(tc_data->name);
 817
 818    eina_stringshare_replace(&fndata.cur_font, NULL);
 819    eina_stringshare_replace(&tc_data->font, NULL);
 820    eina_stringshare_replace(&fndata.cur_style, NULL);
 821    eina_stringshare_replace(&tc_data->style, NULL);
 822    fndata.cur_size = 0.0;
 823    tc_data->size = 0.0;
 824
 825    ELM_LIST_DISABLE(fnames);
 826    ELM_LIST_DISABLE(fstyles);
 827    ELM_LIST_DISABLE(fsizes);
 828
 829    elm_config_all_flush();
 830    elm_config_save();
 831 }
 832
 833 static void
 834 _font_overlay_reset_all(void            *data,
 835                         Evas_Object *obj __UNUSED__,
 836                         void *event_info __UNUSED__)
 837 {
 838    Evas_Object *win, *fclasses, *fnames, *fstyles, *fsizes;
 839    Elm_Text_Class_Data *tc_data;
 840    Elm_Object_Item *list_it;
 841    Eina_List *l;
 842
 843    win = data;
 844    eina_stringshare_replace(&fndata.cur_font, NULL);
 845    eina_stringshare_replace(&fndata.cur_style, NULL);
 846    fndata.cur_size = 0.0;
 847
 848    EINA_LIST_FOREACH(fndata.text_classes, l, tc_data)
 849      {
 850         elm_config_font_overlay_unset(tc_data->name);
 851
 852         eina_stringshare_replace(&tc_data->font, NULL);
 853         eina_stringshare_replace(&tc_data->style, NULL);
 854         tc_data->size = 0.0;
 855      }
 856
 857    fclasses = evas_object_data_get(win, "font_classes_list");
 858    fnames = evas_object_data_get(win, "font_names_list");
 859    fstyles = evas_object_data_get(win, "font_styles_list");
 860    fsizes = evas_object_data_get(win, "font_sizes_list");
 861
 862    list_it = elm_list_selected_item_get(fclasses);
 863    if (list_it) elm_list_item_selected_set(list_it, EINA_FALSE);
 864
 865    ELM_LIST_DISABLE(fnames);
 866    ELM_LIST_DISABLE(fstyles);
 867    ELM_LIST_DISABLE(fsizes);
 868
 869    elm_config_all_flush();
 870    elm_config_save();
 871 }
 872
 873 static void
 874 _font_overlay_change(void *data       __UNUSED__,
 875                      Evas_Object *obj __UNUSED__,
 876                      void *event_info __UNUSED__)
 877 {
 878    Elm_Text_Class_Data *tc_data;
 879    Eina_List *l;
 880
 881    EINA_LIST_FOREACH(fndata.text_classes, l, tc_data)
 882      {
 883         if (tc_data->font)
 884           {
 885              char *name;
 886
 887              name = elm_font_fontconfig_name_get(tc_data->font,
 888                                                  tc_data->style);
 889              elm_config_font_overlay_set(tc_data->name, name,
 890                                          tc_data->size ? tc_data->size : -100);
 891              elm_font_fontconfig_name_free(name);
 892           }
 893         else
 894           elm_config_font_overlay_unset(tc_data->name);
 895      }
 896
 897    elm_config_font_overlay_apply();
 898    elm_config_all_flush();
 899    elm_config_save();
 900
 901    /* TODO: apply hinting */
 902 }
 903
 904 static void
 905 _config_display_update(Evas_Object *win)
 906 {
 907    int flush_interval, font_c, image_c, edje_file_c, edje_col_c, ts_threshould;
 908    double scale, s_bounce_friction, ts_momentum_threshold, ts_friction,
 909           ts_border_friction, ts_sensitivity_friction, page_friction, bring_in_friction, zoom_friction;
 910    const char *curr_theme, *curr_engine;
 911    const Eina_List *l_items, *l;
 912    Eina_Bool s_bounce, ts;
 913    Elm_Object_Item *list_it;
 914    Elm_Theme *th;
 915    int fs;
 916
 917    scale = elm_config_scale_get();
 918    fs = elm_config_finger_size_get();
 919    flush_interval = elm_config_cache_flush_interval_get();
 920    font_c = elm_config_cache_font_cache_size_get();
 921    image_c = elm_config_cache_image_cache_size_get();
 922    edje_file_c = elm_config_cache_edje_file_cache_size_get();
 923    edje_col_c = elm_config_cache_edje_collection_cache_size_get();
 924
 925    s_bounce = elm_config_scroll_bounce_enabled_get();
 926    s_bounce_friction = elm_config_scroll_bounce_friction_get();
 927    ts = elm_config_scroll_thumbscroll_enabled_get();
 928    ts_threshould = elm_config_scroll_thumbscroll_threshold_get();
 929    ts_momentum_threshold = elm_config_scroll_thumbscroll_momentum_threshold_get();
 930    ts_friction = elm_config_scroll_thumbscroll_friction_get();
 931    ts_border_friction = elm_config_scroll_thumbscroll_border_friction_get();
 932    ts_sensitivity_friction = elm_config_scroll_thumbscroll_sensitivity_friction_get();
 933    page_friction = elm_config_scroll_page_scroll_friction_get();
 934    bring_in_friction = elm_config_scroll_bring_in_scroll_friction_get();
 935    zoom_friction = elm_config_scroll_zoom_friction_get();
 936
 937    /* gotta update root windows' atoms */
 938    elm_slider_value_set(evas_object_data_get(win, "scale_slider"), scale);
 939    elm_slider_value_set(evas_object_data_get(win, "fs_slider"), fs);
 940
 941    elm_slider_value_set(evas_object_data_get(win,
 942                                              "cache_flush_interval_slider"),
 943                         flush_interval);
 944    elm_slider_value_set(evas_object_data_get(win, "font_cache_slider"),
 945                         font_c / 1024.0);
 946    elm_slider_value_set(evas_object_data_get(win, "image_cache_slider"),
 947                         image_c / 1024.0);
 948    elm_slider_value_set(evas_object_data_get(win, "edje_file_cache_slider"),
 949                         edje_file_c);
 950    elm_slider_value_set(evas_object_data_get(win,
 951                                              "edje_collection_cache_slider"),
 952                         edje_col_c);
 953
 954    elm_check_state_set(evas_object_data_get(win, "scroll_bounce_check"),
 955                        s_bounce);
 956    elm_slider_value_set(evas_object_data_get(win, "bounce_friction_slider"),
 957                         s_bounce_friction);
 958    elm_check_state_set(evas_object_data_get(win, "thumbscroll_check"), ts);
 959    elm_slider_value_set(evas_object_data_get(win,
 960                                              "thumbscroll_threshold_slider"),
 961                         ts_threshould);
 962    elm_slider_value_set(evas_object_data_get(win,
 963                                              "ts_momentum_threshold_slider"),
 964                         ts_momentum_threshold);
 965    elm_slider_value_set(evas_object_data_get(win,
 966                                              "thumbscroll_friction_slider"),
 967                         ts_friction);
 968    elm_slider_value_set(evas_object_data_get(win, "ts_border_friction_slider"),
 969                         ts_border_friction);
 970    elm_slider_value_set(evas_object_data_get(win, "ts_sensitivity_friction_slider"),
 971                         ts_sensitivity_friction);
 972    elm_slider_value_set(evas_object_data_get(win,
 973                                              "page_scroll_friction_slider"),
 974                         page_friction);
 975    elm_slider_value_set(evas_object_data_get(win,
 976                                              "bring_in_scroll_friction_slider"),
 977                         bring_in_friction);
 978    elm_slider_value_set(evas_object_data_get(win,
 979                                              "zoom_scroll_friction_slider"),
 980                         zoom_friction);
 981
 982    curr_theme = _elm_theme_current_get(elm_theme_get(NULL));
 983
 984    th = elm_theme_new();
 985    elm_theme_set(th, curr_theme);
 986    elm_object_theme_set(evas_object_data_get(win, "theme_preview"), th);
 987    elm_theme_free(th);
 988    eina_stringshare_del(curr_theme);
 989
 990    curr_engine = elm_config_engine_get();
 991    l_items = elm_list_items_get(evas_object_data_get(win, "engines_list"));
 992    EINA_LIST_FOREACH(l_items, l, list_it)
 993      {
 994         if (!strcmp(elm_object_item_data_get(list_it), curr_engine))
 995           {
 996              elm_list_item_selected_set(list_it, EINA_TRUE);
 997              break;
 998           }
 999      }
1000 }
1001
1002 static void
1003 _profile_change_do(Evas_Object *win,
1004                    const char  *profile)
1005 {
1006    elm_config_profile_set(profile);
1007    elm_config_all_flush();
1008    _config_display_update(win);
1009 }
1010
1011 static Eina_Bool
1012 _config_all_changed(void *data,
1013                     int ev_type __UNUSED__,
1014                     void *ev __UNUSED__)
1015 {
1016    Evas_Object *win = data;
1017    _config_display_update(win);
1018    return ECORE_CALLBACK_PASS_ON;
1019 }
1020
1021 static void
1022 _engine_use(void            *data,
1023             Evas_Object *obj __UNUSED__,
1024             void *event_info __UNUSED__)
1025 {
1026    Evas_Object *li;
1027    const char *selection;
1028
1029    li = data;
1030    selection = elm_object_item_data_get(elm_list_selected_item_get(li));
1031
1032    if (!strcmp(elm_config_engine_get(), selection))
1033      return;
1034
1035    elm_config_engine_set(selection);
1036    elm_config_all_flush();
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_object_item_data_get(elm_list_selected_item_get(li));
1051    profile = elm_config_profile_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_config_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_all_flush();
1066    elm_config_save(); /* make sure new profile has its data dir */
1067 }
1068
1069 static void
1070 _btn_todo(void *data       __UNUSED__,
1071           Evas_Object *obj __UNUSED__,
1072           void *event_info __UNUSED__)
1073 {
1074    printf("To be done!\n");
1075 }
1076
1077 static void
1078 _profile_reset(void            *data,
1079                Evas_Object *obj __UNUSED__,
1080                void *event_info __UNUSED__)
1081 {
1082    const char *selection, *curr;
1083    const char *pdir;
1084    Evas_Object *li;
1085
1086    li = data;
1087    selection = elm_object_item_data_get(elm_list_selected_item_get(li));
1088    curr = elm_config_profile_get();
1089
1090    elm_config_all_flush();
1091    elm_config_save(); /* dump config into old profile's data dir */
1092
1093    pdir = elm_config_profile_dir_get(selection, EINA_TRUE);
1094    if (!pdir)
1095      return;
1096
1097    ecore_file_recursive_rm(pdir);
1098    elm_config_profile_dir_free(pdir);
1099
1100    elm_config_reload();
1101
1102    _profile_change_do(elm_object_top_widget_get(li), curr);
1103    elm_config_all_flush();
1104    elm_config_save(); /* make sure new profile has its data dir */
1105 }
1106
1107 static void
1108 _theme_use(void *data       __UNUSED__,
1109            Evas_Object *obj __UNUSED__,
1110            void *event_info __UNUSED__)
1111 {
1112    const char *defth;
1113    Elm_Theme *th;
1114    Evas_Object *win = elm_object_top_widget_get(obj);
1115    Evas_Object *sample = evas_object_data_get(win, "theme_preview");
1116
1117    th = elm_object_theme_get(sample);
1118    defth = elm_theme_get(th);
1119    elm_theme_set(NULL, defth);
1120    elm_config_all_flush();
1121    elm_config_save();
1122 }
1123
1124 static void
1125 _theme_sel(void            *data __UNUSED__,
1126            Evas_Object     *obj,
1127            void *event_info __UNUSED__)
1128 {
1129    Evas_Object *win = elm_object_top_widget_get(obj);
1130    Evas_Object *sample = evas_object_data_get(win, "theme_preview");
1131    Elm_Theme *th;
1132    Elm_Object_Item *list_it;
1133    Eina_Strbuf *newth;
1134    Eina_List *l;
1135
1136    if (!sample) return;
1137    tsel = elm_list_selected_items_get(obj);
1138    newth = eina_strbuf_new();
1139    EINA_SAFETY_ON_NULL_RETURN(newth);
1140    th = elm_theme_new();
1141    if (!th)
1142      {
1143         eina_strbuf_free(newth);
1144         return;
1145      }
1146    EINA_LIST_REVERSE_FOREACH((Eina_List*)tsel, l, list_it)
1147      {
1148         Theme *t = elm_object_item_data_get(list_it);
1149         eina_strbuf_append_printf(newth, "%s:", t->name);
1150         if ((!l->prev) && strcmp(t->name, "default"))
1151           /* ensure default theme is always there for fallback */
1152           eina_strbuf_append(newth, "default");
1153      }
1154    elm_theme_set(th, eina_strbuf_string_get(newth));
1155    eina_strbuf_free(newth);
1156    elm_object_theme_set(sample, th);
1157    elm_theme_free(th);
1158 }
1159
1160 /*static void
1161    _theme_browse(void *data, Evas_Object *obj, void *event_info)
1162    {
1163    printf("not implemented\n");
1164    }*/
1165
1166 static void
1167 _status_config_sizing(Evas_Object *win,
1168                       Evas_Object *naviframe)
1169 {
1170    Evas_Object *lb, *pd, *bx, *sl, *sp;
1171
1172    bx = elm_box_add(win);
1173    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
1174    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
1175
1176    LABEL_FRAME_ADD("<hilight>Scale</>");
1177
1178    sl = elm_slider_add(win);
1179    evas_object_data_set(win, "scale_slider", sl);
1180    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1181    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1182    elm_slider_span_size_set(sl, 120);
1183    elm_slider_unit_format_set(sl, "%1.2f");
1184    elm_slider_indicator_format_set(sl, "%1.2f");
1185    elm_slider_min_max_set(sl, 0.25, 5.0);
1186    elm_slider_value_set(sl, elm_config_scale_get());
1187    elm_box_pack_end(bx, sl);
1188    evas_object_show(sl);
1189
1190    evas_object_smart_callback_add(sl, "changed", sc_round, NULL);
1191    evas_object_smart_callback_add(sl, "delay,changed", sc_change, NULL);
1192
1193    sp = elm_separator_add(win);
1194    elm_separator_horizontal_set(sp, EINA_TRUE);
1195    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
1196    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1197    elm_box_pack_end(bx, sp);
1198    evas_object_show(sp);
1199
1200    LABEL_FRAME_ADD("<hilight>Finger Size</><br/>");
1201
1202    sl = elm_slider_add(win);
1203    evas_object_data_set(win, "fs_slider", sl);
1204    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
1205    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
1206    elm_slider_span_size_set(sl, 120);
1207    elm_slider_unit_format_set(sl, "%1.0f");
1208    elm_slider_indicator_format_set(sl, "%1.0f");
1209    elm_slider_min_max_set(sl, 5, 200);
1210    elm_slider_value_set(sl, elm_config_finger_size_get());
1211    elm_box_pack_end(bx, sl);
1212    evas_object_show(sl);
1213
1214    evas_object_smart_callback_add(sl, "changed", fs_round, NULL);
1215    evas_object_smart_callback_add(sl, "delay,changed", fs_change, NULL);
1216
1217    evas_object_data_set(win, "sizing", bx);
1218
1219    elm_naviframe_item_simple_push(naviframe, bx);
1220 }
1221
1222 static Evas_Object *
1223 _sample_theme_new(Evas_Object *win)
1224 {
1225    Evas_Object *base, *bg, *bt, *ck, *rd, *rdg, *sl, *fr, *li, *rc, *sp;
1226
1227    base = elm_table_add(win);
1228    evas_object_size_hint_weight_set(base, 1.0, 1.0);
1229    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1230
1231    bg = elm_bg_add(win);
1232    evas_object_size_hint_weight_set(bg, 1.0, 1.0);
1233    evas_object_size_hint_align_set(bg, EVAS_HINT_FILL, EVAS_HINT_FILL);
1234    elm_table_pack(base, bg, 0, 0, 2, 5);
1235    evas_object_show(bg);
1236
1237    bt = elm_button_add(win);
1238    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1239    elm_object_text_set(bt, "Button");
1240    elm_table_pack(base, bt, 0, 0, 1, 1);
1241    evas_object_show(bt);
1242
1243    ck = elm_check_add(win);
1244    evas_object_size_hint_weight_set(ck, 1.0, 0.0);
1245    elm_object_text_set(ck, "Check");
1246    elm_table_pack(base, ck, 0, 1, 1, 1);
1247    evas_object_show(ck);
1248
1249    rd = elm_radio_add(win);
1250    evas_object_size_hint_weight_set(rd, 1.0, 0.0);
1251    elm_radio_state_value_set(rd, 0);
1252    elm_object_text_set(rd, "Radio 1");
1253    elm_table_pack(base, rd, 1, 0, 1, 1);
1254    evas_object_show(rd);
1255    rdg = rd;
1256
1257    rd = elm_radio_add(win);
1258    evas_object_size_hint_weight_set(rd, 1.0, 0.0);
1259    elm_radio_state_value_set(rd, 1);
1260    elm_object_text_set(rd, "Radio 2");
1261    elm_radio_group_add(rd, rdg);
1262    elm_table_pack(base, rd, 1, 1, 1, 1);
1263    evas_object_show(rd);
1264
1265    sp = elm_separator_add(win);
1266    elm_separator_horizontal_set(sp, EINA_TRUE);
1267    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1268    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1269    elm_table_pack(base, sp, 0, 2, 2, 1);
1270    evas_object_show(sp);
1271
1272    sl = elm_slider_add(win);
1273    elm_object_text_set(sl, "Slider");
1274    elm_slider_span_size_set(sl, 120);
1275    elm_slider_min_max_set(sl, 1, 10);
1276    elm_slider_value_set(sl, 4);
1277    evas_object_size_hint_weight_set(sl, 1.0, 0.0);
1278    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, EVAS_HINT_FILL);
1279    elm_table_pack(base, sl, 0, 3, 2, 1);
1280    evas_object_show(sl);
1281
1282    fr = elm_frame_add(win);
1283    elm_object_text_set(fr, "Frame");
1284    elm_table_pack(base, fr, 0, 4, 2, 1);
1285    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1286    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1287    evas_object_show(fr);
1288
1289    li = elm_list_add(win);
1290    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1291    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1292    elm_object_content_set(fr, li);
1293    evas_object_show(li);
1294
1295    elm_list_item_append(li, "List Item 1", NULL, NULL, NULL, NULL);
1296    elm_list_item_append(li, "Second Item", NULL, NULL, NULL, NULL);
1297    elm_list_item_append(li, "Third Item", NULL, NULL, NULL, NULL);
1298    elm_list_go(li);
1299
1300    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1301    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1302    evas_object_size_hint_min_set(rc, 160, 120);
1303    elm_table_pack(base, rc, 0, 4, 2, 1);
1304
1305    return base;
1306 }
1307
1308 static void
1309 _status_config_themes(Evas_Object *win,
1310                       Evas_Object *naviframe)
1311 {
1312    Evas_Object *tb, *rc, *sc, *sp, *li, *pd, *fr, *bt, *sample;
1313    Eina_List *list, *l;
1314    char *th, *s, *ext;
1315    Elm_Theme *d;
1316    Elm_Object_Item *list_it, *def_it = NULL;
1317    const char *theme_name, *sep[20];
1318    unsigned int x;
1319
1320    tb = elm_table_add(win);
1321    evas_object_size_hint_weight_set(tb, 1.0, 1.0);
1322    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
1323
1324    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1325    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1326    evas_object_size_hint_min_set(rc, 0, 130);
1327    elm_table_pack(tb, rc, 0, 0, 1, 1);
1328
1329    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1330    evas_object_size_hint_weight_set(rc, 1.0, 1.0);
1331    evas_object_size_hint_min_set(rc, 0, 200);
1332    elm_table_pack(tb, rc, 0, 1, 1, 1);
1333
1334    /////////////////////////////////////////////
1335
1336    pd = elm_frame_add(win);
1337    elm_object_style_set(pd, "pad_medium");
1338    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1339    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1340    elm_table_pack(tb, pd, 0, 0, 1, 1);
1341    evas_object_show(pd);
1342
1343    li = elm_list_add(win);
1344    elm_list_multi_select_set(li, EINA_TRUE);
1345    evas_object_size_hint_weight_set(li, 1.0, 1.0);
1346    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1347    elm_object_content_set(pd, li);
1348    evas_object_show(li);
1349
1350    list = elm_theme_name_available_list_new();
1351    d = elm_theme_default_get();
1352    theme_name = elm_theme_get(d);
1353    for (x = 1, sep[0] = theme_name; x < sizeof(sep) / sizeof(sep[0]); x++)
1354      {
1355         sep[x] = strchr(sep[x - 1] + 1, ':');
1356         if (!sep[x]) break;
1357      }
1358    EINA_LIST_FOREACH(list, l, th)
1359      {
1360         Theme *t;
1361         int y;
1362
1363         t = calloc(1, sizeof(Theme));
1364         t->name = eina_stringshare_add(th);
1365         s = elm_theme_list_item_path_get(th, &(t->in_search_path));
1366         if (s)
1367           {
1368              t->path = eina_stringshare_add(s);
1369              free(s);
1370           }
1371         if (t->in_search_path)
1372           {
1373              s = strdup(th);
1374              if (s)
1375                {
1376                   s[0] = toupper(s[0]);
1377                   t->label = eina_stringshare_add(s);
1378                   free(s);
1379                }
1380              else
1381                t->label = eina_stringshare_add(s);
1382           }
1383         else
1384           {
1385              s = strdup(ecore_file_file_get(th));
1386              if (s)
1387                {
1388                   s[0] = toupper(s[0]);
1389                   ext = strrchr(s, '.');
1390                   if (ext) *ext = 0;
1391                   t->label = eina_stringshare_add(s);
1392                   free(s);
1393                }
1394              else
1395                t->label = eina_stringshare_add(s);
1396           }
1397         themes = eina_list_append(themes, t);
1398         list_it = elm_list_item_append(li, t->label, NULL, NULL, NULL, t);
1399         if (!strcmp(t->name, "default")) def_it = list_it;
1400         for (y = x - 1 /* ignore default e theme */; y > 0; y--)
1401           {
1402              const char *start = (sep[y - 1][0] == ':') ? sep[y - 1] + 1 : sep[y - 1];
1403              unsigned int len = (unsigned int)(sep[y] - start);
1404              if (strncmp(start , t->name, len) || (strlen(t->name) != len)) continue;
1405
1406              if (!elm_list_item_selected_get(list_it))
1407                elm_list_item_selected_set(list_it, EINA_TRUE);
1408              break;
1409           }
1410      }
1411    if (!elm_list_selected_items_get(li))
1412      elm_list_item_selected_set(def_it, EINA_TRUE);
1413    evas_object_smart_callback_add(li, "selected", _theme_sel, NULL);
1414    evas_object_smart_callback_add(li, "unselected", _theme_sel, NULL);
1415    elm_theme_name_available_list_free(list);
1416
1417    elm_list_go(li);
1418
1419    pd = elm_frame_add(win);
1420    elm_object_style_set(pd, "pad_medium");
1421    evas_object_size_hint_weight_set(pd, 1.0, 1.0);
1422    evas_object_size_hint_align_set(pd, 0.9, 0.9);
1423    elm_table_pack(tb, pd, 0, 0, 1, 1);
1424    evas_object_show(pd);
1425
1426    /* FIXME: not implemented yet
1427       bt = elm_button_add(win);
1428       evas_object_smart_callback_add(bt, "clicked", _theme_browse, win);
1429       elm_object_text_set(bt, "Browse...");
1430       evas_object_size_hint_weight_set(bt, 1.0, 1.0);
1431       evas_object_size_hint_align_set(bt, 0.9, 0.9);
1432       elm_object_content_set(pd, bt);
1433       evas_object_show(bt);
1434     */
1435    pd = elm_frame_add(win);
1436    elm_object_style_set(pd, "pad_medium");
1437    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1438    evas_object_size_hint_align_set(pd, EVAS_HINT_FILL, EVAS_HINT_FILL);
1439    elm_table_pack(tb, pd, 0, 1, 1, 1);
1440    evas_object_show(pd);
1441
1442    fr = elm_frame_add(win);
1443    elm_object_text_set(fr, "Preview");
1444    evas_object_size_hint_weight_set(fr, 1.0, 1.0);
1445    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1446    elm_object_content_set(pd, fr);
1447    evas_object_show(fr);
1448
1449    sc = elm_scroller_add(win);
1450    elm_scroller_bounce_set(sc, EINA_FALSE, EINA_FALSE);
1451    evas_object_size_hint_weight_set(sc, 1.0, 1.0);
1452    evas_object_size_hint_align_set(sc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1453    elm_object_content_set(fr, sc);
1454    evas_object_show(sc);
1455
1456    sample = _sample_theme_new(win);
1457    elm_object_content_set(sc, sample);
1458    evas_object_show(sample);
1459    evas_object_data_set(win, "theme_preview", sample);
1460
1461    /////////////////////////////////////////////
1462    sp = elm_separator_add(win);
1463    elm_separator_horizontal_set(sp, EINA_TRUE);
1464    evas_object_size_hint_weight_set(sp, 1.0, 0.0);
1465    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
1466    elm_table_pack(tb, sp, 0, 2, 1, 1);
1467    evas_object_show(sp);
1468
1469    pd = elm_frame_add(win);
1470    elm_object_style_set(pd, "pad_medium");
1471    evas_object_size_hint_weight_set(pd, 1.0, 0.0);
1472    evas_object_size_hint_align_set(pd, 0.5, 0.5);
1473    elm_table_pack(tb, pd, 0, 3, 1, 1);
1474    evas_object_show(pd);
1475
1476    bt = elm_button_add(win);
1477    evas_object_smart_callback_add(bt, "clicked", _theme_use, win);
1478    elm_object_text_set(bt, "Use Theme");
1479    evas_object_size_hint_weight_set(bt, 1.0, 0.0);
1480    evas_object_size_hint_align_set(bt, 0.5, 0.5);
1481    elm_object_content_set(pd, bt);
1482    evas_object_show(bt);
1483
1484    evas_object_data_set(win, "themes", tb);
1485    elm_naviframe_item_simple_push(naviframe, tb);
1486 }
1487
1488 static void
1489 _font_preview_update(Evas_Object *win)
1490 {
1491    Evas_Font_Size sz;
1492    char *name;
1493
1494    if (!fndata.cur_font)
1495      return;
1496
1497    name = elm_font_fontconfig_name_get(fndata.cur_font, fndata.cur_style);
1498    sz = fndata.cur_size;
1499
1500    if (sz < 0)
1501      sz = (-sz * 10) / 100;
1502    if (sz == 0)
1503      sz = 10;
1504
1505    edje_object_text_class_set(evas_object_data_get(win, "font_preview"),
1506                               "font_preview", name, sz);
1507
1508    elm_font_fontconfig_name_free(name);
1509 }
1510
1511 static void
1512 _font_classes_list_sel(void *data   __UNUSED__,
1513                        Evas_Object *obj,
1514                        void        *event_info)
1515 {
1516    const Eina_List *f_names_items, *l;
1517    Elm_Text_Class_Data *tc_data;
1518    Evas_Object *f_names_list;
1519    Elm_Object_Item *list_it;
1520
1521    tc_data = elm_object_item_data_get(event_info);
1522
1523    f_names_list = evas_object_data_get(elm_object_top_widget_get(obj),
1524                                        "font_names_list");
1525    ELM_LIST_ENABLE(f_names_list);
1526
1527    f_names_items = elm_list_items_get(f_names_list);
1528
1529    EINA_LIST_FOREACH(f_names_items, l, list_it)
1530      {
1531         const char *s;
1532
1533         s = elm_object_item_text_get(list_it);
1534
1535         if (tc_data->font && !strcmp(s, tc_data->font))
1536           {
1537              elm_list_item_selected_set(list_it, EINA_TRUE);
1538              elm_list_item_show(list_it);
1539              break;
1540           }
1541      }
1542 }
1543
1544 static void
1545 _font_names_list_sel(void *data   __UNUSED__,
1546                      Evas_Object *obj,
1547                      void        *event_info)
1548 {
1549    Evas_Object *style_list, *cls_list, *win;
1550    const char *style, *sel_font;
1551    Elm_Text_Class_Data *tc_data;
1552    Elm_Object_Item *list_it, *fc_list_it;
1553    Elm_Font_Properties *efp;
1554    const Eina_List *l;
1555
1556    list_it = event_info;
1557    sel_font = elm_object_item_text_get(list_it);
1558
1559    win = elm_object_top_widget_get(obj);
1560    style_list = evas_object_data_get(win, "font_styles_list");
1561    cls_list = evas_object_data_get(win, "font_classes_list");
1562
1563    fc_list_it = elm_list_selected_item_get(cls_list);
1564    if (!fc_list_it) return;  /* should not happen, fonts list disabled in
1565                          * this case */
1566
1567    eina_stringshare_replace(&fndata.cur_font, sel_font);
1568
1569    tc_data = elm_object_item_data_get(fc_list_it);
1570    if (tc_data->font) eina_stringshare_del(tc_data->font);
1571    if (fndata.cur_font) tc_data->font = eina_stringshare_ref(fndata.cur_font);
1572
1573    /* load styles list */
1574    efp = eina_hash_find(fndata.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    list_it = NULL;
1583
1584    EINA_LIST_FOREACH(efp->styles, l, style)
1585      {
1586         Elm_Object_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           list_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 (list_it)
1601      elm_list_item_selected_set(list_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_Object_Item *list_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    list_it = elm_list_selected_item_get(fc_list);
1621    if (!list_it) return;  /* should not happen */
1622
1623    eina_stringshare_replace(&fndata.cur_style,
1624                             elm_object_item_text_get(event_info));
1625    ELM_LIST_ENABLE(fs_list);
1626
1627    tc_data = elm_object_item_data_get(list_it);
1628    eina_stringshare_del(tc_data->style);
1629    tc_data->style = eina_stringshare_ref(fndata.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, list_it)
1635      {
1636         Elm_Font_Size_Data *sdata;
1637
1638         sdata = elm_object_item_data_get(list_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(list_it, EINA_TRUE);
1644              elm_list_item_show(list_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_Object_Item *list_it;
1664
1665    win = elm_object_top_widget_get(obj);
1666    fc_list = evas_object_data_get(win, "font_classes_list");
1667
1668    list_it = elm_list_selected_item_get(fc_list);
1669    if (!list_it) return;  /* should not happen */
1670
1671    sd = elm_object_item_data_get(event_info);
1672    fndata.cur_size = sd->size;
1673
1674    tc_data = elm_object_item_data_get(list_it);
1675    tc_data->size = fndata.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(fndata.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, *l;
1743    Eina_List *text_classes;
1744    Elm_Text_Class_Data *tc_data;
1745    Elm_Font_Size_Data *sd;
1746    Elm_Font_Overlay *efo;
1747    Eina_List *evas_fonts;
1748    Elm_Text_Class *etc;
1749    int i;
1750
1751    evas_fonts = evas_font_available_list(evas);
1752    fndata.font_hash = elm_font_available_hash_add(evas_fonts);
1753    evas_font_available_list_free(evas, evas_fonts);
1754
1755    text_classes = elm_config_text_classes_list_get();
1756    fo_list = elm_config_font_overlay_list_get();
1757
1758    EINA_LIST_FOREACH(text_classes, l, etc)
1759      {
1760         const Eina_List *ll;
1761
1762         tc_data = calloc(1, sizeof(*tc_data));
1763         tc_data->name = eina_stringshare_add(etc->name);
1764         tc_data->desc = eina_stringshare_add(etc->desc);
1765
1766         EINA_LIST_FOREACH(fo_list, ll, efo)
1767           {
1768              if (strcmp(tc_data->name, efo->text_class))
1769                continue;
1770
1771              if (efo->font)
1772                {
1773                   Elm_Font_Properties *efp;
1774
1775                   efp = elm_font_properties_get(efo->font);
1776                   if (efp)
1777                     {
1778                        tc_data->font = eina_stringshare_add(efp->name);
1779                        /* we're sure we recorded with only 1 style selected */
1780                        tc_data->style = eina_stringshare_add(efp->styles->data);
1781                        elm_font_properties_free(efp);
1782                     }
1783                }
1784              tc_data->size = efo->size;
1785           }
1786
1787         fndata.text_classes = eina_list_append(fndata.text_classes, tc_data);
1788      }
1789
1790    elm_config_text_classes_list_free(text_classes);
1791
1792    /* FIXME: hinting later */
1793    /* fndata.hinting = e_config->font_hinting; */
1794
1795    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1796    sd->size_str = eina_stringshare_add("Tiny");
1797    sd->size = -50;
1798    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1799
1800    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1801    sd->size_str = eina_stringshare_add("Small");
1802    sd->size = -80;
1803    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1804
1805    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1806    sd->size_str = eina_stringshare_add("Normal");
1807    sd->size = -100;
1808    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1809
1810    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1811    sd->size_str = eina_stringshare_add("Big");
1812    sd->size = -150;
1813    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1814
1815    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1816    sd->size_str = eina_stringshare_add("Really Big");
1817    sd->size = -190;
1818    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1819
1820    sd = calloc(1, sizeof(Elm_Font_Size_Data));
1821    sd->size_str = eina_stringshare_add("Huge");
1822    sd->size = -250;
1823    fndata.font_scale_list = eina_list_append(fndata.font_scale_list, sd);
1824
1825    for (i = 5; i < 51; i++)
1826      {
1827         char str[16];
1828
1829         str[0] = 0;
1830         snprintf(str, sizeof(str), "%d pixels", i);
1831
1832         sd = calloc(1, sizeof(Elm_Font_Size_Data));
1833         sd->size_str = eina_stringshare_add(str);
1834         sd->size = i;
1835         fndata.font_px_list = eina_list_append(fndata.font_px_list, sd);
1836      }
1837 }
1838
1839 static int
1840 _font_sort_cb(const void *data1,
1841               const void *data2)
1842 {
1843    if (!data1) return 1;
1844    if (!data2) return -1;
1845    return strcmp(data1, data2);
1846 }
1847
1848 static void
1849 _font_sizes_list_load(Evas_Object *size_list)
1850 {
1851    Elm_Font_Size_Data *size_data;
1852    Eina_List *l;
1853    Evas *evas;
1854
1855    evas = evas_object_evas_get(size_list);
1856    evas_event_freeze(evas);
1857    edje_freeze();
1858
1859    EINA_LIST_FOREACH(fndata.font_scale_list, l, size_data)
1860      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1861                           _font_sizes_list_sel, size_data);
1862
1863    EINA_LIST_FOREACH(fndata.font_px_list, l, size_data)
1864      elm_list_item_append(size_list, size_data->size_str, NULL, NULL,
1865                           _font_sizes_list_sel, size_data);
1866
1867    elm_list_go(size_list);
1868    edje_thaw();
1869    evas_event_thaw(evas);
1870 }
1871
1872 static void
1873 _fnames_list_unselect_cb(void *data       __UNUSED__,
1874                          Evas_Object     *obj,
1875                          void *event_info __UNUSED__)
1876 {
1877    Evas_Object *styles_list, *sizes_list, *win;
1878
1879    if (elm_list_selected_item_get(obj)) return;
1880
1881    win = elm_object_top_widget_get(obj);
1882
1883    styles_list = evas_object_data_get(win, "font_styles_list");
1884    ELM_LIST_DISABLE(styles_list);
1885
1886    sizes_list = evas_object_data_get(win, "font_sizes_list");
1887    ELM_LIST_DISABLE(sizes_list);
1888 }
1889
1890 static Eina_Bool
1891 _font_list_fill(const Eina_Hash *hash __UNUSED__,
1892                 const void *key       __UNUSED__,
1893                 void                 *data,
1894                 void                 *fdata)
1895 {
1896    Elm_Font_Properties *efp;
1897    Eina_List **flist;
1898
1899    flist = fdata;
1900    efp = data;
1901
1902    *flist = eina_list_append(*flist, efp->name);
1903
1904    return EINA_TRUE;
1905 }
1906
1907 static void
1908 _font_names_list_load(Evas_Object *flist)
1909 {
1910    Eina_List *l, *names_list = NULL;
1911    const char *font;
1912    Evas *evas;
1913
1914    evas = evas_object_evas_get(flist);
1915    evas_event_freeze(evas);
1916    edje_freeze();
1917
1918    eina_hash_foreach(fndata.font_hash, _font_list_fill, &names_list);
1919    names_list = eina_list_sort(names_list, eina_list_count(names_list),
1920                                _font_sort_cb);
1921
1922    EINA_LIST_FOREACH(names_list, l, font)
1923      elm_list_item_append(flist, font, NULL, NULL, _font_names_list_sel, NULL);
1924
1925    EINA_LIST_FREE(names_list, font) ;
1926
1927    evas_object_smart_callback_add(flist, "unselected",
1928                                   _fnames_list_unselect_cb, NULL);
1929
1930    elm_list_go(flist);
1931
1932    edje_thaw();
1933    evas_event_thaw(evas);
1934 }
1935
1936 static void
1937 _status_config_fonts(Evas_Object *win,
1938                      Evas_Object *naviframe)
1939 {
1940    Evas_Object *base, *fr, *li, *rc, *preview, *sp, *pd, *bt, *bx;
1941    char buf[PATH_MAX];
1942
1943    _fonts_data_fill(evas_object_evas_get(win));
1944
1945    base = elm_table_add(win);
1946    evas_object_size_hint_weight_set(base, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1947    evas_object_size_hint_align_set(base, EVAS_HINT_FILL, EVAS_HINT_FILL);
1948
1949    /* yeah, dummy rectangles are ugly as hell, but no good way yet of
1950       fixing sizes */
1951    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1952    evas_object_size_hint_weight_set(rc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1953    evas_object_size_hint_align_set(rc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1954    evas_object_size_hint_min_set(rc, 70, 170);
1955    elm_table_pack(base, rc, 1, 0, 1, 1);
1956
1957    fr = elm_frame_add(win);
1958    elm_object_text_set(fr, "Font Class");
1959    elm_table_pack(base, fr, 0, 0, 1, 2);
1960    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1961    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1962    evas_object_show(fr);
1963
1964    /* FIXME: no multiselection for this list, for now */
1965    li = elm_list_add(win);
1966    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1967    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1968    elm_object_content_set(fr, li);
1969    evas_object_show(li);
1970
1971    evas_object_data_set(win, "font_classes_list", li);
1972    _font_classes_list_load(li);
1973
1974    fr = elm_frame_add(win);
1975    elm_object_text_set(fr, "Font");
1976    elm_table_pack(base, fr, 1, 0, 1, 2);
1977    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1978    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
1979    evas_object_show(fr);
1980
1981    li = elm_list_add(win);
1982    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1983    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
1984    elm_object_content_set(fr, li);
1985    evas_object_show(li);
1986
1987    evas_object_data_set(win, "font_names_list", li);
1988    _font_names_list_load(li);
1989    ELM_LIST_DISABLE(li);
1990
1991    rc = evas_object_rectangle_add(evas_object_evas_get(win));
1992    evas_object_size_hint_weight_set(rc, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
1993    evas_object_size_hint_align_set(rc, EVAS_HINT_FILL, EVAS_HINT_FILL);
1994    evas_object_size_hint_min_set(rc, 70, 130);
1995    elm_table_pack(base, rc, 1, 2, 1, 1);
1996
1997    fr = elm_frame_add(win);
1998    elm_object_text_set(fr, "Style");
1999    elm_table_pack(base, fr, 0, 2, 1, 1);
2000    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2001    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2002    evas_object_show(fr);
2003    ELM_LIST_DISABLE(li);
2004
2005    li = elm_list_add(win);
2006    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2007    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2008    elm_object_content_set(fr, li);
2009    evas_object_show(li);
2010
2011    evas_object_data_set(win, "font_styles_list", li);
2012    evas_object_smart_callback_add(li, "unselected", _fstyle_list_unselect_cb,
2013                                   NULL);
2014
2015    fr = elm_frame_add(win);
2016    elm_object_text_set(fr, "Size");
2017    elm_table_pack(base, fr, 1, 2, 1, 1);
2018    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2019    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2020    evas_object_show(fr);
2021
2022    li = elm_list_add(win);
2023    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2024    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2025    elm_object_content_set(fr, li);
2026    evas_object_show(li);
2027
2028    evas_object_data_set(win, "font_sizes_list", li);
2029    _font_sizes_list_load(li);
2030    ELM_LIST_DISABLE(li);
2031
2032    bx = elm_box_add(win);
2033    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2034    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2035    elm_table_pack(base, bx, 0, 3, 2, 1);
2036    evas_object_show(bx);
2037
2038    /* FIXME: what to do here? dedicated widget? some new entry API set? */
2039    snprintf(buf, sizeof(buf), "%s/objects/font_preview.edj", elm_app_data_dir_get());
2040    preview = elm_layout_add(win);
2041    elm_layout_file_set(preview, buf, "font_preview");
2042    elm_object_part_text_set(preview, "elm.text", "Preview Text — 我真的会写中文");
2043    evas_object_size_hint_weight_set(preview, EVAS_HINT_EXPAND, 0.0);
2044    evas_object_size_hint_align_set(preview, EVAS_HINT_FILL, EVAS_HINT_FILL);
2045    evas_object_show(preview);
2046
2047    elm_box_pack_end(bx, preview);
2048    evas_object_data_set(win, "font_preview", elm_layout_edje_get(preview));
2049
2050    /////////////////////////////////////////////
2051    sp = elm_separator_add(win);
2052    elm_separator_horizontal_set(sp, EINA_TRUE);
2053    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2054    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2055    elm_table_pack(base, sp, 0, 4, 2, 1);
2056    evas_object_show(sp);
2057
2058    pd = elm_frame_add(win);
2059    elm_object_style_set(pd, "pad_medium");
2060    evas_object_size_hint_weight_set(pd, EVAS_HINT_EXPAND, 0.0);
2061    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2062    elm_table_pack(base, pd, 0, 5, 2, 1);
2063    evas_object_show(pd);
2064
2065    bx = elm_box_add(win);
2066    elm_box_horizontal_set(bx, EINA_TRUE);
2067    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2068    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2069    evas_object_show(bx);
2070
2071    bt = elm_button_add(win);
2072    evas_object_smart_callback_add(bt, "clicked", _font_overlay_set_all, win);
2073    elm_object_text_set(bt, "Set to All");
2074    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2075    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2076    elm_box_pack_end(bx, bt);
2077    evas_object_show(bt);
2078
2079    bt = elm_button_add(win);
2080    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset, win);
2081    elm_object_text_set(bt, "Reset");
2082    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2083    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2084    elm_box_pack_end(bx, bt);
2085    evas_object_show(bt);
2086
2087    bt = elm_button_add(win);
2088    evas_object_smart_callback_add(bt, "clicked", _font_overlay_reset_all, win);
2089    elm_object_text_set(bt, "Reset All");
2090    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2091    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2092    elm_box_pack_end(bx, bt);
2093    evas_object_show(bt);
2094
2095    bt = elm_button_add(win);
2096    evas_object_smart_callback_add(bt, "clicked", _font_overlay_change, win);
2097    elm_object_text_set(bt, "Apply");
2098    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2099    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2100    elm_box_pack_end(bx, bt);
2101    evas_object_show(bt);
2102
2103    elm_object_content_set(pd, bx);
2104
2105    evas_object_data_set(win, "fonts", base);
2106
2107    elm_naviframe_item_simple_push(naviframe, base);
2108 }
2109
2110 static void
2111 _engines_list_item_del_cb(void            *data,
2112                           Evas_Object *obj __UNUSED__,
2113                           void *event_info __UNUSED__)
2114 {
2115    free(data);
2116 }
2117
2118 static void
2119 _profiles_list_item_del_cb(void            *data,
2120                            Evas_Object *obj __UNUSED__,
2121                            void *event_info __UNUSED__)
2122 {
2123    free(data);
2124 }
2125
2126 static void
2127 _profiles_list_selected_cb(void            *data,
2128                            Evas_Object     *obj,
2129                            void *event_info __UNUSED__)
2130 {
2131    const char *cur_profile = NULL;
2132    const char *sel_profile, *pdir;
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_config_profile_get();
2145
2146    pdir = elm_config_profile_dir_get(sel_profile, EINA_TRUE);
2147    if (!pdir) pdir = elm_config_profile_dir_get(sel_profile, EINA_FALSE);
2148 #ifdef ELM_EFREET
2149    snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2150    desk = efreet_desktop_new(buf);
2151    if ((desk) && (desk->name)) prof_name = desk->name;
2152    else
2153      {
2154         if (desk) efreet_desktop_free(desk);
2155         pdir = elm_config_profile_dir_get(sel_profile, EINA_FALSE);
2156         snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2157         desk = efreet_desktop_new(buf);
2158         if ((desk) && (desk->name)) prof_name = desk->name;
2159         else prof_name = cur_profile;
2160      }
2161 #endif
2162    prof_name = cur_profile;
2163
2164    if (!pdir)
2165      elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2166                              EINA_TRUE);
2167    else
2168      {
2169         elm_object_disabled_set(evas_object_data_get(obj, "prof_del_btn"),
2170                                 EINA_TRUE);
2171         elm_object_disabled_set(evas_object_data_get(obj, "prof_reset_btn"),
2172                                 EINA_FALSE);
2173         elm_object_disabled_set(evas_object_data_get(obj, "prof_use_btn"),
2174                                 EINA_FALSE);
2175         elm_config_profile_dir_free(pdir);
2176      }
2177
2178    snprintf(buf, sizeof(buf), "<hilight>Selected profile: %s</><br/>",
2179             prof_name);
2180    elm_object_text_set(evas_object_data_get(obj, "prof_name_lbl"), buf);
2181
2182    en = evas_object_data_get(obj, "prof_desc_entry");
2183 #ifdef ELM_EFREET
2184    if (desk) elm_object_text_set(en, desk->comment);
2185    else
2186 #endif
2187    elm_object_text_set(en, "Unknown");
2188
2189 #ifdef ELM_EFREET
2190    if (desk) efreet_desktop_free(desk);
2191 #endif
2192 }
2193
2194 static void
2195 _profiles_list_fill(Evas_Object *l_widget,
2196                     Eina_List   *p_names)
2197 {
2198    const char *cur_profile = NULL;
2199    const char *profile;
2200    void *sel_it = NULL;
2201    Eina_List *l;
2202
2203    if (!p_names)
2204      return;
2205
2206    elm_list_clear(l_widget);
2207
2208    cur_profile = elm_config_profile_get();
2209
2210    EINA_LIST_FOREACH(p_names, l, profile)
2211      {
2212 #ifdef ELM_EFREET
2213         Efreet_Desktop *desk = NULL;
2214 #endif
2215         const char *label, *ext, *pdir;
2216         char buf[PATH_MAX];
2217         Elm_Object_Item *list_it;
2218         Evas_Object *ic;
2219
2220         pdir = elm_config_profile_dir_get(profile, EINA_TRUE);
2221         if (!pdir) pdir = elm_config_profile_dir_get(profile, EINA_FALSE);
2222         label = profile;
2223
2224 #ifdef ELM_EFREET
2225         snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2226         desk = efreet_desktop_new(buf);
2227         if ((desk) && (desk->name)) label = desk->name;
2228         else
2229           {
2230              if (desk) efreet_desktop_free(desk);
2231              pdir = elm_config_profile_dir_get(profile, EINA_FALSE);
2232              snprintf(buf, sizeof(buf), "%s/profile.desktop", pdir);
2233              desk = efreet_desktop_new(buf);
2234              if ((desk) && (desk->name)) label = desk->name;
2235              else label = profile;
2236           }
2237 #endif
2238
2239         buf[0] = 0;
2240         if (pdir) snprintf(buf, sizeof(buf), "%s/icon.edj", pdir);
2241 #ifdef ELM_EFREET
2242         if ((desk) && (desk->icon) && (pdir))
2243           snprintf(buf, sizeof(buf), "%s/%s", pdir, desk->icon);
2244 #endif
2245         ic = elm_icon_add(l_widget);
2246         ext = strrchr(buf, '.');
2247         if (ext)
2248           {
2249              if (!strcmp(ext, ".edj")) elm_icon_file_set(ic, buf, "icon");
2250              else elm_icon_file_set(ic, buf, NULL);
2251           }
2252
2253         evas_object_size_hint_aspect_set(ic, EVAS_ASPECT_CONTROL_VERTICAL,
2254                                          1, 1);
2255         evas_object_show(ic);
2256
2257         list_it = elm_list_item_append(l_widget, label, ic, NULL,
2258                                        _profiles_list_selected_cb,
2259                                        strdup(profile));
2260         elm_object_item_del_cb_set(list_it, _profiles_list_item_del_cb);
2261         if (cur_profile && !strcmp(profile, cur_profile))
2262           sel_it = list_it;
2263
2264         elm_config_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 *naviframe)
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_config_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_config_profile_list_free(profs);
2423
2424    edje_thaw();
2425    evas_event_thaw(evas);
2426
2427    evas_object_data_set(win, "profiles", bx);
2428    elm_naviframe_item_simple_push(naviframe, bx);
2429 }
2430
2431 static void
2432 _status_config_scrolling(Evas_Object *win,
2433                          Evas_Object *naviframe)
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_config_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_config_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_config_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_config_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_config_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_config_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_config_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_config_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_config_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_config_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_config_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_naviframe_item_simple_push(naviframe, 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       "psl1ght",
2715       "wayland_shm",
2716       "wayland_egl",
2717       NULL
2718    };
2719
2720    unsigned int i;
2721
2722    for (i = 0; engines[i]; i++)
2723      {
2724 #define ENGINE_COMPARE(name) (!strcmp(engines[i], name))
2725         if (ENGINE_COMPARE(engine))
2726           return EINA_TRUE;
2727 #undef ENGINE_COMPARE
2728      }
2729
2730    return EINA_FALSE;
2731 }
2732
2733 static void
2734 _engines_list_fill(Evas_Object *l_widget,
2735                    Eina_List   *e_names)
2736 {
2737    const char *engine, *cur_engine;
2738    void *sel_it = NULL;
2739    Eina_List *l;
2740
2741    if (!e_names)
2742      return;
2743
2744    cur_engine = elm_config_engine_get();
2745
2746    EINA_LIST_FOREACH(e_names, l, engine)
2747      {
2748         const char *label;
2749         Elm_Object_Item *list_it;
2750
2751         if (!_elm_engine_supported(engine))
2752           continue;
2753
2754         label = _engine_name_prettify(engine);
2755
2756         list_it = elm_list_item_append(l_widget, label, NULL, NULL, NULL,
2757                                   strdup(engine));
2758         elm_object_item_del_cb_set(list_it, _engines_list_item_del_cb);
2759         free((void *)label);
2760
2761         if (!strcmp(cur_engine, engine))
2762           sel_it = list_it;
2763      }
2764
2765    if (sel_it) elm_list_item_selected_set(sel_it, EINA_TRUE);
2766    elm_list_go(l_widget);
2767 }
2768
2769 static void
2770 _status_config_rendering(Evas_Object *win,
2771                          Evas_Object *naviframe)
2772 {
2773    Evas_Object *li, *bx, *fr, *sp, *pd, *bt;
2774    Eina_List *engines;
2775
2776    bx = elm_box_add(win);
2777    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2778    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, EVAS_HINT_FILL);
2779
2780    fr = elm_frame_add(win);
2781    elm_object_text_set(fr, "Available Engines");
2782    evas_object_size_hint_weight_set(fr, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2783    evas_object_size_hint_align_set(fr, EVAS_HINT_FILL, EVAS_HINT_FILL);
2784    elm_box_pack_end(bx, fr);
2785    evas_object_show(fr);
2786
2787    li = elm_list_add(win);
2788    elm_object_content_set(fr, li);
2789    evas_object_size_hint_weight_set(li, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2790    evas_object_size_hint_align_set(li, EVAS_HINT_FILL, EVAS_HINT_FILL);
2791
2792    engines = ecore_evas_engines_get();
2793    _engines_list_fill(li, engines);
2794    ecore_evas_engines_free(engines);
2795
2796    evas_object_show(li);
2797    evas_object_data_set(win, "engines_list", li);
2798
2799    /////////////////////////////////////////////
2800    sp = elm_separator_add(win);
2801    elm_separator_horizontal_set(sp, EINA_TRUE);
2802    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2803    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2804    elm_box_pack_end(bx, sp);
2805    evas_object_show(sp);
2806
2807    pd = elm_frame_add(win);
2808    elm_object_style_set(pd, "pad_medium");
2809    evas_object_size_hint_weight_set(pd, 0.0, 0.0);
2810    evas_object_size_hint_align_set(pd, 0.5, 0.5);
2811    elm_box_pack_end(bx, pd);
2812    evas_object_show(pd);
2813
2814    bt = elm_button_add(win);
2815    evas_object_smart_callback_add(bt, "clicked", _engine_use, li);
2816    elm_object_text_set(bt, "Use Engine");
2817    evas_object_size_hint_weight_set(bt, 0.0, 0.0);
2818    evas_object_size_hint_align_set(bt, 0.5, 0.5);
2819    elm_object_content_set(pd, bt);
2820    evas_object_show(bt);
2821
2822    evas_object_data_set(win, "rendering", bx);
2823    elm_naviframe_item_simple_push(naviframe, bx);
2824 }
2825
2826 static void
2827 _status_config_caches(Evas_Object *win,
2828                       Evas_Object *naviframe)
2829 {
2830    Evas_Object *lb, *pd, *bx, *sl, *sp, *ck;
2831
2832    bx = elm_box_add(win);
2833    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND, 0.0);
2834    evas_object_size_hint_align_set(bx, EVAS_HINT_FILL, 0.5);
2835
2836    LABEL_FRAME_ADD("<hilight>Cache Flush Interval (8 ticks pre second)</>");
2837
2838    sl = elm_slider_add(win);
2839    evas_object_data_set(win, "cache_flush_interval_slider", sl);
2840    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2841    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2842    elm_slider_span_size_set(sl, 120);
2843    elm_slider_unit_format_set(sl, "%1.0f ticks");
2844    elm_slider_indicator_format_set(sl, "%1.0f");
2845    elm_slider_min_max_set(sl, 8.0, 4096.0);
2846    elm_slider_value_set(sl, elm_config_cache_flush_interval_get());
2847    elm_object_disabled_set(sl, !elm_config_cache_flush_enabled_get());
2848
2849    ck = elm_check_add(win);
2850    evas_object_size_hint_weight_set(ck, EVAS_HINT_EXPAND, 0.0);
2851    evas_object_size_hint_align_set(ck, EVAS_HINT_FILL, 0.5);
2852    elm_object_text_set(ck, "Enable Flushing");
2853    elm_check_state_set(ck, elm_config_cache_flush_enabled_get());
2854    evas_object_smart_callback_add(ck, "changed", cf_enable, sl);
2855    elm_box_pack_end(bx, ck);
2856    evas_object_show(ck);
2857
2858    elm_box_pack_end(bx, sl);
2859    evas_object_show(sl);
2860
2861    evas_object_smart_callback_add(sl, "changed", cf_round, NULL);
2862    evas_object_smart_callback_add(sl, "delay,changed", cf_change, NULL);
2863
2864    sp = elm_separator_add(win);
2865    elm_separator_horizontal_set(sp, EINA_TRUE);
2866    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2867    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2868    elm_box_pack_end(bx, sp);
2869    evas_object_show(sp);
2870
2871    LABEL_FRAME_ADD("<hilight>Font Cache Size</>");
2872
2873    sl = elm_slider_add(win);
2874    evas_object_data_set(win, "font_cache_slider", sl);
2875    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2876    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2877    elm_slider_span_size_set(sl, 120);
2878    elm_slider_unit_format_set(sl, "%1.1f MB");
2879    elm_slider_indicator_format_set(sl, "%1.1f");
2880    elm_slider_min_max_set(sl, 0.0, 4.0);
2881    elm_slider_value_set(sl, (double)elm_config_cache_font_cache_size_get() / 1024.0);
2882    elm_box_pack_end(bx, sl);
2883    evas_object_show(sl);
2884
2885    evas_object_smart_callback_add(sl, "changed", fc_round, NULL);
2886    evas_object_smart_callback_add(sl, "delay,changed", fc_change, NULL);
2887
2888    sp = elm_separator_add(win);
2889    elm_separator_horizontal_set(sp, EINA_TRUE);
2890    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2891    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2892    elm_box_pack_end(bx, sp);
2893    evas_object_show(sp);
2894
2895    LABEL_FRAME_ADD("<hilight>Image Cache Size</>");
2896
2897    sl = elm_slider_add(win);
2898    evas_object_data_set(win, "image_cache_slider", sl);
2899    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2900    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2901    elm_slider_span_size_set(sl, 120);
2902    elm_slider_unit_format_set(sl, "%1.0f MB");
2903    elm_slider_indicator_format_set(sl, "%1.0f");
2904    elm_slider_min_max_set(sl, 0, 32);
2905    elm_slider_value_set(sl, (double)elm_config_cache_image_cache_size_get() / 1024.0);
2906    elm_box_pack_end(bx, sl);
2907    evas_object_show(sl);
2908
2909    evas_object_smart_callback_add(sl, "changed", ic_round, NULL);
2910    evas_object_smart_callback_add(sl, "delay,changed", ic_change, NULL);
2911
2912    sp = elm_separator_add(win);
2913    elm_separator_horizontal_set(sp, EINA_TRUE);
2914    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2915    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2916    elm_box_pack_end(bx, sp);
2917    evas_object_show(sp);
2918
2919    LABEL_FRAME_ADD("<hilight>Number of Edje Files to Cache</>");
2920
2921    sl = elm_slider_add(win);
2922    evas_object_data_set(win, "edje_file_cache_slider", sl);
2923    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2924    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2925    elm_slider_span_size_set(sl, 120);
2926    elm_slider_unit_format_set(sl, "%1.0f files");
2927    elm_slider_indicator_format_set(sl, "%1.0f");
2928    elm_slider_min_max_set(sl, 0, 32);
2929    elm_slider_value_set(sl, elm_config_cache_edje_file_cache_size_get());
2930    elm_box_pack_end(bx, sl);
2931    evas_object_show(sl);
2932
2933    evas_object_smart_callback_add(sl, "changed", efc_round, NULL);
2934    evas_object_smart_callback_add(sl, "delay,changed", efc_change, NULL);
2935
2936    sp = elm_separator_add(win);
2937    elm_separator_horizontal_set(sp, EINA_TRUE);
2938    evas_object_size_hint_weight_set(sp, EVAS_HINT_EXPAND, 0.0);
2939    evas_object_size_hint_align_set(sp, EVAS_HINT_FILL, 0.5);
2940    elm_box_pack_end(bx, sp);
2941    evas_object_show(sp);
2942
2943    LABEL_FRAME_ADD("<hilight>Number of Edje Collections to Cache</>");
2944
2945    sl = elm_slider_add(win);
2946    evas_object_data_set(win, "edje_collection_cache_slider", sl);
2947    evas_object_size_hint_weight_set(sl, EVAS_HINT_EXPAND, 0.0);
2948    evas_object_size_hint_align_set(sl, EVAS_HINT_FILL, 0.5);
2949    elm_slider_span_size_set(sl, 120);
2950    elm_slider_unit_format_set(sl, "%1.0f collections");
2951    elm_slider_indicator_format_set(sl, "%1.0f");
2952    elm_slider_min_max_set(sl, 0, 128);
2953    elm_slider_value_set(sl, elm_config_cache_edje_collection_cache_size_get());
2954    elm_box_pack_end(bx, sl);
2955    evas_object_show(sl);
2956
2957    evas_object_smart_callback_add(sl, "changed", ecc_round, NULL);
2958    evas_object_smart_callback_add(sl, "delay,changed", ecc_change, NULL);
2959
2960    evas_object_data_set(win, "caches", bx);
2961
2962    elm_naviframe_item_simple_push(naviframe, bx);
2963 }
2964
2965 static void
2966 _status_config_full(Evas_Object *win,
2967                     Evas_Object *bx0)
2968 {
2969    Evas_Object *tb, *naviframe;
2970    Elm_Object_Item *tb_sizing, *tb_it;
2971
2972    tb = elm_toolbar_add(win);
2973    elm_toolbar_select_mode_set(tb, ELM_OBJECT_SELECT_MODE_ALWAYS);
2974    elm_toolbar_menu_parent_set(tb, win);
2975    elm_toolbar_homogeneous_set(tb, EINA_FALSE);
2976    evas_object_size_hint_weight_set(tb, 1.0, 0.0);
2977    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, EVAS_HINT_FILL);
2978
2979    tb_sizing = elm_toolbar_item_append(tb, "zoom-fit-best", "Sizing",
2980                                     _cf_sizing, win);
2981    elm_toolbar_item_priority_set(tb_sizing, 100);
2982
2983    tb_it = elm_toolbar_item_append(tb, "preferences-desktop-theme", "Theme",
2984                                 _cf_themes, win);
2985    elm_toolbar_item_priority_set(tb_it, 90);
2986
2987    elm_toolbar_item_append(tb, "preferences-desktop-font", "Fonts",
2988                            _cf_fonts, win);
2989
2990    tb_it = elm_toolbar_item_append(tb, "system-users", "Profiles",
2991                                 _cf_profiles, win);
2992    elm_toolbar_item_priority_set(tb_it, 90);
2993
2994    elm_toolbar_item_append(tb, "system-run", "Scrolling", _cf_scrolling, win);
2995    elm_toolbar_item_append(tb, "video-display", "Rendering",
2996                            _cf_rendering, win);
2997    elm_toolbar_item_append(tb, "appointment-new", "Caches", _cf_caches, win);
2998
2999    elm_box_pack_end(bx0, tb);
3000    evas_object_show(tb);
3001
3002    naviframe = elm_naviframe_add(win);
3003    evas_object_size_hint_align_set(naviframe, EVAS_HINT_FILL, EVAS_HINT_FILL);
3004    evas_object_size_hint_weight_set(naviframe, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
3005    evas_object_data_set(win, "naviframe", naviframe);
3006
3007    _status_config_themes(win, naviframe);
3008    _status_config_fonts(win, naviframe);
3009    _status_config_profiles(win, naviframe);
3010    _status_config_rendering(win, naviframe);
3011    _status_config_scrolling(win, naviframe);
3012    _status_config_caches(win, naviframe);
3013    _status_config_sizing(win, naviframe);
3014
3015    // FIXME uncomment after flip style fix, please
3016    //elm_object_style_set(naviframe, "flip");
3017    elm_toolbar_item_selected_set(tb_sizing, EINA_TRUE);
3018    elm_box_pack_end(bx0, naviframe);
3019    evas_object_show(naviframe);
3020 }
3021
3022 static void
3023 win_create(void)
3024 {
3025    Evas_Object *win, *bx0;
3026
3027    win = elm_win_util_standard_add("main", "Elementary Config");
3028    ecore_event_handler_add(ELM_EVENT_CONFIG_ALL_CHANGED, _config_all_changed,
3029                            win);
3030    evas_object_smart_callback_add(win, "delete,request", config_exit, NULL);
3031
3032    bx0 = elm_box_add(win);
3033    evas_object_size_hint_weight_set(bx0, 1.0, 1.0);
3034    elm_win_resize_object_add(win, bx0);
3035    evas_object_show(bx0);
3036
3037    if (!interactive) _status_basic(win, bx0);
3038    else if (0)
3039      _status_config(win, bx0);
3040    else _status_config_full(win, bx0);
3041
3042    evas_object_resize(win, 320, 480);
3043    evas_object_show(win);
3044 }
3045
3046 static Eina_Bool
3047 _exit_timer(void *data __UNUSED__)
3048 {
3049    elm_exit();
3050    return ECORE_CALLBACK_CANCEL;
3051 }
3052
3053 /* this is your elementary main function - it MUST be called IMMEDIATELY
3054  * after elm_init() and MUST be passed argc and argv, and MUST be called
3055  * elm_main and not be static - must be a visible symbol with EAPI infront */
3056 EAPI_MAIN int
3057 elm_main(int    argc,
3058          char **argv)
3059 {
3060    int i;
3061
3062    elm_app_info_set(elm_main, "elementary", "images/logo.png");
3063    elm_app_compile_bin_dir_set(PACKAGE_BIN_DIR);
3064    elm_app_compile_data_dir_set(PACKAGE_DATA_DIR);
3065
3066    for (i = 1; i < argc; i++)
3067      {
3068         if (!strcmp(argv[i], "-h"))
3069           {
3070              printf("Usage:\n"
3071                     "  -h                This help\n"
3072                     "  -q                Quiet mode (dont show window)\n"
3073                     "  -t THEME          Set theme to THEME (ELM_THEME spec)\n"
3074                     "  -f SIZE           Set finger size to SIZE pixels\n"
3075                     "  -s SCALE          Set scale factor to SCALE\n"
3076                     );
3077           }
3078         else if (!strcmp(argv[i], "-q"))
3079           {
3080              quiet = 1;
3081              interactive = 0;
3082           }
3083         else if ((!strcmp(argv[i], "-t")) && (i < argc - 1))
3084           {
3085              i++;
3086              theme_set = argv[i];
3087              interactive = 0;
3088           }
3089         else if ((!strcmp(argv[i], "-f")) && (i < argc - 1))
3090           {
3091              i++;
3092              finger_size_set = argv[i];
3093              interactive = 0;
3094           }
3095         else if ((!strcmp(argv[i], "-s")) && (i < argc - 1))
3096           {
3097              i++;
3098              scale_set = argv[i];
3099              interactive = 0;
3100           }
3101      }
3102    /* put here any init code specific to this app like parsing args, etc. */
3103    if (!quiet)
3104      {
3105 #ifdef ELM_EFREET
3106         elm_need_efreet();
3107 #endif
3108         win_create(); /* create main window */
3109         if (!interactive)
3110           ecore_timer_add(2.0, _exit_timer, NULL);
3111      }
3112    if (!interactive)
3113      {
3114         if (theme_set) elm_theme_set(NULL, theme_set);
3115         if (finger_size_set) elm_config_finger_size_set(atoi(finger_size_set));
3116         if (scale_set)  elm_config_scale_set(atof(scale_set));
3117
3118         elm_config_all_flush();
3119
3120         if (quiet) elm_exit();
3121      }
3122    elm_run(); /* and run the program now and handle all events, etc. */
3123    /* if the mainloop that elm_run() runs exists, we exit the app */
3124    elm_shutdown(); /* clean up and shut down */
3125    /* exit code */
3126    return 0;
3127 }
3128
3129 #endif
3130 /* All emelentary apps should use this. Put it right after elm_main() */
3131 ELM_MAIN()