aboutsummaryrefslogblamecommitdiffstats
path: root/calendar/gui/e-itip-control.c
blob: 12ed92e93edbb2298f333bfb25dfd152575a6820 (plain) (tree)
1
2
3
4
5
6
7
8

                                                                           
  
                                   
  
                                                                
                                                                   
                                                        


                                                                  






                                                                    
  
                      

   
                    
                   

      



                      
                 
                        

                                

                                   

                                         
                                    
                                  
                            
                                   
                 
                                   
                              
                                  
                                
                                    
                            
                       
                           
 
                             
                        
 
     
                         

                        
      


                                
 



                                 
                                 

                                   
 

                    
 
                         


                            
 
                  



                                                                                      
 


                                                                             


                                                                                                 
 






                                                                                                 
 


                                                                                               
 
                                                                                          
                                                                           
                                                    
 


                                                                                            
 


                                                                                           
      
 


                                                         
 
     

                                                               
      

                                                                                                                       
 
                                         
 
 


















                                                                     

         
                    


           
                                     
 
                                     
 
                                                
 
                                                             
 
                                        

 

                              
           


                                                     
 
                                 
 



                                              
 
                                                      

 
                  
                                      
 
                          
                         
 
                                   
 

                                                                
 







                                                                      






                                                               


                                               
                    
 
 
           
                         
 
                                  
                                   
 



                                               

                                                
 
                    
     










                                                                         



                                                                     
      
 
                                 
                                                           

                                                              
 
                                                         
                                      
                                                              


                                     
                                                                  

                                                                       






                                                                              
 








                                                                              


           
                             







                                  

                                                           
                          
 





                                             


                          





                                    
                        
 

                                                  
 

                          
                        


                                              
 

                                                           
 
                      


                                                                   

 




                                                  
 






                                                              
 






                                                                                         
 




                                                        
 


                                                                   
 
                                                         






                                                              
                     
                                                             
 


                                    
 
                                                     
 






                                                                                         
 
                                                        
 
                                                    
                                           

                              
 
                    

 
                             
                                                                      





                                                  
 



                                                                                         

                                  

 
     
           
                              
 

                                  
 
                          
 

                                                                        
 
 
 
           
                                      

                                  
 
                          
 



                                                             
 




                                                             
      
 
           

                                                                
                                                        
 

                                  
                                      




                                  



                                                                            





                                                                                              
 

                                       
 
                                             
                                                                           
                                                  





                                                                  
                                             




                                                                              

                                                                            
                                                                    
                                                    
                                             










                                                                               


                 


                                       
 
           

                                                                              
 
                                  
                                      
                                 
                                                       
                               
 

                          

                                              
                         
                                                    
                             

                                         
                                                                         
                                                                     
                                                       
                              
                                        
                                                                         
                                                                  
                                                       
                              
                                            
                                                                         
                                                                            
                                                       
                              
                        
                                                                                                         
                 


                                                                           
                                                
 
                         
                                                  
                            

                                         
                                                                                                               
                              
                                            
                                                                                                         
                                                       
                              
                        
                                                                                                       
                 


                                                                            
                                                
 

                             
                                                            
                                                           

                                                                           

                                                                                                         

                                                                            
                                      
         
                                                

                         
                                                
                                                                              
                                                                                                   


                                                                            
 
                                                
 
                  
                                                             
 
 
           
                                                                                           
 

                            
 
 
                  
                                                                                                                  
                
                                                                                   
         
 
 
           
                                                            


                                   
 



                                                             



                                                                       



                                                                  
                                                                                                                   
                                      
                                                                                                                
                       
                                                                                        
 
                                                                                   

                   
                                                                                      




                                                                                        
                                                                   









                                                                              
                                                                                                      

                                  


                                        

                                       
                    

                                
                          
 

                                                             


                                                                       



                                                                  

                                                                                            

                                      

                                                                                            

                       

                                                                                            
 

                                                                                            
 




                                                                         




                                                              

                                                                                     
                                                                                    






                                 
                                             


                                                                     

                                                              

                                                                                     
                                                                                    
                      
         

                                                                                
 
                                           



                                                                                            

                                                                                         
 



                                                                            
                                                                              


                                                      

                                                                                             
 

































                                                                                    





                                                            

                                                                        
         








                                                                                               

                                                                                            






                                                                              
 
 
 


























































                                                                                                         











                                                                                      













                                                                                      































                                                                                
           
                                       

                                  
                           

                                            
 
                          
 

                                 

                                                                               
                                                 

                                 

                                                                                 
                                                 

                             

                                                                                  
                                                 

                                 

                                                                                              



















                                                                           

                               

                                                                              
                                               

                                

                                                                     
                                                

                      

                                                                                
                               
         
 
                                                          
                         
 
 
           
                                      
 
                                  
                           

                                            
 
                          
 

                                 

                                                                            
                                                 

                                 

                                                                         
                                                 

                             

                                                                               
                                                 

                                 

                                                                                           




















                                                                           

                               

                                                                              
                                               

                                

                                                                  
                                                

                      

                                                                                
                               
         

                                                          
                         
 
 
           
                                          

                                  

                                            
 
                          
 

                                 

                                                                                 
                               

                                 

                                                                                 
                                                    

                               

                                                                                
                               

                      

                                                                                
                               
         

                                                          
                         
 
 
                      
                             

                                  
                                
 
            
                                         

                                                



                                                      



                   
     




                                                    

                                            

                                                     
                                          





                                                
      
 
           
                                 


                                  

                                  
 
                          
 
     

                                 
      
 

                                                           
 







                                                                                            

                                                                             
                                                                                                 

                                                           
                       
          
 
                                                    
 


                                          
                      




                                             

                      
                                                                                               
         

                                                
 
 
    
                                                               


                                  
                                                    

                               
 
                          

                        



                          
 
                                          

                                                    

                                                                    
                                                                                                        
                       
         

                                                                                        
                           
                                                                                                        

                       
 

                                                      


                                                                                            
 





                                                                     

                                                                                         
                                                   
                                         


                                                         
 
                                      
                                                                                                        


                       


                                                                                                  
 



                                  
 



                            
                                            



                                  
 

                                          
 
    
                                                 

                                  
 
                          
 

                                    
 

                                        
 



                                                                          
 
                          
 

                                            
 

                                                
 



                                                    
 
                          
 

                                  
 















                                                                                            
           
                                
 
                                  
                             

                               
                          
 
                          
 


                                                    
            
                                            


                                                             
 
                                                                 
                                                                                           



                                                                  
                                                                
 
 
           




                                           
                           


                               
 




                                                    
            


                                            
                                                 



                                                            
 



                                                                         
 
                                                                                                          
 



                                                                                      
                                                            
                                


                                                                                             
                                             

                         
 
                                                             
                                                                                                     


                                                                                  
                                                                                      








                                                                                       
                                




                                  
                          
 
                          
 


                                                    
            
                                            
 
                                                 
                                                     
                                                                 

                                                                   

 
           



                                  
                          

                          
 
                                    
 


                                                                    

                                                             
                                                                                   

                                                           


           
                                  
 
                                  
                                      
                          
                          
                         
                           

                          
 
                                                          








                                                                    
                                                        








                                                                   
                                                                                    
 








                                                                          
                                                             

                                        
                
                                                                                   

                                                           

 
     
           
                                                  
 

                                                   
 
                          
 
                        
                                                 
 
                            

 

                                                  
 
                                                   

                                  
                          
 
                        
                                                 
 

                            
      
 
           





                                                                                        
 



                                                     
 








                                                                    
         









                                                                                                          


                                                   


                              
 
                          
 


                                                
 
                                                           
 


                                                                               
 




                                                   
                                                                                                          
                                                                  


                                                   
                                                                                                           
                                                                  


                                                   
                                                                                                          
                                                                  
                                                   




                                                     
                                                              







                                                   
                 
 


                                                                           
 
                                       
 
         

                            





                                                        
 


                                                 
                                         


                                                    








                                                                                                         
 


                                                                        

                                                                            
                         







                                                                                
                                                    



                                                                          
                                                                                                 




                                                                                      
 
