1 /* Copyright (c) 2006, Nokia Corporation
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions are
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.
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.
30 #include <modest-tny-platform-factory.h>
31 #include <modest-tny-account.h>
32 #include <modest-tny-account-store.h>
33 #include <modest-runtime.h>
34 #include <tny-simple-list.h>
35 #include <modest-tny-folder.h>
36 #include <modest-account-mgr-helpers.h>
37 #include <tny-camel-transport-account.h>
38 #include <tny-camel-imap-store-account.h>
39 #include <tny-camel-pop-store-account.h>
40 #include <tny-folder-stats.h>
42 /* for now, ignore the account ===> the special folders are the same,
43 * local folders for all accounts
44 * this might change, ie, IMAP might have server-side sent-items
47 modest_tny_account_get_special_folder (TnyAccount *account,
48 TnyFolderType special_type)
52 TnyFolder *special_folder = NULL;
53 TnyAccount *local_account;
55 g_return_val_if_fail (account, NULL);
56 g_return_val_if_fail (0 <= special_type && special_type < TNY_FOLDER_TYPE_NUM,
59 local_account = modest_tny_account_store_get_tny_account_by_id (modest_runtime_get_account_store(),
60 MODEST_LOCAL_FOLDERS_ACCOUNT_ID);
62 g_printerr ("modest: cannot get local account\n");
66 folders = TNY_LIST (tny_simple_list_new ());
68 /* no need to do this _async, as these are local folders */
69 tny_folder_store_get_folders (TNY_FOLDER_STORE (local_account),
71 iter = tny_list_create_iterator (folders);
73 while (!tny_iterator_is_done (iter)) {
75 TNY_FOLDER (tny_iterator_get_current (iter));
76 if (modest_tny_folder_get_local_folder_type (folder) == special_type) {
77 special_folder = folder;
80 g_object_unref (G_OBJECT(folder));
81 tny_iterator_next (iter);
83 g_object_unref (G_OBJECT (folders));
84 g_object_unref (G_OBJECT (iter));
85 g_object_unref (G_OBJECT (local_account));
87 return special_folder;
92 /* These seem to be listed in
93 * libtinymail-camel/camel-lite/camel/providers/imap/camel-imap-store.c
95 #define MODEST_ACCOUNT_OPTION_SSL "use_ssl"
96 #define MODEST_ACCOUNT_OPTION_SSL_NEVER "never"
97 #define MODEST_ACCOUNT_OPTION_SSL_ALWAYS "always"
98 #define MODEST_ACCOUNT_OPTION_SSL_WHEN_POSSIBLE "when-possible"
100 /* These seem to be listed in
101 * libtinymail-camel/camel-lite/camel/providers/imap/camel-imap-provider.c
103 #define MODEST_ACCOUNT_OPTION_USE_LSUB "use_lsub" /* Show only subscribed folders */
104 #define MODEST_ACCOUNT_OPTION_CHECK_ALL "check_all" /* Check for new messages in all folders */
107 /* Posssible values for tny_account_set_secure_auth_mech().
108 * These might be camel-specific.
109 * Really, tinymail should use an enum.
110 * camel_sasl_authtype() seems to list some possible values.
113 /* Note that evolution does not offer these for IMAP: */
114 #define MODEST_ACCOUNT_AUTH_PLAIN "PLAIN"
115 #define MODEST_ACCOUNT_AUTH_ANONYMOUS "ANONYMOUS"
117 /* Caeml's IMAP uses NULL instead for "Password".
118 * Also, not that Evolution offers "Password" for IMAP, but "Login" for SMTP.*/
119 #define MODEST_ACCOUNT_AUTH_PASSWORD "LOGIN"
120 #define MODEST_ACCOUNT_AUTH_CRAMMD5 "CRAM-MD5"
124 * modest_tny_account_new_from_server_account:
125 * @account_mgr: a valid account mgr instance
126 * @account_name: the server account name for which to create a corresponding tny account
127 * @type: the type of account to create (TNY_ACCOUNT_TYPE_STORE or TNY_ACCOUNT_TYPE_TRANSPORT)
129 * get a tnyaccount corresponding to the server_accounts (store or transport) for this account.
130 * NOTE: this function does not set the camel session or the get/forget password functions
132 * Returns: a new TnyAccount or NULL in case of error.
135 modest_tny_account_new_from_server_account (ModestAccountMgr *account_mgr,
136 ModestServerAccountData *account_data)
140 g_return_val_if_fail (account_mgr, NULL);
141 g_return_val_if_fail (account_data, NULL);
144 if (account_data->proto == MODEST_PROTOCOL_TRANSPORT_STORE_UNKNOWN) {
145 g_printerr ("modest: '%s' does not provide a protocol\n",
146 account_data->account_name);
150 TnyAccount *tny_account = NULL;
152 switch (account_data->proto) {
153 case MODEST_PROTOCOL_TRANSPORT_SENDMAIL:
154 case MODEST_PROTOCOL_TRANSPORT_SMTP:
155 tny_account = TNY_ACCOUNT(tny_camel_transport_account_new ()); break;
156 case MODEST_PROTOCOL_STORE_POP:
157 tny_account = TNY_ACCOUNT(tny_camel_pop_store_account_new ()); break;
158 case MODEST_PROTOCOL_STORE_IMAP:
159 tny_account = TNY_ACCOUNT(tny_camel_imap_store_account_new ()); break;
160 case MODEST_PROTOCOL_STORE_MAILDIR:
161 case MODEST_PROTOCOL_STORE_MBOX:
162 tny_account = TNY_ACCOUNT(tny_camel_store_account_new()); break;
164 g_return_val_if_reached (NULL);
167 g_printerr ("modest: could not create tny account for '%s'\n",
168 account_data->account_name);
171 tny_account_set_id (tny_account, account_data->account_name);
174 const gchar* proto_name =
175 modest_protocol_info_get_transport_store_protocol_name(account_data->proto);
176 tny_account_set_proto (tny_account, proto_name);
179 /* mbox and maildir accounts use a URI instead of the rest: */
180 if (account_data->uri)
181 tny_account_set_url_string (TNY_ACCOUNT(tny_account), account_data->uri);
183 /* Set camel-specific options: */
185 /* Enable secure connection settings: */
186 const gchar* option_security = NULL;
187 switch (account_data->security) {
188 case MODEST_PROTOCOL_CONNECTION_NORMAL:
189 option_security = MODEST_ACCOUNT_OPTION_SSL "=" MODEST_ACCOUNT_OPTION_SSL_NEVER;
191 case MODEST_PROTOCOL_CONNECTION_SSL:
192 case MODEST_PROTOCOL_CONNECTION_TLS:
193 option_security = MODEST_ACCOUNT_OPTION_SSL "=" MODEST_ACCOUNT_OPTION_SSL_ALWAYS;;
195 case MODEST_PROTOCOL_CONNECTION_TLS_OP:
196 option_security = MODEST_ACCOUNT_OPTION_SSL "=" MODEST_ACCOUNT_OPTION_SSL_WHEN_POSSIBLE;
203 tny_camel_account_add_option (TNY_CAMEL_ACCOUNT (tny_account),
206 const gchar* auth_mech_name = NULL;
207 switch (account_data->secure_auth) {
208 case MODEST_PROTOCOL_AUTH_NONE:
209 /* IMAP needs at least a password,
210 * which camel uses if we specify NULL.
211 * This setting should never happen anyway. */
212 if (account_data->proto == MODEST_PROTOCOL_STORE_IMAP ||
213 account_data->proto == MODEST_PROTOCOL_STORE_POP)
214 auth_mech_name = NULL;
215 else if (account_data->proto == MODEST_PROTOCOL_TRANSPORT_SMTP)
216 auth_mech_name = MODEST_ACCOUNT_AUTH_ANONYMOUS;
218 auth_mech_name = MODEST_ACCOUNT_AUTH_PLAIN;
221 case MODEST_PROTOCOL_AUTH_PASSWORD:
222 /* Camel use a password for IMAP if we specify NULL,
223 * but will report an error if we use "Password", "Login" or "Plain". */
224 if (account_data->proto == MODEST_PROTOCOL_STORE_IMAP)
225 auth_mech_name = NULL;
227 auth_mech_name = MODEST_ACCOUNT_AUTH_PASSWORD;
230 case MODEST_PROTOCOL_AUTH_CRAMMD5:
231 auth_mech_name = MODEST_ACCOUNT_AUTH_CRAMMD5;
235 g_warning ("%s: Unhandled secure authentication setting %d for "
236 "account=%s (%s)", __FUNCTION__, account_data->secure_auth,
237 account_data->account_name, account_data->hostname);
242 tny_account_set_secure_auth_mech (tny_account, auth_mech_name);
244 if (modest_protocol_info_protocol_is_store(account_data->proto)) {
245 /* Other connection options. Some options are only valid for IMAP
246 accounts but it's OK for just now since POP is still not
248 tny_camel_account_add_option (TNY_CAMEL_ACCOUNT (tny_account),
249 MODEST_ACCOUNT_OPTION_USE_LSUB);
250 tny_camel_account_add_option (TNY_CAMEL_ACCOUNT (tny_account),
251 MODEST_ACCOUNT_OPTION_CHECK_ALL);
254 if (account_data->username)
255 tny_account_set_user (tny_account, account_data->username);
256 if (account_data->hostname)
257 tny_account_set_hostname (tny_account, account_data->hostname);
260 if (account_data->port)
261 tny_account_set_port (tny_account, account_data->port);
264 /* FIXME: for debugging */
265 url = tny_account_get_url_string (TNY_ACCOUNT(tny_account));
266 g_message ("modest: account-url: %s", url);
268 /***********************/
274 /* we need these dummy functions, or tinymail will complain */
276 get_pass_dummy (TnyAccount *account, const gchar *prompt, gboolean *cancel)
281 forget_pass_dummy (TnyAccount *account)
283 /* intentionally left blank */
287 modest_tny_account_new_from_account (ModestAccountMgr *account_mgr, const gchar *account_name,
289 TnySessionCamel *session,
290 TnyGetPassFunc get_pass_func,
291 TnyForgetPassFunc forget_pass_func)
293 TnyAccount *tny_account = NULL;
294 ModestAccountData *account_data = NULL;
295 ModestServerAccountData *server_data = NULL;
297 g_return_val_if_fail (account_mgr, NULL);
298 g_return_val_if_fail (account_name, NULL);
300 account_data = modest_account_mgr_get_account_data (account_mgr, account_name);
302 g_printerr ("modest: cannot get account data for account %s\n", account_name);
306 if (type == TNY_ACCOUNT_TYPE_STORE && account_data->store_account)
307 server_data = account_data->store_account;
308 else if (type == TNY_ACCOUNT_TYPE_TRANSPORT && account_data->transport_account)
309 server_data = account_data->transport_account;
311 g_printerr ("modest: no %s account defined for '%s'\n",
312 type == TNY_ACCOUNT_TYPE_STORE ? "store" : "transport",
313 account_data->display_name);
314 modest_account_mgr_free_account_data (account_mgr, account_data);
318 tny_account = modest_tny_account_new_from_server_account (account_mgr, server_data);
320 g_printerr ("modest: failed to create tny account for %s (%s)\n",
321 account_data->account_name, server_data->account_name);
322 modest_account_mgr_free_account_data (account_mgr, account_data);
326 tny_camel_account_set_session (TNY_CAMEL_ACCOUNT(tny_account), session);
327 tny_account_set_forget_pass_func (tny_account,
328 forget_pass_func ? forget_pass_func : forget_pass_dummy);
329 tny_account_set_pass_func (tny_account,
330 get_pass_func ? get_pass_func: get_pass_dummy);
332 /* This name is what shows up in the folder view -- so for some POP/IMAP/... server
333 * account, we set its name to the account of which it is part. */
334 if (account_data->display_name)
335 tny_account_set_name (tny_account, account_data->display_name);
337 g_object_set_data_full (G_OBJECT(tny_account), "modest_account",
338 (gpointer*) g_strdup (account_name), g_free);
340 modest_account_mgr_free_account_data (account_mgr, account_data);
347 modest_tny_account_new_for_local_folders (ModestAccountMgr *account_mgr, TnySessionCamel *session)
349 TnyStoreAccount *tny_account;
351 gchar *maildir, *url_string;
353 g_return_val_if_fail (account_mgr, NULL);
355 tny_account = tny_camel_store_account_new ();
357 g_printerr ("modest: cannot create account for local folders");
360 tny_camel_account_set_session (TNY_CAMEL_ACCOUNT(tny_account), session);
362 maildir = modest_local_folder_info_get_maildir_path ();
363 url = camel_url_new ("maildir:", NULL);
364 camel_url_set_path (url, maildir);
365 /* Needed by tinymail's DBC assertions */
366 camel_url_set_host (url, "localhost");
367 url_string = camel_url_to_string (url, 0);
369 tny_account_set_url_string (TNY_ACCOUNT(tny_account), url_string);
371 tny_account_set_name (TNY_ACCOUNT(tny_account), MODEST_LOCAL_FOLDERS_DEFAULT_DISPLAY_NAME);
372 tny_account_set_id (TNY_ACCOUNT(tny_account), MODEST_LOCAL_FOLDERS_ACCOUNT_ID);
373 tny_account_set_forget_pass_func (TNY_ACCOUNT(tny_account), forget_pass_dummy);
374 tny_account_set_pass_func (TNY_ACCOUNT(tny_account), get_pass_dummy);
376 g_object_set_data (G_OBJECT(tny_account), "modest_account",
377 (gpointer*)MODEST_LOCAL_FOLDERS_ACCOUNT_ID);
379 camel_url_free (url);
383 return TNY_ACCOUNT(tny_account);
386 typedef gint (*TnyStatsFunc) (TnyFolderStats *stats);
388 typedef struct _RecurseFoldersHelper {
389 TnyStatsFunc function;
392 } RecurseFoldersHelper;
395 recurse_folders (TnyFolderStore *store,
396 TnyFolderStoreQuery *query,
397 RecurseFoldersHelper *helper)
400 TnyList *folders = tny_simple_list_new ();
402 tny_folder_store_get_folders (store, folders, query, NULL);
403 iter = tny_list_create_iterator (folders);
405 helper->folders += tny_list_get_length (folders);
407 while (!tny_iterator_is_done (iter)) {
408 TnyFolderStats *stats;
411 folder = TNY_FOLDER (tny_iterator_get_current (iter));
412 stats = tny_folder_get_stats (folder);
414 /* initially, we sometimes get -1 from tinymail; ignore that */
415 if (helper->function && helper->function (stats) > 0)
416 helper->sum += helper->function (stats);
418 recurse_folders (TNY_FOLDER_STORE (folder), query, helper);
420 g_object_unref (folder);
421 g_object_unref (stats);
422 tny_iterator_next (iter);
424 g_object_unref (G_OBJECT (iter));
425 g_object_unref (G_OBJECT (folders));
429 modest_tny_account_get_folder_count (TnyAccount *self)
431 RecurseFoldersHelper *helper;
434 g_return_val_if_fail (TNY_IS_ACCOUNT (self), -1);
437 helper = g_malloc0 (sizeof (RecurseFoldersHelper));
438 helper->function = NULL;
442 recurse_folders (TNY_FOLDER_STORE (self), NULL, helper);
444 retval = helper->folders;
452 modest_tny_account_get_message_count (TnyAccount *self)
454 RecurseFoldersHelper *helper;
457 g_return_val_if_fail (TNY_IS_ACCOUNT (self), -1);
460 helper = g_malloc0 (sizeof (RecurseFoldersHelper));
461 helper->function = (TnyStatsFunc) tny_folder_stats_get_all_count;
464 recurse_folders (TNY_FOLDER_STORE (self), NULL, helper);
466 retval = helper->sum;
474 modest_tny_account_get_local_size (TnyAccount *self)
476 RecurseFoldersHelper *helper;
479 g_return_val_if_fail (TNY_IS_ACCOUNT (self), -1);
482 helper = g_malloc0 (sizeof (RecurseFoldersHelper));
483 helper->function = (TnyStatsFunc) tny_folder_stats_get_local_size;
486 recurse_folders (TNY_FOLDER_STORE (self), NULL, helper);
488 retval = helper->sum;