/* GTK - The GIMP Toolkit

 * Copyright (C) 2001 CodeFactory AB

 * Copyright (C) 2001, 2002 Anders Carlsson

 * Copyright (C) 2003, 2004 Matthias Clasen <mclasen@redhat.com>

 *

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Library General Public

 * License as published by the Free Software Foundation; either

 * version 2 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

 * Library General Public License for more details.

 *

 * You should have received a copy of the GNU Library General Public

 * License along with this library; if not, write to the

 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

/*

 * Author: Anders Carlsson <andersca@gnome.org>

 *

 * Modified by the GTK+ Team and others 1997-2004.  See the AUTHORS

 * file for a list of people on the GTK+ Team.  See the ChangeLog

 * files for a list of changes.  These files are distributed with

 * GTK+ at ftp://ftp.gtk.org/pub/gtk/.

 */

#include "config.h"

#include <string.h>

#include <gdk/gdkkeysyms.h>

#include "gtkaboutdialog.h"

#include "gtkbutton.h"

#include "gtkbbox.h"

#include "gtkdialog.h"

#include "gtkhbox.h"

#include "gtkimage.h"

#include "gtklabel.h"

#include "gtklinkbutton.h"

#include "gtkmarshalers.h"

#include "gtknotebook.h"

#include "gtkscrolledwindow.h"

#include "gtkstock.h"

#include "gtktextview.h"

#include "gtkvbox.h"

#include "gtkiconfactory.h"

#include "gtkshow.h"

#include "gtkmain.h"

#include "gtkmessagedialog.h"

#include "gtkprivate.h"

#include "gtkintl.h"

#include "gtkalias.h"

/**

 * SECTION:gtkaboutdialog

 * @Short_description: Display information about an application

 * @Title: GtkAboutDialog

 * @See_also:#GTK_STOCK_ABOUT

 *

 * The #GtkAboutDialog offers a simple way to display information about

 * a program like its logo, name, copyright, website and license. It is

 * also possible to give credits to the authors, documenters, translators

 * and artists who have worked on the program. An about dialog is typically

 * opened when the user selects the <literal>About</literal> option from

 * the <literal>Help</literal> menu. All parts of the dialog are optional.

 *

 * About dialog often contain links and email addresses. #GtkAboutDialog

 * supports this by offering global hooks, which are called when the user

 * clicks on a link or email address, see gtk_about_dialog_set_email_hook()

 * and gtk_about_dialog_set_url_hook(). Email addresses in the

 * authors, documenters and artists properties are recognized by looking for

 * <literal><user@host></literal>, URLs are

 * recognized by looking for <literal>http://url</literal>, with

 * <literal>url</literal> extending to the next space, tab or line break.

 *

 * <para id="gtk-about-dialog-hook-setup">

 * Since 2.18 #GtkAboutDialog provides default website and email hooks that

 * use gtk_show_uri().

 * </para>

 *

 * If you want provide your own hooks overriding the default ones, it is

 * important to do so before setting the website and email URL properties,

 * like this:

 * <informalexample><programlisting>

 * gtk_about_dialog_set_url_hook (GTK_ABOUT_DIALOG (dialog), launch_url, NULL, NULL);

 * gtk_about_dialog_set_website (GTK_ABOUT_DIALOG (dialog), app_url);

 * </programlisting></informalexample>

 * To disable the default hooks, you can pass %NULL as the hook func. Then,

 * the #GtkAboutDialog widget will not display the website or the

 * email addresses as clickable.

 *

 * To make constructing a #GtkAboutDialog as convenient as possible, you can

 * use the function gtk_show_about_dialog() which constructs and shows a dialog

 * and keeps it around so that it can be shown again.

 *

 * Note that GTK+ sets a default title of <literal>_("About %s")</literal>

 * on the dialog window (where %s is replaced by the name of the

 * application, but in order to ensure proper translation of the title,

 * applications should set the title property explicitly when constructing

 * a #GtkAboutDialog, as shown in the following example:

 * <informalexample><programlisting>

 * gtk_show_about_dialog (NULL,

 *                        "program-name", "ExampleCode",

 *                        "logo", example_logo,

 *                        "title" _("About ExampleCode"),

 *                        NULL);

 * </programlisting></informalexample>

 * Note that prior to GTK+ 2.12, the #GtkAboutDialog:program-name property

 * was called "name". This was changed to avoid the conflict with the

 * #GtkWidget:name property.

 */

