/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*-
*
* Authors: Chenthill Palanisamy (pchenthill@novell.com)
*
* Copyright 2004 Novell, Inc. (www.novell.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 <libgnome/gnome-i18n.h>
#include <glade/glade.h>
#include <gtk/gtk.h>
#include "mail/em-account-editor.h"
#include "mail/em-config.h"
#include "e-util/e-account.h"
#include <widgets/misc/e-send-options.h>
#include <mail/em-config.h>
#include <e-gw-connection.h>
#include <camel/camel-url.h>
#include <libecal/e-cal-time-util.h>
#include <libedataserver/e-source-list.h>
#include <libedataserverui/e-passwords.h>
ESendOptionsDialog *sod = NULL;
GtkWidget *parent;
EGwConnection *n_cnc;
EGwSendOptions *opts = NULL;
gboolean changed = FALSE;
EAccount *account;
GtkWidget* org_gnome_send_options (EPlugin *epl, EConfigHookItemFactoryData *data);
void send_options_commit (EPlugin *epl, EConfigHookItemFactoryData *data);
void send_options_changed (EPlugin *epl, EConfigHookItemFactoryData *data);
void send_options_abort (EPlugin *epl, EConfigHookItemFactoryData *data);
static EGwConnection *
get_cnc ()
{
EGwConnection *cnc;
char *uri, *failed_auth, *key, *prompt, *password = NULL;
CamelURL *url;
const char *poa_address, *use_ssl, *soap_port;
gboolean remember;
url = camel_url_new (account->source->url, NULL);
if (url == NULL)
return NULL;
poa_address = url->host;
if (!poa_address || strlen (poa_address) ==0)
return NULL;
soap_port = camel_url_get_param (url, "soap_port");
if (!soap_port || strlen (soap_port) == 0)
soap_port = "7191";
use_ssl = camel_url_get_param (url, "use_ssl");
key = g_strdup_printf ("groupwise://%s@%s/", url->user, poa_address);
if (!g_str_equal (use_ssl, "never"))
uri = g_strdup_printf ("https://%s:%s/soap", poa_address, soap_port);
else
uri = g_strdup_printf ("http://%s:%s/soap", poa_address, soap_port);
failed_auth = "";
cnc = NULL;
prompt = g_strdup_printf (_("%sEnter password for %s (user %s)"),
failed_auth, poa_address, url->user);
password = e_passwords_get_password ("Groupwise", key);
if (!password)
password = e_passwords_ask_password (prompt, "Groupwise", key, prompt,
E_PASSWORDS_REMEMBER_FOREVER|E_PASSWORDS_SECRET, &remember, NULL);
g_free (prompt);
cnc = e_gw_connection_new (uri, url->user, password);
if (!E_IS_GW_CONNECTION(cnc) && use_ssl && g_str_equal (use_ssl, "when-possible")) {
char *http_uri = g_strconcat ("http://", uri + 8, NULL);
cnc = e_gw_connection_new (http_uri, url->user, password);
g_free (http_uri);
}
camel_url_free (url);
return cnc;
}
static void
e_send_options_load_general_opts (ESendOptionsGeneral *gopts, EGwSendOptionsGeneral *ggopts)
{
time_t temp;
temp = time (NULL);
gopts->priority = ggopts->priority;
gopts->reply_enabled = ggopts->reply_enabled;
gopts->reply_convenient = ggopts->reply_convenient;
gopts->reply_within = ggopts->reply_within;
gopts->expiration_enabled = ggopts->expiration_enabled;
gopts->expire_after = ggopts->expire_after;
gopts->delay_enabled = ggopts->delay_enabled;
/* TODO convert int to timet comparing the current day */
if (ggopts->delay_until) {
gopts->delay_until = time_add_day_with_zone (temp, ggopts->delay_until, NULL);
} else
gopts->delay_until = 0;
}
static void
e_send_options_load_status_options (ESendOptionsStatusTracking *sopts, EGwSendOptionsStatusTracking *gsopts)
{
sopts->tracking_enabled = gsopts->tracking_enabled;
sopts->track_when = gsopts->track_when;
sopts->autodelete = gsopts->autodelete;
sopts->opened = gsopts->opened;
sopts->accepted = gsopts->accepted;
sopts->declined = gsopts->declined;
sopts->completed = gsopts->completed;
}
static void
e_send_options_load_default_data (EGwSendOptions *opts, ESendOptionsDialog *sod)
{
EGwSendOptionsGeneral *ggopts;
EGwSendOptionsStatusTracking *gmopts;
EGwSendOptionsStatusTracking *gcopts;
EGwSendOptionsStatusTracking *gtopts;
ggopts = e_gw_sendoptions_get_general_options (opts);
gmopts = e_gw_sendoptions_get_status_tracking_options (opts, "mail");
gcopts = e_gw_sendoptions_get_status_tracking_options (opts, "calendar");
gtopts = e_gw_sendoptions_get_status_tracking_options (opts, "task");
e_send_options_load_general_opts (sod->data->gopts, ggopts);
e_send_options_load_status_options (sod->data->mopts, gmopts);
e_send_options_load_status_options (sod->data->copts, gcopts);
e_send_options_load_status_options (sod->data->topts, gtopts);
}
static void
e_sendoptions_clicked_cb (GtkWidget *button, gpointer data)
{
EGwConnectionStatus status;
account = (EAccount *) data;
if (!sod) {
sod = e_sendoptions_dialog_new ();
e_sendoptions_set_global (sod, TRUE);
if (!n_cnc)
n_cnc = get_cnc ();
if (!n_cnc) {
g_warning ("Send Options: Could not get the connection to the server \n");
return;
}
status = e_gw_connection_get_settings (n_cnc, &opts);
if (status == E_GW_CONNECTION_STATUS_INVALID_CONNECTION)
status = e_gw_connection_get_settings (n_cnc, &opts);
if (status != E_GW_CONNECTION_STATUS_OK) {
g_warning ("Send Options: Could not get the settings from the server");
return;
}
e_send_options_load_default_data (opts, sod);
}
if (n_cnc)
e_sendoptions_dialog_run (sod, parent ? parent : NULL, E_ITEM_NONE);
else
return;
}
GtkWidget *
org_gnome_send_options (EPlugin *epl, EConfigHookItemFactoryData *data)
{
EMConfigTargetAccount *target_account;
GtkWidget *frame, *button, *label, *vbox;
target_account = (EMConfigTargetAccount *)data->config->target;
account = target_account->account;
if(!g_strrstr (account->source->url, "groupwise://"))
return NULL;
vbox = gtk_vbox_new (FALSE, 0);
frame = gtk_frame_new ("");
label = gtk_frame_get_label_widget (GTK_FRAME (frame));
gtk_label_set_markup (GTK_LABEL (label), "<b>Send Options</b>");
button = gtk_button_new_with_label ("Advanced send options");
gtk_widget_show (button);
g_signal_connect(button, "clicked",
G_CALLBACK (e_sendoptions_clicked_cb), account);
parent = gtk_widget_get_toplevel (GTK_WIDGET (data->parent));
if (!GTK_WIDGET_TOPLEVEL (parent))
parent = NULL;
gtk_widget_set_size_request (button, 10, -1);
gtk_box_pack_start (GTK_BOX (vbox), frame, 0, 0, 0);
gtk_container_add (GTK_CONTAINER (frame), button);
gtk_frame_set_shadow_type (GTK_FRAME (frame), GTK_SHADOW_NONE);
gtk_widget_show (frame);
gtk_box_set_spacing (GTK_BOX (data->parent), 12);
gtk_box_pack_start (GTK_BOX (data->parent), vbox, FALSE, FALSE, 0);
return vbox;
}
static void
send_options_finalize ()
{
if (n_cnc) {
g_object_unref (n_cnc);
n_cnc = NULL;
}
if (sod) {
g_object_unref (sod);
sod = NULL;
}
if (opts) {
g_object_unref (opts);
opts = NULL;
}
}
static void
e_send_options_copy_general_opts (ESendOptionsGeneral *gopts, EGwSendOptionsGeneral *ggopts)
{
time_t temp;
temp = time (NULL);
ggopts->priority = gopts->priority;
ggopts->reply_enabled = gopts->reply_enabled;
ggopts->reply_convenient = gopts->reply_convenient;
ggopts->reply_within = gopts->reply_within;
ggopts->expire_after = gopts->expire_after;
if (gopts->expire_after == 0) {
ggopts->expiration_enabled = FALSE;
gopts->expiration_enabled = FALSE;
} else
ggopts->expiration_enabled = gopts->expiration_enabled;
ggopts->delay_enabled = gopts->delay_enabled;
if (gopts->delay_until) {
int diff;
icaltimetype temp, current;
temp = icaltime_from_timet (gopts->delay_until, 0);
current = icaltime_today ();
diff = temp.day - current.day;
ggopts->delay_until = diff;
} else
ggopts->delay_until = 0;
}
static void
e_send_options_copy_status_options (ESendOptionsStatusTracking *sopts, EGwSendOptionsStatusTracking *gsopts)
{
gsopts->tracking_enabled = sopts->tracking_enabled;
gsopts->track_when = sopts->track_when;
gsopts->autodelete = sopts->autodelete;
gsopts->opened = sopts->opened;
gsopts->accepted = sopts->accepted;
gsopts->declined = sopts->declined;
gsopts->completed = sopts->completed;
}
static gboolean
check_status_options_changed (EGwSendOptionsStatusTracking *n_sopts, EGwSendOptionsStatusTracking *o_sopts)
{
return (!(n_sopts->tracking_enabled == o_sopts->tracking_enabled
&& n_sopts->track_when == o_sopts->track_when
&& n_sopts->autodelete == o_sopts->autodelete
&& n_sopts->opened == o_sopts->opened
&& n_sopts->declined == o_sopts->declined
&& n_sopts->accepted == o_sopts->accepted
&& n_sopts->completed == o_sopts->completed));
}
static gboolean
check_general_changed (EGwSendOptionsGeneral *n_gopts, EGwSendOptionsGeneral *o_gopts)
{
return (!(n_gopts->priority == o_gopts->priority
&& n_gopts->delay_enabled == o_gopts->delay_enabled
&& n_gopts->delay_until == o_gopts->delay_until
&& n_gopts->reply_enabled == o_gopts->reply_enabled
&& n_gopts->reply_convenient == o_gopts->reply_convenient
&& n_gopts->reply_within == o_gopts->reply_within
&& n_gopts->expiration_enabled == o_gopts->expiration_enabled
&& n_gopts->expire_after == o_gopts->expire_after));
}
static void
send_options_copy_check_changed (EGwSendOptions *n_opts)
{
EGwSendOptionsGeneral *ggopts, *o_gopts;
EGwSendOptionsStatusTracking *gmopts, *o_gmopts ;
EGwSendOptionsStatusTracking *gcopts, *o_gcopts;
EGwSendOptionsStatusTracking *gtopts, *o_gtopts;
ggopts = e_gw_sendoptions_get_general_options (n_opts);
gmopts = e_gw_sendoptions_get_status_tracking_options (n_opts, "mail");
gcopts = e_gw_sendoptions_get_status_tracking_options (n_opts, "calendar");
gtopts = e_gw_sendoptions_get_status_tracking_options (n_opts, "task");
o_gopts = e_gw_sendoptions_get_general_options (opts);
o_gmopts = e_gw_sendoptions_get_status_tracking_options (opts, "mail");
o_gcopts = e_gw_sendoptions_get_status_tracking_options (opts, "calendar");
o_gtopts = e_gw_sendoptions_get_status_tracking_options (opts, "task");
e_send_options_copy_general_opts (sod->data->gopts, ggopts);
e_send_options_copy_status_options (sod->data->mopts, gmopts);
e_send_options_copy_status_options (sod->data->copts, gcopts);
e_send_options_copy_status_options (sod->data->topts, gtopts);
if (check_general_changed (ggopts, o_gopts))
changed = TRUE;
if (check_status_options_changed (gmopts, o_gmopts))
changed = TRUE;
if (check_status_options_changed (gcopts, o_gcopts))
changed = TRUE;
if (check_status_options_changed (gtopts, o_gtopts))
changed = TRUE;
}
static ESource *
get_source (ESourceList *list)
{
GSList *p, *l;
char **temp = g_strsplit (account->source->url, ";", -1);
char *uri = temp [0];
l = e_source_list_peek_groups (list);
for (p = l; p != NULL; p = p->next) {
char *so_uri;
GSList *r, *s;
ESourceGroup *group = E_SOURCE_GROUP (p->data);
s = e_source_group_peek_sources (group);
for (r = s; r != NULL; r = r->next) {
ESource *so = E_SOURCE (r->data);
so_uri = e_source_get_uri (so);
if (so_uri) {
if (!strcmp (so_uri, uri)) {
g_free (so_uri), so_uri = NULL;
return E_SOURCE (r->data);
}
g_free (so_uri), so_uri = NULL;
}
}
}
g_strfreev (temp);
return NULL;
}
static void
add_return_value (EGwSendOptionsReturnNotify track, ESource *source, char *notify)
{
char *value;
switch (track) {
case E_GW_RETURN_NOTIFY_MAIL:
value = g_strdup ("mail");
break;
default:
value = g_strdup ("none");
}
e_source_set_property (source, notify, value);
g_free (value), value = NULL;
}
static void
put_options_in_source (ESource *source, EGwSendOptionsGeneral *gopts, EGwSendOptionsStatusTracking *sopts)
{
char *value;
const char *val;
icaltimetype tt;
CamelURL *url;
url = camel_url_new (account->source->url, NULL);
if (gopts) {
/* priority */
switch (gopts->priority) {
case E_GW_PRIORITY_HIGH:
value = g_strdup ("high");
break;
case E_GW_PRIORITY_STANDARD:
value = g_strdup ("standard");
break;
case E_GW_PRIORITY_LOW:
value = g_strdup ("low");
break;
default:
value = g_strdup ("undefined");
}
e_source_set_property (source, "priority", value);
camel_url_set_param (url, "priority", value);
g_free (value), value = NULL;
/* Reply Requested */
/*TODO Fill the value if it is not "convinient" */
if (gopts->reply_enabled) {
if (gopts->reply_convenient)
value = g_strdup ("convinient");
else
value = g_strdup_printf ("%d",gopts->reply_within);
} else
value = g_strdup ("none");
e_source_set_property (source, "reply-requested", value);
g_free (value), value = NULL;
/* Delay delivery */
if (gopts->delay_enabled) {
tt = icaltime_today ();
icaltime_adjust (&tt, gopts->delay_until, 0, 0, 0);
val = icaltime_as_ical_string (tt);
} else
val = "none";
e_source_set_property (source, "delay-delivery", val);
/* Expiration date */
if (gopts->expiration_enabled)
value = g_strdup_printf ("%d", gopts->expire_after);
else
value = g_strdup ("none");
e_source_set_property (source, "expiration", value);
g_free (value), value = NULL;
}
if (sopts) {
/* status tracking */
if (sopts->tracking_enabled) {
switch (sopts->track_when) {
case E_GW_DELIVERED :
value = g_strdup ("delivered");
break;
case E_GW_DELIVERED_OPENED:
value = g_strdup ("delivered-opened");
break;
default:
value = g_strdup ("all");
}
} else
value = g_strdup ("none");
e_source_set_property (source, "status-tracking", value);
g_free (value), value = NULL;
add_return_value (sopts->opened, source, "return-open");
add_return_value (sopts->accepted, source, "return-accept");
add_return_value (sopts->declined, source, "return-decline");
add_return_value (sopts->completed, source, "return-complete");
}
}
static void
add_send_options_to_source (EGwSendOptions *n_opts)
{
GConfClient *gconf = gconf_client_get_default ();
ESource *csource, *tsource;
ESourceList *list;
EGwSendOptionsGeneral *gopts;
EGwSendOptionsStatusTracking *topts, *mopts, *copts;
list = e_source_list_new_for_gconf (gconf, "/apps/evolution/calendar/sources");
csource = get_source (list);
list = e_source_list_new_for_gconf (gconf, "/apps/evolution/tasks/sources");
tsource = get_source (list);
gopts = e_gw_sendoptions_get_general_options (n_opts);
mopts = e_gw_sendoptions_get_status_tracking_options (n_opts, "mail");
copts = e_gw_sendoptions_get_status_tracking_options (n_opts, "calendar");
topts = e_gw_sendoptions_get_status_tracking_options (n_opts, "task");
if (csource)
put_options_in_source (csource, gopts, copts);
if (tsource)
put_options_in_source (tsource, gopts, topts);
g_object_unref (gconf);
}
void
send_options_commit (EPlugin *epl, EConfigHookItemFactoryData *data)
{
EGwSendOptions *n_opts;
EGwConnectionStatus status = E_GW_CONNECTION_STATUS_OK;
if (sod) {
n_opts = e_gw_sendoptions_new ();
send_options_copy_check_changed (n_opts);
if (changed)
status = e_gw_connection_modify_settings (n_cnc, n_opts);
if (!changed || status != E_GW_CONNECTION_STATUS_OK) {
g_warning (G_STRLOC "Cannot modify Send Options: %s", e_gw_connection_get_error_message (status));
g_object_unref (n_opts);
n_opts = NULL;
} else
add_send_options_to_source (n_opts);
}
send_options_finalize ();
}
void
send_options_changed (EPlugin *epl, EConfigHookItemFactoryData *data)
{
}
void
send_options_abort (EPlugin *epl, EConfigHookItemFactoryData *data)
{
send_options_finalize ();
}