4 * Functions which handle calendar objects and their processing/display.
12 * \brief Process a calendar object
13 * ...at this point it's already been deserialized by cal_process_attachment()
14 * \param cal the calendar object
15 * \param recursion_level call stack depth ??????
16 * \param msgnum number of the mesage in our db
17 * \param cal_partnum of the calendar object ????
19 void cal_process_object(icalcomponent *cal,
25 icalproperty *method = NULL;
26 icalproperty_method the_method = ICAL_METHOD_NONE;
28 struct icaltimetype t;
31 char conflict_name[256];
32 char conflict_message[256];
35 static int divcount = 0;
37 sprintf(divname, "rsvp%04x", ++divcount);
39 /** Leading HTML for the display of this object */
40 if (recursion_level == 0) {
41 wprintf("<div class=\"mimepart\">\n");
44 /** Look for a method */
45 method = icalcomponent_get_first_property(cal, ICAL_METHOD_PROPERTY);
47 /** See what we need to do with this */
49 the_method = icalproperty_get_method(method);
52 wprintf("<div id=\"%s_title\">", divname);
53 wprintf("<img src=\"static/calarea_48x.gif\">");
56 case ICAL_METHOD_REQUEST:
57 title = _("Meeting invitation");
59 case ICAL_METHOD_REPLY:
60 title = _("Attendee's reply to your invitation");
62 case ICAL_METHOD_PUBLISH:
63 title = _("Published event");
66 title = _("This is an unknown type of calendar item.");
71 wprintf(" %s",title);
76 p = icalcomponent_get_first_property(cal, ICAL_SUMMARY_PROPERTY);
79 wprintf(_("Summary:"));
81 escputs((char *)icalproperty_get_comment(p));
85 p = icalcomponent_get_first_property(cal, ICAL_LOCATION_PROPERTY);
88 wprintf(_("Location:"));
90 escputs((char *)icalproperty_get_comment(p));
95 * Only show start/end times if we're actually looking at the VEVENT
96 * component. Otherwise it shows bogus dates for things like timezone.
98 if (icalcomponent_isa(cal) == ICAL_VEVENT_COMPONENT) {
100 p = icalcomponent_get_first_property(cal,
101 ICAL_DTSTART_PROPERTY);
103 t = icalproperty_get_dtstart(p);
108 memset(&d_tm, 0, sizeof d_tm);
109 d_tm.tm_year = t.year - 1900;
110 d_tm.tm_mon = t.month - 1;
111 d_tm.tm_mday = t.day;
112 wc_strftime(d_str, sizeof d_str, "%x", &d_tm);
115 wprintf("</dt><dd>%s</dd>", d_str);
118 tt = icaltime_as_timet(t);
119 webcit_fmt_date(buf, tt, 0);
121 wprintf(_("Starting date/time:"));
122 wprintf("</dt><dd>%s</dd>", buf);
126 p = icalcomponent_get_first_property(cal, ICAL_DTEND_PROPERTY);
128 t = icalproperty_get_dtend(p);
129 tt = icaltime_as_timet(t);
130 webcit_fmt_date(buf, tt, 0);
132 wprintf(_("Ending date/time:"));
133 wprintf("</dt><dd>%s</dd>", buf);
138 p = icalcomponent_get_first_property(cal, ICAL_DESCRIPTION_PROPERTY);
141 wprintf(_("Description:"));
142 wprintf("</dt><dd>");
143 escputs((char *)icalproperty_get_comment(p));
147 /** If the component has attendees, iterate through them. */
148 for (p = icalcomponent_get_first_property(cal, ICAL_ATTENDEE_PROPERTY);
150 p = icalcomponent_get_next_property(cal, ICAL_ATTENDEE_PROPERTY)) {
152 wprintf(_("Attendee:"));
153 wprintf("</dt><dd>");
154 safestrncpy(buf, icalproperty_get_attendee(p), sizeof buf);
155 if (!strncasecmp(buf, "MAILTO:", 7)) {
157 /** screen name or email address */
158 strcpy(buf, &buf[7]);
163 /** participant status */
164 partstat_as_string(buf, p);
170 /** If the component has subcomponents, recurse through them. */
171 for (c = icalcomponent_get_first_component(cal, ICAL_ANY_COMPONENT);
173 c = icalcomponent_get_next_component(cal, ICAL_ANY_COMPONENT)) {
174 /* Recursively process subcomponent */
175 cal_process_object(c, recursion_level+1, msgnum, cal_partnum);
178 /** If this is a REQUEST, display conflicts and buttons */
179 if (the_method == ICAL_METHOD_REQUEST) {
181 /* Check for conflicts */
182 lprintf(9, "Checking server calendar for conflicts...\n");
183 serv_printf("ICAL conflicts|%ld|%s|", msgnum, cal_partnum);
184 serv_getln(buf, sizeof buf);
186 while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
187 extract_token(conflict_name, buf, 3, '|', sizeof conflict_name);
188 is_update = extract_int(buf, 4);
191 snprintf(conflict_message, sizeof conflict_message,
192 _("This is an update of '%s' which is already in your calendar."), conflict_name);
195 snprintf(conflict_message, sizeof conflict_message,
196 _("This event would conflict with '%s' which is already in your calendar."), conflict_name);
205 wprintf("</dt><dd>");
206 escputs(conflict_message);
210 lprintf(9, "...done.\n");
214 /** Display the Accept/Decline buttons */
215 wprintf("<p id=\"%s_question\">"
217 " <span class=\"button_link\"> "
218 "<a href=\"javascript:RespondToInvitation('%s_question','%s_title','%ld','%s','Accept');\">%s</a>"
219 "</span> <span class=\"button_link\">"
220 "<a href=\"javascript:RespondToInvitation('%s_question','%s_title','%ld','%s','Tentative');\">%s</a>"
221 "</span> <span class=\"button_link\">"
222 "<a href=\"javascript:RespondToInvitation('%s_question','%s_title','%ld','%s','Decline');\">%s</a>"
225 _("How would you like to respond to this invitation?"),
226 divname, divname, msgnum, cal_partnum, _("Accept"),
227 divname, divname, msgnum, cal_partnum, _("Tentative"),
228 divname, divname, msgnum, cal_partnum, _("Decline")
233 /** If this is a REPLY, display update button */
234 if (the_method == ICAL_METHOD_REPLY) {
236 /** \todo In the future, if we want to validate this object before \
237 * continuing, we can do it this way:
238 serv_printf("ICAL whatever|%ld|%s|", msgnum, cal_partnum);
239 serv_getln(buf, sizeof buf);
243 /** Display the update buttons */
244 wprintf("<p id=\"%s_question\" >"
246 " <span class=\"button_link\"> "
247 "<a href=\"javascript:HandleRSVP('%s_question','%s_title','%ld','%s','Update');\">%s</a>"
248 "</span> <span class=\"button_link\">"
249 "<a href=\"javascript:HandleRSVP('%s_question','%s_title','%ld','%s','Ignore');\">%s</a>"
252 _("Click <i>Update</i> to accept this reply and update your calendar."),
253 divname, divname, msgnum, cal_partnum, _("Update"),
254 divname, divname, msgnum, cal_partnum, _("Ignore")
259 /** Trailing HTML for the display of this object */
260 if (recursion_level == 0) {
261 wprintf("<p> </p></div>\n");
267 * \brief process calendar mail atachment
268 * Deserialize a calendar object in a message so it can be processed.
269 * (This is the main entry point for these things)
270 * \param part_source the part of the message we want to parse
271 * \param msgnum number of the mesage in our db
272 * \param cal_partnum the number of the calendar item
274 void cal_process_attachment(char *part_source, long msgnum, char *cal_partnum)
278 cal = icalcomponent_new_from_string(part_source);
281 wprintf(_("There was an error parsing this calendar item."));
287 cal_process_object(cal, 0, msgnum, cal_partnum);
289 /* Free the memory we obtained from libical's constructor */
290 icalcomponent_free(cal);
297 * \brief accept/decline meeting
298 * Respond to a meeting request
300 void respond_to_request(void)
304 begin_ajax_response();
306 serv_printf("ICAL respond|%s|%s|%s|",
311 serv_getln(buf, sizeof buf);
314 wprintf("<img src=\"static/calarea_48x.gif\"><span>");
315 if (!strcasecmp(bstr("sc"), "accept")) {
316 wprintf(_("You have accepted this meeting invitation. "
317 "It has been entered into your calendar.")
319 } else if (!strcasecmp(bstr("sc"), "tentative")) {
320 wprintf(_("You have tentatively accepted this meeting invitation. "
321 "It has been 'pencilled in' to your calendar.")
323 } else if (!strcasecmp(bstr("sc"), "decline")) {
324 wprintf(_("You have declined this meeting invitation. "
325 "It has <b>not</b> been entered into your calendar.")
329 wprintf(_("A reply has been sent to the meeting organizer."));
332 wprintf("<img align=\"center\" src=\"static/error.gif\"><span>");
333 wprintf("%s\n", &buf[4]);
343 * \brief Handle an incoming RSVP
345 void handle_rsvp(void)
349 begin_ajax_response();
351 serv_printf("ICAL handle_rsvp|%s|%s|%s|",
356 serv_getln(buf, sizeof buf);
359 wprintf("<img src=\"static/calarea_48x.gif\"><span>");
360 if (!strcasecmp(bstr("sc"), "update")) {
361 wprintf(_("Your calendar has been updated to reflect this RSVP."));
362 } else if (!strcasecmp(bstr("sc"), "ignore")) {
363 wprintf(_("You have chosen to ignore this RSVP. "
364 "Your calendar has <b>not</b> been updated.")
369 wprintf("<img src=\"static/error.gif\"><span> %s\n", &buf[4]);
379 /*-----------------------------------------------------------------------**/
384 * \defgroup MsgDisplayHandlers Display handlers for message reading
385 * \ingroup Calendaring
390 int Flathash(const char *str, long len)
392 if (len != sizeof (int))
394 else return *(int*)str;
400 * \brief clean up ical memory
401 * todo this could get trouble with future ical versions
403 void delete_cal(void *vCal)
405 disp_cal *Cal = (disp_cal*) vCal;
406 icalcomponent_free(Cal->cal);
412 * \brief get items, keep them.
413 * If we're reading calendar items, just store them for now. We have to
414 * sort and re-output them later when we draw the calendar.
415 * \param cal Our calendar to process
416 * \param msgnum number of the mesage in our db
418 void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unread)
420 icalproperty *ps = NULL;
421 struct icaltimetype t;
422 struct wcsession *WCC = WC;
426 if (WCC->disp_cal_items == NULL)
427 WCC->disp_cal_items = NewHash(0, Flathash);
429 Cal = (disp_cal*) malloc(sizeof(disp_cal));
430 memset(Cal, 0, sizeof(disp_cal));
432 Cal->cal = icalcomponent_new_clone(cal);
433 Cal->unread = unread;
435 Cal->from = (char*)malloc(len+ 1);
436 memcpy(Cal->from, from, len + 1);
437 ical_dezonify(Cal->cal);
438 Cal->cal_msgnum = msgnum;
440 //! Precalculate some Values we can use for easy comparison later.
441 ps = icalcomponent_get_first_property(Cal->cal, ICAL_DTSTART_PROPERTY);
443 t = icalproperty_get_dtstart(ps);
444 Cal->event_start = icaltime_as_timet(t);
446 ps = icalcomponent_get_first_property(Cal->cal, ICAL_DTEND_PROPERTY);
447 if (ps != NULL) { //! Precalc the end day and end day + hour
448 t = icalproperty_get_dtstart(ps);
449 Cal->event_end = icaltime_as_timet(t);
451 Put(WCC->disp_cal_items,
452 (char*) &Cal->event_start,
453 sizeof(Cal->event_start),
462 * Display a task by itself (for editing)
463 * \param supplied_vtodo the todo item we want to edit
464 * \param msgnum number of the mesage in our db
466 void display_edit_individual_task(icalcomponent *supplied_vtodo, long msgnum, char *from, int unread)
468 icalcomponent *vtodo;
470 struct icaltimetype IcalTime;
472 int created_new_vtodo = 0;
473 icalproperty_status todoStatus;
477 if (supplied_vtodo != NULL) {
478 vtodo = supplied_vtodo;
481 * If we're looking at a fully encapsulated VCALENDAR
482 * rather than a VTODO component, attempt to use the first
483 * relevant VTODO subcomponent. If there is none, the
484 * NULL returned by icalcomponent_get_first_component() will
485 * tell the next iteration of this function to create a
488 if (icalcomponent_isa(vtodo) == ICAL_VCALENDAR_COMPONENT) {
489 display_edit_individual_task(
490 icalcomponent_get_first_component(
491 vtodo, ICAL_VTODO_COMPONENT
500 vtodo = icalcomponent_new(ICAL_VTODO_COMPONENT);
501 created_new_vtodo = 1;
504 // TODO: Can we take all this and move it into a template?
505 output_headers(1, 1, 1, 0, 0, 0);
506 wprintf("<!-- start task edit form -->");
507 p = icalcomponent_get_first_property(vtodo, ICAL_SUMMARY_PROPERTY);
508 // Get summary early for title
509 wprintf("<div class=\"box\">\n");
510 wprintf("<div class=\"boxlabel\">");
511 wprintf(_("Edit task"));
514 escputs((char *)icalproperty_get_comment(p));
518 wprintf("<div class=\"boxcontent\">\n");
519 wprintf("<FORM METHOD=\"POST\" action=\"save_task\">\n");
520 wprintf("<div style=\"display: none;\">\n ");
521 wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%ld\">\n", WC->nonce);
522 wprintf("<INPUT TYPE=\"hidden\" NAME=\"msgnum\" VALUE=\"%ld\">\n",
525 wprintf("<table class=\"calendar_background\"><tr><td>");
526 wprintf("<TABLE STYLE=\"border: none;\">\n");
529 wprintf(_("Summary:"));
531 "<INPUT TYPE=\"text\" NAME=\"summary\" "
532 "MAXLENGTH=\"64\" SIZE=\"64\" VALUE=\"");
533 p = icalcomponent_get_first_property(vtodo, ICAL_SUMMARY_PROPERTY);
535 escputs((char *)icalproperty_get_comment(p));
537 wprintf("\"></TD></TR>\n");
540 wprintf(_("Start date:"));
541 wprintf("</TD><TD>");
542 p = icalcomponent_get_first_property(vtodo, ICAL_DTSTART_PROPERTY);
543 wprintf("<INPUT TYPE=\"CHECKBOX\" NAME=\"nodtstart\" ID=\"nodtstart\" VALUE=\"NODTSTART\" ");
545 wprintf("CHECKED=\"CHECKED\"");
548 wprintf(_("No date"));
554 IcalTime = icalproperty_get_dtstart(p);
557 IcalTime = icaltime_current_time_with_zone(get_default_icaltimezone());
558 display_icaltimetype_as_webform(&IcalTime, "dtstart");
559 wprintf("</TD></TR>\n");
562 wprintf(_("Due date:"));
563 wprintf("</TD><TD>");
564 p = icalcomponent_get_first_property(vtodo, ICAL_DUE_PROPERTY);
565 wprintf("<INPUT TYPE=\"CHECKBOX\" NAME=\"nodue\" ID=\"nodue\" VALUE=\"NODUE\"");
567 wprintf("CHECKED=\"CHECKED\"");
570 wprintf(_("No date"));
575 IcalTime = icalproperty_get_due(p);
578 IcalTime = icaltime_current_time_with_zone(get_default_icaltimezone());
579 display_icaltimetype_as_webform(&IcalTime, "due");
581 wprintf("</TD></TR>\n");
582 todoStatus = icalcomponent_get_status(vtodo);
583 wprintf("<TR><TD>\n");
584 wprintf(_("Completed:"));
585 wprintf("</TD><TD>");
586 wprintf("<INPUT TYPE=\"CHECKBOX\" NAME=\"STATUS\" VALUE=\"COMPLETED\"");
587 if (todoStatus == ICAL_STATUS_COMPLETED) {
588 wprintf(" CHECKED=\"CHECKED\"");
591 wprintf("</TD></TR>");
592 // start category field
593 p = icalcomponent_get_first_property(vtodo, ICAL_CATEGORIES_PROPERTY);
595 wprintf(_("Category:"));
596 wprintf("</TD><TD>");
597 wprintf("<INPUT TYPE=\"text\" NAME=\"category\" MAXLENGTH=\"32\" SIZE=\"32\" VALUE=\"");
599 escputs((char *)icalproperty_get_categories(p));
602 wprintf("</TD></TR>\n ");
603 // end category field
605 wprintf(_("Description:"));
606 wprintf("</TD><TD>");
607 wprintf("<TEXTAREA NAME=\"description\" "
608 "ROWS=\"10\" COLS=\"80\">\n"
610 p = icalcomponent_get_first_property(vtodo, ICAL_DESCRIPTION_PROPERTY);
612 escputs((char *)icalproperty_get_comment(p));
614 wprintf("</TEXTAREA></TD></TR></TABLE>\n");
616 wprintf("<SPAN STYLE=\"text-align: center;\">"
617 "<INPUT TYPE=\"submit\" NAME=\"save_button\" VALUE=\"%s\">"
619 "<INPUT TYPE=\"submit\" NAME=\"delete_button\" VALUE=\"%s\">\n"
621 "<INPUT TYPE=\"submit\" NAME=\"cancel_button\" VALUE=\"%s\">\n"
627 wprintf("</td></tr></table>");
628 wprintf("</FORM>\n");
629 wprintf("</div></div></div>\n");
630 wprintf("<!-- end task edit form -->");
633 if (created_new_vtodo) {
634 icalcomponent_free(vtodo);
639 * \brief Save an edited task
640 * \param supplied_vtodo the task to save
641 * \param msgnum number of the mesage in our db
643 void save_individual_task(icalcomponent *supplied_vtodo, long msgnum, char* from, int unread)
646 int delete_existing = 0;
648 icalcomponent *vtodo, *encaps;
649 int created_new_vtodo = 0;
652 struct icaltimetype t;
654 if (supplied_vtodo != NULL) {
655 vtodo = supplied_vtodo;
657 * If we're looking at a fully encapsulated VCALENDAR
658 * rather than a VTODO component, attempt to use the first
659 * relevant VTODO subcomponent. If there is none, the
660 * NULL returned by icalcomponent_get_first_component() will
661 * tell the next iteration of this function to create a
664 if (icalcomponent_isa(vtodo) == ICAL_VCALENDAR_COMPONENT) {
665 save_individual_task(
666 icalcomponent_get_first_component(
667 vtodo, ICAL_VTODO_COMPONENT),
674 vtodo = icalcomponent_new(ICAL_VTODO_COMPONENT);
675 created_new_vtodo = 1;
678 if (havebstr("save_button")) {
680 /** Replace values in the component with ones from the form */
682 while (prop = icalcomponent_get_first_property(vtodo,
683 ICAL_SUMMARY_PROPERTY), prop != NULL) {
684 icalcomponent_remove_property(vtodo, prop);
685 icalproperty_free(prop);
687 if (havebstr("summary")) {
689 icalcomponent_add_property(vtodo,
690 icalproperty_new_summary(bstr("summary")));
692 icalcomponent_add_property(vtodo,
693 icalproperty_new_summary("Untitled Task"));
696 while (prop = icalcomponent_get_first_property(vtodo,
697 ICAL_DESCRIPTION_PROPERTY), prop != NULL) {
698 icalcomponent_remove_property(vtodo, prop);
699 icalproperty_free(prop);
701 if (!IsEmptyStr(bstr("description"))) {
702 icalcomponent_add_property(vtodo,
703 icalproperty_new_description(bstr("description")));
706 while (prop = icalcomponent_get_first_property(vtodo,
707 ICAL_DTSTART_PROPERTY), prop != NULL) {
708 icalcomponent_remove_property(vtodo, prop);
709 icalproperty_free(prop);
711 if (IsEmptyStr(bstr("nodtstart"))) {
712 icaltime_from_webform(&t, "dtstart");
713 icalcomponent_add_property(vtodo,
714 icalproperty_new_dtstart(t)
717 while(prop = icalcomponent_get_first_property(vtodo,
718 ICAL_STATUS_PROPERTY), prop != NULL) {
719 icalcomponent_remove_property(vtodo,prop);
720 icalproperty_free(prop);
722 if (!IsEmptyStr(bstr("status"))) {
723 icalproperty_status taskStatus = icalproperty_string_to_status(
725 icalcomponent_set_status(vtodo, taskStatus);
727 while (prop = icalcomponent_get_first_property(vtodo,
728 ICAL_CATEGORIES_PROPERTY), prop != NULL) {
729 icalcomponent_remove_property(vtodo,prop);
730 icalproperty_free(prop);
732 if (!IsEmptyStr(bstr("category"))) {
733 prop = icalproperty_new_categories(bstr("category"));
734 icalcomponent_add_property(vtodo,prop);
736 while (prop = icalcomponent_get_first_property(vtodo,
737 ICAL_DUE_PROPERTY), prop != NULL) {
738 icalcomponent_remove_property(vtodo, prop);
739 icalproperty_free(prop);
741 if (IsEmptyStr(bstr("nodue"))) {
742 icaltime_from_webform(&t, "due");
743 icalcomponent_add_property(vtodo,
744 icalproperty_new_due(t)
747 /** Give this task a UID if it doesn't have one. */
748 lprintf(9, "Give this task a UID if it doesn't have one.\n");
749 if (icalcomponent_get_first_property(vtodo,
750 ICAL_UID_PROPERTY) == NULL) {
752 icalcomponent_add_property(vtodo,
753 icalproperty_new_uid(buf)
757 /** Increment the sequence ID */
758 lprintf(9, "Increment the sequence ID\n");
759 while (prop = icalcomponent_get_first_property(vtodo,
760 ICAL_SEQUENCE_PROPERTY), (prop != NULL) ) {
761 i = icalproperty_get_sequence(prop);
762 lprintf(9, "Sequence was %d\n", i);
763 if (i > sequence) sequence = i;
764 icalcomponent_remove_property(vtodo, prop);
765 icalproperty_free(prop);
768 lprintf(9, "New sequence is %d. Adding...\n", sequence);
769 icalcomponent_add_property(vtodo,
770 icalproperty_new_sequence(sequence)
774 * Encapsulate event into full VCALENDAR component. Clone it first,
775 * for two reasons: one, it's easier to just free the whole thing
776 * when we're done instead of unbundling, but more importantly, we
777 * can't encapsulate something that may already be encapsulated
780 lprintf(9, "Encapsulating into a full VCALENDAR component\n");
781 encaps = ical_encapsulate_subcomponent(icalcomponent_new_clone(vtodo));
783 /* Serialize it and save it to the message base */
784 serv_puts("ENT0 1|||4");
785 serv_getln(buf, sizeof buf);
787 serv_puts("Content-type: text/calendar");
789 serv_puts(icalcomponent_as_ical_string(encaps));
793 * Probably not necessary; the server will see the UID
794 * of the object and delete the old one anyway, but
799 icalcomponent_free(encaps);
803 * If the user clicked 'Delete' then explicitly delete the message.
805 if (havebstr("delete_button")) {
809 if ( (delete_existing) && (msgnum > 0L) ) {
810 serv_printf("DELE %ld", lbstr("msgnum"));
811 serv_getln(buf, sizeof buf);
814 if (created_new_vtodo) {
815 icalcomponent_free(vtodo);
818 /** Go back to the task list */
825 * \brief generic item handler
826 * Code common to all display handlers. Given a message number and a MIME
827 * type, we load the message and hunt for that MIME type. If found, we load
828 * the relevant part, deserialize it into a libical component, filter it for
829 * the requested object type, and feed it to the specified handler.
830 * \param mimetype mimetyp of our object
831 * \param which_kind sort of ical type
832 * \param msgnum number of the mesage in our db
833 * \param callback a funcion \todo
836 void display_using_handler(long msgnum, int unread,
837 icalcomponent_kind which_kind,
838 void (*callback)(icalcomponent *, long, char*, int)
843 char mime_partnum[256];
844 char mime_filename[256];
845 char mime_content_type[256];
846 char mime_disposition[256];
848 char relevant_partnum[256];
849 char *relevant_source = NULL;
850 icalcomponent *cal, *c;
852 relevant_partnum[0] = '\0';
853 sprintf(buf, "MSG4 %ld", msgnum); /* we need the mime headers */
855 serv_getln(buf, sizeof buf);
856 if (buf[0] != '1') return;
858 while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
859 if (!strncasecmp(buf, "part=", 5)) {
860 extract_token(mime_filename, &buf[5], 1, '|', sizeof mime_filename);
861 extract_token(mime_partnum, &buf[5], 2, '|', sizeof mime_partnum);
862 extract_token(mime_disposition, &buf[5], 3, '|', sizeof mime_disposition);
863 extract_token(mime_content_type, &buf[5], 4, '|', sizeof mime_content_type);
864 mime_length = extract_int(&buf[5], 5);
866 if ( (!strcasecmp(mime_content_type, "text/calendar"))
867 || (!strcasecmp(mime_content_type, "application/ics"))
868 || (!strcasecmp(mime_content_type, "text/vtodo"))
870 strcpy(relevant_partnum, mime_partnum);
873 else if (!strncasecmp(buf, "from=", 4)) {
874 extract_token(from, buf, 1, '=', sizeof(from));
878 if (!IsEmptyStr(relevant_partnum)) {
879 relevant_source = load_mimepart(msgnum, relevant_partnum);
880 if (relevant_source != NULL) {
882 cal = icalcomponent_new_from_string(relevant_source);
887 /** Simple components of desired type */
888 if (icalcomponent_isa(cal) == which_kind) {
889 callback(cal, msgnum, from, unread);
892 /** Subcomponents of desired type */
893 for (c = icalcomponent_get_first_component(cal,
896 c = icalcomponent_get_next_component(cal,
898 callback(c, msgnum, from, unread);
900 icalcomponent_free(cal);
902 free(relevant_source);
905 icalmemory_free_ring();
909 * \brief display whole calendar
910 * \param msgnum number of the mesage in our db
912 void display_calendar(long msgnum, int unread) {
913 display_using_handler(msgnum, unread,
914 ICAL_VEVENT_COMPONENT,
915 display_individual_cal);
919 * \brief display whole taksview
920 * \param msgnum number of the mesage in our db
922 void display_task(long msgnum, int unread) {
923 display_using_handler(msgnum, unread,
924 ICAL_VTODO_COMPONENT,
925 display_individual_cal);
929 * \brief display the editor component for a task
931 void display_edit_task(void) {
934 /** Force change the room if we have to */
935 if (havebstr("taskrm")) {
936 gotoroom((char *)bstr("taskrm"));
939 msgnum = lbstr("msgnum");
942 display_using_handler(msgnum, 0,
943 ICAL_VTODO_COMPONENT,
944 display_edit_individual_task);
948 display_edit_individual_task(NULL, 0L, "", 0);
953 *\brief save an edited task
955 void save_task(void) {
958 msgnum = lbstr("msgnum");
960 display_using_handler(msgnum, 0,
961 ICAL_VTODO_COMPONENT,
962 save_individual_task);
965 save_individual_task(NULL, 0L, "", 0);
970 * \brief display the editor component for an event
972 void display_edit_event(void) {
975 msgnum = lbstr("msgnum");
978 display_using_handler(msgnum, 0,
979 ICAL_VEVENT_COMPONENT,
980 display_edit_individual_event);
984 display_edit_individual_event(NULL, 0L, "", 0);
989 * \brief save an edited event
991 void save_event(void) {
994 msgnum = lbstr("msgnum");
997 display_using_handler(msgnum, 0,
998 ICAL_VEVENT_COMPONENT,
999 save_individual_event);
1002 save_individual_event(NULL, 0L, "", 0);
1011 * \brief freebusy display (for client software)
1012 * \param req dunno. ?????
1014 void do_freebusy(char *req) {
1020 extract_token(who, req, 1, ' ', sizeof who);
1021 if (!strncasecmp(who, "/freebusy/", 10)) {
1022 strcpy(who, &who[10]);
1024 unescape_input(who);
1027 if ( (!strcasecmp(&who[len-4], ".vcf"))
1028 || (!strcasecmp(&who[len-4], ".ifb"))
1029 || (!strcasecmp(&who[len-4], ".vfb")) ) {
1033 lprintf(9, "freebusy requested for <%s>\n", who);
1034 serv_printf("ICAL freebusy|%s", who);
1035 serv_getln(buf, sizeof buf);
1037 if (buf[0] != '1') {
1038 wprintf("HTTP/1.1 404 %s\n", &buf[4]);
1039 output_headers(0, 0, 0, 0, 0, 0);
1040 wprintf("Content-Type: text/plain\r\n");
1042 wprintf("%s\n", &buf[4]);
1046 fb = read_server_text();
1047 http_transmit_thing(fb, strlen(fb), "text/calendar", 0);