libempathy-gtk/empathy-irc-network-chooser.c

   1 /*
   2  * Copyright (C) 2007-2008 Guillaume Desmottes
   3  * Copyright (C) 2010 Collabora Ltd.
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  18  *
  19  * Authors: Guillaume Desmottes <gdesmott@gnome.org>
  20  */
  21
  22 #include "config.h"
  23
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include <sys/stat.h>
  27
  28 #include <glib/gi18n-lib.h>
  29 #include <gtk/gtk.h>
  30
  31 #include <libempathy/empathy-utils.h>
  32 #include <libempathy/empathy-irc-network-manager.h>
  33
  34 #include "empathy-irc-network-dialog.h"
  35 #include "empathy-ui-utils.h"
  36 #include "empathy-irc-network-chooser-dialog.h"
  37
  38 #define DEBUG_FLAG EMPATHY_DEBUG_ACCOUNT | EMPATHY_DEBUG_IRC
  39 #include <libempathy/empathy-debug.h>
  40
  41 #include "empathy-irc-network-chooser.h"
  42
  43 #define DEFAULT_IRC_NETWORK "irc.gimp.org"
  44 #define DEFAULT_IRC_PORT 6667
  45 #define DEFAULT_IRC_SSL FALSE
  46
  47 #define GET_PRIV(obj) EMPATHY_GET_PRIV (obj, EmpathyIrcNetworkChooser)
  48
  49 enum {
  50     PROP_SETTINGS = 1
  51 };
  52
  53 enum {
  54     SIG_CHANGED,
  55     LAST_SIGNAL
  56 };
  57
  58 static guint signals[LAST_SIGNAL] = { 0 };
  59
  60 typedef struct {
  61     EmpathyAccountSettings *settings;
  62
  63     EmpathyIrcNetworkManager *network_manager;
  64     GtkWidget *dialog;
  65     /* Displayed network */
  66     EmpathyIrcNetwork *network;
  67 } EmpathyIrcNetworkChooserPriv;
  68
  69 G_DEFINE_TYPE (EmpathyIrcNetworkChooser, empathy_irc_network_chooser,
  70     GTK_TYPE_BUTTON);
  71
  72 static void
  73 empathy_irc_network_chooser_set_property (GObject *object,
  74     guint prop_id,
  75     const GValue *value,
  76     GParamSpec *pspec)
  77 {
  78   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (object);
  79
  80   switch (prop_id)
  81     {
  82       case PROP_SETTINGS:
  83         priv->settings = g_value_dup_object (value);
  84         break;
  85       default:
  86         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
  87         break;
  88     }
  89 }
  90
  91 static void
  92 empathy_irc_network_chooser_get_property (GObject *object,
  93     guint prop_id,
  94     GValue *value,
  95     GParamSpec *pspec)
  96 {
  97   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (object);
  98
  99   switch (prop_id)
 100     {
 101       case PROP_SETTINGS:
 102         g_value_set_object (value, priv->settings);
 103         break;
 104       default:
 105         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 106         break;
 107     }
 108 }
 109
 110 static void
 111 unset_server_params (EmpathyIrcNetworkChooser *self)
 112 {
 113   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 114
 115   DEBUG ("Unset server, port and use-ssl");
 116   empathy_account_settings_unset (priv->settings, "server");
 117   empathy_account_settings_unset (priv->settings, "port");
 118   empathy_account_settings_unset (priv->settings, "use-ssl");
 119 }
 120
 121 static gchar *
 122 dup_network_service (EmpathyIrcNetwork *network)
 123 {
 124   /* Account.Service has to be a lower case alphanumeric string which may
 125    * also contain '-' but not start with it. */
 126 #define VALID G_CSET_a_2_z G_CSET_DIGITS "-"
 127   gchar *service, *tmp;
 128
 129   service = g_strdup (empathy_irc_network_get_name (network));
 130   service = g_strstrip (service);
 131
 132   if (tp_str_empty (service))
 133     {
 134       g_free (service);
 135       return NULL;
 136     }
 137
 138   tmp = service;
 139   service = g_ascii_strdown (service, -1);
 140   g_free (tmp);
 141
 142   service = g_strcanon (service, VALID, '-');
 143
 144   if (service[0] == '-')
 145     {
 146       tmp = service;
 147       service = g_strdup (service + 1);
 148
 149       g_free (tmp);
 150     }
 151
 152   return service;
 153 }
 154
 155 static void
 156 update_server_params (EmpathyIrcNetworkChooser *self)
 157 {
 158   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 159   GSList *servers;
 160   const gchar *charset;
 161
 162   g_assert (priv->network != NULL);
 163
 164   charset = empathy_irc_network_get_charset (priv->network);
 165   DEBUG ("Setting charset to %s", charset);
 166   empathy_account_settings_set (priv->settings, "charset",
 167       g_variant_new_string (charset));
 168
 169   servers = empathy_irc_network_get_servers (priv->network);
 170   if (g_slist_length (servers) > 0)
 171     {
 172       /* set the first server as CM server */
 173       EmpathyIrcServer *server = servers->data;
 174       gchar *address;
 175       guint port;
 176       gboolean ssl;
 177       gchar *service;
 178
 179       g_object_get (server,
 180           "address", &address,
 181           "port", &port,
 182           "ssl", &ssl,
 183           NULL);
 184
 185       DEBUG ("Setting server to %s", address);
 186       empathy_account_settings_set (priv->settings, "server",
 187           g_variant_new_string (address));
 188       DEBUG ("Setting port to %u", port);
 189       empathy_account_settings_set (priv->settings, "port",
 190           g_variant_new_uint32 (port));
 191       DEBUG ("Setting use-ssl to %s", ssl ? "TRUE": "FALSE" );
 192       empathy_account_settings_set (priv->settings, "use-ssl",
 193           g_variant_new_boolean (ssl));
 194
 195       /* Set Account.Service */
 196       service = dup_network_service (priv->network);
 197       DEBUG ("Setting Service to %s", service);
 198       empathy_account_settings_set_service (priv->settings, service);
 199
 200       g_free (address);
 201       g_free (service);
 202     }
 203   else
 204     {
 205       /* No server. Unset values */
 206       unset_server_params (self);
 207     }
 208
 209   g_slist_foreach (servers, (GFunc) g_object_unref, NULL);
 210   g_slist_free (servers);
 211 }
 212
 213 static void
 214 set_label (EmpathyIrcNetworkChooser *self)
 215 {
 216   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 217
 218   g_assert (priv->network != NULL);
 219
 220   gtk_button_set_label (GTK_BUTTON (self),
 221       empathy_irc_network_get_name (priv->network));
 222 }
 223
 224 static void
 225 set_label_from_settings (EmpathyIrcNetworkChooser *self)
 226 {
 227   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 228   gchar *server;
 229
 230   tp_clear_object (&priv->network);
 231
 232   server = empathy_account_settings_dup_string (priv->settings, "server");
 233
 234   if (server != NULL)
 235     {
 236       EmpathyIrcServer *srv;
 237       gint port;
 238       gboolean ssl;
 239
 240       priv->network = empathy_irc_network_manager_find_network_by_address (
 241           priv->network_manager, server);
 242
 243       if (priv->network != NULL)
 244         {
 245           /* The network is known */
 246           g_object_ref (priv->network);
 247           set_label (self);
 248           return;
 249         }
 250
 251       /* We don't have this network. Let's create it */
 252       port = empathy_account_settings_get_uint32 (priv->settings, "port");
 253       ssl = empathy_account_settings_get_boolean (priv->settings,
 254           "use-ssl");
 255
 256       DEBUG ("Create a network %s", server);
 257       priv->network = empathy_irc_network_new (server);
 258       srv = empathy_irc_server_new (server, port, ssl);
 259
 260       empathy_irc_network_append_server (priv->network, srv);
 261       empathy_irc_network_manager_add (priv->network_manager, priv->network);
 262
 263       set_label (self);
 264
 265       g_object_unref (srv);
 266       g_free (server);
 267       return;
 268     }
 269
 270   /* Set default network */
 271   priv->network = empathy_irc_network_manager_find_network_by_address (
 272           priv->network_manager, DEFAULT_IRC_NETWORK);
 273
 274   if (priv->network == NULL)
 275     {
 276       /* Default network is not known, recreate it */
 277       EmpathyIrcServer *srv;
 278
 279       priv->network = empathy_irc_network_new (DEFAULT_IRC_NETWORK);
 280
 281       srv = empathy_irc_server_new (DEFAULT_IRC_NETWORK, DEFAULT_IRC_PORT,
 282           DEFAULT_IRC_SSL);
 283
 284       empathy_irc_network_append_server (priv->network, srv);
 285       empathy_irc_network_manager_add (priv->network_manager, priv->network);
 286
 287       g_object_unref (srv);
 288     }
 289
 290   set_label (self);
 291   update_server_params (self);
 292   g_object_ref (priv->network);
 293 }
 294
 295 static void
 296 dialog_response_cb (GtkDialog *dialog,
 297     gint response,
 298     EmpathyIrcNetworkChooser *self)
 299 {
 300   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 301   EmpathyIrcNetworkChooserDialog *chooser =
 302     EMPATHY_IRC_NETWORK_CHOOSER_DIALOG (priv->dialog);
 303
 304   if (response != GTK_RESPONSE_CLOSE &&
 305       response != GTK_RESPONSE_DELETE_EVENT)
 306     return;
 307
 308   if (empathy_irc_network_chooser_dialog_get_changed (chooser))
 309     {
 310       tp_clear_object (&priv->network);
 311
 312       priv->network = g_object_ref (
 313           empathy_irc_network_chooser_dialog_get_network (chooser));
 314
 315       update_server_params (self);
 316       set_label (self);
 317
 318       g_signal_emit (self, signals[SIG_CHANGED], 0);
 319     }
 320
 321   gtk_widget_destroy (priv->dialog);
 322   priv->dialog = NULL;
 323 }
 324
 325 static void
 326 clicked_cb (GtkButton *button,
 327     gpointer user_data)
 328 {
 329   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (button);
 330   GtkWindow *window;
 331
 332   if (priv->dialog != NULL)
 333     goto out;
 334
 335   window = empathy_get_toplevel_window (GTK_WIDGET (button));
 336
 337   priv->dialog = empathy_irc_network_chooser_dialog_new (priv->settings,
 338       priv->network, window);
 339   gtk_widget_show_all (priv->dialog);
 340
 341   tp_g_signal_connect_object (priv->dialog, "response",
 342       G_CALLBACK (dialog_response_cb), button, 0);
 343
 344 out:
 345   empathy_window_present (GTK_WINDOW (priv->dialog));
 346 }
 347
 348 static void
 349 empathy_irc_network_chooser_constructed (GObject *object)
 350 {
 351   EmpathyIrcNetworkChooser *self = (EmpathyIrcNetworkChooser *) object;
 352   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 353
 354   g_assert (priv->settings != NULL);
 355
 356   set_label_from_settings (self);
 357
 358   g_signal_connect (self, "clicked", G_CALLBACK (clicked_cb), self);
 359 }
 360
 361 static void
 362 empathy_irc_network_chooser_dispose (GObject *object)
 363 {
 364   EmpathyIrcNetworkManager *self = (EmpathyIrcNetworkManager *) object;
 365   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 366
 367   tp_clear_object (&priv->settings);
 368   tp_clear_object (&priv->network_manager);
 369   tp_clear_object (&priv->network);
 370
 371   if (G_OBJECT_CLASS (empathy_irc_network_chooser_parent_class)->dispose)
 372     G_OBJECT_CLASS (empathy_irc_network_chooser_parent_class)->dispose (object);
 373 }
 374
 375 static void
 376 empathy_irc_network_chooser_class_init (EmpathyIrcNetworkChooserClass *klass)
 377 {
 378   GObjectClass *object_class = G_OBJECT_CLASS (klass);
 379
 380   object_class->get_property = empathy_irc_network_chooser_get_property;
 381   object_class->set_property = empathy_irc_network_chooser_set_property;
 382   object_class->constructed = empathy_irc_network_chooser_constructed;
 383   object_class->dispose = empathy_irc_network_chooser_dispose;
 384
 385   g_object_class_install_property (object_class, PROP_SETTINGS,
 386     g_param_spec_object ("settings",
 387       "Settings",
 388       "The EmpathyAccountSettings to show and edit",
 389       EMPATHY_TYPE_ACCOUNT_SETTINGS,
 390       G_PARAM_STATIC_STRINGS | G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY));
 391
 392   signals[SIG_CHANGED] = g_signal_new ("changed",
 393       G_OBJECT_CLASS_TYPE (object_class),
 394       G_SIGNAL_RUN_LAST,
 395       0,
 396       NULL, NULL,
 397       g_cclosure_marshal_generic,
 398       G_TYPE_NONE,
 399       0);
 400
 401   g_type_class_add_private (object_class,
 402       sizeof (EmpathyIrcNetworkChooserPriv));
 403 }
 404
 405 static void
 406 empathy_irc_network_chooser_init (EmpathyIrcNetworkChooser *self)
 407 {
 408   EmpathyIrcNetworkChooserPriv *priv;
 409
 410   priv = G_TYPE_INSTANCE_GET_PRIVATE (self,
 411       EMPATHY_TYPE_IRC_NETWORK_CHOOSER, EmpathyIrcNetworkChooserPriv);
 412   self->priv = priv;
 413
 414   priv->network_manager = empathy_irc_network_manager_dup_default ();
 415 }
 416
 417 GtkWidget *
 418 empathy_irc_network_chooser_new (EmpathyAccountSettings *settings)
 419 {
 420   return g_object_new (EMPATHY_TYPE_IRC_NETWORK_CHOOSER,
 421       "settings", settings,
 422       NULL);
 423 }
 424
 425 EmpathyIrcNetwork *
 426 empathy_irc_network_chooser_get_network (EmpathyIrcNetworkChooser *self)
 427 {
 428   EmpathyIrcNetworkChooserPriv *priv = GET_PRIV (self);
 429
 430   return priv->network;
 431 }