/*
- * $Id$
- *
* This module implements iCalendar object processing and the Calendar>
* room on a Citadel server. It handles iCalendar objects using the
* iTIP protocol. See RFCs 2445 and 2446.
*
*
- * Copyright (c) 1987-2009 by the citadel.org team
+ * Copyright (c) 1987-2011 by the citadel.org team
*
- * This program is free software; you can redistribute it and/or modify
+ * This program is open source software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 3 of the License, or
* (at your option) any later version.
#define PRODID "-//Citadel//NONSGML Citadel Calendar//EN"
-#include "sysdep.h"
-#include <stdlib.h>
-#include <unistd.h>
-#include <sys/types.h>
-#include <limits.h>
-#include <stdio.h>
-#include <string.h>
-#ifdef HAVE_STRINGS_H
-#include <strings.h>
-#endif
+#include "ctdl_module.h"
+
#include <libical/ical.h>
-#include <libcitadel.h>
-#include "citadel.h"
-#include "server.h"
-#include "citserver.h"
-#include "support.h"
-#include "config.h"
-#include "user_ops.h"
+
#include "msgbase.h"
#include "internet_addressing.h"
#include "serv_calendar.h"
#include "euidindex.h"
-#include "ctdl_module.h"
#include "ical_dezonify.h"
encaps = icalcomponent_new_vcalendar();
if (encaps == NULL) {
- CtdlLogPrintf(CTDL_CRIT, "ERROR: could not allocate component!\n");
+ syslog(LOG_CRIT, "ERROR: could not allocate component!\n");
return NULL;
}
strcpy(summary_string, "Calendar item");
if (request == NULL) {
- CtdlLogPrintf(CTDL_ERR, "ERROR: trying to reply to NULL event?\n");
+ syslog(LOG_ERR, "ERROR: trying to reply to NULL event?\n");
return;
}
the_reply = icalcomponent_new_clone(request);
if (the_reply == NULL) {
- CtdlLogPrintf(CTDL_ERR, "ERROR: cannot clone request\n");
+ syslog(LOG_ERR, "ERROR: cannot clone request\n");
return;
}
/* Figure out just what event it is we're dealing with */
strcpy(uid, "--==<< InVaLiD uId >>==--");
ical_learn_uid_of_reply(uid, cal);
- CtdlLogPrintf(CTDL_DEBUG, "UID of event being replied to is <%s>\n", uid);
+ syslog(LOG_DEBUG, "UID of event being replied to is <%s>\n", uid);
strcpy(hold_rm, CC->room.QRname); /* save current room */
if (CtdlGetRoom(&CC->room, USERCALENDARROOM) != 0) {
CtdlGetRoom(&CC->room, hold_rm);
- CtdlLogPrintf(CTDL_CRIT, "cannot get user calendar room\n");
+ syslog(LOG_CRIT, "cannot get user calendar room\n");
return(2);
}
* Citadel always sets the message EUID to the iCalendar UID of
* the event, this will work.
*/
- msgnum_being_replaced = locate_message_by_euid(uid, &CC->room);
+ msgnum_being_replaced = CtdlLocateMessageByEuid(uid, &CC->room);
CtdlGetRoom(&CC->room, hold_rm); /* return to saved room */
- CtdlLogPrintf(CTDL_DEBUG, "msgnum_being_replaced == %ld\n", msgnum_being_replaced);
+ syslog(LOG_DEBUG, "msgnum_being_replaced == %ld\n", msgnum_being_replaced);
if (msgnum_being_replaced == 0) {
return(1); /* no calendar event found */
}
original_event = oec.c;
if (original_event == NULL) {
- CtdlLogPrintf(CTDL_ERR, "ERROR: Original_component is NULL.\n");
+ syslog(LOG_ERR, "ERROR: Original_component is NULL.\n");
return(2);
}
icalcomponent_free(original_event); /* Don't need this anymore. */
if (serialized_event == NULL) return(2);
- MailboxName(roomname, sizeof roomname, &CC->user, USERCALENDARROOM);
+ CtdlMailboxName(roomname, sizeof roomname, &CC->user, USERCALENDARROOM);
message_text = malloc(strlen(serialized_event) + SIZ);
if (message_text != NULL) {
return(1);
}
- /* lprintf (9, "Comparing t1start %d:%d t1end %d:%d t2start %d:%d t2end %d:%d \n",
+ /* syslog(LOG_DEBUG, "Comparing t1start %d:%d t1end %d:%d t2start %d:%d t2end %d:%d \n",
t1start.hour, t1start.minute, t1end.hour, t1end.minute,
t2start.hour, t2start.minute, t2end.hour, t2end.minute);
*/
/* If event 1 ends before event 2 starts, we're in the clear. */
if (icaltime_compare(t1end, t2start) <= 0) return(0);
- /* lprintf(9, "first passed\n"); */
+ /* syslog(LOG_DEBUG, "first passed\n"); */
/* If event 2 ends before event 1 starts, we're also ok. */
if (icaltime_compare(t2end, t1start) <= 0) return(0);
- /* lprintf(9, "second passed\n"); */
+ /* syslog(LOG_DEBUG, "second passed\n"); */
/* Otherwise, they overlap. */
return(1);
/* debugging cruft *
time_t tt;
tt = icaltime_as_timet_with_zone(t1start, t1start.zone);
- CtdlLogPrintf(CTDL_DEBUG, "PROPOSED START: %s", ctime(&tt));
+ syslog(LOG_DEBUG, "PROPOSED START: %s", ctime(&tt));
tt = icaltime_as_timet_with_zone(t1end, t1end.zone);
- CtdlLogPrintf(CTDL_DEBUG, " PROPOSED END: %s", ctime(&tt));
+ syslog(LOG_DEBUG, " PROPOSED END: %s", ctime(&tt));
tt = icaltime_as_timet_with_zone(t2start, t2start.zone);
- CtdlLogPrintf(CTDL_DEBUG, "EXISTING START: %s", ctime(&tt));
+ syslog(LOG_DEBUG, "EXISTING START: %s", ctime(&tt));
tt = icaltime_as_timet_with_zone(t2end, t2end.zone);
- CtdlLogPrintf(CTDL_DEBUG, " EXISTING END: %s", ctime(&tt));
+ syslog(LOG_DEBUG, " EXISTING END: %s", ctime(&tt));
* debugging cruft */
/* compare and output */
int config_lines = 0;
/* First try an exact match. */
- found_user = getuser(&usbuf, who);
+ found_user = CtdlGetUser(&usbuf, who);
/* If not found, try it as an unqualified email address. */
if (found_user != 0) {
strcpy(buf, who);
recp = validate_recipients(buf, NULL, 0);
- CtdlLogPrintf(CTDL_DEBUG, "Trying <%s>\n", buf);
+ syslog(LOG_DEBUG, "Trying <%s>\n", buf);
if (recp != NULL) {
if (recp->num_local == 1) {
- found_user = getuser(&usbuf, recp->recp_local);
+ found_user = CtdlGetUser(&usbuf, recp->recp_local);
}
free_recipients(recp);
}
*/
if (found_user != 0) {
snprintf(buf, sizeof buf, "%s@%s", who, config.c_fqdn);
- CtdlLogPrintf(CTDL_DEBUG, "Trying <%s>\n", buf);
+ syslog(LOG_DEBUG, "Trying <%s>\n", buf);
recp = validate_recipients(buf, NULL, 0);
if (recp != NULL) {
if (recp->num_local == 1) {
- found_user = getuser(&usbuf, recp->recp_local);
+ found_user = CtdlGetUser(&usbuf, recp->recp_local);
}
free_recipients(recp);
}
if ( (!strcasecmp(type, "localhost"))
|| (!strcasecmp(type, "directory")) ) {
snprintf(buf, sizeof buf, "%s@%s", who, host);
- CtdlLogPrintf(CTDL_DEBUG, "Trying <%s>\n", buf);
+ syslog(LOG_DEBUG, "Trying <%s>\n", buf);
recp = validate_recipients(buf, NULL, 0);
if (recp != NULL) {
if (recp->num_local == 1) {
- found_user = getuser(&usbuf, recp->recp_local);
+ found_user = CtdlGetUser(&usbuf, recp->recp_local);
}
free_recipients(recp);
}
return;
}
- MailboxName(calendar_room_name, sizeof calendar_room_name,
+ CtdlMailboxName(calendar_room_name, sizeof calendar_room_name,
&usbuf, USERCALENDARROOM);
strcpy(hold_rm, CC->room.QRname); /* save current room */
}
/* Create a VFREEBUSY subcomponent */
- CtdlLogPrintf(CTDL_DEBUG, "Creating VFREEBUSY component\n");
+ syslog(LOG_DEBUG, "Creating VFREEBUSY component\n");
fb = icalcomponent_new_vfreebusy();
if (fb == NULL) {
cprintf("%d Internal error: cannot allocate memory.\n",
icalcomponent_add_property(fb, icalproperty_new_organizer(buf));
/* Add busy time from events */
- CtdlLogPrintf(CTDL_DEBUG, "Adding busy time from events\n");
+ syslog(LOG_DEBUG, "Adding busy time from events\n");
CtdlForEachMessage(MSGS_ALL, 0, NULL, NULL, NULL, ical_freebusy_backend, (void *)fb );
/* If values for DTSTART and DTEND are still not present, set them
}
/* Put the freebusy component into the calendar component */
- CtdlLogPrintf(CTDL_DEBUG, "Encapsulating\n");
+ syslog(LOG_DEBUG, "Encapsulating\n");
encaps = ical_encapsulate_subcomponent(fb);
if (encaps == NULL) {
icalcomponent_free(fb);
}
/* Set the method to PUBLISH */
- CtdlLogPrintf(CTDL_DEBUG, "Setting method\n");
+ syslog(LOG_DEBUG, "Setting method\n");
icalcomponent_set_method(encaps, ICAL_METHOD_PUBLISH);
/* Serialize it */
- CtdlLogPrintf(CTDL_DEBUG, "Serializing\n");
+ syslog(LOG_DEBUG, "Serializing\n");
serialized_request = icalcomponent_as_ical_string_r(encaps);
icalcomponent_free(encaps); /* Don't need this anymore. */
encaps = icalcomponent_new_vcalendar();
if (encaps == NULL) {
- CtdlLogPrintf(CTDL_ALERT, "ERROR: could not allocate component!\n");
+ syslog(LOG_ALERT, "ERROR: could not allocate component!\n");
cprintf("%d Could not allocate memory\n", ERROR+INTERNAL_ERROR);
return;
}
HashList *keys = (HashList *) data;
if ( (keys) && (tzid) && (!IsEmptyStr(tzid)) ) {
- Put(keys, tzid, strlen(tzid), strdup(tzid), generic_free_handler);
+ Put(keys, tzid, strlen(tzid), strdup(tzid), NULL);
}
}
}
cprintf("%d Transmit data now\n", SEND_LISTING);
- calstream = CtdlReadMessageBody("000", config.c_maxmsglen, NULL, 0, 0);
+ calstream = CtdlReadMessageBody(HKEY("000"), config.c_maxmsglen, NULL, 0, 0);
if (calstream == NULL) {
return;
}
HashPos = GetNewHashPos(tzidlist, 0);
while (GetNextHashPos(tzidlist, HashPos, &len, &Key, &Value)) {
- CtdlLogPrintf(CTDL_DEBUG, "Attaching timezone '%s'\n", Value);
+ syslog(LOG_DEBUG, "Attaching timezone '%s'\n", (char*) Value);
icaltimezone *t = NULL;
/* First look for a timezone attached to the original calendar */
void ical_CtdlCreateRoom(void)
{
struct ctdlroom qr;
- struct visit vbuf;
+ visit vbuf;
/* Create the calendar room if it doesn't already exist */
CtdlCreateRoom(USERCALENDARROOM, 4, "", 0, 1, 0, VIEW_CALENDAR);
/* Set expiration policy to manual; otherwise objects will be lost! */
if (CtdlGetRoomLock(&qr, USERCALENDARROOM)) {
- CtdlLogPrintf(CTDL_CRIT, "Couldn't get the user calendar room!\n");
+ syslog(LOG_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 (CtdlGetRoomLock(&qr, USERTASKSROOM)) {
- CtdlLogPrintf(CTDL_CRIT, "Couldn't get the user calendar room!\n");
+ syslog(LOG_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 (CtdlGetRoomLock(&qr, USERNOTESROOM)) {
- CtdlLogPrintf(CTDL_CRIT, "Couldn't get the user calendar room!\n");
+ syslog(LOG_CRIT, "Couldn't get the user calendar room!\n");
return;
}
qr.QRep.expire_mode = EXPIRE_MANUAL;
const char *tzidc = NULL;
if (cal == NULL) {
- CtdlLogPrintf(CTDL_ERR, "ERROR: trying to reply to NULL event?\n");
+ syslog(LOG_ERR, "ERROR: trying to reply to NULL event?\n");
return;
}
/* Clone the event */
the_request = icalcomponent_new_clone(cal);
if (the_request == NULL) {
- CtdlLogPrintf(CTDL_ERR, "ERROR: cannot clone calendar object\n");
+ syslog(LOG_ERR, "ERROR: cannot clone calendar object\n");
return;
}
}
}
- CtdlLogPrintf(CTDL_DEBUG, "<%d> attendees: <%s>\n", num_attendees, attendees_string);
+ syslog(LOG_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) {
- CtdlLogPrintf(CTDL_ALERT, "ERROR: could not allocate component!\n");
+ syslog(LOG_ALERT, "ERROR: could not allocate component!\n");
icalcomponent_free(the_request);
return;
}
icalproperty *organizer = NULL;
char organizer_string[SIZ];
- CtdlLogPrintf(CTDL_DEBUG, "ical_saving_vevent() has been called!\n");
+ syslog(LOG_DEBUG, "ical_saving_vevent() has been called!\n");
/* Don't send out invitations unless the client wants us to. */
if (CIT_ICAL->server_generated_invitations == 0) {
free(msg->cm_fields['E']);
}
msg->cm_fields['E'] = strdup(buf);
- CtdlLogPrintf(CTDL_DEBUG, "Saving calendar UID <%s>\n", buf);
+ syslog(LOG_DEBUG, "Saving calendar UID <%s>\n", buf);
}
}
/* It must be an RFC822 message! */
if (msg->cm_format_type != 4) {
- CtdlLogPrintf(CTDL_DEBUG, "Rejecting non-RFC822 message\n");
+ syslog(LOG_DEBUG, "Rejecting non-RFC822 message\n");
return(1); /* You tried to save a non-RFC822 message! */
}
*/
/* First determine if this is our room */
- MailboxName(roomname, sizeof roomname, &CC->user, USERCALENDARROOM);
+ CtdlMailboxName(roomname, sizeof roomname, &CC->user, USERCALENDARROOM);
if (strcasecmp(roomname, CC->room.QRname)) {
return(0); /* Not the Calendar room -- don't do anything. */
}
}
/* return our Subversion id for the Log */
- return "$Id$";
+ return "calendar";
}