2007-06-12 Murray Cumming <murrayc@murrayc.com>
[modest] / src / modest-conf.c
1 /* Copyright (c) 2006, Nokia Corporation
2  * All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions are
6  * met:
7  *
8  * * Redistributions of source code must retain the above copyright
9  *   notice, this list of conditions and the following disclaimer.
10  * * Redistributions in binary form must reproduce the above copyright
11  *   notice, this list of conditions and the following disclaimer in the
12  *   documentation and/or other materials provided with the distribution.
13  * * Neither the name of the Nokia Corporation nor the names of its
14  *   contributors may be used to endorse or promote products derived from
15  *   this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
18  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
20  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
21  * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
22  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
23  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
24  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
25  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
26  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
27  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29
30 #include <gconf/gconf-client.h>
31 #include <config.h>
32 #include <string.h>
33 #include <glib/gi18n.h>
34 #include "modest-conf.h"
35 #include "modest-marshal.h"
36 #include <stdio.h>
37
38 static void   modest_conf_class_init     (ModestConfClass *klass);
39 static void   modest_conf_init           (ModestConf *obj);
40 static void   modest_conf_finalize       (GObject *obj);
41 static void   modest_conf_on_change      (GConfClient *client, guint conn_id,
42                                           GConfEntry *entry, gpointer data);
43 static GConfValueType modest_conf_type_to_gconf_type (ModestConfValueType value_type, 
44                                                       GError **err);
45
46
47 static void
48 modest_conf_maemo_fake_on_change (ModestConf *conf, const gchar* key, ModestConfEvent event);
49
50 /* list my signals */
51 enum {
52         KEY_CHANGED_SIGNAL,
53         LAST_SIGNAL
54 };
55 static guint signals[LAST_SIGNAL] = {0}; 
56
57
58 typedef struct _ModestConfPrivate ModestConfPrivate;
59 struct _ModestConfPrivate {
60         GConfClient *gconf_client;
61 };
62 #define MODEST_CONF_GET_PRIVATE(o)      (G_TYPE_INSTANCE_GET_PRIVATE((o), \
63                                                                      MODEST_TYPE_CONF, \
64                                                                      ModestConfPrivate))
65 /* globals */
66 static GObjectClass *parent_class = NULL;
67
68 GType
69 modest_conf_get_type (void)
70 {
71         static GType my_type = 0;
72         if (!my_type) {
73                 static const GTypeInfo my_info = {
74                         sizeof(ModestConfClass),
75                         NULL,           /* base init */
76                         NULL,           /* base finalize */
77                         (GClassInitFunc) modest_conf_class_init,
78                         NULL,           /* class finalize */
79                         NULL,           /* class data */
80                         sizeof(ModestConf),
81                         1,              /* n_preallocs */
82                         (GInstanceInitFunc) modest_conf_init,
83                         NULL
84                 };
85                 my_type = g_type_register_static (G_TYPE_OBJECT,
86                                                   "ModestConf",
87                                                   &my_info, 0);
88         }
89         return my_type;
90 }
91
92 static void
93 modest_conf_class_init (ModestConfClass *klass)
94 {
95         GObjectClass *gobject_class;
96         gobject_class = (GObjectClass*) klass;
97
98         parent_class            = g_type_class_peek_parent (klass);
99         gobject_class->finalize = modest_conf_finalize;
100
101         g_type_class_add_private (gobject_class, sizeof(ModestConfPrivate));
102         
103         signals[KEY_CHANGED_SIGNAL] =
104                 g_signal_new ("key_changed",
105                               G_TYPE_FROM_CLASS (gobject_class),
106                               G_SIGNAL_RUN_FIRST,
107                               G_STRUCT_OFFSET (ModestConfClass,key_changed),
108                               NULL, NULL,
109                               modest_marshal_VOID__STRING_INT,
110                               G_TYPE_NONE, 2, G_TYPE_STRING, G_TYPE_INT); 
111 }
112
113 static void
114 modest_conf_init (ModestConf *obj)
115 {
116         GConfClient *conf = NULL;
117         ModestConfPrivate *priv = MODEST_CONF_GET_PRIVATE(obj);
118         GError *err      = NULL;
119
120         
121         priv->gconf_client = NULL;
122         
123         conf = gconf_client_get_default ();
124         if (!conf) {
125                 g_printerr ("modest: could not get gconf client\n");
126                 return;
127         }
128         gconf_client_add_dir (conf,MODEST_CONF_NAMESPACE,
129                               GCONF_CLIENT_PRELOAD_NONE,
130                               &err);
131         if (err) {
132                 g_printerr ("modest: error %d with gconf_client_add_dir: '%s'\n",
133                             err->code, err->message);
134                 g_object_unref (conf);
135                 g_error_free (err);
136                 return;
137         }
138         
139         gconf_client_notify_add (conf, MODEST_CONF_NAMESPACE,
140                                  modest_conf_on_change,
141                                  obj, NULL, &err);
142         if (err) {
143                 g_printerr ("modest: gconf_client_notify_add error %d: '%s'\n",
144                             err->code, err->message);
145                 g_object_unref (conf);
146                 g_error_free (err);
147                 return;
148         }
149         priv->gconf_client = conf;      /* all went well! */
150 }
151
152 static void
153 modest_conf_finalize (GObject *obj)
154 {
155         ModestConfPrivate *priv = MODEST_CONF_GET_PRIVATE(obj);
156         if (priv->gconf_client) {
157
158                 gconf_client_suggest_sync (priv->gconf_client, NULL);
159
160                 g_object_unref (priv->gconf_client);
161                 priv->gconf_client = NULL;
162         }       
163
164         G_OBJECT_CLASS(parent_class)->finalize (obj);
165 }
166
167 ModestConf*
168 modest_conf_new (void)
169 {
170         ModestConf *conf;
171         ModestConfPrivate *priv;
172         
173         conf = MODEST_CONF(g_object_new(MODEST_TYPE_CONF, NULL));
174         if (!conf) {
175                 g_printerr ("modest: failed to init ModestConf (GConf)\n");
176                 return NULL;
177         }
178
179         priv = MODEST_CONF_GET_PRIVATE(conf);
180         if (!priv->gconf_client) {
181                 g_printerr ("modest: failed to init gconf\n");
182                 g_object_unref (conf);
183                 return NULL;
184         }
185         
186         return conf;
187 }
188
189
190 gchar*
191 modest_conf_get_string (ModestConf* self, const gchar* key, GError **err)
192 {
193         ModestConfPrivate *priv;
194         
195         g_return_val_if_fail (self, NULL);
196         g_return_val_if_fail (key,  NULL);
197
198         priv = MODEST_CONF_GET_PRIVATE(self);
199         return gconf_client_get_string (priv->gconf_client, key, err);
200 }
201
202
203 gint
204 modest_conf_get_int (ModestConf* self, const gchar* key, GError **err)
205 {
206         ModestConfPrivate *priv;
207
208         g_return_val_if_fail (self, -1);
209         g_return_val_if_fail (key, -1);
210
211         priv = MODEST_CONF_GET_PRIVATE(self);
212         
213         return gconf_client_get_int (priv->gconf_client, key, err);
214 }
215
216
217 gboolean
218 modest_conf_get_bool (ModestConf* self, const gchar* key, GError **err)
219 {
220         ModestConfPrivate *priv;
221
222         g_return_val_if_fail (self, FALSE);
223         g_return_val_if_fail (key, FALSE);
224
225         priv = MODEST_CONF_GET_PRIVATE(self);
226         
227         return gconf_client_get_bool (priv->gconf_client, key, err);
228 }
229
230
231 GSList * 
232 modest_conf_get_list (ModestConf* self, const gchar* key, ModestConfValueType list_type,
233                       GError **err)
234 {
235         ModestConfPrivate *priv;
236         GConfValueType gconf_type;
237        
238         g_return_val_if_fail (self, NULL);
239         g_return_val_if_fail (key,  NULL);
240
241         priv = MODEST_CONF_GET_PRIVATE(self);
242
243         gconf_type = modest_conf_type_to_gconf_type (list_type, err);
244
245         return gconf_client_get_list (priv->gconf_client, key, gconf_type, err);
246 }
247
248
249
250
251 gboolean
252 modest_conf_set_string (ModestConf* self, const gchar* key, const gchar* val,
253                         GError **err)
254 {
255         ModestConfPrivate *priv;
256                 
257         g_return_val_if_fail (self,FALSE);
258         g_return_val_if_fail (key, FALSE);
259         g_return_val_if_fail (val, FALSE);
260         
261         priv = MODEST_CONF_GET_PRIVATE(self);
262
263         if (!gconf_client_key_is_writable(priv->gconf_client,key,err)) {
264                 g_printerr ("modest: '%s' is not writable\n", key);
265                 return FALSE;
266         }
267                         
268         if (gconf_client_set_string (priv->gconf_client, key, val, err)) {
269                 modest_conf_maemo_fake_on_change (self, key, MODEST_CONF_EVENT_KEY_CHANGED);
270                 return TRUE;
271         } else
272                 return FALSE;
273 }
274
275
276 gboolean
277 modest_conf_set_int  (ModestConf* self, const gchar* key, gint val,
278                       GError **err)
279 {
280         ModestConfPrivate *priv;
281                 
282         g_return_val_if_fail (self,FALSE);
283         g_return_val_if_fail (key, FALSE);
284         
285         priv = MODEST_CONF_GET_PRIVATE(self);
286
287         if (!gconf_client_key_is_writable(priv->gconf_client,key,err)) {
288                 g_printerr ("modest: '%s' is not writable\n", key);
289                 return FALSE;
290         }
291                         
292         if (gconf_client_set_int (priv->gconf_client, key, val, err)) {
293                 modest_conf_maemo_fake_on_change (self, key, MODEST_CONF_EVENT_KEY_CHANGED);
294                 return TRUE;
295         } else
296                 return FALSE;
297 }
298
299
300 gboolean
301 modest_conf_set_bool (ModestConf* self, const gchar* key, gboolean val,
302                       GError **err)
303 {
304         ModestConfPrivate *priv;
305                 
306         g_return_val_if_fail (self,FALSE);
307         g_return_val_if_fail (key, FALSE);
308         
309         priv = MODEST_CONF_GET_PRIVATE(self);
310
311         if (!gconf_client_key_is_writable(priv->gconf_client,key, err)) {
312                 g_warning ("modest: '%s' is not writable\n", key);
313                 return FALSE;
314         }
315
316         if (gconf_client_set_bool (priv->gconf_client, key, val, err)) {
317                 modest_conf_maemo_fake_on_change (self, key, MODEST_CONF_EVENT_KEY_CHANGED);
318                 return TRUE;
319         } else
320                 return FALSE;
321 }
322
323
324 gboolean
325 modest_conf_set_list (ModestConf* self, const gchar* key, 
326                       GSList *val, ModestConfValueType list_type, 
327                       GError **err)
328 {
329         ModestConfPrivate *priv;
330         GConfValueType gconf_type;
331         gboolean result;
332        
333         g_return_val_if_fail (self, FALSE);
334         g_return_val_if_fail (key, FALSE);
335
336         priv = MODEST_CONF_GET_PRIVATE(self);
337
338         gconf_type = modest_conf_type_to_gconf_type (list_type, err);
339         if (*err)
340                 return FALSE;
341
342         result = gconf_client_set_list (priv->gconf_client, key, gconf_type, val, err);
343         if(*err) {
344                 g_warning("gconf_client_set_list() failed with key=%s. error=%s", key,
345                           (*err)->message);
346                 result = FALSE;
347         }
348        
349         /* TODO: Remove this, when we fix the problem: */
350         /* This shows that sometimes set_list fails, while saying that it succeeded: */
351         if (result) {
352                 const gint debug_list_length_start = g_slist_length(val);
353                 GSList* debug_list = gconf_client_get_list(priv->gconf_client, key, gconf_type, err);
354                 const gint debug_list_length_after = g_slist_length(debug_list);
355                
356                 if(debug_list_length_start != debug_list_length_after)
357                         g_warning("modest_conf_set_list(): The list length after setting is "
358                                   "not the same as the specified list. key=%s. "
359                                   "We think that we fixed this, so tell us if you see this.", key);
360                 g_slist_free(debug_list);
361         }
362
363         if (result)
364                 modest_conf_maemo_fake_on_change (self, key, MODEST_CONF_EVENT_KEY_CHANGED);
365         
366         return result;
367 }
368
369
370 GSList*
371 modest_conf_list_subkeys (ModestConf* self, const gchar* key, GError **err)
372 {
373         ModestConfPrivate *priv;
374                 
375         g_return_val_if_fail (self,FALSE);
376         g_return_val_if_fail (key, FALSE);
377         
378         priv = MODEST_CONF_GET_PRIVATE(self);
379                         
380         return gconf_client_all_dirs (priv->gconf_client,key,err);
381 }
382
383
384 gboolean
385 modest_conf_remove_key (ModestConf* self, const gchar* key, GError **err)
386 {
387         ModestConfPrivate *priv;
388         gboolean retval;
389         
390         g_return_val_if_fail (self,FALSE);
391         g_return_val_if_fail (key, FALSE);
392         
393         priv = MODEST_CONF_GET_PRIVATE(self);
394                         
395         retval = gconf_client_recursive_unset (priv->gconf_client,key,0,err);
396         gconf_client_suggest_sync (priv->gconf_client, NULL);
397
398         if (retval) {
399                 modest_conf_maemo_fake_on_change (self, key, MODEST_CONF_EVENT_KEY_UNSET);
400                 return TRUE;
401         } else
402                 return FALSE;
403 }
404
405
406 gboolean
407 modest_conf_key_exists (ModestConf* self, const gchar* key, GError **err)
408 {
409         ModestConfPrivate *priv;
410         GConfValue *val;
411
412         g_return_val_if_fail (self,FALSE);
413         g_return_val_if_fail (key, FALSE);
414         
415         priv = MODEST_CONF_GET_PRIVATE(self);
416
417         /* the fast way... */
418         if (gconf_client_dir_exists (priv->gconf_client,key,err))
419                 return TRUE;
420         
421         val = gconf_client_get (priv->gconf_client, key, NULL);
422         if (!val)
423                 return FALSE;
424         else {
425                 gconf_value_free (val);
426                 return TRUE;
427         }       
428 }
429
430
431 gchar*
432 modest_conf_key_escape (const gchar* key)
433 {
434         g_return_val_if_fail (key, NULL);
435         g_return_val_if_fail (strlen (key) > 0, g_strdup (key));
436         
437         return gconf_escape_key (key, strlen(key));
438 }
439
440
441 gchar*
442 modest_conf_key_unescape (const gchar* key)
443 {
444         g_return_val_if_fail (key, NULL);
445
446         return gconf_unescape_key (key, strlen(key));
447 }
448
449 gboolean
450 modest_conf_key_is_valid (const gchar* key)
451 {
452         return gconf_valid_key (key, NULL);
453 }
454
455 /* hmmm... might need to make specific callback for specific keys */
456 static void
457 modest_conf_on_change (GConfClient *client, guint conn_id, GConfEntry *entry,
458                        gpointer data)
459 {
460         ModestConfEvent event;
461         const gchar* key;
462
463         event = (entry->value) ? MODEST_CONF_EVENT_KEY_CHANGED : MODEST_CONF_EVENT_KEY_UNSET;
464         key    = gconf_entry_get_key (entry);
465
466         g_signal_emit (G_OBJECT(data),
467                        signals[KEY_CHANGED_SIGNAL], 0,
468                        key, event);
469 }
470
471
472 static GConfValueType
473 modest_conf_type_to_gconf_type (ModestConfValueType value_type, GError **err)
474 {
475         GConfValueType gconf_type;
476
477         switch (value_type) {
478         case MODEST_CONF_VALUE_INT:
479                 gconf_type = GCONF_VALUE_INT;
480                 break;
481         case MODEST_CONF_VALUE_BOOL:
482                 gconf_type = GCONF_VALUE_BOOL;
483                 break;
484         case MODEST_CONF_VALUE_FLOAT:
485                 gconf_type = GCONF_VALUE_FLOAT;
486                 break;
487         case MODEST_CONF_VALUE_STRING:
488                 gconf_type = GCONF_VALUE_STRING;
489                 break;
490         default:
491                 /* FIXME: use MODEST_ERROR, and error code */
492                 gconf_type = GCONF_VALUE_INVALID;
493                 g_printerr ("modest: invalid list value type %d\n", value_type);
494                 *err = g_error_new_literal (0, 0, "invalid list value type");
495         }       
496         return gconf_type;
497 }
498
499
500
501 ////////////////////////////////////////////////////////////////////////////////
502 /* workaround for the b0rked dbus-gconf on maemo */
503 /* fires a fake change notification after 0.3 secs.
504  * Might not be necessary anymore. */
505 #if 0
506 #ifdef MODEST_PLATFORM_MAEMO
507 typedef struct {
508         GObject *obj;
509         gchar   *key;
510 } ChangeHelper;
511
512 ChangeHelper*
513 change_helper_new (ModestConf *conf, const gchar *key)
514 {
515         ChangeHelper *helper = g_slice_alloc  (sizeof(ChangeHelper));
516         helper->obj  = g_object_ref(G_OBJECT(conf));
517         helper->key  = g_strdup (key);
518         return helper;
519 }
520
521 static void
522 change_helper_free (ChangeHelper *helper)
523 {
524         g_object_unref (helper->obj);
525         g_free (helper->key);
526         helper->key = NULL;
527         helper->obj = NULL;
528         g_slice_free (ChangeHelper,helper);
529 }
530
531 static gboolean
532 emit_change_cb (ChangeHelper *helper)
533 {
534         if (!helper)
535                 return FALSE;   
536         g_signal_emit (G_OBJECT(helper->obj),signals[KEY_CHANGED_SIGNAL], 0,
537                        helper->key, MODEST_CONF_EVENT_KEY_CHANGED);
538         change_helper_free (helper);
539         
540         return FALSE;
541 }
542
543 static gboolean
544 emit_remove_cb (ChangeHelper *helper)
545 {
546         if (!helper)
547                 return FALSE;
548         g_signal_emit (G_OBJECT(helper->obj),signals[KEY_CHANGED_SIGNAL], 0,
549                        helper->key, MODEST_CONF_EVENT_KEY_UNSET);
550         change_helper_free (helper);
551         
552         return FALSE;
553 }
554 #endif /* MODEST_PLATFORM_MAEMO */
555 #endif
556         
557 static void
558 modest_conf_maemo_fake_on_change (ModestConf *conf, const gchar* key, ModestConfEvent event)
559 {
560 /* hack for faster notification, might not be necessary anymore: */
561 #if 0
562 #ifdef MODEST_PLATFORM_MAEMO
563
564         ChangeHelper *helper = change_helper_new (conf,key); 
565         g_timeout_add (100, /* after 100 ms */
566                        (event == MODEST_CONF_EVENT_KEY_CHANGED)
567                        ? (GSourceFunc)emit_change_cb : (GSourceFunc)emit_remove_cb,
568                        (gpointer)helper);
569 #endif /* MODEST_PLATFORM_MAEMO */
570 #endif 
571 }
572 //////////////////////////////////////////////////////////////////////////////////