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

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
 * Copyright (C) 2007 Imendio AB
 *
 * 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., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */

#include <config.h>

#include <string.h>

#include <glib/gi18n.h>
#include <gtk/gtk.h>

#include <libempathy/empathy-debug.h>

#include "empathy-ui-utils.h"
#include "empathy-main-window.h"
#include "empathy-theme-utils.h"
#include "empathy-theme-boxes.h"

#define DEBUG_DOMAIN "FancyTheme"

#define MARGIN 4
#define HEADER_PADDING 2

#define GET_PRIV(obj) (G_TYPE_INSTANCE_GET_PRIVATE ((obj), EMPATHY_TYPE_THEME_BOXES, EmpathyThemeBoxesPriv))

typedef struct _EmpathyThemeBoxesPriv EmpathyThemeBoxesPriv;

struct _EmpathyThemeBoxesPriv {
    gchar *header_foreground;
    gchar *header_background;
    gchar *header_line_background;
    gchar *text_foreground;
    gchar *text_background;
    gchar *action_foreground;
    gchar *highlight_foreground;
    gchar *time_foreground;
    gchar *event_foreground;
    gchar *invite_foreground;
    gchar *link_foreground;
};

static void     theme_boxes_finalize          (GObject            *object);
static void     theme_boxes_get_property      (GObject            *object,
                           guint               param_id,
                           GValue             *value,
                           GParamSpec         *pspec);
static void     theme_boxes_set_property      (GObject            *object,
                           guint               param_id,
                           const GValue       *value,
                           GParamSpec         *pspec);
static void     theme_boxes_define_theme_tags (EmpathyTheme        *theme,
                           EmpathyChatView     *view);
static EmpathyThemeContext *
theme_boxes_setup_with_view                   (EmpathyTheme        *theme,
                           EmpathyChatView     *view);
static void     theme_boxes_detach_from_view  (EmpathyTheme        *theme,
                           EmpathyThemeContext *context,
                           EmpathyChatView     *view);
static void     theme_boxes_view_cleared      (EmpathyTheme        *theme,
                           EmpathyThemeContext *context,
                           EmpathyChatView     *view);

static void     theme_boxes_append_message    (EmpathyTheme        *theme,
                           EmpathyThemeContext *context,
                           EmpathyChatView     *view,
                           EmpathyMessage      *message);
static void     theme_boxes_append_event      (EmpathyTheme        *theme,
                           EmpathyThemeContext *context,
                           EmpathyChatView     *view,
                           const gchar        *str);
static void     theme_boxes_append_timestamp  (EmpathyTheme        *theme,
                           EmpathyThemeContext *context,
                           EmpathyChatView     *view,
                           EmpathyMessage      *message,
                           gboolean            show_date,
                           gboolean            show_time);
static void     theme_boxes_append_spacing    (EmpathyTheme        *theme,
                           EmpathyThemeContext *context,
                           EmpathyChatView     *view);

enum {
    PROP_0,
    PROP_HEADER_FOREGROUND,
    PROP_HEADER_BACKGROUND,
    PROP_HEADER_LINE_BACKGROUND,
    PROP_TEXT_FOREGROUND,
    PROP_TEXT_BACKGROUND,
    PROP_ACTION_FOREGROUND,
    PROP_HIGHLIGHT_FOREGROUND,
    PROP_TIME_FOREGROUND,
    PROP_EVENT_FOREGROUND,
    PROP_INVITE_FOREGROUND,
    PROP_LINK_FOREGROUND
};

enum {
    PROP_FLOP,
    PROP_MY_PROP
};

G_DEFINE_TYPE (EmpathyThemeBoxes, empathy_theme_boxes, EMPATHY_TYPE_THEME);

