/* * e-summary-mail.c: Mail summary bit. * * Copyright (C) 2001 Ximian, Inc. * * Authors: Iain Holmes */ #ifdef HAVE_CONFIG_H #include #endif #include #include #include "Mail.h" #include "e-summary.h" #include "e-summary-mail.h" #include #include #include #include #include #include #include #define MAIL_IID "OAFIID:GNOME_Evolution_FolderInfo" struct _ESummaryMail { GNOME_Evolution_FolderInfo folder_info; BonoboListener *listener; GHashTable *folders; GList *shown; ESummaryMailMode mode; char *html; }; typedef struct _ESummaryMailFolder { char *name; char *path; int count; int unread; } ESummaryMailFolder; const char * e_summary_mail_get_html (ESummary *summary) { if (summary->mail == NULL) { return NULL; } return summary->mail->html; } /* Work out what to do with folder names */ static char * make_pretty_foldername (const char *foldername) { char *pretty; if ((pretty = strrchr (foldername, '/'))) { return g_strdup (pretty + 1); } else { return g_strdup (foldername); } } static void folder_gen_html (ESummaryMailFolder *folder, GString *string) { char *str, *pretty_name, *uri; pretty_name = make_pretty_foldername (folder->name); uri = g_strconcat ("evolution:", folder->name, NULL); str = g_strdup_printf ("
%s
%d/%d
", uri, pretty_name, folder->unread, folder->count); g_free (uri); g_string_append (string, str); g_free (pretty_name); g_free (str); } static void e_summary_mail_generate_html (ESummary *summary) { ESummaryMail *mail; GString *string; GList *p; gchar *s; mail = summary->mail; string = g_string_new ("
\"\" "); s = e_utf8_from_locale_string (_("Mail summary")); g_string_append (string, s); g_free (s); g_string_append (string, "
"); for (p = mail->shown; p; p = p->next) { folder_gen_html (p->data, string); } g_string_append (string, "
"); mail->html = string->str; g_string_free (string, FALSE); } static void e_summary_mail_get_info (ESummaryMail *mail, const char *uri, BonoboListener *listener) { Bonobo_Listener corba_listener; CORBA_Environment ev; g_return_if_fail (mail != NULL); g_return_if_fail (mail->folder_info != CORBA_OBJECT_NIL); corba_listener = bonobo_object_corba_objref (BONOBO_OBJECT (listener)); CORBA_exception_init (&ev); GNOME_Evolution_FolderInfo_getInfo (mail->folder_info, uri ? uri : "", corba_listener, &ev); if (BONOBO_EX (&ev)) { g_warning ("Error getting info for %s:\n%s", uri, CORBA_exception_id (&ev)); CORBA_exception_free (&ev); return; } CORBA_exception_free (&ev); return; } static void new_folder_cb (EvolutionStorageListener *listener, const char *path, const GNOME_Evolution_Folder *folder, ESummary *summary) { ESummaryMail *mail; ESummaryMailFolder *mail_folder; GList *p; /* Don't care about non mail */ if (strcmp (folder->type, "mail") != 0 || strncmp (folder->physical_uri, "file://", 7) != 0) { return; } mail = summary->mail; mail_folder = g_new (ESummaryMailFolder, 1); mail_folder->path = g_strdup (folder->physical_uri); mail_folder->name = g_strdup (path); mail_folder->count = -1; mail_folder->unread = -1; g_hash_table_insert (mail->folders, mail_folder->path, mail_folder); /* Are we supposed to display this folder? */ for (p = summary->preferences->display_folders; p; p = p->next) { char *uri; uri = g_strconcat ("file://", p->data, NULL); if (strcmp (uri, mail_folder->path) == 0) { mail->shown = g_list_prepend (mail->shown, mail_folder); } g_free (uri); } e_summary_mail_get_info (mail, mail_folder->path, mail->listener); } static void remove_folder_cb (EvolutionStorageListener *listener, const char *path, ESummary *summary) { ESummaryMail *mail; ESummaryMailFolder *mail_folder; GList *p; mail = summary->mail; mail_folder = g_hash_table_lookup (mail->folders, path); if (mail_folder == NULL) { return; } /* Check if we're displaying it, because we can't display it if it doesn't exist :) */ for (p = mail->shown; p; p = p->next) { if (p->data == mail_folder) { mail->shown = g_list_remove_link (mail->shown, p); g_list_free (p); } } g_hash_table_remove (mail->folders, path); g_free (mail_folder->name); g_free (mail_folder->path); g_free (mail_folder); } static void mail_change_notify (BonoboListener *listener, const char *name, const BonoboArg *arg, CORBA_Environment *ev, ESummary *summary) { GNOME_Evolution_FolderInfo_MessageCount *count; ESummaryMail *mail; ESummaryMailFolder *folder; mail = summary->mail; count = arg->_value; folder = g_hash_table_lookup (mail->folders, count->path); if (folder == NULL) { return; } folder->count = count->count; folder->unread = count->unread; /* Regen HTML */ e_summary_mail_generate_html (summary); e_summary_draw (summary); } static void e_summary_mail_protocol (ESummary *summary, const char *uri, void *closure) { } void e_summary_mail_init (ESummary *summary, GNOME_Evolution_Shell corba_shell) { ESummaryMail *mail; CORBA_Environment ev; GNOME_Evolution_LocalStorage local_storage; EvolutionStorageListener *listener; GNOME_Evolution_StorageListener corba_listener; g_return_if_fail (summary != NULL); g_return_if_fail (IS_E_SUMMARY (summary)); mail = g_new (ESummaryMail, 1); summary->mail = mail; CORBA_exception_init (&ev); mail->folder_info = oaf_activate_from_id (MAIL_IID, 0, NULL, &ev); if (BONOBO_EX (&ev)) { g_warning ("Exception creating FolderInfo: %s", CORBA_exception_id (&ev)); CORBA_exception_free (&ev); g_free (mail); return; } /* Create a hash table for the folders */ mail->folders = g_hash_table_new (g_str_hash, g_str_equal); mail->shown = NULL; /* Create a BonoboListener for all the notifies. */ mail->listener = bonobo_listener_new (NULL, NULL); gtk_signal_connect (GTK_OBJECT (mail->listener), "event-notify", GTK_SIGNAL_FUNC (mail_change_notify), summary); local_storage = GNOME_Evolution_Shell_getLocalStorage (corba_shell, &ev); if (BONOBO_EX (&ev)) { g_warning ("Exception getting local storage: %s", CORBA_exception_id (&ev)); CORBA_exception_free (&ev); g_free (mail); return; } listener = evolution_storage_listener_new (); gtk_signal_connect (GTK_OBJECT (listener), "new-folder", GTK_SIGNAL_FUNC (new_folder_cb), summary); gtk_signal_connect (GTK_OBJECT (listener), "removed-folder", GTK_SIGNAL_FUNC (remove_folder_cb), summary); corba_listener = evolution_storage_listener_corba_objref (listener); GNOME_Evolution_Storage_addListener (local_storage, corba_listener, &ev); if (BONOBO_EX (&ev)) { g_warning ("Exception adding listener: %s", CORBA_exception_id (&ev)); CORBA_exception_free (&ev); g_free (mail); return; } CORBA_exception_free (&ev); e_summary_add_protocol_listener (summary, "mail", e_summary_mail_protocol, mail); return; } static void maybe_add_to_shown (gpointer key, gpointer value, gpointer user_data) { ESummary *summary = user_data; ESummaryMailFolder *folder = value; ESummaryMail *mail = summary->mail; GList *p; /* Are we supposed to display this folder? */ for (p = summary->preferences->display_folders; p; p = p->next) { char *uri; uri = g_strconcat ("file://", p->data, NULL); if (strcmp (uri, folder->path) == 0) { mail->shown = g_list_prepend (mail->shown, folder); } g_free (uri); } } void e_summary_mail_reconfigure (ESummary *summary) { ESummaryMail *mail; GList *old; g_return_if_fail (summary != NULL); g_return_if_fail (IS_E_SUMMARY (summary)); mail = summary->mail; old = mail->shown; mail->shown = NULL; g_hash_table_foreach (mail->folders, maybe_add_to_shown, summary); e_summary_mail_generate_html (summary); /* Free the old list */ g_list_free (old); e_summary_draw (summary); } static void free_row_data (gpointer data) { ESummaryMailRowData *rd = data; g_free (rd->name); g_free (rd->uri); g_free (rd); } static void hash_to_list (gpointer key, gpointer value, gpointer data) { ESummaryMailRowData *rd; ESummaryMailFolder *folder; GList **p; p = (GList **) data; folder = (ESummaryMailFolder *) value; rd = g_new (ESummaryMailRowData, 1); rd->name = g_strdup (folder->name); rd->uri = g_strdup (key); *p = g_list_prepend (*p, rd); } static int str_compare (gconstpointer a, gconstpointer b) { ESummaryMailRowData *rda, *rdb; rda = a; rdb = b; return strcmp (rda->name, rdb->name); } void e_summary_mail_fill_list (GtkCList *clist, ESummary *summary) { ESummaryMail *mail; GList *names = NULL, *p; mail = summary->mail; if (mail == NULL) { return; } g_hash_table_foreach (mail->folders, hash_to_list, &names); names = g_list_sort (names, str_compare); for (p = names; p; p = p->next) { ESummaryMailRowData *rd; char *text[1]; int row; rd = p->data; text[0] = rd->name + 1; row = gtk_clist_append (clist, text); gtk_clist_set_row_data_full (clist, row, rd, free_row_data); } g_list_free (names); } const char * e_summary_mail_uri_to_name (ESummary *summary, const char *uri) { ESummaryMailFolder *folder; folder = g_hash_table_lookup (summary->mail->folders, uri); if (folder == NULL) { return NULL; } else { return folder->name; } } static void free_folder (gpointer key, gpointer value, gpointer data) { ESummaryMailFolder *folder = value; g_free (folder->name); g_free (folder->path); g_free (folder); } void e_summary_mail_free (ESummary *summary) { ESummaryMail *mail; g_return_if_fail (summary != NULL); g_return_if_fail (IS_E_SUMMARY (summary)); mail = summary->mail; bonobo_object_release_unref (mail->folder_info, NULL); bonobo_object_unref (BONOBO_OBJECT (mail->listener)); g_hash_table_foreach (mail->folders, free_folder, NULL); g_hash_table_destroy (mail->folders); g_free (mail->html); g_free (mail); summary->mail = NULL; }