* $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 <stdlib.h>
#include <unistd.h>
#include <sys/types.h>
#include <limits.h>
#include "tools.h"
#include "msgbase.h"
#include "mime_parser.h"
+#include "internet_addressing.h"
#include "serv_calendar.h"
#ifdef CITADEL_WITH_CALENDAR_SERVICE
encaps = icalcomponent_new_vcalendar();
if (encaps == NULL) {
- lprintf(3, "Error at %s:%d - could not allocate component!\n",
+ lprintf(CTDL_CRIT, "Error at %s:%d - could not allocate component!\n",
__FILE__, __LINE__);
return NULL;
}
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;
}
if (me_attend) icalproperty_free(me_attend);
me_attend = icalproperty_new_clone(attendee);
}
- phree(recp);
+ free(recp);
}
}
}
}
/* 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",
CtdlFreeMessage(msg);
}
}
- phree(serialized_reply);
+ free(serialized_reply);
}
return;
}
- msg = CtdlFetchMessage(msgnum);
+ msg = CtdlFetchMessage(msgnum, 1);
if (msg == NULL) {
cprintf("%d Message %ld not found.\n",
ERROR + ILLEGAL_VALUE,
/* Figure out just what event it is we're dealing with */
strcpy(uid, "--==<< InVaLiD uId >>==--");
ical_learn_uid_of_reply(uid, cal);
- lprintf(9, "UID of event being replied to is <%s>\n", uid);
+ 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(3, "cannot get user calendar room\n");
+ lprintf(CTDL_CRIT, "cannot get user calendar room\n");
return(2);
}
* the event, this will work.
*/
template = (struct CtdlMessage *)
- mallok(sizeof(struct CtdlMessage));
+ malloc(sizeof(struct CtdlMessage));
memset(template, 0, sizeof(struct CtdlMessage));
- template->cm_fields['E'] = strdoop(uid);
+ template->cm_fields['E'] = strdup(uid);
CtdlForEachMessage(MSGS_ALL, 0, "text/calendar",
template, ical_hunt_for_event_to_update, &msgnum_being_replaced);
CtdlFreeMessage(template);
getroom(&CC->room, hold_rm); /* return to saved room */
- lprintf(9, "msgnum_being_replaced == %ld\n", msgnum_being_replaced);
+ lprintf(CTDL_DEBUG, "msgnum_being_replaced == %ld\n", msgnum_being_replaced);
if (msgnum_being_replaced == 0) {
return(1); /* no calendar event found */
}
* us the ability to load the event into memory so we can diddle the
* attendees.
*/
- msg = CtdlFetchMessage(msgnum_being_replaced);
+ msg = CtdlFetchMessage(msgnum_being_replaced, 1);
if (msg == NULL) {
return(2); /* internal error */
}
original_event = oec.c;
if (original_event == NULL) {
- lprintf(3, "ERROR: Original_component is NULL.\n");
+ lprintf(CTDL_ERR, "ERROR: Original_component is NULL.\n");
return(2);
}
ical_merge_attendee_reply(original_event, cal);
/* Serialize it */
- serialized_event = strdoop(icalcomponent_as_ical_string(original_event));
+ 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 = mallok(strlen(serialized_event) + SIZ);
+ 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",
CIT_ICAL->avoid_sending_invitations = 0;
}
}
- phree(serialized_event);
+ free(serialized_event);
return(0);
}
return;
}
- msg = CtdlFetchMessage(msgnum);
+ msg = CtdlFetchMessage(msgnum, 1);
if (msg == NULL) {
cprintf("%d Message %ld not found.\n",
ERROR + ILLEGAL_VALUE,
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, "_HUNT_");
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,
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 {
+ if (icaltime_compare(
+ icalcomponent_get_dtend(cal),
+ icalcomponent_get_dtend(fb)
+ ) > 0) {
+ icalcomponent_set_dtend(fb,
+ icalcomponent_get_dtend(cal) );
+ }
+ }
+
}
cal = (icalcomponent *)data;
- msg = CtdlFetchMessage(msgnum);
+ msg = CtdlFetchMessage(msgnum, 1);
if (msg == NULL) return;
memset(&ird, 0, sizeof ird);
strcpy(ird.desired_partnum, "_HUNT_");
char *serialized_request = NULL;
icalcomponent *encaps = NULL;
icalcomponent *fb = NULL;
+ int found_user = (-1);
+ struct recptypes *recp = NULL;
+ char buf[SIZ];
+ char host[SIZ];
+ char type[SIZ];
+ 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 (getuser(&usbuf, who) != 0) {
+ /* 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');
+ extract_token(host, buf, 0, '|');
+ extract_token(type, buf, 1, '|');
+
+ 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;
}
}
/* Create a VFREEBUSY subcomponent */
- lprintf(9, "Creating VFREEBUSY component\n");
+ lprintf(CTDL_DEBUG, "Creating VFREEBUSY component\n");
fb = icalcomponent_new_vfreebusy();
if (fb == NULL) {
cprintf("%d Internal error: cannot allocate memory.\n",
return;
}
- lprintf(9, "Adding busy time from events\n");
- CtdlForEachMessage(MSGS_ALL, 0, "text/calendar",
- NULL, ical_freebusy_backend, (void *)fb
- );
-
/* 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));
- /* FIXME we still need (at least) DTSTART, DTEND, and the user's
- * e-mail address as ORGANIZER.
+ /* 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; i<strlen(buf); ++i) {
+ if (buf[i]==' ') buf[i] = '_';
+ }
+ icalcomponent_add_property(fb, icalproperty_new_organizer(buf));
+
+ /* Add busy time from events */
+ lprintf(CTDL_DEBUG, "Adding busy time from events\n");
+ CtdlForEachMessage(MSGS_ALL, 0, "text/calendar",
+ NULL, ical_freebusy_backend, (void *)fb
+ );
+
+ /* If values for DTSTART and DTEND are still not present, set them
+ * to yesterday and tomorrow as default values.
*/
+ if (icalcomponent_get_first_property(fb, ICAL_DTSTART_PROPERTY) == NULL) {
+ icalcomponent_set_dtstart(fb, icaltime_from_timet(time(NULL)-86400L, 0));
+ }
+ if (icalcomponent_get_first_property(fb, ICAL_DTEND_PROPERTY) == NULL) {
+ icalcomponent_set_dtend(fb, icaltime_from_timet(time(NULL)+86400L, 0));
+ }
/* Put the freebusy component into the calendar component */
- lprintf(9, "Encapsulating\n");
+ lprintf(CTDL_DEBUG, "Encapsulating\n");
encaps = ical_encapsulate_subcomponent(fb);
if (encaps == NULL) {
icalcomponent_free(fb);
}
/* Set the method to PUBLISH */
- lprintf(9, "Setting method\n");
+ lprintf(CTDL_DEBUG, "Setting method\n");
icalcomponent_set_method(encaps, ICAL_METHOD_PUBLISH);
/* Serialize it */
- lprintf(9, "Serializing\n");
- serialized_request = strdoop(icalcomponent_as_ical_string(encaps));
+ 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));
- phree(serialized_request);
+ free(serialized_request);
}
cprintf("\n000\n");
/* 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;
/* 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;
icalproperty *summary = NULL;
if (cal == NULL) {
- lprintf(3, "ERROR: trying to reply to NULL event?\n");
+ lprintf(CTDL_ERR, "ERROR: trying to reply to NULL event?\n");
return;
}
/* Clone the event */
the_request = icalcomponent_new_clone(cal);
if (the_request == NULL) {
- lprintf(3, "ERROR: cannot clone calendar object\n");
+ lprintf(CTDL_ERR, "ERROR: cannot clone calendar object\n");
return;
}
}
}
- lprintf(9, "<%d> attendees: <%s>\n", num_attendees, attendees_string);
+ 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!
/* Encapsulate the VEVENT component into a complete VCALENDAR */
encaps = icalcomponent_new_vcalendar();
if (encaps == NULL) {
- lprintf(3, "Error at %s:%d - could not allocate component!\n",
+ lprintf(CTDL_DEBUG, "Error at %s:%d - could not allocate component!\n",
__FILE__, __LINE__);
icalcomponent_free(the_request);
return;
icalcomponent_add_component(encaps, the_request);
/* Serialize it */
- serialized_request = strdoop(icalcomponent_as_ical_string(encaps));
+ serialized_request = strdup(icalcomponent_as_ical_string(encaps));
icalcomponent_free(encaps); /* Don't need this anymore. */
if (serialized_request == NULL) return;
- request_message_text = mallok(strlen(serialized_request) + SIZ);
+ 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",
CtdlFreeMessage(msg);
}
}
- phree(serialized_request);
+ free(serialized_request);
}
);
if (strlen(imm.uid) > 0) {
if (msg->cm_fields['E'] != NULL) {
- phree(msg->cm_fields['E']);
+ free(msg->cm_fields['E']);
}
- msg->cm_fields['E'] = strdoop(imm.uid);
+ msg->cm_fields['E'] = strdup(imm.uid);
}
if (strlen(imm.subject) > 0) {
if (msg->cm_fields['U'] != NULL) {
- phree(msg->cm_fields['U']);
+ free(msg->cm_fields['U']);
}
- msg->cm_fields['U'] = strdoop(imm.subject);
+ msg->cm_fields['U'] = strdup(imm.subject);
}
if (imm.dtstart > 0) {
if (msg->cm_fields['T'] != NULL) {
- phree(msg->cm_fields['T']);
+ free(msg->cm_fields['T']);
}
- msg->cm_fields['T'] = strdoop("000000000000000000");
+ msg->cm_fields['T'] = strdup("000000000000000000");
sprintf(msg->cm_fields['T'], "%ld", imm.dtstart);
}
return 0;
}
/* 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;
}
}
/* 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;
}
projects / citadel.git / blobdiff