static void
empathy_theme_boxes_class_init (EmpathyThemeBoxesClass *class)
{
    GObjectClass     *object_class;
    EmpathyThemeClass *theme_class;

    object_class = G_OBJECT_CLASS (class);
    theme_class  = EMPATHY_THEME_CLASS (class);

    object_class->finalize       = theme_boxes_finalize;
    object_class->get_property   = theme_boxes_get_property;
    object_class->set_property   = theme_boxes_set_property;

    theme_class->setup_with_view  = theme_boxes_setup_with_view;
    theme_class->detach_from_view = theme_boxes_detach_from_view;
    theme_class->view_cleared     = theme_boxes_view_cleared;
    theme_class->append_message   = theme_boxes_append_message;
    theme_class->append_event     = theme_boxes_append_event;
    theme_class->append_timestamp = theme_boxes_append_timestamp;
    theme_class->append_spacing   = theme_boxes_append_spacing;

    g_object_class_install_property (object_class,
                     PROP_HEADER_FOREGROUND,
                     g_param_spec_string ("header-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_HEADER_BACKGROUND,
                     g_param_spec_string ("header-background",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_HEADER_LINE_BACKGROUND,
                     g_param_spec_string ("header-line-background",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));


    g_object_class_install_property (object_class,
                     PROP_TEXT_FOREGROUND,
                     g_param_spec_string ("text-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_TEXT_BACKGROUND,
                     g_param_spec_string ("text-background",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_ACTION_FOREGROUND,
                     g_param_spec_string ("action-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_HIGHLIGHT_FOREGROUND,
                     g_param_spec_string ("highlight-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_TIME_FOREGROUND,
                     g_param_spec_string ("time-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_EVENT_FOREGROUND,
                     g_param_spec_string ("event-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_INVITE_FOREGROUND,
                     g_param_spec_string ("invite-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_object_class_install_property (object_class,
                     PROP_LINK_FOREGROUND,
                     g_param_spec_string ("link-foreground",
                                  "",
                                  "",
                                  NULL,
                                  G_PARAM_READWRITE));

    g_type_class_add_private (object_class, sizeof (EmpathyThemeBoxesPriv));
}

static void
empathy_theme_boxes_init (EmpathyThemeBoxes *theme)
{
    EmpathyThemeBoxesPriv *priv;

    priv = GET_PRIV (theme);
}

static void
theme_boxes_finalize (GObject *object)
{
    EmpathyThemeBoxesPriv *priv;

    priv = GET_PRIV (object);

    g_free (priv->header_foreground);
    g_free (priv->header_background);
    g_free (priv->header_line_background);
    g_free (priv->text_foreground);
    g_free (priv->text_background);
    g_free (priv->action_foreground);
    g_free (priv->highlight_foreground);
    g_free (priv->time_foreground);
    g_free (priv->event_foreground);
    g_free (priv->invite_foreground);
    g_free (priv->link_foreground);
    
    (G_OBJECT_CLASS (empathy_theme_boxes_parent_class)->finalize) (object);
}

static void
theme_boxes_get_property (GObject    *object,
              guint       param_id,
              GValue     *value,
              GParamSpec *pspec)
{
    EmpathyThemeBoxesPriv *priv;

    priv = GET_PRIV (object);

    switch (param_id) {
    case PROP_HEADER_FOREGROUND:
        g_value_set_string (value, priv->header_foreground);
        break;
    case PROP_HEADER_BACKGROUND:
        g_value_set_string (value, priv->header_background);
        break;
    case PROP_HEADER_LINE_BACKGROUND:
        g_value_set_string (value, priv->header_line_background);
        break;
    case PROP_TEXT_FOREGROUND:
        g_value_set_string (value, priv->text_foreground);
        break;
    case PROP_TEXT_BACKGROUND:
        g_value_set_string (value, priv->text_background);
        break;
    case PROP_ACTION_FOREGROUND:
        g_value_set_string (value, priv->action_foreground);
        break;
    case PROP_HIGHLIGHT_FOREGROUND:
        g_value_set_string (value, priv->highlight_foreground);
        break;
    case PROP_TIME_FOREGROUND:
        g_value_set_string (value, priv->time_foreground);
        break;
    case PROP_EVENT_FOREGROUND:
        g_value_set_string (value, priv->event_foreground);
        break;
    case PROP_INVITE_FOREGROUND:
        g_value_set_string (value, priv->invite_foreground);
        break;
    case PROP_LINK_FOREGROUND:
        g_value_set_string (value, priv->link_foreground);
        break;
    default:
        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
        break;
    }
}
static void
theme_boxes_set_property (GObject      *object,
            guint         param_id,
            const GValue *value,
            GParamSpec   *pspec)
{
    EmpathyThemeBoxesPriv *priv;

    priv = GET_PRIV (object);

    switch (param_id) {
    case PROP_HEADER_FOREGROUND:
        g_free (priv->header_foreground);
        priv->header_foreground = g_value_dup_string (value);
        break;
    case PROP_HEADER_BACKGROUND:
        g_free (priv->header_background);
        priv->header_background = g_value_dup_string (value);
        break;
    case PROP_HEADER_LINE_BACKGROUND:
        g_free (priv->header_line_background);
        priv->header_line_background = g_value_dup_string (value);
        break;
    case PROP_TEXT_FOREGROUND:
        g_free (priv->text_foreground);
        priv->text_foreground = g_value_dup_string (value);
        break;
    case PROP_TEXT_BACKGROUND:
        g_free (priv->text_background);
        priv->text_background = g_value_dup_string (value);
        break;
    case PROP_ACTION_FOREGROUND:
        g_free (priv->action_foreground);
        priv->action_foreground = g_value_dup_string (value);
        break;
    case PROP_HIGHLIGHT_FOREGROUND:
        g_free (priv->highlight_foreground);
        priv->highlight_foreground = g_value_dup_string (value);
        break;
    case PROP_TIME_FOREGROUND:
        g_free (priv->time_foreground);
        priv->time_foreground = g_value_dup_string (value);
        break;
    case PROP_EVENT_FOREGROUND:
        g_free (priv->event_foreground);
        priv->event_foreground = g_value_dup_string (value);
        break;
    case PROP_INVITE_FOREGROUND:
        g_free (priv->invite_foreground);
        priv->invite_foreground = g_value_dup_string (value);
        break;
    case PROP_LINK_FOREGROUND:
        g_free (priv->link_foreground);
        priv->link_foreground = g_value_dup_string (value);
        break;
    default:
        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
        break;
    }
}

static void
theme_boxes_define_theme_tags (EmpathyTheme *theme, EmpathyChatView *view)
{
    EmpathyThemeBoxesPriv *priv;
    GtkTextBuffer   *buffer;
    GtkTextTagTable *table;
    GtkTextTag      *tag;

    priv = GET_PRIV (theme);

    buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (view));
    table = gtk_text_buffer_get_tag_table (buffer);

    tag = empathy_theme_utils_init_tag_by_name (table, "fancy-spacing");
    g_object_set (tag,
              "size", 3000,
              "pixels-above-lines", 8,
              NULL);
    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, 
                           "fancy-header");
    g_object_set (tag,
              "weight", PANGO_WEIGHT_BOLD,
              "pixels-above-lines", HEADER_PADDING,
              "pixels-below-lines", HEADER_PADDING,
              NULL);
    if (priv->header_foreground) {
        g_object_set (tag,
                  "foreground", priv->header_foreground,
                  "paragraph-background", priv->header_background,
                  NULL);
    }
    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, "fancy-header-line");
    g_object_set (tag,
              "size", 1,
              NULL);
    if (priv->header_line_background) {
        g_object_set (tag,
                  "paragraph-background", priv->header_line_background,
                  NULL);
    }

    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, "fancy-body");
    g_object_set (tag,
              "pixels-above-lines", 4,
              NULL);
    if (priv->text_background) {
        g_object_set (tag,
                  "paragraph-background", priv->text_background,
                  NULL);
    }

    if (priv->text_foreground) {
        g_object_set (tag,
                  "foreground", priv->text_foreground,
                  NULL);
    }
    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, "fancy-action");
    g_object_set (tag,
              "style", PANGO_STYLE_ITALIC,
              "pixels-above-lines", 4,
              NULL);

    if (priv->text_background) {
        g_object_set (tag,
                  "paragraph-background", priv->text_background,
                  NULL);
    }

    if (priv->action_foreground) {
        g_object_set (tag,
                  "foreground", priv->action_foreground,
                  NULL);
    } 

    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table,
                           "fancy-highlight");
    g_object_set (tag,
              "weight", PANGO_WEIGHT_BOLD,
              "pixels-above-lines", 4,
              NULL);
    if (priv->text_background) {
        g_object_set (tag,
                  "paragraph-background", priv->text_background,
                  NULL);
    }


    if (priv->highlight_foreground) {
        g_object_set (tag,
                  "foreground", priv->highlight_foreground,
                  NULL);
    }
    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, "fancy-time");
    g_object_set (tag,
              "justification", GTK_JUSTIFY_CENTER,
              NULL);
    if (priv->time_foreground) {
        g_object_set (tag,
                  "foreground", priv->time_foreground,
                  NULL);
    }
    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, "fancy-event");
    g_object_set (tag,
              "justification", GTK_JUSTIFY_LEFT,
              NULL);
    if (priv->event_foreground) {
        g_object_set (tag,
                  "foreground", priv->event_foreground,
                  NULL);
    }
    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, "invite");
    if (priv->invite_foreground) {
        g_object_set (tag,
                  "foreground", priv->invite_foreground,
                  NULL);
    }
    empathy_theme_utils_add_tag (table, tag);

    tag = empathy_theme_utils_init_tag_by_name (table, "fancy-link");
    g_object_set (tag,
              "underline", PANGO_UNDERLINE_SINGLE,
              NULL);
    if (priv->link_foreground) {
        g_object_set (tag,
                  "foreground", priv->link_foreground,
                  NULL);
    } 
    empathy_theme_utils_add_tag (table, tag);
}

