X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=citadel%2Fserv_calendar.c;h=cbb3f84c44af6b378b5bbce5c3a29bcc6bed9ca9;hb=02d9dbca862ffa00b2041287596119a54867762c;hp=554ea62b04d6e8947a622d332ea98642d7c0c1b5;hpb=449cdb6a2f65fdc9a07aed538c1f59a93f777a7d;p=citadel.git diff --git a/citadel/serv_calendar.c b/citadel/serv_calendar.c index 554ea62b0..cbb3f84c4 100644 --- a/citadel/serv_calendar.c +++ b/citadel/serv_calendar.c @@ -2,12 +2,15 @@ * $Id$ * * This module implements iCalendar object processing and the Calendar> - * room on a Citadel/UX server. It handles iCalendar objects using the + * room on a Citadel server. It handles iCalendar objects using the * iTIP protocol. See RFCs 2445 and 2446. * */ +#define PRODID "-//Citadel//NONSGML Citadel Calendar//EN" + #include "sysdep.h" +#include #include #include #include @@ -16,24 +19,26 @@ #ifdef HAVE_STRINGS_H #include #endif -#include "serv_calendar.h" #include "citadel.h" #include "server.h" #include "citserver.h" #include "sysdep_decls.h" #include "support.h" #include "config.h" -#include "dynloader.h" +#include "serv_extensions.h" #include "user_ops.h" #include "room_ops.h" #include "tools.h" #include "msgbase.h" #include "mime_parser.h" +#include "internet_addressing.h" +#include "serv_calendar.h" +#include "euidindex.h" - -#ifdef HAVE_ICAL_H +#ifdef CITADEL_WITH_CALENDAR_SERVICE #include +#include "ical_dezonify.h" struct ical_respond_data { char desired_partnum[SIZ]; @@ -41,27 +46,98 @@ struct ical_respond_data { }; +/* + * Utility function to create a new VCALENDAR component with some of the + * required fields already set the way we like them. + */ +icalcomponent *icalcomponent_new_citadel_vcalendar(void) { + icalcomponent *encaps; + + encaps = icalcomponent_new_vcalendar(); + if (encaps == NULL) { + lprintf(CTDL_CRIT, "Error at %s:%d - could not allocate component!\n", + __FILE__, __LINE__); + return NULL; + } + + /* Set the Product ID */ + icalcomponent_add_property(encaps, icalproperty_new_prodid(PRODID)); + + /* Set the Version Number */ + icalcomponent_add_property(encaps, icalproperty_new_version("2.0")); + + return(encaps); +} + + +/* + * Utility function to encapsulate a subcomponent into a full VCALENDAR + */ +icalcomponent *ical_encapsulate_subcomponent(icalcomponent *subcomp) { + icalcomponent *encaps; + + /* If we're already looking at a full VCALENDAR component, + * don't bother ... just return itself. + */ + if (icalcomponent_isa(subcomp) == ICAL_VCALENDAR_COMPONENT) { + return subcomp; + } + + /* Encapsulate the VEVENT component into a complete VCALENDAR */ + encaps = icalcomponent_new_citadel_vcalendar(); + if (encaps == NULL) return NULL; + + /* Encapsulate the subcomponent inside */ + icalcomponent_add_component(encaps, subcomp); + + /* Convert all timestamps to UTC so we don't have to deal with + * stupid VTIMEZONE crap. + */ + ical_dezonify(encaps); + + /* Return the object we just created. */ + return(encaps); +} + + + + /* * Write a calendar object into the specified user's calendar room. */ -void ical_write_to_cal(struct usersupp *u, icalcomponent *cal) { - char temp[PATH_MAX]; - FILE *fp; +void ical_write_to_cal(struct ctdluser *u, icalcomponent *cal) { + char temp[PATH_MAX]; + FILE *fp; char *ser; + icalcomponent *encaps; + + if (cal == NULL) return; + + /* If the supplied object is a subcomponent, encapsulate it in + * a full VCALENDAR component, and save that instead. + */ + if (icalcomponent_isa(cal) != ICAL_VCALENDAR_COMPONENT) { + encaps = ical_encapsulate_subcomponent( + icalcomponent_new_clone(cal) + ); + ical_write_to_cal(u, encaps); + icalcomponent_free(encaps); + return; + } - strcpy(temp, tmpnam(NULL)); + CtdlMakeTempFileName(temp, sizeof temp); ser = icalcomponent_as_ical_string(cal); if (ser == NULL) return; /* Make a temp file out of it */ - fp = fopen(temp, "w"); - if (fp == NULL) return; + fp = fopen(temp, "w"); + if (fp == NULL) return; fwrite(ser, strlen(ser), 1, fp); - fclose(fp); + fclose(fp); - /* This handy API function does all the work for us. + /* This handy API function does all the work for us. */ - CtdlWriteObject(USERCALENDARROOM, /* which room */ + CtdlWriteObject(USERCALENDARROOM, /* which room */ "text/calendar", /* MIME type */ temp, /* temp file */ u, /* which user */ @@ -69,12 +145,14 @@ void ical_write_to_cal(struct usersupp *u, icalcomponent *cal) { 0, /* don't delete others of this type */ 0); /* no flags */ - unlink(temp); + unlink(temp); } /* * Add a calendar object to the user's calendar + * + * ok because it uses ical_write_to_cal() */ void ical_add(icalcomponent *cal, int recursion_level) { icalcomponent *c; @@ -84,7 +162,7 @@ void ical_add(icalcomponent *cal, int recursion_level) { */ if (icalcomponent_isa(cal) == ICAL_VEVENT_COMPONENT) { - ical_write_to_cal(&CC->usersupp, cal); + ical_write_to_cal(&CC->user, cal); } @@ -108,6 +186,8 @@ void ical_add(icalcomponent *cal, int recursion_level) { * * (Sorry about this being more than 80 columns ... there was just * no easy way to break it down sensibly.) + * + * ok */ void ical_send_a_reply(icalcomponent *request, char *action) { icalcomponent *the_reply = NULL; @@ -130,13 +210,13 @@ void ical_send_a_reply(icalcomponent *request, char *action) { strcpy(summary_string, "Calendar item"); if (request == NULL) { - lprintf(3, "ERROR: trying to reply to NULL event?\n"); + lprintf(CTDL_ERR, "ERROR: trying to reply to NULL event?\n"); return; } the_reply = icalcomponent_new_clone(request); if (the_reply == NULL) { - lprintf(3, "ERROR: cannot clone request\n"); + lprintf(CTDL_ERR, "ERROR: cannot clone request\n"); return; } @@ -160,11 +240,11 @@ void ical_send_a_reply(icalcomponent *request, char *action) { striplt(attendee_string); recp = validate_recipients(attendee_string); if (recp != NULL) { - if (!strcasecmp(recp->recp_local, CC->usersupp.fullname)) { + if (!strcasecmp(recp->recp_local, CC->user.fullname)) { if (me_attend) icalproperty_free(me_attend); me_attend = icalproperty_new_clone(attendee); } - phree(recp); + free(recp); } } } @@ -223,21 +303,24 @@ void ical_send_a_reply(icalcomponent *request, char *action) { } /* Now generate the reply message and send it out. */ - serialized_reply = strdoop(icalcomponent_as_ical_string(the_reply)); + serialized_reply = strdup(icalcomponent_as_ical_string(the_reply)); icalcomponent_free(the_reply); /* don't need this anymore */ if (serialized_reply == NULL) return; - reply_message_text = mallok(strlen(serialized_reply) + SIZ); + reply_message_text = malloc(strlen(serialized_reply) + SIZ); if (reply_message_text != NULL) { sprintf(reply_message_text, "Content-type: text/calendar\r\n\r\n%s\r\n", serialized_reply ); - msg = CtdlMakeMessage(&CC->usersupp, organizer_string, - CC->quickroom.QRname, 0, FMT_RFC822, + msg = CtdlMakeMessage(&CC->user, + organizer_string, /* to */ + "", /* cc */ + CC->room.QRname, 0, FMT_RFC822, "", summary_string, /* Use summary for subject */ + NULL, reply_message_text); if (msg != NULL) { @@ -246,7 +329,7 @@ void ical_send_a_reply(icalcomponent *request, char *action) { CtdlFreeMessage(msg); } } - phree(serialized_reply); + free(serialized_reply); } @@ -256,18 +339,36 @@ void ical_send_a_reply(icalcomponent *request, char *action) { * and turns them into calendar objects */ void ical_locate_part(char *name, char *filename, char *partnum, char *disp, - void *content, char *cbtype, size_t length, char *encoding, + void *content, char *cbtype, char *cbcharset, size_t length, char *encoding, void *cbuserdata) { struct ical_respond_data *ird = NULL; ird = (struct ical_respond_data *) cbuserdata; + + /* desired_partnum can be set to "_HUNT_" to have it just look for + * the first part with a content type of text/calendar. Otherwise + * we have to only process the right one. + */ + if (strcasecmp(ird->desired_partnum, "_HUNT_")) { + if (strcasecmp(partnum, ird->desired_partnum)) { + return; + } + } + + if (strcasecmp(cbtype, "text/calendar")) { + return; + } + if (ird->cal != NULL) { icalcomponent_free(ird->cal); ird->cal = NULL; } - if (strcasecmp(partnum, ird->desired_partnum)) return; + ird->cal = icalcomponent_new_from_string(content); + if (ird->cal != NULL) { + ical_dezonify(ird->cal); + } } @@ -288,10 +389,10 @@ void ical_respond(long msgnum, char *partnum, char *action) { return; } - msg = CtdlFetchMessage(msgnum); + msg = CtdlFetchMessage(msgnum, 1); if (msg == NULL) { cprintf("%d Message %ld not found.\n", - ERROR+ILLEGAL_VALUE, + ERROR + ILLEGAL_VALUE, (long)msgnum ); return; @@ -329,7 +430,7 @@ void ical_respond(long msgnum, char *partnum, char *action) { /* Now that we've processed this message, we don't need it * anymore. So delete it. */ - CtdlDeleteMessages(CC->quickroom.QRname, msgnum, ""); + CtdlDeleteMessages(CC->room.QRname, &msgnum, 1, ""); /* Free the memory we allocated and return a response. */ icalcomponent_free(ird.cal); @@ -338,7 +439,353 @@ void ical_respond(long msgnum, char *partnum, char *action) { return; } else { - cprintf("%d No calendar object found\n", ERROR); + cprintf("%d No calendar object found\n", ERROR + ROOM_NOT_FOUND); + return; + } + + /* should never get here */ +} + + +/* + * Figure out the UID of the calendar event being referred to in a + * REPLY object. This function is recursive. + */ +void ical_learn_uid_of_reply(char *uidbuf, icalcomponent *cal) { + icalcomponent *subcomponent; + icalproperty *p; + + /* If this object is a REPLY, then extract the UID. */ + if (icalcomponent_isa(cal) == ICAL_VEVENT_COMPONENT) { + p = icalcomponent_get_first_property(cal, ICAL_UID_PROPERTY); + if (p != NULL) { + strcpy(uidbuf, icalproperty_get_comment(p)); + } + } + + /* Otherwise, recurse through any VEVENT subcomponents. We do NOT want the + * UID of the reply; we want the UID of the invitation being replied to. + */ + for (subcomponent = icalcomponent_get_first_component(cal, ICAL_VEVENT_COMPONENT); + subcomponent != NULL; + subcomponent = icalcomponent_get_next_component(cal, ICAL_VEVENT_COMPONENT) ) { + ical_learn_uid_of_reply(uidbuf, subcomponent); + } +} + + +/* + * ical_update_my_calendar_with_reply() refers to this callback function; when we + * locate the message containing the calendar event we're replying to, this function + * gets called. It basically just sticks the message number in a supplied buffer. + */ +void ical_hunt_for_event_to_update(long msgnum, void *data) { + long *msgnumptr; + + msgnumptr = (long *) data; + *msgnumptr = msgnum; +} + + +struct original_event_container { + icalcomponent *c; +}; + +/* + * Callback function for mime parser that hunts for calendar content types + * and turns them into calendar objects (called by ical_update_my_calendar_with_reply() + * to fetch the object being updated) + */ +void ical_locate_original_event(char *name, char *filename, char *partnum, char *disp, + void *content, char *cbtype, char *cbcharset, size_t length, char *encoding, + void *cbuserdata) { + + struct original_event_container *oec = NULL; + + if (strcasecmp(cbtype, "text/calendar")) { + return; + } + oec = (struct original_event_container *) cbuserdata; + if (oec->c != NULL) { + icalcomponent_free(oec->c); + } + oec->c = icalcomponent_new_from_string(content); +} + + +/* + * Merge updated attendee information from a REPLY into an existing event. + */ +void ical_merge_attendee_reply(icalcomponent *event, icalcomponent *reply) { + icalcomponent *c; + icalproperty *e_attendee, *r_attendee; + + /* First things first. If we're not looking at a VEVENT component, + * recurse through subcomponents until we find one. + */ + if (icalcomponent_isa(event) != ICAL_VEVENT_COMPONENT) { + for (c = icalcomponent_get_first_component(event, ICAL_VEVENT_COMPONENT); + c != NULL; + c = icalcomponent_get_next_component(event, ICAL_VEVENT_COMPONENT) ) { + ical_merge_attendee_reply(c, reply); + } + return; + } + + /* Now do the same thing with the reply. + */ + if (icalcomponent_isa(reply) != ICAL_VEVENT_COMPONENT) { + for (c = icalcomponent_get_first_component(reply, ICAL_VEVENT_COMPONENT); + c != NULL; + c = icalcomponent_get_next_component(reply, ICAL_VEVENT_COMPONENT) ) { + ical_merge_attendee_reply(event, c); + } + return; + } + + /* Clone the reply, because we're going to rip its guts out. */ + reply = icalcomponent_new_clone(reply); + + /* At this point we're looking at the correct subcomponents. + * Iterate through the attendees looking for a match. + */ +STARTOVER: + for (e_attendee = icalcomponent_get_first_property(event, ICAL_ATTENDEE_PROPERTY); + e_attendee != NULL; + e_attendee = icalcomponent_get_next_property(event, ICAL_ATTENDEE_PROPERTY)) { + + for (r_attendee = icalcomponent_get_first_property(reply, ICAL_ATTENDEE_PROPERTY); + r_attendee != NULL; + r_attendee = icalcomponent_get_next_property(reply, ICAL_ATTENDEE_PROPERTY)) { + + /* Check to see if these two attendees match... + */ + if (!strcasecmp( + icalproperty_get_attendee(e_attendee), + icalproperty_get_attendee(r_attendee) + )) { + /* ...and if they do, remove the attendee from the event + * and replace it with the attendee from the reply. (The + * reply's copy will have the same address, but an updated + * status.) + */ + icalcomponent_remove_property(event, e_attendee); + icalproperty_free(e_attendee); + icalcomponent_remove_property(reply, r_attendee); + icalcomponent_add_property(event, r_attendee); + + /* Since we diddled both sets of attendees, we have to start + * the iteration over again. This will not create an infinite + * loop because we removed the attendee from the reply. (That's + * why we cloned the reply, and that's what we mean by "ripping + * its guts out.") + */ + goto STARTOVER; + } + + } + } + + /* Free the *clone* of the reply. */ + icalcomponent_free(reply); +} + + + + +/* + * Handle an incoming RSVP (object with method==ICAL_METHOD_REPLY) for a + * calendar event. The object has already been deserialized for us; all + * we have to do here is hunt for the event in our calendar, merge in the + * updated attendee status, and save it again. + * + * This function returns 0 on success, 1 if the event was not found in the + * user's calendar, or 2 if an internal error occurred. + */ +int ical_update_my_calendar_with_reply(icalcomponent *cal) { + char uid[SIZ]; + char hold_rm[ROOMNAMELEN]; + long msgnum_being_replaced = 0; + struct CtdlMessage *msg; + struct original_event_container oec; + icalcomponent *original_event; + char *serialized_event = NULL; + char roomname[ROOMNAMELEN]; + char *message_text = NULL; + + /* Figure out just what event it is we're dealing with */ + strcpy(uid, "--==<< InVaLiD uId >>==--"); + ical_learn_uid_of_reply(uid, cal); + lprintf(CTDL_DEBUG, "UID of event being replied to is <%s>\n", uid); + + strcpy(hold_rm, CC->room.QRname); /* save current room */ + + if (getroom(&CC->room, USERCALENDARROOM) != 0) { + getroom(&CC->room, hold_rm); + lprintf(CTDL_CRIT, "cannot get user calendar room\n"); + return(2); + } + + /* + * Look in the EUID index for a message with + * the Citadel EUID set to the value we're looking for. Since + * Citadel always sets the message EUID to the vCalendar UID of + * the event, this will work. + */ + msgnum_being_replaced = locate_message_by_euid(uid, &CC->room); + + getroom(&CC->room, hold_rm); /* return to saved room */ + + lprintf(CTDL_DEBUG, "msgnum_being_replaced == %ld\n", msgnum_being_replaced); + if (msgnum_being_replaced == 0) { + return(1); /* no calendar event found */ + } + + /* Now we know the ID of the message containing the event being updated. + * We don't actually have to delete it; that'll get taken care of by the + * server when we save another event with the same UID. This just gives + * us the ability to load the event into memory so we can diddle the + * attendees. + */ + msg = CtdlFetchMessage(msgnum_being_replaced, 1); + if (msg == NULL) { + return(2); /* internal error */ + } + oec.c = NULL; + mime_parser(msg->cm_fields['M'], + NULL, + *ical_locate_original_event, /* callback function */ + NULL, NULL, + &oec, /* user data */ + 0 + ); + CtdlFreeMessage(msg); + + original_event = oec.c; + if (original_event == NULL) { + lprintf(CTDL_ERR, "ERROR: Original_component is NULL.\n"); + return(2); + } + + /* Merge the attendee's updated status into the event */ + ical_merge_attendee_reply(original_event, cal); + + /* Serialize it */ + serialized_event = strdup(icalcomponent_as_ical_string(original_event)); + icalcomponent_free(original_event); /* Don't need this anymore. */ + if (serialized_event == NULL) return(2); + + MailboxName(roomname, sizeof roomname, &CC->user, USERCALENDARROOM); + + message_text = malloc(strlen(serialized_event) + SIZ); + if (message_text != NULL) { + sprintf(message_text, + "Content-type: text/calendar\r\n\r\n%s\r\n", + serialized_event + ); + + msg = CtdlMakeMessage(&CC->user, + "", /* No recipient */ + "", /* No recipient */ + roomname, + 0, FMT_RFC822, + "", + "", /* no subject */ + NULL, + message_text); + + if (msg != NULL) { + CIT_ICAL->avoid_sending_invitations = 1; + CtdlSubmitMsg(msg, NULL, roomname); + CtdlFreeMessage(msg); + CIT_ICAL->avoid_sending_invitations = 0; + } + } + free(serialized_event); + return(0); +} + + +/* + * Handle an incoming RSVP for an event. (This is the server subcommand part; it + * simply extracts the calendar object from the message, deserializes it, and + * passes it up to ical_update_my_calendar_with_reply() for processing. + */ +void ical_handle_rsvp(long msgnum, char *partnum, char *action) { + struct CtdlMessage *msg; + struct ical_respond_data ird; + int ret; + + if ( + (strcasecmp(action, "update")) + && (strcasecmp(action, "ignore")) + ) { + cprintf("%d Action must be 'update' or 'ignore'\n", + ERROR + ILLEGAL_VALUE + ); + return; + } + + msg = CtdlFetchMessage(msgnum, 1); + if (msg == NULL) { + cprintf("%d Message %ld not found.\n", + ERROR + ILLEGAL_VALUE, + (long)msgnum + ); + return; + } + + memset(&ird, 0, sizeof ird); + strcpy(ird.desired_partnum, partnum); + mime_parser(msg->cm_fields['M'], + NULL, + *ical_locate_part, /* callback function */ + NULL, NULL, + (void *) &ird, /* user data */ + 0 + ); + + /* We're done with the incoming message, because we now have a + * calendar object in memory. + */ + CtdlFreeMessage(msg); + + /* + * Here is the real meat of this function. Handle the event. + */ + if (ird.cal != NULL) { + /* Update the user's calendar if necessary */ + if (!strcasecmp(action, "update")) { + ret = ical_update_my_calendar_with_reply(ird.cal); + if (ret == 0) { + cprintf("%d Your calendar has been updated with this reply.\n", + CIT_OK); + } + else if (ret == 1) { + cprintf("%d This event does not exist in your calendar.\n", + ERROR + FILE_NOT_FOUND); + } + else { + cprintf("%d An internal error occurred.\n", + ERROR + INTERNAL_ERROR); + } + } + else { + cprintf("%d This reply has been ignored.\n", CIT_OK); + } + + /* Now that we've processed this message, we don't need it + * anymore. So delete it. (Maybe make this optional?) + */ + CtdlDeleteMessages(CC->room.QRname, &msgnum, 1, ""); + + /* Free the memory we allocated and return a response. */ + icalcomponent_free(ird.cal); + ird.cal = NULL; + return; + } + else { + cprintf("%d No calendar object found\n", ERROR + ROOM_NOT_FOUND); return; } @@ -370,6 +817,8 @@ icalproperty *ical_ctdl_get_subprop( /* * Check to see if two events overlap. Returns nonzero if they do. + * (This function is used in both Citadel and WebCit. If you change it in + * one place, change it in the other. Better yet, put it in a library.) */ int ical_ctdl_is_overlap( struct icaltimetype t1start, @@ -440,10 +889,10 @@ void ical_hunt_for_conflicts_backend(long msgnum, void *data) { strcpy(conflict_event_uid, ""); strcpy(conflict_event_summary, ""); - msg = CtdlFetchMessage(msgnum); + msg = CtdlFetchMessage(msgnum, 1); if (msg == NULL) return; memset(&ird, 0, sizeof ird); - strcpy(ird.desired_partnum, "1"); /* hopefully it's always 1 */ + strcpy(ird.desired_partnum, "_HUNT_"); mime_parser(msg->cm_fields['M'], NULL, *ical_locate_part, /* callback function */ @@ -490,7 +939,6 @@ void ical_hunt_for_conflicts_backend(long msgnum, void *data) { strcpy(conflict_event_summary, icalproperty_get_comment(p)); } - icalcomponent_free(ird.cal); if (ical_ctdl_is_overlap(t1start, t1end, t2start, t2end)) { @@ -516,26 +964,26 @@ void ical_hunt_for_conflicts_backend(long msgnum, void *data) { * with this one. */ void ical_hunt_for_conflicts(icalcomponent *cal) { - char hold_rm[ROOMNAMELEN]; + char hold_rm[ROOMNAMELEN]; - strcpy(hold_rm, CC->quickroom.QRname); /* save current room */ + strcpy(hold_rm, CC->room.QRname); /* save current room */ - if (getroom(&CC->quickroom, USERCALENDARROOM) != 0) { - getroom(&CC->quickroom, hold_rm); - cprintf("%d You do not have a calendar.\n", ERROR); + if (getroom(&CC->room, USERCALENDARROOM) != 0) { + getroom(&CC->room, hold_rm); + cprintf("%d You do not have a calendar.\n", ERROR + ROOM_NOT_FOUND); return; - } + } cprintf("%d Conflicting events:\n", LISTING_FOLLOWS); - CtdlForEachMessage(MSGS_ALL, 0, "text/calendar", + CtdlForEachMessage(MSGS_ALL, 0, NULL, "text/calendar", NULL, ical_hunt_for_conflicts_backend, (void *) cal ); cprintf("000\n"); - getroom(&CC->quickroom, hold_rm); /* return to saved room */ + getroom(&CC->room, hold_rm); /* return to saved room */ } @@ -548,10 +996,10 @@ void ical_conflicts(long msgnum, char *partnum) { struct CtdlMessage *msg; struct ical_respond_data ird; - msg = CtdlFetchMessage(msgnum); + msg = CtdlFetchMessage(msgnum, 1); if (msg == NULL) { cprintf("%d Message %ld not found.\n", - ERROR+ILLEGAL_VALUE, + ERROR + ILLEGAL_VALUE, (long)msgnum ); return; @@ -575,7 +1023,7 @@ void ical_conflicts(long msgnum, char *partnum) { return; } else { - cprintf("%d No calendar object found\n", ERROR); + cprintf("%d No calendar object found\n", ERROR + ROOM_NOT_FOUND); return; } @@ -584,88 +1032,604 @@ void ical_conflicts(long msgnum, char *partnum) { - /* - * All Citadel calendar commands from the client come through here. + * Look for busy time in a VEVENT and add it to the supplied VFREEBUSY. */ -void cmd_ical(char *argbuf) -{ - char subcmd[SIZ]; - long msgnum; - char partnum[SIZ]; - char action[SIZ]; - - if (CtdlAccessCheck(ac_logged_in)) return; +void ical_add_to_freebusy(icalcomponent *fb, icalcomponent *cal) { + icalproperty *p; + icalvalue *v; + struct icalperiodtype my_period; - extract(subcmd, argbuf, 0); + if (cal == NULL) return; + my_period = icalperiodtype_null_period(); - if (!strcmp(subcmd, "test")) { - cprintf("%d This server supports calendaring\n", CIT_OK); + if (icalcomponent_isa(cal) != ICAL_VEVENT_COMPONENT) { + ical_add_to_freebusy(fb, + icalcomponent_get_first_component( + cal, ICAL_VEVENT_COMPONENT + ) + ); return; } - else if (!strcmp(subcmd, "respond")) { - msgnum = extract_long(argbuf, 1); - extract(partnum, argbuf, 2); - extract(action, argbuf, 3); - ical_respond(msgnum, partnum, action); + ical_dezonify(cal); + + /* If this event is not opaque, the user isn't publishing it as + * busy time, so don't bother doing anything else. + */ + p = icalcomponent_get_first_property(cal, ICAL_TRANSP_PROPERTY); + if (p != NULL) { + v = icalproperty_get_value(p); + if (v != NULL) { + if (icalvalue_get_transp(v) != ICAL_TRANSP_OPAQUE) { + return; + } + } } - else if (!strcmp(subcmd, "conflicts")) { - msgnum = extract_long(argbuf, 1); - extract(partnum, argbuf, 2); - ical_conflicts(msgnum, partnum); + /* Convert the DTSTART and DTEND properties to an icalperiod. */ + p = icalcomponent_get_first_property(cal, ICAL_DTSTART_PROPERTY); + if (p != NULL) { + my_period.start = icalproperty_get_dtstart(p); + } + + p = icalcomponent_get_first_property(cal, ICAL_DTEND_PROPERTY); + if (p != NULL) { + my_period.end = icalproperty_get_dtstart(p); + } + + /* Now add it. */ + icalcomponent_add_property(fb, + icalproperty_new_freebusy(my_period) + ); + + /* Make sure the DTSTART property of the freebusy *list* is set to + * the DTSTART property of the *earliest event*. + */ + p = icalcomponent_get_first_property(fb, ICAL_DTSTART_PROPERTY); + if (p == NULL) { + icalcomponent_set_dtstart(fb, + icalcomponent_get_dtstart(cal) ); + } + else { + if (icaltime_compare( + icalcomponent_get_dtstart(cal), + icalcomponent_get_dtstart(fb) + ) < 0) { + icalcomponent_set_dtstart(fb, + icalcomponent_get_dtstart(cal) ); + } } + /* Make sure the DTEND property of the freebusy *list* is set to + * the DTEND property of the *latest event*. + */ + p = icalcomponent_get_first_property(fb, ICAL_DTEND_PROPERTY); + if (p == NULL) { + icalcomponent_set_dtend(fb, + icalcomponent_get_dtend(cal) ); + } else { - cprintf("%d Invalid subcommand\n", ERROR+CMD_NOT_SUPPORTED); - return; + if (icaltime_compare( + icalcomponent_get_dtend(cal), + icalcomponent_get_dtend(fb) + ) > 0) { + icalcomponent_set_dtend(fb, + icalcomponent_get_dtend(cal) ); + } } - /* should never get here */ } /* - * We don't know if the calendar room exists so we just create it at login + * Backend for ical_freebusy() + * + * This function simply loads the messages in the user's calendar room, + * which contain VEVENTs, then strips them of all non-freebusy data, and + * adds them to the supplied VCALENDAR. + * */ -void ical_create_room(void) -{ - struct quickroom qr; - struct visit vbuf; +void ical_freebusy_backend(long msgnum, void *data) { + icalcomponent *cal; + struct CtdlMessage *msg; + struct ical_respond_data ird; + + cal = (icalcomponent *)data; + + msg = CtdlFetchMessage(msgnum, 1); + if (msg == NULL) return; + memset(&ird, 0, sizeof ird); + strcpy(ird.desired_partnum, "_HUNT_"); + mime_parser(msg->cm_fields['M'], + NULL, + *ical_locate_part, /* callback function */ + NULL, NULL, + (void *) &ird, /* user data */ + 0 + ); + CtdlFreeMessage(msg); + + if (ird.cal == NULL) return; + + ical_add_to_freebusy(cal, ird.cal); + + /* Now free the memory. */ + icalcomponent_free(ird.cal); +} + + + +/* + * Grab another user's free/busy times + */ +void ical_freebusy(char *who) { + struct ctdluser usbuf; + char calendar_room_name[ROOMNAMELEN]; + char hold_rm[ROOMNAMELEN]; + char *serialized_request = NULL; + icalcomponent *encaps = NULL; + icalcomponent *fb = NULL; + int found_user = (-1); + struct recptypes *recp = NULL; + char buf[256]; + char host[256]; + char type[256]; + int i = 0; + int config_lines = 0; + + /* First try an exact match. */ + found_user = getuser(&usbuf, who); + + /* If not found, try it as an unqualified email address. */ + if (found_user != 0) { + strcpy(buf, who); + recp = validate_recipients(buf); + lprintf(CTDL_DEBUG, "Trying <%s>\n", buf); + if (recp != NULL) { + if (recp->num_local == 1) { + found_user = getuser(&usbuf, recp->recp_local); + } + free(recp); + } + } + + /* If still not found, try it as an address qualified with the + * primary FQDN of this Citadel node. + */ + if (found_user != 0) { + snprintf(buf, sizeof buf, "%s@%s", who, config.c_fqdn); + lprintf(CTDL_DEBUG, "Trying <%s>\n", buf); + recp = validate_recipients(buf); + if (recp != NULL) { + if (recp->num_local == 1) { + found_user = getuser(&usbuf, recp->recp_local); + } + free(recp); + } + } + + /* Still not found? Try qualifying it with every domain we + * might have addresses in. + */ + if (found_user != 0) { + config_lines = num_tokens(inetcfg, '\n'); + for (i=0; ((i < config_lines) && (found_user != 0)); ++i) { + extract_token(buf, inetcfg, i, '\n', sizeof buf); + extract_token(host, buf, 0, '|', sizeof host); + extract_token(type, buf, 1, '|', sizeof type); + + if ( (!strcasecmp(type, "localhost")) + || (!strcasecmp(type, "directory")) ) { + snprintf(buf, sizeof buf, "%s@%s", who, host); + lprintf(CTDL_DEBUG, "Trying <%s>\n", buf); + recp = validate_recipients(buf); + if (recp != NULL) { + if (recp->num_local == 1) { + found_user = getuser(&usbuf, recp->recp_local); + } + free(recp); + } + } + } + } + + if (found_user != 0) { + cprintf("%d No such user.\n", ERROR + NO_SUCH_USER); + return; + } + + MailboxName(calendar_room_name, sizeof calendar_room_name, + &usbuf, USERCALENDARROOM); + + strcpy(hold_rm, CC->room.QRname); /* save current room */ + + if (getroom(&CC->room, calendar_room_name) != 0) { + cprintf("%d Cannot open calendar\n", ERROR + ROOM_NOT_FOUND); + getroom(&CC->room, hold_rm); + return; + } + + /* Create a VFREEBUSY subcomponent */ + lprintf(CTDL_DEBUG, "Creating VFREEBUSY component\n"); + fb = icalcomponent_new_vfreebusy(); + if (fb == NULL) { + cprintf("%d Internal error: cannot allocate memory.\n", + ERROR + INTERNAL_ERROR); + icalcomponent_free(encaps); + getroom(&CC->room, hold_rm); + return; + } + + /* Set the method to PUBLISH */ + icalcomponent_set_method(fb, ICAL_METHOD_PUBLISH); + + /* Set the DTSTAMP to right now. */ + icalcomponent_set_dtstamp(fb, icaltime_from_timet(time(NULL), 0)); + + /* Add the user's email address as ORGANIZER */ + sprintf(buf, "MAILTO:%s", who); + if (strchr(buf, '@') == NULL) { + strcat(buf, "@"); + strcat(buf, config.c_fqdn); + } + for (i=0; iroom, hold_rm); + return; + } + + /* Set the method to PUBLISH */ + lprintf(CTDL_DEBUG, "Setting method\n"); + icalcomponent_set_method(encaps, ICAL_METHOD_PUBLISH); + + /* Serialize it */ + lprintf(CTDL_DEBUG, "Serializing\n"); + serialized_request = strdup(icalcomponent_as_ical_string(encaps)); + icalcomponent_free(encaps); /* Don't need this anymore. */ + + cprintf("%d Here is the free/busy data:\n", LISTING_FOLLOWS); + if (serialized_request != NULL) { + client_write(serialized_request, strlen(serialized_request)); + free(serialized_request); + } + cprintf("\n000\n"); + + /* Go back to the room from which we came... */ + getroom(&CC->room, hold_rm); +} + + + +/* + * Backend for ical_getics() + * + * This is a ForEachMessage() callback function that searches the current room + * for calendar events and adds them each into one big calendar component. + */ +void ical_getics_backend(long msgnum, void *data) { + icalcomponent *encaps, *c; + struct CtdlMessage *msg; + struct ical_respond_data ird; + + encaps = (icalcomponent *)data; + if (encaps == NULL) return; + + /* Look for the calendar event... */ + + msg = CtdlFetchMessage(msgnum, 1); + if (msg == NULL) return; + memset(&ird, 0, sizeof ird); + strcpy(ird.desired_partnum, "_HUNT_"); + mime_parser(msg->cm_fields['M'], + NULL, + *ical_locate_part, /* callback function */ + NULL, NULL, + (void *) &ird, /* user data */ + 0 + ); + CtdlFreeMessage(msg); + + if (ird.cal == NULL) return; + + /* Here we go: put the VEVENT into the VCALENDAR. We now no longer + * are responsible for "the_request"'s memory -- it will be freed + * when we free "encaps". + */ + + /* If the top-level component is *not* a VCALENDAR, we can drop it right + * in. This will almost never happen. + */ + if (icalcomponent_isa(ird.cal) != ICAL_VCALENDAR_COMPONENT) { + icalcomponent_add_component(encaps, ird.cal); + } + /* + * In the more likely event that we're looking at a VCALENDAR with the VEVENT + * and other components encapsulated inside, we have to extract them. + */ + else { + for (c = icalcomponent_get_first_component(ird.cal, ICAL_ANY_COMPONENT); + (c != NULL); + c = icalcomponent_get_next_component(ird.cal, ICAL_ANY_COMPONENT)) { + icalcomponent_add_component(encaps, icalcomponent_new_clone(c)); + } + icalcomponent_free(ird.cal); + } +} + + + +/* + * Retrieve all of the calendar items in the current room, and output them + * as a single icalendar object. + */ +void ical_getics(void) +{ + icalcomponent *encaps = NULL; + char *ser = NULL; + + if ( (CC->room.QRdefaultview != VIEW_CALENDAR) + &&(CC->room.QRdefaultview != VIEW_TASKS) ) { + cprintf("%d Not a calendar room\n", ERROR+NOT_HERE); + return; /* Not a vCalendar-centric room */ + } + + encaps = icalcomponent_new_vcalendar(); + if (encaps == NULL) { + lprintf(CTDL_DEBUG, "Error at %s:%d - could not allocate component!\n", + __FILE__, __LINE__); + cprintf("%d Could not allocate memory\n", ERROR+INTERNAL_ERROR); + return; + } + + cprintf("%d one big calendar\n", LISTING_FOLLOWS); + + /* Set the Product ID */ + icalcomponent_add_property(encaps, icalproperty_new_prodid(PRODID)); + + /* Set the Version Number */ + icalcomponent_add_property(encaps, icalproperty_new_version("2.0")); + + /* Set the method to REQUEST */ + icalcomponent_set_method(encaps, ICAL_METHOD_PUBLISH); + + /* Now go through the room encapsulating all calendar items. */ + CtdlForEachMessage(MSGS_ALL, 0, NULL, + "text/calendar", + NULL, + ical_getics_backend, + (void *) encaps + ); + + ser = strdup(icalcomponent_as_ical_string(encaps)); + client_write(ser, strlen(ser)); + free(ser); + cprintf("\n000\n"); + icalcomponent_free(encaps); /* Don't need this anymore. */ + +} + + +/* + * Delete all of the calendar items in the current room, and replace them + * with calendar items from a client-supplied data stream. + */ +void ical_putics(void) +{ + char *calstream = NULL; + icalcomponent *cal; + icalcomponent *c; + + if ( (CC->room.QRdefaultview != VIEW_CALENDAR) + &&(CC->room.QRdefaultview != VIEW_TASKS) ) { + cprintf("%d Not a calendar room\n", ERROR+NOT_HERE); + return; /* Not a vCalendar-centric room */ + } + + if (!CtdlDoIHavePermissionToDeleteMessagesFromThisRoom()) { + cprintf("%d Permission denied.\n", ERROR+HIGHER_ACCESS_REQUIRED); + return; + } + + cprintf("%d Transmit data now\n", SEND_LISTING); + calstream = CtdlReadMessageBody("000", config.c_maxmsglen, NULL, 0); + if (calstream == NULL) { + return; + } + + cal = icalcomponent_new_from_string(calstream); + free(calstream); + ical_dezonify(cal); + + /* We got our data stream -- now do something with it. */ + + /* Delete the existing messages in the room, because we are replacing + * the entire calendar with an entire new (or updated) calendar. + * (Careful: this opens an S_ROOMS critical section!) + */ + CtdlDeleteMessages(CC->room.QRname, NULL, 0, ""); + + /* If the top-level component is *not* a VCALENDAR, we can drop it right + * in. This will almost never happen. + */ + if (icalcomponent_isa(cal) != ICAL_VCALENDAR_COMPONENT) { + ical_write_to_cal(&CC->user, cal); + } + /* + * In the more likely event that we're looking at a VCALENDAR with the VEVENT + * and other components encapsulated inside, we have to extract them. + */ + else { + for (c = icalcomponent_get_first_component(cal, ICAL_ANY_COMPONENT); + (c != NULL); + c = icalcomponent_get_next_component(cal, ICAL_ANY_COMPONENT)) { + ical_write_to_cal(&CC->user, c); + } + } + + icalcomponent_free(cal); +} + + +/* + * All Citadel calendar commands from the client come through here. + */ +void cmd_ical(char *argbuf) +{ + char subcmd[64]; + long msgnum; + char partnum[256]; + char action[256]; + char who[256]; + + extract_token(subcmd, argbuf, 0, '|', sizeof subcmd); + + /* Allow "test" and "freebusy" subcommands without logging in. */ + + if (!strcasecmp(subcmd, "test")) { + cprintf("%d This server supports calendaring\n", CIT_OK); + return; + } + + if (!strcasecmp(subcmd, "freebusy")) { + extract_token(who, argbuf, 1, '|', sizeof who); + ical_freebusy(who); + return; + } + + if (!strcasecmp(subcmd, "sgi")) { + CIT_ICAL->server_generated_invitations = + (extract_int(argbuf, 1) ? 1 : 0) ; + cprintf("%d %d\n", + CIT_OK, CIT_ICAL->server_generated_invitations); + return; + } + + if (CtdlAccessCheck(ac_logged_in)) return; + + if (!strcasecmp(subcmd, "respond")) { + msgnum = extract_long(argbuf, 1); + extract_token(partnum, argbuf, 2, '|', sizeof partnum); + extract_token(action, argbuf, 3, '|', sizeof action); + ical_respond(msgnum, partnum, action); + return; + } + + if (!strcasecmp(subcmd, "handle_rsvp")) { + msgnum = extract_long(argbuf, 1); + extract_token(partnum, argbuf, 2, '|', sizeof partnum); + extract_token(action, argbuf, 3, '|', sizeof action); + ical_handle_rsvp(msgnum, partnum, action); + return; + } + + if (!strcasecmp(subcmd, "conflicts")) { + msgnum = extract_long(argbuf, 1); + extract_token(partnum, argbuf, 2, '|', sizeof partnum); + ical_conflicts(msgnum, partnum); + return; + } + + if (!strcasecmp(subcmd, "getics")) { + ical_getics(); + return; + } + + if (!strcasecmp(subcmd, "putics")) { + ical_putics(); + return; + } + + cprintf("%d Invalid subcommand\n", ERROR + CMD_NOT_SUPPORTED); +} + + + +/* + * We don't know if the calendar room exists so we just create it at login + */ +void ical_create_room(void) +{ + struct ctdlroom qr; + struct visit vbuf; /* Create the calendar room if it doesn't already exist */ - create_room(USERCALENDARROOM, 4, "", 0, 1, 0); + create_room(USERCALENDARROOM, 4, "", 0, 1, 0, VIEW_CALENDAR); /* Set expiration policy to manual; otherwise objects will be lost! */ if (lgetroom(&qr, USERCALENDARROOM)) { - lprintf(3, "Couldn't get the user calendar room!\n"); + lprintf(CTDL_CRIT, "Couldn't get the user calendar room!\n"); return; } qr.QRep.expire_mode = EXPIRE_MANUAL; + qr.QRdefaultview = VIEW_CALENDAR; /* 3 = calendar view */ lputroom(&qr); /* Set the view to a calendar view */ - CtdlGetRelationship(&vbuf, &CC->usersupp, &qr); - vbuf.v_view = 3; /* 3 = calendar */ - CtdlSetRelationship(&vbuf, &CC->usersupp, &qr); + CtdlGetRelationship(&vbuf, &CC->user, &qr); + vbuf.v_view = VIEW_CALENDAR; + CtdlSetRelationship(&vbuf, &CC->user, &qr); /* Create the tasks list room if it doesn't already exist */ - create_room(USERTASKSROOM, 4, "", 0, 1, 0); + create_room(USERTASKSROOM, 4, "", 0, 1, 0, VIEW_TASKS); /* Set expiration policy to manual; otherwise objects will be lost! */ if (lgetroom(&qr, USERTASKSROOM)) { - lprintf(3, "Couldn't get the user calendar room!\n"); + lprintf(CTDL_CRIT, "Couldn't get the user calendar room!\n"); return; } qr.QRep.expire_mode = EXPIRE_MANUAL; + qr.QRdefaultview = VIEW_TASKS; lputroom(&qr); /* Set the view to a task list view */ - CtdlGetRelationship(&vbuf, &CC->usersupp, &qr); - vbuf.v_view = 4; /* 4 = tasks */ - CtdlSetRelationship(&vbuf, &CC->usersupp, &qr); + CtdlGetRelationship(&vbuf, &CC->user, &qr); + vbuf.v_view = VIEW_TASKS; + CtdlSetRelationship(&vbuf, &CC->user, &qr); + + /* Create the notes room if it doesn't already exist */ + create_room(USERNOTESROOM, 4, "", 0, 1, 0, VIEW_NOTES); + + /* Set expiration policy to manual; otherwise objects will be lost! */ + if (lgetroom(&qr, USERNOTESROOM)) { + lprintf(CTDL_CRIT, "Couldn't get the user calendar room!\n"); + return; + } + qr.QRep.expire_mode = EXPIRE_MANUAL; + qr.QRdefaultview = VIEW_NOTES; + lputroom(&qr); + + /* Set the view to a notes view */ + CtdlGetRelationship(&vbuf, &CC->user, &qr); + vbuf.v_view = VIEW_NOTES; + CtdlSetRelationship(&vbuf, &CC->user, &qr); return; } @@ -676,7 +1640,139 @@ void ical_create_room(void) * finds a VEVENT. */ void ical_send_out_invitations(icalcomponent *cal) { - lprintf(9, "Sending out invitations!\n"); + icalcomponent *the_request = NULL; + char *serialized_request = NULL; + icalcomponent *encaps = NULL; + char *request_message_text = NULL; + struct CtdlMessage *msg = NULL; + struct recptypes *valid = NULL; + char attendees_string[SIZ]; + int num_attendees = 0; + char this_attendee[256]; + icalproperty *attendee = NULL; + char summary_string[SIZ]; + icalproperty *summary = NULL; + + if (cal == NULL) { + lprintf(CTDL_ERR, "ERROR: trying to reply to NULL event?\n"); + return; + } + + + /* If this is a VCALENDAR component, look for a VEVENT subcomponent. */ + if (icalcomponent_isa(cal) == ICAL_VCALENDAR_COMPONENT) { + ical_send_out_invitations( + icalcomponent_get_first_component( + cal, ICAL_VEVENT_COMPONENT + ) + ); + return; + } + + /* Clone the event */ + the_request = icalcomponent_new_clone(cal); + if (the_request == NULL) { + lprintf(CTDL_ERR, "ERROR: cannot clone calendar object\n"); + return; + } + + /* Extract the summary string -- we'll use it as the + * message subject for the request + */ + strcpy(summary_string, "Meeting request"); + summary = icalcomponent_get_first_property(the_request, ICAL_SUMMARY_PROPERTY); + if (summary != NULL) { + if (icalproperty_get_summary(summary)) { + strcpy(summary_string, + icalproperty_get_summary(summary) ); + } + } + + /* Determine who the recipients of this message are (the attendees) */ + strcpy(attendees_string, ""); + for (attendee = icalcomponent_get_first_property(the_request, ICAL_ATTENDEE_PROPERTY); attendee != NULL; attendee = icalcomponent_get_next_property(the_request, ICAL_ATTENDEE_PROPERTY)) { + if (icalproperty_get_attendee(attendee)) { + safestrncpy(this_attendee, icalproperty_get_attendee(attendee), sizeof this_attendee); + if (!strncasecmp(this_attendee, "MAILTO:", 7)) { + strcpy(this_attendee, &this_attendee[7]); + + if (!CtdlIsMe(this_attendee, sizeof this_attendee)) { /* don't send an invitation to myself! */ + snprintf(&attendees_string[strlen(attendees_string)], + sizeof(attendees_string) - strlen(attendees_string), + "%s, ", + this_attendee + ); + ++num_attendees; + } + } + } + } + + lprintf(CTDL_DEBUG, "<%d> attendees: <%s>\n", num_attendees, attendees_string); + + /* If there are no attendees, there are no invitations to send, so... + * don't bother putting one together! Punch out, Maverick! + */ + if (num_attendees == 0) { + icalcomponent_free(the_request); + return; + } + + /* Encapsulate the VEVENT component into a complete VCALENDAR */ + encaps = icalcomponent_new_vcalendar(); + if (encaps == NULL) { + lprintf(CTDL_DEBUG, "Error at %s:%d - could not allocate component!\n", + __FILE__, __LINE__); + icalcomponent_free(the_request); + return; + } + + /* Set the Product ID */ + icalcomponent_add_property(encaps, icalproperty_new_prodid(PRODID)); + + /* Set the Version Number */ + icalcomponent_add_property(encaps, icalproperty_new_version("2.0")); + + /* Set the method to REQUEST */ + icalcomponent_set_method(encaps, ICAL_METHOD_REQUEST); + + /* Now make sure all of the DTSTART and DTEND properties are UTC. */ + ical_dezonify(the_request); + + /* Here we go: put the VEVENT into the VCALENDAR. We now no longer + * are responsible for "the_request"'s memory -- it will be freed + * when we free "encaps". + */ + icalcomponent_add_component(encaps, the_request); + + /* Serialize it */ + serialized_request = strdup(icalcomponent_as_ical_string(encaps)); + icalcomponent_free(encaps); /* Don't need this anymore. */ + if (serialized_request == NULL) return; + + request_message_text = malloc(strlen(serialized_request) + SIZ); + if (request_message_text != NULL) { + sprintf(request_message_text, + "Content-type: text/calendar\r\n\r\n%s\r\n", + serialized_request + ); + + msg = CtdlMakeMessage(&CC->user, + "", /* No single recipient here */ + "", /* No single recipient here */ + CC->room.QRname, 0, FMT_RFC822, + "", + summary_string, /* Use summary for subject */ + NULL, + request_message_text); + + if (msg != NULL) { + valid = validate_recipients(attendees_string); + CtdlSubmitMsg(msg, valid, ""); + CtdlFreeMessage(msg); + } + } + free(serialized_request); } @@ -685,21 +1781,21 @@ void ical_send_out_invitations(icalcomponent *cal) { * and the user saving it is the organizer. If so, send out invitations * to any listed attendees. * - * - * FIXME, FIXME, FIXME!! This doesn't work, for some reason. - * */ void ical_saving_vevent(icalcomponent *cal) { icalcomponent *c; icalproperty *organizer = NULL; char organizer_string[SIZ]; + /* Don't send out invitations unless the client wants us to. */ + if (CIT_ICAL->server_generated_invitations == 0) { + return; + } - lprintf(9, "ical_saving_vevent() called\n"); - - lprintf(9, "------------\n%s\n-------\n", - icalcomponent_as_ical_string(cal) - ); + /* Don't send out invitations if we've been asked not to. */ + if (CIT_ICAL->avoid_sending_invitations > 0) { + return; + } strcpy(organizer_string, ""); /* @@ -707,19 +1803,22 @@ void ical_saving_vevent(icalcomponent *cal) { * Send out invitations if, and only if, this user is the Organizer. */ if (icalcomponent_isa(cal) == ICAL_VEVENT_COMPONENT) { - organizer = icalcomponent_get_first_property(cal, ICAL_ORGANIZER_PROPERTY); + organizer = icalcomponent_get_first_property(cal, + ICAL_ORGANIZER_PROPERTY); if (organizer != NULL) { - lprintf(9, "Organizer found\n"); if (icalproperty_get_organizer(organizer)) { strcpy(organizer_string, - icalproperty_get_organizer(organizer) ); + icalproperty_get_organizer(organizer)); } } - lprintf(9, "organizer: <%s>\n", organizer_string); if (!strncasecmp(organizer_string, "MAILTO:", 7)) { strcpy(organizer_string, &organizer_string[7]); striplt(organizer_string); - if (CtdlIsMe(organizer_string)) { + /* + * If the user saving the event is listed as the + * organizer, then send out invitations. + */ + if (CtdlIsMe(organizer_string, sizeof organizer_string)) { ical_send_out_invitations(cal); } } @@ -737,33 +1836,66 @@ void ical_saving_vevent(icalcomponent *cal) { - /* * Back end for ical_obj_beforesave() - * This hunts for the UID of the calendar event. + * This hunts for the UID of the calendar event (becomes Citadel msg EUID), + * the summary of the event (becomes message subject), + * and the start time (becomes message date/time). */ -void ical_ctdl_set_extended_msgid(char *name, char *filename, char *partnum, - char *disp, void *content, char *cbtype, size_t length, +void ical_ctdl_set_exclusive_msgid(char *name, char *filename, char *partnum, + char *disp, void *content, char *cbtype, char *cbcharset, size_t length, char *encoding, void *cbuserdata) { - icalcomponent *cal; + icalcomponent *cal, *nested_event, *nested_todo; icalproperty *p; + struct icalmessagemod *imm; + char new_uid[SIZ]; + + imm = (struct icalmessagemod *)cbuserdata; /* If this is a text/calendar object, hunt for the UID and drop it in * the "user data" pointer for the MIME parser. When - * ical_obj_beforesave() sees it there, it'll set the Extended msgid + * ical_obj_beforesave() sees it there, it'll set the Exclusive msgid * to that string. */ if (!strcasecmp(cbtype, "text/calendar")) { cal = icalcomponent_new_from_string(content); + if (cal != NULL) { + if (icalcomponent_isa(cal) == ICAL_VCALENDAR_COMPONENT) { + nested_event = icalcomponent_get_first_component( + cal, ICAL_VEVENT_COMPONENT + ); + nested_todo = icalcomponent_get_first_component( + cal, ICAL_VTODO_COMPONENT + ); + if (nested_event != NULL) { + cal = nested_event; + } + else if (nested_todo != NULL) { + cal = nested_todo; + } + } + } if (cal != NULL) { p = ical_ctdl_get_subprop(cal, ICAL_UID_PROPERTY); + if (p == NULL) { + /* If there's no uid we must generate one */ + generate_uuid(new_uid); + icalcomponent_add_property(cal, icalproperty_new_uid(new_uid)); + p = ical_ctdl_get_subprop(cal, ICAL_UID_PROPERTY); + } if (p != NULL) { - strcpy((char *)cbuserdata, - icalproperty_get_comment(p) - ); + strcpy(imm->uid, icalproperty_get_comment(p)); + /* strcpy(imm->subject, icalproperty_get_comment(p)); old aethera hack */ + } + p = ical_ctdl_get_subprop(cal, ICAL_SUMMARY_PROPERTY); + if (p != NULL) { + strcpy(imm->subject, icalproperty_get_comment(p)); + } + p = ical_ctdl_get_subprop(cal, ICAL_DTSTART_PROPERTY); + if (p != NULL) { + imm->dtstart = icaltime_as_timet(icalproperty_get_dtstart(p)); } - ical_saving_vevent(cal); icalcomponent_free(cal); } } @@ -775,38 +1907,127 @@ void ical_ctdl_set_extended_msgid(char *name, char *filename, char *partnum, /* * See if we need to prevent the object from being saved (we don't allow - * MIME types other than text/calendar in the Calendar> room). Also, when - * saving an event to the calendar, set the message's Citadel extended message - * ID to the UID of the object. This causes our replication checker to + * MIME types other than text/calendar in "calendar" or "tasks" rooms). Also, + * when saving an event to the calendar, set the message's Citadel exclusive + * message ID to the UID of the object. This causes our replication checker to * automatically delete any existing instances of the same object. (Isn't * that cool?) + * + * We also set the message's Subject to the event summary, and the Date/time to + * the event start time. */ int ical_obj_beforesave(struct CtdlMessage *msg) +{ + char *p; + int a; + struct icalmessagemod imm; + + /* First determine if this is a calendar or tasks room */ + if ( (CC->room.QRdefaultview != VIEW_CALENDAR) + &&(CC->room.QRdefaultview != VIEW_TASKS) ) { + return(0); /* Not a vCalendar-centric room */ + } + + /* It must be an RFC822 message! */ + if (msg->cm_format_type != 4) { + return 1; /* You tried to save a non-RFC822 message! */ + } + + /* Find the Content-Type: header */ + p = msg->cm_fields['M']; + a = strlen(p); + while (--a > 0) { + if (!strncasecmp(p, "Content-Type: ", 14)) { /* Found it */ + if (!strncasecmp(p + 14, "text/calendar", 13)) { + memset(&imm, 0, sizeof(struct icalmessagemod)); + mime_parser(msg->cm_fields['M'], + NULL, + *ical_ctdl_set_exclusive_msgid, + NULL, NULL, + (void *)&imm, + 0 + ); + if (strlen(imm.uid) > 0) { + if (msg->cm_fields['E'] != NULL) { + free(msg->cm_fields['E']); + } + msg->cm_fields['E'] = strdup(imm.uid); + } + if (strlen(imm.subject) > 0) { + if (msg->cm_fields['U'] != NULL) { + free(msg->cm_fields['U']); + } + msg->cm_fields['U'] = strdup(imm.subject); + } + if (imm.dtstart > 0) { + if (msg->cm_fields['T'] != NULL) { + free(msg->cm_fields['T']); + } + msg->cm_fields['T'] = strdup("000000000000000000"); + sprintf(msg->cm_fields['T'], "%ld", imm.dtstart); + } + return 0; + } + else { + return 1; + } + } + p++; + } + + /* Oops! No Content-Type in this message! How'd that happen? */ + lprintf(CTDL_ERR, "RFC822 message with no Content-Type header!\n"); + return 1; +} + + +/* + * Things we need to do after saving a calendar event. + */ +void ical_obj_aftersave_backend(char *name, char *filename, char *partnum, + char *disp, void *content, char *cbtype, char *cbcharset, size_t length, + char *encoding, void *cbuserdata) +{ + icalcomponent *cal; + + /* If this is a text/calendar object, hunt for the UID and drop it in + * the "user data" pointer for the MIME parser. When + * ical_obj_beforesave() sees it there, it'll set the Exclusive msgid + * to that string. + */ + if (!strcasecmp(cbtype, "text/calendar")) { + cal = icalcomponent_new_from_string(content); + if (cal != NULL) { + ical_saving_vevent(cal); + icalcomponent_free(cal); + } + } +} + + +/* + * Things we need to do after saving a calendar event. + */ +int ical_obj_aftersave(struct CtdlMessage *msg) { char roomname[ROOMNAMELEN]; char *p; int a; - char eidbuf[SIZ]; /* - * Only messages with content-type text/calendar - * may be saved to Calendar>. If the message is bound for - * Calendar> but doesn't have this content-type, throw an error - * so that the message may not be posted. + * If this isn't the Calendar> room, no further action is necessary. */ /* First determine if this is our room */ - MailboxName(roomname, sizeof roomname, &CC->usersupp, USERCALENDARROOM); - if (strcasecmp(roomname, CC->quickroom.QRname)) { + MailboxName(roomname, sizeof roomname, &CC->user, USERCALENDARROOM); + if (strcasecmp(roomname, CC->room.QRname)) { return 0; /* It's not the Calendar room. */ } /* Then determine content-type of the message */ /* It must be an RFC822 message! */ - /* FIXME: Not handling MIME multipart messages; implement with IMIP */ - if (msg->cm_format_type != 4) - return 1; /* You tried to save a non-RFC822 message! */ + if (msg->cm_format_type != 4) return(1); /* Find the Content-Type: header */ p = msg->cm_fields['M']; @@ -814,20 +2035,13 @@ int ical_obj_beforesave(struct CtdlMessage *msg) while (--a > 0) { if (!strncasecmp(p, "Content-Type: ", 14)) { /* Found it */ if (!strncasecmp(p + 14, "text/calendar", 13)) { - strcpy(eidbuf, ""); mime_parser(msg->cm_fields['M'], NULL, - *ical_ctdl_set_extended_msgid, + *ical_obj_aftersave_backend, NULL, NULL, - (void *)eidbuf, + NULL, 0 ); - if (strlen(eidbuf) > 0) { - if (msg->cm_fields['E'] != NULL) { - phree(msg->cm_fields['E']); - } - msg->cm_fields['E'] = strdoop(eidbuf); - } return 0; } else { @@ -838,22 +2052,117 @@ int ical_obj_beforesave(struct CtdlMessage *msg) } /* Oops! No Content-Type in this message! How'd that happen? */ - lprintf(7, "RFC822 message with no Content-Type header!\n"); + lprintf(CTDL_ERR, "RFC822 message with no Content-Type header!\n"); return 1; } -#endif /* HAVE_ICAL_H */ +void ical_session_startup(void) { + CIT_ICAL = malloc(sizeof(struct cit_ical)); + memset(CIT_ICAL, 0, sizeof(struct cit_ical)); +} + +void ical_session_shutdown(void) { + free(CIT_ICAL); +} + + +/* + * Back end for ical_fixed_output() + */ +void ical_fixed_output_backend(icalcomponent *cal, + int recursion_level +) { + icalcomponent *c; + icalproperty *p; + char buf[256]; + + p = icalcomponent_get_first_property(cal, ICAL_SUMMARY_PROPERTY); + if (p != NULL) { + cprintf("%s\n", (const char *)icalproperty_get_comment(p)); + } + + p = icalcomponent_get_first_property(cal, ICAL_LOCATION_PROPERTY); + if (p != NULL) { + cprintf("%s\n", (const char *)icalproperty_get_comment(p)); + } + + p = icalcomponent_get_first_property(cal, ICAL_DESCRIPTION_PROPERTY); + if (p != NULL) { + cprintf("%s\n", (const char *)icalproperty_get_comment(p)); + } + + /* If the component has attendees, iterate through them. */ + for (p = icalcomponent_get_first_property(cal, ICAL_ATTENDEE_PROPERTY); (p != NULL); p = icalcomponent_get_next_property(cal, ICAL_ATTENDEE_PROPERTY)) { + safestrncpy(buf, icalproperty_get_attendee(p), sizeof buf); + if (!strncasecmp(buf, "MAILTO:", 7)) { + + /* screen name or email address */ + strcpy(buf, &buf[7]); + striplt(buf); + cprintf("%s ", buf); + } + cprintf("\n"); + } + + /* If the component has subcomponents, recurse through them. */ + for (c = icalcomponent_get_first_component(cal, ICAL_ANY_COMPONENT); + (c != 0); + c = icalcomponent_get_next_component(cal, ICAL_ANY_COMPONENT)) { + /* Recursively process subcomponent */ + ical_fixed_output_backend(c, recursion_level+1); + } +} + + + +/* + * Function to output vcalendar data as plain text. Nobody uses MSG0 + * anymore, so really this is just so we expose the vCard data to the full + * text indexer. + */ +void ical_fixed_output(char *ptr, int len) { + icalcomponent *cal; + char *stringy_cal; + + stringy_cal = malloc(len + 1); + safestrncpy(stringy_cal, ptr, len + 1); + cal = icalcomponent_new_from_string(stringy_cal); + free(stringy_cal); + + if (cal == NULL) { + return; + } + + ical_dezonify(cal); + ical_fixed_output_backend(cal, 0); + + /* Free the memory we obtained from libical's constructor */ + icalcomponent_free(cal); +} + + +#endif /* CITADEL_WITH_CALENDAR_SERVICE */ /* * Register this module with the Citadel server. */ -char *Dynamic_Module_Init(void) +char *serv_calendar_init(void) { -#ifdef HAVE_ICAL_H +#ifdef CITADEL_WITH_CALENDAR_SERVICE CtdlRegisterMessageHook(ical_obj_beforesave, EVT_BEFORESAVE); + CtdlRegisterMessageHook(ical_obj_aftersave, EVT_AFTERSAVE); CtdlRegisterSessionHook(ical_create_room, EVT_LOGIN); CtdlRegisterProtoHook(cmd_ical, "ICAL", "Citadel iCal commands"); + CtdlRegisterSessionHook(ical_session_startup, EVT_START); + CtdlRegisterSessionHook(ical_session_shutdown, EVT_STOP); + CtdlRegisterFixedOutputHook("text/calendar", ical_fixed_output); #endif return "$Id$"; } + + + + + +