Remove deprecated API.
[framework/uifw/elementary.git] / 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_amount, T_DOUBLE);
291    ELM_CONFIG_VAL(D, T, scroll_smooth_history_weight, T_DOUBLE);
292    ELM_CONFIG_VAL(D, T, scroll_smooth_future_time, T_DOUBLE);
293    ELM_CONFIG_VAL(D, T, scroll_smooth_time_window, T_DOUBLE);
294    ELM_CONFIG_VAL(D, T, scale, T_DOUBLE);
295    ELM_CONFIG_VAL(D, T, bgpixmap, T_INT);
296    ELM_CONFIG_VAL(D, T, compositing, T_INT);
297    /* EET_DATA_DESCRIPTOR_ADD_LIST(D, T, "font_dirs", font_dirs, sub_edd); */
298    ELM_CONFIG_LIST(D, T, font_overlays, _config_font_overlay_edd);
299    ELM_CONFIG_VAL(D, T, font_hinting, T_INT);
300    ELM_CONFIG_VAL(D, T, cache_flush_poll_interval, T_INT);
301    ELM_CONFIG_VAL(D, T, cache_flush_enable, T_UCHAR);
302    ELM_CONFIG_VAL(D, T, image_cache, T_INT);
303    ELM_CONFIG_VAL(D, T, font_cache, T_INT);
304    ELM_CONFIG_VAL(D, T, edje_cache, T_INT);
305    ELM_CONFIG_VAL(D, T, edje_collection_cache, T_INT);
306    ELM_CONFIG_VAL(D, T, finger_size, T_INT);
307    ELM_CONFIG_VAL(D, T, fps, T_DOUBLE);
308    ELM_CONFIG_VAL(D, T, theme, T_STRING);
309    ELM_CONFIG_VAL(D, T, modules, T_STRING);
310    ELM_CONFIG_VAL(D, T, tooltip_delay, T_DOUBLE);
311    ELM_CONFIG_VAL(D, T, cursor_engine_only, T_UCHAR);
312    ELM_CONFIG_VAL(D, T, focus_highlight_enable, T_UCHAR);
313    ELM_CONFIG_VAL(D, T, focus_highlight_animate, T_UCHAR);
314    ELM_CONFIG_VAL(D, T, toolbar_shrink_mode, T_INT);
315    ELM_CONFIG_VAL(D, T, fileselector_expand_enable, T_UCHAR);
316    ELM_CONFIG_VAL(D, T, inwin_dialogs_enable, T_UCHAR);
317    ELM_CONFIG_VAL(D, T, icon_size, T_INT);
318    ELM_CONFIG_VAL(D, T, longpress_timeout, T_DOUBLE);
319    ELM_CONFIG_VAL(D, T, effect_enable, T_UCHAR);
320    ELM_CONFIG_VAL(D, T, desktop_entry, T_UCHAR);
321    ELM_CONFIG_VAL(D, T, password_show_last, T_UCHAR);
322    ELM_CONFIG_VAL(D, T, password_show_last_timeout, T_DOUBLE);
323    ELM_CONFIG_VAL(D, T, glayer_zoom_finger_enable, T_UCHAR);
324    ELM_CONFIG_VAL(D, T, glayer_zoom_finger_factor, T_DOUBLE);
325    ELM_CONFIG_VAL(D, T, glayer_zoom_wheel_factor, T_DOUBLE);
326    ELM_CONFIG_VAL(D, T, glayer_zoom_distance_tolerance, T_DOUBLE);
327    ELM_CONFIG_VAL(D, T, glayer_rotate_finger_enable, T_UCHAR);
328    ELM_CONFIG_VAL(D, T, glayer_rotate_angular_tolerance, T_DOUBLE);
329    ELM_CONFIG_VAL(D, T, glayer_line_min_length, T_DOUBLE);
330    ELM_CONFIG_VAL(D, T, glayer_line_distance_tolerance, T_DOUBLE);
331    ELM_CONFIG_VAL(D, T, glayer_line_angular_tolerance, T_DOUBLE);
332    ELM_CONFIG_VAL(D, T, glayer_flick_time_limit_ms, T_INT);
333    ELM_CONFIG_VAL(D, T, glayer_long_tap_start_timeout, T_DOUBLE);
334    ELM_CONFIG_VAL(D, T, access_mode, T_INT);
335    ELM_CONFIG_VAL(D, T, glayer_continues_enable, T_UCHAR);
336 #undef T
337 #undef D
338 #undef T_INT
339 #undef T_DOUBLE
340 #undef T_STRING
341 #undef T_UCHAR
342 }
343
344 static void
345 _desc_shutdown(void)
346 {
347    if (_config_edd)
348      {
349         eet_data_descriptor_free(_config_edd);
350         _config_edd = NULL;
351      }
352
353    if (_config_font_overlay_edd)
354      {
355         eet_data_descriptor_free(_config_font_overlay_edd);
356         _config_font_overlay_edd = NULL;
357      }
358 }
359
360 static int
361 _sort_files_cb(const void *f1,
362                const void *f2)
363 {
364    return strcmp(f1, f2);
365 }
366
367 const char *
368 _elm_config_current_profile_get(void)
369 {
370    return _elm_profile;
371 }
372
373 static size_t
374 _elm_data_dir_snprintf(char       *dst,
375                        size_t      size,
376                        const char *fmt,
377                        ...)
378 {
379    size_t data_dir_len, off;
380    va_list ap;
381
382    data_dir_len = eina_strlcpy(dst, _elm_data_dir, size);
383
384    off = data_dir_len + 1;
385    if (off >= size)
386      goto end;
387
388    va_start(ap, fmt);
389    dst[data_dir_len] = '/';
390
391    off = off + vsnprintf(dst + off, size - off, fmt, ap);
392    va_end(ap);
393
394 end:
395    return off;
396 }
397
398 static size_t
399 _elm_user_dir_snprintf(char       *dst,
400                        size_t      size,
401                        const char *fmt,
402                        ...)
403 {
404    const char *home;
405    size_t user_dir_len, off;
406    va_list ap;
407
408 #ifdef _WIN32
409    home = evil_homedir_get();
410 #else
411    home = getenv("HOME");
412 #endif
413    if (!home)
414      home = "/";
415
416    user_dir_len = eina_str_join_len(dst, size, '/', home, strlen(home),
417                                     ELEMENTARY_BASE_DIR, sizeof(ELEMENTARY_BASE_DIR) - 1);
418
419    off = user_dir_len + 1;
420    if (off >= size)
421      goto end;
422
423    va_start(ap, fmt);
424    dst[user_dir_len] = '/';
425
426    off = off + vsnprintf(dst + off, size - off, fmt, ap);
427    va_end(ap);
428
429 end:
430    return off;
431 }
432
433 const char *
434 _elm_config_profile_dir_get(const char *prof,
435                             Eina_Bool   is_user)
436 {
437    char buf[PATH_MAX];
438
439    if (!is_user)
440      goto not_user;
441
442    _elm_user_dir_snprintf(buf, sizeof(buf), "config/%s", prof);
443
444    if (ecore_file_is_dir(buf))
445      return strdup(buf);
446
447    return NULL;
448
449 not_user:
450    snprintf(buf, sizeof(buf), "%s/config/%s", _elm_data_dir, prof);
451
452    if (ecore_file_is_dir(buf))
453      return strdup(buf);
454
455    return NULL;
456 }
457
458 Eina_List *
459 _elm_config_font_overlays_list(void)
460 {
461    return _elm_config->font_overlays;
462 }
463
464 void
465 _elm_config_font_overlay_set(const char    *text_class,
466                              const char    *font,
467                              Evas_Font_Size size)
468 {
469    Elm_Font_Overlay *efd;
470    Eina_List *l;
471
472    EINA_LIST_FOREACH(_elm_config->font_overlays, l, efd)
473      {
474         if (strcmp(efd->text_class, text_class))
475           continue;
476
477         if (efd->font) eina_stringshare_del(efd->font);
478         efd->font = eina_stringshare_add(font);
479         efd->size = size;
480         _elm_config->font_overlays =
481           eina_list_promote_list(_elm_config->font_overlays, l);
482         return;
483      }
484
485    /* the text class doesn't exist */
486    efd = calloc(1, sizeof(Elm_Font_Overlay));
487    efd->text_class = eina_stringshare_add(text_class);
488    efd->font = eina_stringshare_add(font);
489    efd->size = size;
490
491    _elm_config->font_overlays = eina_list_prepend(_elm_config->font_overlays,
492                                                   efd);
493 }
494
495 void
496 _elm_config_font_overlay_remove(const char *text_class)
497 {
498    Elm_Font_Overlay *efd;
499    Eina_List *l;
500
501    EINA_LIST_FOREACH(_elm_config->font_overlays, l, efd)
502      {
503         if (strcmp(efd->text_class, text_class))
504           continue;
505
506         _elm_config->font_overlays =
507           eina_list_remove_list(_elm_config->font_overlays, l);
508         if (efd->text_class) eina_stringshare_del(efd->text_class);
509         if (efd->font) eina_stringshare_del(efd->font);
510         free(efd);
511
512         return;
513      }
514 }
515
516 void
517 _elm_config_font_overlay_apply(void)
518 {
519    Elm_Font_Overlay *efd;
520    Eina_List *l;
521    int i;
522
523    for (i = 0; _elm_text_classes[i].desc; i++)
524      edje_text_class_del(_elm_text_classes[i].name);
525
526    EINA_LIST_FOREACH(_elm_config->font_overlays, l, efd)
527      edje_text_class_set(efd->text_class, efd->font, efd->size);
528 }
529
530 Eina_List *
531 _elm_config_text_classes_get(void)
532 {
533    Eina_List *ret = NULL;
534    int i;
535
536    for (i = 0; _elm_text_classes[i].desc; i++)
537      {
538         Elm_Text_Class *tc;
539         tc = malloc(sizeof(*tc));
540         if (!tc) continue;
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_cache_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_cache_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_amount = 1.0;
863    _elm_config->scroll_smooth_history_weight = 0.3;
864    _elm_config->scroll_smooth_future_time = 0.0;
865    _elm_config->scroll_smooth_time_window = 0.2;
866    _elm_config->scale = 1.0;
867    _elm_config->bgpixmap = 0;
868    _elm_config->compositing = 1;
869    _elm_config->font_hinting = 2;
870    _elm_config->cache_flush_poll_interval = 512;
871    _elm_config->cache_flush_enable = EINA_TRUE;
872    _elm_config->font_dirs = NULL;
873    _elm_config->image_cache = 4096;
874    _elm_config->font_cache = 512;
875    _elm_config->edje_cache = 32;
876    _elm_config->edje_collection_cache = 64;
877    _elm_config->finger_size = 40;
878    _elm_config->fps = 60.0;
879    _elm_config->theme = eina_stringshare_add("default");
880    _elm_config->modules = NULL;
881    _elm_config->tooltip_delay = 1.0;
882    _elm_config->cursor_engine_only = EINA_TRUE;
883    _elm_config->focus_highlight_enable = EINA_FALSE;
884    _elm_config->focus_highlight_animate = EINA_TRUE;
885    _elm_config->toolbar_shrink_mode = 2;
886    _elm_config->fileselector_expand_enable = EINA_FALSE;
887    _elm_config->inwin_dialogs_enable = EINA_FALSE;
888    _elm_config->icon_size = 32;
889    _elm_config->longpress_timeout = 1.0;
890    _elm_config->effect_enable = EINA_TRUE;
891    _elm_config->desktop_entry = EINA_FALSE;
892    _elm_config->is_mirrored = EINA_FALSE; /* Read sys value in env_get() */
893    _elm_config->password_show_last = EINA_FALSE;
894    _elm_config->password_show_last_timeout = 2.0;
895    _elm_config->glayer_zoom_finger_enable = EINA_TRUE;
896    _elm_config->glayer_zoom_finger_factor = 1.0;
897    _elm_config->glayer_zoom_wheel_factor = 0.05;
898    _elm_config->glayer_zoom_distance_tolerance = 1.0; /* 1 times elm_finger_size_get() */
899    _elm_config->glayer_rotate_finger_enable = EINA_TRUE;
900    _elm_config->glayer_rotate_angular_tolerance = 2.0; /* 2 DEG */
901    _elm_config->glayer_line_min_length = 1.0;         /* 1 times elm_finger_size_get() */
902    _elm_config->glayer_line_distance_tolerance = 3.0; /* 3 times elm_finger_size_get() */
903    _elm_config->glayer_line_angular_tolerance = 20.0; /* 20 DEG */
904    _elm_config->glayer_flick_time_limit_ms = 120;              /* ms to finish flick */
905    _elm_config->glayer_long_tap_start_timeout = 1.2;   /* 1.2 second to start long-tap */
906    _elm_config->glayer_continues_enable = EINA_TRUE;      /* Continue gestures default */
907 }
908
909 static const char *
910 _elm_config_eet_close_error_get(Eet_File *ef,
911                                 char     *file)
912 {
913    Eet_Error err;
914    const char *erstr = NULL;
915
916    err = eet_close(ef);
917    switch (err)
918      {
919       case EET_ERROR_WRITE_ERROR:
920         erstr = "An error occurred while saving Elementary's "
921                 "settings to disk. The error could not be "
922                 "deterimined. The file where the error occurred was: "
923                 "%s. This file has been deleted to avoid corrupt data.";
924         break;
925
926       case EET_ERROR_WRITE_ERROR_FILE_TOO_BIG:
927         erstr = "Elementary's settings files are too big "
928                 "for the file system they are being saved to. "
929                 "This error is very strange as the files should "
930                 "be extremely small. Please check the settings "
931                 "for your home directory. "
932                 "The file where the error occurred was: %s ."
933                 "This file has been deleted to avoid corrupt data.";
934         break;
935
936       case EET_ERROR_WRITE_ERROR_IO_ERROR:
937         erstr = "An output error occurred when writing the settings "
938                 "files for Elementary. Your disk is having troubles "
939                 "and possibly needs replacement. "
940                 "The file where the error occurred was: %s ."
941                 "This file has been deleted to avoid corrupt data.";
942         break;
943
944       case EET_ERROR_WRITE_ERROR_OUT_OF_SPACE:
945         erstr = "Elementary cannot write its settings file "
946                 "because it ran out of space to write the file. "
947                 "You have either run out of disk space or have "
948                 "gone over your quota limit. "
949                 "The file where the error occurred was: %s ."
950                 "This file has been deleted to avoid corrupt data.";
951         break;
952
953       case EET_ERROR_WRITE_ERROR_FILE_CLOSED:
954         erstr = "Elementary unexpectedly had the settings file "
955                 "it was writing closed on it. This is very unusual. "
956                 "The file where the error occurred was: %s "
957                 "This file has been deleted to avoid corrupt data.";
958         break;
959
960       default:
961         break;
962      }
963    if (erstr)
964      {
965         /* delete any partially-written file */
966          ecore_file_unlink(file);
967          return strdup(erstr);
968      }
969
970    return NULL;
971 }
972
973 static Eina_Bool
974 _elm_config_profile_save(void)
975 {
976    char buf[4096], buf2[4096];
977    int ok = 0, ret;
978    const char *err;
979    Eet_File *ef;
980    size_t len;
981
982    len = _elm_user_dir_snprintf(buf, sizeof(buf), "config/profile.cfg");
983    if (len + 1 >= sizeof(buf))
984      return EINA_FALSE;
985
986    len = _elm_user_dir_snprintf(buf2, sizeof(buf2), "config/profile.cfg.tmp");
987    if (len + 1 >= sizeof(buf2))
988      return EINA_FALSE;
989
990    ef = eet_open(buf2, EET_FILE_MODE_WRITE);
991    if (!ef)
992      return EINA_FALSE;
993
994    ok = eet_write(ef, "config", _elm_profile, strlen(_elm_profile), 0);
995    if (!ok)
996      goto err;
997
998    err = _elm_config_eet_close_error_get(ef, buf2);
999    if (err)
1000      {
1001         ERR("%s", err);
1002         free((void *)err);
1003         goto err;
1004      }
1005
1006    ret = ecore_file_mv(buf2, buf);
1007    if (!ret)
1008      {
1009         ERR("Error saving Elementary's configuration file");
1010         goto err;
1011      }
1012
1013    ecore_file_unlink(buf2);
1014    return EINA_TRUE;
1015
1016 err:
1017    ecore_file_unlink(buf2);
1018    return EINA_FALSE;
1019 }
1020
1021 Eina_Bool
1022 _elm_config_save(void)
1023 {
1024    char buf[4096], buf2[4096];
1025    int ok = 0, ret;
1026    const char *err;
1027    Eet_File *ef;
1028    size_t len;
1029
1030    len = _elm_user_dir_snprintf(buf, sizeof(buf), "config/%s", _elm_profile);
1031    if (len + 1 >= sizeof(buf))
1032      return EINA_FALSE;
1033
1034    ok = ecore_file_mkpath(buf);
1035    if (!ok)
1036      {
1037         ERR("Problem acessing Elementary's user configuration directory: %s",
1038             buf);
1039         return EINA_FALSE;
1040      }
1041
1042    if (!_elm_config_profile_save())
1043      return EINA_FALSE;
1044
1045    buf[len] = '/';
1046    len++;
1047
1048    if (len + sizeof("base.cfg") >= sizeof(buf) - len)
1049      return EINA_FALSE;
1050
1051    memcpy(buf + len, "base.cfg", sizeof("base.cfg"));
1052    len += sizeof("base.cfg") - 1;
1053
1054    if (len + sizeof(".tmp") >= sizeof(buf))
1055      return EINA_FALSE;
1056
1057    memcpy(buf2, buf, len);
1058    memcpy(buf2 + len, ".tmp", sizeof(".tmp"));
1059
1060    ef = eet_open(buf2, EET_FILE_MODE_WRITE);
1061    if (!ef)
1062      return EINA_FALSE;
1063
1064    ok = eet_data_write(ef, _config_edd, "config", _elm_config, 1);
1065    if (!ok)
1066      goto err;
1067
1068    err = _elm_config_eet_close_error_get(ef, buf2);
1069    if (err)
1070      {
1071         ERR("%s", err);
1072         free((void *)err);
1073         goto err;
1074      }
1075
1076    ret = ecore_file_mv(buf2, buf);
1077    if (!ret)
1078      {
1079         ERR("Error saving Elementary's configuration file");
1080         goto err;
1081      }
1082
1083    ecore_file_unlink(buf2);
1084    return EINA_TRUE;
1085
1086 err:
1087    ecore_file_unlink(buf2);
1088    return EINA_FALSE;
1089 }
1090
1091 static void
1092 _config_update(void)
1093 {
1094    Elm_Config *tcfg;
1095
1096    tcfg = _config_system_load();
1097    if (!tcfg)
1098      {
1099         /* weird profile or something? We should probably fill
1100          * with hardcoded defaults, or get from default previx */
1101           return;
1102      }
1103 #define IFCFG(v)   if ((_elm_config->config_version & 0xffff) < (v)) {
1104 #define IFCFGELSE } else {
1105 #define IFCFGEND  }
1106 #define COPYVAL(x) do {_elm_config->x = tcfg->x; } while(0)
1107 #define COPYPTR(x) do {_elm_config->x = tcfg->x; tcfg->x = NULL; } while(0)
1108 #define COPYSTR(x) COPYPTR(x)
1109
1110      /* we also need to update for property changes in the root window
1111       * if needed, but that will be dependent on new properties added
1112       * with each version */
1113
1114      IFCFG(0x0003);
1115      COPYVAL(longpress_timeout);
1116      IFCFGEND;
1117
1118 #undef COPYSTR
1119 #undef COPYPTR
1120 #undef COPYVAL
1121 #undef IFCFGEND
1122 #undef IFCFGELSE
1123 #undef IFCFG
1124
1125      /* after updating user config, we must save */
1126 }
1127
1128 static void
1129 _env_get(void)
1130 {
1131    char *s;
1132    double friction;
1133
1134    s = getenv("ELM_ENGINE");
1135    if (s)
1136      {
1137         if ((!strcasecmp(s, "x11")) ||
1138             (!strcasecmp(s, "x")) ||
1139             (!strcasecmp(s, "software-x11")) ||
1140             (!strcasecmp(s, "software_x11")))
1141           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_X11);
1142         else if ((!strcasecmp(s, "opengl")) ||
1143                  (!strcasecmp(s, "gl")) ||
1144                  (!strcasecmp(s, "opengl-x11")) ||
1145                  (!strcasecmp(s, "opengl_x11")))
1146           eina_stringshare_replace(&_elm_config->engine, ELM_OPENGL_X11);
1147         else if ((!strcasecmp(s, "x11-8")) ||
1148                  (!strcasecmp(s, "x8")) ||
1149                  (!strcasecmp(s, "software-8-x11")) ||
1150                  (!strcasecmp(s, "software_8_x11")))
1151           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_8_X11);
1152         else if ((!strcasecmp(s, "x11-16")) ||
1153                  (!strcasecmp(s, "x16")) ||
1154                  (!strcasecmp(s, "software-16-x11")) ||
1155                  (!strcasecmp(s, "software_16_x11")))
1156           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_16_X11);
1157 /*
1158         else if ((!strcasecmp(s, "xrender")) ||
1159                  (!strcasecmp(s, "xr")) ||
1160                  (!strcasecmp(s, "xrender-x11")) ||
1161                  (!strcasecmp(s, "xrender_x11")))
1162           eina_stringshare_replace(&_elm_config->engine, ELM_XRENDER_X11);
1163  */
1164         else if ((!strcasecmp(s, "fb")) ||
1165                  (!strcasecmp(s, "software-fb")) ||
1166                  (!strcasecmp(s, "software_fb")))
1167           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_FB);
1168         else if ((!strcasecmp(s, "directfb")) ||
1169                  (!strcasecmp(s, "dfb")))
1170           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_DIRECTFB);
1171         else if ((!strcasecmp(s, "psl1ght")))
1172           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_PSL1GHT);
1173         else if ((!strcasecmp(s, "sdl")) ||
1174                  (!strcasecmp(s, "software-sdl")) ||
1175                  (!strcasecmp(s, "software_sdl")))
1176           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_SDL);
1177         else if ((!strcasecmp(s, "sdl-16")) ||
1178                  (!strcasecmp(s, "software-16-sdl")) ||
1179                  (!strcasecmp(s, "software_16_sdl")))
1180           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_16_SDL);
1181         else if ((!strcasecmp(s, "opengl-sdl")) ||
1182                  (!strcasecmp(s, "opengl_sdl")) ||
1183                  (!strcasecmp(s, "gl-sdl")) ||
1184                  (!strcasecmp(s, "gl_sdl")))
1185           eina_stringshare_replace(&_elm_config->engine, ELM_OPENGL_SDL);
1186         else if ((!strcasecmp(s, "opengl-cocoa")) ||
1187                  (!strcasecmp(s, "opengl_cocoa")) ||
1188                  (!strcasecmp(s, "gl-cocoa")) ||
1189                  (!strcasecmp(s, "gl_cocoa")))
1190           eina_stringshare_replace(&_elm_config->engine, ELM_OPENGL_COCOA);
1191         else if ((!strcasecmp(s, "gdi")) ||
1192                  (!strcasecmp(s, "software-gdi")) ||
1193                  (!strcasecmp(s, "software_gdi")))
1194           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_WIN32);
1195         else if ((!strcasecmp(s, "wince-gdi")) ||
1196                  (!strcasecmp(s, "software-16-wince-gdi")) ||
1197                  (!strcasecmp(s, "software_16_wince_gdi")))
1198           eina_stringshare_replace(&_elm_config->engine, ELM_SOFTWARE_16_WINCE);
1199         else if (!strcasecmp(s, "buffer"))
1200           eina_stringshare_replace(&_elm_config->engine, ELM_BUFFER);
1201         else if ((!strncmp(s, "shot:", 5)))
1202           eina_stringshare_replace(&_elm_config->engine, s);
1203         else if ((!strcasecmp(s, "ews")))
1204           eina_stringshare_replace(&_elm_config->engine, ELM_EWS);
1205         else if ((!strcasecmp(s, "wayland_shm")))
1206           eina_stringshare_replace(&_elm_config->engine, ELM_WAYLAND_SHM);
1207         else if ((!strcasecmp(s, "wayland_egl")))
1208           eina_stringshare_replace(&_elm_config->engine, ELM_WAYLAND_EGL);
1209         else
1210           ERR("Unknown engine '%s'.", s);
1211      }
1212
1213    s = getenv("ELM_VSYNC");
1214    if (s) _elm_config->vsync = !!atoi(s);
1215
1216    s = getenv("ELM_THUMBSCROLL_ENABLE");
1217    if (s) _elm_config->thumbscroll_enable = !!atoi(s);
1218    s = getenv("ELM_THUMBSCROLL_THRESHOLD");
1219    if (s) _elm_config->thumbscroll_threshold = atoi(s);
1220    // FIXME: floatformat locale issues here 1.0 vs 1,0 - should just be 1.0
1221    s = getenv("ELM_THUMBSCROLL_MOMENTUM_THRESHOLD");
1222    if (s) _elm_config->thumbscroll_momentum_threshold = atof(s);
1223    s = getenv("ELM_THUMBSCROLL_FRICTION");
1224    if (s) _elm_config->thumbscroll_friction = atof(s);
1225    s = getenv("ELM_THUMBSCROLL_BOUNCE_ENABLE");
1226    if (s) _elm_config->thumbscroll_bounce_enable = !!atoi(s);
1227    s = getenv("ELM_THUMBSCROLL_BOUNCE_FRICTION");
1228    if (s) _elm_config->thumbscroll_bounce_friction = atof(s);
1229    s = getenv("ELM_PAGE_SCROLL_FRICTION");
1230    if (s) _elm_config->page_scroll_friction = atof(s);
1231    s = getenv("ELM_BRING_IN_SCROLL_FRICTION");
1232    if (s) _elm_config->bring_in_scroll_friction = atof(s);
1233    s = getenv("ELM_ZOOM_FRICTION");
1234    if (s) _elm_config->zoom_friction = atof(s);
1235    s = getenv("ELM_THUMBSCROLL_BORDER_FRICTION");
1236    if (s)
1237      {
1238         friction = atof(s);
1239         if (friction < 0.0)
1240           friction = 0.0;
1241
1242         if (friction > 1.0)
1243           friction = 1.0;
1244
1245         _elm_config->thumbscroll_border_friction = friction;
1246      }
1247    s = getenv("ELM_THUMBSCROLL_SENSITIVITY_FRICTION");
1248    if (s)
1249      {
1250         friction = atof(s);
1251         if (friction < 0.1)
1252           friction = 0.1;
1253
1254         if (friction > 1.0)
1255           friction = 1.0;
1256
1257         _elm_config->thumbscroll_sensitivity_friction = friction;
1258      }
1259    s = getenv("ELM_SCROLL_SMOOTH_AMOUNT");
1260    if (s) _elm_config->scroll_smooth_amount = atof(s);
1261    s = getenv("ELM_SCROLL_SMOOTH_HISTORY_WEIGHT");
1262    if (s) _elm_config->scroll_smooth_history_weight = atof(s);
1263    s = getenv("ELM_SCROLL_SMOOTH_FUTURE_TIME");
1264    if (s) _elm_config->scroll_smooth_future_time = atof(s);
1265    s = getenv("ELM_SCROLL_SMOOTH_TIME_WINDOW");
1266    if (s) _elm_config->scroll_smooth_time_window = atof(s);
1267    s = getenv("ELM_THEME");
1268    if (s) eina_stringshare_replace(&_elm_config->theme, s);
1269
1270    s = getenv("ELM_FONT_HINTING");
1271    if (s)
1272      {
1273         if      (!strcasecmp(s, "none")) _elm_config->font_hinting = 0;
1274         else if (!strcasecmp(s, "auto"))
1275           _elm_config->font_hinting = 1;
1276         else if (!strcasecmp(s, "bytecode"))
1277           _elm_config->font_hinting = 2;
1278      }
1279
1280    s = getenv("ELM_FONT_PATH");
1281    if (s)
1282      {
1283         const char *p, *pp;
1284         char *buf2;
1285
1286         EINA_LIST_FREE(_elm_config->font_dirs, p)
1287           {
1288              eina_stringshare_del(p);
1289           }
1290
1291         buf2 = alloca(strlen(s) + 1);
1292         p = s;
1293         pp = p;
1294         for (;; )
1295           {
1296              if ((*p == ':') || (*p == 0))
1297                {
1298                   int len;
1299
1300                   len = p - pp;
1301                   strncpy(buf2, pp, len);
1302                   buf2[len] = 0;
1303                   _elm_config->font_dirs =
1304                     eina_list_append(_elm_config->font_dirs,
1305                                      eina_stringshare_add(buf2));
1306                   if (*p == 0) break;
1307                   p++;
1308                   pp = p;
1309                }
1310              else
1311                {
1312                   if (*p == 0) break;
1313                   p++;
1314                }
1315           }
1316      }
1317
1318    s = getenv("ELM_IMAGE_CACHE");
1319    if (s) _elm_config->image_cache = atoi(s);
1320
1321    s = getenv("ELM_FONT_CACHE");
1322    if (s) _elm_config->font_cache = atoi(s);
1323
1324    s = getenv("ELM_SCALE");
1325    if (s) _elm_config->scale = atof(s);
1326
1327    s = getenv("ELM_FINGER_SIZE");
1328    if (s) _elm_config->finger_size = atoi(s);
1329
1330    s = getenv("ELM_PASSWORD_SHOW_LAST");
1331    if (s) _elm_config->password_show_last = !!atoi(s);
1332
1333    s = getenv("ELM_PASSWORD_SHOW_LAST_TIMEOUT");
1334    if (s)
1335      {
1336         double pw_show_last_timeout = atof(s);
1337         if (pw_show_last_timeout >= 0.0)
1338           _elm_config->password_show_last_timeout = pw_show_last_timeout;
1339      }
1340
1341    s = getenv("ELM_FPS");
1342    if (s) _elm_config->fps = atof(s);
1343    if (_elm_config->fps < 1.0) _elm_config->fps = 1.0;
1344
1345    s = getenv("ELM_MODULES");
1346    if (s) eina_stringshare_replace(&_elm_config->modules, s);
1347
1348    /* Get RTL orientation from system */
1349    setlocale(LC_ALL, "");
1350    bindtextdomain(PACKAGE, LOCALE_DIR);
1351    _elm_config->is_mirrored = !strcmp(E_("default:LTR"), "default:RTL");
1352
1353    s = getenv("ELM_TOOLTIP_DELAY");
1354    if (s)
1355      {
1356         double delay = atof(s);
1357         if (delay >= 0.0)
1358           _elm_config->tooltip_delay = delay;
1359      }
1360
1361    s = getenv("ELM_CURSOR_ENGINE_ONLY");
1362    if (s) _elm_config->cursor_engine_only = !!atoi(s);
1363
1364    s = getenv("ELM_FOCUS_HIGHLIGHT_ENABLE");
1365    if (s) _elm_config->focus_highlight_enable = !!atoi(s);
1366
1367    s = getenv("ELM_FOCUS_HIGHLIGHT_ANIMATE");
1368    if (s) _elm_config->focus_highlight_animate = !!atoi(s);
1369
1370    s = getenv("ELM_TOOLBAR_SHRINK_MODE");
1371    if (s) _elm_config->toolbar_shrink_mode = atoi(s);
1372
1373    s = getenv("ELM_FILESELECTOR_EXPAND_ENABLE");
1374    if (s) _elm_config->fileselector_expand_enable = !!atoi(s);
1375
1376    s = getenv("ELM_INWIN_DIALOGS_ENABLE");
1377    if (s) _elm_config->inwin_dialogs_enable = !!atoi(s);
1378
1379    s = getenv("ELM_ICON_SIZE");
1380    if (s) _elm_config->icon_size = atoi(s);
1381
1382    s = getenv("ELM_LONGPRESS_TIMEOUT");
1383    if (s) _elm_config->longpress_timeout = atof(s);
1384    if (_elm_config->longpress_timeout < 0.0)
1385      _elm_config->longpress_timeout = 0.0;
1386
1387    s = getenv("ELM_EFFECT_ENABLE");
1388    if (s) _elm_config->effect_enable = !!atoi(s);
1389
1390    s = getenv("ELM_DESKTOP_ENTRY");
1391    if (s) _elm_config->desktop_entry = !!atoi(s);
1392    s = getenv("ELM_ACCESS_MODE");
1393    if (s) _elm_config->access_mode = ELM_ACCESS_MODE_ON;
1394 }
1395
1396 EAPI Eina_Bool
1397 elm_mirrored_get(void)
1398 {
1399    return _elm_config->is_mirrored;
1400 }
1401
1402 EAPI void
1403 elm_mirrored_set(Eina_Bool mirrored)
1404 {
1405    _elm_config->is_mirrored = mirrored;
1406    _elm_rescale();
1407 }
1408
1409 EAPI void
1410 elm_config_all_flush(void)
1411 {
1412 #ifdef HAVE_ELEMENTARY_X
1413    if (_prop_all_update_timer) ecore_timer_del(_prop_all_update_timer);
1414    _prop_all_update_timer = ecore_timer_add(0.1, _prop_all_update_cb, NULL);
1415    //FIXME: below two lines looks unnecessary.
1416    _prop_config_set();
1417    ecore_x_window_prop_string_set(_root_1st, _atom[ATOM_E_PROFILE],
1418                                   _elm_profile);
1419 #endif
1420 }
1421
1422
1423 static void
1424 _translation_init()
1425 {
1426 #ifdef ENABLE_NLS
1427    const char *cur_dom = textdomain(NULL);
1428    const char *trans_comment = gettext("");
1429    const char *msg_locale = setlocale(LC_MESSAGES, NULL);
1430
1431    /* Same concept as what glib does:
1432     * We shouldn't translate if there are no translations for the
1433     * application in the current locale + domain. (Unless locale is
1434     * en_/C where translating only parts of the interface make some
1435     * sense).
1436     */
1437    _elm_config->translate = !(strcmp (cur_dom, "messages") &&
1438          !*trans_comment && strncmp (msg_locale, "en_", 3) &&
1439          strcmp (msg_locale, "C"));
1440 #endif
1441 }
1442
1443 void
1444 _elm_config_init(void)
1445 {
1446    if (!ELM_EVENT_CONFIG_ALL_CHANGED)
1447       ELM_EVENT_CONFIG_ALL_CHANGED = ecore_event_type_new();
1448    _desc_init();
1449    _profile_fetch_from_conf();
1450    _config_load();
1451    _translation_init();
1452    _env_get();
1453    _config_apply();
1454    _elm_config_font_overlay_apply();
1455    _elm_recache();
1456 }
1457
1458 void
1459 _elm_config_sub_shutdown(void)
1460 {
1461 #define ENGINE_COMPARE(name) (!strcmp(_elm_config->engine, name))
1462    if (ENGINE_COMPARE(ELM_SOFTWARE_X11) ||
1463        ENGINE_COMPARE(ELM_SOFTWARE_16_X11) ||
1464        ENGINE_COMPARE(ELM_XRENDER_X11) ||
1465        ENGINE_COMPARE(ELM_OPENGL_X11) ||
1466        ENGINE_COMPARE(ELM_OPENGL_COCOA))
1467 #undef ENGINE_COMPARE
1468      {
1469 #ifdef HAVE_ELEMENTARY_X
1470         ecore_x_disconnect();
1471 #endif
1472      }
1473 }
1474
1475 void
1476 _elm_config_sub_init(void)
1477 {
1478 #define ENGINE_COMPARE(name) (!strcmp(_elm_config->engine, name))
1479    if (ENGINE_COMPARE(ELM_SOFTWARE_X11) ||
1480        ENGINE_COMPARE(ELM_SOFTWARE_16_X11) ||
1481        ENGINE_COMPARE(ELM_XRENDER_X11) ||
1482        ENGINE_COMPARE(ELM_OPENGL_X11) ||
1483        ENGINE_COMPARE(ELM_OPENGL_COCOA))
1484 #undef ENGINE_COMPARE
1485      {
1486 #ifdef HAVE_ELEMENTARY_X
1487         if (!ecore_x_init(NULL))
1488           {
1489              ERR("Cannot connect to X11 display. check $DISPLAY variable");
1490              exit(1);
1491           }
1492         _root_1st = ecore_x_window_root_first_get();
1493
1494         if (!ecore_x_screen_is_composited(0))
1495           _elm_config->compositing = 0;
1496
1497         ecore_x_atoms_get(_atom_names, ATOM_COUNT, _atom);
1498         ecore_x_event_mask_set(_root_1st,
1499                                ECORE_X_EVENT_MASK_WINDOW_PROPERTY);
1500         _prop_change_handler = ecore_event_handler_add
1501             (ECORE_X_EVENT_WINDOW_PROPERTY, _prop_change, NULL);
1502         if (!getenv("ELM_PROFILE"))
1503           {
1504              char *s;
1505
1506              s = ecore_x_window_prop_string_get(_root_1st,
1507                                                 _atom[ATOM_E_PROFILE]);
1508              if (s)
1509                {
1510                   int changed = 0;
1511
1512                   if (_elm_profile)
1513                     {
1514                        if (strcmp(_elm_profile, s)) changed = 1;
1515                        free(_elm_profile);
1516                     }
1517                   _elm_profile = s;
1518                   if (changed) _prop_config_get();
1519                }
1520           }
1521 #endif
1522      }
1523    _config_sub_apply();
1524 }
1525
1526 void
1527 _elm_config_reload(void)
1528 {
1529    _config_free();
1530    _config_load();
1531    _config_apply();
1532    _elm_config_font_overlay_apply();
1533    _elm_rescale();
1534    _elm_recache();
1535 }
1536
1537 void
1538 _elm_config_engine_set(const char *engine)
1539 {
1540    if (_elm_config->engine && strcmp(_elm_config->engine, engine))
1541      eina_stringshare_del(_elm_config->engine);
1542
1543    _elm_config->engine = eina_stringshare_add(engine);
1544 }
1545
1546 void
1547 _elm_config_profile_set(const char *profile)
1548 {
1549    Eina_Bool changed = EINA_FALSE;
1550
1551    if (_elm_profile)
1552      {
1553         if (strcmp(_elm_profile, profile))
1554           changed = 1;
1555         free(_elm_profile);
1556      }
1557
1558    _elm_profile = strdup(profile);
1559
1560    if (changed)
1561      {
1562         _config_free();
1563         _config_load();
1564         _config_apply();
1565         _elm_config_font_overlay_apply();
1566         _elm_rescale();
1567         _elm_recache();
1568      }
1569 }
1570
1571 void
1572 _elm_config_shutdown(void)
1573 {
1574 #ifdef HAVE_ELEMENTARY_X
1575    if (_prop_all_update_timer)
1576      {
1577         ecore_timer_del(_prop_all_update_timer);
1578         _prop_all_update_cb(NULL);
1579      }
1580    _prop_all_update_timer = NULL;
1581    if (_prop_change_delay_timer) ecore_timer_del(_prop_change_delay_timer);
1582    _prop_change_delay_timer = NULL;
1583 #endif
1584
1585 #define ENGINE_COMPARE(name) (!strcmp(_elm_config->engine, name))
1586    if (ENGINE_COMPARE(ELM_SOFTWARE_X11) ||
1587        ENGINE_COMPARE(ELM_SOFTWARE_16_X11) ||
1588        ENGINE_COMPARE(ELM_XRENDER_X11) ||
1589        ENGINE_COMPARE(ELM_OPENGL_X11))
1590 #undef ENGINE_COMPARE
1591      {
1592 #ifdef HAVE_ELEMENTARY_X
1593         ecore_event_handler_del(_prop_change_handler);
1594         _prop_change_handler = NULL;
1595 #endif
1596      }
1597    _config_free();
1598    if (_elm_profile)
1599      {
1600         free(_elm_profile);
1601         _elm_profile = NULL;
1602      }
1603    _desc_shutdown();
1604 }
1605