/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */ /* e-msg-composer.c * * Copyright (C) 1999 Helix Code, Inc. * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License as * published by the Free Software Foundation; either version 2 of the * License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public * License along with this program; if not, write to the * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307, USA. * * Authors: Ettore Perazzoli, Jeffrey Stedfast */ /* TODO - Somehow users should be able to see if any file(s) are attached even when the attachment bar is not shown. */ #ifdef HAVE_CONFIG_H #include #endif #include #include #include #include #include #include #include #include "camel/camel.h" #include "mail/mail.h" #include "mail/mail-tools.h" #include "mail/mail-threads.h" #include "e-util/e-html-utils.h" #include #include #include "e-msg-composer.h" #include "e-msg-composer-attachment-bar.h" #include "e-msg-composer-hdrs.h" #include "e-msg-composer-select-file.h" #include "HTMLEditor.h" #include "listener.h" #define HTML_EDITOR_CONTROL_ID "OAFIID:control:html-editor:63c5499b-8b0c-475a-9948-81ec96a9662c" #define DEFAULT_WIDTH 600 #define DEFAULT_HEIGHT 500 enum { SEND, POSTPONE, LAST_SIGNAL }; static guint signals[LAST_SIGNAL] = { 0 }; static GnomeAppClass *parent_class = NULL; /* local prototypes */ static GList *add_recipients (GList *list, const char *recips, gboolean decode); static void free_recipients (GList *list); static void handle_multipart (EMsgComposer *composer, CamelMultipart *multipart, int depth); static char * get_text (Bonobo_PersistStream persist, char *format) { BonoboStream *stream; BonoboStreamMem *stream_mem; CORBA_Environment ev; char *text; CORBA_exception_init (&ev); stream = bonobo_stream_mem_create (NULL, 0, FALSE, TRUE); Bonobo_PersistStream_save (persist, (Bonobo_Stream)bonobo_object_corba_objref (BONOBO_OBJECT (stream)), format, &ev); if (ev._major != CORBA_NO_EXCEPTION) { g_warning ("Exception getting mail '%s'", bonobo_exception_get_text (&ev)); return NULL; } CORBA_exception_free (&ev); stream_mem = BONOBO_STREAM_MEM (stream); text = g_malloc (stream_mem->pos + 1); memcpy (text, stream_mem->buffer, stream_mem->pos); text[stream_mem->pos] = 0; bonobo_object_unref (BONOBO_OBJECT(stream)); return text; } #define LINE_LEN 72 typedef enum { MSG_FORMAT_PLAIN, MSG_FORMAT_ALTERNATIVE, } MsgFormat; static gboolean is_8bit (const guchar *text) { guchar *c; for (c = (guchar *) text; *c; c++) if (*c > (guchar) 127) return TRUE; return FALSE; } static int best_encoding (const guchar *text) { guchar *ch; int count = 0; int total; for (ch = (guchar *) text; *ch; ch++) if (*ch > (guchar) 127) count++; total = (int) (ch - text); if ((float) count <= total * 0.17) return CAMEL_MIME_PART_ENCODING_QUOTEDPRINTABLE; else return CAMEL_MIME_PART_ENCODING_BASE64; } /* This functions builds a CamelMimeMessage for the message that the user has composed in `composer'. */ static CamelMimeMessage * build_message (EMsgComposer *composer) { EMsgComposerAttachmentBar *attachment_bar = E_MSG_COMPOSER_ATTACHMENT_BAR (composer->attachment_bar); MsgFormat type = MSG_FORMAT_ALTERNATIVE; CamelMimeMessage *new; CamelMultipart *body = NULL; CamelMimePart *part; gchar *from = NULL; gboolean e8bit; char *html = NULL, *plain = NULL; int i; if (composer->persist_stream_interface == CORBA_OBJECT_NIL) return NULL; if (composer->send_html) type = MSG_FORMAT_ALTERNATIVE; else type = MSG_FORMAT_PLAIN; /* get and/or set the From field */ from = e_msg_composer_hdrs_get_from (E_MSG_COMPOSER_HDRS (composer->hdrs)); if (!from) { const MailConfigIdentity *id = NULL; CamelInternetAddress *ciaddr; id = mail_config_get_default_identity (); ciaddr = camel_internet_address_new (); camel_internet_address_add (ciaddr, id->name, id->address); from = camel_address_encode (CAMEL_ADDRESS (ciaddr)); e_msg_composer_hdrs_set_from (E_MSG_COMPOSER_HDRS (composer->hdrs), from); camel_object_unref (CAMEL_OBJECT (ciaddr)); } g_free (from); new = camel_mime_message_new (); e_msg_composer_hdrs_to_message (E_MSG_COMPOSER_HDRS (composer->hdrs), new); for (i = 0; i < composer->extra_hdr_names->len; i++) { camel_medium_add_header (CAMEL_MEDIUM (new), composer->extra_hdr_names->pdata[i], composer->extra_hdr_values->pdata[i]); } plain = get_text (composer->persist_stream_interface, "text/plain"); /* the component has probably died */ if (plain == NULL) return NULL; e8bit = is_8bit (plain); if (type != MSG_FORMAT_PLAIN) { html = get_text (composer->persist_stream_interface, "text/html"); /* the component has probably died */ if (html == NULL) { g_free (plain); return NULL; } } if (type == MSG_FORMAT_ALTERNATIVE) { body = camel_multipart_new (); camel_data_wrapper_set_mime_type (CAMEL_DATA_WRAPPER (body), "multipart/alternative"); camel_multipart_set_boundary (body, NULL); part = camel_mime_part_new (); camel_mime_part_set_content (part, plain, strlen (plain), "text/plain"); if (e8bit) camel_mime_part_set_encoding (part, best_encoding (plain)); g_free (plain); camel_multipart_add_part (body, part); camel_object_unref (CAMEL_OBJECT (part)); part = camel_mime_part_new (); camel_mime_part_set_content (part, html, strlen (html), "text/html"); g_free (html); camel_multipart_add_part (body, part); camel_object_unref (CAMEL_OBJECT (part)); } if (e_msg_composer_attachment_bar_get_num_attachments (attachment_bar)) { CamelMultipart *multipart = camel_multipart_new (); /* Generate a random boundary. */ camel_multipart_set_boundary (multipart, NULL); part = camel_mime_part_new (); switch (type) { case MSG_FORMAT_ALTERNATIVE: camel_medium_set_content_object (CAMEL_MEDIUM (part), CAMEL_DATA_WRAPPER (body)); camel_object_unref (CAMEL_OBJECT (body)); break; case MSG_FORMAT_PLAIN: camel_mime_part_set_content (part, plain, strlen (plain), "text/plain"); if (e8bit) camel_mime_part_set_encoding (part, best_encoding (plain)); g_free (plain); break; } camel_multipart_add_part (multipart, part); camel_object_unref (CAMEL_OBJECT (part)); e_msg_composer_attachment_bar_to_multipart (attachment_bar, multipart); camel_medium_set_content_object (CAMEL_MEDIUM (new), CAMEL_DATA_WRAPPER (multipart)); camel_object_unref (CAMEL_OBJECT (multipart)); } else { switch (type) { case MSG_FORMAT_ALTERNATIVE: camel_medium_set_content_object (CAMEL_MEDIUM (new), CAMEL_DATA_WRAPPER (body)); camel_object_unref (CAMEL_OBJECT (body)); break; case MSG_FORMAT_PLAIN: camel_mime_part_set_content (CAMEL_MIME_PART (new), plain, strlen (plain), "text/plain"); if (e8bit) camel_mime_part_set_encoding (CAMEL_MIME_PART (new), best_encoding (plain)); g_free (plain); break; } } return new; } static char * get_signature (const char *sigfile) { GString *rawsig; char buf[1024]; char *htmlsig = NULL; int fd, n; if (!sigfile || !*sigfile) { return NULL; } fd = open (sigfile, O_RDONLY); if (fd == -1) { char *msg; msg = g_strdup_printf (_("Could not open signature file %s:\n" "%s"), sigfile, g_strerror (errno)); gnome_error_dialog (msg); g_free (msg); return NULL; } rawsig = g_string_new (""); while ((n = read (fd, buf, 1023)) > 0) { buf[n] = '\0'; g_string_append (rawsig, buf); } close (fd); htmlsig = e_text_to_html (rawsig->str, 0); g_string_free (rawsig, TRUE); return htmlsig; } static void prepare_engine (EMsgComposer *composer) { CORBA_Environment ev; g_assert (composer); g_assert (E_IS_MSG_COMPOSER (composer)); /* printf ("prepare_engine\n"); */ CORBA_exception_init (&ev); composer->editor_engine = (HTMLEditor_Engine) bonobo_object_client_query_interface (bonobo_widget_get_server (BONOBO_WIDGET (composer->editor)), "IDL:HTMLEditor/Engine:1.0", &ev); if (composer->editor_engine != CORBA_OBJECT_NIL) { /* printf ("trying set listener\n"); */ composer->editor_listener = BONOBO_OBJECT (html_editor_listener_new (composer)); if (composer->editor_listener != CORBA_OBJECT_NIL) HTMLEditor_Engine__set_listener (composer->editor_engine, (HTMLEditor_Listener) bonobo_object_dup_ref (bonobo_object_corba_objref (composer->editor_listener), &ev), &ev); } CORBA_exception_free (&ev); } static void mark_orig_text (EMsgComposer *composer) { g_assert (composer); g_assert (E_IS_MSG_COMPOSER (composer)); if (composer->editor_engine != CORBA_OBJECT_NIL) { CORBA_Environment ev; CORBA_any *flag = bonobo_arg_new (TC_boolean); *((CORBA_boolean *) flag->_value) = CORBA_TRUE; CORBA_exception_init (&ev); HTMLEditor_Engine_set_object_data_by_type (composer->editor_engine, "ClueFlow", "orig", flag, &ev); CORBA_free (flag); CORBA_exception_free (&ev); } } static void set_editor_text (EMsgComposer *composer, const char *sig_file, const char *text) { Bonobo_PersistStream persist; BonoboStream *stream; BonoboWidget *editor; CORBA_Environment ev; char *sig, *fulltext; editor = BONOBO_WIDGET (composer->editor); sig = get_signature (sig_file); if (sig) { if (!strncmp ("-- \n", sig, 3)) fulltext = g_strdup_printf ("%s
\n
\n%s
", text, sig); else fulltext = g_strdup_printf ("%s
\n
\n-- \n%s
", text, sig); } else { if (!*text) return; fulltext = (char*)text; } CORBA_exception_init (&ev); persist = (Bonobo_PersistStream) bonobo_object_client_query_interface ( bonobo_widget_get_server (editor), "IDL:Bonobo/PersistStream:1.0", &ev); g_assert (persist != CORBA_OBJECT_NIL); stream = bonobo_stream_mem_create (fulltext, strlen (fulltext), TRUE, FALSE); if (sig) g_free (fulltext); Bonobo_PersistStream_load (persist, (Bonobo_Stream)bonobo_object_corba_objref (BONOBO_OBJECT (stream)), "text/html", &ev); if (ev._major != CORBA_NO_EXCEPTION) { /* FIXME. Some error message. */ return; } if (ev._major != CORBA_SYSTEM_EXCEPTION) CORBA_Object_release (persist, &ev); Bonobo_Unknown_unref (persist, &ev); CORBA_exception_free (&ev); bonobo_object_unref (BONOBO_OBJECT(stream)); mark_orig_text (composer); } /* Commands. */ static void show_attachments (EMsgComposer *composer, gboolean show) { if (show) { gtk_widget_show (composer->attachment_scroll_frame); gtk_widget_show (composer->attachment_bar); } else { gtk_widget_hide (composer->attachment_scroll_frame); gtk_widget_hide (composer->attachment_bar); } composer->attachment_bar_visible = show; /* Update the GUI. */ #if 0 gtk_check_menu_item_set_active (GTK_CHECK_MENU_ITEM (glade_xml_get_widget (composer->menubar_gui, "menu_view_attachments")), show); #endif /* XXX we should update the toggle toolbar item as well. At this point, it is not a toggle because Glade is broken. */ } static void save (EMsgComposer *composer, const char *file_name) { CORBA_Environment ev; char *my_file_name; if (file_name != NULL) my_file_name = g_strdup (file_name); else my_file_name = e_msg_composer_select_file (composer, _("Save as...")); if (my_file_name == NULL) return; CORBA_exception_init (&ev); Bonobo_PersistFile_save (composer->persist_file_interface, my_file_name, &ev); if (ev._major != CORBA_NO_EXCEPTION) { e_notice (GTK_WINDOW (composer), GNOME_MESSAGE_BOX_ERROR, _("Error saving file: %s"), g_basename (file_name)); } CORBA_exception_free (&ev); g_free (my_file_name); } static void load (EMsgComposer *composer, const char *file_name) { CORBA_Environment ev; CORBA_exception_init (&ev); Bonobo_PersistFile_load (composer->persist_file_interface, file_name, &ev); if (ev._major != CORBA_NO_EXCEPTION) e_notice (GTK_WINDOW (composer), GNOME_MESSAGE_BOX_ERROR, _("Error loading file: %s"), g_basename (file_name)); CORBA_exception_free (&ev); } /* Exit dialog. (Displays a "Save composition to 'Drafts' before exiting?" warning before actually exiting.) */ enum { REPLY_YES = 0, REPLY_NO, REPLY_CANCEL }; typedef struct save_draft_input_s { EMsgComposer *composer; } save_draft_input_t; typedef struct save_draft_data_s { CamelMimeMessage *msg; CamelMessageInfo *info; } save_draft_data_t; static gchar * describe_save_draft (gpointer in_data, gboolean gerund) { if (gerund) { return g_strdup (_("Saving changes to message...")); } else { return g_strdup (_("Save changes to message...")); } } static void setup_save_draft (gpointer in_data, gpointer op_data, CamelException *ex) { save_draft_input_t *input = (save_draft_input_t *) in_data; save_draft_data_t *data = (save_draft_data_t *) op_data; g_return_if_fail (input->composer != NULL); /* initialize op_data */ input->composer->send_html = TRUE; /* always save drafts as HTML to keep formatting */ data->msg = e_msg_composer_get_message (input->composer); data->info = g_new0 (CamelMessageInfo, 1); data->info->flags = CAMEL_MESSAGE_DRAFT; } static void do_save_draft (gpointer in_data, gpointer op_data, CamelException *ex) { /*save_draft_input_t *input = (save_draft_input_t *) in_data;*/ save_draft_data_t *data = (save_draft_data_t *) op_data; extern CamelFolder *drafts_folder; /* perform camel operations */ mail_tool_camel_lock_up (); camel_folder_append_message (drafts_folder, data->msg, data->info, ex); mail_tool_camel_lock_down (); } static void cleanup_save_draft (gpointer in_data, gpointer op_data, CamelException *ex) { save_draft_input_t *input = (save_draft_input_t *) in_data; /*save_draft_data_t *data = (save_draft_data_t *) op_data;*/ if (camel_exception_is_set (ex)) { char *reason; reason = g_strdup_printf (_("Error saving composition to 'Drafts': %s"), camel_exception_get_description (ex)); gnome_warning_dialog_parented (reason, GTK_WINDOW (input->composer)); g_free (reason); } else { gtk_widget_destroy (GTK_WIDGET (input->composer)); } } static const mail_operation_spec op_save_draft = { describe_save_draft, sizeof (save_draft_data_t), setup_save_draft, do_save_draft, cleanup_save_draft }; static void exit_dialog_cb (int reply, EMsgComposer *composer) { save_draft_input_t *input; switch (reply) { case REPLY_YES: /* this has to be done async */ input = g_new0 (save_draft_input_t, 1); input->composer = composer; mail_operation_queue (&op_save_draft, input, TRUE); case REPLY_NO: gtk_widget_destroy (GTK_WIDGET (composer)); break; case REPLY_CANCEL: default: } } static void do_exit (EMsgComposer *composer) { GtkWidget *dialog; GtkWidget *label; gint button; dialog = gnome_dialog_new (_("Evolution"), GNOME_STOCK_BUTTON_YES, /* Save */ GNOME_STOCK_BUTTON_NO, /* Don't save */ GNOME_STOCK_BUTTON_CANCEL, /* Cancel */ NULL); label = gtk_label_new (_("This message has not been sent.\n\nDo you wish to save your changes?")); gtk_box_pack_start (GTK_BOX (GNOME_DIALOG (dialog)->vbox), label, TRUE, TRUE, 0); gtk_widget_show (label); gnome_dialog_set_parent (GNOME_DIALOG (dialog), GTK_WINDOW (composer)); gnome_dialog_set_default (GNOME_DIALOG (dialog), 0); button = gnome_dialog_run_and_close (GNOME_DIALOG (dialog)); exit_dialog_cb (button, composer); } /* Menu callbacks. */ static void menu_file_open_cb (BonoboUIComponent *uic, void *data, const char *path) { EMsgComposer *composer; char *file_name; composer = E_MSG_COMPOSER (data); file_name = e_msg_composer_select_file (composer, _("Open file")); if (file_name == NULL) return; load (composer, file_name); g_free (file_name); } static void menu_file_save_cb (BonoboUIComponent *uic, void *data, const char *path) { EMsgComposer *composer; CORBA_char *file_name; CORBA_Environment ev; composer = E_MSG_COMPOSER (data); CORBA_exception_init (&ev); file_name = Bonobo_PersistFile_get_current_file (composer->persist_file_interface, &ev); if (ev._major != CORBA_NO_EXCEPTION) { save (composer, NULL); } else { save (composer, file_name); CORBA_free (file_name); } CORBA_exception_free (&ev); } static void menu_file_save_as_cb (BonoboUIComponent *uic, void *data, const char *path) { EMsgComposer *composer; composer = E_MSG_COMPOSER (data); save (composer, NULL); } static void menu_file_send_cb (BonoboUIComponent *uic, void *data, const char *path) { gtk_signal_emit (GTK_OBJECT (data), signals[SEND]); } static void menu_file_send_later_cb (BonoboUIComponent *uic, void *data, const char *path) { gtk_signal_emit (GTK_OBJECT (data), signals[POSTPONE]); } static void menu_file_close_cb (BonoboUIComponent *uic, void *data, const char *path) { EMsgComposer *composer; composer = E_MSG_COMPOSER (data); do_exit (composer); } static void menu_file_add_attachment_cb (BonoboUIComponent *uic, void *data, const char *path) { EMsgComposer *composer; composer = E_MSG_COMPOSER (data); e_msg_composer_attachment_bar_attach (E_MSG_COMPOSER_ATTACHMENT_BAR (composer->attachment_bar), NULL); } static void menu_view_attachments_activate_cb (BonoboUIComponent *component, const char *path, Bonobo_UIComponent_EventType type, const char *state, gpointer user_data) { gboolean new_state; if (type != Bonobo_UIComponent_STATE_CHANGED) return; new_state = atoi (state); e_msg_composer_show_attachments (E_MSG_COMPOSER (user_data), new_state); } #if 0 static void insert_file_ok_cb (GtkWidget *widget, void *user_data) { GtkFileSelection *fs; GdkAtom selection_atom = GDK_NONE; char *name; EMsgComposer *composer; struct stat sb; int fd; guint8 *buffer; size_t bufsz, actual; fs = GTK_FILE_SELECTION (gtk_widget_get_ancestor (widget, GTK_TYPE_FILE_SELECTION)); composer = E_MSG_COMPOSER (user_data); name = gtk_file_selection_get_filename (fs); if (stat (name, &sb) < 0) { GtkWidget *dlg; dlg = gnome_error_dialog_parented( _("That file does not exist."), GTK_WINDOW (fs)); gnome_dialog_run_and_close (GNOME_DIALOG (dlg)); gtk_widget_destroy (GTK_WIDGET (dlg)); return; } if (!(S_ISREG (sb.st_mode))) { GtkWidget *dlg; dlg = gnome_error_dialog_parented (_("That is not a regular file."), GTK_WINDOW (fs)); gnome_dialog_run_and_close (GNOME_DIALOG (dlg)); gtk_widget_destroy (GTK_WIDGET (dlg)); return; } if (access (name, R_OK) != 0) { GtkWidget *dlg; dlg = gnome_error_dialog_parented (_("That file exists but is not readable."), GTK_WINDOW (fs)); gnome_dialog_run_and_close (GNOME_DIALOG (dlg)); gtk_widget_destroy (GTK_WIDGET (dlg)); return; } if ((fd = open (name, O_RDONLY)) < 0) { GtkWidget *dlg; dlg = gnome_error_dialog_parented (_("That file appeared accesible but open(2) failed."), GTK_WINDOW (fs)); gnome_dialog_run_and_close (GNOME_DIALOG (dlg)); gtk_widget_destroy (GTK_WIDGET (dlg)); return; } buffer = NULL; bufsz = 0; actual = 0; #define CHUNK 5120 while (TRUE) { ssize_t chunk; if (bufsz - actual < CHUNK) { bufsz += CHUNK; if (bufsz >= 102400) { GtkWidget *dlg; gint result; dlg = gnome_dialog_new (_("The file is very large (more than 100K).\n" "Are you sure you wish to insert it?"), GNOME_STOCK_BUTTON_YES, GNOME_STOCK_BUTTON_NO, NULL); gnome_dialog_set_parent (GNOME_DIALOG (dlg), GTK_WINDOW (fs)); result = gnome_dialog_run_and_close (GNOME_DIALOG (dlg)); gtk_widget_destroy (GTK_WIDGET (dlg)); if (result == 1) goto cleanup; } buffer = g_realloc (buffer, bufsz * sizeof (guint8)); } chunk = read (fd, &(buffer[actual]), CHUNK); if (chunk < 0) { GtkWidget *dlg; dlg = gnome_error_dialog_parented (_("An error occurred while reading the file."), GTK_WINDOW (fs)); gnome_dialog_run_and_close (GNOME_DIALOG (dlg)); gtk_widget_destroy (GTK_WIDGET (dlg)); goto cleanup; } if (chunk == 0) break; actual += chunk; } buffer[actual] = '\0'; if (selection_atom == GDK_NONE) selection_atom = gdk_atom_intern ("TEMP_PASTE", FALSE); gtk_object_set_data (GTK_OBJECT (fs), "ev_file_buffer", buffer); gtk_selection_owner_set (GTK_WIDGET (fs), selection_atom, GDK_CURRENT_TIME); /*gtk_html_paste (composer->send_html);*/ cleanup: close (fd); g_free (buffer); gtk_widget_destroy (GTK_WIDGET (fs)); } static void fs_selection_get (GtkWidget *widget, GtkSelectionData *sdata, guint info, guint time) { gchar *buffer; GdkAtom encoding; gint format; guchar *ctext; gint length; buffer = gtk_object_get_data (GTK_OBJECT (widget), "ev_file_buffer"); if (gdk_string_to_compound_text (buffer, &encoding, &format, &ctext, &length) == Success) gtk_selection_data_set (sdata, encoding, format, ctext, length); g_free (buffer); gtk_object_remove_data (GTK_OBJECT (widget), "ev_file_buffer"); } #endif static void menu_file_insert_file_cb (BonoboUIComponent *uic, void *data, const char *path) { #if 0 EMsgComposer *composer; GtkFileSelection *fs; composer = E_MSG_COMPOSER (data); fs = GTK_FILE_SELECTION (gtk_file_selection_new ("Choose File")); /* FIXME: remember the location or something */ /*gtk_file_selection_set_filename( fs, g_get_home_dir() );*/ gtk_signal_connect (GTK_OBJECT (fs->ok_button), "clicked", GTK_SIGNAL_FUNC (insert_file_ok_cb), data); gtk_signal_connect_object (GTK_OBJECT (fs->cancel_button), "clicked", GTK_SIGNAL_FUNC (gtk_widget_destroy), GTK_OBJECT (fs)); gtk_widget_show (GTK_WIDGET(fs)); #else g_message ("Insert file is unimplemented! oh no!"); #endif } static void menu_format_html_cb (BonoboUIComponent *component, const char *path, Bonobo_UIComponent_EventType type, const char *state, gpointer user_data) { EMsgComposer *composer; gboolean new_state; if (type != Bonobo_UIComponent_STATE_CHANGED) return; composer = E_MSG_COMPOSER (user_data); new_state = atoi (state); if ((new_state && composer->send_html) || (! new_state && ! composer->send_html)) return; e_msg_composer_set_send_html (composer, new_state); } static BonoboUIVerb verbs [] = { BONOBO_UI_UNSAFE_VERB ("FileOpen", menu_file_open_cb), BONOBO_UI_UNSAFE_VERB ("FileSave", menu_file_save_cb), BONOBO_UI_UNSAFE_VERB ("FileSaveAs", menu_file_save_as_cb), BONOBO_UI_UNSAFE_VERB ("FileClose", menu_file_close_cb), BONOBO_UI_UNSAFE_VERB ("FileInsertFile", menu_file_insert_file_cb), BONOBO_UI_UNSAFE_VERB ("FileAttach", menu_file_add_attachment_cb), BONOBO_UI_UNSAFE_VERB ("FileSend", menu_file_send_cb), BONOBO_UI_UNSAFE_VERB ("FileSendLater", menu_file_send_later_cb), BONOBO_UI_VERB_END }; static void setup_ui (EMsgComposer *composer) { BonoboUIContainer *container; container = bonobo_ui_container_new (); bonobo_ui_container_set_win (container, BONOBO_WIN (composer)); composer->uic = bonobo_ui_component_new ("evolution-message-composer"); bonobo_ui_component_set_container ( composer->uic, bonobo_object_corba_objref (BONOBO_OBJECT (container))); bonobo_ui_component_add_verb_list_with_data ( composer->uic, verbs, composer); bonobo_ui_util_set_ui (composer->uic, EVOLUTION_DATADIR, "evolution-message-composer.xml", "evolution-message-composer"); bonobo_ui_component_set_prop (composer->uic, "/commands/FormatHtml", "state", composer->send_html ? "1" : "0", NULL); bonobo_ui_component_add_listener ( composer->uic, "FormatHtml", menu_format_html_cb, composer); bonobo_ui_component_add_listener ( composer->uic, "ViewAttach", menu_view_attachments_activate_cb, composer); } /* Miscellaneous callbacks. */ static void attachment_bar_changed_cb (EMsgComposerAttachmentBar *bar, void *data) { EMsgComposer *composer; composer = E_MSG_COMPOSER (data); if (e_msg_composer_attachment_bar_get_num_attachments (bar) > 0) e_msg_composer_show_attachments (composer, TRUE); else e_msg_composer_show_attachments (composer, FALSE); } /* GtkObject methods. */ static void destroy (GtkObject *object) { EMsgComposer *composer; CORBA_Environment ev; composer = E_MSG_COMPOSER (object); if (composer->uic) bonobo_object_unref (BONOBO_OBJECT (composer->uic)); composer->uic = NULL; /* FIXME? I assume the Bonobo widget will get destroyed normally? */ if (composer->address_dialog != NULL) gtk_widget_destroy (composer->address_dialog); if (composer->hdrs != NULL) gtk_widget_destroy (composer->hdrs); if (composer->extra_hdr_names) { int i; for (i = 0; i < composer->extra_hdr_names->len; i++) { g_free (composer->extra_hdr_names->pdata[i]); g_free (composer->extra_hdr_values->pdata[i]); } g_ptr_array_free (composer->extra_hdr_names, TRUE); g_ptr_array_free (composer->extra_hdr_values, TRUE); } CORBA_exception_init (&ev); if (composer->persist_stream_interface != CORBA_OBJECT_NIL) { Bonobo_Unknown_unref (composer->persist_stream_interface, &ev); CORBA_Object_release (composer->persist_stream_interface, &ev); } if (composer->persist_file_interface != CORBA_OBJECT_NIL) { Bonobo_Unknown_unref (composer->persist_file_interface, &ev); CORBA_Object_release (composer->persist_file_interface, &ev); } if (composer->editor_engine != CORBA_OBJECT_NIL) { Bonobo_Unknown_unref (composer->editor_engine, &ev); CORBA_Object_release (composer->editor_engine, &ev); } CORBA_exception_free (&ev); if (composer->editor_listener) bonobo_object_unref (composer->editor_listener); if (GTK_OBJECT_CLASS (parent_class)->destroy != NULL) (* GTK_OBJECT_CLASS (parent_class)->destroy) (object); } /* GtkWidget methods. */ static int delete_event (GtkWidget *widget, GdkEventAny *event) { do_exit (E_MSG_COMPOSER (widget)); return TRUE; } static void drag_data_received (EMsgComposer *composer, GdkDragContext *context, gint x, gint y, GtkSelectionData *selection, guint info, guint time) { gchar *temp, *filename; filename = g_strdup (selection->data); temp = strchr (filename, '\n'); if (temp) { if (*(temp - 1) == '\r') *(temp - 1) = '\0'; *temp = '\0'; } /* Chop the file: part off */ if (strncasecmp (filename, "file:", 5) == 0) { temp = g_strdup (filename + 5); g_free (filename); filename = temp; } e_msg_composer_attachment_bar_attach (E_MSG_COMPOSER_ATTACHMENT_BAR (composer->attachment_bar), filename); g_free (filename); } static void class_init (EMsgComposerClass *klass) { GtkObjectClass *object_class; GtkWidgetClass *widget_class; object_class = GTK_OBJECT_CLASS (klass); widget_class = GTK_WIDGET_CLASS (klass); object_class->destroy = destroy; widget_class->delete_event = delete_event; parent_class = gtk_type_class (bonobo_win_get_type ()); signals[SEND] = gtk_signal_new ("send", GTK_RUN_LAST, object_class->type, GTK_SIGNAL_OFFSET (EMsgComposerClass, send), gtk_marshal_NONE__NONE, GTK_TYPE_NONE, 0); signals[POSTPONE] = gtk_signal_new ("postpone", GTK_RUN_LAST, object_class->type, GTK_SIGNAL_OFFSET (EMsgComposerClass, postpone), gtk_marshal_NONE__NONE, GTK_TYPE_NONE, 0); gtk_object_class_add_signals (object_class, signals, LAST_SIGNAL); } static void init (EMsgComposer *composer) { composer->uic = NULL; composer->hdrs = NULL; composer->extra_hdr_names = g_ptr_array_new (); composer->extra_hdr_values = g_ptr_array_new (); composer->editor = NULL; composer->address_dialog = NULL; composer->attachment_bar = NULL; composer->attachment_scroll_frame = NULL; composer->persist_file_interface = CORBA_OBJECT_NIL; composer->persist_stream_interface = CORBA_OBJECT_NIL; composer->editor_engine = CORBA_OBJECT_NIL; composer->attachment_bar_visible = FALSE; composer->send_html = FALSE; } GtkType e_msg_composer_get_type (void) { static GtkType type = 0; if (type == 0) { static const GtkTypeInfo info = { "EMsgComposer", sizeof (EMsgComposer), sizeof (EMsgComposerClass), (GtkClassInitFunc) class_init, (GtkObjectInitFunc) init, /* reserved_1 */ NULL, /* reserved_2 */ NULL, (GtkClassInitFunc) NULL, }; type = gtk_type_unique (bonobo_win_get_type (), &info); } return type; } /** * e_msg_composer_construct: * @composer: A message composer widget * * Construct @composer. **/ void e_msg_composer_construct (EMsgComposer *composer) { GtkWidget *vbox; BonoboObject *editor_server; static GtkTargetEntry drop_types[] = { {"text/uri-list", 0, 1} }; g_return_if_fail (gtk_main_level () > 0); gtk_window_set_default_size (GTK_WINDOW (composer), DEFAULT_WIDTH, DEFAULT_HEIGHT); bonobo_win_construct (BONOBO_WIN (composer), "e-msg-composer", _("Compose a message")); /* DND support */ gtk_drag_dest_set (GTK_WIDGET (composer), GTK_DEST_DEFAULT_ALL, drop_types, 1, GDK_ACTION_COPY); gtk_signal_connect (GTK_OBJECT (composer), "drag_data_received", GTK_SIGNAL_FUNC (drag_data_received), NULL); setup_ui (composer); vbox = gtk_vbox_new (FALSE, 0); composer->hdrs = e_msg_composer_hdrs_new (); gtk_box_pack_start (GTK_BOX (vbox), composer->hdrs, FALSE, FALSE, 0); gtk_widget_show (composer->hdrs); /* Editor component. */ composer->editor = bonobo_widget_new_control ( HTML_EDITOR_CONTROL_ID, bonobo_ui_component_get_container (composer->uic)); if (!composer->editor) return; editor_server = BONOBO_OBJECT (bonobo_widget_get_server (BONOBO_WIDGET (composer->editor))); composer->persist_file_interface = bonobo_object_query_interface (editor_server, "IDL:Bonobo/PersistFile:1.0"); composer->persist_stream_interface = bonobo_object_query_interface (editor_server, "IDL:Bonobo/PersistStream:1.0"); gtk_widget_show (composer->editor); gtk_box_pack_start (GTK_BOX (vbox), composer->editor, TRUE, TRUE, 0); gtk_widget_show (composer->editor); /* Attachment editor, wrapped into an EScrollFrame. We don't show it for now. */ composer->attachment_scroll_frame = e_scroll_frame_new (NULL, NULL); e_scroll_frame_set_shadow_type (E_SCROLL_FRAME (composer->attachment_scroll_frame), GTK_SHADOW_IN); e_scroll_frame_set_policy (E_SCROLL_FRAME (composer->attachment_scroll_frame), GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC); composer->attachment_bar = e_msg_composer_attachment_bar_new (NULL); GTK_WIDGET_SET_FLAGS (composer->attachment_bar, GTK_CAN_FOCUS); gtk_container_add (GTK_CONTAINER (composer->attachment_scroll_frame), composer->attachment_bar); gtk_box_pack_start (GTK_BOX (vbox), composer->attachment_scroll_frame, FALSE, FALSE, GNOME_PAD_SMALL); gtk_signal_connect (GTK_OBJECT (composer->attachment_bar), "changed", GTK_SIGNAL_FUNC (attachment_bar_changed_cb), composer); bonobo_win_set_contents (BONOBO_WIN (composer), vbox); gtk_widget_show (vbox); e_msg_composer_show_attachments (composer, FALSE); /* Set focus on the `To:' field. */ gtk_widget_grab_focus (e_msg_composer_hdrs_get_to_entry (E_MSG_COMPOSER_HDRS (composer->hdrs))); } static EMsgComposer * create_composer (void) { EMsgComposer *new; new = gtk_type_new (E_TYPE_MSG_COMPOSER); e_msg_composer_construct (new); if (!new->editor) { e_notice (GTK_WINDOW (new), GNOME_MESSAGE_BOX_ERROR, _("Could not create composer window.")); gtk_object_unref (GTK_OBJECT (new)); return NULL; } prepare_engine (new); return new; } /** * e_msg_composer_new: * * Create a new message composer widget. * * Return value: A pointer to the newly created widget **/ EMsgComposer * e_msg_composer_new (void) { EMsgComposer *new; new = create_composer (); if (new) { /* Load the signature, if any. */ set_editor_text (new, NULL, ""); } return new; } /** * e_msg_composer_new_with_sig_file: * * Create a new message composer widget. Sets the signature file. * * Return value: A pointer to the newly created widget **/ EMsgComposer * e_msg_composer_new_with_sig_file (const char *sig_file) { EMsgComposer *new; new = create_composer (); if (new) { /* Load the signature, if any. */ set_editor_text (new, sig_file, ""); e_msg_composer_set_sig_file (new, sig_file); } return new; } static void handle_multipart_alternative (EMsgComposer *composer, CamelMultipart *multipart) { /* Find the text/html part and set the composer body to it's contents */ int i, nparts; nparts = camel_multipart_get_number (multipart); for (i = 0; i < nparts; i++) { GMimeContentField *content_type; CamelMimePart *mime_part; mime_part = camel_multipart_get_part (multipart, i); content_type = camel_mime_part_get_content_type (mime_part); if (gmime_content_field_is_type (content_type, "text", "html")) { CamelDataWrapper *contents; char *text, *final_text; gboolean is_html; contents = camel_medium_get_content_object (CAMEL_MEDIUM (mime_part)); text = mail_get_message_body (contents, FALSE, &is_html); if (text) { if (is_html) final_text = g_strdup (text); else final_text = e_text_to_html (text, E_TEXT_TO_HTML_CONVERT_NL | E_TEXT_TO_HTML_CONVERT_SPACES); g_free (text); e_msg_composer_set_body_text (composer, final_text); } return; } } } static void handle_multipart (EMsgComposer *composer, CamelMultipart *multipart, int depth) { int i, nparts; nparts = camel_multipart_get_number (multipart); for (i = 0; i < nparts; i++) { GMimeContentField *content_type; CamelMimePart *mime_part; mime_part = camel_multipart_get_part (multipart, i); content_type = camel_mime_part_get_content_type (mime_part); if (gmime_content_field_is_type (content_type, "multipart", "alternative")) { /* this structure contains the body */ CamelDataWrapper *wrapper; CamelMultipart *mpart; wrapper = camel_medium_get_content_object (CAMEL_MEDIUM (mime_part)); mpart = CAMEL_MULTIPART (wrapper); handle_multipart_alternative (composer, mpart); } else if (gmime_content_field_is_type (content_type, "multipart", "*")) { /* another layer of multipartness... */ CamelDataWrapper *wrapper; CamelMultipart *mpart; wrapper = camel_medium_get_content_object (CAMEL_MEDIUM (mime_part)); mpart = CAMEL_MULTIPART (wrapper); handle_multipart (composer, mpart, depth + 1); } else if (depth == 0 && i == 0) { /* Since the first part is not multipart/alternative, then this must be the body */ CamelDataWrapper *contents; char *text, *final_text; gboolean is_html; contents = camel_medium_get_content_object (CAMEL_MEDIUM (mime_part)); text = mail_get_message_body (contents, FALSE, &is_html); if (text) { if (is_html) final_text = g_strdup (text); else final_text = e_text_to_html (text, E_TEXT_TO_HTML_CONVERT_NL | E_TEXT_TO_HTML_CONVERT_SPACES); g_free (text); e_msg_composer_set_body_text (composer, final_text); } } else { /* this is a leaf of the tree, so attach it */ e_msg_composer_attach (composer, mime_part); } } } /** * e_msg_composer_new_with_message: * * Create a new message composer widget. * * Return value: A pointer to the newly created widget **/ EMsgComposer * e_msg_composer_new_with_message (CamelMimeMessage *msg) { const CamelInternetAddress *to, *cc, *bcc; GList *To = NULL, *Cc = NULL, *Bcc = NULL; GMimeContentField *content_type; const gchar *subject; EMsgComposer *new; guint len, i; g_return_val_if_fail (gtk_main_level () > 0, NULL); new = create_composer (); if (!new) return NULL; subject = camel_mime_message_get_subject (msg); to = camel_mime_message_get_recipients (msg, CAMEL_RECIPIENT_TYPE_TO); cc = camel_mime_message_get_recipients (msg, CAMEL_RECIPIENT_TYPE_CC); bcc = camel_mime_message_get_recipients (msg, CAMEL_RECIPIENT_TYPE_BCC); len = CAMEL_ADDRESS (to)->addresses->len; for (i = 0; i < len; i++) { const char *addr; if (camel_internet_address_get (to, i, NULL, &addr)) To = g_list_append (To, g_strdup (addr)); } len = CAMEL_ADDRESS (cc)->addresses->len; for (i = 0; i < len; i++) { const char *addr; if (camel_internet_address_get (cc, i, NULL, &addr)) Cc = g_list_append (Cc, g_strdup (addr)); } len = CAMEL_ADDRESS (bcc)->addresses->len; for (i = 0; i < len; i++) { const char *addr; if (camel_internet_address_get (bcc, i, NULL, &addr)) Bcc = g_list_append (Bcc, g_strdup (addr)); } e_msg_composer_set_headers (new, To, Cc, Bcc, subject); free_recipients (To); free_recipients (Cc); free_recipients (Bcc); content_type = camel_mime_part_get_content_type (CAMEL_MIME_PART (msg)); if (gmime_content_field_is_type (content_type, "multipart", "alternative")) { /* multipart/alternative contains the text/plain and text/html versions of the message body */ CamelDataWrapper *wrapper; CamelMultipart *multipart; wrapper = camel_medium_get_content_object (CAMEL_MEDIUM (CAMEL_MIME_PART (msg))); multipart = CAMEL_MULTIPART (wrapper); handle_multipart_alternative (new, multipart); } else if (gmime_content_field_is_type (content_type, "multipart", "*")) { /* there must be attachments... */ CamelDataWrapper *wrapper; CamelMultipart *multipart; wrapper = camel_medium_get_content_object (CAMEL_MEDIUM (CAMEL_MIME_PART (msg))); multipart = CAMEL_MULTIPART (wrapper); handle_multipart (new, multipart, 0); } else { /* We either have a text/plain or a text/html part */ CamelDataWrapper *contents; char *text, *final_text; gboolean is_html; contents = camel_medium_get_content_object (CAMEL_MEDIUM (msg)); text = mail_get_message_body (contents, FALSE, &is_html); if (text) { if (is_html) final_text = g_strdup (text); else final_text = e_text_to_html (text, E_TEXT_TO_HTML_CONVERT_NL | E_TEXT_TO_HTML_CONVERT_SPACES); g_free (text); e_msg_composer_set_body_text (new, final_text); } } return new; } static GList * add_recipients (GList *list, const char *recips, gboolean decode) { int len; char *addr; while (*recips) { len = strcspn (recips, ","); if (len) { addr = g_strndup (recips, len); if (decode) camel_url_decode (addr); list = g_list_append (list, addr); } recips += len; if (*recips == ',') recips++; } return list; } static void free_recipients (GList *list) { GList *l; for (l = list; l; l = l->next) g_free (l->data); g_list_free (list); } /** * e_msg_composer_new_from_url: * @url: a mailto URL * * Create a new message composer widget, and fill in fields as * defined by the provided URL. **/ EMsgComposer * e_msg_composer_new_from_url (const char *url) { EMsgComposer *composer; EMsgComposerHdrs *hdrs; GList *to = NULL, *cc = NULL, *bcc = NULL; char *subject = NULL, *body = NULL; const char *p, *header; int len, clen; char *content; g_return_val_if_fail (g_strncasecmp (url, "mailto:", 7) == 0, NULL); composer = e_msg_composer_new (); if (!composer) return NULL; /* Parse recipients (everything after ':' until '?' or eos. */ p = url + 7; len = strcspn (p, "?,"); if (len) { content = g_strndup (p, len); to = add_recipients (to, content, TRUE); g_free (content); } p += len; if (*p == '?') { p++; while (*p) { len = strcspn (p, "=&"); /* If it's malformed, give up. */ if (p[len] != '=') break; header = p; p += len + 1; clen = strcspn (p, "&"); content = g_strndup (p, clen); camel_url_decode (content); if (!g_strncasecmp (header, "to", len)) to = add_recipients (to, content, FALSE); else if (!g_strncasecmp (header, "cc", len)) cc = add_recipients (cc, content, FALSE); else if (!g_strncasecmp (header, "bcc", len)) bcc = add_recipients (bcc, content, FALSE); else if (!g_strncasecmp (header, "subject", len)) subject = g_strdup (content); else if (!g_strncasecmp (header, "body", len)) body = g_strdup (content); g_free (content); p += clen; if (*p == '&') { p++; if (!strcmp (p, "amp;")) p += 4; } } } hdrs = E_MSG_COMPOSER_HDRS (composer->hdrs); e_msg_composer_hdrs_set_to (hdrs, to); free_recipients (to); e_msg_composer_hdrs_set_cc (hdrs, cc); free_recipients (cc); e_msg_composer_hdrs_set_bcc (hdrs, bcc); free_recipients (bcc); if (subject) { e_msg_composer_hdrs_set_subject (hdrs, subject); g_free (subject); } if (body) { char *htmlbody = e_text_to_html (body, E_TEXT_TO_HTML_PRE); set_editor_text (composer, NULL, htmlbody); g_free (htmlbody); } return composer; } /** * e_msg_composer_show_attachments: * @composer: A message composer widget * @show: A boolean specifying whether the attachment bar should be shown or * not * * If @show is %FALSE, hide the attachment bar. Otherwise, show it. **/ void e_msg_composer_show_attachments (EMsgComposer *composer, gboolean show) { g_return_if_fail (composer != NULL); g_return_if_fail (E_IS_MSG_COMPOSER (composer)); show_attachments (composer, show); } /** * e_msg_composer_set_headers: * @composer: a composer object * @to: the values for the "To" header * @cc: the values for the "Cc" header * @bcc: the values for the "Bcc" header * @subject: the value for the "Subject" header * * Sets the headers in the composer to the given values. **/ void e_msg_composer_set_headers (EMsgComposer *composer, const GList *to, const GList *cc, const GList *bcc, const char *subject) { EMsgComposerHdrs *hdrs; g_return_if_fail (E_IS_MSG_COMPOSER (composer)); hdrs = E_MSG_COMPOSER_HDRS (composer->hdrs); e_msg_composer_hdrs_set_to (hdrs, to); e_msg_composer_hdrs_set_cc (hdrs, cc); e_msg_composer_hdrs_set_bcc (hdrs, bcc); e_msg_composer_hdrs_set_subject (hdrs, subject); } /** * e_msg_composer_set_body_text: * @composer: a composer object * @text: the HTML text to initialize the editor with * * Loads the given HTML text into the editor. **/ void e_msg_composer_set_body_text (EMsgComposer *composer, const char *text) { g_return_if_fail (E_IS_MSG_COMPOSER (composer)); set_editor_text (composer, composer->sig_file, text); } /** * e_msg_composer_add_header: * @composer: a composer object * @name: the header name * @value: the header value * * Adds a header with @name and @value to the message. This header * may not be displayed by the composer, but will be included in * the message it outputs. **/ void e_msg_composer_add_header (EMsgComposer *composer, const char *name, const char *value) { g_return_if_fail (E_IS_MSG_COMPOSER (composer)); g_return_if_fail (name != NULL); g_return_if_fail (value != NULL); g_ptr_array_add (composer->extra_hdr_names, g_strdup (name)); g_ptr_array_add (composer->extra_hdr_values, g_strdup (value)); } /** * e_msg_composer_attach: * @composer: a composer object * @attachment: the CamelMimePart to attach * * Attaches @attachment to the message being composed in the composer. **/ void e_msg_composer_attach (EMsgComposer *composer, CamelMimePart *attachment) { EMsgComposerAttachmentBar *bar; g_return_if_fail (E_IS_MSG_COMPOSER (composer)); g_return_if_fail (CAMEL_IS_MIME_PART (attachment)); bar = E_MSG_COMPOSER_ATTACHMENT_BAR (composer->attachment_bar); e_msg_composer_attachment_bar_attach_mime_part (bar, attachment); } /** * e_msg_composer_get_message: * @composer: A message composer widget * * Retrieve the message edited by the user as a CamelMimeMessage. The * CamelMimeMessage object is created on the fly; subsequent calls to this * function will always create new objects from scratch. * * Return value: A pointer to the new CamelMimeMessage object **/ CamelMimeMessage * e_msg_composer_get_message (EMsgComposer *composer) { g_return_val_if_fail (composer != NULL, NULL); g_return_val_if_fail (E_IS_MSG_COMPOSER (composer), NULL); return build_message (composer); } /** * e_msg_composer_set_sig: * @composer: A message composer widget * @path: Signature file * * Set a signature **/ void e_msg_composer_set_sig_file (EMsgComposer *composer, const char *sig_file) { g_return_if_fail (composer != NULL); g_return_if_fail (E_IS_MSG_COMPOSER (composer)); composer->sig_file = g_strdup (sig_file); } /** * e_msg_composer_get_sig_file: * @composer: A message composer widget * * Get the signature file * * Return value: The signature file. **/ const char * e_msg_composer_get_sig_file (EMsgComposer *composer) { g_return_val_if_fail (composer != NULL, NULL); g_return_val_if_fail (E_IS_MSG_COMPOSER (composer), NULL); return composer->sig_file; } /** * e_msg_composer_set_send_html: * @composer: A message composer widget * @send_html: Whether the composer should have the "Send HTML" flag set * * Set the status of the "Send HTML" toggle item. The user can override it. **/ void e_msg_composer_set_send_html (EMsgComposer *composer, gboolean send_html) { g_return_if_fail (composer != NULL); g_return_if_fail (E_IS_MSG_COMPOSER (composer)); if (composer->send_html && send_html) return; if (! composer->send_html && ! send_html) return; composer->send_html = send_html; bonobo_ui_component_set_prop (composer->uic, "/commands/FormatHtml", "state", composer->send_html ? "1" : "0", NULL); } /** * e_msg_composer_get_send_html: * @composer: A message composer widget * * Get the status of the "Send HTML mail" flag. * * Return value: The status of the "Send HTML mail" flag. **/ gboolean e_msg_composer_get_send_html (EMsgComposer *composer) { g_return_val_if_fail (composer != NULL, FALSE); g_return_val_if_fail (E_IS_MSG_COMPOSER (composer), FALSE); return composer->send_html; }