/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
/* e-itip-control.c
 *
 * 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.
 *
 * Author: JP Rosevear
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <errno.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <glib.h>
#include <gtk/gtkmisc.h>
#include <libgnome/gnome-defs.h>
#include <libgnome/gnome-i18n.h>
#include <libgnome/gnome-util.h>
#include <libgnomeui/gnome-stock.h>
#include <libgnomeui/gnome-dialog.h>
#include <libgnomeui/gnome-dialog-util.h>
#include <gal/util/e-unicode-i18n.h>
#include <gal/widgets/e-unicode.h>
#include <gtkhtml/gtkhtml.h>
#include <gtkhtml/gtkhtml-stream.h>
#include <ical.h>
#include <cal-util/cal-component.h>
#include <cal-util/timeutil.h>
#include <cal-client/cal-client.h>
#include <e-util/e-time-utils.h>
#include <e-util/e-dialog-widgets.h>
#include "calendar-config.h"
#include "itip-utils.h"
#include "e-itip-control.h"

struct _EItipControlPrivate {
    GtkWidget *html;

#if 0
    GtkWidget *count;
    GtkWidget *next;
    GtkWidget *prev;
#endif

    CalClient *event_client;
    CalClient *task_client;

    char *vcalendar;
    CalComponent *comp;
    icalcomponent *main_comp;
    icalcomponent *ical_comp;
    icalcomponent *top_level;
    icalcompiter iter;
    icalproperty_method method;

    int current;
    int total;

    GList *addresses;
    gchar *from_address;
    gchar *my_address;
};

/* HTML Strings */
#define HTML_BODY_START "<body bgcolor=\"#ffffff\" text=\"#000000\" link=\"#336699\">"
#define HTML_SEP        "<hr color=#336699 align=\"left\" width=450>"
#define HTML_BODY_END   "</body>"
#define HTML_FOOTER     "</html>"

/* We don't use these now, as we need to be able to translate the text.
   But I've left these here, in case there are problems with the new code. */
#if 0
#define PUBLISH_OPTIONS "<form><b>Choose an action:</b>&nbsp<select NAME=\"action\" SIZE=\"1\"> \
<option VALUE=\"U\">Update</option></select>&nbsp &nbsp \
<input TYPE=Submit name=\"ok\" value=\"OK\"></form>"

#define REQUEST_OPTIONS "<form><b>Choose an action:</b>&nbsp<select NAME=\"action\" SIZE=\"1\"> \
<option VALUE=\"A\">Accept</option> \
<option VALUE=\"T\">Tentatively accept</option> \
<option VALUE=\"D\">Decline</option></select>&nbsp \
<input TYPE=\"checkbox\" name=\"rsvp\" value=\"1\" checked>RSVP&nbsp&nbsp\
<input TYPE=\"submit\" name=\"ok\" value=\"OK\"><br> \
</form>"

#define REQUEST_FB_OPTIONS "<form><b>Choose an action:</b><select NAME=\"action\" SIZE=\"1\"> \
<option VALUE=\"F\">Send Free/Busy Information</option></select>&nbsp &nbsp \
<input TYPE=Submit name=\"ok\" value=\"OK\"></form>"

#define REPLY_OPTIONS "<form><b>Choose an action:</b><select NAME=\"action\" SIZE=\"1\"> \
<option VALUE=\"R\">Update respondent status</option></select>&nbsp &nbsp \
<input TYPE=Submit name=\"ok\" value=\"OK\"></form>"

#define REFRESH_OPTIONS "<form><b>Choose an action:</b><select NAME=\"action\" SIZE=\"1\"> \
<option VALUE=\"S\">Send Latest Information</option></select>&nbsp &nbsp \
<input TYPE=Submit name=\"ok\" value=\"OK\"></form>"

#define CANCEL_OPTIONS "<form><b>Choose an action:</b><select NAME=\"action\" SIZE=\"1\"> \
<option VALUE=\"C\">Cancel</option></select>&nbsp &nbsp \
<input TYPE=Submit name=\"ok\" value=\"OK\"></form>"
#endif

static void class_init  (EItipControlClass   *klass);
static void init    (EItipControl        *itip);
static void destroy (GtkObject               *obj);

#if 0
static void prev_clicked_cb (GtkWidget *widget, gpointer data);
static void next_clicked_cb (GtkWidget *widget, gpointer data);
#endif
static void url_requested_cb (GtkHTML *html, const gchar *url, GtkHTMLStream *handle, gpointer data);
static void ok_clicked_cb (GtkHTML *html, const gchar *method, const gchar *url, const gchar *encoding, gpointer data);

static GtkVBoxClass *parent_class = NULL;


GtkType
e_itip_control_get_type (void)
{
    static GtkType type = 0;

    if (type == 0) {
        static const GtkTypeInfo info =
        {
            "EItipControl",
            sizeof (EItipControl),
            sizeof (EItipControlClass),
            (GtkClassInitFunc) class_init,
            (GtkObjectInitFunc) init,
            /* reserved_1 */ NULL,
            /* reserved_2 */ NULL,
            (GtkClassInitFunc) NULL,
        };

        type = gtk_type_unique (gtk_vbox_get_type (), &info);
    }

    return type;
}

static void
class_init (EItipControlClass *klass)
{
    GtkObjectClass *object_class;

    object_class = GTK_OBJECT_CLASS (klass);

    parent_class = gtk_type_class (gtk_vbox_get_type ());

    object_class->destroy = destroy;
}


/* Calendar Server routines */
static void
start_calendar_server_cb (CalClient *cal_client,
              CalClientOpenStatus status,
              gpointer data)
{
    gboolean *success = data;

    if (status == CAL_CLIENT_OPEN_SUCCESS)
        *success = TRUE;
    else
        *success = FALSE;

    gtk_main_quit (); /* end the sub event loop */
}

static CalClient *
start_calendar_server (gboolean tasks)
{
    CalClient *client;
    gboolean success;

    client = cal_client_new ();

    gtk_signal_connect (GTK_OBJECT (client), "cal_opened",
                start_calendar_server_cb, &success);

    if (tasks) {
        if (!cal_client_open_default_tasks (client, FALSE))
            goto error;
    } else {
        if (!cal_client_open_default_calendar (client, FALSE))
            goto error;
    }
            
    /* run a sub event loop to turn cal-client's async load
       notification into a synchronous call */
    gtk_main ();

    if (success)
        return client;

 error:
    gtk_object_unref (GTK_OBJECT (client));
    
    return NULL;
}

