path: root/calendar/gui/eventedit.c

/*
 * EventEditor widget
 * Copyright (C) 1998 the Free Software Foundation
 *
 * Authors: Miguel de Icaza (miguel@kernel.org)
 *          Federico Mena (quartic@gimp.org)
 */

#include <gnome.h>
#include <string.h>
#include "calendar.h"
#include "eventedit.h"
#include "main.h"
#include "timeutil.h"


static void event_editor_class_init (EventEditorClass *class);
static void event_editor_init       (EventEditor      *ee);
static void event_editor_destroy    (GtkObject        *object);

/* Note: do not i18n these strings, they are part of the vCalendar protocol */
static char *class_names [] = { "PUBLIC", "PRIVATE", "CONFIDENTIAL" };

static GtkWindowClass *parent_class;


guint
event_editor_get_type (void)
{
    static guint event_editor_type = 0;
    
    if(!event_editor_type) {
        GtkTypeInfo event_editor_info = {
            "EventEditor",
            sizeof(EventEditor),
            sizeof(EventEditorClass),
            (GtkClassInitFunc) event_editor_class_init,
            (GtkObjectInitFunc) event_editor_init,
            (GtkArgSetFunc) NULL,
            (GtkArgGetFunc) NULL,
        };
        event_editor_type = gtk_type_unique (gtk_window_get_type (), &event_editor_info);
    }
    return event_editor_type;
}

static void
event_editor_class_init (EventEditorClass *class)
{
    GtkObjectClass *object_class;

    parent_class = gtk_type_class (gtk_window_get_type ());
    object_class = (GtkObjectClass*) class;
    object_class->destroy = event_editor_destroy;
}

GtkWidget *
adjust (GtkWidget *w, gfloat x, gfloat y, gfloat xs, gfloat ys)
{
    GtkWidget *a = gtk_alignment_new (x, y, xs, ys);
    
    gtk_container_add (GTK_CONTAINER (a), w);
    return a;
}

/*
 * Checks if the day range occupies all the day, and if so, check the
 * box accordingly
 */
static void
ee_check_all_day (EventEditor *ee)
{
    time_t ev_start, ev_end;

    ev_start = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->start_time));
    ev_end   = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->end_time)); 
    
    if (get_time_t_hour (ev_start) <= day_begin && get_time_t_hour (ev_end) >= day_end)
        gtk_toggle_button_set_state (GTK_TOGGLE_BUTTON (ee->general_allday), 1);
    else
        gtk_toggle_button_set_state (GTK_TOGGLE_BUTTON (ee->general_allday), 0);
}

/*
 * Callback: checks that the dates are start < end
 */
static void
check_dates (GnomeDateEdit *gde, EventEditor *ee)
{
    time_t start, end;
    struct tm tm_start, tm_end;

    start = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->start_time));
    end = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->end_time));

    if (start > end) {
        tm_start = *localtime (&start);
        tm_end = *localtime (&end);

        if (GTK_WIDGET (gde) == ee->start_time) {
            tm_end.tm_year = tm_start.tm_year;
            tm_end.tm_mon  = tm_start.tm_mon;
            tm_end.tm_mday = tm_start.tm_mday;

            gnome_date_edit_set_time (GNOME_DATE_EDIT (ee->end_time), mktime (&tm_end));
        } else if (GTK_WIDGET (gde) == ee->end_time) {
            tm_start.tm_year = tm_end.tm_year;
            tm_start.tm_mon  = tm_end.tm_mon;
            tm_start.tm_mday = tm_end.tm_mday;

            gnome_date_edit_set_time (GNOME_DATE_EDIT (ee->start_time), mktime (&tm_start));
        }
    }
}

/*
 * Callback: checks that start_time < end_time and whether the
 * selected hour range spans all of the day
 */
static void
check_times (GnomeDateEdit *gde, EventEditor *ee)
{
    time_t start, end;
    struct tm tm_start, tm_end;

    gdk_pointer_ungrab (GDK_CURRENT_TIME);
    gdk_flush ();

    start = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->start_time));
    end = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->end_time));

    if (start >= end) {
        tm_start = *localtime (&start);
        tm_end = *localtime (&end);

        if (GTK_WIDGET (gde) == ee->start_time) {
            tm_end.tm_min  = tm_start.tm_min;
            tm_end.tm_sec  = tm_start.tm_sec;

            tm_end.tm_hour = tm_start.tm_hour + 1;

            if (tm_end.tm_hour >= 24) {
                tm_end.tm_hour = 24; /* mktime() will bump the day */
                tm_end.tm_min = 0;
                tm_end.tm_sec = 0;
            }

            gnome_date_edit_set_time (GNOME_DATE_EDIT (ee->end_time), mktime (&tm_end));
        } else if (GTK_WIDGET (gde) == ee->end_time) {
            tm_start.tm_min  = tm_end.tm_min;
            tm_start.tm_sec  = tm_end.tm_sec;

            tm_start.tm_hour = tm_end.tm_hour - 1;

            if (tm_start.tm_hour < 0) {
                tm_start.tm_hour = 0;
                tm_start.tm_min = 0;
                tm_start.tm_min = 0;
            }

            gnome_date_edit_set_time (GNOME_DATE_EDIT (ee->start_time), mktime (&tm_start));
        }
    }

    /* Check whether the event spans the whole day */

    ee_check_all_day (ee);
}

