Fixes FwNULL 13/16
[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 *hostname, *username, *pwd, *uri, *proto, *auth, *sec;
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         proto = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_PROTO, TRUE);
471         if (proto) {
472                 gchar *tag = NULL;
473                 if (is_transport_and_not_store) {
474                         tag = MODEST_PROTOCOL_REGISTRY_TRANSPORT_PROTOCOLS;
475                 } else {
476                         tag = MODEST_PROTOCOL_REGISTRY_STORE_PROTOCOLS;
477                 }
478                 protocol = modest_protocol_registry_get_protocol_by_name (registry, tag, proto);
479
480                 modest_server_account_settings_set_protocol (settings,
481                                                              modest_protocol_get_type_id (protocol));
482                 g_free (proto);
483         } else {
484                 goto on_error;
485         }
486
487         modest_server_account_settings_set_port (settings,
488                                                  modest_account_mgr_get_int (self, name, MODEST_ACCOUNT_PORT, TRUE));
489
490         auth = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_AUTH_MECH, TRUE);
491         if (auth) {
492                 protocol = modest_protocol_registry_get_protocol_by_name (registry, MODEST_PROTOCOL_REGISTRY_AUTH_PROTOCOLS, auth);
493                 modest_server_account_settings_set_auth_protocol (settings,
494                                                                   modest_protocol_get_type_id (protocol));
495                 g_free (auth);
496         } else {
497                 modest_server_account_settings_set_auth_protocol (settings, MODEST_PROTOCOLS_AUTH_NONE);
498         }
499
500         sec = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_SECURITY, TRUE);
501         if (sec) {
502                 protocol = modest_protocol_registry_get_protocol_by_name (registry, MODEST_PROTOCOL_REGISTRY_CONNECTION_PROTOCOLS, sec);
503                 modest_server_account_settings_set_security_protocol (settings,
504                                                                       modest_protocol_get_type_id (protocol));
505                 g_free (sec);
506         } else {
507                 modest_server_account_settings_set_security_protocol (settings,
508                                                                       MODEST_PROTOCOLS_CONNECTION_NONE);
509         }
510
511         /* Username, password and URI. Note that the URI could include
512            the former two, so in this case there is no need to have
513            them */
514         username = modest_account_mgr_get_string (self, name,
515                                                   MODEST_ACCOUNT_USERNAME,TRUE);
516         if (username)
517                 modest_server_account_settings_set_username (settings, username);
518
519         pwd = modest_account_mgr_get_string (self, name,
520                                              MODEST_ACCOUNT_PASSWORD, TRUE);
521         if (pwd) {
522                 modest_server_account_settings_set_password (settings, pwd);
523                 g_free (pwd);
524         }
525
526         uri = modest_account_mgr_get_string (self, name,
527                                              MODEST_ACCOUNT_URI, TRUE);
528         if (uri)
529                 modest_server_account_settings_set_uri (settings, uri);
530
531         hostname = modest_account_mgr_get_string (self, name,
532                                                   MODEST_ACCOUNT_HOSTNAME,TRUE);
533         if (hostname)
534                 modest_server_account_settings_set_hostname (settings, hostname);
535
536         if (!uri) {
537                 if (!username || !hostname) {
538                         g_free (username);
539                         g_free (hostname);
540                         goto on_error;
541                 }
542         }
543
544         g_free (username);
545         g_free (hostname);
546         g_free (uri);
547
548         return settings;
549
550  on_error:
551         if (settings)
552                 g_object_unref (settings);
553         return NULL;
554 }
555
556 gboolean 
557 modest_account_mgr_save_server_settings (ModestAccountMgr *self,
558                                          ModestServerAccountSettings *settings)
559 {
560         gboolean has_errors = FALSE;
561         const gchar *account_name;
562         const gchar *protocol_name;
563         const gchar *uri;
564         ModestProtocolRegistry *protocol_registry;
565         ModestProtocol *protocol;
566         
567         g_return_val_if_fail (MODEST_IS_SERVER_ACCOUNT_SETTINGS (settings), FALSE);
568         protocol_registry = modest_runtime_get_protocol_registry ();
569         account_name = modest_server_account_settings_get_account_name (settings);
570
571         /* if we don't have a valid account name we cannot save */
572         g_return_val_if_fail (account_name, FALSE);
573
574         protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry,
575                                                                   modest_server_account_settings_get_protocol (settings));
576         protocol_name = modest_protocol_get_name (protocol);
577         uri = modest_server_account_settings_get_uri (settings);
578         if (!uri) {
579                 const gchar *hostname;
580                 const gchar *username;
581                 const gchar *password;
582                 gint port;
583                 const gchar *auth_protocol_name;
584                 const gchar *security_name;
585
586                 hostname = null_means_empty (modest_server_account_settings_get_hostname (settings));
587                 username = null_means_empty (modest_server_account_settings_get_username (settings));
588                 password = null_means_empty (modest_server_account_settings_get_password (settings));
589                 port = modest_server_account_settings_get_port (settings);
590                 protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry,
591                                                                           modest_server_account_settings_get_auth_protocol (settings));
592                 auth_protocol_name = modest_protocol_get_name (protocol);
593                 protocol = modest_protocol_registry_get_protocol_by_type (protocol_registry,
594                                                                           modest_server_account_settings_get_security_protocol (settings));
595                 security_name = modest_protocol_get_name (protocol);
596
597                 has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_HOSTNAME, 
598                                                             hostname, TRUE);
599                 if (!has_errors)
600                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_USERNAME,
601                                                                            username, TRUE));
602                 if (!has_errors)
603                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_PASSWORD,
604                                                                            password, TRUE));
605                 if (!has_errors)
606                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_PROTO,
607                                                                            protocol_name, TRUE));
608                 if (!has_errors)
609                         (has_errors = !modest_account_mgr_set_int (self, account_name, MODEST_ACCOUNT_PORT,
610                                                                         port, TRUE));
611                 if (!has_errors)
612                         (has_errors = !modest_account_mgr_set_string (self, account_name, 
613                                                                            MODEST_ACCOUNT_AUTH_MECH,
614                                                                            auth_protocol_name, TRUE));          
615                 if (!has_errors)
616                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_SECURITY,
617                                                                            security_name,
618                                                                            TRUE));
619         } else {
620                 const gchar *uri = modest_server_account_settings_get_uri (settings);
621                 has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_URI,
622                                                             uri, TRUE);
623                 if (!has_errors)
624                         (has_errors = !modest_account_mgr_set_string (self, account_name, MODEST_ACCOUNT_PROTO,
625                                                                            protocol_name, TRUE));
626         }
627
628         return !has_errors;
629
630 }
631
632
633 ModestAccountSettings *
634 modest_account_mgr_load_account_settings (ModestAccountMgr *self, 
635                                           const gchar* name)
636 {
637         ModestAccountSettings *settings;
638         gchar *string;
639         gchar *server_account;
640         gchar *default_account;
641         gboolean use_signature = FALSE;
642         
643         g_return_val_if_fail (self, NULL);
644         g_return_val_if_fail (name, NULL);
645         
646         if (!modest_account_mgr_account_exists (self, name, FALSE)) {
647                 /* For instance, maybe you are mistakenly checking for a server account name? */
648                 g_warning ("%s: Account %s does not exist.", __FUNCTION__, name);
649                 return NULL;
650         }
651         
652         settings = modest_account_settings_new ();
653
654         modest_account_settings_set_account_name (settings, name);
655
656         string = modest_account_mgr_get_string (self, name,
657                                                 MODEST_ACCOUNT_DISPLAY_NAME,
658                                                 FALSE);
659         modest_account_settings_set_display_name (settings, string);
660         g_free (string);
661
662         string = modest_account_mgr_get_string (self, name,
663                                                 MODEST_ACCOUNT_FULLNAME,
664                                                 FALSE);
665         modest_account_settings_set_fullname (settings, string);
666         g_free (string);
667
668         string = modest_account_mgr_get_string (self, name,
669                                                 MODEST_ACCOUNT_EMAIL,
670                                                 FALSE);
671         modest_account_settings_set_email_address (settings, string);
672         g_free (string);
673
674         modest_account_settings_set_enabled (settings, modest_account_mgr_get_enabled (self, name));
675         modest_account_settings_set_retrieve_type (settings, modest_account_mgr_get_retrieve_type (self, name));
676         modest_account_settings_set_retrieve_limit (settings, modest_account_mgr_get_retrieve_limit (self, name));
677
678         default_account    = modest_account_mgr_get_default_account (self);
679         modest_account_settings_set_is_default (settings,
680                                                 (default_account && strcmp (default_account, name) == 0));
681         g_free (default_account);
682
683         string = modest_account_mgr_get_signature (self, name, &use_signature);
684         modest_account_settings_set_use_signature (settings, use_signature);
685         modest_account_settings_set_signature (settings, string);
686         g_free (string);
687
688         modest_account_settings_set_leave_messages_on_server 
689                 (settings, modest_account_mgr_get_leave_on_server (self, name));
690         modest_account_settings_set_use_connection_specific_smtp 
691                 (settings, modest_account_mgr_get_use_connection_specific_smtp (self, name));
692
693         /* store */
694         server_account     = modest_account_mgr_get_string (self, name,
695                                                             MODEST_ACCOUNT_STORE_ACCOUNT,
696                                                             FALSE);
697         if (server_account) {
698                 ModestServerAccountSettings *store_settings;
699                 store_settings = modest_account_mgr_load_server_settings (self, server_account, FALSE);
700                 g_free (server_account);
701
702                 /* It could happen that the account data is corrupted
703                    so it's not loaded properly */
704                 if (store_settings) {
705                         modest_account_settings_set_store_settings (settings,
706                                                                     store_settings);
707                         g_object_unref (store_settings);
708                 } else {
709                         g_message ("%s can not load server settings. Account corrupted?", __FUNCTION__);
710                         g_object_unref (settings);
711                         return NULL;
712                 }
713         }
714
715         /* transport */
716         server_account = modest_account_mgr_get_string (self, name,
717                                                         MODEST_ACCOUNT_TRANSPORT_ACCOUNT,
718                                                         FALSE);
719         if (server_account) {
720                 ModestServerAccountSettings *transport_settings;
721                 transport_settings = modest_account_mgr_load_server_settings (self, server_account, TRUE);
722                 g_free (server_account);
723
724                 if (transport_settings) {
725                         modest_account_settings_set_transport_settings (settings, transport_settings);
726                         g_object_unref (transport_settings);
727                 } else {
728                         g_message ("%s can not load server settings. Account corrupted?", __FUNCTION__);
729                         g_object_unref (settings);
730                         return NULL;
731                 }
732         }
733
734         return settings;
735 }
736
737 void
738 modest_account_mgr_save_account_settings (ModestAccountMgr *mgr,
739                                           ModestAccountSettings *settings)
740 {
741         g_return_if_fail (MODEST_IS_ACCOUNT_MGR (mgr));
742         g_return_if_fail (MODEST_IS_ACCOUNT_SETTINGS (settings));
743
744         const gchar *account_name;
745         const gchar *store_account_name;
746         const gchar *transport_account_name;
747         ModestServerAccountSettings *store_settings;
748         ModestServerAccountSettings *transport_settings;
749
750         account_name = modest_account_settings_get_account_name (settings);
751         g_return_if_fail (account_name != NULL);
752
753         modest_account_mgr_set_display_name (mgr, account_name,
754                                              modest_account_settings_get_display_name (settings));
755         modest_account_mgr_set_user_fullname (mgr, account_name,
756                                               modest_account_settings_get_fullname (settings));
757         modest_account_mgr_set_user_email (mgr, account_name,
758                                            modest_account_settings_get_email_address (settings));
759         modest_account_mgr_set_retrieve_type (mgr, account_name,
760                                               modest_account_settings_get_retrieve_type (settings));
761         modest_account_mgr_set_retrieve_limit (mgr, account_name,
762                                                modest_account_settings_get_retrieve_limit (settings));
763         modest_account_mgr_set_leave_on_server (mgr, account_name,
764                                                 modest_account_settings_get_leave_messages_on_server (settings));
765         modest_account_mgr_set_signature (mgr, account_name,
766                                           modest_account_settings_get_signature (settings),
767                                           modest_account_settings_get_use_signature (settings));
768         modest_account_mgr_set_use_connection_specific_smtp 
769                 (mgr, account_name,
770                  modest_account_settings_get_use_connection_specific_smtp (settings));
771
772         store_settings = modest_account_settings_get_store_settings (settings);
773         store_account_name = modest_server_account_settings_get_account_name (store_settings);
774         if (store_settings != NULL) {
775                 modest_account_mgr_save_server_settings (mgr, store_settings);
776         }
777         modest_account_mgr_set_string (mgr, account_name, MODEST_ACCOUNT_STORE_ACCOUNT, store_account_name, FALSE);
778         g_object_unref (store_settings);
779
780         transport_settings = modest_account_settings_get_transport_settings (settings);
781         if (transport_settings) {
782                 transport_account_name = modest_server_account_settings_get_account_name (transport_settings);
783                 if (transport_account_name)
784                         modest_account_mgr_set_string (mgr, account_name, MODEST_ACCOUNT_TRANSPORT_ACCOUNT, 
785                                                        transport_account_name, FALSE);
786                 modest_account_mgr_save_server_settings (mgr, transport_settings);
787                 g_object_unref (transport_settings);
788         }
789         modest_account_mgr_set_enabled (mgr, account_name, TRUE);
790 }
791
792
793 gint 
794 on_accounts_list_sort_by_title(gconstpointer a, gconstpointer b)
795 {
796         return g_utf8_collate((const gchar*)a, (const gchar*)b);
797 }
798
799 /** Get the first one, alphabetically, by title. */
800 gchar* 
801 modest_account_mgr_get_first_account_name (ModestAccountMgr *self)
802 {
803         const gchar* account_name = NULL;
804         GSList *account_names = modest_account_mgr_account_names (self, TRUE /* only enabled */);
805
806         /* Return TRUE if there is no account */
807         if (!account_names)
808                 return NULL;
809
810         /* Get the first one, alphabetically, by title: */
811         /* gchar *old_default = modest_account_mgr_get_default_account (self); */
812         GSList* list_sorted = g_slist_sort (account_names, on_accounts_list_sort_by_title);
813
814         GSList* iter = list_sorted;
815         gboolean found = FALSE;
816         while (iter && !found) {
817                 account_name = (const gchar*)list_sorted->data;
818
819                 if (account_name)
820                         found = TRUE;
821
822                 if (!found)
823                         iter = g_slist_next (iter);
824         }
825
826         gchar* result = NULL;
827         if (account_name)
828                 result = g_strdup (account_name);
829                 
830         modest_account_mgr_free_account_names (account_names);
831         account_names = NULL;
832
833         return result;
834 }
835
836 gboolean
837 modest_account_mgr_set_first_account_as_default (ModestAccountMgr *self)
838 {
839         gboolean result = FALSE;
840         
841         gchar* account_name = modest_account_mgr_get_first_account_name(self);
842         if (account_name) {
843                 result = modest_account_mgr_set_default_account (self, account_name);
844                 g_free (account_name);
845         }
846         else
847                 result = TRUE; /* If there are no accounts then it's not a failure. */
848
849         return result;
850 }
851
852 gchar*
853 modest_account_mgr_get_from_string (ModestAccountMgr *self, const gchar* name)
854 {
855         gchar *fullname, *email, *from;
856         
857         g_return_val_if_fail (self, NULL);
858         g_return_val_if_fail (name, NULL);
859
860         fullname      = modest_account_mgr_get_string (self, name,MODEST_ACCOUNT_FULLNAME,
861                                                        FALSE);
862         email         = modest_account_mgr_get_string (self, name, MODEST_ACCOUNT_EMAIL,
863                                                        FALSE);
864         from = g_strdup_printf ("%s <%s>",
865                                 fullname ? fullname : "",
866                                 email    ? email    : "");
867         g_free (fullname);
868         g_free (email);
869
870         return from;
871 }
872
873 /* Add a number to the end of the text, or increment a number that is already there.
874  */
875 static gchar*
876 util_increment_name (const gchar* text)
877 {
878         g_return_val_if_fail (text, NULL);
879
880         /* Get the end character,
881          * also doing a UTF-8 validation which is required for using g_utf8_prev_char().
882          */
883         const gchar* end = NULL;
884         if (!g_utf8_validate (text, -1, &end))
885                 return NULL;
886   
887         if (!end)
888                 return NULL;
889                 
890         --end; /* Go to before the null-termination. */
891                 
892         /* Look at each UTF-8 characer, starting at the end: */
893         const gchar* p = end;
894         const gchar* alpha_end = NULL;
895         while (p)
896         {       
897                 /* Stop when we reach the first character that is not a numeric digit: */
898                 const gunichar ch = g_utf8_get_char (p);
899                 if (!g_unichar_isdigit (ch)) {
900                         alpha_end = p;
901                         break;
902                 }
903                 
904                 p = g_utf8_find_prev_char (text, p);    
905         }
906         
907         if(!alpha_end) {
908                 /* The text must consist completely of numeric digits. */
909                 alpha_end = text;
910         }
911         else
912                 ++alpha_end;
913         
914         /* Intepret and increment the number, if any: */
915         gint num = atol (alpha_end);
916         ++num;
917         
918         /* Get the name part: */
919         gint name_len = alpha_end - text;
920         gchar *name_without_number = g_malloc(name_len + 1);
921         memcpy (name_without_number, text, name_len);
922         name_without_number[name_len] = 0;\
923         
924     /* Concatenate the text part and the new number: */ 
925         gchar *result = g_strdup_printf("%s%d", name_without_number, num);
926         g_free (name_without_number);
927         
928         return result;  
929 }
930
931 gchar*
932 modest_account_mgr_get_unused_account_name (ModestAccountMgr *self, const gchar* starting_name,
933         gboolean server_account)
934 {
935         gchar *account_name = g_strdup (starting_name);
936
937         while (modest_account_mgr_account_exists (self, 
938                 account_name, server_account /*  server_account */)) {
939                         
940                 gchar * account_name2 = util_increment_name (account_name);
941                 g_free (account_name);
942                 account_name = account_name2;
943         }
944         
945         return account_name;
946 }
947
948 gchar*
949 modest_account_mgr_get_unused_account_display_name (ModestAccountMgr *self, const gchar* starting_name)
950 {
951         gchar *account_name = g_strdup (starting_name);
952
953         while (modest_account_mgr_account_with_display_name_exists (self, account_name)) {
954                         
955                 gchar * account_name2 = util_increment_name (account_name);
956                 g_free (account_name);
957                 account_name = account_name2;
958         }
959         
960         return account_name;
961 }
962
963 void 
964 modest_account_mgr_set_leave_on_server (ModestAccountMgr *self, 
965                                         const gchar *account_name, 
966                                         gboolean leave_on_server)
967 {
968         modest_account_mgr_set_bool (self, 
969                                      account_name,
970                                      MODEST_ACCOUNT_LEAVE_ON_SERVER, 
971                                      leave_on_server, 
972                                      FALSE);
973 }
974
975 gboolean 
976 modest_account_mgr_get_leave_on_server (ModestAccountMgr *self, 
977                                         const gchar* account_name)
978 {
979         return modest_account_mgr_get_bool (self, 
980                                             account_name,
981                                             MODEST_ACCOUNT_LEAVE_ON_SERVER, 
982                                             FALSE);
983 }
984
985 gint 
986 modest_account_mgr_get_last_updated (ModestAccountMgr *self, 
987                                      const gchar* account_name)
988 {
989         return modest_account_mgr_get_int (modest_runtime_get_account_mgr (), 
990                                            account_name, 
991                                            MODEST_ACCOUNT_LAST_UPDATED, 
992                                            TRUE);
993 }
994
995 void 
996 modest_account_mgr_set_last_updated (ModestAccountMgr *self, 
997                                      const gchar* account_name,
998                                      gint time)
999 {
1000         modest_account_mgr_set_int (self, 
1001                                     account_name, 
1002                                     MODEST_ACCOUNT_LAST_UPDATED, 
1003                                     time, 
1004                                     TRUE);
1005
1006         /* TODO: notify about changes */
1007 }
1008
1009 gint  
1010 modest_account_mgr_get_retrieve_limit (ModestAccountMgr *self, 
1011                                        const gchar* account_name)
1012 {
1013         return modest_account_mgr_get_int (self, 
1014                                            account_name,
1015                                            MODEST_ACCOUNT_LIMIT_RETRIEVE, 
1016                                            FALSE);
1017 }
1018
1019 void  
1020 modest_account_mgr_set_retrieve_limit (ModestAccountMgr *self, 
1021                                        const gchar* account_name,
1022                                        gint limit_retrieve)
1023 {
1024         modest_account_mgr_set_int (self, 
1025                                     account_name,
1026                                     MODEST_ACCOUNT_LIMIT_RETRIEVE, 
1027                                     limit_retrieve, 
1028                                     FALSE /* not server account */);
1029 }
1030
1031 gint  
1032 modest_account_mgr_get_server_account_port (ModestAccountMgr *self, 
1033                                             const gchar* account_name)
1034 {
1035         return modest_account_mgr_get_int (self, 
1036                                            account_name,
1037                                            MODEST_ACCOUNT_PORT, 
1038                                            TRUE);
1039 }
1040
1041 void
1042 modest_account_mgr_set_server_account_port (ModestAccountMgr *self, 
1043                                             const gchar *account_name,
1044                                             gint port_num)
1045 {
1046         modest_account_mgr_set_int (self, 
1047                                     account_name,
1048                                     MODEST_ACCOUNT_PORT, 
1049                                     port_num, TRUE /* server account */);
1050 }
1051
1052 gchar* 
1053 modest_account_mgr_get_server_account_name (ModestAccountMgr *self, 
1054                                             const gchar *account_name,
1055                                             TnyAccountType account_type)
1056 {
1057         return modest_account_mgr_get_string (self, 
1058                                               account_name,
1059                                               (account_type == TNY_ACCOUNT_TYPE_STORE) ?
1060                                               MODEST_ACCOUNT_STORE_ACCOUNT :
1061                                               MODEST_ACCOUNT_TRANSPORT_ACCOUNT, 
1062                                               FALSE);
1063 }
1064
1065 static const gchar *
1066 get_retrieve_type_name (ModestAccountRetrieveType retrieve_type)
1067 {
1068         switch(retrieve_type) {
1069         case MODEST_ACCOUNT_RETRIEVE_HEADERS_ONLY:
1070                 return MODEST_ACCOUNT_RETRIEVE_VALUE_HEADERS_ONLY;
1071                 break;
1072         case MODEST_ACCOUNT_RETRIEVE_MESSAGES:
1073                 return MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES;
1074                 break;
1075         case MODEST_ACCOUNT_RETRIEVE_MESSAGES_AND_ATTACHMENTS:
1076                 return MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES_AND_ATTACHMENTS;
1077                 break;
1078         default:
1079                 return MODEST_ACCOUNT_RETRIEVE_VALUE_HEADERS_ONLY;
1080         };
1081 }
1082
1083 static ModestAccountRetrieveType
1084 get_retrieve_type (const gchar *name)
1085 {
1086         if (!name || name[0] == 0)
1087                 return MODEST_ACCOUNT_RETRIEVE_HEADERS_ONLY;
1088         if (strcmp (name, MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES) == 0) {
1089                 return MODEST_ACCOUNT_RETRIEVE_MESSAGES;
1090         } else if (strcmp (name, MODEST_ACCOUNT_RETRIEVE_VALUE_MESSAGES_AND_ATTACHMENTS) == 0) {
1091                 return MODEST_ACCOUNT_RETRIEVE_MESSAGES_AND_ATTACHMENTS;
1092         } else {
1093                 /* we fall back to headers only */
1094                 return MODEST_ACCOUNT_RETRIEVE_HEADERS_ONLY;
1095         }
1096 }
1097
1098 ModestAccountRetrieveType
1099 modest_account_mgr_get_retrieve_type (ModestAccountMgr *self, 
1100                                       const gchar *account_name)
1101 {
1102         gchar *string;
1103         ModestAccountRetrieveType result;
1104
1105         string =  modest_account_mgr_get_string (self, 
1106                                                  account_name,
1107                                                  MODEST_ACCOUNT_RETRIEVE, 
1108                                                  FALSE /* not server account */);
1109         result = get_retrieve_type (string);
1110         g_free (string);
1111
1112         return result;
1113 }
1114
1115 void 
1116 modest_account_mgr_set_retrieve_type (ModestAccountMgr *self, 
1117                                       const gchar *account_name,
1118                                       ModestAccountRetrieveType retrieve_type)
1119 {
1120         modest_account_mgr_set_string (self, 
1121                                        account_name,
1122                                        MODEST_ACCOUNT_RETRIEVE, 
1123                                        get_retrieve_type_name (retrieve_type), 
1124                                        FALSE /* not server account */);
1125 }
1126
1127
1128 void
1129 modest_account_mgr_set_user_fullname (ModestAccountMgr *self, 
1130                                       const gchar *account_name,
1131                                       const gchar *fullname)
1132 {
1133         modest_account_mgr_set_string (self, 
1134                                        account_name,
1135                                        MODEST_ACCOUNT_FULLNAME, 
1136                                        fullname, 
1137                                        FALSE /* not server account */);
1138 }
1139
1140 void
1141 modest_account_mgr_set_user_email (ModestAccountMgr *self, 
1142                                    const gchar *account_name,
1143                                    const gchar *email)
1144 {
1145         modest_account_mgr_set_string (self, 
1146                                        account_name,
1147                                        MODEST_ACCOUNT_EMAIL, 
1148                                        email, 
1149                                        FALSE /* not server account */);
1150 }