static void
init (EItipControl *itip)
{
    EItipControlPrivate *priv;
    GtkWidget *scrolled_window;

    priv = g_new0 (EItipControlPrivate, 1);

    itip->priv = priv;

    /* Addresses */
    priv->addresses = itip_addresses_get ();

    /* Header */
#if 0
    priv->prev = gnome_stock_button (GNOME_STOCK_BUTTON_PREV);
    gtk_widget_show (priv->prev);
    priv->next = gnome_stock_button (GNOME_STOCK_BUTTON_NEXT);
    gtk_widget_show (priv->next);

    hbox = gtk_hbox_new (FALSE, 0);
    gtk_box_pack_start (GTK_BOX (hbox), priv->prev, FALSE, FALSE, 4);
    gtk_box_pack_start (GTK_BOX (hbox), priv->count, TRUE, TRUE, 4);
    gtk_box_pack_start (GTK_BOX (hbox), priv->next, FALSE, FALSE, 4);
    gtk_widget_show (hbox);

    gtk_signal_connect (GTK_OBJECT (priv->prev), "clicked",
                GTK_SIGNAL_FUNC (prev_clicked_cb), itip);
    gtk_signal_connect (GTK_OBJECT (priv->next), "clicked",
                GTK_SIGNAL_FUNC (next_clicked_cb), itip);
#endif

    /* Get the cal clients */
    priv->event_client = start_calendar_server (FALSE);
    if (priv->event_client == NULL)
        g_warning ("Unable to start calendar client");

    priv->task_client = start_calendar_server (TRUE);
    if (priv->task_client == NULL)
        g_warning ("Unable to start calendar client");

    /* Html Widget */
    priv->html = gtk_html_new ();
    gtk_html_set_default_content_type (GTK_HTML (priv->html), 
                       "text/html; charset=utf-8");

    gtk_widget_show (priv->html);

    scrolled_window = gtk_scrolled_window_new (NULL, NULL);
    gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window),
                    GTK_POLICY_AUTOMATIC,
                    GTK_POLICY_AUTOMATIC);
    gtk_widget_show (scrolled_window);

    gtk_container_add (GTK_CONTAINER (scrolled_window), priv->html);
    gtk_widget_set_usize (scrolled_window, 600, 400);
    gtk_box_pack_start (GTK_BOX (itip), scrolled_window, FALSE, FALSE, 4);

    gtk_signal_connect (GTK_OBJECT (priv->html), "url_requested",
                url_requested_cb, itip);
    gtk_signal_connect (GTK_OBJECT (priv->html), "submit",
                ok_clicked_cb, itip);

}

static void
clean_up (EItipControl *itip)
{
    EItipControlPrivate *priv;

    priv = itip->priv;

    g_free (priv->vcalendar);
    priv->vcalendar = NULL;

    if (priv->comp)
        gtk_object_unref (GTK_OBJECT (priv->comp));
    priv->comp = NULL;

    icalcomponent_free (priv->top_level);
    priv->top_level = NULL;
    icalcomponent_free (priv->main_comp);
    priv->main_comp = NULL;
    priv->ical_comp = NULL;

    priv->current = 0;
    priv->total = 0;

    priv->my_address = NULL;
    g_free (priv->from_address);
    priv->from_address = NULL;
}

static void
destroy (GtkObject *obj)
{
    EItipControl *itip = E_ITIP_CONTROL (obj);
    EItipControlPrivate *priv;

    priv = itip->priv;

    clean_up (itip);

    itip_addresses_free (priv->addresses);
    priv->addresses = NULL;

    gtk_object_unref (GTK_OBJECT (priv->event_client));
    gtk_object_unref (GTK_OBJECT (priv->task_client));

    g_free (priv);

    if (GTK_OBJECT_CLASS (parent_class)->destroy)
        (* GTK_OBJECT_CLASS (parent_class)->destroy) (obj);
}

GtkWidget *
e_itip_control_new (void)
{
    return gtk_type_new (E_TYPE_ITIP_CONTROL);
}

static void
find_my_address (EItipControl *itip, icalcomponent *ical_comp)
{
    EItipControlPrivate *priv;
    icalproperty *prop;
    const char *attendee, *text;
    icalvalue *value;

    priv = itip->priv;

    for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY);
         prop != NULL;
         prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY))
    {
        GList *l;

        value = icalproperty_get_value (prop);
        if (!value)
            continue;

        attendee = icalvalue_get_string (value);

        text = itip_strip_mailto (attendee);
        for (l = priv->addresses; l != NULL; l = l->next) {
            ItipAddress *a = l->data;

            if (!strcmp (a->address, text)) {
                priv->my_address = a->address;
                return;
            }
        }
    }
}

static icalproperty *
find_attendee (icalcomponent *ical_comp, const char *address)
{
    icalproperty *prop;
    const char *attendee, *text;
    icalvalue *value;

    g_return_val_if_fail (address != NULL, NULL);

    for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY);
         prop != NULL;
         prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY))
    {
        value = icalproperty_get_value (prop);
        if (!value)
            continue;

        attendee = icalvalue_get_string (value);

        text = itip_strip_mailto (attendee);
        if (strstr (text, address))
            break;
    }

    return prop;
}

static icalparameter_partstat
find_attendee_partstat (icalcomponent *ical_comp, const char *address)
{
    icalproperty *prop;

    prop = find_attendee (ical_comp, address);
    if (prop != NULL) {
        icalparameter *param;

        param = icalproperty_get_first_parameter (prop, ICAL_PARTSTAT_PARAMETER);
        if (param != NULL)
            return icalparameter_get_partstat (param);
    }

    return ICAL_PARTSTAT_NONE;
}

#if 0
static void
set_label (EItipControl *itip)
{
    EItipControlPrivate *priv;
    gchar *text;

    priv = itip->priv;

    text = g_strdup_printf ("%d of %d", priv->current, priv->total);
    gtk_label_set_text (GTK_LABEL (priv->count), text);

}

static void
set_button_status (EItipControl *itip)
{
    EItipControlPrivate *priv;

    priv = itip->priv;

    if (priv->current == priv->total)
        gtk_widget_set_sensitive (priv->next, FALSE);
    else
        gtk_widget_set_sensitive (priv->next, TRUE);

    if (priv->current == 1)
        gtk_widget_set_sensitive (priv->prev, FALSE);
    else
        gtk_widget_set_sensitive (priv->prev, TRUE);
}
#endif

static void
write_label_piece (EItipControl *itip, CalComponentDateTime *dt,
           char *buffer, int size,
           const char *stext, const char *etext)
{
    EItipControlPrivate *priv;
    struct tm tmp_tm;
    char time_buf[64], *time_utf8;
    icaltimezone *zone = NULL;
    char *display_name;

    priv = itip->priv;

    /* UTC times get converted to the current timezone. This is done for
       the COMPLETED property, which is always in UTC, and also because
       Outlook sends simple events as UTC times. */
    if (dt->value->is_utc) {
        char *location = calendar_config_get_timezone ();
        zone = icaltimezone_get_builtin_timezone (location);
        icaltimezone_convert_time (dt->value, icaltimezone_get_utc_timezone (), zone);
    }

    tmp_tm = icaltimetype_to_tm (dt->value);

    if (stext != NULL)
        strcat (buffer, stext);

    e_time_format_date_and_time (&tmp_tm,
                     calendar_config_get_24_hour_format (),
                     FALSE, FALSE,
                     time_buf, sizeof (time_buf));

    time_utf8 = e_utf8_from_locale_string (time_buf);
    strcat (buffer, time_utf8);
    g_free (time_utf8);

    if (!dt->value->is_utc && dt->tzid) {
        zone = icalcomponent_get_timezone (priv->top_level, dt->tzid);
    }

    /* Output timezone after time, e.g. " America/New_York". */
    if (zone) {
        /* Note that this returns UTF-8, since all iCalendar data is
           UTF-8. But it probably is not translated. */
        display_name = icaltimezone_get_display_name (zone);
        if (display_name && *display_name) {
            strcat (buffer, " ");

            /* We check if it is one of our builtin timezone names,
               in which case we call gettext to translate it, and
               we need to convert to UTF-8. If it isn't a builtin
               timezone name, we use it as-is, as it is already
               UTF-8. */
            if (icaltimezone_get_builtin_timezone (display_name)) {
                strcat (buffer, U_(display_name));
            } else {
                strcat (buffer, display_name);
            }
        }
    }

    if (etext != NULL)
        strcat (buffer, etext);
}

