Initial revision

1 files changed, 373 insertions, 0 deletions

diff --git a/libical/src/libicalss/icalmessage.c b/libical/src/libicalss/icalmessage.c
new file mode 100644
index 0000000..d5c57c1
--- a/dev/null
+++ b/libical/src/libicalss/icalmessage.c
@@ -0,0 +1,373 @@
+/* -*- Mode: C -*-
+    ======================================================================
+    FILE: icalmessage.c
+    CREATOR: ebusboom 07 Nov 2000
+  
+    $Id$
+    $Locker$
+    
+    (C) COPYRIGHT 2000, Eric Busboom, http://www.softwarestudio.org
+    
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of either: 
+    
+    The LGPL as published by the Free Software Foundation, version
+    2.1, available at: http://www.fsf.org/copyleft/lesser.html
+    
+    Or:
+    
+    The Mozilla Public License Version 1.0. You may obtain a copy of
+    the License at http://www.mozilla.org/MPL/
+
+
+    ======================================================================*/
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "icalmessage.h"
+#include "icalenums.h"
+#include <ctype.h>  /* for tolower()*/
+#include <string.h> /* for strstr */
+#include <stdlib.h> /* for free(), malloc() */
+icalcomponent* icalmessage_get_inner(icalcomponent* comp)
+{
+    if (icalcomponent_isa(comp) == ICAL_VCALENDAR_COMPONENT){
+	return icalcomponent_get_first_real_component(comp);
+    } else {
+	return comp;
+    }
+}
+
+char* lowercase(const char* str)
+{
+    char* p = 0;
+    char* n = icalmemory_strdup(str);
+
+    if(str ==0){
+	return 0;
+    }
+
+    for(p = n; *p!=0; p++){
+	*p = tolower(*p);
+    }
+
+    return n;
+}
+
+icalproperty* icalmessage_find_attendee(icalcomponent* comp, const char* user)
+{
+    icalcomponent *inner = icalmessage_get_inner(comp);
+    icalproperty *p,*attendee = 0;
+    char* luser = lowercase(user);
+
+    for(p = icalcomponent_get_first_property(inner, ICAL_ATTENDEE_PROPERTY);
+	p != 0;
+	p = icalcomponent_get_next_property(inner, ICAL_ATTENDEE_PROPERTY)
+	){
+
+	char* lattendee;
+
+	lattendee = lowercase(icalproperty_get_attendee(p));
+
+	if (strstr(lattendee,user) != 0){
+	    attendee = p;
+	    break;
+	}
+
+	free(lattendee);
+
+    }
+    
+    free(luser);
+
+    return attendee;
+
+}
+
+void icalmessage_copy_properties(icalcomponent* to, icalcomponent* from, 
+		icalproperty_kind kind)
+{
+    icalcomponent *to_inner = icalmessage_get_inner(to);
+    icalcomponent *from_inner = icalmessage_get_inner(from);
+
+    if (to_inner == 0 && from_inner == 0){
+	icalerror_set_errno(ICAL_MALFORMEDDATA_ERROR);
+	return;
+    }
+
+    if(!icalcomponent_get_first_property(from_inner,kind)){
+	return;
+    }
+
+    icalcomponent_add_property(to_inner,
+	       icalproperty_new_clone(
+		   icalcomponent_get_first_property(
+		       from_inner,
+		       kind)
+		   )
+	);
+}
+
+icalcomponent *icalmessage_new_reply_base(icalcomponent* c,
+					    const char* user,
+					    const char* msg)
+{
+    icalproperty *attendee;
+    char tmp[45];
+
+    icalcomponent *reply = icalcomponent_vanew(
+	ICAL_VCALENDAR_COMPONENT,
+	icalproperty_new_method(ICAL_METHOD_REPLY),
+	icalcomponent_vanew(
+	    ICAL_VEVENT_COMPONENT,
+	    icalproperty_new_dtstamp(icaltime_from_timet(time(0),0)),
+	    0),
+	0);
+
+    icalcomponent *inner = icalmessage_get_inner(reply);
+
+    icalerror_check_arg_rz(c,"c");
+
+    icalmessage_copy_properties(reply,c,ICAL_UID_PROPERTY);
+    icalmessage_copy_properties(reply,c,ICAL_ORGANIZER_PROPERTY);
+    icalmessage_copy_properties(reply,c,ICAL_RECURRENCEID_PROPERTY);
+    icalmessage_copy_properties(reply,c,ICAL_SUMMARY_PROPERTY);
+    icalmessage_copy_properties(reply,c,ICAL_SEQUENCE_PROPERTY);
+
+    icalcomponent_set_dtstamp(reply,icaltime_from_timet(time(0),0));
+
+    if(msg != 0){
+	icalcomponent_add_property(inner,icalproperty_new_comment(msg));
+    }
+
+    /* Copy this user's attendee property */
+
+    attendee = icalmessage_find_attendee(c,user);
+
+    if (attendee == 0){
+	icalerror_set_errno(ICAL_MALFORMEDDATA_ERROR);
+	icalcomponent_free(reply);
+	return 0;
+    }
+
+    icalcomponent_add_property(inner,icalproperty_new_clone(attendee));
+
+    /* Add PRODID and VERSION */
+
+    icalcomponent_add_property(reply,icalproperty_new_version("2.0"));
+    
+    sprintf(tmp,
+           "-//SoftwareStudio//NONSGML %s %s //EN",PACKAGE,VERSION);
+    icalcomponent_add_property(reply,icalproperty_new_prodid(tmp));
+
+    return reply;
+
+}
+
+icalcomponent* icalmessage_new_accept_reply(icalcomponent* c,
+					    const char* user,
+					    const char* msg)
+{
+
+    icalcomponent *reply;
+    icalproperty *attendee;
+    icalcomponent *inner;
+
+    icalerror_check_arg_rz(c,"c");
+    
+    reply = icalmessage_new_reply_base(c,user,msg);
+
+    if(reply == 0){
+	return 0;
+    }
+
+    inner  = icalmessage_get_inner(reply);
+
+    attendee = icalcomponent_get_first_property(inner,
+						ICAL_ATTENDEE_PROPERTY);
+
+    icalproperty_set_parameter(attendee,
+	       icalparameter_new_partstat(ICAL_PARTSTAT_ACCEPTED));
+
+    return reply;
+}
+
+icalcomponent* icalmessage_new_decline_reply(icalcomponent* c,
+					    const char* user,
+					    const char* msg)
+{
+    icalcomponent *reply;
+    icalproperty *attendee;
+    icalcomponent *inner;
+
+    icalerror_check_arg_rz(c,"c");
+    
+    reply = icalmessage_new_reply_base(c,user,msg);
+    inner = icalmessage_get_inner(reply);
+    if(reply == 0){
+	return 0;
+    }
+
+    attendee = icalcomponent_get_first_property(inner,
+						ICAL_ATTENDEE_PROPERTY);
+
+    icalproperty_set_parameter(attendee,
+	       icalparameter_new_partstat(ICAL_PARTSTAT_DECLINED));
+
+    return reply;
+}
+
+/* New is modified version of old */
+icalcomponent* icalmessage_new_counterpropose_reply(icalcomponent* oldc,
+						    icalcomponent* newc,
+						    const char* user,
+						    const char* msg)
+{
+    icalcomponent *reply;
+
+    icalerror_check_arg_rz(oldc,"oldc");
+    icalerror_check_arg_rz(newc,"newc");
+    
+    reply = icalcomponent_new_clone(newc);
+
+    icalcomponent_set_method(reply,ICAL_METHOD_COUNTER);
+
+    return newc;
+
+}
+
+
+icalcomponent* icalmessage_new_delegate_reply(icalcomponent* c,
+					      const char* user,
+					      const char* delegatee,
+					      const char* msg)
+{
+
+    icalcomponent *reply;
+    icalproperty *attendee;
+    icalcomponent *inner;
+
+    icalerror_check_arg_rz(c,"c");
+
+    reply =  icalmessage_new_reply_base(c,user,msg);
+    inner = icalmessage_get_inner(reply);
+    if(reply == 0){
+	return 0;
+    }
+
+    attendee = icalcomponent_get_first_property(inner,
+						ICAL_ATTENDEE_PROPERTY);
+
+    icalproperty_set_parameter(attendee,
+	       icalparameter_new_partstat(ICAL_PARTSTAT_DELEGATED));
+
+    icalproperty_set_parameter(attendee,
+	       icalparameter_new_delegatedto(delegatee));
+
+    return reply;
+
+}
+
+icalcomponent* icalmessage_new_delegate_request(icalcomponent* c,
+					      const char* user,
+					      const char* delegatee,
+					      const char* msg)
+{
+
+    icalcomponent *reply;
+    icalproperty *attendee;
+    icalcomponent *inner;
+
+    icalerror_check_arg_rz(c,"c");
+
+    reply =  icalmessage_new_reply_base(c,user,msg);
+    inner = icalmessage_get_inner(reply);
+
+    if(reply == 0){
+	return 0;
+    }
+
+    icalcomponent_set_method(reply,ICAL_METHOD_REQUEST);
+
+    attendee = icalcomponent_get_first_property(inner,
+						ICAL_ATTENDEE_PROPERTY);
+
+    icalproperty_set_parameter(attendee,
+	       icalparameter_new_partstat(ICAL_PARTSTAT_DELEGATED));
+
+    icalproperty_set_parameter(attendee,
+	       icalparameter_new_delegatedto(delegatee));
+
+    icalcomponent_add_property(
+	inner,
+	icalproperty_vanew_attendee(
+	    delegatee,
+	    icalparameter_new_delegatedfrom(
+		icalproperty_get_attendee(attendee)
+		),
+	    0
+	    )
+	);
+	     
+
+    return reply;
+
+}
+
+
+icalcomponent* icalmessage_new_cancel_event(icalcomponent* c,
+					    const char* user,
+					    const char* msg);
+icalcomponent* icalmessage_new_cancel_instance(icalcomponent* c,
+					    const char* user,
+					    const char* msg);
+icalcomponent* icalmessage_new_cancel_all(icalcomponent* c,
+					    const char* user,
+					    const char* msg);
+
+
+
+icalcomponent* icalmessage_new_error_reply(icalcomponent* c,
+					   const char* user,
+					   const char* msg,
+					   const char* debug,
+					   icalrequeststatus code)
+{
+    icalcomponent *reply;
+    icalcomponent *inner, *cinner;
+    struct icalreqstattype rs;
+
+    icalerror_check_arg_rz(c,"c");
+    
+    reply = icalmessage_new_reply_base(c,user,msg);
+    inner = icalmessage_get_inner(reply);
+    cinner = icalmessage_get_inner(c);
+    if(reply == 0){
+	return 0;
+    }
+
+    if( code != ICAL_UNKNOWN_STATUS){
+	rs.code = code;
+	rs.debug = debug;
+	
+	icalcomponent_add_property(inner, 
+				   icalproperty_new_requeststatus(rs));
+    } else { /*  code == ICAL_UNKNOWN_STATUS */ 
+
+	/* Copy all of the request status properties */
+	icalproperty *p;
+	for(p = icalcomponent_get_first_property(cinner,
+						 ICAL_REQUESTSTATUS_PROPERTY);
+	    p != 0;
+	    p = icalcomponent_get_next_property(cinner,
+						ICAL_REQUESTSTATUS_PROPERTY)){
+
+	    
+	    icalcomponent_add_property(inner,icalproperty_new_clone(p));
+	}
+    }
+
+    return reply;
+}