aboutsummaryrefslogtreecommitdiffstats
path: root/plugins
diff options
context:
space:
mode:
authorRodrigo Moya <rodrigo@novell.com>2004-10-29 19:20:06 +0800
committerRodrigo Moya <rodrigo@src.gnome.org>2004-10-29 19:20:06 +0800
commit4d692c745d7011cead7fa444b704f7eee745bfee (patch)
tree476d0289ec32cfdadf481c41447140a0f47dc2b2 /plugins
parent1f9e3b3e28c3154c826055f8e6dd6412f2a84758 (diff)
downloadgsoc2013-evolution-4d692c745d7011cead7fa444b704f7eee745bfee.tar.gz
gsoc2013-evolution-4d692c745d7011cead7fa444b704f7eee745bfee.tar.zst
gsoc2013-evolution-4d692c745d7011cead7fa444b704f7eee745bfee.zip
added mail-to-meeting plugin, to convert mails to meetings.
2004-10-29 Rodrigo Moya <rodrigo@novell.com> * added mail-to-meeting plugin, to convert mails to meetings. svn path=/trunk/; revision=27766
Diffstat (limited to 'plugins')
-rw-r--r--plugins/mail-to-meeting/.cvsignore5
-rw-r--r--plugins/mail-to-meeting/ChangeLog3
-rw-r--r--plugins/mail-to-meeting/Makefile.am11
-rw-r--r--plugins/mail-to-meeting/mail-to-meeting.c179
-rw-r--r--plugins/mail-to-meeting/org-gnome-mail-to-meeting.eplug.in24
5 files changed, 222 insertions, 0 deletions
diff --git a/plugins/mail-to-meeting/.cvsignore b/plugins/mail-to-meeting/.cvsignore
new file mode 100644
index 0000000000..683d5ddbe2
--- /dev/null
+++ b/plugins/mail-to-meeting/.cvsignore
@@ -0,0 +1,5 @@
+.deps
+.libs
+Makefile
+Makefile.in
+*.eplug \ No newline at end of file
diff --git a/plugins/mail-to-meeting/ChangeLog b/plugins/mail-to-meeting/ChangeLog
new file mode 100644
index 0000000000..e23ad66d01
--- /dev/null
+++ b/plugins/mail-to-meeting/ChangeLog
@@ -0,0 +1,3 @@
+2004-10-29 Rodrigo Moya <rodrigo@novell.com>
+
+ * added mail-to-meeting plugin, to convert mails to meetings.
diff --git a/plugins/mail-to-meeting/Makefile.am b/plugins/mail-to-meeting/Makefile.am
new file mode 100644
index 0000000000..74eedc5dca
--- /dev/null
+++ b/plugins/mail-to-meeting/Makefile.am
@@ -0,0 +1,11 @@
+INCLUDES = \
+ -I$(top_srcdir) \
+ $(EVOLUTION_MAIL_CFLAGS)
+
+@EVO_PLUGIN_RULE@
+
+plugin_DATA = org-gnome-mail-to-meeting.eplug
+plugin_LTLIBRARIES = liborg-gnome-mail-to-meeting.la
+
+liborg_gnome_mail_to_meeting_la_SOURCES = mail-to-meeting.c
+liborg_gnome_mail_to_meeting_la_LDFLAGS = -module -avoid-version
diff --git a/plugins/mail-to-meeting/mail-to-meeting.c b/plugins/mail-to-meeting/mail-to-meeting.c
new file mode 100644
index 0000000000..4c358fe61a
--- /dev/null
+++ b/plugins/mail-to-meeting/mail-to-meeting.c
@@ -0,0 +1,179 @@
+/* Evolution - Mail To Meeting plugin
+ *
+ * Copyright (C) 2004 Ximian, Inc.
+ *
+ * Authors: Rodrigo Moya <rodrigo@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.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <glib/gi18n-lib.h>
+#include <string.h>
+#include <stdio.h>
+
+#include <gconf/gconf-client.h>
+#include <libecal/e-cal.h>
+#include <libedataserverui/e-source-selector-dialog.h>
+#include "camel/camel-folder.h"
+#include "camel/camel-mime-message.h"
+#include "mail/em-popup.h"
+
+static void
+add_attendee_cb (gpointer key, gpointer value, gpointer user_data)
+{
+ ECalComponentAttendee *ca;
+ const char *str, *name;
+ GList **attendees = user_data;
+
+ if (!camel_internet_address_get (value, 0, &name, &str))
+ return;
+
+ ca = g_new0 (ECalComponentAttendee, 1);
+ ca->value = str;
+ ca->cn = name;
+ /* FIXME: missing many fields */
+
+ *attendees = g_slist_append (*attendees, ca);
+}
+
+static void
+set_attendees (ECalComponent *comp, CamelMimeMessage *message)
+{
+ GSList *attendees = NULL, *l;
+
+ g_hash_table_foreach (message->recipients, (GHFunc) add_attendee_cb, &attendees);
+ e_cal_component_set_attendee_list (comp, attendees);
+
+ for (l = attendees; l != NULL; l = l->next)
+ g_free (l->data);
+ g_slist_free (attendees);
+}
+
+static void
+set_organizer (ECalComponent *comp, CamelMimeMessage *message)
+{
+ const CamelInternetAddress *address;
+ const char *str, *name;
+ ECalComponentOrganizer organizer = {NULL, NULL, NULL, NULL};
+
+ if (message->reply_to)
+ address = message->reply_to;
+ else if (message->from)
+ address = message->from;
+ else
+ return;
+
+ if (!camel_internet_address_get (address, 0, &name, &str))
+ return;
+
+ organizer.value = str;
+ organizer.cn = name;
+ e_cal_component_set_organizer (comp, &organizer);
+}
+
+static void
+do_mail_to_meeting (EMPopupTargetSelect *t, ESource *meeting_source)
+{
+ ECal *client;
+
+ /* open the meeting client */
+ client = e_cal_new (meeting_source, E_CAL_SOURCE_TYPE_EVENT);
+ if (e_cal_open (client, FALSE, NULL)) {
+ int i;
+
+ for (i = 0; i < (t->uids ? t->uids->len : 0); i++) {
+ CamelMimeMessage *message;
+ ECalComponent *comp;
+ ECalComponentText text;
+ GSList sl;
+ char *str;
+
+ /* retrieve the message from the CamelFolder */
+ message = camel_folder_get_message (t->folder, g_ptr_array_index (t->uids, i), NULL);
+ if (!message)
+ continue;
+
+ comp = e_cal_component_new ();
+ e_cal_component_set_new_vtype (comp, E_CAL_COMPONENT_EVENT);
+ e_cal_component_set_uid (comp, camel_mime_message_get_message_id (message));
+
+ /* set the meeting's summary */
+ text.value = camel_mime_message_get_subject (message);
+ text.altrep = NULL;
+ e_cal_component_set_summary (comp, &text);
+
+ /* FIXME: a better way to get the full body */
+ str = camel_mime_message_build_mbox_from (message);
+ text.value = str;
+ sl.next = NULL;
+ sl.data = &text;
+ e_cal_component_set_description_list (comp, &sl);
+
+ g_free (str);
+
+ /* set the organizer, and the attendees */
+ set_organizer (comp, message);
+ set_attendees (comp, message);
+
+ /* save the meeting to the selected source */
+ e_cal_create_object (client, e_cal_component_get_icalcomponent (comp), NULL, NULL);
+
+ g_object_unref (comp);
+ }
+ }
+
+ /* free memory */
+ g_object_unref (client);
+}
+
+void org_gnome_mail_to_meeting (void *ep, EMPopupTargetSelect *t);
+
+void
+org_gnome_mail_to_meeting (void *ep, EMPopupTargetSelect *t)
+{
+ GtkWidget *dialog;
+ GConfClient *conf_client;
+ ESourceList *source_list;
+
+ /* ask the user which meeting list to save to */
+ conf_client = gconf_client_get_default ();
+ source_list = e_source_list_new_for_gconf (conf_client, "/apps/evolution/calendar/sources");
+
+ dialog = e_source_selector_dialog_new (NULL, source_list);
+
+ if (gtk_dialog_run (GTK_DIALOG (dialog)) == GTK_RESPONSE_OK) {
+ ESource *source;
+
+ /* if a source has been selected, perform the mail2meeting operation */
+ source = e_source_selector_dialog_peek_primary_selection (E_SOURCE_SELECTOR_DIALOG (dialog));
+ if (source)
+ do_mail_to_meeting (t, source);
+ }
+
+ g_object_unref (conf_client);
+ g_object_unref (source_list);
+ gtk_widget_destroy (dialog);
+}
+
+int e_plugin_lib_enable(EPluginLib *ep, int enable);
+
+int
+e_plugin_lib_enable(EPluginLib *ep, int enable)
+{
+ return 0;
+}
diff --git a/plugins/mail-to-meeting/org-gnome-mail-to-meeting.eplug.in b/plugins/mail-to-meeting/org-gnome-mail-to-meeting.eplug.in
new file mode 100644
index 0000000000..de76273764
--- /dev/null
+++ b/plugins/mail-to-meeting/org-gnome-mail-to-meeting.eplug.in
@@ -0,0 +1,24 @@
+<?xml version="1.0"?>
+<e-plugin-list>
+ <e-plugin
+ type="shlib"
+ id="org.gnome.evolution.plugin.mailToMeeting"
+ location="@PLUGINDIR@/liborg-gnome-mail-to-meeting.so"
+ name="Convert a mail message into a meeting"
+ description="A plugin which allows the creation of meetings from the contents of a mail message">
+
+ <!-- hook into the uri popup menu -->
+ <hook class="org.gnome.evolution.mail.popup:1.0">
+ <menu id="org.gnome.evolution.mail.folderview.popup" target="select">
+ <item
+ type="item"
+ path="72.mail_to_meeting"
+ icon="stock_appointment"
+ label="Con_vert to Meeting"
+ enable="one"
+ visible="one"
+ activate="org_gnome_mail_to_meeting"/>
+ </menu>
+ </hook>
+ </e-plugin>
+</e-plugin-list>