static void
set_date_label (EItipControl *itip, GtkHTML *html, GtkHTMLStream *html_stream,
        CalComponent *comp)
{
    EItipControlPrivate *priv;
    CalComponentDateTime datetime;
    static char buffer[1024];
    gboolean wrote = FALSE, task_completed = FALSE;
    CalComponentVType type;

    priv = itip->priv;

    type = cal_component_get_vtype (comp);

    buffer[0] = '\0';
    cal_component_get_dtstart (comp, &datetime);
    if (datetime.value) {
        switch (type) {
        case CAL_COMPONENT_EVENT:
            write_label_piece (itip, &datetime, buffer, 1024,
                       U_("Meeting begins: <b>"),
                       "</b><br>");
            break;
        case CAL_COMPONENT_TODO:
            write_label_piece (itip, &datetime, buffer, 1024,
                       U_("Task begins: <b>"),
                       "</b><br>");
            break;
        case CAL_COMPONENT_FREEBUSY:
            write_label_piece (itip, &datetime, buffer, 1024,
                       U_("Free/Busy info begins: <b>"),
                       "</b><br>");
            break;
        default:
            write_label_piece (itip, &datetime, buffer, 1024, U_("Begins: <b>"), "</b><br>");
        }
        gtk_html_write (html, html_stream, buffer, strlen(buffer));
        wrote = TRUE;
    }
    cal_component_free_datetime (&datetime);

    buffer[0] = '\0';
    cal_component_get_dtend (comp, &datetime);
    if (datetime.value){
        switch (type) {
        case CAL_COMPONENT_EVENT:
            write_label_piece (itip, &datetime, buffer, 1024, U_("Meeting ends: <b>"), "</b><br>");
            break;
        case CAL_COMPONENT_FREEBUSY:
            write_label_piece (itip, &datetime, buffer, 1024, U_("Free/Busy info ends: <b>"),
                       "</b><br>");
            break;
        default:
            write_label_piece (itip, &datetime, buffer, 1024, U_("Ends: <b>"), "</b><br>");
        }
        gtk_html_write (html, html_stream, buffer, strlen (buffer));
        wrote = TRUE;
    }
    cal_component_free_datetime (&datetime);

    buffer[0] = '\0';
    datetime.tzid = NULL;
    cal_component_get_completed (comp, &datetime.value);
    if (type == CAL_COMPONENT_TODO && datetime.value) {
        /* Pass TRUE as is_utc, so it gets converted to the current
           timezone. */
        datetime.value->is_utc = TRUE;
        write_label_piece (itip, &datetime, buffer, 1024, U_("Task Completed: <b>"), "</b><br>");
        gtk_html_write (html, html_stream, buffer, strlen (buffer));
        wrote = TRUE;
        task_completed = TRUE;
    }
    cal_component_free_datetime (&datetime);

    buffer[0] = '\0';
    cal_component_get_due (comp, &datetime);
    if (type == CAL_COMPONENT_TODO && !task_completed && datetime.value) {
        write_label_piece (itip, &datetime, buffer, 1024, U_("Task Due: <b>"), "</b><br>");
        gtk_html_write (html, html_stream, buffer, strlen (buffer));
        wrote = TRUE;
    }

    cal_component_free_datetime (&datetime);

    if (wrote)
        gtk_html_stream_printf (html_stream, "<br>");
}

static void
set_message (GtkHTML *html, GtkHTMLStream *html_stream, const gchar *message, gboolean err)
{
    if (message == NULL)
        return;


    if (err) {
        gtk_html_stream_printf (html_stream, "<b><font color=\"#ff0000\">%s</font></b><br><br>", message);
    } else {
        gtk_html_stream_printf (html_stream, "<b>%s</b><br><br>", message);
    }
}

static void
write_error_html (EItipControl *itip, const gchar *itip_err)
{
    EItipControlPrivate *priv;
    GtkHTMLStream *html_stream;

    priv = itip->priv;

    /* Html widget */
    html_stream = gtk_html_begin (GTK_HTML (priv->html));
    gtk_html_stream_printf (html_stream,
                "<html><head><title>%s</title></head>",
                U_("iCalendar Information"));

    gtk_html_write (GTK_HTML (priv->html), html_stream,
            HTML_BODY_START, strlen(HTML_BODY_START));

    /* The table */
    gtk_html_stream_printf (html_stream, "<table width=450 cellspacing=\"0\" cellpadding=\"4\" border=\"0\">");
    /* The column for the image */
    gtk_html_stream_printf (html_stream, "<tr><td width=48 align=\"center\" valign=\"top\" rowspan=\"8\">");
    /* The image */
    gtk_html_stream_printf (html_stream, "<img src=\"/meeting-request.png\"></td>");

    gtk_html_stream_printf (html_stream, "<td align=\"left\" valign=\"top\">");

    /* Title */
    set_message (GTK_HTML (priv->html), html_stream, U_("iCalendar Error"), TRUE);

    /* Error */
    gtk_html_write (GTK_HTML (priv->html), html_stream, itip_err, strlen(itip_err));

    /* Clean up */
    gtk_html_stream_printf (html_stream, "</td></tr></table>");

    gtk_html_write (GTK_HTML (priv->html), html_stream,
            HTML_BODY_END, strlen(HTML_BODY_END));
    gtk_html_write (GTK_HTML (priv->html), html_stream,
            HTML_FOOTER, strlen(HTML_FOOTER));

    gtk_html_end (GTK_HTML (priv->html), html_stream, GTK_HTML_STREAM_OK);
}

