+/*
+ * 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,
+ NULL,
+ 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);
+}
+