src/lib/elm_config.c

   1 #ifdef HAVE_CONFIG_H
   2 # include "elementary_config.h"
   3 #endif
   4
   5 #ifdef HAVE_EVIL
   6 # include <Evil.h>
   7 #endif
   8
   9 #include <Elementary.h>
  10 #include "elm_priv.h"
  11
  12 EAPI int ELM_EVENT_CONFIG_ALL_CHANGED = 0;
  13
  14 Elm_Config *_elm_config = NULL;
  15 char *_elm_profile = NULL;
  16 static Eet_Data_Descriptor *_config_edd = NULL;
  17 static Eet_Data_Descriptor *_config_font_overlay_edd = NULL;
  18
  19 static Ecore_Poller *_elm_cache_flush_poller = NULL;
  20
  21 const char *_elm_engines[] = {
  22    "software_x11",
  23    "fb",
  24    "directfb",
  25    "software_16_x11",
  26    "software_8_x11",
  27    "xrender_x11",
  28    "opengl_x11",
  29    "software_gdi",
  30    "software_16_wince_gdi",
  31    "sdl",
  32    "software_16_sdl",
  33    "opengl_sdl",
  34    "buffer",
  35    "ews",
  36    "opengl_cocoa",
  37    "psl1ght",
  38    "wayland_shm",
  39    "wayland_egl",
  40    NULL
  41 };
  42
  43 /* whenever you want to add a new text class support into Elementary,
  44    declare it both here and in the (default) theme */
  45 static const Elm_Text_Class _elm_text_classes[] = {
  46    {"button", "Button Labels"},
  47    {"label", "Text Labels"},
  48    {"entry", "Text Entries"},
  49    {"title_bar", "Title Bar"},
  50    {"list_item", "List Items"},
  51    {"grid_item", "Grid Items"},
  52    {"toolbar_item", "Toolbar Items"},
  53    {"menu_item", "Menu Items"},
  54    {NULL, NULL}
  55 };
  56
  57 static void        _desc_init(void);
  58 static void        _desc_shutdown(void);
  59 static void        _profile_fetch_from_conf(void);
  60 static void        _config_free(void);
  61 static void        _config_apply(void);
  62 static Elm_Config *_config_user_load(void);
  63 static Elm_Config *_config_system_load(void);
  64 static void        _config_load(void);
  65 static void        _config_update(void);
  66 static void        _env_get(void);
  67 static size_t      _elm_data_dir_snprintf(char       *dst,
  68                                           size_t      size,
  69                                           const char *fmt, ...)
  70                                           EINA_PRINTF(3, 4);
  71 static size_t _elm_user_dir_snprintf(char       *dst,
  72                                      size_t      size,
  73                                      const char *fmt, ...)
  74                                      EINA_PRINTF(3, 4);
  75
  76 #define ELM_CONFIG_VAL(edd, type, member, dtype) \
  77   EET_DATA_DESCRIPTOR_ADD_BASIC(edd, type, #member, member, dtype)
  78 #define ELM_CONFIG_LIST(edd, type, member, eddtype) \
  79   EET_DATA_DESCRIPTOR_ADD_LIST(edd, type, #member, member, eddtype)
  80
  81 #ifdef HAVE_ELEMENTARY_X
  82 static Ecore_Event_Handler *_prop_change_handler = NULL;
  83 static Ecore_Timer *_prop_all_update_timer = NULL;
  84 static Ecore_Timer *_prop_change_delay_timer = NULL;
  85 static Ecore_X_Window _root_1st = 0;
  86 #define ATOM_COUNT 2
  87 static Ecore_X_Atom _atom[ATOM_COUNT];
  88 static Ecore_X_Atom _atom_config = 0;
  89 static const char *_atom_names[ATOM_COUNT] =
  90 {
  91    "ELM_PROFILE",
  92    "ELM_CONFIG"
  93 };
  94 #define ATOM_E_PROFILE                              0
  95 #define ATOM_E_CONFIG                               1
  96
  97 static Eina_Bool _prop_all_update_cb(void *data __UNUSED__);
  98 static Eina_Bool _prop_config_get(void);
  99 static void      _prop_config_set(void);
 100 static Eina_Bool _prop_change(void *data  __UNUSED__,
 101                               int ev_type __UNUSED__,
 102                               void       *ev);
 103
 104 static Eina_Bool
 105 _prop_all_update_cb(void *data __UNUSED__)
 106 {
 107    _prop_config_set();
 108    ecore_x_window_prop_string_set(_root_1st, _atom[ATOM_E_PROFILE],
 109                                   _elm_profile);
 110    _prop_all_update_timer = NULL;
 111    return EINA_FALSE;
 112 }
 113
 114 static Eina_Bool
 115 _prop_config_get(void)
 116 {
 117    int size = 0;
 118    Ecore_X_Atom atom;
 119    char buf[512];
 120    unsigned char *data = NULL;
 121    Elm_Config *config_data;
 122
 123    snprintf(buf, sizeof(buf), "ELM_CONFIG_%s", _elm_profile);
 124    atom = ecore_x_atom_get(buf);
 125    _atom_config = atom;
 126    if (!ecore_x_window_prop_property_get(_root_1st,
 127                                          atom, _atom[ATOM_E_CONFIG],
 128                                          8, &data, &size))
 129      {
 130         if (!ecore_x_window_prop_property_get(_root_1st,
 131                                               _atom[ATOM_E_CONFIG],
 132                                               _atom[ATOM_E_CONFIG],
 133                                               8, &data, &size))
 134           return EINA_FALSE;
 135         else
 136           _atom_config = _atom[ATOM_E_CONFIG];
 137      }
 138    else
 139      _atom_config = atom;
 140    if (size < 1)
 141      {
 142         free(data);
 143         return EINA_FALSE;
 144      }
 145    config_data = eet_data_descriptor_decode(_config_edd, data, size);
 146    free(data);
 147    if (!config_data) return EINA_FALSE;
 148
 149    /* What do we do on version mismatch when someone changes the
 150     * config in the rootwindow? */
 151    /* Most obvious case, new version and we are still linked to
 152     * whatever was there before, we just ignore until user restarts us */
 153    if (config_data->config_version > ELM_CONFIG_VERSION)
 154      return EINA_TRUE;
 155    /* What in the case the version is older? Do we even support those
 156     * cases or we only check for equality above? */
 157
 158    _config_free();
 159    _elm_config = config_data;
 160    _config_apply();
 161    _elm_config_font_overlay_apply();
 162    _elm_rescale();
 163    _elm_recache();
 164    ecore_event_add(ELM_EVENT_CONFIG_ALL_CHANGED, NULL, NULL, NULL);
 165    return EINA_TRUE;
 166 }
 167
 168 static void
 169 _prop_config_set(void)
 170 {
 171    unsigned char *config_data = NULL;
 172    int size = 0;
 173
 174    config_data = eet_data_descriptor_encode(_config_edd, _elm_config, &size);
 175    if (config_data)
 176      {
 177         Ecore_X_Atom atom;
 178         char buf[512];
 179
 180         snprintf(buf, sizeof(buf), "ELM_CONFIG_%s", _elm_profile);
 181         atom = ecore_x_atom_get(buf);
 182         _atom_config = atom;
 183
 184         ecore_x_window_prop_property_set(_root_1st, _atom_config,
 185                                          _atom[ATOM_E_CONFIG], 8,
 186                                          config_data, size);
 187         free(config_data);
 188      }
 189 }
 190
 191 static Eina_Bool
 192 _prop_change_delay_cb(void *data __UNUSED__)
 193 {
 194    char *s;
 195
 196    s = ecore_x_window_prop_string_get(_root_1st, _atom[ATOM_E_PROFILE]);
 197    if (s)
 198      {
 199         if (_elm_profile) free(_elm_profile);
 200         _elm_profile = s;
 201      }
 202    _prop_config_get();
 203    _prop_change_delay_timer = NULL;
 204    return EINA_FALSE;
 205 }
 206
 207 static Eina_Bool
 208 _prop_change(void *data  __UNUSED__,
 209              int ev_type __UNUSED__,
 210              void       *ev)
 211 {
 212    Ecore_X_Event_Window_Property *event = ev;
 213
 214    if (event->win == _root_1st)
 215      {
 216         if (event->atom == _atom[ATOM_E_PROFILE])
 217           {
 218              if (_prop_change_delay_timer) ecore_timer_del(_prop_change_delay_timer);
 219              _prop_change_delay_timer = ecore_timer_add(0.1, _prop_change_delay_cb, NULL);
 220           }
 221         else if (((_atom_config > 0) && (event->atom == _atom_config)) ||
 222                  (event->atom == _atom[ATOM_E_CONFIG]))
 223           {
 224              if (_prop_change_delay_timer) ecore_timer_del(_prop_change_delay_timer);
 225              _prop_change_delay_timer = ecore_timer_add(0.1, _prop_change_delay_cb, NULL);
 226           }
 227      }
 228    return ECORE_CALLBACK_PASS_ON;
 229 }
 230
 231 #endif
 232
 233 static void
 234 _desc_init(void)
 235 {
 236    Eet_Data_Descriptor_Class eddc;
 237
 238    EET_EINA_FILE_DATA_DESCRIPTOR_CLASS_SET(&eddc, Elm_Config);
 239    eddc.func.str_direct_alloc = NULL;
 240    eddc.func.str_direct_free = NULL;
 241
 242    _config_edd = eet_data_descriptor_file_new(&eddc);
 243    if (!_config_edd)
 244      {
 245         printf("EEEK! eet_data_descriptor_file_new() failed\n");
 246         return;
 247      }
 248
 249    memset(&eddc, 0, sizeof(eddc)); /* just in case... */
 250    EET_EINA_STREAM_DATA_DESCRIPTOR_CLASS_SET(&eddc, Elm_Font_Overlay);
 251    eddc.func.str_direct_alloc = NULL;
 252    eddc.func.str_direct_free = NULL;
 253
 254    _config_font_overlay_edd = eet_data_descriptor_stream_new(&eddc);
 255    if (!_config_font_overlay_edd)
 256      {
 257         printf("EEEK! eet_data_descriptor_stream_new() failed\n");
 258         eet_data_descriptor_free(_config_edd);
 259         return;
 260      }
 261 #define T_INT    EET_T_INT
 262 #define T_DOUBLE EET_T_DOUBLE
 263 #define T_STRING EET_T_STRING
 264 #define T_UCHAR  EET_T_UCHAR
 265
 266 #define T        Elm_Font_Overlay
 267 #define D        _config_font_overlay_edd
 268    ELM_CONFIG_VAL(D, T, text_class, EET_T_STRING);
 269    ELM_CONFIG_VAL(D, T, font, EET_T_STRING);
 270    ELM_CONFIG_VAL(D, T, size, EET_T_INT);
 271 #undef T
 272 #undef D
 273
 274 #define T Elm_Config
 275 #define D _config_edd
 276    ELM_CONFIG_VAL(D, T, config_version, T_INT);
 277    ELM_CONFIG_VAL(D, T, engine, T_STRING);
 278    ELM_CONFIG_VAL(D, T, vsync, T_UCHAR);
 279    ELM_CONFIG_VAL(D, T, thumbscroll_enable, T_UCHAR);
 280    ELM_CONFIG_VAL(D, T, thumbscroll_threshold, T_INT);
 281    ELM_CONFIG_VAL(D, T, thumbscroll_momentum_threshold, T_DOUBLE);
 282    ELM_CONFIG_VAL(D, T, thumbscroll_friction, T_DOUBLE);
 283    ELM_CONFIG_VAL(D, T, thumbscroll_bounce_friction, T_DOUBLE);
 284    ELM_CONFIG_VAL(D, T, thumbscroll_border_friction, T_DOUBLE);
 285    ELM_CONFIG_VAL(D, T, thumbscroll_sensitivity_friction, T_DOUBLE);
 286    ELM_CONFIG_VAL(D, T, page_scroll_friction, T_DOUBLE);
 287    ELM_CONFIG_VAL(D, T, bring_in_scroll_friction, T_DOUBLE);
 288    ELM_CONFIG_VAL(D, T, zoom_friction, T_DOUBLE);
 289    ELM_CONFIG_VAL(D, T, thumbscroll_bounce_enable, T_UCHAR);
 290    ELM_CONFIG_VAL(D, T, scroll_smooth_time_interval, T_DOUBLE);
 291    ELM_CONFIG_VAL(D, T, scroll_smooth_amount, T_DOUBLE);
 292    ELM_CONFIG_VAL(D, T, scroll_smooth_history_weight, T_DOUBLE);
 293    ELM_CONFIG_VAL(D, T, scroll_smooth_future_time, T_DOUBLE);
 294    ELM_CONFIG_VAL(D, T, scroll_smooth_time_window, T_DOUBLE);
 295    ELM_CONFIG_VAL(D, T, scale, T_DOUBLE);
 296    ELM_CONFIG_VAL(D, T, bgpixmap, T_INT);
 297    ELM_CONFIG_VAL(D, T, compositing, T_INT);
 298    /* EET_DATA_DESCRIPTOR_ADD_LIST(D, T, "font_dirs", font_dirs, sub_edd); */
 299    ELM_CONFIG_LIST(D, T, font_overlays, _config_font_overlay_edd);
 300    ELM_CONFIG_VAL(D, T, font_hinting, T_INT);
 301    ELM_CONFIG_VAL(D, T, cache_flush_poll_interval, T_INT);
 302    ELM_CONFIG_VAL(D, T, cache_flush_enable, T_UCHAR);
 303    ELM_CONFIG_VAL(D, T, image_cache, T_INT);
 304    ELM_CONFIG_VAL(D, T, font_cache, T_INT);
 305    ELM_CONFIG_VAL(D, T, edje_cache, T_INT);
 306    ELM_CONFIG_VAL(D, T, edje_collection_cache, T_INT);
 307    ELM_CONFIG_VAL(D, T, finger_size, T_INT);
 308    ELM_CONFIG_VAL(D, T, fps, T_DOUBLE);
 309    ELM_CONFIG_VAL(D, T, theme, T_STRING);
 310    ELM_CONFIG_VAL(D, T, modules, T_STRING);
 311    ELM_CONFIG_VAL(D, T, tooltip_delay, T_DOUBLE);
 312    ELM_CONFIG_VAL(D, T, cursor_engine_only, T_UCHAR);
 313    ELM_CONFIG_VAL(D, T, focus_highlight_enable, T_UCHAR);
 314    ELM_CONFIG_VAL(D, T, focus_highlight_animate, T_UCHAR);
 315    ELM_CONFIG_VAL(D, T, toolbar_shrink_mode, T_INT);
 316    ELM_CONFIG_VAL(D, T, fileselector_expand_enable, T_UCHAR);
 317    ELM_CONFIG_VAL(D, T, inwin_dialogs_enable, T_UCHAR);
 318    ELM_CONFIG_VAL(D, T, icon_size, T_INT);
 319    ELM_CONFIG_VAL(D, T, longpress_timeout, T_DOUBLE);
 320    ELM_CONFIG_VAL(D, T, effect_enable, T_UCHAR);
 321    ELM_CONFIG_VAL(D, T, desktop_entry, T_UCHAR);
 322    ELM_CONFIG_VAL(D, T, password_show_last, T_UCHAR);
 323    ELM_CONFIG_VAL(D, T, password_show_last_timeout, T_DOUBLE);
 324    ELM_CONFIG_VAL(D, T, glayer_zoom_finger_enable, T_UCHAR);
 325    ELM_CONFIG_VAL(D, T, glayer_zoom_finger_factor, T_DOUBLE);
 326    ELM_CONFIG_VAL(D, T, glayer_zoom_wheel_factor, T_DOUBLE);
 327    ELM_CONFIG_VAL(D, T, glayer_zoom_distance_tolerance, T_DOUBLE);
 328    ELM_CONFIG_VAL(D, T, glayer_rotate_finger_enable, T_UCHAR);
 329    ELM_CONFIG_VAL(D, T, glayer_rotate_angular_tolerance, T_DOUBLE);
 330    ELM_CONFIG_VAL(D, T, glayer_line_min_length, T_DOUBLE);
 331    ELM_CONFIG_VAL(D, T, glayer_line_distance_tolerance, T_DOUBLE);
 332    ELM_CONFIG_VAL(D, T, glayer_line_angular_tolerance, T_DOUBLE);
 333    ELM_CONFIG_VAL(D, T, glayer_flick_time_limit_ms, T_INT);
 334    ELM_CONFIG_VAL(D, T, glayer_long_tap_start_timeout, T_DOUBLE);
 335    ELM_CONFIG_VAL(D, T, access_mode, T_INT);
 336    ELM_CONFIG_VAL(D, T, glayer_continues_enable, T_UCHAR);
 337 #undef T
 338 #undef D
 339 #undef T_INT
 340 #undef T_DOUBLE
 341 #undef T_STRING
 342 #undef T_UCHAR
 343 }
 344
 345 static void
 346 _desc_shutdown(void)
 347 {
 348    if (_config_edd)
 349      {
 350         eet_data_descriptor_free(_config_edd);
 351         _config_edd = NULL;
 352      }
 353
 354    if (_config_font_overlay_edd)
 355      {
 356         eet_data_descriptor_free(_config_font_overlay_edd);
 357         _config_font_overlay_edd = NULL;
 358      }
 359 }
 360
 361 static int
 362 _sort_files_cb(const void *f1,
 363                const void *f2)
 364 {
 365    return strcmp(f1, f2);
 366 }
 367
 368 const char *
 369 _elm_config_current_profile_get(void)
 370 {
 371    return _elm_profile;
 372 }
 373
 374 static size_t
 375 _elm_data_dir_snprintf(char       *dst,
 376                        size_t      size,
 377                        const char *fmt,
 378                        ...)
 379 {
 380    size_t data_dir_len, off;
 381    va_list ap;
 382
 383    data_dir_len = eina_strlcpy(dst, _elm_data_dir, size);
 384
 385    off = data_dir_len + 1;
 386    if (off >= size)
 387      goto end;
 388
 389    va_start(ap, fmt);
 390    dst[data_dir_len] = '/';
 391
 392    off = off + vsnprintf(dst + off, size - off, fmt, ap);
 393    va_end(ap);
 394
 395 end:
 396    return off;
 397 }
 398
 399 static size_t
 400 _elm_user_dir_snprintf(char       *dst,
 401                        size_t      size,
 402                        const char *fmt,
 403                        ...)
 404 {
 405    const char *home;
 406    size_t user_dir_len, off;
 407    va_list ap;
 408
 409 #ifdef _WIN32
 410    home = evil_homedir_get();
 411 #else
 412    home = getenv("HOME");
 413 #endif
 414    if (!home)
 415      home = "/";
 416
 417    user_dir_len = eina_str_join_len(dst, size, '/', home, strlen(home),
 418                                     ELEMENTARY_BASE_DIR, sizeof(ELEMENTARY_BASE_DIR) - 1);
 419
 420    off = user_dir_len + 1;
 421    if (off >= size)
 422      goto end;
 423
 424    va_start(ap, fmt);
 425    dst[user_dir_len] = '/';
 426
 427    off = off + vsnprintf(dst + off, size - off, fmt, ap);
 428    va_end(ap);
 429
 430 end:
 431    return off;
 432 }
 433
 434 const char *
 435 _elm_config_profile_dir_get(const char *prof,
 436                             Eina_Bool   is_user)
 437 {
 438    char buf[PATH_MAX];
 439
 440    if (!is_user)
 441      goto not_user;
 442
 443    _elm_user_dir_snprintf(buf, sizeof(buf), "config/%s", prof);
 444
 445    if (ecore_file_is_dir(buf))
 446      return strdup(buf);
 447
 448    return NULL;
 449
 450 not_user:
 451    snprintf(buf, sizeof(buf), "%s/config/%s", _elm_data_dir, prof);
 452
 453    if (ecore_file_is_dir(buf))
 454      return strdup(buf);
 455
 456    return NULL;
 457 }
 458
 459 Eina_List *
 460 _elm_config_font_overlays_list(void)
 461 {
 462    return _elm_config->font_overlays;
 463 }
 464
 465 void
 466 _elm_config_font_overlay_set(const char    *text_class,
 467                              const char    *font,
 468                              Evas_Font_Size size)
 469 {
 470    Elm_Font_Overlay *efd;
 471    Eina_List *l;
 472
 473    EINA_LIST_FOREACH(_elm_config->font_overlays, l, efd)
 474      {
 475         if (strcmp(efd->text_class, text_class))
 476           continue;
 477
 478         if (efd->font) eina_stringshare_del(efd->font);
 479         efd->font = eina_stringshare_add(font);
 480         efd->size = size;
 481         _elm_config->font_overlays =
 482           eina_list_promote_list(_elm_config->font_overlays, l);
 483         return;
 484      }
 485
 486    /* the text class doesn't exist */
 487    efd = calloc(1, sizeof(Elm_Font_Overlay));
 488    efd->text_class = eina_stringshare_add(text_class);
 489    efd->font = eina_stringshare_add(font);
 490    efd->size = size;
 491
 492    _elm_config->font_overlays = eina_list_prepend(_elm_config->font_overlays,
 493                                                   efd);
 494 }
 495
 496 void
 497 _elm_config_font_overlay_remove(const char *text_class)
 498 {
 499    Elm_Font_Overlay *efd;
 500    Eina_List *l;
 501
 502    EINA_LIST_FOREACH(_elm_config->font_overlays, l, efd)
 503      {
 504         if (strcmp(efd->text_class, text_class))
 505           continue;
 506
 507         _elm_config->font_overlays =
 508           eina_list_remove_list(_elm_config->font_overlays, l);
 509         if (efd->text_class) eina_stringshare_del(efd->text_class);
 510         if (efd->font) eina_stringshare_del(efd->font);
 511         free(efd);
 512
 513         return;
 514      }
 515 }
 516
 517 void
 518 _elm_config_font_overlay_apply(void)
 519 {
 520    Elm_Font_Overlay *efd;
 521    Eina_List *l;
 522    int i;
 523
 524    for (i = 0; _elm_text_classes[i].desc; i++)
 525      edje_text_class_del(_elm_text_classes[i].name);
 526
 527    EINA_LIST_FOREACH(_elm_config->font_overlays, l, efd)
 528      edje_text_class_set(efd->text_class, efd->font, efd->size);
 529 }
 530
 531 Eina_List *
 532 _elm_config_text_classes_get(void)
 533 {
 534    Eina_List *ret = NULL;
 535    int i;
 536
 537    for (i = 0; _elm_text_classes[i].desc; i++)
 538      {
 539         Elm_Text_Class *tc;
 540         tc = malloc(sizeof(*tc));
 541
 542         *tc = _elm_text_classes[i];
 543
 544         ret = eina_list_append(ret, tc);
 545      }
 546
 547    return ret;
 548 }
 549
 550 void
 551 _elm_config_text_classes_free(Eina_List *l)
 552 {
 553    Elm_Text_Class *tc;
 554
 555    EINA_LIST_FREE(l, tc)
 556      free(tc);
 557 }
 558
 559 Eina_List *
 560 _elm_config_profiles_list(void)
 561 {
 562    const Eina_File_Direct_Info *info;
 563    Eina_List *flist = NULL;
 564    Eina_Iterator *file_it;
 565    char buf[PATH_MAX];
 566    const char *dir;
 567    size_t len;
 568
 569    len = _elm_user_dir_snprintf(buf, sizeof(buf), "config");
 570
 571    file_it = eina_file_direct_ls(buf);
 572    if (!file_it)
 573      goto sys;
 574
 575    buf[len] = '/';
 576    len++;
 577
 578    len = sizeof(buf) - len;
 579
 580    EINA_ITERATOR_FOREACH(file_it, info)
 581      {
 582         if (info->name_length >= len)
 583           continue;
 584
 585         if (info->type == EINA_FILE_DIR)
 586           {
 587              flist =
 588                eina_list_sorted_insert(flist, _sort_files_cb,
 589                                        eina_stringshare_add(info->path +
 590                                                             info->name_start));
 591           }
 592      }
 593
 594    eina_iterator_free(file_it);
 595
 596 sys:
 597    len = eina_str_join_len(buf, sizeof(buf), '/', _elm_data_dir,
 598                            strlen(_elm_data_dir), "config",
 599                            sizeof("config") - 1);
 600
 601    file_it = eina_file_direct_ls(buf);
 602    if (!file_it)
 603      goto list_free;
 604
 605    buf[len] = '/';
 606    len++;
 607
 608    len = sizeof(buf) - len;
 609    EINA_ITERATOR_FOREACH(file_it, info)
 610      {
 611         if (info->name_length >= len)
 612           continue;
 613
 614         switch (info->type)
 615           {
 616            case EINA_FILE_DIR:
 617            {
 618               const Eina_List *l;
 619               const char *tmp;
 620
 621               EINA_LIST_FOREACH(flist, l, tmp)
 622                 if (!strcmp(info->path + info->name_start, tmp))
 623                   break;
 624
 625               if (!l)
 626                 flist =
 627                   eina_list_sorted_insert(flist, _sort_files_cb,
 628                                           eina_stringshare_add(info->path +
 629                                                                info->name_start));
 630            }
 631            break;
 632
 633            default:
 634              continue;
 635           }
 636      }
 637    eina_iterator_free(file_it);
 638    return flist;
 639
 640 list_free:
 641    EINA_LIST_FREE(flist, dir)
 642      eina_stringshare_del(dir);
 643
 644    return NULL;
 645 }
 646
 647 static void
 648 _profile_fetch_from_conf(void)
 649 {
 650    char buf[PATH_MAX], *p, *s;
 651    Eet_File *ef = NULL;
 652    int len = 0;
 653
 654    _elm_profile = strdup("default");
 655
 656    // if env var - use profile without question
 657    s = getenv("ELM_PROFILE");
 658    if (s)
 659      {
 660         free(_elm_profile);
 661         _elm_profile = strdup(s);
 662         return;
 663      }
 664
 665    // user profile
 666    _elm_user_dir_snprintf(buf, sizeof(buf), "config/profile.cfg");
 667    ef = eet_open(buf, EET_FILE_MODE_READ);
 668    if (ef)
 669      {
 670         p = eet_read(ef, "config", &len);
 671         if (p)
 672           {
 673              free(_elm_profile);
 674              _elm_profile = malloc(len + 1);
 675              memcpy(_elm_profile, p, len);
 676              _elm_profile[len] = 0;
 677              free(p);
 678           }
 679         eet_close(ef);
 680         if (!p) ef = NULL;
 681      }
 682    if (ef) return;
 683
 684    // system profile
 685    _elm_data_dir_snprintf(buf, sizeof(buf), "config/profile.cfg");
 686    ef = eet_open(buf, EET_FILE_MODE_READ);
 687    if (ef)
 688      {
 689         p = eet_read(ef, "config", &len);
 690         if (p)
 691           {
 692              free(_elm_profile);
 693              _elm_profile = malloc(len + 1);
 694              memcpy(_elm_profile, p, len);
 695              _elm_profile[len] = 0;
 696              free(p);
 697           }
 698         eet_close(ef);
 699      }
 700 }
 701
 702 static void
 703 _config_free(void)
 704 {
 705    Elm_Font_Overlay *fo;
 706    const char *fontdir;
 707
 708    if (!_elm_config) return;
 709    EINA_LIST_FREE(_elm_config->font_dirs, fontdir)
 710      {
 711         eina_stringshare_del(fontdir);
 712      }
 713    if (_elm_config->engine) eina_stringshare_del(_elm_config->engine);
 714    EINA_LIST_FREE(_elm_config->font_overlays, fo)
 715      {
 716         if (fo->text_class) eina_stringshare_del(fo->text_class);
 717         if (fo->font) eina_stringshare_del(fo->font);
 718         free(fo);
 719      }
 720    if (_elm_config->theme) eina_stringshare_del(_elm_config->theme);
 721    if (_elm_config->modules) eina_stringshare_del(_elm_config->modules);
 722    free(_elm_config);
 723    _elm_config = NULL;
 724 }
 725
 726 static void
 727 _config_apply(void)
 728 {
 729    _elm_theme_parse(NULL, _elm_config->theme);
 730    ecore_animator_frametime_set(1.0 / _elm_config->fps);
 731 }
 732
 733 static void
 734 _config_sub_apply(void)
 735 {
 736    edje_frametime_set(1.0 / _elm_config->fps);
 737    edje_scale_set(_elm_config->scale);
 738    edje_password_show_last_set(_elm_config->password_show_last);
 739    edje_password_show_last_timeout_set(_elm_config->password_show_last_timeout);
 740    if (_elm_config->modules) _elm_module_parse(_elm_config->modules);
 741 }
 742
 743 static Eina_Bool
 744 _elm_cache_flush_cb(void *data __UNUSED__)
 745 {
 746    elm_all_flush();
 747    return ECORE_CALLBACK_RENEW;
 748 }
 749
 750 /* kind of abusing this call right now -- shared between all of those
 751  * properties -- but they are not meant to be called that periodically
 752  * anyway */
 753 void
 754 _elm_recache(void)
 755 {
 756    Eina_List *l;
 757    Evas_Object *win;
 758
 759    elm_all_flush();
 760
 761    EINA_LIST_FOREACH(_elm_win_list, l, win)
 762      {
 763         Evas *e = evas_object_evas_get(win);
 764         evas_image_cache_set(e, _elm_config->image_cache * 1024);
 765         evas_font_cache_set(e, _elm_config->font_cache * 1024);
 766      }
 767    edje_file_cache_set(_elm_config->edje_cache);
 768    edje_collection_cache_set(_elm_config->edje_collection_cache);
 769
 770    if (_elm_cache_flush_poller)
 771      {
 772         ecore_poller_del(_elm_cache_flush_poller);
 773         _elm_cache_flush_poller = NULL;
 774      }
 775    if (_elm_config->cache_flush_enable)
 776      {
 777         if (_elm_config->cache_flush_poll_interval > 0)
 778           {
 779              _elm_cache_flush_poller =
 780                 ecore_poller_add(ECORE_POLLER_CORE,
 781                                  _elm_config->cache_flush_poll_interval,
 782                                  _elm_cache_flush_cb, NULL);
 783           }
 784      }
 785 }
 786
 787 static Elm_Config *
 788 _config_user_load(void)
 789 {
 790    Elm_Config *cfg = NULL;
 791    Eet_File *ef;
 792    char buf[PATH_MAX];
 793
 794    _elm_user_dir_snprintf(buf, sizeof(buf), "config/%s/base.cfg",
 795                           _elm_profile);
 796
 797    ef = eet_open(buf, EET_FILE_MODE_READ);
 798    if (ef)
 799      {
 800         cfg = eet_data_read(ef, _config_edd, "config");
 801         eet_close(ef);
 802      }
 803    return cfg;
 804 }
 805
 806 static Elm_Config *
 807 _config_system_load(void)
 808 {
 809    Elm_Config *cfg = NULL;
 810    Eet_File *ef;
 811    char buf[PATH_MAX];
 812
 813    _elm_data_dir_snprintf(buf, sizeof(buf), "config/%s/base.cfg",
 814                           _elm_profile);
 815
 816    ef = eet_open(buf, EET_FILE_MODE_READ);
 817    if (ef)
 818      {
 819         cfg = eet_data_read(ef, _config_edd, "config");
 820         eet_close(ef);
 821      }
 822    return cfg;
 823 }
 824
 825 static void
 826 _config_load(void)
 827 {
 828    _elm_config = _config_user_load();
 829    if (_elm_config)
 830      {
 831         if (_elm_config->config_version < ELM_CONFIG_VERSION)
 832           _config_update();
 833         return;
 834      }
 835
 836    /* no user config, fallback for system. No need to check version for
 837     * this one, if it's not the right one, someone screwed up at the time
 838     * of installing it */
 839    _elm_config = _config_system_load();
 840    if (_elm_config) return;
 841    /* FIXME: config load could have failed because of a non-existent
 842     * profile. Fallback to default before moving on */
 843
 844    // config load fail - defaults
 845    /* XXX: do these make sense? Only if it's valid to install the lib
 846     * without the config, but do we want that? */
 847    _elm_config = ELM_NEW(Elm_Config);
 848    _elm_config->config_version = ELM_CONFIG_VERSION;
 849    _elm_config->engine = eina_stringshare_add("software_x11");
 850    _elm_config->vsync = 0;
 851    _elm_config->thumbscroll_enable = EINA_TRUE;
 852    _elm_config->thumbscroll_threshold = 24;
 853    _elm_config->thumbscroll_momentum_threshold = 100.0;
 854    _elm_config->thumbscroll_friction = 1.0;
 855    _elm_config->thumbscroll_bounce_friction = 0.5;
 856    _elm_config->thumbscroll_bounce_enable = EINA_TRUE;
 857    _elm_config->page_scroll_friction = 0.5;
 858    _elm_config->bring_in_scroll_friction = 0.5;
 859    _elm_config->zoom_friction = 0.5;
 860    _elm_config->thumbscroll_border_friction = 0.5;
 861    _elm_config->thumbscroll_sensitivity_friction = 0.25; // magic number! just trial and error shows this makes it behave "nicer" and not run off at high speed all the time
 862    _elm_config->scroll_smooth_time_interval = 0.008;
 863    _elm_config->scroll_smooth_amount = 1.0;
 864    _elm_config->scroll_smooth_history_weight = 0.3;
 865    _elm_config->scroll_smooth_future_time = 0.0;
 866    _elm_config->scroll_smooth_time_window = 0.2;
 867    _elm_config->scale = 1.0;
 868    _elm_config->bgpixmap = 0;
 869    _elm_config->compositing = 1;
 870    _elm_config->font_hinting = 2;
 871    _elm_config->cache_flush_poll_interval = 512;
 872    _elm_config->cache_flush_enable = EINA_TRUE;
 873    _elm_config->font_dirs = NULL;
 874    _elm_config->image_cache = 4096;
 875    _elm_config->font_cache = 512;
 876    _elm_config->edje_cache = 32;
 877    _elm_config->edje_collection_cache = 64;
 878    _elm_config->finger_size = 40;
 879    _elm_config->fps = 60.0;
 880    _elm_config->theme = eina_stringshare_add("default");
 881    _elm_config->modules = NULL;
 882    _elm_config->tooltip_delay = 1.0;
 883    _elm_config->cursor_engine_only = EINA_TRUE;
 884    _elm_config->focus_highlight_enable = EINA_FALSE;
 885    _elm_config->focus_highlight_animate = EINA_TRUE;
 886    _elm_config->toolbar_shrink_mode = 2;
 887    _elm_config->fileselector_expand_enable = EINA_FALSE;
 888    _elm_config->inwin_dialogs_enable = EINA_FALSE;
 889    _elm_config->icon_size = 32;
 890    _elm_config->longpress_timeout = 1.0;
 891    _elm_config->effect_enable = EINA_TRUE;
 892    _elm_config->desktop_entry = EINA_FALSE;
 893    _elm_config->is_mirrored = EINA_FALSE; /* Read sys value in env_get() */
 894    _elm_config->password_show_last = EINA_FALSE;
 895    _elm_config->password_show_last_timeout = 2.0;
 896    _elm_config->glayer_zoom_finger_enable = EINA_TRUE;
 897    _elm_config->glayer_zoom_finger_factor = 1.0;
 898    _elm_config->glayer_zoom_wheel_factor = 0.05;
 899    _elm_config->glayer_zoom_distance_tolerance = 1.0; /* 1 times elm_finger_size_get() */
 900    _elm_config->glayer_rotate_finger_enable = EINA_TRUE;
 901    _elm_config->glayer_rotate_angular_tolerance = 2.0; /* 2 DEG */
 902    _elm_config->glayer_line_min_length = 1.0;         /* 1 times elm_finger_size_get() */
 903    _elm_config->glayer_line_distance_tolerance = 3.0; /* 3 times elm_finger_size_get() */
 904    _elm_config->glayer_line_angular_tolerance = 20.0; /* 20 DEG */
 905    _elm_config->glayer_flick_time_limit_ms = 120;              /* ms to finish flick */
 906    _elm_config->glayer_long_tap_start_timeout = 1.2;   /* 1.2 second to start long-tap */
 907    _elm_config->glayer_continues_enable = EINA_TRUE;      /* Continue gestures default */
 908 }
 909
 910 static const char *
 911 _elm_config_eet_close_error_get(Eet_File *ef,
 912                                 char     *file)
 913 {
 914    Eet_Error err;
 915    const char *erstr = NULL;
 916
 917    err = eet_close(ef);
 918    switch (err)
 919      {
 920       case EET_ERROR_WRITE_ERROR:
 921         erstr = "An error occurred while saving Elementary's "
 922                 "settings to disk. The error could not be "
 923                 "deterimined. The file where the error occurred was: "
 924                 "%s. This file has been deleted to avoid corrupt data.";
 925         break;
 926
 927       case EET_ERROR_WRITE_ERROR_FILE_TOO_BIG:
 928         erstr = "Elementary's settings files are too big "
 929                 "for the file system they are being saved to. "
 930                 "This error is very strange as the files should "
 931                 "be extremely small. Please check the settings "
 932                 "for your home directory. "
 933                 "The file where the error occurred was: %s ."
 934                 "This file has been deleted to avoid corrupt data.";
 935         break;
 936
 937       case EET_ERROR_WRITE_ERROR_IO_ERROR:
 938         erstr = "An output error occurred when writing the settings "
 939                 "files for Elementary. Your disk is having troubles "
 940                 "and possibly needs replacement. "
 941                 "The file where the error occurred was: %s ."
 942                 "This file has been deleted to avoid corrupt data.";
 943         break;
 944
 945       case EET_ERROR_WRITE_ERROR_OUT_OF_SPACE:
 946         erstr = "Elementary cannot write its settings file "
 947                 "because it ran out of space to write the file. "
 948                 "You have either run out of disk space or have "
 949                 "gone over your quota limit. "
 950                 "The file where the error occurred was: %s ."
 951                 "This file has been deleted to avoid corrupt data.";
 952         break;
 953
 954       case EET_ERROR_WRITE_ERROR_FILE_CLOSED:
 955         erstr = "Elementary unexpectedly had the settings file "
 956                 "it was writing closed on it. This is very unusual. "
 957                 "The file where the error occurred was: %s "
 958                 "This file has been deleted to avoid corrupt data.";
 959         break;
 960
 961       default:
 962         break;
 963      }
 964    if (erstr)
 965      {
 966         /* delete any partially-written file */
 967          ecore_file_unlink(file);
 968          return strdup(erstr);
 969      }
 970
 971    return NULL;
 972 }
 973
 974 static Eina_Bool
 975 _elm_config_profile_save(void)
 976 {
 977    char buf[4096], buf2[4096];
 978    int ok = 0, ret;
 979    const char *err;
 980    Eet_File *ef;
 981    size_t len;
 982
 983    len = _elm_user_dir_snprintf(buf, sizeof(buf), "config/profile.cfg");
 984    if (len + 1 >= sizeof(buf))
 985      return EINA_FALSE;
 986
 987    len = _elm_user_dir_snprintf(buf2, sizeof(buf2), "config/profile.cfg.tmp");
 988    if (len + 1 >= sizeof(buf2))
 989      return EINA_FALSE;
 990
 991    ef = eet_open(buf2, EET_FILE_MODE_WRITE);
 992    if (!ef)
 993      return EINA_FALSE;
 994
 995    ok = eet_write(ef, "config", _elm_profile, strlen(_elm_profile), 0);
 996    if (!ok)
 997      goto err;
 998
 999    err = _elm_config_eet_close_error_get(ef, buf2);
1000    if (err)
1001      {
1002         ERR("%s", err);
1003         free((void *)err);
1004         goto err;
1005      }
1006
1007    ret = ecore_file_mv(buf2, buf);
1008    if (!ret)
1009      {
1010         ERR("Error saving Elementary's configuration file");
1011         goto err;
1012      }
1013
1014    ecore_file_unlink(buf2);
1015    return EINA_TRUE;
1016
1017 err:
1018    ecore_file_unlink(buf2);
1019    return EINA_FALSE;
1020 }
1021
1022 Eina_Bool
1023 _elm_config_save(void)
1024 {
1025    char buf[4096], buf2[4096];
1026    int ok = 0, ret;
1027    const char *err;
1028    Eet_File *ef;
1029    size_t len;
1030
1031    len = _elm_user_dir_snprintf(buf, sizeof(buf), "config/%s", _elm_profile);
1032    if (len + 1 >= sizeof(buf))
1033      return EINA_FALSE;
1034
1035    ok = ecore_file_mkpath(buf);
1036    if (!ok)
1037      {
1038         ERR("Problem acessing Elementary's user configuration directory: %s",
1039             buf);
1040         return EINA_FALSE;
1041      }
1042
1043    if (!_elm_config_profile_save())
1044      return EINA_FALSE;
1045
1046    buf[len] = '/';
1047    len++;
1048
1049    if (len + sizeof("base.cfg") >= sizeof(buf) - len)
1050      return EINA_FALSE;
1051
1052    memcpy(buf + len, "base.cfg", sizeof("base.cfg"));
1053    len += sizeof("base.cfg") - 1;
1054
1055    if (len + sizeof(".tmp") >= sizeof(buf))
1056      return EINA_FALSE;
1057
1058    memcpy(buf2, buf, len);
1059    memcpy(buf2 + len, ".tmp", sizeof(".tmp"));
1060
1061    ef = eet_open(buf2, EET_FILE_MODE_WRITE);
1062    if (!ef)
1063      return EINA_FALSE;
1064
1065    ok = eet_data_write(ef, _config_edd, "config", _elm_config, 1);
1066    if (!ok)
1067      goto err;
1068
1069    err = _elm_config_eet_close_error_get(ef, buf2);
1070    if (err)
1071      {
1072         ERR("%s", err);
1073         free((void *)err);
1074         goto err;
1075      }
1076
1077    ret = ecore_file_mv(buf2, buf);
1078    if (!ret)
1079      {
1080         ERR("Error saving Elementary's configuration file");
1081         goto err;
1082      }
1083
1084    ecore_file_unlink(buf2);
1085    return EINA_TRUE;
1086
1087 err:
1088    ecore_file_unlink(buf2);
1089    return EINA_FALSE;
1090 }
1091
1092 static void
1093 _config_update(void)
1094 {
1095    Elm_Config *tcfg;
1096
1097    tcfg = _config_system_load();
1098    if (!tcfg)
1099      {
1100         /* weird profile or something? We should probably fill
1101          * with hardcoded defaults, or get from default previx */
1102           return;
1103      }
1104 #define IFCFG(v)   if ((_elm_config->config_version & 0xffff) < (v)) {
1105 #define IFCFGELSE } else {
1106 #define IFCFGEND  }
1107 #define COPYVAL(x) do {_elm_config->x = tcfg->x; } while(0)
1108 #define COPYPTR(x) do {_elm_config->x = tcfg->x; tcfg->x = NULL; } while(0)
1109 #define COPYSTR(x) COPYPTR(x)
1110
1111      /* we also need to update for property changes in the root window
1112       * if needed, but that will be dependent on new properties added
1113       * with each version */
1114
1115      IFCFG(0x0003);
1116      COPYVAL(longpress_timeout);
1117      IFCFGEND;
1118
1119 #undef COPYSTR
1120 #undef COPYPTR
1121 #undef COPYVAL
1122 #undef IFCFGEND
1123 #undef IFCFGELSE
1124 #undef IFCFG
1125
1126      /* after updating user config, we must save */
1127 }
1128
1129 static void
1130 _env_get(void)
1131 {
1132    char *s;
1133    double friction;
1134
1135    s = getenv("ELM_ENGINE");
1136    if (s)
1137      {
1138         if ((!strcasecmp(s, "x11")) ||
1139             (!strcasecmp(s, "x")) ||
1140             (!strcasecmp(s, "software-x11")) ||
1141             (!strcasecmp(s, "software_x11")))
1142           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_X11);
1143         else if ((!strcasecmp(s, "opengl")) ||
1144                  (!strcasecmp(s, "gl")) ||
1145                  (!strcasecmp(s, "opengl-x11")) ||
1146                  (!strcasecmp(s, "opengl_x11")))
1147           eina_stringshare_replace(&_elm_config->engine, ELM_OPENGL_X11);
1148         else if ((!strcasecmp(s, "x11-8")) ||
1149                  (!strcasecmp(s, "x8")) ||
1150                  (!strcasecmp(s, "software-8-x11")) ||
1151                  (!strcasecmp(s, "software_8_x11")))
1152           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_8_X11);
1153         else if ((!strcasecmp(s, "x11-16")) ||
1154                  (!strcasecmp(s, "x16")) ||
1155                  (!strcasecmp(s, "software-16-x11")) ||
1156                  (!strcasecmp(s, "software_16_x11")))
1157           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_16_X11);
1158 /*
1159         else if ((!strcasecmp(s, "xrender")) ||
1160                  (!strcasecmp(s, "xr")) ||
1161                  (!strcasecmp(s, "xrender-x11")) ||
1162                  (!strcasecmp(s, "xrender_x11")))
1163           eina_stringshare_replace(&_elm_config->engine, ELM_XRENDER_X11);
1164  */
1165         else if ((!strcasecmp(s, "fb")) ||
1166                  (!strcasecmp(s, "software-fb")) ||
1167                  (!strcasecmp(s, "software_fb")))
1168           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_FB);
1169         else if ((!strcasecmp(s, "directfb")) ||
1170                  (!strcasecmp(s, "dfb")))
1171           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_DIRECTFB);
1172         else if ((!strcasecmp(s, "psl1ght")))
1173           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_PSL1GHT);
1174         else if ((!strcasecmp(s, "sdl")) ||
1175                  (!strcasecmp(s, "software-sdl")) ||
1176                  (!strcasecmp(s, "software_sdl")))
1177           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_SDL);
1178         else if ((!strcasecmp(s, "sdl-16")) ||
1179                  (!strcasecmp(s, "software-16-sdl")) ||
1180                  (!strcasecmp(s, "software_16_sdl")))
1181           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_16_SDL);
1182         else if ((!strcasecmp(s, "opengl-sdl")) ||
1183                  (!strcasecmp(s, "opengl_sdl")) ||
1184                  (!strcasecmp(s, "gl-sdl")) ||
1185                  (!strcasecmp(s, "gl_sdl")))
1186           eina_stringshare_replace(&_elm_config->engine, ELM_OPENGL_SDL);
1187         else if ((!strcasecmp(s, "opengl-cocoa")) ||
1188                  (!strcasecmp(s, "opengl_cocoa")) ||
1189                  (!strcasecmp(s, "gl-cocoa")) ||
1190                  (!strcasecmp(s, "gl_cocoa")))
1191           eina_stringshare_replace(&_elm_config->engine, ELM_OPENGL_COCOA);
1192         else if ((!strcasecmp(s, "gdi")) ||
1193                  (!strcasecmp(s, "software-gdi")) ||
1194                  (!strcasecmp(s, "software_gdi")))
1195           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_WIN32);
1196         else if ((!strcasecmp(s, "wince-gdi")) ||
1197                  (!strcasecmp(s, "software-16-wince-gdi")) ||
1198                  (!strcasecmp(s, "software_16_wince_gdi")))
1199           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_16_WINCE);
1200         else if (!strcasecmp(s, "buffer"))
1201           eina_stringshare_replace(&_elm_config->engine, ELM_BUFFER);
1202         else if ((!strncmp(s, "shot:", 5)))
1203           eina_stringshare_replace(&_elm_config->engine, s);
1204         else if ((!strcasecmp(s, "ews")))
1205           eina_stringshare_replace(&_elm_config->engine, ELM_EWS);
1206         else if ((!strcasecmp(s, "wayland_shm")))
1207           eina_stringshare_replace(&_elm_config->engine, ELM_WAYLAND_SHM);
1208         else if ((!strcasecmp(s, "wayland_egl")))
1209           eina_stringshare_replace(&_elm_config->engine, ELM_WAYLAND_EGL);
1210         else
1211           ERR("Unknown engine '%s'.", s);
1212      }
1213
1214    s = getenv("ELM_VSYNC");
1215    if (s) _elm_config->vsync = !!atoi(s);
1216
1217    s = getenv("ELM_THUMBSCROLL_ENABLE");
1218    if (s) _elm_config->thumbscroll_enable = !!atoi(s);
1219    s = getenv("ELM_THUMBSCROLL_THRESHOLD");
1220    if (s) _elm_config->thumbscroll_threshold = atoi(s);
1221    // FIXME: floatformat locale issues here 1.0 vs 1,0 - should just be 1.0
1222    s = getenv("ELM_THUMBSCROLL_MOMENTUM_THRESHOLD");
1223    if (s) _elm_config->thumbscroll_momentum_threshold = atof(s);
1224    s = getenv("ELM_THUMBSCROLL_FRICTION");
1225    if (s) _elm_config->thumbscroll_friction = atof(s);
1226    s = getenv("ELM_THUMBSCROLL_BOUNCE_ENABLE");
1227    if (s) _elm_config->thumbscroll_bounce_enable = !!atoi(s);
1228    s = getenv("ELM_THUMBSCROLL_BOUNCE_FRICTION");
1229    if (s) _elm_config->thumbscroll_bounce_friction = atof(s);
1230    s = getenv("ELM_PAGE_SCROLL_FRICTION");
1231    if (s) _elm_config->page_scroll_friction = atof(s);
1232    s = getenv("ELM_BRING_IN_SCROLL_FRICTION");
1233    if (s) _elm_config->bring_in_scroll_friction = atof(s);
1234    s = getenv("ELM_ZOOM_FRICTION");
1235    if (s) _elm_config->zoom_friction = atof(s);
1236    s = getenv("ELM_THUMBSCROLL_BORDER_FRICTION");
1237    if (s)
1238      {
1239         friction = atof(s);
1240         if (friction < 0.0)
1241           friction = 0.0;
1242
1243         if (friction > 1.0)
1244           friction = 1.0;
1245
1246         _elm_config->thumbscroll_border_friction = friction;
1247      }
1248    s = getenv("ELM_THUMBSCROLL_SENSITIVITY_FRICTION");
1249    if (s)
1250      {
1251         friction = atof(s);
1252         if (friction < 0.1)
1253           friction = 0.1;
1254
1255         if (friction > 1.0)
1256           friction = 1.0;
1257
1258         _elm_config->thumbscroll_sensitivity_friction = friction;
1259      }
1260    s = getenv("ELM_SCROLL_SMOOTH_TIME_INTERVAL");
1261    if (s) _elm_config->scroll_smooth_time_interval = atof(s);
1262    s = getenv("ELM_SCROLL_SMOOTH_AMOUNT");
1263    if (s) _elm_config->scroll_smooth_amount = atof(s);
1264    s = getenv("ELM_SCROLL_SMOOTH_HISTORY_WEIGHT");
1265    if (s) _elm_config->scroll_smooth_history_weight = atof(s);
1266    s = getenv("ELM_SCROLL_SMOOTH_FUTURE_TIME");
1267    if (s) _elm_config->scroll_smooth_future_time = atof(s);
1268    s = getenv("ELM_SCROLL_SMOOTH_TIME_WINDOW");
1269    if (s) _elm_config->scroll_smooth_time_window = atof(s);
1270    s = getenv("ELM_THEME");
1271    if (s) eina_stringshare_replace(&_elm_config->theme, s);
1272
1273    s = getenv("ELM_FONT_HINTING");
1274    if (s)
1275      {
1276         if      (!strcasecmp(s, "none")) _elm_config->font_hinting = 0;
1277         else if (!strcasecmp(s, "auto"))
1278           _elm_config->font_hinting = 1;
1279         else if (!strcasecmp(s, "bytecode"))
1280           _elm_config->font_hinting = 2;
1281      }
1282
1283    s = getenv("ELM_FONT_PATH");
1284    if (s)
1285      {
1286         const char *p, *pp;
1287         char *buf2;
1288
1289         EINA_LIST_FREE(_elm_config->font_dirs, p)
1290           {
1291              eina_stringshare_del(p);
1292           }
1293
1294         buf2 = alloca(strlen(s) + 1);
1295         p = s;
1296         pp = p;
1297         for (;; )
1298           {
1299              if ((*p == ':') || (*p == 0))
1300                {
1301                   int len;
1302
1303                   len = p - pp;
1304                   strncpy(buf2, pp, len);
1305                   buf2[len] = 0;
1306                   _elm_config->font_dirs =
1307                     eina_list_append(_elm_config->font_dirs,
1308                                      eina_stringshare_add(buf2));
1309                   if (*p == 0) break;
1310                   p++;
1311                   pp = p;
1312                }
1313              else
1314                {
1315                   if (*p == 0) break;
1316                   p++;
1317                }
1318           }
1319      }
1320
1321    s = getenv("ELM_IMAGE_CACHE");
1322    if (s) _elm_config->image_cache = atoi(s);
1323
1324    s = getenv("ELM_FONT_CACHE");
1325    if (s) _elm_config->font_cache = atoi(s);
1326
1327    s = getenv("ELM_SCALE");
1328    if (s) _elm_config->scale = atof(s);
1329
1330    s = getenv("ELM_FINGER_SIZE");
1331    if (s) _elm_config->finger_size = atoi(s);
1332
1333    s = getenv("ELM_PASSWORD_SHOW_LAST");
1334    if (s) _elm_config->password_show_last = !!atoi(s);
1335
1336    s = getenv("ELM_PASSWORD_SHOW_LAST_TIMEOUT");
1337    if (s)
1338      {
1339         double pw_show_last_timeout = atof(s);
1340         if (pw_show_last_timeout >= 0.0)
1341           _elm_config->password_show_last_timeout = pw_show_last_timeout;
1342      }
1343
1344    s = getenv("ELM_FPS");
1345    if (s) _elm_config->fps = atof(s);
1346    if (_elm_config->fps < 1.0) _elm_config->fps = 1.0;
1347
1348    s = getenv("ELM_MODULES");
1349    if (s) eina_stringshare_replace(&_elm_config->modules, s);
1350
1351    /* Get RTL orientation from system */
1352    setlocale(LC_ALL, "");
1353    bindtextdomain(PACKAGE, LOCALE_DIR);
1354    _elm_config->is_mirrored = !strcmp(E_("default:LTR"), "default:RTL");
1355
1356    s = getenv("ELM_TOOLTIP_DELAY");
1357    if (s)
1358      {
1359         double delay = atof(s);
1360         if (delay >= 0.0)
1361           _elm_config->tooltip_delay = delay;
1362      }
1363
1364    s = getenv("ELM_CURSOR_ENGINE_ONLY");
1365    if (s) _elm_config->cursor_engine_only = !!atoi(s);
1366
1367    s = getenv("ELM_FOCUS_HIGHLIGHT_ENABLE");
1368    if (s) _elm_config->focus_highlight_enable = !!atoi(s);
1369
1370    s = getenv("ELM_FOCUS_HIGHLIGHT_ANIMATE");
1371    if (s) _elm_config->focus_highlight_animate = !!atoi(s);
1372
1373    s = getenv("ELM_TOOLBAR_SHRINK_MODE");
1374    if (s) _elm_config->toolbar_shrink_mode = atoi(s);
1375
1376    s = getenv("ELM_FILESELECTOR_EXPAND_ENABLE");
1377    if (s) _elm_config->fileselector_expand_enable = !!atoi(s);
1378
1379    s = getenv("ELM_INWIN_DIALOGS_ENABLE");
1380    if (s) _elm_config->inwin_dialogs_enable = !!atoi(s);
1381
1382    s = getenv("ELM_ICON_SIZE");
1383    if (s) _elm_config->icon_size = atoi(s);
1384
1385    s = getenv("ELM_LONGPRESS_TIMEOUT");
1386    if (s) _elm_config->longpress_timeout = atof(s);
1387    if (_elm_config->longpress_timeout < 0.0)
1388      _elm_config->longpress_timeout = 0.0;
1389
1390    s = getenv("ELM_EFFECT_ENABLE");
1391    if (s) _elm_config->effect_enable = !!atoi(s);
1392
1393    s = getenv("ELM_DESKTOP_ENTRY");
1394    if (s) _elm_config->desktop_entry = !!atoi(s);
1395    s = getenv("ELM_ACCESS_MODE");
1396    if (s) _elm_config->access_mode = ELM_ACCESS_MODE_ON;
1397 }
1398
1399 EAPI Eina_Bool
1400 elm_mirrored_get(void)
1401 {
1402    return _elm_config->is_mirrored;
1403 }
1404
1405 EAPI void
1406 elm_mirrored_set(Eina_Bool mirrored)
1407 {
1408    _elm_config->is_mirrored = mirrored;
1409    _elm_rescale();
1410 }
1411
1412 static void
1413 _translation_init()
1414 {
1415 #ifdef ENABLE_NLS
1416    const char *cur_dom = textdomain(NULL);
1417    const char *trans_comment = gettext("");
1418    const char *msg_locale = setlocale(LC_MESSAGES, NULL);
1419
1420    /* Same concept as what glib does:
1421     * We shouldn't translate if there are no translations for the
1422     * application in the current locale + domain. (Unless locale is
1423     * en_/C where translating only parts of the interface make some
1424     * sense).
1425     */
1426    _elm_config->translate = !(strcmp (cur_dom, "messages") &&
1427          !*trans_comment && strncmp (msg_locale, "en_", 3) &&
1428          strcmp (msg_locale, "C"));
1429 #endif
1430 }
1431
1432 void
1433 _elm_config_init(void)
1434 {
1435    if (!ELM_EVENT_CONFIG_ALL_CHANGED)
1436       ELM_EVENT_CONFIG_ALL_CHANGED = ecore_event_type_new();
1437    _desc_init();
1438    _profile_fetch_from_conf();
1439    _config_load();
1440    _translation_init();
1441    _env_get();
1442    _config_apply();
1443    _elm_config_font_overlay_apply();
1444    _elm_recache();
1445 }
1446
1447 void
1448 _elm_config_sub_shutdown(void)
1449 {
1450 #define ENGINE_COMPARE(name) (!strcmp(_elm_config->engine, name))
1451    if (ENGINE_COMPARE(ELM_SOFTWARE_X11) ||
1452        ENGINE_COMPARE(ELM_SOFTWARE_16_X11) ||
1453        ENGINE_COMPARE(ELM_XRENDER_X11) ||
1454        ENGINE_COMPARE(ELM_OPENGL_X11) ||
1455        ENGINE_COMPARE(ELM_OPENGL_COCOA))
1456 #undef ENGINE_COMPARE
1457      {
1458 #ifdef HAVE_ELEMENTARY_X
1459         ecore_x_disconnect();
1460 #endif
1461      }
1462 }
1463
1464 void
1465 _elm_config_sub_init(void)
1466 {
1467    // NOTE: Do not merge upstream code. Just leave it.
1468    _env_get();
1469    _config_apply();
1470    _elm_config_font_overlay_apply();
1471    _elm_recache();
1472 #define ENGINE_COMPARE(name) (!strcmp(_elm_config->engine, name))
1473    if (ENGINE_COMPARE(ELM_SOFTWARE_X11) ||
1474        ENGINE_COMPARE(ELM_SOFTWARE_16_X11) ||
1475        ENGINE_COMPARE(ELM_XRENDER_X11) ||
1476        ENGINE_COMPARE(ELM_OPENGL_X11) ||
1477        ENGINE_COMPARE(ELM_OPENGL_COCOA))
1478 #undef ENGINE_COMPARE
1479      {
1480 #ifdef HAVE_ELEMENTARY_X
1481         if (!ecore_x_init(NULL))
1482           {
1483              ERR("Cannot connect to X11 display. check $DISPLAY variable");
1484              exit(1);
1485           }
1486         _root_1st = ecore_x_window_root_first_get();
1487
1488         if (!ecore_x_screen_is_composited(0))
1489           _elm_config->compositing = 0;
1490
1491         ecore_x_atoms_get(_atom_names, ATOM_COUNT, _atom);
1492         ecore_x_event_mask_set(_root_1st,
1493                                ECORE_X_EVENT_MASK_WINDOW_PROPERTY);
1494         _prop_change_handler = ecore_event_handler_add
1495             (ECORE_X_EVENT_WINDOW_PROPERTY, _prop_change, NULL);
1496         if (!getenv("ELM_PROFILE"))
1497           {
1498              char *s;
1499
1500              s = ecore_x_window_prop_string_get(_root_1st,
1501                                                 _atom[ATOM_E_PROFILE]);
1502              if (s)
1503                {
1504                   int changed = 0;
1505
1506                   if (_elm_profile)
1507                     {
1508                        if (strcmp(_elm_profile, s)) changed = 1;
1509                        free(_elm_profile);
1510                     }
1511                   _elm_profile = s;
1512                   if (changed) _prop_config_get();
1513                }
1514           }
1515 #endif
1516      }
1517    _config_sub_apply();
1518 }
1519
1520 void
1521 _elm_config_reload(void)
1522 {
1523    _config_free();
1524    _config_load();
1525    _config_apply();
1526    _elm_config_font_overlay_apply();
1527    _elm_rescale();
1528    _elm_recache();
1529 }
1530
1531 void
1532 _elm_config_engine_set(const char *engine)
1533 {
1534    if (_elm_config->engine && strcmp(_elm_config->engine, engine))
1535      eina_stringshare_del(_elm_config->engine);
1536
1537    _elm_config->engine = eina_stringshare_add(engine);
1538 }
1539
1540 void
1541 _elm_config_all_update(void)
1542 {
1543 #ifdef HAVE_ELEMENTARY_X
1544    if (_prop_all_update_timer) ecore_timer_del(_prop_all_update_timer);
1545    _prop_all_update_timer = ecore_timer_add(0.1, _prop_all_update_cb, NULL);
1546    _prop_config_set();
1547    ecore_x_window_prop_string_set(_root_1st, _atom[ATOM_E_PROFILE],
1548                                   _elm_profile);
1549 #endif
1550 }
1551
1552 void
1553 _elm_config_profile_set(const char *profile)
1554 {
1555    Eina_Bool changed = EINA_FALSE;
1556
1557    if (_elm_profile)
1558      {
1559         if (strcmp(_elm_profile, profile))
1560           changed = 1;
1561         free(_elm_profile);
1562      }
1563
1564    _elm_profile = strdup(profile);
1565
1566    if (changed)
1567      {
1568         _config_free();
1569         _config_load();
1570         _config_apply();
1571         _elm_config_font_overlay_apply();
1572         _elm_rescale();
1573         _elm_recache();
1574      }
1575 }
1576
1577 void
1578 _elm_config_shutdown(void)
1579 {
1580 #ifdef HAVE_ELEMENTARY_X
1581    if (_prop_all_update_timer)
1582      {
1583         ecore_timer_del(_prop_all_update_timer);
1584         _prop_all_update_cb(NULL);
1585      }
1586    _prop_all_update_timer = NULL;
1587    if (_prop_change_delay_timer) ecore_timer_del(_prop_change_delay_timer);
1588    _prop_change_delay_timer = NULL;
1589 #endif
1590
1591 #define ENGINE_COMPARE(name) (!strcmp(_elm_config->engine, name))
1592    if (ENGINE_COMPARE(ELM_SOFTWARE_X11) ||
1593        ENGINE_COMPARE(ELM_SOFTWARE_16_X11) ||
1594        ENGINE_COMPARE(ELM_XRENDER_X11) ||
1595        ENGINE_COMPARE(ELM_OPENGL_X11))
1596 #undef ENGINE_COMPARE
1597      {
1598 #ifdef HAVE_ELEMENTARY_X
1599         ecore_event_handler_del(_prop_change_handler);
1600         _prop_change_handler = NULL;
1601 #endif
1602      }
1603    _config_free();
1604    if (_elm_profile)
1605      {
1606         free(_elm_profile);
1607         _elm_profile = NULL;
1608      }
1609    _desc_shutdown();
1610 }
1611