2007-05-17 Murray Cumming <murrayc@murrayc.com>
[modest] / src / maemo / modest-connection-specific-smtp-window.c
1 /* connection-specific-smtp-window.c */
2
3 #include "modest-connection-specific-smtp-window.h"
4 #include "modest-connection-specific-smtp-edit-window.h"
5 #include <modest-account-mgr-helpers.h>
6 #include "widgets/modest-ui-constants.h"
7
8 #include <modest-runtime.h>
9 #include <tny-maemo-conic-device.h>
10
11 #include <gtk/gtktreeview.h>
12 #include <gtk/gtkcellrenderertext.h>
13 #include <gtk/gtkliststore.h>
14 #include <gtk/gtkscrolledwindow.h>
15 #include <gtk/gtkbutton.h>
16 #include <gtk/gtkhbox.h>
17 #include <gtk/gtkvbox.h>
18 #include <gtk/gtkstock.h>
19
20 #include <glib/gi18n.h>
21
22 G_DEFINE_TYPE (ModestConnectionSpecificSmtpWindow, modest_connection_specific_smtp_window, GTK_TYPE_WINDOW);
23
24 #define CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE(o) \
25         (G_TYPE_INSTANCE_GET_PRIVATE ((o), MODEST_TYPE_CONNECTION_SPECIFIC_SMTP_WINDOW, ModestConnectionSpecificSmtpWindowPrivate))
26
27 typedef struct _ModestConnectionSpecificSmtpWindowPrivate ModestConnectionSpecificSmtpWindowPrivate;
28
29 struct _ModestConnectionSpecificSmtpWindowPrivate
30 {
31         GtkTreeView *treeview;
32         GtkTreeModel *model;
33         GtkWidget *button_edit;
34         
35         ModestAccountMgr *account_manager;
36         gchar* account_name;
37 };
38
39 static void
40 modest_connection_specific_smtp_window_get_property (GObject *object, guint property_id,
41                                                                                                                         GValue *value, GParamSpec *pspec)
42 {
43         switch (property_id) {
44         default:
45                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
46         }
47 }
48
49 static void
50 modest_connection_specific_smtp_window_set_property (GObject *object, guint property_id,
51                                                                                                                         const GValue *value, GParamSpec *pspec)
52 {
53         switch (property_id) {
54         default:
55                 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
56         }
57 }
58
59 static void
60 modest_connection_specific_smtp_window_dispose (GObject *object)
61 {
62         if (G_OBJECT_CLASS (modest_connection_specific_smtp_window_parent_class)->dispose)
63                 G_OBJECT_CLASS (modest_connection_specific_smtp_window_parent_class)->dispose (object);
64 }
65
66 enum MODEL_COLS {
67         MODEL_COL_NAME = 0, /* libconic IAP Name: a string */
68         MODEL_COL_ID = 1, /* libconic IAP ID: a string */
69         MODEL_COL_SERVER_ACCOUNT_NAME = 2, /* a string */
70         MODEL_COL_SERVER_NAME = 3, /* a string */
71         MODEL_COL_SERVER_ACCOUNT_DATA = 4 /* a gpointer */
72 };
73
74
75 void update_model_server_names (ModestConnectionSpecificSmtpWindow *self);
76
77 static void
78 modest_connection_specific_smtp_window_finalize (GObject *object)
79 {
80         ModestConnectionSpecificSmtpWindowPrivate *priv = CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE (object);
81         
82         /* Free all the data items from the treemodel: */
83         GtkTreeIter iter;
84         gboolean valid = gtk_tree_model_get_iter_first (priv->model, &iter);
85         while (valid) {
86                 ModestServerAccountData *data = NULL;
87                 
88                 gtk_tree_model_get (priv->model, &iter, 
89                                     MODEL_COL_SERVER_ACCOUNT_DATA, &data,
90                                     -1);
91                                  
92                 if (data)
93                         modest_account_mgr_free_server_account_data (priv->account_manager, data);
94                         
95                 /* Get next row: */
96                 valid = gtk_tree_model_iter_next (priv->model, &iter);
97         }
98         
99         g_object_unref (G_OBJECT (priv->model));
100         g_free (priv->account_name);
101         
102         G_OBJECT_CLASS (modest_connection_specific_smtp_window_parent_class)->finalize (object);
103 }
104
105 static void
106 modest_connection_specific_smtp_window_class_init (ModestConnectionSpecificSmtpWindowClass *klass)
107 {
108         GObjectClass *object_class = G_OBJECT_CLASS (klass);
109
110         g_type_class_add_private (klass, sizeof (ModestConnectionSpecificSmtpWindowPrivate));
111
112         object_class->get_property = modest_connection_specific_smtp_window_get_property;
113         object_class->set_property = modest_connection_specific_smtp_window_set_property;
114         object_class->dispose = modest_connection_specific_smtp_window_dispose;
115         object_class->finalize = modest_connection_specific_smtp_window_finalize;
116 }
117
118 /* libconic does not return a list of connections in scratchbox,
119  * so enable this to put a fake row in the list,
120  * so we can test other parts of the code. */
121 /* #define DEBUG_WITHOUT_LIBCONIC 1 */
122
123 void
124 modest_connection_specific_smtp_window_fill_with_connections (ModestConnectionSpecificSmtpWindow *self, ModestAccountMgr *account_manager,
125         const gchar* account_name)
126 {
127         ModestConnectionSpecificSmtpWindowPrivate *priv = 
128                 CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE (self);
129         priv->account_manager = account_manager;
130         priv->account_name = account_name ? g_strdup (account_name) : NULL;
131         
132         GtkListStore *liststore = GTK_LIST_STORE (priv->model);
133         
134         TnyDevice *device = modest_runtime_get_device ();
135         g_assert (TNY_IS_MAEMO_CONIC_DEVICE (device));
136         
137         /* Get the list of Internet Access Points: */
138         #ifdef DEBUG_WITHOUT_LIBCONIC
139         GSList *list_iaps = g_slist_append(NULL, (gpointer)1);
140         #else
141         TnyMaemoConicDevice *maemo_device = TNY_MAEMO_CONIC_DEVICE (device);
142         GSList *list_iaps = tny_maemo_conic_device_get_iap_list (maemo_device);
143         #endif
144         
145         printf("debug: list_iaps=%p, list_iaps size = %d\n", list_iaps, g_slist_length(list_iaps));
146         
147         GSList* iter = list_iaps;
148         while (iter) {
149                 ConIcIap *iap = (ConIcIap*)iter->data;
150                 if (iap) {
151                         #ifdef DEBUG_WITHOUT_LIBCONIC
152                         const gchar *name = "debug name";
153                         const gchar *id = "debug id";
154                         #else
155                         const gchar *name = con_ic_iap_get_name (iap);
156                         const gchar *id = con_ic_iap_get_id (iap);
157                         #endif
158                         
159                         printf ("debug: iac name=%s, id=%s\n", name, id);
160                         
161                         /* Get any already-associated connection-specific server account: */
162                         gchar *server_account_name = NULL;
163                         if (priv->account_name)
164                                 server_account_name = modest_account_mgr_get_connection_specific_smtp (
165                                         priv->account_manager, priv->account_name, name);
166                                         
167                         /* Add the row to the model: */
168                         GtkTreeIter iter;
169                         gtk_list_store_append (liststore, &iter);
170                         gtk_list_store_set(liststore, &iter, 
171                                 MODEL_COL_ID, id, 
172                                 MODEL_COL_NAME, name,
173                                 MODEL_COL_SERVER_ACCOUNT_NAME, server_account_name,
174                                 -1);
175                                 
176                         g_free (server_account_name);
177                 }
178                 
179                 iter = g_slist_next (iter);     
180         }
181                 
182         #ifndef DEBUG_WITHOUT_LIBCONIC
183         if (list_iaps)
184                 tny_maemo_conic_device_free_iap_list (maemo_device, list_iaps);
185         #endif
186                 
187         update_model_server_names (self);
188 }
189         
190 static void
191 on_button_edit (GtkButton *button, gpointer user_data)
192 {
193         ModestConnectionSpecificSmtpWindow *self = MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (user_data);
194         ModestConnectionSpecificSmtpWindowPrivate *priv = CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE (self);
195         
196         gchar *id = NULL;
197         gchar *connection_name = NULL;
198         gchar *server_account_name = NULL;
199         ModestServerAccountData *data = NULL;
200         GtkTreeSelection *sel = gtk_tree_view_get_selection (GTK_TREE_VIEW (priv->treeview));
201         GtkTreeIter iter;
202         GtkTreeModel *model = 0;
203         if (gtk_tree_selection_get_selected (sel, &model, &iter)) {
204                 gtk_tree_model_get (priv->model, &iter, 
205                                     MODEL_COL_ID, &id, 
206                                     MODEL_COL_NAME, &connection_name, 
207                                     MODEL_COL_SERVER_ACCOUNT_NAME, &server_account_name,
208                                     MODEL_COL_SERVER_ACCOUNT_DATA, &data,
209                                     -1);
210         
211                 printf("DEBUG: %s: BEFORE: connection-specific server_account_name=%s\n", __FUNCTION__, server_account_name);
212                 /* TODO: Is 0 an allowed libconic IAP ID? 
213                  * If not then we should check for it. */
214                 
215                 /* Get existing server account data if a server account is already specified: */
216                 ModestServerAccountData *data_retrieved = NULL;
217                 if (server_account_name && !data) {
218                         data_retrieved = modest_account_mgr_get_server_account_data (priv->account_manager, 
219                                 server_account_name);
220                         data =  data_retrieved;
221                 }
222                 
223                 GtkWidget * window = GTK_WIDGET (modest_connection_specific_smtp_edit_window_new ());
224                 modest_connection_specific_smtp_edit_window_set_connection (
225                         MODEST_CONNECTION_SPECIFIC_SMTP_EDIT_WINDOW (window), id, connection_name, data);
226                         
227                 if (data_retrieved)
228                         modest_account_mgr_free_server_account_data (priv->account_manager, data_retrieved);
229                         
230                 gtk_window_set_transient_for (GTK_WINDOW (self), GTK_WINDOW (window));
231                 gint response = gtk_dialog_run (GTK_DIALOG (window));
232                 gtk_widget_hide (window);
233                 
234                 if (response == GTK_RESPONSE_OK) {
235                         /* Delete any previous data for this row: */
236                         if (data) 
237                         {
238                                 modest_account_mgr_free_server_account_data (priv->account_manager, data);
239                                 data = NULL;
240                         }
241                         
242                         /* Get the new account data and save it in the row for later:
243                          * We free this in finalize(),
244                          * and save it to our configuration in 
245                          * modest_connection_specific_smtp_window_save_server_accounts(). */
246                         data = modest_connection_specific_smtp_edit_window_get_settings (
247                                                 MODEST_CONNECTION_SPECIFIC_SMTP_EDIT_WINDOW (window), 
248                                                 priv->account_manager);
249                         
250                         gtk_list_store_set (GTK_LIST_STORE (priv->model), &iter, 
251                                         MODEL_COL_SERVER_ACCOUNT_DATA, data,
252                                         -1);
253                 }
254         }
255         
256         g_free (connection_name);
257         g_free (id);
258         g_free (server_account_name);
259 }
260
261 static void
262 on_button_cancel (GtkButton *button, gpointer user_data)
263 {
264         ModestConnectionSpecificSmtpWindow *self = MODEST_CONNECTION_SPECIFIC_SMTP_WINDOW (user_data);
265
266         /* Hide the window.
267          * The code that showed it will respond to the hide signal. */  
268         gtk_widget_hide (GTK_WIDGET (self));
269 }
270
271 static void
272 on_selection_changed (GtkTreeSelection *sel, ModestConnectionSpecificSmtpWindow *self)
273 {
274         ModestConnectionSpecificSmtpWindowPrivate *priv = 
275                 CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE (self);
276
277         GtkTreeModel *model = NULL;
278         GtkTreeIter iter;
279         const gboolean has_selection =
280                 gtk_tree_selection_get_selected (sel, &model, &iter);
281
282         gtk_widget_set_sensitive (priv->button_edit, has_selection);
283 }
284
285 static void
286 modest_connection_specific_smtp_window_init (ModestConnectionSpecificSmtpWindow *self)
287 {
288         /* This seems to be necessary to make the window show at the front with decoration.
289          * If we use property type=GTK_WINDOW_TOPLEVEL instead of the default GTK_WINDOW_POPUP+decoration, 
290          * then the window will be below the others. */
291         gtk_window_set_type_hint (GTK_WINDOW (self),
292                             GDK_WINDOW_TYPE_HINT_DIALOG);
293                             
294         ModestConnectionSpecificSmtpWindowPrivate *priv = 
295                 CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE (self);
296
297         /* Create a tree model for the tree view:
298          * with a string for the name, a string for the server name, and an int for the ID.
299          * This must match our MODEL_COLS enum constants.
300          */
301         priv->model = GTK_TREE_MODEL (gtk_list_store_new (5, 
302                 G_TYPE_STRING, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_POINTER));
303
304         /* Setup the tree view: */
305         priv->treeview = GTK_TREE_VIEW (gtk_tree_view_new_with_model (priv->model));
306
307         /* name column:
308          * The ID model column in not shown in the view. */
309         GtkTreeViewColumn *view_column = gtk_tree_view_column_new ();
310         GtkCellRenderer *renderer = gtk_cell_renderer_text_new ();
311         gtk_tree_view_column_pack_start(view_column, renderer, TRUE);
312         gtk_tree_view_column_set_attributes (view_column, renderer, 
313         "text", MODEL_COL_NAME, NULL);
314         gtk_tree_view_column_set_title (view_column, _("mcen_ia_optionalsmtp_connection_name"));
315         gtk_tree_view_append_column (priv->treeview, view_column);
316
317         
318         /* server name column: */
319         view_column = gtk_tree_view_column_new ();
320         renderer = gtk_cell_renderer_text_new ();
321         gtk_tree_view_column_pack_start(view_column, renderer, TRUE);
322         gtk_tree_view_column_set_attributes (view_column, renderer, 
323         "text", MODEL_COL_SERVER_NAME, NULL);
324         gtk_tree_view_column_set_title (view_column, _("mcen_ia_optionalsmtp_servername"));
325         gtk_tree_view_append_column (priv->treeview, view_column);
326         
327         /* The application must call modest_connection_specific_smtp_window_fill_with_connections(). */
328         
329         GtkWidget *vbox = gtk_vbox_new (FALSE, MODEST_MARGIN_DEFAULT);
330         
331         /* Put the treeview in a scrolled window and add it to the box: */
332         GtkWidget *scrolled_window = gtk_scrolled_window_new (NULL, NULL);
333         gtk_container_set_border_width (GTK_CONTAINER (scrolled_window), MODEST_MARGIN_DEFAULT);
334         gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window), GTK_POLICY_NEVER, 
335                 GTK_POLICY_AUTOMATIC);
336         gtk_widget_show (scrolled_window);
337         gtk_container_add (GTK_CONTAINER (scrolled_window), GTK_WIDGET (priv->treeview));
338         gtk_box_pack_start (GTK_BOX (vbox), GTK_WIDGET (scrolled_window), TRUE, TRUE, MODEST_MARGIN_HALF);
339         gtk_widget_show (GTK_WIDGET (priv->treeview));
340         
341         /* Add the buttons: */
342         GtkWidget *hbox = gtk_hbox_new (FALSE, MODEST_MARGIN_HALF);
343         gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, MODEST_MARGIN_HALF);
344         gtk_widget_show (hbox);
345         
346         priv->button_edit = gtk_button_new_from_stock (GTK_STOCK_EDIT);
347         gtk_box_pack_start (GTK_BOX (hbox), priv->button_edit, TRUE, FALSE, MODEST_MARGIN_HALF);
348         gtk_widget_show (priv->button_edit);
349         g_signal_connect (G_OBJECT (priv->button_edit), "clicked",
350                 G_CALLBACK (on_button_edit), self);
351         
352         GtkWidget *button_cancel = gtk_button_new_from_stock (GTK_STOCK_CLOSE);
353         gtk_box_pack_start (GTK_BOX (hbox), button_cancel, TRUE, FALSE, MODEST_MARGIN_HALF);
354         gtk_widget_show (button_cancel);
355         g_signal_connect (G_OBJECT (button_cancel), "clicked",
356                 G_CALLBACK (on_button_cancel), self);
357         
358         gtk_container_add (GTK_CONTAINER (self), GTK_WIDGET (vbox));
359         gtk_widget_show (vbox);
360         
361         /* Disable the Edit button when nothing is selected: */
362         GtkTreeSelection *sel = gtk_tree_view_get_selection (priv->treeview);
363         g_signal_connect (sel, "changed",
364                           G_CALLBACK(on_selection_changed), self);
365         on_selection_changed (sel, self);
366         
367         /* When this window is shown, hibernation should not be possible, 
368          * because there is no sensible way to save the state: */
369     modest_window_mgr_prevent_hibernation_while_window_is_shown (
370         modest_runtime_get_window_mgr (), GTK_WINDOW (self)); 
371 }
372
373 ModestConnectionSpecificSmtpWindow*
374 modest_connection_specific_smtp_window_new (void)
375 {
376         return g_object_new (MODEST_TYPE_CONNECTION_SPECIFIC_SMTP_WINDOW, NULL);
377 }
378
379 /** The application should call this when the user changes should be saved.
380  * @account_name: Specify this again in case it was not previously known.
381  */
382 gboolean
383 modest_connection_specific_smtp_window_save_server_accounts (ModestConnectionSpecificSmtpWindow *self, 
384         const gchar* account_name)
385 {
386         ModestConnectionSpecificSmtpWindowPrivate *priv = 
387                 CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE (self);
388         
389         
390         /* Get the first iter in the list */
391         GtkTreeIter iter;
392         gboolean valid = gtk_tree_model_get_iter_first (priv->model, &iter);
393
394         /* Walk through the list, reading each row */
395         while (valid) {
396         gchar *id = NULL;
397                 gchar *connection_name = NULL;
398                 gchar *server_account_name = NULL;
399                 ModestServerAccountData *data = NULL;
400                 
401                 gtk_tree_model_get (priv->model, &iter, 
402                                     MODEL_COL_ID, &id, 
403                                     MODEL_COL_NAME, &connection_name, 
404                                     MODEL_COL_SERVER_ACCOUNT_NAME, &server_account_name,
405                                     MODEL_COL_SERVER_ACCOUNT_DATA, &data,
406                                     -1);
407                                  
408                 gboolean success = TRUE;   
409                 if (id && data) { /* The presence of data suggests that there is something to save. */
410                         if (!server_account_name) {
411                                 /* Add a new server account, building a (non-human-visible) name: */
412                                 gchar *name_start = g_strdup_printf("%s_specific_%s", 
413                                         priv->account_name, connection_name);
414                                 server_account_name = modest_account_mgr_get_unused_account_name (
415                                         priv->account_manager, name_start, TRUE /* server account. */);
416                                 g_free (name_start);
417                                 
418                                 success = modest_account_mgr_add_server_account (priv->account_manager,
419                                         server_account_name,
420                                         data->hostname,
421                                         data->username, data->password,
422                                         MODEST_PROTOCOL_TRANSPORT_SMTP,
423                                         data->security,
424                                         data->secure_auth);
425                                         
426                                 /* associate the specific server account with this connection for this account: */
427                                 success = success && modest_account_mgr_set_connection_specific_smtp (
428                                         priv->account_manager, priv->account_name,
429                                          connection_name, server_account_name);
430         
431                                 /* Save the new name in the treemodel, so it can be edited again later: */
432                                 gtk_list_store_set (GTK_LIST_STORE (priv->model), &iter, 
433                                         MODEL_COL_SERVER_ACCOUNT_NAME, server_account_name, -1);
434                                 
435                         } else {
436                                 /* Change an existing server account: */
437                                 success = modest_account_mgr_set_string (priv->account_manager, server_account_name,
438                                         MODEST_ACCOUNT_HOSTNAME, data->hostname, TRUE /* server account */);
439                                                 
440                                 modest_server_account_set_username (priv->account_manager, server_account_name,
441                                         data->username);
442                                                         
443                                 modest_server_account_set_password (priv->account_manager, server_account_name,
444                                         data->password);
445                                                 
446                                 modest_server_account_set_secure_auth (priv->account_manager, server_account_name, 
447                                         data->secure_auth);
448                                                 
449                                 modest_server_account_set_security (priv->account_manager, server_account_name, 
450                                         data->security);
451                                 
452                                 modest_account_mgr_set_int (priv->account_manager, server_account_name,
453                                                 MODEST_ACCOUNT_PORT, data->port, TRUE /* server account */);
454                         }
455                 }
456                 
457                 g_free (connection_name);
458                 g_free (id);
459                 g_free (server_account_name);
460                 
461                 if (!success)
462                         return FALSE;
463                         
464                 /* Get next row: */
465                 valid = gtk_tree_model_iter_next (priv->model, &iter);
466         }
467         
468         update_model_server_names (self);
469         
470         return TRUE;
471 }
472
473 void update_model_server_names (ModestConnectionSpecificSmtpWindow *self)
474 {
475         ModestConnectionSpecificSmtpWindowPrivate *priv = CONNECTION_SPECIFIC_SMTP_WINDOW_GET_PRIVATE (self);
476
477         GtkTreeIter iter;
478         gboolean valid = gtk_tree_model_get_iter_first (priv->model, &iter);
479         while (valid) {
480                 
481                 gchar *server_account_name = NULL;
482                 gtk_tree_model_get (priv->model, &iter, 
483                                     MODEL_COL_SERVER_ACCOUNT_NAME, &server_account_name,
484                                     -1);
485                                  
486                 if (server_account_name) {
487                         /* Get the server hostname and show it in the treemodel: */     
488                         gchar *hostname = modest_account_mgr_get_string (priv->account_manager, 
489                                 server_account_name, MODEST_ACCOUNT_HOSTNAME, TRUE /* server account */);
490                         gtk_list_store_set (GTK_LIST_STORE (priv->model), &iter, 
491                                             MODEL_COL_SERVER_NAME, hostname,
492                                             -1);
493                         g_free (hostname);
494                 }
495                         
496                 /* Get next row: */
497                 valid = gtk_tree_model_iter_next (priv->model, &iter);
498         }
499 }
500