/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */ /* mail-importer.c * * Authors: Iain Holmes * * Copyright (C) 2001 Ximian, Inc. * * 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 #endif #include #include #include #include #include #include #include #include #include #include #include "mail-importer.h" #include "mail-local.h" #include "mail.h" static GList *importer_modules = NULL; extern char *evolution_dir; static GNOME_Evolution_Storage local_storage = NULL; /* Prototype */ void mail_importer_uninit (void); /** * mail_importer_create_folder: * parent_path: The path of the parent folder. * name: The name of the folder to be created. * description: A description of the folder. * listener: A BonoboListener for notification. * * Attempts to create the folder @parent_path/@name. When the folder has been * created, or there is an error, the "evolution-shell:folder-created" event is * emitted on @listener. The BonoboArg that is sent to @listener is a * GNOME_Evolution_Storage_FolderResult which has two elements: result and path. * Result contains the error code, or success, and path contains the complete * physical path to the newly created folder. */ void mail_importer_create_folder (const char *parent_path, const char *name, const char *description, const BonoboListener *listener) { Bonobo_Listener corba_listener; CORBA_Environment ev; char *path, *physical; char *real_description; g_return_if_fail (local_storage != NULL); g_return_if_fail (listener != NULL); g_return_if_fail (BONOBO_IS_LISTENER (listener)); path = g_build_filename(parent_path, name, NULL); physical = g_strdup_printf ("file://%s/local/%s", evolution_dir, parent_path); corba_listener = bonobo_object_corba_objref (BONOBO_OBJECT (listener)); /* Darn CORBA wanting non-NULL values for strings */ real_description = CORBA_string_dup (description ? description : ""); CORBA_exception_init (&ev); GNOME_Evolution_Storage_asyncCreateFolder (local_storage, path, "mail", real_description, physical, corba_listener, &ev); CORBA_exception_free (&ev); g_free (path); g_free (physical); } /** * mail_importer_add_line: * importer: A MailImporter structure. * str: Next line of the mbox. * finished: TRUE if @str is the last line of the message. * * Adds lines to the message until it is finished, and then adds * the complete message to the folder. */ void mail_importer_add_line (MailImporter *importer, const char *str, gboolean finished) { CamelMimeMessage *msg; CamelMessageInfo *info; CamelException *ex; if (importer->mstream == NULL) importer->mstream = CAMEL_STREAM_MEM (camel_stream_mem_new ()); camel_stream_write (CAMEL_STREAM (importer->mstream), str, strlen (str)); if (finished == FALSE) return; camel_stream_reset (CAMEL_STREAM (importer->mstream)); info = g_new0 (CamelMessageInfo, 1); info->flags = CAMEL_MESSAGE_SEEN; msg = camel_mime_message_new (); camel_data_wrapper_construct_from_stream (CAMEL_DATA_WRAPPER (msg), CAMEL_STREAM (importer->mstream)); camel_object_unref (importer->mstream); importer->mstream = NULL; ex = camel_exception_new (); camel_folder_append_message (importer->folder, msg, info, NULL, ex); camel_object_unref (msg); camel_exception_free (ex); g_free (info); } /* module management */ static GList * get_importer_list (void) { DIR *dir; struct dirent *d; GList *importers_ret = NULL; dir = opendir (MAIL_IMPORTERSDIR); if (!dir) { g_warning ("No importers dir: %s", MAIL_IMPORTERSDIR); return NULL; } while ((d = readdir (dir))) { char *path, *ext; ext = strchr (d->d_name, '.'); if (!ext || strcmp (ext, ".so") != 0) continue; path = g_build_filename (MAIL_IMPORTERSDIR, d->d_name, NULL); importers_ret = g_list_prepend (importers_ret, path); } closedir (dir); return importers_ret; } static void free_importer_list (GList *list) { for (; list; list = list->next) { g_free (list->data); } g_list_free (list); } /** * mail_importer_init: * * Initialises all the importers */ void mail_importer_init (EvolutionShellClient *client) { GList *importers, *l; if (importer_modules != NULL) { return; } local_storage = evolution_shell_client_get_local_storage (client); if (!g_module_supported ()) { g_warning ("Could not initialise the importers as module loading" " is not supported on this system"); return; } importers = get_importer_list (); if (importers == NULL) return; for (l = importers; l; l = l->next) { GModule *module; module = g_module_open (l->data, 0); if (!module) { g_warning ("Could not load: %s: %s", (char *) l->data, g_module_error ()); } else { void *(*mail_importer_module_init) (); if (!g_module_symbol (module, "mail_importer_module_init", (gpointer *)&mail_importer_module_init)) { g_warning ("Could not load %s: No initialisation", (char *) l->data); g_module_close (module); } mail_importer_module_init (); importer_modules = g_list_prepend (importer_modules, module); } } free_importer_list (importers); } /** * mail_importer_uninit: * * Unloads all the modules. */ void mail_importer_uninit (void) { CORBA_Environment ev; GList *l; for (l = importer_modules; l; l = l->next) { g_module_close (l->data); } g_list_free (importer_modules); importer_modules = NULL; CORBA_exception_init (&ev); bonobo_object_release_unref (local_storage, &ev); local_storage = NULL; CORBA_exception_free (&ev); } id=3b2293a5710445d755c9ad050d6d58346e6288fe'>root/dns/idnkit