static void
theme_boxes_fixup_tag_table (EmpathyTheme *theme, EmpathyChatView *view)
{
    GtkTextBuffer *buffer;

    buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (view));

    /* "Fancy" style tags. */
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-header");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-header-line");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-body");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-action");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-highlight");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-spacing");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-time");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-event");
    empathy_theme_utils_ensure_tag_by_name (buffer, "fancy-link");
}

typedef struct {
    BlockType last_block_type;
    time_t    last_timestamp;
} FancyContext;

static EmpathyThemeContext *
theme_boxes_setup_with_view (EmpathyTheme *theme, EmpathyChatView *view)
{
    EmpathyThemeBoxesPriv *priv;

    g_return_val_if_fail (EMPATHY_IS_THEME_BOXES (theme), NULL);

    priv = GET_PRIV (theme);

    theme_boxes_fixup_tag_table (theme, view);

    theme_boxes_define_theme_tags (theme, view);
    
    empathy_chat_view_set_margin (view, MARGIN);

    return NULL;
}

static void
theme_boxes_detach_from_view (EmpathyTheme        *theme,
                  EmpathyThemeContext *context,
                  EmpathyChatView     *view)
{
    /* FIXME: Free the context */
}

static void 
theme_boxes_view_cleared (EmpathyTheme        *theme,
              EmpathyThemeContext *context,
              EmpathyChatView     *view)
{
    /* FIXME: clear the context data */
}

