#include <config.h>
#include <string.h>

#include <glib.h>
#include <gconf/gconf-client.h>
#include <libgnomeui/gnome-client.h>

#include "panel-gconf.h"

#undef PANEL_GCONF_DEBUG

gchar * 
panel_gconf_global_config_get_full_key (const gchar *key) {
	return g_strdup_printf ("/apps/panel/global/%s", key);
}

gchar *
panel_gconf_general_profile_get_full_key (const gchar *profile, const gchar *key) {
	return g_strdup_printf ("/apps/panel/profiles/%s/general/%s", profile, key);
}

gchar *
panel_gconf_panel_profile_get_full_key (const gchar *profile, const gchar *panel_id, const gchar *key) {
	return g_strdup_printf ("/apps/panel/profiles/%s/panels/%s/%s", profile, panel_id, key);
}

gchar *
panel_gconf_applets_profile_get_full_key (const gchar *profile, const gchar *applet_id, const gchar *key) {
	return g_strdup_printf ("/apps/panel/profiles/%s/applets/%s/%s", profile, applet_id, key);
}

gchar *
panel_gconf_objects_profile_get_full_key (const gchar *profile, const gchar *object_id, const gchar *key) {
	return g_strdup_printf ("/apps/panel/profiles/%s/objects/%s/%s", profile, object_id, key);
}

gchar *
panel_gconf_general_default_profile_get_full_key (const gchar *profile, const gchar *key) {
	return g_strdup_printf ("/apps/panel/default-profiles/%s/general/%s", profile, key);
}

gchar *
panel_gconf_panel_default_profile_get_full_key (const gchar *profile, const gchar *panel_id, const gchar *key) {
	return g_strdup_printf ("/apps/panel/default-profiles/%s/panels/%s/%s", profile, panel_id, key);
}

gchar *
panel_gconf_applets_default_profile_get_full_key (const gchar *profile, const gchar *applet_id, const gchar *key) {
	return g_strdup_printf ("/apps/panel/default-profiles/%s/applets/%s/%s", profile, applet_id, key);
}

gchar *
panel_gconf_objects_default_profile_get_full_key (const gchar *profile, const gchar *object_id, const gchar *key) {
	return g_strdup_printf ("/apps/panel/default-profiles/%s/objects/%s/%s", profile, object_id, key);
}

GConfClient * 
panel_gconf_get_client (void) {
	static GConfClient *client = NULL;

        if (!client)
                client = gconf_client_get_default ();

        return client;
}

GSList *
panel_gconf_all_global_entries (void)
{
	GSList *list;

	list = gconf_client_all_entries (panel_gconf_get_client (),
					 "/apps/panel/global",
					 NULL);

	return list;
}

gint 
panel_gconf_get_int (const gchar *key, gint default_val) {
	GConfValue *value;
	GError *error = NULL;

	value =  gconf_client_get (panel_gconf_get_client (), key, &error);

	if (value != NULL) {
		gint retval; 
	
		g_assert (error == NULL);

		if (value->type == GCONF_VALUE_INT)  {
			retval = gconf_value_get_int (value);
		} else {
			/* FIXME : We still need to handle errors better than this */
			retval = default_val;
		}
		gconf_value_free (value);

		return retval;
	} else {
		return default_val;
	}
}

gboolean
panel_gconf_get_bool (const gchar *key, gboolean default_val) {
	GConfValue *value;
	GError *error = NULL;

	value = gconf_client_get (panel_gconf_get_client (), key, &error);
	
	if (value != NULL) {
		gboolean retval;

		g_assert (error == NULL);

		if (value->type == GCONF_VALUE_BOOL) {
			retval = gconf_value_get_bool (value);
		} else {
			/* FIXME : We still need to handle errors better than this */
			retval = default_val;
		}

		gconf_value_free (value);

		return retval;
	} else {
		return default_val;
	}
}

gchar * 
panel_gconf_get_string (const gchar *key, const gchar *default_val) {
	GConfValue *value;
	GError *error = NULL;

	value = gconf_client_get (panel_gconf_get_client (), key, &error);

	if (value != NULL) {
		gchar *retval;
	
		g_assert (error == NULL);

		if (value->type == GCONF_VALUE_STRING) {	
			retval = g_strdup (gconf_value_get_string (value));
		} else {
			/* FIXME : We still need to handle errors better than this */
			retval = g_strdup (default_val);
		}

		gconf_value_free (value);

		return retval;
	} else {
		return g_strdup (default_val);
	}
}