/*
 * Callback: all day event box clicked
 */
static void
set_all_day (GtkToggleButton *toggle, EventEditor *ee)
{
    struct tm *tm;
    time_t start_t;

    start_t = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->start_time));
    tm = localtime (&start_t);
    tm->tm_hour = day_begin;
    tm->tm_min  = 0;
    tm->tm_sec  = 0;
    gnome_date_edit_set_time (GNOME_DATE_EDIT (ee->start_time), mktime (tm));
    
    if (toggle->active)
        tm->tm_hour = day_end;
    else
        tm->tm_hour++;
    
    gnome_date_edit_set_time (GNOME_DATE_EDIT (ee->end_time), mktime (tm));
}

static GtkWidget *
event_editor_setup_time_frame (EventEditor *ee)
{
    GtkWidget *frame;
    GtkWidget *start_time, *end_time;
    GtkTable  *t;
    
    frame = gtk_frame_new (_("Time"));
    t = GTK_TABLE (ee->general_time_table = gtk_table_new (1, 1, 0));
    gtk_container_border_width (GTK_CONTAINER (t), 4);
    gtk_table_set_row_spacings (t, 4);
    gtk_table_set_col_spacings (t, 4);
    gtk_container_add (GTK_CONTAINER (frame), ee->general_time_table);

    /* 1. Start time */
    ee->start_time = start_time = gnome_date_edit_new (ee->ical->dtstart);
    gnome_date_edit_set_popup_range ((GnomeDateEdit *) start_time, day_begin, day_end);
    gtk_signal_connect (GTK_OBJECT (start_time), "date_changed",
                GTK_SIGNAL_FUNC (check_dates), ee);
    gtk_signal_connect (GTK_OBJECT (start_time), "time_changed",
                GTK_SIGNAL_FUNC (check_times), ee);
    gtk_table_attach (t, gtk_label_new (_("Start time:")), 1, 2, 1, 2,
              GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);
    gtk_table_attach (t, start_time, 2, 3, 1, 2,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);

    /* 2. End time */
    ee->end_time   = end_time   = gnome_date_edit_new (ee->ical->dtend);
    gnome_date_edit_set_popup_range ((GnomeDateEdit *) end_time,   day_begin, day_end);
    gtk_signal_connect (GTK_OBJECT (end_time), "date_changed",
                GTK_SIGNAL_FUNC (check_dates), ee);
    gtk_signal_connect (GTK_OBJECT (end_time), "time_changed",
                GTK_SIGNAL_FUNC (check_times), ee);
    gtk_table_attach (t, gtk_label_new (_("End time:")), 1, 2, 2, 3,
              GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);
    gtk_table_attach (t, end_time, 2, 3, 2, 3,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);

    /* 3. All day checkbox */
    ee->general_allday = gtk_check_button_new_with_label (_("All day event"));
    gtk_signal_connect (GTK_OBJECT (ee->general_allday), "toggled",
                GTK_SIGNAL_FUNC (set_all_day), ee);
    gtk_table_attach (t, ee->general_allday, 3, 4, 1, 2,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              4, 0);
    ee_check_all_day (ee);

    /* 4. Recurring event checkbox */
    ee->general_recur  = gtk_check_button_new_with_label (_("Recurring event"));
    gtk_table_attach (t, ee->general_recur, 3, 4, 2, 3,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              4, 0);

    return frame;
}

static GtkWidget *
timesel_new (void)
{
    GtkWidget *menu, *option_menu;
    char *items [] = { N_("Minutes"), N_("Hours"), N_("Days") };
    int i;
    
    option_menu = gtk_option_menu_new ();
    menu = gtk_menu_new ();
    for (i = 0; i < 3; i++){
        GtkWidget *item;

        item = gtk_menu_item_new_with_label (_(items [i]));
        gtk_menu_append (GTK_MENU (menu), item);
        gtk_widget_show (item);
    }
    gtk_option_menu_set_menu (GTK_OPTION_MENU (option_menu), menu);
    return option_menu;
}

/*
 * Set the sensitive state depending on whether the alarm enabled flag.
 */