static void
table_size_allocate_cb (GtkWidget     *view,
            GtkAllocation *allocation,
            GtkWidget     *box)
{
    gint width, height;

        gtk_widget_get_size_request (box, NULL, &height);

    width = allocation->width;
    
    width -= \
        gtk_text_view_get_right_margin (GTK_TEXT_VIEW (view)) - \
        gtk_text_view_get_left_margin (GTK_TEXT_VIEW (view));
    width -= 2 * MARGIN;
    width -= 2 * HEADER_PADDING;

        gtk_widget_set_size_request (box, width, height);
}

static void
theme_boxes_maybe_append_header (EmpathyTheme        *theme,
                 EmpathyThemeContext *context,
                 EmpathyChatView     *view,
                 EmpathyMessage      *msg)
{
    EmpathyThemeBoxesPriv *priv;
    EmpathyContact        *contact;
    GdkPixbuf            *avatar = NULL;
    GtkTextBuffer        *buffer;
    const gchar          *name;
    gboolean              header;
    GtkTextIter           iter;
    GtkWidget            *label1, *label2;
    GtkTextChildAnchor   *anchor;
    GtkWidget            *box;
    gchar                *str;
    time_t                time;
    gchar                *tmp;
    GtkTextIter           start;
    GdkColor              color;
    gboolean              parse_success;
    gboolean              from_self;

    priv = GET_PRIV (theme);

    contact = empathy_message_get_sender (msg);
    from_self = empathy_contact_is_user (contact);
    buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (view));

    empathy_debug (DEBUG_DOMAIN, "Maybe add fancy header");

    name = empathy_contact_get_name (contact);

    header = FALSE;

    /* Only insert a header if the previously inserted block is not the same
     * as this one. This catches all the different cases:
     */
    if (empathy_chat_view_get_last_block_type (view) != BLOCK_TYPE_SELF &&
        empathy_chat_view_get_last_block_type (view) != BLOCK_TYPE_OTHER) {
        header = TRUE;
    }
    else if (from_self &&
         empathy_chat_view_get_last_block_type (view) == BLOCK_TYPE_OTHER) {
        header = TRUE;
    }
    else if (!from_self && 
         empathy_chat_view_get_last_block_type (view) == BLOCK_TYPE_SELF) {
        header = TRUE;
    }
    else if (!from_self &&
         (!empathy_chat_view_get_last_contact (view) ||
          !empathy_contact_equal (contact, empathy_chat_view_get_last_contact (view)))) {
        header = TRUE;
    }

    if (!header) {
        return;
    }

    empathy_theme_append_spacing (theme, context, view);

    gtk_text_buffer_get_end_iter (buffer, &iter);
    gtk_text_buffer_insert_with_tags_by_name (buffer,
                          &iter,
                          "\n",
                          -1,
                          "fancy-header-line",
                          NULL);

    gtk_text_buffer_get_end_iter (buffer, &iter);
    anchor = gtk_text_buffer_create_child_anchor (buffer, &iter);

    box = gtk_hbox_new (FALSE, 0);


    avatar = empathy_chat_view_get_avatar_pixbuf_with_cache (contact);
    if (avatar && empathy_theme_get_show_avatars (theme)) {
        GtkWidget *image;

        image = gtk_image_new_from_pixbuf (avatar);

        gtk_box_pack_start (GTK_BOX (box), image,
                    FALSE, TRUE, 2);

    }

    g_signal_connect_object (view, "size-allocate",
                 G_CALLBACK (table_size_allocate_cb),
                 box, 0);

    str = g_strdup_printf ("<b>%s</b>", name);

    label1 = g_object_new (GTK_TYPE_LABEL,
                   "label", str,
                   "use-markup", TRUE,
                   "xalign", 0.0,
                   NULL);

    parse_success = gdk_color_parse (priv->header_foreground, &color);

    if (parse_success) {
        gtk_widget_modify_fg (label1, GTK_STATE_NORMAL, &color);
    }

    g_free (str);

    time = empathy_message_get_timestamp (msg);

    tmp = empathy_time_to_string_local (time, 
                       EMPATHY_TIME_FORMAT_DISPLAY_SHORT);
    str = g_strdup_printf ("<i>%s</i>", tmp);
    g_free (tmp);

    label2 = g_object_new (GTK_TYPE_LABEL,
                   "label", str,
                   "use-markup", TRUE,
                   "xalign", 1.0,
                   NULL);
    
    if (parse_success) {
        gtk_widget_modify_fg (label2, GTK_STATE_NORMAL, &color);
    }

    g_free (str);

    gtk_misc_set_alignment (GTK_MISC (label1), 0.0, 0.5);
    gtk_misc_set_alignment (GTK_MISC (label2), 1.0, 0.5);

    gtk_box_pack_start (GTK_BOX (box), label1, TRUE, TRUE, 0);
    gtk_box_pack_start (GTK_BOX (box), label2, TRUE, TRUE, 0);

    gtk_text_view_add_child_at_anchor (GTK_TEXT_VIEW (view),
                       box,
                       anchor);

    gtk_widget_show_all (box);

    gtk_text_buffer_get_end_iter (buffer, &iter);
    start = iter;
    gtk_text_iter_backward_char (&start);
    gtk_text_buffer_apply_tag_by_name (buffer,
                       "fancy-header",
                       &start, &iter);

    gtk_text_buffer_insert_with_tags_by_name (buffer,
                          &iter,
                          "\n",
                          -1,
                          "fancy-header",
                          NULL);

    gtk_text_buffer_get_end_iter (buffer, &iter);
    gtk_text_buffer_insert_with_tags_by_name (buffer,
                          &iter,
                          "\n",
                          -1,
                          "fancy-header-line",
                          NULL);
}