void 
panel_gconf_set_int (const gchar *key, gint value) {

	gconf_client_set_int (panel_gconf_get_client (), key, value, NULL);
			      
	return;
}

void 
panel_gconf_set_bool (const gchar *key, gboolean value) {

	gconf_client_set_bool (panel_gconf_get_client (), key, value, NULL);

	return;
}

void 
panel_gconf_set_string (const gchar *key, const gchar *value) {

	gconf_client_set_string (panel_gconf_get_client (), key, value, NULL);

	return;
}

guint 
panel_gconf_notify_add (const gchar *key, GConfClientNotifyFunc notify_func, gpointer user_data) {
	guint notify_id;
	notify_id = gconf_client_notify_add (panel_gconf_get_client (), 
					     key, 
					     notify_func, 
					     user_data, 
					     NULL, NULL);
	return notify_id;
}

static void
panel_notify_object_dead (guint notify_id)
{
	gconf_client_notify_remove (panel_gconf_get_client (),
				    notify_id);
}

guint
panel_gconf_notify_add_while_alive (const gchar *key, 
				    GConfClientNotifyFunc notify_func, 
				    GObject *alive_object)
{
	guint notify_id;

	g_return_val_if_fail (G_IS_OBJECT (alive_object), 0);

	notify_id = panel_gconf_notify_add (key, notify_func, alive_object);
	if (notify_id > 0) {
		/* Add a weak reference to the object so that we can
		 * remove the notification when the object's gone. */
		g_object_weak_ref (alive_object,
				   (GWeakNotify)panel_notify_object_dead,
				   GUINT_TO_POINTER (notify_id));
	}
	return notify_id;
}

void
panel_gconf_add_dir (const gchar *key) {
	gconf_client_add_dir (panel_gconf_get_client (),
			      key,
			      GCONF_CLIENT_PRELOAD_NONE,
			      NULL);
	return;
}

gboolean
panel_gconf_dir_exists (const gchar *key) {
	GError   *error = NULL;
	gboolean  retval = FALSE;

	g_return_val_if_fail (key != NULL, FALSE);
	
	retval = gconf_client_dir_exists (panel_gconf_get_client (), key, &error);
	if (error) {
		g_warning (G_STRLOC ": gconf error from dir_exists(): %s", error->message);
		g_error_free (error);
	}

	return retval;
}

char *
panel_gconf_objects_get_full_key (const gchar *profile,
				  const gchar *object_id,
				  const gchar *key,
				  gboolean     use_default)
{
	char *retval = NULL;

   	retval = use_default ? panel_gconf_objects_default_profile_get_full_key (profile, object_id, key) :
		panel_gconf_objects_profile_get_full_key (profile, object_id, key);

	return retval;
}

/* FIXME: cut and paste code from gconf - hopefully this will be public API for future releases */

void
panel_gconf_directory_recursive_clean (GConfClient *client, const gchar *dir) {
	GSList *subdirs;
	GSList *entries;
	GSList *tmp;

	subdirs = gconf_client_all_dirs (client, dir, NULL);

#ifdef PANEL_GCONF_DEBUG
	printf ("Recursive Clean for %s\n", dir);
#endif 

	if (subdirs != NULL) {
    		tmp = subdirs;

    		while (tmp != NULL) {
      			gchar *s = tmp->data;
      			panel_gconf_directory_recursive_clean (client, s);
      			g_free (s);
      			tmp = g_slist_next (tmp);
    		}

	    	g_slist_free (subdirs);
  	}
 
  	entries = gconf_client_all_entries (client, dir, NULL);

  	if (entries != NULL) {
    		tmp = entries;

    		while (tmp != NULL) {
 			GConfEntry *entry = tmp->data;

#ifdef PANEL_GCONF_DEBUG
			printf ("Unsetting %s\n", gconf_entry_get_key (entry));
#endif 
      			gconf_client_unset (client, gconf_entry_get_key (entry), NULL);
      			gconf_entry_free (entry);
      			tmp = g_slist_next (tmp);
    		}
    		
		g_slist_free (entries);
  	}

	gconf_client_unset (client, dir, NULL);
}