static void
write_html (EItipControl *itip, const gchar *itip_desc, const gchar *itip_title, const gchar *options)
{
    EItipControlPrivate *priv;
    GtkHTMLStream *html_stream;
    CalComponentText text;
    CalComponentOrganizer organizer;
    CalComponentAttendee *attendee;
    GSList *attendees, *l = NULL;
    gchar *html;
    const gchar *const_html;

    priv = itip->priv;

    /* Html widget */
    html_stream = gtk_html_begin (GTK_HTML (priv->html));
    gtk_html_stream_printf (html_stream,
                "<html><head><title>%s</title></head>",
                U_("iCalendar Information"));
    gtk_html_write (GTK_HTML (priv->html), html_stream,
            HTML_BODY_START, strlen(HTML_BODY_START));

    /* The table */
    const_html = "<table width=450 cellspacing=\"0\" cellpadding=\"4\" border=\"0\">";
    gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html));

    /* The column for the image */
    const_html = "<tr><td width=48 align=\"center\" valign=\"top\" rowspan=\"8\">";
    gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html));

    /* The image */
    const_html = "<img src=\"/meeting-request.png\"></td>";
    gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html));

    const_html = "<td align=\"left\" valign=\"top\">";
    gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html));

    switch (priv->method) {
    case ICAL_METHOD_REFRESH:
    case ICAL_METHOD_REPLY:
        /* An attendee sent this */
        cal_component_get_attendee_list (priv->comp, &attendees);
        if (attendees != NULL) {
            attendee = attendees->data;
            html = g_strdup_printf (itip_desc,
                        attendee->cn ?
                        attendee->cn :
                        itip_strip_mailto (attendee->value));
        } else {
            html = g_strdup_printf (itip_desc, U_("An unknown person"));
        }
        break;
    case ICAL_METHOD_PUBLISH:
    case ICAL_METHOD_REQUEST:
    case ICAL_METHOD_ADD:
    case ICAL_METHOD_CANCEL:
    default:
        /* The organizer sent this */
        cal_component_get_organizer (priv->comp, &organizer);
        if (organizer.value != NULL)
            html = g_strdup_printf (itip_desc,
                        organizer.cn ?
                        organizer.cn :
                        itip_strip_mailto (organizer.value));
        else
            html = g_strdup_printf (itip_desc, U_("An unknown person"));
        break;
    }
    gtk_html_write (GTK_HTML (priv->html), html_stream, html, strlen(html));
    g_free (html);

    /* Describe what the user can do */
    const_html = U_("<br> Please review the following information, "
            "and then select an action from the menu below.");
    gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html));

    /* Separator */
    gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_SEP, strlen (HTML_SEP));

    /* Title */
    set_message (GTK_HTML (priv->html), html_stream, itip_title, FALSE);

    /* Date information */
    set_date_label (itip, GTK_HTML (priv->html), html_stream, priv->comp);

    /* Summary */
    cal_component_get_summary (priv->comp, &text);
    gtk_html_stream_printf (html_stream, "<b>%s</b> %s<br><br>",
                U_("Summary:"), text.value ? text.value : U_("<i>None</i>"));

    /* Status */
    if (priv->method == ICAL_METHOD_REPLY) {
        GSList *alist;

        cal_component_get_attendee_list (priv->comp, &alist);
        
        if (alist != NULL) {
            CalComponentAttendee *a = alist->data;

            gtk_html_stream_printf (html_stream, "<b>%s</b> ",
                        U_("Status:"));
            
            switch (a->status) {
            case ICAL_PARTSTAT_ACCEPTED:
                gtk_html_stream_printf (html_stream, "%s<br><br>",
                            U_("Accepted"));
                break;
            case ICAL_PARTSTAT_TENTATIVE:
                gtk_html_stream_printf (html_stream, "%s<br><br>",
                            U_("Tentatively Accepted"));
                break;
            case ICAL_PARTSTAT_DECLINED:
                gtk_html_stream_printf (html_stream, "%s<br><br>",
                            U_("Declined"));
                break;
            default:
                gtk_html_stream_printf (html_stream, "%s<br><br>",
                            U_("Unknown"));
            }
        }
        
        cal_component_free_attendee_list (alist);
    }
    
    /* Description */
    cal_component_get_description_list (priv->comp, &l);
    if (l)
        text = *((CalComponentText *)l->data);

    if (l && text.value) {
        gtk_html_stream_printf (html_stream, "<b>%s</b> %s",
                    U_("Description:"), text.value);
    }
    cal_component_free_text_list (l);

    /* Separator */
    gtk_html_write (GTK_HTML (priv->html), html_stream, HTML_SEP, strlen (HTML_SEP));

    /* Options */
    if (options != NULL)
        gtk_html_write (GTK_HTML (priv->html), html_stream, options, strlen (options));

    const_html = "</td></tr></table>";
    gtk_html_write (GTK_HTML (priv->html), html_stream, const_html, strlen(const_html));

    gtk_html_write (GTK_HTML (priv->html), html_stream,
            HTML_BODY_END, strlen(HTML_BODY_END));
    gtk_html_write (GTK_HTML (priv->html), html_stream,
            HTML_FOOTER, strlen(HTML_FOOTER));

    gtk_html_end (GTK_HTML (priv->html), html_stream, GTK_HTML_STREAM_OK);
}


static char*
get_publish_options ()
{
    return g_strdup_printf ("<form><b>%s</b>&nbsp"
                "<select NAME=\"action\" SIZE=\"1\"> "
                "<option VALUE=\"U\">%s</option>"
                "</select>&nbsp &nbsp "
                "<input TYPE=Submit name=\"ok\" value=\"%s\">"
                "</form>",
                U_("Choose an action:"),
                U_("Update"),
                U_("OK"));
}

static char*
get_request_options ()
{
    return g_strdup_printf ("<form><b>%s</b>&nbsp"
                "<select NAME=\"action\" SIZE=\"1\"> "
                "<option VALUE=\"A\">%s</option> "
                "<option VALUE=\"T\">%s</option> "
                "<option VALUE=\"D\">%s</option></select>&nbsp "
                "<input TYPE=\"checkbox\" name=\"rsvp\" value=\"1\" checked>%s&nbsp&nbsp"
                "<input TYPE=\"submit\" name=\"ok\" value=\"%s\"><br> "
                "</form>",
                U_("Choose an action:"),
                U_("Accept"),
                U_("Tentatively accept"),
                U_("Decline"),
                U_("RSVP"),
                U_("OK"));
}

static char*
get_request_fb_options ()
{
    return g_strdup_printf ("<form><b>%s</b>&nbsp"
                "<select NAME=\"action\" SIZE=\"1\"> "
                "<option VALUE=\"F\">%s</option></select>&nbsp &nbsp "
                "<input TYPE=Submit name=\"ok\" value=\"%s\">"
                "</form>",
                U_("Choose an action:"),
                U_("Send Free/Busy Information"),
                U_("OK"));
}

static char*
get_reply_options ()
{
    return g_strdup_printf ("<form><b>%s</b>&nbsp"
                "<select NAME=\"action\" SIZE=\"1\"> "
                "<option VALUE=\"R\">%s</option></select>&nbsp &nbsp "
                "<input TYPE=Submit name=\"ok\" value=\"%s\">"
                "</form>",
                U_("Choose an action:"),
                U_("Update respondent status"),
                U_("OK"));
}

static char*
get_refresh_options ()
{
    return g_strdup_printf ("<form><b>%s</b>&nbsp"
                "<select NAME=\"action\" SIZE=\"1\"> "
                "<option VALUE=\"S\">%s</option></select>&nbsp &nbsp "
                "<input TYPE=Submit name=\"ok\" value=\"%s\">"
                "</form>",
                U_("Choose an action:"),
                U_("Send Latest Information"),
                U_("OK"));
}

static char*
get_cancel_options ()
{
    return g_strdup_printf ("<form><b>%s</b>&nbsp"
                "<select NAME=\"action\" SIZE=\"1\"> "
                "<option VALUE=\"C\">%s</option></select>&nbsp &nbsp "
                "<input TYPE=Submit name=\"ok\" value=\"%s\">"
                "</form>",
                U_("Choose an action:"),
                U_("Cancel"),
                U_("OK"));
}


static CalComponent *
get_real_item (EItipControl *itip) 
{
    EItipControlPrivate *priv;
    CalComponent *comp;
    CalComponentVType type;
    CalClientGetStatus status;
    const char *uid;
    
    priv = itip->priv;

    type = cal_component_get_vtype (priv->comp);
    cal_component_get_uid (priv->comp, &uid);

    switch (type) {
    case CAL_COMPONENT_EVENT:
        status = cal_client_get_object (priv->event_client, uid, &comp);
        break;
    case CAL_COMPONENT_TODO:
        status = cal_client_get_object (priv->task_client, uid, &comp);
        break;
    default:
        status = CAL_CLIENT_GET_NOT_FOUND;
    }

    if (status != CAL_CLIENT_GET_SUCCESS)
        return NULL;

    return comp;
}

