[glib/new-gsettings] Add a simple GKeyFile-based store for the memory backend

[Vincent Untz <vuntz src gnome org>]

commit 6eb4e56b36326c0f78f92a9a3e92bb6b9c1c9d57
Author: Vincent Untz <vuntz gnome org>
Date:   Tue Apr 13 22:03:29 2010 -0400

    Add a simple GKeyFile-based store for the memory backend
    
    It needs some testing, but the simple test application works fine.

 gio/gmemorysettingsbackend.c |  238 +++++++++++++++++++++++++++++++++++++++++-
 1 files changed, 234 insertions(+), 4 deletions(-)
---
diff --git a/gio/gmemorysettingsbackend.c b/gio/gmemorysettingsbackend.c
index 4548414..a6c4829 100644
--- a/gio/gmemorysettingsbackend.c
+++ b/gio/gmemorysettingsbackend.c
@@ -1,3 +1,11 @@
+#include <stdio.h>
+#include <string.h>
+#include <errno.h>
+
+#include "giomodule.h"
+#include "gfile.h"
+#include "gfilemonitor.h"
+
 #include "gmemorysettingsbackend.h"
 
 G_DEFINE_TYPE_WITH_CODE (GMemorySettingsBackend,
@@ -8,7 +16,11 @@ G_DEFINE_TYPE_WITH_CODE (GMemorySettingsBackend,
 
 struct _GMemorySettingsBackendPrivate
 {
-  GHashTable *table;
+  GHashTable   *table;
+  gchar        *keyfile_path;
+  gchar        *keyfile_checksum;
+  GKeyFile     *keyfile;
+  GFileMonitor *monitor;
 };
 
 static GVariant *
@@ -35,22 +47,67 @@ g_memory_settings_backend_write_one (gpointer key,
 {
   GMemorySettingsBackend *memory = ((gpointer *) data)[0];
   const gchar *prefix = ((gpointer *) data)[1];
+  gchar *path;
+  gchar *slash;
+  gchar *base_key;
+
+  g_hash_table_replace (memory->priv->table,
+                        g_strjoin ("", prefix, key, NULL),
+                        g_variant_ref (value));
+
+  path = g_strjoin ("", prefix, key, NULL);
+  slash = strrchr (path, '/');
+  base_key = g_strdup (slash + 1);
+  slash[1] = '\0';
 
-  g_hash_table_insert (memory->priv->table,
-                       g_strjoin ("", prefix, key, NULL),
-                       g_variant_ref (value));
+  g_key_file_set_string (memory->priv->keyfile,
+                         path, base_key, g_variant_print (value, FALSE));
+
+  g_free (path);
+  g_free (base_key);
 
   return FALSE;
 }
 
 static void
+g_memory_settings_backend_keyfile_write (GMemorySettingsBackend *memory)
+{
+  gchar *dirname;
+  gchar *contents;
+  gsize  length;
+  GFile *file;
+
+  dirname = g_path_get_dirname (memory->priv->keyfile_path);
+  if (!g_file_test (dirname, G_FILE_TEST_IS_DIR))
+    g_mkdir_with_parents (dirname, 0700);
+  g_free (dirname);
+
+  contents = g_key_file_to_data (memory->priv->keyfile, &length, NULL);
+
+  file = g_file_new_for_path (memory->priv->keyfile_path);
+  g_file_replace_contents (file, contents, length,
+                           NULL, FALSE, G_FILE_CREATE_REPLACE_DESTINATION,
+                           NULL, NULL, NULL);
+  g_object_unref (file);
+
+  g_free (memory->priv->keyfile_checksum);
+  memory->priv->keyfile_checksum = g_compute_checksum_for_string (G_CHECKSUM_SHA256, contents, length);
+
+  g_free (contents);
+}
+
+static void
 g_memory_settings_backend_write (GSettingsBackend *backend,
                                  const gchar      *prefix,
                                  GTree            *tree,
                                  gpointer          origin_tag)
 {
+  GMemorySettingsBackend *memory = G_MEMORY_SETTINGS_BACKEND (backend);
   gpointer write_info[] = { backend, (gpointer) prefix };
+
   g_tree_foreach (tree, g_memory_settings_backend_write_one, write_info);
+  g_memory_settings_backend_keyfile_write (memory);
+
   g_settings_backend_changed_tree (backend, prefix, tree, origin_tag);
 }
 
@@ -62,11 +119,163 @@ g_memory_settings_backend_get_writable (GSettingsBackend *backend,
 }
 
 static void
+g_memory_settings_backend_keyfile_reload (GMemorySettingsBackend *memory)
+{
+  gchar       *contents = NULL;
+  gsize        length = 0;
+  gchar       *new_checksum;
+  GHashTable  *loaded_keys;
+  GPtrArray   *changed_array;
+  gchar      **groups = NULL;
+  gsize        groups_nb = 0;
+  int          i;
+  GList       *keys_l = NULL;
+  GList       *l;
+
+  if (!g_file_get_contents (memory->priv->keyfile_path,
+                            &contents, &length, NULL))
+    {
+      contents = g_strdup ("");
+      length = 0;
+    }
+
+  new_checksum = g_compute_checksum_for_string (G_CHECKSUM_SHA256, contents, length);
+
+  if (g_strcmp0 (memory->priv->keyfile_checksum, new_checksum) == 0) {
+    g_free (new_checksum);
+    return;
+  }
+
+  if (memory->priv->keyfile_checksum != NULL)
+    g_free (memory->priv->keyfile_checksum);
+  memory->priv->keyfile_checksum = new_checksum;
+
+  if (memory->priv->keyfile != NULL)
+    g_key_file_free (memory->priv->keyfile);
+
+  memory->priv->keyfile = g_key_file_new ();
+
+  /* we just silently ignore errors: there's not much we can do about them */
+  if (length > 0)
+    g_key_file_load_from_data (memory->priv->keyfile, contents, length,
+                               G_KEY_FILE_KEEP_COMMENTS|G_KEY_FILE_KEEP_TRANSLATIONS, NULL);
+
+  loaded_keys = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
+  changed_array = g_ptr_array_new_with_free_func (g_free);
+
+  /* Load keys from the keyfile */
+  groups = g_key_file_get_groups (memory->priv->keyfile, &groups_nb);
+  for (i = 0; i < groups_nb; i++)
+    {
+      gchar **keys = NULL;
+      gsize   keys_nb = 0;
+      int     j;
+
+      keys = g_key_file_get_keys (memory->priv->keyfile, groups[i], &keys_nb, NULL);
+      if (keys == NULL)
+        continue;
+
+      for (j = 0; j < keys_nb; j++)
+        {
+          gchar    *value;
+          gchar    *full_key;
+          GVariant *old_variant;
+          GVariant *variant;
+
+          value = g_key_file_get_string (memory->priv->keyfile, groups[i], keys[j], NULL);
+          if (value == NULL)
+            continue;
+
+          variant = g_variant_new_parsed (value);
+          g_free (value);
+
+          if (variant == NULL)
+            continue;
+
+          full_key = g_strjoin ("", groups[i], keys[j], NULL),
+          g_hash_table_insert (loaded_keys, full_key, GINT_TO_POINTER(TRUE));
+
+          old_variant = g_hash_table_lookup (memory->priv->table, full_key);
+
+          if (old_variant == NULL || !g_variant_equal (old_variant, variant))
+            {
+              g_ptr_array_add (changed_array, g_strdup (full_key));
+              g_hash_table_replace (memory->priv->table,
+                                    g_strdup (full_key),
+                                    g_variant_ref_sink (variant));
+            }
+          else
+            g_variant_unref (variant);
+        }
+
+      g_strfreev (keys);
+    }
+  g_strfreev (groups);
+
+  /* Remove keys that were in the hashtable but not in the keyfile */
+  keys_l = g_hash_table_get_keys (memory->priv->table);
+  for (l = keys_l; l != NULL; l = l->next)
+    {
+      gchar *key = l->data;
+
+      if (g_hash_table_lookup_extended (loaded_keys, key, NULL, NULL))
+        continue;
+
+      g_ptr_array_add (changed_array, g_strdup (key));
+      g_hash_table_remove (memory->priv->table, key);
+    }
+  g_list_free (keys_l);
+
+  if (changed_array->len > 0)
+    {
+      /* the array has to be NULL-terminated */
+      g_ptr_array_add (changed_array, NULL);
+      g_settings_backend_changed (G_SETTINGS_BACKEND (memory),
+                                  NULL,
+                                  (const gchar **) changed_array->pdata,
+                                  changed_array->len - 1,
+                                  NULL);
+    }
+
+  g_hash_table_unref (loaded_keys);
+  g_ptr_array_free (changed_array, TRUE);
+}
+
+static void
+g_memory_settings_backend_keyfile_changed (GFileMonitor      *monitor,
+                                           GFile             *file,
+                                           GFile             *other_file,
+                                           GFileMonitorEvent  event_type,
+                                           gpointer           user_data)
+{
+  GMemorySettingsBackend *memory;
+
+  if (event_type != G_FILE_MONITOR_EVENT_CHANGED &&
+      event_type != G_FILE_MONITOR_EVENT_CREATED &&
+      event_type != G_FILE_MONITOR_EVENT_DELETED)
+    return;
+
+  memory = G_MEMORY_SETTINGS_BACKEND (user_data);
+  g_memory_settings_backend_keyfile_reload (memory);
+}
+
+static void
 g_memory_settings_backend_finalize (GObject *object)
 {
   GMemorySettingsBackend *memory = G_MEMORY_SETTINGS_BACKEND (object);
 
   g_hash_table_unref (memory->priv->table);
+  memory->priv->table = NULL;
+
+  g_free (memory->priv->keyfile_path);
+  memory->priv->keyfile_path = NULL;
+
+  g_key_file_free (memory->priv->keyfile);
+  memory->priv->keyfile = NULL;
+
+  g_file_monitor_cancel (memory->priv->monitor);
+  g_object_unref (memory->priv->monitor);
+  memory->priv->monitor = NULL;
 
   G_OBJECT_CLASS (g_memory_settings_backend_parent_class)
     ->finalize (object);
@@ -75,12 +284,33 @@ g_memory_settings_backend_finalize (GObject *object)
 static void
 g_memory_settings_backend_init (GMemorySettingsBackend *memory)
 {
+  const gchar *store_path;
+  GFile       *file;
+
   memory->priv = G_TYPE_INSTANCE_GET_PRIVATE (memory,
                                               G_TYPE_MEMORY_SETTINGS_BACKEND,
                                               GMemorySettingsBackendPrivate);
   memory->priv->table =
     g_hash_table_new_full (g_str_hash, g_str_equal, g_free,
                            (GDestroyNotify) g_variant_unref);
+
+  store_path = g_getenv ("GSETTINGS_MEMORY_BACKEND_STORE");
+  if (store_path != NULL && store_path[0] != '\0')
+    memory->priv->keyfile_path = g_strdup (store_path);
+  else
+    memory->priv->keyfile_path = g_build_filename (g_get_user_config_dir (),
+                                                   "gsettings", "store", NULL);
+
+  memory->priv->keyfile_checksum = NULL;
+  memory->priv->keyfile = NULL;
+
+  file = g_file_new_for_path (memory->priv->keyfile_path);
+  memory->priv->monitor = g_file_monitor_file (file, G_FILE_MONITOR_NONE, NULL, NULL);
+  g_signal_connect (memory->priv->monitor, "changed",
+                    (GCallback)g_memory_settings_backend_keyfile_changed, memory);
+  g_object_unref (file);
+
+  g_memory_settings_backend_keyfile_reload (memory);
 }
 
 static void