webcit/src/groupdav_get.c

   1 /*
   2  * $Id$
   3  *
   4  * Handles GroupDAV GET requests.
   5  *
   6  */
   7
   8 #include "webcit.h"
   9 #include "webserver.h"
  10 #include "groupdav.h"
  11
  12
  13 /*
  14  * Fetch the entire contents of the room as one big ics file.
  15  * This is for "webcal://" type access.
  16  */
  17 void groupdav_get_big_ics(void) {
  18         char buf[1024];
  19
  20         serv_puts("ICAL getics");
  21         serv_getln(buf, sizeof buf);
  22         if (buf[0] != '1') {
  23                 wprintf("HTTP/1.1 404 not found\r\n");
  24                 groupdav_common_headers();
  25                 wprintf(
  26                         "Content-Type: text/plain\r\n"
  27                         "\r\n"
  28                         "%s\r\n",
  29                         &buf[4]
  30                 );
  31                 return;
  32         }
  33
  34         wprintf("HTTP/1.1 200 OK\r\n");
  35         groupdav_common_headers();
  36         wprintf("Content-type: text/calendar; charset=UTF-8\r\n");
  37         begin_burst();
  38         while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
  39                 wprintf("%s\r\n", buf);
  40         }
  41         end_burst();
  42 }
  43
  44
  45 /*
  46  * The pathname is always going to take one of two formats:
  47  * /groupdav/room_name/euid     (GroupDAV)
  48  * /groupdav/room_name          (webcal)
  49  */
  50 void groupdav_get(char *dav_pathname) {
  51         char dav_roomname[1024];
  52         char dav_uid[1024];
  53         long dav_msgnum = (-1);
  54         char buf[1024];
  55         int in_body = 0;
  56         int found_content_type = 0;
  57
  58         if (num_tokens(dav_pathname, '/') < 3) {
  59                 wprintf("HTTP/1.1 404 not found\r\n");
  60                 groupdav_common_headers();
  61                 wprintf(
  62                         "Content-Type: text/plain\r\n"
  63                         "\r\n"
  64                         "The object you requested was not found.\r\n"
  65                 );
  66                 return;
  67         }
  68
  69         extract_token(dav_roomname, dav_pathname, 2, '/', sizeof dav_roomname);
  70         extract_token(dav_uid, dav_pathname, 3, '/', sizeof dav_uid);
  71         if ((!strcasecmp(dav_uid, "ics")) || (!strcasecmp(dav_uid, "calendar.ics"))) {
  72                 strcpy(dav_uid, "");
  73         }
  74
  75         /* Go to the correct room. */
  76         if (strcasecmp(WC->wc_roomname, dav_roomname)) {
  77                 gotoroom(dav_roomname);
  78         }
  79         if (strcasecmp(WC->wc_roomname, dav_roomname)) {
  80                 wprintf("HTTP/1.1 404 not found\r\n");
  81                 groupdav_common_headers();
  82                 wprintf(
  83                         "Content-Type: text/plain\r\n"
  84                         "\r\n"
  85                         "There is no folder called \"%s\" on this server.\r\n",
  86                         dav_roomname
  87                 );
  88                 return;
  89         }
  90
  91         /** GET on the collection itself returns an ICS of the entire collection.
  92          */
  93         if (!strcasecmp(dav_uid, "")) {
  94                 groupdav_get_big_ics();
  95                 return;
  96         }
  97
  98         dav_msgnum = locate_message_by_uid(dav_uid);
  99         serv_printf("MSG2 %ld", dav_msgnum);
 100         serv_getln(buf, sizeof buf);
 101         if (buf[0] != '1') {
 102                 wprintf("HTTP/1.1 404 not found\r\n");
 103                 groupdav_common_headers();
 104                 wprintf(
 105                         "Content-Type: text/plain\r\n"
 106                         "\r\n"
 107                         "Object \"%s\" was not found in the \"%s\" folder.\r\n",
 108                         dav_uid,
 109                         dav_roomname
 110                 );
 111                 return;
 112         }
 113
 114         wprintf("HTTP/1.1 200 OK\r\n");
 115         groupdav_common_headers();
 116         wprintf("etag: \"%ld\"\r\n", dav_msgnum);
 117         while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
 118                 if (in_body) {
 119                         wprintf("%s\r\n", buf);
 120                 }
 121                 else if (!strncasecmp(buf, "Date: ", 6)) {
 122                         wprintf("%s\r\n", buf);
 123                 }
 124                 else if (!strncasecmp(buf, "Content-type: ", 14)) {
 125                         wprintf("%s", buf);
 126                         if (bmstrcasestr(buf, "charset=")) {
 127                                 wprintf("%s\r\n", buf);
 128                         }
 129                         else {
 130                                 wprintf("%s;charset=UTF-8\r\n", buf);
 131                         }
 132                         found_content_type = 1;
 133                 }
 134                 else if ((strlen(buf) == 0) && (in_body == 0)) {
 135                         if (!found_content_type) {
 136                                 wprintf("Content-type: text/plain\r\n");
 137                         }
 138                         in_body = 1;
 139                         begin_burst();
 140                 }
 141         }
 142         end_burst();
 143 }