Fix modest_tny_msg_header_get_all_recipients_list (in case from is empty)
[modest] / src / modest-utils.c
index 33b5a04..c6e50e7 100644 (file)
@@ -54,6 +54,7 @@
 #ifdef MODEST_TOOLKIT_HILDON2
 #include "modest-header-window.h"
 #endif
+#include <langinfo.h>
 
 GQuark
 modest_utils_get_supported_secure_authentication_error_quark (void)
@@ -617,8 +618,7 @@ launch_sort_headers_dialog (GtkWindow *parent_window,
        sort_ids[sort_key] = TNY_HEADER_FLAG_PRIORITY_MASK;
        priority_sort_id = sort_key;
        
-       sortable = GTK_TREE_SORTABLE (gtk_tree_model_filter_get_model
-                                     (GTK_TREE_MODEL_FILTER (gtk_tree_view_get_model (GTK_TREE_VIEW (header_view)))));
+       sortable = GTK_TREE_SORTABLE (gtk_tree_view_get_model (GTK_TREE_VIEW (header_view)));
        /* Launch dialogs */
        if (!gtk_tree_sortable_get_sort_column_id (sortable,
                                                   &current_sort_colid, &current_sort_type)) {
@@ -720,20 +720,67 @@ modest_images_cache_get_id (const gchar *account, const gchar *uri)
 }
 
 gchar *
-modest_utils_get_account_name_from_recipient (const gchar *from_header)
+modest_utils_get_account_name_from_recipient (const gchar *from_header, gchar **mailbox)
 {
        gchar *account_name = NULL;
        ModestAccountMgr *mgr = NULL;
        GSList *accounts = NULL, *node = NULL;
 
+       if (mailbox)
+               *mailbox = NULL;
        g_return_val_if_fail (from_header, NULL);
 
        mgr = modest_runtime_get_account_mgr ();
        accounts = modest_account_mgr_account_names (mgr, TRUE);
                
        for (node = accounts; node != NULL; node = g_slist_next (node)) {
-               gchar *from = 
-                       modest_account_mgr_get_from_string (mgr, node->data);
+               gchar *from;
+               gchar *transport_account;
+
+               if (!strcmp (from_header, node->data)) {
+                       account_name = g_strdup (node->data);
+                       break;
+               }
+
+               transport_account = modest_account_mgr_get_server_account_name (modest_runtime_get_account_mgr (),
+                                                                               (const gchar *) node->data,
+                                                                               TNY_ACCOUNT_TYPE_TRANSPORT);
+               if (transport_account) {
+                       gchar *proto;
+                       proto = modest_account_mgr_get_string (mgr, transport_account, MODEST_ACCOUNT_PROTO, TRUE);
+
+                       if (proto != NULL) {
+                               ModestProtocol *protocol = 
+                                       modest_protocol_registry_get_protocol_by_name (modest_runtime_get_protocol_registry (),
+                                                                                      MODEST_PROTOCOL_REGISTRY_TRANSPORT_PROTOCOLS,
+                                                                                      proto);
+                               if (protocol && MODEST_IS_ACCOUNT_PROTOCOL (protocol)) {
+                                       ModestPairList *pair_list;
+                                       ModestPair *pair;
+                                       gchar *from_header_email =
+                                               modest_text_utils_get_email_address (from_header);
+                                       pair_list = modest_account_protocol_get_from_list (MODEST_ACCOUNT_PROTOCOL (protocol),
+                                                                                          node->data);
+                                       
+                                       pair = modest_pair_list_find_by_first_as_string (pair_list, from_header_email);
+                                       if (pair != NULL) {
+                                               account_name = g_strdup (node->data);
+                                               if (mailbox)
+                                                       *mailbox = g_strdup (from_header_email);
+                                       }
+                                       
+                                       modest_pair_list_free (pair_list);
+                                       
+                               }
+                               g_free (proto);
+                       }
+                       g_free (transport_account);
+               }
+               if (mailbox && *mailbox)
+                       break;
+
+               from = 
+                       modest_account_mgr_get_from_string (mgr, node->data, NULL);
                        
                if (from) {
                        gchar *from_email = 
@@ -753,6 +800,8 @@ modest_utils_get_account_name_from_recipient (const gchar *from_header)
                        g_free (from_header_email);
                        g_free (from);
                }
+
+                       
        }
        g_slist_foreach (accounts, (GFunc) g_free, NULL);
        g_slist_free (accounts);
@@ -778,3 +827,316 @@ modest_utils_on_entry_invalid_character (ModestValidatingEntry *self,
        modest_platform_information_banner (GTK_WIDGET (self), NULL, message);
        g_free (message);
 }
+
+FILE*
+modest_utils_open_mcc_mapping_file (gboolean from_lc_messages, gboolean *translated)
+{
+       FILE* result = NULL;
+       const gchar* path;
+       const gchar *env_list;
+       gchar **parts, **node;
+
+       if (from_lc_messages) {
+               env_list = getenv ("LC_MESSAGES");
+       } else {
+               env_list = getenv ("LANG");
+       }
+       parts = g_strsplit (env_list, ":", 0);
+       gchar *path1 = NULL;
+       const gchar* path2 = MODEST_MCC_MAPPING;
+
+       if (translated)
+               *translated = TRUE;
+
+       path = NULL;
+       for (node = parts; path == NULL && node != NULL && *node != NULL && **node != '\0'; node++) {
+               path1 = g_strdup_printf ("%s.%s", MODEST_OPERATOR_WIZARD_MCC_MAPPING, *node);
+               if (access (path1, R_OK) == 0) {
+                       path = path1;
+                       break;
+               } else {
+                       g_free (path1);
+                       path1 = NULL;
+               }
+       }
+       g_strfreev (parts);
+
+       if (path == NULL) {
+               if (access (MODEST_OPERATOR_WIZARD_MCC_MAPPING, R_OK) == 0) {
+                       path = MODEST_OPERATOR_WIZARD_MCC_MAPPING;
+                       if (translated)
+                               *translated = FALSE;
+               } else if (access (path2, R_OK) == 0) {
+                       path = path2;
+               } else {
+                       g_warning ("%s: neither '%s' nor '%s' is a readable mapping file",
+                                  __FUNCTION__, path1, path2);
+                       goto end;
+               }
+       }
+
+       result = fopen (path, "r");
+       if (!result) {
+               g_warning ("%s: error opening mapping file '%s': %s",
+                          __FUNCTION__, path, strerror(errno));
+               goto end;
+       }
+ end:
+       g_free (path1);
+       return result;
+}
+
+/* cluster mcc's, based on the list
+ * http://en.wikipedia.org/wiki/Mobile_country_code
+ */
+static int
+effective_mcc (gint mcc)
+{
+       switch (mcc) {
+       case 405: return 404; /* india */
+       case 441: return 440; /* japan */       
+       case 235: return 234; /* united kingdom */
+       case 311:
+       case 312:
+       case 313:
+       case 314:
+       case 315:
+       case 316: return 310; /* united states */
+       default:  return mcc;
+       }
+}
+
+/* each line is of the form:
+   xxx    logical_id
+
+  NOTE: this function is NOT re-entrant, the out-param country
+  are static strings that should NOT be freed. and will change when
+  calling this function again
+
+  also note, this function will return the "effective mcc", which
+  is the normalized mcc for a country - ie. even if the there
+  are multiple entries for the United States with various mccs,
+  this function will always return 310, even if the real mcc parsed
+  would be 314. see the 'effective_mcc' function above.
+*/
+static int
+parse_mcc_mapping_line (const char* line,  char** country)
+{
+       char mcc[4];  /* the mcc code, always 3 bytes*/
+       gchar *iter, *tab, *final;
+
+       if (!line) {
+               *country = NULL;
+               return 0;
+       }
+
+       /* Go to the first tab (Country separator) */
+       tab = g_utf8_strrchr (line, -1, '\t');
+       if (!tab)
+               return 0;
+
+       *country = g_utf8_find_next_char (tab, NULL);
+
+       /* Replace by end of string. We need to use strlen, because
+          g_utf8_strrchr expects bytes and not UTF8 characters  */
+       final = g_utf8_strrchr (tab, strlen (tab) + 1, '\n');
+       if (G_LIKELY (final))
+               *final = '\0';
+       else
+               tab[strlen(tab) - 1] = '\0';
+
+       /* Get MCC code */
+       mcc[0] = g_utf8_get_char (line);
+       iter = g_utf8_find_next_char (line, NULL);
+       mcc[1] = g_utf8_get_char (iter);
+       iter = g_utf8_find_next_char (iter, NULL);
+       mcc[2] = g_utf8_get_char (iter);
+       mcc[3] = '\0';
+
+       return effective_mcc ((int) strtol ((const char*)mcc, NULL, 10));
+}
+
+#define MCC_FILE_MAX_LINE_LEN 128 /* max length of a line in MCC file */
+
+/** Note that the mcc_mapping file is installed 
+ * by the operator-wizard-settings package.
+ */
+GtkTreeModel *
+modest_utils_create_country_model (void)
+{
+       GtkTreeModel *model;
+
+       model = GTK_TREE_MODEL (gtk_list_store_new (2,  G_TYPE_STRING, G_TYPE_INT));
+
+       return model;
+}
+
+void
+modest_utils_fill_country_model (GtkTreeModel *model, gint *locale_mcc)
+{
+       gboolean translated;
+       char line[MCC_FILE_MAX_LINE_LEN];
+       guint previous_mcc = 0;
+       gchar *territory;
+       GHashTable *country_hash;
+       FILE *file;
+
+       /* First we need to know our current region */
+       file = modest_utils_open_mcc_mapping_file (FALSE, &translated);
+       if (!file) {
+               g_warning ("Could not open mcc_mapping file");
+               return;
+       }
+
+       /* Get the territory specified for the current locale */
+       territory = nl_langinfo (_NL_ADDRESS_COUNTRY_NAME);
+
+       while (fgets (line, MCC_FILE_MAX_LINE_LEN, file) != NULL) {
+               int mcc;
+               char *country = NULL;
+
+               mcc = parse_mcc_mapping_line (line, &country);
+               if (!country || mcc == 0) {
+                       g_warning ("%s: error parsing line: '%s'", __FUNCTION__, line);
+                       continue;
+               }
+
+               if (mcc == previous_mcc) {
+                       /* g_warning ("already seen: %s", line); */
+                       continue;
+               }
+               previous_mcc = mcc;
+
+               if (!(*locale_mcc)) {
+                       if (translated) {
+                               if (!g_utf8_collate (country, territory))
+                                       *locale_mcc = mcc;
+                       } else {
+                               gchar *translation = dgettext ("osso-countries", country);
+                               if (!g_utf8_collate (translation, territory))
+                                       *locale_mcc = mcc;
+                       }
+               }
+       }
+       fclose (file);
+
+       /* Now we fill the model */
+       file = modest_utils_open_mcc_mapping_file (TRUE, &translated);
+       if (!file) {
+               g_warning ("Could not open mcc_mapping file");
+               return;
+       }
+
+       country_hash = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
+       while (fgets (line, MCC_FILE_MAX_LINE_LEN, file) != NULL) {
+
+               int mcc;
+               char *country = NULL;
+               GtkTreeIter iter;
+               const gchar *name_translated;
+
+               mcc = parse_mcc_mapping_line (line, &country);
+               if (!country || mcc == 0) {
+                       g_warning ("%s: error parsing line: '%s'", __FUNCTION__, line);
+                       continue;
+               }
+
+               if (mcc == previous_mcc ||
+                   g_hash_table_lookup (country_hash, country)) {
+                       g_debug ("already seen: '%s' %d", country, mcc);
+                       continue;
+               }
+               previous_mcc = mcc;
+
+               g_hash_table_insert (country_hash, g_strdup (country), GINT_TO_POINTER (mcc));
+
+               name_translated = dgettext ("osso-countries", country);
+
+               /* Add the row to the model: */
+               gtk_list_store_append (GTK_LIST_STORE (model), &iter);
+               gtk_list_store_set(GTK_LIST_STORE (model), &iter, 
+                                  MODEST_UTILS_COUNTRY_MODEL_COLUMN_MCC, mcc, 
+                                  MODEST_UTILS_COUNTRY_MODEL_COLUMN_NAME, name_translated, 
+                                  -1);
+       }
+
+
+       g_hash_table_unref (country_hash);
+       fclose (file);
+
+       /* Fallback to Finland */
+       if (!(*locale_mcc))
+               *locale_mcc = 244;
+
+       /* Sort the items: */
+       gtk_tree_sortable_set_sort_column_id (GTK_TREE_SORTABLE (model), 
+                                             MODEST_UTILS_COUNTRY_MODEL_COLUMN_NAME, GTK_SORT_ASCENDING);
+}
+
+GList *
+modest_utils_create_notification_list_from_header_list (TnyList *header_list)
+{
+       GList *new_headers_list;
+       TnyIterator *iter;
+
+       g_return_val_if_fail (TNY_IS_LIST (header_list), NULL);
+       g_return_val_if_fail (tny_list_get_length (header_list) > 0, NULL);
+
+       new_headers_list = NULL;
+       iter = tny_list_create_iterator (header_list);
+       while (!tny_iterator_is_done (iter)) {
+               ModestMsgNotificationData *data;
+               TnyHeader *header;
+               TnyFolder *folder;
+
+               header = (TnyHeader *) tny_iterator_get_current (iter);
+               if (header) {
+                       folder = tny_header_get_folder (header);
+
+                       if (folder) {
+                               gchar *uri, *uid;
+
+                               uid = tny_header_dup_uid (header);
+                               uri = g_strdup_printf ("%s/%s",
+                                                      tny_folder_get_url_string (folder),
+                                                      uid);
+                               g_free (uid);
+
+                               /* Create data & add to list */
+                               data = g_slice_new0 (ModestMsgNotificationData);
+                               data->subject = tny_header_dup_subject (header);
+                               data->from = tny_header_dup_from (header);
+                               data->uri = uri;
+
+                               new_headers_list = g_list_append (new_headers_list, data);
+
+                               g_object_unref (folder);
+                       }
+                       g_object_unref (header);
+               }
+               tny_iterator_next (iter);
+       }
+       g_object_unref (iter);
+
+       return new_headers_list;
+}
+
+static void
+free_notification_data (gpointer data,
+                       gpointer user_data)
+{
+       ModestMsgNotificationData *notification_data  = (ModestMsgNotificationData *) data;
+
+       g_free (notification_data->from);
+       g_free (notification_data->subject);
+       g_free (notification_data->uri);
+}
+
+void
+modest_utils_free_notification_list (GList *notification_list)
+{
+       g_return_if_fail (g_list_length (notification_list) > 0);
+
+       g_list_foreach (notification_list, free_notification_data, NULL);
+       g_list_free (notification_list);
+}