* move some more vars from the session context to strbuf (the use of StrBufAppendTemp...
[citadel.git] / webcit / groupdav_main.c
index ba5817d0f7b97c67bd2513776fe149154d090b8e..19b060c13eca53c369e064eac0a20f9c148a4343 100644 (file)
  *
  */
 void groupdav_common_headers(void) {
-       wprintf(
+       hprintf(
                "Server: %s / %s\r\n"
                "Connection: close\r\n",
-               SERVER, serv_info.serv_software
+               PACKAGE_STRING, ChrPtr(serv_info.serv_software)
        );
 }
 
@@ -31,26 +31,19 @@ void groupdav_common_headers(void) {
 /*
  * string conversion function
  */
-void euid_escapize(char *target, char *source) {
-       int i;
+void euid_escapize(char *target, const char *source) {
+       int i, len;
        int target_length = 0;
 
        strcpy(target, "");
-       for (i=0; i<strlen(source); ++i) {
-               if (isalnum(source[i])) {
+       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 if (source[i] == ' ') {
-                       target[target_length] = '_';
-                       target[++target_length] = 0;
-               }
-               else if (source[i] == '-') {
-                       target[target_length] = '-';
-                       target[++target_length] = 0;
-               }
                else {
-                       sprintf(&target[target_length], "%%%02X", source[i]);
+                       sprintf(&target[target_length], "=%02X", (0xFF & source[i]));
                        target_length += 3;
                }
        }
@@ -59,15 +52,16 @@ void euid_escapize(char *target, char *source) {
 /*
  * string conversion function
  */
-void euid_unescapize(char *target, char *source) {
-       int a, b;
+void euid_unescapize(char *target, const char *source) {
+       int a, b, len;
        char hex[3];
        int target_length = 0;
 
        strcpy(target, "");
 
-       for (a = 0; a < strlen(source); ++a) {
-               if (source[a] == '%') {
+       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;
@@ -77,14 +71,6 @@ void euid_unescapize(char *target, char *source) {
                        target[++target_length] = 0;
                        a += 2;
                }
-               else if (source[a] == '_') {
-                       target[target_length] = ' ';
-                       target[++target_length] = 0;
-               }
-               else if (source[a] == '-') {
-                       target[target_length] = '-';
-                       target[++target_length] = 0;
-               }
                else {
                        target[target_length] = source[a];
                        target[++target_length] = 0;
@@ -98,59 +84,77 @@ void euid_unescapize(char *target, char *source) {
 /*
  * Main entry point for GroupDAV requests
  */
-void groupdav_main(struct httprequest *req,
-                       char *dav_content_type,
-                       int dav_content_length,
-                       char *dav_content
+void groupdav_main(HashList *HTTPHeaders,
+                  StrBuf *DavPathname,
+                  StrBuf *DavMethod,
+                  StrBuf *dav_content_type,
+                  int dav_content_length,
+                  StrBuf *dav_content,
+                  int Offset
 ) {
-       struct httprequest *rptr;
-       char dav_method[256];
-       char dav_pathname[256];
+       void *vLine;
        char dav_ifmatch[256];
-       char buf[256];
+       int dav_depth;
        char *ds;
-       int i;
+       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); */
-               if (!strncasecmp(rptr->line, "Host: ", 6)) {
-                        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 (IsEmptyStr(WC->http_host) &&
+           GetHash(HTTPHeaders, HKEY("HOST"), &vLine) && 
+           (vLine != NULL)) {
+               safestrncpy(WC->http_host, ChrPtr((StrBuf*)vLine),
+                           sizeof WC->http_host);
+       }
+       if (GetHash(HTTPHeaders, HKEY("IF-MATCH"), &vLine) && 
+           (vLine != NULL)) {
+               safestrncpy(dav_ifmatch, ChrPtr((StrBuf*)vLine),
+                           sizeof dav_ifmatch);
+       }
+       if (GetHash(HTTPHeaders, HKEY("DEPTH"), &vLine) && 
+           (vLine != NULL)) {
+               if (!strcasecmp(ChrPtr((StrBuf*)vLine), "infinity")) {
+                       dav_depth = 32767;
+               }
+               else if (strcmp(ChrPtr((StrBuf*)vLine), "0") == 0) {
+                       dav_depth = 0;
+               }
+               else if (strcmp(ChrPtr((StrBuf*)vLine), "1") == 0) {
+                       dav_depth = 1;
+               }
        }
 
        if (!WC->logged_in) {
-               wprintf("HTTP/1.1 401 Unauthorized\r\n");
+               hprintf("HTTP/1.1 401 Unauthorized\r\n");
                groupdav_common_headers();
-               wprintf("WWW-Authenticate: Basic realm=\"%s\"\r\n",
-                       serv_info.serv_humannode);
-               wprintf("Content-Length: 0\r\n\r\n");
+               hprintf("WWW-Authenticate: Basic realm=\"%s\"\r\n",
+                       ChrPtr(serv_info.serv_humannode));
+               hprintf("Content-Length: 0\r\n");
+               end_burst();
                return;
        }
 
-       extract_token(dav_method, req->line, 0, ' ', sizeof dav_method);
-       extract_token(dav_pathname, req->line, 1, ' ', sizeof dav_pathname);
-       unescape_input(dav_pathname);
+//     extract_token(dav_method, req->line, 0, ' ', sizeof dav_method);
+//     extract_token(dav_pathname, req->line, 1, ' ', sizeof dav_pathname);
+       //// TODO 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) {
+       while (ds=strstr(ChrPtr(DavPathname), "//"), ds != NULL) {
                strcpy(ds, ds+1);
        }
 
@@ -158,13 +162,16 @@ void groupdav_main(struct httprequest *req,
         * 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.
         */
-       if (strlen(dav_ifmatch) > 0) {
-               striplt(dav_ifmatch);
+       len = strlen(dav_ifmatch);
+       if (len > 0) {
+               stripltlen(dav_ifmatch, &len);
                if (dav_ifmatch[0] == '\"') {
-                       strcpy(dav_ifmatch, &dav_ifmatch[1]);
-                       for (i=0; i<strlen(dav_ifmatch); ++i) {
+                       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;
                                }
                        }
                }
@@ -178,8 +185,8 @@ void groupdav_main(struct httprequest *req,
         * 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);
+       if (!strcasecmp(ChrPtr(DavMethod), "OPTIONS")) {
+               groupdav_options(DavPathname);
                return;
        }
 
@@ -187,44 +194,58 @@ void groupdav_main(struct httprequest *req,
         * 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);
+       if (!strcasecmp(ChrPtr(DavMethod), "PROPFIND")) {
+               groupdav_propfind(DavPathname, dav_depth,
+                                 dav_content_type, dav_content, 
+                                 Offset);
                return;
        }
 
        /*
         * The GET method is used for fetching individual items.
         */
-       if (!strcasecmp(dav_method, "GET")) {
-               groupdav_get(dav_pathname);
+       if (!strcasecmp(ChrPtr(DavMethod), "GET")) {
+               groupdav_get(DavPathname);
                return;
        }
 
        /*
         * The PUT method is used to add or modify items.
         */
-       if (!strcasecmp(dav_method, "PUT")) {
-               groupdav_put(dav_pathname, dav_ifmatch,
-                               dav_content_type, dav_content);
+       if (!strcasecmp(ChrPtr(DavMethod), "PUT")) {
+               groupdav_put(DavPathname, dav_ifmatch,
+                            ChrPtr(dav_content_type), dav_content, 
+                            Offset);
                return;
        }
 
        /*
         * The DELETE method kills, maims, and destroys.
         */
-       if (!strcasecmp(dav_method, "DELETE")) {
-               groupdav_delete(dav_pathname, dav_ifmatch);
+       if (!strcasecmp(ChrPtr(DavMethod), "DELETE")) {
+               groupdav_delete(DavPathname, dav_ifmatch);
                return;
        }
 
        /*
         * Couldn't find what we were looking for.  Die in a car fire.
         */
-       wprintf("HTTP/1.1 501 Method not implemented\r\n");
+       hprintf("HTTP/1.1 501 Method not implemented\r\n");
        groupdav_common_headers();
-       wprintf("Content-Type: text/plain\r\n"
-               "\r\n"
-               "GroupDAV method \"%s\" is not implemented.\r\n",
-               dav_method
-       );
+       hprintf("Content-Type: text/plain\r\n");
+       wprintf("GroupDAV method \"%s\" is not implemented.\r\n",
+               ChrPtr(DavMethod));
+       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);
+       }
 }