path: root/plugins/calendar-http/calendar-http.c

/*
 *
 *
 * Copyright (C) 2004 David Trowbridge
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * 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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 *
 */

#include <glib-object.h>
#include <gtk/gtklabel.h>
#include <gtk/gtkentry.h>
#include <gtk/gtktable.h>
#include <gtk/gtkspinbutton.h>
#include <gtk/gtkoptionmenu.h>
#include <gtk/gtkmenu.h>
#include <gtk/gtkmenuitem.h>
#include <gtk/gtkhbox.h>
#include <gtk/gtkcheckbutton.h>
#include <e-util/e-config.h>
#include <calendar/gui/e-cal-config.h>
#include <libedataserver/e-source.h>
#include <libedataserver/e-url.h>
#include <glib/gi18n.h>
#include <string.h>

GtkWidget *e_calendar_http_url (EPlugin *epl, EConfigHookItemFactoryData *data);
GtkWidget *e_calendar_http_refresh (EPlugin *epl, EConfigHookItemFactoryData *data);
gboolean   e_calendar_http_check (EPlugin *epl, EConfigHookPageCheckData *data);
GtkWidget * e_calendar_http_secure (EPlugin *epl, EConfigHookItemFactoryData *data);
GtkWidget *e_calendar_http_auth (EPlugin *epl, EConfigHookItemFactoryData *data);

static gchar *
print_uri_noproto (EUri *uri)
{
    gchar *uri_noproto;

    if (uri->port != 0)
        uri_noproto = g_strdup_printf (
            "%s%s%s%s%s%s%s:%d%s%s%s",
            uri->user ? uri->user : "",
            uri->authmech ? ";auth=" : "",
            uri->authmech ? uri->authmech : "",
            uri->passwd ? ":" : "",
            uri->passwd ? uri->passwd : "",
            uri->user ? "@" : "",
            uri->host ? uri->host : "",
            uri->port,
            uri->path ? uri->path : "",
            uri->query ? "?" : "",
            uri->query ? uri->query : "");
    else
        uri_noproto = g_strdup_printf (
            "%s%s%s%s%s%s%s%s%s%s",
            uri->user ? uri->user : "",
            uri->authmech ? ";auth=" : "",
            uri->authmech ? uri->authmech : "",
            uri->passwd ? ":" : "",
            uri->passwd ? uri->passwd : "",
            uri->user ? "@" : "",
            uri->host ? uri->host : "",
            uri->path ? uri->path : "",
            uri->query ? "?" : "",
            uri->query ? uri->query : "");
    return uri_noproto;
}

static void
url_changed (GtkEntry *entry, ESource *source)
{
    EUri *uri;
    char *relative_uri;

    uri = e_uri_new (gtk_entry_get_text (GTK_ENTRY (entry)));

    if (strncmp (uri->protocol, "https", sizeof ("https") - 1) == 0) {
        gpointer secure_checkbox;

        secure_checkbox = g_object_get_data (G_OBJECT (gtk_widget_get_parent (GTK_WIDGET (entry))),
                                             "secure_checkbox");

        gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (secure_checkbox), TRUE);
    }

    relative_uri = print_uri_noproto (uri);
    e_source_set_relative_uri (source, relative_uri);
    g_free (relative_uri);
    e_uri_free (uri);
}