static void
theme_boxes_append_message (EmpathyTheme        *theme,
                EmpathyThemeContext *context,
                EmpathyChatView     *view,
                EmpathyMessage      *message)
{
    EmpathyContact *sender;

    empathy_theme_maybe_append_date_and_time (theme, context, view, message);
    theme_boxes_maybe_append_header (theme, context, view, message);

    sender = empathy_message_get_sender (message);

    if (empathy_message_get_type (message) == EMPATHY_MESSAGE_TYPE_ACTION) {
        gchar *body;

        body = g_strdup_printf (" * %s %s", 
                    empathy_contact_get_name (sender),
                    empathy_message_get_body (message));
        empathy_theme_append_text (theme, context, view, body,
                       "fancy-action", "fancy-link");
    } else {
        empathy_theme_append_text (theme, context, view,
                       empathy_message_get_body (message),
                       "fancy-body", "fancy-link");
    }
    
    if (empathy_contact_is_user (sender)) {
        empathy_chat_view_set_last_block_type (view, BLOCK_TYPE_SELF);
        empathy_chat_view_set_last_contact (view, NULL);
    } else {
        empathy_chat_view_set_last_block_type (view, BLOCK_TYPE_OTHER);
        empathy_chat_view_set_last_contact (view, sender);
    }
}

