* Replaced serv_gets() with serv_getln() - which now requires the caller
[citadel.git] / webcit / availability.c
1 /*
2  * $Id$
3  *
4  * Check attendee availability for scheduling a meeting.
5  *
6  */
7
8 #include <ctype.h>
9 #include <stdlib.h>
10 #include <unistd.h>
11 #include <stdio.h>
12 #include <fcntl.h>
13 #include <signal.h>
14 #include <sys/types.h>
15 #include <sys/wait.h>
16 #include <sys/socket.h>
17 #include <limits.h>
18 #include <netinet/in.h>
19 #include <netdb.h>
20 #include <string.h>
21 #include <pwd.h>
22 #include <errno.h>
23 #include <stdarg.h>
24 #include <pthread.h>
25 #include <signal.h>
26 #include <time.h>
27 #include "webcit.h"
28 #include "webserver.h"
29
30
31 #ifdef WEBCIT_WITH_CALENDAR_SERVICE
32
33
34
35 /*
36  * Utility function to fetch a VFREEBUSY type of thing for
37  * any specified user.
38  */
39 icalcomponent *get_freebusy_for_user(char *who) {
40         char buf[SIZ];
41         char *serialized_fb = NULL;
42         icalcomponent *fb = NULL;
43
44         serv_printf("ICAL freebusy|%s", who);
45         serv_getln(buf, sizeof buf);
46         if (buf[0] == '1') {
47                 serialized_fb = read_server_text();
48         }
49
50         if (serialized_fb == NULL) {
51                 return NULL;
52         }
53         
54         fb = icalcomponent_new_from_string(serialized_fb);
55         free(serialized_fb);
56         if (fb == NULL) {
57                 return NULL;
58         }
59
60         return(fb);
61 }
62
63
64
65
66 /*
67  * Check to see if two events overlap.  Returns nonzero if they do.
68  * (This function is used in both Citadel and WebCit.  If you change it in
69  * one place, change it in the other.  Better yet, put it in a library.)
70  */
71 int ical_ctdl_is_overlap(
72                         struct icaltimetype t1start,
73                         struct icaltimetype t1end,
74                         struct icaltimetype t2start,
75                         struct icaltimetype t2end
76 ) {
77
78         if (icaltime_is_null_time(t1start)) return(0);
79         if (icaltime_is_null_time(t2start)) return(0);
80
81         /* First, check for all-day events */
82         if (t1start.is_date) {
83                 if (!icaltime_compare_date_only(t1start, t2start)) {
84                         return(1);
85                 }
86                 if (!icaltime_is_null_time(t2end)) {
87                         if (!icaltime_compare_date_only(t1start, t2end)) {
88                                 return(1);
89                         }
90                 }
91         }
92
93         if (t2start.is_date) {
94                 if (!icaltime_compare_date_only(t2start, t1start)) {
95                         return(1);
96                 }
97                 if (!icaltime_is_null_time(t1end)) {
98                         if (!icaltime_compare_date_only(t2start, t1end)) {
99                                 return(1);
100                         }
101                 }
102         }
103
104         /* Now check for overlaps using date *and* time. */
105
106         /* First, bail out if either event 1 or event 2 is missing end time. */
107         if (icaltime_is_null_time(t1end)) return(0);
108         if (icaltime_is_null_time(t2end)) return(0);
109
110         /* If event 1 ends before event 2 starts, we're in the clear. */
111         if (icaltime_compare(t1end, t2start) <= 0) return(0);
112
113         /* If event 2 ends before event 1 starts, we're also ok. */
114         if (icaltime_compare(t2end, t1start) <= 0) return(0);
115
116         /* Otherwise, they overlap. */
117         return(1);
118 }
119
120
121
122 /*
123  * Back end function for check_attendee_availability()
124  * This one checks an individual attendee against a supplied
125  * event start and end time.  All these fields have already been
126  * broken out.  The result is placed in 'annotation'.
127  */
128 void check_individual_attendee(char *attendee_string,
129                                 struct icaltimetype event_start,
130                                 struct icaltimetype event_end,
131                                 char *annotation) {
132
133         icalcomponent *fbc = NULL;
134         icalcomponent *fb = NULL;
135         icalproperty *thisfb = NULL;
136         struct icalperiodtype period;
137
138         /* Set to 'unknown' right from the beginning.  Unless we learn
139          * something else, that's what we'll go with.
140          */
141         strcpy(annotation, "availability unknown");
142
143         fbc = get_freebusy_for_user(attendee_string);
144         if (fbc == NULL) {
145                 return;
146         }
147
148         /* Make sure we're looking at a VFREEBUSY by itself.  What we're probably
149          * looking at initially is a VFREEBUSY encapsulated in a VCALENDAR.
150          */
151         if (icalcomponent_isa(fbc) == ICAL_VCALENDAR_COMPONENT) {
152                 fb = icalcomponent_get_first_component(fbc, ICAL_VFREEBUSY_COMPONENT);
153         }
154         else if (icalcomponent_isa(fbc) == ICAL_VFREEBUSY_COMPONENT) {
155                 fb = fbc;
156         }
157
158         /* Iterate through all FREEBUSY's looking for conflicts. */
159         if (fb != NULL) {
160
161                 strcpy(annotation, "free");
162
163                 for (thisfb = icalcomponent_get_first_property(fb, ICAL_FREEBUSY_PROPERTY);
164                     thisfb != NULL;
165                     thisfb = icalcomponent_get_next_property(fb, ICAL_FREEBUSY_PROPERTY) ) {
166
167                         /* Do the check */
168                         period = icalproperty_get_freebusy(thisfb);
169                         if (ical_ctdl_is_overlap(period.start, period.end,
170                            event_start, event_end)) {
171                                 strcpy(annotation, "BUSY");
172                         }
173
174                 }
175         }
176
177         icalcomponent_free(fbc);
178 }
179
180
181
182
183 /*
184  * Check the availability of all attendees for an event (when possible)
185  * and annotate accordingly.
186  */
187 void check_attendee_availability(icalcomponent *vevent) {
188         icalproperty *attendee = NULL;
189         icalproperty *dtstart_p = NULL;
190         icalproperty *dtend_p = NULL;
191         struct icaltimetype dtstart_t;
192         struct icaltimetype dtend_t;
193         char attendee_string[SIZ];
194         char annotated_attendee_string[SIZ];
195         char annotation[SIZ];
196
197         if (vevent == NULL) {
198                 return;
199         }
200
201         /* If we're looking at a fully encapsulated VCALENDAR
202          * rather than a VEVENT component, attempt to use the first
203          * relevant VEVENT subcomponent.  If there is none, the
204          * NULL returned by icalcomponent_get_first_component() will
205          * tell the next iteration of this function to create a
206          * new one.
207          */
208         if (icalcomponent_isa(vevent) == ICAL_VCALENDAR_COMPONENT) {
209                 check_attendee_availability(
210                         icalcomponent_get_first_component(
211                                 vevent, ICAL_VEVENT_COMPONENT
212                         )
213                 );
214                 return;
215         }
216
217         ical_dezonify(vevent);          /* Convert everything to UTC */
218
219         /*
220          * Learn the start and end times.
221          */
222         dtstart_p = icalcomponent_get_first_property(vevent, ICAL_DTSTART_PROPERTY);
223         if (dtstart_p != NULL) dtstart_t = icalproperty_get_dtstart(dtstart_p);
224
225         dtend_p = icalcomponent_get_first_property(vevent, ICAL_DTEND_PROPERTY);
226         if (dtend_p != NULL) dtend_t = icalproperty_get_dtend(dtend_p);
227
228         /*
229          * Iterate through attendees.
230          */
231         for (attendee = icalcomponent_get_first_property(vevent, ICAL_ATTENDEE_PROPERTY);
232             attendee != NULL;
233             attendee = icalcomponent_get_next_property(vevent, ICAL_ATTENDEE_PROPERTY)) {
234
235                 strcpy(attendee_string, icalproperty_get_attendee(attendee));
236                 if (!strncasecmp(attendee_string, "MAILTO:", 7)) {
237
238                         /* screen name or email address */
239                         strcpy(attendee_string, &attendee_string[7]);
240                         striplt(attendee_string);
241
242                         check_individual_attendee(attendee_string,
243                                                 dtstart_t, dtend_t,
244                                                 annotation);
245
246                         /* Replace the attendee name with an annotated one. */
247                         snprintf(annotated_attendee_string, sizeof annotated_attendee_string,
248                                 "MAILTO:%s (%s)", attendee_string, annotation);
249                         icalproperty_set_attendee(attendee, annotated_attendee_string);
250
251                 }
252         }
253
254 }
255
256
257 #endif /* WEBCIT_WITH_CALENDAR_SERVICE */