GtkWidget *
e_calendar_http_url (EPlugin *epl, EConfigHookItemFactoryData *data)
{
    static GtkWidget *label;
    GtkWidget *entry, *parent;
    int row;
    ECalConfigTargetSource *t = (ECalConfigTargetSource *) data->target;
    EUri *uri;
    char *uri_text;
    static GtkWidget *hidden = NULL;

    if (!hidden)
        hidden = gtk_label_new ("");

    if (data->old)
        gtk_widget_destroy (label);

    uri_text = e_source_get_uri (t->source);
    uri = e_uri_new (uri_text);
    if ((strcmp (uri->protocol, "http") &&
         strcmp (uri->protocol, "https") &&
         strcmp (uri->protocol, "webcal"))) {
        e_uri_free (uri);
        g_free (uri_text);
        return hidden;
    }
    e_uri_free (uri);

    parent = data->parent;

    row = ((GtkTable*)parent)->nrows;

    label = gtk_label_new_with_mnemonic (_("_URL:"));
    gtk_widget_show (label);
    gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
    gtk_table_attach (GTK_TABLE (parent), label, 0, 1, row, row+1, GTK_FILL, 0, 0, 0);

    entry = gtk_entry_new ();
    gtk_widget_show (entry);
    gtk_entry_set_text (GTK_ENTRY (entry), uri_text);
    gtk_table_attach (GTK_TABLE (parent), entry, 1, 2, row, row+1, GTK_EXPAND | GTK_FILL, 0, 0, 0);
    gtk_label_set_mnemonic_widget (GTK_LABEL (label), entry);
    g_signal_connect (G_OBJECT (entry), "changed", G_CALLBACK (url_changed), t->source);

    g_free (uri_text);
    return entry;
}

static void
set_refresh_time (ESource *source, GtkWidget *spin, GtkWidget *option)
{
    int time;
    int item_num = 0;
    const char *refresh_str = e_source_get_property (source, "refresh");
    time = refresh_str ? atoi (refresh_str) : 30;

    if (time  && !(time % 10080)) {
        /* weeks */
        item_num = 3;
        time /= 10080;
    } else if (time && !(time % 1440)) {
        /* days */
        item_num = 2;
        time /= 1440;
    } else if (time && !(time % 60)) {
        /* hours */
        item_num = 1;
        time /= 60;
    }
    gtk_option_menu_set_history (GTK_OPTION_MENU (option), item_num);
    gtk_spin_button_set_value (GTK_SPIN_BUTTON (spin), time);
}

static char *
get_refresh_minutes (GtkWidget *spin, GtkWidget *option)
{
    int setting = gtk_spin_button_get_value_as_int (GTK_SPIN_BUTTON (spin));
    switch (gtk_option_menu_get_history (GTK_OPTION_MENU (option))) {
    case 0:
        /* minutes */
        break;
    case 1:
        /* hours */
        setting *= 60;
        break;
    case 2:
        /* days */
        setting *= 1440;
        break;
    case 3:
        /* weeks - is this *really* necessary? */
        setting *= 10080;
        break;
    default:
        g_warning ("Time unit out of range");
        break;
    }

    return g_strdup_printf ("%d", setting);
}

static void
spin_changed (GtkSpinButton *spin, ECalConfigTargetSource *t)
{
    char *refresh_str;
    GtkWidget *option;

    option = g_object_get_data (G_OBJECT (spin), "option");

    refresh_str = get_refresh_minutes ((GtkWidget *) spin, option);
    e_source_set_property (t->source, "refresh", refresh_str);
    g_free (refresh_str);
}

static void
option_changed (GtkOptionMenu *option, ECalConfigTargetSource *t)
{
    char *refresh_str;
    GtkWidget *spin;

    spin = g_object_get_data (G_OBJECT (option), "spin");

    refresh_str = get_refresh_minutes (spin, (GtkWidget *) option);
    e_source_set_property (t->source, "refresh", refresh_str);
    g_free (refresh_str);
}

static void
secure_setting_changed (GtkWidget *widget, ESource *source)
{
    if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget)))
        e_source_set_property (source, "use_ssl", "1");
    else
        e_source_set_property (source, "use_ssl", "0");
}

