rendered paste body/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- * * Authors: Alexandre Rocha Lima e Marcondes (alexandre@p4tecnologia.com) * * Code based on mark-all-read plugin by Chenthill Palanisamy (pchenthill@novell.com) * * Copyright 2005 P4 Tecnologia e Desenvolvimento Humano Ltda.Novell, Inc. (www.p4tecnologia.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 Street #330, Boston, MA 02111-1307, USA. * */#ifdef HAVE_CONFIG_H#include <config.h>#endif#include <string.h>#include <time.h>#include <glib.h>#include <gtk/gtk.h>#include <gnome.h>#include <libgnome/gnome-i18n.h>#include <e-util/e-config.h>#include <mail/em-config.h>#include <mail/em-popup.h>#include <mail/em-folder-tree.h>#include <mail/em-folder-tree-model.h>#include <mail/mail-ops.h>#include <mail/mail-mt.h>#include <mail/mail-mt.h>#include <mail/mail-ops.h>#include <mail/mail-tools.h>#include <mail/mail-config.h>#include <mail/mail-component.h>#include <camel/camel-vee-folder.h>#include <camel/camel-folder-summary.h>#include <camel/camel-session.h>#include <camel/camel-store.h>#include <camel/camel-folder.h>#include <camel/camel-vee-store.h>#include <camel/camel-vtrash-folder.h>#include <camel/camel-stream-mem.h>#include <camel/camel-file-utils.h>#include <camel/camel-stream-fs.h>#include "e-util/e-error.h"#define GLADE_HOOKUP_OBJECT(component,widget,name) \ g_object_set_data_full (G_OBJECT (component), name, \ gtk_widget_ref (widget), (GDestroyNotify) gtk_widget_unref)#define GLADE_HOOKUP_OBJECT_NO_REF(component,widget,name) \ g_object_set_data (G_OBJECT (component), name, widget)#define GCONF_KEY_ROOT "/apps/evolution/purge_mail/"#define GCONF_KEY_ENABLE "/enable_purge_mail"#define GCONF_KEY_INTERVAL "/delete_older_than"#define VALID_CHARS "1234567890qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM"GtkWidget *common = NULL;struct purge_mail_stuff { gulong vbox_hid; gulong check_hid; gulong spin_hid; GtkWidget *vbox; GtkWidget *check; GtkWidget *spin; gchar *folderuri;};GtkWidget* purge_mail_construct (EConfigHookItemFactoryData *hook_data, EMConfigTargetFolder *target, gchar *folderuri);GtkWidget* org_gnome_purge_mail_factory (EPlugin *ep, EConfigHookItemFactoryData *hook_data);void org_gnome_purge_mail (EPlugin *ep, EMPopupTargetFolder *target);static void purge_got_folder (char *uri, CamelFolder *folder, void *data); static void purge_all_sub_folders (CamelStore *store, CamelFolderInfo *fi, CamelException *ex);static void purge_mail (CamelFolder *folder, CamelFolderInfo *folder_info);static void cleanup_cb (GObject *o, gpointer data);static void enable_purge_mail (GtkWidget *widget, gpointer data);static void set_purge_mail_interval (GtkWidget *widget, gpointer data);void org_gnome_purge_mail (EPlugin *ep, EMPopupTargetFolder *t){ if (t->uri == NULL) { return; } mail_get_folder(t->uri, 0, purge_got_folder, NULL, mail_thread_new);}static voidpurge_mail (CamelFolder *folder, CamelFolderInfo *folder_info){ GConfClient *gconf; gint value; GPtrArray *uids; gboolean active; CamelMessageInfo *info; time_t curtime, msgtime; struct tm *timediff; int i, diff; uids = camel_folder_get_uids (folder); camel_folder_freeze(folder); gconf = gconf_client_get_default (); value = gconf_client_get_int (gconf, g_strconcat(GCONF_KEY_ROOT, g_strcanon(folder_info->uri,VALID_CHARS,'_'), GCONF_KEY_INTERVAL, NULL), NULL); active = gconf_client_get_bool (gconf, g_strconcat(GCONF_KEY_ROOT, g_strcanon(folder_info->uri,VALID_CHARS,'_'), GCONF_KEY_ENABLE, NULL), NULL); if (!active) { camel_folder_thaw(folder); camel_folder_free_uids (folder, uids); g_object_unref (G_OBJECT (gconf)); return; } for (i=0;i<uids->len;i++) { info = camel_folder_get_message_info (folder, uids->pdata[i]); msgtime = camel_message_info_date_received (info); curtime = time (NULL); timediff = localtime (&curtime); diff = timediff->tm_sec + timediff->tm_min * 60 + timediff->tm_hour * 3600; if (difftime(curtime, msgtime) >= (86400 * value)) camel_folder_delete_message (folder, uids->pdata[i]); } camel_folder_thaw(folder); camel_folder_free_uids (folder, uids); g_object_unref (G_OBJECT (gconf)); }static void purge_got_folder (char *uri, CamelFolder *folder, void *data) { CamelFolderInfo *info; CamelStore *store; CamelException ex; gint response; guint32 flags = CAMEL_STORE_FOLDER_INFO_RECURSIVE | CAMEL_STORE_FOLDER_INFO_FAST; camel_exception_init (&ex); store = folder->parent_store; info = camel_store_get_folder_info (store, folder->full_name, flags, &ex); /* FIXME we have to disable the menu item */ if (!folder) return; if (camel_exception_is_set (&ex)) { camel_exception_clear (&ex); return; } if (info && (info->child || info->next)) { response = e_error_run (NULL, "mail:ask-mark-read", NULL); } else { purge_mail (folder, info); return; } if (response == GTK_RESPONSE_NO) { purge_mail (folder, info); } else if (response == GTK_RESPONSE_YES){ purge_all_sub_folders (store, info, &ex); } }static voidpurge_all_sub_folders (CamelStore *store, CamelFolderInfo *fi, CamelException *ex){ while (fi) { CamelFolder *folder; if (fi->child) { purge_all_sub_folders (store, fi->child, ex); if (camel_exception_is_set (ex)) return; } if (!(folder = camel_store_get_folder (store, fi->full_name, 0, ex))) return; if (!CAMEL_IS_VEE_FOLDER (folder)) { purge_mail (folder, fi); } fi = fi->next; }}static voidenable_purge_mail (GtkWidget *widget, gpointer data){ struct purge_mail_stuff *stuff = (struct purge_mail_stuff *) data; GConfClient *gconf; gboolean active; gconf = gconf_client_get_default (); active = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget)); gtk_widget_set_sensitive (GTK_WIDGET(stuff->spin), active); gconf_client_set_bool (gconf, g_strconcat(GCONF_KEY_ROOT, g_strcanon(stuff->folderuri,VALID_CHARS,'_'), GCONF_KEY_ENABLE, NULL), active, NULL); g_object_unref (G_OBJECT (gconf)); }static voidset_purge_mail_interval (GtkWidget *widget, gpointer data){ struct purge_mail_stuff *stuff = (struct purge_mail_stuff *) data; GConfClient *gconf; gint value; gconf = gconf_client_get_default (); value = gtk_spin_button_get_value_as_int (GTK_SPIN_BUTTON (widget)); gconf_client_set_int (gconf, g_strconcat(GCONF_KEY_ROOT, g_strcanon(stuff->folderuri,VALID_CHARS,'_'), GCONF_KEY_INTERVAL, NULL), value, NULL); g_object_unref (G_OBJECT (gconf)); }GtkWidget *org_gnome_purge_mail_factory (EPlugin *ep, EConfigHookItemFactoryData *hook_data){ gchar *folderuri = NULL; gchar *folder_name = NULL; EMConfigTargetFolder *target= (EMConfigTargetFolder *)hook_data->config->target; CamelFolder *folder = target->folder; folder_name = g_strdup (folder->full_name); folderuri = g_strdup(target->uri); /* This is kind of bad..but we don't have types for all these folders.*/ if ( !( strcmp (folder_name, "Mailbox") && strcmp (folder_name, "Calendar") && strcmp (folder_name, "Contacts") && strcmp (folder_name, "Documents") && strcmp (folder_name, "Authored") && strcmp (folder_name, "Default Library") && strcmp (folder_name, "Work In Progress") && strcmp (folder_name, "Cabinet") && strcmp (folder_name, "Sent Items") && strcmp (folder_name, "Trash") && strcmp (folder_name, "Checklist"))) { g_free (folderuri); return NULL; } common = NULL; common = purge_mail_construct(hook_data, target, folderuri); gtk_notebook_append_page((GtkNotebook *) hook_data->parent, (GtkWidget *) common, gtk_label_new_with_mnemonic N_("Purge")); return GTK_WIDGET (common);}GtkWidget*purge_mail_construct (EConfigHookItemFactoryData *hook_data, EMConfigTargetFolder *target, gchar *folderuri){ GConfClient *gconf; gconf = gconf_client_get_default (); GtkWidget *vboxPurged2 = NULL; GtkWidget *check_enabled = NULL; GtkWidget *vbox194 = NULL; GtkWidget *hbox227 = NULL; GtkWidget *lbl = NULL; GtkWidget *lblDaysOld1 = NULL; GtkWidget *lblDaysOld2 = NULL; GtkObject *spbDays_adj = NULL; GtkWidget *spbDays = NULL; struct purge_mail_stuff *stuff; stuff = g_new0 (struct purge_mail_stuff, 1); stuff->folderuri = folderuri; vboxPurged2 = gtk_vbox_new (FALSE, 6); gtk_widget_show (vboxPurged2); lbl = gtk_label_new (_(" ")); gtk_widget_show (lbl); gtk_box_pack_start (GTK_BOX (vboxPurged2), lbl, FALSE, FALSE, 0); check_enabled = gtk_check_button_new_with_mnemonic (_("Purge _old mail")); gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check_enabled), gconf_client_get_bool (gconf, g_strconcat(GCONF_KEY_ROOT, g_strcanon(folderuri,VALID_CHARS,'_'), GCONF_KEY_ENABLE, NULL), NULL)); stuff->check_hid = g_signal_connect (GTK_TOGGLE_BUTTON (check_enabled), "toggled", G_CALLBACK (enable_purge_mail), stuff); gtk_box_pack_start (GTK_BOX (vboxPurged2), check_enabled, FALSE, FALSE, 0); stuff->check = check_enabled; vbox194 = gtk_vbox_new (FALSE, 0); gtk_widget_show (vbox194); gtk_box_pack_start (GTK_BOX (vboxPurged2), vbox194, FALSE, FALSE, 0); hbox227 = gtk_hbox_new (FALSE, 0); gtk_widget_show (hbox227); gtk_box_pack_start (GTK_BOX (vbox194), hbox227, TRUE, TRUE, 0); lblDaysOld1 = gtk_label_new (_("Delete messages older than ")); gtk_widget_show (lblDaysOld1); gtk_box_pack_start (GTK_BOX (hbox227), lblDaysOld1, FALSE, FALSE, 0); spbDays_adj = gtk_adjustment_new (30, 0, 9999, 1, 10, 10); spbDays = gtk_spin_button_new (GTK_ADJUSTMENT (spbDays_adj), 1, 0); gtk_spin_button_set_value (GTK_SPIN_BUTTON (spbDays), gconf_client_get_int (gconf, g_strconcat(GCONF_KEY_ROOT,g_strcanon(folderuri,VALID_CHARS,'_'), GCONF_KEY_INTERVAL, NULL), NULL)); gtk_widget_set_sensitive (GTK_WIDGET(spbDays), gconf_client_get_bool (gconf, g_strconcat(GCONF_KEY_ROOT, g_strcanon(folderuri,VALID_CHARS,'_'), GCONF_KEY_ENABLE, NULL), NULL)); stuff->spin_hid = g_signal_connect (GTK_SPIN_BUTTON (spbDays), "value-changed", G_CALLBACK (set_purge_mail_interval), stuff); gtk_widget_show (spbDays); gtk_box_pack_start (GTK_BOX (hbox227), spbDays, TRUE, TRUE, 0); stuff->spin = spbDays; lblDaysOld2 = gtk_label_new (_(" days")); gtk_widget_show (lblDaysOld2); gtk_box_pack_start (GTK_BOX (hbox227), lblDaysOld2, FALSE, FALSE, 0); stuff->vbox_hid = g_signal_connect (vboxPurged2, "destroy", G_CALLBACK (cleanup_cb), stuff); g_object_unref (G_OBJECT (gconf)); gtk_widget_show_all (vboxPurged2); return GTK_WIDGET (vboxPurged2);}static voidcleanup_cb (GObject *o, gpointer data){ struct purge_mail_stuff *stuff = data; if (g_signal_handler_is_connected (stuff->vbox, stuff->vbox_hid)) g_signal_handler_disconnect (stuff->vbox, stuff->vbox_hid); if (g_signal_handler_is_connected (stuff->spin, stuff->spin_hid)) g_signal_handler_disconnect (stuff->spin, stuff->spin_hid); if (g_signal_handler_is_connected (stuff->check, stuff->check_hid)) g_signal_handler_disconnect (stuff->check, stuff->check_hid); g_free (stuff->folderuri); g_free (stuff);}