path: root/libempathy-gtk/empathy-theme-manager.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
 * Copyright (C) 2005-2007 Imendio AB
 * Copyright (C) 2008 Collabora Ltd.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public
 * License along with this program; if not, write to the
 * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
 * Boston, MA  02110-1301  USA
 *
 * Authors: Xavier Claessens <xclaesse@gmail.com>
 */

#include "config.h"

#include <string.h>

#include <glib/gi18n-lib.h>
#include <telepathy-glib/dbus.h>
#include <gtk/gtk.h>

#include <telepathy-glib/util.h>

#include <libempathy/empathy-gsettings.h>
#include <libempathy/empathy-utils.h>

#include "empathy-theme-manager.h"
#include "empathy-chat-view.h"
#include "empathy-chat-text-view.h"
#include "empathy-theme-adium.h"

#define DEBUG_FLAG EMPATHY_DEBUG_OTHER
#include <libempathy/empathy-debug.h>

#define GET_PRIV(obj) EMPATHY_GET_PRIV (obj, EmpathyThemeManager)
typedef struct {
    GSettings   *gsettings_chat;
    guint        emit_changed_idle;
    gboolean     in_constructor;

    EmpathyAdiumData *adium_data;
    gchar *adium_variant;
    /* list of weakref to EmpathyThemeAdium objects */
    GList *adium_views;
} EmpathyThemeManagerPriv;

enum {
    THEME_CHANGED,
    LAST_SIGNAL
};

static guint signals[LAST_SIGNAL] = { 0 };

G_DEFINE_TYPE (EmpathyThemeManager, empathy_theme_manager, G_TYPE_OBJECT);

static gboolean
theme_manager_emit_changed_idle_cb (gpointer manager)
{
    EmpathyThemeManagerPriv *priv = GET_PRIV (manager);
    const gchar *adium_path = NULL;

    if (priv->adium_data) {
        adium_path = empathy_adium_data_get_path (priv->adium_data);
    }
    DEBUG ("Emit theme-changed with: adium_path='%s' "
           "adium_variant='%s'", adium_path,
           priv->adium_variant);

    g_signal_emit (manager, signals[THEME_CHANGED], 0, NULL);
    priv->emit_changed_idle = 0;

    return FALSE;
}

static void
theme_manager_emit_changed (EmpathyThemeManager *manager)
{
    EmpathyThemeManagerPriv *priv = GET_PRIV (manager);

    /* We emit the signal in idle callback to be sure we emit it only once
     * in the case both the name and adium_path changed */
    if (priv->emit_changed_idle == 0 && !priv->in_constructor) {
        priv->emit_changed_idle = g_idle_add (
            theme_manager_emit_changed_idle_cb, manager);
    }
}

static void
theme_manager_view_weak_notify_cb (gpointer data,
                    GObject *where_the_object_was)
{
    GList **list = data;
    *list = g_list_remove (*list, where_the_object_was);
}

static void
clear_list_of_views (GList **views)
{
    while (*views) {
        g_object_weak_unref ((*views)->data,
                     theme_manager_view_weak_notify_cb,
                     views);
        *views = g_list_delete_link (*views, *views);
    }
}

static EmpathyThemeAdium *
theme_manager_create_adium_view (EmpathyThemeManager *manager)
{
    EmpathyThemeManagerPriv *priv = GET_PRIV (manager);
    EmpathyThemeAdium *theme;

    theme = empathy_theme_adium_new (priv->adium_data, priv->adium_variant);
    priv->adium_views = g_list_prepend (priv->adium_views, theme);
    g_object_weak_ref (G_OBJECT (theme),
               theme_manager_view_weak_notify_cb,
               &priv->adium_views);

    return theme;
}