static void
show_current_event (EItipControl *itip)
{
    EItipControlPrivate *priv;
    CalComponent *comp;
    const gchar *itip_title, *itip_desc;
    char *options;

    priv = itip->priv;

    switch (priv->method) {
    case ICAL_METHOD_PUBLISH:
        itip_desc = U_("<b>%s</b> has published meeting information.");
        itip_title = U_("Meeting Information");
        options = get_publish_options ();
        break;
    case ICAL_METHOD_REQUEST:
        itip_desc = U_("<b>%s</b> requests your presence at a meeting.");
        itip_title = U_("Meeting Proposal");
        options = get_request_options ();
        break;
    case ICAL_METHOD_ADD:
        itip_desc = U_("<b>%s</b> wishes to add to an existing meeting.");
        itip_title = U_("Meeting Update");
        options = get_publish_options ();
        break;
    case ICAL_METHOD_REFRESH:
        itip_desc = U_("<b>%s</b> wishes to receive the latest meeting information.");
        itip_title = U_("Meeting Update Request");
        options = get_refresh_options ();

        /* Provide extra info, since its not in the component */
        comp = get_real_item (itip);
        if (comp != NULL) {
            CalComponentText text;
            GSList *l;
            
            cal_component_get_summary (comp, &text);
            cal_component_set_summary (priv->comp, &text);
            cal_component_get_description_list (comp, &l);
            cal_component_set_description_list (priv->comp, l);
            cal_component_free_text_list (l);
            
            gtk_object_unref (GTK_OBJECT (comp));
        } else {
            CalComponentText text = {_("Unknown"), NULL};
            
            cal_component_set_summary (priv->comp, &text);
        }
        break;
    case ICAL_METHOD_REPLY:
        itip_desc = U_("<b>%s</b> has replied to a meeting request.");
        itip_title = U_("Meeting Reply");
        options = get_reply_options ();
        break;
    case ICAL_METHOD_CANCEL:
        itip_desc = U_("<b>%s</b> has cancelled a meeting.");
        itip_title = U_("Meeting Cancellation");
        options = get_cancel_options ();
        break;
    default:
        itip_desc = U_("<b>%s</b> has sent an unintelligible message.");
        itip_title = U_("Bad Meeting Message");
        options = NULL;
    }

    write_html (itip, itip_desc, itip_title, options);
    g_free (options);
}

static void
show_current_todo (EItipControl *itip)
{
    EItipControlPrivate *priv;
    CalComponent *comp;
    const gchar *itip_title, *itip_desc;
    char *options;

    priv = itip->priv;

    switch (priv->method) {
    case ICAL_METHOD_PUBLISH:
        itip_desc = U_("<b>%s</b> has published task information.");
        itip_title = U_("Task Information");
        options = get_publish_options ();
        break;
    case ICAL_METHOD_REQUEST:
        itip_desc = U_("<b>%s</b> requests you perform a task.");
        itip_title = U_("Task Proposal");
        options = get_request_options ();
        break;
    case ICAL_METHOD_ADD:
        itip_desc = U_("<b>%s</b> wishes to add to an existing task.");
        itip_title = U_("Task Update");
        options = get_publish_options ();
        break;
    case ICAL_METHOD_REFRESH:
        itip_desc = U_("<b>%s</b> wishes to receive the latest task information.");
        itip_title = U_("Task Update Request");
        options = get_refresh_options ();


        /* Provide extra info, since its not in the component */
        comp = get_real_item (itip);
        if (comp != NULL) {
            CalComponentText text;
            GSList *l;
            
            cal_component_get_summary (comp, &text);
            cal_component_set_summary (priv->comp, &text);
            cal_component_get_description_list (comp, &l);
            cal_component_set_description_list (priv->comp, l);
            cal_component_free_text_list (l);
            
            gtk_object_unref (GTK_OBJECT (comp));
        } else {
            CalComponentText text = {_("Unknown"), NULL};
            
            cal_component_set_summary (priv->comp, &text);
        }
        break;
    case ICAL_METHOD_REPLY:
        itip_desc = U_("<b>%s</b> has replied to a task assignment.");
        itip_title = U_("Task Reply");
        options = get_reply_options ();
        break;
    case ICAL_METHOD_CANCEL:
        itip_desc = U_("<b>%s</b> has cancelled a task.");
        itip_title = U_("Task Cancellation");
        options = get_cancel_options ();
        break;
    default:
        itip_desc = U_("<b>%s</b> has sent an unintelligible message.");
        itip_title = U_("Bad Task Message");
        options = NULL;
    }

    write_html (itip, itip_desc, itip_title, options);
    g_free (options);
}

static void
show_current_freebusy (EItipControl *itip)
{
    EItipControlPrivate *priv;
    const gchar *itip_title, *itip_desc;
    char *options;

    priv = itip->priv;

    switch (priv->method) {
    case ICAL_METHOD_PUBLISH:
        itip_desc = U_("<b>%s</b> has published free/busy information.");
        itip_title = U_("Free/Busy Information");
        options = NULL;
        break;
    case ICAL_METHOD_REQUEST:
        itip_desc = U_("<b>%s</b> requests your free/busy information.");
        itip_title = U_("Free/Busy Request");
        options = get_request_fb_options ();
        break;
    case ICAL_METHOD_REPLY:
        itip_desc = U_("<b>%s</b> has replied to a free/busy request.");
        itip_title = U_("Free/Busy Reply");
        options = NULL;
        break;
    default:
        itip_desc = U_("<b>%s</b> has sent an unintelligible message.");
        itip_title = U_("Bad Free/Busy Message");
        options = NULL;
    }

    write_html (itip, itip_desc, itip_title, options);
    g_free (options);
}

static icalcomponent *
get_next (icalcompiter *iter)
{
    icalcomponent *ret = NULL;
    icalcomponent_kind kind;

    do {
        icalcompiter_next (iter);
        ret = icalcompiter_deref (iter);
        kind = icalcomponent_isa (ret);
    } while (ret != NULL 
         && kind != ICAL_VEVENT_COMPONENT
         && kind != ICAL_VTODO_COMPONENT
         && kind != ICAL_VFREEBUSY_COMPONENT);

    return ret;
}

#if 0
static icalcomponent *
get_prev (icalcompiter *iter)
{
    icalcomponent *ret = NULL;
    icalcomponent_kind kind = ICAL_NO_COMPONENT;

    while (kind != ICAL_VEVENT_COMPONENT
           && kind != ICAL_VTODO_COMPONENT
           && kind != ICAL_VFREEBUSY_COMPONENT) {
        icalcompiter_prior (iter);
        ret = icalcompiter_deref (iter);
        kind = icalcomponent_isa (ret);
    }

    return ret;
}
#endif

