Replaces an invalid g_free by g_object_unref
[modest] / src / modest-account-mgr-helpers.c
1 /* Copyright (c) 2006, Nokia Corporation
2  * All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions are
6  * met:
7  *
8  * * Redistributions of source code must retain the above copyright
9  *   notice, this list of conditions and the following disclaimer.
10  * * Redistributions in binary form must reproduce the above copyright
11  *   notice, this list of conditions and the following disclaimer in the
12  *   documentation and/or other materials provided with the distribution.
13  * * Neither the name of the Nokia Corporation nor the names of its
14  *   contributors may be used to endorse or promote products derived from
15  *   this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
18  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
20  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
21  * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
22  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
23  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
24  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
25  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
26  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
27  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29
30 #include <modest-account-mgr-helpers.h>
31 #include <modest-account-mgr-priv.h>
32 #include <tny-simple-list.h>
33 #include <modest-runtime.h>
34 #include <modest-defs.h>
35 #include <string.h>
36 #include <strings.h>
37
38 static const gchar * null_means_empty (const gchar * str);
39
40 static const gchar *
41 null_means_empty (const gchar * str)
42 {
43         return str ? str : "";
44 }
45
46 gboolean
47 modest_account_mgr_set_enabled (ModestAccountMgr *self, const gchar* name,
48                                         gboolean enabled)
49 {
50         return modest_account_mgr_set_bool (self, name, MODEST_ACCOUNT_ENABLED, enabled,FALSE);
51 }
52
53
54 gboolean
55 modest_account_mgr_get_enabled (ModestAccountMgr *self, const gchar* name)
56 {
57         return modest_account_mgr_get_bool (self, name, MODEST_ACCOUNT_ENABLED, FALSE);
58 }
59
60 gboolean modest_account_mgr_set_signature (ModestAccountMgr *self, const gchar* name, 
61         const gchar* signature, gboolean use_signature)
62 {
63         gboolean result = modest_account_mgr_set_bool (self, name, MODEST_ACCOUNT_USE_SIGNATURE, 
64                 use_signature, FALSE);
65         result = result && modest_account_mgr_set_string (self, name, MODEST_ACCOUNT_SIGNATURE, 
66                                                           null_means_empty (signature), FALSE);
67         return result;
68 }
69
70 gchar* 
71 modest_account_mgr_get_signature (ModestAccountMgr *self, 
72                                   const gchar* name, 
73                                   gboolean* use_signature)
74 {
75         *use_signature = 
76                 modest_account_mgr_get_bool (self, name, MODEST_ACCOUNT_USE_SIGNATURE, FALSE);
77         
78         return modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_SIGNATURE, FALSE);
79 }
80
81 ModestProtocolType modest_account_mgr_get_store_protocol (ModestAccountMgr *self, const gchar* name)
82 {
83        ModestProtocolType result = MODEST_PROTOCOLS_STORE_POP; /* Arbitrary default */
84        
85        gchar *server_account_name = modest_account_mgr_get_string (self, name,
86                                                                    MODEST_ACCOUNT_STORE_ACCOUNT,
87                                                                    FALSE);
88        if (server_account_name) {
89                ModestServerAccountSettings* server_settings = 
90                        modest_account_mgr_load_server_settings (self, server_account_name, FALSE);
91                result = modest_server_account_settings_get_protocol (server_settings);
92                
93                g_object_unref (server_settings);
94                
95                g_free (server_account_name);
96        }
97        
98        return result;
99 }
100
101
102 gboolean 
103 modest_account_mgr_set_connection_specific_smtp (ModestAccountMgr *self, 
104                                                  const gchar* connection_id, 
105                                                  const gchar* server_account_name)
106 {
107         modest_account_mgr_remove_connection_specific_smtp (self, connection_id);
108         
109         ModestConf *conf = MODEST_ACCOUNT_MGR_GET_PRIVATE (self)->modest_conf;
110
111         gboolean result = TRUE;
112         GError *err = NULL;
113         GSList *list = modest_conf_get_list (conf, MODEST_CONF_CONNECTION_SPECIFIC_SMTP_LIST,
114                                                     MODEST_CONF_VALUE_STRING, &err);
115         if (err) {
116                 g_printerr ("modest: %s: error getting list: %s.\n", __FUNCTION__, err->message);
117                 g_error_free (err);
118                 err = NULL;
119                 result = FALSE;
120         } else {        
121                 /* The server account is in the item after the connection name: */
122                 list = g_slist_append (list, g_strdup (connection_id));
123                 list = g_slist_append (list, g_strdup (server_account_name));
124         
125                 /* Reset the changed list: */
126                 modest_conf_set_list (conf, MODEST_CONF_CONNECTION_SPECIFIC_SMTP_LIST, list,
127                                                     MODEST_CONF_VALUE_STRING, &err);
128                 if (err) {
129                         g_printerr ("modest: %s: error setting list: %s.\n", __FUNCTION__, err->message);
130                         g_error_free (err);
131                         result = FALSE;
132                 }
133         }
134                                 
135         /* Free the list */
136         if (list) {
137                 g_slist_foreach (list, (GFunc) g_free, NULL);
138                 g_slist_free (list);
139         }
140         
141         return result;
142 }
143
144 /**
145  * modest_account_mgr_remove_connection_specific_smtp
146  * @self: a ModestAccountMgr instance
147  * @name: the account name
148  * @connection_id: A libconic IAP connection id
149  * 
150  * Disassacoiate a server account to use with the specific connection for this account.
151  *
152  * Returns: TRUE if it worked, FALSE otherwise
153  */                              
154 gboolean 
155 modest_account_mgr_remove_connection_specific_smtp (ModestAccountMgr *self, 
156                                                     const gchar* connection_id)
157 {
158         ModestAccountMgrPrivate *priv = MODEST_ACCOUNT_MGR_GET_PRIVATE (self);
159         
160         gboolean result = TRUE;
161         GError *err = NULL;
162         GSList *list = modest_conf_get_list (priv->modest_conf, 
163                                              MODEST_CONF_CONNECTION_SPECIFIC_SMTP_LIST,
164                                              MODEST_CONF_VALUE_STRING, &err);
165         if (err) {
166                 g_printerr ("modest: %s: error getting list: %s.\n", __FUNCTION__, err->message);
167                 g_error_free (err);
168                 err = NULL;
169                 result = FALSE;
170         }
171
172         if (!list)
173                 return FALSE;
174                 
175         /* The server account is in the item after the connection name: */
176         GSList *list_connection = g_slist_find_custom (list, connection_id, (GCompareFunc)strcmp);
177         if (list_connection) {
178                 GSList *account_node = g_slist_next (list_connection);
179                 /* remove both items: */
180                 list = g_slist_delete_link(list, list_connection);
181                 list = g_slist_delete_link(list, account_node);
182         }
183         
184         /* Reset the changed list: */
185         modest_conf_set_list (priv->modest_conf, MODEST_CONF_CONNECTION_SPECIFIC_SMTP_LIST, list,
186                                                     MODEST_CONF_VALUE_STRING, &err);
187         if (err) {
188                 g_printerr ("modest: %s: error setting list: %s.\n", __FUNCTION__, err->message);
189                 g_error_free (err);
190                 result = FALSE;
191         }
192                                 
193         /* Free the list */
194         if (list) {
195                 g_slist_foreach (list, (GFunc) g_free, NULL);
196                 g_slist_free (list);
197         }
198         
199         return result;
200 }
201
202
203 gboolean modest_account_mgr_get_use_connection_specific_smtp (ModestAccountMgr *self, const gchar* account_name)
204 {
205         return modest_account_mgr_get_bool (self, account_name, 
206                 MODEST_ACCOUNT_USE_CONNECTION_SPECIFIC_SMTP, FALSE);
207 }
208
209 gboolean modest_account_mgr_set_use_connection_specific_smtp (ModestAccountMgr *self, const gchar* account_name, 
210         gboolean new_value)
211 {
212         return modest_account_mgr_set_bool (self, account_name, MODEST_ACCOUNT_USE_CONNECTION_SPECIFIC_SMTP, 
213                 new_value, FALSE);
214 }
215
216 /**
217  * modest_account_mgr_get_connection_specific_smtp
218  * @self: a ModestAccountMgr instance
219  * @connection_id: A libconic IAP connection id
220  * 
221  * Retrieve a server account to use with this specific connection for this account.
222  *
223  * Returns: a server account name to use for this connection, or NULL if none is specified.
224  */                      
225 gchar* modest_account_mgr_get_connection_specific_smtp (ModestAccountMgr *self,  const gchar* connection_id)
226 {
227         gchar *result = NULL;
228         
229         ModestAccountMgrPrivate *priv = MODEST_ACCOUNT_MGR_GET_PRIVATE (self);
230         
231         GError *err = NULL;
232         GSList *list = modest_conf_get_list (priv->modest_conf, MODEST_CONF_CONNECTION_SPECIFIC_SMTP_LIST,
233                                                     MODEST_CONF_VALUE_STRING, &err);
234         if (err) {
235                 g_printerr ("modest: %s: error getting list: %s.\n", __FUNCTION__, err->message);
236                 g_error_free (err);
237                 err = NULL;
238         }
239
240         if (!list)
241                 return NULL;
242
243         /* The server account is in the item after the connection name: */
244         GSList *iter = list;
245         while (iter) {
246                 const gchar* this_connection_id = (const gchar*)(iter->data);
247                 if (strcmp (this_connection_id, connection_id) == 0) {
248                         iter = g_slist_next (iter);
249                         
250                         if (iter) {
251                                 const gchar* account_name = (const gchar*)(iter->data);
252                                 if (account_name) {
253                                         result = g_strdup (account_name);
254                                         break;
255                                 }
256                         }
257                 }
258                 
259                 /* Skip 2 to go to the next connection in the list: */
260                 iter = g_slist_next (iter);
261                 if (iter)
262                         iter = g_slist_next (iter);
263         }
264                 
265         /* Free the list */
266         if (list) {
267                 g_slist_foreach (list, (GFunc) g_free, NULL);
268                 g_slist_free (list);
269         }
270         
271         return result;
272 }
273                                          
274 gchar*
275 modest_account_mgr_get_server_account_username (ModestAccountMgr *self, const gchar* account_name)
276 {
277         return modest_account_mgr_get_string (self, account_name, MODEST_ACCOUNT_USERNAME, 
278                 TRUE /* server account */);
279 }
280
281 void
282 modest_account_mgr_set_server_account_username (ModestAccountMgr *self, const gchar* account_name, 
283         const gchar* username)
284 {
285         /* Note that this won't work properly as long as the gconf cache is broken 
286          * in Maemo Bora: */
287         gchar *existing_username = modest_account_mgr_get_server_account_username(self, 
288                 account_name);
289         
290         modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_USERNAME, 
291                 username, TRUE /* server account */);
292                 
293         /* We don't know anything about new usernames: */
294         if (strcmp (existing_username, username) != 0)
295                 modest_account_mgr_set_server_account_username_has_succeeded (self, account_name, FALSE);
296                 
297         g_free (existing_username);
298 }
299
300 gboolean
301 modest_account_mgr_get_server_account_username_has_succeeded (ModestAccountMgr *self, const gchar* account_name)
302 {
303         return modest_account_mgr_get_bool (self, account_name, MODEST_ACCOUNT_USERNAME_HAS_SUCCEEDED, 
304                                             TRUE /* server account */);
305 }
306
307 void
308 modest_account_mgr_set_server_account_username_has_succeeded (ModestAccountMgr *self, 
309                                                   const gchar* account_name, 
310                                                   gboolean succeeded)
311 {
312         modest_account_mgr_set_bool (self, account_name, MODEST_ACCOUNT_USERNAME_HAS_SUCCEEDED, 
313                                      succeeded, TRUE /* server account */);
314 }
315
316 gchar*
317 modest_account_mgr_get_server_account_password (ModestAccountMgr *self, const gchar* account_name)
318 {
319         return modest_account_mgr_get_string (self, account_name, MODEST_ACCOUNT_PASSWORD, 
320                 TRUE /* server account */);     
321 }
322
323 gboolean
324 modest_account_mgr_get_server_account_has_password (ModestAccountMgr *self, const gchar* account_name)
325 {
326         gboolean result = FALSE;
327         gchar *password = modest_account_mgr_get_string (self, account_name, MODEST_ACCOUNT_PASSWORD, 
328                 TRUE /* server account */);
329         if (password && strlen (password)) {
330                 result = TRUE;
331         
332                 /* Clean password */
333                 bzero (password, strlen (password));
334         }
335
336         g_free (password);
337         return result;
338 }
339                          
340         
341 gchar*
342 modest_account_mgr_get_server_account_hostname (ModestAccountMgr *self, 
343                                                 const gchar* account_name)
344 {
345         return modest_account_mgr_get_string (self, 
346                                               account_name, 
347                                               MODEST_ACCOUNT_HOSTNAME, 
348                                               TRUE /* server account */);
349 }
350  
351 void
352 modest_account_mgr_set_server_account_hostname (ModestAccountMgr *self, 
353                                                 const gchar *server_account_name,
354                                                 const gchar *hostname)
355 {
356         modest_account_mgr_set_string (self, 
357                                        server_account_name,
358                                        MODEST_ACCOUNT_HOSTNAME, 
359                                        hostname, 
360                                        TRUE /* server account */);
361 }
362
363
364
365 ModestProtocolType
366 modest_account_mgr_get_server_account_secure_auth (ModestAccountMgr *self, 
367         const gchar* account_name)
368 {
369         ModestProtocolRegistry *protocol_registry;
370         ModestProtocolType result = MODEST_PROTOCOLS_AUTH_NONE;
371         gchar* value;
372
373         protocol_registry = modest_runtime_get_protocol_registry ();
374         value = modest_account_mgr_get_string (self, account_name, MODEST_ACCOUNT_AUTH_MECH, 
375                                                TRUE /* server account */);
376         if (value) {
377                 ModestProtocol *protocol;
378
379                 protocol = modest_protocol_registry_get_protocol_by_name (protocol_registry, MODEST_PROTOCOL_REGISTRY_AUTH_PROTOCOLS, value);
380                 g_free (value);
381
382                 if (protocol)
383                         result = modest_protocol_get_type_id (protocol);
384                         
385         }
386         
387         return result;
388 }
389
390
391 void
392 modest_account_mgr_set_server_account_secure_auth (ModestAccountMgr *self, 
393         const gchar* account_name, ModestProtocolType secure_auth)
394 {
395         const gchar* str_value;
396         ModestProtocolRegistry *protocol_registry;
397         ModestProtocol *protocol;
398
399         /* Get the conf string for the protocol: */
400         protocol_registry = modest_runtime_get_protocol_registry ();
401         protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry, secure_auth);
402         str_value = modest_protocol_get_name (protocol);
403         
404         /* Set it in the configuration: */
405         modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_AUTH_MECH, str_value, TRUE);
406 }
407
408 ModestProtocolType
409 modest_account_mgr_get_server_account_security (ModestAccountMgr *self, 
410         const gchar* account_name)
411 {
412         ModestProtocolType result = MODEST_PROTOCOLS_CONNECTION_NONE;
413         gchar* value;
414
415         value = modest_account_mgr_get_string (self, account_name, MODEST_ACCOUNT_SECURITY, 
416                                                TRUE /* server account */);
417         if (value) {
418                 ModestProtocolRegistry *protocol_registry;
419                 ModestProtocol *protocol;
420
421                 protocol_registry = modest_runtime_get_protocol_registry ();
422                 protocol = modest_protocol_registry_get_protocol_by_name (protocol_registry,
423                                                                           MODEST_PROTOCOL_REGISTRY_CONNECTION_PROTOCOLS,
424                                                                           value);
425                 g_free (value);
426
427                 if (protocol)
428                         result = modest_protocol_get_type_id (protocol);
429         }
430         
431         return result;
432 }
433
434 void
435 modest_account_mgr_set_server_account_security (ModestAccountMgr *self, 
436                                                 const gchar* account_name, 
437                                                 ModestProtocolType security)
438 {
439         const gchar* str_value;
440         ModestProtocolRegistry *protocol_registry;
441         ModestProtocol *protocol;
442
443         /* Get the conf string for the protocol type: */
444         protocol_registry = modest_runtime_get_protocol_registry ();
445         protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry, security);
446         str_value = modest_protocol_get_name (protocol);
447         
448         /* Set it in the configuration: */
449         modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_SECURITY, str_value, TRUE);
450 }
451
452 ModestServerAccountSettings *
453 modest_account_mgr_load_server_settings (ModestAccountMgr *self, const gchar* name, gboolean is_transport_and_not_store)
454 {
455         ModestServerAccountSettings *settings = NULL;
456         ModestProtocol *protocol;
457         ModestProtocolRegistry *registry;
458         gchar *string;
459
460         if (!modest_account_mgr_account_exists (self, name, TRUE)) {
461                 g_message ("%s account %s does not exist", __FUNCTION__, name);
462                 return NULL;
463         }
464
465         registry = modest_runtime_get_protocol_registry ();
466         settings = modest_server_account_settings_new ();
467
468         modest_server_account_settings_set_account_name (settings, name);
469
470         string = modest_account_mgr_get_string (self, name, 
471                                                 MODEST_ACCOUNT_HOSTNAME,TRUE);
472         if (string) {
473                 modest_server_account_settings_set_hostname (settings, string);
474                 g_free (string);
475         } else {
476                 goto on_error;
477         }
478
479         string = modest_account_mgr_get_string (self, name, 
480                                                 MODEST_ACCOUNT_USERNAME,TRUE);
481         if (string) {
482                 modest_server_account_settings_set_username (settings, string); 
483                 g_free (string);
484         } else {
485                 goto on_error;
486         }
487
488         string = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_PROTO, TRUE);
489         if (string) {
490                 gchar *tag = NULL;
491                 if (is_transport_and_not_store) {
492                         tag = MODEST_PROTOCOL_REGISTRY_TRANSPORT_PROTOCOLS;
493                 } else {
494                         tag = MODEST_PROTOCOL_REGISTRY_STORE_PROTOCOLS;
495                 }
496                 protocol = modest_protocol_registry_get_protocol_by_name (registry, tag, string);
497
498                 modest_server_account_settings_set_protocol (settings,
499                                                              modest_protocol_get_type_id (protocol));
500                 g_free (string);
501         } else {
502                 goto on_error;
503         }
504
505         modest_server_account_settings_set_port (settings,
506                                                  modest_account_mgr_get_int (self, name, MODEST_ACCOUNT_PORT, TRUE));
507
508         string = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_AUTH_MECH, TRUE);
509         if (string) {
510                 protocol = modest_protocol_registry_get_protocol_by_name (registry, MODEST_PROTOCOL_REGISTRY_AUTH_PROTOCOLS, string);
511                 modest_server_account_settings_set_auth_protocol (settings,
512                                                                   modest_protocol_get_type_id (protocol));
513                 g_free (string);
514         } else {
515                 modest_server_account_settings_set_auth_protocol (settings, MODEST_PROTOCOLS_AUTH_NONE);
516         }
517
518         string = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_SECURITY, TRUE);
519         if (string) {
520                 protocol = modest_protocol_registry_get_protocol_by_name (registry, MODEST_PROTOCOL_REGISTRY_CONNECTION_PROTOCOLS, string);
521                 modest_server_account_settings_set_security_protocol (settings,
522                                                                       modest_protocol_get_type_id (protocol));
523                 g_free (string);
524         } else {
525                 modest_server_account_settings_set_security_protocol (settings,
526                                                                       MODEST_PROTOCOLS_CONNECTION_NONE);
527         }
528
529         string = modest_account_mgr_get_string (self, name, 
530                                                 MODEST_ACCOUNT_PASSWORD, TRUE);
531         if (string) {
532                 modest_server_account_settings_set_password (settings, string);
533                 g_free (string);
534         }
535
536         string = modest_account_mgr_get_string (self, name, 
537                                                 MODEST_ACCOUNT_URI, TRUE);
538         if (string) {
539                 modest_server_account_settings_set_uri (settings, string);
540                 g_free (string);
541         }
542
543         return settings;
544
545  on_error:
546         if (settings)
547                 g_object_unref (settings);
548         return NULL;
549 }
550
551 gboolean 
552 modest_account_mgr_save_server_settings (ModestAccountMgr *self,
553                                          ModestServerAccountSettings *settings)
554 {
555         gboolean has_errors = FALSE;
556         const gchar *account_name;
557         const gchar *protocol_name;
558         const gchar *uri;
559         ModestProtocolRegistry *protocol_registry;
560         ModestProtocol *protocol;
561         
562         g_return_val_if_fail (MODEST_IS_SERVER_ACCOUNT_SETTINGS (settings), FALSE);
563         protocol_registry = modest_runtime_get_protocol_registry ();
564         account_name = modest_server_account_settings_get_account_name (settings);
565
566         /* if we don't have a valid account name we cannot save */
567         g_return_val_if_fail (account_name, FALSE);
568
569         protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry,
570                                                                   modest_server_account_settings_get_protocol (settings));
571         protocol_name = modest_protocol_get_name (protocol);
572         uri = modest_server_account_settings_get_uri (settings);
573         if (!uri) {
574                 const gchar *hostname;
575                 const gchar *username;
576                 const gchar *password;
577                 gint port;
578                 const gchar *auth_protocol_name;
579                 const gchar *security_name;
580
581                 hostname = null_means_empty (modest_server_account_settings_get_hostname (settings));
582                 username = null_means_empty (modest_server_account_settings_get_username (settings));
583                 password = null_means_empty (modest_server_account_settings_get_password (settings));
584                 port = modest_server_account_settings_get_port (settings);
585                 protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry,
586                                                                           modest_server_account_settings_get_auth_protocol (settings));
587                 auth_protocol_name = modest_protocol_get_name (protocol);
588                 protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry,
589                                                                           modest_server_account_settings_get_security_protocol (settings));
590                 security_name = modest_protocol_get_name (protocol);
591
592                 has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_HOSTNAME, 
593                                                             hostname, TRUE);
594                 if (!has_errors)
595                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_USERNAME,
596                                                                            username, TRUE));
597                 if (!has_errors)
598                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_PASSWORD,
599                                                                            password, TRUE));
600                 if (!has_errors)
601                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_PROTO,
602                                                                            protocol_name, TRUE));
603                 if (!has_errors)
604                         (has_errors = !modest_account_mgr_set_int (self, account_name, MODEST_ACCOUNT_PORT,
605                                                                         port, TRUE));
606                 if (!has_errors)
607                         (has_errors = !modest_account_mgr_set_string (self, account_name, 
608                                                                            MODEST_ACCOUNT_AUTH_MECH,
609                                                                            auth_protocol_name, TRUE));          
610                 if (!has_errors)
611                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_SECURITY,
612                                                                            security_name,
613                                                                            TRUE));
614         } else {
615                 const gchar *uri = modest_server_account_settings_get_uri (settings);
616                 has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_URI,
617                                                             uri, TRUE);
618                 if (!has_errors)
619                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_PROTO,
620                                                                            protocol_name, TRUE));
621         }
622
623         return !has_errors;
624
625 }
626
627
628 ModestAccountSettings *
629 modest_account_mgr_load_account_settings (ModestAccountMgr *self, 
630                                           const gchar* name)
631 {
632         ModestAccountSettings *settings;
633         gchar *string;
634         gchar *server_account;
635         gchar *default_account;
636         gboolean use_signature = FALSE;
637         
638         g_return_val_if_fail (self, NULL);
639         g_return_val_if_fail (name, NULL);
640         
641         if (!modest_account_mgr_account_exists (self, name, FALSE)) {
642                 /* For instance, maybe you are mistakenly checking for a server account name? */
643                 g_warning ("%s: Account %s does not exist.", __FUNCTION__, name);
644                 return NULL;
645         }
646         
647         settings = modest_account_settings_new ();
648
649         modest_account_settings_set_account_name (settings, name);
650
651         string = modest_account_mgr_get_string (self, name,
652                                                 MODEST_ACCOUNT_DISPLAY_NAME,
653                                                 FALSE);
654         modest_account_settings_set_display_name (settings, string);
655         g_free (string);
656
657         string = modest_account_mgr_get_string (self, name,
658                                                 MODEST_ACCOUNT_FULLNAME,
659                                                 FALSE);
660         modest_account_settings_set_fullname (settings, string);
661         g_free (string);
662
663         string = modest_account_mgr_get_string (self, name,
664                                                 MODEST_ACCOUNT_EMAIL,
665                                                 FALSE);
666         modest_account_settings_set_email_address (settings, string);
667         g_free (string);
668
669         modest_account_settings_set_enabled (settings, modest_account_mgr_get_enabled (self, name));
670         modest_account_settings_set_retrieve_type (settings, modest_account_mgr_get_retrieve_type (self, name));
671         modest_account_settings_set_retrieve_limit (settings, modest_account_mgr_get_retrieve_limit (self, name));
672
673         default_account    = modest_account_mgr_get_default_account (self);
674         modest_account_settings_set_is_default (settings,
675                                                 (default_account && strcmp (default_account, name) == 0));
676         g_free (default_account);
677
678         string = modest_account_mgr_get_signature (self, name, &use_signature);
679         modest_account_settings_set_use_signature (settings, use_signature);
680         modest_account_settings_set_signature (settings, string);
681         g_free (string);
682
683         modest_account_settings_set_leave_messages_on_server 
684                 (settings, modest_account_mgr_get_leave_on_server (self, name));
685         modest_account_settings_set_use_connection_specific_smtp 
686                 (settings, modest_account_mgr_get_use_connection_specific_smtp (self, name));
687
688         /* store */
689         server_account     = modest_account_mgr_get_string (self, name,
690                                                             MODEST_ACCOUNT_STORE_ACCOUNT,
691                                                             FALSE);
692         if (server_account) {
693                 ModestServerAccountSettings *store_settings;
694                 store_settings = modest_account_mgr_load_server_settings (self, server_account, FALSE);
695                 g_free (server_account);
696
697                 /* It could happen that the account data is corrupted
698                    so it's not loaded properly */
699                 if (store_settings) {
700                         modest_account_settings_set_store_settings (settings,
701                                                                     store_settings);
702                         g_object_unref (store_settings);
703                 } else {
704                         g_message ("%s can not load server settings. Account corrupted?", __FUNCTION__);
705                         g_object_unref (settings);
706                         return NULL;
707                 }
708         }
709
710         /* transport */
711         server_account = modest_account_mgr_get_string (self, name,
712                                                         MODEST_ACCOUNT_TRANSPORT_ACCOUNT,
713                                                         FALSE);
714         if (server_account) {
715                 ModestServerAccountSettings *transport_settings;
716                 transport_settings = modest_account_mgr_load_server_settings (self, server_account, TRUE);
717                 g_free (server_account);
718
719                 if (transport_settings) {
720                         modest_account_settings_set_transport_settings (settings, transport_settings);
721                         g_object_unref (transport_settings);
722                 } else {
723                         g_message ("%s can not load server settings. Account corrupted?", __FUNCTION__);
724                         g_object_unref (settings);
725                         return NULL;
726                 }
727         }
728
729         return settings;
730 }
731
732 void
733 modest_account_mgr_save_account_settings (ModestAccountMgr *mgr,
734                                           ModestAccountSettings *settings)
735 {
736         g_return_if_fail (MODEST_IS_ACCOUNT_MGR (mgr));
737         g_return_if_fail (MODEST_IS_ACCOUNT_SETTINGS (settings));
738
739         const gchar *account_name;
740         const gchar *store_account_name;
741         const gchar *transport_account_name;
742         ModestServerAccountSettings *store_settings;
743         ModestServerAccountSettings *transport_settings;
744
745         account_name = modest_account_settings_get_account_name (settings);
746         g_return_if_fail (account_name != NULL);
747
748         modest_account_mgr_set_display_name (mgr, account_name,
749                                              modest_account_settings_get_display_name (settings));
750         modest_account_mgr_set_user_fullname (mgr, account_name,
751                                               modest_account_settings_get_fullname (settings));
752         modest_account_mgr_set_user_email (mgr, account_name,
753                                            modest_account_settings_get_email_address (settings));
754         modest_account_mgr_set_retrieve_type (mgr, account_name,
755                                               modest_account_settings_get_retrieve_type (settings));
756         modest_account_mgr_set_retrieve_limit (mgr, account_name,
757                                                modest_account_settings_get_retrieve_limit (settings));
758         modest_account_mgr_set_leave_on_server (mgr, account_name,
759                                                 modest_account_settings_get_leave_messages_on_server (settings));
760         modest_account_mgr_set_signature (mgr, account_name,
761                                           modest_account_settings_get_signature (settings),
762                                           modest_account_settings_get_use_signature (settings));
763         modest_account_mgr_set_use_connection_specific_smtp 
764                 (mgr, account_name,
765                  modest_account_settings_get_use_connection_specific_smtp (settings));
766
767         store_settings = modest_account_settings_get_store_settings (settings);
768         store_account_name = modest_server_account_settings_get_account_name (store_settings);
769         if (store_settings != NULL) {
770                 modest_account_mgr_save_server_settings (mgr, store_settings);
771         }
772         modest_account_mgr_set_string (mgr, account_name, MODEST_ACCOUNT_STORE_ACCOUNT, store_account_name, FALSE);
773         g_object_unref (store_settings);
774
775         transport_settings = modest_account_settings_get_transport_settings (settings);
776         transport_account_name = modest_server_account_settings_get_account_name (transport_settings);
777         if (transport_settings != NULL) {
778                 modest_account_mgr_save_server_settings (mgr, transport_settings);
779         }
780         modest_account_mgr_set_string (mgr, account_name, MODEST_ACCOUNT_TRANSPORT_ACCOUNT, transport_account_name, FALSE);
781         g_object_unref (transport_settings);
782         modest_account_mgr_set_enabled (mgr, account_name, TRUE);
783 }
784
785
786 gint 
787 on_accounts_list_sort_by_title(gconstpointer a, gconstpointer b)
788 {
789         return g_utf8_collate((const gchar*)a, (const gchar*)b);
790 }
791
792 /** Get the first one, alphabetically, by title. */
793 gchar* 
794 modest_account_mgr_get_first_account_name (ModestAccountMgr *self)
795 {
796         const gchar* account_name = NULL;
797         GSList *account_names = modest_account_mgr_account_names (self, TRUE /* only enabled */);
798
799         /* Return TRUE if there is no account */
800         if (!account_names)
801                 return NULL;
802
803         /* Get the first one, alphabetically, by title: */
804         /* gchar *old_default = modest_account_mgr_get_default_account (self); */
805         GSList* list_sorted = g_slist_sort (account_names, on_accounts_list_sort_by_title);
806
807         GSList* iter = list_sorted;
808         gboolean found = FALSE;
809         while (iter && !found) {
810                 account_name = (const gchar*)list_sorted->data;
811
812                 if (account_name)
813                         found = TRUE;
814
815                 if (!found)
816                         iter = g_slist_next (iter);
817         }
818
819         gchar* result = NULL;
820         if (account_name)
821                 result = g_strdup (account_name);
822                 
823         modest_account_mgr_free_account_names (account_names);
824         account_names = NULL;
825
826         return result;
827 }
828
829 gboolean
830 modest_account_mgr_set_first_account_as_default (ModestAccountMgr *self)
831 {
832         gboolean result = FALSE;
833         
834         gchar* account_name = modest_account_mgr_get_first_account_name(self);
835         if (account_name) {
836                 result = modest_account_mgr_set_default_account (self, account_name);
837                 g_free (account_name);
838         }
839         else
840                 result = TRUE; /* If there are no accounts then it's not a failure. */
841
842         return result;
843 }
844
845 gchar*
846 modest_account_mgr_get_from_string (ModestAccountMgr *self, const gchar* name)
847 {
848         gchar *fullname, *email, *from;
849         
850         g_return_val_if_fail (self, NULL);
851         g_return_val_if_fail (name, NULL);
852
853         fullname      = modest_account_mgr_get_string (self, name,MODEST_ACCOUNT_FULLNAME,
854                                                        FALSE);
855         email         = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_EMAIL,
856                                                        FALSE);
857         from = g_strdup_printf ("%s <%s>",
858                                 fullname ? fullname : "",
859                                 email    ? email    : "");
860         g_free (fullname);
861         g_free (email);
862
863         return from;
864 }
865
866 /* Add a number to the end of the text, or increment a number that is already there.
867  */
868 static gchar*
869 util_increment_name (const gchar* text)
870 {
871         g_return_val_if_fail (text, NULL);
872
873         /* Get the end character,
874          * also doing a UTF-8 validation which is required for using g_utf8_prev_char().
875          */
876         const gchar* end = NULL;
877         if (!g_utf8_validate (text, -1, &end))
878                 return NULL;
879   
880         if (!end)
881                 return NULL;
882                 
883         --end; /* Go to before the null-termination. */
884                 
885         /* Look at each UTF-8 characer, starting at the end: */
886         const gchar* p = end;
887         const gchar* alpha_end = NULL;
888         while (p)
889         {       
890                 /* Stop when we reach the first character that is not a numeric digit: */
891                 const gunichar ch = g_utf8_get_char (p);
892                 if (!g_unichar_isdigit (ch)) {
893                         alpha_end = p;
894                         break;
895                 }
896                 
897                 p = g_utf8_find_prev_char (text, p);    
898         }
899         
900         if(!alpha_end) {
901                 /* The text must consist completely of numeric digits. */
902                 alpha_end = text;
903         }
904         else
905                 ++alpha_end;
906         
907         /* Intepret and increment the number, if any: */
908         gint num = atol (alpha_end);
909         ++num;
910         
911         /* Get the name part: */
912         gint name_len = alpha_end - text;
913         gchar *name_without_number = g_malloc(name_len + 1);
914         memcpy (name_without_number, text, name_len);
915         name_without_number[name_len] = 0;\
916         
917     /* Concatenate the text part and the new number: */ 
918         gchar *result = g_strdup_printf("%s%d", name_without_number, num);
919         g_free (name_without_number);
920         
921         return result;  
922 }
923
924 gchar*
925 modest_account_mgr_get_unused_account_name (ModestAccountMgr *self, const gchar* starting_name,
926         gboolean server_account)
927 {
928         gchar *account_name = g_strdup (starting_name);
929
930         while (modest_account_mgr_account_exists (self, 
931                 account_name, server_account /*  server_account */)) {
932                         
933                 gchar * account_name2 = util_increment_name (account_name);
934                 g_free (account_name);
935                 account_name = account_name2;
936         }
937         
938         return account_name;
939 }
940
941 gchar*
942 modest_account_mgr_get_unused_account_display_name (ModestAccountMgr *self, const gchar* starting_name)
943 {
944         gchar *account_name = g_strdup (starting_name);
945
946         while (modest_account_mgr_account_with_display_name_exists (self, account_name)) {
947                         
948                 gchar * account_name2 = util_increment_name (account_name);
949                 g_free (account_name);
950                 account_name = account_name2;
951         }
952         
953         return account_name;
954 }
955
956 void 
957 modest_account_mgr_set_leave_on_server (ModestAccountMgr *self, 
958                                         const gchar *account_name, 
959                                         gboolean leave_on_server)
960 {
961         modest_account_mgr_set_bool (self, 
962                                      account_name,
963                                      MODEST_ACCOUNT_LEAVE_ON_SERVER, 
964                                      leave_on_server, 
965                                      FALSE);
966 }
967
968 gboolean 
969 modest_account_mgr_get_leave_on_server (ModestAccountMgr *self, 
970                                         const gchar* account_name)
971 {
972         return modest_account_mgr_get_bool (self, 
973                                             account_name,
974                                             MODEST_ACCOUNT_LEAVE_ON_SERVER, 
975                                             FALSE);
976 }
977
978 gint 
979 modest_account_mgr_get_last_updated (ModestAccountMgr *self, 
980                                      const gchar* account_name)
981 {
982         return modest_account_mgr_get_int (modest_runtime_get_account_mgr (), 
983                                            account_name, 
984                                            MODEST_ACCOUNT_LAST_UPDATED, 
985                                            TRUE);
986 }
987
988 void 
989 modest_account_mgr_set_last_updated (ModestAccountMgr *self, 
990                                      const gchar* account_name,
991                                      gint time)
992 {
993         modest_account_mgr_set_int (self, 
994                                     account_name, 
995                                     MODEST_ACCOUNT_LAST_UPDATED, 
996                                     time, 
997                                     TRUE);
998
999         /* TODO: notify about changes */
1000 }
1001
1002 gint  
1003 modest_account_mgr_get_retrieve_limit (ModestAccountMgr *self, 
1004                                        const gchar* account_name)
1005 {
1006         return modest_account_mgr_get_int (self, 
1007                                            account_name,
1008                                            MODEST_ACCOUNT_LIMIT_RETRIEVE, 
1009                                            FALSE);
1010 }
1011
1012 void  
1013 modest_account_mgr_set_retrieve_limit (ModestAccountMgr *self, 
1014                                        const gchar* account_name,
1015                                        gint limit_retrieve)
1016 {
1017         modest_account_mgr_set_int (self, 
1018                                     account_name,
1019                                     MODEST_ACCOUNT_LIMIT_RETRIEVE, 
1020                                     limit_retrieve, 
1021                                     FALSE /* not server account */);
1022 }
1023
1024 gint  
1025 modest_account_mgr_get_server_account_port (ModestAccountMgr *self, 
1026                                             const gchar* account_name)
1027 {
1028         return modest_account_mgr_get_int (self, 
1029                                            account_name,
1030                                            MODEST_ACCOUNT_PORT, 
1031                                            TRUE);
1032 }
1033
1034 void
1035 modest_account_mgr_set_server_account_port (ModestAccountMgr *self, 
1036                                             const gchar *account_name,
1037                                             gint port_num)
1038 {
1039         modest_account_mgr_set_int (self, 
1040                                     account_name,
1041                                     MODEST_ACCOUNT_PORT, 
1042                                     port_num, TRUE /* server account */);
1043 }
1044
1045 gchar* 
1046 modest_account_mgr_get_server_account_name (ModestAccountMgr *self, 
1047                                             const gchar *account_name,
1048                                             TnyAccountType account_type)
1049 {
1050         return modest_account_mgr_get_string (self, 
1051                                               account_name,
1052                                               (account_type == TNY_ACCOUNT_TYPE_STORE) ?
1053                                               MODEST_ACCOUNT_STORE_ACCOUNT :
1054                                               MODEST_ACCOUNT_TRANSPORT_ACCOUNT, 
1055                                               FALSE);
1056 }
1057
1058 static const gchar *
1059 get_retrieve_type_name (ModestAccountRetrieveType retrieve_type)
1060 {
1061         switch(retrieve_type) {
1062         case MODEST_ACCOUNT_RETRIEVE_HEADERS_ONLY:
1063                 return MODEST_ACCOUNT_RETRIEVE_VALUE_HEADERS_ONLY;
1064                 break;
1065         case MODEST_ACCOUNT_RETRIEVE_MESSAGES:
1066                 return MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES;
1067                 break;
1068         case MODEST_ACCOUNT_RETRIEVE_MESSAGES_AND_ATTACHMENTS:
1069                 return MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES_AND_ATTACHMENTS;
1070                 break;
1071         default:
1072                 return MODEST_ACCOUNT_RETRIEVE_VALUE_HEADERS_ONLY;
1073         };
1074 }
1075
1076 static ModestAccountRetrieveType
1077 get_retrieve_type (const gchar *name)
1078 {
1079         if (!name || name[0] == 0)
1080                 return MODEST_ACCOUNT_RETRIEVE_HEADERS_ONLY;
1081         if (strcmp (name, MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES) == 0) {
1082                 return MODEST_ACCOUNT_RETRIEVE_MESSAGES;
1083         } else if (strcmp (name, MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES_AND_ATTACHMENTS) == 0) {
1084                 return MODEST_ACCOUNT_RETRIEVE_MESSAGES_AND_ATTACHMENTS;
1085         } else {
1086                 /* we fall back to headers only */
1087                 return MODEST_ACCOUNT_RETRIEVE_HEADERS_ONLY;
1088         }
1089 }
1090
1091 ModestAccountRetrieveType
1092 modest_account_mgr_get_retrieve_type (ModestAccountMgr *self, 
1093                                       const gchar *account_name)
1094 {
1095         gchar *string;
1096         ModestAccountRetrieveType result;
1097
1098         string =  modest_account_mgr_get_string (self, 
1099                                                  account_name,
1100                                                  MODEST_ACCOUNT_RETRIEVE, 
1101                                                  FALSE /* not server account */);
1102         result = get_retrieve_type (string);
1103         g_free (string);
1104
1105         return result;
1106 }
1107
1108 void 
1109 modest_account_mgr_set_retrieve_type (ModestAccountMgr *self, 
1110                                       const gchar *account_name,
1111                                       ModestAccountRetrieveType retrieve_type)
1112 {
1113         modest_account_mgr_set_string (self, 
1114                                        account_name,
1115                                        MODEST_ACCOUNT_RETRIEVE, 
1116                                        get_retrieve_type_name (retrieve_type), 
1117                                        FALSE /* not server account */);
1118 }
1119
1120
1121 void
1122 modest_account_mgr_set_user_fullname (ModestAccountMgr *self, 
1123                                       const gchar *account_name,
1124                                       const gchar *fullname)
1125 {
1126         modest_account_mgr_set_string (self, 
1127                                        account_name,
1128                                        MODEST_ACCOUNT_FULLNAME, 
1129                                        fullname, 
1130                                        FALSE /* not server account */);
1131 }
1132
1133 void
1134 modest_account_mgr_set_user_email (ModestAccountMgr *self, 
1135                                    const gchar *account_name,
1136                                    const gchar *email)
1137 {
1138         modest_account_mgr_set_string (self, 
1139                                        account_name,
1140                                        MODEST_ACCOUNT_EMAIL, 
1141                                        email, 
1142                                        FALSE /* not server account */);
1143 }