X-Git-Url: https://code.citadel.org/?a=blobdiff_plain;f=webcit%2Fcalendar.c;h=abb731a537a2f1b7a16219570b37f141ea19ce6c;hb=HEAD;hp=7208760215c994c03f9072542f0dd88c4b6a5ff3;hpb=3e14f31738c6a9ede5f026b6de43bcd21197a06d;p=citadel.git diff --git a/webcit/calendar.c b/webcit/calendar.c index 720876021..b1da61c41 100644 --- a/webcit/calendar.c +++ b/webcit/calendar.c @@ -1,21 +1,25 @@ -/* - * $Id$ - * - * Functions which handle calendar objects and their processing/display. - */ +// Functions which handle calendar objects and their processing/display. +// +// Copyright (c) 1996-2022 by the citadel.org team +// +// This program is open source software. You can redistribute it and/or +// modify it under the terms of the GNU General Public License, version 3. +// +// This program is distributed in the hope that it will be useful, +// but WITHOUT ANY WARRANTY; without even the implied warranty of +// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +// GNU General Public License for more details. #include "webcit.h" -#include "webserver.h" +#include "calendar.h" -/* - * Process a calendar object. At this point it's already been deserialized by cal_process_attachment() - * - * cal: the calendar object - * recursion_level: Number of times we've recursed into this function - * msgnum: Message number on the Citadel server - * cal_partnum: MIME part number within that message containing the calendar object - */ +// Process a calendar object. At this point it's already been deserialized by cal_process_attachment() +// +// cal: the calendar object +// recursion_level: Number of times we've recursed into this function +// msgnum: Message number on the Citadel server +// cal_partnum: MIME part number within that message containing the calendar object void cal_process_object(StrBuf *Target, icalcomponent *cal, int recursion_level, @@ -34,33 +38,33 @@ void cal_process_object(StrBuf *Target, int is_update = 0; char divname[32]; static int divcount = 0; + const char *ch; sprintf(divname, "rsvp%04x", ++divcount); - /* Convert timezones to something easy to display. - * It's safe to do this in memory because we're only changing it on the - * display side -- when we tell the server to do something with the object, - * the server will be working with its original copy in the database. - */ + // Convert timezones to something easy to display. + // It's safe to do this in memory because we're only changing it on the + // display side -- when we tell the server to do something with the object, + // the server will be working with its original copy in the database. if ((cal) && (recursion_level == 0)) { ical_dezonify(cal); } - /* Leading HTML for the display of this object */ + // Leading HTML for the display of this object if (recursion_level == 0) { StrBufAppendPrintf(Target, "
\n"); } - /* Look for a method */ + // Look for a method method = icalcomponent_get_first_property(cal, ICAL_METHOD_PROPERTY); - /* See what we need to do with this */ + // See what we need to do with this if (method != NULL) { char *title; the_method = icalproperty_get_method(method); StrBufAppendPrintf(Target, "
", divname); - StrBufAppendPrintf(Target, ""); + StrBufAppendPrintf(Target, ""); StrBufAppendPrintf(Target, ""); switch(the_method) { case ICAL_METHOD_REQUEST: @@ -101,10 +105,8 @@ void cal_process_object(StrBuf *Target, StrBufAppendPrintf(Target, "\n"); } - /* - * Only show start/end times if we're actually looking at the VEVENT - * component. Otherwise it shows bogus dates for things like timezone. - */ + // Only show start/end times if we're actually looking at the VEVENT + // component. Otherwise it shows bogus dates for things like timezone. if (icalcomponent_isa(cal) == ICAL_VEVENT_COMPONENT) { p = icalcomponent_get_first_property(cal, ICAL_DTSTART_PROPERTY); @@ -125,7 +127,7 @@ void cal_process_object(StrBuf *Target, } else { tt = icaltime_as_timet(t); - webcit_fmt_date(buf, tt, DATEFMT_FULL); + webcit_fmt_date(buf, 256, tt, DATEFMT_FULL); StrBufAppendPrintf(Target, "
"); StrBufAppendPrintf(Target, _("Starting date/time:")); StrBufAppendPrintf(Target, "
%s
", buf); @@ -136,7 +138,7 @@ void cal_process_object(StrBuf *Target, if (p != NULL) { t = icalproperty_get_dtend(p); tt = icaltime_as_timet(t); - webcit_fmt_date(buf, tt, DATEFMT_FULL); + webcit_fmt_date(buf, 256, tt, DATEFMT_FULL); StrBufAppendPrintf(Target, "
"); StrBufAppendPrintf(Target, _("Ending date/time:")); StrBufAppendPrintf(Target, "
%s
", buf); @@ -154,49 +156,50 @@ void cal_process_object(StrBuf *Target, } if (icalcomponent_get_first_property(cal, ICAL_RRULE_PROPERTY)) { - /* Unusual string syntax used here in order to re-use existing translations */ + // Unusual string syntax used here in order to re-use existing translations StrBufAppendPrintf(Target, "
%s:
%s.
\n", _("Recurrence"), _("This is a recurring event") ); } - /* If the component has attendees, iterate through them. */ + // 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)) { StrBufAppendPrintf(Target, "
"); StrBufAppendPrintf(Target, _("Attendee:")); StrBufAppendPrintf(Target, "
"); - safestrncpy(buf, icalproperty_get_attendee(p), sizeof buf); - if (!strncasecmp(buf, "MAILTO:", 7)) { + ch = icalproperty_get_attendee(p); + if ((ch != NULL) && !strncasecmp(ch, "MAILTO:", 7)) { - /** screen name or email address */ - strcpy(buf, &buf[7]); - striplt(buf); + // screen name or email address + safestrncpy(buf, ch + 7, sizeof(buf)); + string_trim(buf); StrEscAppend(Target, NULL, buf, 0, 0); StrBufAppendPrintf(Target, " "); - /** participant status */ + // participant status partstat_as_string(buf, p); StrEscAppend(Target, NULL, buf, 0, 0); } StrBufAppendPrintf(Target, "
\n"); } - /* If the component has subcomponents, recurse through them. */ + // 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 */ + (c != 0); + c = icalcomponent_get_next_component(cal, ICAL_ANY_COMPONENT) + ) { + // Recursively process subcomponent cal_process_object(Target, c, recursion_level+1, msgnum, cal_partnum); } - /* If this is a REQUEST, display conflicts and buttons */ + // If this is a REQUEST, display conflicts and buttons if (the_method == ICAL_METHOD_REQUEST) { - /* Check for conflicts */ - lprintf(9, "Checking server calendar for conflicts...\n"); + // Check for conflicts + syslog(LOG_DEBUG, "Checking server calendar for conflicts..."); serv_printf("ICAL conflicts|%ld|%s|", msgnum, cal_partnum); serv_getln(buf, sizeof buf); if (buf[0] == '1') { @@ -224,11 +227,11 @@ void cal_process_object(StrBuf *Target, StrBufAppendPrintf(Target, "\n"); } } - lprintf(9, "...done.\n"); + syslog(LOG_DEBUG, "...done.\n"); StrBufAppendPrintf(Target, ""); - /* Display the Accept/Decline buttons */ + // Display the Accept/Decline buttons StrBufAppendPrintf(Target, "