static void
theme_boxes_append_event (EmpathyTheme        *theme,
              EmpathyThemeContext *context,
              EmpathyChatView     *view,
              const gchar        *str)
{
    GtkTextBuffer *buffer;
    GtkTextIter    iter;
    gchar         *msg;

    buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (view));

    empathy_theme_maybe_append_date_and_time (theme, context, view, NULL);

    gtk_text_buffer_get_end_iter (buffer, &iter);

    msg = g_strdup_printf (" - %s\n", str);

    gtk_text_buffer_insert_with_tags_by_name (buffer, &iter,
                          msg, -1,
                          "fancy-event",
                          NULL);
    g_free (msg);

    empathy_chat_view_set_last_block_type (view, BLOCK_TYPE_EVENT);
}

static void
theme_boxes_append_timestamp (EmpathyTheme        *theme,
                  EmpathyThemeContext *context,
                  EmpathyChatView     *view,
                  EmpathyMessage      *message,
                  gboolean            show_date,
                  gboolean            show_time)
{
    GtkTextBuffer *buffer;
    time_t         timestamp;
    GDate         *date;
    GtkTextIter    iter;
    GString       *str;
    
    if (!show_date) {
        return;
    }

    buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (view));

    date = empathy_message_get_date_and_time (message, &timestamp);

    str = g_string_new (NULL);

    if (show_time || show_date) {
        empathy_theme_append_spacing (theme, 
                         context,
                         view);

        g_string_append (str, "- ");
    }

    if (show_date) {
        gchar buf[256];

        g_date_strftime (buf, 256, _("%A %d %B %Y"), date);
        g_string_append (str, buf);

        if (show_time) {
            g_string_append (str, ", ");
        }
    }

    g_date_free (date);

    if (show_time) {
        gchar *tmp;

        tmp = empathy_time_to_string_local (timestamp, EMPATHY_TIME_FORMAT_DISPLAY_SHORT);
        g_string_append (str, tmp);
        g_free (tmp);
    }

    if (show_time || show_date) {
        g_string_append (str, " -\n");

        gtk_text_buffer_get_end_iter (buffer, &iter);
        gtk_text_buffer_insert_with_tags_by_name (buffer,
                              &iter,
                              str->str, -1,
                              "fancy-time",
                              NULL);

        empathy_chat_view_set_last_block_type (view, BLOCK_TYPE_TIME);
        empathy_chat_view_set_last_timestamp (view, timestamp);
    }

    g_string_free (str, TRUE);
    
}