static void
show_current (EItipControl *itip)
{
    EItipControlPrivate *priv;
    CalComponentVType type;
    icalcomponent *alarm_comp;
    icalcompiter alarm_iter;

    priv = itip->priv;

#if 0
    set_label (itip);
    set_button_status (itip);
#endif

    if (priv->comp)
        gtk_object_unref (GTK_OBJECT (priv->comp));

    /* Strip out alarms for security purposes */
    alarm_iter = icalcomponent_begin_component (priv->ical_comp, ICAL_VALARM_COMPONENT);
    while ((alarm_comp = icalcompiter_deref (&alarm_iter)) != NULL) {
        icalcomponent_remove_component (priv->ical_comp, alarm_comp);

        icalcompiter_next (&alarm_iter);
    }

    priv->comp = cal_component_new ();
    if (!cal_component_set_icalcomponent (priv->comp, priv->ical_comp)) {
        write_error_html (itip, U_("The message does not appear to be properly formed"));
        gtk_object_unref (GTK_OBJECT (priv->comp));
        priv->comp = NULL;
        return;
    };

    type = cal_component_get_vtype (priv->comp);

    switch (type) {
    case CAL_COMPONENT_EVENT:
        show_current_event (itip);
        break;
    case CAL_COMPONENT_TODO:
        show_current_todo (itip);
        break;
    case CAL_COMPONENT_FREEBUSY:
        show_current_freebusy (itip);
        break;
    default:
        write_error_html (itip, U_("The message contains only unsupported requests."));
    }

    find_my_address (itip, priv->ical_comp);
}

void
e_itip_control_set_data (EItipControl *itip, const gchar *text)
{
    EItipControlPrivate *priv;
    icalproperty *prop;
    icalcomponent_kind kind = ICAL_NO_COMPONENT;
    icalcomponent *tz_comp;
    icalcompiter tz_iter;

    priv = itip->priv;

    clean_up (itip);

    priv->comp = NULL;
    priv->total = 0;
    priv->current = 0;

    priv->vcalendar = g_strdup (text);
    priv->top_level = cal_util_new_top_level ();

    priv->main_comp = icalparser_parse_string (priv->vcalendar);
    if (priv->main_comp == NULL) {
        write_error_html (itip, U_("The attachment does not contain a valid calendar message"));
        return;
    }

    prop = icalcomponent_get_first_property (priv->main_comp, ICAL_METHOD_PROPERTY);
    if (prop == NULL) {
        write_error_html (itip, U_("The attachment does not contain a valid calendar message"));
        return;
    }

    priv->method = icalproperty_get_method (prop);

    tz_iter = icalcomponent_begin_component (priv->main_comp, ICAL_VTIMEZONE_COMPONENT);
    while ((tz_comp = icalcompiter_deref (&tz_iter)) != NULL) {
        icalcomponent *clone;

        clone = icalcomponent_new_clone (tz_comp);
        icalcomponent_add_component (priv->top_level, clone);

        icalcompiter_next (&tz_iter);
    }

    priv->iter = icalcomponent_begin_component (priv->main_comp, ICAL_ANY_COMPONENT);
    priv->ical_comp = icalcompiter_deref (&priv->iter);
    kind = icalcomponent_isa (priv->ical_comp);
    if (kind != ICAL_VEVENT_COMPONENT
        && kind != ICAL_VTODO_COMPONENT
        && kind != ICAL_VFREEBUSY_COMPONENT)
        priv->ical_comp = get_next (&priv->iter);

    if (priv->ical_comp == NULL) {
        write_error_html (itip, U_("The attachment has no viewable calendar items"));       
        return;
    }

    priv->total = icalcomponent_count_components (priv->main_comp, ICAL_VEVENT_COMPONENT);
    priv->total += icalcomponent_count_components (priv->main_comp, ICAL_VTODO_COMPONENT);
    priv->total += icalcomponent_count_components (priv->main_comp, ICAL_VFREEBUSY_COMPONENT);

    if (priv->total > 0)
        priv->current = 1;
    else
        priv->current = 0;

    show_current (itip);
}

gchar *
e_itip_control_get_data (EItipControl *itip)
{
    EItipControlPrivate *priv;

    priv = itip->priv;

    return g_strdup (priv->vcalendar);
}

gint
e_itip_control_get_data_size (EItipControl *itip)
{
    EItipControlPrivate *priv;

    priv = itip->priv;

    if (priv->vcalendar == NULL)
        return 0;

    return strlen (priv->vcalendar);
}

void
e_itip_control_set_from_address (EItipControl *itip, const gchar *address)
{
    EItipControlPrivate *priv;

    priv = itip->priv;

    if (priv->from_address)
        g_free (priv->from_address);

    priv->from_address = g_strdup (address);
}

const gchar *
e_itip_control_get_from_address (EItipControl *itip)
{
    EItipControlPrivate *priv;

    priv = itip->priv;

    return priv->from_address;
}


static void
change_status (icalcomponent *ical_comp, const char *address, icalparameter_partstat status)
{
    icalproperty *prop;

    prop = find_attendee (ical_comp, address);
    if (prop) {
        icalparameter *param;

        icalproperty_remove_parameter (prop, ICAL_PARTSTAT_PARAMETER);
        param = icalparameter_new_partstat (status);
        icalproperty_add_parameter (prop, param);
    }
}

static void
update_item (EItipControl *itip)
{
    EItipControlPrivate *priv;
    icalcomponent *clone;
    CalClient *client;
    CalComponentVType type;
    GtkWidget *dialog;

    priv = itip->priv;

    type = cal_component_get_vtype (priv->comp);
    if (type == CAL_COMPONENT_TODO)
        client = priv->task_client;
    else
        client = priv->event_client;

    clone = icalcomponent_new_clone (priv->ical_comp);
    icalcomponent_add_component (priv->top_level, clone);

    if (!cal_client_update_objects (client, priv->top_level))
        dialog = gnome_warning_dialog (_("Calendar file could not be updated!\n"));
    else
        dialog = gnome_ok_dialog (_("Update complete\n"));
    gnome_dialog_run_and_close (GNOME_DIALOG (dialog));

    icalcomponent_remove_component (priv->top_level, clone);
}

static void
update_attendee_status (EItipControl *itip)
{
    EItipControlPrivate *priv;
    CalClient *client;
    CalClientGetStatus status;
    CalComponent *comp;
    CalComponentVType type;
    const char *uid;
    GtkWidget *dialog;

    priv = itip->priv;

    type = cal_component_get_vtype (priv->comp);
    if (type == CAL_COMPONENT_TODO)
        client = priv->task_client;
    else
        client = priv->event_client;

    /* Obtain our version */
    cal_component_get_uid (priv->comp, &uid);
    status = cal_client_get_object (client, uid, &comp);

    if (status == CAL_CLIENT_GET_SUCCESS) {
        GSList *attendees;

        cal_component_get_attendee_list (priv->comp, &attendees);
        if (attendees != NULL) {
            CalComponentAttendee *a = attendees->data;
            icalparameter_partstat partstat;

            partstat = find_attendee_partstat (priv->ical_comp, itip_strip_mailto (a->value));

            if (partstat != ICAL_PARTSTAT_NONE) {
                change_status (cal_component_get_icalcomponent (comp),
                           itip_strip_mailto (a->value),
                           partstat);
                cal_component_rescan (comp);
            } else {
                dialog = gnome_warning_dialog (_("Attendee status could "
                                 "not be updated because "
                                 "of an invalid status!\n"));
                goto cleanup;
            }
        }

        if (!cal_client_update_object (client, comp))
            dialog = gnome_warning_dialog (_("Attendee status could not be updated!\n"));
        else
            dialog = gnome_ok_dialog (_("Attendee status updated\n"));
    } else {
        dialog = gnome_warning_dialog (_("Attendee status can not be updated "
                         "because the item no longer exists"));
    }

 cleanup:
    gtk_object_unref (GTK_OBJECT (comp));
    gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
}