static void
theme_manager_notify_adium_path_cb (GSettings   *gsettings_chat,
                    const gchar *key,
                    gpointer     user_data)
{
    EmpathyThemeManager     *manager = EMPATHY_THEME_MANAGER (user_data);
    EmpathyThemeManagerPriv *priv = GET_PRIV (manager);
    const gchar             *current_path = NULL;
    gchar                   *new_path;

    new_path = g_settings_get_string (gsettings_chat, key);

    if (priv->adium_data != NULL) {
        current_path = empathy_adium_data_get_path (priv->adium_data);
    }

    /* If path did not really changed, ignore */
    if (!tp_strdiff (current_path, new_path)) {
        goto finally;
    }

    /* If path does not really contains an adium path, ignore */
    if (empathy_adium_path_is_valid (new_path)) {
        /* pass */
    } else if (empathy_theme_manager_find_theme (new_path) != NULL) {
        new_path = empathy_theme_manager_find_theme (new_path);
    } else {
        g_warning ("Do not understand theme: %s", new_path);
        goto finally;
    }

    /* Load new theme data, we can stop tracking existing views since we
     * won't be able to change them live anymore */
    clear_list_of_views (&priv->adium_views);
    tp_clear_pointer (&priv->adium_data, empathy_adium_data_unref);
    priv->adium_data = empathy_adium_data_new (new_path);

    theme_manager_emit_changed (manager);

finally:
    g_free (new_path);
}

static void
theme_manager_notify_adium_variant_cb (GSettings   *gsettings_chat,
                       const gchar *key,
                       gpointer     user_data)
{
    EmpathyThemeManager     *manager = EMPATHY_THEME_MANAGER (user_data);
    EmpathyThemeManagerPriv *priv = GET_PRIV (manager);
    gchar                   *new_variant;
    GList                   *l;

    new_variant = g_settings_get_string (gsettings_chat, key);
    if (!tp_strdiff (priv->adium_variant, new_variant)) {
        g_free (new_variant);
        return;
    }

    g_free (priv->adium_variant);
    priv->adium_variant = new_variant;

    for (l = priv->adium_views; l; l = l->next) {
        empathy_theme_adium_set_variant (EMPATHY_THEME_ADIUM (l->data),
            priv->adium_variant);
    }
}

EmpathyChatView *
empathy_theme_manager_create_view (EmpathyThemeManager *manager)
{
    EmpathyThemeManagerPriv *priv = GET_PRIV (manager);

    g_return_val_if_fail (EMPATHY_IS_THEME_MANAGER (manager), NULL);

    if (priv->adium_data != NULL)  {
        return EMPATHY_CHAT_VIEW (theme_manager_create_adium_view (manager));
    }

    g_return_val_if_reached (NULL);
}

static void
theme_manager_finalize (GObject *object)
{
    EmpathyThemeManagerPriv *priv = GET_PRIV (object);

    g_object_unref (priv->gsettings_chat);

    if (priv->emit_changed_idle != 0) {
        g_source_remove (priv->emit_changed_idle);
    }

    clear_list_of_views (&priv->adium_views);
    g_free (priv->adium_variant);
    tp_clear_pointer (&priv->adium_data, empathy_adium_data_unref);

    G_OBJECT_CLASS (empathy_theme_manager_parent_class)->finalize (object);
}

static void
empathy_theme_manager_class_init (EmpathyThemeManagerClass *klass)
{
    GObjectClass *object_class = G_OBJECT_CLASS (klass);

    signals[THEME_CHANGED] =
        g_signal_new ("theme-changed",
                  G_OBJECT_CLASS_TYPE (object_class),
                  G_SIGNAL_RUN_LAST,
                  0,
                  NULL, NULL,
                  g_cclosure_marshal_generic,
                  G_TYPE_NONE,
                  0);

    g_type_class_add_private (object_class, sizeof (EmpathyThemeManagerPriv));

    object_class->finalize = theme_manager_finalize;
}

