Adapted to latest Tinymail API
[modest] / src / modest-tny-account.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-platform.h>
31 #include <modest-tny-platform-factory.h>
32 #include <modest-tny-account.h>
33 #include <modest-tny-account-store.h>
34 #include <modest-tny-local-folders-account.h>
35 #include <modest-runtime.h>
36 #include <tny-simple-list.h>
37 #include <modest-tny-folder.h>
38 #include <modest-tny-outbox-account.h>
39 #include <modest-account-mgr-helpers.h>
40 #include <modest-init.h>
41 #include <tny-camel-transport-account.h>
42 #include <tny-camel-imap-store-account.h>
43 #include <tny-camel-pop-store-account.h>
44 #include <tny-folder-stats.h>
45 #include <string.h>
46 #ifdef MODEST_HAVE_HILDON0_WIDGETS
47 #include <hildon-widgets/hildon-file-system-info.h>
48 #else
49 #include <hildon/hildon-file-system-info.h>
50 #endif
51
52 TnyFolder *
53 modest_tny_account_get_special_folder (TnyAccount *account,
54                                        TnyFolderType special_type)
55 {
56         TnyList *folders;
57         TnyIterator *iter;
58         TnyFolder *special_folder = NULL;
59
60         
61         g_return_val_if_fail (account, NULL);
62         g_return_val_if_fail (0 <= special_type && special_type < TNY_FOLDER_TYPE_NUM,
63                               NULL);
64         
65         TnyAccount *local_account  = NULL;
66
67         /* The accounts have already been instantiated by 
68          * modest_tny_account_store_get_accounts(), which is the 
69          * TnyAccountStore::get_accounts_func() implementation,
70          * so we just get them here.
71          */
72          
73         /* Per-account outbox folders are each in their own on-disk directory: */
74         if (special_type == TNY_FOLDER_TYPE_OUTBOX) {
75                 const gchar *modest_account_name = 
76                         modest_tny_account_get_parent_modest_account_name_for_server_account (account);
77                 
78                 if (modest_account_name) {
79                         gchar *account_id = g_strdup_printf (
80                                 MODEST_PER_ACCOUNT_LOCAL_OUTBOX_FOLDER_ACCOUNT_ID_PREFIX "%s", 
81                                 modest_account_name);
82                         
83                         local_account = modest_tny_account_store_get_tny_account_by (modest_runtime_get_account_store(),
84                                                                                      MODEST_TNY_ACCOUNT_STORE_QUERY_ID,
85                                                                                      account_id);
86                         if (!local_account) {
87                                 g_printerr ("modest: %s: modest_tny_account_store_get_tny_account_by(ID) returned NULL for %s\n", __FUNCTION__, account_id);
88                         return NULL;
89                         }
90                 
91                         g_free (account_id);
92                 } else {
93                         g_warning ("%s: modest_account_name was NULL.", __FUNCTION__);
94                 }
95         } else {
96                 /* Other local folders are all in one on-disk directory: */
97                 local_account = modest_tny_account_store_get_tny_account_by (modest_runtime_get_account_store(),
98                                                                              MODEST_TNY_ACCOUNT_STORE_QUERY_ID,
99                                                                              MODEST_LOCAL_FOLDERS_ACCOUNT_ID);
100         }
101         
102         if (!local_account) {
103                 g_printerr ("modest: cannot get local account\n");
104                 return NULL;
105         }
106
107         folders = TNY_LIST (tny_simple_list_new ());
108
109         /* There is no need to do this _async, as these are local folders. */
110         /* TODO: However, this seems to fail sometimes when the network is busy, 
111          * returning an empty list. murrayc. */ 
112         GError *error = NULL;
113         tny_folder_store_get_folders (TNY_FOLDER_STORE (local_account),
114                                       folders, NULL, &error);
115         if (error) {
116                 g_warning ("%s: tny_folder_store_get_folders() failed:\n  error=%s\n", 
117                         __FUNCTION__, error->message);
118         }
119                                       
120         if (tny_list_get_length (folders) == 0) {
121                 gchar* url_string = tny_account_get_url_string (local_account);
122                 g_printerr ("modest: %s: tny_folder_store_get_folders() returned an empty list for account with URL '%s'\n", 
123                         __FUNCTION__, url_string);
124                 g_free (url_string);
125         }
126         
127         iter = tny_list_create_iterator (folders);
128
129         while (!tny_iterator_is_done (iter)) {
130                 TnyFolder *folder =
131                         TNY_FOLDER (tny_iterator_get_current (iter));
132                 if (folder) {
133                         if (modest_tny_folder_get_local_or_mmc_folder_type (folder) == special_type) {
134                                 special_folder = folder;
135                                 break; /* Leaving a ref for the special_folder return value. */
136                         }
137                 
138                         g_object_unref (G_OBJECT(folder));
139                 }
140
141                 tny_iterator_next (iter);
142         }
143         
144         g_object_unref (G_OBJECT (folders));
145         g_object_unref (G_OBJECT (iter));
146         g_object_unref (G_OBJECT (local_account));
147
148         /*
149         if (!special_folder) {
150                 g_warning ("%s: Returning NULL.", __FUNCTION__);        
151         }
152         */
153         
154         return special_folder;
155 }
156
157 static void
158 on_connection_status_changed (TnyAccount *account, TnyConnectionStatus status, gpointer user_data)
159 {
160         printf ("DEBUG: %s: status=%d\n", __FUNCTION__, status);
161         
162         if (status == TNY_CONNECTION_STATUS_DISCONNECTED) {
163                 /* A tinymail network operation failed, and tinymail then noticed that 
164                  * the account is offline, because our TnyDevice is offline,
165                  * because libconic says we are offline.
166                  * So ask the user to go online again.
167                  * 
168                  * Note that this signal will not be emitted if the account was offline 
169                  * when the network operation was first attempted. For those cases, 
170                  * the application must do its own explicit checks.
171                  *
172                  * We make sure that this UI is shown in the main thread, to avoid races,
173                  * because tinymail does not guarantee that this signal handler will be called 
174                  * in the main thread.
175                  */
176                 /* TODO: Commented out, because this causes hangs, probably related to 
177                  * our use of mainloops:
178                  * modest_platform_connect_and_wait (NULL);
179                  */
180         } else if (status == TNY_CONNECTION_STATUS_CONNECTED_BROKEN) {
181                 printf ("DEBUG: %s: Connection broken. Forcing TnyDevice offline.\n", 
182                         __FUNCTION__);
183                         
184                 /* Something went wrong during some network operation.
185                  * Stop trying to use the network now,
186                  * by forcing accounts into offline mode:
187                  * 
188                  * When libconic reconnects, it will set the device back online again,
189                  * regardless of it being forced offline before.
190                  */
191                 /* TODO: Find out when this is falsely being emitted. */
192                 printf ("  DEBUG: %s: Not forcing offline because tinymail is sometimes reporting false connection breaks.\n", 
193                         __FUNCTION__);
194                 /*
195                 TnyDevice *device = modest_runtime_get_device ();
196                 tny_device_force_offline (device);
197                 */
198         }
199 }
200
201
202
203 /**
204  * create_tny_account:
205  * @account_mgr: a valid account mgr instance
206  * @session: A valid TnySessionCamel instance.
207  * @account_data: the server account for which to create a corresponding tny account
208  * 
209  * get a tnyaccount corresponding to the server_accounts (store or transport) for this account.
210  * NOTE: this function does not set the camel session or the get/forget password functions
211  * 
212  * Returns: a new TnyAccount or NULL in case of error.
213  */
214 static TnyAccount*
215 create_tny_account (ModestAccountMgr *account_mgr,
216                     TnySessionCamel *session,
217                     ModestServerAccountData *account_data)
218 {
219         g_return_val_if_fail (account_mgr, NULL);
220         g_return_val_if_fail (session, NULL);
221         g_return_val_if_fail (account_data, NULL);
222
223         /* sanity checks */
224         if (account_data->proto == MODEST_PROTOCOL_TRANSPORT_STORE_UNKNOWN) {
225                 g_printerr ("modest: '%s' does not provide a protocol\n",
226                             account_data->account_name);
227                 return NULL;
228         }
229
230         TnyAccount *tny_account = NULL;
231         
232         switch (account_data->proto) {
233         case MODEST_PROTOCOL_TRANSPORT_SENDMAIL:
234         case MODEST_PROTOCOL_TRANSPORT_SMTP:
235                 tny_account = TNY_ACCOUNT(tny_camel_transport_account_new ()); break;
236         case MODEST_PROTOCOL_STORE_POP:
237                 tny_account = TNY_ACCOUNT(tny_camel_pop_store_account_new ()); break;
238         case MODEST_PROTOCOL_STORE_IMAP:
239                 tny_account = TNY_ACCOUNT(tny_camel_imap_store_account_new ()); break;
240         case MODEST_PROTOCOL_STORE_MAILDIR:
241         case MODEST_PROTOCOL_STORE_MBOX:
242                 /* Note that this is not where we create the special local folders account.
243                  * That happens in modest_tny_account_new_for_local_folders() instead.
244                  */
245                 tny_account = TNY_ACCOUNT(tny_camel_store_account_new()); break;
246         default:
247                 g_return_val_if_reached (NULL);
248         }
249         if (!tny_account) {
250                 g_printerr ("modest: could not create tny account for '%s'\n",
251                             account_data->account_name);
252                 return NULL;
253         }
254         tny_account_set_id (tny_account, account_data->account_name);
255
256         /* This must be set quite early, or other set() functions will fail. */
257         tny_camel_account_set_session (TNY_CAMEL_ACCOUNT (tny_account), session);
258     
259         /* Handle connection requests:
260          * This (badly-named) signal will be called when we try to use an offline account. */
261         g_signal_connect (G_OBJECT (tny_account), "connection-status-changed",
262                         G_CALLBACK (on_connection_status_changed), NULL);
263
264         /* Proto */
265         const gchar* proto_name =
266                 modest_protocol_info_get_transport_store_protocol_name(account_data->proto);
267         tny_account_set_proto (tny_account, proto_name);
268
269         return tny_account;
270 }
271
272
273
274 /* Camel options: */
275
276 /* These seem to be listed in 
277  * libtinymail-camel/camel-lite/camel/providers/imap/camel-imap-store.c 
278  */
279 #define MODEST_ACCOUNT_OPTION_SSL "use_ssl"
280 #define MODEST_ACCOUNT_OPTION_SSL_NEVER "never"
281 /* This is a tinymail camel-lite specific option, 
282  * roughly equivalent to "always" in regular camel,
283  * which is appropriate for a generic "SSL" connection option: */
284 #define MODEST_ACCOUNT_OPTION_SSL_WRAPPED "wrapped"
285 /* Not used in our UI so far: */
286 #define MODEST_ACCOUNT_OPTION_SSL_WHEN_POSSIBLE "when-possible"
287 /* This is a tinymailcamel-lite specific option that is not in regular camel. */
288 #define MODEST_ACCOUNT_OPTION_SSL_TLS "tls"
289
290 /* These seem to be listed in 
291  * libtinymail-camel/camel-lite/camel/providers/imap/camel-imap-provider.c 
292  */
293 #define MODEST_ACCOUNT_OPTION_USE_LSUB "use_lsub" /* Show only subscribed folders */
294 #define MODEST_ACCOUNT_OPTION_CHECK_ALL "check_all" /* Check for new messages in all folders */
295
296 /* Posssible values for tny_account_set_secure_auth_mech().
297  * These might be camel-specific.
298  * Really, tinymail should use an enum.
299  * camel_sasl_authtype() seems to list some possible values.
300  */
301  
302 /* Note that evolution does not offer these for IMAP: */
303 #define MODEST_ACCOUNT_AUTH_PLAIN "PLAIN"
304 #define MODEST_ACCOUNT_AUTH_ANONYMOUS "ANONYMOUS"
305
306 /* Caeml's IMAP uses NULL instead for "Password".
307  * Also, not that Evolution offers "Password" for IMAP, but "Login" for SMTP.*/
308 #define MODEST_ACCOUNT_AUTH_PASSWORD "LOGIN" 
309 #define MODEST_ACCOUNT_AUTH_CRAMMD5 "CRAM-MD5"
310
311                 
312 /**
313  * update_tny_account:
314  * @account_mgr: a valid account mgr instance
315  * @account_data: the server account for which to create a corresponding tny account
316  * 
317  * get a tnyaccount corresponding to the server_accounts (store or transport) for this account.
318  * NOTE: this function does not set the camel session or the get/forget password functions
319  * 
320  * Returns: a new TnyAccount or NULL in case of error.
321  */
322 static gboolean
323 update_tny_account (TnyAccount *tny_account, ModestAccountMgr *account_mgr,
324                     ModestServerAccountData *account_data)
325 {
326         gchar *url = NULL;
327         
328         g_return_val_if_fail (account_mgr, FALSE);
329         g_return_val_if_fail (account_data, FALSE);
330         g_return_val_if_fail (tny_account, FALSE);
331
332         tny_account_set_id (tny_account, account_data->account_name);
333                
334         /* mbox and maildir accounts use a URI instead of the rest:
335          * Note that this is not where we create the special local folders account.
336          * We do that in modest_tny_account_new_for_local_folders() instead. */
337         if (account_data->uri)  
338                 tny_account_set_url_string (TNY_ACCOUNT(tny_account), account_data->uri);
339         else {
340                 /* Set camel-specific options: */
341                 
342                 /* Enable secure connection settings: */
343                 const gchar* option_security = NULL;
344                 switch (account_data->security) {
345                 case MODEST_PROTOCOL_CONNECTION_NORMAL:
346                         option_security = MODEST_ACCOUNT_OPTION_SSL "=" MODEST_ACCOUNT_OPTION_SSL_NEVER;
347                         break;
348                 case MODEST_PROTOCOL_CONNECTION_SSL:
349                         /* Apparently, use of "IMAPS" (specified in our UI spec), implies 
350                          * use of the "wrapped" option: */
351                         option_security = MODEST_ACCOUNT_OPTION_SSL "=" MODEST_ACCOUNT_OPTION_SSL_WRAPPED;
352                         break;
353                 case MODEST_PROTOCOL_CONNECTION_TLS:
354                         option_security = MODEST_ACCOUNT_OPTION_SSL "=" MODEST_ACCOUNT_OPTION_SSL_TLS;
355                         break;
356                 case MODEST_PROTOCOL_CONNECTION_TLS_OP:
357                         /* This is not actually in our UI: */
358                         option_security = MODEST_ACCOUNT_OPTION_SSL "=" MODEST_ACCOUNT_OPTION_SSL_WHEN_POSSIBLE;
359                         break;
360                 default:
361                         break;
362                 }
363                 
364                 if(option_security)
365                         tny_camel_account_add_option (TNY_CAMEL_ACCOUNT (tny_account),
366                                                       option_security);
367                 
368                 /* Secure authentication: */
369
370                 const gchar* auth_mech_name = NULL;
371                 switch (account_data->secure_auth) {
372                 case MODEST_PROTOCOL_AUTH_NONE:
373                         /* IMAP and POP need at least a password,
374                          * which camel uses if we specify NULL.
375                          * This setting should never happen anyway. */
376                         if (account_data->proto == MODEST_PROTOCOL_STORE_IMAP ||
377                             account_data->proto == MODEST_PROTOCOL_STORE_POP)
378                                 auth_mech_name = NULL;
379                         else if (account_data->proto == MODEST_PROTOCOL_TRANSPORT_SMTP)
380                                 auth_mech_name = MODEST_ACCOUNT_AUTH_ANONYMOUS;
381                         else
382                                 auth_mech_name = MODEST_ACCOUNT_AUTH_PLAIN;
383                         break;
384                         
385                 case MODEST_PROTOCOL_AUTH_PASSWORD:
386                         /* Camel use a password for IMAP or POP if we specify NULL,
387                          * For IMAP, at least it will report an error if we use "Password", "Login" or "Plain".
388                          * (POP is know to report an error for Login too. Probably Password and Plain too.) */
389                         if (account_data->proto == MODEST_PROTOCOL_STORE_IMAP)
390                                 auth_mech_name = NULL;
391                         else if (account_data->proto == MODEST_PROTOCOL_STORE_POP)
392                                 auth_mech_name = NULL;
393                         else
394                                 auth_mech_name = MODEST_ACCOUNT_AUTH_PASSWORD;
395                         break;
396                         
397                 case MODEST_PROTOCOL_AUTH_CRAMMD5:
398                         auth_mech_name = MODEST_ACCOUNT_AUTH_CRAMMD5;
399                         break;
400                         
401                 default:
402                         g_warning ("%s: Unhandled secure authentication setting %d for "
403                                 "account=%s (%s)", __FUNCTION__, account_data->secure_auth,
404                                    account_data->account_name, account_data->hostname);
405                         break;
406                 }
407                 
408                 if(auth_mech_name) 
409                         tny_account_set_secure_auth_mech (tny_account, auth_mech_name);
410                 
411                 if (modest_protocol_info_protocol_is_store(account_data->proto) && 
412                         (account_data->proto == MODEST_PROTOCOL_STORE_IMAP) ) {
413                         /* Other connection options, needed for IMAP. */
414                         tny_camel_account_add_option (TNY_CAMEL_ACCOUNT (tny_account),
415                                                       MODEST_ACCOUNT_OPTION_USE_LSUB);
416                         tny_camel_account_add_option (TNY_CAMEL_ACCOUNT (tny_account),
417                                                       MODEST_ACCOUNT_OPTION_CHECK_ALL);
418                 }
419                 
420                 if (account_data->username) 
421                         tny_account_set_user (tny_account, account_data->username);
422                 if (account_data->hostname)
423                         tny_account_set_hostname (tny_account, account_data->hostname);
424                  
425                 /* Set the port: */
426                 if (account_data->port)
427                         tny_account_set_port (tny_account, account_data->port);
428         }
429
430         /* FIXME: for debugging. 
431          * Let's keep this because it is very useful for debugging. */
432         url = tny_account_get_url_string (TNY_ACCOUNT(tny_account));
433         g_debug ("%s:\n  account-url: %s\n", __FUNCTION__, url);
434
435         g_free (url);
436         return TRUE;
437 }
438
439 TnyAccount*
440 modest_tny_account_new_from_server_account_name (ModestAccountMgr *account_mgr,
441                                                  TnySessionCamel *session,
442                                                  const gchar *server_account_name)
443 {
444         ModestServerAccountData *account_data;
445         TnyAccount *tny_account;
446         
447         g_return_val_if_fail (session, NULL);
448         g_return_val_if_fail (server_account_name, NULL);
449
450         account_data =  modest_account_mgr_get_server_account_data (account_mgr, 
451                                                                     server_account_name);
452         if (!account_data)
453                 return NULL;
454
455         tny_account = create_tny_account (account_mgr, session, account_data);
456         if (!tny_account)
457                 g_warning ("%s: failed to create tny_account", __FUNCTION__);
458         else if (!update_tny_account (tny_account, account_mgr, account_data))
459                 g_warning ("%s: failed to initialize tny_account", __FUNCTION__);
460         
461         modest_account_mgr_free_server_account_data (account_mgr, account_data);
462         
463         return tny_account;
464 }
465
466
467 #if 0
468 gboolean
469 modest_tny_account_update_from_server_account_name (TnyAccount *tny_account,
470                                                     ModestAccountMgr *account_mgr,
471                                                     const gchar *server_account_name)
472 {
473         ModestServerAccountData *account_data;
474         gboolean valid_account_type;
475         
476         g_return_val_if_fail (tny_account, FALSE);
477         g_return_val_if_fail (server_account_name, FALSE);
478         
479         account_data =  modest_account_mgr_get_server_account_data (account_mgr, 
480                                                                     server_account_name);
481         if (!account_data) {
482                 g_warning ("%s: failed to get server account data for %s",
483                            __FUNCTION__, server_account_name);
484                 return FALSE;
485         }
486
487         valid_account_type = FALSE;
488
489         /* you cannot change the protocol type of an existing account;
490          * so double check we don't even try
491          */
492         switch (account_data->proto) {
493         case MODEST_PROTOCOL_TRANSPORT_SENDMAIL:
494         case MODEST_PROTOCOL_TRANSPORT_SMTP:
495                 if (!TNY_IS_CAMEL_TRANSPORT_ACCOUNT(tny_account))
496                         g_warning ("%s: expecting transport account", __FUNCTION__);
497                 else
498                         valid_account_type = TRUE;
499                 break;
500         case MODEST_PROTOCOL_STORE_POP:
501                 if (!TNY_IS_CAMEL_POP_STORE_ACCOUNT(tny_account))
502                         g_warning ("%s: expecting pop account", __FUNCTION__);
503                 else
504                         valid_account_type = TRUE;
505                 break;
506         case MODEST_PROTOCOL_STORE_IMAP:
507                 if (!TNY_IS_CAMEL_IMAP_STORE_ACCOUNT(tny_account))
508                         g_warning ("%s: expecting imap account", __FUNCTION__);
509                 else
510                         valid_account_type = TRUE;
511                 break;
512         case MODEST_PROTOCOL_STORE_MAILDIR:
513         case MODEST_PROTOCOL_STORE_MBOX:
514                 if (!TNY_IS_CAMEL_STORE_ACCOUNT(tny_account))
515                         g_warning ("%s: expecting store account", __FUNCTION__);
516                 else
517                         valid_account_type = TRUE;
518                 break;
519         default:
520                 g_warning ("invalid account type");
521         }
522
523         if (!valid_account_type) {
524                 g_warning ("%s: protocol type cannot be changed", __FUNCTION__);
525                 modest_account_mgr_free_server_account_data (account_mgr, account_data);
526                 return FALSE;
527         }
528         
529         if (!update_tny_account (tny_account, account_mgr, account_data)) {
530                 g_warning ("%s: failed to update account", __FUNCTION__);
531                 modest_account_mgr_free_server_account_data (account_mgr, account_data);
532                 return FALSE;
533         }
534
535         modest_account_mgr_free_server_account_data (account_mgr, account_data);
536         return TRUE;
537 }
538 #endif
539
540
541
542
543 /* we need these dummy functions, or tinymail will complain */
544 static gchar*
545 get_pass_dummy (TnyAccount *account, const gchar *prompt, gboolean *cancel)
546 {
547         return NULL;
548 }
549 static void
550 forget_pass_dummy (TnyAccount *account)
551 {
552         /* intentionally left blank */
553 }
554
555
556 static void
557 set_online_callback (TnyCamelAccount *account, gboolean canceled, GError *err, gpointer user_data)
558 {
559         /* MODEST TODO: Show a real error message here, this is a significant error!
560          * Perhaps show the account's settings dialog again?! Reconnecting after 
561          * changing the settings of an account failed in this situation. */
562
563        if (err && !canceled)
564                g_warning ("err: %s", err->message);
565 }
566
567 gboolean
568 modest_tny_account_update_from_account (TnyAccount *tny_account, ModestAccountMgr *account_mgr,
569                                         const gchar *account_name, TnyAccountType type) 
570 {
571         ModestAccountData *account_data = NULL;
572         ModestServerAccountData *server_data = NULL;
573         TnyConnectionStatus  conn_status;
574         
575         g_return_val_if_fail (tny_account, FALSE);
576         g_return_val_if_fail (account_mgr, FALSE);
577         g_return_val_if_fail (account_name, FALSE);
578         g_return_val_if_fail (type == TNY_ACCOUNT_TYPE_STORE || type == TNY_ACCOUNT_TYPE_TRANSPORT,
579                               FALSE);
580
581         account_data = modest_account_mgr_get_account_data (account_mgr, account_name);
582         if (!account_data) {
583                 g_printerr ("modest: %s: cannot get account data for account %s\n",
584                             __FUNCTION__, account_name);
585                 return FALSE;
586         }
587
588         if (type == TNY_ACCOUNT_TYPE_STORE && account_data->store_account)
589                 server_data = account_data->store_account;
590         else if (type == TNY_ACCOUNT_TYPE_TRANSPORT && account_data->transport_account)
591                 server_data = account_data->transport_account;
592         if (!server_data) {
593                 g_printerr ("modest: no %s account defined for '%s'\n",
594                             type == TNY_ACCOUNT_TYPE_STORE ? "store" : "transport",
595                             account_data->display_name);
596                 modest_account_mgr_free_account_data (account_mgr, account_data);
597                 return FALSE;
598         }
599         
600         update_tny_account (tny_account, account_mgr, server_data);
601                 
602         /* This name is what shows up in the folder view -- so for some POP/IMAP/... server
603          * account, we set its name to the account of which it is part. */
604  
605         if (account_data->display_name)
606                 tny_account_set_name (tny_account, account_data->display_name);
607
608         modest_account_mgr_free_account_data (account_mgr, account_data);
609
610         /* If the account was online, reconnect to apply the changes */
611         conn_status = tny_account_get_connection_status (tny_account);
612         if (conn_status != TNY_CONNECTION_STATUS_DISCONNECTED) {
613
614                 /* The callback will have an error for you if the reconnect
615                  * failed. Please handle it (this is TODO). */
616
617                 tny_camel_account_set_online (TNY_CAMEL_ACCOUNT(tny_account), TRUE, 
618                         set_online_callback,  "online");
619         }
620
621         return TRUE;
622 }
623
624
625
626 TnyAccount*
627 modest_tny_account_new_from_account (ModestAccountMgr *account_mgr,
628                                      const gchar *account_name,
629                                      TnyAccountType type,
630                                      TnySessionCamel *session,
631                                      TnyGetPassFunc get_pass_func,
632                                      TnyForgetPassFunc forget_pass_func) 
633 {
634         TnyAccount *tny_account = NULL;
635         ModestAccountData *account_data = NULL;
636         ModestServerAccountData *server_data = NULL;
637
638         g_return_val_if_fail (account_mgr, NULL);
639         g_return_val_if_fail (account_name, NULL);
640         g_return_val_if_fail (session, NULL);
641         g_return_val_if_fail (type == TNY_ACCOUNT_TYPE_STORE || type == TNY_ACCOUNT_TYPE_TRANSPORT,
642                               NULL);
643
644         account_data = modest_account_mgr_get_account_data (account_mgr, account_name);
645         if (!account_data) {
646                 g_printerr ("modest: %s: cannot get account data for account %s\n",
647                             __FUNCTION__, account_name);
648                 return NULL;
649         }
650
651         if (type == TNY_ACCOUNT_TYPE_STORE && account_data->store_account)
652                 server_data = account_data->store_account;
653         else if (type == TNY_ACCOUNT_TYPE_TRANSPORT && account_data->transport_account)
654                 server_data = account_data->transport_account;
655         if (!server_data) {
656                 g_printerr ("modest: no %s account defined for '%s'\n",
657                             type == TNY_ACCOUNT_TYPE_STORE ? "store" : "transport",
658                             account_data->display_name);
659                 modest_account_mgr_free_account_data (account_mgr, account_data);
660                 return NULL;
661         }
662         
663         tny_account = create_tny_account (account_mgr,session, server_data);
664         if (!tny_account) { 
665                 g_printerr ("modest: failed to create tny account for %s (%s)\n",
666                             account_data->account_name, server_data->account_name);
667                 modest_account_mgr_free_account_data (account_mgr, account_data);
668                 return NULL;
669         } else
670                 update_tny_account (tny_account, account_mgr, server_data);
671                 
672         /* This name is what shows up in the folder view -- so for some POP/IMAP/... server
673          * account, we set its name to the account of which it is part. */
674  
675         if (account_data->display_name)
676                 tny_account_set_name (tny_account, account_data->display_name);
677
678         tny_account_set_forget_pass_func (tny_account,
679                                           forget_pass_func ? forget_pass_func : forget_pass_dummy);
680         tny_account_set_pass_func (tny_account,
681                                    get_pass_func ? get_pass_func: get_pass_dummy);
682         
683         modest_tny_account_set_parent_modest_account_name_for_server_account (tny_account,
684                                                                               account_name);
685         modest_account_mgr_free_account_data (account_mgr, account_data);
686
687         return tny_account;
688 }
689
690 typedef struct
691 {
692         TnyStoreAccount *account;
693         
694         ModestTnyAccountGetMmcAccountNameCallback callback;
695         gpointer user_data;
696 } GetMmcAccountNameData;
697
698
699
700
701 /* Gets the memory card name: */
702 static void 
703 on_modest_file_system_info(HildonFileSystemInfoHandle *handle,
704                              HildonFileSystemInfo *info,
705                              const GError *error, gpointer data)
706 {
707         GetMmcAccountNameData *callback_data = (GetMmcAccountNameData*)data;
708
709         if (error) {
710                 g_warning ("%s: error=%s", __FUNCTION__, error->message);
711         }
712         
713         TnyAccount *account = TNY_ACCOUNT (callback_data->account);
714         
715         const gchar *previous_display_name = NULL;
716         
717         const gchar *display_name = NULL;
718         if (!error && info) {
719                 display_name = hildon_file_system_info_get_display_name(info);
720                 previous_display_name = tny_account_get_name (account);
721         }
722                  
723         /* printf ("DEBUG: %s: display name=%s\n", __FUNCTION__,  display_name); */
724         if (display_name && previous_display_name && 
725                 (strcmp (display_name, previous_display_name) != 0)) {
726                 tny_account_set_name (account, display_name);
727         }
728                 
729         /* Inform the application that the name is now ready: */
730         if (callback_data->callback)
731                 (*(callback_data->callback)) (callback_data->account, 
732                         callback_data->user_data);
733         
734         g_object_unref (callback_data->account);
735         g_slice_free (GetMmcAccountNameData, callback_data);
736 }
737
738 void modest_tny_account_get_mmc_account_name (TnyStoreAccount* self, ModestTnyAccountGetMmcAccountNameCallback callback, gpointer user_data)
739 {
740         /* Just use the hard-coded path for the single memory card,
741          * rather than try to figure out the path to the specific card by 
742          * looking at the maildir URI:
743          */
744         const gchar *uri_real = MODEST_MCC1_VOLUMEPATH_URI;
745
746         /*
747         gchar* uri = tny_account_get_url_string (TNY_ACCOUNT (self));
748         if (!uri)
749                 return;
750
751         TODO: This gets the name of the folder, but we want the name of the volume.
752         gchar *uri_real = NULL;
753         const gchar* prefix = "maildir://localhost/";
754         if ((strstr (uri, prefix) == uri) && (strlen(uri) > strlen(prefix)) )
755                 uri_real = g_strconcat ("file:///", uri + strlen (prefix), NULL);
756         */
757
758         if (uri_real) {
759                 //This is freed in the callback:
760                 GetMmcAccountNameData * callback_data = g_slice_new0(GetMmcAccountNameData);
761                 callback_data->account = self;
762                 g_object_ref (callback_data->account); /* Unrefed when we destroy the struct. */
763                 callback_data->callback = callback;
764                 callback_data->user_data = user_data;
765                 
766                 /* TODO: gnome_vfs_volume_get_display_name() does not return 
767                  * the same string. But why not? Why does hildon needs its own 
768                  * function for this?
769                  */
770                 /* printf ("DEBUG: %s Calling hildon_file_system_info_async_new() with URI=%s\n", __FUNCTION__, uri_real); */
771                 hildon_file_system_info_async_new(uri_real, 
772                         on_modest_file_system_info, callback_data /* user_data */);
773
774                 /* g_free (uri_real); */
775         }
776
777         /* g_free (uri); */
778 }
779
780                                 
781
782 TnyAccount*
783 modest_tny_account_new_for_local_folders (ModestAccountMgr *account_mgr, TnySessionCamel *session,
784                                           const gchar* location_filepath)
785 {
786
787         
788         /* Make sure that the directories exist: */
789         modest_init_local_folders (location_filepath);
790
791         TnyStoreAccount *tny_account;
792         CamelURL *url;
793         gchar *maildir, *url_string;
794
795         g_return_val_if_fail (account_mgr, NULL);
796         g_return_val_if_fail (session, NULL);
797
798         
799         if (!location_filepath) {
800                 /* A NULL filepath means that this is the special local-folders maildir 
801                  * account: */
802                 tny_account = TNY_STORE_ACCOUNT (modest_tny_local_folders_account_new ());
803         }
804         else {
805                 /* Else, for instance, a per-account outbox maildir account: */
806                 tny_account = TNY_STORE_ACCOUNT (tny_camel_store_account_new ());
807         }
808                 
809         if (!tny_account) {
810                 g_printerr ("modest: %s: cannot create account for local folders. filepath=%s", 
811                         __FUNCTION__, location_filepath);
812                 return NULL;
813         }
814         tny_camel_account_set_session (TNY_CAMEL_ACCOUNT(tny_account), session);
815         
816         /* This path contains directories for each local folder.
817          * We have created them so that TnyCamelStoreAccount can find them 
818          * and report a folder for each directory: */
819         maildir = modest_local_folder_info_get_maildir_path (location_filepath);
820         url = camel_url_new ("maildir:", NULL);
821         camel_url_set_path (url, maildir);
822         /* Needed by tinymail's DBC assertions */
823         camel_url_set_host (url, "localhost");
824         url_string = camel_url_to_string (url, 0);
825         
826         tny_account_set_url_string (TNY_ACCOUNT(tny_account), url_string);
827 /*      printf("DEBUG: %s:\n  url=%s\n", __FUNCTION__, url_string); */
828
829         /* TODO: Use a more generic way of identifying memory card paths, 
830          * and of marking accounts as memory card accounts, maybe
831          * via a derived TnyCamelStoreAccount ? */
832         const gboolean is_mmc = 
833                 location_filepath && 
834                 (strcmp (location_filepath, MODEST_MCC1_VOLUMEPATH) == 0);
835                 
836         /* The name of memory card locations will be updated asynchronously.
837          * This is just a default: */
838         const gchar *name = is_mmc ? _("Memory Card") : 
839                 MODEST_LOCAL_FOLDERS_DEFAULT_DISPLAY_NAME;
840         tny_account_set_name (TNY_ACCOUNT(tny_account), name); 
841         
842         /* Get the correct display name for memory cards, asynchronously: */
843         if (location_filepath) {
844                 GError *error = NULL;
845                 gchar *uri = g_filename_to_uri(location_filepath, NULL, &error);
846                 if (error) {
847                         g_warning ("%s: g_filename_to_uri(%s) failed: %s", __FUNCTION__, 
848                                 location_filepath, error->message);
849                         g_error_free (error);
850                         error = NULL;   
851                 } else if (uri) {
852                         /* Get the account name asynchronously:
853                          * This might not happen soon enough, so some UI code might 
854                          * need to call this again, specifying a callback.
855                          */
856                         modest_tny_account_get_mmc_account_name (tny_account, NULL, NULL);
857                                 
858                         g_free (uri);
859                         uri = NULL;
860                 }
861         }
862         
863         
864         const gchar* id = is_mmc ? MODEST_MMC_ACCOUNT_ID :
865                 MODEST_LOCAL_FOLDERS_ACCOUNT_ID;
866         tny_account_set_id (TNY_ACCOUNT(tny_account), id);
867         
868         tny_account_set_forget_pass_func (TNY_ACCOUNT(tny_account), forget_pass_dummy);
869         tny_account_set_pass_func (TNY_ACCOUNT(tny_account), get_pass_dummy);
870         
871         modest_tny_account_set_parent_modest_account_name_for_server_account (
872                 TNY_ACCOUNT (tny_account), id);
873         
874         camel_url_free (url);
875         g_free (maildir);
876         g_free (url_string);
877
878         return TNY_ACCOUNT(tny_account);
879 }
880
881
882 TnyAccount*
883 modest_tny_account_new_for_per_account_local_outbox_folder (ModestAccountMgr *account_mgr,
884                                                             const gchar* account_name,
885                                                             TnySessionCamel *session)
886 {
887         g_return_val_if_fail (account_mgr, NULL);
888         g_return_val_if_fail (account_name, NULL);
889         g_return_val_if_fail (session, NULL);
890         
891         /* Notice that we create a ModestTnyOutboxAccount here, 
892          * instead of just a TnyCamelStoreAccount,
893          * so that we can later identify this as a special account for internal use only.
894          */
895         TnyStoreAccount *tny_account = TNY_STORE_ACCOUNT (modest_tny_outbox_account_new ());
896         if (!tny_account) {
897                 g_printerr ("modest: cannot create account for per-account local outbox folder.");
898                 return NULL;
899         }
900         
901         tny_camel_account_set_session (TNY_CAMEL_ACCOUNT(tny_account), session);
902         
903         /* Make sure that the paths exists on-disk so that TnyCamelStoreAccount can 
904          * find it to create a TnyFolder for it: */
905         gchar *folder_dir = modest_per_account_local_outbox_folder_info_get_maildir_path_to_outbox_folder (account_name); 
906         modest_init_one_local_folder(folder_dir);
907         g_free (folder_dir);
908         folder_dir = NULL;
909
910         /* This path should contain just one directory - "outbox": */
911         gchar *maildir = 
912                 modest_per_account_local_outbox_folder_info_get_maildir_path (account_name);
913                         
914         CamelURL *url = camel_url_new ("maildir:", NULL);
915         camel_url_set_path (url, maildir);
916         g_free (maildir);
917         
918         /* Needed by tinymail's DBC assertions */
919         camel_url_set_host (url, "localhost");
920         gchar *url_string = camel_url_to_string (url, 0);
921         camel_url_free (url);
922         
923         tny_account_set_url_string (TNY_ACCOUNT(tny_account), url_string);
924 /*      printf("DEBUG: %s:\n  url=%s\n", __FUNCTION__, url_string); */
925         g_free (url_string);
926
927         /* This text should never been seen,
928          * because the per-account outbox accounts are not seen directly by the user.
929          * Their folders are merged and shown as one folder. */ 
930         tny_account_set_name (TNY_ACCOUNT(tny_account), "Per-Account Outbox"); 
931         
932         gchar *account_id = g_strdup_printf (
933                 MODEST_PER_ACCOUNT_LOCAL_OUTBOX_FOLDER_ACCOUNT_ID_PREFIX "%s", 
934                 account_name);
935         tny_account_set_id (TNY_ACCOUNT(tny_account), account_id);
936         g_free (account_id);
937         
938         tny_account_set_forget_pass_func (TNY_ACCOUNT(tny_account), forget_pass_dummy);
939         tny_account_set_pass_func (TNY_ACCOUNT(tny_account), get_pass_dummy);
940         
941         /* Make this think that it belongs to the modest local-folders parent account: */
942         modest_tny_account_set_parent_modest_account_name_for_server_account (
943                 TNY_ACCOUNT (tny_account), MODEST_LOCAL_FOLDERS_ACCOUNT_ID);
944
945         return TNY_ACCOUNT(tny_account);
946 }
947
948
949
950 typedef gint (*TnyStatsFunc) (TnyFolderStats *stats);
951 #define TASK_GET_ALL_COUNT      0
952 #define TASK_GET_LOCAL_SIZE     1
953 #define TASK_GET_FOLDER_COUNT   2
954
955 typedef struct _RecurseFoldersHelper {
956         gint task;
957         guint sum;
958         guint folders;
959 } RecurseFoldersHelper;
960
961 static void
962 recurse_folders (TnyFolderStore *store, 
963                  TnyFolderStoreQuery *query, 
964                  RecurseFoldersHelper *helper)
965 {
966         TnyIterator *iter;
967         TnyList *folders = tny_simple_list_new ();
968
969         tny_folder_store_get_folders (store, folders, query, NULL);
970         iter = tny_list_create_iterator (folders);
971
972         helper->folders += tny_list_get_length (folders);
973
974         while (!tny_iterator_is_done (iter)) {
975                 TnyFolder *folder;
976
977                 folder = TNY_FOLDER (tny_iterator_get_current (iter));
978                 if (folder) {
979                         if (helper->task == TASK_GET_ALL_COUNT)
980                                 helper->sum += tny_folder_get_all_count (folder);
981
982                         if (helper->task == TASK_GET_LOCAL_SIZE)
983                                 helper->sum += tny_folder_get_local_size (folder);
984
985                         if (TNY_IS_FOLDER_STORE (folder))
986                                 recurse_folders (TNY_FOLDER_STORE (folder), query, helper);
987
988                         g_object_unref (folder);
989                 }
990
991                 tny_iterator_next (iter);
992         }
993          g_object_unref (G_OBJECT (iter));
994          g_object_unref (G_OBJECT (folders));
995 }
996
997 gint 
998 modest_tny_folder_store_get_folder_count (TnyFolderStore *self)
999 {
1000         RecurseFoldersHelper *helper;
1001         gint retval;
1002
1003         g_return_val_if_fail (TNY_IS_FOLDER_STORE (self), -1);
1004
1005         /* Create helper */
1006         helper = g_malloc0 (sizeof (RecurseFoldersHelper));
1007         helper->task = TASK_GET_FOLDER_COUNT;
1008         helper->folders = 0;
1009
1010         recurse_folders (self, NULL, helper);
1011
1012         retval = helper->folders;
1013
1014         g_free (helper);
1015
1016         return retval;
1017 }
1018
1019 gint
1020 modest_tny_folder_store_get_message_count (TnyFolderStore *self)
1021 {
1022         RecurseFoldersHelper *helper;
1023         gint retval;
1024
1025         g_return_val_if_fail (TNY_IS_FOLDER_STORE (self), -1);
1026         
1027         /* Create helper */
1028         helper = g_malloc0 (sizeof (RecurseFoldersHelper));
1029         helper->task = TASK_GET_ALL_COUNT;
1030         if (TNY_IS_FOLDER (self))
1031                 helper->sum = tny_folder_get_all_count (TNY_FOLDER (self));
1032
1033         recurse_folders (self, NULL, helper);
1034
1035         retval = helper->sum;
1036
1037         g_free (helper);
1038
1039         return retval;
1040 }
1041
1042 gint 
1043 modest_tny_folder_store_get_local_size (TnyFolderStore *self)
1044 {
1045         RecurseFoldersHelper *helper;
1046         gint retval;
1047
1048         g_return_val_if_fail (TNY_IS_FOLDER_STORE (self), -1);
1049
1050         /* Create helper */
1051         helper = g_malloc0 (sizeof (RecurseFoldersHelper));
1052         helper->task = TASK_GET_LOCAL_SIZE;
1053         if (TNY_IS_FOLDER (self))
1054                 helper->sum = tny_folder_get_local_size (TNY_FOLDER (self));
1055
1056         recurse_folders (self, NULL, helper);
1057
1058         retval = helper->sum;
1059
1060         g_free (helper);
1061
1062         return retval;
1063 }
1064
1065 const gchar* 
1066 modest_tny_account_get_parent_modest_account_name_for_server_account (TnyAccount *self)
1067 {
1068         return (const gchar *)g_object_get_data (G_OBJECT (self), "modest_account");
1069 }
1070
1071 void 
1072 modest_tny_account_set_parent_modest_account_name_for_server_account (TnyAccount *self, 
1073                                                                       const gchar* parent_modest_account_name)
1074 {
1075         g_object_set_data_full (G_OBJECT(self), "modest_account",
1076                                 (gpointer) g_strdup (parent_modest_account_name), g_free);
1077 }
1078
1079 gboolean
1080 modest_tny_account_is_virtual_local_folders (TnyAccount *self)
1081 {
1082         /* We should make this more sophisticated if we ever use ModestTnyLocalFoldersAccount 
1083          * for anything else. */
1084         return MODEST_IS_TNY_LOCAL_FOLDERS_ACCOUNT (self);
1085 }
1086
1087
1088 gboolean
1089 modest_tny_account_is_memory_card_account (TnyAccount *self)
1090 {
1091         const gchar* account_id = NULL;
1092
1093         g_return_val_if_fail (TNY_ACCOUNT (self), FALSE);
1094
1095         if (!self)
1096                 return FALSE;
1097
1098         account_id = tny_account_get_id (self);
1099
1100         if (!account_id)
1101                 return FALSE;
1102         else    
1103                 return (strcmp (account_id, MODEST_MMC_ACCOUNT_ID) == 0);
1104 }