* use strbuffer as wprintf backend
[citadel.git] / webcit / groupdav_main.c
index 54554897926e3adbbff8a5fd8e8bbd189812418a..07fb67d3c7ddbf07d6940716badf88df07ab9673 100644 (file)
@@ -5,22 +5,6 @@
  *
  */
 
-#include <ctype.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <fcntl.h>
-#include <signal.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-#include <sys/socket.h>
-#include <limits.h>
-#include <string.h>
-#include <pwd.h>
-#include <errno.h>
-#include <stdarg.h>
-#include <time.h>
-#include <pthread.h>
 #include "webcit.h"
 #include "webserver.h"
 #include "groupdav.h"
 
 /*
  * Output HTTP headers which are common to all requests.
+ *
+ * Please observe that we don't use the usual output_headers()
+ * and wDumpContent() functions in the GroupDAV subsystem, so we
+ * do our own header stuff here.
+ *
  */
 void groupdav_common_headers(void) {
-       wprintf(
-               "Server: %s / %s\n"
-               "Connection: close\n",
-               SERVER, serv_info.serv_software
+       hprintf(
+               "Server: %s / %s\r\n"
+               "Connection: close\r\n",
+               PACKAGE_STRING, serv_info.serv_software
        );
 }
 
 
+
 /*
- * Main entry point for GroupDAV requests
+ * string conversion function
+ */
+void euid_escapize(char *target, char *source) {
+       int i, len;
+       int target_length = 0;
+
+       strcpy(target, "");
+       len = strlen(source);
+       for (i=0; i<len; ++i) {
+               if ( (isalnum(source[i])) || (source[i]=='-') || (source[i]=='_') ) {
+                       target[target_length] = source[i];
+                       target[++target_length] = 0;
+               }
+               else {
+                       sprintf(&target[target_length], "=%02X", (0xFF & source[i]));
+                       target_length += 3;
+               }
+       }
+}
+
+/*
+ * string conversion function
  */
-void groupdav_main(struct httprequest *req) {
+void euid_unescapize(char *target, char *source) {
+       int a, b, len;
+       char hex[3];
+       int target_length = 0;
+
+       strcpy(target, "");
+
+       len = strlen(source);
+       for (a = 0; a < len; ++a) {
+               if (source[a] == '=') {
+                       hex[0] = source[a + 1];
+                       hex[1] = source[a + 2];
+                       hex[2] = 0;
+                       b = 0;
+                       sscanf(hex, "%02x", &b);
+                       target[target_length] = b;
+                       target[++target_length] = 0;
+                       a += 2;
+               }
+               else {
+                       target[target_length] = source[a];
+                       target[++target_length] = 0;
+               }
+       }
+}
 
+
+
+
+/*
+ * Main entry point for GroupDAV requests
+ */
+void groupdav_main(struct httprequest *req,
+                       char *dav_content_type,
+                       int dav_content_length,
+                       char *dav_content
+) {
        struct httprequest *rptr;
-       char dav_method[SIZ];
-       char dav_pathname[SIZ];
+       char dav_method[256];
+       char dav_pathname[256];
+       char dav_ifmatch[256];
+       int dav_depth;
+       char *ds;
+       int i, len;
+
+       strcpy(dav_method, "");
+       strcpy(dav_pathname, "");
+       strcpy(dav_ifmatch, "");
+       dav_depth = 0;
 
        for (rptr=req; rptr!=NULL; rptr=rptr->next) {
-               lprintf(9, "> %s\n", rptr->line);       /* FIXME we can eventually remove this trace */
                if (!strncasecmp(rptr->line, "Host: ", 6)) {
-                        safestrncpy(WC->http_host, &rptr->line[6], sizeof WC->http_host);
+                       if (IsEmptyStr(WC->http_host)) {
+                               safestrncpy(WC->http_host, &rptr->line[6],
+                                       sizeof WC->http_host);
+                       }
+                }
+               if (!strncasecmp(rptr->line, "If-Match: ", 10)) {
+                        safestrncpy(dav_ifmatch, &rptr->line[10],
+                               sizeof dav_ifmatch);
+                }
+               if (!strncasecmp(rptr->line, "Depth: ", 7)) {
+                       if (!strcasecmp(&rptr->line[7], "infinity")) {
+                               dav_depth = 32767;
+                       }
+                       else if (!strcmp(&rptr->line[7], "0")) {
+                               dav_depth = 0;
+                       }
+                       else if (!strcmp(&rptr->line[7], "1")) {
+                               dav_depth = 1;
+                       }
                 }
-
        }
 
        if (!WC->logged_in) {
-               wprintf("HTTP/1.1 401 Unauthorized\n");
+               hprintf("HTTP/1.1 401 Unauthorized\r\n");
                groupdav_common_headers();
-               wprintf("WWW-Authenticate: Basic realm=\"%s\"\n", serv_info.serv_humannode);
-               wprintf("Content-Type: text/plain\n");
-               wprintf("\n");
-               wprintf("GroupDAV sessions require HTTP authentication.\n");
+               hprintf("WWW-Authenticate: Basic realm=\"%s\"\r\n",
+                       serv_info.serv_humannode);
+               hprintf("Content-Length: 0\r\n");
+               end_burst();
                return;
        }
 
-       extract_token(dav_method, req->line, 0, ' ');
-       extract_token(dav_pathname, req->line, 1, ' ');
+       extract_token(dav_method, req->line, 0, ' ', sizeof dav_method);
+       extract_token(dav_pathname, req->line, 1, ' ', sizeof dav_pathname);
        unescape_input(dav_pathname);
 
+       /* If the request does not begin with "/groupdav", prepend it.  If
+        * we happen to introduce a double-slash, that's ok; we'll strip it
+        * in the next step.
+        * 
+        * (THIS IS DISABLED BECAUSE WE ARE NOW TRYING TO DO REAL DAV.)
+        *
+       if (strncasecmp(dav_pathname, "/groupdav", 9)) {
+               char buf[512];
+               snprintf(buf, sizeof buf, "/groupdav/%s", dav_pathname);
+               safestrncpy(dav_pathname, buf, sizeof dav_pathname);
+       }
+        *
+        */
+       
+       /* Remove any stray double-slashes in pathname */
+       while (ds=strstr(dav_pathname, "//"), ds != NULL) {
+               strcpy(ds, ds+1);
+       }
+
        /*
-        * We like the GET method ... it's nice and simple.
+        * If there's an If-Match: header, strip out the quotes if present, and
+        * then if all that's left is an asterisk, make it go away entirely.
+        */
+       len = strlen(dav_ifmatch);
+       if (len > 0) {
+               stripltlen(dav_ifmatch, &len);
+               if (dav_ifmatch[0] == '\"') {
+                       memmove (dav_ifmatch, &dav_ifmatch[1], len);
+                       len --;
+                       for (i=0; i<len; ++i) {
+                               if (dav_ifmatch[i] == '\"') {
+                                       dav_ifmatch[i] = 0;
+                                       len = i - 1;
+                               }
+                       }
+               }
+               if (!strcmp(dav_ifmatch, "*")) {
+                       strcpy(dav_ifmatch, "");
+               }
+       }
+
+       /*
+        * The OPTIONS method is not required by GroupDAV.  This is an
+        * experiment to determine what might be involved in supporting
+        * other variants of DAV in the future.
+        */
+       if (!strcasecmp(dav_method, "OPTIONS")) {
+               groupdav_options(dav_pathname);
+               return;
+       }
+
+       /*
+        * The PROPFIND method is basically used to list all objects in a
+        * room, or to list all relevant rooms on the server.
+        */
+       if (!strcasecmp(dav_method, "PROPFIND")) {
+               groupdav_propfind(dav_pathname, dav_depth,
+                               dav_content_type, dav_content);
+               return;
+       }
+
+       /*
+        * The GET method is used for fetching individual items.
         */
        if (!strcasecmp(dav_method, "GET")) {
                groupdav_get(dav_pathname);
@@ -78,21 +210,42 @@ void groupdav_main(struct httprequest *req) {
        }
 
        /*
-        * The PROPFIND method is basically used to list all objects in a room.
+        * The PUT method is used to add or modify items.
         */
-       if (!strcasecmp(dav_method, "PROPFIND")) {
-               groupdav_propfind(dav_pathname);
+       if (!strcasecmp(dav_method, "PUT")) {
+               groupdav_put(dav_pathname, dav_ifmatch,
+                               dav_content_type, dav_content,
+                               dav_content_length);
+               return;
+       }
+
+       /*
+        * The DELETE method kills, maims, and destroys.
+        */
+       if (!strcasecmp(dav_method, "DELETE")) {
+               groupdav_delete(dav_pathname, dav_ifmatch);
                return;
        }
 
        /*
         * Couldn't find what we were looking for.  Die in a car fire.
         */
-       wprintf("HTTP/1.1 501 Method not implemented\n");
+       hprintf("HTTP/1.1 501 Method not implemented\r\n");
        groupdav_common_headers();
-       wprintf("Content-Type: text/plain\n"
-               "\n"
-               "GroupDAV method \"%s\" is not implemented.\n",
-               dav_method
-       );
+       hprintf("Content-Type: text/plain\r\n");
+       wprintf("GroupDAV method \"%s\" is not implemented.\r\n",
+               dav_method);
+       end_burst();
+}
+
+
+/*
+ * Output our host prefix for globally absolute URL's.
+ */  
+void groupdav_identify_host(void) {
+       if (!IsEmptyStr(WC->http_host)) {
+               wprintf("%s://%s",
+                       (is_https ? "https" : "http"),
+                       WC->http_host);
+       }
 }