static void
remove_item (EItipControl *itip)
{
    EItipControlPrivate *priv;
    CalClient *client;
    CalComponentVType type;
    const char *uid;
    GtkWidget *dialog;

    priv = itip->priv;

    type = cal_component_get_vtype (priv->comp);
    if (type == CAL_COMPONENT_TODO)
        client = priv->task_client;
    else
        client = priv->event_client;

    cal_component_get_uid (priv->comp, &uid);
    if (cal_client_remove_object (client, uid)) {
        dialog = gnome_ok_dialog (_("Removal Complete"));
        gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
    }
}

static void
send_item (EItipControl *itip)
{
    EItipControlPrivate *priv;
    CalComponent *comp;
    GtkWidget *dialog;

    priv = itip->priv;

    comp = get_real_item (itip);

    if (comp != NULL) {
        itip_send_comp (CAL_COMPONENT_METHOD_REQUEST, comp);
        gtk_object_unref (GTK_OBJECT (comp));
        dialog = gnome_ok_dialog (_("Item sent!\n"));
    } else {
        dialog = gnome_warning_dialog (_("The item could not be sent!\n"));
    }
    gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
}

static void
send_freebusy (EItipControl *itip)
{
    EItipControlPrivate *priv;
    CalComponentDateTime datetime;
    time_t start, end;
    GtkWidget *dialog;
    GList *comp_list;
    icaltimezone *zone;

    priv = itip->priv;

    cal_component_get_dtstart (priv->comp, &datetime);
    if (datetime.tzid) {
        zone = icalcomponent_get_timezone (priv->top_level,
                           datetime.tzid);
    } else {
        zone = NULL;
    }
    start = icaltime_as_timet_with_zone (*datetime.value, zone);
    cal_component_free_datetime (&datetime);

    cal_component_get_dtend (priv->comp, &datetime);
    if (datetime.tzid) {
        zone = icalcomponent_get_timezone (priv->top_level,
                           datetime.tzid);
    } else {
        zone = NULL;
    }
    end = icaltime_as_timet_with_zone (*datetime.value, zone);
    cal_component_free_datetime (&datetime);

    comp_list = cal_client_get_free_busy (priv->event_client, NULL, start, end);

    if (comp_list) {
        GList *l;

        for (l = comp_list; l; l = l->next) {
            CalComponent *comp = CAL_COMPONENT (l->data);
            itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp);

            gtk_object_unref (GTK_OBJECT (comp));
        }
        dialog = gnome_ok_dialog (_("Item sent!\n"));

        g_list_free (comp_list);
    } else {
        dialog = gnome_warning_dialog (_("The item could not be sent!\n"));
    }
    gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
}

#if 0
static void
prev_clicked_cb (GtkWidget *widget, gpointer data)
{
    EItipControl *itip = E_ITIP_CONTROL (data);
    EItipControlPrivate *priv;

    priv = itip->priv;

    priv->current--;
    priv->ical_comp = get_prev (&priv->iter);

    show_current (itip);
}

static void
next_clicked_cb (GtkWidget *widget, gpointer data)
{
    EItipControl *itip = E_ITIP_CONTROL (data);
    EItipControlPrivate *priv;

    priv = itip->priv;

    priv->current++;
    priv->ical_comp = get_next (&priv->iter);

    show_current (itip);
}
#endif

static void
url_requested_cb (GtkHTML *html, const gchar *url, GtkHTMLStream *handle, gpointer data)
{   unsigned char buffer[4096];
    int len, fd;
        char *path;

    path = g_strdup_printf ("%s/%s", EVOLUTION_ICONSDIR, url);

    if ((fd = open (path, O_RDONLY)) == -1) {
        g_warning ("%s", g_strerror (errno));
        goto cleanup;
    }

        while ((len = read (fd, buffer, 4096)) > 0) {
        gtk_html_write (html, handle, buffer, len);
    }

    if (len < 0) {
        /* check to see if we stopped because of an error */
        gtk_html_end (html, handle, GTK_HTML_STREAM_ERROR);
        g_warning ("%s", g_strerror (errno));
        goto cleanup;
    }
    /* done with no errors */
    gtk_html_end (html, handle, GTK_HTML_STREAM_OK);
    close (fd);

 cleanup:
    g_free (path);
}

static void
ok_clicked_cb (GtkHTML *html, const gchar *method, const gchar *url, const gchar *encoding, gpointer data)
{
    EItipControl *itip = E_ITIP_CONTROL (data);
    EItipControlPrivate *priv;
    gchar **fields;
    gboolean rsvp = FALSE;
    int i;

    priv = itip->priv;

    fields = g_strsplit (encoding, "&", -1);
    for (i = 0; fields[i] != NULL; i++) {
        gchar **key_value;

        key_value = g_strsplit (fields[i], "=", 2);

        if (key_value[0] != NULL && !strcmp (key_value[0], "action")) {
            if (key_value[1] == NULL)
                break;

            switch (key_value[1][0]) {
            case 'U':
                update_item (itip);
                break;
            case 'A':
                change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_ACCEPTED);
                cal_component_rescan (priv->comp);
                update_item (itip);
                break;
            case 'T':
                change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_TENTATIVE);
                cal_component_rescan (priv->comp);
                update_item (itip);
                break;
            case 'D':
                change_status (priv->ical_comp, priv->my_address, ICAL_PARTSTAT_DECLINED);
                cal_component_rescan (priv->comp);
                remove_item (itip);
                break;
            case 'F':
                send_freebusy (itip);
                break;
            case 'R':
                update_attendee_status (itip);
                break;
            case 'S':
                send_item (itip);
                break;
            case 'C':
                remove_item (itip);
                break;
            }
        }

        if (key_value[0] != NULL && !strcmp (key_value[0], "rsvp"))
            if (*key_value[1] == '1')
                rsvp = TRUE;

        g_strfreev (key_value);

    }
    g_strfreev (fields);

    if (rsvp) {
        CalComponent *comp = NULL;

        comp = cal_component_clone (priv->comp);
        if (comp == NULL)
            return;

        if (priv->my_address != NULL) {
            icalcomponent *ical_comp;
            icalproperty *prop;
            icalvalue *value;
            const char *attendee, *text;
            GSList *l, *list = NULL;
            
            ical_comp = cal_component_get_icalcomponent (comp);

            for (prop = icalcomponent_get_first_property (ical_comp, ICAL_ATTENDEE_PROPERTY);
                 prop != NULL;
                 prop = icalcomponent_get_next_property (ical_comp, ICAL_ATTENDEE_PROPERTY))
            {
                value = icalproperty_get_value (prop);
                if (!value)
                    continue;

                attendee = icalvalue_get_string (value);
                text = itip_strip_mailto (attendee);

                if (!strstr (text, priv->my_address))
                    list = g_slist_prepend (list, prop);
            }

            for (l = list; l; l = l->next) {
                prop = l->data;
                icalcomponent_remove_property (ical_comp, prop);
                icalproperty_free (prop);
            }
            g_slist_free (list);

            cal_component_rescan (comp);
            itip_send_comp (CAL_COMPONENT_METHOD_REPLY, comp);
        } else {
            GtkWidget *dialog;

            dialog = gnome_warning_dialog (_("Unable to find any of your identities "
                             "in the attendees list!\n"));
            gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
        }
        gtk_object_unref (GTK_OBJECT (comp));
    }
}