diff options
Diffstat (limited to 'mail/folder-info.c')
-rw-r--r-- | mail/folder-info.c | 266 |
1 files changed, 0 insertions, 266 deletions
diff --git a/mail/folder-info.c b/mail/folder-info.c deleted file mode 100644 index 47fe547604..0000000000 --- a/mail/folder-info.c +++ /dev/null @@ -1,266 +0,0 @@ -/* - * folder-info.c: Implementation of GNOME_Evolution_FolderInfo - * - * Copyright (C) 2001 Ximian, Inc. - * - * Authors: Iain Holmes <iain@ximian.com> - */ - -#ifdef HAVE_CONFIG_H -#include <config.h> -#endif - -#include "Mailer.h" - -#include <glib.h> - -#include <bonobo/bonobo-object.h> -#include <bonobo/bonobo-generic-factory.h> -#include <bonobo/bonobo-property-bag.h> -#include <bonobo/bonobo-context.h> -#include <bonobo/bonobo-exception.h> - -#include "folder-info.h" - -#include "mail.h" -#include "mail-mt.h" -#include "mail-tools.h" - -#include <camel/camel-folder.h> -#include <camel/camel-exception.h> - -#define FOLDER_INFO_IID "OAFIID:GNOME_Evolution_FolderInfo_Factory" - -#define PARENT_TYPE BONOBO_OBJECT_TYPE -static BonoboObjectClass *parent_class = NULL; - -static GSList *folder_infos; - -typedef struct _EvolutionFolderInfo EvolutionFolderInfo; -typedef struct _EvolutionFolderInfoClass EvolutionFolderInfoClass; - -struct _EvolutionFolderInfo { - BonoboObject parent; - - BonoboPropertyBag *pb; -}; - -struct _EvolutionFolderInfoClass { - BonoboObjectClass parent_class; - - POA_GNOME_Evolution_FolderInfo__epv epv; -}; - -/* MT stuff */ -struct _folder_info_msg { - struct _mail_msg msg; - - Bonobo_Listener listener; - char *foldername; - - int read; - int unread; -}; - -gboolean ready; - -static char * -do_describe_info (struct _mail_msg *mm, gint complete) -{ - return g_strdup (_("Getting Folder Information")); -} - -static void -do_get_info (struct _mail_msg *mm) -{ - struct _folder_info_msg *m = (struct _folder_info_msg *) mm; - CamelFolder *folder; - - folder = mail_tool_uri_to_folder (m->foldername, 0, NULL); - if (folder) { - m->read = camel_folder_get_message_count (folder); - m->unread = camel_folder_get_unread_message_count (folder); - } -} - -static void -do_got_info (struct _mail_msg *mm) -{ - struct _folder_info_msg *m = (struct _folder_info_msg *) mm; - CORBA_Environment ev; - CORBA_any a; - GNOME_Evolution_FolderInfo_MessageCount count; - -/* g_print ("You've got mail: %d, %d\n", m->read, m->unread); */ - - count.path = m->foldername; - count.count = m->read; - count.unread = m->unread; - - a._type = (CORBA_TypeCode) TC_GNOME_Evolution_FolderInfo_MessageCount; - a._value = &count; - - CORBA_exception_init (&ev); - Bonobo_Listener_event (m->listener, "youve-got-mail", &a, &ev); - if (BONOBO_EX (&ev)) { - g_warning ("Got exception on listener: %s", CORBA_exception_id (&ev)); - } - CORBA_exception_free (&ev); -} - -static void -do_free_info (struct _mail_msg *mm) -{ - struct _folder_info_msg *m = (struct _folder_info_msg *) mm; - - bonobo_object_release_unref (m->listener, NULL); - g_free (m->foldername); -} - -struct _mail_msg_op get_info_op = { - do_describe_info, - do_get_info, - do_got_info, - do_free_info, -}; - -typedef struct { - int read; - int unread; -} MailFolderInfo; - -/* Returns a MailFolderInfo struct or NULL on error */ -static void -mail_get_info (const char *foldername, - Bonobo_Listener listener) -{ - CORBA_Environment ev; - struct _folder_info_msg *m; - - m = mail_msg_new (&get_info_op, NULL, sizeof (*m)); - - /*g_print ("Folder: %s", foldername);*/ - m->foldername = g_strdup (foldername); - - CORBA_exception_init (&ev); - m->listener = bonobo_object_dup_ref (listener, &ev); - CORBA_exception_free (&ev); - - e_thread_put (mail_thread_new, (EMsg *) m); -} - -static void -impl_GNOME_Evolution_FolderInfo_getInfo (PortableServer_Servant servant, - const CORBA_char *foldername, - const Bonobo_Listener listener, - CORBA_Environment *ev) -{ - mail_get_info (foldername, listener); -} - -#if 0 -static void -destroy (GtkObject *object) -{ - EvolutionFolderInfo *info = (EvolutionFolderInfo *) object; - - bonobo_object_unref (BONOBO_OBJECT (info->pb)); -} -#endif - -static void -evolution_folder_info_class_init (EvolutionFolderInfoClass *klass) -{ - POA_GNOME_Evolution_FolderInfo__epv *epv = &klass->epv; - - parent_class = g_type_class_ref(PARENT_TYPE); - epv->getInfo = impl_GNOME_Evolution_FolderInfo_getInfo; -} - -static void -evolution_folder_info_init (EvolutionFolderInfo *info) -{ -} - -BONOBO_TYPE_FUNC_FULL (EvolutionFolderInfo, - GNOME_Evolution_FolderInfo, - PARENT_TYPE, - evolution_folder_info); - -enum { - PROP_FOLDER_INFO_READY -}; - -static void -set_prop (BonoboPropertyBag *bag, - const BonoboArg *arg, - guint arg_id, - CORBA_Environment *ev, - gpointer user_data) -{ - switch (arg_id) { - case PROP_FOLDER_INFO_READY: - ready = BONOBO_ARG_GET_BOOLEAN (arg); - break; - default: - bonobo_exception_set (ev, ex_Bonobo_PropertyBag_NotFound); - break; - } -} - -static void -get_prop (BonoboPropertyBag *bag, - BonoboArg *arg, - guint arg_id, - CORBA_Environment *ev, - gpointer user_data) -{ - switch (arg_id) { - case PROP_FOLDER_INFO_READY: - BONOBO_ARG_SET_BOOLEAN (arg, ready); - break; - default: - bonobo_exception_set (ev, ex_Bonobo_PropertyBag_NotFound); - break; - } -} - -BonoboObject * -evolution_folder_info_new (void) -{ - EvolutionFolderInfo *info; - BonoboPropertyBag *pb; - - info = g_object_new (evolution_folder_info_get_type (), NULL); - pb = bonobo_property_bag_new (get_prop, set_prop, info); - info->pb = pb; - /* Add properties */ - bonobo_property_bag_add (pb, "folder-info-ready", - PROP_FOLDER_INFO_READY, - BONOBO_ARG_BOOLEAN, NULL, FALSE, - BONOBO_PROPERTY_READABLE | - BONOBO_PROPERTY_WRITEABLE); - - bonobo_object_add_interface (BONOBO_OBJECT (info), BONOBO_OBJECT (pb)); - - /* Add to the folder info list so we can get at them all afterwards */ - folder_infos = g_slist_append (folder_infos, info); - - return BONOBO_OBJECT (info); -} - -void -evolution_folder_info_notify_ready (void) -{ - GSList *p; - - ready = TRUE; - - for (p = folder_infos; p; p = p->next) { - EvolutionFolderInfo *info = p->data; - Bonobo_PropertyBag bag; - - bag = (Bonobo_PropertyBag)bonobo_object_corba_objref(BONOBO_OBJECT(info->pb)); - bonobo_pbclient_set_boolean(bag, "folder-info-ready", ready, NULL); - } -} |