" "%s " "    " @@ -247,10 +250,10 @@ void cal_process_object(StrBuf *Target, } - /* If this is a REPLY, display update button */ + // If this is a REPLY, display update button if (the_method == ICAL_METHOD_REPLY) { - /* Display the update buttons */ + // Display the update buttons StrBufAppendPrintf(Target, "

" "%s " "    " @@ -266,44 +269,34 @@ void cal_process_object(StrBuf *Target, } - /* Trailing HTML for the display of this object */ + // Trailing HTML for the display of this object if (recursion_level == 0) { StrBufAppendPrintf(Target, "

 

\n"); } } -/* - * Deserialize a calendar object in a message so it can be displayed. - * - */ -void cal_process_attachment(wc_mime_attachment *Mime) -{ +// Deserialize a calendar object in a message so it can be displayed. +void cal_process_attachment(wc_mime_attachment *Mime) { icalcomponent *cal; cal = icalcomponent_new_from_string(ChrPtr(Mime->Data)); FlushStrBuf(Mime->Data); if (cal == NULL) { StrBufAppendPrintf(Mime->Data, _("There was an error parsing this calendar item.")); - StrBufAppendPrintf(Mime->Data, "
\n"); + StrBufAppendPrintf(Mime->Data, "
\n"); return; } cal_process_object(Mime->Data, cal, 0, Mime->msgnum, ChrPtr(Mime->PartNum)); - /* Free the memory we obtained from libical's constructor */ + // Free the memory we obtained from libical's constructor icalcomponent_free(cal); } - - -/** - * \brief accept/decline meeting - * Respond to a meeting request - */ -void respond_to_request(void) -{ +// Respond to a meeting request - accept/decline meeting +void respond_to_request(void) { char buf[1024]; begin_ajax_response(); @@ -316,39 +309,37 @@ void respond_to_request(void) serv_getln(buf, sizeof buf); if (buf[0] == '2') { - wprintf(""); + wc_printf(""); if (!strcasecmp(bstr("sc"), "accept")) { - wprintf(_("You have accepted this meeting invitation. " + wc_printf(_("You have accepted this meeting invitation. " "It has been entered into your calendar.") ); - } else if (!strcasecmp(bstr("sc"), "tentative")) { - wprintf(_("You have tentatively accepted this meeting invitation. " + } + else if (!strcasecmp(bstr("sc"), "tentative")) { + wc_printf(_("You have tentatively accepted this meeting invitation. " "It has been 'pencilled in' to your calendar.") ); - } else if (!strcasecmp(bstr("sc"), "decline")) { - wprintf(_("You have declined this meeting invitation. " + } + else if (!strcasecmp(bstr("sc"), "decline")) { + wc_printf(_("You have declined this meeting invitation. " "It has not been entered into your calendar.") ); } - wprintf(" "); - wprintf(_("A reply has been sent to the meeting organizer.")); - wprintf(""); - } else { - wprintf(""); - wprintf("%s\n", &buf[4]); - wprintf(""); + wc_printf(" "); + wc_printf(_("A reply has been sent to the meeting organizer.")); + wc_printf(""); + } + else { + wc_printf(""); + wc_printf("%s\n", &buf[4]); + wc_printf(""); } - end_ajax_response(); } - -/** - * \brief Handle an incoming RSVP - */ -void handle_rsvp(void) -{ +// Handle an incoming RSVP +void handle_rsvp(void) { char buf[1024]; begin_ajax_response(); @@ -361,45 +352,43 @@ void handle_rsvp(void) serv_getln(buf, sizeof buf); if (buf[0] == '2') { - wprintf(""); + wc_printf(""); if (!strcasecmp(bstr("sc"), "update")) { - wprintf(_("Your calendar has been updated to reflect this RSVP.")); - } else if (!strcasecmp(bstr("sc"), "ignore")) { - wprintf(_("You have chosen to ignore this RSVP. " + // Translators: RSVP aka Répondez s'il-vous-plaît is the term + // that the recipient of an ical-invitation should please + // answer this request. + wc_printf(_("Your calendar has been updated to reflect this RSVP.")); + } + else if (!strcasecmp(bstr("sc"), "ignore")) { + wc_printf(_("You have chosen to ignore this RSVP. " "Your calendar has not been updated.") - ); + ); } - wprintf(""); - } else { - wprintf(" %s\n", &buf[4]); - wprintf(""); + wc_printf(""); + } + else { + wc_printf(" %s\n", &buf[4]); + wc_printf(""); } end_ajax_response(); } - - -/* - * free memory allocated using libical - */ -void delete_cal(void *vCal) -{ +// free memory allocated using libical +void delete_cal(void *vCal) { disp_cal *Cal = (disp_cal*) vCal; icalcomponent_free(Cal->cal); free(Cal->from); free(Cal); } -/* - * This is the meat-and-bones of the first part of our two-phase calendar display. - * As we encounter calendar items in messages being read from the server, we break out - * any iCalendar objects and store them in a hash table. Later on, the second phase will - * use this hash table to render the calendar for display. - */ -void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unread, struct calview *calv) -{ + +// This is the meat-and-bones of the first part of our two-phase calendar display. +// As we encounter calendar items in messages being read from the server, we break out +// any iCalendar objects and store them in a hash table. Later on, the second phase will +// use this hash table to render the calendar for display. +void display_individual_cal(icalcomponent *event, long msgnum, char *from, int unread, calview *calv) { icalproperty *ps = NULL; struct icaltimetype dtstart, dtend; struct icaldurationtype dur; @@ -409,7 +398,7 @@ void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unr time_t final_recurrence = 0; icalcomponent *cptr = NULL; - /* recur variables */ + // recur variables icalproperty *rrule = NULL; struct icalrecurrencetype recur; icalrecur_iterator *ritr = NULL; @@ -417,22 +406,28 @@ void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unr int num_recur = 0; int stop_rr = 0; + // first and foremost, check for bogosity. bail if we see no DTSTART property + if (icalcomponent_get_first_property(icalcomponent_get_first_component( + event, ICAL_VEVENT_COMPONENT), ICAL_DTSTART_PROPERTY) == NULL + ) { + return; + } + + // ok, chances are we've got a live one here. let's try to figure out where it goes. + dtstart = icaltime_null_time(); dtend = icaltime_null_time(); - if (WCC->disp_cal_items == NULL) + if (WCC->disp_cal_items == NULL) { WCC->disp_cal_items = NewHash(0, Flathash); + } - /* Note: anything we do here, we also have to do below for the recurrences. */ + // Note: anything we do here, we also have to do below for the recurrences. Cal = (disp_cal*) malloc(sizeof(disp_cal)); memset(Cal, 0, sizeof(disp_cal)); - Cal->cal = icalcomponent_new_clone(cal); + Cal->cal = icalcomponent_new_clone(event); - /* Dezonify and decapsulate at the very last moment */ - /* lprintf(9, "INITIAL: %s\n", icaltime_as_ical_string(icalproperty_get_dtstart( - icalcomponent_get_first_property(icalcomponent_get_first_component( - Cal->cal, ICAL_VEVENT_COMPONENT), ICAL_DTSTART_PROPERTY))) - ); */ + // Dezonify and decapsulate at the very last moment ical_dezonify(Cal->cal); if (icalcomponent_isa(Cal->cal) != ICAL_VEVENT_COMPONENT) { cptr = icalcomponent_get_first_component(Cal->cal, ICAL_VEVENT_COMPONENT); @@ -449,44 +444,43 @@ void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unr memcpy(Cal->from, from, len + 1); Cal->cal_msgnum = msgnum; - /* Precalculate the starting date and time of this event, and store it in our top-level - * structure. Later, when we are rendering the calendar, we can just peek at these values - * without having to break apart every calendar item. - */ + // Precalculate the starting date and time of this event, and store it in our top-level + // structure. Later, when we are rendering the calendar, we can just peek at these values + // without having to break apart every calendar item. ps = icalcomponent_get_first_property(Cal->cal, ICAL_DTSTART_PROPERTY); if (ps != NULL) { dtstart = icalproperty_get_dtstart(ps); Cal->event_start = icaltime_as_timet(dtstart); } - /* Do the same for the ending date and time. It makes the day view much easier to render. */ + // Do the same for the ending date and time. It makes the day view much easier to render. ps = icalcomponent_get_first_property(Cal->cal, ICAL_DTEND_PROPERTY); if (ps != NULL) { dtend = icalproperty_get_dtend(ps); Cal->event_end = icaltime_as_timet(dtend); } - /* Store it in the hash list. */ - Put(WCC->disp_cal_items, - (char*) &Cal->event_start, - sizeof(Cal->event_start), - Cal, - delete_cal); + // Store it in the hash list. + // syslog(LOG_DEBUG, "INITIAL: %s", ctime(&Cal->event_start)); + Put(WCC->disp_cal_items, (char*) &Cal->event_start, sizeof(Cal->event_start), Cal, delete_cal); - /****************************** handle recurring events ******************************/ + //***************************** handle recurring events ****************************** if (icaltime_is_null_time(dtstart)) return; /* Can't recur without a start time */ if (!icaltime_is_null_time(dtend)) { /* Need duration for recurrences */ dur = icaltime_subtract(dtend, dtstart); } + else { + dur = icaltime_subtract(dtstart, dtstart); + } /* * Just let libical iterate the recurrence, and keep looping back to the top of this function, * adding new hash entries that all point back to the same msgnum, until either the iteration * stops or some outer bound is reached. The display code will automatically do the Right Thing. */ - cptr = cal; + cptr = event; if (icalcomponent_isa(cptr) != ICAL_VEVENT_COMPONENT) { cptr = icalcomponent_get_first_component(cptr, ICAL_VEVENT_COMPONENT); } @@ -504,12 +498,11 @@ void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unr ++num_recur; if (num_recur > 1) { /* Skip the first one. We already did it at the root. */ icalcomponent *cptr; - /* lprintf(9, "REPEATS: %s\n", icaltime_as_ical_string(next)); */ /* Note: anything we do here, we also have to do above for the root event. */ Cal = (disp_cal*) malloc(sizeof(disp_cal)); memset(Cal, 0, sizeof(disp_cal)); - Cal->cal = icalcomponent_new_clone(cal); + Cal->cal = icalcomponent_new_clone(event); Cal->unread = unread; len = strlen(from); Cal->from = (char*)malloc(len+ 1); @@ -523,27 +516,27 @@ void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unr cptr = icalcomponent_get_first_component(Cal->cal, ICAL_VEVENT_COMPONENT); } if (cptr) { - ps = icalcomponent_get_first_property(cptr, ICAL_DTSTART_PROPERTY); - if (ps != NULL) { + + /* Remove any existing DTSTART properties */ + while (ps = icalcomponent_get_first_property(cptr, ICAL_DTSTART_PROPERTY), ps != NULL) { icalcomponent_remove_property(cptr, ps); - ps = icalproperty_new_dtstart(next); - icalcomponent_add_property(cptr, ps); - - Cal->event_start = icaltime_as_timet(next); - final_recurrence = Cal->event_start; } - ps = icalcomponent_get_first_property(cptr, ICAL_DTEND_PROPERTY); - if (ps != NULL) { + /* Add our shiny new DTSTART property from the iteration */ + ps = icalproperty_new_dtstart(next); + icalcomponent_add_property(cptr, ps); + Cal->event_start = icaltime_as_timet(next); + final_recurrence = Cal->event_start; + + /* Remove any existing DTEND properties */ + while (ps = icalcomponent_get_first_property(cptr, ICAL_DTEND_PROPERTY), (ps != NULL)) { icalcomponent_remove_property(cptr, ps); - - /* Make a new dtend */ - ps = icalproperty_new_dtend(icaltime_add(next, dur)); - - /* and stick it somewhere */ - icalcomponent_add_property(cptr, ps); } + /* Add our shiny new DTEND property from the iteration */ + ps = icalproperty_new_dtend(icaltime_add(next, dur)); + icalcomponent_add_property(cptr, ps); + } /* Dezonify and decapsulate at the very last moment */ @@ -557,8 +550,10 @@ void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unr } } - if ( (Cal->event_start > calv->lower_bound) - && (Cal->event_start < calv->upper_bound) ) { + if ( (Cal->event_start > calv->lower_bound) + && (Cal->event_start < calv->upper_bound) + ) { + /* syslog(LOG_DEBUG, "REPEATS: %s", ctime(&Cal->event_start)); */ Put(WCC->disp_cal_items, (char*) &Cal->event_start, sizeof(Cal->event_start), @@ -575,590 +570,212 @@ void display_individual_cal(icalcomponent *cal, long msgnum, char *from, int unr } } icalrecur_iterator_free(ritr); - /* lprintf(9, "Performed %d recurrences; final one is %s", num_recur, ctime(&final_recurrence)); */ - + /* syslog(LOG_DEBUG, "Performed %d recurrences; final one is %s", num_recur, ctime(&final_recurrence)); */ } +void process_ical_object(long msgnum, int unread, + char *from, + char *FlatIcal, + icalcomponent_kind which_kind, + IcalCallbackFunc CallBack, + calview *calv +) { + icalcomponent *cal, *c; -/* - * Display a task by itself (for editing) - */ -void display_edit_individual_task(icalcomponent *supplied_vtodo, long msgnum, char *from, - int unread, struct calview *calv) -{ - icalcomponent *vtodo; - icalproperty *p; - struct icaltimetype IcalTime; - time_t now; - int created_new_vtodo = 0; - icalproperty_status todoStatus; - - now = time(NULL); - - if (supplied_vtodo != NULL) { - vtodo = supplied_vtodo; - - /* - * It's safe to convert to UTC here because there are no recurrences to worry about. - */ - ical_dezonify(vtodo); - - /* - * If we're looking at a fully encapsulated VCALENDAR - * rather than a VTODO component, attempt to use the first - * relevant VTODO subcomponent. If there is none, the - * NULL returned by icalcomponent_get_first_component() will - * tell the next iteration of this function to create a - * new one. - */ - if (icalcomponent_isa(vtodo) == ICAL_VCALENDAR_COMPONENT) { - display_edit_individual_task( - icalcomponent_get_first_component( - vtodo, ICAL_VTODO_COMPONENT - ), - msgnum, from, unread, calv - ); - return; - } - } - else { - vtodo = icalcomponent_new(ICAL_VTODO_COMPONENT); - created_new_vtodo = 1; - } - - /*/ TODO: Can we take all this and move it into a template? */ - output_headers(1, 1, 1, 0, 0, 0); - wprintf(""); - p = icalcomponent_get_first_property(vtodo, ICAL_SUMMARY_PROPERTY); - /* Get summary early for title */ - wprintf("
\n"); - wprintf("
"); - wprintf(_("Edit task")); - wprintf("- "); - if (p != NULL) { - escputs((char *)icalproperty_get_comment(p)); - } - wprintf("
"); - - wprintf("
\n"); - wprintf("
\n"); - wprintf("
\n "); - wprintf("\n", WC->nonce); - wprintf("\n", msgnum); - wprintf("\n", - ibstr("return_to_summary")); - wprintf("
"); - wprintf("
"); - wprintf("\n"); - - wprintf("\n"); - - wprintf("\n"); - - wprintf("\n"); - todoStatus = icalcomponent_get_status(vtodo); - wprintf(""); - /* start category field */ - p = icalcomponent_get_first_property(vtodo, ICAL_CATEGORIES_PROPERTY); - wprintf("\n "); - /* end category field */ - wprintf("
"); - wprintf(_("Summary:")); - wprintf("" - "
"); - wprintf(_("Start date:")); - wprintf(""); - p = icalcomponent_get_first_property(vtodo, ICAL_DTSTART_PROPERTY); - wprintf(""); - wprintf(_("No date")); - - wprintf(" "); - wprintf(_("or")); - wprintf(" "); - if (p != NULL) { - IcalTime = icalproperty_get_dtstart(p); - } - else - IcalTime = icaltime_current_time_with_zone(get_default_icaltimezone()); - display_icaltimetype_as_webform(&IcalTime, "dtstart", 0); - - wprintf(""); - wprintf(_("Time associated")); - wprintf("
"); - wprintf(_("Due date:")); - wprintf(""); - p = icalcomponent_get_first_property(vtodo, ICAL_DUE_PROPERTY); - wprintf(""); - wprintf(_("No date")); - wprintf(" "); - wprintf(_("or")); - wprintf(" "); - if (p != NULL) { - IcalTime = icalproperty_get_due(p); - } - else - IcalTime = icaltime_current_time_with_zone(get_default_icaltimezone()); - display_icaltimetype_as_webform(&IcalTime, "due", 0); - - wprintf(""); - wprintf(_("Time associated")); - wprintf("
\n"); - wprintf(_("Completed:")); - wprintf(""); - wprintf(""); - wprintf("
"); - wprintf(_("Category:")); - wprintf(""); - wprintf(""); - wprintf("
"); - wprintf(_("Description:")); - wprintf(""); - wprintf("
\n"); - - wprintf("" - "" - "  " - "\n" - "  " - "\n" - "\n", - _("Save"), - _("Delete"), - _("Cancel") - ); - wprintf("
"); - wprintf("
\n"); - wprintf("
\n"); - wprintf(""); - wDumpContent(1); - - if (created_new_vtodo) { - icalcomponent_free(vtodo); - } -} - -/* - * \brief Save an edited task - * \param supplied_vtodo the task to save - * \param msgnum number of the mesage in our db - */ -void save_individual_task(icalcomponent *supplied_vtodo, long msgnum, char* from, int unread, - struct calview *calv) -{ - char buf[SIZ]; - int delete_existing = 0; - icalproperty *prop; - icalcomponent *vtodo, *encaps; - int created_new_vtodo = 0; - int i; - int sequence = 0; - struct icaltimetype t; - - if (supplied_vtodo != NULL) { - vtodo = supplied_vtodo; - /** - * If we're looking at a fully encapsulated VCALENDAR - * rather than a VTODO component, attempt to use the first - * relevant VTODO subcomponent. If there is none, the - * NULL returned by icalcomponent_get_first_component() will - * tell the next iteration of this function to create a - * new one. - */ - if (icalcomponent_isa(vtodo) == ICAL_VCALENDAR_COMPONENT) { - save_individual_task( - icalcomponent_get_first_component( - vtodo, ICAL_VTODO_COMPONENT), - msgnum, from, unread, calv - ); - return; - } - } - else { - vtodo = icalcomponent_new(ICAL_VTODO_COMPONENT); - created_new_vtodo = 1; - } - - if (havebstr("save_button")) { - - /** Replace values in the component with ones from the form */ - - while (prop = icalcomponent_get_first_property(vtodo, - ICAL_SUMMARY_PROPERTY), prop != NULL) { - icalcomponent_remove_property(vtodo, prop); - icalproperty_free(prop); - } - if (havebstr("summary")) { + cal = icalcomponent_new_from_string(FlatIcal); + if (cal != NULL) { - icalcomponent_add_property(vtodo, - icalproperty_new_summary(bstr("summary"))); - } else { - icalcomponent_add_property(vtodo, - icalproperty_new_summary(_("Untitled Task"))); - } - - while (prop = icalcomponent_get_first_property(vtodo, - ICAL_DESCRIPTION_PROPERTY), prop != NULL) { - icalcomponent_remove_property(vtodo, prop); - icalproperty_free(prop); - } - if (havebstr("description")) { - icalcomponent_add_property(vtodo, - icalproperty_new_description(bstr("description"))); - } - - while (prop = icalcomponent_get_first_property(vtodo, - ICAL_DTSTART_PROPERTY), prop != NULL) { - icalcomponent_remove_property(vtodo, prop); - icalproperty_free(prop); - } - if (IsEmptyStr(bstr("nodtstart"))) { - if (yesbstr("dtstart_time")) { - icaltime_from_webform(&t, "dtstart"); - } - else { - icaltime_from_webform_dateonly(&t, "dtstart"); - } - icalcomponent_add_property(vtodo, - icalproperty_new_dtstart(t) - ); - } - while(prop = icalcomponent_get_first_property(vtodo, - ICAL_STATUS_PROPERTY), prop != NULL) { - icalcomponent_remove_property(vtodo,prop); - icalproperty_free(prop); - } - while(prop = icalcomponent_get_first_property(vtodo, - ICAL_PERCENTCOMPLETE_PROPERTY), prop != NULL) { - icalcomponent_remove_property(vtodo,prop); - icalproperty_free(prop); - } - - if (havebstr("status")) { - icalproperty_status taskStatus = icalproperty_string_to_status(bstr("status")); - icalcomponent_set_status(vtodo, taskStatus); - icalcomponent_add_property(vtodo, - icalproperty_new_percentcomplete( - (strcasecmp(bstr("status"), "completed") ? 0 : 100) - ) - ); + /* A which_kind of (-1) means just load the whole thing */ + if (which_kind == (-1)) { + CallBack(cal, msgnum, from, unread, calv); } + + /* Otherwise recurse and hunt */ else { - icalcomponent_add_property(vtodo, icalproperty_new_percentcomplete(0)); - } - while (prop = icalcomponent_get_first_property(vtodo, - ICAL_CATEGORIES_PROPERTY), prop != NULL) { - icalcomponent_remove_property(vtodo,prop); - icalproperty_free(prop); - } - if (!IsEmptyStr(bstr("category"))) { - prop = icalproperty_new_categories(bstr("category")); - icalcomponent_add_property(vtodo,prop); - } - while (prop = icalcomponent_get_first_property(vtodo, - ICAL_DUE_PROPERTY), prop != NULL) { - icalcomponent_remove_property(vtodo, prop); - icalproperty_free(prop); - } - if (IsEmptyStr(bstr("nodue"))) { - if (yesbstr("due_time")) { - icaltime_from_webform(&t, "due"); + + /* Simple components of desired type */ + if (icalcomponent_isa(cal) == which_kind) { + CallBack(cal, msgnum, from, unread, calv); } - else { - icaltime_from_webform_dateonly(&t, "due"); + + /* Subcomponents of desired type */ + for (c = icalcomponent_get_first_component(cal, which_kind); + (c != 0); + c = icalcomponent_get_next_component(cal, which_kind)) { + CallBack(c, msgnum, from, unread, calv); } - icalcomponent_add_property(vtodo, - icalproperty_new_due(t) - ); - } - /** Give this task a UID if it doesn't have one. */ - lprintf(9, "Give this task a UID if it doesn't have one.\n"); - if (icalcomponent_get_first_property(vtodo, - ICAL_UID_PROPERTY) == NULL) { - generate_uuid(buf); - icalcomponent_add_property(vtodo, - icalproperty_new_uid(buf) - ); - } - - /** Increment the sequence ID */ - lprintf(9, "Increment the sequence ID\n"); - while (prop = icalcomponent_get_first_property(vtodo, - ICAL_SEQUENCE_PROPERTY), (prop != NULL) ) { - i = icalproperty_get_sequence(prop); - lprintf(9, "Sequence was %d\n", i); - if (i > sequence) sequence = i; - icalcomponent_remove_property(vtodo, prop); - icalproperty_free(prop); - } - ++sequence; - lprintf(9, "New sequence is %d. Adding...\n", sequence); - icalcomponent_add_property(vtodo, - icalproperty_new_sequence(sequence) - ); - - /** - * Encapsulate event into full VCALENDAR component. Clone it first, - * for two reasons: one, it's easier to just free the whole thing - * when we're done instead of unbundling, but more importantly, we - * can't encapsulate something that may already be encapsulated - * somewhere else. - */ - lprintf(9, "Encapsulating into a full VCALENDAR component\n"); - encaps = ical_encapsulate_subcomponent(icalcomponent_new_clone(vtodo)); - - /* Serialize it and save it to the message base */ - serv_puts("ENT0 1|||4"); - serv_getln(buf, sizeof buf); - if (buf[0] == '4') { - serv_puts("Content-type: text/calendar"); - serv_puts(""); - serv_puts(icalcomponent_as_ical_string(encaps)); - serv_puts("000"); - - /** - * Probably not necessary; the server will see the UID - * of the object and delete the old one anyway, but - * just in case... - */ - delete_existing = 1; + } - icalcomponent_free(encaps); - } - - /** - * If the user clicked 'Delete' then explicitly delete the message. - */ - if (havebstr("delete_button")) { - delete_existing = 1; - } - - if ( (delete_existing) && (msgnum > 0L) ) { - serv_printf("DELE %ld", lbstr("msgnum")); - serv_getln(buf, sizeof buf); - } - - if (created_new_vtodo) { - icalcomponent_free(vtodo); - } - - /* Go back to wherever we came from */ - if (ibstr("return_to_summary") == 1) { - summary(); - } - else { - readloop(readfwd); + + icalcomponent_free(cal); } } - - -/* - * Code common to all icalendar display handlers. Given a message number and a MIME - * type, we load the message and hunt for that MIME type. If found, we load - * the relevant part, deserialize it into a libical component, filter it for - * the requested object type, and feed it to the specified handler. - */ +// Code common to all icalendar display handlers. Given a message number and a MIME +// type, we load the message and hunt for that MIME type. If found, we load +// the relevant part, deserialize it into a libical component, filter it for +// the requested object type, and feed it to the specified handler. void load_ical_object(long msgnum, int unread, - icalcomponent_kind which_kind, - void (*callback)(icalcomponent *, long, char*, int, struct calview *), - struct calview *calv - ) -{ - char buf[1024]; + icalcomponent_kind which_kind, + IcalCallbackFunc CallBack, + calview *calv, + int RenderAsync +) { + StrBuf *Buf; + StrBuf *Data = NULL; + const char *bptr; + int Done = 0; char from[128] = ""; char mime_partnum[256]; char mime_filename[256]; char mime_content_type[256]; char mime_disposition[256]; - int mime_length; char relevant_partnum[256]; char *relevant_source = NULL; - icalcomponent *cal, *c; + int phase = 0; /* 0 = citadel headers, 1 = mime headers, 2 = body */ + char msg4_content_type[256] = ""; + char msg4_content_encoding[256] = ""; + int msg4_content_length = 0; relevant_partnum[0] = '\0'; - sprintf(buf, "MSG4 %ld", msgnum); /* we need the mime headers */ - serv_puts(buf); - serv_getln(buf, sizeof buf); - if (buf[0] != '1') return; - - while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) { - if (!strncasecmp(buf, "part=", 5)) { - extract_token(mime_filename, &buf[5], 1, '|', sizeof mime_filename); - extract_token(mime_partnum, &buf[5], 2, '|', sizeof mime_partnum); - extract_token(mime_disposition, &buf[5], 3, '|', sizeof mime_disposition); - extract_token(mime_content_type, &buf[5], 4, '|', sizeof mime_content_type); - mime_length = extract_int(&buf[5], 5); - - if ( (!strcasecmp(mime_content_type, "text/calendar")) - || (!strcasecmp(mime_content_type, "application/ics")) - || (!strcasecmp(mime_content_type, "text/vtodo")) + serv_printf("MSG4 %ld", msgnum); /* we need the mime headers */ + Buf = NewStrBuf(); + StrBuf_ServGetln(Buf); + if (GetServerStatus(Buf, NULL) != 1) { + FreeStrBuf (&Buf); + return; + } + while (!Done && (StrBuf_ServGetln(Buf)>=0)) { + if ( (StrLength(Buf)==3) && + !strcmp(ChrPtr(Buf), "000")) { + Done = 1; + break; + } + bptr = ChrPtr(Buf); + switch (phase) { + case 0: + if (!strncasecmp(bptr, "part=", 5)) { + extract_token(mime_filename, &bptr[5], 1, '|', sizeof mime_filename); + extract_token(mime_partnum, &bptr[5], 2, '|', sizeof mime_partnum); + extract_token(mime_disposition, &bptr[5], 3, '|', sizeof mime_disposition); + extract_token(mime_content_type, &bptr[5], 4, '|', sizeof mime_content_type); + /* do we care? mime_length = */extract_int(&bptr[5], 5); + + if ( (!strcasecmp(mime_content_type, "text/calendar")) + || (!strcasecmp(mime_content_type, "application/ics")) + || (!strcasecmp(mime_content_type, "text/vtodo")) + || (!strcasecmp(mime_content_type, "text/todo")) ) { - strcpy(relevant_partnum, mime_partnum); + strcpy(relevant_partnum, mime_partnum); + } } - } - else if (!strncasecmp(buf, "from=", 4)) { - extract_token(from, buf, 1, '=', sizeof(from)); - } - } - - if (!IsEmptyStr(relevant_partnum)) { - relevant_source = load_mimepart(msgnum, relevant_partnum); - if (relevant_source != NULL) { - - cal = icalcomponent_new_from_string(relevant_source); - if (cal != NULL) { - - /* A which_kind of (-1) means just load the whole thing */ - if (which_kind == (-1)) { - callback(cal, msgnum, from, unread, calv); + else if (!strncasecmp(bptr, "from=", 4)) { + extract_token(from, bptr, 1, '=', sizeof(from)); + } + else if ((phase == 0) && (!strncasecmp(bptr, "text", 4))) { + phase = 1; + } + break; + case 1: + if (!IsEmptyStr(bptr)) { + if (!strncasecmp(bptr, "Content-type: ", 14)) { + safestrncpy(msg4_content_type, &bptr[14], sizeof msg4_content_type); + string_trim(msg4_content_type); } - - /* Otherwise recurse and hunt */ - else { - - /* Simple components of desired type */ - if (icalcomponent_isa(cal) == which_kind) { - callback(cal, msgnum, from, unread, calv); - } - - /* Subcomponents of desired type */ - for (c = icalcomponent_get_first_component(cal, which_kind); - (c != 0); - c = icalcomponent_get_next_component(cal, which_kind)) { - callback(c, msgnum, from, unread, calv); - } - + else if (!strncasecmp(bptr, "Content-transfer-encoding: ", 27)) { + safestrncpy(msg4_content_encoding, &bptr[27], sizeof msg4_content_encoding); + string_trim(msg4_content_type); } - - icalcomponent_free(cal); + else if ((!strncasecmp(bptr, "Content-length: ", 16))) { + msg4_content_length = atoi(&bptr[16]); + } + break; } - free(relevant_source); + else { + phase++; + + if ((msg4_content_length > 0) + && ( !strcasecmp(msg4_content_encoding, "7bit")) + && ((!strcasecmp(mime_content_type, "text/calendar")) + || (!strcasecmp(mime_content_type, "application/ics")) + || (!strcasecmp(mime_content_type, "text/vtodo")) + || (!strcasecmp(mime_content_type, "text/todo")) + ) + ) + { + } + } + case 2: + if (Data == NULL) + Data = NewStrBufPlain(NULL, msg4_content_length * 2); + if (msg4_content_length > 0) { + StrBuf_ServGetBLOBBuffered(Data, msg4_content_length); + phase ++; + } + else { + StrBufAppendBuf(Data, Buf, 0); + StrBufAppendBufPlain(Data, "\r\n", 1, 0); + } + case 3: + StrBufAppendBuf(Data, Buf, 0); } } - icalmemory_free_ring(); -} + FreeStrBuf(&Buf); -/* - * Display a calendar item - */ -void load_calendar_item(message_summary *Msg, int unread, struct calview *c) { - /*load_ical_object(Msg->msgnum, unread, ICAL_VEVENT_COMPONENT, display_individual_cal, c);*/ - load_ical_object(Msg->msgnum, unread, (-1), display_individual_cal, c); -} - -/* - * Display task view - */ -void display_task(message_summary *Msg, int unread) { - load_ical_object(Msg->msgnum, unread, ICAL_VTODO_COMPONENT, display_individual_cal, NULL); -} - -/* - * Display the editor component for a task - */ -void display_edit_task(void) { - long msgnum = 0L; - - /* Force change the room if we have to */ - if (havebstr("taskrm")) { - gotoroom(sbstr("taskrm")); + // If MSG4 didn't give us the part we wanted, but we know that we can find it + // as one of the other MIME parts, attempt to load it now. + if ((Data == NULL) && (!IsEmptyStr(relevant_partnum))) { + Data = load_mimepart(msgnum, relevant_partnum); } - msgnum = lbstr("msgnum"); - if (msgnum > 0L) { - /* existing task */ - load_ical_object(msgnum, 0, - ICAL_VTODO_COMPONENT, - display_edit_individual_task, - NULL - ); - } - else { - /* new task */ - display_edit_individual_task(NULL, 0L, "", 0, NULL); + if (Data != NULL) { + relevant_source = (char*) ChrPtr(Data); + process_ical_object(msgnum, unread, + from, + relevant_source, + which_kind, + CallBack, + calv); } + FreeStrBuf (&Data); + + icalmemory_free_ring(); } -/* - * save an edited task - */ -void save_task(void) { - long msgnum = 0L; - msgnum = lbstr("msgnum"); - if (msgnum > 0L) { - load_ical_object(msgnum, 0, ICAL_VTODO_COMPONENT, save_individual_task, NULL); - } - else { - save_individual_task(NULL, 0L, "", 0, NULL); - } + +// Display a calendar item +int calendar_LoadMsgFromServer(SharedMessageStatus *Stat, void **ViewSpecific, message_summary* Msg, int is_new, int i) { + calview *c = (calview*) *ViewSpecific; + load_ical_object(Msg->msgnum, is_new, (-1), display_individual_cal, c, 1); + return 0; } -/* - * display the editor component for an event - */ + +// display the editor component for an event void display_edit_event(void) { long msgnum = 0L; msgnum = lbstr("msgnum"); if (msgnum > 0L) { - /* existing event */ - load_ical_object(msgnum, 0, ICAL_VEVENT_COMPONENT, display_edit_individual_event, NULL); + // existing event + load_ical_object(msgnum, 0, ICAL_VEVENT_COMPONENT, display_edit_individual_event, NULL, 0); } else { - /* new event */ + // new event display_edit_individual_event(NULL, 0L, "", 0, NULL); } } -/* - * save an edited event - */ + +// save an edited event void save_event(void) { long msgnum = 0L; msgnum = lbstr("msgnum"); if (msgnum > 0L) { - /* load_ical_object(msgnum, 0, ICAL_VEVENT_COMPONENT, save_individual_event, NULL); */ - load_ical_object(msgnum, 0, (-1), save_individual_event, NULL); + load_ical_object(msgnum, 0, (-1), save_individual_event, NULL, 0); } else { save_individual_event(NULL, 0L, "", 0, NULL); @@ -1166,19 +783,15 @@ void save_event(void) { } - - - -/* - * Anonymous request of freebusy data for a user - */ -void do_freebusy(const char *req) { +// Anonymous request of freebusy data for a user +void do_freebusy(void) { + const char *req = ChrPtr(WC->Hdr->HR.ReqLine); char who[SIZ]; char buf[SIZ]; int len; long lines; - extract_token(who, req, 1, ' ', sizeof who); + extract_token(who, req, 0, ' ', sizeof who); if (!strncasecmp(who, "/freebusy/", 10)) { strcpy(who, &who[10]); } @@ -1191,7 +804,7 @@ void do_freebusy(const char *req) { who[len-4] = 0; } - lprintf(9, "freebusy requested for <%s>\n", who); + syslog(LOG_INFO, "freebusy requested for <%s>\n", who); serv_printf("ICAL freebusy|%s", who); serv_getln(buf, sizeof buf); @@ -1199,7 +812,7 @@ void do_freebusy(const char *req) { hprintf("HTTP/1.1 404 %s\n", &buf[4]); output_headers(0, 0, 0, 0, 0, 0); hprintf("Content-Type: text/plain\r\n"); - wprintf("%s\n", &buf[4]); + wc_printf("%s\n", &buf[4]); end_burst(); return; } @@ -1209,21 +822,67 @@ void do_freebusy(const char *req) { } +int calendar_Cleanup(void **ViewSpecific) { + calview *c; + + c = (calview *) *ViewSpecific; + wDumpContent(1); + free (c); + *ViewSpecific = NULL; + + return 0; +} + + +int __calendar_Cleanup(void **ViewSpecific) { + calview *c; + + c = (calview *) *ViewSpecific; + + free (c); + *ViewSpecific = NULL; + + return 0; +} void InitModule_CALENDAR (void) { + RegisterReadLoopHandlerset( + VIEW_CALENDAR, + calendar_GetParamsGetServerCall, + NULL, + NULL, + NULL, + calendar_LoadMsgFromServer, + calendar_RenderView_or_Tail, + calendar_Cleanup, + NULL); + + RegisterReadLoopHandlerset( + VIEW_CALBRIEF, + calendar_GetParamsGetServerCall, + NULL, + NULL, + NULL, + calendar_LoadMsgFromServer, + calendar_RenderView_or_Tail, + calendar_Cleanup, + NULL); + + + RegisterPreference("daystart", _("Calendar day view begins at:"), PRF_INT, NULL); RegisterPreference("dayend", _("Calendar day view ends at:"), PRF_INT, NULL); RegisterPreference("weekstart", _("Week starts on:"), PRF_INT, NULL); - WebcitAddUrlHandler(HKEY("display_edit_task"), display_edit_task, 0); - WebcitAddUrlHandler(HKEY("save_task"), save_task, 0); - WebcitAddUrlHandler(HKEY("display_edit_event"), display_edit_event, 0); - WebcitAddUrlHandler(HKEY("save_event"), save_event, 0); - WebcitAddUrlHandler(HKEY("respond_to_request"), respond_to_request, 0); - WebcitAddUrlHandler(HKEY("handle_rsvp"), handle_rsvp, 0); + WebcitAddUrlHandler(HKEY("freebusy"), "", 0, do_freebusy, COOKIEUNNEEDED|ANONYMOUS|FORCE_SESSIONCLOSE); + WebcitAddUrlHandler(HKEY("display_edit_task"), "", 0, display_edit_task, 0); + WebcitAddUrlHandler(HKEY("display_edit_event"), "", 0, display_edit_event, 0); + WebcitAddUrlHandler(HKEY("save_event"), "", 0, save_event, 0); + WebcitAddUrlHandler(HKEY("respond_to_request"), "", 0, respond_to_request, 0); + WebcitAddUrlHandler(HKEY("handle_rsvp"), "", 0, handle_rsvp, 0); }