static void
ee_alarm_setting (CalendarAlarm *alarm, int sensitive)
{
    gtk_widget_set_sensitive (GTK_WIDGET (alarm->w_count), sensitive);
    gtk_widget_set_sensitive (GTK_WIDGET (alarm->w_timesel), sensitive);

    if (alarm->type == ALARM_PROGRAM || alarm->type == ALARM_MAIL){
        gtk_widget_set_sensitive (GTK_WIDGET (alarm->w_entry), sensitive);
        gtk_widget_set_sensitive (GTK_WIDGET (alarm->w_label), sensitive);
    }
}

static void
alarm_toggle (GtkToggleButton *toggle, CalendarAlarm *alarm)
{
    ee_alarm_setting (alarm, toggle->active);
}

#define FXS (GTK_FILL | GTK_EXPAND | GTK_SHRINK)
#define FS  (GTK_FILL | GTK_SHRINK)

static void
ee_create_ae (GtkTable *table, char *str, CalendarAlarm *alarm, enum AlarmType type, int y)
{
    char buffer [40];

    alarm->w_enabled = gtk_check_button_new_with_label (str);
    gtk_signal_connect (GTK_OBJECT (alarm->w_enabled), "toggled",
                GTK_SIGNAL_FUNC (alarm_toggle), alarm);
    gtk_table_attach (table, alarm->w_enabled, 0, 1, y, y+1, FS, FS, 0, 0);

    gtk_toggle_button_set_state (GTK_TOGGLE_BUTTON (alarm->w_enabled), alarm->enabled);
    
    alarm->w_count = gtk_entry_new ();
    gtk_widget_set_usize (alarm->w_count, 40, 0);
    gtk_table_attach (table, alarm->w_count, 1, 2, y, y+1, FS, FS, 0, 0);
    sprintf (buffer, "%d", alarm->count);
    gtk_entry_set_text (GTK_ENTRY (alarm->w_count), buffer);
    
    alarm->w_timesel = timesel_new ();
    gtk_option_menu_set_history (GTK_OPTION_MENU (alarm->w_timesel), alarm->units);
    gtk_table_attach (table, alarm->w_timesel, 2, 3, y, y+1, FS, FS, 0, 0);
    
    switch (type){
    case ALARM_MAIL:
        alarm->w_label = gtk_label_new (_("Mail to:"));
        gtk_misc_set_alignment (GTK_MISC (alarm->w_label), 1.0, 0.5);   
        gtk_table_attach (table, alarm->w_label, 3, 4, y, y+1, FS, FS, 0, 0);
        alarm->w_entry = gtk_entry_new ();
        gtk_table_attach (table, alarm->w_entry, 4, 5, y, y+1, FXS, FS, 0, 0);
        gtk_entry_set_text (GTK_ENTRY (alarm->w_entry), alarm->data);
        break;

    case ALARM_PROGRAM:
        alarm->w_label = gtk_label_new (_("Run program:"));
        gtk_misc_set_alignment (GTK_MISC (alarm->w_label), 1.0, 0.5);   
        gtk_table_attach (table, alarm->w_label, 3, 4, y, y+1, FS, FS, 0, 0);
        alarm->w_entry = gnome_file_entry_new ("alarm-program", _("Select program to run at alarm time"));
        gtk_table_attach (table, alarm->w_entry, 4, 5, y, y+1, FXS, FS, 0, 0);
        break;

    default:
        break;
    }

    ee_alarm_setting (alarm, alarm->enabled);
}

static GtkWidget *
ee_alarm_widgets (EventEditor *ee)
{
    GtkWidget *table, *mailto, *mailte, *l;
    
    l = gtk_frame_new (_("Alarms"));
    
    table = gtk_table_new (1, 1, 0);
    gtk_container_border_width (GTK_CONTAINER (table), 4);
    gtk_table_set_row_spacings (GTK_TABLE (table), 4);
    gtk_table_set_col_spacings (GTK_TABLE (table), 4);
    gtk_container_add (GTK_CONTAINER (l), table);
    
    mailto  = gtk_label_new (_("Mail to:"));
    mailte  = gtk_entry_new ();

    ee_create_ae (GTK_TABLE (table), _("Display"), &ee->ical->dalarm, ALARM_DISPLAY, 1);
    ee_create_ae (GTK_TABLE (table), _("Audio"),   &ee->ical->aalarm, ALARM_AUDIO, 2);
    ee_create_ae (GTK_TABLE (table), _("Program"), &ee->ical->palarm, ALARM_PROGRAM, 3);
    ee_create_ae (GTK_TABLE (table), _("Mail"),    &ee->ical->malarm, ALARM_MAIL, 4);
    
    return l;
}