static GdkColor default_link_color = { 0, 0, 0, 0xeeee };

static GdkColor default_visited_link_color = { 0, 0x5555, 0x1a1a, 0x8b8b };

typedef struct _GtkAboutDialogPrivate GtkAboutDialogPrivate;

struct _GtkAboutDialogPrivate

{

  gchar *name;

  gchar *version;

  gchar *copyright;

  gchar *comments;

  gchar *website_url;

  gchar *website_text;

  gchar *translator_credits;

  gchar *license;

  gchar **authors;

  gchar **documenters;

  gchar **artists;

  GtkWidget *logo_image;

  GtkWidget *name_label;

  GtkWidget *comments_label;

  GtkWidget *copyright_label;

  GtkWidget *website_label;

  GtkWidget *credits_button;

  GtkWidget *credits_dialog;

  GtkWidget *license_button;

  GtkWidget *license_dialog;

  GdkCursor *hand_cursor;

  GdkCursor *regular_cursor;

  GSList *visited_links;

  guint hovering_over_link : 1;

  guint wrap_license : 1;

};

#define GTK_ABOUT_DIALOG_GET_PRIVATE(obj) (G_TYPE_INSTANCE_GET_PRIVATE ((obj), GTK_TYPE_ABOUT_DIALOG, GtkAboutDialogPrivate))

enum

{

  PROP_0,

  PROP_NAME,

  PROP_VERSION,

  PROP_COPYRIGHT,

  PROP_COMMENTS,

  PROP_WEBSITE,

  PROP_WEBSITE_LABEL,

  PROP_LICENSE,

  PROP_AUTHORS,

  PROP_DOCUMENTERS,

  PROP_TRANSLATOR_CREDITS,

  PROP_ARTISTS,

  PROP_LOGO,

  PROP_LOGO_ICON_NAME,

  PROP_WRAP_LICENSE

};

static void                 gtk_about_dialog_finalize       (GObject            *object);

static void                 gtk_about_dialog_get_property   (GObject            *object,

                                                             guint               prop_id,

                                                             GValue             *value,

                                                             GParamSpec         *pspec);

static void                 gtk_about_dialog_set_property   (GObject            *object,

                                                             guint               prop_id,

                                                             const GValue       *value,

                                                             GParamSpec         *pspec);

static void                 gtk_about_dialog_show           (GtkWidget          *widge);

static void                 update_name_version             (GtkAboutDialog     *about);

static GtkIconSet *         icon_set_new_from_pixbufs       (GList              *pixbufs);

static void                 follow_if_link                  (GtkAboutDialog     *about,

                                                             GtkTextView        *text_view,

                                                             GtkTextIter        *iter);

static void                 set_cursor_if_appropriate       (GtkAboutDialog     *about,

                                                             GtkTextView        *text_view,

                                                             gint                x,

                                                             gint                y);

static void                 display_credits_dialog          (GtkWidget          *button,

                                                             gpointer            data);

static void                 display_license_dialog          (GtkWidget          *button,

                                                             gpointer            data);

static void                 close_cb                        (GtkAboutDialog     *about);

static gboolean             gtk_about_dialog_activate_link  (GtkAboutDialog     *about,

                                                             const gchar        *uri);

static void                 default_url_hook                (GtkAboutDialog     *about,

                                                             const gchar        *uri,

                                                             gpointer            user_data);

static void                 default_email_hook              (GtkAboutDialog     *about,

                                                             const gchar        *email_address,

                                                             gpointer            user_data);

static gboolean activate_email_hook_set = FALSE;

static GtkAboutDialogActivateLinkFunc activate_email_hook = NULL;

static gpointer activate_email_hook_data = NULL;

static GDestroyNotify activate_email_hook_destroy = NULL;

static gboolean activate_url_hook_set = FALSE;

static GtkAboutDialogActivateLinkFunc activate_url_hook = NULL;

static gpointer activate_url_hook_data = NULL;

static GDestroyNotify activate_url_hook_destroy = NULL;

