+
+gchar *
+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;
+ 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 =
+ modest_text_utils_get_email_address (from);
+ gchar *from_header_email =
+ modest_text_utils_get_email_address (from_header);
+
+ if (from_email && from_header_email) {
+ if (!modest_text_utils_utf8_strcmp (from_header_email, from_email, TRUE)) {
+ account_name = g_strdup (node->data);
+ g_free (from);
+ g_free (from_email);
+ break;
+ }
+ }
+ g_free (from_email);
+ g_free (from_header_email);
+ g_free (from);
+ }
+
+
+ }
+ g_slist_foreach (accounts, (GFunc) g_free, NULL);
+ g_slist_free (accounts);
+
+ return account_name;
+}
+
+void
+modest_utils_on_entry_invalid_character (ModestValidatingEntry *self,
+ const gchar* character,
+ gpointer user_data)
+{
+ gchar *message = NULL;
+ const gchar *show_char = NULL;
+
+ if (character)
+ show_char = character;
+ else {
+ show_char = "' '";
+ }
+
+ message = g_strdup_printf (_CS("ckdg_ib_illegal_characters_entered"), show_char);
+ 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 = setlocale (LC_MESSAGES, NULL);
+ } 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);
+
+ g_slice_free (ModestMsgNotificationData, notification_data);
+}
+
+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);
+}
+
+void
+modest_utils_flush_send_queue (const gchar *account_id)
+{
+ TnyTransportAccount *account;
+
+ /* Get the transport account */
+ account = (TnyTransportAccount *)
+ modest_tny_account_store_get_server_account (modest_runtime_get_account_store (),
+ account_id,
+ TNY_ACCOUNT_TYPE_TRANSPORT);
+ if (account) {
+ ModestMailOperation *wakeup_op;
+ ModestTnySendQueue *send_queue = modest_runtime_get_send_queue (account, TRUE);
+
+ /* Flush it! */
+ wakeup_op = modest_mail_operation_new (NULL);
+ modest_mail_operation_queue_add (modest_runtime_get_mail_operation_queue (),
+ wakeup_op);
+ modest_mail_operation_queue_wakeup (wakeup_op, send_queue);
+
+ g_object_unref (account);
+ }
+}