static void
connect_and_pack (EventEditor *ee, GtkWidget *hbox, GtkWidget *toggle, char *value)
{
    gtk_box_pack_start_defaults (GTK_BOX (hbox), toggle);
}

static GtkWidget *
ee_classification_widgets (EventEditor *ee)
{
    GtkWidget *rpub, *rpriv, *conf;
    GtkWidget *frame, *hbox;

    frame = gtk_frame_new (_("Classification"));

    hbox  = gtk_hbox_new (TRUE, 0);
    gtk_container_border_width (GTK_CONTAINER (hbox), 4);
    gtk_container_add (GTK_CONTAINER (frame), hbox);
    
    rpub  = gtk_radio_button_new_with_label (NULL, _("Public"));
    rpriv = gtk_radio_button_new_with_label_from_widget (GTK_RADIO_BUTTON (rpub), _("Private"));
    conf  = gtk_radio_button_new_with_label_from_widget (GTK_RADIO_BUTTON (rpub), _("Confidential"));

    connect_and_pack (ee, hbox, rpub,  class_names [0]);
    connect_and_pack (ee, hbox, rpriv, class_names [1]);
    connect_and_pack (ee, hbox, conf,  class_names [2]);
    ee->general_radios = rpub;
    
    return frame;
}

/*
 * Retrieves the information from the CalendarAlarm widgets and stores them
 * on the CalendarAlarm generic values
 */
void
ee_store_alarm (CalendarAlarm *alarm, enum AlarmType type)
{
    GtkWidget *item;
    GtkMenu   *menu;
    GList     *child;
    int idx;
    
    if (alarm->data){
        g_free (alarm->data);
        alarm->data = 0;
    }
    
    alarm->enabled = GTK_TOGGLE_BUTTON (alarm->w_enabled)->active;

    if (!alarm->enabled)
        return;
    
    if (type == ALARM_PROGRAM)
        alarm->data = g_strdup (gtk_entry_get_text (GTK_ENTRY (gnome_file_entry_gtk_entry (alarm->w_entry))));
    if (type == ALARM_MAIL)
        alarm->data = g_strdup (gtk_entry_get_text (GTK_ENTRY (alarm->w_entry)));

    /* Find out the index */
    menu = GTK_MENU (GTK_OPTION_MENU (alarm->w_timesel)->menu);
    
    item = gtk_menu_get_active (menu);
    
    for (idx = 0, child = GTK_MENU_SHELL (menu)->children; child->data != item; child = child->next)
        idx++;
    
    alarm->units = idx;
    alarm->count = atoi (gtk_entry_get_text (GTK_ENTRY (alarm->w_count)));
}

/*
 * Retrieves all of the information from the different widgets and updates
 * the iCalObject accordingly.
 */
static void
ee_store_dlg_values_to_ical (EventEditor *ee)
{
    GtkRadioButton *radio = GTK_RADIO_BUTTON (ee->general_radios);
    iCalObject *ical = ee->ical;
    GSList *list = radio->group;
    int idx;
    time_t now;

    now = time (NULL);
    ical->dtstart = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->start_time));
    ical->dtend   = gnome_date_edit_get_date (GNOME_DATE_EDIT (ee->end_time));

    if (ical->summary)
        g_free (ical->summary);

    ical->summary = gtk_editable_get_chars (GTK_EDITABLE (ee->general_summary), 0, -1);

    ee_store_alarm (&ical->dalarm, ALARM_DISPLAY);
    ee_store_alarm (&ical->aalarm, ALARM_AUDIO);
    ee_store_alarm (&ical->palarm, ALARM_PROGRAM);
    ee_store_alarm (&ical->malarm, ALARM_MAIL);

    for (idx = 0; list; list = list->next){
        if (GTK_TOGGLE_BUTTON (list->data)->active)
            break;
        idx++;
    }
    g_free (ical->class);
    ical->class = g_strdup (class_names [idx]);

    /* FIXME: This is not entirely correct; we should check if the values actually changed */
    ical->last_mod = now;

    if (ee->ical->new)
        ical->created = now;
}

static void
ee_ok (GtkWidget *widget, EventEditor *ee)
{
    ee_store_dlg_values_to_ical (ee);

    if (ee->ical->new)
        gnome_calendar_add_object (ee->gnome_cal, ee->ical);
    else
        gnome_calendar_object_changed (ee->gnome_cal, ee->ical, CHANGE_ALL);

    gtk_widget_destroy (GTK_WIDGET (ee));
}

static void
ee_cancel (GtkWidget *widget, EventEditor *ee)
{
    if (ee->ical->new) {
        ical_object_destroy (ee->ical);
        ee->ical = NULL;
    }

    gtk_widget_destroy (GTK_WIDGET (ee));
}