static void

default_url_hook (GtkAboutDialog *about,

                  const gchar    *uri,

                  gpointer        user_data)

{

  GdkScreen *screen;

  GError *error = NULL;

  screen = gtk_widget_get_screen (GTK_WIDGET (about));

  if (!gtk_show_uri (screen, uri, gtk_get_current_event_time (), &error))

    {

      GtkWidget *dialog;

      dialog = gtk_message_dialog_new (GTK_WINDOW (about),

                                       GTK_DIALOG_DESTROY_WITH_PARENT |

                                       GTK_DIALOG_MODAL,

                                       GTK_MESSAGE_ERROR,

                                       GTK_BUTTONS_CLOSE,

                                       "%s", _("Could not show link"));

      gtk_message_dialog_format_secondary_text (GTK_MESSAGE_DIALOG (dialog),

                                                "%s", error->message);

      g_error_free (error);

      g_signal_connect (dialog, "response",

                        G_CALLBACK (gtk_widget_destroy), NULL);

      gtk_window_present (GTK_WINDOW (dialog));

    }

}

static void

default_email_hook (GtkAboutDialog *about,

                    const gchar    *email_address,

                    gpointer        user_data)

{

  char *escaped, *uri;

  escaped = g_uri_escape_string (email_address, NULL, FALSE);

  uri = g_strdup_printf ("mailto:%s", escaped);

  g_free (escaped);

  default_url_hook (about, uri, user_data);

  g_free (uri);

}

enum {

  ACTIVATE_LINK,

  LAST_SIGNAL

};

static guint signals[LAST_SIGNAL] = { 0 };

G_DEFINE_TYPE (GtkAboutDialog, gtk_about_dialog, GTK_TYPE_DIALOG)

static void

gtk_about_dialog_class_init (GtkAboutDialogClass *klass)