GtkWidget *
e_calendar_http_refresh (EPlugin *epl, EConfigHookItemFactoryData *data)
{
    static GtkWidget *label;
    GtkWidget *option, *spin, *menu, *hbox, *parent;
    GtkWidget *times[4];
    int row, i;
    ECalConfigTargetSource *t = (ECalConfigTargetSource *) data->target;
    ESource *source = t->source;
    EUri *uri;
    char* uri_text;
    static GtkWidget *hidden = NULL;

    if (!hidden)
        hidden = gtk_label_new ("");

    if (data->old)
        gtk_widget_destroy (label);

    uri_text = e_source_get_uri (t->source);
    uri = e_uri_new (uri_text);
    g_free (uri_text);
    if ((strcmp (uri->protocol, "http") &&
         strcmp (uri->protocol, "https") &&
         strcmp (uri->protocol, "webcal"))) {
        e_uri_free (uri);
        return hidden;
    }
    e_uri_free (uri);

    parent = data->parent;

    row = ((GtkTable*)parent)->nrows;

    label = gtk_label_new_with_mnemonic (_("_Refresh:"));
    gtk_widget_show (label);
    gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.5);
    gtk_table_attach (GTK_TABLE (parent), label, 0, 1, row, row+1, GTK_FILL, 0, 0, 0);

    hbox = gtk_hbox_new (FALSE, 6);
    gtk_widget_show (hbox);

    spin = gtk_spin_button_new_with_range (0, 100, 1);
    gtk_label_set_mnemonic_widget (GTK_LABEL (label), spin);
    gtk_widget_show (spin);
    gtk_box_pack_start (GTK_BOX (hbox), spin, FALSE, TRUE, 0);

    option = gtk_option_menu_new ();
    gtk_widget_show (option);
    times[0] = gtk_menu_item_new_with_label (_("minutes"));
    times[1] = gtk_menu_item_new_with_label (_("hours"));
    times[2] = gtk_menu_item_new_with_label (_("days"));
    times[3] = gtk_menu_item_new_with_label (_("weeks"));
    menu = gtk_menu_new ();
    gtk_widget_show (menu);
    for (i = 0; i < 4; i++) {
        gtk_widget_show (times[i]);
        gtk_menu_shell_append (GTK_MENU_SHELL (menu), times[i]);
    }
    gtk_option_menu_set_menu (GTK_OPTION_MENU (option), menu);
    set_refresh_time (source, spin, option);
    gtk_box_pack_start (GTK_BOX (hbox), option, FALSE, TRUE, 0);

    g_object_set_data (G_OBJECT (option), "spin", spin);
    g_signal_connect (G_OBJECT (option), "changed", G_CALLBACK (option_changed), t);
    g_object_set_data (G_OBJECT (spin), "option", option);
    g_signal_connect (G_OBJECT (spin), "value-changed", G_CALLBACK (spin_changed), t);

    gtk_table_attach (GTK_TABLE (parent), hbox, 1, 2, row, row+1, GTK_EXPAND | GTK_FILL, 0, 0, 0);

    return hbox;
}

GtkWidget *
e_calendar_http_secure (EPlugin *epl, EConfigHookItemFactoryData *data)
{
    ECalConfigTargetSource *t = (ECalConfigTargetSource *) data->target;
    GtkWidget *secure_setting, *parent;
    const char *secure_prop;
    int row;
    EUri *uri;
    char* uri_text;
    static GtkWidget *hidden = NULL;

    if (!hidden)
        hidden = gtk_label_new ("");

    uri_text = e_source_get_uri (t->source);
    uri = e_uri_new (uri_text);
    g_free (uri_text);
    if ((strcmp (uri->protocol, "http") &&
         strcmp (uri->protocol, "https") &&
         strcmp (uri->protocol, "webcal"))) {
        e_uri_free (uri);
        return hidden;
    }
    e_uri_free (uri);

    parent = data->parent;

    row = ((GtkTable*)parent)->nrows;

    secure_setting = gtk_check_button_new_with_mnemonic (_("_Secure connection"));

    secure_prop = e_source_get_property (t->source, "use_ssl");
    gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (secure_setting), (secure_prop && g_str_equal (secure_prop, "1"))  ? TRUE : FALSE);

    g_signal_connect (secure_setting, "toggled", G_CALLBACK (secure_setting_changed), t->source);

    gtk_widget_show (secure_setting);
    gtk_table_attach (GTK_TABLE (parent), secure_setting, 1, 2, row, row+1, GTK_EXPAND | GTK_FILL, 0, 0, 0);

    /* Store pointer to secure checkbox so we can retrieve it in url_changed() */
    g_object_set_data (G_OBJECT (parent), "secure_checkbox", (gpointer)secure_setting);

    return secure_setting;
}

