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