static GtkWidget *
ee_create_buttons (EventEditor *ee)
{
    GtkWidget *box = gtk_hbox_new (1, 5);
    GtkWidget *ok, *cancel;

    ok     = gnome_stock_button (GNOME_STOCK_BUTTON_OK);
    cancel = gnome_stock_button (GNOME_STOCK_BUTTON_CANCEL);

    gtk_box_pack_start (GTK_BOX (box), ok, 0, 0, 5);
    gtk_box_pack_start (GTK_BOX (box), cancel, 0, 0, 5);

    gtk_signal_connect (GTK_OBJECT (ok),     "clicked", GTK_SIGNAL_FUNC(ee_ok), ee);
    gtk_signal_connect (GTK_OBJECT (cancel), "clicked", GTK_SIGNAL_FUNC(ee_cancel), ee);
    
    return box;
}

/*
 * Load the contents in a delayed fashion, as the GtkText widget needs it
 */
static void
ee_fill_summary (GtkWidget *widget, EventEditor *ee)
{
    int pos = 0;

    gtk_editable_insert_text (GTK_EDITABLE (ee->general_summary), ee->ical->summary,
                  strlen (ee->ical->summary), &pos);
    gtk_text_thaw (GTK_TEXT (ee->general_summary));
}

enum {
    OWNER_LINE,
    DESC_LINE,
    SUMMARY_LINE,
    TIME_LINE,
    ALARM_LINE,
    CLASS_LINE
};

/* Create/setup the general page */
static void
ee_init_general_page (EventEditor *ee)
{
    GtkWidget *l;
    GtkWidget *hbox;

    ee->general_table = (GtkTable *) gtk_table_new (1, 1, 0);
    gtk_container_border_width (GTK_CONTAINER (ee->general_table), 4);
    gtk_notebook_append_page (GTK_NOTEBOOK (ee->notebook), GTK_WIDGET (ee->general_table),
                  gtk_label_new (_("General")));

    hbox = gtk_hbox_new (FALSE, 0);
    gtk_table_attach (ee->general_table, hbox,
              0, 1, OWNER_LINE, OWNER_LINE + 1,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 4);
    
    l = gtk_label_new (_("Owner:"));
    gtk_box_pack_start (GTK_BOX (hbox), l, FALSE, FALSE, 0);

    ee->general_owner = gtk_label_new (ee->ical->organizer ? ee->ical->organizer : _("?"));
    gtk_misc_set_alignment (GTK_MISC (ee->general_owner), 0.0, 0.5);
    gtk_box_pack_start (GTK_BOX (hbox), ee->general_owner, TRUE, TRUE, 4);

    l = gtk_label_new (_("Description:"));
    gtk_misc_set_alignment (GTK_MISC (l), 0.0, 0.5);
    gtk_table_attach (ee->general_table, l,
              0, 1, DESC_LINE, DESC_LINE + 1,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);
    
    ee->general_summary = gtk_text_new (NULL, NULL);
    gtk_text_freeze (GTK_TEXT (ee->general_summary));
    gtk_signal_connect (GTK_OBJECT (ee->general_summary), "realize",
                GTK_SIGNAL_FUNC (ee_fill_summary), ee);
    gtk_widget_set_usize (ee->general_summary, 0, 60);
    gtk_text_set_editable (GTK_TEXT (ee->general_summary), 1);
    gtk_table_attach (ee->general_table, ee->general_summary,
              0, 1, SUMMARY_LINE, SUMMARY_LINE+1,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);

    l = ee_alarm_widgets (ee);
    gtk_table_attach (ee->general_table, l,
              0, 1, ALARM_LINE, ALARM_LINE + 1,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);

    l = event_editor_setup_time_frame (ee);
    gtk_table_attach (ee->general_table, l,
              0, 1, TIME_LINE, TIME_LINE + 1,
              GTK_EXPAND | GTK_FILL | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);

    l = ee_classification_widgets (ee);
    gtk_table_attach (ee->general_table, l,
              0, 1, CLASS_LINE, CLASS_LINE + 1,
              GTK_EXPAND | GTK_SHRINK,
              GTK_FILL | GTK_SHRINK,
              0, 0);
}

static void
ee_init_summary_page (EventEditor *ee)
{
}

struct {
    char *name;
} recurrence_types [] = {
    { N_("Daily") },
    { N_("Weekly") },
    { N_("Monthly") },
    { N_("Yearly") },
    { 0 }
};

static void
recurrence_toggled (GtkRadioButton *radio, EventEditor *ee)
{
    GSList *list = ee->recur_group;
    int which;
    
    if (!GTK_TOGGLE_BUTTON (radio)->active)
        return;
    
    for (which = 0; list; list = list->next, which++){
        if (list->data == radio){
            gtk_notebook_set_page (GTK_NOTEBOOK (ee->recur_content), 3-which);
            return;
        }
    }
}