static void
username_changed (GtkEntry *entry, ESource *source)
{
    const gchar *username;

    username = gtk_entry_get_text (GTK_ENTRY (entry));

    if (username && username[0]) {
        e_source_set_property (source, "auth", "1");
        e_source_set_property (source, "username", username);
    } else {
        e_source_set_property (source, "auth", NULL);
        e_source_set_property (source, "username", NULL);
    }
}

GtkWidget *
e_calendar_http_auth (EPlugin *epl, EConfigHookItemFactoryData *data)
{
    static GtkWidget *label;
    GtkWidget *entry, *parent;
    int row;
    ECalConfigTargetSource *t = (ECalConfigTargetSource *) data->target;
    EUri *uri;
    char *uri_text;
    const char *username;
    static GtkWidget *hidden = NULL;

    if (!hidden)
        hidden = gtk_label_new ("");

    if (data->old)
        gtk_widget_destroy (label);

    uri_text = e_source_get_uri (t->source);
    uri = e_uri_new (uri_text);
    g_free (uri_text);
    if ((strcmp (uri->protocol, "http") &&
         strcmp (uri->protocol, "https") &&
         strcmp (uri->protocol, "webcal"))) {
        e_uri_free (uri);
        return hidden;
    }
    e_uri_free (uri);

    parent = data->parent;

    row = ((GtkTable*)parent)->nrows;

    label = gtk_label_new_with_mnemonic (_("Userna_me:"));
    gtk_widget_show (label);
    gtk_misc_set_alignment (GTK_MISC (label), 0.0, 0.0);
    gtk_table_attach (GTK_TABLE (parent), label, 0, 1, row, row+1, GTK_FILL, GTK_SHRINK, 0, 0);

    username = e_source_get_property (t->source, "username");

    entry = gtk_entry_new ();
    gtk_widget_show (entry);
    gtk_entry_set_text (GTK_ENTRY (entry), username ? username : "");
    gtk_label_set_mnemonic_widget (GTK_LABEL (label), entry);
    g_signal_connect (G_OBJECT (entry), "changed", G_CALLBACK (username_changed), t->source);

    gtk_table_attach (GTK_TABLE (parent), entry, 1, 2, row, row+1, GTK_EXPAND | GTK_FILL, 0, 0, 0);

    return entry;
}

gboolean
e_calendar_http_check (EPlugin *epl, EConfigHookPageCheckData *data)
{
    /* FIXME - check pageid */
    ECalConfigTargetSource *t = (ECalConfigTargetSource *) data->target;
    EUri *uri;
    gboolean ok = FALSE;
    ESourceGroup *group = e_source_peek_group (t->source);
    char *uri_text;

    if (strncmp (e_source_group_peek_base_uri (group), "webcal", 6))
        return TRUE;

    uri_text = e_source_get_uri (t->source);
    if (!strncmp (uri_text, "file:", 5)) {
        g_free (uri_text);
        return FALSE;
    }

    uri = e_uri_new (uri_text);
    ok = ((!strcmp (uri->protocol, "webcal")) ||
          (!strcmp (uri->protocol, "http")) ||
          (!strcmp (uri->protocol, "https")) ||
          (!strcmp (uri->protocol, "file")) );
    e_uri_free (uri);
    g_free (uri_text);

    return ok;
}