/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
* evolution-sendmail.c -
* Copyright (C) 2002, Ximian, Inc.
*
* Authors:
* Christopher James Lahey <clahey@ximian.com>
*
* This file 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 file 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 file; if not, write to
* the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
**/
#include <config.h>
#include <Evolution-Composer.h>
#include <string.h>
#include <gal/util/e-util.h>
#include <bonobo-activation/bonobo-activation.h>
#include <gtk/gtkmain.h>
#include <bonobo/bonobo-main.h>
#include <libgnome/gnome-i18n.h>
#include <libgnomeui/gnome-ui-init.h>
#include <libgnomevfs/gnome-vfs-ops.h>
#include <libgnomevfs/gnome-vfs-uri.h>
#include <libgnomevfs/gnome-vfs-utils.h>
#include <libgnomevfs/gnome-vfs-xfer.h>
#include <libgnomevfs/gnome-vfs-init.h>
#define READ_CHUNK_SIZE 8192
#define E_SHELL_OAFIID "OAFIID:GNOME_Evolution_Shell"
#define COMPOSER_OAFIID "OAFIID:GNOME_Evolution_Mail_Composer"
#define NOTNULL(x) ((x) ? (x) : "")
typedef struct {
char *filename;
char *basename;
char *content;
int size;
char *description;
char *content_type;
gboolean show_inline;
} attachment_t;
GList *attachments; /* Of type attachment_t */
char *subject;
static void
free_attachment (attachment_t *attachment)
{
g_free (attachment->content);
g_free (attachment->filename);
g_free (attachment->basename);
g_free (attachment->content_type);
g_free (attachment->description);
g_free (attachment);
}
static GnomeVFSResult
elc_read_entire_file (const char *uri,
int *file_size,
char **file_contents,
char **content_type)
{
GnomeVFSResult result;
GnomeVFSHandle *handle;
char *buffer;
GnomeVFSFileSize total_bytes_read;
GnomeVFSFileSize bytes_read;
*file_size = 0;
*file_contents = NULL;
/* Open the file. */
result = gnome_vfs_open (&handle, uri, GNOME_VFS_OPEN_READ);
if (result != GNOME_VFS_OK) {
return result;
}
/* Read the whole thing. */
buffer = NULL;
total_bytes_read = 0;
do {
buffer = g_realloc (buffer, total_bytes_read + READ_CHUNK_SIZE);
result = gnome_vfs_read (handle,
buffer + total_bytes_read,
READ_CHUNK_SIZE,
&bytes_read);
if (result != GNOME_VFS_OK && result != GNOME_VFS_ERROR_EOF) {
g_free (buffer);
gnome_vfs_close (handle);
return result;
}
/* Check for overflow. */
if (total_bytes_read + bytes_read < total_bytes_read) {
g_free (buffer);
gnome_vfs_close (handle);
return GNOME_VFS_ERROR_TOO_BIG;
}
total_bytes_read += bytes_read;
} while (result == GNOME_VFS_OK);
if (content_type) {
GnomeVFSFileInfo *info;
info = gnome_vfs_file_info_new ();
result = gnome_vfs_get_file_info_from_handle (handle, info,
GNOME_VFS_FILE_INFO_GET_MIME_TYPE |
GNOME_VFS_FILE_INFO_FOLLOW_LINKS);
if (result == GNOME_VFS_OK)
*content_type = g_strdup (gnome_vfs_file_info_get_mime_type (info));
else
*content_type = g_strdup ("application/octet-stream");
gnome_vfs_file_info_unref (info);
}
/* Close the file. */
result = gnome_vfs_close (handle);
if (result != GNOME_VFS_OK) {
g_free (buffer);
return result;
}
/* Return the file. */
*file_size = total_bytes_read;
*file_contents = g_realloc (buffer, total_bytes_read);
return GNOME_VFS_OK;
}
static void
do_send (GNOME_Evolution_Composer composer_server)
{
CORBA_Environment ev;
GNOME_Evolution_Composer_AttachmentData *attach_data;
GNOME_Evolution_Composer_RecipientList *to_list, *cc_list, *bcc_list;
CORBA_exception_init (&ev);
attachments = g_list_reverse (attachments);
while (attachments) {
attachment_t *attachment = attachments->data;
GList *temp;
attach_data = GNOME_Evolution_Composer_AttachmentData__alloc();
attach_data->_maximum = attach_data->_length = attachment->size;
attach_data->_buffer = CORBA_sequence_CORBA_char_allocbuf (attach_data->_length);
strcpy (attach_data->_buffer, attachment->content);
GNOME_Evolution_Composer_attachData (composer_server,
NOTNULL (attachment->content_type),
NOTNULL (attachment->basename),
NOTNULL (attachment->description),
attachment->show_inline,
attach_data,
&ev);
if (ev._major != CORBA_NO_EXCEPTION) {
g_printerr ("evolution-sendmail.c: I couldn't attach data to the composer via CORBA! Aagh.\n");
CORBA_exception_free (&ev);
return;
}
CORBA_free (attach_data);
free_attachment (attachment);
temp = attachments;
attachments = g_list_remove_link (attachments, attachments);
g_list_free_1 (temp);
}
to_list = GNOME_Evolution_Composer_RecipientList__alloc ();
to_list->_maximum = to_list->_length = 0;
cc_list = GNOME_Evolution_Composer_RecipientList__alloc ();
cc_list->_maximum = cc_list->_length = 0;
bcc_list = GNOME_Evolution_Composer_RecipientList__alloc ();
bcc_list->_maximum = bcc_list->_length = 0;
GNOME_Evolution_Composer_setHeaders (composer_server, "", to_list, cc_list, bcc_list, NOTNULL (subject), &ev);
CORBA_free (to_list);
CORBA_free (cc_list);
CORBA_free (bcc_list);
GNOME_Evolution_Composer_show (composer_server, &ev);
if (ev._major != CORBA_NO_EXCEPTION) {
g_printerr ("evolution-sendmail.c: I couldn't show the composer via CORBA! Aagh.\n");
CORBA_exception_free (&ev);
return;
}
CORBA_exception_free (&ev);
}
static GNOME_Evolution_Composer
get_composer ()
{
CORBA_Object shell;
GNOME_Evolution_Composer composer;
/* First, I obtain an object reference that represents the Shell, to make sure it's running. */
shell = bonobo_activation_activate_from_id (E_SHELL_OAFIID, 0, NULL, NULL);
printf ("shell == %p\n", shell);
g_return_val_if_fail (shell != CORBA_OBJECT_NIL, NULL);
/* Next, I obtain an object reference that represents the Composer. */
composer = bonobo_activation_activate_from_id (COMPOSER_OAFIID, 0, NULL, NULL);
printf ("composer == %p\n", composer);
return composer;
}
static gboolean
composer_timeout (gpointer data)
{
GNOME_Evolution_Composer composer;
composer = get_composer ();
if (composer != CORBA_OBJECT_NIL) {
do_send (composer);
gtk_main_quit ();
return FALSE;
} else {
return TRUE;
}
}
static void
cb (poptContext con,
enum poptCallbackReason reason,
/*@null@*/ const struct poptOption * opt,
/*@null@*/ const char * arg,
/*@null@*/ const void * data)
{
const char *name = opt->longName;
if (!strcmp (name, "add-attachment")) {
attachment_t *new_attach = g_new (attachment_t, 1);
new_attach->filename = g_strdup (arg);
new_attach->basename = strrchr (new_attach->filename, '/');
if (new_attach->basename)
new_attach->basename ++;
else
new_attach->basename = new_attach->filename;
new_attach->basename = g_strdup (new_attach->basename);
if (new_attach->filename)
elc_read_entire_file (new_attach->filename,
&new_attach->size,
&new_attach->content,
&new_attach->content_type);
new_attach->description = NULL;
new_attach->show_inline = FALSE;
if (new_attach->content) {
attachments = g_list_prepend (attachments, new_attach);
} else {
free_attachment (new_attach);
}
} else if (!strcmp (name, "file-name")) {
if (attachments) {
attachment_t *attachment = attachments->data;
g_free (attachment->basename);
attachment->basename = g_strdup (arg);
} else {
}
} else if (!strcmp (name, "content-type")) {
if (attachments) {
attachment_t *attachment = attachments->data;
if (attachment->content_type) {
}
attachment->content_type = g_strdup (arg);
} else {
}
} else if (!strcmp (name, "description")) {
if (attachments) {
attachment_t *attachment = attachments->data;
if (attachment->description) {
}
attachment->description = g_strdup (arg);
} else {
}
} else if (!strcmp (name, "show-inline")) {
if (attachments) {
attachment_t *attachment = attachments->data;
if (attachment->show_inline) {
}
attachment->show_inline = TRUE;
} else {
}
}
}
static struct poptOption cap_options[] = {
{ NULL, '\0', POPT_ARG_CALLBACK, cb, 0, NULL, NULL },
{ "add-attachment", 'a', POPT_ARG_STRING, NULL, 0, N_("An attachment to add."), NULL },
{ "content-type", 't', POPT_ARG_STRING, NULL, 0, N_("Content type of the attachment."), NULL },
{ "file-name", 'f', POPT_ARG_STRING, NULL, 0, N_("The filename to display in the mail."), NULL },
{ "description", 'd', POPT_ARG_STRING, NULL, 0, N_("Description of the attachment."), NULL },
{ "show-inline", 'i', POPT_ARG_NONE, NULL, 0, N_("Mark attachment to be shown inline by default."), NULL },
{ "subject", 's', POPT_ARG_STRING, &subject, 0, N_("Default subject for the message."), NULL },
{ NULL, '\0', 0, NULL, 0 }
};
int
main(int argc, char *argv[])
{
GNOME_Evolution_Composer composer;
bindtextdomain (PACKAGE, EVOLUTION_LOCALEDIR);
textdomain (PACKAGE);
gnome_program_init ("evolution-launch-composer", VERSION,
LIBGNOMEUI_MODULE, argc, argv,
GNOME_PROGRAM_STANDARD_PROPERTIES,
GNOME_PARAM_POPT_TABLE, cap_options,
NULL);
composer = get_composer ();
if (composer != CORBA_OBJECT_NIL) {
do_send (composer);
} else {
g_timeout_add(1000, composer_timeout, NULL);
bonobo_main ();
}
return 0;
}