static GtkWidget *
small_entry (int v)
{
    GtkWidget *entry = gtk_entry_new ();
    char buffer [40];

    sprintf (buffer, "%d", v);
    gtk_widget_set_usize (GTK_WIDGET (entry), gdk_string_width (entry->style->font, "WWW"), 0);
    gtk_entry_set_text (GTK_ENTRY (entry), buffer);
    gtk_editable_select_region (GTK_EDITABLE (entry), 0, -1);
    return entry;
}

static char *numeral_day_names [] = {
    N_("1st"),
    N_("2nd"),
    N_("3rd"),
    N_("4th"),
    N_("5th"),
    N_("6th"),
    N_("7th"),
    N_("8th"),
    N_("9th"),
    N_("10th"),
    N_("11th"),
    N_("12th"),
    N_("13th"),
    N_("14th"),
    N_("15th"),
    N_("16th"),
    N_("17th"),
    N_("18th"),
    N_("19th"),
    N_("20th"),
    N_("21th"),
    N_("22th"),
    N_("23th"),
    N_("24th"),
    N_("25th"),
    N_("26th"),
    N_("27th"),
    N_("28th"),
    N_("29th"),
    N_("30th"),
    N_("31th"),
    NULL
};

static char *weekday_names [] = {
    N_("Monday"),
    N_("Tuesday"),
    N_("Wednesday"),
    N_("Thursday"),
    N_("Friday"),
    N_("Saturday"),
    N_("Sunday"),
    NULL
};

static GtkWidget *
make_day_list_widget (char **array, int sel)
{
    GtkWidget *option_menu, *menu;
    int i;

    option_menu = gtk_option_menu_new ();
    menu = gtk_menu_new ();
    for (i = 0; array [i]; i++){
        GtkWidget *item;

        item = gtk_menu_item_new_with_label (_(array [i]));
        gtk_menu_append (GTK_MENU (menu), item);
        gtk_widget_show (item);
    }
    gtk_option_menu_set_menu (GTK_OPTION_MENU (option_menu), menu);
    gtk_option_menu_set_history (GTK_OPTION_MENU (option_menu), sel);
    return option_menu;
}

static void
month_sensitize (EventEditor *ee, int state)
{
    gtk_widget_set_sensitive (ee->recur_month_date, state);
    
    gtk_widget_set_sensitive (ee->recur_month_day,  !state);
    gtk_widget_set_sensitive (ee->recur_month_weekday,  !state);
}

static void
recur_month_enable_date (GtkToggleButton *button, EventEditor *ee)
{
    month_sensitize (ee, button->active);
}