static void
empathy_theme_manager_init (EmpathyThemeManager *manager)
{
    EmpathyThemeManagerPriv *priv = G_TYPE_INSTANCE_GET_PRIVATE (manager,
        EMPATHY_TYPE_THEME_MANAGER, EmpathyThemeManagerPriv);

    manager->priv = priv;
    priv->in_constructor = TRUE;

    priv->gsettings_chat = g_settings_new (EMPATHY_PREFS_CHAT_SCHEMA);

    /* Take the adium path/variant and track changes */
    g_signal_connect (priv->gsettings_chat,
              "changed::" EMPATHY_PREFS_CHAT_ADIUM_PATH,
              G_CALLBACK (theme_manager_notify_adium_path_cb),
              manager);
    theme_manager_notify_adium_path_cb (priv->gsettings_chat,
                        EMPATHY_PREFS_CHAT_ADIUM_PATH,
                        manager);

    g_signal_connect (priv->gsettings_chat,
              "changed::" EMPATHY_PREFS_CHAT_THEME_VARIANT,
              G_CALLBACK (theme_manager_notify_adium_variant_cb),
              manager);
    theme_manager_notify_adium_variant_cb (priv->gsettings_chat,
                           EMPATHY_PREFS_CHAT_THEME_VARIANT,
                           manager);
    priv->in_constructor = FALSE;
}

EmpathyThemeManager *
empathy_theme_manager_dup_singleton (void)
{
    static EmpathyThemeManager *manager = NULL;

    if (manager == NULL) {
        manager = g_object_new (EMPATHY_TYPE_THEME_MANAGER, NULL);
        g_object_add_weak_pointer (G_OBJECT (manager), (gpointer *) &manager);

        return manager;
    }

    return g_object_ref (manager);
}

static void
find_themes (GList **list, const gchar *dirpath)
{
    GDir *dir;
    GError *error = NULL;
    const gchar *name = NULL;
    GHashTable *info = NULL;

    dir = g_dir_open (dirpath, 0, &error);
    if (dir != NULL) {
        name = g_dir_read_name (dir);
        while (name != NULL) {
            gchar *path;

            path = g_build_path (G_DIR_SEPARATOR_S, dirpath, name, NULL);
            if (empathy_adium_path_is_valid (path)) {
                info = empathy_adium_info_new (path);
                if (info != NULL) {
                    *list = g_list_prepend (*list, info);
                }
            }
            g_free (path);
            name = g_dir_read_name (dir);
        }
        g_dir_close (dir);
    } else {
        DEBUG ("Error opening %s: %s\n", dirpath, error->message);
        g_error_free (error);
    }
}

GList *
empathy_theme_manager_get_adium_themes (void)
{
    GList *themes_list = NULL;
    gchar *userpath = NULL;
    const gchar *const *paths = NULL;
    gint i = 0;

    userpath = g_build_path (G_DIR_SEPARATOR_S, g_get_user_data_dir (), "adium/message-styles", NULL);
    find_themes (&themes_list, userpath);
    g_free (userpath);

    paths = g_get_system_data_dirs ();
    for (i = 0; paths[i] != NULL; i++) {
        userpath = g_build_path (G_DIR_SEPARATOR_S, paths[i],
            "adium/message-styles", NULL);
        find_themes (&themes_list, userpath);
        g_free (userpath);
    }

    return themes_list;
}

gchar *
empathy_theme_manager_find_theme (const gchar *name)
{
    gchar *path;
    const gchar * const *paths;
    gint i;

    /* look in EMPATHY_SRCDIR */
    path = g_strjoin (NULL,
            g_getenv ("EMPATHY_SRCDIR"),
            "/data/themes/",
            name,
            ".AdiumMessageStyle",
            NULL);

    DEBUG ("Trying '%s'", path);

    if (empathy_adium_path_is_valid (path))
        return path;

    g_free (path);

    /* look in user dir */
    path = g_strjoin (NULL,
            g_get_user_data_dir (),
            "/adium/message-styles/",
            name,
            ".AdiumMessageStyle",
            NULL);

    DEBUG ("Trying '%s'", path);

    if (empathy_adium_path_is_valid (path))
        return path;

    g_free (path);

    /* look in system dirs */
    paths = g_get_system_data_dirs ();

    for (i = 0; paths[i] != NULL; i++) {
        path = g_strjoin (NULL,
                paths[i],
                "/adium/message-styles/",
                name,
                ".AdiumMessageStyle",
                NULL);

        DEBUG ("Trying '%s'", path);

        if (empathy_adium_path_is_valid (path))
            return path;

        g_free (path);
    }

    return NULL;
}