diff options
Diffstat (limited to 'tests/ui-tests/message-browser.c')
| -rw-r--r-- | tests/ui-tests/message-browser.c | 819 |
1 files changed, 0 insertions, 819 deletions
diff --git a/tests/ui-tests/message-browser.c b/tests/ui-tests/message-browser.c deleted file mode 100644 index d4c4b31646..0000000000 --- a/tests/ui-tests/message-browser.c +++ /dev/null @@ -1,819 +0,0 @@ -/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ -/*--------------------------------*-C-*---------------------------------* - * - * Copyright 2000, Matt Loper <matt@ximian.com>. - * - * This program is free software; you can redistribute it and/or - * modify it under the terms of version 2 of the GNU General Public - * License as published by the Free Software Foundation. - * - * 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. - * - *----------------------------------------------------------------------*/ - -#include <gnome.h> -#include <camel/camel.h> -#include <camel/camel-mime-message.h> -#include <camel/camel-stream.h> -#include <camel/camel-stream-fs.h> -#include <camel/gmime-utils.h> -#include "../../mail/html-stream.h" -#include <camel/camel-formatter.h> - -/* gtkhtml stuff */ -#include <gtkhtml/gtkhtml.h> - -/* corba/bonobo stuff */ -#include <bonobo.h> -#include <libgnorba/gnorba.h> -#include <bonobo/bonobo-stream-memory.h> - -#include <widgets/e-paned/e-hpaned.h> - -static void -print_usage_and_quit() -{ - g_print ("Usage: message-browser [FILENAME]\n"); - g_print ("Where FILENAME is the filename of a mime message "); - g_print ("in \"message/rfc822\" format.\n"); - exit (0); -} - - -/*----------------------------------------------------------------------* - * Filling out the tree control view of a mime-message - *----------------------------------------------------------------------*/ - -static void -handle_tree_item (CamelDataWrapper* object, GtkWidget* tree_ctrl) -{ - GtkWidget* tree_item; - gchar* label = gmime_content_field_get_mime_type (object->mime_type); - - CamelDataWrapper* containee; - GtkWidget* containee_tree_item; - gchar* containee_label; - - GtkWidget* subtree = NULL; - - tree_item = gtk_tree_item_new_with_label (label); - gtk_object_set_data (GTK_OBJECT (tree_item), - "camel_data_wrapper", object); - gtk_tree_append (GTK_TREE (tree_ctrl), tree_item); - - gtk_widget_show(tree_item); - - /* If our object is a leaf, we're done */ - if (!CAMEL_IS_MEDIUM (object)) - return; - - containee = - camel_medium_get_content_object ( - CAMEL_MEDIUM (object)); - - g_assert (containee); - - /* If it is a container, insert its contents into the tree */ - containee_label = camel_data_wrapper_get_mime_type (containee); - - subtree = gtk_tree_new(); - - containee_tree_item = - gtk_tree_item_new_with_label (containee_label); - gtk_object_set_data (GTK_OBJECT (containee_tree_item), - "camel_data_wrapper", - containee); - gtk_tree_append (GTK_TREE (subtree), containee_tree_item); - - gtk_tree_item_set_subtree (GTK_TREE_ITEM(tree_item), - GTK_WIDGET (subtree)); - gtk_widget_show(containee_tree_item); - - if (CAMEL_IS_MULTIPART (containee)) - { - CamelMultipart* multipart = - CAMEL_MULTIPART (containee); - int max_multiparts = - camel_multipart_get_number (multipart); - int i; - - if (max_multiparts > 0) { - subtree = gtk_tree_new(); - gtk_tree_item_set_subtree ( - GTK_TREE_ITEM(containee_tree_item), - GTK_WIDGET (subtree)); - } - - for (i = 0; i < max_multiparts; i++) { - CamelMimeBodyPart* body_part = - camel_multipart_get_part ( - multipart, i); - - handle_tree_item ( - CAMEL_DATA_WRAPPER (body_part), - GTK_WIDGET (subtree)); - } - - } - gtk_tree_item_expand ( - GTK_TREE_ITEM (containee_tree_item)); - gtk_tree_item_expand (GTK_TREE_ITEM (tree_item)); -} - -static GtkWidget* -get_gtk_html_contents_window (CamelDataWrapper* data); - -static void -tree_selection_changed( GtkWidget *tree ) -{ - GList *i; - - i = GTK_TREE_SELECTION(tree); - while (i){ - gchar* name; - GtkLabel* label; - GtkWidget* item; - CamelDataWrapper* camel_data_wrapper; - - /* Get a GtkWidget pointer from the list node */ - item = GTK_WIDGET (i->data); - camel_data_wrapper = - gtk_object_get_data (GTK_OBJECT (item), - "camel_data_wrapper"); - - g_assert (camel_data_wrapper); - get_gtk_html_contents_window (camel_data_wrapper); - - label = GTK_LABEL (GTK_BIN (item)->child); - gtk_label_get (label, &name); - g_print ("\t%s on level %d\n", name, GTK_TREE - (item->parent)->level); - i = i->next; - } -} - -static GtkWidget* -get_message_tree_ctrl (CamelMimeMessage* message) -{ - static GtkWidget* scroll_wnd = NULL; - static GtkWidget* tree_ctrl = NULL; - - /* create the tree control, if it doesn't exist already */ - if (!tree_ctrl) { - - tree_ctrl = gtk_tree_new (); - - gtk_signal_connect (GTK_OBJECT(tree_ctrl), - "selection_changed", - GTK_SIGNAL_FUNC(tree_selection_changed), - tree_ctrl); - - scroll_wnd = gtk_scrolled_window_new (NULL,NULL); - - gtk_scrolled_window_add_with_viewport ( - GTK_SCROLLED_WINDOW(scroll_wnd), - tree_ctrl); - - gtk_widget_set_usize (scroll_wnd, 225, 200); - } - else - gtk_tree_clear_items (GTK_TREE (tree_ctrl), 0, 1); - - - /* Recursively insert tree items in the tree */ - if (message) - handle_tree_item (CAMEL_DATA_WRAPPER (message), tree_ctrl); - gtk_scrolled_window_set_policy ( - GTK_SCROLLED_WINDOW (scroll_wnd), - GTK_POLICY_AUTOMATIC, - GTK_POLICY_AUTOMATIC); - return scroll_wnd; -} - -static CamelMimeMessage* -filename_to_camel_msg (gchar* filename) -{ - CamelMimeMessage* message; - CamelStream* input_stream; - - camel_init(); - - input_stream = camel_stream_fs_new_with_name ( - filename, CAMEL_STREAM_FS_READ); - - if (!input_stream) - return NULL; - - message = camel_mime_message_new (); - - camel_data_wrapper_set_input_stream ( - CAMEL_DATA_WRAPPER (message), input_stream); - - return message; -} - -/*----------------------------------------------------------------------* - * Filling out the HTML view of a mime message - *----------------------------------------------------------------------*/ - -static void -data_wrapper_to_html (CamelDataWrapper *msg, gchar** body_string) -{ - CamelFormatter* cmf = camel_formatter_new(); - CamelStream* body_stream = - camel_stream_mem_new (CAMEL_STREAM_FS_WRITE); - - g_assert (body_string); - - camel_formatter_wrapper_to_html ( - cmf, msg, body_stream); - - *body_string = g_strndup ( - CAMEL_STREAM_MEM (body_stream)->buffer->data, - CAMEL_STREAM_MEM (body_stream)->buffer->len); -} - -static void -mime_message_header_to_html (CamelMimeMessage *msg, gchar** header_string) -{ - CamelFormatter* cmf = camel_formatter_new(); - CamelStream* header_stream = - camel_stream_mem_new (CAMEL_STREAM_FS_WRITE); - - g_assert (header_string); - - camel_formatter_mime_message_to_html ( - cmf, CAMEL_MIME_MESSAGE (msg), header_stream, NULL); - - *header_string = g_strndup ( - CAMEL_STREAM_MEM (header_stream)->buffer->data, - CAMEL_STREAM_MEM (header_stream)->buffer->len); -} - - -static void -on_link_clicked (GtkHTML *html, const gchar *url, gpointer data) -{ - GtkWidget* message_box; - CamelStream *stream; - CamelStream *save_stream; - gchar tmp_buffer[4096]; - gint nb_bytes_read; - - gchar* message = - g_strdup_printf ("You have clicked on this link:\n%s", url); - - if (sscanf (url, "camel://%p", &stream)) - { - save_stream = - camel_stream_fs_new_with_name ("saved-file", - CAMEL_STREAM_FS_WRITE); - - - do { - - /* read next chunk of text */ - nb_bytes_read = camel_stream_read (stream, - tmp_buffer, - 4096); - - /* If there's any text, write it to the stream */ - if (nb_bytes_read > 0) { - camel_stream_write (save_stream, - tmp_buffer, - nb_bytes_read); - } - - - } while (!camel_stream_eos (stream)); - - camel_stream_close (save_stream); - } - - message_box = gnome_message_box_new (message, - GNOME_MESSAGE_BOX_INFO, - "Okay", NULL); - - gnome_dialog_set_default (GNOME_DIALOG (message_box), 1); - gnome_dialog_run (GNOME_DIALOG (message_box)); - g_free (message); -} - -/* - * As a page is being loaded, gtkhtml will come across a few types of - * tags that it understands (like <img src="foo">). In these cases, it - * will simply ask us to stream the data to it. - */ -static void -on_url_data_requested (GtkHTML *html, const gchar *url, GtkHTMLStreamHandle handle, gpointer data) -{ - CamelStream *stream; - - printf ("url _%s_ (%p) requested\n", url, url); - - if (sscanf (url, "camel://%p", &stream) == 1) - { - gchar tmp_buffer[4096]; - do { - gint nb_bytes_read; - - /* read next chunk of text */ - nb_bytes_read = camel_stream_read (stream, - tmp_buffer, - 4096); - - /* If there's any text, write it to the stream */ - if (nb_bytes_read > 0) { - gtk_html_write (html, handle, tmp_buffer, nb_bytes_read); - } - - - } while (!camel_stream_eos (stream)); - - - } - -} - - -static gboolean -hydrate_persist_stream_from_gstring (Bonobo_PersistStream persist_stream, - GString* gstr) -{ - CORBA_Environment ev; - BonoboStream* mem_stream = - bonobo_stream_mem_create (gstr->str, gstr->len, TRUE, FALSE); - /* - * If the component doesn't support - * PersistStream, then we destroy the - * stream we created and bail. - */ - if (persist_stream == CORBA_OBJECT_NIL) { - gnome_warning_dialog (_("The component now claims that it " - "doesn't support PersistStream!")); - bonobo_object_unref (BONOBO_OBJECT (mem_stream)); - return FALSE; - } - - CORBA_exception_init (&ev); - - /* - * Load the file into the component using PersistStream. - */ - Bonobo_PersistStream_load (persist_stream, - (Bonobo_Stream) bonobo_object_corba_objref (BONOBO_OBJECT (mem_stream)), - &ev); - - bonobo_object_unref (BONOBO_OBJECT (mem_stream)); - - if (ev._major != CORBA_NO_EXCEPTION) { - gnome_warning_dialog (_("An exception occured while trying " - "to load data into the component with " - "PersistStream")); - CORBA_exception_free (&ev); - return FALSE; - } - - CORBA_exception_free (&ev); - return TRUE; -} - -static GString* -camel_stream_to_gstring (CamelStream* stream) -{ - gchar tmp_buffer[4097]; - GString *tmp_gstring = g_string_new (""); - - do { /* read next chunk of text */ - - gint nb_bytes_read; - - nb_bytes_read = camel_stream_read (stream, - tmp_buffer, - 4096); - tmp_buffer [nb_bytes_read] = '\0'; - - /* If there's any text, append it to the gstring */ - if (nb_bytes_read > 0) { - tmp_gstring = g_string_append (tmp_gstring, tmp_buffer); - } - - } while (!camel_stream_eos (stream)); - - return tmp_gstring; -} - - -/* - * As a page is loaded, when gtkhtml comes across <object> tags, this - * callback is invoked. The GtkHTMLEmbedded param is a GtkContainer; - * our job in this function is to simply add a child widget to it. - */ -static void -on_object_requested (GtkHTML *html, GtkHTMLEmbedded *eb, void *unused) -{ - CamelStream *stream; - GString *camel_stream_gstr; - - GtkWidget *bonobo_embeddable; - BonoboObjectClient* server; - Bonobo_PersistStream persist; - CORBA_Environment ev; - gchar *uid = gtk_html_embedded_get_parameter (eb, "uid"); - - /* Both the classid (which specifies which bonobo object to - * fire up) and the uid (which tells us where to find data to - * persist from) must be available; if one of them isn't, - * print an error and bail. */ - if (!uid || !eb->classid) { - printf ("on_object_requested: couldn't find %s%s%s\n", - uid?"a uid":"", - (!uid && !eb->classid)?" or ":"", - eb->classid?"a classid":""); - return; - } - printf ("object requested : %s\n", eb->classid); - printf ("UID = %s\n", uid); - - /* Try to get a server with goadid specified by eb->classid */ - bonobo_embeddable = bonobo_widget_new_subdoc (eb->classid, NULL); - server = bonobo_widget_get_server (BONOBO_WIDGET (bonobo_embeddable)); - if (!server) { - printf ("Couldn't get the server for the bonobo embeddable\n"); - return; - } - - /* The UID should be a pointer to a CamelStream */ - if (sscanf (uid, "camel://%p", &stream) != 1) { - printf ("Couldn't get a pointer from url \"%s\"\n", uid); - gtk_object_unref (GTK_OBJECT (bonobo_embeddable)); - - return; - } - - /* Try to get a PersistStream interface from the server; - if it doesn't support that interface, bail. */ - persist = (Bonobo_PersistStream) bonobo_object_client_query_interface ( - server, - "IDL:Bonobo/PersistStream:1.0", - NULL); - - if (persist == CORBA_OBJECT_NIL) { - gchar* msg = g_strdup_printf ( - _("The %s component doesn't support PersistStream!\n"), - uid); - - gnome_warning_dialog (msg); - gtk_object_unref (GTK_OBJECT (bonobo_embeddable)); - - return; - } - - /* Hydrate the PersistStream from the CamelStream */ - camel_stream_gstr = camel_stream_to_gstring (stream); - printf ("on_object_requested: The CamelStream has %d elements\n", - camel_stream_gstr->len); - hydrate_persist_stream_from_gstring (persist, camel_stream_gstr); - - /* Give our new window to the container */ - gtk_widget_show (bonobo_embeddable); - gtk_container_add (GTK_CONTAINER(eb), bonobo_embeddable); - - /* Destroy the PersistStream object.*/ - CORBA_exception_init (&ev); - Bonobo_Unknown_unref (persist, &ev); - CORBA_Object_release (persist, &ev); - CORBA_exception_free (&ev); - - g_string_free (camel_stream_gstr, TRUE); -} - - - - -static GtkWidget* -get_gtk_html_contents_window (CamelDataWrapper* data) -{ - static GtkWidget* frame_wnd = NULL; - static GtkWidget* scroll_wnd = NULL; - static GtkWidget* html_widget = NULL; - HTMLStream* html_stream; - gchar *body_string; - - /* create the html widget and scroll window, if they haven't - already been created */ - if (!html_widget) { - html_widget = gtk_html_new(); - - gtk_signal_connect (GTK_OBJECT (html_widget), - "link_clicked", - GTK_SIGNAL_FUNC (on_link_clicked), - NULL); - - gtk_signal_connect (GTK_OBJECT (html_widget), - "url_requested", - GTK_SIGNAL_FUNC (on_url_data_requested), - NULL); - gtk_signal_connect (GTK_OBJECT (html_widget), - "object_requested", - GTK_SIGNAL_FUNC (on_object_requested), - NULL); - - scroll_wnd = gtk_scrolled_window_new (NULL, NULL); - gtk_container_add (GTK_CONTAINER (scroll_wnd), html_widget); - } - - if (data) { - - html_stream = - HTML_STREAM (html_stream_new (GTK_HTML (html_widget))); - - /* turn the mime message into html, and - write it to the html stream */ - data_wrapper_to_html (data, &body_string); - - camel_stream_write (CAMEL_STREAM (html_stream), - body_string, - strlen (body_string)); - - camel_stream_close (CAMEL_STREAM (html_stream)); - - g_free (body_string); - } - - - if (!frame_wnd) { - - frame_wnd = gtk_frame_new (NULL); - gtk_frame_set_shadow_type ( - GTK_FRAME (frame_wnd), GTK_SHADOW_IN); - - gtk_widget_set_usize (scroll_wnd, 500, 400); - gtk_scrolled_window_set_policy ( - GTK_SCROLLED_WINDOW (scroll_wnd), - GTK_POLICY_AUTOMATIC, - GTK_POLICY_AUTOMATIC); - - gtk_container_add (GTK_CONTAINER (frame_wnd), scroll_wnd); - } - - return frame_wnd; -} - - -static GtkWidget* -get_gtk_html_header_window (CamelMimeMessage* mime_message) -{ - static GtkWidget* frame_wnd = NULL; - static GtkWidget* scroll_wnd = NULL; - static GtkWidget* html_widget = NULL; - HTMLStream* html_stream; - gchar* header_string; - - /* create the html widget and scroll window, if they haven't - already been created */ - if (!html_widget) { - html_widget = gtk_html_new(); - scroll_wnd = gtk_scrolled_window_new (NULL, NULL); - gtk_container_add (GTK_CONTAINER (scroll_wnd), html_widget); - } - - if (mime_message) { - - html_stream = - HTML_STREAM (html_stream_new (GTK_HTML (html_widget))); - - /* turn the mime message into html, and - write it to the html stream */ - mime_message_header_to_html (mime_message, &header_string); - - camel_stream_write (CAMEL_STREAM (html_stream), - header_string, - strlen (header_string)); - - camel_stream_close (CAMEL_STREAM (html_stream)); - - g_free (header_string); - } - - if (!frame_wnd) { - - frame_wnd = gtk_frame_new (NULL); - gtk_frame_set_shadow_type ( - GTK_FRAME (frame_wnd), GTK_SHADOW_OUT); - - gtk_widget_set_usize (scroll_wnd, 500, 75); - gtk_scrolled_window_set_policy ( - GTK_SCROLLED_WINDOW (scroll_wnd), - GTK_POLICY_AUTOMATIC, - GTK_POLICY_AUTOMATIC); - - gtk_container_add (GTK_CONTAINER (frame_wnd), scroll_wnd); - } - - - return frame_wnd; -} - -static GtkWidget* -get_gtk_html_window (CamelMimeMessage* mime_message) -{ - static GtkWidget* vbox = NULL; - GtkWidget* html_header_window = NULL; - GtkWidget* html_content_window = NULL; - - html_content_window = - get_gtk_html_contents_window ( - CAMEL_DATA_WRAPPER (mime_message)); - - html_header_window = - get_gtk_html_header_window (mime_message); - - if (!vbox) { - vbox = gtk_vbox_new (FALSE, 0); - - gtk_box_pack_start ( - GTK_BOX (vbox), - html_header_window, - TRUE, TRUE, 5); - - gtk_box_pack_start ( - GTK_BOX (vbox), - html_content_window, - TRUE, FALSE, 5); - } - - return vbox; -} - - - -/*----------------------------------------------------------------------* - * Menu callbacks and information - *----------------------------------------------------------------------*/ - -static gchar* fileselection_prev_file = NULL; - -static void -open_ok (GtkWidget *widget, GtkFileSelection *fs) -{ - int ret; - GtkWidget *error_dialog; - - if (fileselection_prev_file) - g_free (fileselection_prev_file); - - if(!g_file_exists (gtk_file_selection_get_filename (fs))) { - error_dialog = gnome_message_box_new ( - _("File not found"), - GNOME_MESSAGE_BOX_ERROR, - GNOME_STOCK_BUTTON_OK, - NULL); - - gnome_dialog_set_parent (GNOME_DIALOG (error_dialog), - GTK_WINDOW (fs)); - - ret = gnome_dialog_run (GNOME_DIALOG (error_dialog)); - } - else { - gchar *filename = gtk_file_selection_get_filename (fs); - CamelMimeMessage* message = filename_to_camel_msg (filename); - - if (message) { - fileselection_prev_file = g_strdup (filename); - get_message_tree_ctrl (message); - get_gtk_html_window (message); - } - else - gnome_message_box_new ("Couldn't load message.", - GNOME_MESSAGE_BOX_WARNING); - - gtk_widget_destroy (GTK_WIDGET (fs)); - } -} - - -static void -file_menu_open_cb (GtkWidget *widget, void* data) -{ - GtkFileSelection *fs; - - fs = GTK_FILE_SELECTION ( - gtk_file_selection_new (_("Open Mime Message"))); - - if (fileselection_prev_file) - gtk_file_selection_set_filename (fs, fileselection_prev_file); - - gtk_signal_connect (GTK_OBJECT (fs->ok_button), "clicked", - (GtkSignalFunc) open_ok, - fs); - - gtk_signal_connect_object (GTK_OBJECT (fs->cancel_button), "clicked", - (GtkSignalFunc) gtk_widget_destroy, - GTK_OBJECT (fs)); - - gtk_widget_show (GTK_WIDGET (fs)); - gtk_grab_add (GTK_WIDGET (fs)); /* Make it modal */ -} - -static void -file_menu_exit_cb (GtkWidget *widget, void *data) -{ - gtk_main_quit (); -} - - -static GnomeUIInfo file_menu [] = { - GNOMEUIINFO_MENU_OPEN_ITEM (file_menu_open_cb, NULL), - GNOMEUIINFO_SEPARATOR, - GNOMEUIINFO_MENU_EXIT_ITEM (file_menu_exit_cb, NULL), - GNOMEUIINFO_END -}; - -static GnomeUIInfo main_menu[] = { - GNOMEUIINFO_MENU_FILE_TREE (file_menu), - GNOMEUIINFO_END -}; - - -/*----------------------------------------------------------------------* - * Main() - *----------------------------------------------------------------------*/ - -int -main (int argc, char *argv[]) -{ - /* app contains hbox, hbox contains other 2 windows */ - GtkWidget* app; - GtkWidget* hpane; - GtkWidget* tree_ctrl_window; - GtkWidget* html_window; - CORBA_Environment ev; - - CamelMimeMessage* message = NULL; - - /* initialization */ - - /* Corba and Bonobo stuff */ - CORBA_exception_init (&ev); - - gnome_CORBA_init ("Message Browser", "1.0", &argc, argv, 0, &ev); - - if (bonobo_init (gnome_CORBA_ORB (), NULL, NULL) == FALSE) - g_error ("Cannot bonobo_init"); - - - - gdk_rgb_init (); - - gtk_widget_set_default_colormap (gdk_rgb_get_cmap ()); - gtk_widget_set_default_visual (gdk_rgb_get_visual ()); - - app = gnome_app_new ("Message Browser Test", NULL); - gnome_app_create_menus (GNOME_APP (app), main_menu); - - /* parse command line */ - if (argc > 2 || - (argc==2 && strstr (argv[1], "--help") != 0)) - print_usage_and_quit(); - if (argc == 2) { - if (strstr (argv[1], "--help") != 0) - print_usage_and_quit(); - message = filename_to_camel_msg (argv[1]); - if (!message) { - g_print ("Couldn't load message."); - } - } - - hpane = e_hpaned_new(); - - /* add the tree control view of the message*/ - tree_ctrl_window = get_message_tree_ctrl (message); - e_paned_add1 (E_PANED (hpane), tree_ctrl_window); - - /* add the HTML view of the message */ - html_window = get_gtk_html_window (message); - e_paned_add2 (E_PANED (hpane), html_window); - - /* rock n roll */ - gnome_app_set_contents (GNOME_APP (app), - hpane); - gtk_widget_show_all (app); - gtk_signal_connect (GTK_OBJECT (app), "destroy", - GTK_SIGNAL_FUNC(gtk_main_quit), - &app); - if (!message) - file_menu_open_cb (NULL, NULL); - - bonobo_main(); - - return 1; -} |