{

  GObjectClass *object_class;

  GtkWidgetClass *widget_class;

  object_class = (GObjectClass *)klass;

  widget_class = (GtkWidgetClass *)klass;

  object_class->set_property = gtk_about_dialog_set_property;

  object_class->get_property = gtk_about_dialog_get_property;

  object_class->finalize = gtk_about_dialog_finalize;

  widget_class->show = gtk_about_dialog_show;

  klass->activate_link = gtk_about_dialog_activate_link;

  /**

   * GtkAboutDialog::activate-link:

   * @label: The object on which the signal was emitted

   * @uri: the URI that is activated

   *

   * The signal which gets emitted to activate a URI.

   * Applications may connect to it to override the default behaviour,

   * which is to call gtk_show_uri().

   *

   * Returns: %TRUE if the link has been activated

   *

   * Since: 2.24

   */

  signals[ACTIVATE_LINK] =

    g_signal_new ("activate-link",

                  G_TYPE_FROM_CLASS (object_class),

                  G_SIGNAL_RUN_LAST,

                  G_STRUCT_OFFSET (GtkAboutDialogClass, activate_link),

                  _gtk_boolean_handled_accumulator, NULL,

                  _gtk_marshal_BOOLEAN__STRING,

                  G_TYPE_BOOLEAN, 1, G_TYPE_STRING);

  /**

   * GtkAboutDialog:program-name:

   *

   * The name of the program.

   * If this is not set, it defaults to g_get_application_name().

   *

   * Since: 2.12

   */

  g_object_class_install_property (object_class,

                                   PROP_NAME,

                                   g_param_spec_string ("program-name",

                                                        P_("Program name"),

                                                        P_("The name of the program. If this is not set, it defaults to g_get_application_name()"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:version:

   *

   * The version of the program.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_VERSION,

                                   g_param_spec_string ("version",

                                                        P_("Program version"),

                                                        P_("The version of the program"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:copyright:

   *

   * Copyright information for the program.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_COPYRIGHT,

                                   g_param_spec_string ("copyright",

                                                        P_("Copyright string"),

                                                        P_("Copyright information for the program"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:comments:

   *

   * Comments about the program. This string is displayed in a label

   * in the main dialog, thus it should be a short explanation of

   * the main purpose of the program, not a detailed list of features.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_COMMENTS,

                                   g_param_spec_string ("comments",

                                                        P_("Comments string"),

                                                        P_("Comments about the program"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:license:

   *

   * The license of the program. This string is displayed in a

   * text view in a secondary dialog, therefore it is fine to use

   * a long multi-paragraph text. Note that the text is only wrapped

   * in the text view if the "wrap-license" property is set to %TRUE;

   * otherwise the text itself must contain the intended linebreaks.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_LICENSE,

                                   g_param_spec_string ("license",

                                                        _("License"),

                                                        _("The license of the program"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:website:

   *

   * The URL for the link to the website of the program.

   * This should be a string starting with "http://.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_WEBSITE,

                                   g_param_spec_string ("website",

                                                        P_("Website URL"),

                                                        P_("The URL for the link to the website of the program"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:website-label:

   *

   * The label for the link to the website of the program. If this is not set,

   * it defaults to the URL specified in the #GtkAboutDialog:website property.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_WEBSITE_LABEL,

                                   g_param_spec_string ("website-label",

                                                        P_("Website label"),

                                                        P_("The label for the link to the website of the program. If this is not set, it defaults to the URL"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:authors:

   *

   * The authors of the program, as a %NULL-terminated array of strings.

   * Each string may contain email addresses and URLs, which will be displayed

   * as links, see the introduction for more details.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_AUTHORS,

                                   g_param_spec_boxed ("authors",

                                                       P_("Authors"),

                                                       P_("List of authors of the program"),

                                                       G_TYPE_STRV,

                                                       GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:documenters:

   *

   * The people documenting the program, as a %NULL-terminated array of strings.

   * Each string may contain email addresses and URLs, which will be displayed

   * as links, see the introduction for more details.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_DOCUMENTERS,

                                   g_param_spec_boxed ("documenters",

                                                       P_("Documenters"),

                                                       P_("List of people documenting the program"),

                                                       G_TYPE_STRV,

                                                       GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:artists:

   *

   * The people who contributed artwork to the program, as a %NULL-terminated

   * array of strings. Each string may contain email addresses and URLs, which

   * will be displayed as links, see the introduction for more details.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_ARTISTS,

                                   g_param_spec_boxed ("artists",

                                                       P_("Artists"),

                                                       P_("List of people who have contributed artwork to the program"),

                                                       G_TYPE_STRV,

                                                       GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:translator-credits:

   *

   * Credits to the translators. This string should be marked as translatable.

   * The string may contain email addresses and URLs, which will be displayed

   * as links, see the introduction for more details.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_TRANSLATOR_CREDITS,

                                   g_param_spec_string ("translator-credits",

                                                        P_("Translator credits"),

                                                        P_("Credits to the translators. This string should be marked as translatable"),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:logo:

   *

   * A logo for the about box. If this is not set, it defaults to

   * gtk_window_get_default_icon_list().

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_LOGO,

                                   g_param_spec_object ("logo",

                                                        P_("Logo"),

                                                        P_("A logo for the about box. If this is not set, it defaults to gtk_window_get_default_icon_list()"),

                                                        GDK_TYPE_PIXBUF,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:logo-icon-name:

   *

   * A named icon to use as the logo for the about box. This property

   * overrides the #GtkAboutDialog:logo property.

   *

   * Since: 2.6

   */

  g_object_class_install_property (object_class,

                                   PROP_LOGO_ICON_NAME,

                                   g_param_spec_string ("logo-icon-name",

                                                        P_("Logo Icon Name"),

                                                        P_("A named icon to use as the logo for the about box."),

                                                        NULL,

                                                        GTK_PARAM_READWRITE));

  /**

   * GtkAboutDialog:wrap-license:

   *

   * Whether to wrap the text in the license dialog.

   *

   * Since: 2.8

   */

  g_object_class_install_property (object_class,

                                   PROP_WRAP_LICENSE,

                                   g_param_spec_boolean ("wrap-license",

                                                         P_("Wrap license"),

                                                         P_("Whether to wrap the license text."),

                                                         FALSE,

                                                         GTK_PARAM_READWRITE));

  g_type_class_add_private (object_class, sizeof (GtkAboutDialogPrivate));

}

static gboolean

emit_activate_link (GtkAboutDialog *about,

                    const gchar    *uri)

{

  gboolean handled = FALSE;

  g_signal_emit (about, signals[ACTIVATE_LINK], 0, uri, &handled);

  return TRUE;

}

static void

gtk_about_dialog_init (GtkAboutDialog *about)

{

  GtkDialog *dialog = GTK_DIALOG (about);

  GtkAboutDialogPrivate *priv;

  GtkWidget *vbox, *hbox, *button, *close_button, *image;

  /* Data */

  priv = GTK_ABOUT_DIALOG_GET_PRIVATE (about);

  about->private_data = priv;

  priv->name = NULL;

  priv->version = NULL;

  priv->copyright = NULL;

  priv->comments = NULL;

  priv->website_url = NULL;

  priv->website_text = NULL;

  priv->translator_credits = NULL;

  priv->license = NULL;

  priv->authors = NULL;

  priv->documenters = NULL;

  priv->artists = NULL;

  priv->hand_cursor = gdk_cursor_new (GDK_HAND2);

  priv->regular_cursor = gdk_cursor_new (GDK_XTERM);

  priv->hovering_over_link = FALSE;

  priv->wrap_license = FALSE;

  gtk_dialog_set_has_separator (dialog, FALSE);

  gtk_container_set_border_width (GTK_CONTAINER (dialog), 5);

  gtk_box_set_spacing (GTK_BOX (dialog->vbox), 2); /* 2 * 5 + 2 = 12 */

  gtk_container_set_border_width (GTK_CONTAINER (dialog->action_area), 5);

  /* Widgets */

  gtk_widget_push_composite_child ();

  vbox = gtk_vbox_new (FALSE, 8);

  gtk_container_set_border_width (GTK_CONTAINER (vbox), 5);

  gtk_box_pack_start (GTK_BOX (dialog->vbox), vbox, TRUE, TRUE, 0);

  priv->logo_image = gtk_image_new ();

  gtk_box_pack_start (GTK_BOX (vbox), priv->logo_image, FALSE, FALSE, 0);

  priv->name_label = gtk_label_new (NULL);

  gtk_label_set_selectable (GTK_LABEL (priv->name_label), TRUE);

  gtk_label_set_justify (GTK_LABEL (priv->name_label), GTK_JUSTIFY_CENTER);

  gtk_box_pack_start (GTK_BOX (vbox), priv->name_label, FALSE, FALSE, 0);

  priv->comments_label = gtk_label_new (NULL);

  gtk_label_set_selectable (GTK_LABEL (priv->comments_label), TRUE);

  gtk_label_set_justify (GTK_LABEL (priv->comments_label), GTK_JUSTIFY_CENTER);

  gtk_label_set_line_wrap (GTK_LABEL (priv->comments_label), TRUE);

  gtk_box_pack_start (GTK_BOX (vbox), priv->comments_label, FALSE, FALSE, 0);

  priv->copyright_label = gtk_label_new (NULL);

  gtk_label_set_selectable (GTK_LABEL (priv->copyright_label), TRUE);

  gtk_label_set_justify (GTK_LABEL (priv->copyright_label), GTK_JUSTIFY_CENTER);

  gtk_box_pack_start (GTK_BOX (vbox), priv->copyright_label, FALSE, FALSE, 0);

  hbox = gtk_hbox_new (TRUE, 0);

  gtk_box_pack_start (GTK_BOX (vbox), hbox, TRUE, FALSE, 0);

  priv->website_label = button = gtk_label_new ("");

  gtk_widget_set_no_show_all (button, TRUE);

  gtk_label_set_selectable (GTK_LABEL (button), TRUE);

  gtk_box_pack_start (GTK_BOX (hbox), button, FALSE, FALSE, 0);

  g_signal_connect_swapped (button, "activate-link",

                            G_CALLBACK (emit_activate_link), about);

  gtk_widget_show (vbox);

  gtk_widget_show (priv->logo_image);

  gtk_widget_show (priv->name_label);

  gtk_widget_show (hbox);

  /* Add the close button */

  close_button = gtk_dialog_add_button (GTK_DIALOG (about), GTK_STOCK_CLOSE,

                                        GTK_RESPONSE_CANCEL);

  gtk_dialog_set_default_response (GTK_DIALOG (about), GTK_RESPONSE_CANCEL);

  /* Add the credits button */

  button = gtk_button_new_with_mnemonic (_("C_redits"));

  gtk_widget_set_can_default (button, TRUE);

  image = gtk_image_new_from_stock (GTK_STOCK_ABOUT, GTK_ICON_SIZE_BUTTON);

  gtk_button_set_image (GTK_BUTTON (button), image);

  gtk_widget_set_no_show_all (button, TRUE);

  gtk_box_pack_end (GTK_BOX (GTK_DIALOG (about)->action_area),

                    button, FALSE, TRUE, 0);

  gtk_button_box_set_child_secondary (GTK_BUTTON_BOX (GTK_DIALOG (about)->action_area), button, TRUE);

  g_signal_connect (button, "clicked",

                    G_CALLBACK (display_credits_dialog), about);

  priv->credits_button = button;

  priv->credits_dialog = NULL;

  /* Add the license button */

  button = gtk_button_new_from_stock (_("_License"));

  gtk_widget_set_can_default (button, TRUE);

  gtk_widget_set_no_show_all (button, TRUE);

  gtk_box_pack_end (GTK_BOX (GTK_DIALOG (about)->action_area),

                    button, FALSE, TRUE, 0);

  gtk_button_box_set_child_secondary (GTK_BUTTON_BOX (GTK_DIALOG (about)->action_area), button, TRUE);

  g_signal_connect (button, "clicked",

                    G_CALLBACK (display_license_dialog), about);

  priv->license_button = button;

  priv->license_dialog = NULL;

  gtk_window_set_resizable (GTK_WINDOW (about), FALSE);

  gtk_widget_pop_composite_child ();

  gtk_widget_grab_default (close_button);

  gtk_widget_grab_focus (close_button);

  /* force defaults */

  gtk_about_dialog_set_program_name (about, NULL);

  gtk_about_dialog_set_logo (about, NULL);

}

static void

gtk_about_dialog_finalize (GObject *object)

{

  GtkAboutDialog *about = GTK_ABOUT_DIALOG (object);

  GtkAboutDialogPrivate *priv = (GtkAboutDialogPrivate *)about->private_data;

  g_free (priv->name);

  g_free (priv->version);

  g_free (priv->copyright);

  g_free (priv->comments);

  g_free (priv->license);

  g_free (priv->website_url);

  g_free (priv->website_text);

  g_free (priv->translator_credits);

  g_strfreev (priv->authors);

  g_strfreev (priv->documenters);

  g_strfreev (priv->artists);

  g_slist_foreach (priv->visited_links, (GFunc)g_free, NULL);

  g_slist_free (priv->visited_links);

  gdk_cursor_unref (priv->hand_cursor);

  gdk_cursor_unref (priv->regular_cursor);

  G_OBJECT_CLASS (gtk_about_dialog_parent_class)->finalize (object);

}

static void

gtk_about_dialog_set_property (GObject      *object,

                               guint         prop_id,

                               const GValue *value,

                               GParamSpec   *pspec)

{

  GtkAboutDialog *about = GTK_ABOUT_DIALOG (object);

  GtkAboutDialogPrivate *priv = (GtkAboutDialogPrivate *)about->private_data;

  switch (prop_id)

    {

    case PROP_NAME:

      gtk_about_dialog_set_program_name (about, g_value_get_string (value));

      break;

    case PROP_VERSION:

      gtk_about_dialog_set_version (about, g_value_get_string (value));

      break;

    case PROP_COMMENTS:

      gtk_about_dialog_set_comments (about, g_value_get_string (value));

      break;

    case PROP_WEBSITE:

      gtk_about_dialog_set_website (about, g_value_get_string (value));

      break;

    case PROP_WEBSITE_LABEL:

      gtk_about_dialog_set_website_label (about, g_value_get_string (value));

      break;

    case PROP_LICENSE:

      gtk_about_dialog_set_license (about, g_value_get_string (value));

      break;

    case PROP_COPYRIGHT:

      gtk_about_dialog_set_copyright (about, g_value_get_string (value));

      break;

    case PROP_LOGO:

      gtk_about_dialog_set_logo (about, g_value_get_object (value));

      break;

    case PROP_AUTHORS:

      gtk_about_dialog_set_authors (about, (const gchar**)g_value_get_boxed (value));

      break;

    case PROP_DOCUMENTERS:

      gtk_about_dialog_set_documenters (about, (const gchar**)g_value_get_boxed (value));

      break;

    case PROP_ARTISTS:

      gtk_about_dialog_set_artists (about, (const gchar**)g_value_get_boxed (value));

      break;

    case PROP_TRANSLATOR_CREDITS:

      gtk_about_dialog_set_translator_credits (about, g_value_get_string (value));

      break;

    case PROP_LOGO_ICON_NAME:

      gtk_about_dialog_set_logo_icon_name (about, g_value_get_string (value));

      break;

    case PROP_WRAP_LICENSE:

      priv->wrap_license = g_value_get_boolean (value);

      break;

    default:

      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);

      break;

    }

}

static void

gtk_about_dialog_get_property (GObject    *object,

                               guint       prop_id,

                               GValue     *value,

                               GParamSpec *pspec)

{

  GtkAboutDialog *about = GTK_ABOUT_DIALOG (object);

  GtkAboutDialogPrivate *priv = (GtkAboutDialogPrivate *)about->private_data;

  switch (prop_id)

    {

    case PROP_NAME:

      g_value_set_string (value, priv->name);

      break;

    case PROP_VERSION:

      g_value_set_string (value, priv->version);

      break;

    case PROP_COPYRIGHT:

      g_value_set_string (value, priv->copyright);

      break;

    case PROP_COMMENTS:

      g_value_set_string (value, priv->comments);

      break;

    case PROP_WEBSITE:

      g_value_set_string (value, priv->website_url);

      break;

    case PROP_WEBSITE_LABEL:

      g_value_set_string (value, priv->website_text);

      break;

    case PROP_LICENSE:

      g_value_set_string (value, priv->license);

      break;

    case PROP_TRANSLATOR_CREDITS:

      g_value_set_string (value, priv->translator_credits);

      break;

    case PROP_AUTHORS:

      g_value_set_boxed (value, priv->authors);

      break;

    case PROP_DOCUMENTERS:

      g_value_set_boxed (value, priv->documenters);

      break;

    case PROP_ARTISTS:

      g_value_set_boxed (value, priv->artists);

      break;

    case PROP_LOGO:

      if (gtk_image_get_storage_type (GTK_IMAGE (priv->logo_image)) == GTK_IMAGE_PIXBUF)

        g_value_set_object (value, gtk_image_get_pixbuf (GTK_IMAGE (priv->logo_image)));

      else

        g_value_set_object (value, NULL);

      break;

    case PROP_LOGO_ICON_NAME:

      if (gtk_image_get_storage_type (GTK_IMAGE (priv->logo_image)) == GTK_IMAGE_ICON_NAME)

        {

          const gchar *icon_name;

          gtk_image_get_icon_name (GTK_IMAGE (priv->logo_image), &icon_name, NULL);

          g_value_set_string (value, icon_name);

        }

      else

        g_value_set_string (value, NULL);

      break;

    case PROP_WRAP_LICENSE:

      g_value_set_boolean (value, priv->wrap_license);

      break;

    default:

      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);

      break;

    }

}

static gboolean

gtk_about_dialog_activate_link (GtkAboutDialog *about,

                                const gchar    *uri)

{

  if (g_str_has_prefix (uri, "mailto:"))

    {

      gchar *email;

      email = g_uri_unescape_string (uri + strlen ("mailto:"), NULL);

      if (activate_email_hook_set)

        activate_email_hook (about, email, activate_email_hook_data);

      else

        default_email_hook (about, email, NULL);

      g_free (email);

    }

  else

    {

      if (activate_url_hook_set)

        activate_url_hook (about, uri, activate_url_hook_data);

      else

        default_url_hook (about, uri, NULL);

    }

  return TRUE;

}

static void

update_website (GtkAboutDialog *about)

{

  GtkAboutDialogPrivate *priv = (GtkAboutDialogPrivate *)about->private_data;

  gtk_widget_show (priv->website_label);

  if (priv->website_url && (!activate_url_hook_set || activate_url_hook != NULL))

    {

      gchar *markup;

      if (priv->website_text)

        {