gio/gemblemedicon.c - third_party/glib - Git at Google

 /* -*- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -*- */

 /* GIO - GLib Input, Output and Streaming Library
  *
  * Copyright (C) 2006-2007 Red Hat, Inc.
  *
  * SPDX-License-Identifier: LGPL-2.1-or-later
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public
  * License as published by the Free Software Foundation; either
  * version 2.1 of the License, or (at your option) any later version.
  *
  * This library 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
  * Lesser General Public License for more details.
  *
  * You should have received a copy of the GNU Lesser General
  * Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
  *
  * Author: Matthias Clasen <mclasen@redhat.com>
  *         Clemens N. Buss <cebuzz@gmail.com>
  */

 #include <config.h>

 #include <string.h>

 #include "gemblemedicon.h"
 #include "glibintl.h"
 #include "gioerror.h"


 /**
  * GEmblemedIcon:
  *
  * `GEmblemedIcon` is an implementation of [iface@Gio.Icon] that supports
  * adding an emblem to an icon. Adding multiple emblems to an
  * icon is ensured via [method@Gio.EmblemedIcon.add_emblem].
  *
  * Note that `GEmblemedIcon` allows no control over the position
  * of the emblems. See also [class@Gio.Emblem] for more information.
  **/

 enum {
   PROP_GICON = 1,
   NUM_PROPERTIES
 };

 struct _GEmblemedIconPrivate {
   GIcon *icon;
   GList *emblems;
 };

 static GParamSpec *properties[NUM_PROPERTIES] = { NULL, };

 static void g_emblemed_icon_icon_iface_init (GIconIface *iface);

 G_DEFINE_TYPE_WITH_CODE (GEmblemedIcon, g_emblemed_icon, G_TYPE_OBJECT,
                          G_ADD_PRIVATE (GEmblemedIcon)
                          G_IMPLEMENT_INTERFACE (G_TYPE_ICON,
                          g_emblemed_icon_icon_iface_init))


 static void
 g_emblemed_icon_finalize (GObject *object)
 {
   GEmblemedIcon *emblemed;

   emblemed = G_EMBLEMED_ICON (object);

   g_clear_object (&emblemed->priv->icon);
   g_list_free_full (emblemed->priv->emblems, g_object_unref);

   (*G_OBJECT_CLASS (g_emblemed_icon_parent_class)->finalize) (object);
 }

 static void
 g_emblemed_icon_set_property (GObject  *object,
                               guint property_id,
                               const GValue *value,
                               GParamSpec *pspec)
 {
   GEmblemedIcon *self = G_EMBLEMED_ICON (object);

   switch (property_id)
     {
     case PROP_GICON:
       self->priv->icon = g_value_dup_object (value);
       break;
     default:
       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
       break;
     }
 }

 static void
 g_emblemed_icon_get_property (GObject  *object,
                               guint property_id,
                               GValue *value,
                               GParamSpec *pspec)
 {
   GEmblemedIcon *self = G_EMBLEMED_ICON (object);

   switch (property_id)
     {
     case PROP_GICON:
       g_value_set_object (value, self->priv->icon);
       break;
     default:
       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
       break;
     }
 }

 static void
 g_emblemed_icon_class_init (GEmblemedIconClass *klass)
 {
   GObjectClass *gobject_class = G_OBJECT_CLASS (klass);

   gobject_class->finalize = g_emblemed_icon_finalize;
   gobject_class->set_property = g_emblemed_icon_set_property;
   gobject_class->get_property = g_emblemed_icon_get_property;

   /**
    * GEmblemedIcon:gicon:
    *
    * The [iface@Gio.Icon] to attach emblems to.
    *
    * Since: 2.18
    */
   properties[PROP_GICON] =
     g_param_spec_object ("gicon", NULL, NULL,
                          G_TYPE_ICON,
                          G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY | G_PARAM_STATIC_STRINGS);

   g_object_class_install_properties (gobject_class, NUM_PROPERTIES, properties);
 }

 static void
 g_emblemed_icon_init (GEmblemedIcon *emblemed)
 {
   emblemed->priv = g_emblemed_icon_get_instance_private (emblemed);
 }

 /**
  * g_emblemed_icon_new:
  * @icon: a #GIcon
  * @emblem: (nullable): a #GEmblem, or %NULL
  *
  * Creates a new emblemed icon for @icon with the emblem @emblem.
  *
  * Returns: (transfer full) (type GEmblemedIcon): a new #GIcon
  *
  * Since: 2.18
  **/
 GIcon *
 g_emblemed_icon_new (GIcon   *icon,
                      GEmblem *emblem)
 {
   GEmblemedIcon *emblemed;

   g_return_val_if_fail (G_IS_ICON (icon), NULL);
   g_return_val_if_fail (!G_IS_EMBLEM (icon), NULL);

   emblemed = G_EMBLEMED_ICON (g_object_new (G_TYPE_EMBLEMED_ICON,
                                             "gicon", icon,
                                             NULL));

   if (emblem != NULL)
     g_emblemed_icon_add_emblem (emblemed, emblem);

   return G_ICON (emblemed);
 }


 /**
  * g_emblemed_icon_get_icon:
  * @emblemed: a #GEmblemedIcon
  *
  * Gets the main icon for @emblemed.
  *
  * Returns: (transfer none): a #GIcon that is owned by @emblemed
  *
  * Since: 2.18
  **/
 GIcon *
 g_emblemed_icon_get_icon (GEmblemedIcon *emblemed)
 {
   g_return_val_if_fail (G_IS_EMBLEMED_ICON (emblemed), NULL);

   return emblemed->priv->icon;
 }

 /**
  * g_emblemed_icon_get_emblems:
  * @emblemed: a #GEmblemedIcon
  *
  * Gets the list of emblems for the @icon.
  *
  * Returns: (element-type Gio.Emblem) (transfer none): a #GList of
  *     #GEmblems that is owned by @emblemed
  *
  * Since: 2.18
  **/

 GList *
 g_emblemed_icon_get_emblems (GEmblemedIcon *emblemed)
 {
   g_return_val_if_fail (G_IS_EMBLEMED_ICON (emblemed), NULL);

   return emblemed->priv->emblems;
 }

 /**
  * g_emblemed_icon_clear_emblems:
  * @emblemed: a #GEmblemedIcon
  *
  * Removes all the emblems from @icon.
  *
  * Since: 2.28
  **/
 void
 g_emblemed_icon_clear_emblems (GEmblemedIcon *emblemed)
 {
   g_return_if_fail (G_IS_EMBLEMED_ICON (emblemed));

   if (emblemed->priv->emblems == NULL)
     return;

   g_list_free_full (emblemed->priv->emblems, g_object_unref);
   emblemed->priv->emblems = NULL;
 }

 static gint
 g_emblem_comp (GEmblem *a,
                GEmblem *b)
 {
   guint hash_a = g_icon_hash (G_ICON (a));
   guint hash_b = g_icon_hash (G_ICON (b));

   if(hash_a < hash_b)
     return -1;

   if(hash_a == hash_b)
     return 0;

   return 1;
 }

 /**
  * g_emblemed_icon_add_emblem:
  * @emblemed: a #GEmblemedIcon
  * @emblem: a #GEmblem
  *
  * Adds @emblem to the #GList of #GEmblems.
  *
  * Since: 2.18
  **/
 void
 g_emblemed_icon_add_emblem (GEmblemedIcon *emblemed,
                             GEmblem       *emblem)
 {
   g_return_if_fail (G_IS_EMBLEMED_ICON (emblemed));
   g_return_if_fail (G_IS_EMBLEM (emblem));

   g_object_ref (emblem);
   emblemed->priv->emblems = g_list_insert_sorted (emblemed->priv->emblems, emblem,
                                                   (GCompareFunc) g_emblem_comp);
 }

 static guint
 g_emblemed_icon_hash (GIcon *icon)
 {
   GEmblemedIcon *emblemed = G_EMBLEMED_ICON (icon);
   GList *list;
   guint hash = g_icon_hash (emblemed->priv->icon);

   for (list = emblemed->priv->emblems; list != NULL; list = list->next)
     hash ^= g_icon_hash (G_ICON (list->data));

   return hash;
 }

 static gboolean
 g_emblemed_icon_equal (GIcon *icon1,
                        GIcon *icon2)
 {
   GEmblemedIcon *emblemed1 = G_EMBLEMED_ICON (icon1);
   GEmblemedIcon *emblemed2 = G_EMBLEMED_ICON (icon2);
   GList *list1, *list2;

   if (!g_icon_equal (emblemed1->priv->icon, emblemed2->priv->icon))
     return FALSE;

   list1 = emblemed1->priv->emblems;
   list2 = emblemed2->priv->emblems;

   while (list1 && list2)
   {
     if (!g_icon_equal (G_ICON (list1->data), G_ICON (list2->data)))
         return FALSE;

     list1 = list1->next;
     list2 = list2->next;
   }

   return list1 == NULL && list2 == NULL;
 }

 static gboolean
 g_emblemed_icon_to_tokens (GIcon *icon,
                            GPtrArray *tokens,
                            gint  *out_version)
 {
   GEmblemedIcon *emblemed_icon = G_EMBLEMED_ICON (icon);
   GList *l;
   char *s;

   /* GEmblemedIcons are encoded as
    *
    *   <encoded_icon> [<encoded_emblem_icon>]*
    */

   g_return_val_if_fail (out_version != NULL, FALSE);

   *out_version = 0;

   s = g_icon_to_string (emblemed_icon->priv->icon);
   if (s == NULL)
     return FALSE;

   g_ptr_array_add (tokens, s);

   for (l = emblemed_icon->priv->emblems; l != NULL; l = l->next)
     {
       GIcon *emblem_icon = G_ICON (l->data);

       s = g_icon_to_string (emblem_icon);
       if (s == NULL)
         return FALSE;

       g_ptr_array_add (tokens, s);
     }

   return TRUE;
 }

 static GIcon *
 g_emblemed_icon_from_tokens (gchar  **tokens,
                              gint     num_tokens,
                              gint     version,
                              GError **error)
 {
   GEmblemedIcon *emblemed_icon;
   int n;

   emblemed_icon = NULL;

   if (version != 0)
     {
       g_set_error (error,
                    G_IO_ERROR,
                    G_IO_ERROR_INVALID_ARGUMENT,
                    _("Can’t handle version %d of GEmblemedIcon encoding"),
                    version);
       goto fail;
     }

   if (num_tokens < 1)
     {
       g_set_error (error,
                    G_IO_ERROR,
                    G_IO_ERROR_INVALID_ARGUMENT,
                    _("Malformed number of tokens (%d) in GEmblemedIcon encoding"),
                    num_tokens);
       goto fail;
     }

   emblemed_icon = g_object_new (G_TYPE_EMBLEMED_ICON, NULL);
   emblemed_icon->priv->icon = g_icon_new_for_string (tokens[0], error);
   if (emblemed_icon->priv->icon == NULL)
     goto fail;

   for (n = 1; n < num_tokens; n++)
     {
       GIcon *emblem;

       emblem = g_icon_new_for_string (tokens[n], error);
       if (emblem == NULL)
         goto fail;

       if (!G_IS_EMBLEM (emblem))
         {
           g_set_error_literal (error,
                                G_IO_ERROR,
                                G_IO_ERROR_INVALID_ARGUMENT,
                                _("Expected a GEmblem for GEmblemedIcon"));
           g_object_unref (emblem);
           goto fail;
         }

       emblemed_icon->priv->emblems = g_list_append (emblemed_icon->priv->emblems, emblem);
     }

   return G_ICON (emblemed_icon);

  fail:
   if (emblemed_icon != NULL)
     g_object_unref (emblemed_icon);
   return NULL;
 }

 static GVariant *
 g_emblemed_icon_serialize (GIcon *icon)
 {
   GEmblemedIcon *emblemed_icon = G_EMBLEMED_ICON (icon);
   GVariantBuilder builder;
   GVariant *icon_data;
   GList *node;

   icon_data = g_icon_serialize (emblemed_icon->priv->icon);
   if (!icon_data)
     return NULL;

   g_variant_builder_init (&builder, G_VARIANT_TYPE ("(va(va{sv}))"));

   g_variant_builder_add (&builder, "v", icon_data);
   g_variant_unref (icon_data);

   g_variant_builder_open (&builder, G_VARIANT_TYPE ("a(va{sv})"));
   for (node = emblemed_icon->priv->emblems; node != NULL; node = node->next)
     {
       icon_data = g_icon_serialize (node->data);
       if (icon_data)
         {
           /* We know how emblems serialize, so do a tweak here to
            * reduce some of the variant wrapping and redundant storage
            * of 'emblem' over and again...
            */
           if (g_variant_is_of_type (icon_data, G_VARIANT_TYPE ("(sv)")))
             {
               const gchar *name;
               GVariant *content;

               g_variant_get (icon_data, "(&sv)", &name, &content);

               if (g_str_equal (name, "emblem") && g_variant_is_of_type (content, G_VARIANT_TYPE ("(va{sv})")))
                 g_variant_builder_add (&builder, "@(va{sv})", content);

               g_variant_unref (content);
             }

           g_variant_unref (icon_data);
         }
     }
   g_variant_builder_close (&builder);

   return g_variant_new ("(sv)", "emblemed", g_variant_builder_end (&builder));
 }

 static void
 g_emblemed_icon_icon_iface_init (GIconIface *iface)
 {
   iface->hash = g_emblemed_icon_hash;
   iface->equal = g_emblemed_icon_equal;
   iface->to_tokens = g_emblemed_icon_to_tokens;
   iface->from_tokens = g_emblemed_icon_from_tokens;
   iface->serialize = g_emblemed_icon_serialize;
 }
	/* -- mode: C; c-file-style: "gnu"; indent-tabs-mode: nil; -- */

	/* GIO - GLib Input, Output and Streaming Library
	*
	* Copyright (C) 2006-2007 Red Hat, Inc.
	*
	* SPDX-License-Identifier: LGPL-2.1-or-later
	*
	* This library is free software; you can redistribute it and/or
	* modify it under the terms of the GNU Lesser General Public
	* License as published by the Free Software Foundation; either
	* version 2.1 of the License, or (at your option) any later version.
	*
	* This library 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
	* Lesser General Public License for more details.
	*
	* You should have received a copy of the GNU Lesser General
	* Public License along with this library; if not, see <http://www.gnu.org/licenses/>.
	*
	* Author: Matthias Clasen <mclasen@redhat.com>
	* Clemens N. Buss <cebuzz@gmail.com>
	*/

	#include <config.h>

	#include <string.h>

	#include "gemblemedicon.h"
	#include "glibintl.h"
	#include "gioerror.h"


	/**
	* GEmblemedIcon:
	*
	* `GEmblemedIcon` is an implementation of [iface@Gio.Icon] that supports
	* adding an emblem to an icon. Adding multiple emblems to an
	* icon is ensured via [method@Gio.EmblemedIcon.add_emblem].
	*
	* Note that `GEmblemedIcon` allows no control over the position
	* of the emblems. See also [class@Gio.Emblem] for more information.
	**/

	enum {
	PROP_GICON = 1,
	NUM_PROPERTIES
	};

	struct _GEmblemedIconPrivate {
	GIcon *icon;
	GList *emblems;
	};

	static GParamSpec *properties[NUM_PROPERTIES] = { NULL, };

	static void g_emblemed_icon_icon_iface_init (GIconIface *iface);

	G_DEFINE_TYPE_WITH_CODE (GEmblemedIcon, g_emblemed_icon, G_TYPE_OBJECT,
	G_ADD_PRIVATE (GEmblemedIcon)
	G_IMPLEMENT_INTERFACE (G_TYPE_ICON,
	g_emblemed_icon_icon_iface_init))


	static void
	g_emblemed_icon_finalize (GObject *object)
	{
	GEmblemedIcon *emblemed;

	emblemed = G_EMBLEMED_ICON (object);

	g_clear_object (&emblemed->priv->icon);
	g_list_free_full (emblemed->priv->emblems, g_object_unref);

	(*G_OBJECT_CLASS (g_emblemed_icon_parent_class)->finalize) (object);
	}

	static void
	g_emblemed_icon_set_property (GObject *object,
	guint property_id,
	const GValue *value,
	GParamSpec *pspec)
	{
	GEmblemedIcon *self = G_EMBLEMED_ICON (object);

	switch (property_id)
	{
	case PROP_GICON:
	self->priv->icon = g_value_dup_object (value);
	break;
	default:
	G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
	break;
	}
	}

	static void
	g_emblemed_icon_get_property (GObject *object,
	guint property_id,
	GValue *value,
	GParamSpec *pspec)
	{
	GEmblemedIcon *self = G_EMBLEMED_ICON (object);

	switch (property_id)
	{
	case PROP_GICON:
	g_value_set_object (value, self->priv->icon);
	break;
	default:
	G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
	break;
	}
	}

	static void
	g_emblemed_icon_class_init (GEmblemedIconClass *klass)
	{
	GObjectClass *gobject_class = G_OBJECT_CLASS (klass);

	gobject_class->finalize = g_emblemed_icon_finalize;
	gobject_class->set_property = g_emblemed_icon_set_property;
	gobject_class->get_property = g_emblemed_icon_get_property;

	/**
	* GEmblemedIcon:gicon:
	*
	* The [iface@Gio.Icon] to attach emblems to.
	*
	* Since: 2.18
	*/
	properties[PROP_GICON] =
	g_param_spec_object ("gicon", NULL, NULL,
	G_TYPE_ICON,
	G_PARAM_READWRITE \| G_PARAM_CONSTRUCT_ONLY \| G_PARAM_STATIC_STRINGS);

	g_object_class_install_properties (gobject_class, NUM_PROPERTIES, properties);
	}

	static void
	g_emblemed_icon_init (GEmblemedIcon *emblemed)
	{
	emblemed->priv = g_emblemed_icon_get_instance_private (emblemed);
	}

	/**
	* g_emblemed_icon_new:
	* @icon: a #GIcon
	* @emblem: (nullable): a #GEmblem, or %NULL
	*
	* Creates a new emblemed icon for @icon with the emblem @emblem.
	*
	* Returns: (transfer full) (type GEmblemedIcon): a new #GIcon
	*
	* Since: 2.18
	**/
	GIcon *
	g_emblemed_icon_new (GIcon *icon,
	GEmblem *emblem)
	{
	GEmblemedIcon *emblemed;

	g_return_val_if_fail (G_IS_ICON (icon), NULL);
	g_return_val_if_fail (!G_IS_EMBLEM (icon), NULL);

	emblemed = G_EMBLEMED_ICON (g_object_new (G_TYPE_EMBLEMED_ICON,
	"gicon", icon,
	NULL));

	if (emblem != NULL)
	g_emblemed_icon_add_emblem (emblemed, emblem);

	return G_ICON (emblemed);
	}


	/**
	* g_emblemed_icon_get_icon:
	* @emblemed: a #GEmblemedIcon
	*
	* Gets the main icon for @emblemed.
	*
	* Returns: (transfer none): a #GIcon that is owned by @emblemed
	*
	* Since: 2.18
	**/
	GIcon *
	g_emblemed_icon_get_icon (GEmblemedIcon *emblemed)
	{
	g_return_val_if_fail (G_IS_EMBLEMED_ICON (emblemed), NULL);

	return emblemed->priv->icon;
	}

	/**
	* g_emblemed_icon_get_emblems:
	* @emblemed: a #GEmblemedIcon
	*
	* Gets the list of emblems for the @icon.
	*
	* Returns: (element-type Gio.Emblem) (transfer none): a #GList of
	* #GEmblems that is owned by @emblemed
	*
	* Since: 2.18
	**/

	GList *
	g_emblemed_icon_get_emblems (GEmblemedIcon *emblemed)
	{
	g_return_val_if_fail (G_IS_EMBLEMED_ICON (emblemed), NULL);

	return emblemed->priv->emblems;
	}

	/**
	* g_emblemed_icon_clear_emblems:
	* @emblemed: a #GEmblemedIcon
	*
	* Removes all the emblems from @icon.
	*
	* Since: 2.28
	**/
	void
	g_emblemed_icon_clear_emblems (GEmblemedIcon *emblemed)
	{
	g_return_if_fail (G_IS_EMBLEMED_ICON (emblemed));

	if (emblemed->priv->emblems == NULL)
	return;

	g_list_free_full (emblemed->priv->emblems, g_object_unref);
	emblemed->priv->emblems = NULL;
	}

	static gint
	g_emblem_comp (GEmblem *a,
	GEmblem *b)
	{
	guint hash_a = g_icon_hash (G_ICON (a));
	guint hash_b = g_icon_hash (G_ICON (b));

	if(hash_a < hash_b)
	return -1;

	if(hash_a == hash_b)
	return 0;

	return 1;
	}

	/**
	* g_emblemed_icon_add_emblem:
	* @emblemed: a #GEmblemedIcon
	* @emblem: a #GEmblem
	*
	* Adds @emblem to the #GList of #GEmblems.
	*
	* Since: 2.18
	**/
	void
	g_emblemed_icon_add_emblem (GEmblemedIcon *emblemed,
	GEmblem *emblem)
	{
	g_return_if_fail (G_IS_EMBLEMED_ICON (emblemed));
	g_return_if_fail (G_IS_EMBLEM (emblem));

	g_object_ref (emblem);
	emblemed->priv->emblems = g_list_insert_sorted (emblemed->priv->emblems, emblem,
	(GCompareFunc) g_emblem_comp);
	}

	static guint
	g_emblemed_icon_hash (GIcon *icon)
	{
	GEmblemedIcon *emblemed = G_EMBLEMED_ICON (icon);
	GList *list;
	guint hash = g_icon_hash (emblemed->priv->icon);

	for (list = emblemed->priv->emblems; list != NULL; list = list->next)
	hash ^= g_icon_hash (G_ICON (list->data));

	return hash;
	}

	static gboolean
	g_emblemed_icon_equal (GIcon *icon1,
	GIcon *icon2)
	{
	GEmblemedIcon *emblemed1 = G_EMBLEMED_ICON (icon1);
	GEmblemedIcon *emblemed2 = G_EMBLEMED_ICON (icon2);
	GList list1, list2;

	if (!g_icon_equal (emblemed1->priv->icon, emblemed2->priv->icon))
	return FALSE;

	list1 = emblemed1->priv->emblems;
	list2 = emblemed2->priv->emblems;

	while (list1 && list2)
	{
	if (!g_icon_equal (G_ICON (list1->data), G_ICON (list2->data)))
	return FALSE;

	list1 = list1->next;
	list2 = list2->next;
	}

	return list1 == NULL && list2 == NULL;
	}

	static gboolean
	g_emblemed_icon_to_tokens (GIcon *icon,
	GPtrArray *tokens,
	gint *out_version)
	{
	GEmblemedIcon *emblemed_icon = G_EMBLEMED_ICON (icon);
	GList *l;
	char *s;

	/* GEmblemedIcons are encoded as
	*
	* <encoded_icon> [<encoded_emblem_icon>]*
	*/

	g_return_val_if_fail (out_version != NULL, FALSE);

	*out_version = 0;

	s = g_icon_to_string (emblemed_icon->priv->icon);
	if (s == NULL)
	return FALSE;

	g_ptr_array_add (tokens, s);

	for (l = emblemed_icon->priv->emblems; l != NULL; l = l->next)
	{
	GIcon *emblem_icon = G_ICON (l->data);

	s = g_icon_to_string (emblem_icon);
	if (s == NULL)
	return FALSE;

	g_ptr_array_add (tokens, s);
	}

	return TRUE;
	}

	static GIcon *
	g_emblemed_icon_from_tokens (gchar **tokens,
	gint num_tokens,
	gint version,
	GError **error)
	{
	GEmblemedIcon *emblemed_icon;
	int n;

	emblemed_icon = NULL;

	if (version != 0)
	{
	g_set_error (error,
	G_IO_ERROR,
	G_IO_ERROR_INVALID_ARGUMENT,
	_("Can’t handle version %d of GEmblemedIcon encoding"),
	version);
	goto fail;
	}

	if (num_tokens < 1)
	{
	g_set_error (error,
	G_IO_ERROR,
	G_IO_ERROR_INVALID_ARGUMENT,
	_("Malformed number of tokens (%d) in GEmblemedIcon encoding"),
	num_tokens);
	goto fail;
	}

	emblemed_icon = g_object_new (G_TYPE_EMBLEMED_ICON, NULL);
	emblemed_icon->priv->icon = g_icon_new_for_string (tokens[0], error);
	if (emblemed_icon->priv->icon == NULL)
	goto fail;

	for (n = 1; n < num_tokens; n++)
	{
	GIcon *emblem;

	emblem = g_icon_new_for_string (tokens[n], error);
	if (emblem == NULL)
	goto fail;

	if (!G_IS_EMBLEM (emblem))
	{
	g_set_error_literal (error,
	G_IO_ERROR,
	G_IO_ERROR_INVALID_ARGUMENT,
	_("Expected a GEmblem for GEmblemedIcon"));
	g_object_unref (emblem);
	goto fail;
	}

	emblemed_icon->priv->emblems = g_list_append (emblemed_icon->priv->emblems, emblem);
	}

	return G_ICON (emblemed_icon);

	fail:
	if (emblemed_icon != NULL)
	g_object_unref (emblemed_icon);
	return NULL;
	}

	static GVariant *
	g_emblemed_icon_serialize (GIcon *icon)
	{
	GEmblemedIcon *emblemed_icon = G_EMBLEMED_ICON (icon);
	GVariantBuilder builder;
	GVariant *icon_data;
	GList *node;

	icon_data = g_icon_serialize (emblemed_icon->priv->icon);
	if (!icon_data)
	return NULL;

	g_variant_builder_init (&builder, G_VARIANT_TYPE ("(va(va{sv}))"));

	g_variant_builder_add (&builder, "v", icon_data);
	g_variant_unref (icon_data);

	g_variant_builder_open (&builder, G_VARIANT_TYPE ("a(va{sv})"));
	for (node = emblemed_icon->priv->emblems; node != NULL; node = node->next)
	{
	icon_data = g_icon_serialize (node->data);
	if (icon_data)
	{
	/* We know how emblems serialize, so do a tweak here to
	* reduce some of the variant wrapping and redundant storage
	* of 'emblem' over and again...
	*/
	if (g_variant_is_of_type (icon_data, G_VARIANT_TYPE ("(sv)")))
	{
	const gchar *name;
	GVariant *content;

	g_variant_get (icon_data, "(&sv)", &name, &content);

	if (g_str_equal (name, "emblem") && g_variant_is_of_type (content, G_VARIANT_TYPE ("(va{sv})")))
	g_variant_builder_add (&builder, "@(va{sv})", content);

	g_variant_unref (content);
	}

	g_variant_unref (icon_data);
	}
	}
	g_variant_builder_close (&builder);

	return g_variant_new ("(sv)", "emblemed", g_variant_builder_end (&builder));
	}

	static void
	g_emblemed_icon_icon_iface_init (GIconIface *iface)
	{
	iface->hash = g_emblemed_icon_hash;
	iface->equal = g_emblemed_icon_equal;
	iface->to_tokens = g_emblemed_icon_to_tokens;
	iface->from_tokens = g_emblemed_icon_from_tokens;
	iface->serialize = g_emblemed_icon_serialize;
	}