diff options
Diffstat (limited to 'mail/message-list.c')
| -rw-r--r-- | mail/message-list.c | 394 |
1 files changed, 394 insertions, 0 deletions
diff --git a/mail/message-list.c b/mail/message-list.c new file mode 100644 index 0000000000..07959d818e --- /dev/null +++ b/mail/message-list.c @@ -0,0 +1,394 @@ +/* + * message-list.c: Displays the messages. + * Implements CORBA's Evolution::MessageList + * + * Author: + * Miguel de Icaza (miguel@helixcode.com) + * + * (C) 2000 Helix Code, Inc. + */ +#include <config.h> +#include <gnome.h> +#include <bonobo/gnome-main.h> +#include "camel/camel-folder.h" +#include "e-table/e-table.h" +#include "e-table/e-table-simple.h" +#include "e-table/e-cell-text.h" +#include "e-table/e-cell-toggle.h" +#include "e-table/e-cell-checkbox.h" +#include "message-list.h" +#include "Mail.h" + +/* + * Default sizes for the ETable display + * + */ +#define N_CHARS(x) (CHAR_WIDTH * (x)) + +#define COL_ICON_WIDTH 16 +#define COL_FROM_WIDTH N_CHARS(24) +#define COL_FROM_WIDTH_MIN 32 +#define COL_SUBJECT_WIDTH N_CHARS(30) +#define COL_SUBJECT_WIDTH_MIN 32 +#define COL_SENT_WIDTH N_CHARS(20) +#define COL_SENT_WIDTH_MIN 32 +#define COL_RECEIVE_WIDTH N_CHARS(20) +#define COL_RECEIVE_WIDTH_MIN 32 +#define COL_TO_WIDTH N_CHARS(24) +#define COL_TO_WIDTH_MIN 32 +#define COL_SIZE_WIDTH N_CHARS(6) +#define COL_SIZE_WIDTH_MIN 32 + +#define PARENT_TYPE (gnome_object_get_type ()) + +static GnomeObjectClass *message_list_parent_class; +static POA_Evolution_MessageList__vepv evolution_message_list_vepv; + +/* + * SimpleTableModel::col_count + */ +static int +ml_col_count (ETableModel *etm, void *data) +{ + return COL_LAST; +} + +/* + * SimpleTableModel::row_count + */ +static int +ml_row_count (ETableModel *etm, void *data) +{ + MessageList *message_list = data; + CamelException ex; + + return camel_folder_get_message_count (message_list->folder, &ex); +} + +static void * +ml_value_at (ETableModel *etm, int col, int row, void *data) +{ + static char buffer [10]; + + switch (col){ + case COL_ONLINE_STATUS: + return GINT_TO_POINTER (0); + + case COL_MESSAGE_STATUS: + return GINT_TO_POINTER (1); + + case COL_PRIORITY: + return GINT_TO_POINTER (10); + + case COL_ATTACHMENT: + return GINT_TO_POINTER (0); + + case COL_FROM: + return "miguel@dudical.com"; + + case COL_SUBJECT: + return "MONEY FAST!"; + + case COL_SENT: + return "sent"; + + case COL_RECEIVE: + return "receive"; + + case COL_TO: + return "dudes@server"; + + case COL_SIZE: + sprintf (buffer, "%d", 20); + return buffer; + + default: + g_assert_not_reached (); + } + return NULL; +} + +static void +ml_set_value_at (ETableModel *etm, int col, int row, const void *value, void *data) +{ +} + +static gboolean +ml_is_cell_editable (ETableModel *etm, int col, int row, void *data) +{ + return FALSE; +} + +static void +message_list_init_renderers (MessageList *message_list) +{ + g_assert (message_list); + g_assert (message_list->table_model); + + message_list->render_text = e_cell_text_new ( + message_list->table_model, + NULL, GTK_JUSTIFY_LEFT); + + message_list->render_online_status = e_cell_checkbox_new (); + message_list->render_message_status = e_cell_checkbox_new (); + message_list->render_priority = e_cell_checkbox_new (); + message_list->render_attachment = e_cell_checkbox_new (); +} + +static void +message_list_init_header (MessageList *message_list) +{ + /* + * FIXME: + * + * Use the font metric to compute this. + */ +#define CHAR_WIDTH 10 + + message_list->header_model = e_table_header_new (); + + message_list->table_cols [COL_ONLINE_STATUS] = + e_table_col_new (COL_ONLINE_STATUS, _("Online status"), + COL_ICON_WIDTH, COL_ICON_WIDTH, + message_list->render_online_status, + g_int_equal, FALSE); + + message_list->table_cols [COL_MESSAGE_STATUS] = + e_table_col_new (COL_MESSAGE_STATUS, _("Message status"), + COL_ICON_WIDTH, COL_ICON_WIDTH, + message_list->render_message_status, + g_int_equal, FALSE); + + message_list->table_cols [COL_PRIORITY] = + e_table_col_new (COL_PRIORITY, _("Priority"), + COL_ICON_WIDTH, COL_ICON_WIDTH, + message_list->render_priority, + g_int_equal, FALSE); + + message_list->table_cols [COL_ATTACHMENT] = + e_table_col_new (COL_ATTACHMENT, _("Attachment"), + COL_ICON_WIDTH, COL_ICON_WIDTH, + message_list->render_attachment, + g_int_equal, FALSE); + + message_list->table_cols [COL_FROM] = + e_table_col_new (COL_FROM, _("From"), + COL_FROM_WIDTH, COL_FROM_WIDTH_MIN, + message_list->render_text, + g_str_equal, TRUE); + + message_list->table_cols [COL_SUBJECT] = + e_table_col_new (COL_SUBJECT, _("Subject"), + COL_SUBJECT_WIDTH, COL_SUBJECT_WIDTH_MIN, + message_list->render_text, + g_str_equal, TRUE); + + message_list->table_cols [COL_SENT] = + e_table_col_new (COL_SENT, _("Sent"), + COL_SUBJECT_WIDTH, COL_SENT_WIDTH_MIN, + message_list->render_text, + g_str_equal, TRUE); + + message_list->table_cols [COL_RECEIVE] = + e_table_col_new (COL_SENT, _("Receive"), + COL_RECEIVE_WIDTH, COL_RECEIVE_WIDTH_MIN, + message_list->render_text, + g_str_equal, TRUE); + message_list->table_cols [COL_TO] = + e_table_col_new (COL_TO, _("To"), + COL_TO_WIDTH, COL_TO_WIDTH_MIN, + message_list->render_text, + g_str_equal, TRUE); + + message_list->table_cols [COL_SIZE] = + e_table_col_new (COL_SIZE, _("Size"), + COL_SIZE_WIDTH, COL_SIZE_WIDTH_MIN, + message_list->render_text, + g_str_equal, TRUE); +} + +/* + * GtkObject::init + */ +static void +message_list_init (GtkObject *object) +{ + MessageList *message_list = MESSAGE_LIST (object); + + message_list->table_model = e_table_simple_new ( + ml_col_count, ml_row_count, ml_value_at, + ml_set_value_at, ml_is_cell_editable, message_list); + + message_list_init_renderers (message_list); + message_list_init_header (message_list); + + /* + * The etable + */ + + message_list->etable = e_table_new ( + message_list->header_model, + message_list->table_model, + "1,2,3,4,5,6,7", NULL); + + /* + * We do own the Etable, not some widget container + */ + gtk_object_ref (GTK_OBJECT (message_list->etable)); + gtk_object_sink (GTK_OBJECT (message_list->etable)); +} + +static void +message_list_destroy (GtkObject *object) +{ + MessageList *message_list = MESSAGE_LIST (object); + int i; + + gtk_object_unref (GTK_OBJECT (message_list->table_model)); + gtk_object_unref (GTK_OBJECT (message_list->header_model)); + + /* + * Renderers + */ + gtk_object_unref (GTK_OBJECT (message_list->render_text)); + gtk_object_unref (GTK_OBJECT (message_list->render_online_status)); + gtk_object_unref (GTK_OBJECT (message_list->render_message_status)); + gtk_object_unref (GTK_OBJECT (message_list->render_priority)); + gtk_object_unref (GTK_OBJECT (message_list->render_attachment)); + + gtk_object_unref (GTK_OBJECT (message_list->etable)); + + for (i = 0; i < COL_LAST; i++) + gtk_object_unref (GTK_OBJECT (message_list->table_cols [i])); + + GTK_OBJECT_CLASS (message_list_parent_class)->destroy (object); +} + +/* + * CORBA method: Evolution::MessageList::select_message + */ +static void +MessageList_select_message (PortableServer_Servant _servant, + const CORBA_long message_number, + CORBA_Environment *ev) +{ + printf ("FIXME: select message method\n"); +} + +/* + * CORBA method: Evolution::MessageList::open_message + */ +static void +MessageList_open_message (PortableServer_Servant _servant, + const CORBA_long message_number, + CORBA_Environment *ev) +{ + printf ("FIXME: open message method\n"); +} + +static POA_Evolution_MessageList__epv * +evolution_message_list_get_epv (void) +{ + POA_Evolution_MessageList__epv *epv; + + epv = g_new0 (POA_Evolution_MessageList__epv, 1); + + epv->select_message = MessageList_select_message; + epv->open_message = MessageList_open_message; + + return epv; +} + +static void +message_list_corba_class_init (void) +{ + evolution_message_list_vepv.GNOME_Unknown_epv = gnome_object_get_epv (); + evolution_message_list_vepv.Evolution_MessageList_epv = evolution_message_list_get_epv (); +} + +/* + * GtkObjectClass::init + */ +static void +message_list_class_init (GtkObjectClass *object_class) +{ + message_list_parent_class = gtk_type_class (PARENT_TYPE); + + object_class->destroy = message_list_destroy; + + message_list_corba_class_init (); +} + +static void +message_list_construct (MessageList *message_list, Evolution_MessageList corba_message_list) +{ + gnome_object_construct (GNOME_OBJECT (message_list), corba_message_list); +} + +static Evolution_MessageList +create_corba_message_list (GnomeObject *object) +{ + POA_Evolution_MessageList *servant; + CORBA_Environment ev; + + servant = (POA_Evolution_MessageList *) g_new0 (GnomeObjectServant, 1); + servant->vepv = &evolution_message_list_vepv; + + CORBA_exception_init (&ev); + POA_Evolution_MessageList__init ((PortableServer_Servant) servant, &ev); + if (ev._major != CORBA_NO_EXCEPTION){ + g_free (servant); + CORBA_exception_free (&ev); + return CORBA_OBJECT_NIL; + } + + CORBA_exception_free (&ev); + return (Evolution_MessageList) gnome_object_activate_servant (object, servant); +} + +GnomeObject * +message_list_new (void) +{ + Evolution_MessageList corba_object; + MessageList *message_list; + + message_list = gtk_type_new (message_list_get_type ()); + + corba_object = create_corba_message_list (GNOME_OBJECT (message_list)); + if (corba_object == CORBA_OBJECT_NIL){ + gtk_object_destroy (GTK_OBJECT (message_list)); + return NULL; + } + + message_list_construct (message_list, corba_object); + + return GNOME_OBJECT (message_list); +} + +void +message_list_set_folder (MessageList *message_list, CamelFolder *camel_folder) +{ + g_return_if_fail (message_list != NULL); + g_return_if_fail (camel_folder != NULL); + g_return_if_fail (IS_MESSAGE_LIST (message_list)); + g_return_if_fail (CAMEL_IS_FOLDER (camel_folder)); + g_return_if_fail (camel_has_summary_capability (camel_folder)); + + if (message_list->folder) + gtk_object_unref (GTK_OBJECT (message_list->folder)); + + message_list->folder = camel_folder; + message_list->folder_summary = camel_folder_get_summary (camel_folder); + + gtk_object_ref (GTK_OBJECT (camel_folder)); + + e_table_model_changed (message_list->table_model); +} + +GtkWidget * +message_list_get_widget (MessageList *message_list) +{ + return message_list->etable; +} + +E_MAKE_TYPE (message_list, "MessageList", MessageList, message_list_class_init, message_list_init, PARENT_TYPE); |