static void
theme_boxes_append_spacing (EmpathyTheme        *theme,
                EmpathyThemeContext *context,
                EmpathyChatView     *view)
{
    GtkTextBuffer *buffer;
    GtkTextIter    iter;

    g_return_if_fail (EMPATHY_IS_THEME (theme));
    g_return_if_fail (EMPATHY_IS_CHAT_VIEW (view));

    buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (view));

    gtk_text_buffer_get_end_iter (buffer, &iter);
    gtk_text_buffer_insert_with_tags_by_name (buffer,
                          &iter,
                          "\n",
                          -1,
                          "cut",
                          "fancy-spacing",
                          NULL);
}

static void
theme_boxes_setup_clean (EmpathyTheme *theme)
{
    g_object_set (theme,
              "header-foreground", "black",
              "header-background", "#efefdf",
              "header_line_background", "#e3e3d3",
              "action_foreground", "brown4",
              "time_foreground", "darkgrey",
              "event_foreground", "darkgrey",
              "invite_foreground", "sienna",
              "link_foreground","#49789e",
              NULL);
}

static void
theme_boxes_gdk_color_to_hex (GdkColor *gdk_color, gchar *str_color)
{
    g_snprintf (str_color, 10, 
            "#%02x%02x%02x", 
            gdk_color->red >> 8, 
            gdk_color->green >> 8, 
            gdk_color->blue >> 8);
}

static void
theme_boxes_setup_themed (EmpathyTheme *theme)
{
    EmpathyThemeBoxesPriv *priv;
    GtkWidget            *widget;
    GtkStyle             *style;
    gchar                 color[10];

    priv = GET_PRIV (theme);

    widget = gtk_entry_new ();
    style = gtk_widget_get_style (widget);
    gtk_widget_destroy (widget);

    theme_boxes_gdk_color_to_hex (&style->base[GTK_STATE_SELECTED], color);

    g_object_set (theme,
              "action-foreground", color,
              "link-foreground", color,
              NULL);

    theme_boxes_gdk_color_to_hex (&style->bg[GTK_STATE_SELECTED], color);

    g_object_set (theme,
              "header-background", color,
              NULL);

    theme_boxes_gdk_color_to_hex (&style->dark[GTK_STATE_SELECTED], color);

    g_object_set (theme,
              "header_line-background", color,
              NULL);

    theme_boxes_gdk_color_to_hex (&style->fg[GTK_STATE_SELECTED], color);

    g_object_set (theme,
              "header-foreground", color,
              NULL);
}

static void
theme_boxes_theme_changed_cb (GtkWidget *widget,
                  GtkStyle  *previous_style,
                  gpointer   user_data)
{
    theme_boxes_setup_themed (EMPATHY_THEME (user_data));

    g_signal_emit_by_name (G_OBJECT (user_data), "updated");
}

static void
theme_boxes_setup_blue (EmpathyTheme *theme)
{
    g_object_set (theme,
              "header_foreground", "black",
              "header_background", "#88a2b4",
              "header_line_background", "#7f96a4",
              "text_foreground", "black",
              "text_background", "#adbdc8",
              "highlight_foreground", "black",
              "action_foreground", "brown4",
              "time_foreground", "darkgrey",
              "event_foreground", "#7f96a4",
              "invite_foreground", "sienna",
              "link_foreground", "#49789e",
              NULL);
}

EmpathyTheme *
empathy_theme_boxes_new (const gchar *name)
{
    EmpathyTheme          *theme;
    EmpathyThemeBoxesPriv *priv;

    theme = g_object_new (EMPATHY_TYPE_THEME_BOXES, NULL);
    priv  = GET_PRIV (theme);

    if (strcmp (name, "clean") == 0) {
        theme_boxes_setup_clean (theme);
    }
    else if (strcmp (name, "simple") == 0) {
        /* FIXME: Make an actual accessor function */
        g_signal_connect (empathy_main_window_show (),
                  "style-set",
                  G_CALLBACK (theme_boxes_theme_changed_cb),
                  theme);

        theme_boxes_setup_themed (theme);
    }
    else if (strcmp (name, "blue") == 0) {
        theme_boxes_setup_blue (theme);
    }

    return theme;
}