static void
ee_rp_init_frequency (EventEditor *ee)
{
    char *day_names [] = { "Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun" };
    GtkWidget *r, *re, *r1, *f, *vbox, *hbox, *week_hbox, *week_day, *w;
    GtkWidget *daily, *weekly, *monthly, *yearly;
    GtkNotebook *notebook;
    GSList    *group;
    int       i, page, day_period, week_period, month_period, year_period;
    int       week_vector, default_day, def_pos, def_off;
    time_t    now;
    struct tm *tm;
    
    now = time (NULL);
    tm = localtime (&now);
    
    f    = gtk_frame_new (_("Frequency"));
    vbox = gtk_vbox_new (0, 0);
    hbox = gtk_hbox_new (0, 0);
    ee->recur_content = gtk_notebook_new ();
    notebook = (GtkNotebook *) ee->recur_content;
    
    gtk_container_add (GTK_CONTAINER (f), hbox);
    gtk_box_pack_start (GTK_BOX (hbox), vbox, 0, 0, 0);
    gtk_box_pack_start (GTK_BOX (hbox), gtk_vseparator_new (), 0, 0, 0);
    gtk_box_pack_start (GTK_BOX (hbox), ee->recur_content, TRUE, TRUE, 10);

    day_period   = 1;
    week_period  = 1;
    month_period = 1;
    year_period  = 1;

    /* Default to today */
    week_vector = 1 << tm->tm_wday;
    default_day = tm->tm_mday - 1;
    def_pos = 0;
    def_off = 0;

    /* Determine which should be the default selection */
    if (ee->ical->recur){
        enum RecurType type = ee->ical->recur->type;
        int interval = ee->ical->recur->interval;

        switch (type){
        case RECUR_DAILY:
            page = 0;
            day_period = interval;
            break;
            
        case RECUR_WEEKLY:
            page = 1;
            week_period = interval;
            week_vector = ee->ical->recur->weekday;
            break;
            
        case RECUR_MONTHLY_BY_POS:
            page = 2;
            month_period = interval;
            def_pos = ee->ical->recur->u.month_pos;
            break;
            
        case RECUR_MONTHLY_BY_DAY:
            page = 2;
            month_period = interval;
            default_day = ee->ical->recur->u.month_day;
            break;
            
        case RECUR_YEARLY_BY_MONTH:
            page = 3;
            year_period  = interval;
            break;
            
        case RECUR_YEARLY_BY_DAY:
            page = 4;
            year_period  = interval;
            break;
        }
    } else {
        page         = 0;
    }
    
    /* The recureency selector */
    for (i = 0, group = NULL; recurrence_types [i].name; i++){
        r = gtk_radio_button_new_with_label (group, _(recurrence_types [i].name));
        group = gtk_radio_button_group (GTK_RADIO_BUTTON (r));
        
        gtk_toggle_button_set_state (GTK_TOGGLE_BUTTON (r), i == page);
        gtk_signal_connect (GTK_OBJECT (r), "toggled", GTK_SIGNAL_FUNC (recurrence_toggled), ee);
        gtk_box_pack_start_defaults (GTK_BOX (vbox), r);
    }
    ee->recur_group = group;

    /* 1. The daily recurrence */
    daily = gtk_hbox_new (0, 0);
    ee->recur_day_period = small_entry (day_period);
    gtk_box_pack_start (GTK_BOX (daily), gtk_label_new (_("Every")), 0, 0, 0);
    gtk_box_pack_start (GTK_BOX (daily), ee->recur_day_period, 0, 0, 5);
    gtk_box_pack_start (GTK_BOX (daily), gtk_label_new (_("day(s)")), 0, 0, 0);

    /* 2. The weekly recurrence */
    weekly = gtk_vbox_new (0, 0);
    week_hbox = gtk_hbox_new (0, 0);

    /* 2.1 The week period selector */
    ee->recur_week_period = small_entry (week_period);
    gtk_box_pack_start (GTK_BOX (week_hbox), gtk_label_new _("Every"), 0, 0, 0);
    gtk_box_pack_start (GTK_BOX (week_hbox), ee->recur_week_period, 0, 0, 5);
    gtk_box_pack_start (GTK_BOX (week_hbox), gtk_label_new (_("week(s)")), 0, 0, 0);
    gtk_box_pack_start (GTK_BOX (weekly), week_hbox, 1, 1, 0);

    /* 2.2 The week day selector */
    week_day = gtk_hbox_new (0, 0);
    for (i = 0; i < 7; i++){
        ee->recur_week_days [i] = gtk_check_button_new_with_label (_(day_names [i]));
        gtk_box_pack_start (GTK_BOX (week_day), ee->recur_week_days [i], 1, 1, 5);
        if (week_vector & (1 << i))
            gtk_toggle_button_toggled (GTK_TOGGLE_BUTTON (ee->recur_week_days [i]));
    }
    gtk_box_pack_start (GTK_BOX (weekly), week_day, 1, 1, 0);

    
    /* 3. The monthly recurrence */
    monthly = gtk_table_new (0, 0, 0);
    re = gtk_radio_button_new_with_label (NULL, _("Recur on the"));
    ee->recur_month_date = make_day_list_widget (numeral_day_names, default_day);
    w = gtk_label_new (_("day"));
    gtk_table_attach (GTK_TABLE (monthly), re,
              0, 1, 0, 1, 0, 0, 0, 0);
    gtk_table_attach (GTK_TABLE (monthly), ee->recur_month_date,
              1, 2, 0, 1, 0, 0, 5, 0);
    gtk_table_attach (GTK_TABLE (monthly), w, 
              2, 3, 0, 1, 0, 0, 0, 0);
    gtk_signal_connect (GTK_OBJECT (re), "toggled", GTK_SIGNAL_FUNC (recur_month_enable_date), ee);
                
    r1 = gtk_radio_button_new_with_label (gtk_radio_button_group (GTK_RADIO_BUTTON (re)), _("Recur on the"));
    ee->recur_month_day = make_day_list_widget (numeral_day_names, 0);
    ee->recur_month_weekday = make_day_list_widget (weekday_names, def_pos);
    gtk_table_attach (GTK_TABLE (monthly), r1,
              0, 1, 1, 2, 0, 0, 0, 0);
    gtk_table_attach (GTK_TABLE (monthly), ee->recur_month_day,
              1, 2, 1, 2, 0, 0, 5, 0);
    gtk_table_attach (GTK_TABLE (monthly), ee->recur_month_weekday,
              2, 3, 1, 2, 0, 0, 5, 0);
    gtk_table_attach (GTK_TABLE (monthly), gtk_label_new (_("Every")),
              3, 4, 0, 2, 0, 0, 0, 0);
    ee->recur_month_period = small_entry (month_period);
    gtk_table_attach (GTK_TABLE (monthly), ee->recur_month_period,
              4, 5, 0, 2, 0, 0, 5, 0);
    gtk_table_attach (GTK_TABLE (monthly), gtk_label_new (_("month(s)")),
              5, 6, 0, 2, 0, 0, 0, 0);
    if (ee->ical->recur) {
        if (ee->ical->recur->type == RECUR_MONTHLY_BY_POS)
            gtk_toggle_button_set_state (GTK_TOGGLE_BUTTON (r1), 1);
    } else
        recur_month_enable_date (GTK_TOGGLE_BUTTON (re), ee);

    /* 4. The yearly recurrence */
    yearly = gtk_hbox_new (0, 0);
    ee->recur_year_period = small_entry (year_period);
    gtk_box_pack_start (GTK_BOX (yearly), gtk_label_new (_("Every")), 0, 0, 0);
    gtk_box_pack_start (GTK_BOX (yearly), ee->recur_year_period, 0, 0, 5);
    gtk_box_pack_start (GTK_BOX (yearly), gtk_label_new (_("year(s)")), 0, 0, 0);
    
    /* Finish setting this up */
    gtk_notebook_append_page (notebook, daily, gtk_label_new (""));
    gtk_notebook_append_page (notebook, weekly, gtk_label_new (""));
    gtk_notebook_append_page (notebook, monthly, gtk_label_new (""));
    gtk_notebook_append_page (notebook, yearly, gtk_label_new (""));
    gtk_notebook_set_show_tabs (notebook, FALSE);
    gtk_notebook_set_show_border (notebook, FALSE);

    gtk_notebook_set_page (notebook, page);
    
    /* Attach to the main table */
    gtk_box_pack_start (GTK_BOX (ee->recur_table), f, 1, 0, 0);
};

static void
ee_init_recurrent_page (EventEditor *ee)
{
    ee->recur_table = gtk_vbox_new (0, 0);
    gtk_notebook_append_page (GTK_NOTEBOOK (ee->notebook), GTK_WIDGET (ee->recur_table),
                  gtk_label_new (_("Repeating")));
    ee_rp_init_frequency (ee);
}

static void
event_editor_init_widgets (EventEditor *ee)
{
    ee->vbox = gtk_vbox_new (0, 0);
    gtk_container_add (GTK_CONTAINER (ee), ee->vbox);
    gtk_container_border_width (GTK_CONTAINER (ee), 5);
    
    ee->notebook = gtk_notebook_new ();
    gtk_box_pack_start (GTK_BOX (ee->vbox), ee->notebook, 1, 1, 0);

    /* Init the various configuration pages */
    ee_init_general_page (ee);
    ee_init_summary_page (ee);
    ee_init_recurrent_page (ee);
    
    /* Separator */
    gtk_box_pack_start (GTK_BOX (ee->vbox), gtk_hseparator_new (), 0, 0, 0);

    /* Buttons */
    gtk_box_pack_start (GTK_BOX (ee->vbox), ee_create_buttons (ee), 0, 0, 5);
    
    /* We show all of the contained widgets */
    gtk_widget_show_all (GTK_WIDGET (ee));
    /* And we hide the toplevel, to be consistent with the rest of Gtk */
    gtk_widget_hide (GTK_WIDGET (ee));
}

static void
event_editor_init (EventEditor *ee)
{
    ee->ical = 0;
}

static void
event_editor_destroy (GtkObject *object)
{
    EventEditor *ee;

    g_return_if_fail (object != NULL);
    g_return_if_fail (IS_EVENT_EDITOR (object));

    ee = EVENT_EDITOR (object);

    if (ee->ical)
        ee->ical->user_data = NULL;/* we are no longer editing it */
}

GtkWidget *
event_editor_new (GnomeCalendar *gcal, iCalObject *ical)
{
    GtkWidget *retval;
    EventEditor *ee;

    gdk_pointer_ungrab (GDK_CURRENT_TIME);
    gdk_flush ();

    retval = gtk_type_new (event_editor_get_type ());
    ee = EVENT_EDITOR (retval);
    
    if (ical == 0){
        ical = ical_new ("Test Comment", user_name, "Test Summary");
        ical->new = 1;
    }

    ical->user_data = ee;   /* so that the world can know we are editing it */

    ee->ical = ical;
    ee->gnome_cal = gcal;
    event_editor_init_widgets (ee);
    
    return retval;
}

/*
 * New event:  Create iCal, edit, check result: Ok: insert;  Cancel: destroy iCal
 * Edit event: fetch  iCal, edit, check result: Ok: remove from calendar, add to calendar; Cancel: nothing
 */